! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm( 1,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.5550533E+04
      data (ref_adm( 1,iz, 1, 2),iz = 1,20) / &
     & 0.4818344E+00, 0.4818344E+00, 0.4597624E+00, 0.4568888E+00, &
     & 0.4556339E+00, 0.4553057E+00, 0.4543099E+00, 0.4519339E+00, &
     & 0.4553345E+00, 0.4431269E+00, 0.4281895E+00, 0.4176807E+00, &
     & 0.4060450E+00, 0.5359400E+00, 0.3313800E+00, 0.3557410E+00, &
     & 0.3328778E+00, 0.3029943E+00, 0.2555483E+00, 0.2555483E+00 /
      data (ref_adm( 1,iz, 2, 2),iz = 1,20) / &
     & 0.4818344E+00, 0.4818344E+00, 0.4597624E+00, 0.4568888E+00, &
     & 0.4556339E+00, 0.4553057E+00, 0.4543099E+00, 0.4519339E+00, &
     & 0.4553345E+00, 0.4431269E+00, 0.4281895E+00, 0.4176807E+00, &
     & 0.4060450E+00, 0.5359400E+00, 0.3313800E+00, 0.3557410E+00, &
     & 0.3328778E+00, 0.3029943E+00, 0.2555483E+00, 0.2555483E+00 /
      data (ref_adm( 1,iz, 3, 2),iz = 1,20) / &
     & 0.4818344E+00, 0.4818344E+00, 0.4597624E+00, 0.4568889E+00, &
     & 0.4556339E+00, 0.4553057E+00, 0.4543099E+00, 0.4519338E+00, &
     & 0.4553345E+00, 0.4431269E+00, 0.4281894E+00, 0.4176807E+00, &
     & 0.4060450E+00, 0.4133300E+00, 0.3775156E+00, 0.3557410E+00, &
     & 0.3328778E+00, 0.3029943E+00, 0.1845964E+00, 0.1845964E+00 /
      data (ref_adm( 1,iz, 4, 2),iz = 1,20) / &
     & 0.4818344E+00, 0.4818344E+00, 0.4597624E+00, 0.4568888E+00, &
     & 0.4556339E+00, 0.4553057E+00, 0.4543099E+00, 0.4519339E+00, &
     & 0.4553345E+00, 0.4431269E+00, 0.4281895E+00, 0.4176807E+00, &
     & 0.5577400E+00, 0.4100400E+00, 0.3987900E+00, 0.3557410E+00, &
     & 0.3328778E+00, 0.3029943E+00, 0.2555483E+00, 0.2555483E+00 /
      data (ref_adm( 1,iz, 5, 2),iz = 1,20) / &
     & 0.4818344E+00, 0.4818344E+00, 0.4597624E+00, 0.4568889E+00, &
     & 0.4556339E+00, 0.4553057E+00, 0.4543099E+00, 0.4519338E+00, &
     & 0.4553345E+00, 0.4431269E+00, 0.4281894E+00, 0.4176807E+00, &
     & 0.4260700E+00, 0.3558500E+00, 0.3775156E+00, 0.3557410E+00, &
     & 0.3328778E+00, 0.3029943E+00, 0.2555483E+00, 0.2555483E+00 /
      data (ref_adm( 1,iz, 6, 2),iz = 1,20) / &
     & 0.4818344E+00, 0.4818344E+00, 0.4597624E+00, 0.4568888E+00, &
     & 0.4556339E+00, 0.4553057E+00, 0.4543099E+00, 0.4519339E+00, &
     & 0.4553345E+00, 0.4431269E+00, 0.4281895E+00, 0.4176807E+00, &
     & 0.4060450E+00, 0.2371600E+00, 0.3775156E+00, 0.3544700E+00, &
     & 0.3328778E+00, 0.3029943E+00, 0.2555483E+00, 0.2555483E+00 /
      data (ref_adm( 1,iz, 7, 2),iz = 1,20) / &
     & 0.4818344E+00, 0.4818344E+00, 0.4597624E+00, 0.4568889E+00, &
     & 0.4556339E+00, 0.4553057E+00, 0.4543099E+00, 0.4519338E+00, &
     & 0.4553345E+00, 0.4431269E+00, 0.4281894E+00, 0.4176807E+00, &
     & 0.4060450E+00, 0.4175200E+00, 0.3775156E+00, 0.3321700E+00, &
     & 0.3328778E+00, 0.3029943E+00, 0.2555483E+00, 0.2555483E+00 /
      data (ref_adm( 1,iz, 8, 2),iz = 1,20) / &
     & 0.4818344E+00, 0.4818344E+00, 0.4597624E+00, 0.4568888E+00, &
     & 0.4556339E+00, 0.4553057E+00, 0.4543099E+00, 0.4519339E+00, &
     & 0.4553345E+00, 0.4431269E+00, 0.4281895E+00, 0.4176807E+00, &
     & 0.4060450E+00, 0.3940971E+00, 0.3775156E+00, 0.2896400E+00, &
     & 0.3328778E+00, 0.3029943E+00, 0.2555483E+00, 0.2555483E+00 /
      data (ref_adm( 1,iz, 9, 2),iz = 1,20) / &
     & 0.4818344E+00, 0.4818344E+00, 0.4597624E+00, 0.4568889E+00, &
     & 0.4556339E+00, 0.4553057E+00, 0.4543099E+00, 0.4519338E+00, &
     & 0.4553345E+00, 0.4431269E+00, 0.4281894E+00, 0.4176807E+00, &
     & 0.4060450E+00, 0.3940971E+00, 0.3775156E+00, 0.3557410E+00, &
     & 0.3328778E+00, 0.3029943E+00, 0.2555483E+00, 0.2555483E+00 /
      data (ref_adm( 1,iz,10, 2),iz = 1,20) / &
     & 0.4818344E+00, 0.4818344E+00, 0.4597624E+00, 0.4568888E+00, &
     & 0.4556339E+00, 0.4553057E+00, 0.4543099E+00, 0.4519339E+00, &
     & 0.4553345E+00, 0.4431269E+00, 0.4281895E+00, 0.4176807E+00, &
     & 0.4060450E+00, 0.3940971E+00, 0.3775156E+00, 0.3557410E+00, &
     & 0.3328778E+00, 0.3029943E+00, 0.2555483E+00, 0.2555483E+00 /
      data (ref_adm( 1,iz,11, 2),iz = 1,20) / &
     & 0.4818344E+00, 0.4818344E+00, 0.4597624E+00, 0.4568889E+00, &
     & 0.4556339E+00, 0.4553057E+00, 0.4543099E+00, 0.4519338E+00, &
     & 0.4553345E+00, 0.4431269E+00, 0.4281894E+00, 0.4176807E+00, &
     & 0.4060450E+00, 0.3940971E+00, 0.3775156E+00, 0.3557410E+00, &
     & 0.3328778E+00, 0.3029943E+00, 0.2555483E+00, 0.2555483E+00 /
      data (ref_adm( 1,iz,12, 2),iz = 1,20) / &
     & 0.4818344E+00, 0.4818344E+00, 0.4597624E+00, 0.4568888E+00, &
     & 0.4556339E+00, 0.4553057E+00, 0.4543099E+00, 0.4519339E+00, &
     & 0.4553345E+00, 0.4431269E+00, 0.4281895E+00, 0.4176807E+00, &
     & 0.4060450E+00, 0.3940971E+00, 0.3775156E+00, 0.3557410E+00, &
     & 0.3328778E+00, 0.3029943E+00, 0.2555483E+00, 0.2555483E+00 /
      data (ref_adm( 1,iz,13, 2),iz = 1,20) / &
     & 0.4818344E+00, 0.4818344E+00, 0.4597624E+00, 0.4568889E+00, &
     & 0.4556339E+00, 0.4553057E+00, 0.4543099E+00, 0.4519338E+00, &
     & 0.4553345E+00, 0.4431269E+00, 0.4281894E+00, 0.4176807E+00, &
     & 0.4060450E+00, 0.3940971E+00, 0.3775156E+00, 0.3557410E+00, &
     & 0.3328778E+00, 0.3029943E+00, 0.2555483E+00, 0.2555483E+00 /
      data (ref_adm( 1,iz,14, 2),iz = 1,20) / &
     & 0.4818344E+00, 0.4818344E+00, 0.4597624E+00, 0.4568888E+00, &
     & 0.4556339E+00, 0.4553057E+00, 0.4543099E+00, 0.4519339E+00, &
     & 0.4553345E+00, 0.4431269E+00, 0.4281895E+00, 0.4176807E+00, &
     & 0.4060450E+00, 0.3940971E+00, 0.3775156E+00, 0.3557410E+00, &
     & 0.3328778E+00, 0.3029943E+00, 0.2555483E+00, 0.2555483E+00 /
      data (ref_adm( 1,iz,15, 2),iz = 1,20) / &
     & 0.4818344E+00, 0.4818344E+00, 0.4597624E+00, 0.4568889E+00, &
     & 0.4556339E+00, 0.4553057E+00, 0.4543099E+00, 0.4519338E+00, &
     & 0.4553345E+00, 0.4431269E+00, 0.4281894E+00, 0.4176807E+00, &
     & 0.4060450E+00, 0.3940971E+00, 0.3775156E+00, 0.3557410E+00, &
     & 0.2946800E+00, 0.3029943E+00, 0.2555483E+00, 0.2555483E+00 /
      data (ref_adm( 1,iz,16, 2),iz = 1,20) / &
     & 0.4818344E+00, 0.4818344E+00, 0.4597624E+00, 0.4568888E+00, &
     & 0.4556339E+00, 0.4553057E+00, 0.4543099E+00, 0.4519339E+00, &
     & 0.4553345E+00, 0.4431269E+00, 0.4281895E+00, 0.4176807E+00, &
     & 0.4060450E+00, 0.3940971E+00, 0.3775156E+00, 0.3557410E+00, &
     & 0.3328778E+00, 0.3029943E+00, 0.2555483E+00, 0.2555483E+00 /
      data (ref_adm( 1,iz,17, 2),iz = 1,20) / &
     & 0.4818344E+00, 0.4818344E+00, 0.4597624E+00, 0.4568889E+00, &
     & 0.4556339E+00, 0.4553057E+00, 0.4543099E+00, 0.4519338E+00, &
     & 0.4553345E+00, 0.4431269E+00, 0.4281894E+00, 0.4176807E+00, &
     & 0.4060450E+00, 0.3940971E+00, 0.3775156E+00, 0.3557410E+00, &
     & 0.3328778E+00, 0.3029943E+00, 0.2555483E+00, 0.2555483E+00 /
      data (ref_adm( 1,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.4448083E+04
      data (ref_adm( 1,iz, 1, 3),iz = 1,20) / &
     & 0.4151299E+00, 0.4151299E+00, 0.3864312E+00, 0.3840597E+00, &
     & 0.3838723E+00, 0.3847110E+00, 0.3853807E+00, 0.5419200E+00, &
     & 0.4722900E+00, 0.5763000E+00, 0.4603500E+00, 0.4452300E+00, &
     & 0.4063200E+00, 0.3143300E+00, 0.4219100E+00, 0.1452300E+00, &
     & 0.2136200E+00, 0.2657826E+00, 0.2312867E+00, 0.2312867E+00 /
      data (ref_adm( 1,iz, 2, 3),iz = 1,20) / &
     & 0.4151299E+00, 0.4151299E+00, 0.3864312E+00, 0.3840597E+00, &
     & 0.3838723E+00, 0.3847110E+00, 0.3853807E+00, 0.5419200E+00, &
     & 0.4722900E+00, 0.5763000E+00, 0.4603500E+00, 0.4452300E+00, &
     & 0.4063200E+00, 0.3143300E+00, 0.4219100E+00, 0.1452300E+00, &
     & 0.2136200E+00, 0.2657826E+00, 0.2312867E+00, 0.2312867E+00 /
      data (ref_adm( 1,iz, 3, 3),iz = 1,20) / &
     & 0.4151299E+00, 0.4151299E+00, 0.3864312E+00, 0.3840596E+00, &
     & 0.3838723E+00, 0.3847110E+00, 0.4640300E+00, 0.4917200E+00, &
     & 0.5319600E+00, 0.5247300E+00, 0.5150200E+00, 0.3888300E+00, &
     & 0.5409500E+00, 0.2199700E+00, 0.2915200E+00, 0.1467200E+00, &
     & 0.1805900E+00, 0.2657826E+00, 0.1208115E+00, 0.1208115E+00 /
      data (ref_adm( 1,iz, 4, 3),iz = 1,20) / &
     & 0.4151299E+00, 0.4151299E+00, 0.3864312E+00, 0.3840597E+00, &
     & 0.3838723E+00, 0.3847110E+00, 0.3853807E+00, 0.2916900E+00, &
     & 0.2880400E+00, 0.4907400E+00, 0.4030200E+00, 0.3783200E+00, &
     & 0.5213900E+00, 0.4523200E+00, 0.1460000E+00, 0.3145100E+00, &
     & 0.2895687E+00, 0.2657826E+00, 0.2312867E+00, 0.2312867E+00 /
      data (ref_adm( 1,iz, 5, 3),iz = 1,20) / &
     & 0.4151299E+00, 0.4151299E+00, 0.3864312E+00, 0.3840596E+00, &
     & 0.3838723E+00, 0.3847110E+00, 0.3853807E+00, 0.3852735E+00, &
     & 0.2155000E+00, 0.3801700E+00, 0.3779800E+00, 0.3391900E+00, &
     & 0.4398800E+00, 0.1765400E+00, 0.1461700E+00, 0.1334900E+00, &
     & 0.2895688E+00, 0.2657826E+00, 0.2312867E+00, 0.2312867E+00 /
      data (ref_adm( 1,iz, 6, 3),iz = 1,20) / &
     & 0.4151299E+00, 0.4151299E+00, 0.3864312E+00, 0.3840597E+00, &
     & 0.3838723E+00, 0.3847110E+00, 0.3853807E+00, 0.3852735E+00, &
     & 0.3951325E+00, 0.2550500E+00, 0.3367500E+00, 0.3820600E+00, &
     & 0.3544500E+00, 0.1916100E+00, 0.1182500E+00, 0.3078135E+00, &
     & 0.2895687E+00, 0.1450600E+00, 0.2312867E+00, 0.2312867E+00 /
      data (ref_adm( 1,iz, 7, 3),iz = 1,20) / &
     & 0.4151299E+00, 0.4151299E+00, 0.3864312E+00, 0.3840596E+00, &
     & 0.3838723E+00, 0.3847110E+00, 0.3853807E+00, 0.4704500E+00, &
     & 0.2551900E+00, 0.2151600E+00, 0.4924400E+00, 0.3831600E+00, &
     & 0.2299500E+00, 0.3918200E+00, 0.3249216E+00, 0.3294800E+00, &
     & 0.2895688E+00, 0.2657826E+00, 0.2312867E+00, 0.2312867E+00 /
      data (ref_adm( 1,iz, 8, 3),iz = 1,20) / &
     & 0.4151299E+00, 0.4151299E+00, 0.3864312E+00, 0.3840597E+00, &
     & 0.3838723E+00, 0.3847110E+00, 0.3853807E+00, 0.3852735E+00, &
     & 0.3951325E+00, 0.5308800E+00, 0.4315900E+00, 0.4513000E+00, &
     & 0.2890600E+00, 0.2904600E+00, 0.3249216E+00, 0.3195200E+00, &
     & 0.2895687E+00, 0.2657826E+00, 0.2312867E+00, 0.2312867E+00 /
      data (ref_adm( 1,iz, 9, 3),iz = 1,20) / &
     & 0.4151299E+00, 0.4151299E+00, 0.3864312E+00, 0.3840596E+00, &
     & 0.3838723E+00, 0.3847110E+00, 0.3853807E+00, 0.3852735E+00, &
     & 0.3951325E+00, 0.6368500E+00, 0.3226800E+00, 0.3858800E+00, &
     & 0.3117900E+00, 0.2869800E+00, 0.3249216E+00, 0.3078135E+00, &
     & 0.2895688E+00, 0.2657826E+00, 0.2312867E+00, 0.2312867E+00 /
      data (ref_adm( 1,iz,10, 3),iz = 1,20) / &
     & 0.4151299E+00, 0.4151299E+00, 0.3864312E+00, 0.3840597E+00, &
     & 0.3838723E+00, 0.3847110E+00, 0.3853807E+00, 0.3852735E+00, &
     & 0.3951325E+00, 0.3815644E+00, 0.4369000E+00, 0.4134300E+00, &
     & 0.4009400E+00, 0.3168000E+00, 0.3431100E+00, 0.3078135E+00, &
     & 0.2895687E+00, 0.2657826E+00, 0.2312867E+00, 0.2312867E+00 /
      data (ref_adm( 1,iz,11, 3),iz = 1,20) / &
     & 0.4151299E+00, 0.4151299E+00, 0.3864312E+00, 0.3840596E+00, &
     & 0.3838723E+00, 0.3847110E+00, 0.3853807E+00, 0.3852735E+00, &
     & 0.3951325E+00, 0.3815644E+00, 0.3431200E+00, 0.2833100E+00, &
     & 0.3415500E+00, 0.4130900E+00, 0.3148500E+00, 0.3204200E+00, &
     & 0.2895688E+00, 0.2657826E+00, 0.2312867E+00, 0.2312867E+00 /
      data (ref_adm( 1,iz,12, 3),iz = 1,20) / &
     & 0.4151299E+00, 0.4151299E+00, 0.3864312E+00, 0.3840597E+00, &
     & 0.3838723E+00, 0.3847110E+00, 0.3853807E+00, 0.3852735E+00, &
     & 0.3951325E+00, 0.3815644E+00, 0.3642425E+00, 0.3658700E+00, &
     & 0.2893000E+00, 0.2950500E+00, 0.3271300E+00, 0.3078135E+00, &
     & 0.2927700E+00, 0.2657826E+00, 0.2312867E+00, 0.2312867E+00 /
      data (ref_adm( 1,iz,13, 3),iz = 1,20) / &
     & 0.4151299E+00, 0.4151299E+00, 0.3864312E+00, 0.3840596E+00, &
     & 0.3838723E+00, 0.3847110E+00, 0.3853807E+00, 0.3852735E+00, &
     & 0.3951325E+00, 0.3815644E+00, 0.3642425E+00, 0.3785200E+00, &
     & 0.1992700E+00, 0.2297300E+00, 0.3458400E+00, 0.2711600E+00, &
     & 0.2948800E+00, 0.2152100E+00, 0.2312867E+00, 0.2312867E+00 /
      data (ref_adm( 1,iz,14, 3),iz = 1,20) / &
     & 0.4151299E+00, 0.4151299E+00, 0.3864312E+00, 0.3840597E+00, &
     & 0.3838723E+00, 0.3847110E+00, 0.3853807E+00, 0.3852735E+00, &
     & 0.3951325E+00, 0.3815644E+00, 0.3642425E+00, 0.3561329E+00, &
     & 0.3802800E+00, 0.3619200E+00, 0.5196000E+00, 0.3078135E+00, &
     & 0.2895687E+00, 0.2657826E+00, 0.2312867E+00, 0.2312867E+00 /
      data (ref_adm( 1,iz,15, 3),iz = 1,20) / &
     & 0.4151299E+00, 0.4151299E+00, 0.3864312E+00, 0.3840596E+00, &
     & 0.3838723E+00, 0.3847110E+00, 0.3853807E+00, 0.3852735E+00, &
     & 0.3951325E+00, 0.3815644E+00, 0.3642425E+00, 0.3561329E+00, &
     & 0.3475972E+00, 0.3893600E+00, 0.3884800E+00, 0.3078135E+00, &
     & 0.2895688E+00, 0.2657826E+00, 0.2312867E+00, 0.2312867E+00 /
      data (ref_adm( 1,iz,16, 3),iz = 1,20) / &
     & 0.4151299E+00, 0.4151299E+00, 0.3864312E+00, 0.3840597E+00, &
     & 0.3838723E+00, 0.3847110E+00, 0.3853807E+00, 0.3852735E+00, &
     & 0.3951325E+00, 0.3815644E+00, 0.3642425E+00, 0.3561329E+00, &
     & 0.2632900E+00, 0.3625600E+00, 0.4111500E+00, 0.2960800E+00, &
     & 0.2895687E+00, 0.2657826E+00, 0.2312867E+00, 0.2312867E+00 /
      data (ref_adm( 1,iz,17, 3),iz = 1,20) / &
     & 0.4151299E+00, 0.4151299E+00, 0.3864312E+00, 0.3840596E+00, &
     & 0.3838723E+00, 0.3847110E+00, 0.3853807E+00, 0.3852735E+00, &
     & 0.3951325E+00, 0.3815644E+00, 0.3642425E+00, 0.3561329E+00, &
     & 0.2526300E+00, 0.3475500E+00, 0.4031400E+00, 0.3283300E+00, &
     & 0.2895688E+00, 0.2657826E+00, 0.2312867E+00, 0.2312867E+00 /
      data (ref_adm( 1,iz,18, 3),iz = 1,20) / &
     & 0.2894511E+00, 0.2894511E+00, 0.2860924E+00, 0.2851698E+00, &
     & 0.2863418E+00, 0.2895452E+00, 0.2937532E+00, 0.2979512E+00, &
     & 0.3017071E+00, 0.3063896E+00, 0.3123324E+00, 0.3206093E+00, &
     & 0.3281302E+00, 0.3328006E+00, 0.4088900E+00, 0.3209800E+00, &
     & 0.1522100E+00, 0.3060381E+00, 0.2813446E+00, 0.2813446E+00 /
      data (ref_adm( 1,iz,19, 3),iz = 1,20) / &
     & 0.2902184E+00, 0.2902184E+00, 0.2883131E+00, 0.2874249E+00, &
     & 0.2881070E+00, 0.2906262E+00, 0.2949275E+00, 0.2999021E+00, &
     & 0.3046258E+00, 0.3086278E+00, 0.3132077E+00, 0.3198332E+00, &
     & 0.3260881E+00, 0.3052600E+00, 0.3310748E+00, 0.2225700E+00, &
     & 0.2943000E+00, 0.3001476E+00, 0.2781865E+00, 0.2781865E+00 /
      data (ref_adm( 1,iz,20, 3),iz = 1,20) / &
     & 0.2910704E+00, 0.2910704E+00, 0.2911555E+00, 0.2908387E+00, &
     & 0.2911032E+00, 0.2928258E+00, 0.2963196E+00, 0.3013721E+00, &
     & 0.3069252E+00, 0.3119529E+00, 0.3159365E+00, 0.3207673E+00, &
     & 0.3254978E+00, 0.3281224E+00, 0.3581300E+00, 0.3732300E+00, &
     & 0.3321700E+00, 0.2964922E+00, 0.2767335E+00, 0.2767335E+00 /
      data (ref_adm( 1,iz,21, 3),iz = 1,20) / &
     & 0.2920277E+00, 0.2920277E+00, 0.2947238E+00, 0.2956188E+00, &
     & 0.2959850E+00, 0.2968198E+00, 0.2990544E+00, 0.3030514E+00, &
     & 0.3086231E+00, 0.3145660E+00, 0.3196664E+00, 0.3237598E+00, &
     & 0.3266374E+00, 0.3281055E+00, 0.3275941E+00, 0.3332700E+00, &
     & 0.3122378E+00, 0.2946474E+00, 0.2766961E+00, 0.2766961E+00 /
      data (ref_adm( 1,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 1,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo  0.3574071E+00
      data (ref_adm( 1,iz, 1, 4),iz = 1,20) / &
     & 0.6054700E+00, 0.6054700E+00, 0.4595000E+00, 0.5140600E+00, &
     & 0.5915900E+00, 0.4352100E+00, 0.3258600E+00, 0.2993600E+00, &
     & 0.3615900E+00, 0.2205800E+00, 0.5480300E+00, 0.3183800E+00, &
     & 0.2759700E+00, 0.1882700E+00, 0.1732200E+00, 0.2514100E+00, &
     & 0.2999200E+00, 0.2442800E+00, 0.1326100E+00, 0.1326100E+00 /
      data (ref_adm( 1,iz, 2, 4),iz = 1,20) / &
     & 0.6054700E+00, 0.6054700E+00, 0.4595000E+00, 0.5140600E+00, &
     & 0.5915900E+00, 0.4352100E+00, 0.3258600E+00, 0.2993600E+00, &
     & 0.3615900E+00, 0.2205800E+00, 0.5480300E+00, 0.3183800E+00, &
     & 0.2759700E+00, 0.1882700E+00, 0.1732200E+00, 0.2514100E+00, &
     & 0.2999200E+00, 0.2442800E+00, 0.1326100E+00, 0.1326100E+00 /
      data (ref_adm( 1,iz, 3, 4),iz = 1,20) / &
     & 0.4789100E+00, 0.4789100E+00, 0.4022800E+00, 0.4100700E+00, &
     & 0.4583700E+00, 0.4876500E+00, 0.4435000E+00, 0.3540800E+00, &
     & 0.2880100E+00, 0.1903000E+00, 0.1785200E+00, 0.1646900E+00, &
     & 0.3582200E+00, 0.1879400E+00, 0.2412800E+00, 0.1821800E+00, &
     & 0.3810500E+00, 0.3033100E+00, 0.6495278E-01, 0.6495278E-01 /
      data (ref_adm( 1,iz, 4, 4),iz = 1,20) / &
     & 0.4167400E+00, 0.4167400E+00, 0.3559600E+00, 0.3743400E+00, &
     & 0.3079700E+00, 0.4234300E+00, 0.4735500E+00, 0.3711700E+00, &
     & 0.3025900E+00, 0.1707500E+00, 0.2175100E+00, 0.3196200E+00, &
     & 0.3564000E+00, 0.2082900E+00, 0.1811200E+00, 0.2873700E+00, &
     & 0.3340700E+00, 0.2531693E+00, 0.2246181E+00, 0.2246181E+00 /
      data (ref_adm( 1,iz, 5, 4),iz = 1,20) / &
     & 0.4669400E+00, 0.4669400E+00, 0.4026300E+00, 0.4172900E+00, &
     & 0.3773700E+00, 0.4040400E+00, 0.3614100E+00, 0.3439600E+00, &
     & 0.3034000E+00, 0.1958700E+00, 0.2469900E+00, 0.2998800E+00, &
     & 0.2702900E+00, 0.2442300E+00, 0.2359800E+00, 0.2284800E+00, &
     & 0.2906100E+00, 0.2498000E+00, 0.1956200E+00, 0.1956200E+00 /
      data (ref_adm( 1,iz, 6, 4),iz = 1,20) / &
     & 0.3414600E+00, 0.3414600E+00, 0.3873000E+00, 0.3670400E+00, &
     & 0.4190100E+00, 0.4314700E+00, 0.3872100E+00, 0.3125800E+00, &
     & 0.2843000E+00, 0.2596700E+00, 0.2627100E+00, 0.2558400E+00, &
     & 0.2627500E+00, 0.1554100E+00, 0.2831600E+00, 0.2391800E+00, &
     & 0.3259000E+00, 0.2349100E+00, 0.1992100E+00, 0.1992100E+00 /
      data (ref_adm( 1,iz, 7, 4),iz = 1,20) / &
     & 0.4347200E+00, 0.4347200E+00, 0.4434100E+00, 0.3703600E+00, &
     & 0.4229000E+00, 0.3991600E+00, 0.3548100E+00, 0.3597800E+00, &
     & 0.3128400E+00, 0.2333100E+00, 0.2505800E+00, 0.2445000E+00, &
     & 0.2069400E+00, 0.1626800E+00, 0.2698400E+00, 0.2482800E+00, &
     & 0.3338700E+00, 0.2974600E+00, 0.2237646E+00, 0.2237646E+00 /
      data (ref_adm( 1,iz, 8, 4),iz = 1,20) / &
     & 0.4185100E+00, 0.4185100E+00, 0.3850900E+00, 0.4543000E+00, &
     & 0.4318000E+00, 0.3990400E+00, 0.3914500E+00, 0.4172600E+00, &
     & 0.3941300E+00, 0.3941900E+00, 0.3121800E+00, 0.2827700E+00, &
     & 0.2067600E+00, 0.1992000E+00, 0.2607900E+00, 0.1981400E+00, &
     & 0.2643000E+00, 0.2290600E+00, 0.3240900E+00, 0.3240900E+00 /
      data (ref_adm( 1,iz, 9, 4),iz = 1,20) / &
     & 0.5130900E+00, 0.5130900E+00, 0.3709000E+00, 0.4985900E+00, &
     & 0.3980000E+00, 0.3468600E+00, 0.3899500E+00, 0.4089200E+00, &
     & 0.3618800E+00, 0.3682900E+00, 0.3343500E+00, 0.2820000E+00, &
     & 0.2299100E+00, 0.2392400E+00, 0.2437000E+00, 0.2976700E+00, &
     & 0.1590000E+00, 0.2800400E+00, 0.2377000E+00, 0.2377000E+00 /
      data (ref_adm( 1,iz,10, 4),iz = 1,20) / &
     & 0.4072400E+00, 0.4072400E+00, 0.3419044E+00, 0.3427742E+00, &
     & 0.3537800E+00, 0.3403200E+00, 0.4181800E+00, 0.3199800E+00, &
     & 0.3657600E+00, 0.3328600E+00, 0.3474600E+00, 0.3308500E+00, &
     & 0.3194100E+00, 0.2462700E+00, 0.1339000E+00, 0.3043700E+00, &
     & 0.3037300E+00, 0.2039400E+00, 0.2425300E+00, 0.2425300E+00 /
      data (ref_adm( 1,iz,11, 4),iz = 1,20) / &
     & 0.2145600E+00, 0.2145600E+00, 0.3419076E+00, 0.3427697E+00, &
     & 0.4761900E+00, 0.3904200E+00, 0.4908400E+00, 0.4646100E+00, &
     & 0.4269800E+00, 0.3334100E+00, 0.3297100E+00, 0.3231000E+00, &
     & 0.3269500E+00, 0.3138800E+00, 0.1549900E+00, 0.3333500E+00, &
     & 0.3343200E+00, 0.1415200E+00, 0.1576300E+00, 0.1576300E+00 /
      data (ref_adm( 1,iz,12, 4),iz = 1,20) / &
     & 0.3428175E+00, 0.3428175E+00, 0.3176200E+00, 0.2147900E+00, &
     & 0.2346200E+00, 0.2629300E+00, 0.3026200E+00, 0.4071500E+00, &
     & 0.4629200E+00, 0.5939100E+00, 0.3851700E+00, 0.3606200E+00, &
     & 0.2924600E+00, 0.3144900E+00, 0.1806000E+00, 0.3668400E+00, &
     & 0.3250600E+00, 0.3031500E+00, 0.2215146E+00, 0.2215146E+00 /
      data (ref_adm( 1,iz,13, 4),iz = 1,20) / &
     & 0.3465400E+00, 0.3465400E+00, 0.2413800E+00, 0.2155900E+00, &
     & 0.2461600E+00, 0.2252100E+00, 0.2565800E+00, 0.4449600E+00, &
     & 0.1666500E+00, 0.5689200E+00, 0.3249000E+00, 0.3541300E+00, &
     & 0.2824300E+00, 0.2731800E+00, 0.1731800E+00, 0.2843570E+00, &
     & 0.2990400E+00, 0.2682900E+00, 0.2210476E+00, 0.2210476E+00 /
      data (ref_adm( 1,iz,14, 4),iz = 1,20) / &
     & 0.3960200E+00, 0.3960200E+00, 0.2138400E+00, 0.3427422E+00, &
     & 0.3093100E+00, 0.3429200E+00, 0.3679800E+00, 0.4999000E+00, &
     & 0.4930300E+00, 0.4526400E+00, 0.3836700E+00, 0.3227500E+00, &
     & 0.3371600E+00, 0.3020400E+00, 0.2499300E+00, 0.2838411E+00, &
     & 0.2684558E+00, 0.2476083E+00, 0.2205932E+00, 0.2205932E+00 /
      data (ref_adm( 1,iz,15, 4),iz = 1,20) / &
     & 0.3429490E+00, 0.3429490E+00, 0.3420814E+00, 0.3427542E+00, &
     & 0.3443334E+00, 0.3131600E+00, 0.2918800E+00, 0.3288100E+00, &
     & 0.4780200E+00, 0.4427300E+00, 0.2871000E+00, 0.2756700E+00, &
     & 0.2799100E+00, 0.2539400E+00, 0.1720400E+00, 0.2833913E+00, &
     & 0.2678724E+00, 0.2470237E+00, 0.2201833E+00, 0.2201833E+00 /
      data (ref_adm( 1,iz,16, 4),iz = 1,20) / &
     & 0.5037400E+00, 0.5037400E+00, 0.4032500E+00, 0.3869900E+00, &
     & 0.4939800E+00, 0.4157800E+00, 0.1829300E+00, 0.3115800E+00, &
     & 0.3299200E+00, 0.3215100E+00, 0.2716700E+00, 0.2020400E+00, &
     & 0.2876100E+00, 0.2736500E+00, 0.2072300E+00, 0.2829606E+00, &
     & 0.2673362E+00, 0.2661100E+00, 0.2198146E+00, 0.2198146E+00 /
      data (ref_adm( 1,iz,17, 4),iz = 1,20) / &
     & 0.4485100E+00, 0.4485100E+00, 0.5179300E+00, 0.4419900E+00, &
     & 0.3827700E+00, 0.4442800E+00, 0.3737700E+00, 0.1770800E+00, &
     & 0.2460400E+00, 0.2368400E+00, 0.2582300E+00, 0.2154600E+00, &
     & 0.2556500E+00, 0.2774200E+00, 0.2623500E+00, 0.2825808E+00, &
     & 0.2668786E+00, 0.2459656E+00, 0.2194989E+00, 0.2194989E+00 /
      data (ref_adm( 1,iz,18, 4),iz = 1,20) / &
     & 0.3539600E+00, 0.3539600E+00, 0.4203100E+00, 0.5151200E+00, &
     & 0.5124600E+00, 0.4641400E+00, 0.4135100E+00, 0.3532160E+00, &
     & 0.2065800E+00, 0.2441600E+00, 0.2853700E+00, 0.3194600E+00, &
     & 0.2168800E+00, 0.3535900E+00, 0.3569400E+00, 0.1637100E+00, &
     & 0.4859300E+00, 0.2808622E+00, 0.2506492E+00, 0.2506492E+00 /
      data (ref_adm( 1,iz,19, 4),iz = 1,20) / &
     & 0.2381700E+00, 0.2381700E+00, 0.3579996E+00, 0.3513400E+00, &
     & 0.4616300E+00, 0.3475200E+00, 0.4226100E+00, 0.3837500E+00, &
     & 0.1777300E+00, 0.2494900E+00, 0.2628300E+00, 0.3445800E+00, &
     & 0.2832900E+00, 0.2665900E+00, 0.3100400E+00, 0.3685300E+00, &
     & 0.4235700E+00, 0.1789600E+00, 0.2495193E+00, 0.2495193E+00 /
      data (ref_adm( 1,iz,20, 4),iz = 1,20) / &
     & 0.3572648E+00, 0.3572648E+00, 0.3581247E+00, 0.4217300E+00, &
     & 0.4311100E+00, 0.4736400E+00, 0.3731400E+00, 0.4397300E+00, &
     & 0.4023200E+00, 0.3243800E+00, 0.2625300E+00, 0.2772400E+00, &
     & 0.3331100E+00, 0.3109300E+00, 0.3341600E+00, 0.3133300E+00, &
     & 0.3118600E+00, 0.3556700E+00, 0.2489612E+00, 0.2489612E+00 /
      data (ref_adm( 1,iz,21, 4),iz = 1,20) / &
     & 0.2551300E+00, 0.2551300E+00, 0.2559700E+00, 0.2633000E+00, &
     & 0.2808900E+00, 0.4631700E+00, 0.4836000E+00, 0.3458400E+00, &
     & 0.4161000E+00, 0.4471200E+00, 0.4608300E+00, 0.3930100E+00, &
     & 0.3330800E+00, 0.3556000E+00, 0.3428800E+00, 0.3243000E+00, &
     & 0.1721900E+00, 0.1862700E+00, 0.2488629E+00, 0.2488629E+00 /
      data (ref_adm( 1,iz,22, 4),iz = 1,20) / &
     & 0.3906422E+00, 0.3906422E+00, 0.3918369E+00, 0.3950372E+00, &
     & 0.5556300E+00, 0.5076800E+00, 0.3130800E+00, 0.4235200E+00, &
     & 0.3310000E+00, 0.4404900E+00, 0.3854000E+00, 0.3576000E+00, &
     & 0.3983300E+00, 0.4899700E+00, 0.3977500E+00, 0.3598500E+00, &
     & 0.1762500E+00, 0.2310300E+00, 0.1497300E+00, 0.1497300E+00 /
      data (ref_adm( 1,iz,23, 4),iz = 1,20) / &
     & 0.5041800E+00, 0.5041800E+00, 0.4137600E+00, 0.3124900E+00, &
     & 0.2871100E+00, 0.3412400E+00, 0.4364700E+00, 0.2530800E+00, &
     & 0.4203600E+00, 0.4249100E+00, 0.3596100E+00, 0.3987400E+00, &
     & 0.3935200E+00, 0.4037946E+00, 0.3771600E+00, 0.3690100E+00, &
     & 0.3342100E+00, 0.2585200E+00, 0.2628900E+00, 0.2628900E+00 /
      data (ref_adm( 1,iz,24, 4),iz = 1,20) / &
     & 0.5137600E+00, 0.5137600E+00, 0.5110100E+00, 0.5090900E+00, &
     & 0.2766300E+00, 0.2443300E+00, 0.6014000E+00, 0.5797100E+00, &
     & 0.3033500E+00, 0.4730100E+00, 0.3398000E+00, 0.3353700E+00, &
     & 0.3755600E+00, 0.4029916E+00, 0.3994415E+00, 0.4165200E+00, &
     & 0.3780267E+00, 0.2915300E+00, 0.2928638E+00, 0.2928638E+00 /
      data (ref_adm( 1,iz,25, 4),iz = 1,20) / &
     & 0.2239100E+00, 0.2239100E+00, 0.2694300E+00, 0.3527200E+00, &
     & 0.2464400E+00, 0.3560800E+00, 0.4914900E+00, 0.4110665E+00, &
     & 0.4089741E+00, 0.4072873E+00, 0.4057676E+00, 0.4048570E+00, &
     & 0.4043628E+00, 0.4024904E+00, 0.3982643E+00, 0.3898373E+00, &
     & 0.3762042E+00, 0.2540100E+00, 0.2920450E+00, 0.2920450E+00 /
      data (ref_adm( 1,iz,26, 4),iz = 1,20) / &
     & 0.3533100E+00, 0.3533100E+00, 0.2451200E+00, 0.2273700E+00, &
     & 0.5590300E+00, 0.5546800E+00, 0.5653600E+00, 0.4548100E+00, &
     & 0.2263800E+00, 0.4086991E+00, 0.4064288E+00, 0.4051808E+00, &
     & 0.4039432E+00, 0.4022993E+00, 0.3972690E+00, 0.3882074E+00, &
     & 0.3744481E+00, 0.3475382E+00, 0.2911907E+00, 0.2911907E+00 /
      data (ref_adm( 1,iz,27, 4),iz = 1,20) / &
     & 0.5275500E+00, 0.5275500E+00, 0.2160700E+00, 0.5100600E+00, &
     & 0.5247000E+00, 0.5270900E+00, 0.5229600E+00, 0.4130656E+00, &
     & 0.4120556E+00, 0.4099168E+00, 0.4076560E+00, 0.4056646E+00, &
     & 0.4037925E+00, 0.4021371E+00, 0.3961863E+00, 0.3868671E+00, &
     & 0.3728866E+00, 0.3460102E+00, 0.2906445E+00, 0.2906445E+00 /
      data (ref_adm( 1,iz,28, 4),iz = 1,20) / &
     & 0.5456000E+00, 0.5456000E+00, 0.5207600E+00, 0.5327300E+00, &
     & 0.4844800E+00, 0.4153600E+00, 0.4048300E+00, 0.4130592E+00, &
     & 0.4135053E+00, 0.4113956E+00, 0.4087533E+00, 0.4062432E+00, &
     & 0.4034220E+00, 0.4015627E+00, 0.3960259E+00, 0.3855203E+00, &
     & 0.3710888E+00, 0.3443380E+00, 0.2900553E+00, 0.2900553E+00 /
      data (ref_adm( 1,iz,29, 4),iz = 1,20) / &
     & 0.5051600E+00, 0.5051600E+00, 0.4912600E+00, 0.3939208E+00, &
     & 0.2792100E+00, 0.4784700E+00, 0.4033305E+00, 0.4124590E+00, &
     & 0.4151287E+00, 0.4128090E+00, 0.4102772E+00, 0.4066952E+00, &
     & 0.4040413E+00, 0.4015097E+00, 0.3956434E+00, 0.3846451E+00, &
     & 0.3696999E+00, 0.3429945E+00, 0.2895741E+00, 0.2895741E+00 /
      data (ref_adm( 1,iz,30, 4),iz = 1,20) / &
     & 0.5211400E+00, 0.5211400E+00, 0.3930717E+00, 0.3942625E+00, &
     & 0.3946205E+00, 0.3960178E+00, 0.4014024E+00, 0.4109756E+00, &
     & 0.4156191E+00, 0.4137749E+00, 0.4112682E+00, 0.4072937E+00, &
     & 0.4041549E+00, 0.4007776E+00, 0.3952570E+00, 0.3837515E+00, &
     & 0.3686187E+00, 0.3417527E+00, 0.2890783E+00, 0.2890783E+00 /
      data (ref_adm( 1,iz,31, 4),iz = 1,20) / &
     & 0.1914300E+00, 0.1914300E+00, 0.3934907E+00, 0.3946343E+00, &
     & 0.3953756E+00, 0.3958710E+00, 0.4001826E+00, 0.4098320E+00, &
     & 0.4161821E+00, 0.4151034E+00, 0.4123140E+00, 0.4082155E+00, &
     & 0.4047918E+00, 0.4009841E+00, 0.3950760E+00, 0.3831799E+00, &
     & 0.3673873E+00, 0.3407364E+00, 0.2886783E+00, 0.2886783E+00 /
      data (ref_adm( 1,iz,32, 4),iz = 1,20) / &
     & 0.3913304E+00, 0.3913304E+00, 0.3937253E+00, 0.3961999E+00, &
     & 0.3963310E+00, 0.3965183E+00, 0.3991220E+00, 0.4080266E+00, &
     & 0.4162571E+00, 0.4160084E+00, 0.4132138E+00, 0.4086727E+00, &
     & 0.4049223E+00, 0.4009288E+00, 0.3949352E+00, 0.3826403E+00, &
     & 0.3666404E+00, 0.3399033E+00, 0.2883568E+00, 0.2883568E+00 /
      data (ref_adm( 1,iz,33, 4),iz = 1,20) / &
     & 0.3915481E+00, 0.3915481E+00, 0.3942701E+00, 0.3987624E+00, &
     & 0.3978973E+00, 0.3964627E+00, 0.3988830E+00, 0.4064350E+00, &
     & 0.4158664E+00, 0.4168969E+00, 0.4138555E+00, 0.4093838E+00, &
     & 0.4054781E+00, 0.4008060E+00, 0.3948989E+00, 0.3823010E+00, &
     & 0.3660539E+00, 0.3392808E+00, 0.2881582E+00, 0.2881582E+00 /
      data (ref_adm( 1,iz,34, 4),iz = 1,20) / &
     & 0.2598400E+00, 0.2598400E+00, 0.2432200E+00, 0.4039697E+00, &
     & 0.6003900E+00, 0.3972214E+00, 0.3986809E+00, 0.4051737E+00, &
     & 0.4152774E+00, 0.4178220E+00, 0.4144984E+00, 0.4101470E+00, &
     & 0.4056262E+00, 0.4010557E+00, 0.3948638E+00, 0.3821450E+00, &
     & 0.3656783E+00, 0.3386761E+00, 0.2879527E+00, 0.2879527E+00 /
      data (ref_adm( 1,iz,35, 4),iz = 1,20) / &
     & 0.4412700E+00, 0.4412700E+00, 0.4447700E+00, 0.4130452E+00, &
     & 0.4064291E+00, 0.3978823E+00, 0.3978491E+00, 0.4044540E+00, &
     & 0.4147523E+00, 0.4181609E+00, 0.4151727E+00, 0.4103938E+00, &
     & 0.4057469E+00, 0.4013332E+00, 0.3946157E+00, 0.3819066E+00, &
     & 0.3650724E+00, 0.3381642E+00, 0.2878723E+00, 0.2878723E+00 /
      data (ref_adm( 1,iz,36, 4),iz = 1,20) / &
     & 0.4222500E+00, 0.4222500E+00, 0.3186800E+00, 0.4244300E+00, &
     & 0.2938000E+00, 0.3983036E+00, 0.3982256E+00, 0.4037238E+00, &
     & 0.4145628E+00, 0.4183449E+00, 0.4155615E+00, 0.4108918E+00, &
     & 0.4058203E+00, 0.4014213E+00, 0.3944264E+00, 0.3819537E+00, &
     & 0.3646819E+00, 0.3378709E+00, 0.2877424E+00, 0.2877424E+00 /
      data (ref_adm( 1,iz,37, 4),iz = 1,20) / &
     & 0.4759500E+00, 0.4759500E+00, 0.4739400E+00, 0.5494500E+00, &
     & 0.5668500E+00, 0.3986344E+00, 0.3981510E+00, 0.4036327E+00, &
     & 0.4136995E+00, 0.4186801E+00, 0.4154082E+00, 0.4108971E+00, &
     & 0.4057987E+00, 0.4017572E+00, 0.3946286E+00, 0.3817982E+00, &
     & 0.3647249E+00, 0.3377226E+00, 0.2876593E+00, 0.2876593E+00 /
      data (ref_adm( 1,iz,38, 4),iz = 1,20) / &
     & 0.4759500E+00, 0.4759500E+00, 0.4739400E+00, 0.5494500E+00, &
     & 0.5668500E+00, 0.3986344E+00, 0.3981510E+00, 0.4036327E+00, &
     & 0.4136995E+00, 0.4186801E+00, 0.4154082E+00, 0.4108971E+00, &
     & 0.4057987E+00, 0.4017572E+00, 0.3946286E+00, 0.3817982E+00, &
     & 0.3647249E+00, 0.3377226E+00, 0.2876593E+00, 0.2876593E+00 /
! Solar Zenith Angle 20.0 Albedo  0.3107392E+00
      data (ref_adm( 1,iz, 1, 5),iz = 1,20) / &
     & 0.4010800E+00, 0.4010800E+00, 0.3622400E+00, 0.2916000E+00, &
     & 0.2916100E+00, 0.2961000E+00, 0.2651500E+00, 0.2506200E+00, &
     & 0.2076800E+00, 0.2763900E+00, 0.3026400E+00, 0.3353500E+00, &
     & 0.2013700E+00, 0.1777700E+00, 0.1986200E+00, 0.3753900E+00, &
     & 0.3027100E+00, 0.3060200E+00, 0.2200500E+00, 0.2200500E+00 /
      data (ref_adm( 1,iz, 2, 5),iz = 1,20) / &
     & 0.4010800E+00, 0.4010800E+00, 0.3622400E+00, 0.2916000E+00, &
     & 0.2916100E+00, 0.2961000E+00, 0.2651500E+00, 0.2506200E+00, &
     & 0.2076800E+00, 0.2763900E+00, 0.3026400E+00, 0.3353500E+00, &
     & 0.2013700E+00, 0.1777700E+00, 0.1986200E+00, 0.3753900E+00, &
     & 0.3027100E+00, 0.3060200E+00, 0.2200500E+00, 0.2200500E+00 /
      data (ref_adm( 1,iz, 3, 5),iz = 1,20) / &
     & 0.3173100E+00, 0.3173100E+00, 0.2918400E+00, 0.3218900E+00, &
     & 0.3072200E+00, 0.2681400E+00, 0.2673700E+00, 0.2445800E+00, &
     & 0.2213500E+00, 0.2497200E+00, 0.2765400E+00, 0.2125400E+00, &
     & 0.1849700E+00, 0.2227400E+00, 0.2665500E+00, 0.2582300E+00, &
     & 0.2484600E+00, 0.3020100E+00, 0.8507920E-01, 0.8507920E-01 /
      data (ref_adm( 1,iz, 4, 5),iz = 1,20) / &
     & 0.2945000E+00, 0.2945000E+00, 0.2802400E+00, 0.3044700E+00, &
     & 0.3195300E+00, 0.3092300E+00, 0.3025000E+00, 0.2458400E+00, &
     & 0.2312500E+00, 0.2395700E+00, 0.2588100E+00, 0.1963200E+00, &
     & 0.2588700E+00, 0.2225700E+00, 0.2312200E+00, 0.2229300E+00, &
     & 0.2712400E+00, 0.1811900E+00, 0.1440700E+00, 0.1440700E+00 /
      data (ref_adm( 1,iz, 5, 5),iz = 1,20) / &
     & 0.3547200E+00, 0.3547200E+00, 0.3412600E+00, 0.3074000E+00, &
     & 0.3185400E+00, 0.2854900E+00, 0.2385600E+00, 0.2459800E+00, &
     & 0.2361000E+00, 0.2290700E+00, 0.3389700E+00, 0.1865400E+00, &
     & 0.2588200E+00, 0.2360100E+00, 0.1807100E+00, 0.3669500E+00, &
     & 0.2792500E+00, 0.2586700E+00, 0.2512659E+00, 0.2512659E+00 /
      data (ref_adm( 1,iz, 6, 5),iz = 1,20) / &
     & 0.3237800E+00, 0.3237800E+00, 0.3059100E+00, 0.2780900E+00, &
     & 0.3010300E+00, 0.2643000E+00, 0.2692500E+00, 0.2325300E+00, &
     & 0.2994000E+00, 0.2771800E+00, 0.2610900E+00, 0.1726500E+00, &
     & 0.2851600E+00, 0.2122300E+00, 0.2868200E+00, 0.3620500E+00, &
     & 0.2279300E+00, 0.2661600E+00, 0.2066600E+00, 0.2066600E+00 /
      data (ref_adm( 1,iz, 7, 5),iz = 1,20) / &
     & 0.2933000E+00, 0.2933000E+00, 0.3189700E+00, 0.3029300E+00, &
     & 0.3164100E+00, 0.3575600E+00, 0.2141600E+00, 0.2751800E+00, &
     & 0.3049300E+00, 0.2582300E+00, 0.2049400E+00, 0.1747600E+00, &
     & 0.2623000E+00, 0.2153800E+00, 0.2740300E+00, 0.3311000E+00, &
     & 0.2785500E+00, 0.2373200E+00, 0.2214100E+00, 0.2214100E+00 /
      data (ref_adm( 1,iz, 8, 5),iz = 1,20) / &
     & 0.3508100E+00, 0.3508100E+00, 0.3421000E+00, 0.3306900E+00, &
     & 0.3259700E+00, 0.3174400E+00, 0.2872400E+00, 0.3028200E+00, &
     & 0.2299700E+00, 0.2430700E+00, 0.2009300E+00, 0.2921400E+00, &
     & 0.2571700E+00, 0.2975400E+00, 0.2995100E+00, 0.2962800E+00, &
     & 0.2497400E+00, 0.2405900E+00, 0.2120500E+00, 0.2120500E+00 /
      data (ref_adm( 1,iz, 9, 5),iz = 1,20) / &
     & 0.3252600E+00, 0.3252600E+00, 0.3157800E+00, 0.3378900E+00, &
     & 0.3490000E+00, 0.3067800E+00, 0.3131100E+00, 0.3147700E+00, &
     & 0.3095300E+00, 0.3035800E+00, 0.2518400E+00, 0.3085300E+00, &
     & 0.2319800E+00, 0.3046500E+00, 0.2297400E+00, 0.2383900E+00, &
     & 0.3024300E+00, 0.3161600E+00, 0.2029000E+00, 0.2029000E+00 /
      data (ref_adm( 1,iz,10, 5),iz = 1,20) / &
     & 0.3573100E+00, 0.3573100E+00, 0.3641800E+00, 0.2941900E+00, &
     & 0.3495600E+00, 0.3110600E+00, 0.2990000E+00, 0.3032800E+00, &
     & 0.2691500E+00, 0.3123600E+00, 0.2841200E+00, 0.3013500E+00, &
     & 0.2412300E+00, 0.2186600E+00, 0.2159100E+00, 0.1904500E+00, &
     & 0.3165600E+00, 0.2651400E+00, 0.2512659E+00, 0.2512659E+00 /
      data (ref_adm( 1,iz,11, 5),iz = 1,20) / &
     & 0.3614300E+00, 0.3614300E+00, 0.2909100E+00, 0.2920800E+00, &
     & 0.2696400E+00, 0.3052500E+00, 0.3639600E+00, 0.3087300E+00, &
     & 0.2677500E+00, 0.2542000E+00, 0.2748400E+00, 0.3512100E+00, &
     & 0.3670400E+00, 0.2710400E+00, 0.2053000E+00, 0.3319700E+00, &
     & 0.3359300E+00, 0.3299800E+00, 0.2512659E+00, 0.2512659E+00 /
      data (ref_adm( 1,iz,12, 5),iz = 1,20) / &
     & 0.3241600E+00, 0.3241600E+00, 0.3542900E+00, 0.2960500E+00, &
     & 0.2903900E+00, 0.2386200E+00, 0.2358500E+00, 0.2720800E+00, &
     & 0.2697700E+00, 0.3050500E+00, 0.3105900E+00, 0.3069400E+00, &
     & 0.2716800E+00, 0.2606300E+00, 0.2565500E+00, 0.3706100E+00, &
     & 0.3995500E+00, 0.1927500E+00, 0.1940000E+00, 0.1940000E+00 /
      data (ref_adm( 1,iz,13, 5),iz = 1,20) / &
     & 0.3335500E+00, 0.3335500E+00, 0.3346100E+00, 0.3062500E+00, &
     & 0.2799800E+00, 0.2468000E+00, 0.2296200E+00, 0.2513900E+00, &
     & 0.2429400E+00, 0.2690500E+00, 0.2829300E+00, 0.2969600E+00, &
     & 0.2666600E+00, 0.2656900E+00, 0.2784000E+00, 0.2815900E+00, &
     & 0.2828400E+00, 0.2495900E+00, 0.1548900E+00, 0.1548900E+00 /
      data (ref_adm( 1,iz,14, 5),iz = 1,20) / &
     & 0.3516300E+00, 0.3516300E+00, 0.3445900E+00, 0.3303600E+00, &
     & 0.3497000E+00, 0.3644600E+00, 0.3528700E+00, 0.3243000E+00, &
     & 0.3389400E+00, 0.2720800E+00, 0.2835300E+00, 0.3435700E+00, &
     & 0.3185100E+00, 0.3443600E+00, 0.3132400E+00, 0.2959200E+00, &
     & 0.2555900E+00, 0.2074100E+00, 0.1242800E+00, 0.1242800E+00 /
      data (ref_adm( 1,iz,15, 5),iz = 1,20) / &
     & 0.3101100E+00, 0.3101100E+00, 0.2654800E+00, 0.3054300E+00, &
     & 0.3095600E+00, 0.4425400E+00, 0.4396500E+00, 0.3135600E+00, &
     & 0.3107400E+00, 0.2398200E+00, 0.3018900E+00, 0.3248600E+00, &
     & 0.3396700E+00, 0.3383700E+00, 0.3189200E+00, 0.3533700E+00, &
     & 0.3466100E+00, 0.3020600E+00, 0.2590900E+00, 0.2590900E+00 /
      data (ref_adm( 1,iz,16, 5),iz = 1,20) / &
     & 0.3306300E+00, 0.3306300E+00, 0.2982700E+00, 0.2820000E+00, &
     & 0.2822100E+00, 0.3462900E+00, 0.3717900E+00, 0.3946200E+00, &
     & 0.2925300E+00, 0.2495500E+00, 0.2802800E+00, 0.3621900E+00, &
     & 0.3032000E+00, 0.2563200E+00, 0.2829900E+00, 0.3581400E+00, &
     & 0.1767200E+00, 0.2708812E+00, 0.2512659E+00, 0.2512659E+00 /
      data (ref_adm( 1,iz,17, 5),iz = 1,20) / &
     & 0.2959000E+00, 0.2959000E+00, 0.2478100E+00, 0.2312200E+00, &
     & 0.2460500E+00, 0.3161900E+00, 0.2523000E+00, 0.4108900E+00, &
     & 0.4025900E+00, 0.2322100E+00, 0.2506800E+00, 0.2944600E+00, &
     & 0.3601000E+00, 0.2440500E+00, 0.2790400E+00, 0.2942000E+00, &
     & 0.1605700E+00, 0.2708812E+00, 0.2512659E+00, 0.2512659E+00 /
      data (ref_adm( 1,iz,18, 5),iz = 1,20) / &
     & 0.3505000E+00, 0.3505000E+00, 0.3344200E+00, 0.2581600E+00, &
     & 0.2697300E+00, 0.3650100E+00, 0.3564700E+00, 0.2632000E+00, &
     & 0.4303300E+00, 0.3458500E+00, 0.2992700E+00, 0.2520000E+00, &
     & 0.3217700E+00, 0.2866300E+00, 0.2901900E+00, 0.3384200E+00, &
     & 0.1717700E+00, 0.2362787E+00, 0.2178954E+00, 0.2178954E+00 /
      data (ref_adm( 1,iz,19, 5),iz = 1,20) / &
     & 0.3831600E+00, 0.3831600E+00, 0.3251400E+00, 0.3407000E+00, &
     & 0.3476800E+00, 0.3325100E+00, 0.2618000E+00, 0.2566900E+00, &
     & 0.2986500E+00, 0.3807700E+00, 0.3557700E+00, 0.2317000E+00, &
     & 0.2806000E+00, 0.2988000E+00, 0.2766100E+00, 0.3211300E+00, &
     & 0.2500800E+00, 0.2355704E+00, 0.2174631E+00, 0.2174631E+00 /
      data (ref_adm( 1,iz,20, 5),iz = 1,20) / &
     & 0.3506500E+00, 0.3506500E+00, 0.3568600E+00, 0.2956300E+00, &
     & 0.3133900E+00, 0.3176000E+00, 0.2302100E+00, 0.2403300E+00, &
     & 0.2882000E+00, 0.3583600E+00, 0.3524900E+00, 0.2904700E+00, &
     & 0.2873200E+00, 0.2853100E+00, 0.2567600E+00, 0.2461000E+00, &
     & 0.2094700E+00, 0.2051200E+00, 0.2172629E+00, 0.2172629E+00 /
      data (ref_adm( 1,iz,21, 5),iz = 1,20) / &
     & 0.3519000E+00, 0.3519000E+00, 0.2902200E+00, 0.2606100E+00, &
     & 0.2809200E+00, 0.2350700E+00, 0.2126600E+00, 0.3882400E+00, &
     & 0.3195500E+00, 0.3028900E+00, 0.3343000E+00, 0.3424700E+00, &
     & 0.2740000E+00, 0.2757800E+00, 0.2751100E+00, 0.2642200E+00, &
     & 0.2011700E+00, 0.2750300E+00, 0.2172583E+00, 0.2172583E+00 /
      data (ref_adm( 1,iz,22, 5),iz = 1,20) / &
     & 0.3269800E+00, 0.3269800E+00, 0.2729200E+00, 0.2056300E+00, &
     & 0.2589100E+00, 0.2783300E+00, 0.3182500E+00, 0.3258800E+00, &
     & 0.3502900E+00, 0.2793700E+00, 0.2832600E+00, 0.2956500E+00, &
     & 0.3153900E+00, 0.3424200E+00, 0.3115200E+00, 0.2628600E+00, &
     & 0.1740800E+00, 0.1842400E+00, 0.2949855E+00, 0.2949855E+00 /
      data (ref_adm( 1,iz,23, 5),iz = 1,20) / &
     & 0.3360800E+00, 0.3360800E+00, 0.2916600E+00, 0.2631000E+00, &
     & 0.3327800E+00, 0.3199200E+00, 0.3160900E+00, 0.3199200E+00, &
     & 0.2453700E+00, 0.2372100E+00, 0.2522000E+00, 0.2651000E+00, &
     & 0.2951800E+00, 0.2951800E+00, 0.3357300E+00, 0.2491300E+00, &
     & 0.2338700E+00, 0.1571400E+00, 0.2931904E+00, 0.2931904E+00 /
      data (ref_adm( 1,iz,24, 5),iz = 1,20) / &
     & 0.3155800E+00, 0.3155800E+00, 0.3083100E+00, 0.2958000E+00, &
     & 0.2926600E+00, 0.2920500E+00, 0.2695800E+00, 0.2726500E+00, &
     & 0.2925800E+00, 0.2910900E+00, 0.2791400E+00, 0.2537200E+00, &
     & 0.3276800E+00, 0.3129600E+00, 0.3286900E+00, 0.3026600E+00, &
     & 0.2680100E+00, 0.2352800E+00, 0.2918428E+00, 0.2918428E+00 /
      data (ref_adm( 1,iz,25, 5),iz = 1,20) / &
     & 0.3825100E+00, 0.3825100E+00, 0.3504800E+00, 0.3812200E+00, &
     & 0.3557500E+00, 0.3445300E+00, 0.3690900E+00, 0.3686200E+00, &
     & 0.3778200E+00, 0.4067200E+00, 0.3940100E+00, 0.3947900E+00, &
     & 0.3822700E+00, 0.3647900E+00, 0.3298100E+00, 0.2759900E+00, &
     & 0.2525600E+00, 0.2191800E+00, 0.1818800E+00, 0.1818800E+00 /
      data (ref_adm( 1,iz,26, 5),iz = 1,20) / &
     & 0.3309400E+00, 0.3309400E+00, 0.3087300E+00, 0.3291200E+00, &
     & 0.3545400E+00, 0.3408500E+00, 0.2943600E+00, 0.3228700E+00, &
     & 0.2792800E+00, 0.3124400E+00, 0.3096400E+00, 0.2716900E+00, &
     & 0.2748100E+00, 0.2749700E+00, 0.2507100E+00, 0.2528900E+00, &
     & 0.2517400E+00, 0.2238100E+00, 0.2054900E+00, 0.2054900E+00 /
      data (ref_adm( 1,iz,27, 5),iz = 1,20) / &
     & 0.3615800E+00, 0.3615800E+00, 0.3301500E+00, 0.3376200E+00, &
     & 0.3306700E+00, 0.3044700E+00, 0.3475600E+00, 0.3288900E+00, &
     & 0.2946700E+00, 0.3638000E+00, 0.3809400E+00, 0.3564100E+00, &
     & 0.3920300E+00, 0.3594000E+00, 0.3441100E+00, 0.2957600E+00, &
     & 0.2760300E+00, 0.2073600E+00, 0.1937300E+00, 0.1937300E+00 /
      data (ref_adm( 1,iz,28, 5),iz = 1,20) / &
     & 0.3669500E+00, 0.3669500E+00, 0.3957900E+00, 0.3755600E+00, &
     & 0.3049200E+00, 0.2996800E+00, 0.3071700E+00, 0.2542800E+00, &
     & 0.3430300E+00, 0.3536900E+00, 0.5336700E+00, 0.4144000E+00, &
     & 0.3783700E+00, 0.3632200E+00, 0.3261200E+00, 0.3113400E+00, &
     & 0.3412752E+00, 0.3225892E+00, 0.2941716E+00, 0.2941716E+00 /
      data (ref_adm( 1,iz,29, 5),iz = 1,20) / &
     & 0.3452000E+00, 0.3452000E+00, 0.3866100E+00, 0.3496500E+00, &
     & 0.3302800E+00, 0.2701100E+00, 0.2918200E+00, 0.3288600E+00, &
     & 0.3953200E+00, 0.3315800E+00, 0.2930300E+00, 0.2923800E+00, &
     & 0.3335800E+00, 0.3042200E+00, 0.3520400E+00, 0.3515975E+00, &
     & 0.3418105E+00, 0.3234691E+00, 0.2968488E+00, 0.2968488E+00 /
      data (ref_adm( 1,iz,30, 5),iz = 1,20) / &
     & 0.3695700E+00, 0.3695700E+00, 0.3294100E+00, 0.3673400E+00, &
     & 0.2631400E+00, 0.2712100E+00, 0.3261600E+00, 0.3818900E+00, &
     & 0.3237000E+00, 0.3885500E+00, 0.3985300E+00, 0.3123400E+00, &
     & 0.4064900E+00, 0.2792700E+00, 0.2319600E+00, 0.3541438E+00, &
     & 0.3435825E+00, 0.3244981E+00, 0.2999613E+00, 0.2999613E+00 /
      data (ref_adm( 1,iz,31, 5),iz = 1,20) / &
     & 0.3620400E+00, 0.3620400E+00, 0.3507700E+00, 0.3830500E+00, &
     & 0.2671800E+00, 0.2951700E+00, 0.3816200E+00, 0.2798600E+00, &
     & 0.2871300E+00, 0.2905100E+00, 0.3393000E+00, 0.3908100E+00, &
     & 0.4626800E+00, 0.3671781E+00, 0.3648184E+00, 0.3572189E+00, &
     & 0.3459925E+00, 0.3262004E+00, 0.3030996E+00, 0.3030996E+00 /
      data (ref_adm( 1,iz,32, 5),iz = 1,20) / &
     & 0.3636900E+00, 0.3636900E+00, 0.3715300E+00, 0.3667200E+00, &
     & 0.3408700E+00, 0.3295400E+00, 0.3515400E+00, 0.2900600E+00, &
     & 0.3396800E+00, 0.2955600E+00, 0.3196300E+00, 0.4702300E+00, &
     & 0.3700895E+00, 0.3716261E+00, 0.3689877E+00, 0.3611865E+00, &
     & 0.3487135E+00, 0.3283065E+00, 0.3060771E+00, 0.3060771E+00 /
      data (ref_adm( 1,iz,33, 5),iz = 1,20) / &
     & 0.3663800E+00, 0.3663800E+00, 0.3752300E+00, 0.3595000E+00, &
     & 0.3693100E+00, 0.3747400E+00, 0.3883900E+00, 0.3675000E+00, &
     & 0.3515400E+00, 0.2910400E+00, 0.3327700E+00, 0.5705300E+00, &
     & 0.3687294E+00, 0.3744550E+00, 0.3730215E+00, 0.3650004E+00, &
     & 0.3518563E+00, 0.3308268E+00, 0.3089104E+00, 0.3089104E+00 /
      data (ref_adm( 1,iz,34, 5),iz = 1,20) / &
     & 0.3413600E+00, 0.3413600E+00, 0.3197600E+00, 0.3492300E+00, &
     & 0.3704500E+00, 0.3999500E+00, 0.3600600E+00, 0.3560800E+00, &
     & 0.3655100E+00, 0.3672700E+00, 0.2549400E+00, 0.3525877E+00, &
     & 0.3645675E+00, 0.3737157E+00, 0.3758976E+00, 0.3683983E+00, &
     & 0.3550621E+00, 0.3331037E+00, 0.3115706E+00, 0.3115706E+00 /
      data (ref_adm( 1,iz,35, 5),iz = 1,20) / &
     & 0.3700900E+00, 0.3700900E+00, 0.3757000E+00, 0.3701400E+00, &
     & 0.4208300E+00, 0.4548500E+00, 0.4144000E+00, 0.3849500E+00, &
     & 0.3327000E+00, 0.2963600E+00, 0.2577400E+00, 0.3513122E+00, &
     & 0.3611084E+00, 0.3710624E+00, 0.3770930E+00, 0.3710397E+00, &
     & 0.3574727E+00, 0.3352554E+00, 0.3137031E+00, 0.3137031E+00 /
      data (ref_adm( 1,iz,36, 5),iz = 1,20) / &
     & 0.3481000E+00, 0.3481000E+00, 0.3812100E+00, 0.4094900E+00, &
     & 0.4077900E+00, 0.3701400E+00, 0.4307300E+00, 0.4671400E+00, &
     & 0.4551900E+00, 0.3625300E+00, 0.4024500E+00, 0.4168500E+00, &
     & 0.3589941E+00, 0.3685571E+00, 0.3771636E+00, 0.3732593E+00, &
     & 0.3593271E+00, 0.3368380E+00, 0.3151485E+00, 0.3151485E+00 /
      data (ref_adm( 1,iz,37, 5),iz = 1,20) / &
     & 0.4042200E+00, 0.4042200E+00, 0.3476100E+00, 0.4438000E+00, &
     & 0.4631900E+00, 0.4291300E+00, 0.4256900E+00, 0.4169900E+00, &
     & 0.4591300E+00, 0.5960800E+00, 0.4779500E+00, 0.5253900E+00, &
     & 0.3584159E+00, 0.3672807E+00, 0.3766545E+00, 0.3741328E+00, &
     & 0.3604736E+00, 0.3376828E+00, 0.3159932E+00, 0.3159932E+00 /
      data (ref_adm( 1,iz,38, 5),iz = 1,20) / &
     & 0.4042200E+00, 0.4042200E+00, 0.3476100E+00, 0.4438000E+00, &
     & 0.4631900E+00, 0.4291300E+00, 0.4256900E+00, 0.4169900E+00, &
     & 0.4591300E+00, 0.5960800E+00, 0.4779500E+00, 0.5253900E+00, &
     & 0.3584159E+00, 0.3672807E+00, 0.3766545E+00, 0.3741328E+00, &
     & 0.3604736E+00, 0.3376828E+00, 0.3159932E+00, 0.3159932E+00 /
! Solar Zenith Angle 25.0 Albedo  0.3342750E+00
      data (ref_adm( 1,iz, 1, 6),iz = 1,20) / &
     & 0.2988000E+00, 0.2988000E+00, 0.2736900E+00, 0.2963200E+00, &
     & 0.3088700E+00, 0.3196400E+00, 0.3514300E+00, 0.3460900E+00, &
     & 0.4488800E+00, 0.3980100E+00, 0.3920500E+00, 0.3899500E+00, &
     & 0.4284900E+00, 0.3536700E+00, 0.3919500E+00, 0.3965000E+00, &
     & 0.2966800E+00, 0.3130700E+00, 0.1706700E+00, 0.1706700E+00 /
      data (ref_adm( 1,iz, 2, 6),iz = 1,20) / &
     & 0.2988000E+00, 0.2988000E+00, 0.2736900E+00, 0.2963200E+00, &
     & 0.3088700E+00, 0.3196400E+00, 0.3514300E+00, 0.3460900E+00, &
     & 0.4488800E+00, 0.3980100E+00, 0.3920500E+00, 0.3899500E+00, &
     & 0.4284900E+00, 0.3536700E+00, 0.3919500E+00, 0.3965000E+00, &
     & 0.2966800E+00, 0.3130700E+00, 0.1706700E+00, 0.1706700E+00 /
      data (ref_adm( 1,iz, 3, 6),iz = 1,20) / &
     & 0.3196300E+00, 0.3196300E+00, 0.3249700E+00, 0.2729700E+00, &
     & 0.2642400E+00, 0.3351400E+00, 0.4073200E+00, 0.4055100E+00, &
     & 0.3558800E+00, 0.3726200E+00, 0.3861500E+00, 0.3892900E+00, &
     & 0.4044900E+00, 0.3052300E+00, 0.3536300E+00, 0.3691100E+00, &
     & 0.3293200E+00, 0.3552900E+00, 0.4069261E-08, 0.4069261E-08 /
      data (ref_adm( 1,iz, 4, 6),iz = 1,20) / &
     & 0.3560400E+00, 0.3560400E+00, 0.3587200E+00, 0.3497500E+00, &
     & 0.3345500E+00, 0.3367400E+00, 0.4049000E+00, 0.3676000E+00, &
     & 0.3307500E+00, 0.3197000E+00, 0.4172000E+00, 0.4061600E+00, &
     & 0.3600800E+00, 0.3870100E+00, 0.4144300E+00, 0.3291800E+00, &
     & 0.3271400E+00, 0.3232800E+00, 0.3008200E+00, 0.3008200E+00 /
      data (ref_adm( 1,iz, 5, 6),iz = 1,20) / &
     & 0.3335800E+00, 0.3335800E+00, 0.3757900E+00, 0.2602100E+00, &
     & 0.3160800E+00, 0.3224200E+00, 0.3174000E+00, 0.3922400E+00, &
     & 0.3797000E+00, 0.4145200E+00, 0.3799000E+00, 0.3393400E+00, &
     & 0.4297600E+00, 0.3820800E+00, 0.4241500E+00, 0.3312700E+00, &
     & 0.2814700E+00, 0.3156700E+00, 0.2651169E+00, 0.2651169E+00 /
      data (ref_adm( 1,iz, 6, 6),iz = 1,20) / &
     & 0.3754900E+00, 0.3754900E+00, 0.3419900E+00, 0.3035700E+00, &
     & 0.2635900E+00, 0.2317100E+00, 0.2358200E+00, 0.4020700E+00, &
     & 0.4248100E+00, 0.4373900E+00, 0.4557500E+00, 0.3516100E+00, &
     & 0.3963400E+00, 0.3694600E+00, 0.3924100E+00, 0.4122500E+00, &
     & 0.3477500E+00, 0.3351300E+00, 0.2862300E+00, 0.2862300E+00 /
      data (ref_adm( 1,iz, 7, 6),iz = 1,20) / &
     & 0.2705600E+00, 0.2705600E+00, 0.2668300E+00, 0.3183500E+00, &
     & 0.2212000E+00, 0.2197900E+00, 0.1699700E+00, 0.3713500E+00, &
     & 0.3294500E+00, 0.3792200E+00, 0.3947500E+00, 0.3752300E+00, &
     & 0.3104000E+00, 0.3455200E+00, 0.3939100E+00, 0.3732800E+00, &
     & 0.3283800E+00, 0.1832200E+00, 0.2649188E+00, 0.2649188E+00 /
      data (ref_adm( 1,iz, 8, 6),iz = 1,20) / &
     & 0.2267200E+00, 0.2267200E+00, 0.2588900E+00, 0.2598400E+00, &
     & 0.2222500E+00, 0.2615800E+00, 0.2560200E+00, 0.3325700E+00, &
     & 0.2173900E+00, 0.3139800E+00, 0.3379100E+00, 0.3667900E+00, &
     & 0.3191100E+00, 0.3628300E+00, 0.3937100E+00, 0.3442500E+00, &
     & 0.2508400E+00, 0.3333700E+00, 0.2761700E+00, 0.2761700E+00 /
      data (ref_adm( 1,iz, 9, 6),iz = 1,20) / &
     & 0.2572200E+00, 0.2572200E+00, 0.3203900E+00, 0.3312800E+00, &
     & 0.3336600E+00, 0.2894300E+00, 0.3574500E+00, 0.3473400E+00, &
     & 0.2918700E+00, 0.2663100E+00, 0.2751200E+00, 0.2711200E+00, &
     & 0.3273000E+00, 0.4222200E+00, 0.4321100E+00, 0.3808000E+00, &
     & 0.2219800E+00, 0.2452300E+00, 0.2645884E+00, 0.2645884E+00 /
      data (ref_adm( 1,iz,10, 6),iz = 1,20) / &
     & 0.3096800E+00, 0.3096800E+00, 0.3201900E+00, 0.3156300E+00, &
     & 0.3814300E+00, 0.3153300E+00, 0.2914800E+00, 0.3048100E+00, &
     & 0.3094900E+00, 0.2908100E+00, 0.3208400E+00, 0.2719100E+00, &
     & 0.2963100E+00, 0.3385200E+00, 0.3102100E+00, 0.2467000E+00, &
     & 0.1941500E+00, 0.1747600E+00, 0.1825200E+00, 0.1825200E+00 /
      data (ref_adm( 1,iz,11, 6),iz = 1,20) / &
     & 0.3101600E+00, 0.3101600E+00, 0.3094300E+00, 0.3309000E+00, &
     & 0.3313500E+00, 0.3223900E+00, 0.3470100E+00, 0.3203400E+00, &
     & 0.3500400E+00, 0.3631300E+00, 0.3387700E+00, 0.2795900E+00, &
     & 0.2869300E+00, 0.2432700E+00, 0.1958400E+00, 0.2054700E+00, &
     & 0.1984000E+00, 0.1902300E+00, 0.1822100E+00, 0.1822100E+00 /
      data (ref_adm( 1,iz,12, 6),iz = 1,20) / &
     & 0.2686700E+00, 0.2686700E+00, 0.3343700E+00, 0.3044000E+00, &
     & 0.3465900E+00, 0.3257000E+00, 0.3426200E+00, 0.3116400E+00, &
     & 0.2981200E+00, 0.3290300E+00, 0.3291200E+00, 0.3449500E+00, &
     & 0.3308600E+00, 0.2650400E+00, 0.2003400E+00, 0.2384800E+00, &
     & 0.1821400E+00, 0.2408900E+00, 0.1751400E+00, 0.1751400E+00 /
      data (ref_adm( 1,iz,13, 6),iz = 1,20) / &
     & 0.2849000E+00, 0.2849000E+00, 0.3335400E+00, 0.3642900E+00, &
     & 0.3217800E+00, 0.3044800E+00, 0.2573400E+00, 0.2986900E+00, &
     & 0.3271900E+00, 0.3304100E+00, 0.3226100E+00, 0.3155100E+00, &
     & 0.3189500E+00, 0.3742700E+00, 0.2375500E+00, 0.2160300E+00, &
     & 0.1808900E+00, 0.1553600E+00, 0.2637766E+00, 0.2637766E+00 /
      data (ref_adm( 1,iz,14, 6),iz = 1,20) / &
     & 0.3108400E+00, 0.3108400E+00, 0.3344100E+00, 0.2709600E+00, &
     & 0.3343700E+00, 0.3662600E+00, 0.4015000E+00, 0.2572900E+00, &
     & 0.3121200E+00, 0.3391300E+00, 0.3739600E+00, 0.4014500E+00, &
     & 0.3367500E+00, 0.3271800E+00, 0.2172700E+00, 0.2461900E+00, &
     & 0.2496400E+00, 0.2297900E+00, 0.1238900E+00, 0.1238900E+00 /
      data (ref_adm( 1,iz,15, 6),iz = 1,20) / &
     & 0.2720400E+00, 0.2720400E+00, 0.2744700E+00, 0.2457000E+00, &
     & 0.3037100E+00, 0.3714700E+00, 0.3503400E+00, 0.3565400E+00, &
     & 0.3713000E+00, 0.3812200E+00, 0.3808800E+00, 0.3442000E+00, &
     & 0.3217600E+00, 0.3448600E+00, 0.2656600E+00, 0.2262800E+00, &
     & 0.2297900E+00, 0.2365800E+00, 0.3860200E+00, 0.3860200E+00 /
      data (ref_adm( 1,iz,16, 6),iz = 1,20) / &
     & 0.2660000E+00, 0.2660000E+00, 0.2651200E+00, 0.2984100E+00, &
     & 0.3582500E+00, 0.3549400E+00, 0.2796200E+00, 0.3163200E+00, &
     & 0.2954400E+00, 0.3737800E+00, 0.3786700E+00, 0.3797400E+00, &
     & 0.3059600E+00, 0.2344800E+00, 0.2895100E+00, 0.2664000E+00, &
     & 0.2108400E+00, 0.2147700E+00, 0.1609700E+00, 0.1609700E+00 /
      data (ref_adm( 1,iz,17, 6),iz = 1,20) / &
     & 0.2543700E+00, 0.2543700E+00, 0.2342200E+00, 0.2553300E+00, &
     & 0.2545700E+00, 0.4783600E+00, 0.2779400E+00, 0.3581000E+00, &
     & 0.3850700E+00, 0.3924200E+00, 0.3648000E+00, 0.3662300E+00, &
     & 0.2674700E+00, 0.2533300E+00, 0.2826100E+00, 0.2916300E+00, &
     & 0.2519900E+00, 0.2682100E+00, 0.2320500E+00, 0.2320500E+00 /
      data (ref_adm( 1,iz,18, 6),iz = 1,20) / &
     & 0.2791000E+00, 0.2791000E+00, 0.2626600E+00, 0.2676500E+00, &
     & 0.2882300E+00, 0.4346700E+00, 0.3508400E+00, 0.3831800E+00, &
     & 0.3650000E+00, 0.3786000E+00, 0.3388800E+00, 0.3443200E+00, &
     & 0.3072900E+00, 0.2214300E+00, 0.2701100E+00, 0.3040800E+00, &
     & 0.2812100E+00, 0.2190900E+00, 0.2560239E+00, 0.2560239E+00 /
      data (ref_adm( 1,iz,19, 6),iz = 1,20) / &
     & 0.2373400E+00, 0.2373400E+00, 0.2525000E+00, 0.2974300E+00, &
     & 0.2928300E+00, 0.4182700E+00, 0.4607000E+00, 0.3697500E+00, &
     & 0.3503100E+00, 0.3352500E+00, 0.3387400E+00, 0.3779300E+00, &
     & 0.3293000E+00, 0.2224300E+00, 0.2348000E+00, 0.3105200E+00, &
     & 0.2760000E+00, 0.3077500E+00, 0.2307300E+00, 0.2307300E+00 /
      data (ref_adm( 1,iz,20, 6),iz = 1,20) / &
     & 0.2961000E+00, 0.2961000E+00, 0.2767500E+00, 0.3105500E+00, &
     & 0.3844100E+00, 0.3873600E+00, 0.3777100E+00, 0.2660800E+00, &
     & 0.2710300E+00, 0.2860600E+00, 0.3262500E+00, 0.3807700E+00, &
     & 0.3556300E+00, 0.3016700E+00, 0.2312100E+00, 0.3234800E+00, &
     & 0.2341400E+00, 0.2756200E+00, 0.2547123E+00, 0.2547123E+00 /
      data (ref_adm( 1,iz,21, 6),iz = 1,20) / &
     & 0.2928900E+00, 0.2928900E+00, 0.3100000E+00, 0.3445000E+00, &
     & 0.4057000E+00, 0.4051000E+00, 0.4138400E+00, 0.2848400E+00, &
     & 0.3652400E+00, 0.2997100E+00, 0.2856000E+00, 0.4312500E+00, &
     & 0.3405300E+00, 0.3287600E+00, 0.3245100E+00, 0.3247800E+00, &
     & 0.3070700E+00, 0.2591800E+00, 0.2541788E+00, 0.2541788E+00 /
      data (ref_adm( 1,iz,22, 6),iz = 1,20) / &
     & 0.2729300E+00, 0.2729300E+00, 0.3211300E+00, 0.3225900E+00, &
     & 0.2928700E+00, 0.2877500E+00, 0.3544600E+00, 0.3135700E+00, &
     & 0.3365700E+00, 0.3700800E+00, 0.3243700E+00, 0.3741500E+00, &
     & 0.3555400E+00, 0.3361400E+00, 0.2918600E+00, 0.3058800E+00, &
     & 0.2651200E+00, 0.2680300E+00, 0.3519546E+00, 0.3519546E+00 /
      data (ref_adm( 1,iz,23, 6),iz = 1,20) / &
     & 0.2847400E+00, 0.2847400E+00, 0.2639300E+00, 0.2653100E+00, &
     & 0.3156300E+00, 0.2963200E+00, 0.2668400E+00, 0.3347900E+00, &
     & 0.3156500E+00, 0.2565200E+00, 0.2450100E+00, 0.3162300E+00, &
     & 0.3784100E+00, 0.3211600E+00, 0.2913000E+00, 0.2982600E+00, &
     & 0.3095900E+00, 0.3164600E+00, 0.3489025E+00, 0.3489025E+00 /
      data (ref_adm( 1,iz,24, 6),iz = 1,20) / &
     & 0.2979600E+00, 0.2979600E+00, 0.3360500E+00, 0.2411600E+00, &
     & 0.2931500E+00, 0.2732500E+00, 0.2811000E+00, 0.2477400E+00, &
     & 0.3468100E+00, 0.2941200E+00, 0.3210800E+00, 0.3078800E+00, &
     & 0.3519100E+00, 0.3373800E+00, 0.3473800E+00, 0.3290200E+00, &
     & 0.3620800E+00, 0.3641400E+00, 0.3469791E+00, 0.3469791E+00 /
      data (ref_adm( 1,iz,25, 6),iz = 1,20) / &
     & 0.3315500E+00, 0.3315500E+00, 0.2835000E+00, 0.3229500E+00, &
     & 0.2965300E+00, 0.2766700E+00, 0.2918200E+00, 0.2793600E+00, &
     & 0.2812600E+00, 0.3475400E+00, 0.3186500E+00, 0.3546400E+00, &
     & 0.3440000E+00, 0.3359100E+00, 0.3616600E+00, 0.3273000E+00, &
     & 0.3184500E+00, 0.2879300E+00, 0.3464492E+00, 0.3464492E+00 /
      data (ref_adm( 1,iz,26, 6),iz = 1,20) / &
     & 0.3142000E+00, 0.3142000E+00, 0.2849100E+00, 0.2297600E+00, &
     & 0.3771800E+00, 0.4027300E+00, 0.3845000E+00, 0.2820500E+00, &
     & 0.2931400E+00, 0.3157600E+00, 0.3113400E+00, 0.2894300E+00, &
     & 0.2939000E+00, 0.2825200E+00, 0.3280700E+00, 0.3234900E+00, &
     & 0.3565100E+00, 0.3039700E+00, 0.3471368E+00, 0.3471368E+00 /
      data (ref_adm( 1,iz,27, 6),iz = 1,20) / &
     & 0.3484000E+00, 0.3484000E+00, 0.3492100E+00, 0.2896600E+00, &
     & 0.3990800E+00, 0.3877400E+00, 0.3180900E+00, 0.2885200E+00, &
     & 0.3055500E+00, 0.3389200E+00, 0.3090100E+00, 0.3075800E+00, &
     & 0.3397400E+00, 0.2798800E+00, 0.3013900E+00, 0.3378200E+00, &
     & 0.3302000E+00, 0.3283400E+00, 0.2755400E+00, 0.2755400E+00 /
      data (ref_adm( 1,iz,28, 6),iz = 1,20) / &
     & 0.3131200E+00, 0.3131200E+00, 0.3158500E+00, 0.3653900E+00, &
     & 0.3465100E+00, 0.2964300E+00, 0.2527900E+00, 0.2615200E+00, &
     & 0.2896500E+00, 0.3086200E+00, 0.2763600E+00, 0.3215900E+00, &
     & 0.3484300E+00, 0.2920200E+00, 0.2863900E+00, 0.3268100E+00, &
     & 0.2917000E+00, 0.2667500E+00, 0.1952900E+00, 0.1952900E+00 /
      data (ref_adm( 1,iz,29, 6),iz = 1,20) / &
     & 0.3225800E+00, 0.3225800E+00, 0.3428000E+00, 0.3725300E+00, &
     & 0.4197200E+00, 0.3984000E+00, 0.3019000E+00, 0.3352700E+00, &
     & 0.3319600E+00, 0.2795100E+00, 0.3535600E+00, 0.3489900E+00, &
     & 0.3476300E+00, 0.3347400E+00, 0.3163400E+00, 0.3239900E+00, &
     & 0.3233900E+00, 0.3119300E+00, 0.2495300E+00, 0.2495300E+00 /
      data (ref_adm( 1,iz,30, 6),iz = 1,20) / &
     & 0.3388300E+00, 0.3388300E+00, 0.3236400E+00, 0.3269700E+00, &
     & 0.3430500E+00, 0.3483300E+00, 0.3230600E+00, 0.2818000E+00, &
     & 0.3045800E+00, 0.2997800E+00, 0.3685400E+00, 0.3536100E+00, &
     & 0.3593700E+00, 0.3430100E+00, 0.3207600E+00, 0.3128100E+00, &
     & 0.3525400E+00, 0.2407500E+00, 0.3664795E+00, 0.3664795E+00 /
      data (ref_adm( 1,iz,31, 6),iz = 1,20) / &
     & 0.3242200E+00, 0.3242200E+00, 0.3060100E+00, 0.3339400E+00, &
     & 0.3201200E+00, 0.3280900E+00, 0.3362000E+00, 0.3511100E+00, &
     & 0.3489200E+00, 0.3453200E+00, 0.3802200E+00, 0.3501800E+00, &
     & 0.3844500E+00, 0.3363500E+00, 0.3798000E+00, 0.3331900E+00, &
     & 0.2585300E+00, 0.3789563E+00, 0.3730639E+00, 0.3730639E+00 /
      data (ref_adm( 1,iz,32, 6),iz = 1,20) / &
     & 0.3131600E+00, 0.3131600E+00, 0.2694100E+00, 0.3468700E+00, &
     & 0.3745800E+00, 0.3386800E+00, 0.3467200E+00, 0.3620800E+00, &
     & 0.3548300E+00, 0.3675200E+00, 0.3719300E+00, 0.3473300E+00, &
     & 0.4101900E+00, 0.3287100E+00, 0.3814400E+00, 0.2664700E+00, &
     & 0.4000205E+00, 0.3853138E+00, 0.3797774E+00, 0.3797774E+00 /
      data (ref_adm( 1,iz,33, 6),iz = 1,20) / &
     & 0.2845700E+00, 0.2845700E+00, 0.2546300E+00, 0.2701500E+00, &
     & 0.2880900E+00, 0.3003900E+00, 0.3229200E+00, 0.3487700E+00, &
     & 0.3583900E+00, 0.3868600E+00, 0.3766100E+00, 0.3652700E+00, &
     & 0.3691800E+00, 0.3388800E+00, 0.3721900E+00, 0.3974500E+00, &
     & 0.4070715E+00, 0.3920302E+00, 0.3862819E+00, 0.3862819E+00 /
      data (ref_adm( 1,iz,34, 6),iz = 1,20) / &
     & 0.2995100E+00, 0.2995100E+00, 0.3231000E+00, 0.2930500E+00, &
     & 0.3257400E+00, 0.3253400E+00, 0.3065600E+00, 0.3790300E+00, &
     & 0.3974500E+00, 0.3921300E+00, 0.3678700E+00, 0.3799900E+00, &
     & 0.4029200E+00, 0.3875600E+00, 0.4024900E+00, 0.4139882E+00, &
     & 0.4133146E+00, 0.3982477E+00, 0.3922574E+00, 0.3922574E+00 /
      data (ref_adm( 1,iz,35, 6),iz = 1,20) / &
     & 0.3401500E+00, 0.3401500E+00, 0.2919500E+00, 0.3480900E+00, &
     & 0.3544000E+00, 0.3386800E+00, 0.3629200E+00, 0.3902500E+00, &
     & 0.3928700E+00, 0.3737800E+00, 0.3685900E+00, 0.4114400E+00, &
     & 0.4156800E+00, 0.4071800E+00, 0.4349600E+00, 0.4115067E+00, &
     & 0.4166670E+00, 0.4033310E+00, 0.3973276E+00, 0.3973276E+00 /
      data (ref_adm( 1,iz,36, 6),iz = 1,20) / &
     & 0.3018700E+00, 0.3018700E+00, 0.3471400E+00, 0.3602000E+00, &
     & 0.3892300E+00, 0.3731300E+00, 0.3700200E+00, 0.3651500E+00, &
     & 0.3490100E+00, 0.3738900E+00, 0.3979200E+00, 0.4471100E+00, &
     & 0.3946200E+00, 0.3888100E+00, 0.4362400E+00, 0.4075194E+00, &
     & 0.4171235E+00, 0.4069860E+00, 0.4006697E+00, 0.4006697E+00 /
      data (ref_adm( 1,iz,37, 6),iz = 1,20) / &
     & 0.3275900E+00, 0.3275900E+00, 0.3075500E+00, 0.3740300E+00, &
     & 0.4291700E+00, 0.3685300E+00, 0.3960000E+00, 0.3553400E+00, &
     & 0.2685900E+00, 0.3228700E+00, 0.4157000E+00, 0.4571100E+00, &
     & 0.4469600E+00, 0.4774800E+00, 0.5459700E+00, 0.4056785E+00, &
     & 0.4166439E+00, 0.4088302E+00, 0.4024701E+00, 0.4024701E+00 /
      data (ref_adm( 1,iz,38, 6),iz = 1,20) / &
     & 0.3275900E+00, 0.3275900E+00, 0.3075500E+00, 0.3740300E+00, &
     & 0.4291700E+00, 0.3685300E+00, 0.3960000E+00, 0.3553400E+00, &
     & 0.2685900E+00, 0.3228700E+00, 0.4157000E+00, 0.4571100E+00, &
     & 0.4469600E+00, 0.4774800E+00, 0.5459700E+00, 0.4056785E+00, &
     & 0.4166439E+00, 0.4088302E+00, 0.4024701E+00, 0.4024701E+00 /
! Solar Zenith Angle 30.0 Albedo  0.3526763E+00
      data (ref_adm( 1,iz, 1, 7),iz = 1,20) / &
     & 0.2482200E+00, 0.2482200E+00, 0.3229900E+00, 0.3432000E+00, &
     & 0.3820700E+00, 0.3540200E+00, 0.3526800E+00, 0.3611900E+00, &
     & 0.4009300E+00, 0.3744600E+00, 0.3743000E+00, 0.3969200E+00, &
     & 0.3741000E+00, 0.3739800E+00, 0.4010500E+00, 0.3811600E+00, &
     & 0.4136900E+00, 0.3922200E+00, 0.3037337E+00, 0.3037337E+00 /
      data (ref_adm( 1,iz, 2, 7),iz = 1,20) / &
     & 0.2482200E+00, 0.2482200E+00, 0.3229900E+00, 0.3432000E+00, &
     & 0.3820700E+00, 0.3540200E+00, 0.3526800E+00, 0.3611900E+00, &
     & 0.4009300E+00, 0.3744600E+00, 0.3743000E+00, 0.3969200E+00, &
     & 0.3741000E+00, 0.3739800E+00, 0.4010500E+00, 0.3811600E+00, &
     & 0.4136900E+00, 0.3922200E+00, 0.3037337E+00, 0.3037337E+00 /
      data (ref_adm( 1,iz, 3, 7),iz = 1,20) / &
     & 0.2629700E+00, 0.2629700E+00, 0.3255900E+00, 0.3028600E+00, &
     & 0.3033200E+00, 0.3011800E+00, 0.3706600E+00, 0.3527500E+00, &
     & 0.3972300E+00, 0.3795000E+00, 0.3567400E+00, 0.3408200E+00, &
     & 0.3428800E+00, 0.3495600E+00, 0.4080300E+00, 0.3816300E+00, &
     & 0.4081900E+00, 0.4031800E+00, 0.3295300E+00, 0.3295300E+00 /
      data (ref_adm( 1,iz, 4, 7),iz = 1,20) / &
     & 0.3199500E+00, 0.3199500E+00, 0.3805800E+00, 0.3464900E+00, &
     & 0.3109500E+00, 0.3111200E+00, 0.3541500E+00, 0.3609000E+00, &
     & 0.3805800E+00, 0.3662100E+00, 0.3639400E+00, 0.3480500E+00, &
     & 0.3503800E+00, 0.3448200E+00, 0.3550500E+00, 0.3779300E+00, &
     & 0.3880500E+00, 0.4240300E+00, 0.3909600E+00, 0.3909600E+00 /
      data (ref_adm( 1,iz, 5, 7),iz = 1,20) / &
     & 0.3987700E+00, 0.3987700E+00, 0.4523700E+00, 0.3746300E+00, &
     & 0.3282600E+00, 0.3212300E+00, 0.3734700E+00, 0.3711200E+00, &
     & 0.3387500E+00, 0.3474800E+00, 0.3363200E+00, 0.3211300E+00, &
     & 0.3361700E+00, 0.3814300E+00, 0.3638100E+00, 0.3686200E+00, &
     & 0.4313900E+00, 0.3810900E+00, 0.3691000E+00, 0.3691000E+00 /
      data (ref_adm( 1,iz, 6, 7),iz = 1,20) / &
     & 0.4164300E+00, 0.4164300E+00, 0.4041700E+00, 0.3313600E+00, &
     & 0.3255700E+00, 0.3629500E+00, 0.3695300E+00, 0.3357700E+00, &
     & 0.3463000E+00, 0.3321500E+00, 0.3409200E+00, 0.3781900E+00, &
     & 0.3413700E+00, 0.3770800E+00, 0.3922900E+00, 0.3952900E+00, &
     & 0.4222500E+00, 0.3779500E+00, 0.3701900E+00, 0.3701900E+00 /
      data (ref_adm( 1,iz, 7, 7),iz = 1,20) / &
     & 0.3640000E+00, 0.3640000E+00, 0.3762000E+00, 0.3696300E+00, &
     & 0.3646400E+00, 0.3592400E+00, 0.3853500E+00, 0.3054400E+00, &
     & 0.3244600E+00, 0.3126000E+00, 0.3233900E+00, 0.3407500E+00, &
     & 0.3720500E+00, 0.3415600E+00, 0.3587500E+00, 0.3802100E+00, &
     & 0.3552600E+00, 0.3593200E+00, 0.3011500E+00, 0.3011500E+00 /
      data (ref_adm( 1,iz, 8, 7),iz = 1,20) / &
     & 0.3816600E+00, 0.3816600E+00, 0.3949500E+00, 0.3453800E+00, &
     & 0.3476000E+00, 0.3478800E+00, 0.3446500E+00, 0.3019800E+00, &
     & 0.3106300E+00, 0.3384900E+00, 0.3076000E+00, 0.3716900E+00, &
     & 0.3749400E+00, 0.3830900E+00, 0.3478000E+00, 0.3722900E+00, &
     & 0.3630500E+00, 0.4376300E+00, 0.2753300E+00, 0.2753300E+00 /
      data (ref_adm( 1,iz, 9, 7),iz = 1,20) / &
     & 0.4213100E+00, 0.4213100E+00, 0.4049800E+00, 0.4326200E+00, &
     & 0.3803000E+00, 0.3841900E+00, 0.3775700E+00, 0.3624300E+00, &
     & 0.3643600E+00, 0.4028400E+00, 0.3496700E+00, 0.3834000E+00, &
     & 0.3809300E+00, 0.3899800E+00, 0.3929700E+00, 0.3902600E+00, &
     & 0.3765000E+00, 0.3402500E+00, 0.2824900E+00, 0.2824900E+00 /
      data (ref_adm( 1,iz,10, 7),iz = 1,20) / &
     & 0.3690800E+00, 0.3690800E+00, 0.3384200E+00, 0.3590500E+00, &
     & 0.3441400E+00, 0.3608400E+00, 0.2957200E+00, 0.3164100E+00, &
     & 0.3225300E+00, 0.3198200E+00, 0.3213800E+00, 0.3578500E+00, &
     & 0.3537400E+00, 0.3561800E+00, 0.3564100E+00, 0.3136200E+00, &
     & 0.2909000E+00, 0.2719900E+00, 0.2366600E+00, 0.2366600E+00 /
      data (ref_adm( 1,iz,11, 7),iz = 1,20) / &
     & 0.3695100E+00, 0.3695100E+00, 0.3658100E+00, 0.3608100E+00, &
     & 0.3684300E+00, 0.3576500E+00, 0.3720300E+00, 0.3637100E+00, &
     & 0.3361500E+00, 0.3137800E+00, 0.3360200E+00, 0.3404600E+00, &
     & 0.3019200E+00, 0.3569400E+00, 0.3600500E+00, 0.3736700E+00, &
     & 0.3187600E+00, 0.3007200E+00, 0.2664900E+00, 0.2664900E+00 /
      data (ref_adm( 1,iz,12, 7),iz = 1,20) / &
     & 0.3682400E+00, 0.3682400E+00, 0.3711000E+00, 0.3467300E+00, &
     & 0.3512900E+00, 0.3429000E+00, 0.3515200E+00, 0.3569600E+00, &
     & 0.3633700E+00, 0.3723800E+00, 0.3537000E+00, 0.3662100E+00, &
     & 0.3478400E+00, 0.3521900E+00, 0.3252100E+00, 0.3965900E+00, &
     & 0.3823000E+00, 0.3551363E+00, 0.2970229E+00, 0.2970229E+00 /
      data (ref_adm( 1,iz,13, 7),iz = 1,20) / &
     & 0.3946200E+00, 0.3946200E+00, 0.4216000E+00, 0.3641600E+00, &
     & 0.3305600E+00, 0.3220400E+00, 0.3181100E+00, 0.3228000E+00, &
     & 0.3433300E+00, 0.3675800E+00, 0.3759100E+00, 0.3847800E+00, &
     & 0.3791600E+00, 0.3998900E+00, 0.2492100E+00, 0.2320300E+00, &
     & 0.2222200E+00, 0.2172000E+00, 0.2958732E+00, 0.2958732E+00 /
      data (ref_adm( 1,iz,14, 7),iz = 1,20) / &
     & 0.3484200E+00, 0.3484200E+00, 0.3313600E+00, 0.3437500E+00, &
     & 0.3020600E+00, 0.3390500E+00, 0.3034000E+00, 0.3196300E+00, &
     & 0.3221800E+00, 0.3628400E+00, 0.3381300E+00, 0.3338200E+00, &
     & 0.3519700E+00, 0.3886000E+00, 0.3259900E+00, 0.2821200E+00, &
     & 0.2091700E+00, 0.1845900E+00, 0.2946455E+00, 0.2946455E+00 /
      data (ref_adm( 1,iz,15, 7),iz = 1,20) / &
     & 0.3471200E+00, 0.3471200E+00, 0.2698900E+00, 0.3657500E+00, &
     & 0.3350200E+00, 0.2696400E+00, 0.2649500E+00, 0.2939200E+00, &
     & 0.2815200E+00, 0.3514300E+00, 0.3543600E+00, 0.3661600E+00, &
     & 0.3221400E+00, 0.3134700E+00, 0.3092100E+00, 0.2959200E+00, &
     & 0.2090600E+00, 0.2413400E+00, 0.2935306E+00, 0.2935306E+00 /
      data (ref_adm( 1,iz,16, 7),iz = 1,20) / &
     & 0.3235000E+00, 0.3235000E+00, 0.3190600E+00, 0.3070100E+00, &
     & 0.3529900E+00, 0.2881900E+00, 0.2950900E+00, 0.3139400E+00, &
     & 0.3059200E+00, 0.3578300E+00, 0.4289200E+00, 0.3971100E+00, &
     & 0.3657700E+00, 0.3380900E+00, 0.3688600E+00, 0.2983700E+00, &
     & 0.3040900E+00, 0.2089200E+00, 0.2923848E+00, 0.2923848E+00 /
      data (ref_adm( 1,iz,17, 7),iz = 1,20) / &
     & 0.3085000E+00, 0.3085000E+00, 0.2724900E+00, 0.3724300E+00, &
     & 0.4008600E+00, 0.3391700E+00, 0.2420600E+00, 0.3027400E+00, &
     & 0.3640100E+00, 0.3612700E+00, 0.3582800E+00, 0.3541900E+00, &
     & 0.3540900E+00, 0.3467700E+00, 0.3790100E+00, 0.3061500E+00, &
     & 0.2847400E+00, 0.2498100E+00, 0.2913452E+00, 0.2913452E+00 /
      data (ref_adm( 1,iz,18, 7),iz = 1,20) / &
     & 0.3011500E+00, 0.3011500E+00, 0.3334200E+00, 0.3596700E+00, &
     & 0.4467300E+00, 0.4518700E+00, 0.3092500E+00, 0.2717800E+00, &
     & 0.2798900E+00, 0.3280300E+00, 0.3682700E+00, 0.3626900E+00, &
     & 0.3187800E+00, 0.3208500E+00, 0.3518500E+00, 0.1981400E+00, &
     & 0.2753500E+00, 0.2181200E+00, 0.2485774E+00, 0.2485774E+00 /
      data (ref_adm( 1,iz,19, 7),iz = 1,20) / &
     & 0.3556900E+00, 0.3556900E+00, 0.4163100E+00, 0.3684000E+00, &
     & 0.3152500E+00, 0.4213900E+00, 0.3802600E+00, 0.3224400E+00, &
     & 0.2795300E+00, 0.3331100E+00, 0.4137900E+00, 0.3321900E+00, &
     & 0.2805800E+00, 0.3344500E+00, 0.3448400E+00, 0.3236700E+00, &
     & 0.2948400E+00, 0.2521900E+00, 0.2100000E+00, 0.2100000E+00 /
      data (ref_adm( 1,iz,20, 7),iz = 1,20) / &
     & 0.3748100E+00, 0.3748100E+00, 0.4227900E+00, 0.4180700E+00, &
     & 0.3464800E+00, 0.3520600E+00, 0.3538400E+00, 0.3398000E+00, &
     & 0.3353300E+00, 0.3624300E+00, 0.4108500E+00, 0.2947500E+00, &
     & 0.2755800E+00, 0.2837500E+00, 0.2757000E+00, 0.3533600E+00, &
     & 0.3213500E+00, 0.3043300E+00, 0.2466272E+00, 0.2466272E+00 /
      data (ref_adm( 1,iz,21, 7),iz = 1,20) / &
     & 0.3916500E+00, 0.3916500E+00, 0.3564300E+00, 0.3782400E+00, &
     & 0.3623500E+00, 0.3219800E+00, 0.3238500E+00, 0.3484000E+00, &
     & 0.3727800E+00, 0.3682500E+00, 0.3778600E+00, 0.3839500E+00, &
     & 0.3160600E+00, 0.2856100E+00, 0.2550200E+00, 0.2983100E+00, &
     & 0.2845300E+00, 0.2797400E+00, 0.2465369E+00, 0.2465369E+00 /
      data (ref_adm( 1,iz,22, 7),iz = 1,20) / &
     & 0.3599200E+00, 0.3599200E+00, 0.3985200E+00, 0.3482600E+00, &
     & 0.3516600E+00, 0.3285200E+00, 0.3320800E+00, 0.3696100E+00, &
     & 0.4226100E+00, 0.4346700E+00, 0.3099000E+00, 0.3467400E+00, &
     & 0.3729800E+00, 0.3052300E+00, 0.2837500E+00, 0.3353400E+00, &
     & 0.2986100E+00, 0.2703255E+00, 0.2424826E+00, 0.2424826E+00 /
      data (ref_adm( 1,iz,23, 7),iz = 1,20) / &
     & 0.3521800E+00, 0.3521800E+00, 0.3735100E+00, 0.3768800E+00, &
     & 0.3365500E+00, 0.3326600E+00, 0.3338500E+00, 0.4114300E+00, &
     & 0.4502100E+00, 0.4299600E+00, 0.3306000E+00, 0.3546700E+00, &
     & 0.3193000E+00, 0.3312500E+00, 0.3383200E+00, 0.3448900E+00, &
     & 0.3111300E+00, 0.2390400E+00, 0.2426974E+00, 0.2426974E+00 /
      data (ref_adm( 1,iz,24, 7),iz = 1,20) / &
     & 0.3293000E+00, 0.3293000E+00, 0.3479400E+00, 0.3424200E+00, &
     & 0.3704000E+00, 0.3214700E+00, 0.3819300E+00, 0.4298600E+00, &
     & 0.3924400E+00, 0.4120400E+00, 0.3193300E+00, 0.3090400E+00, &
     & 0.3309300E+00, 0.3312500E+00, 0.3187500E+00, 0.3599900E+00, &
     & 0.3811700E+00, 0.1757100E+00, 0.2430730E+00, 0.2430730E+00 /
      data (ref_adm( 1,iz,25, 7),iz = 1,20) / &
     & 0.3837900E+00, 0.3837900E+00, 0.3586800E+00, 0.3644100E+00, &
     & 0.3680800E+00, 0.3792500E+00, 0.3672500E+00, 0.4043800E+00, &
     & 0.3937200E+00, 0.3588500E+00, 0.3431800E+00, 0.3503900E+00, &
     & 0.3588800E+00, 0.3510800E+00, 0.3500600E+00, 0.3448200E+00, &
     & 0.3406700E+00, 0.3177500E+00, 0.2436112E+00, 0.2436112E+00 /
      data (ref_adm( 1,iz,26, 7),iz = 1,20) / &
     & 0.3749700E+00, 0.3749700E+00, 0.4005100E+00, 0.4730600E+00, &
     & 0.4479800E+00, 0.3935000E+00, 0.3787700E+00, 0.3969600E+00, &
     & 0.4126900E+00, 0.3649400E+00, 0.3278600E+00, 0.3606800E+00, &
     & 0.3448100E+00, 0.3444400E+00, 0.3837700E+00, 0.3657600E+00, &
     & 0.3170800E+00, 0.2945500E+00, 0.2144700E+00, 0.2144700E+00 /
      data (ref_adm( 1,iz,27, 7),iz = 1,20) / &
     & 0.3628400E+00, 0.3628400E+00, 0.3897800E+00, 0.4208900E+00, &
     & 0.4083200E+00, 0.3933200E+00, 0.3824000E+00, 0.3982600E+00, &
     & 0.3932300E+00, 0.3687100E+00, 0.3591500E+00, 0.3622700E+00, &
     & 0.3275000E+00, 0.3688200E+00, 0.3834700E+00, 0.3674100E+00, &
     & 0.3461800E+00, 0.3397600E+00, 0.3035500E+00, 0.3035500E+00 /
      data (ref_adm( 1,iz,28, 7),iz = 1,20) / &
     & 0.3724600E+00, 0.3724600E+00, 0.3900000E+00, 0.3969800E+00, &
     & 0.4147500E+00, 0.3519400E+00, 0.4135600E+00, 0.4192400E+00, &
     & 0.4004600E+00, 0.3756800E+00, 0.3684800E+00, 0.3962800E+00, &
     & 0.3524200E+00, 0.3577600E+00, 0.3426500E+00, 0.3482600E+00, &
     & 0.3252300E+00, 0.3065800E+00, 0.2871700E+00, 0.2871700E+00 /
      data (ref_adm( 1,iz,29, 7),iz = 1,20) / &
     & 0.3746600E+00, 0.3746600E+00, 0.3614300E+00, 0.3514300E+00, &
     & 0.3646100E+00, 0.3419800E+00, 0.3408900E+00, 0.3744200E+00, &
     & 0.3603800E+00, 0.3884000E+00, 0.4027700E+00, 0.4480600E+00, &
     & 0.4603800E+00, 0.4069000E+00, 0.3857600E+00, 0.3274400E+00, &
     & 0.3279400E+00, 0.3096200E+00, 0.2344100E+00, 0.2344100E+00 /
      data (ref_adm( 1,iz,30, 7),iz = 1,20) / &
     & 0.3920900E+00, 0.3920900E+00, 0.3746000E+00, 0.4369800E+00, &
     & 0.4169400E+00, 0.3746300E+00, 0.3824700E+00, 0.3899500E+00, &
     & 0.3858300E+00, 0.3561700E+00, 0.3604900E+00, 0.3976000E+00, &
     & 0.3495300E+00, 0.3888900E+00, 0.4173400E+00, 0.3717000E+00, &
     & 0.3563900E+00, 0.3199500E+00, 0.2254300E+00, 0.2254300E+00 /
      data (ref_adm( 1,iz,31, 7),iz = 1,20) / &
     & 0.3487400E+00, 0.3487400E+00, 0.2931200E+00, 0.2944400E+00, &
     & 0.3279800E+00, 0.3544000E+00, 0.3566200E+00, 0.3982700E+00, &
     & 0.3561000E+00, 0.3616800E+00, 0.3438700E+00, 0.3434700E+00, &
     & 0.3483700E+00, 0.3500800E+00, 0.3438000E+00, 0.3482400E+00, &
     & 0.3247200E+00, 0.2859500E+00, 0.2175300E+00, 0.2175300E+00 /
      data (ref_adm( 1,iz,32, 7),iz = 1,20) / &
     & 0.3621500E+00, 0.3621500E+00, 0.2519200E+00, 0.3319100E+00, &
     & 0.4389700E+00, 0.4041400E+00, 0.3458900E+00, 0.3350500E+00, &
     & 0.3732000E+00, 0.3615500E+00, 0.3755900E+00, 0.3857500E+00, &
     & 0.3446100E+00, 0.3264700E+00, 0.3439100E+00, 0.2918400E+00, &
     & 0.2784500E+00, 0.2266500E+00, 0.2488856E+00, 0.2488856E+00 /
      data (ref_adm( 1,iz,33, 7),iz = 1,20) / &
     & 0.3588900E+00, 0.3588900E+00, 0.3785500E+00, 0.3806700E+00, &
     & 0.3948200E+00, 0.3928400E+00, 0.3678500E+00, 0.3104300E+00, &
     & 0.3435700E+00, 0.3159400E+00, 0.3686800E+00, 0.3621500E+00, &
     & 0.3561100E+00, 0.3448700E+00, 0.3455900E+00, 0.3363000E+00, &
     & 0.2378800E+00, 0.2761686E+00, 0.2495567E+00, 0.2495567E+00 /
      data (ref_adm( 1,iz,34, 7),iz = 1,20) / &
     & 0.3891200E+00, 0.3891200E+00, 0.3883400E+00, 0.3589300E+00, &
     & 0.3678700E+00, 0.3626900E+00, 0.3661600E+00, 0.3364800E+00, &
     & 0.3402800E+00, 0.3235900E+00, 0.3426200E+00, 0.3462600E+00, &
     & 0.3381200E+00, 0.3823400E+00, 0.3913700E+00, 0.3176900E+00, &
     & 0.3019614E+00, 0.2767625E+00, 0.2501190E+00, 0.2501190E+00 /
      data (ref_adm( 1,iz,35, 7),iz = 1,20) / &
     & 0.3913100E+00, 0.3913100E+00, 0.3952400E+00, 0.3981600E+00, &
     & 0.3652800E+00, 0.4020400E+00, 0.3200000E+00, 0.3381900E+00, &
     & 0.3576600E+00, 0.3610900E+00, 0.3461100E+00, 0.3403600E+00, &
     & 0.3468700E+00, 0.3936500E+00, 0.3960400E+00, 0.2553400E+00, &
     & 0.3026163E+00, 0.2772655E+00, 0.2505754E+00, 0.2505754E+00 /
      data (ref_adm( 1,iz,36, 7),iz = 1,20) / &
     & 0.3544200E+00, 0.3544200E+00, 0.4446600E+00, 0.4027500E+00, &
     & 0.3699100E+00, 0.3665700E+00, 0.4318200E+00, 0.3925600E+00, &
     & 0.4375100E+00, 0.3576500E+00, 0.3592000E+00, 0.3705400E+00, &
     & 0.3665200E+00, 0.3532100E+00, 0.3109800E+00, 0.3230356E+00, &
     & 0.3030559E+00, 0.2776258E+00, 0.2508829E+00, 0.2508829E+00 /
      data (ref_adm( 1,iz,37, 7),iz = 1,20) / &
     & 0.3210600E+00, 0.3210600E+00, 0.3123300E+00, 0.3124000E+00, &
     & 0.4118500E+00, 0.4062200E+00, 0.4292000E+00, 0.4206100E+00, &
     & 0.4391300E+00, 0.3734500E+00, 0.3727100E+00, 0.4560900E+00, &
     & 0.4196900E+00, 0.3002600E+00, 0.2801200E+00, 0.3232400E+00, &
     & 0.3032908E+00, 0.2778217E+00, 0.2510511E+00, 0.2510511E+00 /
      data (ref_adm( 1,iz,38, 7),iz = 1,20) / &
     & 0.3210600E+00, 0.3210600E+00, 0.3123300E+00, 0.3124000E+00, &
     & 0.4118500E+00, 0.4062200E+00, 0.4292000E+00, 0.4206100E+00, &
     & 0.4391300E+00, 0.3734500E+00, 0.3727100E+00, 0.4560900E+00, &
     & 0.4196900E+00, 0.3002600E+00, 0.2801200E+00, 0.3232400E+00, &
     & 0.3032908E+00, 0.2778217E+00, 0.2510511E+00, 0.2510511E+00 /
! Solar Zenith Angle 35.0 Albedo  0.3855194E+00
      data (ref_adm( 1,iz, 1, 8),iz = 1,20) / &
     & 0.3609400E+00, 0.3609400E+00, 0.3704800E+00, 0.3600500E+00, &
     & 0.3742000E+00, 0.3423300E+00, 0.3332700E+00, 0.3401700E+00, &
     & 0.3592200E+00, 0.3844200E+00, 0.4058600E+00, 0.4035600E+00, &
     & 0.3702400E+00, 0.3538200E+00, 0.4464000E+00, 0.4609900E+00, &
     & 0.4295500E+00, 0.4283000E+00, 0.3139100E+00, 0.3139100E+00 /
      data (ref_adm( 1,iz, 2, 8),iz = 1,20) / &
     & 0.3609400E+00, 0.3609400E+00, 0.3704800E+00, 0.3600500E+00, &
     & 0.3742000E+00, 0.3423300E+00, 0.3332700E+00, 0.3401700E+00, &
     & 0.3592200E+00, 0.3844200E+00, 0.4058600E+00, 0.4035600E+00, &
     & 0.3702400E+00, 0.3538200E+00, 0.4464000E+00, 0.4609900E+00, &
     & 0.4295500E+00, 0.4283000E+00, 0.3139100E+00, 0.3139100E+00 /
      data (ref_adm( 1,iz, 3, 8),iz = 1,20) / &
     & 0.3772400E+00, 0.3772400E+00, 0.3713800E+00, 0.3642400E+00, &
     & 0.3559100E+00, 0.3899700E+00, 0.3170900E+00, 0.3267300E+00, &
     & 0.3502200E+00, 0.3672400E+00, 0.4208200E+00, 0.3854500E+00, &
     & 0.4172800E+00, 0.3620700E+00, 0.4447600E+00, 0.4532100E+00, &
     & 0.4367900E+00, 0.4343700E+00, 0.3457800E+00, 0.3457800E+00 /
      data (ref_adm( 1,iz, 4, 8),iz = 1,20) / &
     & 0.3909900E+00, 0.3909900E+00, 0.3183100E+00, 0.3453700E+00, &
     & 0.3688700E+00, 0.3513000E+00, 0.3510800E+00, 0.3365000E+00, &
     & 0.3443300E+00, 0.3738700E+00, 0.3824400E+00, 0.3683400E+00, &
     & 0.3856800E+00, 0.3779100E+00, 0.4322400E+00, 0.4626500E+00, &
     & 0.4439300E+00, 0.4389500E+00, 0.3341400E+00, 0.3341400E+00 /
      data (ref_adm( 1,iz, 5, 8),iz = 1,20) / &
     & 0.3875300E+00, 0.3875300E+00, 0.3620900E+00, 0.3721800E+00, &
     & 0.3638400E+00, 0.3531500E+00, 0.3580600E+00, 0.3655700E+00, &
     & 0.3559000E+00, 0.3607500E+00, 0.3391900E+00, 0.3610800E+00, &
     & 0.3948300E+00, 0.3931500E+00, 0.4271200E+00, 0.4749500E+00, &
     & 0.4670200E+00, 0.4464800E+00, 0.3719500E+00, 0.3719500E+00 /
      data (ref_adm( 1,iz, 6, 8),iz = 1,20) / &
     & 0.3739300E+00, 0.3739300E+00, 0.3465900E+00, 0.3433200E+00, &
     & 0.3241200E+00, 0.3306500E+00, 0.3817300E+00, 0.3472200E+00, &
     & 0.3806500E+00, 0.3613000E+00, 0.2931800E+00, 0.3571800E+00, &
     & 0.3742600E+00, 0.4045300E+00, 0.4274700E+00, 0.4715700E+00, &
     & 0.4579300E+00, 0.4243300E+00, 0.4005700E+00, 0.4005700E+00 /
      data (ref_adm( 1,iz, 7, 8),iz = 1,20) / &
     & 0.3532900E+00, 0.3532900E+00, 0.3498500E+00, 0.3415600E+00, &
     & 0.3165300E+00, 0.3437200E+00, 0.3519700E+00, 0.3558200E+00, &
     & 0.3447200E+00, 0.3665400E+00, 0.3150000E+00, 0.3395000E+00, &
     & 0.3652100E+00, 0.3848400E+00, 0.4184100E+00, 0.4656700E+00, &
     & 0.4711200E+00, 0.4598700E+00, 0.3842100E+00, 0.3842100E+00 /
      data (ref_adm( 1,iz, 8, 8),iz = 1,20) / &
     & 0.3466900E+00, 0.3466900E+00, 0.3229200E+00, 0.3247100E+00, &
     & 0.3358800E+00, 0.3563700E+00, 0.3654300E+00, 0.3729300E+00, &
     & 0.3889600E+00, 0.3725100E+00, 0.3751100E+00, 0.3759700E+00, &
     & 0.3868600E+00, 0.4049300E+00, 0.4190800E+00, 0.4396000E+00, &
     & 0.4162500E+00, 0.3889300E+00, 0.2953600E+00, 0.2953600E+00 /
      data (ref_adm( 1,iz, 9, 8),iz = 1,20) / &
     & 0.3654100E+00, 0.3654100E+00, 0.3479600E+00, 0.3393500E+00, &
     & 0.3604100E+00, 0.3886600E+00, 0.3826400E+00, 0.3927300E+00, &
     & 0.4166100E+00, 0.3956800E+00, 0.3961300E+00, 0.3773100E+00, &
     & 0.4009100E+00, 0.4120400E+00, 0.4289600E+00, 0.4154200E+00, &
     & 0.4153800E+00, 0.3662200E+00, 0.2763300E+00, 0.2763300E+00 /
      data (ref_adm( 1,iz,10, 8),iz = 1,20) / &
     & 0.3464700E+00, 0.3464700E+00, 0.3547300E+00, 0.3665800E+00, &
     & 0.3594700E+00, 0.3422300E+00, 0.3813400E+00, 0.4136700E+00, &
     & 0.3708400E+00, 0.3705800E+00, 0.3642100E+00, 0.3521300E+00, &
     & 0.3654600E+00, 0.3673400E+00, 0.3659600E+00, 0.3560200E+00, &
     & 0.3798500E+00, 0.4022300E+00, 0.3654000E+00, 0.3654000E+00 /
      data (ref_adm( 1,iz,11, 8),iz = 1,20) / &
     & 0.3889300E+00, 0.3889300E+00, 0.3870400E+00, 0.3885300E+00, &
     & 0.3734800E+00, 0.3818400E+00, 0.4156500E+00, 0.3770800E+00, &
     & 0.3640100E+00, 0.3522300E+00, 0.3290600E+00, 0.3423600E+00, &
     & 0.3403500E+00, 0.3769900E+00, 0.4226000E+00, 0.4641200E+00, &
     & 0.4483200E+00, 0.3510400E+00, 0.3358400E+00, 0.3358400E+00 /
      data (ref_adm( 1,iz,12, 8),iz = 1,20) / &
     & 0.3861000E+00, 0.3861000E+00, 0.3785300E+00, 0.3737800E+00, &
     & 0.3843300E+00, 0.3822500E+00, 0.3809300E+00, 0.3847900E+00, &
     & 0.3897000E+00, 0.3791000E+00, 0.3462000E+00, 0.3347500E+00, &
     & 0.3508300E+00, 0.3554000E+00, 0.4211000E+00, 0.4489900E+00, &
     & 0.4476100E+00, 0.3624600E+00, 0.2523200E+00, 0.2523200E+00 /
      data (ref_adm( 1,iz,13, 8),iz = 1,20) / &
     & 0.3695600E+00, 0.3695600E+00, 0.3559900E+00, 0.3389100E+00, &
     & 0.3506800E+00, 0.3638900E+00, 0.3794600E+00, 0.3958400E+00, &
     & 0.4014800E+00, 0.4078200E+00, 0.4021900E+00, 0.4134300E+00, &
     & 0.4102400E+00, 0.3839000E+00, 0.3990900E+00, 0.4579900E+00, &
     & 0.4037900E+00, 0.3300600E+00, 0.2733700E+00, 0.2733700E+00 /
      data (ref_adm( 1,iz,14, 8),iz = 1,20) / &
     & 0.3576200E+00, 0.3576200E+00, 0.3640500E+00, 0.3480100E+00, &
     & 0.3433600E+00, 0.3409200E+00, 0.3541700E+00, 0.3506100E+00, &
     & 0.3297500E+00, 0.3124400E+00, 0.3298200E+00, 0.3976800E+00, &
     & 0.4271100E+00, 0.4301400E+00, 0.3695100E+00, 0.4436800E+00, &
     & 0.3446600E+00, 0.3558200E+00, 0.2660900E+00, 0.2660900E+00 /
      data (ref_adm( 1,iz,15, 8),iz = 1,20) / &
     & 0.3763000E+00, 0.3763000E+00, 0.4258900E+00, 0.3399800E+00, &
     & 0.3536200E+00, 0.3797700E+00, 0.3895000E+00, 0.3931500E+00, &
     & 0.3654400E+00, 0.3376200E+00, 0.3366100E+00, 0.3262500E+00, &
     & 0.3334700E+00, 0.3773800E+00, 0.3821500E+00, 0.4147300E+00, &
     & 0.3663300E+00, 0.3493000E+00, 0.1774500E+00, 0.1774500E+00 /
      data (ref_adm( 1,iz,16, 8),iz = 1,20) / &
     & 0.3766200E+00, 0.3766200E+00, 0.3638300E+00, 0.3896500E+00, &
     & 0.3866800E+00, 0.4033400E+00, 0.3728100E+00, 0.3779200E+00, &
     & 0.3569100E+00, 0.3016200E+00, 0.3459100E+00, 0.3565800E+00, &
     & 0.3532700E+00, 0.3654700E+00, 0.3697400E+00, 0.3956600E+00, &
     & 0.3906300E+00, 0.3243300E+00, 0.3253400E+00, 0.3253400E+00 /
      data (ref_adm( 1,iz,17, 8),iz = 1,20) / &
     & 0.3738100E+00, 0.3738100E+00, 0.3716300E+00, 0.3678700E+00, &
     & 0.3884700E+00, 0.4092400E+00, 0.4016500E+00, 0.3841200E+00, &
     & 0.3609300E+00, 0.3351100E+00, 0.3536100E+00, 0.3425100E+00, &
     & 0.3501400E+00, 0.3762200E+00, 0.3226400E+00, 0.3261500E+00, &
     & 0.3556800E+00, 0.3331100E+00, 0.3081100E+00, 0.3081100E+00 /
      data (ref_adm( 1,iz,18, 8),iz = 1,20) / &
     & 0.3342900E+00, 0.3342900E+00, 0.3647200E+00, 0.3800600E+00, &
     & 0.3579600E+00, 0.3647600E+00, 0.4054500E+00, 0.3679000E+00, &
     & 0.3829700E+00, 0.3590100E+00, 0.3426500E+00, 0.3324500E+00, &
     & 0.3408200E+00, 0.3787400E+00, 0.3441300E+00, 0.3228800E+00, &
     & 0.3645300E+00, 0.3140800E+00, 0.2930400E+00, 0.2930400E+00 /
      data (ref_adm( 1,iz,19, 8),iz = 1,20) / &
     & 0.3766100E+00, 0.3766100E+00, 0.3761600E+00, 0.3459100E+00, &
     & 0.3779000E+00, 0.4257800E+00, 0.4254900E+00, 0.4157000E+00, &
     & 0.4196100E+00, 0.3739600E+00, 0.3537600E+00, 0.3611300E+00, &
     & 0.3278300E+00, 0.3957200E+00, 0.3618000E+00, 0.3494000E+00, &
     & 0.3599400E+00, 0.2389100E+00, 0.2172200E+00, 0.2172200E+00 /
      data (ref_adm( 1,iz,20, 8),iz = 1,20) / &
     & 0.3837400E+00, 0.3837400E+00, 0.4016000E+00, 0.3730200E+00, &
     & 0.3790600E+00, 0.4183100E+00, 0.4130700E+00, 0.4319900E+00, &
     & 0.4416200E+00, 0.3902100E+00, 0.3345200E+00, 0.3519200E+00, &
     & 0.3406600E+00, 0.3548400E+00, 0.3969600E+00, 0.3305300E+00, &
     & 0.3162200E+00, 0.2685100E+00, 0.2710778E+00, 0.2710778E+00 /
      data (ref_adm( 1,iz,21, 8),iz = 1,20) / &
     & 0.3938900E+00, 0.3938900E+00, 0.3973300E+00, 0.3809200E+00, &
     & 0.3636700E+00, 0.4009700E+00, 0.4179000E+00, 0.4164500E+00, &
     & 0.4328000E+00, 0.4256400E+00, 0.3746800E+00, 0.3388600E+00, &
     & 0.3584800E+00, 0.3358700E+00, 0.3762100E+00, 0.3437700E+00, &
     & 0.2919800E+00, 0.1865700E+00, 0.2708163E+00, 0.2708163E+00 /
      data (ref_adm( 1,iz,22, 8),iz = 1,20) / &
     & 0.3741000E+00, 0.3741000E+00, 0.3940000E+00, 0.3634500E+00, &
     & 0.3714200E+00, 0.3980200E+00, 0.4034200E+00, 0.4109700E+00, &
     & 0.4188600E+00, 0.4175600E+00, 0.3902000E+00, 0.3421400E+00, &
     & 0.3460600E+00, 0.3297500E+00, 0.3515700E+00, 0.3804100E+00, &
     & 0.3190600E+00, 0.3031659E+00, 0.2675766E+00, 0.2675766E+00 /
      data (ref_adm( 1,iz,23, 8),iz = 1,20) / &
     & 0.3791100E+00, 0.3791100E+00, 0.3983100E+00, 0.3656900E+00, &
     & 0.4140500E+00, 0.3996400E+00, 0.3967700E+00, 0.4293800E+00, &
     & 0.4241500E+00, 0.3960500E+00, 0.4060800E+00, 0.3597100E+00, &
     & 0.3633200E+00, 0.3349500E+00, 0.3620200E+00, 0.3698000E+00, &
     & 0.3708300E+00, 0.3027696E+00, 0.2679524E+00, 0.2679524E+00 /
      data (ref_adm( 1,iz,24, 8),iz = 1,20) / &
     & 0.3733200E+00, 0.3733200E+00, 0.3768100E+00, 0.4118200E+00, &
     & 0.3968200E+00, 0.3911500E+00, 0.3959500E+00, 0.4501900E+00, &
     & 0.4507100E+00, 0.4480900E+00, 0.4453000E+00, 0.3783400E+00, &
     & 0.3761700E+00, 0.3591500E+00, 0.3826300E+00, 0.4186200E+00, &
     & 0.3741500E+00, 0.2979000E+00, 0.2687230E+00, 0.2687230E+00 /
      data (ref_adm( 1,iz,25, 8),iz = 1,20) / &
     & 0.3703900E+00, 0.3703900E+00, 0.4059400E+00, 0.4199700E+00, &
     & 0.4019300E+00, 0.3588600E+00, 0.3827400E+00, 0.4203000E+00, &
     & 0.4538400E+00, 0.4242600E+00, 0.4027900E+00, 0.3762200E+00, &
     & 0.3957500E+00, 0.4155100E+00, 0.4230800E+00, 0.4060300E+00, &
     & 0.3782400E+00, 0.3306900E+00, 0.2697634E+00, 0.2697634E+00 /
      data (ref_adm( 1,iz,26, 8),iz = 1,20) / &
     & 0.4127000E+00, 0.4127000E+00, 0.3949600E+00, 0.3591800E+00, &
     & 0.3621600E+00, 0.3741500E+00, 0.3789600E+00, 0.3899900E+00, &
     & 0.3987300E+00, 0.3957100E+00, 0.4187400E+00, 0.3972600E+00, &
     & 0.3892500E+00, 0.4323400E+00, 0.4165100E+00, 0.3700900E+00, &
     & 0.3577800E+00, 0.3415600E+00, 0.2925000E+00, 0.2925000E+00 /
      data (ref_adm( 1,iz,27, 8),iz = 1,20) / &
     & 0.3699900E+00, 0.3699900E+00, 0.3675000E+00, 0.3519200E+00, &
     & 0.3553900E+00, 0.3463200E+00, 0.3541100E+00, 0.3849100E+00, &
     & 0.3962000E+00, 0.3859300E+00, 0.4235800E+00, 0.4303300E+00, &
     & 0.4067800E+00, 0.4314300E+00, 0.4158300E+00, 0.3762600E+00, &
     & 0.3596000E+00, 0.3396900E+00, 0.3081600E+00, 0.3081600E+00 /
      data (ref_adm( 1,iz,28, 8),iz = 1,20) / &
     & 0.3889900E+00, 0.3889900E+00, 0.3944500E+00, 0.3953000E+00, &
     & 0.3886600E+00, 0.3836100E+00, 0.3820500E+00, 0.3760800E+00, &
     & 0.3949600E+00, 0.3653100E+00, 0.3712100E+00, 0.3703600E+00, &
     & 0.4309300E+00, 0.4372500E+00, 0.3987500E+00, 0.3870200E+00, &
     & 0.3777700E+00, 0.3497300E+00, 0.2720200E+00, 0.2720200E+00 /
      data (ref_adm( 1,iz,29, 8),iz = 1,20) / &
     & 0.3878600E+00, 0.3878600E+00, 0.4069200E+00, 0.4031000E+00, &
     & 0.3870900E+00, 0.3850300E+00, 0.3829600E+00, 0.4019000E+00, &
     & 0.4059300E+00, 0.3870600E+00, 0.3916100E+00, 0.3638200E+00, &
     & 0.3721500E+00, 0.3969300E+00, 0.3923100E+00, 0.3721400E+00, &
     & 0.3820800E+00, 0.3396500E+00, 0.2728000E+00, 0.2728000E+00 /
      data (ref_adm( 1,iz,30, 8),iz = 1,20) / &
     & 0.3664800E+00, 0.3664800E+00, 0.3788500E+00, 0.3610800E+00, &
     & 0.3336300E+00, 0.3496600E+00, 0.3393600E+00, 0.3889000E+00, &
     & 0.4169100E+00, 0.4321400E+00, 0.4170100E+00, 0.4029900E+00, &
     & 0.4023800E+00, 0.4031200E+00, 0.4210500E+00, 0.3780000E+00, &
     & 0.3511300E+00, 0.3493200E+00, 0.2610800E+00, 0.2610800E+00 /
      data (ref_adm( 1,iz,31, 8),iz = 1,20) / &
     & 0.3638000E+00, 0.3638000E+00, 0.3476100E+00, 0.3630300E+00, &
     & 0.3524600E+00, 0.3600900E+00, 0.3556100E+00, 0.3978700E+00, &
     & 0.4066500E+00, 0.3925100E+00, 0.4165400E+00, 0.4078200E+00, &
     & 0.4116100E+00, 0.4067400E+00, 0.4526600E+00, 0.4187800E+00, &
     & 0.3874700E+00, 0.3686400E+00, 0.2604800E+00, 0.2604800E+00 /
      data (ref_adm( 1,iz,32, 8),iz = 1,20) / &
     & 0.3645100E+00, 0.3645100E+00, 0.3488400E+00, 0.3528200E+00, &
     & 0.3765600E+00, 0.4119600E+00, 0.3954100E+00, 0.3970600E+00, &
     & 0.4121700E+00, 0.3976200E+00, 0.4020900E+00, 0.3839400E+00, &
     & 0.3851700E+00, 0.3997600E+00, 0.4284800E+00, 0.3954800E+00, &
     & 0.3435500E+00, 0.3187600E+00, 0.2319600E+00, 0.2319600E+00 /
      data (ref_adm( 1,iz,33, 8),iz = 1,20) / &
     & 0.3762500E+00, 0.3762500E+00, 0.3631800E+00, 0.3596300E+00, &
     & 0.3920300E+00, 0.4054300E+00, 0.4410300E+00, 0.4259300E+00, &
     & 0.4350200E+00, 0.4390600E+00, 0.4235500E+00, 0.4134300E+00, &
     & 0.3652900E+00, 0.3683500E+00, 0.4416900E+00, 0.3741900E+00, &
     & 0.3710600E+00, 0.3316200E+00, 0.1842700E+00, 0.1842700E+00 /
      data (ref_adm( 1,iz,34, 8),iz = 1,20) / &
     & 0.3856700E+00, 0.3856700E+00, 0.3657200E+00, 0.3967600E+00, &
     & 0.4057300E+00, 0.4421100E+00, 0.4404800E+00, 0.4424100E+00, &
     & 0.4546300E+00, 0.4410800E+00, 0.4473000E+00, 0.4587900E+00, &
     & 0.4082900E+00, 0.3740200E+00, 0.4435300E+00, 0.4233800E+00, &
     & 0.3828500E+00, 0.4560300E+00, 0.2847361E+00, 0.2847361E+00 /
      data (ref_adm( 1,iz,35, 8),iz = 1,20) / &
     & 0.3891900E+00, 0.3891900E+00, 0.3948900E+00, 0.3863700E+00, &
     & 0.4259400E+00, 0.4350100E+00, 0.4413400E+00, 0.4715600E+00, &
     & 0.4751100E+00, 0.4641500E+00, 0.4743200E+00, 0.4244100E+00, &
     & 0.3838900E+00, 0.3871900E+00, 0.4096300E+00, 0.3835600E+00, &
     & 0.3681200E+00, 0.2757700E+00, 0.2858840E+00, 0.2858840E+00 /
      data (ref_adm( 1,iz,36, 8),iz = 1,20) / &
     & 0.3894900E+00, 0.3894900E+00, 0.4025100E+00, 0.4079100E+00, &
     & 0.4267600E+00, 0.4158500E+00, 0.4387700E+00, 0.4832800E+00, &
     & 0.4951100E+00, 0.4524700E+00, 0.4702200E+00, 0.4113200E+00, &
     & 0.3735700E+00, 0.3775100E+00, 0.3722500E+00, 0.3502500E+00, &
     & 0.2705800E+00, 0.3174642E+00, 0.2866787E+00, 0.2866787E+00 /
      data (ref_adm( 1,iz,37, 8),iz = 1,20) / &
     & 0.3866800E+00, 0.3866800E+00, 0.3723700E+00, 0.3900500E+00, &
     & 0.4221200E+00, 0.4650900E+00, 0.4697500E+00, 0.4494900E+00, &
     & 0.4711900E+00, 0.4938700E+00, 0.4337300E+00, 0.4417600E+00, &
     & 0.4284300E+00, 0.3872000E+00, 0.3970600E+00, 0.4775400E+00, &
     & 0.3436719E+00, 0.3178338E+00, 0.2871230E+00, 0.2871230E+00 /
      data (ref_adm( 1,iz,38, 8),iz = 1,20) / &
     & 0.3866800E+00, 0.3866800E+00, 0.3723700E+00, 0.3900500E+00, &
     & 0.4221200E+00, 0.4650900E+00, 0.4697500E+00, 0.4494900E+00, &
     & 0.4711900E+00, 0.4938700E+00, 0.4337300E+00, 0.4417600E+00, &
     & 0.4284300E+00, 0.3872000E+00, 0.3970600E+00, 0.4775400E+00, &
     & 0.3436719E+00, 0.3178338E+00, 0.2871230E+00, 0.2871230E+00 /
! Solar Zenith Angle 40.0 Albedo  0.3962275E+00
      data (ref_adm( 1,iz, 1, 9),iz = 1,20) / &
     & 0.3616600E+00, 0.3616600E+00, 0.3515800E+00, 0.3727400E+00, &
     & 0.3819900E+00, 0.3510700E+00, 0.3638900E+00, 0.4135800E+00, &
     & 0.4053700E+00, 0.4182000E+00, 0.4317600E+00, 0.4550600E+00, &
     & 0.4573500E+00, 0.5098900E+00, 0.4961400E+00, 0.4504300E+00, &
     & 0.4458600E+00, 0.4182000E+00, 0.3674800E+00, 0.3674800E+00 /
      data (ref_adm( 1,iz, 2, 9),iz = 1,20) / &
     & 0.3616600E+00, 0.3616600E+00, 0.3515800E+00, 0.3727400E+00, &
     & 0.3819900E+00, 0.3510700E+00, 0.3638900E+00, 0.4135800E+00, &
     & 0.4053700E+00, 0.4182000E+00, 0.4317600E+00, 0.4550600E+00, &
     & 0.4573500E+00, 0.5098900E+00, 0.4961400E+00, 0.4504300E+00, &
     & 0.4458600E+00, 0.4182000E+00, 0.3674800E+00, 0.3674800E+00 /
      data (ref_adm( 1,iz, 3, 9),iz = 1,20) / &
     & 0.3354600E+00, 0.3354600E+00, 0.3638000E+00, 0.3783700E+00, &
     & 0.3622200E+00, 0.3700400E+00, 0.3800400E+00, 0.4027100E+00, &
     & 0.4154000E+00, 0.4194900E+00, 0.4006100E+00, 0.4184000E+00, &
     & 0.4447000E+00, 0.4580500E+00, 0.4810400E+00, 0.4386500E+00, &
     & 0.4567300E+00, 0.4176300E+00, 0.4048700E+00, 0.4048700E+00 /
      data (ref_adm( 1,iz, 4, 9),iz = 1,20) / &
     & 0.3632100E+00, 0.3632100E+00, 0.3698900E+00, 0.3548800E+00, &
     & 0.3615100E+00, 0.3716500E+00, 0.3837300E+00, 0.3747500E+00, &
     & 0.4074800E+00, 0.4336300E+00, 0.4156900E+00, 0.4100000E+00, &
     & 0.4466300E+00, 0.4613800E+00, 0.4752100E+00, 0.4341100E+00, &
     & 0.4570200E+00, 0.4332900E+00, 0.4131400E+00, 0.4131400E+00 /
      data (ref_adm( 1,iz, 5, 9),iz = 1,20) / &
     & 0.3547500E+00, 0.3547500E+00, 0.3708400E+00, 0.3679100E+00, &
     & 0.3653100E+00, 0.3651100E+00, 0.3777800E+00, 0.3795900E+00, &
     & 0.3992500E+00, 0.4088800E+00, 0.4293500E+00, 0.4244600E+00, &
     & 0.4352200E+00, 0.4662800E+00, 0.4724000E+00, 0.4717000E+00, &
     & 0.4669400E+00, 0.4435200E+00, 0.4412800E+00, 0.4412800E+00 /
      data (ref_adm( 1,iz, 6, 9),iz = 1,20) / &
     & 0.3882100E+00, 0.3882100E+00, 0.3815800E+00, 0.3636900E+00, &
     & 0.3669500E+00, 0.3884800E+00, 0.3537500E+00, 0.3618600E+00, &
     & 0.3607700E+00, 0.3854500E+00, 0.4181400E+00, 0.3944400E+00, &
     & 0.4236800E+00, 0.4399500E+00, 0.4680500E+00, 0.5015600E+00, &
     & 0.5141400E+00, 0.4472000E+00, 0.3956100E+00, 0.3956100E+00 /
      data (ref_adm( 1,iz, 7, 9),iz = 1,20) / &
     & 0.3865100E+00, 0.3865100E+00, 0.3691800E+00, 0.3643200E+00, &
     & 0.3749700E+00, 0.3449600E+00, 0.3583300E+00, 0.3758200E+00, &
     & 0.3654400E+00, 0.3934600E+00, 0.4048300E+00, 0.4400400E+00, &
     & 0.4401600E+00, 0.4379100E+00, 0.4681400E+00, 0.5065800E+00, &
     & 0.4803700E+00, 0.4184900E+00, 0.3933400E+00, 0.3933400E+00 /
      data (ref_adm( 1,iz, 8, 9),iz = 1,20) / &
     & 0.3891900E+00, 0.3891900E+00, 0.3928700E+00, 0.3782800E+00, &
     & 0.3579000E+00, 0.3428800E+00, 0.3596100E+00, 0.3565700E+00, &
     & 0.3707100E+00, 0.3900500E+00, 0.3764300E+00, 0.4202100E+00, &
     & 0.4255400E+00, 0.4156300E+00, 0.4595700E+00, 0.4840100E+00, &
     & 0.5041900E+00, 0.4612100E+00, 0.3603400E+00, 0.3603400E+00 /
      data (ref_adm( 1,iz, 9, 9),iz = 1,20) / &
     & 0.3802100E+00, 0.3802100E+00, 0.3767400E+00, 0.3718700E+00, &
     & 0.3693600E+00, 0.3471500E+00, 0.3580300E+00, 0.3818700E+00, &
     & 0.3968200E+00, 0.3932400E+00, 0.4162900E+00, 0.4344500E+00, &
     & 0.4357200E+00, 0.4164200E+00, 0.4342200E+00, 0.4600100E+00, &
     & 0.4663100E+00, 0.4390200E+00, 0.3879000E+00, 0.3879000E+00 /
      data (ref_adm( 1,iz,10, 9),iz = 1,20) / &
     & 0.3890400E+00, 0.3890400E+00, 0.3736500E+00, 0.3652200E+00, &
     & 0.3842000E+00, 0.3652500E+00, 0.3857700E+00, 0.3872400E+00, &
     & 0.3713600E+00, 0.3896600E+00, 0.3868600E+00, 0.3983300E+00, &
     & 0.4107500E+00, 0.4155700E+00, 0.4046300E+00, 0.3859500E+00, &
     & 0.3997000E+00, 0.3857100E+00, 0.3577500E+00, 0.3577500E+00 /
      data (ref_adm( 1,iz,11, 9),iz = 1,20) / &
     & 0.3779300E+00, 0.3779300E+00, 0.3815700E+00, 0.3754600E+00, &
     & 0.3924400E+00, 0.3790900E+00, 0.3909700E+00, 0.3706300E+00, &
     & 0.3561800E+00, 0.3867800E+00, 0.3937900E+00, 0.3888300E+00, &
     & 0.3665000E+00, 0.4033000E+00, 0.3854900E+00, 0.3756500E+00, &
     & 0.4235300E+00, 0.3649600E+00, 0.3215400E+00, 0.3215400E+00 /
      data (ref_adm( 1,iz,12, 9),iz = 1,20) / &
     & 0.3749700E+00, 0.3749700E+00, 0.3840400E+00, 0.3786300E+00, &
     & 0.3831500E+00, 0.3879500E+00, 0.3850700E+00, 0.3880700E+00, &
     & 0.3677800E+00, 0.3819900E+00, 0.3962500E+00, 0.3674600E+00, &
     & 0.3800600E+00, 0.3852300E+00, 0.3926300E+00, 0.3979200E+00, &
     & 0.4010800E+00, 0.3587600E+00, 0.3437500E+00, 0.3437500E+00 /
      data (ref_adm( 1,iz,13, 9),iz = 1,20) / &
     & 0.4021400E+00, 0.4021400E+00, 0.4003600E+00, 0.3997400E+00, &
     & 0.4028000E+00, 0.3965100E+00, 0.4046000E+00, 0.4123600E+00, &
     & 0.4326800E+00, 0.4398100E+00, 0.4295400E+00, 0.4210300E+00, &
     & 0.3843000E+00, 0.3662500E+00, 0.4072200E+00, 0.3870400E+00, &
     & 0.3637500E+00, 0.3332700E+00, 0.3113600E+00, 0.3113600E+00 /
      data (ref_adm( 1,iz,14, 9),iz = 1,20) / &
     & 0.3399500E+00, 0.3399500E+00, 0.3190300E+00, 0.3253600E+00, &
     & 0.3281000E+00, 0.3201000E+00, 0.3286500E+00, 0.3351700E+00, &
     & 0.3579500E+00, 0.3863300E+00, 0.3979200E+00, 0.4097500E+00, &
     & 0.4134200E+00, 0.4174500E+00, 0.3692800E+00, 0.3729000E+00, &
     & 0.3926400E+00, 0.3319300E+00, 0.2614200E+00, 0.2614200E+00 /
      data (ref_adm( 1,iz,15, 9),iz = 1,20) / &
     & 0.3437800E+00, 0.3437800E+00, 0.3810200E+00, 0.3587500E+00, &
     & 0.3586400E+00, 0.3630500E+00, 0.3439200E+00, 0.3290000E+00, &
     & 0.3265500E+00, 0.3197200E+00, 0.3244200E+00, 0.3474300E+00, &
     & 0.3542700E+00, 0.3786600E+00, 0.3830100E+00, 0.3346600E+00, &
     & 0.3806200E+00, 0.3517600E+00, 0.2863200E+00, 0.2863200E+00 /
      data (ref_adm( 1,iz,16, 9),iz = 1,20) / &
     & 0.3593700E+00, 0.3593700E+00, 0.3326700E+00, 0.3199100E+00, &
     & 0.3557100E+00, 0.3887000E+00, 0.3644200E+00, 0.3748600E+00, &
     & 0.3975200E+00, 0.3737800E+00, 0.3460000E+00, 0.3643500E+00, &
     & 0.3393300E+00, 0.3368100E+00, 0.3694900E+00, 0.3445400E+00, &
     & 0.3371900E+00, 0.3518100E+00, 0.2509600E+00, 0.2509600E+00 /
      data (ref_adm( 1,iz,17, 9),iz = 1,20) / &
     & 0.3243200E+00, 0.3243200E+00, 0.3150100E+00, 0.3390300E+00, &
     & 0.3499700E+00, 0.3780300E+00, 0.3828400E+00, 0.3949900E+00, &
     & 0.3962400E+00, 0.3940600E+00, 0.3381900E+00, 0.3573600E+00, &
     & 0.3581400E+00, 0.3592000E+00, 0.3819100E+00, 0.3721000E+00, &
     & 0.3556200E+00, 0.3077500E+00, 0.2546400E+00, 0.2546400E+00 /
      data (ref_adm( 1,iz,18, 9),iz = 1,20) / &
     & 0.3478300E+00, 0.3478300E+00, 0.3798200E+00, 0.3804300E+00, &
     & 0.3803200E+00, 0.3891200E+00, 0.4024300E+00, 0.4063000E+00, &
     & 0.4111800E+00, 0.4077900E+00, 0.3783200E+00, 0.3605600E+00, &
     & 0.3628700E+00, 0.3553400E+00, 0.3894000E+00, 0.3636400E+00, &
     & 0.3575100E+00, 0.3689500E+00, 0.2462900E+00, 0.2462900E+00 /
      data (ref_adm( 1,iz,19, 9),iz = 1,20) / &
     & 0.3611300E+00, 0.3611300E+00, 0.3780000E+00, 0.3827100E+00, &
     & 0.3994200E+00, 0.3870400E+00, 0.3802200E+00, 0.3907400E+00, &
     & 0.4225900E+00, 0.3870500E+00, 0.3822300E+00, 0.4068300E+00, &
     & 0.4181900E+00, 0.3501700E+00, 0.3888900E+00, 0.3342300E+00, &
     & 0.3455600E+00, 0.3072200E+00, 0.2965006E+00, 0.2965006E+00 /
      data (ref_adm( 1,iz,20, 9),iz = 1,20) / &
     & 0.3665400E+00, 0.3665400E+00, 0.3325900E+00, 0.3501900E+00, &
     & 0.3700500E+00, 0.3969900E+00, 0.3919200E+00, 0.3942300E+00, &
     & 0.4035200E+00, 0.3967600E+00, 0.3813500E+00, 0.3697100E+00, &
     & 0.4099400E+00, 0.3959900E+00, 0.3910700E+00, 0.2844800E+00, &
     & 0.2706300E+00, 0.2838900E+00, 0.2951938E+00, 0.2951938E+00 /
      data (ref_adm( 1,iz,21, 9),iz = 1,20) / &
     & 0.3406200E+00, 0.3406200E+00, 0.3476600E+00, 0.3563300E+00, &
     & 0.3351600E+00, 0.3758300E+00, 0.3886600E+00, 0.4035200E+00, &
     & 0.4098500E+00, 0.4240100E+00, 0.4024700E+00, 0.4092500E+00, &
     & 0.4134300E+00, 0.3835100E+00, 0.3630100E+00, 0.3486400E+00, &
     & 0.3720800E+00, 0.3287778E+00, 0.2950210E+00, 0.2950210E+00 /
      data (ref_adm( 1,iz,22, 9),iz = 1,20) / &
     & 0.3576400E+00, 0.3576400E+00, 0.3845800E+00, 0.3838700E+00, &
     & 0.3807500E+00, 0.3710900E+00, 0.3783500E+00, 0.3719600E+00, &
     & 0.3886500E+00, 0.4446300E+00, 0.4077200E+00, 0.4342300E+00, &
     & 0.4355500E+00, 0.3835800E+00, 0.3658000E+00, 0.3909900E+00, &
     & 0.3687500E+00, 0.3714132E+00, 0.3097291E+00, 0.3097291E+00 /
      data (ref_adm( 1,iz,23, 9),iz = 1,20) / &
     & 0.3726500E+00, 0.3726500E+00, 0.3729400E+00, 0.3769700E+00, &
     & 0.3933400E+00, 0.3822600E+00, 0.3671300E+00, 0.3717000E+00, &
     & 0.3849400E+00, 0.4259800E+00, 0.4493200E+00, 0.4404300E+00, &
     & 0.4071300E+00, 0.3941100E+00, 0.3865900E+00, 0.3773200E+00, &
     & 0.3711600E+00, 0.3684862E+00, 0.3082346E+00, 0.3082346E+00 /
      data (ref_adm( 1,iz,24, 9),iz = 1,20) / &
     & 0.3710800E+00, 0.3710800E+00, 0.3784300E+00, 0.3785000E+00, &
     & 0.3885200E+00, 0.3951700E+00, 0.3896100E+00, 0.3825500E+00, &
     & 0.3930300E+00, 0.4087200E+00, 0.4339400E+00, 0.3915300E+00, &
     & 0.3851300E+00, 0.3780400E+00, 0.3723800E+00, 0.3714900E+00, &
     & 0.3676900E+00, 0.3655105E+00, 0.3069801E+00, 0.3069801E+00 /
      data (ref_adm( 1,iz,25, 9),iz = 1,20) / &
     & 0.3542400E+00, 0.3542400E+00, 0.3499700E+00, 0.3754800E+00, &
     & 0.3704500E+00, 0.3936400E+00, 0.3958500E+00, 0.3845700E+00, &
     & 0.4007200E+00, 0.4010400E+00, 0.4103300E+00, 0.4106600E+00, &
     & 0.4012300E+00, 0.3884200E+00, 0.3971200E+00, 0.4060400E+00, &
     & 0.3946600E+00, 0.3721600E+00, 0.3060733E+00, 0.3060733E+00 /
      data (ref_adm( 1,iz,26, 9),iz = 1,20) / &
     & 0.3285700E+00, 0.3285700E+00, 0.3391500E+00, 0.3453700E+00, &
     & 0.3564400E+00, 0.3510000E+00, 0.3529500E+00, 0.3476100E+00, &
     & 0.3610100E+00, 0.3759500E+00, 0.4013600E+00, 0.4448800E+00, &
     & 0.4013800E+00, 0.3983900E+00, 0.4185100E+00, 0.4228300E+00, &
     & 0.3979500E+00, 0.3613000E+00, 0.3034700E+00, 0.3034700E+00 /
      data (ref_adm( 1,iz,27, 9),iz = 1,20) / &
     & 0.3616500E+00, 0.3616500E+00, 0.3924400E+00, 0.3922000E+00, &
     & 0.3963600E+00, 0.4049600E+00, 0.3855300E+00, 0.3693700E+00, &
     & 0.3554800E+00, 0.3603900E+00, 0.3683300E+00, 0.3806100E+00, &
     & 0.3862200E+00, 0.4140100E+00, 0.4460500E+00, 0.4300900E+00, &
     & 0.3969600E+00, 0.3657100E+00, 0.2959500E+00, 0.2959500E+00 /
      data (ref_adm( 1,iz,28, 9),iz = 1,20) / &
     & 0.3884100E+00, 0.3884100E+00, 0.3994000E+00, 0.3978100E+00, &
     & 0.4086700E+00, 0.4196100E+00, 0.4236900E+00, 0.4251700E+00, &
     & 0.4239900E+00, 0.4210500E+00, 0.4184400E+00, 0.3993900E+00, &
     & 0.3953400E+00, 0.3944900E+00, 0.4417600E+00, 0.4213100E+00, &
     & 0.3907700E+00, 0.3794600E+00, 0.3242900E+00, 0.3242900E+00 /
      data (ref_adm( 1,iz,29, 9),iz = 1,20) / &
     & 0.3708900E+00, 0.3708900E+00, 0.3751700E+00, 0.3713900E+00, &
     & 0.3670800E+00, 0.3819700E+00, 0.3784700E+00, 0.3783900E+00, &
     & 0.3964500E+00, 0.4025600E+00, 0.4062500E+00, 0.3993800E+00, &
     & 0.4092000E+00, 0.4034400E+00, 0.4412300E+00, 0.4295800E+00, &
     & 0.3964900E+00, 0.3566400E+00, 0.2985500E+00, 0.2985500E+00 /
      data (ref_adm( 1,iz,30, 9),iz = 1,20) / &
     & 0.3944300E+00, 0.3944300E+00, 0.3898500E+00, 0.3752000E+00, &
     & 0.3713100E+00, 0.3870800E+00, 0.3973900E+00, 0.4203400E+00, &
     & 0.4181500E+00, 0.4103800E+00, 0.4279400E+00, 0.4221600E+00, &
     & 0.4239300E+00, 0.4292000E+00, 0.4225400E+00, 0.3904500E+00, &
     & 0.3837300E+00, 0.3704100E+00, 0.3010700E+00, 0.3010700E+00 /
      data (ref_adm( 1,iz,31, 9),iz = 1,20) / &
     & 0.3675300E+00, 0.3675300E+00, 0.3819300E+00, 0.3826900E+00, &
     & 0.3910500E+00, 0.4119400E+00, 0.4136600E+00, 0.4177100E+00, &
     & 0.4229900E+00, 0.4128500E+00, 0.4217000E+00, 0.3954300E+00, &
     & 0.4166500E+00, 0.3935900E+00, 0.4250200E+00, 0.4171400E+00, &
     & 0.4134900E+00, 0.3819700E+00, 0.3142500E+00, 0.3142500E+00 /
      data (ref_adm( 1,iz,32, 9),iz = 1,20) / &
     & 0.3940800E+00, 0.3940800E+00, 0.3473700E+00, 0.3673500E+00, &
     & 0.3820600E+00, 0.3830100E+00, 0.3867600E+00, 0.4070500E+00, &
     & 0.4141700E+00, 0.4120300E+00, 0.3811100E+00, 0.3901900E+00, &
     & 0.4022800E+00, 0.3903000E+00, 0.3946900E+00, 0.4097900E+00, &
     & 0.3746600E+00, 0.3216200E+00, 0.2422400E+00, 0.2422400E+00 /
      data (ref_adm( 1,iz,33, 9),iz = 1,20) / &
     & 0.3710700E+00, 0.3710700E+00, 0.3828600E+00, 0.3768700E+00, &
     & 0.3747100E+00, 0.3650100E+00, 0.3929100E+00, 0.4427400E+00, &
     & 0.4502900E+00, 0.4370300E+00, 0.3988400E+00, 0.4073700E+00, &
     & 0.4442100E+00, 0.4061800E+00, 0.4188900E+00, 0.4089600E+00, &
     & 0.3907700E+00, 0.3572100E+00, 0.2925500E+00, 0.2925500E+00 /
      data (ref_adm( 1,iz,34, 9),iz = 1,20) / &
     & 0.3705900E+00, 0.3705900E+00, 0.3676200E+00, 0.3948000E+00, &
     & 0.3914800E+00, 0.3864400E+00, 0.3863400E+00, 0.4210100E+00, &
     & 0.4576800E+00, 0.4296300E+00, 0.4059500E+00, 0.4246000E+00, &
     & 0.4400300E+00, 0.4013800E+00, 0.3984500E+00, 0.3935000E+00, &
     & 0.3911400E+00, 0.3670500E+00, 0.3146100E+00, 0.3146100E+00 /
      data (ref_adm( 1,iz,35, 9),iz = 1,20) / &
     & 0.3525500E+00, 0.3525500E+00, 0.3569300E+00, 0.3673400E+00, &
     & 0.3866000E+00, 0.3978500E+00, 0.3989000E+00, 0.4063400E+00, &
     & 0.4544000E+00, 0.4533200E+00, 0.4657000E+00, 0.4682900E+00, &
     & 0.4480400E+00, 0.4057800E+00, 0.4055900E+00, 0.3959300E+00, &
     & 0.3908200E+00, 0.3629600E+00, 0.3037765E+00, 0.3037765E+00 /
      data (ref_adm( 1,iz,36, 9),iz = 1,20) / &
     & 0.3535400E+00, 0.3535400E+00, 0.3559100E+00, 0.3728700E+00, &
     & 0.3870400E+00, 0.3981900E+00, 0.4208100E+00, 0.4336200E+00, &
     & 0.4609100E+00, 0.4679600E+00, 0.4886100E+00, 0.4566600E+00, &
     & 0.4298200E+00, 0.4203300E+00, 0.4051400E+00, 0.3978600E+00, &
     & 0.3896000E+00, 0.3758500E+00, 0.3039172E+00, 0.3039172E+00 /
      data (ref_adm( 1,iz,37, 9),iz = 1,20) / &
     & 0.3737600E+00, 0.3737600E+00, 0.3530700E+00, 0.3473700E+00, &
     & 0.3827700E+00, 0.4212300E+00, 0.4124400E+00, 0.4029400E+00, &
     & 0.4337700E+00, 0.4664800E+00, 0.4915100E+00, 0.4663100E+00, &
     & 0.4387000E+00, 0.4409500E+00, 0.4196800E+00, 0.4180200E+00, &
     & 0.4214400E+00, 0.3509098E+00, 0.3039476E+00, 0.3039476E+00 /
      data (ref_adm( 1,iz,38, 9),iz = 1,20) / &
     & 0.3737600E+00, 0.3737600E+00, 0.3530700E+00, 0.3473700E+00, &
     & 0.3827700E+00, 0.4212300E+00, 0.4124400E+00, 0.4029400E+00, &
     & 0.4337700E+00, 0.4664800E+00, 0.4915100E+00, 0.4663100E+00, &
     & 0.4387000E+00, 0.4409500E+00, 0.4196800E+00, 0.4180200E+00, &
     & 0.4214400E+00, 0.3509098E+00, 0.3039476E+00, 0.3039476E+00 /
! Solar Zenith Angle 45.0 Albedo  0.4112163E+00
      data (ref_adm( 1,iz, 1,10),iz = 1,20) / &
     & 0.3696500E+00, 0.3696500E+00, 0.3925800E+00, 0.4181000E+00, &
     & 0.4086600E+00, 0.4049900E+00, 0.3980900E+00, 0.3973700E+00, &
     & 0.4391800E+00, 0.4577400E+00, 0.4745000E+00, 0.4708100E+00, &
     & 0.4965900E+00, 0.5181800E+00, 0.5195100E+00, 0.5471000E+00, &
     & 0.5645100E+00, 0.5503800E+00, 0.4227000E+00, 0.4227000E+00 /
      data (ref_adm( 1,iz, 2,10),iz = 1,20) / &
     & 0.3696500E+00, 0.3696500E+00, 0.3925800E+00, 0.4181000E+00, &
     & 0.4086600E+00, 0.4049900E+00, 0.3980900E+00, 0.3973700E+00, &
     & 0.4391800E+00, 0.4577400E+00, 0.4745000E+00, 0.4708100E+00, &
     & 0.4965900E+00, 0.5181800E+00, 0.5195100E+00, 0.5471000E+00, &
     & 0.5645100E+00, 0.5503800E+00, 0.4227000E+00, 0.4227000E+00 /
      data (ref_adm( 1,iz, 3,10),iz = 1,20) / &
     & 0.3866200E+00, 0.3866200E+00, 0.3992300E+00, 0.3998200E+00, &
     & 0.4106800E+00, 0.4010800E+00, 0.4124100E+00, 0.4443600E+00, &
     & 0.4347700E+00, 0.4342500E+00, 0.4556500E+00, 0.4703500E+00, &
     & 0.4678500E+00, 0.4890600E+00, 0.5061500E+00, 0.5329800E+00, &
     & 0.5478100E+00, 0.5289500E+00, 0.4641200E+00, 0.4641200E+00 /
      data (ref_adm( 1,iz, 4,10),iz = 1,20) / &
     & 0.4051400E+00, 0.4051400E+00, 0.3969800E+00, 0.3856300E+00, &
     & 0.3900100E+00, 0.4166400E+00, 0.4194900E+00, 0.4256800E+00, &
     & 0.4294800E+00, 0.4222600E+00, 0.4622300E+00, 0.4724600E+00, &
     & 0.4543100E+00, 0.4969100E+00, 0.5041000E+00, 0.5267400E+00, &
     & 0.5285500E+00, 0.5339700E+00, 0.4548400E+00, 0.4548400E+00 /
      data (ref_adm( 1,iz, 5,10),iz = 1,20) / &
     & 0.4001800E+00, 0.4001800E+00, 0.3954200E+00, 0.3723800E+00, &
     & 0.3833600E+00, 0.4159700E+00, 0.4403800E+00, 0.4301600E+00, &
     & 0.4136800E+00, 0.4314400E+00, 0.4599300E+00, 0.4596600E+00, &
     & 0.4703600E+00, 0.4844900E+00, 0.5048400E+00, 0.5211700E+00, &
     & 0.5239100E+00, 0.5208900E+00, 0.4397100E+00, 0.4397100E+00 /
      data (ref_adm( 1,iz, 6,10),iz = 1,20) / &
     & 0.3821300E+00, 0.3821300E+00, 0.3853800E+00, 0.3872600E+00, &
     & 0.3907100E+00, 0.3988900E+00, 0.4118700E+00, 0.4127400E+00, &
     & 0.4216100E+00, 0.4412200E+00, 0.4564900E+00, 0.4841200E+00, &
     & 0.4964200E+00, 0.5006700E+00, 0.5059800E+00, 0.5112100E+00, &
     & 0.5275700E+00, 0.5018600E+00, 0.4333200E+00, 0.4333200E+00 /
      data (ref_adm( 1,iz, 7,10),iz = 1,20) / &
     & 0.3719400E+00, 0.3719400E+00, 0.3747200E+00, 0.3855300E+00, &
     & 0.3892000E+00, 0.3786500E+00, 0.3798700E+00, 0.3839200E+00, &
     & 0.3799200E+00, 0.4074200E+00, 0.4121700E+00, 0.4201200E+00, &
     & 0.4360200E+00, 0.4507700E+00, 0.4553400E+00, 0.4426300E+00, &
     & 0.4630000E+00, 0.4429700E+00, 0.3733200E+00, 0.3733200E+00 /
      data (ref_adm( 1,iz, 8,10),iz = 1,20) / &
     & 0.3717100E+00, 0.3717100E+00, 0.3946800E+00, 0.4081800E+00, &
     & 0.3982300E+00, 0.4069700E+00, 0.3936200E+00, 0.3895000E+00, &
     & 0.4133900E+00, 0.4455300E+00, 0.4464200E+00, 0.4446900E+00, &
     & 0.4682300E+00, 0.4760000E+00, 0.4919000E+00, 0.5036100E+00, &
     & 0.5101400E+00, 0.4810200E+00, 0.4439600E+00, 0.4439600E+00 /
      data (ref_adm( 1,iz, 9,10),iz = 1,20) / &
     & 0.3921000E+00, 0.3921000E+00, 0.3992800E+00, 0.3947600E+00, &
     & 0.3860000E+00, 0.3772400E+00, 0.3748800E+00, 0.3658300E+00, &
     & 0.3776600E+00, 0.4095000E+00, 0.4148900E+00, 0.4180500E+00, &
     & 0.4311100E+00, 0.4476100E+00, 0.4663600E+00, 0.4563600E+00, &
     & 0.4942600E+00, 0.4729800E+00, 0.4130200E+00, 0.4130200E+00 /
      data (ref_adm( 1,iz,10,10),iz = 1,20) / &
     & 0.3897000E+00, 0.3897000E+00, 0.3851900E+00, 0.3875200E+00, &
     & 0.3623400E+00, 0.3752700E+00, 0.3579000E+00, 0.3687400E+00, &
     & 0.3798800E+00, 0.4049900E+00, 0.4246800E+00, 0.4203500E+00, &
     & 0.4204700E+00, 0.4315400E+00, 0.4638400E+00, 0.4178400E+00, &
     & 0.4534100E+00, 0.4513600E+00, 0.3626800E+00, 0.3626800E+00 /
      data (ref_adm( 1,iz,11,10),iz = 1,20) / &
     & 0.3824600E+00, 0.3824600E+00, 0.3665300E+00, 0.3741400E+00, &
     & 0.3725900E+00, 0.3659800E+00, 0.3742700E+00, 0.3869900E+00, &
     & 0.3872000E+00, 0.3938900E+00, 0.4010200E+00, 0.4104500E+00, &
     & 0.4378300E+00, 0.4378200E+00, 0.4457300E+00, 0.4320900E+00, &
     & 0.4266200E+00, 0.4190100E+00, 0.3242000E+00, 0.3242000E+00 /
      data (ref_adm( 1,iz,12,10),iz = 1,20) / &
     & 0.3734300E+00, 0.3734300E+00, 0.3772800E+00, 0.3792800E+00, &
     & 0.3852100E+00, 0.3870900E+00, 0.3890000E+00, 0.3918300E+00, &
     & 0.3948100E+00, 0.4012600E+00, 0.4062100E+00, 0.3903500E+00, &
     & 0.4173000E+00, 0.4384400E+00, 0.4474800E+00, 0.4177100E+00, &
     & 0.4326600E+00, 0.4037300E+00, 0.3247200E+00, 0.3247200E+00 /
      data (ref_adm( 1,iz,13,10),iz = 1,20) / &
     & 0.4035300E+00, 0.4035300E+00, 0.4104600E+00, 0.4158900E+00, &
     & 0.4152600E+00, 0.4136600E+00, 0.4128000E+00, 0.4105400E+00, &
     & 0.4125800E+00, 0.4179400E+00, 0.4189400E+00, 0.4052200E+00, &
     & 0.4010000E+00, 0.4338800E+00, 0.4201800E+00, 0.4197200E+00, &
     & 0.4078100E+00, 0.3991200E+00, 0.3317100E+00, 0.3317100E+00 /
      data (ref_adm( 1,iz,14,10),iz = 1,20) / &
     & 0.3982700E+00, 0.3982700E+00, 0.3659700E+00, 0.3572000E+00, &
     & 0.3755300E+00, 0.3881900E+00, 0.4096700E+00, 0.4212500E+00, &
     & 0.4254900E+00, 0.4297000E+00, 0.4341100E+00, 0.4388600E+00, &
     & 0.4353600E+00, 0.4497500E+00, 0.4203100E+00, 0.4111700E+00, &
     & 0.4003600E+00, 0.3732500E+00, 0.3488900E+00, 0.3488900E+00 /
      data (ref_adm( 1,iz,15,10),iz = 1,20) / &
     & 0.3477100E+00, 0.3477100E+00, 0.3307400E+00, 0.3313000E+00, &
     & 0.3296000E+00, 0.3281600E+00, 0.3264100E+00, 0.3248800E+00, &
     & 0.3333000E+00, 0.3318600E+00, 0.3538600E+00, 0.3885000E+00, &
     & 0.4244100E+00, 0.4445500E+00, 0.4219900E+00, 0.4021500E+00, &
     & 0.4096200E+00, 0.3530800E+00, 0.2951900E+00, 0.2951900E+00 /
      data (ref_adm( 1,iz,16,10),iz = 1,20) / &
     & 0.3736600E+00, 0.3736600E+00, 0.3952500E+00, 0.3770200E+00, &
     & 0.3713300E+00, 0.3794700E+00, 0.3989800E+00, 0.4078400E+00, &
     & 0.3857500E+00, 0.3706600E+00, 0.3729300E+00, 0.3642600E+00, &
     & 0.3408900E+00, 0.3418300E+00, 0.4045700E+00, 0.3743600E+00, &
     & 0.4042700E+00, 0.3459500E+00, 0.2701500E+00, 0.2701500E+00 /
      data (ref_adm( 1,iz,17,10),iz = 1,20) / &
     & 0.3818900E+00, 0.3818900E+00, 0.3915400E+00, 0.3836600E+00, &
     & 0.3649000E+00, 0.3798600E+00, 0.3869200E+00, 0.3937300E+00, &
     & 0.3754900E+00, 0.3812200E+00, 0.3799200E+00, 0.3794400E+00, &
     & 0.3906800E+00, 0.3939100E+00, 0.3851200E+00, 0.3441300E+00, &
     & 0.3726800E+00, 0.3553000E+00, 0.3218000E+00, 0.3218000E+00 /
      data (ref_adm( 1,iz,18,10),iz = 1,20) / &
     & 0.3747100E+00, 0.3747100E+00, 0.3624100E+00, 0.3735400E+00, &
     & 0.3878000E+00, 0.3957200E+00, 0.3953400E+00, 0.3839900E+00, &
     & 0.3839800E+00, 0.3880900E+00, 0.3915400E+00, 0.3945700E+00, &
     & 0.3781600E+00, 0.3834000E+00, 0.3705900E+00, 0.3405700E+00, &
     & 0.3615100E+00, 0.3724400E+00, 0.3032525E+00, 0.3032525E+00 /
      data (ref_adm( 1,iz,19,10),iz = 1,20) / &
     & 0.3752300E+00, 0.3752300E+00, 0.3531500E+00, 0.3555700E+00, &
     & 0.3906000E+00, 0.3805500E+00, 0.3913300E+00, 0.3959200E+00, &
     & 0.3831900E+00, 0.4040400E+00, 0.4124700E+00, 0.3944400E+00, &
     & 0.3975300E+00, 0.3850300E+00, 0.3883500E+00, 0.3650800E+00, &
     & 0.3632000E+00, 0.3958900E+00, 0.3027972E+00, 0.3027972E+00 /
      data (ref_adm( 1,iz,20,10),iz = 1,20) / &
     & 0.3413700E+00, 0.3413700E+00, 0.3435200E+00, 0.3502500E+00, &
     & 0.3483300E+00, 0.3491200E+00, 0.3545200E+00, 0.3742500E+00, &
     & 0.3744100E+00, 0.3890400E+00, 0.3991700E+00, 0.4033700E+00, &
     & 0.4010600E+00, 0.3811400E+00, 0.3802200E+00, 0.3513900E+00, &
     & 0.3801200E+00, 0.3626839E+00, 0.3023178E+00, 0.3023178E+00 /
      data (ref_adm( 1,iz,21,10),iz = 1,20) / &
     & 0.3634700E+00, 0.3634700E+00, 0.3789100E+00, 0.3699400E+00, &
     & 0.3940900E+00, 0.3810900E+00, 0.3887900E+00, 0.3901300E+00, &
     & 0.3812600E+00, 0.3835600E+00, 0.3936900E+00, 0.3929400E+00, &
     & 0.3768100E+00, 0.3781500E+00, 0.3948800E+00, 0.3974500E+00, &
     & 0.2733900E+00, 0.3617503E+00, 0.3019537E+00, 0.3019537E+00 /
      data (ref_adm( 1,iz,22,10),iz = 1,20) / &
     & 0.3830500E+00, 0.3830500E+00, 0.3892100E+00, 0.3958800E+00, &
     & 0.4033200E+00, 0.3891300E+00, 0.3913400E+00, 0.3906400E+00, &
     & 0.3904900E+00, 0.3913400E+00, 0.3930000E+00, 0.3975500E+00, &
     & 0.3888100E+00, 0.3693100E+00, 0.3896800E+00, 0.4293500E+00, &
     & 0.4107958E+00, 0.3850830E+00, 0.3228852E+00, 0.3228852E+00 /
      data (ref_adm( 1,iz,23,10),iz = 1,20) / &
     & 0.3951500E+00, 0.3951500E+00, 0.3875100E+00, 0.3878700E+00, &
     & 0.3778700E+00, 0.3758600E+00, 0.3562800E+00, 0.3771600E+00, &
     & 0.3811400E+00, 0.3922300E+00, 0.3973600E+00, 0.4103400E+00, &
     & 0.4037000E+00, 0.3909200E+00, 0.3857700E+00, 0.4061800E+00, &
     & 0.4412500E+00, 0.3814462E+00, 0.3211272E+00, 0.3211272E+00 /
      data (ref_adm( 1,iz,24,10),iz = 1,20) / &
     & 0.3937500E+00, 0.3937500E+00, 0.3852300E+00, 0.3819600E+00, &
     & 0.3757700E+00, 0.3699500E+00, 0.3827900E+00, 0.3694200E+00, &
     & 0.3741200E+00, 0.3908600E+00, 0.3957400E+00, 0.4237300E+00, &
     & 0.4218100E+00, 0.3923200E+00, 0.3936900E+00, 0.3934900E+00, &
     & 0.4173800E+00, 0.3776029E+00, 0.3197466E+00, 0.3197466E+00 /
      data (ref_adm( 1,iz,25,10),iz = 1,20) / &
     & 0.3521300E+00, 0.3521300E+00, 0.3342700E+00, 0.3402600E+00, &
     & 0.3436900E+00, 0.3553700E+00, 0.3624600E+00, 0.3846500E+00, &
     & 0.3936800E+00, 0.4078000E+00, 0.4258300E+00, 0.4271400E+00, &
     & 0.4286700E+00, 0.4117800E+00, 0.4059300E+00, 0.4079100E+00, &
     & 0.4127100E+00, 0.3667000E+00, 0.3186343E+00, 0.3186343E+00 /
      data (ref_adm( 1,iz,26,10),iz = 1,20) / &
     & 0.3556700E+00, 0.3556700E+00, 0.3830900E+00, 0.3894000E+00, &
     & 0.3919000E+00, 0.3792000E+00, 0.3720500E+00, 0.3601200E+00, &
     & 0.3572900E+00, 0.3569600E+00, 0.3682800E+00, 0.3661200E+00, &
     & 0.4007500E+00, 0.4293300E+00, 0.4192300E+00, 0.4184300E+00, &
     & 0.4043200E+00, 0.3877900E+00, 0.3702000E+00, 0.3702000E+00 /
      data (ref_adm( 1,iz,27,10),iz = 1,20) / &
     & 0.3971600E+00, 0.3971600E+00, 0.4036000E+00, 0.4060600E+00, &
     & 0.4101800E+00, 0.4148100E+00, 0.4173100E+00, 0.4222700E+00, &
     & 0.4179900E+00, 0.4076600E+00, 0.3983800E+00, 0.3883500E+00, &
     & 0.3736000E+00, 0.3722700E+00, 0.4124400E+00, 0.4195100E+00, &
     & 0.4131200E+00, 0.3864700E+00, 0.3209800E+00, 0.3209800E+00 /
      data (ref_adm( 1,iz,28,10),iz = 1,20) / &
     & 0.3945600E+00, 0.3945600E+00, 0.3923900E+00, 0.3976100E+00, &
     & 0.3978600E+00, 0.4115900E+00, 0.4265000E+00, 0.4384700E+00, &
     & 0.4534200E+00, 0.4519200E+00, 0.4455800E+00, 0.4367500E+00, &
     & 0.4356900E+00, 0.4215600E+00, 0.4293300E+00, 0.4369800E+00, &
     & 0.4250900E+00, 0.3939500E+00, 0.3342900E+00, 0.3342900E+00 /
      data (ref_adm( 1,iz,29,10),iz = 1,20) / &
     & 0.4014700E+00, 0.4014700E+00, 0.3963700E+00, 0.4138400E+00, &
     & 0.4105200E+00, 0.3892300E+00, 0.4089600E+00, 0.4158400E+00, &
     & 0.4278500E+00, 0.4204100E+00, 0.4080200E+00, 0.4232700E+00, &
     & 0.4127300E+00, 0.4400300E+00, 0.4490200E+00, 0.4512500E+00, &
     & 0.4450300E+00, 0.4001700E+00, 0.3245000E+00, 0.3245000E+00 /
      data (ref_adm( 1,iz,30,10),iz = 1,20) / &
     & 0.3885300E+00, 0.3885300E+00, 0.3905900E+00, 0.3923400E+00, &
     & 0.3884100E+00, 0.4144500E+00, 0.4144900E+00, 0.4188700E+00, &
     & 0.4306400E+00, 0.4243000E+00, 0.4209500E+00, 0.4292000E+00, &
     & 0.4207100E+00, 0.4222300E+00, 0.4411300E+00, 0.4465400E+00, &
     & 0.4377200E+00, 0.3986200E+00, 0.3064800E+00, 0.3064800E+00 /
      data (ref_adm( 1,iz,31,10),iz = 1,20) / &
     & 0.3865400E+00, 0.3865400E+00, 0.3893700E+00, 0.3872600E+00, &
     & 0.3989600E+00, 0.4081100E+00, 0.4200000E+00, 0.4324800E+00, &
     & 0.4353300E+00, 0.4372000E+00, 0.4357100E+00, 0.4318200E+00, &
     & 0.4139400E+00, 0.4212600E+00, 0.4223800E+00, 0.4214500E+00, &
     & 0.4079800E+00, 0.3821400E+00, 0.3057400E+00, 0.3057400E+00 /
      data (ref_adm( 1,iz,32,10),iz = 1,20) / &
     & 0.3843300E+00, 0.3843300E+00, 0.3816700E+00, 0.3895100E+00, &
     & 0.3971300E+00, 0.4064900E+00, 0.4211300E+00, 0.4212000E+00, &
     & 0.4316600E+00, 0.4367700E+00, 0.4376400E+00, 0.4525200E+00, &
     & 0.4427900E+00, 0.4431200E+00, 0.4323200E+00, 0.4322800E+00, &
     & 0.4238200E+00, 0.3771600E+00, 0.3048700E+00, 0.3048700E+00 /
      data (ref_adm( 1,iz,33,10),iz = 1,20) / &
     & 0.3749800E+00, 0.3749800E+00, 0.3996000E+00, 0.3924600E+00, &
     & 0.4002800E+00, 0.4041400E+00, 0.4213800E+00, 0.4227100E+00, &
     & 0.4378700E+00, 0.4361900E+00, 0.4522700E+00, 0.4522000E+00, &
     & 0.4413600E+00, 0.4424000E+00, 0.4530800E+00, 0.4398900E+00, &
     & 0.4223300E+00, 0.3814800E+00, 0.3005100E+00, 0.3005100E+00 /
      data (ref_adm( 1,iz,34,10),iz = 1,20) / &
     & 0.3858900E+00, 0.3858900E+00, 0.3994200E+00, 0.4024500E+00, &
     & 0.4009600E+00, 0.4041200E+00, 0.4063200E+00, 0.4127700E+00, &
     & 0.4148100E+00, 0.4080900E+00, 0.4176000E+00, 0.4393700E+00, &
     & 0.4379600E+00, 0.4498300E+00, 0.4347900E+00, 0.4325200E+00, &
     & 0.4114100E+00, 0.3851100E+00, 0.3106700E+00, 0.3106700E+00 /
      data (ref_adm( 1,iz,35,10),iz = 1,20) / &
     & 0.3836300E+00, 0.3836300E+00, 0.3912600E+00, 0.4036000E+00, &
     & 0.4021600E+00, 0.4026800E+00, 0.4071700E+00, 0.4171400E+00, &
     & 0.4105200E+00, 0.4144500E+00, 0.4409100E+00, 0.4648700E+00, &
     & 0.4434200E+00, 0.4462700E+00, 0.4215600E+00, 0.4180400E+00, &
     & 0.4216300E+00, 0.3909400E+00, 0.2958900E+00, 0.2958900E+00 /
      data (ref_adm( 1,iz,36,10),iz = 1,20) / &
     & 0.3938800E+00, 0.3938800E+00, 0.4048700E+00, 0.3965400E+00, &
     & 0.3959600E+00, 0.4050200E+00, 0.4063800E+00, 0.4095900E+00, &
     & 0.4227800E+00, 0.4309800E+00, 0.4415700E+00, 0.4595200E+00, &
     & 0.4519800E+00, 0.4399500E+00, 0.4356500E+00, 0.4237900E+00, &
     & 0.4208900E+00, 0.3916200E+00, 0.3128800E+00, 0.3128800E+00 /
      data (ref_adm( 1,iz,37,10),iz = 1,20) / &
     & 0.3974400E+00, 0.3974400E+00, 0.3972100E+00, 0.4141700E+00, &
     & 0.4141000E+00, 0.3979800E+00, 0.3902000E+00, 0.4037300E+00, &
     & 0.4249100E+00, 0.4328200E+00, 0.4457000E+00, 0.4550500E+00, &
     & 0.4555500E+00, 0.4500500E+00, 0.4435900E+00, 0.4273600E+00, &
     & 0.3968800E+00, 0.3844400E+00, 0.3203787E+00, 0.3203787E+00 /
      data (ref_adm( 1,iz,38,10),iz = 1,20) / &
     & 0.3974400E+00, 0.3974400E+00, 0.3972100E+00, 0.4141700E+00, &
     & 0.4141000E+00, 0.3979800E+00, 0.3902000E+00, 0.4037300E+00, &
     & 0.4249100E+00, 0.4328200E+00, 0.4457000E+00, 0.4550500E+00, &
     & 0.4555500E+00, 0.4500500E+00, 0.4435900E+00, 0.4273600E+00, &
     & 0.3968800E+00, 0.3844400E+00, 0.3203787E+00, 0.3203787E+00 /
! Solar Zenith Angle 50.0 Albedo  0.4229766E+00
      data (ref_adm( 1,iz, 1,11),iz = 1,20) / &
     & 0.3734400E+00, 0.3734400E+00, 0.3729400E+00, 0.3946600E+00, &
     & 0.3857400E+00, 0.3928700E+00, 0.4049800E+00, 0.4207300E+00, &
     & 0.4221700E+00, 0.4431000E+00, 0.4722000E+00, 0.5197400E+00, &
     & 0.5305700E+00, 0.5342400E+00, 0.5531000E+00, 0.5659400E+00, &
     & 0.6057200E+00, 0.6087400E+00, 0.5537800E+00, 0.5537800E+00 /
      data (ref_adm( 1,iz, 2,11),iz = 1,20) / &
     & 0.3734400E+00, 0.3734400E+00, 0.3729400E+00, 0.3946600E+00, &
     & 0.3857400E+00, 0.3928700E+00, 0.4049800E+00, 0.4207300E+00, &
     & 0.4221700E+00, 0.4431000E+00, 0.4722000E+00, 0.5197400E+00, &
     & 0.5305700E+00, 0.5342400E+00, 0.5531000E+00, 0.5659400E+00, &
     & 0.6057200E+00, 0.6087400E+00, 0.5537800E+00, 0.5537800E+00 /
      data (ref_adm( 1,iz, 3,11),iz = 1,20) / &
     & 0.3820500E+00, 0.3820500E+00, 0.3807900E+00, 0.3871500E+00, &
     & 0.4035000E+00, 0.3974500E+00, 0.4031600E+00, 0.4167900E+00, &
     & 0.4276100E+00, 0.4412300E+00, 0.4576500E+00, 0.4857100E+00, &
     & 0.5240200E+00, 0.5346400E+00, 0.5440000E+00, 0.5699500E+00, &
     & 0.5962700E+00, 0.5979300E+00, 0.5338700E+00, 0.5338700E+00 /
      data (ref_adm( 1,iz, 4,11),iz = 1,20) / &
     & 0.3760800E+00, 0.3760800E+00, 0.3874600E+00, 0.3843800E+00, &
     & 0.4001200E+00, 0.4057900E+00, 0.4067700E+00, 0.4069100E+00, &
     & 0.4226700E+00, 0.4348400E+00, 0.4486000E+00, 0.4700000E+00, &
     & 0.4974100E+00, 0.5123900E+00, 0.5389500E+00, 0.5610900E+00, &
     & 0.5953200E+00, 0.5894700E+00, 0.4990000E+00, 0.4990000E+00 /
      data (ref_adm( 1,iz, 5,11),iz = 1,20) / &
     & 0.3825600E+00, 0.3825600E+00, 0.3859900E+00, 0.3944400E+00, &
     & 0.3901200E+00, 0.3983000E+00, 0.4068700E+00, 0.4103500E+00, &
     & 0.4243600E+00, 0.4463300E+00, 0.4637500E+00, 0.4652400E+00, &
     & 0.4825000E+00, 0.5074800E+00, 0.5341100E+00, 0.5485100E+00, &
     & 0.5923600E+00, 0.5571500E+00, 0.5014500E+00, 0.5014500E+00 /
      data (ref_adm( 1,iz, 6,11),iz = 1,20) / &
     & 0.3883400E+00, 0.3883400E+00, 0.3890200E+00, 0.3801300E+00, &
     & 0.3806700E+00, 0.3806600E+00, 0.3931800E+00, 0.4025100E+00, &
     & 0.4078100E+00, 0.4312800E+00, 0.4548600E+00, 0.4681200E+00, &
     & 0.4742800E+00, 0.4897200E+00, 0.5151200E+00, 0.5351900E+00, &
     & 0.5821000E+00, 0.5348900E+00, 0.4741800E+00, 0.4741800E+00 /
      data (ref_adm( 1,iz, 7,11),iz = 1,20) / &
     & 0.3672400E+00, 0.3672400E+00, 0.3688300E+00, 0.3649000E+00, &
     & 0.3649100E+00, 0.3717600E+00, 0.3760600E+00, 0.3859200E+00, &
     & 0.4016400E+00, 0.4080900E+00, 0.4212600E+00, 0.4350300E+00, &
     & 0.4392200E+00, 0.4713600E+00, 0.5004400E+00, 0.5193100E+00, &
     & 0.5491600E+00, 0.5248400E+00, 0.4553300E+00, 0.4553300E+00 /
      data (ref_adm( 1,iz, 8,11),iz = 1,20) / &
     & 0.4040800E+00, 0.4040800E+00, 0.4107000E+00, 0.4116500E+00, &
     & 0.4117800E+00, 0.4116800E+00, 0.4189300E+00, 0.4245900E+00, &
     & 0.4341100E+00, 0.4451600E+00, 0.4540200E+00, 0.4730500E+00, &
     & 0.4748600E+00, 0.4987300E+00, 0.5092200E+00, 0.5268400E+00, &
     & 0.5450700E+00, 0.5150700E+00, 0.4378200E+00, 0.4378200E+00 /
      data (ref_adm( 1,iz, 9,11),iz = 1,20) / &
     & 0.3971300E+00, 0.3971300E+00, 0.3826200E+00, 0.3785500E+00, &
     & 0.3837900E+00, 0.3921300E+00, 0.3978500E+00, 0.3991300E+00, &
     & 0.4088900E+00, 0.4179800E+00, 0.4358100E+00, 0.4408100E+00, &
     & 0.4454200E+00, 0.4523600E+00, 0.4728600E+00, 0.5114500E+00, &
     & 0.4937100E+00, 0.4439300E+00, 0.4053200E+00, 0.4053200E+00 /
      data (ref_adm( 1,iz,10,11),iz = 1,20) / &
     & 0.3849300E+00, 0.3849300E+00, 0.3861000E+00, 0.3851500E+00, &
     & 0.3876600E+00, 0.3878200E+00, 0.3965900E+00, 0.3948500E+00, &
     & 0.3960500E+00, 0.4053000E+00, 0.4206200E+00, 0.4147100E+00, &
     & 0.4297900E+00, 0.4486100E+00, 0.4714800E+00, 0.5016600E+00, &
     & 0.4940600E+00, 0.4479000E+00, 0.3673800E+00, 0.3673800E+00 /
      data (ref_adm( 1,iz,11,11),iz = 1,20) / &
     & 0.3842100E+00, 0.3842100E+00, 0.3837300E+00, 0.3838100E+00, &
     & 0.3899400E+00, 0.3884400E+00, 0.3953500E+00, 0.3974700E+00, &
     & 0.3918600E+00, 0.3985400E+00, 0.4114200E+00, 0.4126800E+00, &
     & 0.4244700E+00, 0.4454700E+00, 0.4760200E+00, 0.4936000E+00, &
     & 0.4869000E+00, 0.4441000E+00, 0.3473000E+00, 0.3473000E+00 /
      data (ref_adm( 1,iz,12,11),iz = 1,20) / &
     & 0.3895800E+00, 0.3895800E+00, 0.3818800E+00, 0.3884300E+00, &
     & 0.3899700E+00, 0.3848200E+00, 0.3964600E+00, 0.3921300E+00, &
     & 0.3885400E+00, 0.4048000E+00, 0.4009100E+00, 0.4080300E+00, &
     & 0.4174600E+00, 0.4275800E+00, 0.4663100E+00, 0.4791200E+00, &
     & 0.4739100E+00, 0.4302200E+00, 0.3678900E+00, 0.3678900E+00 /
      data (ref_adm( 1,iz,13,11),iz = 1,20) / &
     & 0.3977100E+00, 0.3977100E+00, 0.4046400E+00, 0.4053400E+00, &
     & 0.4027400E+00, 0.3990000E+00, 0.3951000E+00, 0.3957700E+00, &
     & 0.4040200E+00, 0.4055300E+00, 0.4038900E+00, 0.4089800E+00, &
     & 0.4035800E+00, 0.4124800E+00, 0.4515900E+00, 0.4711000E+00, &
     & 0.4641900E+00, 0.4234300E+00, 0.3424200E+00, 0.3424200E+00 /
      data (ref_adm( 1,iz,14,11),iz = 1,20) / &
     & 0.4121200E+00, 0.4121200E+00, 0.4076800E+00, 0.4034100E+00, &
     & 0.4093100E+00, 0.4184800E+00, 0.4243100E+00, 0.4274500E+00, &
     & 0.4291600E+00, 0.4295600E+00, 0.4282700E+00, 0.4330500E+00, &
     & 0.4322700E+00, 0.4267100E+00, 0.4293600E+00, 0.4573800E+00, &
     & 0.4433300E+00, 0.4037700E+00, 0.3556600E+00, 0.3556600E+00 /
      data (ref_adm( 1,iz,15,11),iz = 1,20) / &
     & 0.3580300E+00, 0.3580300E+00, 0.3325900E+00, 0.3320400E+00, &
     & 0.3302200E+00, 0.3293900E+00, 0.3275300E+00, 0.3216700E+00, &
     & 0.3337900E+00, 0.3535000E+00, 0.3761800E+00, 0.3945200E+00, &
     & 0.4153900E+00, 0.4359700E+00, 0.4399300E+00, 0.4409900E+00, &
     & 0.4345200E+00, 0.4010100E+00, 0.3518400E+00, 0.3518400E+00 /
      data (ref_adm( 1,iz,16,11),iz = 1,20) / &
     & 0.3745300E+00, 0.3745300E+00, 0.3821300E+00, 0.3804700E+00, &
     & 0.3849700E+00, 0.3773200E+00, 0.3827600E+00, 0.3887000E+00, &
     & 0.3759000E+00, 0.3654200E+00, 0.3573200E+00, 0.3513400E+00, &
     & 0.3578300E+00, 0.3455600E+00, 0.4167300E+00, 0.4521300E+00, &
     & 0.4306800E+00, 0.3995300E+00, 0.3057000E+00, 0.3057000E+00 /
      data (ref_adm( 1,iz,17,11),iz = 1,20) / &
     & 0.3876900E+00, 0.3876900E+00, 0.3966700E+00, 0.3926400E+00, &
     & 0.3859200E+00, 0.3858100E+00, 0.3769000E+00, 0.3871700E+00, &
     & 0.4069500E+00, 0.3958000E+00, 0.3993000E+00, 0.3938800E+00, &
     & 0.4025100E+00, 0.3908700E+00, 0.4175800E+00, 0.4121000E+00, &
     & 0.4154100E+00, 0.4009600E+00, 0.2795300E+00, 0.2795300E+00 /
      data (ref_adm( 1,iz,18,11),iz = 1,20) / &
     & 0.3758400E+00, 0.3758400E+00, 0.3930600E+00, 0.3919700E+00, &
     & 0.3786900E+00, 0.3830900E+00, 0.3894000E+00, 0.3880400E+00, &
     & 0.3922400E+00, 0.3970600E+00, 0.4050600E+00, 0.4083400E+00, &
     & 0.4042200E+00, 0.3926700E+00, 0.4019800E+00, 0.4038900E+00, &
     & 0.4427800E+00, 0.3592500E+00, 0.3188295E+00, 0.3188295E+00 /
      data (ref_adm( 1,iz,19,11),iz = 1,20) / &
     & 0.3931500E+00, 0.3931500E+00, 0.3866000E+00, 0.3886200E+00, &
     & 0.3896600E+00, 0.3854900E+00, 0.3896300E+00, 0.3886100E+00, &
     & 0.3787900E+00, 0.3852100E+00, 0.3941600E+00, 0.3978200E+00, &
     & 0.4116700E+00, 0.4075200E+00, 0.3985600E+00, 0.4039000E+00, &
     & 0.4437100E+00, 0.2524200E+00, 0.3167972E+00, 0.3167972E+00 /
      data (ref_adm( 1,iz,20,11),iz = 1,20) / &
     & 0.3871800E+00, 0.3871800E+00, 0.3816000E+00, 0.3831900E+00, &
     & 0.3813500E+00, 0.3905500E+00, 0.3948500E+00, 0.3864700E+00, &
     & 0.3839600E+00, 0.3889300E+00, 0.3948700E+00, 0.3999200E+00, &
     & 0.3877600E+00, 0.3881700E+00, 0.3995300E+00, 0.3999100E+00, &
     & 0.4247800E+00, 0.3779458E+00, 0.3149829E+00, 0.3149829E+00 /
      data (ref_adm( 1,iz,21,11),iz = 1,20) / &
     & 0.3903200E+00, 0.3903200E+00, 0.3949400E+00, 0.3910700E+00, &
     & 0.3890100E+00, 0.4000000E+00, 0.3943500E+00, 0.3891600E+00, &
     & 0.3921500E+00, 0.4001900E+00, 0.4103900E+00, 0.4051400E+00, &
     & 0.4141400E+00, 0.3940000E+00, 0.4104400E+00, 0.4480100E+00, &
     & 0.3991871E+00, 0.3746014E+00, 0.3132920E+00, 0.3132920E+00 /
      data (ref_adm( 1,iz,22,11),iz = 1,20) / &
     & 0.3894800E+00, 0.3894800E+00, 0.3897200E+00, 0.3906100E+00, &
     & 0.3901600E+00, 0.3963100E+00, 0.4001600E+00, 0.3938100E+00, &
     & 0.3926400E+00, 0.3980300E+00, 0.4038100E+00, 0.4038000E+00, &
     & 0.4062300E+00, 0.4122900E+00, 0.4075200E+00, 0.4126300E+00, &
     & 0.3668610E+00, 0.3420798E+00, 0.3073322E+00, 0.3073322E+00 /
      data (ref_adm( 1,iz,23,11),iz = 1,20) / &
     & 0.3876400E+00, 0.3876400E+00, 0.3950900E+00, 0.4010000E+00, &
     & 0.3934500E+00, 0.4011800E+00, 0.4072400E+00, 0.4154600E+00, &
     & 0.4051000E+00, 0.3978500E+00, 0.4022000E+00, 0.4023000E+00, &
     & 0.4067900E+00, 0.3969200E+00, 0.4022500E+00, 0.4211900E+00, &
     & 0.3909400E+00, 0.3422246E+00, 0.3092028E+00, 0.3092028E+00 /
      data (ref_adm( 1,iz,24,11),iz = 1,20) / &
     & 0.3911600E+00, 0.3911600E+00, 0.3905000E+00, 0.3959200E+00, &
     & 0.4010300E+00, 0.4086300E+00, 0.4076000E+00, 0.4069000E+00, &
     & 0.4101800E+00, 0.4103700E+00, 0.4060300E+00, 0.4063900E+00, &
     & 0.4115500E+00, 0.4098800E+00, 0.4058400E+00, 0.4079400E+00, &
     & 0.4065000E+00, 0.3438088E+00, 0.3120427E+00, 0.3120427E+00 /
      data (ref_adm( 1,iz,25,11),iz = 1,20) / &
     & 0.3482200E+00, 0.3482200E+00, 0.3376200E+00, 0.3392300E+00, &
     & 0.3436000E+00, 0.3465500E+00, 0.3604500E+00, 0.3615900E+00, &
     & 0.3657400E+00, 0.3759000E+00, 0.3778400E+00, 0.4062100E+00, &
     & 0.4178900E+00, 0.4089100E+00, 0.4031300E+00, 0.3975400E+00, &
     & 0.3946700E+00, 0.3999000E+00, 0.3157619E+00, 0.3157619E+00 /
      data (ref_adm( 1,iz,26,11),iz = 1,20) / &
     & 0.3892800E+00, 0.3892800E+00, 0.4196200E+00, 0.4232600E+00, &
     & 0.4279800E+00, 0.4258600E+00, 0.4236800E+00, 0.4238800E+00, &
     & 0.4169400E+00, 0.4048700E+00, 0.3899500E+00, 0.3847300E+00, &
     & 0.3813600E+00, 0.3749600E+00, 0.4018500E+00, 0.4094500E+00, &
     & 0.3967500E+00, 0.3828600E+00, 0.3416900E+00, 0.3416900E+00 /
      data (ref_adm( 1,iz,27,11),iz = 1,20) / &
     & 0.4085900E+00, 0.4085900E+00, 0.4099300E+00, 0.4109700E+00, &
     & 0.4171600E+00, 0.4167500E+00, 0.4286500E+00, 0.4346100E+00, &
     & 0.4382300E+00, 0.4415400E+00, 0.4443000E+00, 0.4454400E+00, &
     & 0.4439500E+00, 0.4374400E+00, 0.4280200E+00, 0.4256000E+00, &
     & 0.4071400E+00, 0.3816100E+00, 0.3375300E+00, 0.3375300E+00 /
      data (ref_adm( 1,iz,28,11),iz = 1,20) / &
     & 0.3967400E+00, 0.3967400E+00, 0.4017500E+00, 0.3977800E+00, &
     & 0.4105300E+00, 0.4210100E+00, 0.4368200E+00, 0.4333000E+00, &
     & 0.4369000E+00, 0.4404300E+00, 0.4404500E+00, 0.4529500E+00, &
     & 0.4497800E+00, 0.4425000E+00, 0.4465300E+00, 0.4350600E+00, &
     & 0.4232100E+00, 0.3915000E+00, 0.3389900E+00, 0.3389900E+00 /
      data (ref_adm( 1,iz,29,11),iz = 1,20) / &
     & 0.4062500E+00, 0.4062500E+00, 0.4109500E+00, 0.4183700E+00, &
     & 0.4220900E+00, 0.4297500E+00, 0.4285600E+00, 0.4322800E+00, &
     & 0.4369800E+00, 0.4385700E+00, 0.4442700E+00, 0.4459300E+00, &
     & 0.4482800E+00, 0.4384100E+00, 0.4446300E+00, 0.4528900E+00, &
     & 0.4438700E+00, 0.4099300E+00, 0.3355200E+00, 0.3355200E+00 /
      data (ref_adm( 1,iz,30,11),iz = 1,20) / &
     & 0.4010500E+00, 0.4010500E+00, 0.4084000E+00, 0.4091800E+00, &
     & 0.4130900E+00, 0.4165700E+00, 0.4229800E+00, 0.4317400E+00, &
     & 0.4347200E+00, 0.4443800E+00, 0.4511200E+00, 0.4479100E+00, &
     & 0.4472500E+00, 0.4404200E+00, 0.4473200E+00, 0.4546900E+00, &
     & 0.4468400E+00, 0.4205200E+00, 0.3409600E+00, 0.3409600E+00 /
      data (ref_adm( 1,iz,31,11),iz = 1,20) / &
     & 0.4073500E+00, 0.4073500E+00, 0.4070600E+00, 0.4154500E+00, &
     & 0.4224500E+00, 0.4274400E+00, 0.4332500E+00, 0.4370600E+00, &
     & 0.4496900E+00, 0.4540600E+00, 0.4573800E+00, 0.4609800E+00, &
     & 0.4669800E+00, 0.4584000E+00, 0.4517400E+00, 0.4565700E+00, &
     & 0.4525000E+00, 0.4227400E+00, 0.3411500E+00, 0.3411500E+00 /
      data (ref_adm( 1,iz,32,11),iz = 1,20) / &
     & 0.3853300E+00, 0.3853300E+00, 0.3891100E+00, 0.3955300E+00, &
     & 0.4032000E+00, 0.4156200E+00, 0.4154500E+00, 0.4208500E+00, &
     & 0.4201900E+00, 0.4221200E+00, 0.4250500E+00, 0.4315300E+00, &
     & 0.4498900E+00, 0.4541100E+00, 0.4584400E+00, 0.4608800E+00, &
     & 0.4450900E+00, 0.4162000E+00, 0.3404800E+00, 0.3404800E+00 /
      data (ref_adm( 1,iz,33,11),iz = 1,20) / &
     & 0.3782900E+00, 0.3782900E+00, 0.3864000E+00, 0.3876900E+00, &
     & 0.4021000E+00, 0.4084400E+00, 0.4169900E+00, 0.4099000E+00, &
     & 0.4179800E+00, 0.4237200E+00, 0.4324400E+00, 0.4357600E+00, &
     & 0.4582200E+00, 0.4686600E+00, 0.4634900E+00, 0.4555700E+00, &
     & 0.4386200E+00, 0.4145700E+00, 0.3390100E+00, 0.3390100E+00 /
      data (ref_adm( 1,iz,34,11),iz = 1,20) / &
     & 0.3908600E+00, 0.3908600E+00, 0.3896300E+00, 0.3932700E+00, &
     & 0.4063400E+00, 0.4160200E+00, 0.4070400E+00, 0.4150200E+00, &
     & 0.4363100E+00, 0.4352200E+00, 0.4518600E+00, 0.4631100E+00, &
     & 0.4675500E+00, 0.4657800E+00, 0.4650400E+00, 0.4653200E+00, &
     & 0.4628200E+00, 0.4341200E+00, 0.3525800E+00, 0.3525800E+00 /
      data (ref_adm( 1,iz,35,11),iz = 1,20) / &
     & 0.3817500E+00, 0.3817500E+00, 0.3937200E+00, 0.4005400E+00, &
     & 0.3936700E+00, 0.3951200E+00, 0.4123300E+00, 0.4233200E+00, &
     & 0.4395100E+00, 0.4397700E+00, 0.4560300E+00, 0.4710600E+00, &
     & 0.4736600E+00, 0.4675100E+00, 0.4720200E+00, 0.4713600E+00, &
     & 0.4688300E+00, 0.4274900E+00, 0.3522500E+00, 0.3522500E+00 /
      data (ref_adm( 1,iz,36,11),iz = 1,20) / &
     & 0.3902600E+00, 0.3902600E+00, 0.3892100E+00, 0.4011700E+00, &
     & 0.3955800E+00, 0.4043600E+00, 0.4164500E+00, 0.4297200E+00, &
     & 0.4372000E+00, 0.4586500E+00, 0.4663800E+00, 0.4837600E+00, &
     & 0.4836500E+00, 0.4760900E+00, 0.4729300E+00, 0.4774500E+00, &
     & 0.4652700E+00, 0.4328500E+00, 0.3378700E+00, 0.3378700E+00 /
      data (ref_adm( 1,iz,37,11),iz = 1,20) / &
     & 0.3909600E+00, 0.3909600E+00, 0.3827900E+00, 0.3901300E+00, &
     & 0.4014600E+00, 0.4107300E+00, 0.4116900E+00, 0.4168000E+00, &
     & 0.4386700E+00, 0.4631300E+00, 0.4789500E+00, 0.4955400E+00, &
     & 0.4846300E+00, 0.4851600E+00, 0.4840400E+00, 0.4802300E+00, &
     & 0.4522400E+00, 0.4162100E+00, 0.3783643E+00, 0.3783643E+00 /
      data (ref_adm( 1,iz,38,11),iz = 1,20) / &
     & 0.3909600E+00, 0.3909600E+00, 0.3827900E+00, 0.3901300E+00, &
     & 0.4014600E+00, 0.4107300E+00, 0.4116900E+00, 0.4168000E+00, &
     & 0.4386700E+00, 0.4631300E+00, 0.4789500E+00, 0.4955400E+00, &
     & 0.4846300E+00, 0.4851600E+00, 0.4840400E+00, 0.4802300E+00, &
     & 0.4522400E+00, 0.4162100E+00, 0.3783643E+00, 0.3783643E+00 /
! Solar Zenith Angle 55.0 Albedo  0.4288844E+00
      data (ref_adm( 1,iz, 1,12),iz = 1,20) / &
     & 0.3903000E+00, 0.3903000E+00, 0.3909000E+00, 0.3893000E+00, &
     & 0.3887400E+00, 0.3928700E+00, 0.3979300E+00, 0.4121500E+00, &
     & 0.4197300E+00, 0.4396500E+00, 0.4600400E+00, 0.5101900E+00, &
     & 0.5665000E+00, 0.5765600E+00, 0.6156200E+00, 0.6630500E+00, &
     & 0.7274300E+00, 0.7547000E+00, 0.7374000E+00, 0.7374000E+00 /
      data (ref_adm( 1,iz, 2,12),iz = 1,20) / &
     & 0.3903000E+00, 0.3903000E+00, 0.3909000E+00, 0.3893000E+00, &
     & 0.3887400E+00, 0.3928700E+00, 0.3979300E+00, 0.4121500E+00, &
     & 0.4197300E+00, 0.4396500E+00, 0.4600400E+00, 0.5101900E+00, &
     & 0.5665000E+00, 0.5765600E+00, 0.6156200E+00, 0.6630500E+00, &
     & 0.7274300E+00, 0.7547000E+00, 0.7374000E+00, 0.7374000E+00 /
      data (ref_adm( 1,iz, 3,12),iz = 1,20) / &
     & 0.3908500E+00, 0.3908500E+00, 0.3851900E+00, 0.3938300E+00, &
     & 0.3924600E+00, 0.3937400E+00, 0.3929300E+00, 0.4060000E+00, &
     & 0.4218900E+00, 0.4388600E+00, 0.4601100E+00, 0.4993200E+00, &
     & 0.5342100E+00, 0.5621700E+00, 0.6089500E+00, 0.6507600E+00, &
     & 0.7137600E+00, 0.7332300E+00, 0.7004100E+00, 0.7004100E+00 /
      data (ref_adm( 1,iz, 4,12),iz = 1,20) / &
     & 0.3779400E+00, 0.3779400E+00, 0.3833700E+00, 0.3878300E+00, &
     & 0.3911000E+00, 0.3992900E+00, 0.3982300E+00, 0.4070200E+00, &
     & 0.4256300E+00, 0.4294800E+00, 0.4501700E+00, 0.4739800E+00, &
     & 0.5043700E+00, 0.5602100E+00, 0.5991600E+00, 0.6395300E+00, &
     & 0.6988000E+00, 0.7063100E+00, 0.6497400E+00, 0.6497400E+00 /
      data (ref_adm( 1,iz, 5,12),iz = 1,20) / &
     & 0.3793500E+00, 0.3793500E+00, 0.3729700E+00, 0.3737600E+00, &
     & 0.3898600E+00, 0.3938200E+00, 0.4022000E+00, 0.4142100E+00, &
     & 0.4197300E+00, 0.4329900E+00, 0.4556500E+00, 0.4650800E+00, &
     & 0.4846600E+00, 0.5478300E+00, 0.5845900E+00, 0.6351800E+00, &
     & 0.6747700E+00, 0.6835300E+00, 0.6137500E+00, 0.6137500E+00 /
      data (ref_adm( 1,iz, 6,12),iz = 1,20) / &
     & 0.3695500E+00, 0.3695500E+00, 0.3618300E+00, 0.3667400E+00, &
     & 0.3687300E+00, 0.3747700E+00, 0.3902100E+00, 0.4019100E+00, &
     & 0.4127000E+00, 0.4314800E+00, 0.4448600E+00, 0.4648600E+00, &
     & 0.4966600E+00, 0.5417200E+00, 0.5871300E+00, 0.6375200E+00, &
     & 0.6764500E+00, 0.6790100E+00, 0.5967500E+00, 0.5967500E+00 /
      data (ref_adm( 1,iz, 7,12),iz = 1,20) / &
     & 0.3604600E+00, 0.3604600E+00, 0.3671200E+00, 0.3653600E+00, &
     & 0.3673000E+00, 0.3722400E+00, 0.3778400E+00, 0.3884300E+00, &
     & 0.4065300E+00, 0.4252800E+00, 0.4296400E+00, 0.4470200E+00, &
     & 0.4704400E+00, 0.4942400E+00, 0.5339100E+00, 0.5547500E+00, &
     & 0.5953500E+00, 0.5934100E+00, 0.5247300E+00, 0.5247300E+00 /
      data (ref_adm( 1,iz, 8,12),iz = 1,20) / &
     & 0.3913000E+00, 0.3913000E+00, 0.3923000E+00, 0.3939400E+00, &
     & 0.3930600E+00, 0.3970100E+00, 0.4018500E+00, 0.4092900E+00, &
     & 0.4290900E+00, 0.4419500E+00, 0.4609600E+00, 0.4740700E+00, &
     & 0.4959700E+00, 0.5083300E+00, 0.5291100E+00, 0.5561400E+00, &
     & 0.5867500E+00, 0.5840700E+00, 0.4910600E+00, 0.4910600E+00 /
      data (ref_adm( 1,iz, 9,12),iz = 1,20) / &
     & 0.3716400E+00, 0.3716400E+00, 0.3626100E+00, 0.3589900E+00, &
     & 0.3705900E+00, 0.3804700E+00, 0.3811600E+00, 0.3920100E+00, &
     & 0.4081000E+00, 0.4185000E+00, 0.4302000E+00, 0.4610500E+00, &
     & 0.4745900E+00, 0.4876900E+00, 0.5106900E+00, 0.5366300E+00, &
     & 0.5477900E+00, 0.5480800E+00, 0.4720900E+00, 0.4720900E+00 /
      data (ref_adm( 1,iz,10,12),iz = 1,20) / &
     & 0.3729300E+00, 0.3729300E+00, 0.3665900E+00, 0.3638200E+00, &
     & 0.3701100E+00, 0.3767900E+00, 0.3894400E+00, 0.3953400E+00, &
     & 0.4070500E+00, 0.4117800E+00, 0.4172700E+00, 0.4473200E+00, &
     & 0.4680000E+00, 0.4761900E+00, 0.5050400E+00, 0.5226900E+00, &
     & 0.5274300E+00, 0.5088300E+00, 0.4465800E+00, 0.4465800E+00 /
      data (ref_adm( 1,iz,11,12),iz = 1,20) / &
     & 0.3614300E+00, 0.3614300E+00, 0.3690200E+00, 0.3694300E+00, &
     & 0.3707100E+00, 0.3741100E+00, 0.3838400E+00, 0.3998900E+00, &
     & 0.4051800E+00, 0.4071400E+00, 0.4125000E+00, 0.4381200E+00, &
     & 0.4514400E+00, 0.4753700E+00, 0.4784100E+00, 0.5078000E+00, &
     & 0.5081900E+00, 0.4838200E+00, 0.4093600E+00, 0.4093600E+00 /
      data (ref_adm( 1,iz,12,12),iz = 1,20) / &
     & 0.3699400E+00, 0.3699400E+00, 0.3769300E+00, 0.3732900E+00, &
     & 0.3831900E+00, 0.3872400E+00, 0.3931300E+00, 0.3971400E+00, &
     & 0.4001700E+00, 0.4054300E+00, 0.4133200E+00, 0.4306700E+00, &
     & 0.4423100E+00, 0.4558900E+00, 0.4776600E+00, 0.4930300E+00, &
     & 0.5011800E+00, 0.4615800E+00, 0.3676100E+00, 0.3676100E+00 /
      data (ref_adm( 1,iz,13,12),iz = 1,20) / &
     & 0.3781100E+00, 0.3781100E+00, 0.3795000E+00, 0.3825100E+00, &
     & 0.3843800E+00, 0.3788900E+00, 0.3782900E+00, 0.3827500E+00, &
     & 0.3938700E+00, 0.4059500E+00, 0.4140100E+00, 0.4299900E+00, &
     & 0.4416400E+00, 0.4485700E+00, 0.4571300E+00, 0.4652700E+00, &
     & 0.4809500E+00, 0.4553300E+00, 0.3814300E+00, 0.3814300E+00 /
      data (ref_adm( 1,iz,14,12),iz = 1,20) / &
     & 0.3966300E+00, 0.3966300E+00, 0.3981800E+00, 0.3975500E+00, &
     & 0.3999300E+00, 0.4020100E+00, 0.4068500E+00, 0.4123100E+00, &
     & 0.4171700E+00, 0.4215200E+00, 0.4280600E+00, 0.4390400E+00, &
     & 0.4508200E+00, 0.4590200E+00, 0.4556300E+00, 0.4558600E+00, &
     & 0.4572900E+00, 0.4383100E+00, 0.3687700E+00, 0.3687700E+00 /
      data (ref_adm( 1,iz,15,12),iz = 1,20) / &
     & 0.3645400E+00, 0.3645400E+00, 0.3328100E+00, 0.3320400E+00, &
     & 0.3391900E+00, 0.3421800E+00, 0.3509300E+00, 0.3550800E+00, &
     & 0.3676900E+00, 0.3794200E+00, 0.3916400E+00, 0.4096900E+00, &
     & 0.4296900E+00, 0.4469400E+00, 0.4414000E+00, 0.4405100E+00, &
     & 0.4362300E+00, 0.4137400E+00, 0.3744800E+00, 0.3744800E+00 /
      data (ref_adm( 1,iz,16,12),iz = 1,20) / &
     & 0.3578000E+00, 0.3578000E+00, 0.3725600E+00, 0.3774700E+00, &
     & 0.3799000E+00, 0.3844100E+00, 0.3889900E+00, 0.3865800E+00, &
     & 0.3824000E+00, 0.3742400E+00, 0.3732800E+00, 0.3775500E+00, &
     & 0.3801700E+00, 0.3757900E+00, 0.4369200E+00, 0.4453900E+00, &
     & 0.4321500E+00, 0.4236900E+00, 0.3764500E+00, 0.3764500E+00 /
      data (ref_adm( 1,iz,17,12),iz = 1,20) / &
     & 0.3731300E+00, 0.3731300E+00, 0.3803100E+00, 0.3842100E+00, &
     & 0.3798500E+00, 0.3817400E+00, 0.3878800E+00, 0.3862400E+00, &
     & 0.3905800E+00, 0.3921100E+00, 0.3914400E+00, 0.4100200E+00, &
     & 0.4135500E+00, 0.4183100E+00, 0.4255800E+00, 0.4412300E+00, &
     & 0.4491400E+00, 0.3992700E+00, 0.4013008E+00, 0.4013008E+00 /
      data (ref_adm( 1,iz,18,12),iz = 1,20) / &
     & 0.3570100E+00, 0.3570100E+00, 0.3769800E+00, 0.3759200E+00, &
     & 0.3750100E+00, 0.3863000E+00, 0.3867900E+00, 0.3863000E+00, &
     & 0.3897800E+00, 0.3959100E+00, 0.4013700E+00, 0.4098800E+00, &
     & 0.4043200E+00, 0.4154300E+00, 0.4327800E+00, 0.4436100E+00, &
     & 0.4531400E+00, 0.3690100E+00, 0.3687443E+00, 0.3687443E+00 /
      data (ref_adm( 1,iz,19,12),iz = 1,20) / &
     & 0.3718200E+00, 0.3718200E+00, 0.3805000E+00, 0.3800400E+00, &
     & 0.3827900E+00, 0.3818500E+00, 0.3852600E+00, 0.3897200E+00, &
     & 0.3933200E+00, 0.4077900E+00, 0.4110900E+00, 0.4042900E+00, &
     & 0.4120100E+00, 0.4051500E+00, 0.4119300E+00, 0.4547200E+00, &
     & 0.4740000E+00, 0.4099177E+00, 0.3639142E+00, 0.3639142E+00 /
      data (ref_adm( 1,iz,20,12),iz = 1,20) / &
     & 0.3751100E+00, 0.3751100E+00, 0.3726400E+00, 0.3695600E+00, &
     & 0.3747200E+00, 0.3762200E+00, 0.3796300E+00, 0.3785400E+00, &
     & 0.3820400E+00, 0.3973500E+00, 0.4058600E+00, 0.4091500E+00, &
     & 0.4099000E+00, 0.4092600E+00, 0.4183400E+00, 0.4296100E+00, &
     & 0.3956000E+00, 0.4054489E+00, 0.3610433E+00, 0.3610433E+00 /
      data (ref_adm( 1,iz,21,12),iz = 1,20) / &
     & 0.3795700E+00, 0.3795700E+00, 0.3766200E+00, 0.3844700E+00, &
     & 0.3863200E+00, 0.3897200E+00, 0.3945000E+00, 0.3894400E+00, &
     & 0.3941600E+00, 0.4038600E+00, 0.4110500E+00, 0.4087000E+00, &
     & 0.4095800E+00, 0.4133400E+00, 0.4220700E+00, 0.4608600E+00, &
     & 0.4120023E+00, 0.4013752E+00, 0.3590509E+00, 0.3590509E+00 /
      data (ref_adm( 1,iz,22,12),iz = 1,20) / &
     & 0.3760400E+00, 0.3760400E+00, 0.3788000E+00, 0.3808500E+00, &
     & 0.3840300E+00, 0.3916300E+00, 0.3925900E+00, 0.3934200E+00, &
     & 0.3974800E+00, 0.4053000E+00, 0.4137700E+00, 0.4098800E+00, &
     & 0.4050200E+00, 0.4097500E+00, 0.4165700E+00, 0.4309700E+00, &
     & 0.4592209E+00, 0.4391473E+00, 0.3837666E+00, 0.3837666E+00 /
      data (ref_adm( 1,iz,23,12),iz = 1,20) / &
     & 0.3695000E+00, 0.3695000E+00, 0.3766000E+00, 0.3769900E+00, &
     & 0.3825400E+00, 0.3890100E+00, 0.3950000E+00, 0.3945800E+00, &
     & 0.4010600E+00, 0.4017500E+00, 0.4104400E+00, 0.4115000E+00, &
     & 0.4081800E+00, 0.4088900E+00, 0.4205500E+00, 0.4474000E+00, &
     & 0.4548000E+00, 0.4304464E+00, 0.3806690E+00, 0.3806690E+00 /
      data (ref_adm( 1,iz,24,12),iz = 1,20) / &
     & 0.3698400E+00, 0.3698400E+00, 0.3715800E+00, 0.3730500E+00, &
     & 0.3699300E+00, 0.3784200E+00, 0.3831800E+00, 0.3947200E+00, &
     & 0.4005700E+00, 0.4013000E+00, 0.4038200E+00, 0.4093600E+00, &
     & 0.4042200E+00, 0.4064300E+00, 0.4177800E+00, 0.4298000E+00, &
     & 0.4443000E+00, 0.4236019E+00, 0.3782988E+00, 0.3782988E+00 /
      data (ref_adm( 1,iz,25,12),iz = 1,20) / &
     & 0.3478000E+00, 0.3478000E+00, 0.3527000E+00, 0.3535300E+00, &
     & 0.3576800E+00, 0.3584300E+00, 0.3615000E+00, 0.3607500E+00, &
     & 0.3700100E+00, 0.3733300E+00, 0.3828500E+00, 0.3932400E+00, &
     & 0.4023900E+00, 0.4103700E+00, 0.4205300E+00, 0.4228800E+00, &
     & 0.4371400E+00, 0.4247000E+00, 0.3773386E+00, 0.3773386E+00 /
      data (ref_adm( 1,iz,26,12),iz = 1,20) / &
     & 0.3865100E+00, 0.3865100E+00, 0.4025100E+00, 0.4040600E+00, &
     & 0.4093500E+00, 0.4127900E+00, 0.4183500E+00, 0.4229300E+00, &
     & 0.4254400E+00, 0.4220700E+00, 0.4160000E+00, 0.4115000E+00, &
     & 0.4084300E+00, 0.3960800E+00, 0.4169600E+00, 0.4308500E+00, &
     & 0.4247600E+00, 0.4175700E+00, 0.4300600E+00, 0.4300600E+00 /
      data (ref_adm( 1,iz,27,12),iz = 1,20) / &
     & 0.3897300E+00, 0.3897300E+00, 0.3855000E+00, 0.3812300E+00, &
     & 0.3877800E+00, 0.3956200E+00, 0.4025400E+00, 0.4113000E+00, &
     & 0.4252600E+00, 0.4338400E+00, 0.4398800E+00, 0.4442200E+00, &
     & 0.4489100E+00, 0.4547200E+00, 0.4526900E+00, 0.4371600E+00, &
     & 0.4278500E+00, 0.4139000E+00, 0.3550000E+00, 0.3550000E+00 /
      data (ref_adm( 1,iz,28,12),iz = 1,20) / &
     & 0.3775300E+00, 0.3775300E+00, 0.3770200E+00, 0.3870200E+00, &
     & 0.3898400E+00, 0.3879800E+00, 0.4004100E+00, 0.4029100E+00, &
     & 0.4149700E+00, 0.4234100E+00, 0.4282100E+00, 0.4392000E+00, &
     & 0.4453800E+00, 0.4613300E+00, 0.4616100E+00, 0.4457700E+00, &
     & 0.4370100E+00, 0.4183900E+00, 0.3475000E+00, 0.3475000E+00 /
      data (ref_adm( 1,iz,29,12),iz = 1,20) / &
     & 0.3818600E+00, 0.3818600E+00, 0.3761400E+00, 0.3836800E+00, &
     & 0.3949500E+00, 0.3943200E+00, 0.4012000E+00, 0.4076000E+00, &
     & 0.4043500E+00, 0.4218600E+00, 0.4259300E+00, 0.4300800E+00, &
     & 0.4457300E+00, 0.4602200E+00, 0.4669800E+00, 0.4614000E+00, &
     & 0.4507400E+00, 0.4227700E+00, 0.3553300E+00, 0.3553300E+00 /
      data (ref_adm( 1,iz,30,12),iz = 1,20) / &
     & 0.3746900E+00, 0.3746900E+00, 0.3762600E+00, 0.3820900E+00, &
     & 0.3910000E+00, 0.4051400E+00, 0.4058100E+00, 0.4091800E+00, &
     & 0.4148800E+00, 0.4217800E+00, 0.4299000E+00, 0.4367000E+00, &
     & 0.4500800E+00, 0.4624600E+00, 0.4661100E+00, 0.4713900E+00, &
     & 0.4649600E+00, 0.4354700E+00, 0.3638600E+00, 0.3638600E+00 /
      data (ref_adm( 1,iz,31,12),iz = 1,20) / &
     & 0.3849000E+00, 0.3849000E+00, 0.3961200E+00, 0.3963600E+00, &
     & 0.3990500E+00, 0.4103600E+00, 0.4220500E+00, 0.4271000E+00, &
     & 0.4308200E+00, 0.4347900E+00, 0.4448300E+00, 0.4517500E+00, &
     & 0.4581500E+00, 0.4670300E+00, 0.4690500E+00, 0.4697400E+00, &
     & 0.4694800E+00, 0.4447200E+00, 0.3693600E+00, 0.3693600E+00 /
      data (ref_adm( 1,iz,32,12),iz = 1,20) / &
     & 0.3790200E+00, 0.3790200E+00, 0.3797500E+00, 0.3835100E+00, &
     & 0.3879600E+00, 0.3924300E+00, 0.4013600E+00, 0.4112000E+00, &
     & 0.4174400E+00, 0.4224300E+00, 0.4326300E+00, 0.4428100E+00, &
     & 0.4535000E+00, 0.4635900E+00, 0.4708800E+00, 0.4708000E+00, &
     & 0.4637200E+00, 0.4453900E+00, 0.3712200E+00, 0.3712200E+00 /
      data (ref_adm( 1,iz,33,12),iz = 1,20) / &
     & 0.3633300E+00, 0.3633300E+00, 0.3680400E+00, 0.3724600E+00, &
     & 0.3824200E+00, 0.3867500E+00, 0.3911300E+00, 0.4071000E+00, &
     & 0.4195400E+00, 0.4288800E+00, 0.4396300E+00, 0.4500200E+00, &
     & 0.4583900E+00, 0.4734100E+00, 0.4887700E+00, 0.4942200E+00, &
     & 0.4880200E+00, 0.4557100E+00, 0.3770400E+00, 0.3770400E+00 /
      data (ref_adm( 1,iz,34,12),iz = 1,20) / &
     & 0.3825000E+00, 0.3825000E+00, 0.3906400E+00, 0.3952100E+00, &
     & 0.3950500E+00, 0.4058600E+00, 0.4056300E+00, 0.4184200E+00, &
     & 0.4313100E+00, 0.4443700E+00, 0.4489400E+00, 0.4574000E+00, &
     & 0.4700100E+00, 0.4777000E+00, 0.4878700E+00, 0.4892500E+00, &
     & 0.4875200E+00, 0.4627500E+00, 0.3815300E+00, 0.3815300E+00 /
      data (ref_adm( 1,iz,35,12),iz = 1,20) / &
     & 0.3769800E+00, 0.3769800E+00, 0.3938900E+00, 0.4010400E+00, &
     & 0.4041800E+00, 0.4053500E+00, 0.4149100E+00, 0.4158000E+00, &
     & 0.4286300E+00, 0.4402900E+00, 0.4462400E+00, 0.4646100E+00, &
     & 0.4770900E+00, 0.4877200E+00, 0.4926300E+00, 0.4929000E+00, &
     & 0.4876800E+00, 0.4642900E+00, 0.3788600E+00, 0.3788600E+00 /
      data (ref_adm( 1,iz,36,12),iz = 1,20) / &
     & 0.3918400E+00, 0.3918400E+00, 0.3914500E+00, 0.3995900E+00, &
     & 0.4126200E+00, 0.4080300E+00, 0.4156700E+00, 0.4233600E+00, &
     & 0.4258400E+00, 0.4409400E+00, 0.4555600E+00, 0.4784000E+00, &
     & 0.4940500E+00, 0.4964500E+00, 0.4964200E+00, 0.5014100E+00, &
     & 0.4944700E+00, 0.4682200E+00, 0.3785800E+00, 0.3785800E+00 /
      data (ref_adm( 1,iz,37,12),iz = 1,20) / &
     & 0.3893000E+00, 0.3893000E+00, 0.3996000E+00, 0.4045700E+00, &
     & 0.4125900E+00, 0.4172400E+00, 0.4157200E+00, 0.4140600E+00, &
     & 0.4276100E+00, 0.4376000E+00, 0.4653100E+00, 0.4861500E+00, &
     & 0.5107600E+00, 0.5092100E+00, 0.5045600E+00, 0.5024700E+00, &
     & 0.4992500E+00, 0.4678600E+00, 0.3622000E+00, 0.3622000E+00 /
      data (ref_adm( 1,iz,38,12),iz = 1,20) / &
     & 0.3893000E+00, 0.3893000E+00, 0.3996000E+00, 0.4045700E+00, &
     & 0.4125900E+00, 0.4172400E+00, 0.4157200E+00, 0.4140600E+00, &
     & 0.4276100E+00, 0.4376000E+00, 0.4653100E+00, 0.4861500E+00, &
     & 0.5107600E+00, 0.5092100E+00, 0.5045600E+00, 0.5024700E+00, &
     & 0.4992500E+00, 0.4678600E+00, 0.3622000E+00, 0.3622000E+00 /
! Solar Zenith Angle 60.0 Albedo  0.4472017E+00
      data (ref_adm( 1,iz, 1,13),iz = 1,20) / &
     & 0.3863500E+00, 0.3863500E+00, 0.3832900E+00, 0.3873800E+00, &
     & 0.3894100E+00, 0.3986700E+00, 0.4136800E+00, 0.4217700E+00, &
     & 0.4361500E+00, 0.4629900E+00, 0.5017800E+00, 0.5292600E+00, &
     & 0.5928800E+00, 0.6981400E+00, 0.7441600E+00, 0.8361400E+00, &
     & 0.9341800E+00, 0.9918500E+00, 0.8806700E+00, 0.8806700E+00 /
      data (ref_adm( 1,iz, 2,13),iz = 1,20) / &
     & 0.3863500E+00, 0.3863500E+00, 0.3832900E+00, 0.3873800E+00, &
     & 0.3894100E+00, 0.3986700E+00, 0.4136800E+00, 0.4217700E+00, &
     & 0.4361500E+00, 0.4629900E+00, 0.5017800E+00, 0.5292600E+00, &
     & 0.5928800E+00, 0.6981400E+00, 0.7441600E+00, 0.8361400E+00, &
     & 0.9341800E+00, 0.9918500E+00, 0.8806700E+00, 0.8806700E+00 /
      data (ref_adm( 1,iz, 3,13),iz = 1,20) / &
     & 0.3858500E+00, 0.3858500E+00, 0.3884700E+00, 0.3872300E+00, &
     & 0.3941200E+00, 0.3984800E+00, 0.4074500E+00, 0.4182600E+00, &
     & 0.4396700E+00, 0.4668900E+00, 0.4952200E+00, 0.5308200E+00, &
     & 0.5693200E+00, 0.6361800E+00, 0.7058800E+00, 0.7997600E+00, &
     & 0.8913000E+00, 0.9753600E+00, 0.8857200E+00, 0.8857200E+00 /
      data (ref_adm( 1,iz, 4,13),iz = 1,20) / &
     & 0.3837200E+00, 0.3837200E+00, 0.3897500E+00, 0.3901200E+00, &
     & 0.3918400E+00, 0.3977900E+00, 0.4011500E+00, 0.4149500E+00, &
     & 0.4374700E+00, 0.4560900E+00, 0.4788700E+00, 0.5248600E+00, &
     & 0.5659400E+00, 0.6251600E+00, 0.6836500E+00, 0.7588300E+00, &
     & 0.8536100E+00, 0.9287500E+00, 0.7959600E+00, 0.7959600E+00 /
      data (ref_adm( 1,iz, 5,13),iz = 1,20) / &
     & 0.3873400E+00, 0.3873400E+00, 0.3879600E+00, 0.3889100E+00, &
     & 0.3923500E+00, 0.3997000E+00, 0.4054800E+00, 0.4160800E+00, &
     & 0.4408300E+00, 0.4551100E+00, 0.4806600E+00, 0.5125100E+00, &
     & 0.5570700E+00, 0.6082200E+00, 0.6605300E+00, 0.7287100E+00, &
     & 0.8120900E+00, 0.8612000E+00, 0.7585300E+00, 0.7585300E+00 /
      data (ref_adm( 1,iz, 6,13),iz = 1,20) / &
     & 0.3739500E+00, 0.3739500E+00, 0.3730100E+00, 0.3734300E+00, &
     & 0.3795700E+00, 0.3862200E+00, 0.3939700E+00, 0.4101400E+00, &
     & 0.4262900E+00, 0.4475400E+00, 0.4762300E+00, 0.5144400E+00, &
     & 0.5556100E+00, 0.6212500E+00, 0.6802300E+00, 0.7423500E+00, &
     & 0.8254000E+00, 0.8361400E+00, 0.7380900E+00, 0.7380900E+00 /
      data (ref_adm( 1,iz, 7,13),iz = 1,20) / &
     & 0.3849200E+00, 0.3849200E+00, 0.3902700E+00, 0.3931100E+00, &
     & 0.3970900E+00, 0.4053600E+00, 0.4161800E+00, 0.4292900E+00, &
     & 0.4402500E+00, 0.4554100E+00, 0.4776100E+00, 0.5051400E+00, &
     & 0.5410100E+00, 0.5949900E+00, 0.6278200E+00, 0.6780000E+00, &
     & 0.7312400E+00, 0.7336800E+00, 0.6420300E+00, 0.6420300E+00 /
      data (ref_adm( 1,iz, 8,13),iz = 1,20) / &
     & 0.3874400E+00, 0.3874400E+00, 0.3837600E+00, 0.3846600E+00, &
     & 0.3939100E+00, 0.4028100E+00, 0.4157700E+00, 0.4230100E+00, &
     & 0.4322500E+00, 0.4453000E+00, 0.4650500E+00, 0.4915700E+00, &
     & 0.5205000E+00, 0.5755400E+00, 0.6090200E+00, 0.6497000E+00, &
     & 0.7056900E+00, 0.6979400E+00, 0.5875500E+00, 0.5875500E+00 /
      data (ref_adm( 1,iz, 9,13),iz = 1,20) / &
     & 0.3697400E+00, 0.3697400E+00, 0.3710900E+00, 0.3816500E+00, &
     & 0.3797700E+00, 0.3930500E+00, 0.3985300E+00, 0.4006600E+00, &
     & 0.4144100E+00, 0.4211300E+00, 0.4450200E+00, 0.4689600E+00, &
     & 0.4932400E+00, 0.5407400E+00, 0.5812400E+00, 0.6256900E+00, &
     & 0.6646600E+00, 0.6619500E+00, 0.5521500E+00, 0.5521500E+00 /
      data (ref_adm( 1,iz,10,13),iz = 1,20) / &
     & 0.3724400E+00, 0.3724400E+00, 0.3734300E+00, 0.3834200E+00, &
     & 0.3850600E+00, 0.3871300E+00, 0.3922900E+00, 0.3954000E+00, &
     & 0.4035200E+00, 0.4199100E+00, 0.4407200E+00, 0.4599900E+00, &
     & 0.4775800E+00, 0.5214700E+00, 0.5527600E+00, 0.5899600E+00, &
     & 0.6282500E+00, 0.6148800E+00, 0.5025600E+00, 0.5025600E+00 /
      data (ref_adm( 1,iz,11,13),iz = 1,20) / &
     & 0.3746300E+00, 0.3746300E+00, 0.3744000E+00, 0.3787400E+00, &
     & 0.3815200E+00, 0.3773200E+00, 0.3840900E+00, 0.3925500E+00, &
     & 0.4033000E+00, 0.4181300E+00, 0.4405100E+00, 0.4588900E+00, &
     & 0.4707300E+00, 0.4979200E+00, 0.5298900E+00, 0.5615000E+00, &
     & 0.5794200E+00, 0.5705700E+00, 0.4741700E+00, 0.4741700E+00 /
      data (ref_adm( 1,iz,12,13),iz = 1,20) / &
     & 0.3734500E+00, 0.3734500E+00, 0.3764200E+00, 0.3783400E+00, &
     & 0.3848000E+00, 0.3800900E+00, 0.3850700E+00, 0.3944500E+00, &
     & 0.4051100E+00, 0.4147500E+00, 0.4363600E+00, 0.4539200E+00, &
     & 0.4687800E+00, 0.4844900E+00, 0.4995900E+00, 0.5336300E+00, &
     & 0.5500500E+00, 0.5248700E+00, 0.4433400E+00, 0.4433400E+00 /
      data (ref_adm( 1,iz,13,13),iz = 1,20) / &
     & 0.3772400E+00, 0.3772400E+00, 0.3740800E+00, 0.3785400E+00, &
     & 0.3819600E+00, 0.3796600E+00, 0.3874200E+00, 0.3939800E+00, &
     & 0.4015000E+00, 0.4133800E+00, 0.4301100E+00, 0.4423800E+00, &
     & 0.4484400E+00, 0.4738700E+00, 0.4839300E+00, 0.5059900E+00, &
     & 0.5258000E+00, 0.4966500E+00, 0.3961100E+00, 0.3961100E+00 /
      data (ref_adm( 1,iz,14,13),iz = 1,20) / &
     & 0.3936700E+00, 0.3936700E+00, 0.3975000E+00, 0.3996000E+00, &
     & 0.4024100E+00, 0.4046800E+00, 0.4092100E+00, 0.4159900E+00, &
     & 0.4216100E+00, 0.4315500E+00, 0.4444200E+00, 0.4630900E+00, &
     & 0.4792900E+00, 0.4944100E+00, 0.4695100E+00, 0.4916900E+00, &
     & 0.5010200E+00, 0.4707100E+00, 0.3577100E+00, 0.3577100E+00 /
      data (ref_adm( 1,iz,15,13),iz = 1,20) / &
     & 0.3862600E+00, 0.3862600E+00, 0.3607500E+00, 0.3570500E+00, &
     & 0.3622000E+00, 0.3679500E+00, 0.3761400E+00, 0.3881700E+00, &
     & 0.4042200E+00, 0.4127200E+00, 0.4258700E+00, 0.4397800E+00, &
     & 0.4560500E+00, 0.4741000E+00, 0.4581700E+00, 0.4730300E+00, &
     & 0.4777100E+00, 0.4526300E+00, 0.3651300E+00, 0.3651300E+00 /
      data (ref_adm( 1,iz,16,13),iz = 1,20) / &
     & 0.3573700E+00, 0.3573700E+00, 0.3722000E+00, 0.3828100E+00, &
     & 0.3797300E+00, 0.3826400E+00, 0.3732300E+00, 0.3719600E+00, &
     & 0.3686100E+00, 0.3789600E+00, 0.3814900E+00, 0.3819700E+00, &
     & 0.3852700E+00, 0.3966300E+00, 0.4539900E+00, 0.4580900E+00, &
     & 0.4581700E+00, 0.4510500E+00, 0.5197649E+00, 0.5197649E+00 /
      data (ref_adm( 1,iz,17,13),iz = 1,20) / &
     & 0.3791400E+00, 0.3791400E+00, 0.3815400E+00, 0.3828000E+00, &
     & 0.3768700E+00, 0.3842000E+00, 0.3883400E+00, 0.3976900E+00, &
     & 0.4064600E+00, 0.4082400E+00, 0.4171200E+00, 0.4247100E+00, &
     & 0.4247600E+00, 0.4307700E+00, 0.4372100E+00, 0.4448700E+00, &
     & 0.4489900E+00, 0.3592400E+00, 0.5037394E+00, 0.5037394E+00 /
      data (ref_adm( 1,iz,18,13),iz = 1,20) / &
     & 0.3674800E+00, 0.3674800E+00, 0.3815700E+00, 0.3820500E+00, &
     & 0.3792000E+00, 0.3872400E+00, 0.3904500E+00, 0.3959700E+00, &
     & 0.3996700E+00, 0.4078100E+00, 0.4126200E+00, 0.4172800E+00, &
     & 0.4246100E+00, 0.4277500E+00, 0.4297700E+00, 0.4383700E+00, &
     & 0.4605500E+00, 0.4061784E+00, 0.3568929E+00, 0.3568929E+00 /
      data (ref_adm( 1,iz,19,13),iz = 1,20) / &
     & 0.3675400E+00, 0.3675400E+00, 0.3830300E+00, 0.3846300E+00, &
     & 0.3822000E+00, 0.3814300E+00, 0.3913000E+00, 0.3951700E+00, &
     & 0.4067700E+00, 0.4087200E+00, 0.4142500E+00, 0.4121100E+00, &
     & 0.4186000E+00, 0.4252500E+00, 0.4302800E+00, 0.4389500E+00, &
     & 0.3392800E+00, 0.3977341E+00, 0.3521816E+00, 0.3521816E+00 /
      data (ref_adm( 1,iz,20,13),iz = 1,20) / &
     & 0.3819000E+00, 0.3819000E+00, 0.3865500E+00, 0.3823300E+00, &
     & 0.3801300E+00, 0.3856300E+00, 0.3862800E+00, 0.3888100E+00, &
     & 0.4033500E+00, 0.4074200E+00, 0.4176100E+00, 0.4206200E+00, &
     & 0.4242100E+00, 0.4193400E+00, 0.4295000E+00, 0.4257100E+00, &
     & 0.4143910E+00, 0.3917375E+00, 0.3497027E+00, 0.3497027E+00 /
      data (ref_adm( 1,iz,21,13),iz = 1,20) / &
     & 0.3781800E+00, 0.3781800E+00, 0.3754100E+00, 0.3806000E+00, &
     & 0.3808300E+00, 0.3868000E+00, 0.3954300E+00, 0.3974800E+00, &
     & 0.4042400E+00, 0.4133800E+00, 0.4201500E+00, 0.4208600E+00, &
     & 0.4274400E+00, 0.4248800E+00, 0.4354200E+00, 0.4463600E+00, &
     & 0.4097280E+00, 0.3874951E+00, 0.3488723E+00, 0.3488723E+00 /
      data (ref_adm( 1,iz,22,13),iz = 1,20) / &
     & 0.3773100E+00, 0.3773100E+00, 0.3792600E+00, 0.3823200E+00, &
     & 0.3787100E+00, 0.3800500E+00, 0.3910100E+00, 0.3988200E+00, &
     & 0.4025000E+00, 0.4112100E+00, 0.4200500E+00, 0.4249500E+00, &
     & 0.4278800E+00, 0.4250900E+00, 0.4313100E+00, 0.4528800E+00, &
     & 0.4039837E+00, 0.3832256E+00, 0.3534286E+00, 0.3534286E+00 /
      data (ref_adm( 1,iz,23,13),iz = 1,20) / &
     & 0.3796600E+00, 0.3796600E+00, 0.3794300E+00, 0.3778800E+00, &
     & 0.3784000E+00, 0.3854700E+00, 0.3924800E+00, 0.3995100E+00, &
     & 0.4019700E+00, 0.4134200E+00, 0.4206500E+00, 0.4268400E+00, &
     & 0.4305500E+00, 0.4353900E+00, 0.4328500E+00, 0.4405400E+00, &
     & 0.4777700E+00, 0.3835585E+00, 0.3565949E+00, 0.3565949E+00 /
      data (ref_adm( 1,iz,24,13),iz = 1,20) / &
     & 0.3568200E+00, 0.3568200E+00, 0.3403600E+00, 0.3391700E+00, &
     & 0.3439600E+00, 0.3510400E+00, 0.3583300E+00, 0.3678700E+00, &
     & 0.3838700E+00, 0.3973700E+00, 0.4233500E+00, 0.4334700E+00, &
     & 0.4289300E+00, 0.4246800E+00, 0.4295100E+00, 0.4405500E+00, &
     & 0.4604500E+00, 0.3862302E+00, 0.3615065E+00, 0.3615065E+00 /
      data (ref_adm( 1,iz,25,13),iz = 1,20) / &
     & 0.3697900E+00, 0.3697900E+00, 0.3925800E+00, 0.3936500E+00, &
     & 0.3952700E+00, 0.3930300E+00, 0.3917600E+00, 0.3900100E+00, &
     & 0.3935900E+00, 0.3946100E+00, 0.3959000E+00, 0.3985900E+00, &
     & 0.3995400E+00, 0.4061300E+00, 0.4309000E+00, 0.4451900E+00, &
     & 0.4577800E+00, 0.4568600E+00, 0.3678908E+00, 0.3678908E+00 /
      data (ref_adm( 1,iz,26,13),iz = 1,20) / &
     & 0.3894100E+00, 0.3894100E+00, 0.3964400E+00, 0.3997100E+00, &
     & 0.4029600E+00, 0.4053600E+00, 0.4073700E+00, 0.4095600E+00, &
     & 0.4154500E+00, 0.4208600E+00, 0.4289900E+00, 0.4368300E+00, &
     & 0.4396400E+00, 0.4392400E+00, 0.4482300E+00, 0.4581500E+00, &
     & 0.4635400E+00, 0.4574000E+00, 0.3759637E+00, 0.3759637E+00 /
      data (ref_adm( 1,iz,27,13),iz = 1,20) / &
     & 0.3901600E+00, 0.3901600E+00, 0.3766100E+00, 0.3786200E+00, &
     & 0.3915300E+00, 0.3929900E+00, 0.3984400E+00, 0.4037300E+00, &
     & 0.4059400E+00, 0.4187700E+00, 0.4335500E+00, 0.4454500E+00, &
     & 0.4537700E+00, 0.4609100E+00, 0.4645100E+00, 0.4512900E+00, &
     & 0.4564000E+00, 0.4519500E+00, 0.3834000E+00, 0.3834000E+00 /
      data (ref_adm( 1,iz,28,13),iz = 1,20) / &
     & 0.3766000E+00, 0.3766000E+00, 0.3754900E+00, 0.3759900E+00, &
     & 0.3838800E+00, 0.3901500E+00, 0.4005300E+00, 0.4070000E+00, &
     & 0.4068000E+00, 0.4214400E+00, 0.4392600E+00, 0.4488800E+00, &
     & 0.4602000E+00, 0.4693100E+00, 0.4720300E+00, 0.4656500E+00, &
     & 0.4666300E+00, 0.4541300E+00, 0.3858600E+00, 0.3858600E+00 /
      data (ref_adm( 1,iz,29,13),iz = 1,20) / &
     & 0.3823200E+00, 0.3823200E+00, 0.3678700E+00, 0.3750600E+00, &
     & 0.3853000E+00, 0.3930700E+00, 0.4046900E+00, 0.4078200E+00, &
     & 0.4148200E+00, 0.4245500E+00, 0.4455000E+00, 0.4552000E+00, &
     & 0.4599500E+00, 0.4724400E+00, 0.4842000E+00, 0.4911600E+00, &
     & 0.4860600E+00, 0.4678800E+00, 0.3922700E+00, 0.3922700E+00 /
      data (ref_adm( 1,iz,30,13),iz = 1,20) / &
     & 0.3694300E+00, 0.3694300E+00, 0.3722200E+00, 0.3783100E+00, &
     & 0.3877000E+00, 0.3965100E+00, 0.4036500E+00, 0.4112900E+00, &
     & 0.4198400E+00, 0.4252800E+00, 0.4387000E+00, 0.4526100E+00, &
     & 0.4651300E+00, 0.4771700E+00, 0.4868100E+00, 0.4961500E+00, &
     & 0.5012600E+00, 0.4823000E+00, 0.4029000E+00, 0.4029000E+00 /
      data (ref_adm( 1,iz,31,13),iz = 1,20) / &
     & 0.3737100E+00, 0.3737100E+00, 0.3890200E+00, 0.3932400E+00, &
     & 0.3995900E+00, 0.4065900E+00, 0.4166200E+00, 0.4240900E+00, &
     & 0.4324800E+00, 0.4398700E+00, 0.4492000E+00, 0.4620500E+00, &
     & 0.4723400E+00, 0.4809000E+00, 0.4918900E+00, 0.4983900E+00, &
     & 0.5069900E+00, 0.4943400E+00, 0.4096000E+00, 0.4096000E+00 /
      data (ref_adm( 1,iz,32,13),iz = 1,20) / &
     & 0.3862300E+00, 0.3862300E+00, 0.3932300E+00, 0.3960500E+00, &
     & 0.4040000E+00, 0.4106300E+00, 0.4232100E+00, 0.4311000E+00, &
     & 0.4393500E+00, 0.4467800E+00, 0.4558700E+00, 0.4685900E+00, &
     & 0.4844500E+00, 0.4936500E+00, 0.5016700E+00, 0.5092400E+00, &
     & 0.5107200E+00, 0.4918300E+00, 0.4090900E+00, 0.4090900E+00 /
      data (ref_adm( 1,iz,33,13),iz = 1,20) / &
     & 0.3827600E+00, 0.3827600E+00, 0.3774700E+00, 0.3795900E+00, &
     & 0.3847800E+00, 0.4014800E+00, 0.4093400E+00, 0.4154900E+00, &
     & 0.4255500E+00, 0.4391000E+00, 0.4476400E+00, 0.4567500E+00, &
     & 0.4752300E+00, 0.4914200E+00, 0.5053100E+00, 0.5171700E+00, &
     & 0.5168300E+00, 0.4994700E+00, 0.4149400E+00, 0.4149400E+00 /
      data (ref_adm( 1,iz,34,13),iz = 1,20) / &
     & 0.3805800E+00, 0.3805800E+00, 0.3866600E+00, 0.3973500E+00, &
     & 0.4078700E+00, 0.4156900E+00, 0.4186000E+00, 0.4262900E+00, &
     & 0.4352800E+00, 0.4469200E+00, 0.4580600E+00, 0.4670800E+00, &
     & 0.4829800E+00, 0.4993400E+00, 0.5128100E+00, 0.5177900E+00, &
     & 0.5228400E+00, 0.5036800E+00, 0.4143300E+00, 0.4143300E+00 /
      data (ref_adm( 1,iz,35,13),iz = 1,20) / &
     & 0.3803000E+00, 0.3803000E+00, 0.3859900E+00, 0.3899400E+00, &
     & 0.4011100E+00, 0.4158700E+00, 0.4235300E+00, 0.4254800E+00, &
     & 0.4283800E+00, 0.4432400E+00, 0.4595200E+00, 0.4748100E+00, &
     & 0.4966000E+00, 0.5125300E+00, 0.5232000E+00, 0.5207300E+00, &
     & 0.5279600E+00, 0.5076500E+00, 0.4178200E+00, 0.4178200E+00 /
      data (ref_adm( 1,iz,36,13),iz = 1,20) / &
     & 0.3903200E+00, 0.3903200E+00, 0.3949500E+00, 0.3947400E+00, &
     & 0.3989100E+00, 0.4176000E+00, 0.4280700E+00, 0.4301300E+00, &
     & 0.4338600E+00, 0.4459600E+00, 0.4619600E+00, 0.4835900E+00, &
     & 0.5122200E+00, 0.5274800E+00, 0.5272000E+00, 0.5279700E+00, &
     & 0.5290500E+00, 0.5119100E+00, 0.4164900E+00, 0.4164900E+00 /
      data (ref_adm( 1,iz,37,13),iz = 1,20) / &
     & 0.3899100E+00, 0.3899100E+00, 0.4002100E+00, 0.3995600E+00, &
     & 0.3999000E+00, 0.4079500E+00, 0.4233000E+00, 0.4308700E+00, &
     & 0.4360700E+00, 0.4424700E+00, 0.4643000E+00, 0.4913900E+00, &
     & 0.5159700E+00, 0.5488700E+00, 0.5362300E+00, 0.5309100E+00, &
     & 0.5304400E+00, 0.5146300E+00, 0.4151000E+00, 0.4151000E+00 /
      data (ref_adm( 1,iz,38,13),iz = 1,20) / &
     & 0.3899100E+00, 0.3899100E+00, 0.4002100E+00, 0.3995600E+00, &
     & 0.3999000E+00, 0.4079500E+00, 0.4233000E+00, 0.4308700E+00, &
     & 0.4360700E+00, 0.4424700E+00, 0.4643000E+00, 0.4913900E+00, &
     & 0.5159700E+00, 0.5488700E+00, 0.5362300E+00, 0.5309100E+00, &
     & 0.5304400E+00, 0.5146300E+00, 0.4151000E+00, 0.4151000E+00 /
! Solar Zenith Angle 65.0 Albedo  0.4744267E+00
      data (ref_adm( 1,iz, 1,14),iz = 1,20) / &
     & 0.3733200E+00, 0.3733200E+00, 0.3781200E+00, 0.3876000E+00, &
     & 0.3925900E+00, 0.4037200E+00, 0.4158300E+00, 0.4352700E+00, &
     & 0.4591000E+00, 0.4951500E+00, 0.5300100E+00, 0.5850400E+00, &
     & 0.6662300E+00, 0.8039900E+00, 0.9490700E+00, 0.1091400E+01, &
     & 0.1171300E+01, 0.1187200E+01, 0.9558867E+00, 0.9558867E+00 /
      data (ref_adm( 1,iz, 2,14),iz = 1,20) / &
     & 0.3733200E+00, 0.3733200E+00, 0.3781200E+00, 0.3876000E+00, &
     & 0.3925900E+00, 0.4037200E+00, 0.4158300E+00, 0.4352700E+00, &
     & 0.4591000E+00, 0.4951500E+00, 0.5300100E+00, 0.5850400E+00, &
     & 0.6662300E+00, 0.8039900E+00, 0.9490700E+00, 0.1091400E+01, &
     & 0.1171300E+01, 0.1187200E+01, 0.9558867E+00, 0.9558867E+00 /
      data (ref_adm( 1,iz, 3,14),iz = 1,20) / &
     & 0.3792800E+00, 0.3792800E+00, 0.3804100E+00, 0.3850500E+00, &
     & 0.3906600E+00, 0.4025700E+00, 0.4140400E+00, 0.4331100E+00, &
     & 0.4549700E+00, 0.4913300E+00, 0.5324300E+00, 0.5863300E+00, &
     & 0.6531000E+00, 0.7588100E+00, 0.8712400E+00, 0.1014200E+01, &
     & 0.1105400E+01, 0.1161100E+01, 0.2537202E+00, 0.2537202E+00 /
      data (ref_adm( 1,iz, 4,14),iz = 1,20) / &
     & 0.3824700E+00, 0.3824700E+00, 0.3845800E+00, 0.3849600E+00, &
     & 0.3899500E+00, 0.3992000E+00, 0.4152900E+00, 0.4344900E+00, &
     & 0.4544400E+00, 0.4836700E+00, 0.5226800E+00, 0.5848900E+00, &
     & 0.6427300E+00, 0.7283900E+00, 0.8182600E+00, 0.9532500E+00, &
     & 0.1056200E+01, 0.1092700E+01, 0.9010416E+00, 0.9010416E+00 /
      data (ref_adm( 1,iz, 5,14),iz = 1,20) / &
     & 0.3841400E+00, 0.3841400E+00, 0.3944800E+00, 0.3956200E+00, &
     & 0.3948500E+00, 0.4062700E+00, 0.4206000E+00, 0.4366200E+00, &
     & 0.4612700E+00, 0.4896200E+00, 0.5230200E+00, 0.5731800E+00, &
     & 0.6331400E+00, 0.7038500E+00, 0.7731200E+00, 0.8943100E+00, &
     & 0.9909500E+00, 0.1029100E+01, 0.8538474E+00, 0.8538474E+00 /
      data (ref_adm( 1,iz, 6,14),iz = 1,20) / &
     & 0.3717300E+00, 0.3717300E+00, 0.3717800E+00, 0.3751700E+00, &
     & 0.3820600E+00, 0.3908500E+00, 0.4052000E+00, 0.4213200E+00, &
     & 0.4434700E+00, 0.4741400E+00, 0.5122400E+00, 0.5643100E+00, &
     & 0.6207800E+00, 0.6946500E+00, 0.7726100E+00, 0.8678100E+00, &
     & 0.9772300E+00, 0.1032300E+01, 0.9600100E+00, 0.9600100E+00 /
      data (ref_adm( 1,iz, 7,14),iz = 1,20) / &
     & 0.3945100E+00, 0.3945100E+00, 0.4008100E+00, 0.4041800E+00, &
     & 0.4086900E+00, 0.4167800E+00, 0.4269000E+00, 0.4402100E+00, &
     & 0.4577000E+00, 0.4833700E+00, 0.5140600E+00, 0.5527000E+00, &
     & 0.5921000E+00, 0.6503100E+00, 0.7071200E+00, 0.7767800E+00, &
     & 0.8413600E+00, 0.8577900E+00, 0.8125100E+00, 0.8125100E+00 /
      data (ref_adm( 1,iz, 8,14),iz = 1,20) / &
     & 0.3899800E+00, 0.3899800E+00, 0.3870500E+00, 0.3865900E+00, &
     & 0.3950600E+00, 0.4010200E+00, 0.4050600E+00, 0.4249700E+00, &
     & 0.4416700E+00, 0.4710100E+00, 0.4984400E+00, 0.5372800E+00, &
     & 0.5803200E+00, 0.6382400E+00, 0.6952900E+00, 0.7765400E+00, &
     & 0.8461600E+00, 0.8273100E+00, 0.7627200E+00, 0.7627200E+00 /
      data (ref_adm( 1,iz, 9,14),iz = 1,20) / &
     & 0.3924800E+00, 0.3924800E+00, 0.3914800E+00, 0.3917900E+00, &
     & 0.3932200E+00, 0.4004600E+00, 0.4107300E+00, 0.4232200E+00, &
     & 0.4446600E+00, 0.4671600E+00, 0.4904400E+00, 0.5255300E+00, &
     & 0.5637100E+00, 0.6074400E+00, 0.6523400E+00, 0.7399900E+00, &
     & 0.7905800E+00, 0.7660600E+00, 0.6893100E+00, 0.6893100E+00 /
      data (ref_adm( 1,iz,10,14),iz = 1,20) / &
     & 0.3904000E+00, 0.3904000E+00, 0.3880000E+00, 0.3918700E+00, &
     & 0.3935800E+00, 0.3953500E+00, 0.4082300E+00, 0.4210500E+00, &
     & 0.4399000E+00, 0.4562200E+00, 0.4741100E+00, 0.5070900E+00, &
     & 0.5374000E+00, 0.5767800E+00, 0.6207000E+00, 0.6836200E+00, &
     & 0.7237900E+00, 0.7035200E+00, 0.6205800E+00, 0.6205800E+00 /
      data (ref_adm( 1,iz,11,14),iz = 1,20) / &
     & 0.3873700E+00, 0.3873700E+00, 0.3847500E+00, 0.3889300E+00, &
     & 0.3907100E+00, 0.3964100E+00, 0.4042400E+00, 0.4175600E+00, &
     & 0.4305300E+00, 0.4462400E+00, 0.4615500E+00, 0.4864200E+00, &
     & 0.5233300E+00, 0.5539700E+00, 0.5903800E+00, 0.6430900E+00, &
     & 0.6789800E+00, 0.6576100E+00, 0.5568900E+00, 0.5568900E+00 /
      data (ref_adm( 1,iz,12,14),iz = 1,20) / &
     & 0.3818100E+00, 0.3818100E+00, 0.3823200E+00, 0.3879100E+00, &
     & 0.3922800E+00, 0.3987900E+00, 0.4063300E+00, 0.4168100E+00, &
     & 0.4255400E+00, 0.4378700E+00, 0.4533500E+00, 0.4790800E+00, &
     & 0.5004500E+00, 0.5362900E+00, 0.5696200E+00, 0.6004800E+00, &
     & 0.6244000E+00, 0.6087500E+00, 0.5149000E+00, 0.5149000E+00 /
      data (ref_adm( 1,iz,13,14),iz = 1,20) / &
     & 0.3850500E+00, 0.3850500E+00, 0.3838700E+00, 0.3873800E+00, &
     & 0.3985600E+00, 0.4045600E+00, 0.4096100E+00, 0.4163400E+00, &
     & 0.4254200E+00, 0.4322400E+00, 0.4397100E+00, 0.4633400E+00, &
     & 0.4883900E+00, 0.5160200E+00, 0.5381300E+00, 0.5715500E+00, &
     & 0.5845500E+00, 0.5655500E+00, 0.4882300E+00, 0.4882300E+00 /
      data (ref_adm( 1,iz,14,14),iz = 1,20) / &
     & 0.4015600E+00, 0.4015600E+00, 0.4081100E+00, 0.4119900E+00, &
     & 0.4162500E+00, 0.4196600E+00, 0.4250000E+00, 0.4301200E+00, &
     & 0.4376200E+00, 0.4484000E+00, 0.4613900E+00, 0.4782300E+00, &
     & 0.4954800E+00, 0.5153200E+00, 0.5166900E+00, 0.5479100E+00, &
     & 0.5622400E+00, 0.5372100E+00, 0.4296500E+00, 0.4296500E+00 /
      data (ref_adm( 1,iz,15,14),iz = 1,20) / &
     & 0.4062800E+00, 0.4062800E+00, 0.3785000E+00, 0.3731400E+00, &
     & 0.3786900E+00, 0.3858400E+00, 0.3964300E+00, 0.4108900E+00, &
     & 0.4254800E+00, 0.4425200E+00, 0.4614800E+00, 0.4825900E+00, &
     & 0.4965800E+00, 0.5132100E+00, 0.5121900E+00, 0.5213600E+00, &
     & 0.5299300E+00, 0.5176100E+00, 0.4677087E+00, 0.4677087E+00 /
      data (ref_adm( 1,iz,16,14),iz = 1,20) / &
     & 0.3579200E+00, 0.3579200E+00, 0.3448300E+00, 0.3572900E+00, &
     & 0.3573300E+00, 0.3542700E+00, 0.3558900E+00, 0.3668000E+00, &
     & 0.3784400E+00, 0.3900800E+00, 0.3976500E+00, 0.4024900E+00, &
     & 0.4110100E+00, 0.4236900E+00, 0.4805900E+00, 0.5026800E+00, &
     & 0.5305000E+00, 0.5383100E+00, 0.4505076E+00, 0.4505076E+00 /
      data (ref_adm( 1,iz,17,14),iz = 1,20) / &
     & 0.3812900E+00, 0.3812900E+00, 0.3858200E+00, 0.3902900E+00, &
     & 0.3913500E+00, 0.3975200E+00, 0.4016300E+00, 0.4067400E+00, &
     & 0.4116800E+00, 0.4169500E+00, 0.4267400E+00, 0.4399400E+00, &
     & 0.4453800E+00, 0.4619800E+00, 0.4738500E+00, 0.4862600E+00, &
     & 0.5184200E+00, 0.4815459E+00, 0.4363999E+00, 0.4363999E+00 /
      data (ref_adm( 1,iz,18,14),iz = 1,20) / &
     & 0.3729500E+00, 0.3729500E+00, 0.3833300E+00, 0.3866700E+00, &
     & 0.3939600E+00, 0.3928700E+00, 0.4004800E+00, 0.4040200E+00, &
     & 0.4154100E+00, 0.4212700E+00, 0.4238700E+00, 0.4346200E+00, &
     & 0.4431800E+00, 0.4563400E+00, 0.4691700E+00, 0.4822000E+00, &
     & 0.4960300E+00, 0.5010874E+00, 0.4606446E+00, 0.4606446E+00 /
      data (ref_adm( 1,iz,19,14),iz = 1,20) / &
     & 0.3704800E+00, 0.3704800E+00, 0.3839600E+00, 0.3901700E+00, &
     & 0.3958000E+00, 0.4015600E+00, 0.3999100E+00, 0.4032100E+00, &
     & 0.4109900E+00, 0.4175900E+00, 0.4256000E+00, 0.4347500E+00, &
     & 0.4460700E+00, 0.4511000E+00, 0.4619500E+00, 0.4686000E+00, &
     & 0.4905381E+00, 0.4917735E+00, 0.4523103E+00, 0.4523103E+00 /
      data (ref_adm( 1,iz,20,14),iz = 1,20) / &
     & 0.3804100E+00, 0.3804100E+00, 0.3787400E+00, 0.3846100E+00, &
     & 0.3903200E+00, 0.3936400E+00, 0.3960400E+00, 0.4029900E+00, &
     & 0.4066800E+00, 0.4141300E+00, 0.4201200E+00, 0.4303900E+00, &
     & 0.4396100E+00, 0.4488900E+00, 0.4577100E+00, 0.4677000E+00, &
     & 0.4834560E+00, 0.4848171E+00, 0.4473642E+00, 0.4473642E+00 /
      data (ref_adm( 1,iz,21,14),iz = 1,20) / &
     & 0.3800000E+00, 0.3800000E+00, 0.3806600E+00, 0.3856800E+00, &
     & 0.3888500E+00, 0.3925900E+00, 0.3918400E+00, 0.3953300E+00, &
     & 0.4058800E+00, 0.4112100E+00, 0.4194500E+00, 0.4302000E+00, &
     & 0.4407800E+00, 0.4490500E+00, 0.4568200E+00, 0.4819700E+00, &
     & 0.4775782E+00, 0.4783998E+00, 0.4442196E+00, 0.4442196E+00 /
      data (ref_adm( 1,iz,22,14),iz = 1,20) / &
     & 0.3806400E+00, 0.3806400E+00, 0.3855300E+00, 0.3848000E+00, &
     & 0.3885300E+00, 0.3922700E+00, 0.3912200E+00, 0.3986300E+00, &
     & 0.4045100E+00, 0.4149700E+00, 0.4235200E+00, 0.4260800E+00, &
     & 0.4379000E+00, 0.4481400E+00, 0.4545400E+00, 0.4946000E+00, &
     & 0.4490591E+00, 0.4323533E+00, 0.4029720E+00, 0.4029720E+00 /
      data (ref_adm( 1,iz,23,14),iz = 1,20) / &
     & 0.3862700E+00, 0.3862700E+00, 0.3934200E+00, 0.3920400E+00, &
     & 0.3920500E+00, 0.3923500E+00, 0.3974000E+00, 0.4040500E+00, &
     & 0.4070800E+00, 0.4161500E+00, 0.4283700E+00, 0.4324200E+00, &
     & 0.4447800E+00, 0.4503200E+00, 0.4644000E+00, 0.4852900E+00, &
     & 0.5281800E+00, 0.4315777E+00, 0.4064654E+00, 0.4064654E+00 /
      data (ref_adm( 1,iz,24,14),iz = 1,20) / &
     & 0.3487300E+00, 0.3487300E+00, 0.3448200E+00, 0.3464800E+00, &
     & 0.3518900E+00, 0.3572000E+00, 0.3622700E+00, 0.3689500E+00, &
     & 0.3769700E+00, 0.3872200E+00, 0.3980000E+00, 0.4106200E+00, &
     & 0.4294200E+00, 0.4518700E+00, 0.4542400E+00, 0.4737600E+00, &
     & 0.5037900E+00, 0.4337775E+00, 0.4122842E+00, 0.4122842E+00 /
      data (ref_adm( 1,iz,25,14),iz = 1,20) / &
     & 0.3884000E+00, 0.3884000E+00, 0.4158600E+00, 0.4186300E+00, &
     & 0.4219600E+00, 0.4243900E+00, 0.4288800E+00, 0.4310200E+00, &
     & 0.4343900E+00, 0.4318300E+00, 0.4305500E+00, 0.4299500E+00, &
     & 0.4318300E+00, 0.4359300E+00, 0.4557800E+00, 0.4757400E+00, &
     & 0.5008800E+00, 0.5206800E+00, 0.4199915E+00, 0.4199915E+00 /
      data (ref_adm( 1,iz,26,14),iz = 1,20) / &
     & 0.3996900E+00, 0.3996900E+00, 0.4052500E+00, 0.4141200E+00, &
     & 0.4180900E+00, 0.4209100E+00, 0.4234800E+00, 0.4270100E+00, &
     & 0.4277200E+00, 0.4335300E+00, 0.4413800E+00, 0.4490500E+00, &
     & 0.4595800E+00, 0.4716200E+00, 0.4819200E+00, 0.4937300E+00, &
     & 0.4967300E+00, 0.5039600E+00, 0.4301104E+00, 0.4301104E+00 /
      data (ref_adm( 1,iz,27,14),iz = 1,20) / &
     & 0.3917000E+00, 0.3917000E+00, 0.3883400E+00, 0.3920700E+00, &
     & 0.3971300E+00, 0.4054200E+00, 0.4050800E+00, 0.4149800E+00, &
     & 0.4232000E+00, 0.4261100E+00, 0.4331300E+00, 0.4465400E+00, &
     & 0.4630000E+00, 0.4763200E+00, 0.4851900E+00, 0.4967900E+00, &
     & 0.5008500E+00, 0.4979400E+00, 0.4422300E+00, 0.4422300E+00 /
      data (ref_adm( 1,iz,28,14),iz = 1,20) / &
     & 0.3791900E+00, 0.3791900E+00, 0.3886500E+00, 0.3942600E+00, &
     & 0.3984700E+00, 0.4055800E+00, 0.4096800E+00, 0.4223600E+00, &
     & 0.4305800E+00, 0.4378200E+00, 0.4504500E+00, 0.4645300E+00, &
     & 0.4738200E+00, 0.4902100E+00, 0.5051500E+00, 0.5190100E+00, &
     & 0.5212400E+00, 0.5159500E+00, 0.4438000E+00, 0.4438000E+00 /
      data (ref_adm( 1,iz,29,14),iz = 1,20) / &
     & 0.3931000E+00, 0.3931000E+00, 0.3933700E+00, 0.3956400E+00, &
     & 0.4009500E+00, 0.4057600E+00, 0.4126600E+00, 0.4210000E+00, &
     & 0.4320900E+00, 0.4459000E+00, 0.4549100E+00, 0.4674700E+00, &
     & 0.4830000E+00, 0.4990900E+00, 0.5201700E+00, 0.5364100E+00, &
     & 0.5319100E+00, 0.5226100E+00, 0.4451400E+00, 0.4451400E+00 /
      data (ref_adm( 1,iz,30,14),iz = 1,20) / &
     & 0.3912400E+00, 0.3912400E+00, 0.3936300E+00, 0.3931200E+00, &
     & 0.3989400E+00, 0.4051700E+00, 0.4126500E+00, 0.4267100E+00, &
     & 0.4367900E+00, 0.4566200E+00, 0.4642700E+00, 0.4731900E+00, &
     & 0.4829400E+00, 0.4992900E+00, 0.5226100E+00, 0.5457700E+00, &
     & 0.5550400E+00, 0.5416100E+00, 0.4613900E+00, 0.4613900E+00 /
      data (ref_adm( 1,iz,31,14),iz = 1,20) / &
     & 0.3896400E+00, 0.3896400E+00, 0.3893800E+00, 0.3935200E+00, &
     & 0.4000300E+00, 0.4080900E+00, 0.4173500E+00, 0.4243700E+00, &
     & 0.4435300E+00, 0.4579900E+00, 0.4704400E+00, 0.4718300E+00, &
     & 0.4824500E+00, 0.4987600E+00, 0.5232100E+00, 0.5472900E+00, &
     & 0.5520900E+00, 0.5412300E+00, 0.4665700E+00, 0.4665700E+00 /
      data (ref_adm( 1,iz,32,14),iz = 1,20) / &
     & 0.3930300E+00, 0.3930300E+00, 0.4040500E+00, 0.4092600E+00, &
     & 0.4153400E+00, 0.4214200E+00, 0.4285500E+00, 0.4443500E+00, &
     & 0.4571500E+00, 0.4672400E+00, 0.4784600E+00, 0.4866900E+00, &
     & 0.4986800E+00, 0.5148600E+00, 0.5340200E+00, 0.5528100E+00, &
     & 0.5590600E+00, 0.5496900E+00, 0.4669000E+00, 0.4669000E+00 /
      data (ref_adm( 1,iz,33,14),iz = 1,20) / &
     & 0.3855300E+00, 0.3855300E+00, 0.3774300E+00, 0.3811100E+00, &
     & 0.3840800E+00, 0.3880800E+00, 0.3997400E+00, 0.4191700E+00, &
     & 0.4283000E+00, 0.4387500E+00, 0.4546300E+00, 0.4717500E+00, &
     & 0.4904100E+00, 0.5143400E+00, 0.5330900E+00, 0.5551000E+00, &
     & 0.5663400E+00, 0.5528900E+00, 0.4685600E+00, 0.4685600E+00 /
      data (ref_adm( 1,iz,34,14),iz = 1,20) / &
     & 0.3810600E+00, 0.3810600E+00, 0.3927000E+00, 0.3934400E+00, &
     & 0.3995200E+00, 0.4082500E+00, 0.4215900E+00, 0.4299700E+00, &
     & 0.4408600E+00, 0.4533900E+00, 0.4691700E+00, 0.4894600E+00, &
     & 0.5108300E+00, 0.5250000E+00, 0.5370800E+00, 0.5629400E+00, &
     & 0.5759800E+00, 0.5604000E+00, 0.4699700E+00, 0.4699700E+00 /
      data (ref_adm( 1,iz,35,14),iz = 1,20) / &
     & 0.3817900E+00, 0.3817900E+00, 0.3828300E+00, 0.3845500E+00, &
     & 0.3953000E+00, 0.4076300E+00, 0.4200500E+00, 0.4315400E+00, &
     & 0.4429900E+00, 0.4624200E+00, 0.4720400E+00, 0.4864100E+00, &
     & 0.5074700E+00, 0.5388200E+00, 0.5522500E+00, 0.5730700E+00, &
     & 0.5830900E+00, 0.5695600E+00, 0.4763500E+00, 0.4763500E+00 /
      data (ref_adm( 1,iz,36,14),iz = 1,20) / &
     & 0.3838600E+00, 0.3838600E+00, 0.3788400E+00, 0.3867100E+00, &
     & 0.3943500E+00, 0.4083200E+00, 0.4237300E+00, 0.4379400E+00, &
     & 0.4481100E+00, 0.4631300E+00, 0.4742000E+00, 0.4910400E+00, &
     & 0.5145700E+00, 0.5437900E+00, 0.5651900E+00, 0.5840800E+00, &
     & 0.5894700E+00, 0.5711500E+00, 0.4784900E+00, 0.4784900E+00 /
      data (ref_adm( 1,iz,37,14),iz = 1,20) / &
     & 0.3761000E+00, 0.3761000E+00, 0.3814200E+00, 0.3876400E+00, &
     & 0.3961400E+00, 0.4099000E+00, 0.4251600E+00, 0.4368400E+00, &
     & 0.4474300E+00, 0.4567200E+00, 0.4724100E+00, 0.4916200E+00, &
     & 0.5174400E+00, 0.5552000E+00, 0.5901300E+00, 0.5939700E+00, &
     & 0.5877900E+00, 0.5731800E+00, 0.4790000E+00, 0.4790000E+00 /
      data (ref_adm( 1,iz,38,14),iz = 1,20) / &
     & 0.3761000E+00, 0.3761000E+00, 0.3814200E+00, 0.3876400E+00, &
     & 0.3961400E+00, 0.4099000E+00, 0.4251600E+00, 0.4368400E+00, &
     & 0.4474300E+00, 0.4567200E+00, 0.4724100E+00, 0.4916200E+00, &
     & 0.5174400E+00, 0.5552000E+00, 0.5901300E+00, 0.5939700E+00, &
     & 0.5877900E+00, 0.5731800E+00, 0.4790000E+00, 0.4790000E+00 /
! Solar Zenith Angle 70.0 Albedo  0.5029696E+00
      data (ref_adm( 1,iz, 1,15),iz = 1,20) / &
     & 0.3865900E+00, 0.3865900E+00, 0.3906500E+00, 0.3976400E+00, &
     & 0.4067100E+00, 0.4201600E+00, 0.4395800E+00, 0.4631100E+00, &
     & 0.4907200E+00, 0.5291800E+00, 0.5891200E+00, 0.6772500E+00, &
     & 0.7718700E+00, 0.9076100E+00, 0.1066200E+01, 0.1234400E+01, &
     & 0.1195886E+01, 0.1261487E+01, 0.9584770E+00, 0.9584770E+00 /
      data (ref_adm( 1,iz, 2,15),iz = 1,20) / &
     & 0.3865900E+00, 0.3865900E+00, 0.3906500E+00, 0.3976400E+00, &
     & 0.4067100E+00, 0.4201600E+00, 0.4395800E+00, 0.4631100E+00, &
     & 0.4907200E+00, 0.5291800E+00, 0.5891200E+00, 0.6772500E+00, &
     & 0.7718700E+00, 0.9076100E+00, 0.1066200E+01, 0.1234400E+01, &
     & 0.1195886E+01, 0.1261487E+01, 0.9584770E+00, 0.9584770E+00 /
      data (ref_adm( 1,iz, 3,15),iz = 1,20) / &
     & 0.3867300E+00, 0.3867300E+00, 0.3887400E+00, 0.3970700E+00, &
     & 0.4057000E+00, 0.4165700E+00, 0.4384800E+00, 0.4594300E+00, &
     & 0.4863500E+00, 0.5274400E+00, 0.5843200E+00, 0.6615700E+00, &
     & 0.7509600E+00, 0.8831300E+00, 0.9984300E+00, 0.1119900E+01, &
     & 0.9051000E+00, 0.1237420E+01, 0.3616808E+00, 0.3616808E+00 /
      data (ref_adm( 1,iz, 4,15),iz = 1,20) / &
     & 0.3883600E+00, 0.3883600E+00, 0.3876200E+00, 0.3949900E+00, &
     & 0.4066800E+00, 0.4210300E+00, 0.4354800E+00, 0.4569500E+00, &
     & 0.4814100E+00, 0.5269200E+00, 0.5792700E+00, 0.6507900E+00, &
     & 0.7332200E+00, 0.8439200E+00, 0.9519100E+00, 0.1064000E+01, &
     & 0.1109600E+01, 0.1189701E+01, 0.9013506E+00, 0.9013506E+00 /
      data (ref_adm( 1,iz, 5,15),iz = 1,20) / &
     & 0.3932600E+00, 0.3932600E+00, 0.3937600E+00, 0.3979500E+00, &
     & 0.4064800E+00, 0.4183200E+00, 0.4323600E+00, 0.4530600E+00, &
     & 0.4784100E+00, 0.5149900E+00, 0.5627900E+00, 0.6317800E+00, &
     & 0.7113500E+00, 0.8147900E+00, 0.9155500E+00, 0.1020700E+01, &
     & 0.1041700E+01, 0.1128849E+01, 0.8530673E+00, 0.8530673E+00 /
      data (ref_adm( 1,iz, 6,15),iz = 1,20) / &
     & 0.3778300E+00, 0.3778300E+00, 0.3803300E+00, 0.3843400E+00, &
     & 0.3936500E+00, 0.4061200E+00, 0.4205600E+00, 0.4430800E+00, &
     & 0.4703700E+00, 0.5056300E+00, 0.5473000E+00, 0.6082000E+00, &
     & 0.6807400E+00, 0.7808400E+00, 0.8791100E+00, 0.9986900E+00, &
     & 0.1172800E+01, 0.1260500E+01, 0.1200300E+01, 0.1200300E+01 /
      data (ref_adm( 1,iz, 7,15),iz = 1,20) / &
     & 0.3930300E+00, 0.3930300E+00, 0.3976000E+00, 0.4040900E+00, &
     & 0.4106000E+00, 0.4231500E+00, 0.4384800E+00, 0.4621200E+00, &
     & 0.4899000E+00, 0.5209500E+00, 0.5566100E+00, 0.6018700E+00, &
     & 0.6600000E+00, 0.7348500E+00, 0.8206600E+00, 0.9342900E+00, &
     & 0.1060700E+01, 0.1105100E+01, 0.1030200E+01, 0.1030200E+01 /
      data (ref_adm( 1,iz, 8,15),iz = 1,20) / &
     & 0.3816100E+00, 0.3816100E+00, 0.3837000E+00, 0.3911300E+00, &
     & 0.4008500E+00, 0.4077400E+00, 0.4267300E+00, 0.4506200E+00, &
     & 0.4755300E+00, 0.5066500E+00, 0.5468400E+00, 0.5967200E+00, &
     & 0.6497900E+00, 0.7091600E+00, 0.7799300E+00, 0.8808000E+00, &
     & 0.9931000E+00, 0.9952900E+00, 0.9547900E+00, 0.9547900E+00 /
      data (ref_adm( 1,iz, 9,15),iz = 1,20) / &
     & 0.3865300E+00, 0.3865300E+00, 0.3866300E+00, 0.3915500E+00, &
     & 0.3973500E+00, 0.4081600E+00, 0.4239900E+00, 0.4437100E+00, &
     & 0.4652100E+00, 0.4936800E+00, 0.5344200E+00, 0.5759200E+00, &
     & 0.6222500E+00, 0.6765000E+00, 0.7390900E+00, 0.8267500E+00, &
     & 0.9237200E+00, 0.9051900E+00, 0.8828100E+00, 0.8828100E+00 /
      data (ref_adm( 1,iz,10,15),iz = 1,20) / &
     & 0.3825700E+00, 0.3825700E+00, 0.3883400E+00, 0.3877300E+00, &
     & 0.3936800E+00, 0.4063000E+00, 0.4229400E+00, 0.4395400E+00, &
     & 0.4590900E+00, 0.4810900E+00, 0.5157100E+00, 0.5506400E+00, &
     & 0.5960300E+00, 0.6426500E+00, 0.6872300E+00, 0.7721000E+00, &
     & 0.8476100E+00, 0.8220900E+00, 0.7773200E+00, 0.7773200E+00 /
      data (ref_adm( 1,iz,11,15),iz = 1,20) / &
     & 0.3857100E+00, 0.3857100E+00, 0.3874400E+00, 0.3928000E+00, &
     & 0.3969200E+00, 0.4073400E+00, 0.4209200E+00, 0.4376100E+00, &
     & 0.4545400E+00, 0.4738500E+00, 0.4985800E+00, 0.5294000E+00, &
     & 0.5718800E+00, 0.6118600E+00, 0.6547700E+00, 0.7239800E+00, &
     & 0.7824200E+00, 0.7572500E+00, 0.7007800E+00, 0.7007800E+00 /
      data (ref_adm( 1,iz,12,15),iz = 1,20) / &
     & 0.3879200E+00, 0.3879200E+00, 0.3922300E+00, 0.4005000E+00, &
     & 0.4069900E+00, 0.4153500E+00, 0.4211400E+00, 0.4322000E+00, &
     & 0.4508700E+00, 0.4671000E+00, 0.4895500E+00, 0.5152500E+00, &
     & 0.5507000E+00, 0.5836700E+00, 0.6182700E+00, 0.6893700E+00, &
     & 0.7329300E+00, 0.7102800E+00, 0.6398600E+00, 0.6398600E+00 /
      data (ref_adm( 1,iz,13,15),iz = 1,20) / &
     & 0.3887900E+00, 0.3887900E+00, 0.3942500E+00, 0.4006500E+00, &
     & 0.4072000E+00, 0.4110900E+00, 0.4182700E+00, 0.4299700E+00, &
     & 0.4377700E+00, 0.4516100E+00, 0.4724600E+00, 0.4993900E+00, &
     & 0.5265600E+00, 0.5556300E+00, 0.5863300E+00, 0.6424200E+00, &
     & 0.6862400E+00, 0.6711300E+00, 0.5925600E+00, 0.5925600E+00 /
      data (ref_adm( 1,iz,14,15),iz = 1,20) / &
     & 0.3949100E+00, 0.3949100E+00, 0.4062100E+00, 0.4107200E+00, &
     & 0.4154000E+00, 0.4205200E+00, 0.4276300E+00, 0.4344700E+00, &
     & 0.4449500E+00, 0.4564600E+00, 0.4697000E+00, 0.4862800E+00, &
     & 0.5051100E+00, 0.5258400E+00, 0.5582600E+00, 0.6032300E+00, &
     & 0.6350000E+00, 0.6270700E+00, 0.6196100E+00, 0.6196100E+00 /
      data (ref_adm( 1,iz,15,15),iz = 1,20) / &
     & 0.4090200E+00, 0.4090200E+00, 0.3936300E+00, 0.3895700E+00, &
     & 0.3931600E+00, 0.4005300E+00, 0.4115000E+00, 0.4237800E+00, &
     & 0.4383400E+00, 0.4583000E+00, 0.4801400E+00, 0.5076200E+00, &
     & 0.5325900E+00, 0.5513300E+00, 0.5477100E+00, 0.5689000E+00, &
     & 0.5989200E+00, 0.6145300E+00, 0.4824731E+00, 0.4824731E+00 /
      data (ref_adm( 1,iz,16,15),iz = 1,20) / &
     & 0.3714100E+00, 0.3714100E+00, 0.3611700E+00, 0.3621500E+00, &
     & 0.3671200E+00, 0.3748700E+00, 0.3814900E+00, 0.3861000E+00, &
     & 0.3974100E+00, 0.4068500E+00, 0.4170300E+00, 0.4309900E+00, &
     & 0.4495100E+00, 0.4755300E+00, 0.5257200E+00, 0.5436700E+00, &
     & 0.5690500E+00, 0.7631400E+00, 0.4654943E+00, 0.4654943E+00 /
      data (ref_adm( 1,iz,17,15),iz = 1,20) / &
     & 0.3838400E+00, 0.3838400E+00, 0.3939400E+00, 0.3931400E+00, &
     & 0.3923400E+00, 0.4020400E+00, 0.4065100E+00, 0.4115400E+00, &
     & 0.4208300E+00, 0.4353900E+00, 0.4453900E+00, 0.4554500E+00, &
     & 0.4770800E+00, 0.4892200E+00, 0.5185300E+00, 0.5322400E+00, &
     & 0.5503900E+00, 0.5074756E+00, 0.4512484E+00, 0.4512484E+00 /
      data (ref_adm( 1,iz,18,15),iz = 1,20) / &
     & 0.3826200E+00, 0.3826200E+00, 0.3948200E+00, 0.3957200E+00, &
     & 0.3999800E+00, 0.4018700E+00, 0.4036600E+00, 0.4088100E+00, &
     & 0.4232700E+00, 0.4358600E+00, 0.4431400E+00, 0.4553800E+00, &
     & 0.4746500E+00, 0.4898500E+00, 0.5100800E+00, 0.5311200E+00, &
     & 0.5427300E+00, 0.5812929E+00, 0.5599123E+00, 0.5599123E+00 /
      data (ref_adm( 1,iz,19,15),iz = 1,20) / &
     & 0.3787100E+00, 0.3787100E+00, 0.3979100E+00, 0.3994800E+00, &
     & 0.4022700E+00, 0.4042600E+00, 0.4081800E+00, 0.4106100E+00, &
     & 0.4193500E+00, 0.4273900E+00, 0.4372900E+00, 0.4502600E+00, &
     & 0.4655500E+00, 0.4804100E+00, 0.5015900E+00, 0.5248300E+00, &
     & 0.5495129E+00, 0.5684615E+00, 0.5482242E+00, 0.5482242E+00 /
      data (ref_adm( 1,iz,20,15),iz = 1,20) / &
     & 0.3950500E+00, 0.3950500E+00, 0.3984700E+00, 0.4006800E+00, &
     & 0.4047900E+00, 0.4075400E+00, 0.4074300E+00, 0.4099700E+00, &
     & 0.4170600E+00, 0.4325200E+00, 0.4438600E+00, 0.4472300E+00, &
     & 0.4621300E+00, 0.4720600E+00, 0.4894800E+00, 0.5157300E+00, &
     & 0.5412129E+00, 0.5594653E+00, 0.5414822E+00, 0.5414822E+00 /
      data (ref_adm( 1,iz,21,15),iz = 1,20) / &
     & 0.4005200E+00, 0.4005200E+00, 0.4032500E+00, 0.4004700E+00, &
     & 0.4087500E+00, 0.4112800E+00, 0.4139500E+00, 0.4148100E+00, &
     & 0.4212900E+00, 0.4313100E+00, 0.4412700E+00, 0.4461100E+00, &
     & 0.4604000E+00, 0.4753200E+00, 0.4885500E+00, 0.5048000E+00, &
     & 0.5336549E+00, 0.5514984E+00, 0.5374631E+00, 0.5374631E+00 /
      data (ref_adm( 1,iz,22,15),iz = 1,20) / &
     & 0.3940500E+00, 0.3940500E+00, 0.3967600E+00, 0.3959700E+00, &
     & 0.4007100E+00, 0.4073000E+00, 0.4117000E+00, 0.4157800E+00, &
     & 0.4190100E+00, 0.4297600E+00, 0.4421300E+00, 0.4509500E+00, &
     & 0.4636400E+00, 0.4779700E+00, 0.4855500E+00, 0.5122300E+00, &
     & 0.4979964E+00, 0.4912051E+00, 0.4775094E+00, 0.4775094E+00 /
      data (ref_adm( 1,iz,23,15),iz = 1,20) / &
     & 0.3831700E+00, 0.3831700E+00, 0.3901400E+00, 0.3951900E+00, &
     & 0.4010000E+00, 0.4022400E+00, 0.4085800E+00, 0.4159100E+00, &
     & 0.4193700E+00, 0.4277100E+00, 0.4381400E+00, 0.4489900E+00, &
     & 0.4599200E+00, 0.4763200E+00, 0.4849300E+00, 0.5081000E+00, &
     & 0.4677900E+00, 0.4905029E+00, 0.4827864E+00, 0.4827864E+00 /
      data (ref_adm( 1,iz,24,15),iz = 1,20) / &
     & 0.3641500E+00, 0.3641500E+00, 0.3619500E+00, 0.3650000E+00, &
     & 0.3687600E+00, 0.3723000E+00, 0.3771300E+00, 0.3854000E+00, &
     & 0.3940000E+00, 0.4008300E+00, 0.4129200E+00, 0.4236500E+00, &
     & 0.4385000E+00, 0.4564800E+00, 0.4863500E+00, 0.5133600E+00, &
     & 0.5310000E+00, 0.4938413E+00, 0.4915484E+00, 0.4915484E+00 /
      data (ref_adm( 1,iz,25,15),iz = 1,20) / &
     & 0.4006200E+00, 0.4006200E+00, 0.4137900E+00, 0.4151400E+00, &
     & 0.4192300E+00, 0.4238100E+00, 0.4300900E+00, 0.4371000E+00, &
     & 0.4477600E+00, 0.4580000E+00, 0.4686000E+00, 0.4749600E+00, &
     & 0.4806100E+00, 0.4827000E+00, 0.4985500E+00, 0.5241100E+00, &
     & 0.5464300E+00, 0.5365800E+00, 0.5030807E+00, 0.5030807E+00 /
      data (ref_adm( 1,iz,26,15),iz = 1,20) / &
     & 0.3952700E+00, 0.3952700E+00, 0.3909900E+00, 0.3948100E+00, &
     & 0.3977100E+00, 0.4050700E+00, 0.4127900E+00, 0.4215400E+00, &
     & 0.4274700E+00, 0.4355600E+00, 0.4489900E+00, 0.4636400E+00, &
     & 0.4788000E+00, 0.4971300E+00, 0.5097500E+00, 0.5325500E+00, &
     & 0.5504600E+00, 0.5658400E+00, 0.5183887E+00, 0.5183887E+00 /
      data (ref_adm( 1,iz,27,15),iz = 1,20) / &
     & 0.3901000E+00, 0.3901000E+00, 0.3932800E+00, 0.3943300E+00, &
     & 0.3961700E+00, 0.4001200E+00, 0.4062800E+00, 0.4126500E+00, &
     & 0.4249600E+00, 0.4355900E+00, 0.4514100E+00, 0.4658300E+00, &
     & 0.4852100E+00, 0.5071400E+00, 0.5223600E+00, 0.5407500E+00, &
     & 0.5597800E+00, 0.5695100E+00, 0.4924500E+00, 0.4924500E+00 /
      data (ref_adm( 1,iz,28,15),iz = 1,20) / &
     & 0.3843900E+00, 0.3843900E+00, 0.3902300E+00, 0.3952000E+00, &
     & 0.4010400E+00, 0.4029700E+00, 0.4078400E+00, 0.4150500E+00, &
     & 0.4295300E+00, 0.4416200E+00, 0.4645200E+00, 0.4759200E+00, &
     & 0.4915600E+00, 0.5160300E+00, 0.5358600E+00, 0.5595900E+00, &
     & 0.5786300E+00, 0.5811600E+00, 0.5173600E+00, 0.5173600E+00 /
      data (ref_adm( 1,iz,29,15),iz = 1,20) / &
     & 0.3897500E+00, 0.3897500E+00, 0.3883500E+00, 0.3935100E+00, &
     & 0.3972100E+00, 0.4030300E+00, 0.4090100E+00, 0.4185200E+00, &
     & 0.4335100E+00, 0.4431000E+00, 0.4670700E+00, 0.4843000E+00, &
     & 0.5036200E+00, 0.5288500E+00, 0.5550500E+00, 0.5836900E+00, &
     & 0.6028000E+00, 0.5983200E+00, 0.5171700E+00, 0.5171700E+00 /
      data (ref_adm( 1,iz,30,15),iz = 1,20) / &
     & 0.3901700E+00, 0.3901700E+00, 0.3887200E+00, 0.3902400E+00, &
     & 0.3954800E+00, 0.4074800E+00, 0.4176600E+00, 0.4292400E+00, &
     & 0.4391200E+00, 0.4529800E+00, 0.4759200E+00, 0.4961800E+00, &
     & 0.5118700E+00, 0.5335900E+00, 0.5542400E+00, 0.5885900E+00, &
     & 0.6141700E+00, 0.6195400E+00, 0.5368100E+00, 0.5368100E+00 /
      data (ref_adm( 1,iz,31,15),iz = 1,20) / &
     & 0.3852000E+00, 0.3852000E+00, 0.3830400E+00, 0.3900900E+00, &
     & 0.3993500E+00, 0.4061000E+00, 0.4213600E+00, 0.4322500E+00, &
     & 0.4458300E+00, 0.4613400E+00, 0.4791700E+00, 0.4977400E+00, &
     & 0.5175300E+00, 0.5360300E+00, 0.5566200E+00, 0.5926100E+00, &
     & 0.6193100E+00, 0.6216200E+00, 0.5401600E+00, 0.5401600E+00 /
      data (ref_adm( 1,iz,32,15),iz = 1,20) / &
     & 0.3862000E+00, 0.3862000E+00, 0.3951400E+00, 0.4006000E+00, &
     & 0.4086200E+00, 0.4156700E+00, 0.4261500E+00, 0.4381600E+00, &
     & 0.4553700E+00, 0.4710200E+00, 0.4855300E+00, 0.5022200E+00, &
     & 0.5236100E+00, 0.5466900E+00, 0.5720100E+00, 0.6041200E+00, &
     & 0.6302300E+00, 0.6311100E+00, 0.5441600E+00, 0.5441600E+00 /
      data (ref_adm( 1,iz,33,15),iz = 1,20) / &
     & 0.3864900E+00, 0.3864900E+00, 0.3803500E+00, 0.3852900E+00, &
     & 0.3898900E+00, 0.3968100E+00, 0.4075700E+00, 0.4230300E+00, &
     & 0.4406900E+00, 0.4570600E+00, 0.4714800E+00, 0.4911500E+00, &
     & 0.5167500E+00, 0.5442800E+00, 0.5716500E+00, 0.6045300E+00, &
     & 0.6330400E+00, 0.6343700E+00, 0.5457700E+00, 0.5457700E+00 /
      data (ref_adm( 1,iz,34,15),iz = 1,20) / &
     & 0.3791800E+00, 0.3791800E+00, 0.3902000E+00, 0.3960900E+00, &
     & 0.4001000E+00, 0.4063600E+00, 0.4196100E+00, 0.4368100E+00, &
     & 0.4544600E+00, 0.4621600E+00, 0.4766900E+00, 0.5006500E+00, &
     & 0.5272600E+00, 0.5605200E+00, 0.5838500E+00, 0.6156100E+00, &
     & 0.6547500E+00, 0.6460600E+00, 0.5512900E+00, 0.5512900E+00 /
      data (ref_adm( 1,iz,35,15),iz = 1,20) / &
     & 0.3915000E+00, 0.3915000E+00, 0.3933300E+00, 0.3936000E+00, &
     & 0.4010700E+00, 0.4104700E+00, 0.4231200E+00, 0.4413300E+00, &
     & 0.4563300E+00, 0.4650600E+00, 0.4863000E+00, 0.5079600E+00, &
     & 0.5336800E+00, 0.5655100E+00, 0.5988500E+00, 0.6298800E+00, &
     & 0.6567300E+00, 0.6497500E+00, 0.5548300E+00, 0.5548300E+00 /
      data (ref_adm( 1,iz,36,15),iz = 1,20) / &
     & 0.3857100E+00, 0.3857100E+00, 0.3892000E+00, 0.3915400E+00, &
     & 0.3984400E+00, 0.4048400E+00, 0.4199000E+00, 0.4376600E+00, &
     & 0.4522900E+00, 0.4669800E+00, 0.4874900E+00, 0.5095000E+00, &
     & 0.5384200E+00, 0.5750400E+00, 0.6100100E+00, 0.6459400E+00, &
     & 0.6710100E+00, 0.6627100E+00, 0.5642600E+00, 0.5642600E+00 /
      data (ref_adm( 1,iz,37,15),iz = 1,20) / &
     & 0.3833000E+00, 0.3833000E+00, 0.3869000E+00, 0.3930800E+00, &
     & 0.4000100E+00, 0.4137300E+00, 0.4226900E+00, 0.4365600E+00, &
     & 0.4532700E+00, 0.4691000E+00, 0.4888500E+00, 0.5087700E+00, &
     & 0.5431200E+00, 0.5812300E+00, 0.6235100E+00, 0.6709600E+00, &
     & 0.6819000E+00, 0.6702700E+00, 0.5665600E+00, 0.5665600E+00 /
      data (ref_adm( 1,iz,38,15),iz = 1,20) / &
     & 0.3833000E+00, 0.3833000E+00, 0.3869000E+00, 0.3930800E+00, &
     & 0.4000100E+00, 0.4137300E+00, 0.4226900E+00, 0.4365600E+00, &
     & 0.4532700E+00, 0.4691000E+00, 0.4888500E+00, 0.5087700E+00, &
     & 0.5431200E+00, 0.5812300E+00, 0.6235100E+00, 0.6709600E+00, &
     & 0.6819000E+00, 0.6702700E+00, 0.5665600E+00, 0.5665600E+00 /
! Solar Zenith Angle 75.0 Albedo  0.5232295E+00
      data (ref_adm( 1,iz, 1,16),iz = 1,20) / &
     & 0.3822100E+00, 0.3822100E+00, 0.3863300E+00, 0.3953600E+00, &
     & 0.4083500E+00, 0.4226500E+00, 0.4432000E+00, 0.4722200E+00, &
     & 0.5152800E+00, 0.5641300E+00, 0.6307300E+00, 0.7235400E+00, &
     & 0.8443900E+00, 0.9609400E+00, 0.1099203E+01, 0.1292298E+01, &
     & 0.1497594E+01, 0.1729052E+01, 0.1391202E+01, 0.1391202E+01 /
      data (ref_adm( 1,iz, 2,16),iz = 1,20) / &
     & 0.3822100E+00, 0.3822100E+00, 0.3863300E+00, 0.3953600E+00, &
     & 0.4083500E+00, 0.4226500E+00, 0.4432000E+00, 0.4722200E+00, &
     & 0.5152800E+00, 0.5641300E+00, 0.6307300E+00, 0.7235400E+00, &
     & 0.8443900E+00, 0.9609400E+00, 0.1099203E+01, 0.1292298E+01, &
     & 0.1497594E+01, 0.1729052E+01, 0.1391202E+01, 0.1391202E+01 /
      data (ref_adm( 1,iz, 3,16),iz = 1,20) / &
     & 0.3817600E+00, 0.3817600E+00, 0.3917800E+00, 0.3970200E+00, &
     & 0.4066200E+00, 0.4218100E+00, 0.4427600E+00, 0.4724600E+00, &
     & 0.5089100E+00, 0.5589800E+00, 0.6296700E+00, 0.7230900E+00, &
     & 0.8197800E+00, 0.8958600E+00, 0.1086678E+01, 0.1276311E+01, &
     & 0.1468938E+01, 0.1680599E+01, 0.5465025E+00, 0.5465025E+00 /
      data (ref_adm( 1,iz, 4,16),iz = 1,20) / &
     & 0.3875300E+00, 0.3875300E+00, 0.3893900E+00, 0.3936500E+00, &
     & 0.4054500E+00, 0.4206100E+00, 0.4456000E+00, 0.4697900E+00, &
     & 0.5066700E+00, 0.5573400E+00, 0.6202900E+00, 0.7044600E+00, &
     & 0.7949800E+00, 0.8754400E+00, 0.1059676E+01, 0.1241977E+01, &
     & 0.1412310E+01, 0.1587444E+01, 0.1245961E+01, 0.1245961E+01 /
      data (ref_adm( 1,iz, 5,16),iz = 1,20) / &
     & 0.3824200E+00, 0.3824200E+00, 0.3860900E+00, 0.3901900E+00, &
     & 0.4054000E+00, 0.4205700E+00, 0.4349000E+00, 0.4642800E+00, &
     & 0.4994400E+00, 0.5445900E+00, 0.6066700E+00, 0.6784800E+00, &
     & 0.7686500E+00, 0.8407700E+00, 0.1022455E+01, 0.1195440E+01, &
     & 0.1339293E+01, 0.1470629E+01, 0.1142125E+01, 0.1142125E+01 /
      data (ref_adm( 1,iz, 6,16),iz = 1,20) / &
     & 0.3745900E+00, 0.3745900E+00, 0.3800700E+00, 0.3896700E+00, &
     & 0.4019600E+00, 0.4157900E+00, 0.4337700E+00, 0.4573100E+00, &
     & 0.4882200E+00, 0.5263200E+00, 0.5806200E+00, 0.6510300E+00, &
     & 0.7295700E+00, 0.8597800E+00, 0.1019400E+01, 0.1234900E+01, &
     & 0.1472900E+01, 0.1588300E+01, 0.1563500E+01, 0.1563500E+01 /
      data (ref_adm( 1,iz, 7,16),iz = 1,20) / &
     & 0.3885300E+00, 0.3885300E+00, 0.4004700E+00, 0.4060200E+00, &
     & 0.4167200E+00, 0.4341400E+00, 0.4504300E+00, 0.4706300E+00, &
     & 0.4937000E+00, 0.5275800E+00, 0.5695300E+00, 0.6306200E+00, &
     & 0.7059000E+00, 0.8221600E+00, 0.9488000E+00, 0.1117600E+01, &
     & 0.1312000E+01, 0.1415300E+01, 0.1231500E+01, 0.1231500E+01 /
      data (ref_adm( 1,iz, 8,16),iz = 1,20) / &
     & 0.3881500E+00, 0.3881500E+00, 0.3998100E+00, 0.4058600E+00, &
     & 0.4158200E+00, 0.4276200E+00, 0.4473100E+00, 0.4650500E+00, &
     & 0.4888400E+00, 0.5186800E+00, 0.5598600E+00, 0.6126800E+00, &
     & 0.6775500E+00, 0.7762200E+00, 0.8905800E+00, 0.1042000E+01, &
     & 0.1213400E+01, 0.1226400E+01, 0.1138300E+01, 0.1138300E+01 /
      data (ref_adm( 1,iz, 9,16),iz = 1,20) / &
     & 0.3908800E+00, 0.3908800E+00, 0.3949000E+00, 0.3991700E+00, &
     & 0.4077300E+00, 0.4197300E+00, 0.4390000E+00, 0.4592200E+00, &
     & 0.4777500E+00, 0.5056300E+00, 0.5452400E+00, 0.5921900E+00, &
     & 0.6510300E+00, 0.7352900E+00, 0.8198900E+00, 0.9612700E+00, &
     & 0.1105900E+01, 0.1102500E+01, 0.1030000E+01, 0.1030000E+01 /
      data (ref_adm( 1,iz,10,16),iz = 1,20) / &
     & 0.3865800E+00, 0.3865800E+00, 0.3920200E+00, 0.3953400E+00, &
     & 0.3993800E+00, 0.4132900E+00, 0.4310500E+00, 0.4510700E+00, &
     & 0.4727600E+00, 0.4951800E+00, 0.5267600E+00, 0.5734000E+00, &
     & 0.6182900E+00, 0.6927300E+00, 0.7707900E+00, 0.8850900E+00, &
     & 0.1000500E+01, 0.9919500E+00, 0.9097300E+00, 0.9097300E+00 /
      data (ref_adm( 1,iz,11,16),iz = 1,20) / &
     & 0.3896900E+00, 0.3896900E+00, 0.3888800E+00, 0.3928300E+00, &
     & 0.3995500E+00, 0.4147000E+00, 0.4287700E+00, 0.4453600E+00, &
     & 0.4641400E+00, 0.4847300E+00, 0.5183400E+00, 0.5527700E+00, &
     & 0.6042000E+00, 0.6662400E+00, 0.7305200E+00, 0.8235800E+00, &
     & 0.9036000E+00, 0.8944400E+00, 0.8014500E+00, 0.8014500E+00 /
      data (ref_adm( 1,iz,12,16),iz = 1,20) / &
     & 0.3861900E+00, 0.3861900E+00, 0.3860000E+00, 0.3882700E+00, &
     & 0.3943100E+00, 0.4055500E+00, 0.4199000E+00, 0.4370700E+00, &
     & 0.4511600E+00, 0.4714400E+00, 0.5016600E+00, 0.5343200E+00, &
     & 0.5751800E+00, 0.6238800E+00, 0.6915400E+00, 0.7753300E+00, &
     & 0.8305500E+00, 0.8179500E+00, 0.7498600E+00, 0.7498600E+00 /
      data (ref_adm( 1,iz,13,16),iz = 1,20) / &
     & 0.3866800E+00, 0.3866800E+00, 0.3864900E+00, 0.3917300E+00, &
     & 0.3924800E+00, 0.3991300E+00, 0.4103000E+00, 0.4240400E+00, &
     & 0.4432200E+00, 0.4607100E+00, 0.4870100E+00, 0.5181000E+00, &
     & 0.5543600E+00, 0.6002900E+00, 0.6651300E+00, 0.7344200E+00, &
     & 0.7796400E+00, 0.7643900E+00, 0.6831200E+00, 0.6831200E+00 /
      data (ref_adm( 1,iz,14,16),iz = 1,20) / &
     & 0.3983000E+00, 0.3983000E+00, 0.4070100E+00, 0.4089700E+00, &
     & 0.4142000E+00, 0.4199800E+00, 0.4289500E+00, 0.4413300E+00, &
     & 0.4551600E+00, 0.4705400E+00, 0.4905300E+00, 0.5098000E+00, &
     & 0.5352100E+00, 0.5702800E+00, 0.6289300E+00, 0.6930000E+00, &
     & 0.7424700E+00, 0.7264200E+00, 0.5053100E+00, 0.5053100E+00 /
      data (ref_adm( 1,iz,15,16),iz = 1,20) / &
     & 0.3881900E+00, 0.3881900E+00, 0.3759800E+00, 0.3770500E+00, &
     & 0.3820900E+00, 0.3895600E+00, 0.3993300E+00, 0.4125600E+00, &
     & 0.4274700E+00, 0.4454800E+00, 0.4667000E+00, 0.4949300E+00, &
     & 0.5335100E+00, 0.5769300E+00, 0.6074100E+00, 0.6503800E+00, &
     & 0.6860000E+00, 0.7024300E+00, 0.5596969E+00, 0.5596969E+00 /
      data (ref_adm( 1,iz,16,16),iz = 1,20) / &
     & 0.3722700E+00, 0.3722700E+00, 0.3690600E+00, 0.3708900E+00, &
     & 0.3761500E+00, 0.3837400E+00, 0.3905700E+00, 0.4008600E+00, &
     & 0.4153900E+00, 0.4308400E+00, 0.4467700E+00, 0.4628500E+00, &
     & 0.4870400E+00, 0.5199700E+00, 0.5761600E+00, 0.6225200E+00, &
     & 0.6569000E+00, 0.6039341E+00, 0.5377368E+00, 0.5377368E+00 /
      data (ref_adm( 1,iz,17,16),iz = 1,20) / &
     & 0.3763000E+00, 0.3763000E+00, 0.3803100E+00, 0.3813200E+00, &
     & 0.3802900E+00, 0.3876800E+00, 0.3945700E+00, 0.4085500E+00, &
     & 0.4220900E+00, 0.4301000E+00, 0.4520000E+00, 0.4697200E+00, &
     & 0.4926000E+00, 0.5241100E+00, 0.5500200E+00, 0.5854700E+00, &
     & 0.6370100E+00, 0.5759833E+00, 0.5191114E+00, 0.5191114E+00 /
      data (ref_adm( 1,iz,18,16),iz = 1,20) / &
     & 0.3731000E+00, 0.3731000E+00, 0.3801500E+00, 0.3788700E+00, &
     & 0.3818800E+00, 0.3840400E+00, 0.3923600E+00, 0.4055000E+00, &
     & 0.4147600E+00, 0.4274500E+00, 0.4452000E+00, 0.4635100E+00, &
     & 0.4856700E+00, 0.5099000E+00, 0.5349900E+00, 0.5611500E+00, &
     & 0.5824019E+00, 0.5919170E+00, 0.5689692E+00, 0.5689692E+00 /
      data (ref_adm( 1,iz,19,16),iz = 1,20) / &
     & 0.3726900E+00, 0.3726900E+00, 0.3806000E+00, 0.3803000E+00, &
     & 0.3804100E+00, 0.3829000E+00, 0.3878500E+00, 0.3995200E+00, &
     & 0.4107400E+00, 0.4221100E+00, 0.4372100E+00, 0.4569900E+00, &
     & 0.4741500E+00, 0.5007500E+00, 0.5245500E+00, 0.5605800E+00, &
     & 0.5621936E+00, 0.5707616E+00, 0.5562286E+00, 0.5562286E+00 /
      data (ref_adm( 1,iz,20,16),iz = 1,20) / &
     & 0.3766900E+00, 0.3766900E+00, 0.3786600E+00, 0.3782500E+00, &
     & 0.3804900E+00, 0.3833400E+00, 0.3836400E+00, 0.3934700E+00, &
     & 0.4075800E+00, 0.4171600E+00, 0.4319600E+00, 0.4502600E+00, &
     & 0.4682600E+00, 0.4951500E+00, 0.5169300E+00, 0.5202800E+00, &
     & 0.5477068E+00, 0.5565692E+00, 0.5496123E+00, 0.5496123E+00 /
      data (ref_adm( 1,iz,21,16),iz = 1,20) / &
     & 0.3790200E+00, 0.3790200E+00, 0.3843700E+00, 0.3807400E+00, &
     & 0.3826900E+00, 0.3855000E+00, 0.3836600E+00, 0.3939700E+00, &
     & 0.4039700E+00, 0.4190000E+00, 0.4309600E+00, 0.4462400E+00, &
     & 0.4706300E+00, 0.4919000E+00, 0.5112200E+00, 0.5494300E+00, &
     & 0.5370756E+00, 0.5466082E+00, 0.5475106E+00, 0.5475106E+00 /
      data (ref_adm( 1,iz,22,16),iz = 1,20) / &
     & 0.3755400E+00, 0.3755400E+00, 0.3787800E+00, 0.3780900E+00, &
     & 0.3810500E+00, 0.3840600E+00, 0.3893300E+00, 0.3962500E+00, &
     & 0.4078100E+00, 0.4206500E+00, 0.4340800E+00, 0.4486300E+00, &
     & 0.4667500E+00, 0.4904700E+00, 0.5111800E+00, 0.5409200E+00, &
     & 0.5357838E+00, 0.5423270E+00, 0.5526536E+00, 0.5526536E+00 /
      data (ref_adm( 1,iz,23,16),iz = 1,20) / &
     & 0.3577100E+00, 0.3577100E+00, 0.3621600E+00, 0.3673200E+00, &
     & 0.3732400E+00, 0.3772100E+00, 0.3839200E+00, 0.3968000E+00, &
     & 0.4091400E+00, 0.4203900E+00, 0.4359800E+00, 0.4488500E+00, &
     & 0.4686700E+00, 0.4882900E+00, 0.5098300E+00, 0.5392200E+00, &
     & 0.5424400E+00, 0.5416347E+00, 0.5596651E+00, 0.5596651E+00 /
      data (ref_adm( 1,iz,24,16),iz = 1,20) / &
     & 0.3719400E+00, 0.3719400E+00, 0.3683400E+00, 0.3698300E+00, &
     & 0.3736100E+00, 0.3786900E+00, 0.3837200E+00, 0.3929900E+00, &
     & 0.4021400E+00, 0.4134100E+00, 0.4266400E+00, 0.4418500E+00, &
     & 0.4604100E+00, 0.4824500E+00, 0.5082700E+00, 0.5428200E+00, &
     & 0.5880500E+00, 0.5458459E+00, 0.5712762E+00, 0.5712762E+00 /
      data (ref_adm( 1,iz,25,16),iz = 1,20) / &
     & 0.3849300E+00, 0.3849300E+00, 0.3934100E+00, 0.3973600E+00, &
     & 0.4020900E+00, 0.4073100E+00, 0.4138400E+00, 0.4216600E+00, &
     & 0.4303400E+00, 0.4397100E+00, 0.4543300E+00, 0.4711600E+00, &
     & 0.4908900E+00, 0.5167900E+00, 0.5303800E+00, 0.5577400E+00, &
     & 0.6016800E+00, 0.6210300E+00, 0.5866482E+00, 0.5866482E+00 /
      data (ref_adm( 1,iz,26,16),iz = 1,20) / &
     & 0.3873800E+00, 0.3873800E+00, 0.3830600E+00, 0.3888700E+00, &
     & 0.3909300E+00, 0.3938900E+00, 0.4022500E+00, 0.4110100E+00, &
     & 0.4229000E+00, 0.4339500E+00, 0.4443200E+00, 0.4546900E+00, &
     & 0.4748400E+00, 0.5057500E+00, 0.5262400E+00, 0.5660900E+00, &
     & 0.6043300E+00, 0.6282700E+00, 0.6069117E+00, 0.6069117E+00 /
      data (ref_adm( 1,iz,27,16),iz = 1,20) / &
     & 0.3828800E+00, 0.3828800E+00, 0.3845100E+00, 0.3879000E+00, &
     & 0.3929300E+00, 0.3979200E+00, 0.4038900E+00, 0.4166300E+00, &
     & 0.4275900E+00, 0.4378100E+00, 0.4508600E+00, 0.4682200E+00, &
     & 0.4885600E+00, 0.5225900E+00, 0.5498800E+00, 0.5879300E+00, &
     & 0.6228700E+00, 0.6497800E+00, 0.6031700E+00, 0.6031700E+00 /
      data (ref_adm( 1,iz,28,16),iz = 1,20) / &
     & 0.3766500E+00, 0.3766500E+00, 0.3893100E+00, 0.3901200E+00, &
     & 0.3942500E+00, 0.3977200E+00, 0.4058000E+00, 0.4138900E+00, &
     & 0.4304100E+00, 0.4435800E+00, 0.4563100E+00, 0.4728900E+00, &
     & 0.4961900E+00, 0.5330700E+00, 0.5629300E+00, 0.6051500E+00, &
     & 0.6440200E+00, 0.6615200E+00, 0.6064500E+00, 0.6064500E+00 /
      data (ref_adm( 1,iz,29,16),iz = 1,20) / &
     & 0.3880100E+00, 0.3880100E+00, 0.3849100E+00, 0.3892600E+00, &
     & 0.3938400E+00, 0.3993700E+00, 0.4032600E+00, 0.4155000E+00, &
     & 0.4271100E+00, 0.4429900E+00, 0.4635600E+00, 0.4806800E+00, &
     & 0.5083600E+00, 0.5514800E+00, 0.5836700E+00, 0.6291700E+00, &
     & 0.6655000E+00, 0.6848800E+00, 0.6212000E+00, 0.6212000E+00 /
      data (ref_adm( 1,iz,30,16),iz = 1,20) / &
     & 0.3867300E+00, 0.3867300E+00, 0.3828200E+00, 0.3839400E+00, &
     & 0.3888300E+00, 0.3966100E+00, 0.4059800E+00, 0.4177500E+00, &
     & 0.4299900E+00, 0.4461300E+00, 0.4703000E+00, 0.4929000E+00, &
     & 0.5194200E+00, 0.5621700E+00, 0.5934100E+00, 0.6388200E+00, &
     & 0.6828700E+00, 0.7115200E+00, 0.6466400E+00, 0.6466400E+00 /
      data (ref_adm( 1,iz,31,16),iz = 1,20) / &
     & 0.3873700E+00, 0.3873700E+00, 0.3829500E+00, 0.3803900E+00, &
     & 0.3851600E+00, 0.3944000E+00, 0.4048000E+00, 0.4172400E+00, &
     & 0.4360500E+00, 0.4525500E+00, 0.4788600E+00, 0.5060800E+00, &
     & 0.5310800E+00, 0.5687900E+00, 0.5992900E+00, 0.6445300E+00, &
     & 0.6883300E+00, 0.7200200E+00, 0.6515800E+00, 0.6515800E+00 /
      data (ref_adm( 1,iz,32,16),iz = 1,20) / &
     & 0.3853100E+00, 0.3853100E+00, 0.3889600E+00, 0.3928300E+00, &
     & 0.3960500E+00, 0.4027400E+00, 0.4147200E+00, 0.4272300E+00, &
     & 0.4441000E+00, 0.4675200E+00, 0.4905500E+00, 0.5128400E+00, &
     & 0.5376200E+00, 0.5717500E+00, 0.6056000E+00, 0.6535100E+00, &
     & 0.7036900E+00, 0.7305600E+00, 0.6576000E+00, 0.6576000E+00 /
      data (ref_adm( 1,iz,33,16),iz = 1,20) / &
     & 0.3765200E+00, 0.3765200E+00, 0.3714600E+00, 0.3744900E+00, &
     & 0.3821900E+00, 0.3894800E+00, 0.4001500E+00, 0.4169400E+00, &
     & 0.4345800E+00, 0.4581300E+00, 0.4797600E+00, 0.5022200E+00, &
     & 0.5296000E+00, 0.5691300E+00, 0.6068300E+00, 0.6544800E+00, &
     & 0.7067100E+00, 0.7433800E+00, 0.6661100E+00, 0.6661100E+00 /
      data (ref_adm( 1,iz,34,16),iz = 1,20) / &
     & 0.3761000E+00, 0.3761000E+00, 0.3798100E+00, 0.3833900E+00, &
     & 0.3887400E+00, 0.3952200E+00, 0.4052000E+00, 0.4242500E+00, &
     & 0.4426000E+00, 0.4660900E+00, 0.4859000E+00, 0.5065800E+00, &
     & 0.5370500E+00, 0.5786500E+00, 0.6197700E+00, 0.6655100E+00, &
     & 0.7248200E+00, 0.7705800E+00, 0.6839800E+00, 0.6839800E+00 /
      data (ref_adm( 1,iz,35,16),iz = 1,20) / &
     & 0.3806600E+00, 0.3806600E+00, 0.3821800E+00, 0.3835400E+00, &
     & 0.3917600E+00, 0.4015600E+00, 0.4096000E+00, 0.4253600E+00, &
     & 0.4447400E+00, 0.4671300E+00, 0.4851600E+00, 0.5079400E+00, &
     & 0.5371200E+00, 0.5791000E+00, 0.6241500E+00, 0.6790100E+00, &
     & 0.7372100E+00, 0.7781500E+00, 0.6828000E+00, 0.6828000E+00 /
      data (ref_adm( 1,iz,36,16),iz = 1,20) / &
     & 0.3799000E+00, 0.3799000E+00, 0.3828600E+00, 0.3848700E+00, &
     & 0.3935900E+00, 0.4007600E+00, 0.4116400E+00, 0.4265900E+00, &
     & 0.4498300E+00, 0.4672400E+00, 0.4854700E+00, 0.5110300E+00, &
     & 0.5444300E+00, 0.5883700E+00, 0.6326400E+00, 0.6961700E+00, &
     & 0.7590400E+00, 0.7929900E+00, 0.6938400E+00, 0.6938400E+00 /
      data (ref_adm( 1,iz,37,16),iz = 1,20) / &
     & 0.3798100E+00, 0.3798100E+00, 0.3832000E+00, 0.3900500E+00, &
     & 0.3953800E+00, 0.4031200E+00, 0.4149600E+00, 0.4296600E+00, &
     & 0.4475700E+00, 0.4698800E+00, 0.4922000E+00, 0.5176500E+00, &
     & 0.5474000E+00, 0.5941200E+00, 0.6417800E+00, 0.7177100E+00, &
     & 0.7908300E+00, 0.8118300E+00, 0.7092000E+00, 0.7092000E+00 /
      data (ref_adm( 1,iz,38,16),iz = 1,20) / &
     & 0.3798100E+00, 0.3798100E+00, 0.3832000E+00, 0.3900500E+00, &
     & 0.3953800E+00, 0.4031200E+00, 0.4149600E+00, 0.4296600E+00, &
     & 0.4475700E+00, 0.4698800E+00, 0.4922000E+00, 0.5176500E+00, &
     & 0.5474000E+00, 0.5941200E+00, 0.6417800E+00, 0.7177100E+00, &
     & 0.7908300E+00, 0.8118300E+00, 0.7092000E+00, 0.7092000E+00 /
! Solar Zenith Angle 80.0 Albedo  0.5483900E+00
      data (ref_adm( 1,iz, 1,17),iz = 1,20) / &
     & 0.3719000E+00, 0.3719000E+00, 0.3785500E+00, 0.3919700E+00, &
     & 0.4003700E+00, 0.4183000E+00, 0.4438400E+00, 0.4733200E+00, &
     & 0.5067000E+00, 0.5673400E+00, 0.6455300E+00, 0.7615800E+00, &
     & 0.9284831E+00, 0.1088573E+01, 0.1338524E+01, 0.1739002E+01, &
     & 0.2295015E+01, 0.3120209E+01, 0.2286631E+01, 0.2286631E+01 /
      data (ref_adm( 1,iz, 2,17),iz = 1,20) / &
     & 0.3719000E+00, 0.3719000E+00, 0.3785500E+00, 0.3919700E+00, &
     & 0.4003700E+00, 0.4183000E+00, 0.4438400E+00, 0.4733200E+00, &
     & 0.5067000E+00, 0.5673400E+00, 0.6455300E+00, 0.7615800E+00, &
     & 0.9284831E+00, 0.1088573E+01, 0.1338524E+01, 0.1739002E+01, &
     & 0.2295015E+01, 0.3120209E+01, 0.2286631E+01, 0.2286631E+01 /
      data (ref_adm( 1,iz, 3,17),iz = 1,20) / &
     & 0.3698000E+00, 0.3698000E+00, 0.3782200E+00, 0.3869400E+00, &
     & 0.3980500E+00, 0.4179400E+00, 0.4403200E+00, 0.4687700E+00, &
     & 0.5106200E+00, 0.5618300E+00, 0.6423300E+00, 0.7498800E+00, &
     & 0.9188310E+00, 0.1075792E+01, 0.1317492E+01, 0.1699004E+01, &
     & 0.2212170E+01, 0.3046309E+01, 0.8502851E+00, 0.8502851E+00 /
      data (ref_adm( 1,iz, 4,17),iz = 1,20) / &
     & 0.3687800E+00, 0.3687800E+00, 0.3735000E+00, 0.3815600E+00, &
     & 0.3977500E+00, 0.4119100E+00, 0.4371500E+00, 0.4684900E+00, &
     & 0.5056200E+00, 0.5558100E+00, 0.6341000E+00, 0.7337600E+00, &
     & 0.8986953E+00, 0.1048644E+01, 0.1274072E+01, 0.1618296E+01, &
     & 0.2056493E+01, 0.2764441E+01, 0.2212841E+01, 0.2212841E+01 /
      data (ref_adm( 1,iz, 5,17),iz = 1,20) / &
     & 0.3680500E+00, 0.3680500E+00, 0.3720700E+00, 0.3817400E+00, &
     & 0.3946000E+00, 0.4114800E+00, 0.4403100E+00, 0.4719900E+00, &
     & 0.5065000E+00, 0.5552900E+00, 0.6244100E+00, 0.7119200E+00, &
     & 0.8699807E+00, 0.1010871E+01, 0.1216412E+01, 0.1514545E+01, &
     & 0.1873805E+01, 0.2363283E+01, 0.2026741E+01, 0.2026741E+01 /
      data (ref_adm( 1,iz, 6,17),iz = 1,20) / &
     & 0.3665500E+00, 0.3665500E+00, 0.3698200E+00, 0.3760700E+00, &
     & 0.3875600E+00, 0.4037400E+00, 0.4243600E+00, 0.4538900E+00, &
     & 0.4909000E+00, 0.5379700E+00, 0.6018800E+00, 0.6852700E+00, &
     & 0.8004200E+00, 0.9629100E+00, 0.1153600E+01, 0.1408000E+01, &
     & 0.1741300E+01, 0.2042300E+01, 0.2014000E+01, 0.2014000E+01 /
      data (ref_adm( 1,iz, 7,17),iz = 1,20) / &
     & 0.3686800E+00, 0.3686800E+00, 0.3735400E+00, 0.3833500E+00, &
     & 0.3959700E+00, 0.4069800E+00, 0.4270700E+00, 0.4514800E+00, &
     & 0.4902300E+00, 0.5396400E+00, 0.5964300E+00, 0.6685200E+00, &
     & 0.7653800E+00, 0.9022400E+00, 0.1057300E+01, 0.1281400E+01, &
     & 0.1601000E+01, 0.1747900E+01, 0.1600100E+01, 0.1600100E+01 /
      data (ref_adm( 1,iz, 8,17),iz = 1,20) / &
     & 0.3671700E+00, 0.3671700E+00, 0.3700000E+00, 0.3748600E+00, &
     & 0.3847500E+00, 0.3994800E+00, 0.4187100E+00, 0.4476500E+00, &
     & 0.4806600E+00, 0.5249000E+00, 0.5825500E+00, 0.6452600E+00, &
     & 0.7518200E+00, 0.8694600E+00, 0.1001300E+01, 0.1196100E+01, &
     & 0.1438800E+01, 0.1537100E+01, 0.1422900E+01, 0.1422900E+01 /
      data (ref_adm( 1,iz, 9,17),iz = 1,20) / &
     & 0.3690700E+00, 0.3690700E+00, 0.3696900E+00, 0.3755500E+00, &
     & 0.3818000E+00, 0.3944900E+00, 0.4166400E+00, 0.4444800E+00, &
     & 0.4766400E+00, 0.5118400E+00, 0.5612300E+00, 0.6162000E+00, &
     & 0.7052600E+00, 0.8142000E+00, 0.9164000E+00, 0.1088500E+01, &
     & 0.1279600E+01, 0.1357700E+01, 0.1225300E+01, 0.1225300E+01 /
      data (ref_adm( 1,iz,10,17),iz = 1,20) / &
     & 0.3667000E+00, 0.3667000E+00, 0.3691700E+00, 0.3758900E+00, &
     & 0.3857900E+00, 0.3984300E+00, 0.4146000E+00, 0.4413600E+00, &
     & 0.4703300E+00, 0.5005900E+00, 0.5402200E+00, 0.5898500E+00, &
     & 0.6553700E+00, 0.7571700E+00, 0.8508200E+00, 0.9996500E+00, &
     & 0.1167400E+01, 0.1213700E+01, 0.1082700E+01, 0.1082700E+01 /
      data (ref_adm( 1,iz,11,17),iz = 1,20) / &
     & 0.3666400E+00, 0.3666400E+00, 0.3706600E+00, 0.3737400E+00, &
     & 0.3834000E+00, 0.3955900E+00, 0.4129900E+00, 0.4357500E+00, &
     & 0.4605100E+00, 0.4910600E+00, 0.5269100E+00, 0.5664800E+00, &
     & 0.6231500E+00, 0.7150800E+00, 0.7979000E+00, 0.9126900E+00, &
     & 0.1064900E+01, 0.1093100E+01, 0.1004300E+01, 0.1004300E+01 /
      data (ref_adm( 1,iz,12,17),iz = 1,20) / &
     & 0.3664700E+00, 0.3664700E+00, 0.3669900E+00, 0.3728100E+00, &
     & 0.3848400E+00, 0.3958000E+00, 0.4129000E+00, 0.4335200E+00, &
     & 0.4527800E+00, 0.4761800E+00, 0.5072200E+00, 0.5472900E+00, &
     & 0.6089700E+00, 0.6698200E+00, 0.7331500E+00, 0.8424000E+00, &
     & 0.9741800E+00, 0.9933100E+00, 0.8992800E+00, 0.8992800E+00 /
      data (ref_adm( 1,iz,13,17),iz = 1,20) / &
     & 0.3627000E+00, 0.3627000E+00, 0.3681900E+00, 0.3745800E+00, &
     & 0.3845700E+00, 0.3958700E+00, 0.4117700E+00, 0.4286900E+00, &
     & 0.4444300E+00, 0.4680400E+00, 0.4920200E+00, 0.5283000E+00, &
     & 0.5763500E+00, 0.6415400E+00, 0.6903900E+00, 0.7753600E+00, &
     & 0.8941600E+00, 0.9239500E+00, 0.8243700E+00, 0.8243700E+00 /
      data (ref_adm( 1,iz,14,17),iz = 1,20) / &
     & 0.3959900E+00, 0.3959900E+00, 0.4040400E+00, 0.4052300E+00, &
     & 0.4092300E+00, 0.4172600E+00, 0.4284800E+00, 0.4423800E+00, &
     & 0.4589600E+00, 0.4786500E+00, 0.5030000E+00, 0.5352900E+00, &
     & 0.5706700E+00, 0.6087300E+00, 0.6589800E+00, 0.7429200E+00, &
     & 0.8420100E+00, 0.8751900E+00, 0.7568001E+00, 0.7568001E+00 /
      data (ref_adm( 1,iz,15,17),iz = 1,20) / &
     & 0.3636400E+00, 0.3636400E+00, 0.3426500E+00, 0.3483700E+00, &
     & 0.3575500E+00, 0.3673100E+00, 0.3782300E+00, 0.3906800E+00, &
     & 0.4059100E+00, 0.4237900E+00, 0.4497900E+00, 0.4775700E+00, &
     & 0.5148700E+00, 0.5616400E+00, 0.6266600E+00, 0.7025600E+00, &
     & 0.7774800E+00, 0.8274300E+00, 0.7152156E+00, 0.7152156E+00 /
      data (ref_adm( 1,iz,16,17),iz = 1,20) / &
     & 0.3640800E+00, 0.3640800E+00, 0.3752300E+00, 0.3814000E+00, &
     & 0.3893000E+00, 0.3954200E+00, 0.4039600E+00, 0.4160500E+00, &
     & 0.4277800E+00, 0.4442100E+00, 0.4645300E+00, 0.4900100E+00, &
     & 0.5172700E+00, 0.5455100E+00, 0.6007500E+00, 0.6681800E+00, &
     & 0.7333400E+00, 0.6967771E+00, 0.6814854E+00, 0.6814854E+00 /
      data (ref_adm( 1,iz,17,17),iz = 1,20) / &
     & 0.3660200E+00, 0.3660200E+00, 0.3724000E+00, 0.3752700E+00, &
     & 0.3801500E+00, 0.3890100E+00, 0.3993900E+00, 0.4039300E+00, &
     & 0.4165300E+00, 0.4335400E+00, 0.4558200E+00, 0.4807700E+00, &
     & 0.5034500E+00, 0.5319500E+00, 0.5765600E+00, 0.6359400E+00, &
     & 0.7310500E+00, 0.6580346E+00, 0.6532508E+00, 0.6532508E+00 /
      data (ref_adm( 1,iz,18,17),iz = 1,20) / &
     & 0.3625400E+00, 0.3625400E+00, 0.3748400E+00, 0.3747500E+00, &
     & 0.3782600E+00, 0.3869100E+00, 0.3931600E+00, 0.4036400E+00, &
     & 0.4149800E+00, 0.4290600E+00, 0.4478100E+00, 0.4709700E+00, &
     & 0.4902800E+00, 0.5177700E+00, 0.5507900E+00, 0.6007000E+00, &
     & 0.6893458E+00, 0.7750213E+00, 0.8524865E+00, 0.8524865E+00 /
      data (ref_adm( 1,iz,19,17),iz = 1,20) / &
     & 0.3636400E+00, 0.3636400E+00, 0.3698600E+00, 0.3723700E+00, &
     & 0.3787800E+00, 0.3811700E+00, 0.3875500E+00, 0.3998200E+00, &
     & 0.4104800E+00, 0.4248700E+00, 0.4425200E+00, 0.4636700E+00, &
     & 0.4844800E+00, 0.5126900E+00, 0.5469900E+00, 0.5790800E+00, &
     & 0.6699336E+00, 0.7515660E+00, 0.8302940E+00, 0.8302940E+00 /
      data (ref_adm( 1,iz,20,17),iz = 1,20) / &
     & 0.3684600E+00, 0.3684600E+00, 0.3670100E+00, 0.3708500E+00, &
     & 0.3740400E+00, 0.3800200E+00, 0.3885400E+00, 0.3996900E+00, &
     & 0.4102300E+00, 0.4212700E+00, 0.4393400E+00, 0.4611700E+00, &
     & 0.4821900E+00, 0.5037500E+00, 0.5342700E+00, 0.5989843E+00, &
     & 0.6554952E+00, 0.7345634E+00, 0.8171986E+00, 0.8171986E+00 /
      data (ref_adm( 1,iz,21,17),iz = 1,20) / &
     & 0.3682100E+00, 0.3682100E+00, 0.3724200E+00, 0.3766100E+00, &
     & 0.3784300E+00, 0.3813600E+00, 0.3870900E+00, 0.4012100E+00, &
     & 0.4125000E+00, 0.4231600E+00, 0.4376100E+00, 0.4540500E+00, &
     & 0.4757100E+00, 0.5006700E+00, 0.5343700E+00, 0.5993400E+00, &
     & 0.6427389E+00, 0.7206786E+00, 0.8099362E+00, 0.8099362E+00 /
      data (ref_adm( 1,iz,22,17),iz = 1,20) / &
     & 0.3619600E+00, 0.3619600E+00, 0.3715500E+00, 0.3726000E+00, &
     & 0.3801900E+00, 0.3826700E+00, 0.3867300E+00, 0.3947800E+00, &
     & 0.4070700E+00, 0.4190400E+00, 0.4332800E+00, 0.4527500E+00, &
     & 0.4782600E+00, 0.4996600E+00, 0.5274900E+00, 0.5785800E+00, &
     & 0.5859721E+00, 0.6172880E+00, 0.6708680E+00, 0.6708680E+00 /
      data (ref_adm( 1,iz,23,17),iz = 1,20) / &
     & 0.3394400E+00, 0.3394400E+00, 0.3396700E+00, 0.3417400E+00, &
     & 0.3473500E+00, 0.3534800E+00, 0.3634600E+00, 0.3748300E+00, &
     & 0.3868600E+00, 0.4009100E+00, 0.4188700E+00, 0.4422300E+00, &
     & 0.4659900E+00, 0.4922500E+00, 0.5294100E+00, 0.5773600E+00, &
     & 0.6447000E+00, 0.6154590E+00, 0.6798782E+00, 0.6798782E+00 /
      data (ref_adm( 1,iz,24,17),iz = 1,20) / &
     & 0.3707100E+00, 0.3707100E+00, 0.3605000E+00, 0.3614900E+00, &
     & 0.3653100E+00, 0.3698500E+00, 0.3755500E+00, 0.3835800E+00, &
     & 0.3950800E+00, 0.4083100E+00, 0.4262100E+00, 0.4459200E+00, &
     & 0.4705100E+00, 0.4964600E+00, 0.5237100E+00, 0.5768400E+00, &
     & 0.6346000E+00, 0.6197975E+00, 0.6951342E+00, 0.6951342E+00 /
      data (ref_adm( 1,iz,25,17),iz = 1,20) / &
     & 0.3643800E+00, 0.3643800E+00, 0.3759600E+00, 0.3842200E+00, &
     & 0.3900700E+00, 0.3949900E+00, 0.4016900E+00, 0.4103500E+00, &
     & 0.4204600E+00, 0.4328200E+00, 0.4483700E+00, 0.4666200E+00, &
     & 0.4902800E+00, 0.5195100E+00, 0.5391100E+00, 0.5821300E+00, &
     & 0.6441500E+00, 0.7098000E+00, 0.7154291E+00, 0.7154291E+00 /
      data (ref_adm( 1,iz,26,17),iz = 1,20) / &
     & 0.3755700E+00, 0.3755700E+00, 0.3653100E+00, 0.3668900E+00, &
     & 0.3729100E+00, 0.3816700E+00, 0.3895500E+00, 0.4016300E+00, &
     & 0.4123500E+00, 0.4229300E+00, 0.4424600E+00, 0.4651200E+00, &
     & 0.4926500E+00, 0.5249200E+00, 0.5525200E+00, 0.6027200E+00, &
     & 0.6613000E+00, 0.7299500E+00, 0.7422125E+00, 0.7422125E+00 /
      data (ref_adm( 1,iz,27,17),iz = 1,20) / &
     & 0.3643300E+00, 0.3643300E+00, 0.3635500E+00, 0.3686300E+00, &
     & 0.3733100E+00, 0.3821500E+00, 0.3926800E+00, 0.4021300E+00, &
     & 0.4148700E+00, 0.4259300E+00, 0.4454800E+00, 0.4727900E+00, &
     & 0.5003500E+00, 0.5319200E+00, 0.5655900E+00, 0.6136000E+00, &
     & 0.6764600E+00, 0.7429400E+00, 0.7497700E+00, 0.7497700E+00 /
      data (ref_adm( 1,iz,28,17),iz = 1,20) / &
     & 0.3582700E+00, 0.3582700E+00, 0.3632300E+00, 0.3680800E+00, &
     & 0.3733200E+00, 0.3811600E+00, 0.3914400E+00, 0.4041400E+00, &
     & 0.4182000E+00, 0.4332500E+00, 0.4530500E+00, 0.4764700E+00, &
     & 0.5081000E+00, 0.5405600E+00, 0.5728300E+00, 0.6294900E+00, &
     & 0.6964900E+00, 0.7720700E+00, 0.7548700E+00, 0.7548700E+00 /
      data (ref_adm( 1,iz,29,17),iz = 1,20) / &
     & 0.3656000E+00, 0.3656000E+00, 0.3651700E+00, 0.3686700E+00, &
     & 0.3732800E+00, 0.3826200E+00, 0.3916800E+00, 0.4056700E+00, &
     & 0.4242600E+00, 0.4414600E+00, 0.4573100E+00, 0.4840000E+00, &
     & 0.5197900E+00, 0.5533300E+00, 0.5896400E+00, 0.6570500E+00, &
     & 0.7289700E+00, 0.8067400E+00, 0.7789100E+00, 0.7789100E+00 /
      data (ref_adm( 1,iz,30,17),iz = 1,20) / &
     & 0.3690200E+00, 0.3690200E+00, 0.3687600E+00, 0.3710800E+00, &
     & 0.3784800E+00, 0.3862600E+00, 0.3960000E+00, 0.4114500E+00, &
     & 0.4246100E+00, 0.4432200E+00, 0.4634300E+00, 0.4933000E+00, &
     & 0.5298800E+00, 0.5685000E+00, 0.6114800E+00, 0.6810300E+00, &
     & 0.7514600E+00, 0.8360300E+00, 0.8169500E+00, 0.8169500E+00 /
      data (ref_adm( 1,iz,31,17),iz = 1,20) / &
     & 0.3691500E+00, 0.3691500E+00, 0.3687300E+00, 0.3717100E+00, &
     & 0.3770600E+00, 0.3841800E+00, 0.3965100E+00, 0.4095200E+00, &
     & 0.4281900E+00, 0.4499400E+00, 0.4743300E+00, 0.5018700E+00, &
     & 0.5387700E+00, 0.5794300E+00, 0.6193700E+00, 0.6795800E+00, &
     & 0.7591500E+00, 0.8487500E+00, 0.8288100E+00, 0.8288100E+00 /
      data (ref_adm( 1,iz,32,17),iz = 1,20) / &
     & 0.3735000E+00, 0.3735000E+00, 0.3752600E+00, 0.3787100E+00, &
     & 0.3858200E+00, 0.3950400E+00, 0.4024700E+00, 0.4147300E+00, &
     & 0.4311900E+00, 0.4537700E+00, 0.4776300E+00, 0.5074400E+00, &
     & 0.5433700E+00, 0.5812100E+00, 0.6250600E+00, 0.6832000E+00, &
     & 0.7732800E+00, 0.8660300E+00, 0.8361800E+00, 0.8361800E+00 /
      data (ref_adm( 1,iz,33,17),iz = 1,20) / &
     & 0.3597300E+00, 0.3597300E+00, 0.3614300E+00, 0.3666100E+00, &
     & 0.3749300E+00, 0.3813200E+00, 0.3932900E+00, 0.4059300E+00, &
     & 0.4248100E+00, 0.4484200E+00, 0.4756300E+00, 0.5034600E+00, &
     & 0.5370300E+00, 0.5760500E+00, 0.6263600E+00, 0.6950500E+00, &
     & 0.7846100E+00, 0.8807800E+00, 0.8546000E+00, 0.8546000E+00 /
      data (ref_adm( 1,iz,34,17),iz = 1,20) / &
     & 0.3650300E+00, 0.3650300E+00, 0.3690800E+00, 0.3718400E+00, &
     & 0.3794800E+00, 0.3867600E+00, 0.3984200E+00, 0.4148800E+00, &
     & 0.4313900E+00, 0.4579400E+00, 0.4890700E+00, 0.5159700E+00, &
     & 0.5468200E+00, 0.5867500E+00, 0.6392300E+00, 0.7112100E+00, &
     & 0.7973800E+00, 0.9004300E+00, 0.8792200E+00, 0.8792200E+00 /
      data (ref_adm( 1,iz,35,17),iz = 1,20) / &
     & 0.3639200E+00, 0.3639200E+00, 0.3669700E+00, 0.3678600E+00, &
     & 0.3726700E+00, 0.3840400E+00, 0.3959700E+00, 0.4131100E+00, &
     & 0.4288100E+00, 0.4561600E+00, 0.4865500E+00, 0.5135400E+00, &
     & 0.5475000E+00, 0.5931500E+00, 0.6456700E+00, 0.7192700E+00, &
     & 0.8122200E+00, 0.9189100E+00, 0.8955500E+00, 0.8955500E+00 /
      data (ref_adm( 1,iz,36,17),iz = 1,20) / &
     & 0.3687400E+00, 0.3687400E+00, 0.3674000E+00, 0.3678100E+00, &
     & 0.3739700E+00, 0.3862900E+00, 0.3978600E+00, 0.4119700E+00, &
     & 0.4312700E+00, 0.4580300E+00, 0.4834900E+00, 0.5148500E+00, &
     & 0.5559600E+00, 0.6025700E+00, 0.6544900E+00, 0.7294300E+00, &
     & 0.8313200E+00, 0.9409700E+00, 0.9071500E+00, 0.9071500E+00 /
      data (ref_adm( 1,iz,37,17),iz = 1,20) / &
     & 0.3678000E+00, 0.3678000E+00, 0.3685600E+00, 0.3721500E+00, &
     & 0.3782000E+00, 0.3853000E+00, 0.3978500E+00, 0.4149800E+00, &
     & 0.4353100E+00, 0.4580800E+00, 0.4813400E+00, 0.5184800E+00, &
     & 0.5611400E+00, 0.6022900E+00, 0.6563700E+00, 0.7392400E+00, &
     & 0.8507200E+00, 0.9719400E+00, 0.9418100E+00, 0.9418100E+00 /
      data (ref_adm( 1,iz,38,17),iz = 1,20) / &
     & 0.3678000E+00, 0.3678000E+00, 0.3685600E+00, 0.3721500E+00, &
     & 0.3782000E+00, 0.3853000E+00, 0.3978500E+00, 0.4149800E+00, &
     & 0.4353100E+00, 0.4580800E+00, 0.4813400E+00, 0.5184800E+00, &
     & 0.5611400E+00, 0.6022900E+00, 0.6563700E+00, 0.7392400E+00, &
     & 0.8507200E+00, 0.9719400E+00, 0.9418100E+00, 0.9418100E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6665173E+00
      data (ref_adm( 1,iz, 1,18),iz = 1,20) / &
     & 0.4267600E+00, 0.4267600E+00, 0.4255600E+00, 0.4343200E+00, &
     & 0.4535200E+00, 0.4778900E+00, 0.4991800E+00, 0.5308000E+00, &
     & 0.5734400E+00, 0.6391600E+00, 0.7378600E+00, 0.8643600E+00, &
     & 0.1052089E+01, 0.1307086E+01, 0.1882096E+01, 0.3145207E+01, &
     & 0.3783982E+01, 0.4174770E+01, 0.5355637E+01, 0.5355637E+01 /
      data (ref_adm( 1,iz, 2,18),iz = 1,20) / &
     & 0.4267600E+00, 0.4267600E+00, 0.4255600E+00, 0.4343200E+00, &
     & 0.4535200E+00, 0.4778900E+00, 0.4991800E+00, 0.5308000E+00, &
     & 0.5734400E+00, 0.6391600E+00, 0.7378600E+00, 0.8643600E+00, &
     & 0.1052089E+01, 0.1307086E+01, 0.1882096E+01, 0.3145207E+01, &
     & 0.3783982E+01, 0.4174770E+01, 0.5355637E+01, 0.5355637E+01 /
      data (ref_adm( 1,iz, 3,18),iz = 1,20) / &
     & 0.4252100E+00, 0.4252100E+00, 0.4342500E+00, 0.4404800E+00, &
     & 0.4502400E+00, 0.4737300E+00, 0.4986500E+00, 0.5324200E+00, &
     & 0.5714400E+00, 0.6411100E+00, 0.7272900E+00, 0.8400100E+00, &
     & 0.1038591E+01, 0.1279027E+01, 0.1803806E+01, 0.3050908E+01, &
     & 0.3821785E+01, 0.4077027E+01, 0.2498150E+01, 0.2498150E+01 /
      data (ref_adm( 1,iz, 4,18),iz = 1,20) / &
     & 0.4237500E+00, 0.4237500E+00, 0.4349300E+00, 0.4443600E+00, &
     & 0.4548300E+00, 0.4662300E+00, 0.4945000E+00, 0.5252400E+00, &
     & 0.5699300E+00, 0.6348500E+00, 0.7204100E+00, 0.8175700E+00, &
     & 0.1012392E+01, 0.1224439E+01, 0.1662572E+01, 0.2674538E+01, &
     & 0.3884846E+01, 0.4284351E+01, 0.3847021E+01, 0.3847021E+01 /
      data (ref_adm( 1,iz, 5,18),iz = 1,20) / &
     & 0.4251700E+00, 0.4251700E+00, 0.4372600E+00, 0.4464300E+00, &
     & 0.4587100E+00, 0.4757700E+00, 0.4952400E+00, 0.5246800E+00, &
     & 0.5744300E+00, 0.6316200E+00, 0.7105700E+00, 0.8003000E+00, &
     & 0.9801655E+00, 0.1156630E+01, 0.1506126E+01, 0.2196904E+01, &
     & 0.3457479E+01, 0.4888624E+01, 0.4035241E+01, 0.4035241E+01 /
      data (ref_adm( 1,iz, 6,18),iz = 1,20) / &
     & 0.4320600E+00, 0.4320600E+00, 0.4329500E+00, 0.4411400E+00, &
     & 0.4536400E+00, 0.4733900E+00, 0.4988900E+00, 0.5332700E+00, &
     & 0.5759000E+00, 0.6300000E+00, 0.7011700E+00, 0.7908400E+00, &
     & 0.9344400E+00, 0.1119500E+01, 0.1362000E+01, 0.1744100E+01, &
     & 0.2367000E+01, 0.2843500E+01, 0.2699800E+01, 0.2699800E+01 /
      data (ref_adm( 1,iz, 7,18),iz = 1,20) / &
     & 0.4322400E+00, 0.4322400E+00, 0.4413200E+00, 0.4484800E+00, &
     & 0.4577300E+00, 0.4740600E+00, 0.5036000E+00, 0.5359700E+00, &
     & 0.5747800E+00, 0.6199600E+00, 0.6870400E+00, 0.7699200E+00, &
     & 0.9264500E+00, 0.1099700E+01, 0.1335700E+01, 0.1707300E+01, &
     & 0.2157700E+01, 0.2616900E+01, 0.2449300E+01, 0.2449300E+01 /
      data (ref_adm( 1,iz, 8,18),iz = 1,20) / &
     & 0.4285800E+00, 0.4285800E+00, 0.4314700E+00, 0.4403900E+00, &
     & 0.4458900E+00, 0.4637100E+00, 0.4912400E+00, 0.5171500E+00, &
     & 0.5530400E+00, 0.5979300E+00, 0.6562400E+00, 0.7306500E+00, &
     & 0.8709400E+00, 0.1039500E+01, 0.1249000E+01, 0.1565100E+01, &
     & 0.1942000E+01, 0.2277800E+01, 0.2220400E+01, 0.2220400E+01 /
      data (ref_adm( 1,iz, 9,18),iz = 1,20) / &
     & 0.4305400E+00, 0.4305400E+00, 0.4286100E+00, 0.4332400E+00, &
     & 0.4529900E+00, 0.4650900E+00, 0.4783100E+00, 0.5140200E+00, &
     & 0.5411100E+00, 0.5783200E+00, 0.6356900E+00, 0.6975000E+00, &
     & 0.8221200E+00, 0.9709600E+00, 0.1152900E+01, 0.1397000E+01, &
     & 0.1721300E+01, 0.2005100E+01, 0.1921200E+01, 0.1921200E+01 /
      data (ref_adm( 1,iz,10,18),iz = 1,20) / &
     & 0.4294400E+00, 0.4294400E+00, 0.4312700E+00, 0.4427600E+00, &
     & 0.4496800E+00, 0.4626100E+00, 0.4823300E+00, 0.5022500E+00, &
     & 0.5365700E+00, 0.5634400E+00, 0.6114700E+00, 0.6718100E+00, &
     & 0.7861600E+00, 0.9028800E+00, 0.1055000E+01, 0.1281800E+01, &
     & 0.1553200E+01, 0.1797100E+01, 0.1665700E+01, 0.1665700E+01 /
      data (ref_adm( 1,iz,11,18),iz = 1,20) / &
     & 0.4246600E+00, 0.4246600E+00, 0.4265200E+00, 0.4346800E+00, &
     & 0.4450000E+00, 0.4581800E+00, 0.4742000E+00, 0.4911500E+00, &
     & 0.5219600E+00, 0.5483400E+00, 0.5923300E+00, 0.6374500E+00, &
     & 0.7498400E+00, 0.8568700E+00, 0.9707500E+00, 0.1162900E+01, &
     & 0.1411600E+01, 0.1616000E+01, 0.1560600E+01, 0.1560600E+01 /
      data (ref_adm( 1,iz,12,18),iz = 1,20) / &
     & 0.4271300E+00, 0.4271300E+00, 0.4254200E+00, 0.4323200E+00, &
     & 0.4438600E+00, 0.4527800E+00, 0.4652700E+00, 0.4847500E+00, &
     & 0.5086200E+00, 0.5333200E+00, 0.5744300E+00, 0.6162500E+00, &
     & 0.7171200E+00, 0.7979200E+00, 0.9153600E+00, 0.1071100E+01, &
     & 0.1270400E+01, 0.1464000E+01, 0.1396500E+01, 0.1396500E+01 /
      data (ref_adm( 1,iz,13,18),iz = 1,20) / &
     & 0.4297400E+00, 0.4297400E+00, 0.4317100E+00, 0.4358700E+00, &
     & 0.4371800E+00, 0.4451400E+00, 0.4560300E+00, 0.4750200E+00, &
     & 0.4971000E+00, 0.5215200E+00, 0.5541300E+00, 0.5922100E+00, &
     & 0.6813800E+00, 0.7527200E+00, 0.8449500E+00, 0.9960900E+00, &
     & 0.1165600E+01, 0.1350500E+01, 0.1237500E+01, 0.1237500E+01 /
      data (ref_adm( 1,iz,14,18),iz = 1,20) / &
     & 0.4412100E+00, 0.4412100E+00, 0.4418000E+00, 0.4400700E+00, &
     & 0.4426100E+00, 0.4483900E+00, 0.4557300E+00, 0.4678500E+00, &
     & 0.4866700E+00, 0.5060500E+00, 0.5315300E+00, 0.5612800E+00, &
     & 0.6022200E+00, 0.6459200E+00, 0.7999600E+00, 0.9303100E+00, &
     & 0.1095800E+01, 0.1300300E+01, 0.1452486E+01, 0.1452486E+01 /
      data (ref_adm( 1,iz,15,18),iz = 1,20) / &
     & 0.4176400E+00, 0.4176400E+00, 0.4107800E+00, 0.4124300E+00, &
     & 0.4162600E+00, 0.4235200E+00, 0.4297700E+00, 0.4398700E+00, &
     & 0.4545800E+00, 0.4692900E+00, 0.4913000E+00, 0.5170800E+00, &
     & 0.5519500E+00, 0.5906900E+00, 0.7557900E+00, 0.8735700E+00, &
     & 0.1012300E+01, 0.1029200E+01, 0.1375333E+01, 0.1375333E+01 /
      data (ref_adm( 1,iz,16,18),iz = 1,20) / &
     & 0.4263900E+00, 0.4263900E+00, 0.4307900E+00, 0.4318200E+00, &
     & 0.4391500E+00, 0.4439300E+00, 0.4480800E+00, 0.4620700E+00, &
     & 0.4786900E+00, 0.4923200E+00, 0.5115100E+00, 0.5384800E+00, &
     & 0.5743300E+00, 0.6107100E+00, 0.7295600E+00, 0.8310300E+00, &
     & 0.8995000E+00, 0.1034914E+01, 0.1312697E+01, 0.1312697E+01 /
      data (ref_adm( 1,iz,17,18),iz = 1,20) / &
     & 0.4221000E+00, 0.4221000E+00, 0.4250500E+00, 0.4288700E+00, &
     & 0.4350800E+00, 0.4387600E+00, 0.4469300E+00, 0.4559100E+00, &
     & 0.4723800E+00, 0.4805700E+00, 0.5041000E+00, 0.5315900E+00, &
     & 0.6068000E+00, 0.6512500E+00, 0.7077200E+00, 0.7754500E+00, &
     & 0.8451288E+00, 0.9832257E+00, 0.1256244E+01, 0.1256244E+01 /
      data (ref_adm( 1,iz,18,18),iz = 1,20) / &
     & 0.4203000E+00, 0.4203000E+00, 0.4252900E+00, 0.4276500E+00, &
     & 0.4295200E+00, 0.4376500E+00, 0.4472000E+00, 0.4540600E+00, &
     & 0.4703300E+00, 0.4778900E+00, 0.4978600E+00, 0.5262700E+00, &
     & 0.5913800E+00, 0.6333800E+00, 0.6895600E+00, 0.7286800E+00, &
     & 0.8147051E+00, 0.9455459E+00, 0.1215298E+01, 0.1215298E+01 /
      data (ref_adm( 1,iz,19,18),iz = 1,20) / &
     & 0.4272200E+00, 0.4272200E+00, 0.4300700E+00, 0.4312800E+00, &
     & 0.4349800E+00, 0.4377100E+00, 0.4420900E+00, 0.4471900E+00, &
     & 0.4551900E+00, 0.4700600E+00, 0.4872500E+00, 0.5182300E+00, &
     & 0.5749000E+00, 0.6194900E+00, 0.6719400E+00, 0.6873200E+00, &
     & 0.7854435E+00, 0.9100218E+00, 0.1182642E+01, 0.1182642E+01 /
      data (ref_adm( 1,iz,20,18),iz = 1,20) / &
     & 0.4305700E+00, 0.4305700E+00, 0.4287900E+00, 0.4290200E+00, &
     & 0.4318300E+00, 0.4353200E+00, 0.4445400E+00, 0.4513000E+00, &
     & 0.4563700E+00, 0.4676500E+00, 0.4810500E+00, 0.5139800E+00, &
     & 0.5634800E+00, 0.6011300E+00, 0.6395000E+00, 0.6919897E+00, &
     & 0.7649875E+00, 0.8853524E+00, 0.1165827E+01, 0.1165827E+01 /
      data (ref_adm( 1,iz,21,18),iz = 1,20) / &
     & 0.4285400E+00, 0.4285400E+00, 0.4254100E+00, 0.4257400E+00, &
     & 0.4299300E+00, 0.4324800E+00, 0.4362800E+00, 0.4496900E+00, &
     & 0.4602200E+00, 0.4732300E+00, 0.4888000E+00, 0.5097000E+00, &
     & 0.5534200E+00, 0.5876700E+00, 0.6087100E+00, 0.6152800E+00, &
     & 0.7488266E+00, 0.8677498E+00, 0.1160227E+01, 0.1160227E+01 /
      data (ref_adm( 1,iz,22,18),iz = 1,20) / &
     & 0.4223600E+00, 0.4223600E+00, 0.4231900E+00, 0.4217100E+00, &
     & 0.4278900E+00, 0.4322700E+00, 0.4353500E+00, 0.4476000E+00, &
     & 0.4606600E+00, 0.4719100E+00, 0.4916000E+00, 0.5085200E+00, &
     & 0.5385100E+00, 0.5731900E+00, 0.5906700E+00, 0.6117400E+00, &
     & 0.7650792E+00, 0.8819036E+00, 0.1170517E+01, 0.1170517E+01 /
      data (ref_adm( 1,iz,23,18),iz = 1,20) / &
     & 0.4040600E+00, 0.4040600E+00, 0.3978500E+00, 0.4210700E+00, &
     & 0.4292700E+00, 0.4372800E+00, 0.4459600E+00, 0.4508100E+00, &
     & 0.4672500E+00, 0.4748700E+00, 0.4889000E+00, 0.5021600E+00, &
     & 0.5242700E+00, 0.5589900E+00, 0.5925400E+00, 0.6340900E+00, &
     & 0.7089400E+00, 0.8739805E+00, 0.1184528E+01, 0.1184528E+01 /
      data (ref_adm( 1,iz,24,18),iz = 1,20) / &
     & 0.4337800E+00, 0.4337800E+00, 0.4254300E+00, 0.4249400E+00, &
     & 0.4292000E+00, 0.4335800E+00, 0.4418300E+00, 0.4518400E+00, &
     & 0.4649900E+00, 0.4816100E+00, 0.5017300E+00, 0.5265300E+00, &
     & 0.5602900E+00, 0.6058300E+00, 0.6253900E+00, 0.6483100E+00, &
     & 0.7158300E+00, 0.8731133E+00, 0.1209878E+01, 0.1209878E+01 /
      data (ref_adm( 1,iz,25,18),iz = 1,20) / &
     & 0.4236800E+00, 0.4236800E+00, 0.4236100E+00, 0.4296600E+00, &
     & 0.4362700E+00, 0.4411500E+00, 0.4512400E+00, 0.4601100E+00, &
     & 0.4726400E+00, 0.4852600E+00, 0.5033700E+00, 0.5281300E+00, &
     & 0.5615800E+00, 0.6100300E+00, 0.6305800E+00, 0.6768700E+00, &
     & 0.7493300E+00, 0.8429600E+00, 0.1244302E+01, 0.1244302E+01 /
      data (ref_adm( 1,iz,26,18),iz = 1,20) / &
     & 0.4254000E+00, 0.4254000E+00, 0.4277000E+00, 0.4285400E+00, &
     & 0.4321700E+00, 0.4385000E+00, 0.4480200E+00, 0.4591200E+00, &
     & 0.4713500E+00, 0.4845400E+00, 0.5135000E+00, 0.5378500E+00, &
     & 0.5723100E+00, 0.6160300E+00, 0.6457500E+00, 0.7041400E+00, &
     & 0.7831000E+00, 0.8981000E+00, 0.1291735E+01, 0.1291735E+01 /
      data (ref_adm( 1,iz,27,18),iz = 1,20) / &
     & 0.4216000E+00, 0.4216000E+00, 0.4258000E+00, 0.4277600E+00, &
     & 0.4398500E+00, 0.4419600E+00, 0.4472200E+00, 0.4595700E+00, &
     & 0.4757800E+00, 0.4928100E+00, 0.5171200E+00, 0.5442200E+00, &
     & 0.5767400E+00, 0.6278800E+00, 0.6667300E+00, 0.7342500E+00, &
     & 0.8340500E+00, 0.9950800E+00, 0.1123400E+01, 0.1123400E+01 /
      data (ref_adm( 1,iz,28,18),iz = 1,20) / &
     & 0.4161600E+00, 0.4161600E+00, 0.4290800E+00, 0.4298700E+00, &
     & 0.4317200E+00, 0.4393300E+00, 0.4460300E+00, 0.4586200E+00, &
     & 0.4830100E+00, 0.5023200E+00, 0.5259500E+00, 0.5552500E+00, &
     & 0.5957200E+00, 0.6480600E+00, 0.6964200E+00, 0.7760700E+00, &
     & 0.8940600E+00, 0.1099600E+01, 0.1221800E+01, 0.1221800E+01 /
      data (ref_adm( 1,iz,29,18),iz = 1,20) / &
     & 0.4260300E+00, 0.4260300E+00, 0.4234500E+00, 0.4230800E+00, &
     & 0.4335900E+00, 0.4400500E+00, 0.4520600E+00, 0.4653300E+00, &
     & 0.4843200E+00, 0.5072100E+00, 0.5329100E+00, 0.5651900E+00, &
     & 0.6092900E+00, 0.6658500E+00, 0.7263400E+00, 0.8248400E+00, &
     & 0.9631100E+00, 0.1183200E+01, 0.1305500E+01, 0.1305500E+01 /
      data (ref_adm( 1,iz,30,18),iz = 1,20) / &
     & 0.4254900E+00, 0.4254900E+00, 0.4179700E+00, 0.4244000E+00, &
     & 0.4380900E+00, 0.4438500E+00, 0.4493400E+00, 0.4642700E+00, &
     & 0.4891600E+00, 0.5109800E+00, 0.5373800E+00, 0.5749900E+00, &
     & 0.6319000E+00, 0.6930600E+00, 0.7586300E+00, 0.8744300E+00, &
     & 0.1016800E+01, 0.1235200E+01, 0.1395000E+01, 0.1395000E+01 /
      data (ref_adm( 1,iz,31,18),iz = 1,20) / &
     & 0.4293600E+00, 0.4293600E+00, 0.4226300E+00, 0.4258400E+00, &
     & 0.4383200E+00, 0.4412500E+00, 0.4550000E+00, 0.4722400E+00, &
     & 0.4879600E+00, 0.5154800E+00, 0.5461800E+00, 0.5908400E+00, &
     & 0.6427600E+00, 0.7086200E+00, 0.7842400E+00, 0.8880200E+00, &
     & 0.1037600E+01, 0.1278800E+01, 0.1458900E+01, 0.1458900E+01 /
      data (ref_adm( 1,iz,32,18),iz = 1,20) / &
     & 0.4367700E+00, 0.4367700E+00, 0.4343400E+00, 0.4355800E+00, &
     & 0.4413300E+00, 0.4510700E+00, 0.4658100E+00, 0.4843900E+00, &
     & 0.5064700E+00, 0.5326100E+00, 0.5597600E+00, 0.6036200E+00, &
     & 0.6640900E+00, 0.7277900E+00, 0.7930500E+00, 0.8994700E+00, &
     & 0.1055300E+01, 0.1289200E+01, 0.1470700E+01, 0.1470700E+01 /
      data (ref_adm( 1,iz,33,18),iz = 1,20) / &
     & 0.4166700E+00, 0.4166700E+00, 0.4222700E+00, 0.4242900E+00, &
     & 0.4378600E+00, 0.4485100E+00, 0.4601300E+00, 0.4797700E+00, &
     & 0.5042600E+00, 0.5332000E+00, 0.5640300E+00, 0.6102400E+00, &
     & 0.6676500E+00, 0.7365500E+00, 0.8090700E+00, 0.9241300E+00, &
     & 0.1096600E+01, 0.1349600E+01, 0.1544100E+01, 0.1544100E+01 /
      data (ref_adm( 1,iz,34,18),iz = 1,20) / &
     & 0.4279500E+00, 0.4279500E+00, 0.4265400E+00, 0.4336200E+00, &
     & 0.4452000E+00, 0.4567800E+00, 0.4666900E+00, 0.4847200E+00, &
     & 0.5072300E+00, 0.5424800E+00, 0.5734000E+00, 0.6148300E+00, &
     & 0.6703400E+00, 0.7384800E+00, 0.8138400E+00, 0.9385000E+00, &
     & 0.1092900E+01, 0.1358000E+01, 0.1524100E+01, 0.1524100E+01 /
      data (ref_adm( 1,iz,35,18),iz = 1,20) / &
     & 0.4210000E+00, 0.4210000E+00, 0.4262700E+00, 0.4280800E+00, &
     & 0.4414800E+00, 0.4518000E+00, 0.4696000E+00, 0.4795500E+00, &
     & 0.5049200E+00, 0.5453700E+00, 0.5716500E+00, 0.6174300E+00, &
     & 0.6709400E+00, 0.7439100E+00, 0.8244500E+00, 0.9482900E+00, &
     & 0.1126600E+01, 0.1390500E+01, 0.1587500E+01, 0.1587500E+01 /
      data (ref_adm( 1,iz,36,18),iz = 1,20) / &
     & 0.4251600E+00, 0.4251600E+00, 0.4292300E+00, 0.4291300E+00, &
     & 0.4375400E+00, 0.4507600E+00, 0.4632700E+00, 0.4831200E+00, &
     & 0.5041000E+00, 0.5424200E+00, 0.5849000E+00, 0.6204500E+00, &
     & 0.6744000E+00, 0.7481700E+00, 0.8253700E+00, 0.9590300E+00, &
     & 0.1139200E+01, 0.1382300E+01, 0.1603600E+01, 0.1603600E+01 /
      data (ref_adm( 1,iz,37,18),iz = 1,20) / &
     & 0.4267200E+00, 0.4267200E+00, 0.4335000E+00, 0.4387000E+00, &
     & 0.4463100E+00, 0.4532000E+00, 0.4638900E+00, 0.4793800E+00, &
     & 0.5051700E+00, 0.5339600E+00, 0.5753400E+00, 0.6273600E+00, &
     & 0.6780700E+00, 0.7461500E+00, 0.8360100E+00, 0.9573900E+00, &
     & 0.1149000E+01, 0.1401300E+01, 0.1671600E+01, 0.1671600E+01 /
      data (ref_adm( 1,iz,38,18),iz = 1,20) / &
     & 0.4267200E+00, 0.4267200E+00, 0.4335000E+00, 0.4387000E+00, &
     & 0.4463100E+00, 0.4532000E+00, 0.4638900E+00, 0.4793800E+00, &
     & 0.5051700E+00, 0.5339600E+00, 0.5753400E+00, 0.6273600E+00, &
     & 0.6780700E+00, 0.7461500E+00, 0.8360100E+00, 0.9573900E+00, &
     & 0.1149000E+01, 0.1401300E+01, 0.1671600E+01, 0.1671600E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm( 2,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.5550488E+04
      data (ref_adm( 2,iz, 1, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5079690E+00, 0.5359400E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm( 2,iz, 2, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5079690E+00, 0.5359400E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm( 2,iz, 3, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707097E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650311E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225322E+00, &
     & 0.5079690E+00, 0.4133300E+00, 0.4734617E+00, 0.4465695E+00, &
     & 0.4187760E+00, 0.3825119E+00, 0.2978929E+00, 0.2978929E+00 /
      data (ref_adm( 2,iz, 4, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5577400E+00, 0.4837900E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm( 2,iz, 5, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707097E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650311E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225322E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465695E+00, &
     & 0.4187760E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm( 2,iz, 6, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm( 2,iz, 7, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707097E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650311E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225322E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465695E+00, &
     & 0.4187760E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm( 2,iz, 8, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm( 2,iz, 9, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707097E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650311E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225322E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465695E+00, &
     & 0.4187760E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm( 2,iz,10, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm( 2,iz,11, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707097E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650311E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225322E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465695E+00, &
     & 0.4187760E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm( 2,iz,12, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm( 2,iz,13, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707097E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650311E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225322E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465695E+00, &
     & 0.4187760E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm( 2,iz,14, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm( 2,iz,15, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707097E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650311E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225322E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465695E+00, &
     & 0.4187760E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm( 2,iz,16, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm( 2,iz,17, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707097E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650311E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225322E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465695E+00, &
     & 0.4187760E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm( 2,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.4448032E+04
      data (ref_adm( 2,iz, 1, 3),iz = 1,20) / &
     & 0.3864199E+00, 0.3864199E+00, 0.3850409E+00, 0.3868744E+00, &
     & 0.3904551E+00, 0.3951163E+00, 0.4027756E+00, 0.4126814E+00, &
     & 0.4243019E+00, 0.5763000E+00, 0.4723700E+00, 0.4742200E+00, &
     & 0.4768800E+00, 0.4971989E+00, 0.5090600E+00, 0.5125459E+00, &
     & 0.5029615E+00, 0.4726145E+00, 0.3928904E+00, 0.3928904E+00 /
      data (ref_adm( 2,iz, 2, 3),iz = 1,20) / &
     & 0.3864199E+00, 0.3864199E+00, 0.3850409E+00, 0.3868744E+00, &
     & 0.3904551E+00, 0.3951163E+00, 0.4027756E+00, 0.4126814E+00, &
     & 0.4243019E+00, 0.5763000E+00, 0.4723700E+00, 0.4742200E+00, &
     & 0.4768800E+00, 0.4971989E+00, 0.5090600E+00, 0.5125459E+00, &
     & 0.5029615E+00, 0.4726145E+00, 0.3928904E+00, 0.3928904E+00 /
      data (ref_adm( 2,iz, 3, 3),iz = 1,20) / &
     & 0.3863964E+00, 0.3863964E+00, 0.3850676E+00, 0.3867977E+00, &
     & 0.3904399E+00, 0.3952903E+00, 0.4024149E+00, 0.5496800E+00, &
     & 0.5316000E+00, 0.5369500E+00, 0.5647000E+00, 0.4498400E+00, &
     & 0.5409500E+00, 0.4963954E+00, 0.5068522E+00, 0.5120121E+00, &
     & 0.5021191E+00, 0.4720265E+00, 0.1191731E+00, 0.1191731E+00 /
      data (ref_adm( 2,iz, 4, 3),iz = 1,20) / &
     & 0.3864265E+00, 0.3864265E+00, 0.3851965E+00, 0.3866369E+00, &
     & 0.3902515E+00, 0.3950090E+00, 0.4020362E+00, 0.2905500E+00, &
     & 0.2934600E+00, 0.5215900E+00, 0.4455200E+00, 0.4435300E+00, &
     & 0.5369800E+00, 0.6090000E+00, 0.5051636E+00, 0.5100219E+00, &
     & 0.5006405E+00, 0.4701801E+00, 0.3903348E+00, 0.3903348E+00 /
      data (ref_adm( 2,iz, 5, 3),iz = 1,20) / &
     & 0.3867168E+00, 0.3867168E+00, 0.3851449E+00, 0.3864994E+00, &
     & 0.3900166E+00, 0.3946895E+00, 0.4016777E+00, 0.4109784E+00, &
     & 0.4224577E+00, 0.5817100E+00, 0.3651300E+00, 0.3074500E+00, &
     & 0.4485900E+00, 0.4927954E+00, 0.5028369E+00, 0.5073163E+00, &
     & 0.4980923E+00, 0.4679806E+00, 0.3881738E+00, 0.3881738E+00 /
      data (ref_adm( 2,iz, 6, 3),iz = 1,20) / &
     & 0.3866633E+00, 0.3866633E+00, 0.3850289E+00, 0.3864145E+00, &
     & 0.3900891E+00, 0.3946810E+00, 0.4010288E+00, 0.4102855E+00, &
     & 0.4214344E+00, 0.4340492E+00, 0.3886800E+00, 0.3960800E+00, &
     & 0.4117000E+00, 0.4899757E+00, 0.4997491E+00, 0.5037008E+00, &
     & 0.4952039E+00, 0.4649291E+00, 0.3850008E+00, 0.3850008E+00 /
      data (ref_adm( 2,iz, 7, 3),iz = 1,20) / &
     & 0.3866993E+00, 0.3866993E+00, 0.3850759E+00, 0.3864024E+00, &
     & 0.3896323E+00, 0.3940811E+00, 0.4004669E+00, 0.4093319E+00, &
     & 0.4202681E+00, 0.4324052E+00, 0.4685000E+00, 0.4241800E+00, &
     & 0.4524200E+00, 0.5438300E+00, 0.4957136E+00, 0.4990891E+00, &
     & 0.4917697E+00, 0.4614111E+00, 0.3817623E+00, 0.3817623E+00 /
      data (ref_adm( 2,iz, 8, 3),iz = 1,20) / &
     & 0.3868334E+00, 0.3868334E+00, 0.3852337E+00, 0.3863169E+00, &
     & 0.3892428E+00, 0.3937383E+00, 0.3997114E+00, 0.4082058E+00, &
     & 0.4184780E+00, 0.5305300E+00, 0.4110700E+00, 0.4146300E+00, &
     & 0.4207900E+00, 0.4160400E+00, 0.4915060E+00, 0.4938520E+00, &
     & 0.4871856E+00, 0.4579147E+00, 0.3780836E+00, 0.3780836E+00 /
      data (ref_adm( 2,iz, 9, 3),iz = 1,20) / &
     & 0.3868205E+00, 0.3868205E+00, 0.3852735E+00, 0.3860795E+00, &
     & 0.3889216E+00, 0.3932786E+00, 0.3989041E+00, 0.4069753E+00, &
     & 0.4170684E+00, 0.4281976E+00, 0.3749000E+00, 0.4340300E+00, &
     & 0.5152900E+00, 0.5176200E+00, 0.4863821E+00, 0.4881384E+00, &
     & 0.4813803E+00, 0.4540802E+00, 0.3743551E+00, 0.3743551E+00 /
      data (ref_adm( 2,iz,10, 3),iz = 1,20) / &
     & 0.3868833E+00, 0.3868833E+00, 0.3853907E+00, 0.3862526E+00, &
     & 0.3885241E+00, 0.3929733E+00, 0.3981611E+00, 0.4055172E+00, &
     & 0.4151516E+00, 0.4256724E+00, 0.3731000E+00, 0.4345900E+00, &
     & 0.4599000E+00, 0.4180000E+00, 0.4804399E+00, 0.4823352E+00, &
     & 0.4745508E+00, 0.4492600E+00, 0.3707961E+00, 0.3707961E+00 /
      data (ref_adm( 2,iz,11, 3),iz = 1,20) / &
     & 0.3868925E+00, 0.3868925E+00, 0.3852088E+00, 0.3862998E+00, &
     & 0.3882271E+00, 0.3923224E+00, 0.3971647E+00, 0.4041090E+00, &
     & 0.4130737E+00, 0.4233303E+00, 0.4345036E+00, 0.3624900E+00, &
     & 0.5150500E+00, 0.4614000E+00, 0.4745057E+00, 0.4756677E+00, &
     & 0.4676133E+00, 0.4438866E+00, 0.3669190E+00, 0.3669190E+00 /
      data (ref_adm( 2,iz,12, 3),iz = 1,20) / &
     & 0.3870220E+00, 0.3870220E+00, 0.3853809E+00, 0.3862563E+00, &
     & 0.3879509E+00, 0.3917849E+00, 0.3965250E+00, 0.4027561E+00, &
     & 0.4108478E+00, 0.4209574E+00, 0.4308725E+00, 0.3658700E+00, &
     & 0.4558383E+00, 0.3913900E+00, 0.4684758E+00, 0.4689977E+00, &
     & 0.4610342E+00, 0.4370556E+00, 0.3628518E+00, 0.3628518E+00 /
      data (ref_adm( 2,iz,13, 3),iz = 1,20) / &
     & 0.3870346E+00, 0.3870346E+00, 0.3856418E+00, 0.3860901E+00, &
     & 0.3878646E+00, 0.3908602E+00, 0.3957293E+00, 0.4013826E+00, &
     & 0.4089930E+00, 0.4180399E+00, 0.4278040E+00, 0.3771800E+00, &
     & 0.4510041E+00, 0.4579609E+00, 0.4624734E+00, 0.4615709E+00, &
     & 0.4538462E+00, 0.4295271E+00, 0.3579983E+00, 0.3579983E+00 /
      data (ref_adm( 2,iz,14, 3),iz = 1,20) / &
     & 0.3871933E+00, 0.3871933E+00, 0.3858944E+00, 0.3861992E+00, &
     & 0.3877876E+00, 0.3905826E+00, 0.3950929E+00, 0.4002952E+00, &
     & 0.4069804E+00, 0.4150786E+00, 0.4244483E+00, 0.4355038E+00, &
     & 0.5496400E+00, 0.5079000E+00, 0.4565018E+00, 0.4546821E+00, &
     & 0.4459779E+00, 0.4221859E+00, 0.3523025E+00, 0.3523025E+00 /
      data (ref_adm( 2,iz,15, 3),iz = 1,20) / &
     & 0.3873270E+00, 0.3873270E+00, 0.3860496E+00, 0.3862070E+00, &
     & 0.3877757E+00, 0.3901051E+00, 0.3943499E+00, 0.3992962E+00, &
     & 0.4049890E+00, 0.4125786E+00, 0.4210759E+00, 0.4313237E+00, &
     & 0.4408138E+00, 0.4821400E+00, 0.4517200E+00, 0.4480051E+00, &
     & 0.4385639E+00, 0.4151084E+00, 0.3464865E+00, 0.3464865E+00 /
      data (ref_adm( 2,iz,16, 3),iz = 1,20) / &
     & 0.3873627E+00, 0.3873627E+00, 0.3865435E+00, 0.3863613E+00, &
     & 0.3877551E+00, 0.3900632E+00, 0.3934481E+00, 0.3983261E+00, &
     & 0.4037531E+00, 0.4102432E+00, 0.4174207E+00, 0.4272384E+00, &
     & 0.4355623E+00, 0.4411938E+00, 0.4061300E+00, 0.4416870E+00, &
     & 0.4312814E+00, 0.4072878E+00, 0.3414428E+00, 0.3414428E+00 /
      data (ref_adm( 2,iz,17, 3),iz = 1,20) / &
     & 0.3874162E+00, 0.3874162E+00, 0.3868571E+00, 0.3869583E+00, &
     & 0.3878311E+00, 0.3900131E+00, 0.3927349E+00, 0.3973581E+00, &
     & 0.4024157E+00, 0.4079245E+00, 0.4143833E+00, 0.4231550E+00, &
     & 0.4309201E+00, 0.4356127E+00, 0.4277700E+00, 0.4351930E+00, &
     & 0.4246846E+00, 0.4000647E+00, 0.3363318E+00, 0.3363318E+00 /
      data (ref_adm( 2,iz,18, 3),iz = 1,20) / &
     & 0.5714973E+00, 0.5714973E+00, 0.5499945E+00, 0.5465468E+00, &
     & 0.5446739E+00, 0.5438372E+00, 0.5420128E+00, 0.5383348E+00, &
     & 0.5390205E+00, 0.5261930E+00, 0.5108495E+00, 0.4981237E+00, &
     & 0.4837987E+00, 0.4694784E+00, 0.4019100E+00, 0.4230031E+00, &
     & 0.3954389E+00, 0.3593997E+00, 0.3002247E+00, 0.3002247E+00 /
      data (ref_adm( 2,iz,19, 3),iz = 1,20) / &
     & 0.5714973E+00, 0.5714973E+00, 0.5499945E+00, 0.5465469E+00, &
     & 0.5446739E+00, 0.5438372E+00, 0.5420128E+00, 0.5383347E+00, &
     & 0.5390205E+00, 0.5261930E+00, 0.5108494E+00, 0.4981238E+00, &
     & 0.4837987E+00, 0.4694784E+00, 0.4493969E+00, 0.4230031E+00, &
     & 0.3954389E+00, 0.3593997E+00, 0.3002247E+00, 0.3002247E+00 /
      data (ref_adm( 2,iz,20, 3),iz = 1,20) / &
     & 0.5714973E+00, 0.5714973E+00, 0.5499945E+00, 0.5465468E+00, &
     & 0.5446739E+00, 0.5438372E+00, 0.5420128E+00, 0.5383348E+00, &
     & 0.5390205E+00, 0.5261930E+00, 0.5108495E+00, 0.4981237E+00, &
     & 0.4837987E+00, 0.4694784E+00, 0.4493969E+00, 0.4230031E+00, &
     & 0.3954389E+00, 0.3593997E+00, 0.3002247E+00, 0.3002247E+00 /
      data (ref_adm( 2,iz,21, 3),iz = 1,20) / &
     & 0.5714973E+00, 0.5714973E+00, 0.5499945E+00, 0.5465469E+00, &
     & 0.5446739E+00, 0.5438372E+00, 0.5420128E+00, 0.5383347E+00, &
     & 0.5390205E+00, 0.5261930E+00, 0.5108494E+00, 0.4981238E+00, &
     & 0.4837987E+00, 0.4694784E+00, 0.4493969E+00, 0.4230031E+00, &
     & 0.3954389E+00, 0.3593997E+00, 0.3002247E+00, 0.3002247E+00 /
      data (ref_adm( 2,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 2,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo  0.4305441E+00
      data (ref_adm( 2,iz, 1, 4),iz = 1,20) / &
     & 0.6304000E+00, 0.6304000E+00, 0.4880300E+00, 0.4144000E+00, &
     & 0.6575900E+00, 0.5751700E+00, 0.3260300E+00, 0.4063300E+00, &
     & 0.4529600E+00, 0.4456322E+00, 0.7330000E+00, 0.3971600E+00, &
     & 0.3300200E+00, 0.2873600E+00, 0.4089420E+00, 0.3961633E+00, &
     & 0.3810816E+00, 0.3557929E+00, 0.2998330E+00, 0.2998330E+00 /
      data (ref_adm( 2,iz, 2, 4),iz = 1,20) / &
     & 0.6304000E+00, 0.6304000E+00, 0.4880300E+00, 0.4144000E+00, &
     & 0.6575900E+00, 0.5751700E+00, 0.3260300E+00, 0.4063300E+00, &
     & 0.4529600E+00, 0.4456322E+00, 0.7330000E+00, 0.3971600E+00, &
     & 0.3300200E+00, 0.2873600E+00, 0.4089420E+00, 0.3961633E+00, &
     & 0.3810816E+00, 0.3557929E+00, 0.2998330E+00, 0.2998330E+00 /
      data (ref_adm( 2,iz, 3, 4),iz = 1,20) / &
     & 0.4953100E+00, 0.4953100E+00, 0.4044500E+00, 0.4630200E+00, &
     & 0.4719900E+00, 0.5768800E+00, 0.4827200E+00, 0.4412500E+00, &
     & 0.4492400E+00, 0.4456322E+00, 0.4396362E+00, 0.4322957E+00, &
     & 0.4304100E+00, 0.4180194E+00, 0.3710000E+00, 0.3961633E+00, &
     & 0.3810816E+00, 0.3557929E+00, 0.2014560E+00, 0.2014560E+00 /
      data (ref_adm( 2,iz, 4, 4),iz = 1,20) / &
     & 0.4377800E+00, 0.4377800E+00, 0.4240600E+00, 0.3818100E+00, &
     & 0.3807500E+00, 0.4576800E+00, 0.5035500E+00, 0.3863800E+00, &
     & 0.4104500E+00, 0.4456322E+00, 0.4396362E+00, 0.3992300E+00, &
     & 0.5187100E+00, 0.3519000E+00, 0.4089420E+00, 0.3961633E+00, &
     & 0.3810816E+00, 0.3557929E+00, 0.2998330E+00, 0.2998330E+00 /
      data (ref_adm( 2,iz, 5, 4),iz = 1,20) / &
     & 0.5049300E+00, 0.5049300E+00, 0.4945400E+00, 0.4269500E+00, &
     & 0.3881600E+00, 0.4122500E+00, 0.4216800E+00, 0.3754300E+00, &
     & 0.3740700E+00, 0.4456322E+00, 0.3823400E+00, 0.3901600E+00, &
     & 0.5772200E+00, 0.4180194E+00, 0.4469100E+00, 0.3961633E+00, &
     & 0.3810816E+00, 0.3557929E+00, 0.2998330E+00, 0.2998330E+00 /
      data (ref_adm( 2,iz, 6, 4),iz = 1,20) / &
     & 0.5063400E+00, 0.5063400E+00, 0.4555900E+00, 0.4286500E+00, &
     & 0.4354200E+00, 0.4750400E+00, 0.4408400E+00, 0.4123200E+00, &
     & 0.4300300E+00, 0.3612200E+00, 0.4243900E+00, 0.3935000E+00, &
     & 0.5501800E+00, 0.4180194E+00, 0.5426700E+00, 0.3961633E+00, &
     & 0.3810816E+00, 0.3557929E+00, 0.2998330E+00, 0.2998330E+00 /
      data (ref_adm( 2,iz, 7, 4),iz = 1,20) / &
     & 0.4232100E+00, 0.4232100E+00, 0.4564800E+00, 0.4277200E+00, &
     & 0.4617300E+00, 0.4807700E+00, 0.4529200E+00, 0.4797000E+00, &
     & 0.4398300E+00, 0.5126100E+00, 0.4847400E+00, 0.3750500E+00, &
     & 0.4459400E+00, 0.4180194E+00, 0.5569400E+00, 0.3961633E+00, &
     & 0.3810816E+00, 0.3557929E+00, 0.2998330E+00, 0.2998330E+00 /
      data (ref_adm( 2,iz, 8, 4),iz = 1,20) / &
     & 0.4772000E+00, 0.4772000E+00, 0.3884700E+00, 0.4402500E+00, &
     & 0.4435600E+00, 0.4509100E+00, 0.4505000E+00, 0.4618300E+00, &
     & 0.4517000E+00, 0.5012500E+00, 0.4791500E+00, 0.3918400E+00, &
     & 0.3952300E+00, 0.4108900E+00, 0.4612500E+00, 0.3961633E+00, &
     & 0.3810816E+00, 0.3557929E+00, 0.2998330E+00, 0.2998330E+00 /
      data (ref_adm( 2,iz, 9, 4),iz = 1,20) / &
     & 0.6180200E+00, 0.6180200E+00, 0.3549600E+00, 0.4448900E+00, &
     & 0.4484500E+00, 0.3985600E+00, 0.4718000E+00, 0.4785900E+00, &
     & 0.4624300E+00, 0.4621200E+00, 0.4339100E+00, 0.4223400E+00, &
     & 0.5300500E+00, 0.3845000E+00, 0.4089420E+00, 0.4501400E+00, &
     & 0.3810816E+00, 0.3557929E+00, 0.2998330E+00, 0.2998330E+00 /
      data (ref_adm( 2,iz,10, 4),iz = 1,20) / &
     & 0.5061648E+00, 0.5061648E+00, 0.4717895E+00, 0.4678235E+00, &
     & 0.4261900E+00, 0.4677951E+00, 0.4546900E+00, 0.4390700E+00, &
     & 0.3941300E+00, 0.3808100E+00, 0.4463200E+00, 0.4270300E+00, &
     & 0.5148500E+00, 0.3971600E+00, 0.4089420E+00, 0.4899700E+00, &
     & 0.3810816E+00, 0.3557929E+00, 0.2998330E+00, 0.2998330E+00 /
      data (ref_adm( 2,iz,11, 4),iz = 1,20) / &
     & 0.5061648E+00, 0.5061648E+00, 0.4717895E+00, 0.4678235E+00, &
     & 0.4761900E+00, 0.4252800E+00, 0.4555400E+00, 0.4585965E+00, &
     & 0.4350300E+00, 0.4844500E+00, 0.5176500E+00, 0.4181700E+00, &
     & 0.4677100E+00, 0.4557700E+00, 0.4089420E+00, 0.3961633E+00, &
     & 0.3810816E+00, 0.3557929E+00, 0.2998330E+00, 0.2998330E+00 /
      data (ref_adm( 2,iz,12, 4),iz = 1,20) / &
     & 0.5061648E+00, 0.5061648E+00, 0.3954900E+00, 0.4678235E+00, &
     & 0.4665548E+00, 0.4677951E+00, 0.4651526E+00, 0.4585965E+00, &
     & 0.5636000E+00, 0.4456322E+00, 0.4037500E+00, 0.4205300E+00, &
     & 0.3967500E+00, 0.4011800E+00, 0.4089420E+00, 0.3961633E+00, &
     & 0.3810816E+00, 0.3557929E+00, 0.2998330E+00, 0.2998330E+00 /
      data (ref_adm( 2,iz,13, 4),iz = 1,20) / &
     & 0.3528400E+00, 0.3528400E+00, 0.4717895E+00, 0.4678235E+00, &
     & 0.4665548E+00, 0.4677953E+00, 0.3949200E+00, 0.4482700E+00, &
     & 0.4522300E+00, 0.5824800E+00, 0.4617700E+00, 0.4534400E+00, &
     & 0.4994100E+00, 0.3791000E+00, 0.4089420E+00, 0.3961633E+00, &
     & 0.3810816E+00, 0.3557929E+00, 0.2998330E+00, 0.2998330E+00 /
      data (ref_adm( 2,iz,14, 4),iz = 1,20) / &
     & 0.5246300E+00, 0.5246300E+00, 0.4717895E+00, 0.4678235E+00, &
     & 0.4665548E+00, 0.4677951E+00, 0.4719800E+00, 0.4823000E+00, &
     & 0.5017400E+00, 0.5111300E+00, 0.4519800E+00, 0.4396900E+00, &
     & 0.4977500E+00, 0.3704000E+00, 0.4089420E+00, 0.3961633E+00, &
     & 0.3810816E+00, 0.3557929E+00, 0.2998330E+00, 0.2998330E+00 /
      data (ref_adm( 2,iz,15, 4),iz = 1,20) / &
     & 0.5061648E+00, 0.5061648E+00, 0.4717895E+00, 0.4678235E+00, &
     & 0.4665548E+00, 0.4677953E+00, 0.4651526E+00, 0.4034000E+00, &
     & 0.4648400E+00, 0.5078200E+00, 0.4396362E+00, 0.4322957E+00, &
     & 0.4244748E+00, 0.4180194E+00, 0.4089420E+00, 0.3961633E+00, &
     & 0.3810816E+00, 0.3557929E+00, 0.2998330E+00, 0.2998330E+00 /
      data (ref_adm( 2,iz,16, 4),iz = 1,20) / &
     & 0.5311300E+00, 0.5311300E+00, 0.4137500E+00, 0.3915600E+00, &
     & 0.4809400E+00, 0.4677951E+00, 0.4651526E+00, 0.4554500E+00, &
     & 0.5574900E+00, 0.4292200E+00, 0.4829400E+00, 0.4322957E+00, &
     & 0.4244748E+00, 0.4180194E+00, 0.4089420E+00, 0.3961633E+00, &
     & 0.3810816E+00, 0.3557929E+00, 0.2998330E+00, 0.2998330E+00 /
      data (ref_adm( 2,iz,17, 4),iz = 1,20) / &
     & 0.4925400E+00, 0.4925400E+00, 0.5165100E+00, 0.4839500E+00, &
     & 0.3832500E+00, 0.4283900E+00, 0.4835200E+00, 0.4585965E+00, &
     & 0.3780400E+00, 0.4456322E+00, 0.4396362E+00, 0.4322957E+00, &
     & 0.4244748E+00, 0.4697300E+00, 0.5150800E+00, 0.3961633E+00, &
     & 0.3810816E+00, 0.3557929E+00, 0.2998330E+00, 0.2998330E+00 /
      data (ref_adm( 2,iz,18, 4),iz = 1,20) / &
     & 0.3872500E+00, 0.3872500E+00, 0.4203100E+00, 0.5366200E+00, &
     & 0.5234900E+00, 0.4410200E+00, 0.4267100E+00, 0.4129548E+00, &
     & 0.4169222E+00, 0.3916100E+00, 0.3801300E+00, 0.3814800E+00, &
     & 0.4424642E+00, 0.4206500E+00, 0.4835400E+00, 0.4580211E+00, &
     & 0.4562902E+00, 0.4427771E+00, 0.3871114E+00, 0.3871114E+00 /
      data (ref_adm( 2,iz,19, 4),iz = 1,20) / &
     & 0.4014705E+00, 0.4014705E+00, 0.4020112E+00, 0.4030245E+00, &
     & 0.4043305E+00, 0.3186000E+00, 0.4226100E+00, 0.4295400E+00, &
     & 0.4147582E+00, 0.3493800E+00, 0.4063500E+00, 0.3944200E+00, &
     & 0.4365242E+00, 0.3828800E+00, 0.3903600E+00, 0.4488804E+00, &
     & 0.4470008E+00, 0.4337655E+00, 0.3808168E+00, 0.3808168E+00 /
      data (ref_adm( 2,iz,20, 4),iz = 1,20) / &
     & 0.4014837E+00, 0.4014837E+00, 0.4019667E+00, 0.4217300E+00, &
     & 0.4009300E+00, 0.4034900E+00, 0.3731400E+00, 0.4419400E+00, &
     & 0.4248100E+00, 0.4568300E+00, 0.4201692E+00, 0.4255580E+00, &
     & 0.4313866E+00, 0.4353710E+00, 0.4511000E+00, 0.3963000E+00, &
     & 0.4383464E+00, 0.4255681E+00, 0.3766499E+00, 0.3766499E+00 /
      data (ref_adm( 2,iz,21, 4),iz = 1,20) / &
     & 0.2551300E+00, 0.2551300E+00, 0.2559700E+00, 0.2633000E+00, &
     & 0.2808900E+00, 0.4054506E+00, 0.4071774E+00, 0.3458400E+00, &
     & 0.4182700E+00, 0.4449600E+00, 0.4176348E+00, 0.4220055E+00, &
     & 0.4264585E+00, 0.4072300E+00, 0.4438800E+00, 0.4330800E+00, &
     & 0.4306541E+00, 0.4177837E+00, 0.3733255E+00, 0.3733255E+00 /
      data (ref_adm( 2,iz,22, 4),iz = 1,20) / &
     & 0.4695977E+00, 0.4695977E+00, 0.4284149E+00, 0.4272127E+00, &
     & 0.4300336E+00, 0.3020800E+00, 0.3161000E+00, 0.4129300E+00, &
     & 0.3421200E+00, 0.4315200E+00, 0.4321999E+00, 0.3768100E+00, &
     & 0.4272400E+00, 0.4113000E+00, 0.4609600E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984308E+00, 0.2984308E+00 /
      data (ref_adm( 2,iz,23, 4),iz = 1,20) / &
     & 0.5041800E+00, 0.5041800E+00, 0.4570200E+00, 0.4272127E+00, &
     & 0.2871100E+00, 0.2824600E+00, 0.2608200E+00, 0.2535300E+00, &
     & 0.4445200E+00, 0.4394200E+00, 0.3956600E+00, 0.3987400E+00, &
     & 0.4139000E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
      data (ref_adm( 2,iz,24, 4),iz = 1,20) / &
     & 0.5640200E+00, 0.5640200E+00, 0.5518900E+00, 0.5090900E+00, &
     & 0.2835900E+00, 0.2495800E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342878E+00, 0.4537000E+00, 0.4321999E+00, 0.3445300E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984308E+00, 0.2984308E+00 /
      data (ref_adm( 2,iz,25, 4),iz = 1,20) / &
     & 0.4695977E+00, 0.4695977E+00, 0.2587700E+00, 0.3568400E+00, &
     & 0.4300337E+00, 0.5805400E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342877E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
      data (ref_adm( 2,iz,26, 4),iz = 1,20) / &
     & 0.5285000E+00, 0.5285000E+00, 0.2781200E+00, 0.4272127E+00, &
     & 0.6355500E+00, 0.6055600E+00, 0.6086100E+00, 0.4361490E+00, &
     & 0.4342878E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984308E+00, 0.2984308E+00 /
      data (ref_adm( 2,iz,27, 4),iz = 1,20) / &
     & 0.4695977E+00, 0.4695977E+00, 0.4284149E+00, 0.5100600E+00, &
     & 0.5119500E+00, 0.4366743E+00, 0.4191800E+00, 0.4361490E+00, &
     & 0.4342877E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
      data (ref_adm( 2,iz,28, 4),iz = 1,20) / &
     & 0.5551800E+00, 0.5551800E+00, 0.5184100E+00, 0.5238500E+00, &
     & 0.4300336E+00, 0.4153600E+00, 0.3959200E+00, 0.4361490E+00, &
     & 0.4342878E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984308E+00, 0.2984308E+00 /
      data (ref_adm( 2,iz,29, 4),iz = 1,20) / &
     & 0.5336900E+00, 0.5336900E+00, 0.4998200E+00, 0.4272127E+00, &
     & 0.4300337E+00, 0.4784100E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342877E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
      data (ref_adm( 2,iz,30, 4),iz = 1,20) / &
     & 0.4695977E+00, 0.4695977E+00, 0.4284149E+00, 0.4272127E+00, &
     & 0.4300336E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342878E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984308E+00, 0.2984308E+00 /
      data (ref_adm( 2,iz,31, 4),iz = 1,20) / &
     & 0.4695977E+00, 0.4695977E+00, 0.4284149E+00, 0.4272127E+00, &
     & 0.4300337E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342877E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
      data (ref_adm( 2,iz,32, 4),iz = 1,20) / &
     & 0.4695977E+00, 0.4695977E+00, 0.4284149E+00, 0.4272127E+00, &
     & 0.4300336E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342878E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984308E+00, 0.2984308E+00 /
      data (ref_adm( 2,iz,33, 4),iz = 1,20) / &
     & 0.4695977E+00, 0.4695977E+00, 0.4284149E+00, 0.4272127E+00, &
     & 0.4300337E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342877E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
      data (ref_adm( 2,iz,34, 4),iz = 1,20) / &
     & 0.4695977E+00, 0.4695977E+00, 0.4284149E+00, 0.4272127E+00, &
     & 0.4300336E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342878E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984308E+00, 0.2984308E+00 /
      data (ref_adm( 2,iz,35, 4),iz = 1,20) / &
     & 0.5299700E+00, 0.5299700E+00, 0.4447700E+00, 0.4272127E+00, &
     & 0.4300337E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342877E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
      data (ref_adm( 2,iz,36, 4),iz = 1,20) / &
     & 0.4887900E+00, 0.4887900E+00, 0.4154800E+00, 0.5395800E+00, &
     & 0.4300336E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342878E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984308E+00, 0.2984308E+00 /
      data (ref_adm( 2,iz,37, 4),iz = 1,20) / &
     & 0.4934900E+00, 0.4934900E+00, 0.4135600E+00, 0.4941600E+00, &
     & 0.4789900E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342877E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
      data (ref_adm( 2,iz,38, 4),iz = 1,20) / &
     & 0.4934900E+00, 0.4934900E+00, 0.4135600E+00, 0.4941600E+00, &
     & 0.4789900E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342877E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
! Solar Zenith Angle 20.0 Albedo  0.4424793E+00
      data (ref_adm( 2,iz, 1, 5),iz = 1,20) / &
     & 0.4459000E+00, 0.4459000E+00, 0.3882000E+00, 0.3788200E+00, &
     & 0.3664100E+00, 0.4138900E+00, 0.4019600E+00, 0.3626100E+00, &
     & 0.3923400E+00, 0.3805700E+00, 0.3978800E+00, 0.4419000E+00, &
     & 0.4304355E+00, 0.4361468E+00, 0.4410476E+00, 0.4982400E+00, &
     & 0.4404922E+00, 0.4202966E+00, 0.3466009E+00, 0.3466009E+00 /
      data (ref_adm( 2,iz, 2, 5),iz = 1,20) / &
     & 0.4459000E+00, 0.4459000E+00, 0.3882000E+00, 0.3788200E+00, &
     & 0.3664100E+00, 0.4138900E+00, 0.4019600E+00, 0.3626100E+00, &
     & 0.3923400E+00, 0.3805700E+00, 0.3978800E+00, 0.4419000E+00, &
     & 0.4304355E+00, 0.4361468E+00, 0.4410476E+00, 0.4982400E+00, &
     & 0.4404922E+00, 0.4202966E+00, 0.3466009E+00, 0.3466009E+00 /
      data (ref_adm( 2,iz, 3, 5),iz = 1,20) / &
     & 0.3814300E+00, 0.3814300E+00, 0.3522500E+00, 0.4756700E+00, &
     & 0.3961200E+00, 0.5859400E+00, 0.3284200E+00, 0.3192900E+00, &
     & 0.3041500E+00, 0.4657600E+00, 0.3406200E+00, 0.4238582E+00, &
     & 0.4303307E+00, 0.4356842E+00, 0.4415400E+00, 0.4434524E+00, &
     & 0.4511800E+00, 0.4196964E+00, 0.1303657E+00, 0.1303657E+00 /
      data (ref_adm( 2,iz, 4, 5),iz = 1,20) / &
     & 0.3916400E+00, 0.3916400E+00, 0.5074200E+00, 0.3870300E+00, &
     & 0.4610400E+00, 0.4807600E+00, 0.4574700E+00, 0.3295900E+00, &
     & 0.4160026E+00, 0.4162339E+00, 0.4185094E+00, 0.4234715E+00, &
     & 0.3786400E+00, 0.3242300E+00, 0.4407242E+00, 0.4429409E+00, &
     & 0.4393929E+00, 0.4191408E+00, 0.3458967E+00, 0.3458967E+00 /
      data (ref_adm( 2,iz, 5, 5),iz = 1,20) / &
     & 0.3792500E+00, 0.3792500E+00, 0.3471200E+00, 0.4586900E+00, &
     & 0.3703700E+00, 0.4595600E+00, 0.4545700E+00, 0.3190500E+00, &
     & 0.4377000E+00, 0.4162015E+00, 0.3908000E+00, 0.4231960E+00, &
     & 0.4812600E+00, 0.3017200E+00, 0.4402488E+00, 0.4424193E+00, &
     & 0.4382901E+00, 0.4182127E+00, 0.3451146E+00, 0.3451146E+00 /
      data (ref_adm( 2,iz, 6, 5),iz = 1,20) / &
     & 0.3514300E+00, 0.3514300E+00, 0.3777500E+00, 0.3731300E+00, &
     & 0.4163300E+00, 0.4679200E+00, 0.5174000E+00, 0.4856400E+00, &
     & 0.3764400E+00, 0.4161707E+00, 0.4179192E+00, 0.4228601E+00, &
     & 0.4886500E+00, 0.2769600E+00, 0.5077200E+00, 0.4412967E+00, &
     & 0.4372745E+00, 0.4167291E+00, 0.3441968E+00, 0.3441968E+00 /
      data (ref_adm( 2,iz, 7, 5),iz = 1,20) / &
     & 0.3764000E+00, 0.3764000E+00, 0.4155600E+00, 0.4292300E+00, &
     & 0.4378300E+00, 0.4505500E+00, 0.4143900E+00, 0.4858600E+00, &
     & 0.4495900E+00, 0.4243600E+00, 0.4180024E+00, 0.4224992E+00, &
     & 0.4433700E+00, 0.5898300E+00, 0.5236900E+00, 0.4398969E+00, &
     & 0.4356588E+00, 0.4152090E+00, 0.3429081E+00, 0.3429081E+00 /
      data (ref_adm( 2,iz, 8, 5),iz = 1,20) / &
     & 0.4111200E+00, 0.4111200E+00, 0.4099900E+00, 0.4576600E+00, &
     & 0.4630000E+00, 0.4419800E+00, 0.4026500E+00, 0.4769800E+00, &
     & 0.3189400E+00, 0.4161368E+00, 0.3609700E+00, 0.5880900E+00, &
     & 0.4558400E+00, 0.4514100E+00, 0.4325500E+00, 0.4386802E+00, &
     & 0.4338802E+00, 0.4134762E+00, 0.3414443E+00, 0.3414443E+00 /
      data (ref_adm( 2,iz, 9, 5),iz = 1,20) / &
     & 0.3950000E+00, 0.3950000E+00, 0.3917700E+00, 0.3931900E+00, &
     & 0.4463800E+00, 0.4132400E+00, 0.4014600E+00, 0.4217600E+00, &
     & 0.4693300E+00, 0.3480700E+00, 0.3087200E+00, 0.4691300E+00, &
     & 0.5065900E+00, 0.3884200E+00, 0.4357360E+00, 0.4372038E+00, &
     & 0.4320340E+00, 0.4114833E+00, 0.3397678E+00, 0.3397678E+00 /
      data (ref_adm( 2,iz,10, 5),iz = 1,20) / &
     & 0.4199900E+00, 0.4199900E+00, 0.5008500E+00, 0.4198000E+00, &
     & 0.4570800E+00, 0.4370300E+00, 0.3757800E+00, 0.3949900E+00, &
     & 0.3943300E+00, 0.4303300E+00, 0.5019600E+00, 0.4432200E+00, &
     & 0.4536000E+00, 0.4298089E+00, 0.4341357E+00, 0.4353695E+00, &
     & 0.4334000E+00, 0.4090154E+00, 0.3378669E+00, 0.3378669E+00 /
      data (ref_adm( 2,iz,11, 5),iz = 1,20) / &
     & 0.4080300E+00, 0.4080300E+00, 0.3846400E+00, 0.4003100E+00, &
     & 0.4179400E+00, 0.3758800E+00, 0.4571800E+00, 0.3959700E+00, &
     & 0.4990800E+00, 0.4161900E+00, 0.4622100E+00, 0.4894800E+00, &
     & 0.5161100E+00, 0.4447100E+00, 0.4324490E+00, 0.4335512E+00, &
     & 0.4832600E+00, 0.4063574E+00, 0.3358172E+00, 0.3358172E+00 /
      data (ref_adm( 2,iz,12, 5),iz = 1,20) / &
     & 0.3965100E+00, 0.3965100E+00, 0.4372503E+00, 0.5127900E+00, &
     & 0.4222800E+00, 0.2967100E+00, 0.2936800E+00, 0.4194651E+00, &
     & 0.5100300E+00, 0.5388300E+00, 0.4789000E+00, 0.4315200E+00, &
     & 0.3996000E+00, 0.3916300E+00, 0.4305988E+00, 0.4410500E+00, &
     & 0.4255977E+00, 0.4036399E+00, 0.3337748E+00, 0.3337748E+00 /
      data (ref_adm( 2,iz,13, 5),iz = 1,20) / &
     & 0.5029000E+00, 0.5029000E+00, 0.5144800E+00, 0.4647000E+00, &
     & 0.3855400E+00, 0.4290643E+00, 0.4241451E+00, 0.4203055E+00, &
     & 0.4177922E+00, 0.4177000E+00, 0.4262000E+00, 0.4699700E+00, &
     & 0.4272800E+00, 0.4373600E+00, 0.3323000E+00, 0.3651400E+00, &
     & 0.4232007E+00, 0.4007750E+00, 0.3318118E+00, 0.3318118E+00 /
      data (ref_adm( 2,iz,14, 5),iz = 1,20) / &
     & 0.4130700E+00, 0.4130700E+00, 0.4002900E+00, 0.3740500E+00, &
     & 0.3826200E+00, 0.4593700E+00, 0.4449200E+00, 0.3863500E+00, &
     & 0.3801200E+00, 0.3610800E+00, 0.4349200E+00, 0.4036200E+00, &
     & 0.5012400E+00, 0.4487200E+00, 0.4269995E+00, 0.3567500E+00, &
     & 0.4208628E+00, 0.3980604E+00, 0.3295946E+00, 0.3295946E+00 /
      data (ref_adm( 2,iz,15, 5),iz = 1,20) / &
     & 0.4080600E+00, 0.4080600E+00, 0.3668400E+00, 0.4452500E+00, &
     & 0.3364000E+00, 0.5497000E+00, 0.6292000E+00, 0.4738300E+00, &
     & 0.3438000E+00, 0.4173361E+00, 0.5445500E+00, 0.4588600E+00, &
     & 0.4528400E+00, 0.5231100E+00, 0.4249808E+00, 0.4246939E+00, &
     & 0.4184130E+00, 0.3953461E+00, 0.3274170E+00, 0.3274170E+00 /
      data (ref_adm( 2,iz,16, 5),iz = 1,20) / &
     & 0.4066600E+00, 0.4066600E+00, 0.3968500E+00, 0.3759400E+00, &
     & 0.4539000E+00, 0.5183100E+00, 0.2728900E+00, 0.4903700E+00, &
     & 0.4787200E+00, 0.3968500E+00, 0.4201900E+00, 0.4749900E+00, &
     & 0.4575500E+00, 0.4255100E+00, 0.4229162E+00, 0.4220855E+00, &
     & 0.4155529E+00, 0.3925998E+00, 0.3251388E+00, 0.3251388E+00 /
      data (ref_adm( 2,iz,17, 5),iz = 1,20) / &
     & 0.3834200E+00, 0.3834200E+00, 0.4355283E+00, 0.5010700E+00, &
     & 0.4380218E+00, 0.4341600E+00, 0.2279600E+00, 0.3941900E+00, &
     & 0.5974700E+00, 0.4140500E+00, 0.4050200E+00, 0.4358900E+00, &
     & 0.4819000E+00, 0.5167700E+00, 0.4207221E+00, 0.4199469E+00, &
     & 0.4128848E+00, 0.3901105E+00, 0.3231018E+00, 0.3231018E+00 /
      data (ref_adm( 2,iz,18, 5),iz = 1,20) / &
     & 0.3880200E+00, 0.3880200E+00, 0.4573000E+00, 0.4008200E+00, &
     & 0.3333200E+00, 0.3811100E+00, 0.4343800E+00, 0.2664700E+00, &
     & 0.4861800E+00, 0.5869000E+00, 0.4795800E+00, 0.4307376E+00, &
     & 0.4588400E+00, 0.4478900E+00, 0.4475800E+00, 0.4283275E+00, &
     & 0.4154244E+00, 0.3866583E+00, 0.3181377E+00, 0.3181377E+00 /
      data (ref_adm( 2,iz,19, 5),iz = 1,20) / &
     & 0.4548300E+00, 0.4548300E+00, 0.4686000E+00, 0.4287100E+00, &
     & 0.4216945E+00, 0.4512900E+00, 0.4479800E+00, 0.4209800E+00, &
     & 0.3125500E+00, 0.5167800E+00, 0.5156900E+00, 0.4304991E+00, &
     & 0.4298200E+00, 0.3592000E+00, 0.3857700E+00, 0.4264511E+00, &
     & 0.4134978E+00, 0.3850678E+00, 0.3172671E+00, 0.3172671E+00 /
      data (ref_adm( 2,iz,20, 5),iz = 1,20) / &
     & 0.4132400E+00, 0.4132400E+00, 0.3851300E+00, 0.3215000E+00, &
     & 0.4514400E+00, 0.4172000E+00, 0.3734500E+00, 0.4279519E+00, &
     & 0.4227100E+00, 0.4373500E+00, 0.4568800E+00, 0.4162000E+00, &
     & 0.4466600E+00, 0.4632800E+00, 0.3690300E+00, 0.4247402E+00, &
     & 0.4118254E+00, 0.3832616E+00, 0.3164460E+00, 0.3164460E+00 /
      data (ref_adm( 2,iz,21, 5),iz = 1,20) / &
     & 0.4544300E+00, 0.4544300E+00, 0.3858700E+00, 0.4703700E+00, &
     & 0.5352300E+00, 0.3465500E+00, 0.4309501E+00, 0.4435100E+00, &
     & 0.4667100E+00, 0.4769400E+00, 0.5224600E+00, 0.4572300E+00, &
     & 0.4470700E+00, 0.4755100E+00, 0.3897800E+00, 0.3690200E+00, &
     & 0.4102608E+00, 0.3814901E+00, 0.3155325E+00, 0.3155325E+00 /
      data (ref_adm( 2,iz,22, 5),iz = 1,20) / &
     & 0.3755200E+00, 0.3755200E+00, 0.3964000E+00, 0.3920560E+00, &
     & 0.4022000E+00, 0.3561300E+00, 0.4423100E+00, 0.4229200E+00, &
     & 0.4197154E+00, 0.2533800E+00, 0.3268700E+00, 0.4168700E+00, &
     & 0.4731000E+00, 0.4495000E+00, 0.4596100E+00, 0.3373800E+00, &
     & 0.4660031E+00, 0.4495547E+00, 0.4162425E+00, 0.4162425E+00 /
      data (ref_adm( 2,iz,23, 5),iz = 1,20) / &
     & 0.3805500E+00, 0.3805500E+00, 0.4046900E+00, 0.3761300E+00, &
     & 0.3858000E+00, 0.4318900E+00, 0.4168500E+00, 0.4083000E+00, &
     & 0.4217017E+00, 0.4295927E+00, 0.2575100E+00, 0.3420600E+00, &
     & 0.4468800E+00, 0.4625137E+00, 0.4651500E+00, 0.4687828E+00, &
     & 0.4637242E+00, 0.4477668E+00, 0.4194382E+00, 0.4194382E+00 /
      data (ref_adm( 2,iz,24, 5),iz = 1,20) / &
     & 0.3714200E+00, 0.3714200E+00, 0.3854700E+00, 0.4023200E+00, &
     & 0.3895400E+00, 0.3971100E+00, 0.4087421E+00, 0.4157031E+00, &
     & 0.3668800E+00, 0.4401500E+00, 0.3463300E+00, 0.3900700E+00, &
     & 0.4140100E+00, 0.3287400E+00, 0.4633800E+00, 0.4070400E+00, &
     & 0.4725500E+00, 0.4490797E+00, 0.4251190E+00, 0.4251190E+00 /
      data (ref_adm( 2,iz,25, 5),iz = 1,20) / &
     & 0.4019500E+00, 0.4019500E+00, 0.3919100E+00, 0.4206800E+00, &
     & 0.4136400E+00, 0.4395800E+00, 0.4622600E+00, 0.5035200E+00, &
     & 0.5163200E+00, 0.5083600E+00, 0.5067200E+00, 0.4811100E+00, &
     & 0.4401000E+00, 0.4425700E+00, 0.4076700E+00, 0.4745926E+00, &
     & 0.4682345E+00, 0.4528745E+00, 0.4327505E+00, 0.4327505E+00 /
      data (ref_adm( 2,iz,26, 5),iz = 1,20) / &
     & 0.4327200E+00, 0.4327200E+00, 0.4689200E+00, 0.4332600E+00, &
     & 0.4146500E+00, 0.4101100E+00, 0.4805800E+00, 0.5556400E+00, &
     & 0.3743300E+00, 0.4381752E+00, 0.4707300E+00, 0.4579215E+00, &
     & 0.4672736E+00, 0.4735153E+00, 0.3528300E+00, 0.3599300E+00, &
     & 0.4167200E+00, 0.4611510E+00, 0.4430602E+00, 0.4430602E+00 /
      data (ref_adm( 2,iz,27, 5),iz = 1,20) / &
     & 0.4450900E+00, 0.4450900E+00, 0.4323100E+00, 0.4786900E+00, &
     & 0.3994513E+00, 0.3465100E+00, 0.4147800E+00, 0.4197600E+00, &
     & 0.4192600E+00, 0.4590100E+00, 0.6349800E+00, 0.4719244E+00, &
     & 0.4796257E+00, 0.3732300E+00, 0.4180500E+00, 0.4864836E+00, &
     & 0.4825225E+00, 0.4704494E+00, 0.4551864E+00, 0.4551864E+00 /
      data (ref_adm( 2,iz,28, 5),iz = 1,20) / &
     & 0.4238900E+00, 0.4238900E+00, 0.4657500E+00, 0.4474800E+00, &
     & 0.3989200E+00, 0.4097224E+00, 0.3358500E+00, 0.2809500E+00, &
     & 0.4627400E+00, 0.5248900E+00, 0.5949500E+00, 0.6203800E+00, &
     & 0.6283100E+00, 0.5064300E+00, 0.4108100E+00, 0.3947700E+00, &
     & 0.4935547E+00, 0.4797243E+00, 0.4679343E+00, 0.4679343E+00 /
      data (ref_adm( 2,iz,29, 5),iz = 1,20) / &
     & 0.4130200E+00, 0.4130200E+00, 0.4783400E+00, 0.4967400E+00, &
     & 0.4025340E+00, 0.3963200E+00, 0.4351866E+00, 0.3343800E+00, &
     & 0.4192600E+00, 0.4810431E+00, 0.4886619E+00, 0.5020785E+00, &
     & 0.3828900E+00, 0.4625200E+00, 0.3942200E+00, 0.5418409E+00, &
     & 0.5208849E+00, 0.4957121E+00, 0.4813105E+00, 0.4813105E+00 /
      data (ref_adm( 2,iz,30, 5),iz = 1,20) / &
     & 0.3907300E+00, 0.3907300E+00, 0.4450500E+00, 0.5059500E+00, &
     & 0.4050311E+00, 0.4229374E+00, 0.4370400E+00, 0.4191100E+00, &
     & 0.4641852E+00, 0.5330100E+00, 0.4812623E+00, 0.3113300E+00, &
     & 0.4325900E+00, 0.5207424E+00, 0.5339888E+00, 0.5513614E+00, &
     & 0.5574331E+00, 0.5298673E+00, 0.4989479E+00, 0.4989479E+00 /
      data (ref_adm( 2,iz,31, 5),iz = 1,20) / &
     & 0.4370500E+00, 0.4370500E+00, 0.4222500E+00, 0.4212300E+00, &
     & 0.2385600E+00, 0.6104500E+00, 0.4826000E+00, 0.2786200E+00, &
     & 0.4600950E+00, 0.4716105E+00, 0.4839560E+00, 0.4994536E+00, &
     & 0.4626800E+00, 0.5244426E+00, 0.5343565E+00, 0.5418814E+00, &
     & 0.5496370E+00, 0.5569340E+00, 0.5218627E+00, 0.5218627E+00 /
      data (ref_adm( 2,iz,32, 5),iz = 1,20) / &
     & 0.4092000E+00, 0.4092000E+00, 0.4311100E+00, 0.4585600E+00, &
     & 0.4157300E+00, 0.4665400E+00, 0.4576500E+00, 0.4511232E+00, &
     & 0.4247400E+00, 0.4742843E+00, 0.4863243E+00, 0.4702300E+00, &
     & 0.5155433E+00, 0.5267751E+00, 0.5387561E+00, 0.5476398E+00, &
     & 0.5494033E+00, 0.5490507E+00, 0.5382330E+00, 0.5382330E+00 /
      data (ref_adm( 2,iz,33, 5),iz = 1,20) / &
     & 0.4152400E+00, 0.4152400E+00, 0.4142100E+00, 0.4111700E+00, &
     & 0.4538200E+00, 0.4627200E+00, 0.4651000E+00, 0.4718200E+00, &
     & 0.4931800E+00, 0.4717000E+00, 0.4856445E+00, 0.4991963E+00, &
     & 0.5133809E+00, 0.5246136E+00, 0.5381841E+00, 0.5505281E+00, &
     & 0.5554857E+00, 0.5495335E+00, 0.5423620E+00, 0.5423620E+00 /
      data (ref_adm( 2,iz,34, 5),iz = 1,20) / &
     & 0.4118400E+00, 0.4118400E+00, 0.3803200E+00, 0.3234300E+00, &
     & 0.3786500E+00, 0.4458800E+00, 0.4331500E+00, 0.4333400E+00, &
     & 0.4937800E+00, 0.4732300E+00, 0.4836233E+00, 0.4974245E+00, &
     & 0.5121062E+00, 0.5231473E+00, 0.5357621E+00, 0.5489979E+00, &
     & 0.5575097E+00, 0.5554804E+00, 0.5466416E+00, 0.5466416E+00 /
      data (ref_adm( 2,iz,35, 5),iz = 1,20) / &
     & 0.4267900E+00, 0.4267900E+00, 0.3813200E+00, 0.3950700E+00, &
     & 0.4635300E+00, 0.4721200E+00, 0.4353700E+00, 0.4448700E+00, &
     & 0.4561300E+00, 0.4859800E+00, 0.4824733E+00, 0.4981381E+00, &
     & 0.5143098E+00, 0.5256465E+00, 0.5361936E+00, 0.5471628E+00, &
     & 0.5565516E+00, 0.5590990E+00, 0.5523810E+00, 0.5523810E+00 /
      data (ref_adm( 2,iz,36, 5),iz = 1,20) / &
     & 0.3806000E+00, 0.3806000E+00, 0.3702300E+00, 0.4010500E+00, &
     & 0.4870100E+00, 0.4685600E+00, 0.4900200E+00, 0.5144500E+00, &
     & 0.5081900E+00, 0.4712400E+00, 0.4745800E+00, 0.5010298E+00, &
     & 0.5217322E+00, 0.5330281E+00, 0.5402654E+00, 0.5477590E+00, &
     & 0.5551801E+00, 0.5600909E+00, 0.5567914E+00, 0.5567914E+00 /
      data (ref_adm( 2,iz,37, 5),iz = 1,20) / &
     & 0.4610400E+00, 0.4610400E+00, 0.3766900E+00, 0.4160200E+00, &
     & 0.4223600E+00, 0.5291900E+00, 0.5186200E+00, 0.4852200E+00, &
     & 0.5213500E+00, 0.5567100E+00, 0.4439000E+00, 0.5280200E+00, &
     & 0.5568179E+00, 0.5704064E+00, 0.5461879E+00, 0.5492377E+00, &
     & 0.5550029E+00, 0.5602777E+00, 0.5593756E+00, 0.5593756E+00 /
      data (ref_adm( 2,iz,38, 5),iz = 1,20) / &
     & 0.4610400E+00, 0.4610400E+00, 0.3766900E+00, 0.4160200E+00, &
     & 0.4223600E+00, 0.5291900E+00, 0.5186200E+00, 0.4852200E+00, &
     & 0.5213500E+00, 0.5567100E+00, 0.4439000E+00, 0.5280200E+00, &
     & 0.5568179E+00, 0.5704064E+00, 0.5461879E+00, 0.5492377E+00, &
     & 0.5550029E+00, 0.5602777E+00, 0.5593756E+00, 0.5593756E+00 /
! Solar Zenith Angle 25.0 Albedo  0.4458218E+00
      data (ref_adm( 2,iz, 1, 6),iz = 1,20) / &
     & 0.4501100E+00, 0.4501100E+00, 0.3504600E+00, 0.3220500E+00, &
     & 0.3494200E+00, 0.4382200E+00, 0.5920500E+00, 0.6153400E+00, &
     & 0.4547000E+00, 0.4887600E+00, 0.2819700E+00, 0.5513500E+00, &
     & 0.4562506E+00, 0.4269900E+00, 0.4639800E+00, 0.4652500E+00, &
     & 0.4335095E+00, 0.4376900E+00, 0.3206689E+00, 0.3206689E+00 /
      data (ref_adm( 2,iz, 2, 6),iz = 1,20) / &
     & 0.4501100E+00, 0.4501100E+00, 0.3504600E+00, 0.3220500E+00, &
     & 0.3494200E+00, 0.4382200E+00, 0.5920500E+00, 0.6153400E+00, &
     & 0.4547000E+00, 0.4887600E+00, 0.2819700E+00, 0.5513500E+00, &
     & 0.4562506E+00, 0.4269900E+00, 0.4639800E+00, 0.4652500E+00, &
     & 0.4335095E+00, 0.4376900E+00, 0.3206689E+00, 0.3206689E+00 /
      data (ref_adm( 2,iz, 3, 6),iz = 1,20) / &
     & 0.4289000E+00, 0.4289000E+00, 0.3892100E+00, 0.3306700E+00, &
     & 0.3993800E+00, 0.4690100E+00, 0.5314300E+00, 0.4655100E+00, &
     & 0.4460900E+00, 0.4261700E+00, 0.4110200E+00, 0.4899100E+00, &
     & 0.4687800E+00, 0.6189400E+00, 0.4758900E+00, 0.4493000E+00, &
     & 0.4102100E+00, 0.3730900E+00, 0.1439587E+00, 0.1439587E+00 /
      data (ref_adm( 2,iz, 4, 6),iz = 1,20) / &
     & 0.4650200E+00, 0.4650200E+00, 0.5780200E+00, 0.6555100E+00, &
     & 0.4007900E+00, 0.4638400E+00, 0.5031700E+00, 0.4552200E+00, &
     & 0.4343000E+00, 0.3344200E+00, 0.4832300E+00, 0.4542944E+00, &
     & 0.4619700E+00, 0.4661600E+00, 0.4612800E+00, 0.4311900E+00, &
     & 0.5575000E+00, 0.3996846E+00, 0.3205843E+00, 0.3205843E+00 /
      data (ref_adm( 2,iz, 5, 6),iz = 1,20) / &
     & 0.4574200E+00, 0.4574200E+00, 0.4412600E+00, 0.3864600E+00, &
     & 0.4311100E+00, 0.4207700E+00, 0.5134300E+00, 0.4799900E+00, &
     & 0.4128800E+00, 0.6147500E+00, 0.4865500E+00, 0.4682300E+00, &
     & 0.5465300E+00, 0.3911200E+00, 0.4468700E+00, 0.4478736E+00, &
     & 0.4332307E+00, 0.3997615E+00, 0.3204473E+00, 0.3204473E+00 /
      data (ref_adm( 2,iz, 6, 6),iz = 1,20) / &
     & 0.5385500E+00, 0.5385500E+00, 0.4350300E+00, 0.3937300E+00, &
     & 0.4618000E+00, 0.3851700E+00, 0.4515054E+00, 0.4826700E+00, &
     & 0.5256200E+00, 0.5453300E+00, 0.5687300E+00, 0.5264900E+00, &
     & 0.4961400E+00, 0.5694200E+00, 0.4383600E+00, 0.4677000E+00, &
     & 0.4142900E+00, 0.3994778E+00, 0.3203049E+00, 0.3203049E+00 /
      data (ref_adm( 2,iz, 7, 6),iz = 1,20) / &
     & 0.4463700E+00, 0.4463700E+00, 0.3871700E+00, 0.5596500E+00, &
     & 0.5554400E+00, 0.3198500E+00, 0.3278800E+00, 0.4234600E+00, &
     & 0.4927300E+00, 0.4803000E+00, 0.4789200E+00, 0.4731800E+00, &
     & 0.4236400E+00, 0.5073000E+00, 0.4736000E+00, 0.4674200E+00, &
     & 0.4326545E+00, 0.3992829E+00, 0.3201129E+00, 0.3201129E+00 /
      data (ref_adm( 2,iz, 8, 6),iz = 1,20) / &
     & 0.3864800E+00, 0.3864800E+00, 0.3121400E+00, 0.3628100E+00, &
     & 0.4338300E+00, 0.3827200E+00, 0.4896900E+00, 0.4503707E+00, &
     & 0.4665500E+00, 0.4071500E+00, 0.3837100E+00, 0.4464300E+00, &
     & 0.4225800E+00, 0.4624300E+00, 0.5042400E+00, 0.4951900E+00, &
     & 0.4323023E+00, 0.3989658E+00, 0.3197939E+00, 0.3197939E+00 /
      data (ref_adm( 2,iz, 9, 6),iz = 1,20) / &
     & 0.3936500E+00, 0.3936500E+00, 0.4378500E+00, 0.5062700E+00, &
     & 0.4911300E+00, 0.4681200E+00, 0.4825300E+00, 0.3988500E+00, &
     & 0.4752300E+00, 0.4350000E+00, 0.3813600E+00, 0.4236900E+00, &
     & 0.4267200E+00, 0.5036600E+00, 0.5113500E+00, 0.5210700E+00, &
     & 0.4319198E+00, 0.3985806E+00, 0.3195553E+00, 0.3195553E+00 /
      data (ref_adm( 2,iz,10, 6),iz = 1,20) / &
     & 0.4455900E+00, 0.4455900E+00, 0.4851800E+00, 0.3852500E+00, &
     & 0.4820700E+00, 0.4662300E+00, 0.4093100E+00, 0.3850900E+00, &
     & 0.4333300E+00, 0.3727700E+00, 0.4234500E+00, 0.4127300E+00, &
     & 0.4165200E+00, 0.3907400E+00, 0.5363700E+00, 0.4464894E+00, &
     & 0.4315135E+00, 0.3982345E+00, 0.3192629E+00, 0.3192629E+00 /
      data (ref_adm( 2,iz,11, 6),iz = 1,20) / &
     & 0.4278400E+00, 0.4278400E+00, 0.3695800E+00, 0.4194900E+00, &
     & 0.4553400E+00, 0.4628500E+00, 0.4339100E+00, 0.4212200E+00, &
     & 0.4693200E+00, 0.5007000E+00, 0.5044000E+00, 0.4789200E+00, &
     & 0.4810200E+00, 0.3802700E+00, 0.4537846E+00, 0.4461843E+00, &
     & 0.4310955E+00, 0.3978464E+00, 0.3189349E+00, 0.3189349E+00 /
      data (ref_adm( 2,iz,12, 6),iz = 1,20) / &
     & 0.3170300E+00, 0.3170300E+00, 0.4110500E+00, 0.3717100E+00, &
     & 0.4040600E+00, 0.3810700E+00, 0.4167200E+00, 0.4653700E+00, &
     & 0.4368400E+00, 0.4351500E+00, 0.4123200E+00, 0.4642100E+00, &
     & 0.4160600E+00, 0.3950100E+00, 0.4627700E+00, 0.4544500E+00, &
     & 0.4306221E+00, 0.4056600E+00, 0.3185742E+00, 0.3185742E+00 /
      data (ref_adm( 2,iz,13, 6),iz = 1,20) / &
     & 0.4170600E+00, 0.4170600E+00, 0.4219000E+00, 0.4645200E+00, &
     & 0.4152000E+00, 0.4117700E+00, 0.4098700E+00, 0.4213700E+00, &
     & 0.4104500E+00, 0.4114900E+00, 0.4499700E+00, 0.4504000E+00, &
     & 0.4246700E+00, 0.4282600E+00, 0.4445500E+00, 0.4452637E+00, &
     & 0.4301542E+00, 0.3968587E+00, 0.3182084E+00, 0.3182084E+00 /
      data (ref_adm( 2,iz,14, 6),iz = 1,20) / &
     & 0.3750500E+00, 0.3750500E+00, 0.4333300E+00, 0.3577200E+00, &
     & 0.3365700E+00, 0.3281500E+00, 0.4403100E+00, 0.3791800E+00, &
     & 0.4506846E+00, 0.4542700E+00, 0.5126400E+00, 0.5411300E+00, &
     & 0.4478000E+00, 0.4158600E+00, 0.4526612E+00, 0.4446326E+00, &
     & 0.4297594E+00, 0.3964105E+00, 0.3178870E+00, 0.3178870E+00 /
      data (ref_adm( 2,iz,15, 6),iz = 1,20) / &
     & 0.3934700E+00, 0.3934700E+00, 0.4416622E+00, 0.4422688E+00, &
     & 0.7100000E+00, 0.3891300E+00, 0.4233100E+00, 0.3616700E+00, &
     & 0.4758700E+00, 0.4653400E+00, 0.4040300E+00, 0.4030100E+00, &
     & 0.5693600E+00, 0.4842000E+00, 0.4522604E+00, 0.4440105E+00, &
     & 0.4290319E+00, 0.3957923E+00, 0.3175053E+00, 0.3175053E+00 /
      data (ref_adm( 2,iz,16, 6),iz = 1,20) / &
     & 0.3994900E+00, 0.3994900E+00, 0.4204100E+00, 0.4039800E+00, &
     & 0.5446900E+00, 0.5712100E+00, 0.4537722E+00, 0.4552500E+00, &
     & 0.3900600E+00, 0.4808200E+00, 0.4556600E+00, 0.4641700E+00, &
     & 0.4034900E+00, 0.4542074E+00, 0.4519467E+00, 0.4437056E+00, &
     & 0.4287070E+00, 0.3953674E+00, 0.3171346E+00, 0.3171346E+00 /
      data (ref_adm( 2,iz,17, 6),iz = 1,20) / &
     & 0.3541100E+00, 0.3541100E+00, 0.4777500E+00, 0.5658300E+00, &
     & 0.6738100E+00, 0.6935000E+00, 0.4740800E+00, 0.4356600E+00, &
     & 0.4089800E+00, 0.4367000E+00, 0.4714400E+00, 0.4267200E+00, &
     & 0.3818700E+00, 0.4537587E+00, 0.4514619E+00, 0.4987200E+00, &
     & 0.4279563E+00, 0.3946705E+00, 0.3167712E+00, 0.3167712E+00 /
      data (ref_adm( 2,iz,18, 6),iz = 1,20) / &
     & 0.4206300E+00, 0.4206300E+00, 0.4297417E+00, 0.6247000E+00, &
     & 0.6869200E+00, 0.4612400E+00, 0.4702100E+00, 0.4752300E+00, &
     & 0.5404500E+00, 0.4338900E+00, 0.4779700E+00, 0.4816600E+00, &
     & 0.4603300E+00, 0.4494849E+00, 0.3478000E+00, 0.4417843E+00, &
     & 0.4278192E+00, 0.3973482E+00, 0.3250523E+00, 0.3250523E+00 /
      data (ref_adm( 2,iz,19, 6),iz = 1,20) / &
     & 0.3144600E+00, 0.3144600E+00, 0.3006300E+00, 0.3493800E+00, &
     & 0.3975900E+00, 0.4818000E+00, 0.4748600E+00, 0.4323600E+00, &
     & 0.5669600E+00, 0.4643300E+00, 0.4816500E+00, 0.4720900E+00, &
     & 0.4084800E+00, 0.4474360E+00, 0.3516700E+00, 0.4392977E+00, &
     & 0.4251343E+00, 0.3947644E+00, 0.3236868E+00, 0.3236868E+00 /
      data (ref_adm( 2,iz,20, 6),iz = 1,20) / &
     & 0.4067300E+00, 0.4067300E+00, 0.3439600E+00, 0.3675200E+00, &
     & 0.4015100E+00, 0.4744000E+00, 0.4577700E+00, 0.5086200E+00, &
     & 0.4411548E+00, 0.3961000E+00, 0.4339900E+00, 0.4915500E+00, &
     & 0.4417500E+00, 0.4103800E+00, 0.5096100E+00, 0.3696500E+00, &
     & 0.4225661E+00, 0.3923400E+00, 0.3225022E+00, 0.3225022E+00 /
      data (ref_adm( 2,iz,21, 6),iz = 1,20) / &
     & 0.3809100E+00, 0.3809100E+00, 0.3926700E+00, 0.4749400E+00, &
     & 0.5675500E+00, 0.3474300E+00, 0.5257500E+00, 0.4882500E+00, &
     & 0.4736300E+00, 0.4416769E+00, 0.4425560E+00, 0.4749000E+00, &
     & 0.4427700E+00, 0.4256300E+00, 0.5285900E+00, 0.3855500E+00, &
     & 0.4198608E+00, 0.3898935E+00, 0.3213165E+00, 0.3213165E+00 /
      data (ref_adm( 2,iz,22, 6),iz = 1,20) / &
     & 0.4839000E+00, 0.4839000E+00, 0.4339900E+00, 0.4010777E+00, &
     & 0.3855400E+00, 0.4065869E+00, 0.4275500E+00, 0.4801600E+00, &
     & 0.4936500E+00, 0.4267900E+00, 0.4395771E+00, 0.4666100E+00, &
     & 0.4641509E+00, 0.4759000E+00, 0.4091000E+00, 0.3667100E+00, &
     & 0.4953498E+00, 0.4887985E+00, 0.4534447E+00, 0.4534447E+00 /
      data (ref_adm( 2,iz,23, 6),iz = 1,20) / &
     & 0.4192100E+00, 0.4192100E+00, 0.3993167E+00, 0.4003240E+00, &
     & 0.4526900E+00, 0.3837800E+00, 0.4096945E+00, 0.4632900E+00, &
     & 0.4208527E+00, 0.4277573E+00, 0.4354987E+00, 0.4436200E+00, &
     & 0.4270900E+00, 0.4572000E+00, 0.4758823E+00, 0.3845600E+00, &
     & 0.3754000E+00, 0.4791512E+00, 0.4513737E+00, 0.4513737E+00 /
      data (ref_adm( 2,iz,24, 6),iz = 1,20) / &
     & 0.3538700E+00, 0.3538700E+00, 0.3779200E+00, 0.3653600E+00, &
     & 0.4017732E+00, 0.3396700E+00, 0.4086089E+00, 0.4135058E+00, &
     & 0.4193497E+00, 0.4257939E+00, 0.4306100E+00, 0.3960200E+00, &
     & 0.4429300E+00, 0.4482100E+00, 0.4646200E+00, 0.3966300E+00, &
     & 0.4447500E+00, 0.3713800E+00, 0.4516813E+00, 0.4516813E+00 /
      data (ref_adm( 2,iz,25, 6),iz = 1,20) / &
     & 0.4359300E+00, 0.4359300E+00, 0.1921800E+00, 0.2965700E+00, &
     & 0.4100200E+00, 0.2974600E+00, 0.3562300E+00, 0.4120544E+00, &
     & 0.4175341E+00, 0.4038200E+00, 0.4577300E+00, 0.4513600E+00, &
     & 0.4376500E+00, 0.4615600E+00, 0.4394400E+00, 0.4196200E+00, &
     & 0.3900400E+00, 0.4232600E+00, 0.4536563E+00, 0.4536563E+00 /
      data (ref_adm( 2,iz,26, 6),iz = 1,20) / &
     & 0.2266600E+00, 0.2266600E+00, 0.2692500E+00, 0.2671700E+00, &
     & 0.3670200E+00, 0.5185400E+00, 0.5448400E+00, 0.4115758E+00, &
     & 0.3748300E+00, 0.4292800E+00, 0.5114200E+00, 0.4487500E+00, &
     & 0.4241300E+00, 0.4914100E+00, 0.4195900E+00, 0.4641000E+00, &
     & 0.4615200E+00, 0.4255600E+00, 0.4585961E+00, 0.4585961E+00 /
      data (ref_adm( 2,iz,27, 6),iz = 1,20) / &
     & 0.4726900E+00, 0.4726900E+00, 0.6147800E+00, 0.1779600E+00, &
     & 0.3201500E+00, 0.3173300E+00, 0.3712700E+00, 0.3385500E+00, &
     & 0.4001900E+00, 0.3841200E+00, 0.4115100E+00, 0.4377600E+00, &
     & 0.4034100E+00, 0.3556400E+00, 0.4315300E+00, 0.4317000E+00, &
     & 0.4701660E+00, 0.3712400E+00, 0.4661731E+00, 0.4661731E+00 /
      data (ref_adm( 2,iz,28, 6),iz = 1,20) / &
     & 0.5737700E+00, 0.5737700E+00, 0.5849300E+00, 0.5060900E+00, &
     & 0.4612400E+00, 0.3528900E+00, 0.3060200E+00, 0.3340500E+00, &
     & 0.4090100E+00, 0.4716800E+00, 0.4028800E+00, 0.4393800E+00, &
     & 0.4567400E+00, 0.4586984E+00, 0.4278500E+00, 0.4709423E+00, &
     & 0.4720755E+00, 0.4699164E+00, 0.4758555E+00, 0.4758555E+00 /
      data (ref_adm( 2,iz,29, 6),iz = 1,20) / &
     & 0.4455900E+00, 0.4455900E+00, 0.4283300E+00, 0.4223300E+00, &
     & 0.4822800E+00, 0.4281900E+00, 0.3389800E+00, 0.3743100E+00, &
     & 0.3929800E+00, 0.5366200E+00, 0.4295500E+00, 0.4655800E+00, &
     & 0.4836800E+00, 0.5409700E+00, 0.3424600E+00, 0.3412900E+00, &
     & 0.4768094E+00, 0.4755315E+00, 0.4855921E+00, 0.4855921E+00 /
      data (ref_adm( 2,iz,30, 6),iz = 1,20) / &
     & 0.4489100E+00, 0.4489100E+00, 0.4218200E+00, 0.4214700E+00, &
     & 0.4131300E+00, 0.4395600E+00, 0.4299200E+00, 0.3963600E+00, &
     & 0.4516200E+00, 0.4518600E+00, 0.4000600E+00, 0.4374600E+00, &
     & 0.5315700E+00, 0.4782800E+00, 0.4111800E+00, 0.4550400E+00, &
     & 0.4833570E+00, 0.4827913E+00, 0.4973845E+00, 0.4973845E+00 /
      data (ref_adm( 2,iz,31, 6),iz = 1,20) / &
     & 0.3925400E+00, 0.3925400E+00, 0.3738700E+00, 0.3999800E+00, &
     & 0.3783500E+00, 0.4547700E+00, 0.4563100E+00, 0.4696500E+00, &
     & 0.4544500E+00, 0.4568700E+00, 0.4401900E+00, 0.4083900E+00, &
     & 0.5252300E+00, 0.4760500E+00, 0.4378900E+00, 0.3846400E+00, &
     & 0.4921536E+00, 0.4919809E+00, 0.5090321E+00, 0.5090321E+00 /
      data (ref_adm( 2,iz,32, 6),iz = 1,20) / &
     & 0.3280900E+00, 0.3280900E+00, 0.3150600E+00, 0.4789900E+00, &
     & 0.5217700E+00, 0.4609600E+00, 0.4464100E+00, 0.4796500E+00, &
     & 0.4587500E+00, 0.4800300E+00, 0.4779500E+00, 0.4660400E+00, &
     & 0.5120900E+00, 0.4683400E+00, 0.5481100E+00, 0.4965879E+00, &
     & 0.5001422E+00, 0.5020790E+00, 0.5212329E+00, 0.5212329E+00 /
      data (ref_adm( 2,iz,33, 6),iz = 1,20) / &
     & 0.3595000E+00, 0.3595000E+00, 0.3468400E+00, 0.3659400E+00, &
     & 0.5319700E+00, 0.3751500E+00, 0.3727600E+00, 0.4057000E+00, &
     & 0.4453200E+00, 0.4750000E+00, 0.4339700E+00, 0.4695600E+00, &
     & 0.4921700E+00, 0.4461700E+00, 0.4589300E+00, 0.4319900E+00, &
     & 0.5085495E+00, 0.5116125E+00, 0.5327688E+00, 0.5327688E+00 /
      data (ref_adm( 2,iz,34, 6),iz = 1,20) / &
     & 0.3783600E+00, 0.3783600E+00, 0.4031800E+00, 0.4179500E+00, &
     & 0.4590000E+00, 0.4260000E+00, 0.4871800E+00, 0.4811800E+00, &
     & 0.4947100E+00, 0.4628200E+00, 0.4362300E+00, 0.4623100E+00, &
     & 0.4627200E+00, 0.4649800E+00, 0.4825200E+00, 0.4928770E+00, &
     & 0.5092546E+00, 0.5204803E+00, 0.5422272E+00, 0.5422272E+00 /
      data (ref_adm( 2,iz,35, 6),iz = 1,20) / &
     & 0.4867000E+00, 0.4867000E+00, 0.4770400E+00, 0.4406100E+00, &
     & 0.4558700E+00, 0.3753500E+00, 0.4391500E+00, 0.4100400E+00, &
     & 0.5198900E+00, 0.4300900E+00, 0.4370100E+00, 0.4856100E+00, &
     & 0.4939900E+00, 0.4406900E+00, 0.4913800E+00, 0.4862767E+00, &
     & 0.5043020E+00, 0.5249075E+00, 0.5503975E+00, 0.5503975E+00 /
      data (ref_adm( 2,iz,36, 6),iz = 1,20) / &
     & 0.4017700E+00, 0.4017700E+00, 0.3630500E+00, 0.3713400E+00, &
     & 0.4122500E+00, 0.3853400E+00, 0.4134200E+00, 0.4307800E+00, &
     & 0.5056100E+00, 0.4451800E+00, 0.4738600E+00, 0.4799300E+00, &
     & 0.4383500E+00, 0.4428400E+00, 0.4805600E+00, 0.4843729E+00, &
     & 0.4990535E+00, 0.5245537E+00, 0.5561003E+00, 0.5561003E+00 /
      data (ref_adm( 2,iz,37, 6),iz = 1,20) / &
     & 0.3887900E+00, 0.3887900E+00, 0.4249900E+00, 0.3715700E+00, &
     & 0.4495400E+00, 0.4153100E+00, 0.4008600E+00, 0.4444900E+00, &
     & 0.4274885E+00, 0.3730900E+00, 0.4566300E+00, 0.5126200E+00, &
     & 0.5295200E+00, 0.5128600E+00, 0.5511500E+00, 0.4849050E+00, &
     & 0.4971315E+00, 0.5233705E+00, 0.5596256E+00, 0.5596256E+00 /
      data (ref_adm( 2,iz,38, 6),iz = 1,20) / &
     & 0.3887900E+00, 0.3887900E+00, 0.4249900E+00, 0.3715700E+00, &
     & 0.4495400E+00, 0.4153100E+00, 0.4008600E+00, 0.4444900E+00, &
     & 0.4274885E+00, 0.3730900E+00, 0.4566300E+00, 0.5126200E+00, &
     & 0.5295200E+00, 0.5128600E+00, 0.5511500E+00, 0.4849050E+00, &
     & 0.4971315E+00, 0.5233705E+00, 0.5596256E+00, 0.5596256E+00 /
! Solar Zenith Angle 30.0 Albedo  0.4617778E+00
      data (ref_adm( 2,iz, 1, 7),iz = 1,20) / &
     & 0.3064500E+00, 0.3064500E+00, 0.4644700E+00, 0.3382900E+00, &
     & 0.3627900E+00, 0.3843600E+00, 0.3523300E+00, 0.3999100E+00, &
     & 0.4807000E+00, 0.4281400E+00, 0.5746000E+00, 0.6079200E+00, &
     & 0.5383900E+00, 0.5457700E+00, 0.5225900E+00, 0.6325300E+00, &
     & 0.6072800E+00, 0.4618800E+00, 0.4693218E+00, 0.4693218E+00 /
      data (ref_adm( 2,iz, 2, 7),iz = 1,20) / &
     & 0.3064500E+00, 0.3064500E+00, 0.4644700E+00, 0.3382900E+00, &
     & 0.3627900E+00, 0.3843600E+00, 0.3523300E+00, 0.3999100E+00, &
     & 0.4807000E+00, 0.4281400E+00, 0.5746000E+00, 0.6079200E+00, &
     & 0.5383900E+00, 0.5457700E+00, 0.5225900E+00, 0.6325300E+00, &
     & 0.6072800E+00, 0.4618800E+00, 0.4693218E+00, 0.4693218E+00 /
      data (ref_adm( 2,iz, 3, 7),iz = 1,20) / &
     & 0.3262700E+00, 0.3262700E+00, 0.5919100E+00, 0.3718000E+00, &
     & 0.3261300E+00, 0.3468700E+00, 0.4057400E+00, 0.4099100E+00, &
     & 0.3997600E+00, 0.4499000E+00, 0.4055300E+00, 0.5866500E+00, &
     & 0.5786000E+00, 0.4653400E+00, 0.6122400E+00, 0.6687000E+00, &
     & 0.6015100E+00, 0.5661200E+00, 0.5199343E-01, 0.5199343E-01 /
      data (ref_adm( 2,iz, 4, 7),iz = 1,20) / &
     & 0.3257900E+00, 0.3257900E+00, 0.5617300E+00, 0.4401900E+00, &
     & 0.4064600E+00, 0.4543400E+00, 0.3842900E+00, 0.4289200E+00, &
     & 0.4093900E+00, 0.4510000E+00, 0.4351400E+00, 0.4857500E+00, &
     & 0.5017600E+00, 0.4219100E+00, 0.6109700E+00, 0.6008500E+00, &
     & 0.4096400E+00, 0.4792400E+00, 0.4797400E+00, 0.4797400E+00 /
      data (ref_adm( 2,iz, 5, 7),iz = 1,20) / &
     & 0.3864900E+00, 0.3864900E+00, 0.4244600E+00, 0.4565200E+00, &
     & 0.4307000E+00, 0.4575600E+00, 0.4376100E+00, 0.4258100E+00, &
     & 0.4046900E+00, 0.4541700E+00, 0.4388400E+00, 0.4515100E+00, &
     & 0.5486500E+00, 0.4737700E+00, 0.5181000E+00, 0.5585200E+00, &
     & 0.5380700E+00, 0.5507668E+00, 0.5054800E+00, 0.5054800E+00 /
      data (ref_adm( 2,iz, 6, 7),iz = 1,20) / &
     & 0.4318100E+00, 0.4318100E+00, 0.4565600E+00, 0.3972200E+00, &
     & 0.4044100E+00, 0.4501900E+00, 0.4499700E+00, 0.4085200E+00, &
     & 0.5044300E+00, 0.4941400E+00, 0.4507600E+00, 0.4400100E+00, &
     & 0.5108600E+00, 0.5214400E+00, 0.5706800E+00, 0.5256000E+00, &
     & 0.4930000E+00, 0.4675600E+00, 0.4556023E+00, 0.4556023E+00 /
      data (ref_adm( 2,iz, 7, 7),iz = 1,20) / &
     & 0.4042500E+00, 0.4042500E+00, 0.4426300E+00, 0.3918400E+00, &
     & 0.4922600E+00, 0.4907900E+00, 0.4668600E+00, 0.4363587E+00, &
     & 0.6035300E+00, 0.4115400E+00, 0.4513100E+00, 0.4469100E+00, &
     & 0.4512900E+00, 0.4587700E+00, 0.4834100E+00, 0.5099500E+00, &
     & 0.5723476E+00, 0.5419215E+00, 0.4502287E+00, 0.4502287E+00 /
      data (ref_adm( 2,iz, 8, 7),iz = 1,20) / &
     & 0.4523600E+00, 0.4523600E+00, 0.4520900E+00, 0.4444300E+00, &
     & 0.4714900E+00, 0.4448700E+00, 0.4869000E+00, 0.4068700E+00, &
     & 0.5175000E+00, 0.5802700E+00, 0.4372700E+00, 0.4214300E+00, &
     & 0.4728300E+00, 0.4883600E+00, 0.4902500E+00, 0.5398500E+00, &
     & 0.5681462E+00, 0.5373226E+00, 0.4448158E+00, 0.4448158E+00 /
      data (ref_adm( 2,iz, 9, 7),iz = 1,20) / &
     & 0.5152000E+00, 0.5152000E+00, 0.4960300E+00, 0.4759400E+00, &
     & 0.5119400E+00, 0.4595600E+00, 0.4532900E+00, 0.4423300E+00, &
     & 0.4290100E+00, 0.4707100E+00, 0.4391200E+00, 0.4404600E+00, &
     & 0.4173300E+00, 0.4528100E+00, 0.4826200E+00, 0.4449800E+00, &
     & 0.4495900E+00, 0.5326040E+00, 0.4394769E+00, 0.4394769E+00 /
      data (ref_adm( 2,iz,10, 7),iz = 1,20) / &
     & 0.4361900E+00, 0.4361900E+00, 0.4241600E+00, 0.4543500E+00, &
     & 0.4504200E+00, 0.3990300E+00, 0.3929800E+00, 0.3922300E+00, &
     & 0.4214100E+00, 0.6245400E+00, 0.6020100E+00, 0.4461800E+00, &
     & 0.4488700E+00, 0.4562500E+00, 0.4675800E+00, 0.5233800E+00, &
     & 0.5553578E+00, 0.5275863E+00, 0.4344279E+00, 0.4344279E+00 /
      data (ref_adm( 2,iz,11, 7),iz = 1,20) / &
     & 0.4099100E+00, 0.4099100E+00, 0.4603100E+00, 0.4306200E+00, &
     & 0.5018500E+00, 0.4512600E+00, 0.4394300E+00, 0.4409700E+00, &
     & 0.4139800E+00, 0.4310200E+00, 0.5318300E+00, 0.4458700E+00, &
     & 0.4553000E+00, 0.4450000E+00, 0.4452000E+00, 0.5480600E+00, &
     & 0.5472783E+00, 0.5215527E+00, 0.4293901E+00, 0.4293901E+00 /
      data (ref_adm( 2,iz,12, 7),iz = 1,20) / &
     & 0.4719100E+00, 0.4719100E+00, 0.4632100E+00, 0.4508800E+00, &
     & 0.4375100E+00, 0.4625300E+00, 0.4562500E+00, 0.4626000E+00, &
     & 0.4458900E+00, 0.4563700E+00, 0.4673700E+00, 0.4816200E+00, &
     & 0.5269000E+00, 0.4457700E+00, 0.5351108E+00, 0.5426209E+00, &
     & 0.5385029E+00, 0.5143294E+00, 0.4244015E+00, 0.4244015E+00 /
      data (ref_adm( 2,iz,13, 7),iz = 1,20) / &
     & 0.4377500E+00, 0.4377500E+00, 0.4738100E+00, 0.4280800E+00, &
     & 0.4164300E+00, 0.4605400E+00, 0.4292000E+00, 0.4452100E+00, &
     & 0.4856400E+00, 0.4935400E+00, 0.4749600E+00, 0.4835600E+00, &
     & 0.4662800E+00, 0.4836900E+00, 0.4453100E+00, 0.5339469E+00, &
     & 0.5299953E+00, 0.5052129E+00, 0.4187165E+00, 0.4187165E+00 /
      data (ref_adm( 2,iz,14, 7),iz = 1,20) / &
     & 0.4485700E+00, 0.4485700E+00, 0.4214000E+00, 0.4857700E+00, &
     & 0.3366800E+00, 0.3774200E+00, 0.3639500E+00, 0.4948000E+00, &
     & 0.4022300E+00, 0.5064500E+00, 0.4541000E+00, 0.4682500E+00, &
     & 0.4900200E+00, 0.4448800E+00, 0.4832000E+00, 0.4401200E+00, &
     & 0.5205765E+00, 0.4957027E+00, 0.4116893E+00, 0.4116893E+00 /
      data (ref_adm( 2,iz,15, 7),iz = 1,20) / &
     & 0.4520200E+00, 0.4520200E+00, 0.4088700E+00, 0.4413800E+00, &
     & 0.3936000E+00, 0.3461300E+00, 0.4164295E+00, 0.4237837E+00, &
     & 0.4176100E+00, 0.4091900E+00, 0.4514000E+00, 0.5039400E+00, &
     & 0.4361200E+00, 0.4429100E+00, 0.4232000E+00, 0.5169293E+00, &
     & 0.5110900E+00, 0.4867270E+00, 0.4039843E+00, 0.4039843E+00 /
      data (ref_adm( 2,iz,16, 7),iz = 1,20) / &
     & 0.4469100E+00, 0.4469100E+00, 0.4120800E+00, 0.3675200E+00, &
     & 0.4029700E+00, 0.4690700E+00, 0.4159862E+00, 0.5064200E+00, &
     & 0.4273600E+00, 0.4872900E+00, 0.5548700E+00, 0.5314200E+00, &
     & 0.5113300E+00, 0.4854800E+00, 0.4450300E+00, 0.5091293E+00, &
     & 0.4556700E+00, 0.4768189E+00, 0.3971454E+00, 0.3971454E+00 /
      data (ref_adm( 2,iz,17, 7),iz = 1,20) / &
     & 0.3594100E+00, 0.3594100E+00, 0.3327200E+00, 0.3758600E+00, &
     & 0.5078700E+00, 0.4959200E+00, 0.3306300E+00, 0.5401700E+00, &
     & 0.5495100E+00, 0.5137700E+00, 0.5409400E+00, 0.4705300E+00, &
     & 0.4957300E+00, 0.4249200E+00, 0.4627900E+00, 0.5114500E+00, &
     & 0.4932007E+00, 0.4672217E+00, 0.3903998E+00, 0.3903998E+00 /
      data (ref_adm( 2,iz,18, 7),iz = 1,20) / &
     & 0.3489300E+00, 0.3489300E+00, 0.3681700E+00, 0.4202300E+00, &
     & 0.5413200E+00, 0.6174300E+00, 0.4394800E+00, 0.4548149E+00, &
     & 0.4315000E+00, 0.4361700E+00, 0.4765100E+00, 0.4306600E+00, &
     & 0.4846900E+00, 0.3915600E+00, 0.4107500E+00, 0.4449311E+00, &
     & 0.4297977E+00, 0.3981423E+00, 0.3247712E+00, 0.3247712E+00 /
      data (ref_adm( 2,iz,19, 7),iz = 1,20) / &
     & 0.4333900E+00, 0.4333900E+00, 0.4385400E+00, 0.6017300E+00, &
     & 0.5384500E+00, 0.6245700E+00, 0.4749100E+00, 0.5205600E+00, &
     & 0.3613800E+00, 0.4051100E+00, 0.5114700E+00, 0.4010000E+00, &
     & 0.3639300E+00, 0.4132800E+00, 0.4317700E+00, 0.3792100E+00, &
     & 0.4133900E+00, 0.3966029E+00, 0.3239435E+00, 0.3239435E+00 /
      data (ref_adm( 2,iz,20, 7),iz = 1,20) / &
     & 0.5176800E+00, 0.5176800E+00, 0.4303600E+00, 0.4309200E+00, &
     & 0.6531000E+00, 0.4660200E+00, 0.4767100E+00, 0.4893400E+00, &
     & 0.3399300E+00, 0.5379900E+00, 0.4540100E+00, 0.4192400E+00, &
     & 0.4541053E+00, 0.4347900E+00, 0.3976000E+00, 0.4167700E+00, &
     & 0.4262989E+00, 0.3948558E+00, 0.3231651E+00, 0.3231651E+00 /
      data (ref_adm( 2,iz,21, 7),iz = 1,20) / &
     & 0.3622000E+00, 0.3622000E+00, 0.3519300E+00, 0.3836100E+00, &
     & 0.4536100E+00, 0.3610600E+00, 0.4117900E+00, 0.4697900E+00, &
     & 0.4091900E+00, 0.4830900E+00, 0.5385300E+00, 0.5105900E+00, &
     & 0.4425100E+00, 0.3904200E+00, 0.3101200E+00, 0.3658800E+00, &
     & 0.4247833E+00, 0.3931453E+00, 0.3223015E+00, 0.3223015E+00 /
      data (ref_adm( 2,iz,22, 7),iz = 1,20) / &
     & 0.4079800E+00, 0.4079800E+00, 0.3302800E+00, 0.3700700E+00, &
     & 0.3988600E+00, 0.4172900E+00, 0.5039900E+00, 0.5221100E+00, &
     & 0.5443300E+00, 0.4361400E+00, 0.5038600E+00, 0.5214500E+00, &
     & 0.4880800E+00, 0.5114600E+00, 0.3839500E+00, 0.4303800E+00, &
     & 0.4226514E+00, 0.4014274E+00, 0.3667620E+00, 0.3667620E+00 /
      data (ref_adm( 2,iz,23, 7),iz = 1,20) / &
     & 0.4259600E+00, 0.4259600E+00, 0.4708200E+00, 0.4506600E+00, &
     & 0.4037500E+00, 0.4646600E+00, 0.5110900E+00, 0.4906400E+00, &
     & 0.5474000E+00, 0.4012000E+00, 0.4707200E+00, 0.5197100E+00, &
     & 0.4344200E+00, 0.4712200E+00, 0.4943400E+00, 0.4716500E+00, &
     & 0.4206507E+00, 0.3998969E+00, 0.3686357E+00, 0.3686357E+00 /
      data (ref_adm( 2,iz,24, 7),iz = 1,20) / &
     & 0.4459100E+00, 0.4459100E+00, 0.3930400E+00, 0.3991400E+00, &
     & 0.4602400E+00, 0.4163200E+00, 0.4691300E+00, 0.4719000E+00, &
     & 0.4709800E+00, 0.4092000E+00, 0.3584400E+00, 0.3982500E+00, &
     & 0.5003900E+00, 0.4746700E+00, 0.5078000E+00, 0.5102800E+00, &
     & 0.5410500E+00, 0.4002630E+00, 0.3718859E+00, 0.3718859E+00 /
      data (ref_adm( 2,iz,25, 7),iz = 1,20) / &
     & 0.3921800E+00, 0.3921800E+00, 0.5163000E+00, 0.3710500E+00, &
     & 0.3882300E+00, 0.4099500E+00, 0.3944700E+00, 0.4350000E+00, &
     & 0.4825900E+00, 0.4958300E+00, 0.4501100E+00, 0.4701700E+00, &
     & 0.4720800E+00, 0.4993500E+00, 0.4917400E+00, 0.5965700E+00, &
     & 0.4399400E+00, 0.4150400E+00, 0.3764389E+00, 0.3764389E+00 /
      data (ref_adm( 2,iz,26, 7),iz = 1,20) / &
     & 0.4564800E+00, 0.4564800E+00, 0.4137800E+00, 0.4759800E+00, &
     & 0.4445676E+00, 0.4243400E+00, 0.4301300E+00, 0.4805700E+00, &
     & 0.5848300E+00, 0.6166500E+00, 0.4662829E+00, 0.4403500E+00, &
     & 0.4431800E+00, 0.4524400E+00, 0.4934100E+00, 0.5231700E+00, &
     & 0.4364000E+00, 0.4102900E+00, 0.3822260E+00, 0.3822260E+00 /
      data (ref_adm( 2,iz,27, 7),iz = 1,20) / &
     & 0.3056300E+00, 0.3056300E+00, 0.4244800E+00, 0.4462100E+00, &
     & 0.4198000E+00, 0.3179800E+00, 0.4126500E+00, 0.5041400E+00, &
     & 0.4996500E+00, 0.5015100E+00, 0.4881500E+00, 0.4575600E+00, &
     & 0.4465600E+00, 0.5072100E+00, 0.4668500E+00, 0.4883100E+00, &
     & 0.4625800E+00, 0.4433700E+00, 0.3894426E+00, 0.3894426E+00 /
      data (ref_adm( 2,iz,28, 7),iz = 1,20) / &
     & 0.4347300E+00, 0.4347300E+00, 0.4562400E+00, 0.4754100E+00, &
     & 0.4546600E+00, 0.4693000E+00, 0.5756900E+00, 0.4757900E+00, &
     & 0.4409400E+00, 0.4280800E+00, 0.5627000E+00, 0.4891200E+00, &
     & 0.4922500E+00, 0.4500600E+00, 0.5084800E+00, 0.4653800E+00, &
     & 0.4343320E+00, 0.4173968E+00, 0.3976055E+00, 0.3976055E+00 /
      data (ref_adm( 2,iz,29, 7),iz = 1,20) / &
     & 0.4575200E+00, 0.4575200E+00, 0.4326100E+00, 0.4487800E+00, &
     & 0.4190900E+00, 0.4463400E+00, 0.4691000E+00, 0.4626700E+00, &
     & 0.4658500E+00, 0.4917800E+00, 0.4760400E+00, 0.4785300E+00, &
     & 0.4831000E+00, 0.4458300E+00, 0.4896300E+00, 0.2800400E+00, &
     & 0.2870600E+00, 0.3806000E+00, 0.4059299E+00, 0.4059299E+00 /
      data (ref_adm( 2,iz,30, 7),iz = 1,20) / &
     & 0.4588600E+00, 0.4588600E+00, 0.4539400E+00, 0.5066900E+00, &
     & 0.4298700E+00, 0.4437100E+00, 0.4439200E+00, 0.4664500E+00, &
     & 0.4691400E+00, 0.4658000E+00, 0.4620500E+00, 0.4733800E+00, &
     & 0.4284900E+00, 0.4445700E+00, 0.4554400E+00, 0.4482500E+00, &
     & 0.4616696E+00, 0.4321465E+00, 0.4140885E+00, 0.4140885E+00 /
      data (ref_adm( 2,iz,31, 7),iz = 1,20) / &
     & 0.4468400E+00, 0.4468400E+00, 0.4377300E+00, 0.3714100E+00, &
     & 0.4196300E+00, 0.4758700E+00, 0.3598600E+00, 0.5098200E+00, &
     & 0.4359100E+00, 0.4937500E+00, 0.4660200E+00, 0.4574200E+00, &
     & 0.4751600E+00, 0.4477900E+00, 0.4818900E+00, 0.4499800E+00, &
     & 0.4433800E+00, 0.4477093E+00, 0.4228111E+00, 0.4228111E+00 /
      data (ref_adm( 2,iz,32, 7),iz = 1,20) / &
     & 0.4087200E+00, 0.4087200E+00, 0.3180000E+00, 0.5060400E+00, &
     & 0.4298100E+00, 0.4947300E+00, 0.4826000E+00, 0.4254600E+00, &
     & 0.4489900E+00, 0.4686300E+00, 0.4365100E+00, 0.4993600E+00, &
     & 0.4372500E+00, 0.4375200E+00, 0.4471000E+00, 0.4816300E+00, &
     & 0.4848276E+00, 0.4681714E+00, 0.4329675E+00, 0.4329675E+00 /
      data (ref_adm( 2,iz,33, 7),iz = 1,20) / &
     & 0.4223400E+00, 0.4223400E+00, 0.4439000E+00, 0.5191100E+00, &
     & 0.4858300E+00, 0.4860200E+00, 0.3894300E+00, 0.4402600E+00, &
     & 0.4023000E+00, 0.4169600E+00, 0.4435700E+00, 0.4128700E+00, &
     & 0.3994000E+00, 0.4264600E+00, 0.4265100E+00, 0.4812547E+00, &
     & 0.4772206E+00, 0.4791074E+00, 0.4440939E+00, 0.4440939E+00 /
      data (ref_adm( 2,iz,34, 7),iz = 1,20) / &
     & 0.4585200E+00, 0.4585200E+00, 0.4343900E+00, 0.4518900E+00, &
     & 0.4619900E+00, 0.4115400E+00, 0.4528112E+00, 0.3857500E+00, &
     & 0.3990800E+00, 0.3922000E+00, 0.4914900E+00, 0.4982300E+00, &
     & 0.4566200E+00, 0.4519000E+00, 0.4852800E+00, 0.4830184E+00, &
     & 0.4776552E+00, 0.4774642E+00, 0.4541876E+00, 0.4541876E+00 /
      data (ref_adm( 2,iz,35, 7),iz = 1,20) / &
     & 0.4095100E+00, 0.4095100E+00, 0.4059100E+00, 0.4955900E+00, &
     & 0.4263200E+00, 0.4550800E+00, 0.3855000E+00, 0.3421300E+00, &
     & 0.4284800E+00, 0.4691100E+00, 0.5023000E+00, 0.4687800E+00, &
     & 0.4567200E+00, 0.4214300E+00, 0.4875100E+00, 0.4838972E+00, &
     & 0.4795934E+00, 0.4743786E+00, 0.4608910E+00, 0.4608910E+00 /
      data (ref_adm( 2,iz,36, 7),iz = 1,20) / &
     & 0.3955400E+00, 0.3955400E+00, 0.4966800E+00, 0.5017100E+00, &
     & 0.5015000E+00, 0.4346400E+00, 0.4709200E+00, 0.4755500E+00, &
     & 0.3748800E+00, 0.4978400E+00, 0.4742577E+00, 0.5008800E+00, &
     & 0.4553800E+00, 0.4751000E+00, 0.4830599E+00, 0.4839737E+00, &
     & 0.4808183E+00, 0.4735664E+00, 0.4637612E+00, 0.4637612E+00 /
      data (ref_adm( 2,iz,37, 7),iz = 1,20) / &
     & 0.4018700E+00, 0.4018700E+00, 0.3806900E+00, 0.4527770E+00, &
     & 0.4541800E+00, 0.4600800E+00, 0.4700300E+00, 0.4399200E+00, &
     & 0.5608000E+00, 0.4504300E+00, 0.4824200E+00, 0.4983000E+00, &
     & 0.4762900E+00, 0.5067500E+00, 0.4829363E+00, 0.4839526E+00, &
     & 0.4814336E+00, 0.4737275E+00, 0.4649277E+00, 0.4649277E+00 /
      data (ref_adm( 2,iz,38, 7),iz = 1,20) / &
     & 0.4018700E+00, 0.4018700E+00, 0.3806900E+00, 0.4527770E+00, &
     & 0.4541800E+00, 0.4600800E+00, 0.4700300E+00, 0.4399200E+00, &
     & 0.5608000E+00, 0.4504300E+00, 0.4824200E+00, 0.4983000E+00, &
     & 0.4762900E+00, 0.5067500E+00, 0.4829363E+00, 0.4839526E+00, &
     & 0.4814336E+00, 0.4737275E+00, 0.4649277E+00, 0.4649277E+00 /
! Solar Zenith Angle 35.0 Albedo  0.4801656E+00
      data (ref_adm( 2,iz, 1, 8),iz = 1,20) / &
     & 0.4344500E+00, 0.4344500E+00, 0.3760200E+00, 0.4112600E+00, &
     & 0.4234100E+00, 0.3825800E+00, 0.4524800E+00, 0.4665400E+00, &
     & 0.4647100E+00, 0.4836900E+00, 0.5254100E+00, 0.5412600E+00, &
     & 0.5419100E+00, 0.5723700E+00, 0.5898000E+00, 0.5777000E+00, &
     & 0.5555600E+00, 0.5396700E+00, 0.4925481E+00, 0.4925481E+00 /
      data (ref_adm( 2,iz, 2, 8),iz = 1,20) / &
     & 0.4344500E+00, 0.4344500E+00, 0.3760200E+00, 0.4112600E+00, &
     & 0.4234100E+00, 0.3825800E+00, 0.4524800E+00, 0.4665400E+00, &
     & 0.4647100E+00, 0.4836900E+00, 0.5254100E+00, 0.5412600E+00, &
     & 0.5419100E+00, 0.5723700E+00, 0.5898000E+00, 0.5777000E+00, &
     & 0.5555600E+00, 0.5396700E+00, 0.4925481E+00, 0.4925481E+00 /
      data (ref_adm( 2,iz, 3, 8),iz = 1,20) / &
     & 0.4486500E+00, 0.4486500E+00, 0.4079600E+00, 0.4100600E+00, &
     & 0.4270300E+00, 0.4098700E+00, 0.4146200E+00, 0.4219100E+00, &
     & 0.4448000E+00, 0.5075400E+00, 0.5326600E+00, 0.5385400E+00, &
     & 0.5429700E+00, 0.5079400E+00, 0.5589000E+00, 0.5842500E+00, &
     & 0.5595100E+00, 0.5477700E+00, 0.4841200E+00, 0.4841200E+00 /
      data (ref_adm( 2,iz, 4, 8),iz = 1,20) / &
     & 0.4569800E+00, 0.4569800E+00, 0.4316500E+00, 0.3906000E+00, &
     & 0.4082900E+00, 0.4263300E+00, 0.4445900E+00, 0.4221800E+00, &
     & 0.4781800E+00, 0.5190600E+00, 0.5556600E+00, 0.5147100E+00, &
     & 0.5102200E+00, 0.5422300E+00, 0.5910600E+00, 0.5736000E+00, &
     & 0.5599700E+00, 0.5392100E+00, 0.4833391E+00, 0.4833391E+00 /
      data (ref_adm( 2,iz, 5, 8),iz = 1,20) / &
     & 0.4915000E+00, 0.4915000E+00, 0.4440700E+00, 0.4772300E+00, &
     & 0.4717600E+00, 0.4148400E+00, 0.4409600E+00, 0.4314300E+00, &
     & 0.4585800E+00, 0.4609600E+00, 0.5171300E+00, 0.5606000E+00, &
     & 0.5589800E+00, 0.5690300E+00, 0.5920500E+00, 0.5365700E+00, &
     & 0.5745100E+00, 0.5788900E+00, 0.4749920E+00, 0.4749920E+00 /
      data (ref_adm( 2,iz, 6, 8),iz = 1,20) / &
     & 0.4560700E+00, 0.4560700E+00, 0.4480000E+00, 0.4346400E+00, &
     & 0.4547000E+00, 0.4354800E+00, 0.4697000E+00, 0.4514300E+00, &
     & 0.4613200E+00, 0.4307900E+00, 0.4777700E+00, 0.5188500E+00, &
     & 0.5296800E+00, 0.5683800E+00, 0.5460600E+00, 0.5848200E+00, &
     & 0.5727300E+00, 0.6374000E+00, 0.4649929E+00, 0.4649929E+00 /
      data (ref_adm( 2,iz, 7, 8),iz = 1,20) / &
     & 0.4054300E+00, 0.4054300E+00, 0.3931700E+00, 0.4553300E+00, &
     & 0.4056900E+00, 0.3721600E+00, 0.4060800E+00, 0.4513200E+00, &
     & 0.3885100E+00, 0.4183800E+00, 0.4484000E+00, 0.5075600E+00, &
     & 0.5156800E+00, 0.5443200E+00, 0.5591000E+00, 0.5807100E+00, &
     & 0.5430965E+00, 0.5047300E+00, 0.4551178E+00, 0.4551178E+00 /
      data (ref_adm( 2,iz, 8, 8),iz = 1,20) / &
     & 0.4441100E+00, 0.4441100E+00, 0.4184800E+00, 0.3938100E+00, &
     & 0.4059300E+00, 0.4096800E+00, 0.4343400E+00, 0.4438200E+00, &
     & 0.4436900E+00, 0.4516600E+00, 0.4549600E+00, 0.4842700E+00, &
     & 0.5117800E+00, 0.5059900E+00, 0.5120000E+00, 0.5208000E+00, &
     & 0.5355200E+00, 0.6596100E+00, 0.4455406E+00, 0.4455406E+00 /
      data (ref_adm( 2,iz, 9, 8),iz = 1,20) / &
     & 0.4962500E+00, 0.4962500E+00, 0.4569200E+00, 0.4352700E+00, &
     & 0.4626700E+00, 0.4859100E+00, 0.4722400E+00, 0.4358500E+00, &
     & 0.4569500E+00, 0.4513300E+00, 0.4924700E+00, 0.4599800E+00, &
     & 0.5162500E+00, 0.5067200E+00, 0.5131300E+00, 0.5052800E+00, &
     & 0.5255262E+00, 0.5042524E+00, 0.4364940E+00, 0.4364940E+00 /
      data (ref_adm( 2,iz,10, 8),iz = 1,20) / &
     & 0.4169900E+00, 0.4169900E+00, 0.4678600E+00, 0.3680900E+00, &
     & 0.3951000E+00, 0.3530800E+00, 0.4336700E+00, 0.4379800E+00, &
     & 0.4478400E+00, 0.4511000E+00, 0.4791900E+00, 0.4796500E+00, &
     & 0.4752900E+00, 0.4653600E+00, 0.5549700E+00, 0.5178600E+00, &
     & 0.5166337E+00, 0.4956279E+00, 0.4283814E+00, 0.4283814E+00 /
      data (ref_adm( 2,iz,11, 8),iz = 1,20) / &
     & 0.4822700E+00, 0.4822700E+00, 0.4670200E+00, 0.4484700E+00, &
     & 0.4434900E+00, 0.4438300E+00, 0.4820800E+00, 0.4961200E+00, &
     & 0.4620500E+00, 0.4039500E+00, 0.4288600E+00, 0.4713600E+00, &
     & 0.4709500E+00, 0.4853000E+00, 0.5650100E+00, 0.6328500E+00, &
     & 0.6275500E+00, 0.4877309E+00, 0.4207573E+00, 0.4207573E+00 /
      data (ref_adm( 2,iz,12, 8),iz = 1,20) / &
     & 0.4393200E+00, 0.4393200E+00, 0.4317600E+00, 0.4145900E+00, &
     & 0.4356200E+00, 0.4413200E+00, 0.4688600E+00, 0.4693300E+00, &
     & 0.4891700E+00, 0.4865400E+00, 0.4850000E+00, 0.4426400E+00, &
     & 0.4808200E+00, 0.4819800E+00, 0.6343400E+00, 0.6491400E+00, &
     & 0.6459000E+00, 0.4799764E+00, 0.4139051E+00, 0.4139051E+00 /
      data (ref_adm( 2,iz,13, 8),iz = 1,20) / &
     & 0.4365000E+00, 0.4365000E+00, 0.4445700E+00, 0.4480300E+00, &
     & 0.4663400E+00, 0.4881600E+00, 0.4723000E+00, 0.4683600E+00, &
     & 0.4893100E+00, 0.4865000E+00, 0.4840800E+00, 0.5089800E+00, &
     & 0.5132400E+00, 0.5054800E+00, 0.6627200E+00, 0.6230800E+00, &
     & 0.6117400E+00, 0.5779100E+00, 0.4073536E+00, 0.4073536E+00 /
      data (ref_adm( 2,iz,14, 8),iz = 1,20) / &
     & 0.4516000E+00, 0.4516000E+00, 0.4321400E+00, 0.4442600E+00, &
     & 0.4593200E+00, 0.4621200E+00, 0.4495200E+00, 0.4502100E+00, &
     & 0.4548900E+00, 0.4450000E+00, 0.4576900E+00, 0.5025600E+00, &
     & 0.4906700E+00, 0.4779900E+00, 0.4902400E+00, 0.5726700E+00, &
     & 0.4779825E+00, 0.5676000E+00, 0.4007910E+00, 0.4007910E+00 /
      data (ref_adm( 2,iz,15, 8),iz = 1,20) / &
     & 0.4343100E+00, 0.4343100E+00, 0.4583600E+00, 0.4220300E+00, &
     & 0.4368400E+00, 0.4229500E+00, 0.4116700E+00, 0.4727000E+00, &
     & 0.4614100E+00, 0.4335800E+00, 0.4657100E+00, 0.4808800E+00, &
     & 0.4943400E+00, 0.4976700E+00, 0.4900500E+00, 0.5740500E+00, &
     & 0.4686476E+00, 0.4533347E+00, 0.3934064E+00, 0.3934064E+00 /
      data (ref_adm( 2,iz,16, 8),iz = 1,20) / &
     & 0.4793800E+00, 0.4793800E+00, 0.3976400E+00, 0.4131700E+00, &
     & 0.4255600E+00, 0.4343600E+00, 0.4113100E+00, 0.4142500E+00, &
     & 0.4885700E+00, 0.3904300E+00, 0.4364100E+00, 0.5054500E+00, &
     & 0.4959000E+00, 0.5062100E+00, 0.4775000E+00, 0.5139800E+00, &
     & 0.4113600E+00, 0.4560300E+00, 0.3861604E+00, 0.3861604E+00 /
      data (ref_adm( 2,iz,17, 8),iz = 1,20) / &
     & 0.4378800E+00, 0.4378800E+00, 0.4459100E+00, 0.4272500E+00, &
     & 0.4503200E+00, 0.4798100E+00, 0.4442900E+00, 0.4258100E+00, &
     & 0.4881600E+00, 0.4064100E+00, 0.4584100E+00, 0.5075500E+00, &
     & 0.5604500E+00, 0.5173300E+00, 0.4976000E+00, 0.4586848E+00, &
     & 0.4514395E+00, 0.4363028E+00, 0.3798686E+00, 0.3798686E+00 /
      data (ref_adm( 2,iz,18, 8),iz = 1,20) / &
     & 0.3978900E+00, 0.3978900E+00, 0.4429600E+00, 0.4093000E+00, &
     & 0.4328700E+00, 0.4399100E+00, 0.4886600E+00, 0.4426200E+00, &
     & 0.4735400E+00, 0.4274300E+00, 0.4539300E+00, 0.5166900E+00, &
     & 0.4950600E+00, 0.4800500E+00, 0.3669500E+00, 0.4881178E+00, &
     & 0.5018700E+00, 0.4443203E+00, 0.3816660E+00, 0.3816660E+00 /
      data (ref_adm( 2,iz,19, 8),iz = 1,20) / &
     & 0.4465500E+00, 0.4465500E+00, 0.4684500E+00, 0.3743900E+00, &
     & 0.4697400E+00, 0.4500800E+00, 0.4765900E+00, 0.5088000E+00, &
     & 0.4601200E+00, 0.4764800E+00, 0.4308700E+00, 0.4758600E+00, &
     & 0.4395700E+00, 0.5323300E+00, 0.4430700E+00, 0.4511300E+00, &
     & 0.4446300E+00, 0.4358582E+00, 0.3768464E+00, 0.3768464E+00 /
      data (ref_adm( 2,iz,20, 8),iz = 1,20) / &
     & 0.4277400E+00, 0.4277400E+00, 0.4901200E+00, 0.4051500E+00, &
     & 0.3726200E+00, 0.4693300E+00, 0.4696600E+00, 0.5034600E+00, &
     & 0.4811500E+00, 0.4979100E+00, 0.4593400E+00, 0.4613700E+00, &
     & 0.4516800E+00, 0.4337000E+00, 0.4855800E+00, 0.4609300E+00, &
     & 0.4413800E+00, 0.4296276E+00, 0.3742333E+00, 0.3742333E+00 /
      data (ref_adm( 2,iz,21, 8),iz = 1,20) / &
     & 0.4534000E+00, 0.4534000E+00, 0.4781600E+00, 0.4004600E+00, &
     & 0.4157800E+00, 0.4809900E+00, 0.4858000E+00, 0.5083900E+00, &
     & 0.5718900E+00, 0.4565600E+00, 0.5098300E+00, 0.4714300E+00, &
     & 0.4841200E+00, 0.4571000E+00, 0.4831400E+00, 0.5563300E+00, &
     & 0.3823900E+00, 0.4249094E+00, 0.3731800E+00, 0.3731800E+00 /
      data (ref_adm( 2,iz,22, 8),iz = 1,20) / &
     & 0.4174500E+00, 0.4174500E+00, 0.4484700E+00, 0.3851600E+00, &
     & 0.3837600E+00, 0.4107300E+00, 0.4037900E+00, 0.5310300E+00, &
     & 0.5281200E+00, 0.5224600E+00, 0.5711300E+00, 0.3872100E+00, &
     & 0.4807600E+00, 0.5075500E+00, 0.4996900E+00, 0.4576400E+00, &
     & 0.3795600E+00, 0.3717594E+00, 0.3175087E+00, 0.3175087E+00 /
      data (ref_adm( 2,iz,23, 8),iz = 1,20) / &
     & 0.4415800E+00, 0.4415800E+00, 0.4210500E+00, 0.4099300E+00, &
     & 0.4265500E+00, 0.4439900E+00, 0.4320500E+00, 0.4901500E+00, &
     & 0.4828900E+00, 0.5807600E+00, 0.4864900E+00, 0.4900800E+00, &
     & 0.4830200E+00, 0.5087800E+00, 0.4767400E+00, 0.4359600E+00, &
     & 0.3881200E+00, 0.3709070E+00, 0.3181361E+00, 0.3181361E+00 /
      data (ref_adm( 2,iz,24, 8),iz = 1,20) / &
     & 0.4051200E+00, 0.4051200E+00, 0.4057300E+00, 0.4112800E+00, &
     & 0.4002700E+00, 0.4090800E+00, 0.4889300E+00, 0.4808200E+00, &
     & 0.5361900E+00, 0.5569700E+00, 0.4961100E+00, 0.5212900E+00, &
     & 0.4811700E+00, 0.5331300E+00, 0.5197400E+00, 0.4822000E+00, &
     & 0.4058100E+00, 0.3706303E+00, 0.3192969E+00, 0.3192969E+00 /
      data (ref_adm( 2,iz,25, 8),iz = 1,20) / &
     & 0.4576000E+00, 0.4576000E+00, 0.4256300E+00, 0.5272200E+00, &
     & 0.4385100E+00, 0.4183900E+00, 0.4547600E+00, 0.5623800E+00, &
     & 0.5506000E+00, 0.4927500E+00, 0.4815800E+00, 0.4730900E+00, &
     & 0.5151500E+00, 0.5070500E+00, 0.5176400E+00, 0.4853700E+00, &
     & 0.4751400E+00, 0.3711071E+00, 0.3208675E+00, 0.3208675E+00 /
      data (ref_adm( 2,iz,26, 8),iz = 1,20) / &
     & 0.5018300E+00, 0.5018300E+00, 0.4873100E+00, 0.4408400E+00, &
     & 0.4296400E+00, 0.4093400E+00, 0.4102700E+00, 0.5390200E+00, &
     & 0.5077500E+00, 0.4229000E+00, 0.5257400E+00, 0.5085200E+00, &
     & 0.5264700E+00, 0.5846000E+00, 0.5085900E+00, 0.5082800E+00, &
     & 0.4695500E+00, 0.3720874E+00, 0.3229200E+00, 0.3229200E+00 /
      data (ref_adm( 2,iz,27, 8),iz = 1,20) / &
     & 0.4660600E+00, 0.4660600E+00, 0.4352600E+00, 0.4163700E+00, &
     & 0.4172400E+00, 0.4193600E+00, 0.4632500E+00, 0.4969300E+00, &
     & 0.4769100E+00, 0.4265800E+00, 0.4778000E+00, 0.5150400E+00, &
     & 0.4887200E+00, 0.5849500E+00, 0.5077500E+00, 0.5189600E+00, &
     & 0.4681100E+00, 0.4307200E+00, 0.3253407E+00, 0.3253407E+00 /
      data (ref_adm( 2,iz,28, 8),iz = 1,20) / &
     & 0.4384300E+00, 0.4384300E+00, 0.4497700E+00, 0.5057900E+00, &
     & 0.5038700E+00, 0.4660600E+00, 0.5025000E+00, 0.5238600E+00, &
     & 0.5420200E+00, 0.4580900E+00, 0.4839600E+00, 0.5215800E+00, &
     & 0.5090700E+00, 0.5416500E+00, 0.4939300E+00, 0.5104100E+00, &
     & 0.4960500E+00, 0.4762000E+00, 0.3280418E+00, 0.3280418E+00 /
      data (ref_adm( 2,iz,29, 8),iz = 1,20) / &
     & 0.4286700E+00, 0.4286700E+00, 0.4397500E+00, 0.4389900E+00, &
     & 0.4486000E+00, 0.4378500E+00, 0.4240600E+00, 0.4246500E+00, &
     & 0.4411700E+00, 0.4406600E+00, 0.4530500E+00, 0.4795600E+00, &
     & 0.4846200E+00, 0.5162200E+00, 0.4412300E+00, 0.4685100E+00, &
     & 0.4511800E+00, 0.4116900E+00, 0.3555600E+00, 0.3555600E+00 /
      data (ref_adm( 2,iz,30, 8),iz = 1,20) / &
     & 0.4275100E+00, 0.4275100E+00, 0.5208100E+00, 0.5407300E+00, &
     & 0.5080900E+00, 0.5174300E+00, 0.4961400E+00, 0.4762600E+00, &
     & 0.5002700E+00, 0.4561400E+00, 0.4611100E+00, 0.4781200E+00, &
     & 0.5070400E+00, 0.4955700E+00, 0.5163600E+00, 0.4533000E+00, &
     & 0.4555500E+00, 0.3596100E+00, 0.3341020E+00, 0.3341020E+00 /
      data (ref_adm( 2,iz,31, 8),iz = 1,20) / &
     & 0.4564300E+00, 0.4564300E+00, 0.4804500E+00, 0.4978600E+00, &
     & 0.5171300E+00, 0.4693000E+00, 0.4428600E+00, 0.5099500E+00, &
     & 0.5719700E+00, 0.5475600E+00, 0.4967900E+00, 0.5488000E+00, &
     & 0.5294100E+00, 0.5282200E+00, 0.5376500E+00, 0.5672900E+00, &
     & 0.4327800E+00, 0.4257500E+00, 0.3372341E+00, 0.3372341E+00 /
      data (ref_adm( 2,iz,32, 8),iz = 1,20) / &
     & 0.4804600E+00, 0.4804600E+00, 0.5009000E+00, 0.4852700E+00, &
     & 0.5084500E+00, 0.3860100E+00, 0.5234900E+00, 0.4330400E+00, &
     & 0.5049600E+00, 0.4585800E+00, 0.5193300E+00, 0.5376500E+00, &
     & 0.4841800E+00, 0.5400400E+00, 0.5238200E+00, 0.4523600E+00, &
     & 0.4293600E+00, 0.3876832E+00, 0.3402311E+00, 0.3402311E+00 /
      data (ref_adm( 2,iz,33, 8),iz = 1,20) / &
     & 0.4615800E+00, 0.4615800E+00, 0.5245300E+00, 0.5731800E+00, &
     & 0.5093900E+00, 0.4296000E+00, 0.4326000E+00, 0.4463700E+00, &
     & 0.4932800E+00, 0.4549100E+00, 0.5250100E+00, 0.5082500E+00, &
     & 0.5222600E+00, 0.5340200E+00, 0.5512400E+00, 0.4789100E+00, &
     & 0.5016600E+00, 0.3899865E+00, 0.3429295E+00, 0.3429295E+00 /
      data (ref_adm( 2,iz,34, 8),iz = 1,20) / &
     & 0.4969800E+00, 0.4969800E+00, 0.4437500E+00, 0.5358900E+00, &
     & 0.5515100E+00, 0.5732800E+00, 0.4373500E+00, 0.4518400E+00, &
     & 0.4505700E+00, 0.4544500E+00, 0.4815300E+00, 0.4666500E+00, &
     & 0.5393200E+00, 0.4769100E+00, 0.5021400E+00, 0.5071600E+00, &
     & 0.5643100E+00, 0.3920577E+00, 0.3451399E+00, 0.3451399E+00 /
      data (ref_adm( 2,iz,35, 8),iz = 1,20) / &
     & 0.4968200E+00, 0.4968200E+00, 0.4888300E+00, 0.4863800E+00, &
     & 0.5648700E+00, 0.5507800E+00, 0.4987600E+00, 0.4447900E+00, &
     & 0.5312200E+00, 0.5847500E+00, 0.4766800E+00, 0.4496800E+00, &
     & 0.3927200E+00, 0.4712800E+00, 0.4805500E+00, 0.4786920E+00, &
     & 0.4361288E+00, 0.3938942E+00, 0.3469241E+00, 0.3469241E+00 /
      data (ref_adm( 2,iz,36, 8),iz = 1,20) / &
     & 0.4340400E+00, 0.4340400E+00, 0.3989000E+00, 0.4349000E+00, &
     & 0.4595600E+00, 0.4789100E+00, 0.5074300E+00, 0.5243900E+00, &
     & 0.5335800E+00, 0.5210500E+00, 0.4372100E+00, 0.5368100E+00, &
     & 0.4108700E+00, 0.4672100E+00, 0.4842900E+00, 0.4810393E+00, &
     & 0.4398654E+00, 0.3952996E+00, 0.3481143E+00, 0.3481143E+00 /
      data (ref_adm( 2,iz,37, 8),iz = 1,20) / &
     & 0.4167300E+00, 0.4167300E+00, 0.4127800E+00, 0.4294300E+00, &
     & 0.4266400E+00, 0.4598800E+00, 0.5377000E+00, 0.5079300E+00, &
     & 0.5434200E+00, 0.4986200E+00, 0.4364900E+00, 0.4807700E+00, &
     & 0.5136300E+00, 0.4812400E+00, 0.4703800E+00, 0.5040100E+00, &
     & 0.4421221E+00, 0.3961173E+00, 0.3488080E+00, 0.3488080E+00 /
      data (ref_adm( 2,iz,38, 8),iz = 1,20) / &
     & 0.4167300E+00, 0.4167300E+00, 0.4127800E+00, 0.4294300E+00, &
     & 0.4266400E+00, 0.4598800E+00, 0.5377000E+00, 0.5079300E+00, &
     & 0.5434200E+00, 0.4986200E+00, 0.4364900E+00, 0.4807700E+00, &
     & 0.5136300E+00, 0.4812400E+00, 0.4703800E+00, 0.5040100E+00, &
     & 0.4421221E+00, 0.3961173E+00, 0.3488080E+00, 0.3488080E+00 /
! Solar Zenith Angle 40.0 Albedo  0.4819358E+00
      data (ref_adm( 2,iz, 1, 9),iz = 1,20) / &
     & 0.4152500E+00, 0.4152500E+00, 0.3749500E+00, 0.4301600E+00, &
     & 0.4241400E+00, 0.4360900E+00, 0.4821400E+00, 0.5216000E+00, &
     & 0.4499100E+00, 0.5424600E+00, 0.6202900E+00, 0.5985200E+00, &
     & 0.6280500E+00, 0.6247200E+00, 0.6304000E+00, 0.6259600E+00, &
     & 0.5924100E+00, 0.5745300E+00, 0.5048382E+00, 0.5048382E+00 /
      data (ref_adm( 2,iz, 2, 9),iz = 1,20) / &
     & 0.4152500E+00, 0.4152500E+00, 0.3749500E+00, 0.4301600E+00, &
     & 0.4241400E+00, 0.4360900E+00, 0.4821400E+00, 0.5216000E+00, &
     & 0.4499100E+00, 0.5424600E+00, 0.6202900E+00, 0.5985200E+00, &
     & 0.6280500E+00, 0.6247200E+00, 0.6304000E+00, 0.6259600E+00, &
     & 0.5924100E+00, 0.5745300E+00, 0.5048382E+00, 0.5048382E+00 /
      data (ref_adm( 2,iz, 3, 9),iz = 1,20) / &
     & 0.3427100E+00, 0.3427100E+00, 0.4710400E+00, 0.4797300E+00, &
     & 0.3908000E+00, 0.4379200E+00, 0.4802400E+00, 0.4865000E+00, &
     & 0.5407500E+00, 0.5386500E+00, 0.5510300E+00, 0.5806800E+00, &
     & 0.5782500E+00, 0.6004900E+00, 0.6048000E+00, 0.6245500E+00, &
     & 0.6177400E+00, 0.5595600E+00, 0.1524509E+00, 0.1524509E+00 /
      data (ref_adm( 2,iz, 4, 9),iz = 1,20) / &
     & 0.4104800E+00, 0.4104800E+00, 0.4559800E+00, 0.4551300E+00, &
     & 0.4134500E+00, 0.4493000E+00, 0.4514600E+00, 0.4744300E+00, &
     & 0.5258500E+00, 0.5645000E+00, 0.5658800E+00, 0.5284700E+00, &
     & 0.5920200E+00, 0.5905600E+00, 0.5970700E+00, 0.5833400E+00, &
     & 0.6404800E+00, 0.6472900E+00, 0.4960860E+00, 0.4960860E+00 /
      data (ref_adm( 2,iz, 5, 9),iz = 1,20) / &
     & 0.4384800E+00, 0.4384800E+00, 0.4474000E+00, 0.4514100E+00, &
     & 0.5374600E+00, 0.4735200E+00, 0.3866800E+00, 0.4834900E+00, &
     & 0.5132300E+00, 0.5391700E+00, 0.5537100E+00, 0.5128700E+00, &
     & 0.5649600E+00, 0.5816600E+00, 0.5965500E+00, 0.6192300E+00, &
     & 0.6662200E+00, 0.6111800E+00, 0.4881281E+00, 0.4881281E+00 /
      data (ref_adm( 2,iz, 6, 9),iz = 1,20) / &
     & 0.4633000E+00, 0.4633000E+00, 0.4565800E+00, 0.4346900E+00, &
     & 0.4426300E+00, 0.5044000E+00, 0.4352300E+00, 0.4144600E+00, &
     & 0.5037600E+00, 0.5341100E+00, 0.5224100E+00, 0.5150100E+00, &
     & 0.5825800E+00, 0.5469000E+00, 0.5733900E+00, 0.6280600E+00, &
     & 0.6026600E+00, 0.7175800E+00, 0.4787118E+00, 0.4787118E+00 /
      data (ref_adm( 2,iz, 7, 9),iz = 1,20) / &
     & 0.4548300E+00, 0.4548300E+00, 0.4497900E+00, 0.4638500E+00, &
     & 0.4717900E+00, 0.4414700E+00, 0.4773700E+00, 0.5168800E+00, &
     & 0.5275300E+00, 0.5481600E+00, 0.5593300E+00, 0.5716000E+00, &
     & 0.5564000E+00, 0.5795400E+00, 0.5976300E+00, 0.6091300E+00, &
     & 0.6499700E+00, 0.6112300E+00, 0.4692705E+00, 0.4692705E+00 /
      data (ref_adm( 2,iz, 8, 9),iz = 1,20) / &
     & 0.4717000E+00, 0.4717000E+00, 0.4644900E+00, 0.4523500E+00, &
     & 0.4015400E+00, 0.3875000E+00, 0.4545600E+00, 0.4571900E+00, &
     & 0.4843500E+00, 0.4809000E+00, 0.4897400E+00, 0.5516300E+00, &
     & 0.5566100E+00, 0.5472400E+00, 0.5662400E+00, 0.5432400E+00, &
     & 0.6370200E+00, 0.5536175E+00, 0.4178400E+00, 0.4178400E+00 /
      data (ref_adm( 2,iz, 9, 9),iz = 1,20) / &
     & 0.4156500E+00, 0.4156500E+00, 0.3842400E+00, 0.3868300E+00, &
     & 0.4059400E+00, 0.3966800E+00, 0.4350200E+00, 0.4469800E+00, &
     & 0.4829600E+00, 0.4506800E+00, 0.4639500E+00, 0.5259200E+00, &
     & 0.5292400E+00, 0.5216400E+00, 0.5376900E+00, 0.5408400E+00, &
     & 0.5419300E+00, 0.5458637E+00, 0.4520656E+00, 0.4520656E+00 /
      data (ref_adm( 2,iz,10, 9),iz = 1,20) / &
     & 0.4226500E+00, 0.4226500E+00, 0.4230400E+00, 0.4434000E+00, &
     & 0.4692600E+00, 0.4782400E+00, 0.4904200E+00, 0.4926500E+00, &
     & 0.4427500E+00, 0.4370200E+00, 0.4711900E+00, 0.4506500E+00, &
     & 0.4672700E+00, 0.5023000E+00, 0.4964400E+00, 0.4778200E+00, &
     & 0.5793200E+00, 0.4957100E+00, 0.4497800E+00, 0.4497800E+00 /
      data (ref_adm( 2,iz,11, 9),iz = 1,20) / &
     & 0.4765600E+00, 0.4765600E+00, 0.4662100E+00, 0.4823000E+00, &
     & 0.4611600E+00, 0.5015900E+00, 0.4924700E+00, 0.4831000E+00, &
     & 0.4089600E+00, 0.4484300E+00, 0.4703400E+00, 0.4927600E+00, &
     & 0.4278700E+00, 0.4842700E+00, 0.5091500E+00, 0.4834200E+00, &
     & 0.5533600E+00, 0.4864900E+00, 0.4460300E+00, 0.4460300E+00 /
      data (ref_adm( 2,iz,12, 9),iz = 1,20) / &
     & 0.4190500E+00, 0.4190500E+00, 0.4374000E+00, 0.4410700E+00, &
     & 0.4491200E+00, 0.4548100E+00, 0.4802500E+00, 0.5342500E+00, &
     & 0.5028000E+00, 0.4882100E+00, 0.5108100E+00, 0.4383000E+00, &
     & 0.4304000E+00, 0.5054400E+00, 0.5135900E+00, 0.4938600E+00, &
     & 0.5608400E+00, 0.5101500E+00, 0.3637500E+00, 0.3637500E+00 /
      data (ref_adm( 2,iz,13, 9),iz = 1,20) / &
     & 0.4405800E+00, 0.4405800E+00, 0.4129300E+00, 0.4304200E+00, &
     & 0.4337700E+00, 0.4311800E+00, 0.4706300E+00, 0.4828400E+00, &
     & 0.4960800E+00, 0.5202200E+00, 0.5154200E+00, 0.5031800E+00, &
     & 0.5113000E+00, 0.5169000E+00, 0.5833000E+00, 0.6373900E+00, &
     & 0.5529800E+00, 0.5149260E+00, 0.4256668E+00, 0.4256668E+00 /
      data (ref_adm( 2,iz,14, 9),iz = 1,20) / &
     & 0.4186900E+00, 0.4186900E+00, 0.4173800E+00, 0.4416600E+00, &
     & 0.4580100E+00, 0.4503900E+00, 0.4378300E+00, 0.4276300E+00, &
     & 0.4472800E+00, 0.4675900E+00, 0.4516400E+00, 0.4610000E+00, &
     & 0.4702700E+00, 0.4967800E+00, 0.5404800E+00, 0.5748700E+00, &
     & 0.5610600E+00, 0.5041819E+00, 0.4187107E+00, 0.4187107E+00 /
      data (ref_adm( 2,iz,15, 9),iz = 1,20) / &
     & 0.4297800E+00, 0.4297800E+00, 0.4252500E+00, 0.4340100E+00, &
     & 0.4292800E+00, 0.4234100E+00, 0.4419200E+00, 0.4539300E+00, &
     & 0.4331600E+00, 0.4669400E+00, 0.4634000E+00, 0.4921700E+00, &
     & 0.4563400E+00, 0.4504000E+00, 0.6059900E+00, 0.5652900E+00, &
     & 0.5433200E+00, 0.4669000E+00, 0.4105148E+00, 0.4105148E+00 /
      data (ref_adm( 2,iz,16, 9),iz = 1,20) / &
     & 0.4211700E+00, 0.4211700E+00, 0.3867900E+00, 0.3349100E+00, &
     & 0.3714700E+00, 0.4397600E+00, 0.4516200E+00, 0.4980000E+00, &
     & 0.5160700E+00, 0.5177600E+00, 0.4512600E+00, 0.4381800E+00, &
     & 0.4621200E+00, 0.4689800E+00, 0.5243900E+00, 0.3906400E+00, &
     & 0.4750400E+00, 0.4299600E+00, 0.4025775E+00, 0.4025775E+00 /
      data (ref_adm( 2,iz,17, 9),iz = 1,20) / &
     & 0.4107300E+00, 0.4107300E+00, 0.3806400E+00, 0.4105000E+00, &
     & 0.4171500E+00, 0.4015200E+00, 0.4773500E+00, 0.4882900E+00, &
     & 0.4589600E+00, 0.5121300E+00, 0.4795800E+00, 0.4340900E+00, &
     & 0.4554200E+00, 0.4664700E+00, 0.5261600E+00, 0.5316500E+00, &
     & 0.4490300E+00, 0.4720518E+00, 0.3952795E+00, 0.3952795E+00 /
      data (ref_adm( 2,iz,18, 9),iz = 1,20) / &
     & 0.3992700E+00, 0.3992700E+00, 0.4076100E+00, 0.4239300E+00, &
     & 0.4405200E+00, 0.4462500E+00, 0.5329400E+00, 0.5032200E+00, &
     & 0.4839600E+00, 0.5317900E+00, 0.4848300E+00, 0.4808600E+00, &
     & 0.4586600E+00, 0.4493200E+00, 0.5227700E+00, 0.4610500E+00, &
     & 0.4378300E+00, 0.4541200E+00, 0.3800920E+00, 0.3800920E+00 /
      data (ref_adm( 2,iz,19, 9),iz = 1,20) / &
     & 0.3958100E+00, 0.3958100E+00, 0.3921300E+00, 0.3735300E+00, &
     & 0.4370000E+00, 0.4812600E+00, 0.4302700E+00, 0.4624300E+00, &
     & 0.4951900E+00, 0.4932100E+00, 0.5162100E+00, 0.4871700E+00, &
     & 0.4767700E+00, 0.4244100E+00, 0.4995000E+00, 0.4767500E+00, &
     & 0.3956900E+00, 0.3901500E+00, 0.3752693E+00, 0.3752693E+00 /
      data (ref_adm( 2,iz,20, 9),iz = 1,20) / &
     & 0.3863400E+00, 0.3863400E+00, 0.3671600E+00, 0.3852600E+00, &
     & 0.4133200E+00, 0.4473800E+00, 0.4285600E+00, 0.4500700E+00, &
     & 0.4649500E+00, 0.4844000E+00, 0.4837000E+00, 0.4381300E+00, &
     & 0.4652100E+00, 0.4227100E+00, 0.4654300E+00, 0.4806100E+00, &
     & 0.4555233E+00, 0.4270316E+00, 0.3726539E+00, 0.3726539E+00 /
      data (ref_adm( 2,iz,21, 9),iz = 1,20) / &
     & 0.3884400E+00, 0.3884400E+00, 0.3880800E+00, 0.4661000E+00, &
     & 0.3947800E+00, 0.4125200E+00, 0.4515800E+00, 0.4694100E+00, &
     & 0.4602400E+00, 0.4814100E+00, 0.4809300E+00, 0.4776000E+00, &
     & 0.4916800E+00, 0.4739300E+00, 0.4719800E+00, 0.4737600E+00, &
     & 0.4504175E+00, 0.4223063E+00, 0.3715992E+00, 0.3715992E+00 /
      data (ref_adm( 2,iz,22, 9),iz = 1,20) / &
     & 0.3993500E+00, 0.3993500E+00, 0.4471100E+00, 0.4793900E+00, &
     & 0.4519900E+00, 0.4196800E+00, 0.4421000E+00, 0.4742200E+00, &
     & 0.4973500E+00, 0.4808300E+00, 0.4923400E+00, 0.5266200E+00, &
     & 0.4874500E+00, 0.4550800E+00, 0.4610000E+00, 0.4934900E+00, &
     & 0.3687500E+00, 0.3772910E+00, 0.3324036E+00, 0.3324036E+00 /
      data (ref_adm( 2,iz,23, 9),iz = 1,20) / &
     & 0.4048600E+00, 0.4048600E+00, 0.4326300E+00, 0.4534800E+00, &
     & 0.4675900E+00, 0.4674100E+00, 0.4225900E+00, 0.4721900E+00, &
     & 0.4700200E+00, 0.4893600E+00, 0.5271300E+00, 0.4935900E+00, &
     & 0.4985400E+00, 0.4821500E+00, 0.5037200E+00, 0.4748000E+00, &
     & 0.5152100E+00, 0.3767994E+00, 0.3340298E+00, 0.3340298E+00 /
      data (ref_adm( 2,iz,24, 9),iz = 1,20) / &
     & 0.4095300E+00, 0.4095300E+00, 0.4252900E+00, 0.4574700E+00, &
     & 0.4623500E+00, 0.4759900E+00, 0.4979400E+00, 0.4295200E+00, &
     & 0.4499200E+00, 0.4524300E+00, 0.4774800E+00, 0.4785800E+00, &
     & 0.5072700E+00, 0.4682100E+00, 0.4949200E+00, 0.4902300E+00, &
     & 0.4827900E+00, 0.3777669E+00, 0.3366077E+00, 0.3366077E+00 /
      data (ref_adm( 2,iz,25, 9),iz = 1,20) / &
     & 0.4108400E+00, 0.4108400E+00, 0.4660500E+00, 0.5022200E+00, &
     & 0.4572200E+00, 0.4821200E+00, 0.4287500E+00, 0.4625700E+00, &
     & 0.4631600E+00, 0.4810700E+00, 0.4638900E+00, 0.4382300E+00, &
     & 0.5104800E+00, 0.4794800E+00, 0.4913500E+00, 0.4926600E+00, &
     & 0.4613100E+00, 0.4384600E+00, 0.3400820E+00, 0.3400820E+00 /
      data (ref_adm( 2,iz,26, 9),iz = 1,20) / &
     & 0.4303500E+00, 0.4303500E+00, 0.4321900E+00, 0.4411600E+00, &
     & 0.4473000E+00, 0.4426700E+00, 0.4356000E+00, 0.4202200E+00, &
     & 0.4528900E+00, 0.4292300E+00, 0.4553900E+00, 0.5079100E+00, &
     & 0.4820400E+00, 0.5144100E+00, 0.5089300E+00, 0.5080200E+00, &
     & 0.4968600E+00, 0.4624400E+00, 0.3444381E+00, 0.3444381E+00 /
      data (ref_adm( 2,iz,27, 9),iz = 1,20) / &
     & 0.4149300E+00, 0.4149300E+00, 0.4405100E+00, 0.4395400E+00, &
     & 0.4254500E+00, 0.4370700E+00, 0.4530900E+00, 0.4496900E+00, &
     & 0.4727600E+00, 0.4452500E+00, 0.4663500E+00, 0.4636900E+00, &
     & 0.4572900E+00, 0.5201100E+00, 0.5442000E+00, 0.5124700E+00, &
     & 0.4994700E+00, 0.4619800E+00, 0.3300500E+00, 0.3300500E+00 /
      data (ref_adm( 2,iz,28, 9),iz = 1,20) / &
     & 0.4407200E+00, 0.4407200E+00, 0.4351500E+00, 0.4537600E+00, &
     & 0.4617400E+00, 0.4767500E+00, 0.4771200E+00, 0.4763300E+00, &
     & 0.4785100E+00, 0.4749900E+00, 0.4646400E+00, 0.4654200E+00, &
     & 0.4623800E+00, 0.4884800E+00, 0.5205200E+00, 0.5239600E+00, &
     & 0.4937600E+00, 0.4428100E+00, 0.4023600E+00, 0.4023600E+00 /
      data (ref_adm( 2,iz,29, 9),iz = 1,20) / &
     & 0.4204100E+00, 0.4204100E+00, 0.4277600E+00, 0.4547300E+00, &
     & 0.4387100E+00, 0.4111800E+00, 0.4065200E+00, 0.4267500E+00, &
     & 0.4670900E+00, 0.4422700E+00, 0.4503900E+00, 0.4406800E+00, &
     & 0.4452900E+00, 0.4720000E+00, 0.4830600E+00, 0.5046800E+00, &
     & 0.4629600E+00, 0.4395600E+00, 0.3999100E+00, 0.3999100E+00 /
      data (ref_adm( 2,iz,30, 9),iz = 1,20) / &
     & 0.4371900E+00, 0.4371900E+00, 0.4469400E+00, 0.4196600E+00, &
     & 0.4049800E+00, 0.4218200E+00, 0.4505800E+00, 0.4689400E+00, &
     & 0.4830500E+00, 0.4677600E+00, 0.5057400E+00, 0.4832900E+00, &
     & 0.4705400E+00, 0.4914800E+00, 0.5029400E+00, 0.4871600E+00, &
     & 0.4468100E+00, 0.4078800E+00, 0.3679355E+00, 0.3679355E+00 /
      data (ref_adm( 2,iz,31, 9),iz = 1,20) / &
     & 0.4200500E+00, 0.4200500E+00, 0.4538200E+00, 0.4545400E+00, &
     & 0.4171100E+00, 0.4869700E+00, 0.4614900E+00, 0.4544000E+00, &
     & 0.4984100E+00, 0.4727900E+00, 0.4890800E+00, 0.4557500E+00, &
     & 0.5205600E+00, 0.4943400E+00, 0.5354700E+00, 0.5190500E+00, &
     & 0.4990200E+00, 0.4062400E+00, 0.3737761E+00, 0.3737761E+00 /
      data (ref_adm( 2,iz,32, 9),iz = 1,20) / &
     & 0.4794000E+00, 0.4794000E+00, 0.4884800E+00, 0.4626800E+00, &
     & 0.4660800E+00, 0.4650700E+00, 0.4452600E+00, 0.4495000E+00, &
     & 0.5052000E+00, 0.5322700E+00, 0.4590200E+00, 0.4482800E+00, &
     & 0.4350800E+00, 0.4917900E+00, 0.5352800E+00, 0.5422600E+00, &
     & 0.5132800E+00, 0.4217221E+00, 0.3793624E+00, 0.3793624E+00 /
      data (ref_adm( 2,iz,33, 9),iz = 1,20) / &
     & 0.4596400E+00, 0.4596400E+00, 0.4217700E+00, 0.4471500E+00, &
     & 0.4644000E+00, 0.3648500E+00, 0.3850900E+00, 0.4900000E+00, &
     & 0.4934500E+00, 0.5245400E+00, 0.4780100E+00, 0.4559700E+00, &
     & 0.4801800E+00, 0.5253400E+00, 0.4996500E+00, 0.5434500E+00, &
     & 0.4230800E+00, 0.4102800E+00, 0.3051600E+00, 0.3051600E+00 /
      data (ref_adm( 2,iz,34, 9),iz = 1,20) / &
     & 0.4568700E+00, 0.4568700E+00, 0.4435900E+00, 0.4729700E+00, &
     & 0.4558200E+00, 0.4454300E+00, 0.3983200E+00, 0.4843800E+00, &
     & 0.5201200E+00, 0.4700400E+00, 0.4375000E+00, 0.4896600E+00, &
     & 0.4857100E+00, 0.4900200E+00, 0.4397900E+00, 0.4714000E+00, &
     & 0.4846700E+00, 0.4102700E+00, 0.3902193E+00, 0.3902193E+00 /
      data (ref_adm( 2,iz,35, 9),iz = 1,20) / &
     & 0.4417200E+00, 0.4417200E+00, 0.4465400E+00, 0.4398900E+00, &
     & 0.4571300E+00, 0.4412200E+00, 0.4109700E+00, 0.4500000E+00, &
     & 0.5081900E+00, 0.5273500E+00, 0.5274700E+00, 0.4786200E+00, &
     & 0.5091800E+00, 0.4845900E+00, 0.4825200E+00, 0.4963400E+00, &
     & 0.4725500E+00, 0.4552509E+00, 0.3950876E+00, 0.3950876E+00 /
      data (ref_adm( 2,iz,36, 9),iz = 1,20) / &
     & 0.4436900E+00, 0.4436900E+00, 0.4432500E+00, 0.4500400E+00, &
     & 0.4667400E+00, 0.4310500E+00, 0.4772300E+00, 0.4724500E+00, &
     & 0.5193800E+00, 0.4864100E+00, 0.5502200E+00, 0.5287000E+00, &
     & 0.5065300E+00, 0.5148600E+00, 0.4880900E+00, 0.4279900E+00, &
     & 0.4543700E+00, 0.3596600E+00, 0.3987465E+00, 0.3987465E+00 /
      data (ref_adm( 2,iz,37, 9),iz = 1,20) / &
     & 0.4289400E+00, 0.4289400E+00, 0.4557400E+00, 0.4268000E+00, &
     & 0.4580300E+00, 0.4755700E+00, 0.4461600E+00, 0.4034400E+00, &
     & 0.4445700E+00, 0.4971200E+00, 0.5282000E+00, 0.5470900E+00, &
     & 0.5328200E+00, 0.4778900E+00, 0.5020600E+00, 0.4573600E+00, &
     & 0.4893034E+00, 0.4615012E+00, 0.4009080E+00, 0.4009080E+00 /
      data (ref_adm( 2,iz,38, 9),iz = 1,20) / &
     & 0.4289400E+00, 0.4289400E+00, 0.4557400E+00, 0.4268000E+00, &
     & 0.4580300E+00, 0.4755700E+00, 0.4461600E+00, 0.4034400E+00, &
     & 0.4445700E+00, 0.4971200E+00, 0.5282000E+00, 0.5470900E+00, &
     & 0.5328200E+00, 0.4778900E+00, 0.5020600E+00, 0.4573600E+00, &
     & 0.4893034E+00, 0.4615012E+00, 0.4009080E+00, 0.4009080E+00 /
! Solar Zenith Angle 45.0 Albedo  0.4786951E+00
      data (ref_adm( 2,iz, 1,10),iz = 1,20) / &
     & 0.4153200E+00, 0.4153200E+00, 0.4196000E+00, 0.4398100E+00, &
     & 0.4688200E+00, 0.4796200E+00, 0.4718600E+00, 0.5186000E+00, &
     & 0.5268700E+00, 0.5343500E+00, 0.5423400E+00, 0.5255800E+00, &
     & 0.5624400E+00, 0.6314300E+00, 0.6491700E+00, 0.6920300E+00, &
     & 0.7050700E+00, 0.6843200E+00, 0.5715200E+00, 0.5715200E+00 /
      data (ref_adm( 2,iz, 2,10),iz = 1,20) / &
     & 0.4153200E+00, 0.4153200E+00, 0.4196000E+00, 0.4398100E+00, &
     & 0.4688200E+00, 0.4796200E+00, 0.4718600E+00, 0.5186000E+00, &
     & 0.5268700E+00, 0.5343500E+00, 0.5423400E+00, 0.5255800E+00, &
     & 0.5624400E+00, 0.6314300E+00, 0.6491700E+00, 0.6920300E+00, &
     & 0.7050700E+00, 0.6843200E+00, 0.5715200E+00, 0.5715200E+00 /
      data (ref_adm( 2,iz, 3,10),iz = 1,20) / &
     & 0.4261900E+00, 0.4261900E+00, 0.4311600E+00, 0.4327200E+00, &
     & 0.4483100E+00, 0.4372000E+00, 0.4750300E+00, 0.4949500E+00, &
     & 0.4904500E+00, 0.4964500E+00, 0.5053400E+00, 0.5037300E+00, &
     & 0.5446300E+00, 0.5951800E+00, 0.6245400E+00, 0.6802600E+00, &
     & 0.6884200E+00, 0.6555800E+00, 0.6268500E+00, 0.6268500E+00 /
      data (ref_adm( 2,iz, 4,10),iz = 1,20) / &
     & 0.4247300E+00, 0.4247300E+00, 0.4399300E+00, 0.4175800E+00, &
     & 0.4429100E+00, 0.4772700E+00, 0.4778800E+00, 0.5193600E+00, &
     & 0.4850700E+00, 0.4946600E+00, 0.5306700E+00, 0.5125700E+00, &
     & 0.5440300E+00, 0.5610600E+00, 0.6275600E+00, 0.6842400E+00, &
     & 0.6849900E+00, 0.6571800E+00, 0.4881100E+00, 0.4881100E+00 /
      data (ref_adm( 2,iz, 5,10),iz = 1,20) / &
     & 0.4436700E+00, 0.4436700E+00, 0.4135700E+00, 0.4179700E+00, &
     & 0.4303200E+00, 0.4764900E+00, 0.5216800E+00, 0.5118100E+00, &
     & 0.4620400E+00, 0.4571000E+00, 0.5084000E+00, 0.5603800E+00, &
     & 0.5606600E+00, 0.5743100E+00, 0.6012300E+00, 0.6642300E+00, &
     & 0.6775200E+00, 0.6759700E+00, 0.6599900E+00, 0.6599900E+00 /
      data (ref_adm( 2,iz, 6,10),iz = 1,20) / &
     & 0.4201100E+00, 0.4201100E+00, 0.4323500E+00, 0.4255600E+00, &
     & 0.4491200E+00, 0.4435700E+00, 0.5154400E+00, 0.4858700E+00, &
     & 0.4646500E+00, 0.4790000E+00, 0.4918000E+00, 0.5700800E+00, &
     & 0.5801600E+00, 0.5857700E+00, 0.6038300E+00, 0.6685000E+00, &
     & 0.7002000E+00, 0.6993900E+00, 0.5583695E+00, 0.5583695E+00 /
      data (ref_adm( 2,iz, 7,10),iz = 1,20) / &
     & 0.4404800E+00, 0.4404800E+00, 0.4203600E+00, 0.4406900E+00, &
     & 0.4574700E+00, 0.4506800E+00, 0.4940900E+00, 0.4659600E+00, &
     & 0.4814500E+00, 0.4909100E+00, 0.5439000E+00, 0.5628300E+00, &
     & 0.5834200E+00, 0.6045400E+00, 0.5869300E+00, 0.6237000E+00, &
     & 0.6822100E+00, 0.6333300E+00, 0.5454624E+00, 0.5454624E+00 /
      data (ref_adm( 2,iz, 8,10),iz = 1,20) / &
     & 0.3790700E+00, 0.3790700E+00, 0.4134000E+00, 0.4502300E+00, &
     & 0.4472300E+00, 0.4783000E+00, 0.4557300E+00, 0.4704100E+00, &
     & 0.4836300E+00, 0.4765800E+00, 0.5506500E+00, 0.5472900E+00, &
     & 0.5418800E+00, 0.5777100E+00, 0.5771100E+00, 0.6226000E+00, &
     & 0.6235400E+00, 0.6031600E+00, 0.5257743E+00, 0.5257743E+00 /
      data (ref_adm( 2,iz, 9,10),iz = 1,20) / &
     & 0.4244400E+00, 0.4244400E+00, 0.4416000E+00, 0.4469800E+00, &
     & 0.4293800E+00, 0.4059500E+00, 0.4435500E+00, 0.4446200E+00, &
     & 0.4472800E+00, 0.4511700E+00, 0.4992200E+00, 0.5304400E+00, &
     & 0.5419100E+00, 0.5656800E+00, 0.5765700E+00, 0.6434100E+00, &
     & 0.6470600E+00, 0.6039300E+00, 0.4427200E+00, 0.4427200E+00 /
      data (ref_adm( 2,iz,10,10),iz = 1,20) / &
     & 0.4429900E+00, 0.4429900E+00, 0.4718200E+00, 0.4505900E+00, &
     & 0.3756300E+00, 0.4003200E+00, 0.4075100E+00, 0.4292100E+00, &
     & 0.4101400E+00, 0.4662100E+00, 0.4746000E+00, 0.5270000E+00, &
     & 0.5118000E+00, 0.5334900E+00, 0.5586400E+00, 0.5436500E+00, &
     & 0.5872200E+00, 0.5508500E+00, 0.4294500E+00, 0.4294500E+00 /
      data (ref_adm( 2,iz,11,10),iz = 1,20) / &
     & 0.4082300E+00, 0.4082300E+00, 0.4189300E+00, 0.4368800E+00, &
     & 0.4463300E+00, 0.4067400E+00, 0.4294700E+00, 0.4173200E+00, &
     & 0.4181600E+00, 0.4283500E+00, 0.4543300E+00, 0.4959900E+00, &
     & 0.5195300E+00, 0.5447300E+00, 0.5228000E+00, 0.5460600E+00, &
     & 0.5736200E+00, 0.5058200E+00, 0.4740507E+00, 0.4740507E+00 /
      data (ref_adm( 2,iz,12,10),iz = 1,20) / &
     & 0.4365600E+00, 0.4365600E+00, 0.4372200E+00, 0.4356800E+00, &
     & 0.4533100E+00, 0.4550800E+00, 0.4853200E+00, 0.4498300E+00, &
     & 0.4319600E+00, 0.4347200E+00, 0.4782100E+00, 0.4777200E+00, &
     & 0.5150200E+00, 0.5278400E+00, 0.5180800E+00, 0.5508700E+00, &
     & 0.5458100E+00, 0.5213000E+00, 0.4626192E+00, 0.4626192E+00 /
      data (ref_adm( 2,iz,13,10),iz = 1,20) / &
     & 0.4444600E+00, 0.4444600E+00, 0.4441900E+00, 0.4518900E+00, &
     & 0.4632500E+00, 0.4797900E+00, 0.4751400E+00, 0.4724900E+00, &
     & 0.4787200E+00, 0.4838200E+00, 0.4941900E+00, 0.4948900E+00, &
     & 0.5056800E+00, 0.4863900E+00, 0.5112000E+00, 0.5497900E+00, &
     & 0.5653800E+00, 0.5374800E+00, 0.4055400E+00, 0.4055400E+00 /
      data (ref_adm( 2,iz,14,10),iz = 1,20) / &
     & 0.4329300E+00, 0.4329300E+00, 0.4188500E+00, 0.4069700E+00, &
     & 0.4107500E+00, 0.4289100E+00, 0.4480800E+00, 0.4494500E+00, &
     & 0.4419500E+00, 0.4667400E+00, 0.4656600E+00, 0.4755100E+00, &
     & 0.4840400E+00, 0.5002600E+00, 0.5338200E+00, 0.5678600E+00, &
     & 0.5161500E+00, 0.4994100E+00, 0.4123000E+00, 0.4123000E+00 /
      data (ref_adm( 2,iz,15,10),iz = 1,20) / &
     & 0.4217000E+00, 0.4217000E+00, 0.3880300E+00, 0.3837000E+00, &
     & 0.3924600E+00, 0.4114800E+00, 0.4109300E+00, 0.4117700E+00, &
     & 0.4287200E+00, 0.4511400E+00, 0.4779100E+00, 0.4871300E+00, &
     & 0.4735400E+00, 0.4777100E+00, 0.5170300E+00, 0.5277200E+00, &
     & 0.5257900E+00, 0.4468400E+00, 0.3526000E+00, 0.3526000E+00 /
      data (ref_adm( 2,iz,16,10),iz = 1,20) / &
     & 0.4211400E+00, 0.4211400E+00, 0.3816500E+00, 0.4327900E+00, &
     & 0.4271100E+00, 0.4220800E+00, 0.4242400E+00, 0.4642300E+00, &
     & 0.4089900E+00, 0.4131000E+00, 0.4409500E+00, 0.4510400E+00, &
     & 0.4604600E+00, 0.4627000E+00, 0.4921300E+00, 0.4845700E+00, &
     & 0.5277000E+00, 0.4042700E+00, 0.4246146E+00, 0.4246146E+00 /
      data (ref_adm( 2,iz,17,10),iz = 1,20) / &
     & 0.4055700E+00, 0.4055700E+00, 0.4044900E+00, 0.4485900E+00, &
     & 0.4449900E+00, 0.4482000E+00, 0.4262500E+00, 0.4436100E+00, &
     & 0.4395100E+00, 0.4160100E+00, 0.4233500E+00, 0.4366500E+00, &
     & 0.4741000E+00, 0.4772900E+00, 0.4665200E+00, 0.4735400E+00, &
     & 0.5259900E+00, 0.4507000E+00, 0.4159023E+00, 0.4159023E+00 /
      data (ref_adm( 2,iz,18,10),iz = 1,20) / &
     & 0.4213300E+00, 0.4213300E+00, 0.4185900E+00, 0.4133000E+00, &
     & 0.4611200E+00, 0.4658400E+00, 0.4260200E+00, 0.4504100E+00, &
     & 0.4603100E+00, 0.4493000E+00, 0.4423700E+00, 0.4744600E+00, &
     & 0.4617300E+00, 0.4923100E+00, 0.4809400E+00, 0.4813800E+00, &
     & 0.4841200E+00, 0.4364470E+00, 0.3761312E+00, 0.3761312E+00 /
      data (ref_adm( 2,iz,19,10),iz = 1,20) / &
     & 0.4236600E+00, 0.4236600E+00, 0.4101000E+00, 0.3895300E+00, &
     & 0.4765900E+00, 0.4492400E+00, 0.4661000E+00, 0.4571500E+00, &
     & 0.4804800E+00, 0.5043800E+00, 0.4963100E+00, 0.5011100E+00, &
     & 0.5024900E+00, 0.4592400E+00, 0.4954100E+00, 0.4838700E+00, &
     & 0.4457400E+00, 0.4282236E+00, 0.3714764E+00, 0.3714764E+00 /
      data (ref_adm( 2,iz,20,10),iz = 1,20) / &
     & 0.3937300E+00, 0.3937300E+00, 0.3983700E+00, 0.4061000E+00, &
     & 0.3993600E+00, 0.4104400E+00, 0.4247000E+00, 0.4227400E+00, &
     & 0.4420800E+00, 0.4761200E+00, 0.4592200E+00, 0.4844900E+00, &
     & 0.4779400E+00, 0.4495000E+00, 0.4481500E+00, 0.4509900E+00, &
     & 0.4036900E+00, 0.4222316E+00, 0.3690083E+00, 0.3690083E+00 /
      data (ref_adm( 2,iz,21,10),iz = 1,20) / &
     & 0.4367900E+00, 0.4367900E+00, 0.4094200E+00, 0.4810700E+00, &
     & 0.4864600E+00, 0.4677400E+00, 0.4682600E+00, 0.4615200E+00, &
     & 0.4703000E+00, 0.4545300E+00, 0.4643600E+00, 0.4426300E+00, &
     & 0.4378100E+00, 0.4292900E+00, 0.4565600E+00, 0.4955000E+00, &
     & 0.4453396E+00, 0.4177749E+00, 0.3681107E+00, 0.3681107E+00 /
      data (ref_adm( 2,iz,22,10),iz = 1,20) / &
     & 0.4432700E+00, 0.4432700E+00, 0.3848900E+00, 0.4471300E+00, &
     & 0.4784700E+00, 0.4496700E+00, 0.4163900E+00, 0.4608100E+00, &
     & 0.4961500E+00, 0.4769400E+00, 0.4554100E+00, 0.4518500E+00, &
     & 0.4517600E+00, 0.4269900E+00, 0.4482600E+00, 0.5318500E+00, &
     & 0.4703309E+00, 0.4433526E+00, 0.3786249E+00, 0.3786249E+00 /
      data (ref_adm( 2,iz,23,10),iz = 1,20) / &
     & 0.4186700E+00, 0.4186700E+00, 0.4170400E+00, 0.3664400E+00, &
     & 0.4236900E+00, 0.4573000E+00, 0.4197200E+00, 0.4602600E+00, &
     & 0.4787300E+00, 0.5069200E+00, 0.4936700E+00, 0.5026100E+00, &
     & 0.4680200E+00, 0.4695700E+00, 0.4347400E+00, 0.4498200E+00, &
     & 0.4609700E+00, 0.4362097E+00, 0.3762089E+00, 0.3762089E+00 /
      data (ref_adm( 2,iz,24,10),iz = 1,20) / &
     & 0.4525900E+00, 0.4525900E+00, 0.4388300E+00, 0.4455900E+00, &
     & 0.4207900E+00, 0.4263300E+00, 0.4383000E+00, 0.4374100E+00, &
     & 0.4775100E+00, 0.4951300E+00, 0.4944000E+00, 0.5084200E+00, &
     & 0.4945200E+00, 0.4405600E+00, 0.4516900E+00, 0.4506100E+00, &
     & 0.4480800E+00, 0.4307295E+00, 0.3742839E+00, 0.3742839E+00 /
      data (ref_adm( 2,iz,25,10),iz = 1,20) / &
     & 0.4137900E+00, 0.4137900E+00, 0.4252500E+00, 0.4397800E+00, &
     & 0.4431800E+00, 0.4363700E+00, 0.4392000E+00, 0.4453100E+00, &
     & 0.4544500E+00, 0.5057500E+00, 0.5465500E+00, 0.5378200E+00, &
     & 0.5079400E+00, 0.4458800E+00, 0.4955600E+00, 0.4846600E+00, &
     & 0.5005000E+00, 0.5025700E+00, 0.3731391E+00, 0.3731391E+00 /
      data (ref_adm( 2,iz,26,10),iz = 1,20) / &
     & 0.4100000E+00, 0.4100000E+00, 0.4164700E+00, 0.4370700E+00, &
     & 0.4327900E+00, 0.4218500E+00, 0.4474700E+00, 0.4757300E+00, &
     & 0.4575000E+00, 0.4694500E+00, 0.4851200E+00, 0.4933300E+00, &
     & 0.4958600E+00, 0.4907300E+00, 0.5336300E+00, 0.5122300E+00, &
     & 0.4869300E+00, 0.4766000E+00, 0.3996800E+00, 0.3996800E+00 /
      data (ref_adm( 2,iz,27,10),iz = 1,20) / &
     & 0.4262900E+00, 0.4262900E+00, 0.4220000E+00, 0.4242900E+00, &
     & 0.4258900E+00, 0.4369500E+00, 0.4460800E+00, 0.4607900E+00, &
     & 0.4558500E+00, 0.4445000E+00, 0.4530400E+00, 0.4874000E+00, &
     & 0.4861600E+00, 0.4724900E+00, 0.4904100E+00, 0.4826100E+00, &
     & 0.4850700E+00, 0.4524500E+00, 0.3597900E+00, 0.3597900E+00 /
      data (ref_adm( 2,iz,28,10),iz = 1,20) / &
     & 0.4241500E+00, 0.4241500E+00, 0.4268800E+00, 0.4332800E+00, &
     & 0.4421900E+00, 0.4401100E+00, 0.4711300E+00, 0.5055800E+00, &
     & 0.5126200E+00, 0.5086000E+00, 0.4921200E+00, 0.5055900E+00, &
     & 0.4918400E+00, 0.4718500E+00, 0.5091300E+00, 0.4770200E+00, &
     & 0.4940600E+00, 0.4530200E+00, 0.3930300E+00, 0.3930300E+00 /
      data (ref_adm( 2,iz,29,10),iz = 1,20) / &
     & 0.4332600E+00, 0.4332600E+00, 0.4066300E+00, 0.4320400E+00, &
     & 0.4373900E+00, 0.3943100E+00, 0.4220800E+00, 0.4440400E+00, &
     & 0.4559400E+00, 0.4680000E+00, 0.4826300E+00, 0.5024800E+00, &
     & 0.4752600E+00, 0.4803500E+00, 0.4817300E+00, 0.5045200E+00, &
     & 0.4944200E+00, 0.4502600E+00, 0.3354800E+00, 0.3354800E+00 /
      data (ref_adm( 2,iz,30,10),iz = 1,20) / &
     & 0.4268400E+00, 0.4268400E+00, 0.4226000E+00, 0.4131400E+00, &
     & 0.4234000E+00, 0.4266600E+00, 0.4216800E+00, 0.4379300E+00, &
     & 0.4721800E+00, 0.4833700E+00, 0.4920900E+00, 0.5494100E+00, &
     & 0.5106800E+00, 0.4899500E+00, 0.4923500E+00, 0.4738000E+00, &
     & 0.5081900E+00, 0.4234800E+00, 0.3304900E+00, 0.3304900E+00 /
      data (ref_adm( 2,iz,31,10),iz = 1,20) / &
     & 0.4304600E+00, 0.4304600E+00, 0.4287300E+00, 0.4459600E+00, &
     & 0.4223700E+00, 0.4395500E+00, 0.4503100E+00, 0.4520400E+00, &
     & 0.4544600E+00, 0.4674700E+00, 0.4724800E+00, 0.5127400E+00, &
     & 0.4803000E+00, 0.4706800E+00, 0.4857000E+00, 0.4714500E+00, &
     & 0.4510800E+00, 0.3979200E+00, 0.3829337E+00, 0.3829337E+00 /
      data (ref_adm( 2,iz,32,10),iz = 1,20) / &
     & 0.4593400E+00, 0.4593400E+00, 0.4588200E+00, 0.4633300E+00, &
     & 0.4634200E+00, 0.4560500E+00, 0.4651500E+00, 0.5140200E+00, &
     & 0.4943700E+00, 0.4917600E+00, 0.5265500E+00, 0.5258800E+00, &
     & 0.5276400E+00, 0.5296300E+00, 0.5309400E+00, 0.5418700E+00, &
     & 0.4944500E+00, 0.4367900E+00, 0.3859638E+00, 0.3859638E+00 /
      data (ref_adm( 2,iz,33,10),iz = 1,20) / &
     & 0.4066300E+00, 0.4066300E+00, 0.4247900E+00, 0.4180500E+00, &
     & 0.4246800E+00, 0.4259000E+00, 0.4485100E+00, 0.4609000E+00, &
     & 0.4309100E+00, 0.3991800E+00, 0.4712400E+00, 0.4671200E+00, &
     & 0.4929100E+00, 0.5107600E+00, 0.5040400E+00, 0.4935700E+00, &
     & 0.4827000E+00, 0.4565800E+00, 0.4516100E+00, 0.4516100E+00 /
      data (ref_adm( 2,iz,34,10),iz = 1,20) / &
     & 0.4064900E+00, 0.4064900E+00, 0.4076100E+00, 0.4030800E+00, &
     & 0.4252500E+00, 0.4298300E+00, 0.4397800E+00, 0.4267800E+00, &
     & 0.4247100E+00, 0.4329100E+00, 0.4479400E+00, 0.4542300E+00, &
     & 0.5293400E+00, 0.5367300E+00, 0.5089500E+00, 0.4975200E+00, &
     & 0.4548100E+00, 0.4665600E+00, 0.3836300E+00, 0.3836300E+00 /
      data (ref_adm( 2,iz,35,10),iz = 1,20) / &
     & 0.4477100E+00, 0.4477100E+00, 0.4320800E+00, 0.4354900E+00, &
     & 0.4408300E+00, 0.4377900E+00, 0.4340500E+00, 0.4370900E+00, &
     & 0.4315900E+00, 0.4389500E+00, 0.4721200E+00, 0.4936600E+00, &
     & 0.5121000E+00, 0.5091700E+00, 0.4998900E+00, 0.4534900E+00, &
     & 0.4380300E+00, 0.3982500E+00, 0.3381600E+00, 0.3381600E+00 /
      data (ref_adm( 2,iz,36,10),iz = 1,20) / &
     & 0.4193200E+00, 0.4193200E+00, 0.4470600E+00, 0.4213300E+00, &
     & 0.4406800E+00, 0.4680000E+00, 0.4106200E+00, 0.4431800E+00, &
     & 0.4528800E+00, 0.4692200E+00, 0.4758500E+00, 0.4688800E+00, &
     & 0.5189100E+00, 0.5050000E+00, 0.5109100E+00, 0.4696100E+00, &
     & 0.4636800E+00, 0.4291328E+00, 0.3944259E+00, 0.3944259E+00 /
      data (ref_adm( 2,iz,37,10),iz = 1,20) / &
     & 0.4098600E+00, 0.4098600E+00, 0.4458800E+00, 0.4708100E+00, &
     & 0.4240000E+00, 0.4100200E+00, 0.4201200E+00, 0.4390900E+00, &
     & 0.4485500E+00, 0.4926700E+00, 0.4635300E+00, 0.4565000E+00, &
     & 0.5076000E+00, 0.5389100E+00, 0.5238000E+00, 0.4794500E+00, &
     & 0.4674900E+00, 0.4296636E+00, 0.3952397E+00, 0.3952397E+00 /
      data (ref_adm( 2,iz,38,10),iz = 1,20) / &
     & 0.4098600E+00, 0.4098600E+00, 0.4458800E+00, 0.4708100E+00, &
     & 0.4240000E+00, 0.4100200E+00, 0.4201200E+00, 0.4390900E+00, &
     & 0.4485500E+00, 0.4926700E+00, 0.4635300E+00, 0.4565000E+00, &
     & 0.5076000E+00, 0.5389100E+00, 0.5238000E+00, 0.4794500E+00, &
     & 0.4674900E+00, 0.4296636E+00, 0.3952397E+00, 0.3952397E+00 /
! Solar Zenith Angle 50.0 Albedo  0.4817539E+00
      data (ref_adm( 2,iz, 1,11),iz = 1,20) / &
     & 0.4137600E+00, 0.4137600E+00, 0.4163000E+00, 0.4375000E+00, &
     & 0.4146700E+00, 0.4226800E+00, 0.4307900E+00, 0.4685100E+00, &
     & 0.4514600E+00, 0.4967100E+00, 0.5459800E+00, 0.5961900E+00, &
     & 0.6191000E+00, 0.6436500E+00, 0.6642900E+00, 0.7129100E+00, &
     & 0.7747000E+00, 0.7501400E+00, 0.7201800E+00, 0.7201800E+00 /
      data (ref_adm( 2,iz, 2,11),iz = 1,20) / &
     & 0.4137600E+00, 0.4137600E+00, 0.4163000E+00, 0.4375000E+00, &
     & 0.4146700E+00, 0.4226800E+00, 0.4307900E+00, 0.4685100E+00, &
     & 0.4514600E+00, 0.4967100E+00, 0.5459800E+00, 0.5961900E+00, &
     & 0.6191000E+00, 0.6436500E+00, 0.6642900E+00, 0.7129100E+00, &
     & 0.7747000E+00, 0.7501400E+00, 0.7201800E+00, 0.7201800E+00 /
      data (ref_adm( 2,iz, 3,11),iz = 1,20) / &
     & 0.4250500E+00, 0.4250500E+00, 0.4354100E+00, 0.4207200E+00, &
     & 0.4439600E+00, 0.4384100E+00, 0.4393700E+00, 0.4402800E+00, &
     & 0.4878900E+00, 0.4792700E+00, 0.5163600E+00, 0.5709600E+00, &
     & 0.6091800E+00, 0.6400100E+00, 0.6665100E+00, 0.7159500E+00, &
     & 0.7696100E+00, 0.7637500E+00, 0.7093200E+00, 0.7093200E+00 /
      data (ref_adm( 2,iz, 4,11),iz = 1,20) / &
     & 0.4194900E+00, 0.4194900E+00, 0.4088200E+00, 0.4057500E+00, &
     & 0.4261800E+00, 0.4325100E+00, 0.4325900E+00, 0.4582100E+00, &
     & 0.4758300E+00, 0.5009900E+00, 0.5261100E+00, 0.5436500E+00, &
     & 0.5931400E+00, 0.6303800E+00, 0.6450700E+00, 0.6986300E+00, &
     & 0.7440100E+00, 0.7381500E+00, 0.6854700E+00, 0.6854700E+00 /
      data (ref_adm( 2,iz, 5,11),iz = 1,20) / &
     & 0.4168600E+00, 0.4168600E+00, 0.4226500E+00, 0.4274600E+00, &
     & 0.4279800E+00, 0.4237100E+00, 0.4203400E+00, 0.4734600E+00, &
     & 0.4707400E+00, 0.5108800E+00, 0.5363700E+00, 0.5593100E+00, &
     & 0.5742600E+00, 0.5737000E+00, 0.6196200E+00, 0.6774700E+00, &
     & 0.7177100E+00, 0.7377100E+00, 0.6798002E+00, 0.6798002E+00 /
      data (ref_adm( 2,iz, 6,11),iz = 1,20) / &
     & 0.4272800E+00, 0.4272800E+00, 0.4252300E+00, 0.4258100E+00, &
     & 0.4122800E+00, 0.4008000E+00, 0.4228000E+00, 0.4610400E+00, &
     & 0.4804600E+00, 0.5117600E+00, 0.5292900E+00, 0.5511300E+00, &
     & 0.5687700E+00, 0.5939100E+00, 0.6325300E+00, 0.6650700E+00, &
     & 0.7240300E+00, 0.6988700E+00, 0.6629050E+00, 0.6629050E+00 /
      data (ref_adm( 2,iz, 7,11),iz = 1,20) / &
     & 0.4095600E+00, 0.4095600E+00, 0.4223400E+00, 0.3938100E+00, &
     & 0.4059800E+00, 0.4173500E+00, 0.4375800E+00, 0.4562200E+00, &
     & 0.4725300E+00, 0.5021300E+00, 0.5269300E+00, 0.5516500E+00, &
     & 0.5563200E+00, 0.6237800E+00, 0.6324100E+00, 0.6576400E+00, &
     & 0.6907700E+00, 0.6593100E+00, 0.5759200E+00, 0.5759200E+00 /
      data (ref_adm( 2,iz, 8,11),iz = 1,20) / &
     & 0.4098400E+00, 0.4098400E+00, 0.4188600E+00, 0.4160200E+00, &
     & 0.4198400E+00, 0.4243500E+00, 0.4435000E+00, 0.4612300E+00, &
     & 0.4748800E+00, 0.5077700E+00, 0.5295700E+00, 0.5396300E+00, &
     & 0.5523300E+00, 0.5929600E+00, 0.6347300E+00, 0.6591400E+00, &
     & 0.6643100E+00, 0.6878100E+00, 0.6172184E+00, 0.6172184E+00 /
      data (ref_adm( 2,iz, 9,11),iz = 1,20) / &
     & 0.4502900E+00, 0.4502900E+00, 0.4189500E+00, 0.4238200E+00, &
     & 0.4244600E+00, 0.4492500E+00, 0.4606900E+00, 0.4632600E+00, &
     & 0.4952500E+00, 0.4897600E+00, 0.5326900E+00, 0.5367300E+00, &
     & 0.5639200E+00, 0.5876700E+00, 0.6259300E+00, 0.6627400E+00, &
     & 0.6567100E+00, 0.6496300E+00, 0.5617300E+00, 0.5617300E+00 /
      data (ref_adm( 2,iz,10,11),iz = 1,20) / &
     & 0.3977100E+00, 0.3977100E+00, 0.3984600E+00, 0.4132400E+00, &
     & 0.4198100E+00, 0.4572300E+00, 0.4750700E+00, 0.4555200E+00, &
     & 0.4777700E+00, 0.4875700E+00, 0.4924200E+00, 0.4926600E+00, &
     & 0.5239500E+00, 0.5672800E+00, 0.5891200E+00, 0.6375200E+00, &
     & 0.6269200E+00, 0.6004400E+00, 0.5620665E+00, 0.5620665E+00 /
      data (ref_adm( 2,iz,11,11),iz = 1,20) / &
     & 0.4145600E+00, 0.4145600E+00, 0.4146100E+00, 0.4275300E+00, &
     & 0.4414000E+00, 0.4436900E+00, 0.4597600E+00, 0.4559200E+00, &
     & 0.4807500E+00, 0.4990800E+00, 0.4907300E+00, 0.5049700E+00, &
     & 0.5176800E+00, 0.5322600E+00, 0.5647200E+00, 0.6271600E+00, &
     & 0.6067600E+00, 0.5562800E+00, 0.5437567E+00, 0.5437567E+00 /
      data (ref_adm( 2,iz,12,11),iz = 1,20) / &
     & 0.4337200E+00, 0.4337200E+00, 0.4232900E+00, 0.4352000E+00, &
     & 0.4085500E+00, 0.4201500E+00, 0.4530600E+00, 0.4895700E+00, &
     & 0.4915600E+00, 0.4923000E+00, 0.4797500E+00, 0.4990500E+00, &
     & 0.5116000E+00, 0.5097200E+00, 0.5364900E+00, 0.5660000E+00, &
     & 0.5841800E+00, 0.5198400E+00, 0.5535600E+00, 0.5535600E+00 /
      data (ref_adm( 2,iz,13,11),iz = 1,20) / &
     & 0.4434400E+00, 0.4434400E+00, 0.4283000E+00, 0.4284700E+00, &
     & 0.4320000E+00, 0.4379100E+00, 0.4537700E+00, 0.4814200E+00, &
     & 0.4817700E+00, 0.4612700E+00, 0.4618700E+00, 0.4843400E+00, &
     & 0.4943300E+00, 0.4840500E+00, 0.5263100E+00, 0.5686900E+00, &
     & 0.5749500E+00, 0.5353000E+00, 0.3907900E+00, 0.3907900E+00 /
      data (ref_adm( 2,iz,14,11),iz = 1,20) / &
     & 0.4287100E+00, 0.4287100E+00, 0.4147800E+00, 0.4130200E+00, &
     & 0.4135500E+00, 0.4211300E+00, 0.4408900E+00, 0.4429000E+00, &
     & 0.4523200E+00, 0.4596500E+00, 0.4597900E+00, 0.4792000E+00, &
     & 0.4867800E+00, 0.5047400E+00, 0.5160100E+00, 0.5490500E+00, &
     & 0.5361100E+00, 0.5306400E+00, 0.3969100E+00, 0.3969100E+00 /
      data (ref_adm( 2,iz,15,11),iz = 1,20) / &
     & 0.4046700E+00, 0.4046700E+00, 0.3960700E+00, 0.4078600E+00, &
     & 0.4101900E+00, 0.4257200E+00, 0.4304400E+00, 0.4300400E+00, &
     & 0.4524800E+00, 0.4648000E+00, 0.4694100E+00, 0.4630600E+00, &
     & 0.4702200E+00, 0.4740200E+00, 0.5249000E+00, 0.5659500E+00, &
     & 0.5858800E+00, 0.5103900E+00, 0.4627100E+00, 0.4627100E+00 /
      data (ref_adm( 2,iz,16,11),iz = 1,20) / &
     & 0.4275000E+00, 0.4275000E+00, 0.4459200E+00, 0.4517000E+00, &
     & 0.4436200E+00, 0.4266400E+00, 0.4397700E+00, 0.4574700E+00, &
     & 0.4713000E+00, 0.4608200E+00, 0.4403700E+00, 0.4454100E+00, &
     & 0.4694400E+00, 0.4574400E+00, 0.5234900E+00, 0.5453100E+00, &
     & 0.5568900E+00, 0.5569800E+00, 0.4844943E+00, 0.4844943E+00 /
      data (ref_adm( 2,iz,17,11),iz = 1,20) / &
     & 0.4218500E+00, 0.4218500E+00, 0.4246400E+00, 0.4291400E+00, &
     & 0.4414900E+00, 0.4370200E+00, 0.4377400E+00, 0.4262400E+00, &
     & 0.4712900E+00, 0.4728500E+00, 0.4629300E+00, 0.4379200E+00, &
     & 0.4680400E+00, 0.4531900E+00, 0.4967400E+00, 0.5251200E+00, &
     & 0.5148800E+00, 0.4869000E+00, 0.4719638E+00, 0.4719638E+00 /
      data (ref_adm( 2,iz,18,11),iz = 1,20) / &
     & 0.4129400E+00, 0.4129400E+00, 0.4200300E+00, 0.4316100E+00, &
     & 0.3941000E+00, 0.4073700E+00, 0.4245700E+00, 0.4162100E+00, &
     & 0.4529200E+00, 0.4766100E+00, 0.4652100E+00, 0.4604100E+00, &
     & 0.4745200E+00, 0.4536400E+00, 0.4639400E+00, 0.5108000E+00, &
     & 0.5180000E+00, 0.4740400E+00, 0.4159194E+00, 0.4159194E+00 /
      data (ref_adm( 2,iz,19,11),iz = 1,20) / &
     & 0.4126000E+00, 0.4126000E+00, 0.4135500E+00, 0.4390800E+00, &
     & 0.4272600E+00, 0.4248100E+00, 0.4415200E+00, 0.4303700E+00, &
     & 0.4226500E+00, 0.4499000E+00, 0.4449600E+00, 0.4635200E+00, &
     & 0.4856800E+00, 0.4636000E+00, 0.4793500E+00, 0.5274900E+00, &
     & 0.5718900E+00, 0.4786397E+00, 0.4089742E+00, 0.4089742E+00 /
      data (ref_adm( 2,iz,20,11),iz = 1,20) / &
     & 0.4020300E+00, 0.4020300E+00, 0.4028300E+00, 0.4032200E+00, &
     & 0.4016800E+00, 0.4378000E+00, 0.4296000E+00, 0.4113700E+00, &
     & 0.4355200E+00, 0.4400200E+00, 0.4465700E+00, 0.4596400E+00, &
     & 0.4432400E+00, 0.4538800E+00, 0.4755600E+00, 0.4785600E+00, &
     & 0.5232500E+00, 0.4710116E+00, 0.4043183E+00, 0.4043183E+00 /
      data (ref_adm( 2,iz,21,11),iz = 1,20) / &
     & 0.3950800E+00, 0.3950800E+00, 0.4151500E+00, 0.4116900E+00, &
     & 0.4312500E+00, 0.4456600E+00, 0.4165300E+00, 0.4174400E+00, &
     & 0.4393400E+00, 0.4474200E+00, 0.4815000E+00, 0.4694200E+00, &
     & 0.4640300E+00, 0.4559400E+00, 0.4846500E+00, 0.5190600E+00, &
     & 0.4837273E+00, 0.4634033E+00, 0.4006038E+00, 0.4006038E+00 /
      data (ref_adm( 2,iz,22,11),iz = 1,20) / &
     & 0.4242700E+00, 0.4242700E+00, 0.4156900E+00, 0.4223400E+00, &
     & 0.4127300E+00, 0.4283800E+00, 0.4316200E+00, 0.4264600E+00, &
     & 0.4371800E+00, 0.4402100E+00, 0.4623300E+00, 0.4700900E+00, &
     & 0.4409800E+00, 0.4738200E+00, 0.4830800E+00, 0.4636600E+00, &
     & 0.4898534E+00, 0.4662908E+00, 0.4043141E+00, 0.4043141E+00 /
      data (ref_adm( 2,iz,23,11),iz = 1,20) / &
     & 0.4246900E+00, 0.4246900E+00, 0.4623000E+00, 0.4389400E+00, &
     & 0.4272800E+00, 0.4388900E+00, 0.4358900E+00, 0.4254900E+00, &
     & 0.4290500E+00, 0.4316000E+00, 0.4338800E+00, 0.4873000E+00, &
     & 0.4748100E+00, 0.4816700E+00, 0.4754900E+00, 0.4772300E+00, &
     & 0.4615100E+00, 0.4576554E+00, 0.4014416E+00, 0.4014416E+00 /
      data (ref_adm( 2,iz,24,11),iz = 1,20) / &
     & 0.4135700E+00, 0.4135700E+00, 0.4269300E+00, 0.4291700E+00, &
     & 0.4270700E+00, 0.4537800E+00, 0.4655200E+00, 0.4519700E+00, &
     & 0.4389900E+00, 0.4580600E+00, 0.4595500E+00, 0.4835300E+00, &
     & 0.4922300E+00, 0.4818900E+00, 0.4763400E+00, 0.4672800E+00, &
     & 0.4795200E+00, 0.4509208E+00, 0.3993455E+00, 0.3993455E+00 /
      data (ref_adm( 2,iz,25,11),iz = 1,20) / &
     & 0.4065500E+00, 0.4065500E+00, 0.4142200E+00, 0.4219700E+00, &
     & 0.4189100E+00, 0.4108300E+00, 0.4264900E+00, 0.4360800E+00, &
     & 0.4241600E+00, 0.4311400E+00, 0.4468900E+00, 0.4806700E+00, &
     & 0.4825700E+00, 0.4859100E+00, 0.4830700E+00, 0.4685200E+00, &
     & 0.4712300E+00, 0.4608100E+00, 0.3986825E+00, 0.3986825E+00 /
      data (ref_adm( 2,iz,26,11),iz = 1,20) / &
     & 0.4170200E+00, 0.4170200E+00, 0.4241600E+00, 0.4251100E+00, &
     & 0.4319900E+00, 0.4172800E+00, 0.4086900E+00, 0.4259700E+00, &
     & 0.4256400E+00, 0.4337100E+00, 0.4392200E+00, 0.4548900E+00, &
     & 0.4612700E+00, 0.4633800E+00, 0.4697100E+00, 0.4723000E+00, &
     & 0.4685400E+00, 0.4520600E+00, 0.3989447E+00, 0.3989447E+00 /
      data (ref_adm( 2,iz,27,11),iz = 1,20) / &
     & 0.4298000E+00, 0.4298000E+00, 0.4449300E+00, 0.4395300E+00, &
     & 0.4500200E+00, 0.4491400E+00, 0.4569700E+00, 0.4656200E+00, &
     & 0.4646900E+00, 0.4699800E+00, 0.4773100E+00, 0.4769000E+00, &
     & 0.4779300E+00, 0.4853800E+00, 0.4965900E+00, 0.4817800E+00, &
     & 0.4603500E+00, 0.4500300E+00, 0.3851200E+00, 0.3851200E+00 /
      data (ref_adm( 2,iz,28,11),iz = 1,20) / &
     & 0.4307800E+00, 0.4307800E+00, 0.4057600E+00, 0.4109900E+00, &
     & 0.4396200E+00, 0.4611400E+00, 0.4712700E+00, 0.4967400E+00, &
     & 0.4802800E+00, 0.4786200E+00, 0.4914400E+00, 0.5180500E+00, &
     & 0.5152600E+00, 0.4893100E+00, 0.4955900E+00, 0.4765500E+00, &
     & 0.4873900E+00, 0.4414100E+00, 0.3918300E+00, 0.3918300E+00 /
      data (ref_adm( 2,iz,29,11),iz = 1,20) / &
     & 0.4271500E+00, 0.4271500E+00, 0.4169000E+00, 0.4305600E+00, &
     & 0.4444600E+00, 0.4572500E+00, 0.4565000E+00, 0.4786100E+00, &
     & 0.4697700E+00, 0.4368800E+00, 0.4527200E+00, 0.4906000E+00, &
     & 0.5180000E+00, 0.5136400E+00, 0.4971300E+00, 0.4937600E+00, &
     & 0.4637100E+00, 0.4430900E+00, 0.3726500E+00, 0.3726500E+00 /
      data (ref_adm( 2,iz,30,11),iz = 1,20) / &
     & 0.4389700E+00, 0.4389700E+00, 0.4361000E+00, 0.4345800E+00, &
     & 0.4532800E+00, 0.4570500E+00, 0.4626300E+00, 0.4786500E+00, &
     & 0.4812000E+00, 0.4770400E+00, 0.4832600E+00, 0.4989500E+00, &
     & 0.5188800E+00, 0.5099200E+00, 0.5071600E+00, 0.5100000E+00, &
     & 0.4710400E+00, 0.4702600E+00, 0.3706000E+00, 0.3706000E+00 /
      data (ref_adm( 2,iz,31,11),iz = 1,20) / &
     & 0.4315500E+00, 0.4315500E+00, 0.4256800E+00, 0.4364200E+00, &
     & 0.4319900E+00, 0.4612900E+00, 0.4504200E+00, 0.4627000E+00, &
     & 0.4678800E+00, 0.4774800E+00, 0.4706700E+00, 0.4914100E+00, &
     & 0.5084200E+00, 0.5140500E+00, 0.5171400E+00, 0.5116500E+00, &
     & 0.4814000E+00, 0.4388600E+00, 0.3483800E+00, 0.3483800E+00 /
      data (ref_adm( 2,iz,32,11),iz = 1,20) / &
     & 0.4288200E+00, 0.4288200E+00, 0.4079200E+00, 0.4272300E+00, &
     & 0.4387500E+00, 0.4516200E+00, 0.4527300E+00, 0.4602500E+00, &
     & 0.4834200E+00, 0.4677300E+00, 0.4715500E+00, 0.4761100E+00, &
     & 0.5153800E+00, 0.4966500E+00, 0.5019000E+00, 0.4815600E+00, &
     & 0.4911000E+00, 0.4593200E+00, 0.3657500E+00, 0.3657500E+00 /
      data (ref_adm( 2,iz,33,11),iz = 1,20) / &
     & 0.4132200E+00, 0.4132200E+00, 0.4421900E+00, 0.4315800E+00, &
     & 0.4174100E+00, 0.4208400E+00, 0.4370300E+00, 0.4433500E+00, &
     & 0.4902200E+00, 0.4712000E+00, 0.4843100E+00, 0.4932700E+00, &
     & 0.5266400E+00, 0.5225900E+00, 0.5200500E+00, 0.5121000E+00, &
     & 0.4941900E+00, 0.4647300E+00, 0.3722700E+00, 0.3722700E+00 /
      data (ref_adm( 2,iz,34,11),iz = 1,20) / &
     & 0.4303700E+00, 0.4303700E+00, 0.4437500E+00, 0.4110700E+00, &
     & 0.4038100E+00, 0.4398000E+00, 0.4575100E+00, 0.4194400E+00, &
     & 0.4503400E+00, 0.4950300E+00, 0.5026000E+00, 0.4987900E+00, &
     & 0.5232300E+00, 0.5212600E+00, 0.5235700E+00, 0.4958900E+00, &
     & 0.5448000E+00, 0.4808000E+00, 0.3949900E+00, 0.3949900E+00 /
      data (ref_adm( 2,iz,35,11),iz = 1,20) / &
     & 0.4141200E+00, 0.4141200E+00, 0.4104600E+00, 0.4379800E+00, &
     & 0.4507400E+00, 0.4301600E+00, 0.4405900E+00, 0.4353600E+00, &
     & 0.4578000E+00, 0.4761000E+00, 0.4800900E+00, 0.4864400E+00, &
     & 0.5154000E+00, 0.5045700E+00, 0.5177400E+00, 0.5245900E+00, &
     & 0.5339400E+00, 0.4767600E+00, 0.3540400E+00, 0.3540400E+00 /
      data (ref_adm( 2,iz,36,11),iz = 1,20) / &
     & 0.4230100E+00, 0.4230100E+00, 0.4172100E+00, 0.4314300E+00, &
     & 0.4140100E+00, 0.4367200E+00, 0.4376600E+00, 0.4397600E+00, &
     & 0.4631100E+00, 0.4858300E+00, 0.4988600E+00, 0.5095500E+00, &
     & 0.4981800E+00, 0.5058500E+00, 0.5135500E+00, 0.5172800E+00, &
     & 0.5067800E+00, 0.4671900E+00, 0.3752400E+00, 0.3752400E+00 /
      data (ref_adm( 2,iz,37,11),iz = 1,20) / &
     & 0.4282200E+00, 0.4282200E+00, 0.4138600E+00, 0.4205300E+00, &
     & 0.4163500E+00, 0.4265100E+00, 0.4413200E+00, 0.4594200E+00, &
     & 0.4591600E+00, 0.4732200E+00, 0.5235600E+00, 0.5311400E+00, &
     & 0.4891100E+00, 0.5114000E+00, 0.5163000E+00, 0.5071700E+00, &
     & 0.4939900E+00, 0.4400300E+00, 0.4426827E+00, 0.4426827E+00 /
      data (ref_adm( 2,iz,38,11),iz = 1,20) / &
     & 0.4282200E+00, 0.4282200E+00, 0.4138600E+00, 0.4205300E+00, &
     & 0.4163500E+00, 0.4265100E+00, 0.4413200E+00, 0.4594200E+00, &
     & 0.4591600E+00, 0.4732200E+00, 0.5235600E+00, 0.5311400E+00, &
     & 0.4891100E+00, 0.5114000E+00, 0.5163000E+00, 0.5071700E+00, &
     & 0.4939900E+00, 0.4400300E+00, 0.4426827E+00, 0.4426827E+00 /
! Solar Zenith Angle 55.0 Albedo  0.4827677E+00
      data (ref_adm( 2,iz, 1,12),iz = 1,20) / &
     & 0.3808600E+00, 0.3808600E+00, 0.3913300E+00, 0.3951500E+00, &
     & 0.4130500E+00, 0.4251900E+00, 0.4330600E+00, 0.4808300E+00, &
     & 0.4843500E+00, 0.5096800E+00, 0.5458300E+00, 0.6484000E+00, &
     & 0.7146500E+00, 0.7349500E+00, 0.7768800E+00, 0.8584600E+00, &
     & 0.9025800E+00, 0.9313600E+00, 0.9020900E+00, 0.9020900E+00 /
      data (ref_adm( 2,iz, 2,12),iz = 1,20) / &
     & 0.3808600E+00, 0.3808600E+00, 0.3913300E+00, 0.3951500E+00, &
     & 0.4130500E+00, 0.4251900E+00, 0.4330600E+00, 0.4808300E+00, &
     & 0.4843500E+00, 0.5096800E+00, 0.5458300E+00, 0.6484000E+00, &
     & 0.7146500E+00, 0.7349500E+00, 0.7768800E+00, 0.8584600E+00, &
     & 0.9025800E+00, 0.9313600E+00, 0.9020900E+00, 0.9020900E+00 /
      data (ref_adm( 2,iz, 3,12),iz = 1,20) / &
     & 0.3966100E+00, 0.3966100E+00, 0.3820200E+00, 0.3899400E+00, &
     & 0.3846400E+00, 0.4298600E+00, 0.4458100E+00, 0.4505200E+00, &
     & 0.4903600E+00, 0.5046900E+00, 0.5574300E+00, 0.6221600E+00, &
     & 0.6602300E+00, 0.7097100E+00, 0.7503800E+00, 0.8434500E+00, &
     & 0.9023300E+00, 0.9356400E+00, 0.8477800E+00, 0.8477800E+00 /
      data (ref_adm( 2,iz, 4,12),iz = 1,20) / &
     & 0.3912300E+00, 0.3912300E+00, 0.3853400E+00, 0.4055900E+00, &
     & 0.4114000E+00, 0.4395200E+00, 0.4273900E+00, 0.4588700E+00, &
     & 0.4984300E+00, 0.5197200E+00, 0.5485100E+00, 0.6146500E+00, &
     & 0.6427800E+00, 0.6793700E+00, 0.7399100E+00, 0.8128000E+00, &
     & 0.8799000E+00, 0.9388500E+00, 0.8242000E+00, 0.8242000E+00 /
      data (ref_adm( 2,iz, 5,12),iz = 1,20) / &
     & 0.3840600E+00, 0.3840600E+00, 0.3967400E+00, 0.4034800E+00, &
     & 0.4178300E+00, 0.4146400E+00, 0.4246300E+00, 0.4585400E+00, &
     & 0.4635100E+00, 0.5179600E+00, 0.5580500E+00, 0.5792400E+00, &
     & 0.6220800E+00, 0.6760200E+00, 0.7245800E+00, 0.7820000E+00, &
     & 0.8529200E+00, 0.8757400E+00, 0.6793500E+00, 0.6793500E+00 /
      data (ref_adm( 2,iz, 6,12),iz = 1,20) / &
     & 0.3968600E+00, 0.3968600E+00, 0.3829000E+00, 0.4006000E+00, &
     & 0.3934100E+00, 0.3996800E+00, 0.4222900E+00, 0.4393200E+00, &
     & 0.4772800E+00, 0.5063600E+00, 0.5508700E+00, 0.5635000E+00, &
     & 0.6058000E+00, 0.6562200E+00, 0.7154200E+00, 0.7624800E+00, &
     & 0.8414000E+00, 0.8642400E+00, 0.7871900E+00, 0.7871900E+00 /
      data (ref_adm( 2,iz, 7,12),iz = 1,20) / &
     & 0.3926500E+00, 0.3926500E+00, 0.3926100E+00, 0.3908700E+00, &
     & 0.4052600E+00, 0.4141700E+00, 0.4220300E+00, 0.4335700E+00, &
     & 0.4676000E+00, 0.5071900E+00, 0.5304400E+00, 0.5474100E+00, &
     & 0.5995000E+00, 0.6373500E+00, 0.6637100E+00, 0.7288500E+00, &
     & 0.7830300E+00, 0.7629000E+00, 0.6518300E+00, 0.6518300E+00 /
      data (ref_adm( 2,iz, 8,12),iz = 1,20) / &
     & 0.3983500E+00, 0.3983500E+00, 0.4018100E+00, 0.4132700E+00, &
     & 0.4138800E+00, 0.4255800E+00, 0.4387700E+00, 0.4544600E+00, &
     & 0.4703500E+00, 0.4975200E+00, 0.5251600E+00, 0.5520300E+00, &
     & 0.5840500E+00, 0.6152200E+00, 0.6441200E+00, 0.7022700E+00, &
     & 0.7551000E+00, 0.7210700E+00, 0.6051200E+00, 0.6051200E+00 /
      data (ref_adm( 2,iz, 9,12),iz = 1,20) / &
     & 0.4059400E+00, 0.4059400E+00, 0.4003300E+00, 0.4072000E+00, &
     & 0.4358300E+00, 0.4367700E+00, 0.4320900E+00, 0.4617800E+00, &
     & 0.4802900E+00, 0.4864800E+00, 0.5017400E+00, 0.5539600E+00, &
     & 0.5931700E+00, 0.6148000E+00, 0.6338300E+00, 0.6956800E+00, &
     & 0.7243500E+00, 0.7361800E+00, 0.6595988E+00, 0.6595988E+00 /
      data (ref_adm( 2,iz,10,12),iz = 1,20) / &
     & 0.3877800E+00, 0.3877800E+00, 0.4094600E+00, 0.4200000E+00, &
     & 0.4167700E+00, 0.4303000E+00, 0.4452400E+00, 0.4561800E+00, &
     & 0.4688700E+00, 0.4832200E+00, 0.4901900E+00, 0.5314400E+00, &
     & 0.5647600E+00, 0.5809900E+00, 0.6103100E+00, 0.6763100E+00, &
     & 0.6826300E+00, 0.6368600E+00, 0.5274400E+00, 0.5274400E+00 /
      data (ref_adm( 2,iz,11,12),iz = 1,20) / &
     & 0.3946200E+00, 0.3946200E+00, 0.4008800E+00, 0.4065900E+00, &
     & 0.4072900E+00, 0.4295400E+00, 0.4482100E+00, 0.4674100E+00, &
     & 0.4706000E+00, 0.4990700E+00, 0.4806700E+00, 0.5345300E+00, &
     & 0.5552500E+00, 0.5728300E+00, 0.5857000E+00, 0.6506400E+00, &
     & 0.6645700E+00, 0.6242800E+00, 0.5044000E+00, 0.5044000E+00 /
      data (ref_adm( 2,iz,12,12),iz = 1,20) / &
     & 0.3896000E+00, 0.3896000E+00, 0.3863100E+00, 0.3989000E+00, &
     & 0.4162500E+00, 0.4288300E+00, 0.4304000E+00, 0.4323800E+00, &
     & 0.4533100E+00, 0.4748300E+00, 0.4739000E+00, 0.5164400E+00, &
     & 0.5416400E+00, 0.5554800E+00, 0.5673300E+00, 0.6099500E+00, &
     & 0.6398000E+00, 0.5994200E+00, 0.5766800E+00, 0.5766800E+00 /
      data (ref_adm( 2,iz,13,12),iz = 1,20) / &
     & 0.4097300E+00, 0.4097300E+00, 0.3847400E+00, 0.3933700E+00, &
     & 0.4075200E+00, 0.4184500E+00, 0.4250100E+00, 0.4459200E+00, &
     & 0.4520000E+00, 0.4540600E+00, 0.4744200E+00, 0.4985300E+00, &
     & 0.5302000E+00, 0.5338800E+00, 0.5494000E+00, 0.5849000E+00, &
     & 0.5911000E+00, 0.5724400E+00, 0.4715200E+00, 0.4715200E+00 /
      data (ref_adm( 2,iz,14,12),iz = 1,20) / &
     & 0.4018900E+00, 0.4018900E+00, 0.3997500E+00, 0.4088500E+00, &
     & 0.4137900E+00, 0.4165500E+00, 0.4327600E+00, 0.4434900E+00, &
     & 0.4450700E+00, 0.4523800E+00, 0.4576700E+00, 0.4823700E+00, &
     & 0.4973300E+00, 0.5148400E+00, 0.5488500E+00, 0.5652000E+00, &
     & 0.5829700E+00, 0.5429000E+00, 0.4724300E+00, 0.4724300E+00 /
      data (ref_adm( 2,iz,15,12),iz = 1,20) / &
     & 0.3988400E+00, 0.3988400E+00, 0.3932900E+00, 0.4069800E+00, &
     & 0.4084600E+00, 0.4203900E+00, 0.4344100E+00, 0.4369600E+00, &
     & 0.4511600E+00, 0.4574700E+00, 0.4654100E+00, 0.4859800E+00, &
     & 0.4966100E+00, 0.5022000E+00, 0.5054200E+00, 0.5585400E+00, &
     & 0.5543800E+00, 0.5616900E+00, 0.5289208E+00, 0.5289208E+00 /
      data (ref_adm( 2,iz,16,12),iz = 1,20) / &
     & 0.3965900E+00, 0.3965900E+00, 0.4063100E+00, 0.4099400E+00, &
     & 0.4153700E+00, 0.4233400E+00, 0.4397600E+00, 0.4316300E+00, &
     & 0.4376300E+00, 0.4400300E+00, 0.4574400E+00, 0.4834600E+00, &
     & 0.4839900E+00, 0.4997000E+00, 0.5048900E+00, 0.5514400E+00, &
     & 0.5525700E+00, 0.5584200E+00, 0.5136279E+00, 0.5136279E+00 /
      data (ref_adm( 2,iz,17,12),iz = 1,20) / &
     & 0.4087900E+00, 0.4087900E+00, 0.4064100E+00, 0.4136000E+00, &
     & 0.4076500E+00, 0.4127200E+00, 0.4357400E+00, 0.4380100E+00, &
     & 0.4355100E+00, 0.4345600E+00, 0.4501300E+00, 0.4841100E+00, &
     & 0.4810200E+00, 0.4953700E+00, 0.4728800E+00, 0.5338500E+00, &
     & 0.5585700E+00, 0.4914600E+00, 0.4985140E+00, 0.4985140E+00 /
      data (ref_adm( 2,iz,18,12),iz = 1,20) / &
     & 0.3970100E+00, 0.3970100E+00, 0.3981100E+00, 0.4000800E+00, &
     & 0.3968200E+00, 0.4185600E+00, 0.4188500E+00, 0.4405000E+00, &
     & 0.4272700E+00, 0.4260700E+00, 0.4419400E+00, 0.4898000E+00, &
     & 0.4844600E+00, 0.4981600E+00, 0.5007700E+00, 0.5133100E+00, &
     & 0.5552100E+00, 0.5132458E+00, 0.4430386E+00, 0.4430386E+00 /
      data (ref_adm( 2,iz,19,12),iz = 1,20) / &
     & 0.4175400E+00, 0.4175400E+00, 0.4071400E+00, 0.4113200E+00, &
     & 0.4055600E+00, 0.4042900E+00, 0.4073800E+00, 0.4315400E+00, &
     & 0.4104400E+00, 0.4347100E+00, 0.4394400E+00, 0.4767100E+00, &
     & 0.4790200E+00, 0.4710100E+00, 0.4739400E+00, 0.5238200E+00, &
     & 0.5493200E+00, 0.5019738E+00, 0.4347213E+00, 0.4347213E+00 /
      data (ref_adm( 2,iz,20,12),iz = 1,20) / &
     & 0.4126100E+00, 0.4126100E+00, 0.4018400E+00, 0.4143600E+00, &
     & 0.4206700E+00, 0.4154700E+00, 0.4117200E+00, 0.4101800E+00, &
     & 0.4153300E+00, 0.4301100E+00, 0.4484900E+00, 0.4652700E+00, &
     & 0.4762000E+00, 0.4676700E+00, 0.4780900E+00, 0.5110000E+00, &
     & 0.5044688E+00, 0.4921428E+00, 0.4292473E+00, 0.4292473E+00 /
      data (ref_adm( 2,iz,21,12),iz = 1,20) / &
     & 0.4080200E+00, 0.4080200E+00, 0.4107100E+00, 0.4190500E+00, &
     & 0.4221800E+00, 0.4258600E+00, 0.4188800E+00, 0.4178200E+00, &
     & 0.4273900E+00, 0.4366600E+00, 0.4495300E+00, 0.4417400E+00, &
     & 0.4611600E+00, 0.4579600E+00, 0.4750300E+00, 0.4293900E+00, &
     & 0.4948680E+00, 0.4822130E+00, 0.4251681E+00, 0.4251681E+00 /
      data (ref_adm( 2,iz,22,12),iz = 1,20) / &
     & 0.4126200E+00, 0.4126200E+00, 0.4058900E+00, 0.4114100E+00, &
     & 0.4286900E+00, 0.4206100E+00, 0.4286300E+00, 0.4169400E+00, &
     & 0.4166100E+00, 0.4266800E+00, 0.4443600E+00, 0.4452500E+00, &
     & 0.4522600E+00, 0.4697100E+00, 0.4819000E+00, 0.4957800E+00, &
     & 0.4914532E+00, 0.4704607E+00, 0.4110245E+00, 0.4110245E+00 /
      data (ref_adm( 2,iz,23,12),iz = 1,20) / &
     & 0.3903500E+00, 0.3903500E+00, 0.4061700E+00, 0.4150100E+00, &
     & 0.4277100E+00, 0.4115000E+00, 0.4150000E+00, 0.4133000E+00, &
     & 0.4242900E+00, 0.4297500E+00, 0.4413500E+00, 0.4527800E+00, &
     & 0.4640400E+00, 0.4679500E+00, 0.4879100E+00, 0.5060300E+00, &
     & 0.5038000E+00, 0.4611677E+00, 0.4080099E+00, 0.4080099E+00 /
      data (ref_adm( 2,iz,24,12),iz = 1,20) / &
     & 0.3980500E+00, 0.3980500E+00, 0.4077700E+00, 0.4152300E+00, &
     & 0.4090500E+00, 0.4121400E+00, 0.4096600E+00, 0.4391100E+00, &
     & 0.4348900E+00, 0.4346600E+00, 0.4495900E+00, 0.4485400E+00, &
     & 0.4623100E+00, 0.4714600E+00, 0.4885500E+00, 0.5025000E+00, &
     & 0.4987500E+00, 0.4540984E+00, 0.4059685E+00, 0.4059685E+00 /
      data (ref_adm( 2,iz,25,12),iz = 1,20) / &
     & 0.4021800E+00, 0.4021800E+00, 0.3977200E+00, 0.3891900E+00, &
     & 0.3996600E+00, 0.4070800E+00, 0.4118600E+00, 0.4181800E+00, &
     & 0.4372200E+00, 0.4415600E+00, 0.4554200E+00, 0.4561500E+00, &
     & 0.4694700E+00, 0.4784300E+00, 0.4882200E+00, 0.4793200E+00, &
     & 0.4860300E+00, 0.4313900E+00, 0.4054937E+00, 0.4054937E+00 /
      data (ref_adm( 2,iz,26,12),iz = 1,20) / &
     & 0.4081400E+00, 0.4081400E+00, 0.4130000E+00, 0.4107000E+00, &
     & 0.4102000E+00, 0.4141400E+00, 0.4218100E+00, 0.4199200E+00, &
     & 0.4210900E+00, 0.4325800E+00, 0.4380700E+00, 0.4459300E+00, &
     & 0.4571700E+00, 0.4704800E+00, 0.4857800E+00, 0.5009100E+00, &
     & 0.4886200E+00, 0.4804500E+00, 0.4059658E+00, 0.4059658E+00 /
      data (ref_adm( 2,iz,27,12),iz = 1,20) / &
     & 0.4028800E+00, 0.4028800E+00, 0.4143900E+00, 0.4162500E+00, &
     & 0.4289000E+00, 0.4189100E+00, 0.4325000E+00, 0.4543500E+00, &
     & 0.4695600E+00, 0.4754500E+00, 0.4800300E+00, 0.4739500E+00, &
     & 0.4697600E+00, 0.4649300E+00, 0.4739200E+00, 0.5087800E+00, &
     & 0.4876300E+00, 0.4720700E+00, 0.3840000E+00, 0.3840000E+00 /
      data (ref_adm( 2,iz,28,12),iz = 1,20) / &
     & 0.4047300E+00, 0.4047300E+00, 0.4119600E+00, 0.4170700E+00, &
     & 0.4045700E+00, 0.3944700E+00, 0.4114300E+00, 0.4159500E+00, &
     & 0.4352300E+00, 0.4593600E+00, 0.4872400E+00, 0.4801600E+00, &
     & 0.5058300E+00, 0.5148600E+00, 0.5125500E+00, 0.5116100E+00, &
     & 0.5178100E+00, 0.4736800E+00, 0.3865700E+00, 0.3865700E+00 /
      data (ref_adm( 2,iz,29,12),iz = 1,20) / &
     & 0.3972700E+00, 0.3972700E+00, 0.3930000E+00, 0.3944000E+00, &
     & 0.3980000E+00, 0.3999700E+00, 0.4050300E+00, 0.4314100E+00, &
     & 0.4362700E+00, 0.4465900E+00, 0.4687400E+00, 0.4793000E+00, &
     & 0.4920200E+00, 0.5195400E+00, 0.5244500E+00, 0.5043200E+00, &
     & 0.4984500E+00, 0.4830600E+00, 0.3938000E+00, 0.3938000E+00 /
      data (ref_adm( 2,iz,30,12),iz = 1,20) / &
     & 0.3870000E+00, 0.3870000E+00, 0.3831300E+00, 0.3771100E+00, &
     & 0.3947600E+00, 0.4003500E+00, 0.4135300E+00, 0.4310600E+00, &
     & 0.4423800E+00, 0.4480100E+00, 0.4752000E+00, 0.4904600E+00, &
     & 0.4975600E+00, 0.4971900E+00, 0.4979000E+00, 0.5155700E+00, &
     & 0.5158400E+00, 0.4907900E+00, 0.4036500E+00, 0.4036500E+00 /
      data (ref_adm( 2,iz,31,12),iz = 1,20) / &
     & 0.3957800E+00, 0.3957800E+00, 0.3964100E+00, 0.3944900E+00, &
     & 0.3913100E+00, 0.4046000E+00, 0.4207300E+00, 0.4298800E+00, &
     & 0.4318900E+00, 0.4384700E+00, 0.4631700E+00, 0.4722200E+00, &
     & 0.4853000E+00, 0.4947500E+00, 0.5066100E+00, 0.5023300E+00, &
     & 0.5037600E+00, 0.4824600E+00, 0.3978700E+00, 0.3978700E+00 /
      data (ref_adm( 2,iz,32,12),iz = 1,20) / &
     & 0.4012900E+00, 0.4012900E+00, 0.4058500E+00, 0.4100400E+00, &
     & 0.4162600E+00, 0.4260300E+00, 0.4407500E+00, 0.4362500E+00, &
     & 0.4581500E+00, 0.4714600E+00, 0.4820700E+00, 0.4981400E+00, &
     & 0.4989500E+00, 0.5125200E+00, 0.5249900E+00, 0.5226700E+00, &
     & 0.5105700E+00, 0.4771300E+00, 0.3942600E+00, 0.3942600E+00 /
      data (ref_adm( 2,iz,33,12),iz = 1,20) / &
     & 0.3982300E+00, 0.3982300E+00, 0.4007800E+00, 0.3951700E+00, &
     & 0.4066100E+00, 0.4038100E+00, 0.4238300E+00, 0.4277600E+00, &
     & 0.4403100E+00, 0.4542600E+00, 0.4711700E+00, 0.4934500E+00, &
     & 0.4931600E+00, 0.5035900E+00, 0.5140100E+00, 0.5156500E+00, &
     & 0.4894500E+00, 0.4634100E+00, 0.3984200E+00, 0.3984200E+00 /
      data (ref_adm( 2,iz,34,12),iz = 1,20) / &
     & 0.3998000E+00, 0.3998000E+00, 0.4074500E+00, 0.4058900E+00, &
     & 0.3874200E+00, 0.4123000E+00, 0.4321600E+00, 0.4490700E+00, &
     & 0.4511800E+00, 0.4698400E+00, 0.4662200E+00, 0.4880500E+00, &
     & 0.4920700E+00, 0.5160500E+00, 0.5232200E+00, 0.5052200E+00, &
     & 0.4861600E+00, 0.4678000E+00, 0.4384900E+00, 0.4384900E+00 /
      data (ref_adm( 2,iz,35,12),iz = 1,20) / &
     & 0.4073600E+00, 0.4073600E+00, 0.3926400E+00, 0.3946200E+00, &
     & 0.4066800E+00, 0.4043100E+00, 0.4261900E+00, 0.4409300E+00, &
     & 0.4642800E+00, 0.4595600E+00, 0.4659600E+00, 0.4870100E+00, &
     & 0.5035800E+00, 0.5033600E+00, 0.5027700E+00, 0.5164600E+00, &
     & 0.5102100E+00, 0.4931700E+00, 0.4117700E+00, 0.4117700E+00 /
      data (ref_adm( 2,iz,36,12),iz = 1,20) / &
     & 0.3935700E+00, 0.3935700E+00, 0.3990400E+00, 0.3963300E+00, &
     & 0.4054300E+00, 0.4151700E+00, 0.4287700E+00, 0.4452300E+00, &
     & 0.4524900E+00, 0.4564600E+00, 0.4799800E+00, 0.5069900E+00, &
     & 0.5182400E+00, 0.5160900E+00, 0.5149700E+00, 0.5323200E+00, &
     & 0.5256700E+00, 0.4856400E+00, 0.4133600E+00, 0.4133600E+00 /
      data (ref_adm( 2,iz,37,12),iz = 1,20) / &
     & 0.3916800E+00, 0.3916800E+00, 0.4175100E+00, 0.4154400E+00, &
     & 0.4016500E+00, 0.4120500E+00, 0.4177700E+00, 0.4266200E+00, &
     & 0.4425900E+00, 0.4746500E+00, 0.4877500E+00, 0.5122500E+00, &
     & 0.5234600E+00, 0.5311500E+00, 0.5273800E+00, 0.5283900E+00, &
     & 0.5264400E+00, 0.4951900E+00, 0.4244900E+00, 0.4244900E+00 /
      data (ref_adm( 2,iz,38,12),iz = 1,20) / &
     & 0.3916800E+00, 0.3916800E+00, 0.4175100E+00, 0.4154400E+00, &
     & 0.4016500E+00, 0.4120500E+00, 0.4177700E+00, 0.4266200E+00, &
     & 0.4425900E+00, 0.4746500E+00, 0.4877500E+00, 0.5122500E+00, &
     & 0.5234600E+00, 0.5311500E+00, 0.5273800E+00, 0.5283900E+00, &
     & 0.5264400E+00, 0.4951900E+00, 0.4244900E+00, 0.4244900E+00 /
! Solar Zenith Angle 60.0 Albedo  0.4921416E+00
      data (ref_adm( 2,iz, 1,13),iz = 1,20) / &
     & 0.4114200E+00, 0.4114200E+00, 0.4013400E+00, 0.4030500E+00, &
     & 0.4179900E+00, 0.4363100E+00, 0.4442100E+00, 0.4783400E+00, &
     & 0.5062900E+00, 0.5397800E+00, 0.5876700E+00, 0.6248700E+00, &
     & 0.7275700E+00, 0.8066600E+00, 0.8942900E+00, 0.9774000E+00, &
     & 0.1089200E+01, 0.1180800E+01, 0.1017400E+01, 0.1017400E+01 /
      data (ref_adm( 2,iz, 2,13),iz = 1,20) / &
     & 0.4114200E+00, 0.4114200E+00, 0.4013400E+00, 0.4030500E+00, &
     & 0.4179900E+00, 0.4363100E+00, 0.4442100E+00, 0.4783400E+00, &
     & 0.5062900E+00, 0.5397800E+00, 0.5876700E+00, 0.6248700E+00, &
     & 0.7275700E+00, 0.8066600E+00, 0.8942900E+00, 0.9774000E+00, &
     & 0.1089200E+01, 0.1180800E+01, 0.1017400E+01, 0.1017400E+01 /
      data (ref_adm( 2,iz, 3,13),iz = 1,20) / &
     & 0.4032000E+00, 0.4032000E+00, 0.3935800E+00, 0.3897000E+00, &
     & 0.4136700E+00, 0.4227000E+00, 0.4606900E+00, 0.4789500E+00, &
     & 0.4950100E+00, 0.5265200E+00, 0.5754500E+00, 0.6330400E+00, &
     & 0.7109800E+00, 0.7697300E+00, 0.8502700E+00, 0.9677800E+00, &
     & 0.1078300E+01, 0.1200400E+01, 0.1002600E+01, 0.1002600E+01 /
      data (ref_adm( 2,iz, 4,13),iz = 1,20) / &
     & 0.3932800E+00, 0.3932800E+00, 0.4068600E+00, 0.4102800E+00, &
     & 0.4159300E+00, 0.4258900E+00, 0.4376000E+00, 0.4708100E+00, &
     & 0.4952000E+00, 0.5178600E+00, 0.5606200E+00, 0.6118900E+00, &
     & 0.6939500E+00, 0.7382600E+00, 0.8303700E+00, 0.9350400E+00, &
     & 0.1026100E+01, 0.1142400E+01, 0.9719800E+00, 0.9719800E+00 /
      data (ref_adm( 2,iz, 5,13),iz = 1,20) / &
     & 0.3881900E+00, 0.3881900E+00, 0.4057600E+00, 0.3974600E+00, &
     & 0.4119400E+00, 0.4281300E+00, 0.4367000E+00, 0.4568300E+00, &
     & 0.4928900E+00, 0.5154000E+00, 0.5471100E+00, 0.5959100E+00, &
     & 0.6624600E+00, 0.7321500E+00, 0.8082800E+00, 0.8971300E+00, &
     & 0.9780800E+00, 0.1016200E+01, 0.8831000E+00, 0.8831000E+00 /
      data (ref_adm( 2,iz, 6,13),iz = 1,20) / &
     & 0.3933700E+00, 0.3933700E+00, 0.3917000E+00, 0.3952600E+00, &
     & 0.4170800E+00, 0.4329000E+00, 0.4424100E+00, 0.4604500E+00, &
     & 0.4871400E+00, 0.5225500E+00, 0.5644400E+00, 0.5950900E+00, &
     & 0.6469000E+00, 0.7252300E+00, 0.7974000E+00, 0.8649700E+00, &
     & 0.9674300E+00, 0.9372200E+00, 0.8317502E+00, 0.8317502E+00 /
      data (ref_adm( 2,iz, 7,13),iz = 1,20) / &
     & 0.3907100E+00, 0.3907100E+00, 0.3853400E+00, 0.3941600E+00, &
     & 0.4031500E+00, 0.4234300E+00, 0.4373800E+00, 0.4547100E+00, &
     & 0.4721800E+00, 0.5039400E+00, 0.5463900E+00, 0.5744400E+00, &
     & 0.6226500E+00, 0.6794400E+00, 0.7507600E+00, 0.8107000E+00, &
     & 0.9214400E+00, 0.9014100E+00, 0.7802700E+00, 0.7802700E+00 /
      data (ref_adm( 2,iz, 8,13),iz = 1,20) / &
     & 0.3753600E+00, 0.3753600E+00, 0.3816600E+00, 0.3836100E+00, &
     & 0.3992200E+00, 0.4282700E+00, 0.4511600E+00, 0.4656100E+00, &
     & 0.4689300E+00, 0.5000200E+00, 0.5460700E+00, 0.5810900E+00, &
     & 0.6288300E+00, 0.6839000E+00, 0.7317400E+00, 0.8277100E+00, &
     & 0.8565100E+00, 0.8456500E+00, 0.7546452E+00, 0.7546452E+00 /
      data (ref_adm( 2,iz, 9,13),iz = 1,20) / &
     & 0.3782700E+00, 0.3782700E+00, 0.3928100E+00, 0.3935300E+00, &
     & 0.4105300E+00, 0.4415700E+00, 0.4638400E+00, 0.4551800E+00, &
     & 0.4790700E+00, 0.4965200E+00, 0.5305600E+00, 0.5560900E+00, &
     & 0.5907300E+00, 0.6456700E+00, 0.6845400E+00, 0.7398000E+00, &
     & 0.7906600E+00, 0.7901300E+00, 0.7198566E+00, 0.7198566E+00 /
      data (ref_adm( 2,iz,10,13),iz = 1,20) / &
     & 0.3903700E+00, 0.3903700E+00, 0.3844900E+00, 0.3969600E+00, &
     & 0.4228000E+00, 0.4406300E+00, 0.4322200E+00, 0.4491900E+00, &
     & 0.4605300E+00, 0.4960800E+00, 0.5260300E+00, 0.5467000E+00, &
     & 0.5957800E+00, 0.6240900E+00, 0.6669800E+00, 0.6954200E+00, &
     & 0.7518700E+00, 0.7398100E+00, 0.5685400E+00, 0.5685400E+00 /
      data (ref_adm( 2,iz,11,13),iz = 1,20) / &
     & 0.3929000E+00, 0.3929000E+00, 0.3889500E+00, 0.3923700E+00, &
     & 0.3991700E+00, 0.4141500E+00, 0.4271800E+00, 0.4329000E+00, &
     & 0.4615500E+00, 0.4891300E+00, 0.5129800E+00, 0.5338800E+00, &
     & 0.5594700E+00, 0.5803700E+00, 0.6309400E+00, 0.6769800E+00, &
     & 0.7240900E+00, 0.6983700E+00, 0.5541900E+00, 0.5541900E+00 /
      data (ref_adm( 2,iz,12,13),iz = 1,20) / &
     & 0.3907900E+00, 0.3907900E+00, 0.4052300E+00, 0.4043500E+00, &
     & 0.4011000E+00, 0.4123100E+00, 0.4291200E+00, 0.4452000E+00, &
     & 0.4397700E+00, 0.4827800E+00, 0.4912000E+00, 0.5277800E+00, &
     & 0.5472200E+00, 0.5815300E+00, 0.6193700E+00, 0.6651700E+00, &
     & 0.6802200E+00, 0.6473900E+00, 0.5566900E+00, 0.5566900E+00 /
      data (ref_adm( 2,iz,13,13),iz = 1,20) / &
     & 0.4095800E+00, 0.4095800E+00, 0.4028500E+00, 0.4118600E+00, &
     & 0.4069700E+00, 0.4161300E+00, 0.4278500E+00, 0.4326600E+00, &
     & 0.4472500E+00, 0.4641300E+00, 0.4837400E+00, 0.4946900E+00, &
     & 0.5164900E+00, 0.5512100E+00, 0.5942500E+00, 0.6065900E+00, &
     & 0.6407600E+00, 0.5957400E+00, 0.4616500E+00, 0.4616500E+00 /
      data (ref_adm( 2,iz,14,13),iz = 1,20) / &
     & 0.3856900E+00, 0.3856900E+00, 0.3879600E+00, 0.3909800E+00, &
     & 0.3993100E+00, 0.4102300E+00, 0.4185100E+00, 0.4281000E+00, &
     & 0.4360500E+00, 0.4527900E+00, 0.4712300E+00, 0.4939900E+00, &
     & 0.5138100E+00, 0.5415700E+00, 0.5898700E+00, 0.5639600E+00, &
     & 0.6121100E+00, 0.5797500E+00, 0.4236500E+00, 0.4236500E+00 /
      data (ref_adm( 2,iz,15,13),iz = 1,20) / &
     & 0.3945800E+00, 0.3945800E+00, 0.3944600E+00, 0.3954800E+00, &
     & 0.3998900E+00, 0.4086200E+00, 0.4177700E+00, 0.4385900E+00, &
     & 0.4511400E+00, 0.4590300E+00, 0.4719800E+00, 0.4878900E+00, &
     & 0.5071200E+00, 0.5294100E+00, 0.5582500E+00, 0.5644500E+00, &
     & 0.5832000E+00, 0.5589900E+00, 0.5592712E+00, 0.5592712E+00 /
      data (ref_adm( 2,iz,16,13),iz = 1,20) / &
     & 0.3915100E+00, 0.3915100E+00, 0.3933400E+00, 0.4014700E+00, &
     & 0.3966800E+00, 0.3979600E+00, 0.4086700E+00, 0.4202600E+00, &
     & 0.4369100E+00, 0.4477400E+00, 0.4564000E+00, 0.4709200E+00, &
     & 0.4864000E+00, 0.5105600E+00, 0.5507000E+00, 0.5504000E+00, &
     & 0.5478200E+00, 0.6013000E+00, 0.5428807E+00, 0.5428807E+00 /
      data (ref_adm( 2,iz,17,13),iz = 1,20) / &
     & 0.3940700E+00, 0.3940700E+00, 0.3991400E+00, 0.3902100E+00, &
     & 0.3855800E+00, 0.3988600E+00, 0.4234300E+00, 0.4363900E+00, &
     & 0.4547800E+00, 0.4530800E+00, 0.4636700E+00, 0.4691400E+00, &
     & 0.4913900E+00, 0.5098600E+00, 0.5393300E+00, 0.5385800E+00, &
     & 0.5308800E+00, 0.6048913E+00, 0.5260091E+00, 0.5260091E+00 /
      data (ref_adm( 2,iz,18,13),iz = 1,20) / &
     & 0.3957800E+00, 0.3957800E+00, 0.3999700E+00, 0.3918100E+00, &
     & 0.3931800E+00, 0.4023600E+00, 0.4229500E+00, 0.4294800E+00, &
     & 0.4351400E+00, 0.4404300E+00, 0.4601800E+00, 0.4660700E+00, &
     & 0.4898900E+00, 0.5006600E+00, 0.5189800E+00, 0.5532100E+00, &
     & 0.5367100E+00, 0.5001248E+00, 0.4446918E+00, 0.4446918E+00 /
      data (ref_adm( 2,iz,19,13),iz = 1,20) / &
     & 0.3855200E+00, 0.3855200E+00, 0.4086700E+00, 0.4081300E+00, &
     & 0.3954000E+00, 0.4157700E+00, 0.4229000E+00, 0.4176300E+00, &
     & 0.4299200E+00, 0.4433000E+00, 0.4539100E+00, 0.4569500E+00, &
     & 0.4737300E+00, 0.4883100E+00, 0.5040000E+00, 0.5104800E+00, &
     & 0.5052537E+00, 0.4862694E+00, 0.4368179E+00, 0.4368179E+00 /
      data (ref_adm( 2,iz,20,13),iz = 1,20) / &
     & 0.3942000E+00, 0.3942000E+00, 0.3994000E+00, 0.3838500E+00, &
     & 0.4029300E+00, 0.4101900E+00, 0.3956300E+00, 0.4107000E+00, &
     & 0.4241000E+00, 0.4377300E+00, 0.4559500E+00, 0.4686500E+00, &
     & 0.4803500E+00, 0.4812200E+00, 0.4816600E+00, 0.4729000E+00, &
     & 0.4943068E+00, 0.4764798E+00, 0.4325736E+00, 0.4325736E+00 /
      data (ref_adm( 2,iz,21,13),iz = 1,20) / &
     & 0.3941600E+00, 0.3941600E+00, 0.3888600E+00, 0.3965500E+00, &
     & 0.3970800E+00, 0.4107900E+00, 0.4121900E+00, 0.4119600E+00, &
     & 0.4139000E+00, 0.4469500E+00, 0.4488300E+00, 0.4587500E+00, &
     & 0.4715500E+00, 0.4850000E+00, 0.4925900E+00, 0.4818900E+00, &
     & 0.4862601E+00, 0.4691752E+00, 0.4309316E+00, 0.4309316E+00 /
      data (ref_adm( 2,iz,22,13),iz = 1,20) / &
     & 0.3952800E+00, 0.3952800E+00, 0.3976200E+00, 0.4011100E+00, &
     & 0.4055800E+00, 0.4020100E+00, 0.4135000E+00, 0.4170100E+00, &
     & 0.4167400E+00, 0.4292600E+00, 0.4515300E+00, 0.4694400E+00, &
     & 0.4745800E+00, 0.4823300E+00, 0.4961300E+00, 0.4932800E+00, &
     & 0.5024964E+00, 0.4834324E+00, 0.4252771E+00, 0.4252771E+00 /
      data (ref_adm( 2,iz,23,13),iz = 1,20) / &
     & 0.3959400E+00, 0.3959400E+00, 0.3857200E+00, 0.3973500E+00, &
     & 0.4139300E+00, 0.4083900E+00, 0.4068700E+00, 0.4240400E+00, &
     & 0.4137800E+00, 0.4282600E+00, 0.4579600E+00, 0.4635800E+00, &
     & 0.4739100E+00, 0.4893700E+00, 0.4846800E+00, 0.4934300E+00, &
     & 0.4810000E+00, 0.4734104E+00, 0.4221042E+00, 0.4221042E+00 /
      data (ref_adm( 2,iz,24,13),iz = 1,20) / &
     & 0.3892000E+00, 0.3892000E+00, 0.3802400E+00, 0.3805800E+00, &
     & 0.3865200E+00, 0.3986400E+00, 0.4036800E+00, 0.4181000E+00, &
     & 0.4280400E+00, 0.4303500E+00, 0.4512400E+00, 0.4705700E+00, &
     & 0.4876000E+00, 0.4866000E+00, 0.4820900E+00, 0.4993500E+00, &
     & 0.5119500E+00, 0.4657921E+00, 0.4202159E+00, 0.4202159E+00 /
      data (ref_adm( 2,iz,25,13),iz = 1,20) / &
     & 0.3981500E+00, 0.3981500E+00, 0.3979600E+00, 0.4002700E+00, &
     & 0.4085600E+00, 0.4122100E+00, 0.4156200E+00, 0.4183200E+00, &
     & 0.4276100E+00, 0.4443000E+00, 0.4456400E+00, 0.4609100E+00, &
     & 0.4663200E+00, 0.4786500E+00, 0.4917400E+00, 0.5088900E+00, &
     & 0.5198000E+00, 0.5161500E+00, 0.4198805E+00, 0.4198805E+00 /
      data (ref_adm( 2,iz,26,13),iz = 1,20) / &
     & 0.3934700E+00, 0.3934700E+00, 0.3938400E+00, 0.3925700E+00, &
     & 0.3962300E+00, 0.3969700E+00, 0.4094000E+00, 0.4145600E+00, &
     & 0.4233900E+00, 0.4302700E+00, 0.4385800E+00, 0.4497200E+00, &
     & 0.4587500E+00, 0.4737700E+00, 0.4855600E+00, 0.5080200E+00, &
     & 0.5207900E+00, 0.4920500E+00, 0.4209208E+00, 0.4209208E+00 /
      data (ref_adm( 2,iz,27,13),iz = 1,20) / &
     & 0.3985800E+00, 0.3985800E+00, 0.4055800E+00, 0.3966000E+00, &
     & 0.4011200E+00, 0.3932600E+00, 0.3958300E+00, 0.4149400E+00, &
     & 0.4258400E+00, 0.4439800E+00, 0.4631300E+00, 0.4597700E+00, &
     & 0.4718500E+00, 0.4794900E+00, 0.4861800E+00, 0.5099000E+00, &
     & 0.5142700E+00, 0.5015300E+00, 0.4226700E+00, 0.4226700E+00 /
      data (ref_adm( 2,iz,28,13),iz = 1,20) / &
     & 0.3950700E+00, 0.3950700E+00, 0.4022100E+00, 0.3926200E+00, &
     & 0.3906100E+00, 0.3988000E+00, 0.4004300E+00, 0.4205300E+00, &
     & 0.4350100E+00, 0.4529100E+00, 0.4667800E+00, 0.4827000E+00, &
     & 0.4999200E+00, 0.5122800E+00, 0.5139400E+00, 0.5184800E+00, &
     & 0.5188700E+00, 0.5064300E+00, 0.4259400E+00, 0.4259400E+00 /
      data (ref_adm( 2,iz,29,13),iz = 1,20) / &
     & 0.3942500E+00, 0.3942500E+00, 0.3888400E+00, 0.3878400E+00, &
     & 0.3925100E+00, 0.4062500E+00, 0.4192500E+00, 0.4170400E+00, &
     & 0.4389600E+00, 0.4530000E+00, 0.4690700E+00, 0.4795400E+00, &
     & 0.4931600E+00, 0.5083100E+00, 0.5230500E+00, 0.5415800E+00, &
     & 0.5499400E+00, 0.5063500E+00, 0.4301600E+00, 0.4301600E+00 /
      data (ref_adm( 2,iz,30,13),iz = 1,20) / &
     & 0.3928600E+00, 0.3928600E+00, 0.3818000E+00, 0.3809100E+00, &
     & 0.4113400E+00, 0.4247500E+00, 0.4300700E+00, 0.4235100E+00, &
     & 0.4325700E+00, 0.4510400E+00, 0.4679800E+00, 0.4725800E+00, &
     & 0.4962900E+00, 0.5060700E+00, 0.5158100E+00, 0.5263800E+00, &
     & 0.5439400E+00, 0.5123400E+00, 0.4199200E+00, 0.4199200E+00 /
      data (ref_adm( 2,iz,31,13),iz = 1,20) / &
     & 0.3842200E+00, 0.3842200E+00, 0.3891200E+00, 0.3985500E+00, &
     & 0.4031800E+00, 0.4093300E+00, 0.4217300E+00, 0.4335200E+00, &
     & 0.4448500E+00, 0.4557100E+00, 0.4679900E+00, 0.4728000E+00, &
     & 0.4838100E+00, 0.5041800E+00, 0.5174900E+00, 0.5306800E+00, &
     & 0.5349400E+00, 0.5296500E+00, 0.4563300E+00, 0.4563300E+00 /
      data (ref_adm( 2,iz,32,13),iz = 1,20) / &
     & 0.3863300E+00, 0.3863300E+00, 0.3926000E+00, 0.3890900E+00, &
     & 0.4009600E+00, 0.4027300E+00, 0.4124500E+00, 0.4228700E+00, &
     & 0.4351100E+00, 0.4451800E+00, 0.4598100E+00, 0.4722400E+00, &
     & 0.4995000E+00, 0.5155600E+00, 0.5210400E+00, 0.5382000E+00, &
     & 0.5464400E+00, 0.5154400E+00, 0.4465100E+00, 0.4465100E+00 /
      data (ref_adm( 2,iz,33,13),iz = 1,20) / &
     & 0.3949700E+00, 0.3949700E+00, 0.3797100E+00, 0.3928800E+00, &
     & 0.4049400E+00, 0.4232600E+00, 0.4218100E+00, 0.4298100E+00, &
     & 0.4458600E+00, 0.4500900E+00, 0.4732100E+00, 0.4751200E+00, &
     & 0.5038300E+00, 0.5178800E+00, 0.5286300E+00, 0.5469200E+00, &
     & 0.5687900E+00, 0.5296300E+00, 0.4388400E+00, 0.4388400E+00 /
      data (ref_adm( 2,iz,34,13),iz = 1,20) / &
     & 0.3861100E+00, 0.3861100E+00, 0.3876300E+00, 0.3966200E+00, &
     & 0.4001100E+00, 0.4176300E+00, 0.4166200E+00, 0.4342900E+00, &
     & 0.4429000E+00, 0.4477700E+00, 0.4752700E+00, 0.4904200E+00, &
     & 0.4900000E+00, 0.5192600E+00, 0.5295000E+00, 0.5438600E+00, &
     & 0.5615800E+00, 0.5227100E+00, 0.4356300E+00, 0.4356300E+00 /
      data (ref_adm( 2,iz,35,13),iz = 1,20) / &
     & 0.3947100E+00, 0.3947100E+00, 0.4010900E+00, 0.4015900E+00, &
     & 0.4198600E+00, 0.4309400E+00, 0.4307600E+00, 0.4292200E+00, &
     & 0.4325100E+00, 0.4588400E+00, 0.4695400E+00, 0.4879000E+00, &
     & 0.5004100E+00, 0.5168600E+00, 0.5347800E+00, 0.5328900E+00, &
     & 0.5575300E+00, 0.5392100E+00, 0.4352000E+00, 0.4352000E+00 /
      data (ref_adm( 2,iz,36,13),iz = 1,20) / &
     & 0.3986100E+00, 0.3986100E+00, 0.4052900E+00, 0.4027100E+00, &
     & 0.4113900E+00, 0.4284700E+00, 0.4315100E+00, 0.4265800E+00, &
     & 0.4358300E+00, 0.4608900E+00, 0.4704300E+00, 0.4992500E+00, &
     & 0.5251600E+00, 0.5323000E+00, 0.5404600E+00, 0.5503400E+00, &
     & 0.5489800E+00, 0.5412100E+00, 0.4388000E+00, 0.4388000E+00 /
      data (ref_adm( 2,iz,37,13),iz = 1,20) / &
     & 0.4052200E+00, 0.4052200E+00, 0.4056000E+00, 0.4021400E+00, &
     & 0.4112100E+00, 0.4129900E+00, 0.4241400E+00, 0.4343500E+00, &
     & 0.4467600E+00, 0.4465800E+00, 0.4667300E+00, 0.4941100E+00, &
     & 0.5153300E+00, 0.5485700E+00, 0.5334700E+00, 0.5459700E+00, &
     & 0.5442500E+00, 0.5434200E+00, 0.4297200E+00, 0.4297200E+00 /
      data (ref_adm( 2,iz,38,13),iz = 1,20) / &
     & 0.4052200E+00, 0.4052200E+00, 0.4056000E+00, 0.4021400E+00, &
     & 0.4112100E+00, 0.4129900E+00, 0.4241400E+00, 0.4343500E+00, &
     & 0.4467600E+00, 0.4465800E+00, 0.4667300E+00, 0.4941100E+00, &
     & 0.5153300E+00, 0.5485700E+00, 0.5334700E+00, 0.5459700E+00, &
     & 0.5442500E+00, 0.5434200E+00, 0.4297200E+00, 0.4297200E+00 /
! Solar Zenith Angle 65.0 Albedo  0.5043609E+00
      data (ref_adm( 2,iz, 1,14),iz = 1,20) / &
     & 0.3901900E+00, 0.3901900E+00, 0.3981100E+00, 0.4000400E+00, &
     & 0.3997800E+00, 0.4291300E+00, 0.4382400E+00, 0.4673500E+00, &
     & 0.5087900E+00, 0.5559100E+00, 0.6032400E+00, 0.6635200E+00, &
     & 0.7500600E+00, 0.9264800E+00, 0.1052700E+01, 0.1238100E+01, &
     & 0.1378600E+01, 0.1465600E+01, 0.1141305E+01, 0.1141305E+01 /
      data (ref_adm( 2,iz, 2,14),iz = 1,20) / &
     & 0.3901900E+00, 0.3901900E+00, 0.3981100E+00, 0.4000400E+00, &
     & 0.3997800E+00, 0.4291300E+00, 0.4382400E+00, 0.4673500E+00, &
     & 0.5087900E+00, 0.5559100E+00, 0.6032400E+00, 0.6635200E+00, &
     & 0.7500600E+00, 0.9264800E+00, 0.1052700E+01, 0.1238100E+01, &
     & 0.1378600E+01, 0.1465600E+01, 0.1141305E+01, 0.1141305E+01 /
      data (ref_adm( 2,iz, 3,14),iz = 1,20) / &
     & 0.3869300E+00, 0.3869300E+00, 0.4020100E+00, 0.4001400E+00, &
     & 0.4210100E+00, 0.4268400E+00, 0.4417400E+00, 0.4775100E+00, &
     & 0.5055000E+00, 0.5430100E+00, 0.5885000E+00, 0.6565300E+00, &
     & 0.7571000E+00, 0.8819600E+00, 0.1013600E+01, 0.1198900E+01, &
     & 0.1336100E+01, 0.1335300E+01, 0.5453578E+00, 0.5453578E+00 /
      data (ref_adm( 2,iz, 4,14),iz = 1,20) / &
     & 0.3837900E+00, 0.3837900E+00, 0.3960700E+00, 0.4137700E+00, &
     & 0.4192900E+00, 0.4176900E+00, 0.4433200E+00, 0.4727300E+00, &
     & 0.5031300E+00, 0.5440800E+00, 0.6028100E+00, 0.6514100E+00, &
     & 0.7429200E+00, 0.8429100E+00, 0.9704100E+00, 0.1152900E+01, &
     & 0.1263300E+01, 0.1275500E+01, 0.1036975E+01, 0.1036975E+01 /
      data (ref_adm( 2,iz, 5,14),iz = 1,20) / &
     & 0.3887600E+00, 0.3887600E+00, 0.4057200E+00, 0.4163200E+00, &
     & 0.4258500E+00, 0.4232400E+00, 0.4453200E+00, 0.4782800E+00, &
     & 0.5139000E+00, 0.5525400E+00, 0.5847600E+00, 0.6499900E+00, &
     & 0.7267000E+00, 0.8234200E+00, 0.9216900E+00, 0.1065300E+01, &
     & 0.1186200E+01, 0.1192300E+01, 0.9605670E+00, 0.9605670E+00 /
      data (ref_adm( 2,iz, 6,14),iz = 1,20) / &
     & 0.3851500E+00, 0.3851500E+00, 0.3818900E+00, 0.3883300E+00, &
     & 0.3926300E+00, 0.4074400E+00, 0.4267700E+00, 0.4568800E+00, &
     & 0.4888400E+00, 0.5344600E+00, 0.5702600E+00, 0.6327600E+00, &
     & 0.7061400E+00, 0.7919800E+00, 0.8945700E+00, 0.1010200E+01, &
     & 0.1151000E+01, 0.1262900E+01, 0.1229600E+01, 0.1229600E+01 /
      data (ref_adm( 2,iz, 7,14),iz = 1,20) / &
     & 0.3906400E+00, 0.3906400E+00, 0.3904600E+00, 0.3976200E+00, &
     & 0.3986800E+00, 0.4109600E+00, 0.4393900E+00, 0.4524600E+00, &
     & 0.4994900E+00, 0.5209400E+00, 0.5597900E+00, 0.6159600E+00, &
     & 0.6734100E+00, 0.7602300E+00, 0.8397100E+00, 0.9225200E+00, &
     & 0.1052900E+01, 0.1133000E+01, 0.9589500E+00, 0.9589500E+00 /
      data (ref_adm( 2,iz, 8,14),iz = 1,20) / &
     & 0.3798600E+00, 0.3798600E+00, 0.3968700E+00, 0.3947000E+00, &
     & 0.3994700E+00, 0.4156900E+00, 0.4299400E+00, 0.4446000E+00, &
     & 0.4674200E+00, 0.5001400E+00, 0.5406800E+00, 0.6029300E+00, &
     & 0.6598000E+00, 0.7278900E+00, 0.7914100E+00, 0.8890100E+00, &
     & 0.1051000E+01, 0.1025000E+01, 0.9006900E+00, 0.9006900E+00 /
      data (ref_adm( 2,iz, 9,14),iz = 1,20) / &
     & 0.3973700E+00, 0.3973700E+00, 0.3951200E+00, 0.3876000E+00, &
     & 0.4013600E+00, 0.4014400E+00, 0.4246100E+00, 0.4438500E+00, &
     & 0.4729800E+00, 0.4893500E+00, 0.5193900E+00, 0.5778800E+00, &
     & 0.6280400E+00, 0.6871200E+00, 0.7523000E+00, 0.8623500E+00, &
     & 0.9720000E+00, 0.9582100E+00, 0.8431000E+00, 0.8431000E+00 /
      data (ref_adm( 2,iz,10,14),iz = 1,20) / &
     & 0.3932700E+00, 0.3932700E+00, 0.3889100E+00, 0.4066800E+00, &
     & 0.4003700E+00, 0.4025300E+00, 0.4188400E+00, 0.4447000E+00, &
     & 0.4620100E+00, 0.4873000E+00, 0.5115300E+00, 0.5609800E+00, &
     & 0.6117900E+00, 0.6608800E+00, 0.7151500E+00, 0.8166600E+00, &
     & 0.8611600E+00, 0.8645300E+00, 0.7296300E+00, 0.7296300E+00 /
      data (ref_adm( 2,iz,11,14),iz = 1,20) / &
     & 0.3888000E+00, 0.3888000E+00, 0.3990000E+00, 0.4045500E+00, &
     & 0.4099700E+00, 0.4192300E+00, 0.4252600E+00, 0.4363300E+00, &
     & 0.4567200E+00, 0.4737400E+00, 0.5009100E+00, 0.5411900E+00, &
     & 0.5868000E+00, 0.6384800E+00, 0.6780900E+00, 0.7704900E+00, &
     & 0.8136000E+00, 0.7943900E+00, 0.6758200E+00, 0.6758200E+00 /
      data (ref_adm( 2,iz,12,14),iz = 1,20) / &
     & 0.3859000E+00, 0.3859000E+00, 0.3869300E+00, 0.3853500E+00, &
     & 0.3990600E+00, 0.4064200E+00, 0.4266600E+00, 0.4441000E+00, &
     & 0.4551900E+00, 0.4756600E+00, 0.5018700E+00, 0.5310000E+00, &
     & 0.5636600E+00, 0.6137300E+00, 0.6518200E+00, 0.7139700E+00, &
     & 0.7573900E+00, 0.7326700E+00, 0.6246700E+00, 0.6246700E+00 /
      data (ref_adm( 2,iz,13,14),iz = 1,20) / &
     & 0.3828300E+00, 0.3828300E+00, 0.4001400E+00, 0.3918200E+00, &
     & 0.3985500E+00, 0.4118000E+00, 0.4150100E+00, 0.4300500E+00, &
     & 0.4480500E+00, 0.4679500E+00, 0.4882000E+00, 0.5179500E+00, &
     & 0.5493700E+00, 0.5898700E+00, 0.6323200E+00, 0.6767000E+00, &
     & 0.7139700E+00, 0.6816900E+00, 0.5466700E+00, 0.5466700E+00 /
      data (ref_adm( 2,iz,14,14),iz = 1,20) / &
     & 0.3940100E+00, 0.3940100E+00, 0.3991600E+00, 0.4042400E+00, &
     & 0.4070800E+00, 0.4097300E+00, 0.4142700E+00, 0.4243000E+00, &
     & 0.4398200E+00, 0.4546700E+00, 0.4765400E+00, 0.5046400E+00, &
     & 0.5308100E+00, 0.5638500E+00, 0.5974300E+00, 0.6407500E+00, &
     & 0.6678600E+00, 0.6549600E+00, 0.5355950E+00, 0.5355950E+00 /
      data (ref_adm( 2,iz,15,14),iz = 1,20) / &
     & 0.3923200E+00, 0.3923200E+00, 0.3816400E+00, 0.3834500E+00, &
     & 0.3915900E+00, 0.4005200E+00, 0.4057300E+00, 0.4206200E+00, &
     & 0.4407100E+00, 0.4537600E+00, 0.4796600E+00, 0.5068100E+00, &
     & 0.5271000E+00, 0.5537600E+00, 0.5842900E+00, 0.6130100E+00, &
     & 0.6353700E+00, 0.5948700E+00, 0.5143502E+00, 0.5143502E+00 /
      data (ref_adm( 2,iz,16,14),iz = 1,20) / &
     & 0.3731400E+00, 0.3731400E+00, 0.3673700E+00, 0.3736300E+00, &
     & 0.3730300E+00, 0.3869800E+00, 0.3941400E+00, 0.4099500E+00, &
     & 0.4292500E+00, 0.4418500E+00, 0.4562700E+00, 0.4767800E+00, &
     & 0.4935700E+00, 0.5226600E+00, 0.5495900E+00, 0.5808600E+00, &
     & 0.6309100E+00, 0.6888700E+00, 0.4959220E+00, 0.4959220E+00 /
      data (ref_adm( 2,iz,17,14),iz = 1,20) / &
     & 0.3780600E+00, 0.3780600E+00, 0.3730200E+00, 0.3788900E+00, &
     & 0.3937400E+00, 0.3926800E+00, 0.4007400E+00, 0.4139100E+00, &
     & 0.4344900E+00, 0.4455400E+00, 0.4489900E+00, 0.4667100E+00, &
     & 0.4851500E+00, 0.5240700E+00, 0.5281300E+00, 0.5464000E+00, &
     & 0.6009200E+00, 0.5344554E+00, 0.4800891E+00, 0.4800891E+00 /
      data (ref_adm( 2,iz,18,14),iz = 1,20) / &
     & 0.3802300E+00, 0.3802300E+00, 0.3676800E+00, 0.3764100E+00, &
     & 0.3780500E+00, 0.3850000E+00, 0.3935400E+00, 0.4104400E+00, &
     & 0.4273000E+00, 0.4396500E+00, 0.4495200E+00, 0.4632900E+00, &
     & 0.4834500E+00, 0.5071800E+00, 0.5089600E+00, 0.5324700E+00, &
     & 0.5502000E+00, 0.5610956E+00, 0.5569946E+00, 0.5569946E+00 /
      data (ref_adm( 2,iz,19,14),iz = 1,20) / &
     & 0.3807200E+00, 0.3807200E+00, 0.3835000E+00, 0.3794000E+00, &
     & 0.3862700E+00, 0.3970800E+00, 0.3937500E+00, 0.4034200E+00, &
     & 0.4220000E+00, 0.4340800E+00, 0.4358800E+00, 0.4532100E+00, &
     & 0.4742400E+00, 0.5020700E+00, 0.5050500E+00, 0.5170100E+00, &
     & 0.5338469E+00, 0.5433856E+00, 0.5450817E+00, 0.5450817E+00 /
      data (ref_adm( 2,iz,20,14),iz = 1,20) / &
     & 0.3864800E+00, 0.3864800E+00, 0.3736100E+00, 0.3835600E+00, &
     & 0.3819800E+00, 0.3963500E+00, 0.4074500E+00, 0.4080500E+00, &
     & 0.4142900E+00, 0.4278600E+00, 0.4398000E+00, 0.4569600E+00, &
     & 0.4762300E+00, 0.4908300E+00, 0.4982200E+00, 0.5133900E+00, &
     & 0.5228523E+00, 0.5321459E+00, 0.5391873E+00, 0.5391873E+00 /
      data (ref_adm( 2,iz,21,14),iz = 1,20) / &
     & 0.3754900E+00, 0.3754900E+00, 0.3672700E+00, 0.3910000E+00, &
     & 0.3909700E+00, 0.3916200E+00, 0.3976300E+00, 0.3958900E+00, &
     & 0.4145900E+00, 0.4211600E+00, 0.4248300E+00, 0.4445700E+00, &
     & 0.4672900E+00, 0.4858800E+00, 0.5032900E+00, 0.5112600E+00, &
     & 0.5157841E+00, 0.5251886E+00, 0.5377874E+00, 0.5377874E+00 /
      data (ref_adm( 2,iz,22,14),iz = 1,20) / &
     & 0.3832000E+00, 0.3832000E+00, 0.3814000E+00, 0.3787300E+00, &
     & 0.3829300E+00, 0.3934100E+00, 0.3989900E+00, 0.4034600E+00, &
     & 0.4120100E+00, 0.4299000E+00, 0.4390600E+00, 0.4459500E+00, &
     & 0.4615900E+00, 0.4842500E+00, 0.4970600E+00, 0.5101300E+00, &
     & 0.4628239E+00, 0.4482945E+00, 0.4222279E+00, 0.4222279E+00 /
      data (ref_adm( 2,iz,23,14),iz = 1,20) / &
     & 0.3888800E+00, 0.3888800E+00, 0.3927500E+00, 0.3820300E+00, &
     & 0.3834000E+00, 0.4006300E+00, 0.3956700E+00, 0.4138600E+00, &
     & 0.4214500E+00, 0.4250100E+00, 0.4465500E+00, 0.4506900E+00, &
     & 0.4589500E+00, 0.4810000E+00, 0.4924800E+00, 0.5192900E+00, &
     & 0.4616661E+00, 0.4477390E+00, 0.4263158E+00, 0.4263158E+00 /
      data (ref_adm( 2,iz,24,14),iz = 1,20) / &
     & 0.3665000E+00, 0.3665000E+00, 0.3727900E+00, 0.3728500E+00, &
     & 0.3767100E+00, 0.3882300E+00, 0.3958400E+00, 0.4073400E+00, &
     & 0.4149800E+00, 0.4240400E+00, 0.4300500E+00, 0.4422500E+00, &
     & 0.4630300E+00, 0.4795400E+00, 0.4933800E+00, 0.5102600E+00, &
     & 0.5405700E+00, 0.4504868E+00, 0.4330542E+00, 0.4330542E+00 /
      data (ref_adm( 2,iz,25,14),iz = 1,20) / &
     & 0.3833800E+00, 0.3833800E+00, 0.3991200E+00, 0.3983400E+00, &
     & 0.4072500E+00, 0.4113800E+00, 0.4204400E+00, 0.4211900E+00, &
     & 0.4302100E+00, 0.4366300E+00, 0.4423900E+00, 0.4547500E+00, &
     & 0.4636000E+00, 0.4801900E+00, 0.4928800E+00, 0.5191700E+00, &
     & 0.5468300E+00, 0.5383400E+00, 0.4419104E+00, 0.4419104E+00 /
      data (ref_adm( 2,iz,26,14),iz = 1,20) / &
     & 0.3897700E+00, 0.3897700E+00, 0.3936400E+00, 0.3997100E+00, &
     & 0.4054800E+00, 0.4087500E+00, 0.4132200E+00, 0.4161200E+00, &
     & 0.4164600E+00, 0.4287700E+00, 0.4421900E+00, 0.4476100E+00, &
     & 0.4572000E+00, 0.4725100E+00, 0.4833800E+00, 0.5196600E+00, &
     & 0.5287700E+00, 0.5319100E+00, 0.4535666E+00, 0.4535666E+00 /
      data (ref_adm( 2,iz,27,14),iz = 1,20) / &
     & 0.3910300E+00, 0.3910300E+00, 0.3952800E+00, 0.3996800E+00, &
     & 0.4011400E+00, 0.4077600E+00, 0.4056100E+00, 0.4132100E+00, &
     & 0.4223000E+00, 0.4425100E+00, 0.4482200E+00, 0.4568600E+00, &
     & 0.4763700E+00, 0.4936000E+00, 0.5062900E+00, 0.5314200E+00, &
     & 0.5304300E+00, 0.5336400E+00, 0.4680800E+00, 0.4680800E+00 /
      data (ref_adm( 2,iz,28,14),iz = 1,20) / &
     & 0.3849900E+00, 0.3849900E+00, 0.3967000E+00, 0.3900300E+00, &
     & 0.3952200E+00, 0.3993600E+00, 0.4185400E+00, 0.4254300E+00, &
     & 0.4310900E+00, 0.4450400E+00, 0.4519600E+00, 0.4691000E+00, &
     & 0.4818000E+00, 0.5041000E+00, 0.5258700E+00, 0.5442400E+00, &
     & 0.5489500E+00, 0.5432500E+00, 0.4727000E+00, 0.4727000E+00 /
      data (ref_adm( 2,iz,29,14),iz = 1,20) / &
     & 0.3833200E+00, 0.3833200E+00, 0.3932800E+00, 0.3899200E+00, &
     & 0.3921100E+00, 0.4106900E+00, 0.4121400E+00, 0.4190000E+00, &
     & 0.4246300E+00, 0.4479500E+00, 0.4713000E+00, 0.4790800E+00, &
     & 0.4923200E+00, 0.5129400E+00, 0.5326900E+00, 0.5579400E+00, &
     & 0.5709500E+00, 0.5597900E+00, 0.4644000E+00, 0.4644000E+00 /
      data (ref_adm( 2,iz,30,14),iz = 1,20) / &
     & 0.3892700E+00, 0.3892700E+00, 0.3837900E+00, 0.3829500E+00, &
     & 0.3962000E+00, 0.4109800E+00, 0.4179900E+00, 0.4160200E+00, &
     & 0.4262400E+00, 0.4541200E+00, 0.4708000E+00, 0.4746800E+00, &
     & 0.4886200E+00, 0.5128100E+00, 0.5375300E+00, 0.5647200E+00, &
     & 0.5884400E+00, 0.5719800E+00, 0.4902000E+00, 0.4902000E+00 /
      data (ref_adm( 2,iz,31,14),iz = 1,20) / &
     & 0.3893500E+00, 0.3893500E+00, 0.3914600E+00, 0.3923500E+00, &
     & 0.3914800E+00, 0.4016300E+00, 0.4125500E+00, 0.4193100E+00, &
     & 0.4470700E+00, 0.4548800E+00, 0.4744800E+00, 0.4729600E+00, &
     & 0.4882300E+00, 0.5100700E+00, 0.5454400E+00, 0.5742700E+00, &
     & 0.5817100E+00, 0.5684300E+00, 0.5030700E+00, 0.5030700E+00 /
      data (ref_adm( 2,iz,32,14),iz = 1,20) / &
     & 0.3842300E+00, 0.3842300E+00, 0.3883600E+00, 0.3945600E+00, &
     & 0.3942400E+00, 0.3976700E+00, 0.4142500E+00, 0.4343200E+00, &
     & 0.4474600E+00, 0.4657700E+00, 0.4808100E+00, 0.4858800E+00, &
     & 0.4958300E+00, 0.5172900E+00, 0.5455500E+00, 0.5846000E+00, &
     & 0.5926900E+00, 0.5834900E+00, 0.5015700E+00, 0.5015700E+00 /
      data (ref_adm( 2,iz,33,14),iz = 1,20) / &
     & 0.3811000E+00, 0.3811000E+00, 0.3694900E+00, 0.3814900E+00, &
     & 0.3857600E+00, 0.3942100E+00, 0.4105600E+00, 0.4365300E+00, &
     & 0.4365200E+00, 0.4549200E+00, 0.4699500E+00, 0.4909500E+00, &
     & 0.5104100E+00, 0.5274300E+00, 0.5466800E+00, 0.5753300E+00, &
     & 0.6036800E+00, 0.5690200E+00, 0.4871800E+00, 0.4871800E+00 /
      data (ref_adm( 2,iz,34,14),iz = 1,20) / &
     & 0.3811400E+00, 0.3811400E+00, 0.3893700E+00, 0.3901900E+00, &
     & 0.3959300E+00, 0.4085700E+00, 0.4143400E+00, 0.4279400E+00, &
     & 0.4409800E+00, 0.4443000E+00, 0.4642300E+00, 0.4926100E+00, &
     & 0.5149600E+00, 0.5246600E+00, 0.5472200E+00, 0.5738700E+00, &
     & 0.6202100E+00, 0.5765800E+00, 0.4936000E+00, 0.4936000E+00 /
      data (ref_adm( 2,iz,35,14),iz = 1,20) / &
     & 0.3948800E+00, 0.3948800E+00, 0.3911900E+00, 0.3895300E+00, &
     & 0.4015400E+00, 0.4066200E+00, 0.4171700E+00, 0.4342400E+00, &
     & 0.4513300E+00, 0.4622100E+00, 0.4728300E+00, 0.4930300E+00, &
     & 0.5201200E+00, 0.5426300E+00, 0.5631200E+00, 0.5905200E+00, &
     & 0.5952200E+00, 0.5925900E+00, 0.4809100E+00, 0.4809100E+00 /
      data (ref_adm( 2,iz,36,14),iz = 1,20) / &
     & 0.3869200E+00, 0.3869200E+00, 0.3884200E+00, 0.3854700E+00, &
     & 0.3924100E+00, 0.4105300E+00, 0.4315900E+00, 0.4420600E+00, &
     & 0.4486700E+00, 0.4660300E+00, 0.4684700E+00, 0.4909100E+00, &
     & 0.5217400E+00, 0.5488000E+00, 0.5741500E+00, 0.5941900E+00, &
     & 0.5931200E+00, 0.5895000E+00, 0.4899600E+00, 0.4899600E+00 /
      data (ref_adm( 2,iz,37,14),iz = 1,20) / &
     & 0.3907100E+00, 0.3907100E+00, 0.3875200E+00, 0.3939200E+00, &
     & 0.4031500E+00, 0.4296000E+00, 0.4355800E+00, 0.4333000E+00, &
     & 0.4391500E+00, 0.4592100E+00, 0.4729500E+00, 0.4811900E+00, &
     & 0.5181700E+00, 0.5577400E+00, 0.5840000E+00, 0.5904000E+00, &
     & 0.5873200E+00, 0.5844500E+00, 0.5003800E+00, 0.5003800E+00 /
      data (ref_adm( 2,iz,38,14),iz = 1,20) / &
     & 0.3907100E+00, 0.3907100E+00, 0.3875200E+00, 0.3939200E+00, &
     & 0.4031500E+00, 0.4296000E+00, 0.4355800E+00, 0.4333000E+00, &
     & 0.4391500E+00, 0.4592100E+00, 0.4729500E+00, 0.4811900E+00, &
     & 0.5181700E+00, 0.5577400E+00, 0.5840000E+00, 0.5904000E+00, &
     & 0.5873200E+00, 0.5844500E+00, 0.5003800E+00, 0.5003800E+00 /
! Solar Zenith Angle 70.0 Albedo  0.5257446E+00
      data (ref_adm( 2,iz, 1,15),iz = 1,20) / &
     & 0.3946900E+00, 0.3946900E+00, 0.3911300E+00, 0.3943600E+00, &
     & 0.4108200E+00, 0.4222300E+00, 0.4423600E+00, 0.4821700E+00, &
     & 0.5150400E+00, 0.5608800E+00, 0.6418800E+00, 0.7309100E+00, &
     & 0.8526700E+00, 0.1039800E+01, 0.1212200E+01, 0.1393100E+01, &
     & 0.1589520E+01, 0.1773865E+01, 0.1382034E+01, 0.1382034E+01 /
      data (ref_adm( 2,iz, 2,15),iz = 1,20) / &
     & 0.3946900E+00, 0.3946900E+00, 0.3911300E+00, 0.3943600E+00, &
     & 0.4108200E+00, 0.4222300E+00, 0.4423600E+00, 0.4821700E+00, &
     & 0.5150400E+00, 0.5608800E+00, 0.6418800E+00, 0.7309100E+00, &
     & 0.8526700E+00, 0.1039800E+01, 0.1212200E+01, 0.1393100E+01, &
     & 0.1589520E+01, 0.1773865E+01, 0.1382034E+01, 0.1382034E+01 /
      data (ref_adm( 2,iz, 3,15),iz = 1,20) / &
     & 0.3775700E+00, 0.3775700E+00, 0.3845600E+00, 0.3896500E+00, &
     & 0.4050700E+00, 0.4297400E+00, 0.4513300E+00, 0.4673900E+00, &
     & 0.4999800E+00, 0.5648100E+00, 0.6378500E+00, 0.7255300E+00, &
     & 0.8204300E+00, 0.9943200E+00, 0.1149500E+01, 0.1359100E+01, &
     & 0.1558511E+01, 0.1726253E+01, 0.5396631E+00, 0.5396631E+00 /
      data (ref_adm( 2,iz, 4,15),iz = 1,20) / &
     & 0.3828100E+00, 0.3828100E+00, 0.3866900E+00, 0.3927400E+00, &
     & 0.4101000E+00, 0.4270800E+00, 0.4407100E+00, 0.4762600E+00, &
     & 0.5025600E+00, 0.5666500E+00, 0.6263800E+00, 0.6973600E+00, &
     & 0.8112700E+00, 0.9487000E+00, 0.1114100E+01, 0.1255900E+01, &
     & 0.1525200E+01, 0.1633338E+01, 0.1241942E+01, 0.1241942E+01 /
      data (ref_adm( 2,iz, 5,15),iz = 1,20) / &
     & 0.3905600E+00, 0.3905600E+00, 0.3891900E+00, 0.4001000E+00, &
     & 0.4193800E+00, 0.4262800E+00, 0.4404200E+00, 0.4746300E+00, &
     & 0.5118900E+00, 0.5477900E+00, 0.6102000E+00, 0.7019100E+00, &
     & 0.8022300E+00, 0.9422200E+00, 0.1084200E+01, 0.1172300E+01, &
     & 0.1218800E+01, 0.1515079E+01, 0.1140534E+01, 0.1140534E+01 /
      data (ref_adm( 2,iz, 6,15),iz = 1,20) / &
     & 0.3774500E+00, 0.3774500E+00, 0.3831300E+00, 0.3850600E+00, &
     & 0.4019400E+00, 0.4227000E+00, 0.4455100E+00, 0.4678400E+00, &
     & 0.5100700E+00, 0.5507300E+00, 0.6017700E+00, 0.6839800E+00, &
     & 0.7885400E+00, 0.9001700E+00, 0.1020800E+01, 0.1150400E+01, &
     & 0.1398000E+01, 0.1657600E+01, 0.1281800E+01, 0.1281800E+01 /
      data (ref_adm( 2,iz, 7,15),iz = 1,20) / &
     & 0.3783900E+00, 0.3783900E+00, 0.3799700E+00, 0.3906900E+00, &
     & 0.4017500E+00, 0.4174000E+00, 0.4368900E+00, 0.4693700E+00, &
     & 0.5044100E+00, 0.5411700E+00, 0.5922900E+00, 0.6610700E+00, &
     & 0.7518200E+00, 0.8563600E+00, 0.9615600E+00, 0.1081800E+01, &
     & 0.1244000E+01, 0.1329300E+01, 0.9520411E+00, 0.9520411E+00 /
      data (ref_adm( 2,iz, 8,15),iz = 1,20) / &
     & 0.3793300E+00, 0.3793300E+00, 0.3849300E+00, 0.3969900E+00, &
     & 0.3945200E+00, 0.4089500E+00, 0.4314400E+00, 0.4647700E+00, &
     & 0.4827700E+00, 0.5243500E+00, 0.5729500E+00, 0.6438700E+00, &
     & 0.7153800E+00, 0.7952000E+00, 0.8951000E+00, 0.1024800E+01, &
     & 0.1190700E+01, 0.1233900E+01, 0.9438800E+00, 0.9438800E+00 /
      data (ref_adm( 2,iz, 9,15),iz = 1,20) / &
     & 0.3816900E+00, 0.3816900E+00, 0.3866900E+00, 0.3927000E+00, &
     & 0.3946300E+00, 0.4105600E+00, 0.4283600E+00, 0.4503400E+00, &
     & 0.4773900E+00, 0.5115300E+00, 0.5558100E+00, 0.6186600E+00, &
     & 0.6897500E+00, 0.7650000E+00, 0.8492000E+00, 0.9685900E+00, &
     & 0.1109400E+01, 0.1103000E+01, 0.9520600E+00, 0.9520600E+00 /
      data (ref_adm( 2,iz,10,15),iz = 1,20) / &
     & 0.3776000E+00, 0.3776000E+00, 0.3821400E+00, 0.3782200E+00, &
     & 0.3828800E+00, 0.4106300E+00, 0.4287300E+00, 0.4458200E+00, &
     & 0.4756400E+00, 0.5019400E+00, 0.5432200E+00, 0.5948200E+00, &
     & 0.6449600E+00, 0.7103200E+00, 0.7839900E+00, 0.8994900E+00, &
     & 0.1012800E+01, 0.9574600E+00, 0.8640300E+00, 0.8640300E+00 /
      data (ref_adm( 2,iz,11,15),iz = 1,20) / &
     & 0.3710400E+00, 0.3710400E+00, 0.3816400E+00, 0.3879600E+00, &
     & 0.3976500E+00, 0.4108000E+00, 0.4261000E+00, 0.4474000E+00, &
     & 0.4689400E+00, 0.4968700E+00, 0.5415200E+00, 0.5776800E+00, &
     & 0.6208500E+00, 0.6786800E+00, 0.7408000E+00, 0.8423900E+00, &
     & 0.9107800E+00, 0.8744000E+00, 0.7588400E+00, 0.7588400E+00 /
      data (ref_adm( 2,iz,12,15),iz = 1,20) / &
     & 0.3682500E+00, 0.3682500E+00, 0.3748500E+00, 0.3794200E+00, &
     & 0.3984500E+00, 0.4144700E+00, 0.4192200E+00, 0.4438000E+00, &
     & 0.4600000E+00, 0.4870300E+00, 0.5318400E+00, 0.5508100E+00, &
     & 0.5961300E+00, 0.6560600E+00, 0.7029200E+00, 0.7897300E+00, &
     & 0.8544500E+00, 0.8352500E+00, 0.6800700E+00, 0.6800700E+00 /
      data (ref_adm( 2,iz,13,15),iz = 1,20) / &
     & 0.3757900E+00, 0.3757900E+00, 0.3782200E+00, 0.3800400E+00, &
     & 0.4017100E+00, 0.4100300E+00, 0.4221600E+00, 0.4428100E+00, &
     & 0.4547600E+00, 0.4732900E+00, 0.5037800E+00, 0.5380800E+00, &
     & 0.5690900E+00, 0.6277600E+00, 0.6685600E+00, 0.7376400E+00, &
     & 0.8035500E+00, 0.7784800E+00, 0.6591600E+00, 0.6591600E+00 /
      data (ref_adm( 2,iz,14,15),iz = 1,20) / &
     & 0.3836300E+00, 0.3836300E+00, 0.3888600E+00, 0.3947700E+00, &
     & 0.3999600E+00, 0.4056800E+00, 0.4180200E+00, 0.4292700E+00, &
     & 0.4522000E+00, 0.4700300E+00, 0.4932000E+00, 0.5240300E+00, &
     & 0.5486100E+00, 0.5892200E+00, 0.6339200E+00, 0.6843600E+00, &
     & 0.7349400E+00, 0.7266400E+00, 0.5808302E+00, 0.5808302E+00 /
      data (ref_adm( 2,iz,15,15),iz = 1,20) / &
     & 0.3835000E+00, 0.3835000E+00, 0.3819300E+00, 0.3825800E+00, &
     & 0.3903100E+00, 0.4021700E+00, 0.4109900E+00, 0.4237200E+00, &
     & 0.4384000E+00, 0.4576300E+00, 0.4856200E+00, 0.5245700E+00, &
     & 0.5554700E+00, 0.5863400E+00, 0.6066900E+00, 0.6401200E+00, &
     & 0.6797300E+00, 0.7113900E+00, 0.5539727E+00, 0.5539727E+00 /
      data (ref_adm( 2,iz,16,15),iz = 1,20) / &
     & 0.3749000E+00, 0.3749000E+00, 0.3730400E+00, 0.3694500E+00, &
     & 0.3771100E+00, 0.3836300E+00, 0.3950200E+00, 0.4093900E+00, &
     & 0.4239400E+00, 0.4430100E+00, 0.4638300E+00, 0.4879900E+00, &
     & 0.5177200E+00, 0.5552500E+00, 0.5813500E+00, 0.6201900E+00, &
     & 0.6445600E+00, 0.5861806E+00, 0.5315735E+00, 0.5315735E+00 /
      data (ref_adm( 2,iz,17,15),iz = 1,20) / &
     & 0.3770400E+00, 0.3770400E+00, 0.3840500E+00, 0.3883000E+00, &
     & 0.3908600E+00, 0.4037600E+00, 0.4044500E+00, 0.4126900E+00, &
     & 0.4245300E+00, 0.4405500E+00, 0.4550100E+00, 0.4812500E+00, &
     & 0.5211500E+00, 0.5372500E+00, 0.5666300E+00, 0.5946500E+00, &
     & 0.6226800E+00, 0.5566038E+00, 0.5127222E+00, 0.5127222E+00 /
      data (ref_adm( 2,iz,18,15),iz = 1,20) / &
     & 0.3746200E+00, 0.3746200E+00, 0.3769300E+00, 0.3783800E+00, &
     & 0.3876000E+00, 0.3918900E+00, 0.3958700E+00, 0.4062800E+00, &
     & 0.4241200E+00, 0.4361100E+00, 0.4510500E+00, 0.4740200E+00, &
     & 0.5047500E+00, 0.5354500E+00, 0.5509900E+00, 0.5674200E+00, &
     & 0.6433600E+00, 0.6016029E+00, 0.5754843E+00, 0.5754843E+00 /
      data (ref_adm( 2,iz,19,15),iz = 1,20) / &
     & 0.3725900E+00, 0.3725900E+00, 0.3904900E+00, 0.3790400E+00, &
     & 0.3811100E+00, 0.3935000E+00, 0.3944400E+00, 0.3956300E+00, &
     & 0.4198300E+00, 0.4223000E+00, 0.4489400E+00, 0.4798100E+00, &
     & 0.4950500E+00, 0.5104800E+00, 0.5342400E+00, 0.5160400E+00, &
     & 0.5735999E+00, 0.5799786E+00, 0.5625837E+00, 0.5625837E+00 /
      data (ref_adm( 2,iz,20,15),iz = 1,20) / &
     & 0.3775700E+00, 0.3775700E+00, 0.3779200E+00, 0.3835900E+00, &
     & 0.3853700E+00, 0.3950200E+00, 0.3901300E+00, 0.4079400E+00, &
     & 0.4104600E+00, 0.4308500E+00, 0.4488000E+00, 0.4711900E+00, &
     & 0.4879000E+00, 0.5023900E+00, 0.5216800E+00, 0.4949000E+00, &
     & 0.5584939E+00, 0.5653926E+00, 0.5558512E+00, 0.5558512E+00 /
      data (ref_adm( 2,iz,21,15),iz = 1,20) / &
     & 0.3726300E+00, 0.3726300E+00, 0.3808700E+00, 0.3785700E+00, &
     & 0.3878300E+00, 0.3906400E+00, 0.3928200E+00, 0.4063100E+00, &
     & 0.4104000E+00, 0.4330400E+00, 0.4486400E+00, 0.4622300E+00, &
     & 0.4824400E+00, 0.5033400E+00, 0.5241900E+00, 0.5476100E+00, &
     & 0.5472830E+00, 0.5550743E+00, 0.5536677E+00, 0.5536677E+00 /
      data (ref_adm( 2,iz,22,15),iz = 1,20) / &
     & 0.3722800E+00, 0.3722800E+00, 0.3796600E+00, 0.3770300E+00, &
     & 0.3852600E+00, 0.3909800E+00, 0.4024400E+00, 0.4026800E+00, &
     & 0.4098000E+00, 0.4346200E+00, 0.4526600E+00, 0.4656500E+00, &
     & 0.4903400E+00, 0.5032300E+00, 0.5199100E+00, 0.5388200E+00, &
     & 0.4992627E+00, 0.4927622E+00, 0.4794155E+00, 0.4794155E+00 /
      data (ref_adm( 2,iz,23,15),iz = 1,20) / &
     & 0.3658700E+00, 0.3658700E+00, 0.3700600E+00, 0.3843300E+00, &
     & 0.3858300E+00, 0.3798800E+00, 0.3969100E+00, 0.4015300E+00, &
     & 0.4108900E+00, 0.4298500E+00, 0.4501900E+00, 0.4652100E+00, &
     & 0.4839700E+00, 0.4940600E+00, 0.5066100E+00, 0.5350600E+00, &
     & 0.5579400E+00, 0.4920658E+00, 0.4847262E+00, 0.4847262E+00 /
      data (ref_adm( 2,iz,24,15),iz = 1,20) / &
     & 0.3705600E+00, 0.3705600E+00, 0.3734600E+00, 0.3776500E+00, &
     & 0.3836900E+00, 0.3855500E+00, 0.3965900E+00, 0.4054400E+00, &
     & 0.4132500E+00, 0.4192600E+00, 0.4373500E+00, 0.4549500E+00, &
     & 0.4623700E+00, 0.4841100E+00, 0.5083600E+00, 0.5365300E+00, &
     & 0.5715300E+00, 0.4954326E+00, 0.4935425E+00, 0.4935425E+00 /
      data (ref_adm( 2,iz,25,15),iz = 1,20) / &
     & 0.3829400E+00, 0.3829400E+00, 0.3890600E+00, 0.3943600E+00, &
     & 0.3956500E+00, 0.3976600E+00, 0.4006200E+00, 0.4113600E+00, &
     & 0.4207300E+00, 0.4336600E+00, 0.4492300E+00, 0.4676700E+00, &
     & 0.4809200E+00, 0.4971000E+00, 0.5092000E+00, 0.5518600E+00, &
     & 0.5805500E+00, 0.5862600E+00, 0.5051461E+00, 0.5051461E+00 /
      data (ref_adm( 2,iz,26,15),iz = 1,20) / &
     & 0.3806900E+00, 0.3806900E+00, 0.3802600E+00, 0.3930500E+00, &
     & 0.3885100E+00, 0.3902600E+00, 0.4076700E+00, 0.4111200E+00, &
     & 0.4211300E+00, 0.4261200E+00, 0.4457400E+00, 0.4631300E+00, &
     & 0.4704200E+00, 0.4879000E+00, 0.5032900E+00, 0.5653700E+00, &
     & 0.5786200E+00, 0.5980300E+00, 0.5205469E+00, 0.5205469E+00 /
      data (ref_adm( 2,iz,27,15),iz = 1,20) / &
     & 0.3796000E+00, 0.3796000E+00, 0.3881000E+00, 0.3932100E+00, &
     & 0.3879300E+00, 0.3892300E+00, 0.4015700E+00, 0.4093400E+00, &
     & 0.4188100E+00, 0.4409200E+00, 0.4583000E+00, 0.4742100E+00, &
     & 0.4870300E+00, 0.5113600E+00, 0.5267700E+00, 0.5549000E+00, &
     & 0.5803100E+00, 0.5960000E+00, 0.5360300E+00, 0.5360300E+00 /
      data (ref_adm( 2,iz,28,15),iz = 1,20) / &
     & 0.3794200E+00, 0.3794200E+00, 0.3829600E+00, 0.3781100E+00, &
     & 0.3860200E+00, 0.3850000E+00, 0.3958800E+00, 0.4100500E+00, &
     & 0.4262500E+00, 0.4369800E+00, 0.4623500E+00, 0.4809800E+00, &
     & 0.4975900E+00, 0.5268300E+00, 0.5457700E+00, 0.5808700E+00, &
     & 0.6101700E+00, 0.6028900E+00, 0.5494600E+00, 0.5494600E+00 /
      data (ref_adm( 2,iz,29,15),iz = 1,20) / &
     & 0.3800000E+00, 0.3800000E+00, 0.3797300E+00, 0.3852100E+00, &
     & 0.3963300E+00, 0.3954700E+00, 0.3986300E+00, 0.4102200E+00, &
     & 0.4248900E+00, 0.4492800E+00, 0.4645300E+00, 0.4873900E+00, &
     & 0.5089600E+00, 0.5292800E+00, 0.5658600E+00, 0.5938700E+00, &
     & 0.6155000E+00, 0.6252000E+00, 0.5451800E+00, 0.5451800E+00 /
      data (ref_adm( 2,iz,30,15),iz = 1,20) / &
     & 0.3829800E+00, 0.3829800E+00, 0.3818400E+00, 0.3819400E+00, &
     & 0.3870600E+00, 0.3959500E+00, 0.4080400E+00, 0.4233700E+00, &
     & 0.4296900E+00, 0.4454500E+00, 0.4648500E+00, 0.4929700E+00, &
     & 0.5149300E+00, 0.5288100E+00, 0.5671700E+00, 0.5952700E+00, &
     & 0.6327800E+00, 0.6419700E+00, 0.5513500E+00, 0.5513500E+00 /
      data (ref_adm( 2,iz,31,15),iz = 1,20) / &
     & 0.3741900E+00, 0.3741900E+00, 0.3775000E+00, 0.3805000E+00, &
     & 0.3959400E+00, 0.4024300E+00, 0.4108500E+00, 0.4295200E+00, &
     & 0.4429700E+00, 0.4590000E+00, 0.4795900E+00, 0.4977900E+00, &
     & 0.5186800E+00, 0.5233500E+00, 0.5513500E+00, 0.5974400E+00, &
     & 0.6221300E+00, 0.6264100E+00, 0.5429400E+00, 0.5429400E+00 /
      data (ref_adm( 2,iz,32,15),iz = 1,20) / &
     & 0.3683000E+00, 0.3683000E+00, 0.3763200E+00, 0.3856100E+00, &
     & 0.3935500E+00, 0.3942400E+00, 0.4100200E+00, 0.4263700E+00, &
     & 0.4463600E+00, 0.4663700E+00, 0.4833500E+00, 0.5014200E+00, &
     & 0.5220700E+00, 0.5428000E+00, 0.5714000E+00, 0.6169200E+00, &
     & 0.6464300E+00, 0.6603100E+00, 0.5897200E+00, 0.5897200E+00 /
      data (ref_adm( 2,iz,33,15),iz = 1,20) / &
     & 0.3842800E+00, 0.3842800E+00, 0.3803200E+00, 0.3819900E+00, &
     & 0.3871700E+00, 0.3993800E+00, 0.4001400E+00, 0.4194200E+00, &
     & 0.4463400E+00, 0.4648000E+00, 0.4835900E+00, 0.4998900E+00, &
     & 0.5299600E+00, 0.5553500E+00, 0.5734000E+00, 0.6223500E+00, &
     & 0.6474900E+00, 0.6454200E+00, 0.5719600E+00, 0.5719600E+00 /
      data (ref_adm( 2,iz,34,15),iz = 1,20) / &
     & 0.3775900E+00, 0.3775900E+00, 0.3855200E+00, 0.3850500E+00, &
     & 0.3882000E+00, 0.3977600E+00, 0.4140800E+00, 0.4325800E+00, &
     & 0.4451200E+00, 0.4609500E+00, 0.4847600E+00, 0.4987700E+00, &
     & 0.5418900E+00, 0.5782500E+00, 0.5806600E+00, 0.6066200E+00, &
     & 0.6591900E+00, 0.6780300E+00, 0.5650900E+00, 0.5650900E+00 /
      data (ref_adm( 2,iz,35,15),iz = 1,20) / &
     & 0.3837000E+00, 0.3837000E+00, 0.3926700E+00, 0.3877400E+00, &
     & 0.3917300E+00, 0.4089100E+00, 0.4253300E+00, 0.4366000E+00, &
     & 0.4543600E+00, 0.4780100E+00, 0.4920200E+00, 0.5084000E+00, &
     & 0.5439400E+00, 0.5710300E+00, 0.5878600E+00, 0.6248200E+00, &
     & 0.6643400E+00, 0.6557900E+00, 0.5638100E+00, 0.5638100E+00 /
      data (ref_adm( 2,iz,36,15),iz = 1,20) / &
     & 0.3834700E+00, 0.3834700E+00, 0.3775000E+00, 0.3825600E+00, &
     & 0.3949400E+00, 0.4089500E+00, 0.4206800E+00, 0.4432100E+00, &
     & 0.4566800E+00, 0.4653700E+00, 0.4855600E+00, 0.5078500E+00, &
     & 0.5364400E+00, 0.5634800E+00, 0.5983600E+00, 0.6347100E+00, &
     & 0.6679900E+00, 0.6768500E+00, 0.5648200E+00, 0.5648200E+00 /
      data (ref_adm( 2,iz,37,15),iz = 1,20) / &
     & 0.3760300E+00, 0.3760300E+00, 0.3755600E+00, 0.3910200E+00, &
     & 0.3968800E+00, 0.4131700E+00, 0.4339600E+00, 0.4405400E+00, &
     & 0.4566100E+00, 0.4729600E+00, 0.4959800E+00, 0.5030700E+00, &
     & 0.5363600E+00, 0.5584100E+00, 0.6071800E+00, 0.6514600E+00, &
     & 0.6665900E+00, 0.6592300E+00, 0.5689600E+00, 0.5689600E+00 /
      data (ref_adm( 2,iz,38,15),iz = 1,20) / &
     & 0.3760300E+00, 0.3760300E+00, 0.3755600E+00, 0.3910200E+00, &
     & 0.3968800E+00, 0.4131700E+00, 0.4339600E+00, 0.4405400E+00, &
     & 0.4566100E+00, 0.4729600E+00, 0.4959800E+00, 0.5030700E+00, &
     & 0.5363600E+00, 0.5584100E+00, 0.6071800E+00, 0.6514600E+00, &
     & 0.6665900E+00, 0.6592300E+00, 0.5689600E+00, 0.5689600E+00 /
! Solar Zenith Angle 75.0 Albedo  0.5465679E+00
      data (ref_adm( 2,iz, 1,16),iz = 1,20) / &
     & 0.3761300E+00, 0.3761300E+00, 0.3868800E+00, 0.3942600E+00, &
     & 0.4120300E+00, 0.4315400E+00, 0.4427000E+00, 0.4758700E+00, &
     & 0.5340000E+00, 0.5838200E+00, 0.6695700E+00, 0.7665900E+00, &
     & 0.9102300E+00, 0.1075500E+01, 0.1239277E+01, 0.1496240E+01, &
     & 0.1792427E+01, 0.2201333E+01, 0.1818194E+01, 0.1818194E+01 /
      data (ref_adm( 2,iz, 2,16),iz = 1,20) / &
     & 0.3761300E+00, 0.3761300E+00, 0.3868800E+00, 0.3942600E+00, &
     & 0.4120300E+00, 0.4315400E+00, 0.4427000E+00, 0.4758700E+00, &
     & 0.5340000E+00, 0.5838200E+00, 0.6695700E+00, 0.7665900E+00, &
     & 0.9102300E+00, 0.1075500E+01, 0.1239277E+01, 0.1496240E+01, &
     & 0.1792427E+01, 0.2201333E+01, 0.1818194E+01, 0.1818194E+01 /
      data (ref_adm( 2,iz, 3,16),iz = 1,20) / &
     & 0.3791500E+00, 0.3791500E+00, 0.3896500E+00, 0.3961700E+00, &
     & 0.4087900E+00, 0.4242400E+00, 0.4470400E+00, 0.4873200E+00, &
     & 0.5284800E+00, 0.5878800E+00, 0.6615400E+00, 0.7764500E+00, &
     & 0.8853400E+00, 0.9020100E+00, 0.1224210E+01, 0.1471656E+01, &
     & 0.1750450E+01, 0.2114305E+01, 0.7963443E+00, 0.7963443E+00 /
      data (ref_adm( 2,iz, 4,16),iz = 1,20) / &
     & 0.3828200E+00, 0.3828200E+00, 0.3783600E+00, 0.3830000E+00, &
     & 0.3999800E+00, 0.4212600E+00, 0.4518800E+00, 0.4800400E+00, &
     & 0.5192200E+00, 0.5739600E+00, 0.6483300E+00, 0.7550500E+00, &
     & 0.8438900E+00, 0.9592100E+00, 0.1192218E+01, 0.1421630E+01, &
     & 0.1666933E+01, 0.1955758E+01, 0.1600246E+01, 0.1600246E+01 /
      data (ref_adm( 2,iz, 5,16),iz = 1,20) / &
     & 0.3725600E+00, 0.3725600E+00, 0.3751000E+00, 0.3870000E+00, &
     & 0.4005400E+00, 0.4168300E+00, 0.4489100E+00, 0.4779800E+00, &
     & 0.5176600E+00, 0.5709100E+00, 0.6420800E+00, 0.7409400E+00, &
     & 0.8383300E+00, 0.9685900E+00, 0.1148116E+01, 0.1355331E+01, &
     & 0.1560901E+01, 0.1772585E+01, 0.1407459E+01, 0.1407459E+01 /
      data (ref_adm( 2,iz, 6,16),iz = 1,20) / &
     & 0.3721700E+00, 0.3721700E+00, 0.3820100E+00, 0.3952000E+00, &
     & 0.4091900E+00, 0.4322700E+00, 0.4557700E+00, 0.4854700E+00, &
     & 0.5275500E+00, 0.5727400E+00, 0.6396500E+00, 0.7272300E+00, &
     & 0.8270400E+00, 0.9788800E+00, 0.1203800E+01, 0.1471700E+01, &
     & 0.1776200E+01, 0.2108500E+01, 0.1247895E+01, 0.1247895E+01 /
      data (ref_adm( 2,iz, 7,16),iz = 1,20) / &
     & 0.3722000E+00, 0.3722000E+00, 0.3784500E+00, 0.3950600E+00, &
     & 0.4053800E+00, 0.4235800E+00, 0.4448100E+00, 0.4765000E+00, &
     & 0.5094500E+00, 0.5602400E+00, 0.6167800E+00, 0.6917800E+00, &
     & 0.7942500E+00, 0.9461700E+00, 0.1097700E+01, 0.1315000E+01, &
     & 0.1588700E+01, 0.1736800E+01, 0.1339000E+01, 0.1339000E+01 /
      data (ref_adm( 2,iz, 8,16),iz = 1,20) / &
     & 0.3635500E+00, 0.3635500E+00, 0.3774100E+00, 0.3828100E+00, &
     & 0.4045000E+00, 0.4182500E+00, 0.4453300E+00, 0.4762600E+00, &
     & 0.5100400E+00, 0.5424800E+00, 0.5985100E+00, 0.6667600E+00, &
     & 0.7471700E+00, 0.8930500E+00, 0.1017300E+01, 0.1222800E+01, &
     & 0.1398300E+01, 0.1447800E+01, 0.1012212E+01, 0.1012212E+01 /
      data (ref_adm( 2,iz, 9,16),iz = 1,20) / &
     & 0.3706900E+00, 0.3706900E+00, 0.3832800E+00, 0.3876000E+00, &
     & 0.3884800E+00, 0.4114300E+00, 0.4383500E+00, 0.4616100E+00, &
     & 0.4890500E+00, 0.5362700E+00, 0.5824500E+00, 0.6440300E+00, &
     & 0.7337000E+00, 0.8371200E+00, 0.9166600E+00, 0.1120100E+01, &
     & 0.1294100E+01, 0.1308300E+01, 0.1226300E+01, 0.1226300E+01 /
      data (ref_adm( 2,iz,10,16),iz = 1,20) / &
     & 0.3682100E+00, 0.3682100E+00, 0.3834700E+00, 0.3825200E+00, &
     & 0.3861200E+00, 0.4109900E+00, 0.4297400E+00, 0.4528900E+00, &
     & 0.4735700E+00, 0.5153900E+00, 0.5588600E+00, 0.6212200E+00, &
     & 0.6891100E+00, 0.7913900E+00, 0.8659800E+00, 0.9977200E+00, &
     & 0.1144900E+01, 0.1140600E+01, 0.1024300E+01, 0.1024300E+01 /
      data (ref_adm( 2,iz,11,16),iz = 1,20) / &
     & 0.3758800E+00, 0.3758800E+00, 0.3779300E+00, 0.3817700E+00, &
     & 0.3998700E+00, 0.4125600E+00, 0.4307700E+00, 0.4465100E+00, &
     & 0.4671300E+00, 0.4957900E+00, 0.5461400E+00, 0.6003100E+00, &
     & 0.6674200E+00, 0.7565900E+00, 0.8254200E+00, 0.9334800E+00, &
     & 0.1060700E+01, 0.1038000E+01, 0.9238000E+00, 0.9238000E+00 /
      data (ref_adm( 2,iz,12,16),iz = 1,20) / &
     & 0.3746900E+00, 0.3746900E+00, 0.3677100E+00, 0.3730700E+00, &
     & 0.3836000E+00, 0.3991700E+00, 0.4173300E+00, 0.4378300E+00, &
     & 0.4628000E+00, 0.4950300E+00, 0.5279100E+00, 0.5706600E+00, &
     & 0.6323700E+00, 0.7020900E+00, 0.7747500E+00, 0.8841500E+00, &
     & 0.9766200E+00, 0.9343000E+00, 0.7873100E+00, 0.7873100E+00 /
      data (ref_adm( 2,iz,13,16),iz = 1,20) / &
     & 0.3695100E+00, 0.3695100E+00, 0.3713500E+00, 0.3785000E+00, &
     & 0.3759300E+00, 0.3820000E+00, 0.3997800E+00, 0.4271800E+00, &
     & 0.4573600E+00, 0.4904000E+00, 0.5184700E+00, 0.5599200E+00, &
     & 0.6015500E+00, 0.6608400E+00, 0.7342700E+00, 0.8148300E+00, &
     & 0.9108200E+00, 0.8899000E+00, 0.7671100E+00, 0.7671100E+00 /
      data (ref_adm( 2,iz,14,16),iz = 1,20) / &
     & 0.3724400E+00, 0.3724400E+00, 0.3771800E+00, 0.3828700E+00, &
     & 0.3917600E+00, 0.4021900E+00, 0.4136600E+00, 0.4315400E+00, &
     & 0.4515100E+00, 0.4728400E+00, 0.5046700E+00, 0.5365300E+00, &
     & 0.5726600E+00, 0.6284600E+00, 0.6821400E+00, 0.7635400E+00, &
     & 0.8478400E+00, 0.8480400E+00, 0.6499795E+00, 0.6499795E+00 /
      data (ref_adm( 2,iz,15,16),iz = 1,20) / &
     & 0.3754900E+00, 0.3754900E+00, 0.3762300E+00, 0.3828500E+00, &
     & 0.3910900E+00, 0.3987600E+00, 0.4121600E+00, 0.4259100E+00, &
     & 0.4445900E+00, 0.4645600E+00, 0.4868700E+00, 0.5231800E+00, &
     & 0.5703900E+00, 0.6158800E+00, 0.6686100E+00, 0.7310200E+00, &
     & 0.7848000E+00, 0.8118600E+00, 0.6186869E+00, 0.6186869E+00 /
      data (ref_adm( 2,iz,16,16),iz = 1,20) / &
     & 0.3675900E+00, 0.3675900E+00, 0.3639800E+00, 0.3675500E+00, &
     & 0.3734500E+00, 0.3814700E+00, 0.3938800E+00, 0.4070700E+00, &
     & 0.4260400E+00, 0.4454100E+00, 0.4723700E+00, 0.5000100E+00, &
     & 0.5379300E+00, 0.5801200E+00, 0.6318400E+00, 0.6909600E+00, &
     & 0.7687600E+00, 0.6515919E+00, 0.5927333E+00, 0.5927333E+00 /
      data (ref_adm( 2,iz,17,16),iz = 1,20) / &
     & 0.3694500E+00, 0.3694500E+00, 0.3794700E+00, 0.3749700E+00, &
     & 0.3752200E+00, 0.3915300E+00, 0.3998300E+00, 0.4114300E+00, &
     & 0.4269700E+00, 0.4398100E+00, 0.4718700E+00, 0.5024700E+00, &
     & 0.5348000E+00, 0.5712900E+00, 0.5967900E+00, 0.6541900E+00, &
     & 0.7157500E+00, 0.6189681E+00, 0.5707020E+00, 0.5707020E+00 /
      data (ref_adm( 2,iz,18,16),iz = 1,20) / &
     & 0.3728200E+00, 0.3728200E+00, 0.3881000E+00, 0.3800200E+00, &
     & 0.3854500E+00, 0.3903000E+00, 0.3989600E+00, 0.4143900E+00, &
     & 0.4241400E+00, 0.4331800E+00, 0.4614500E+00, 0.4901800E+00, &
     & 0.5185100E+00, 0.5564700E+00, 0.5881200E+00, 0.6372600E+00, &
     & 0.6562572E+00, 0.6858038E+00, 0.6978475E+00, 0.6978475E+00 /
      data (ref_adm( 2,iz,19,16),iz = 1,20) / &
     & 0.3773000E+00, 0.3773000E+00, 0.3791600E+00, 0.3885600E+00, &
     & 0.3865800E+00, 0.3891600E+00, 0.3875800E+00, 0.4051900E+00, &
     & 0.4180300E+00, 0.4291100E+00, 0.4555300E+00, 0.4856200E+00, &
     & 0.5114100E+00, 0.5507400E+00, 0.5676000E+00, 0.5921000E+00, &
     & 0.6307015E+00, 0.6586562E+00, 0.6806741E+00, 0.6806741E+00 /
      data (ref_adm( 2,iz,20,16),iz = 1,20) / &
     & 0.3748100E+00, 0.3748100E+00, 0.3847900E+00, 0.3863500E+00, &
     & 0.3887400E+00, 0.3893100E+00, 0.3916600E+00, 0.3966800E+00, &
     & 0.4177100E+00, 0.4228800E+00, 0.4473100E+00, 0.4725800E+00, &
     & 0.4991600E+00, 0.5370700E+00, 0.5495200E+00, 0.4473700E+00, &
     & 0.6125461E+00, 0.6404428E+00, 0.6717237E+00, 0.6717237E+00 /
      data (ref_adm( 2,iz,21,16),iz = 1,20) / &
     & 0.3800900E+00, 0.3800900E+00, 0.3825600E+00, 0.3812300E+00, &
     & 0.3844600E+00, 0.3809000E+00, 0.3880800E+00, 0.3981300E+00, &
     & 0.4159900E+00, 0.4386900E+00, 0.4569800E+00, 0.4763200E+00, &
     & 0.4993000E+00, 0.5338000E+00, 0.5474000E+00, 0.5727200E+00, &
     & 0.5992006E+00, 0.6277311E+00, 0.6690648E+00, 0.6690648E+00 /
      data (ref_adm( 2,iz,22,16),iz = 1,20) / &
     & 0.3783100E+00, 0.3783100E+00, 0.3696900E+00, 0.3770100E+00, &
     & 0.3867100E+00, 0.3990600E+00, 0.3885400E+00, 0.3946800E+00, &
     & 0.4122500E+00, 0.4318900E+00, 0.4495900E+00, 0.4700600E+00, &
     & 0.4938600E+00, 0.5206500E+00, 0.5446800E+00, 0.5815800E+00, &
     & 0.5394756E+00, 0.5468518E+00, 0.5582703E+00, 0.5582703E+00 /
      data (ref_adm( 2,iz,23,16),iz = 1,20) / &
     & 0.3653800E+00, 0.3653800E+00, 0.3691700E+00, 0.3669600E+00, &
     & 0.3803500E+00, 0.3887100E+00, 0.3962100E+00, 0.4046600E+00, &
     & 0.4099200E+00, 0.4304700E+00, 0.4516500E+00, 0.4649300E+00, &
     & 0.4930800E+00, 0.5126300E+00, 0.5379600E+00, 0.5790700E+00, &
     & 0.5933900E+00, 0.5461608E+00, 0.5653855E+00, 0.5653855E+00 /
      data (ref_adm( 2,iz,24,16),iz = 1,20) / &
     & 0.3661400E+00, 0.3661400E+00, 0.3695900E+00, 0.3726500E+00, &
     & 0.3742100E+00, 0.3828900E+00, 0.3869800E+00, 0.4024400E+00, &
     & 0.4127600E+00, 0.4270900E+00, 0.4425400E+00, 0.4602500E+00, &
     & 0.4825600E+00, 0.5041700E+00, 0.5317200E+00, 0.5847300E+00, &
     & 0.6321800E+00, 0.5504419E+00, 0.5771665E+00, 0.5771665E+00 /
      data (ref_adm( 2,iz,25,16),iz = 1,20) / &
     & 0.3747300E+00, 0.3747300E+00, 0.3787300E+00, 0.3817700E+00, &
     & 0.3895800E+00, 0.3990200E+00, 0.4047400E+00, 0.4085900E+00, &
     & 0.4166700E+00, 0.4249400E+00, 0.4426900E+00, 0.4636100E+00, &
     & 0.4843200E+00, 0.5175900E+00, 0.5409300E+00, 0.5884400E+00, &
     & 0.6382300E+00, 0.6769200E+00, 0.5927624E+00, 0.5927624E+00 /
      data (ref_adm( 2,iz,26,16),iz = 1,20) / &
     & 0.3761500E+00, 0.3761500E+00, 0.3739900E+00, 0.3762400E+00, &
     & 0.3705700E+00, 0.3790900E+00, 0.3950500E+00, 0.4033100E+00, &
     & 0.4166200E+00, 0.4291300E+00, 0.4491600E+00, 0.4626200E+00, &
     & 0.4856100E+00, 0.5165300E+00, 0.5354400E+00, 0.5999100E+00, &
     & 0.6390600E+00, 0.6565100E+00, 0.6133201E+00, 0.6133201E+00 /
      data (ref_adm( 2,iz,27,16),iz = 1,20) / &
     & 0.3757800E+00, 0.3757800E+00, 0.3738700E+00, 0.3714500E+00, &
     & 0.3748700E+00, 0.3793700E+00, 0.3970600E+00, 0.4092200E+00, &
     & 0.4203500E+00, 0.4387700E+00, 0.4448000E+00, 0.4755300E+00, &
     & 0.4983500E+00, 0.5272400E+00, 0.5627500E+00, 0.6113100E+00, &
     & 0.6593200E+00, 0.6921000E+00, 0.6422600E+00, 0.6422600E+00 /
      data (ref_adm( 2,iz,28,16),iz = 1,20) / &
     & 0.3743400E+00, 0.3743400E+00, 0.3676600E+00, 0.3676200E+00, &
     & 0.3669700E+00, 0.3783000E+00, 0.3922300E+00, 0.4090300E+00, &
     & 0.4224700E+00, 0.4441900E+00, 0.4574700E+00, 0.4765800E+00, &
     & 0.5018400E+00, 0.5430000E+00, 0.5793100E+00, 0.6299200E+00, &
     & 0.6796000E+00, 0.6921500E+00, 0.6263800E+00, 0.6263800E+00 /
      data (ref_adm( 2,iz,29,16),iz = 1,20) / &
     & 0.3694300E+00, 0.3694300E+00, 0.3659200E+00, 0.3691900E+00, &
     & 0.3640400E+00, 0.3853200E+00, 0.3907700E+00, 0.4019400E+00, &
     & 0.4264300E+00, 0.4483800E+00, 0.4653400E+00, 0.4828900E+00, &
     & 0.5210000E+00, 0.5610000E+00, 0.5898900E+00, 0.6436300E+00, &
     & 0.6807800E+00, 0.7223300E+00, 0.6463100E+00, 0.6463100E+00 /
      data (ref_adm( 2,iz,30,16),iz = 1,20) / &
     & 0.3790200E+00, 0.3790200E+00, 0.3727900E+00, 0.3705300E+00, &
     & 0.3798800E+00, 0.3821300E+00, 0.4006100E+00, 0.4067200E+00, &
     & 0.4208300E+00, 0.4369200E+00, 0.4627500E+00, 0.4879600E+00, &
     & 0.5264800E+00, 0.5579000E+00, 0.5816700E+00, 0.6382800E+00, &
     & 0.6907400E+00, 0.7272600E+00, 0.6694700E+00, 0.6694700E+00 /
      data (ref_adm( 2,iz,31,16),iz = 1,20) / &
     & 0.3730700E+00, 0.3730700E+00, 0.3752200E+00, 0.3723600E+00, &
     & 0.3745500E+00, 0.3918400E+00, 0.3950800E+00, 0.4144500E+00, &
     & 0.4320600E+00, 0.4439300E+00, 0.4625400E+00, 0.4997800E+00, &
     & 0.5368900E+00, 0.5684900E+00, 0.6008100E+00, 0.6438300E+00, &
     & 0.6947800E+00, 0.7260500E+00, 0.6681800E+00, 0.6681800E+00 /
      data (ref_adm( 2,iz,32,16),iz = 1,20) / &
     & 0.3692600E+00, 0.3692600E+00, 0.3783300E+00, 0.3802500E+00, &
     & 0.3828600E+00, 0.3887100E+00, 0.3985000E+00, 0.4126800E+00, &
     & 0.4292200E+00, 0.4550300E+00, 0.4750700E+00, 0.5031200E+00, &
     & 0.5352700E+00, 0.5795600E+00, 0.6102300E+00, 0.6645500E+00, &
     & 0.7220900E+00, 0.7720600E+00, 0.7195800E+00, 0.7195800E+00 /
      data (ref_adm( 2,iz,33,16),iz = 1,20) / &
     & 0.3680000E+00, 0.3680000E+00, 0.3704300E+00, 0.3736900E+00, &
     & 0.3814600E+00, 0.3856000E+00, 0.3957800E+00, 0.4176500E+00, &
     & 0.4418700E+00, 0.4669400E+00, 0.4865200E+00, 0.5141000E+00, &
     & 0.5414000E+00, 0.5705000E+00, 0.6133200E+00, 0.6612100E+00, &
     & 0.7018400E+00, 0.7315500E+00, 0.6506700E+00, 0.6506700E+00 /
      data (ref_adm( 2,iz,34,16),iz = 1,20) / &
     & 0.3729600E+00, 0.3729600E+00, 0.3778500E+00, 0.3762000E+00, &
     & 0.3775100E+00, 0.3943900E+00, 0.4006800E+00, 0.4182000E+00, &
     & 0.4429600E+00, 0.4668600E+00, 0.4864800E+00, 0.5092900E+00, &
     & 0.5361000E+00, 0.5833500E+00, 0.6222200E+00, 0.6647500E+00, &
     & 0.7191400E+00, 0.7745000E+00, 0.7418800E+00, 0.7418800E+00 /
      data (ref_adm( 2,iz,35,16),iz = 1,20) / &
     & 0.3750800E+00, 0.3750800E+00, 0.3694600E+00, 0.3710600E+00, &
     & 0.3824800E+00, 0.3918500E+00, 0.4018900E+00, 0.4167600E+00, &
     & 0.4399900E+00, 0.4697600E+00, 0.4864600E+00, 0.4999300E+00, &
     & 0.5333500E+00, 0.5865100E+00, 0.6232800E+00, 0.6767200E+00, &
     & 0.7369200E+00, 0.7885700E+00, 0.6668300E+00, 0.6668300E+00 /
      data (ref_adm( 2,iz,36,16),iz = 1,20) / &
     & 0.3768300E+00, 0.3768300E+00, 0.3691300E+00, 0.3718600E+00, &
     & 0.3821200E+00, 0.3921000E+00, 0.4061600E+00, 0.4193900E+00, &
     & 0.4491200E+00, 0.4664500E+00, 0.4808500E+00, 0.5068100E+00, &
     & 0.5442900E+00, 0.5828900E+00, 0.6244300E+00, 0.6819800E+00, &
     & 0.7471300E+00, 0.7846600E+00, 0.7028000E+00, 0.7028000E+00 /
      data (ref_adm( 2,iz,37,16),iz = 1,20) / &
     & 0.3719700E+00, 0.3719700E+00, 0.3739800E+00, 0.3795100E+00, &
     & 0.3822000E+00, 0.3907900E+00, 0.4046300E+00, 0.4280800E+00, &
     & 0.4494900E+00, 0.4646400E+00, 0.4835000E+00, 0.5141700E+00, &
     & 0.5423900E+00, 0.5823200E+00, 0.6264100E+00, 0.6962700E+00, &
     & 0.7588500E+00, 0.7987800E+00, 0.7226400E+00, 0.7226400E+00 /
      data (ref_adm( 2,iz,38,16),iz = 1,20) / &
     & 0.3719700E+00, 0.3719700E+00, 0.3739800E+00, 0.3795100E+00, &
     & 0.3822000E+00, 0.3907900E+00, 0.4046300E+00, 0.4280800E+00, &
     & 0.4494900E+00, 0.4646400E+00, 0.4835000E+00, 0.5141700E+00, &
     & 0.5423900E+00, 0.5823200E+00, 0.6264100E+00, 0.6962700E+00, &
     & 0.7588500E+00, 0.7987800E+00, 0.7226400E+00, 0.7226400E+00 /
! Solar Zenith Angle 80.0 Albedo  0.5925559E+00
      data (ref_adm( 2,iz, 1,17),iz = 1,20) / &
     & 0.3791400E+00, 0.3791400E+00, 0.3901000E+00, 0.4084100E+00, &
     & 0.4073000E+00, 0.4293300E+00, 0.4623700E+00, 0.5007500E+00, &
     & 0.5376500E+00, 0.6131300E+00, 0.7098900E+00, 0.8331900E+00, &
     & 0.1049644E+01, 0.1253716E+01, 0.1625242E+01, 0.2335048E+01, &
     & 0.3468839E+01, 0.3967959E+01, 0.2998092E+01, 0.2998092E+01 /
      data (ref_adm( 2,iz, 2,17),iz = 1,20) / &
     & 0.3791400E+00, 0.3791400E+00, 0.3901000E+00, 0.4084100E+00, &
     & 0.4073000E+00, 0.4293300E+00, 0.4623700E+00, 0.5007500E+00, &
     & 0.5376500E+00, 0.6131300E+00, 0.7098900E+00, 0.8331900E+00, &
     & 0.1049644E+01, 0.1253716E+01, 0.1625242E+01, 0.2335048E+01, &
     & 0.3468839E+01, 0.3967959E+01, 0.2998092E+01, 0.2998092E+01 /
      data (ref_adm( 2,iz, 3,17),iz = 1,20) / &
     & 0.3797000E+00, 0.3797000E+00, 0.3899500E+00, 0.4008700E+00, &
     & 0.4097500E+00, 0.4315500E+00, 0.4651100E+00, 0.4950100E+00, &
     & 0.5469700E+00, 0.6133100E+00, 0.7042900E+00, 0.8295000E+00, &
     & 0.1038200E+01, 0.1235604E+01, 0.1588121E+01, 0.2243484E+01, &
     & 0.3351626E+01, 0.3975602E+01, 0.1102735E+01, 0.1102735E+01 /
      data (ref_adm( 2,iz, 4,17),iz = 1,20) / &
     & 0.3798800E+00, 0.3798800E+00, 0.3860300E+00, 0.3927700E+00, &
     & 0.4171800E+00, 0.4269800E+00, 0.4599000E+00, 0.4907800E+00, &
     & 0.5383000E+00, 0.6067900E+00, 0.6863400E+00, 0.8209500E+00, &
     & 0.1014085E+01, 0.1198766E+01, 0.1515384E+01, 0.2072004E+01, &
     & 0.2957585E+01, 0.3956163E+01, 0.2887737E+01, 0.2887737E+01 /
      data (ref_adm( 2,iz, 5,17),iz = 1,20) / &
     & 0.3808900E+00, 0.3808900E+00, 0.3829400E+00, 0.3929800E+00, &
     & 0.4061000E+00, 0.4245600E+00, 0.4537900E+00, 0.4961500E+00, &
     & 0.5404500E+00, 0.5982400E+00, 0.6726000E+00, 0.7850800E+00, &
     & 0.9811344E+00, 0.1150295E+01, 0.1422745E+01, 0.1875433E+01, &
     & 0.2503830E+01, 0.3605216E+01, 0.3005454E+01, 0.3005454E+01 /
      data (ref_adm( 2,iz, 6,17),iz = 1,20) / &
     & 0.3874800E+00, 0.3874800E+00, 0.3903200E+00, 0.4017800E+00, &
     & 0.4174300E+00, 0.4372900E+00, 0.4633800E+00, 0.5022700E+00, &
     & 0.5419100E+00, 0.5919400E+00, 0.6726700E+00, 0.7718500E+00, &
     & 0.9233400E+00, 0.1112600E+01, 0.1350900E+01, 0.1667600E+01, &
     & 0.2130000E+01, 0.2637400E+01, 0.2153700E+01, 0.2153700E+01 /
      data (ref_adm( 2,iz, 7,17),iz = 1,20) / &
     & 0.3765000E+00, 0.3765000E+00, 0.3827500E+00, 0.3954800E+00, &
     & 0.4125400E+00, 0.4255200E+00, 0.4487700E+00, 0.4804200E+00, &
     & 0.5245100E+00, 0.5763800E+00, 0.6473500E+00, 0.7348900E+00, &
     & 0.8745900E+00, 0.1054900E+01, 0.1254100E+01, 0.1589600E+01, &
     & 0.2019400E+01, 0.2400400E+01, 0.2034200E+01, 0.2034200E+01 /
      data (ref_adm( 2,iz, 8,17),iz = 1,20) / &
     & 0.3719600E+00, 0.3719600E+00, 0.3823800E+00, 0.3913400E+00, &
     & 0.4156800E+00, 0.4210600E+00, 0.4356200E+00, 0.4753800E+00, &
     & 0.5150400E+00, 0.5685900E+00, 0.6322500E+00, 0.6992800E+00, &
     & 0.8542600E+00, 0.1006300E+01, 0.1178700E+01, 0.1441600E+01, &
     & 0.1860800E+01, 0.2053500E+01, 0.1573100E+01, 0.1573100E+01 /
      data (ref_adm( 2,iz, 9,17),iz = 1,20) / &
     & 0.3776700E+00, 0.3776700E+00, 0.3789600E+00, 0.3897500E+00, &
     & 0.4041900E+00, 0.4109000E+00, 0.4348500E+00, 0.4759900E+00, &
     & 0.5063500E+00, 0.5496500E+00, 0.6059900E+00, 0.6636400E+00, &
     & 0.8051900E+00, 0.9497500E+00, 0.1053500E+01, 0.1294000E+01, &
     & 0.1512900E+01, 0.1677200E+01, 0.1342100E+01, 0.1342100E+01 /
      data (ref_adm( 2,iz,10,17),iz = 1,20) / &
     & 0.3741900E+00, 0.3741900E+00, 0.3807900E+00, 0.3823200E+00, &
     & 0.3970400E+00, 0.4208700E+00, 0.4340800E+00, 0.4637600E+00, &
     & 0.5056500E+00, 0.5390000E+00, 0.5893300E+00, 0.6375100E+00, &
     & 0.7431300E+00, 0.8687100E+00, 0.9820100E+00, 0.1181600E+01, &
     & 0.1368400E+01, 0.1381900E+01, 0.1263000E+01, 0.1263000E+01 /
      data (ref_adm( 2,iz,11,17),iz = 1,20) / &
     & 0.3776700E+00, 0.3776700E+00, 0.3797100E+00, 0.3839300E+00, &
     & 0.3911100E+00, 0.4001000E+00, 0.4241500E+00, 0.4622700E+00, &
     & 0.4934500E+00, 0.5263200E+00, 0.5690400E+00, 0.6121700E+00, &
     & 0.7129700E+00, 0.8046700E+00, 0.9191700E+00, 0.1052800E+01, &
     & 0.1261200E+01, 0.1254600E+01, 0.1138600E+01, 0.1138600E+01 /
      data (ref_adm( 2,iz,12,17),iz = 1,20) / &
     & 0.3693700E+00, 0.3693700E+00, 0.3733600E+00, 0.3876700E+00, &
     & 0.3899300E+00, 0.4011000E+00, 0.4209400E+00, 0.4447500E+00, &
     & 0.4697500E+00, 0.5101100E+00, 0.5392200E+00, 0.5990400E+00, &
     & 0.6753900E+00, 0.7587000E+00, 0.8491800E+00, 0.9747900E+00, &
     & 0.1139900E+01, 0.1147000E+01, 0.1046300E+01, 0.1046300E+01 /
      data (ref_adm( 2,iz,13,17),iz = 1,20) / &
     & 0.3719000E+00, 0.3719000E+00, 0.3769200E+00, 0.3820700E+00, &
     & 0.3996600E+00, 0.4058000E+00, 0.4175100E+00, 0.4368000E+00, &
     & 0.4587600E+00, 0.4936800E+00, 0.5298500E+00, 0.5739700E+00, &
     & 0.6422200E+00, 0.7121500E+00, 0.7898100E+00, 0.8995200E+00, &
     & 0.1051400E+01, 0.1079400E+01, 0.9938200E+00, 0.9938200E+00 /
      data (ref_adm( 2,iz,14,17),iz = 1,20) / &
     & 0.3884000E+00, 0.3884000E+00, 0.3984700E+00, 0.3997400E+00, &
     & 0.4054800E+00, 0.4144000E+00, 0.4258200E+00, 0.4411200E+00, &
     & 0.4622700E+00, 0.4903100E+00, 0.5250300E+00, 0.5603000E+00, &
     & 0.6027000E+00, 0.6578900E+00, 0.7256200E+00, 0.8391700E+00, &
     & 0.9577200E+00, 0.9954100E+00, 0.9792143E+00, 0.9792143E+00 /
      data (ref_adm( 2,iz,15,17),iz = 1,20) / &
     & 0.3783200E+00, 0.3783200E+00, 0.3705300E+00, 0.3743900E+00, &
     & 0.3852900E+00, 0.3937100E+00, 0.4054400E+00, 0.4212000E+00, &
     & 0.4412600E+00, 0.4634600E+00, 0.4925800E+00, 0.5238200E+00, &
     & 0.5681000E+00, 0.6191800E+00, 0.6961700E+00, 0.7949400E+00, &
     & 0.8773000E+00, 0.9190000E+00, 0.9237913E+00, 0.9237913E+00 /
      data (ref_adm( 2,iz,16,17),iz = 1,20) / &
     & 0.3752500E+00, 0.3752500E+00, 0.3753000E+00, 0.3757700E+00, &
     & 0.3836800E+00, 0.3870200E+00, 0.4013000E+00, 0.4241900E+00, &
     & 0.4440100E+00, 0.4637000E+00, 0.4904600E+00, 0.5205800E+00, &
     & 0.5573300E+00, 0.5974300E+00, 0.6594200E+00, 0.7587700E+00, &
     & 0.8098800E+00, 0.8382444E+00, 0.8791315E+00, 0.8791315E+00 /
      data (ref_adm( 2,iz,17,17),iz = 1,20) / &
     & 0.3765400E+00, 0.3765400E+00, 0.3775400E+00, 0.3792400E+00, &
     & 0.3862200E+00, 0.4015200E+00, 0.4066100E+00, 0.4176900E+00, &
     & 0.4385200E+00, 0.4505500E+00, 0.4830300E+00, 0.5087300E+00, &
     & 0.5440100E+00, 0.5805600E+00, 0.6269300E+00, 0.7021400E+00, &
     & 0.7963800E+00, 0.7909028E+00, 0.8408923E+00, 0.8408923E+00 /
      data (ref_adm( 2,iz,18,17),iz = 1,20) / &
     & 0.3764700E+00, 0.3764700E+00, 0.3863600E+00, 0.3781500E+00, &
     & 0.3861400E+00, 0.3968100E+00, 0.4034500E+00, 0.4179300E+00, &
     & 0.4365500E+00, 0.4464700E+00, 0.4685000E+00, 0.4996400E+00, &
     & 0.5316000E+00, 0.5628800E+00, 0.5999000E+00, 0.6613500E+00, &
     & 0.7282341E+00, 0.8060326E+00, 0.9151159E+00, 0.9151159E+00 /
      data (ref_adm( 2,iz,19,17),iz = 1,20) / &
     & 0.3770800E+00, 0.3770800E+00, 0.3805600E+00, 0.3793000E+00, &
     & 0.3814500E+00, 0.3838500E+00, 0.3984000E+00, 0.4134400E+00, &
     & 0.4254800E+00, 0.4411800E+00, 0.4615900E+00, 0.4888100E+00, &
     & 0.5217800E+00, 0.5546100E+00, 0.5925200E+00, 0.6616000E+00, &
     & 0.6996272E+00, 0.7737077E+00, 0.8912265E+00, 0.8912265E+00 /
      data (ref_adm( 2,iz,20,17),iz = 1,20) / &
     & 0.3755600E+00, 0.3755600E+00, 0.3742900E+00, 0.3736500E+00, &
     & 0.3744900E+00, 0.3827800E+00, 0.3963400E+00, 0.4118700E+00, &
     & 0.4202900E+00, 0.4366700E+00, 0.4578400E+00, 0.4764600E+00, &
     & 0.5126900E+00, 0.5423000E+00, 0.5812500E+00, 0.6275846E+00, &
     & 0.6798245E+00, 0.7517436E+00, 0.8790158E+00, 0.8790158E+00 /
      data (ref_adm( 2,iz,21,17),iz = 1,20) / &
     & 0.3712600E+00, 0.3712600E+00, 0.3740500E+00, 0.3775000E+00, &
     & 0.3773600E+00, 0.3896100E+00, 0.3931200E+00, 0.4088300E+00, &
     & 0.4157000E+00, 0.4358100E+00, 0.4552900E+00, 0.4715000E+00, &
     & 0.5038400E+00, 0.5371900E+00, 0.5700900E+00, 0.6171700E+00, &
     & 0.6651488E+00, 0.7369558E+00, 0.8756546E+00, 0.8756546E+00 /
      data (ref_adm( 2,iz,22,17),iz = 1,20) / &
     & 0.3750200E+00, 0.3750200E+00, 0.3817700E+00, 0.3774800E+00, &
     & 0.3901300E+00, 0.3891100E+00, 0.3907600E+00, 0.4065300E+00, &
     & 0.4092000E+00, 0.4329500E+00, 0.4407300E+00, 0.4588200E+00, &
     & 0.4962000E+00, 0.5287700E+00, 0.5655400E+00, 0.6059500E+00, &
     & 0.5982910E+00, 0.6289772E+00, 0.6818557E+00, 0.6818557E+00 /
      data (ref_adm( 2,iz,23,17),iz = 1,20) / &
     & 0.3671500E+00, 0.3671500E+00, 0.3709000E+00, 0.3601700E+00, &
     & 0.3725900E+00, 0.3793700E+00, 0.3873800E+00, 0.3937300E+00, &
     & 0.4024500E+00, 0.4126400E+00, 0.4350300E+00, 0.4553600E+00, &
     & 0.4868300E+00, 0.5171100E+00, 0.5639400E+00, 0.6174100E+00, &
     & 0.6891000E+00, 0.6270723E+00, 0.6909619E+00, 0.6909619E+00 /
      data (ref_adm( 2,iz,24,17),iz = 1,20) / &
     & 0.3758800E+00, 0.3758800E+00, 0.3707800E+00, 0.3742300E+00, &
     & 0.3787700E+00, 0.3816500E+00, 0.3888600E+00, 0.3972500E+00, &
     & 0.4088500E+00, 0.4278500E+00, 0.4466900E+00, 0.4645200E+00, &
     & 0.4901200E+00, 0.5199600E+00, 0.5425400E+00, 0.6100900E+00, &
     & 0.6673800E+00, 0.6314138E+00, 0.7063904E+00, 0.7063904E+00 /
      data (ref_adm( 2,iz,25,17),iz = 1,20) / &
     & 0.3771200E+00, 0.3771200E+00, 0.3824400E+00, 0.3872100E+00, &
     & 0.3885500E+00, 0.3893800E+00, 0.3985300E+00, 0.4112100E+00, &
     & 0.4227200E+00, 0.4362500E+00, 0.4538000E+00, 0.4740600E+00, &
     & 0.4996700E+00, 0.5333400E+00, 0.5532100E+00, 0.6265500E+00, &
     & 0.6889900E+00, 0.7432300E+00, 0.7269230E+00, 0.7269230E+00 /
      data (ref_adm( 2,iz,26,17),iz = 1,20) / &
     & 0.3824100E+00, 0.3824100E+00, 0.3789000E+00, 0.3813700E+00, &
     & 0.3852500E+00, 0.3789300E+00, 0.3883800E+00, 0.4016200E+00, &
     & 0.4241000E+00, 0.4375700E+00, 0.4452600E+00, 0.4655800E+00, &
     & 0.5039600E+00, 0.5411000E+00, 0.5775600E+00, 0.6312900E+00, &
     & 0.6999500E+00, 0.7813200E+00, 0.7540239E+00, 0.7540239E+00 /
      data (ref_adm( 2,iz,27,17),iz = 1,20) / &
     & 0.3765900E+00, 0.3765900E+00, 0.3795700E+00, 0.3883000E+00, &
     & 0.3921900E+00, 0.3899200E+00, 0.3903200E+00, 0.4045100E+00, &
     & 0.4204900E+00, 0.4291600E+00, 0.4446700E+00, 0.4774300E+00, &
     & 0.5132900E+00, 0.5520400E+00, 0.5845400E+00, 0.6455900E+00, &
     & 0.7185600E+00, 0.7798000E+00, 0.7798600E+00, 0.7798600E+00 /
      data (ref_adm( 2,iz,28,17),iz = 1,20) / &
     & 0.3768200E+00, 0.3768200E+00, 0.3799500E+00, 0.3897000E+00, &
     & 0.3883900E+00, 0.3868600E+00, 0.3894100E+00, 0.4010300E+00, &
     & 0.4151600E+00, 0.4399100E+00, 0.4587300E+00, 0.4768500E+00, &
     & 0.5219900E+00, 0.5550400E+00, 0.5899800E+00, 0.6571400E+00, &
     & 0.7231400E+00, 0.8094200E+00, 0.7885900E+00, 0.7885900E+00 /
      data (ref_adm( 2,iz,29,17),iz = 1,20) / &
     & 0.3789600E+00, 0.3789600E+00, 0.3844900E+00, 0.3787900E+00, &
     & 0.3790000E+00, 0.3838800E+00, 0.3934500E+00, 0.4062600E+00, &
     & 0.4143500E+00, 0.4432100E+00, 0.4726200E+00, 0.4892100E+00, &
     & 0.5310500E+00, 0.5617100E+00, 0.6031300E+00, 0.6714800E+00, &
     & 0.7490300E+00, 0.8367000E+00, 0.8248200E+00, 0.8248200E+00 /
      data (ref_adm( 2,iz,30,17),iz = 1,20) / &
     & 0.3791900E+00, 0.3791900E+00, 0.3700400E+00, 0.3722400E+00, &
     & 0.3799400E+00, 0.3871100E+00, 0.4031600E+00, 0.4210100E+00, &
     & 0.4276600E+00, 0.4464800E+00, 0.4699300E+00, 0.4952200E+00, &
     & 0.5355300E+00, 0.5807700E+00, 0.6205700E+00, 0.7051900E+00, &
     & 0.7763500E+00, 0.8739400E+00, 0.8641100E+00, 0.8641100E+00 /
      data (ref_adm( 2,iz,31,17),iz = 1,20) / &
     & 0.3772600E+00, 0.3772600E+00, 0.3693300E+00, 0.3793600E+00, &
     & 0.3799500E+00, 0.3918600E+00, 0.4104300E+00, 0.4185700E+00, &
     & 0.4297700E+00, 0.4495500E+00, 0.4781800E+00, 0.5088500E+00, &
     & 0.5444500E+00, 0.5887400E+00, 0.6266100E+00, 0.7170000E+00, &
     & 0.8040400E+00, 0.8608500E+00, 0.8473400E+00, 0.8473400E+00 /
      data (ref_adm( 2,iz,32,17),iz = 1,20) / &
     & 0.3702100E+00, 0.3702100E+00, 0.3695800E+00, 0.3705600E+00, &
     & 0.3846000E+00, 0.3978700E+00, 0.4070500E+00, 0.4147800E+00, &
     & 0.4256400E+00, 0.4424500E+00, 0.4713200E+00, 0.5030600E+00, &
     & 0.5396000E+00, 0.5861900E+00, 0.6421700E+00, 0.7032900E+00, &
     & 0.8037900E+00, 0.8943100E+00, 0.8584100E+00, 0.8584100E+00 /
      data (ref_adm( 2,iz,33,17),iz = 1,20) / &
     & 0.3765900E+00, 0.3765900E+00, 0.3803400E+00, 0.3867900E+00, &
     & 0.3967500E+00, 0.4015700E+00, 0.4135000E+00, 0.4252800E+00, &
     & 0.4428100E+00, 0.4690500E+00, 0.4971800E+00, 0.5293400E+00, &
     & 0.5644200E+00, 0.6061100E+00, 0.6510400E+00, 0.7174100E+00, &
     & 0.8220300E+00, 0.9301300E+00, 0.9270200E+00, 0.9270200E+00 /
      data (ref_adm( 2,iz,34,17),iz = 1,20) / &
     & 0.3712000E+00, 0.3712000E+00, 0.3745200E+00, 0.3778800E+00, &
     & 0.3804500E+00, 0.3879800E+00, 0.4031800E+00, 0.4199900E+00, &
     & 0.4460100E+00, 0.4668100E+00, 0.4951600E+00, 0.5215700E+00, &
     & 0.5633200E+00, 0.5960000E+00, 0.6524100E+00, 0.7265600E+00, &
     & 0.7963000E+00, 0.9597700E+00, 0.9179000E+00, 0.9179000E+00 /
      data (ref_adm( 2,iz,35,17),iz = 1,20) / &
     & 0.3708400E+00, 0.3708400E+00, 0.3691500E+00, 0.3732300E+00, &
     & 0.3816300E+00, 0.3834700E+00, 0.3947800E+00, 0.4174200E+00, &
     & 0.4393300E+00, 0.4659400E+00, 0.4931100E+00, 0.5233300E+00, &
     & 0.5597700E+00, 0.6031300E+00, 0.6574300E+00, 0.7245500E+00, &
     & 0.8239200E+00, 0.1012800E+01, 0.1002700E+01, 0.1002700E+01 /
      data (ref_adm( 2,iz,36,17),iz = 1,20) / &
     & 0.3704900E+00, 0.3704900E+00, 0.3680100E+00, 0.3723300E+00, &
     & 0.3716200E+00, 0.3921800E+00, 0.4000000E+00, 0.4075000E+00, &
     & 0.4399300E+00, 0.4638000E+00, 0.4913100E+00, 0.5287700E+00, &
     & 0.5659800E+00, 0.6140100E+00, 0.6637000E+00, 0.7423500E+00, &
     & 0.8407000E+00, 0.9669300E+00, 0.1019400E+01, 0.1019400E+01 /
      data (ref_adm( 2,iz,37,17),iz = 1,20) / &
     & 0.3786400E+00, 0.3786400E+00, 0.3793400E+00, 0.3776200E+00, &
     & 0.3824300E+00, 0.3896900E+00, 0.4032800E+00, 0.4212400E+00, &
     & 0.4371300E+00, 0.4676300E+00, 0.4941700E+00, 0.5277100E+00, &
     & 0.5692700E+00, 0.6095100E+00, 0.6652600E+00, 0.7598900E+00, &
     & 0.8571200E+00, 0.9684300E+00, 0.9643100E+00, 0.9643100E+00 /
      data (ref_adm( 2,iz,38,17),iz = 1,20) / &
     & 0.3786400E+00, 0.3786400E+00, 0.3793400E+00, 0.3776200E+00, &
     & 0.3824300E+00, 0.3896900E+00, 0.4032800E+00, 0.4212400E+00, &
     & 0.4371300E+00, 0.4676300E+00, 0.4941700E+00, 0.5277100E+00, &
     & 0.5692700E+00, 0.6095100E+00, 0.6652600E+00, 0.7598900E+00, &
     & 0.8571200E+00, 0.9684300E+00, 0.9643100E+00, 0.9643100E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6831767E+00
      data (ref_adm( 2,iz, 1,18),iz = 1,20) / &
     & 0.4209100E+00, 0.4209100E+00, 0.4247500E+00, 0.4359300E+00, &
     & 0.4573400E+00, 0.4836800E+00, 0.5021100E+00, 0.5478700E+00, &
     & 0.5788300E+00, 0.6591300E+00, 0.7685400E+00, 0.9247600E+00, &
     & 0.1138204E+01, 0.1376230E+01, 0.1846422E+01, 0.2863259E+01, &
     & 0.4594625E+01, 0.4079255E+01, 0.3657407E+01, 0.3657407E+01 /
      data (ref_adm( 2,iz, 2,18),iz = 1,20) / &
     & 0.4209100E+00, 0.4209100E+00, 0.4247500E+00, 0.4359300E+00, &
     & 0.4573400E+00, 0.4836800E+00, 0.5021100E+00, 0.5478700E+00, &
     & 0.5788300E+00, 0.6591300E+00, 0.7685400E+00, 0.9247600E+00, &
     & 0.1138204E+01, 0.1376230E+01, 0.1846422E+01, 0.2863259E+01, &
     & 0.4594625E+01, 0.4079255E+01, 0.3657407E+01, 0.3657407E+01 /
      data (ref_adm( 2,iz, 3,18),iz = 1,20) / &
     & 0.4239300E+00, 0.4239300E+00, 0.4215100E+00, 0.4400300E+00, &
     & 0.4533500E+00, 0.4728100E+00, 0.5071200E+00, 0.5405500E+00, &
     & 0.6100900E+00, 0.6677900E+00, 0.7581700E+00, 0.9014200E+00, &
     & 0.1127175E+01, 0.1352538E+01, 0.1794914E+01, 0.2710303E+01, &
     & 0.4497649E+01, 0.4173338E+01, 0.1623636E+01, 0.1623636E+01 /
      data (ref_adm( 2,iz, 4,18),iz = 1,20) / &
     & 0.4300400E+00, 0.4300400E+00, 0.4312100E+00, 0.4411900E+00, &
     & 0.4643300E+00, 0.4785600E+00, 0.5116000E+00, 0.5434800E+00, &
     & 0.6015500E+00, 0.6699000E+00, 0.7572800E+00, 0.8905200E+00, &
     & 0.1105058E+01, 0.1305223E+01, 0.1697398E+01, 0.2438369E+01, &
     & 0.3832302E+01, 0.4774346E+01, 0.3232043E+01, 0.3232043E+01 /
      data (ref_adm( 2,iz, 5,18),iz = 1,20) / &
     & 0.4231300E+00, 0.4231300E+00, 0.4354000E+00, 0.4573000E+00, &
     & 0.4783300E+00, 0.4816500E+00, 0.5107300E+00, 0.5485700E+00, &
     & 0.6003100E+00, 0.6597500E+00, 0.7763400E+00, 0.8763500E+00, &
     & 0.1075880E+01, 0.1246644E+01, 0.1574061E+01, 0.2148925E+01, &
     & 0.3046607E+01, 0.4868752E+01, 0.3800266E+01, 0.3800266E+01 /
      data (ref_adm( 2,iz, 6,18),iz = 1,20) / &
     & 0.4200100E+00, 0.4200100E+00, 0.4318300E+00, 0.4405900E+00, &
     & 0.4519200E+00, 0.4737600E+00, 0.4998600E+00, 0.5359900E+00, &
     & 0.5769100E+00, 0.6440000E+00, 0.7311900E+00, 0.8278400E+00, &
     & 0.9902200E+00, 0.1210200E+01, 0.1499000E+01, 0.1932800E+01, &
     & 0.2600600E+01, 0.3359700E+01, 0.3490348E+01, 0.3490348E+01 /
      data (ref_adm( 2,iz, 7,18),iz = 1,20) / &
     & 0.4423000E+00, 0.4423000E+00, 0.4591300E+00, 0.4741600E+00, &
     & 0.4653000E+00, 0.4758200E+00, 0.5208000E+00, 0.5516700E+00, &
     & 0.5905500E+00, 0.6515500E+00, 0.7392900E+00, 0.8218100E+00, &
     & 0.1008200E+01, 0.1218100E+01, 0.1504500E+01, 0.1941900E+01, &
     & 0.2531300E+01, 0.3181900E+01, 0.2491500E+01, 0.2491500E+01 /
      data (ref_adm( 2,iz, 8,18),iz = 1,20) / &
     & 0.4491400E+00, 0.4491400E+00, 0.4465400E+00, 0.4525300E+00, &
     & 0.4604200E+00, 0.4688300E+00, 0.5035300E+00, 0.5340200E+00, &
     & 0.5774900E+00, 0.6303500E+00, 0.6828300E+00, 0.7586700E+00, &
     & 0.9396800E+00, 0.1143300E+01, 0.1380000E+01, 0.1733700E+01, &
     & 0.2245800E+01, 0.2674100E+01, 0.2368200E+01, 0.2368200E+01 /
      data (ref_adm( 2,iz, 9,18),iz = 1,20) / &
     & 0.4385700E+00, 0.4385700E+00, 0.4371700E+00, 0.4401900E+00, &
     & 0.4699500E+00, 0.4873500E+00, 0.4898800E+00, 0.5336200E+00, &
     & 0.5683500E+00, 0.6132200E+00, 0.6611200E+00, 0.7363600E+00, &
     & 0.9023400E+00, 0.1103100E+01, 0.1258500E+01, 0.1546800E+01, &
     & 0.1940000E+01, 0.2192800E+01, 0.1836300E+01, 0.1836300E+01 /
      data (ref_adm( 2,iz,10,18),iz = 1,20) / &
     & 0.4334900E+00, 0.4334900E+00, 0.4352600E+00, 0.4519600E+00, &
     & 0.4540900E+00, 0.4736700E+00, 0.5023400E+00, 0.5247000E+00, &
     & 0.5617700E+00, 0.5899000E+00, 0.6421600E+00, 0.6938000E+00, &
     & 0.8592600E+00, 0.9856700E+00, 0.1165500E+01, 0.1381100E+01, &
     & 0.1738200E+01, 0.1880300E+01, 0.1593100E+01, 0.1593100E+01 /
      data (ref_adm( 2,iz,11,18),iz = 1,20) / &
     & 0.4249200E+00, 0.4249200E+00, 0.4380800E+00, 0.4379300E+00, &
     & 0.4457400E+00, 0.4774000E+00, 0.5004400E+00, 0.5024300E+00, &
     & 0.5469600E+00, 0.5742900E+00, 0.6127700E+00, 0.6549000E+00, &
     & 0.7862100E+00, 0.9445000E+00, 0.1070000E+01, 0.1241500E+01, &
     & 0.1501900E+01, 0.1677300E+01, 0.1541800E+01, 0.1541800E+01 /
      data (ref_adm( 2,iz,12,18),iz = 1,20) / &
     & 0.4297100E+00, 0.4297100E+00, 0.4317300E+00, 0.4419400E+00, &
     & 0.4545900E+00, 0.4646100E+00, 0.4735200E+00, 0.5027100E+00, &
     & 0.5301300E+00, 0.5540200E+00, 0.5916700E+00, 0.6358700E+00, &
     & 0.7713100E+00, 0.8640800E+00, 0.9970100E+00, 0.1155700E+01, &
     & 0.1397300E+01, 0.1491000E+01, 0.1372402E+01, 0.1372402E+01 /
      data (ref_adm( 2,iz,13,18),iz = 1,20) / &
     & 0.4387100E+00, 0.4387100E+00, 0.4322200E+00, 0.4364600E+00, &
     & 0.4523300E+00, 0.4486400E+00, 0.4735800E+00, 0.4908500E+00, &
     & 0.5040300E+00, 0.5347000E+00, 0.5753300E+00, 0.6270800E+00, &
     & 0.7187500E+00, 0.8099500E+00, 0.9381900E+00, 0.1064200E+01, &
     & 0.1260700E+01, 0.1355300E+01, 0.1268682E+01, 0.1268682E+01 /
      data (ref_adm( 2,iz,14,18),iz = 1,20) / &
     & 0.4461800E+00, 0.4461800E+00, 0.4538700E+00, 0.4511000E+00, &
     & 0.4595900E+00, 0.4655600E+00, 0.4796300E+00, 0.4960800E+00, &
     & 0.5130700E+00, 0.5371200E+00, 0.5606900E+00, 0.5936400E+00, &
     & 0.6356700E+00, 0.6910600E+00, 0.8605900E+00, 0.1000500E+01, &
     & 0.1135800E+01, 0.1397600E+01, 0.1188803E+01, 0.1188803E+01 /
      data (ref_adm( 2,iz,15,18),iz = 1,20) / &
     & 0.4268200E+00, 0.4268200E+00, 0.4236500E+00, 0.4291700E+00, &
     & 0.4327200E+00, 0.4412800E+00, 0.4518400E+00, 0.4624800E+00, &
     & 0.4826000E+00, 0.5039000E+00, 0.5307000E+00, 0.5631900E+00, &
     & 0.6045400E+00, 0.6539900E+00, 0.7821700E+00, 0.9363500E+00, &
     & 0.1099300E+01, 0.1041649E+01, 0.1124208E+01, 0.1124208E+01 /
      data (ref_adm( 2,iz,16,18),iz = 1,20) / &
     & 0.4311200E+00, 0.4311200E+00, 0.4309100E+00, 0.4343100E+00, &
     & 0.4404900E+00, 0.4576000E+00, 0.4600300E+00, 0.4770400E+00, &
     & 0.4970800E+00, 0.5182500E+00, 0.5368600E+00, 0.5671000E+00, &
     & 0.6152700E+00, 0.6532200E+00, 0.7580500E+00, 0.8808900E+00, &
     & 0.9726800E+00, 0.9835733E+00, 0.1072196E+01, 0.1072196E+01 /
      data (ref_adm( 2,iz,17,18),iz = 1,20) / &
     & 0.4294900E+00, 0.4294900E+00, 0.4408300E+00, 0.4382800E+00, &
     & 0.4460100E+00, 0.4543900E+00, 0.4624200E+00, 0.4669500E+00, &
     & 0.4739900E+00, 0.4944100E+00, 0.5207800E+00, 0.5526400E+00, &
     & 0.6307500E+00, 0.6830600E+00, 0.7382000E+00, 0.8143200E+00, &
     & 0.8430386E+00, 0.9307840E+00, 0.1025757E+01, 0.1025757E+01 /
      data (ref_adm( 2,iz,18,18),iz = 1,20) / &
     & 0.4280900E+00, 0.4280900E+00, 0.4405800E+00, 0.4429200E+00, &
     & 0.4347200E+00, 0.4610500E+00, 0.4661900E+00, 0.4763700E+00, &
     & 0.4865400E+00, 0.4959700E+00, 0.5183800E+00, 0.5494500E+00, &
     & 0.6182100E+00, 0.6510300E+00, 0.6988400E+00, 0.7502100E+00, &
     & 0.9214166E+00, 0.1129325E+01, 0.1590938E+01, 0.1590938E+01 /
      data (ref_adm( 2,iz,19,18),iz = 1,20) / &
     & 0.4233500E+00, 0.4233500E+00, 0.4267000E+00, 0.4321200E+00, &
     & 0.4536400E+00, 0.4585100E+00, 0.4600900E+00, 0.4744800E+00, &
     & 0.4738200E+00, 0.4911500E+00, 0.5068600E+00, 0.5295800E+00, &
     & 0.5772100E+00, 0.6262000E+00, 0.6874600E+00, 0.6696900E+00, &
     & 0.8877311E+00, 0.1085403E+01, 0.1541236E+01, 0.1541236E+01 /
      data (ref_adm( 2,iz,20,18),iz = 1,20) / &
     & 0.4340300E+00, 0.4340300E+00, 0.4428300E+00, 0.4281100E+00, &
     & 0.4473200E+00, 0.4508300E+00, 0.4557900E+00, 0.4621700E+00, &
     & 0.4682800E+00, 0.4668900E+00, 0.5008300E+00, 0.5225600E+00, &
     & 0.5619200E+00, 0.6126300E+00, 0.6640000E+00, 0.7576008E+00, &
     & 0.8630291E+00, 0.1052687E+01, 0.1512616E+01, 0.1512616E+01 /
      data (ref_adm( 2,iz,21,18),iz = 1,20) / &
     & 0.4290700E+00, 0.4290700E+00, 0.4411600E+00, 0.4335600E+00, &
     & 0.4403000E+00, 0.4428700E+00, 0.4481300E+00, 0.4698000E+00, &
     & 0.4695500E+00, 0.4810100E+00, 0.5082600E+00, 0.5184400E+00, &
     & 0.5748000E+00, 0.6215700E+00, 0.6514800E+00, 0.6852000E+00, &
     & 0.8413210E+00, 0.1026352E+01, 0.1496539E+01, 0.1496539E+01 /
      data (ref_adm( 2,iz,22,18),iz = 1,20) / &
     & 0.4261200E+00, 0.4261200E+00, 0.4195900E+00, 0.4241200E+00, &
     & 0.4334700E+00, 0.4382700E+00, 0.4440600E+00, 0.4700600E+00, &
     & 0.4718100E+00, 0.4843600E+00, 0.5079100E+00, 0.5185400E+00, &
     & 0.5461000E+00, 0.5924600E+00, 0.6303400E+00, 0.6953600E+00, &
     & 0.7608088E+00, 0.8796304E+00, 0.1182849E+01, 0.1182849E+01 /
      data (ref_adm( 2,iz,23,18),iz = 1,20) / &
     & 0.4095300E+00, 0.4095300E+00, 0.4080700E+00, 0.4175800E+00, &
     & 0.4384500E+00, 0.4344000E+00, 0.4486100E+00, 0.4521500E+00, &
     & 0.4690700E+00, 0.4714100E+00, 0.4976100E+00, 0.5209800E+00, &
     & 0.5361800E+00, 0.5982900E+00, 0.6313300E+00, 0.6720000E+00, &
     & 0.7531309E+00, 0.8733824E+00, 0.1198645E+01, 0.1198645E+01 /
      data (ref_adm( 2,iz,24,18),iz = 1,20) / &
     & 0.4331700E+00, 0.4331700E+00, 0.4261600E+00, 0.4306600E+00, &
     & 0.4364300E+00, 0.4381500E+00, 0.4460800E+00, 0.4544200E+00, &
     & 0.4688000E+00, 0.4885100E+00, 0.5094200E+00, 0.5302000E+00, &
     & 0.5648100E+00, 0.6069200E+00, 0.6275300E+00, 0.7053000E+00, &
     & 0.7500400E+00, 0.8745983E+00, 0.1226199E+01, 0.1226199E+01 /
      data (ref_adm( 2,iz,25,18),iz = 1,20) / &
     & 0.4273300E+00, 0.4273300E+00, 0.4322400E+00, 0.4377700E+00, &
     & 0.4389400E+00, 0.4425000E+00, 0.4511800E+00, 0.4633100E+00, &
     & 0.4788000E+00, 0.4935600E+00, 0.5059300E+00, 0.5299500E+00, &
     & 0.5544600E+00, 0.6138600E+00, 0.6385900E+00, 0.7106900E+00, &
     & 0.8097800E+00, 0.8826004E+00, 0.1263263E+01, 0.1263263E+01 /
      data (ref_adm( 2,iz,26,18),iz = 1,20) / &
     & 0.4316100E+00, 0.4316100E+00, 0.4357500E+00, 0.4287600E+00, &
     & 0.4237900E+00, 0.4368200E+00, 0.4496900E+00, 0.4522200E+00, &
     & 0.4737700E+00, 0.4934700E+00, 0.5261700E+00, 0.5421200E+00, &
     & 0.5751600E+00, 0.6182100E+00, 0.6634900E+00, 0.7452000E+00, &
     & 0.8345200E+00, 0.9258800E+00, 0.1313478E+01, 0.1313478E+01 /
      data (ref_adm( 2,iz,27,18),iz = 1,20) / &
     & 0.4293200E+00, 0.4293200E+00, 0.4265900E+00, 0.4274800E+00, &
     & 0.4408200E+00, 0.4488200E+00, 0.4586300E+00, 0.4514200E+00, &
     & 0.4676100E+00, 0.4933900E+00, 0.5259400E+00, 0.5432400E+00, &
     & 0.5628100E+00, 0.6177500E+00, 0.6801500E+00, 0.7646900E+00, &
     & 0.8600200E+00, 0.9827200E+00, 0.1136100E+01, 0.1136100E+01 /
      data (ref_adm( 2,iz,28,18),iz = 1,20) / &
     & 0.4197800E+00, 0.4197800E+00, 0.4340800E+00, 0.4476500E+00, &
     & 0.4459400E+00, 0.4503200E+00, 0.4477000E+00, 0.4546900E+00, &
     & 0.4827400E+00, 0.5053800E+00, 0.5299200E+00, 0.5525500E+00, &
     & 0.5824200E+00, 0.6355600E+00, 0.6886600E+00, 0.7666600E+00, &
     & 0.8761000E+00, 0.1069700E+01, 0.1111700E+01, 0.1111700E+01 /
      data (ref_adm( 2,iz,29,18),iz = 1,20) / &
     & 0.4207600E+00, 0.4207600E+00, 0.4260800E+00, 0.4288900E+00, &
     & 0.4313900E+00, 0.4374900E+00, 0.4543500E+00, 0.4653500E+00, &
     & 0.4764600E+00, 0.5033200E+00, 0.5353200E+00, 0.5554200E+00, &
     & 0.5842800E+00, 0.6393900E+00, 0.7004700E+00, 0.8183100E+00, &
     & 0.9123500E+00, 0.1143600E+01, 0.1238000E+01, 0.1238000E+01 /
      data (ref_adm( 2,iz,30,18),iz = 1,20) / &
     & 0.4297900E+00, 0.4297900E+00, 0.4200900E+00, 0.4168500E+00, &
     & 0.4366000E+00, 0.4482400E+00, 0.4501800E+00, 0.4626000E+00, &
     & 0.4858800E+00, 0.5081400E+00, 0.5237300E+00, 0.5705700E+00, &
     & 0.6114500E+00, 0.6766900E+00, 0.7310500E+00, 0.7967800E+00, &
     & 0.8977200E+00, 0.1059600E+01, 0.1164200E+01, 0.1164200E+01 /
      data (ref_adm( 2,iz,31,18),iz = 1,20) / &
     & 0.4242600E+00, 0.4242600E+00, 0.4188100E+00, 0.4318500E+00, &
     & 0.4456900E+00, 0.4405600E+00, 0.4481000E+00, 0.4710500E+00, &
     & 0.4808800E+00, 0.5092900E+00, 0.5405500E+00, 0.5909500E+00, &
     & 0.6257600E+00, 0.6891100E+00, 0.7549800E+00, 0.8701500E+00, &
     & 0.9912900E+00, 0.1186700E+01, 0.1163200E+01, 0.1163200E+01 /
      data (ref_adm( 2,iz,32,18),iz = 1,20) / &
     & 0.4489600E+00, 0.4489600E+00, 0.4360800E+00, 0.4334200E+00, &
     & 0.4491200E+00, 0.4529400E+00, 0.4653200E+00, 0.4819800E+00, &
     & 0.5056900E+00, 0.5281100E+00, 0.5583700E+00, 0.5959300E+00, &
     & 0.6576400E+00, 0.7226800E+00, 0.7668300E+00, 0.8709600E+00, &
     & 0.9729400E+00, 0.1166800E+01, 0.1313600E+01, 0.1313600E+01 /
      data (ref_adm( 2,iz,33,18),iz = 1,20) / &
     & 0.4238900E+00, 0.4238900E+00, 0.4187900E+00, 0.4204100E+00, &
     & 0.4267600E+00, 0.4391600E+00, 0.4466300E+00, 0.4654100E+00, &
     & 0.4892400E+00, 0.5160600E+00, 0.5465400E+00, 0.5880600E+00, &
     & 0.6368100E+00, 0.7014900E+00, 0.7645800E+00, 0.8706500E+00, &
     & 0.1024400E+01, 0.1266900E+01, 0.1511800E+01, 0.1511800E+01 /
      data (ref_adm( 2,iz,34,18),iz = 1,20) / &
     & 0.4189200E+00, 0.4189200E+00, 0.4253000E+00, 0.4379700E+00, &
     & 0.4353500E+00, 0.4453800E+00, 0.4586400E+00, 0.4667500E+00, &
     & 0.5019400E+00, 0.5417600E+00, 0.5632300E+00, 0.6005500E+00, &
     & 0.6378900E+00, 0.6997900E+00, 0.7654800E+00, 0.8900000E+00, &
     & 0.1008800E+01, 0.1261200E+01, 0.1986500E+01, 0.1986500E+01 /
      data (ref_adm( 2,iz,35,18),iz = 1,20) / &
     & 0.4219400E+00, 0.4219400E+00, 0.4373600E+00, 0.4256200E+00, &
     & 0.4265500E+00, 0.4369000E+00, 0.4637700E+00, 0.4698800E+00, &
     & 0.5026300E+00, 0.5375300E+00, 0.5451400E+00, 0.6024500E+00, &
     & 0.6446700E+00, 0.7038000E+00, 0.7928100E+00, 0.9152400E+00, &
     & 0.1093700E+01, 0.1414900E+01, 0.1796216E+01, 0.1796216E+01 /
      data (ref_adm( 2,iz,36,18),iz = 1,20) / &
     & 0.4264100E+00, 0.4264100E+00, 0.4172400E+00, 0.4178400E+00, &
     & 0.4316000E+00, 0.4383700E+00, 0.4577300E+00, 0.4678500E+00, &
     & 0.4912200E+00, 0.5397000E+00, 0.5672600E+00, 0.5967300E+00, &
     & 0.6678000E+00, 0.7221600E+00, 0.7853400E+00, 0.9060400E+00, &
     & 0.1107100E+01, 0.1280700E+01, 0.1498000E+01, 0.1498000E+01 /
      data (ref_adm( 2,iz,37,18),iz = 1,20) / &
     & 0.4119700E+00, 0.4119700E+00, 0.4214300E+00, 0.4244800E+00, &
     & 0.4311100E+00, 0.4409900E+00, 0.4412700E+00, 0.4594700E+00, &
     & 0.4870700E+00, 0.5191500E+00, 0.5541400E+00, 0.6148500E+00, &
     & 0.6644700E+00, 0.7207400E+00, 0.7992400E+00, 0.8978500E+00, &
     & 0.1111900E+01, 0.1315900E+01, 0.1550900E+01, 0.1550900E+01 /
      data (ref_adm( 2,iz,38,18),iz = 1,20) / &
     & 0.4119700E+00, 0.4119700E+00, 0.4214300E+00, 0.4244800E+00, &
     & 0.4311100E+00, 0.4409900E+00, 0.4412700E+00, 0.4594700E+00, &
     & 0.4870700E+00, 0.5191500E+00, 0.5541400E+00, 0.6148500E+00, &
     & 0.6644700E+00, 0.7207400E+00, 0.7992400E+00, 0.8978500E+00, &
     & 0.1111900E+01, 0.1315900E+01, 0.1550900E+01, 0.1550900E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm( 3,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.5550569E+04
      data (ref_adm( 3,iz, 1, 2),iz = 1,20) / &
     & 0.3856311E+00, 0.3856311E+00, 0.3787302E+00, 0.3763397E+00, &
     & 0.3744502E+00, 0.3731579E+00, 0.3708801E+00, 0.3669996E+00, &
     & 0.3620152E+00, 0.3560469E+00, 0.3495555E+00, 0.3405432E+00, &
     & 0.3300242E+00, 0.3201188E+00, 0.3313800E+00, 0.2871615E+00, &
     & 0.2678356E+00, 0.2425497E+00, 0.1979017E+00, 0.1979017E+00 /
      data (ref_adm( 3,iz, 2, 2),iz = 1,20) / &
     & 0.3856311E+00, 0.3856311E+00, 0.3787302E+00, 0.3763397E+00, &
     & 0.3744502E+00, 0.3731579E+00, 0.3708801E+00, 0.3669996E+00, &
     & 0.3620152E+00, 0.3560469E+00, 0.3495555E+00, 0.3405432E+00, &
     & 0.3300242E+00, 0.3201188E+00, 0.3313800E+00, 0.2871615E+00, &
     & 0.2678356E+00, 0.2425497E+00, 0.1979017E+00, 0.1979017E+00 /
      data (ref_adm( 3,iz, 3, 2),iz = 1,20) / &
     & 0.3856311E+00, 0.3856311E+00, 0.3787302E+00, 0.3763397E+00, &
     & 0.3744502E+00, 0.3731579E+00, 0.3708801E+00, 0.3669995E+00, &
     & 0.3620152E+00, 0.3560469E+00, 0.3495555E+00, 0.3405432E+00, &
     & 0.3300242E+00, 0.3201188E+00, 0.3058940E+00, 0.2871615E+00, &
     & 0.2678356E+00, 0.2425497E+00, 0.1979017E+00, 0.1979017E+00 /
      data (ref_adm( 3,iz, 4, 2),iz = 1,20) / &
     & 0.3856311E+00, 0.3856311E+00, 0.3787302E+00, 0.3763397E+00, &
     & 0.3744502E+00, 0.3731579E+00, 0.3708801E+00, 0.3669996E+00, &
     & 0.3620152E+00, 0.3560469E+00, 0.3495555E+00, 0.3405432E+00, &
     & 0.3300242E+00, 0.1973300E+00, 0.3058940E+00, 0.2871615E+00, &
     & 0.2678356E+00, 0.2425497E+00, 0.1979017E+00, 0.1979017E+00 /
      data (ref_adm( 3,iz, 5, 2),iz = 1,20) / &
     & 0.3856311E+00, 0.3856311E+00, 0.3787302E+00, 0.3763397E+00, &
     & 0.3744502E+00, 0.3731579E+00, 0.3708801E+00, 0.3669995E+00, &
     & 0.3620152E+00, 0.3560469E+00, 0.3495555E+00, 0.3405432E+00, &
     & 0.3300242E+00, 0.2858400E+00, 0.3058940E+00, 0.2871615E+00, &
     & 0.2678356E+00, 0.2425497E+00, 0.1979017E+00, 0.1979017E+00 /
      data (ref_adm( 3,iz, 6, 2),iz = 1,20) / &
     & 0.3856311E+00, 0.3856311E+00, 0.3787302E+00, 0.3763397E+00, &
     & 0.3744502E+00, 0.3731579E+00, 0.3708801E+00, 0.3669996E+00, &
     & 0.3620152E+00, 0.3560469E+00, 0.3495555E+00, 0.3405432E+00, &
     & 0.3300242E+00, 0.2904600E+00, 0.3058940E+00, 0.3544700E+00, &
     & 0.2678356E+00, 0.2425497E+00, 0.1979017E+00, 0.1979017E+00 /
      data (ref_adm( 3,iz, 7, 2),iz = 1,20) / &
     & 0.3856311E+00, 0.3856311E+00, 0.3787302E+00, 0.3763397E+00, &
     & 0.3744502E+00, 0.3731579E+00, 0.3708801E+00, 0.3669995E+00, &
     & 0.3620152E+00, 0.3560469E+00, 0.3495555E+00, 0.3405432E+00, &
     & 0.3300242E+00, 0.3201188E+00, 0.3058940E+00, 0.3321700E+00, &
     & 0.2678356E+00, 0.2425497E+00, 0.1979017E+00, 0.1979017E+00 /
      data (ref_adm( 3,iz, 8, 2),iz = 1,20) / &
     & 0.3856311E+00, 0.3856311E+00, 0.3787302E+00, 0.3763397E+00, &
     & 0.3744502E+00, 0.3731579E+00, 0.3708801E+00, 0.3669996E+00, &
     & 0.3620152E+00, 0.3560469E+00, 0.3495555E+00, 0.3405432E+00, &
     & 0.3300242E+00, 0.3201188E+00, 0.3058940E+00, 0.2896400E+00, &
     & 0.2678356E+00, 0.2425497E+00, 0.1979017E+00, 0.1979017E+00 /
      data (ref_adm( 3,iz, 9, 2),iz = 1,20) / &
     & 0.3856311E+00, 0.3856311E+00, 0.3787302E+00, 0.3763397E+00, &
     & 0.3744502E+00, 0.3731579E+00, 0.3708801E+00, 0.3669995E+00, &
     & 0.3620152E+00, 0.3560469E+00, 0.3495555E+00, 0.3405432E+00, &
     & 0.3300242E+00, 0.3201188E+00, 0.3058940E+00, 0.2871615E+00, &
     & 0.2678356E+00, 0.2425497E+00, 0.1979017E+00, 0.1979017E+00 /
      data (ref_adm( 3,iz,10, 2),iz = 1,20) / &
     & 0.3856311E+00, 0.3856311E+00, 0.3787302E+00, 0.3763397E+00, &
     & 0.3744502E+00, 0.3731579E+00, 0.3708801E+00, 0.3669996E+00, &
     & 0.3620152E+00, 0.3560469E+00, 0.3495555E+00, 0.3405432E+00, &
     & 0.3300242E+00, 0.3201188E+00, 0.3058940E+00, 0.2871615E+00, &
     & 0.2678356E+00, 0.2425497E+00, 0.1979017E+00, 0.1979017E+00 /
      data (ref_adm( 3,iz,11, 2),iz = 1,20) / &
     & 0.3856311E+00, 0.3856311E+00, 0.3787302E+00, 0.3763397E+00, &
     & 0.3744502E+00, 0.3731579E+00, 0.3708801E+00, 0.3669995E+00, &
     & 0.3620152E+00, 0.3560469E+00, 0.3495555E+00, 0.3405432E+00, &
     & 0.3300242E+00, 0.3201188E+00, 0.3058940E+00, 0.2871615E+00, &
     & 0.2678356E+00, 0.2425497E+00, 0.1979017E+00, 0.1979017E+00 /
      data (ref_adm( 3,iz,12, 2),iz = 1,20) / &
     & 0.3856311E+00, 0.3856311E+00, 0.3787302E+00, 0.3763397E+00, &
     & 0.3744502E+00, 0.3731579E+00, 0.3708801E+00, 0.3669996E+00, &
     & 0.3620152E+00, 0.3560469E+00, 0.3495555E+00, 0.3405432E+00, &
     & 0.3300242E+00, 0.3201188E+00, 0.3058940E+00, 0.2871615E+00, &
     & 0.2678356E+00, 0.2425497E+00, 0.1979017E+00, 0.1979017E+00 /
      data (ref_adm( 3,iz,13, 2),iz = 1,20) / &
     & 0.3856311E+00, 0.3856311E+00, 0.3787302E+00, 0.3763397E+00, &
     & 0.3744502E+00, 0.3731579E+00, 0.3708801E+00, 0.3669995E+00, &
     & 0.3620152E+00, 0.3560469E+00, 0.3495555E+00, 0.3405432E+00, &
     & 0.3300242E+00, 0.3201188E+00, 0.3058940E+00, 0.2871615E+00, &
     & 0.2678356E+00, 0.2425497E+00, 0.1979017E+00, 0.1979017E+00 /
      data (ref_adm( 3,iz,14, 2),iz = 1,20) / &
     & 0.3856311E+00, 0.3856311E+00, 0.3787302E+00, 0.3763397E+00, &
     & 0.3744502E+00, 0.3731579E+00, 0.3708801E+00, 0.3669996E+00, &
     & 0.3620152E+00, 0.3560469E+00, 0.3495555E+00, 0.3405432E+00, &
     & 0.3300242E+00, 0.3201188E+00, 0.3058940E+00, 0.2871615E+00, &
     & 0.2678356E+00, 0.2425497E+00, 0.1979017E+00, 0.1979017E+00 /
      data (ref_adm( 3,iz,15, 2),iz = 1,20) / &
     & 0.3856311E+00, 0.3856311E+00, 0.3787302E+00, 0.3763397E+00, &
     & 0.3744502E+00, 0.3731579E+00, 0.3708801E+00, 0.3669995E+00, &
     & 0.3620152E+00, 0.3560469E+00, 0.3495555E+00, 0.3405432E+00, &
     & 0.3300242E+00, 0.3201188E+00, 0.3058940E+00, 0.2871615E+00, &
     & 0.2946800E+00, 0.2425497E+00, 0.1979017E+00, 0.1979017E+00 /
      data (ref_adm( 3,iz,16, 2),iz = 1,20) / &
     & 0.3856311E+00, 0.3856311E+00, 0.3787302E+00, 0.3763397E+00, &
     & 0.3744502E+00, 0.3731579E+00, 0.3708801E+00, 0.3669996E+00, &
     & 0.3620152E+00, 0.3560469E+00, 0.3495555E+00, 0.3405432E+00, &
     & 0.3300242E+00, 0.3201188E+00, 0.3058940E+00, 0.2871615E+00, &
     & 0.2678356E+00, 0.2425497E+00, 0.1979017E+00, 0.1979017E+00 /
      data (ref_adm( 3,iz,17, 2),iz = 1,20) / &
     & 0.3856311E+00, 0.3856311E+00, 0.3787302E+00, 0.3763397E+00, &
     & 0.3744502E+00, 0.3731579E+00, 0.3708801E+00, 0.3669995E+00, &
     & 0.3620152E+00, 0.3560469E+00, 0.3495555E+00, 0.3405432E+00, &
     & 0.3300242E+00, 0.3201188E+00, 0.3058940E+00, 0.2871615E+00, &
     & 0.2678356E+00, 0.2425497E+00, 0.1979017E+00, 0.1979017E+00 /
      data (ref_adm( 3,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.4448090E+04
      data (ref_adm( 3,iz, 1, 3),iz = 1,20) / &
     & 0.3563218E+00, 0.3563218E+00, 0.3568659E+00, 0.3579964E+00, &
     & 0.3599254E+00, 0.3775161E+00, 0.3578974E+00, 0.3424664E+00, &
     & 0.3405222E+00, 0.3390597E+00, 0.2533100E+00, 0.3331374E+00, &
     & 0.2644100E+00, 0.3143300E+00, 0.3230488E+00, 0.3128334E+00, &
     & 0.2990623E+00, 0.2778730E+00, 0.2447933E+00, 0.2447933E+00 /
      data (ref_adm( 3,iz, 2, 3),iz = 1,20) / &
     & 0.3563218E+00, 0.3563218E+00, 0.3568659E+00, 0.3579964E+00, &
     & 0.3599254E+00, 0.3775161E+00, 0.3578974E+00, 0.3424664E+00, &
     & 0.3405222E+00, 0.3390597E+00, 0.2533100E+00, 0.3331374E+00, &
     & 0.2644100E+00, 0.3143300E+00, 0.3230488E+00, 0.3128334E+00, &
     & 0.2990623E+00, 0.2778730E+00, 0.2447933E+00, 0.2447933E+00 /
      data (ref_adm( 3,iz, 3, 3),iz = 1,20) / &
     & 0.3563167E+00, 0.3563167E+00, 0.3568720E+00, 0.3580000E+00, &
     & 0.3598683E+00, 0.3774341E+00, 0.3758900E+00, 0.3598100E+00, &
     & 0.3987600E+00, 0.4028500E+00, 0.3986800E+00, 0.3331533E+00, &
     & 0.3310041E+00, 0.3284240E+00, 0.3269400E+00, 0.3126545E+00, &
     & 0.2988038E+00, 0.2776088E+00, 0.6965391E-01, 0.6965391E-01 /
      data (ref_adm( 3,iz, 4, 3),iz = 1,20) / &
     & 0.3563043E+00, 0.3563043E+00, 0.3568835E+00, 0.3580100E+00, &
     & 0.3598068E+00, 0.3771737E+00, 0.3593317E+00, 0.3098200E+00, &
     & 0.2736100E+00, 0.3565300E+00, 0.3519900E+00, 0.3213900E+00, &
     & 0.3308518E+00, 0.3869900E+00, 0.3225915E+00, 0.3145100E+00, &
     & 0.2983696E+00, 0.2771426E+00, 0.2442873E+00, 0.2442873E+00 /
      data (ref_adm( 3,iz, 5, 3),iz = 1,20) / &
     & 0.3563218E+00, 0.3563218E+00, 0.3568889E+00, 0.3580070E+00, &
     & 0.3597625E+00, 0.3767010E+00, 0.3608524E+00, 0.3431825E+00, &
     & 0.3405885E+00, 0.3303600E+00, 0.3417000E+00, 0.3000300E+00, &
     & 0.3004000E+00, 0.2822600E+00, 0.3221183E+00, 0.3116864E+00, &
     & 0.2976832E+00, 0.2764316E+00, 0.2437784E+00, 0.2437784E+00 /
      data (ref_adm( 3,iz, 6, 3),iz = 1,20) / &
     & 0.3563194E+00, 0.3563194E+00, 0.3569205E+00, 0.3580180E+00, &
     & 0.3597190E+00, 0.3759017E+00, 0.3629923E+00, 0.3436971E+00, &
     & 0.3406309E+00, 0.3394306E+00, 0.2676500E+00, 0.2852200E+00, &
     & 0.3475100E+00, 0.3414300E+00, 0.3214724E+00, 0.3108734E+00, &
     & 0.2968256E+00, 0.2754999E+00, 0.2431153E+00, 0.2431153E+00 /
      data (ref_adm( 3,iz, 7, 3),iz = 1,20) / &
     & 0.3563093E+00, 0.3563093E+00, 0.3569338E+00, 0.3580572E+00, &
     & 0.3596723E+00, 0.3747589E+00, 0.3656670E+00, 0.3445395E+00, &
     & 0.3406628E+00, 0.3395720E+00, 0.3361700E+00, 0.2719300E+00, &
     & 0.3080300E+00, 0.4343800E+00, 0.3207508E+00, 0.3294800E+00, &
     & 0.2957407E+00, 0.2744073E+00, 0.2423153E+00, 0.2423153E+00 /
      data (ref_adm( 3,iz, 8, 3),iz = 1,20) / &
     & 0.3563226E+00, 0.3563226E+00, 0.3569308E+00, 0.3581010E+00, &
     & 0.3596526E+00, 0.3730212E+00, 0.3688457E+00, 0.3456248E+00, &
     & 0.3408327E+00, 0.3397285E+00, 0.2631900E+00, 0.2591100E+00, &
     & 0.3203600E+00, 0.2969500E+00, 0.3199720E+00, 0.3195200E+00, &
     & 0.2945606E+00, 0.2731713E+00, 0.2414060E+00, 0.2414060E+00 /
      data (ref_adm( 3,iz, 9, 3),iz = 1,20) / &
     & 0.3563199E+00, 0.3563199E+00, 0.3568987E+00, 0.3581273E+00, &
     & 0.3595992E+00, 0.3709234E+00, 0.3724633E+00, 0.3471074E+00, &
     & 0.3410388E+00, 0.3398692E+00, 0.3238700E+00, 0.3459500E+00, &
     & 0.2546500E+00, 0.2915000E+00, 0.3190615E+00, 0.3077726E+00, &
     & 0.2932411E+00, 0.2718019E+00, 0.2404275E+00, 0.2404275E+00 /
      data (ref_adm( 3,iz,10, 3),iz = 1,20) / &
     & 0.3563228E+00, 0.3563228E+00, 0.3568950E+00, 0.3581452E+00, &
     & 0.3595860E+00, 0.3684032E+00, 0.3761243E+00, 0.3493230E+00, &
     & 0.3413632E+00, 0.3400424E+00, 0.3371985E+00, 0.3706100E+00, &
     & 0.3179200E+00, 0.3208200E+00, 0.3599400E+00, 0.3065811E+00, &
     & 0.2918583E+00, 0.2703474E+00, 0.2393965E+00, 0.2393965E+00 /
      data (ref_adm( 3,iz,11, 3),iz = 1,20) / &
     & 0.3563192E+00, 0.3563192E+00, 0.3569054E+00, 0.3581259E+00, &
     & 0.3596548E+00, 0.3659785E+00, 0.3791251E+00, 0.3522513E+00, &
     & 0.3419015E+00, 0.3401836E+00, 0.3431200E+00, 0.2619600E+00, &
     & 0.3396500E+00, 0.3320300E+00, 0.3362500E+00, 0.3204200E+00, &
     & 0.2904623E+00, 0.2688200E+00, 0.2383208E+00, 0.2383208E+00 /
      data (ref_adm( 3,iz,12, 3),iz = 1,20) / &
     & 0.3563297E+00, 0.3563297E+00, 0.3568729E+00, 0.3581422E+00, &
     & 0.3597664E+00, 0.3640704E+00, 0.3806668E+00, 0.3562790E+00, &
     & 0.3427669E+00, 0.3403177E+00, 0.3381737E+00, 0.3328012E+00, &
     & 0.4223900E+00, 0.3236000E+00, 0.3271300E+00, 0.3040837E+00, &
     & 0.2927700E+00, 0.2673333E+00, 0.2372524E+00, 0.2372524E+00 /
      data (ref_adm( 3,iz,13, 3),iz = 1,20) / &
     & 0.3563467E+00, 0.3563467E+00, 0.3568123E+00, 0.3581231E+00, &
     & 0.3598043E+00, 0.3626278E+00, 0.3805466E+00, 0.3615663E+00, &
     & 0.3440518E+00, 0.3404851E+00, 0.3386082E+00, 0.3839000E+00, &
     & 0.3278692E+00, 0.2800300E+00, 0.3458400E+00, 0.2711600E+00, &
     & 0.2948800E+00, 0.2658889E+00, 0.2362208E+00, 0.2362208E+00 /
      data (ref_adm( 3,iz,14, 3),iz = 1,20) / &
     & 0.3564163E+00, 0.3564163E+00, 0.3567969E+00, 0.3581040E+00, &
     & 0.3597869E+00, 0.3618817E+00, 0.3780020E+00, 0.3680583E+00, &
     & 0.3460443E+00, 0.3407940E+00, 0.3390050E+00, 0.3336784E+00, &
     & 0.3854900E+00, 0.3241100E+00, 0.3145532E+00, 0.3017772E+00, &
     & 0.2862853E+00, 0.2645178E+00, 0.2352377E+00, 0.2352377E+00 /
      data (ref_adm( 3,iz,15, 3),iz = 1,20) / &
     & 0.3564488E+00, 0.3564488E+00, 0.3568264E+00, 0.3580113E+00, &
     & 0.3597624E+00, 0.3617301E+00, 0.3739867E+00, 0.3749349E+00, &
     & 0.3489792E+00, 0.3413313E+00, 0.3394044E+00, 0.3343469E+00, &
     & 0.3276394E+00, 0.3282700E+00, 0.3875500E+00, 0.3007178E+00, &
     & 0.2850690E+00, 0.2632414E+00, 0.2343288E+00, 0.2343288E+00 /
      data (ref_adm( 3,iz,16, 3),iz = 1,20) / &
     & 0.3564416E+00, 0.3564416E+00, 0.3568131E+00, 0.3580409E+00, &
     & 0.3597578E+00, 0.3615617E+00, 0.3694369E+00, 0.3805813E+00, &
     & 0.3534503E+00, 0.3423275E+00, 0.3397180E+00, 0.3350885E+00, &
     & 0.3278757E+00, 0.3359700E+00, 0.2578300E+00, 0.2960800E+00, &
     & 0.2839229E+00, 0.2620882E+00, 0.2335246E+00, 0.2335246E+00 /
      data (ref_adm( 3,iz,17, 3),iz = 1,20) / &
     & 0.3564163E+00, 0.3564163E+00, 0.3567579E+00, 0.3579498E+00, &
     & 0.3596654E+00, 0.3616154E+00, 0.3660162E+00, 0.3831502E+00, &
     & 0.3595756E+00, 0.3438348E+00, 0.3400643E+00, 0.3359028E+00, &
     & 0.3282652E+00, 0.3507200E+00, 0.3616800E+00, 0.3283300E+00, &
     & 0.2829262E+00, 0.2610858E+00, 0.2328454E+00, 0.2328454E+00 /
      data (ref_adm( 3,iz,18, 3),iz = 1,20) / &
     & 0.4075119E+00, 0.4075119E+00, 0.3784516E+00, 0.3748116E+00, &
     & 0.3736406E+00, 0.3747871E+00, 0.3729810E+00, 0.3681843E+00, &
     & 0.3637718E+00, 0.3593908E+00, 0.3557341E+00, 0.3516195E+00, &
     & 0.3474285E+00, 0.3441665E+00, 0.4065600E+00, 0.3209800E+00, &
     & 0.3244269E+00, 0.3090098E+00, 0.2687870E+00, 0.2687870E+00 /
      data (ref_adm( 3,iz,19, 3),iz = 1,20) / &
     & 0.4075119E+00, 0.4075119E+00, 0.3784515E+00, 0.3748116E+00, &
     & 0.3736406E+00, 0.3747871E+00, 0.3729810E+00, 0.3681843E+00, &
     & 0.3637718E+00, 0.3593908E+00, 0.3557341E+00, 0.3516195E+00, &
     & 0.3474285E+00, 0.3052600E+00, 0.3395466E+00, 0.3327916E+00, &
     & 0.2943000E+00, 0.3090098E+00, 0.2687870E+00, 0.2687870E+00 /
      data (ref_adm( 3,iz,20, 3),iz = 1,20) / &
     & 0.4075119E+00, 0.4075119E+00, 0.3784516E+00, 0.3748116E+00, &
     & 0.3736406E+00, 0.3747871E+00, 0.3729810E+00, 0.3681843E+00, &
     & 0.3637718E+00, 0.3593908E+00, 0.3557341E+00, 0.3516195E+00, &
     & 0.3474285E+00, 0.3441665E+00, 0.3581300E+00, 0.3732300E+00, &
     & 0.3321700E+00, 0.3090098E+00, 0.2687870E+00, 0.2687870E+00 /
      data (ref_adm( 3,iz,21, 3),iz = 1,20) / &
     & 0.4075119E+00, 0.4075119E+00, 0.3784515E+00, 0.3748116E+00, &
     & 0.3736406E+00, 0.3747871E+00, 0.3729810E+00, 0.3681843E+00, &
     & 0.3637718E+00, 0.3593908E+00, 0.3557341E+00, 0.3516195E+00, &
     & 0.3474285E+00, 0.3441665E+00, 0.3395466E+00, 0.3332700E+00, &
     & 0.3244269E+00, 0.3090098E+00, 0.2687870E+00, 0.2687870E+00 /
      data (ref_adm( 3,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 3,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo  0.3366172E+00
      data (ref_adm( 3,iz, 1, 4),iz = 1,20) / &
     & 0.3490543E+00, 0.3490543E+00, 0.3148700E+00, 0.3678600E+00, &
     & 0.3726900E+00, 0.4072800E+00, 0.3359700E+00, 0.3264800E+00, &
     & 0.2431500E+00, 0.2396900E+00, 0.3274072E+00, 0.3170300E+00, &
     & 0.3092600E+00, 0.3243400E+00, 0.1940100E+00, 0.3663000E+00, &
     & 0.3308700E+00, 0.3274700E+00, 0.2489696E+00, 0.2489696E+00 /
      data (ref_adm( 3,iz, 2, 4),iz = 1,20) / &
     & 0.3490543E+00, 0.3490543E+00, 0.3148700E+00, 0.3678600E+00, &
     & 0.3726900E+00, 0.4072800E+00, 0.3359700E+00, 0.3264800E+00, &
     & 0.2431500E+00, 0.2396900E+00, 0.3274072E+00, 0.3170300E+00, &
     & 0.3092600E+00, 0.3243400E+00, 0.1940100E+00, 0.3663000E+00, &
     & 0.3308700E+00, 0.3274700E+00, 0.2489696E+00, 0.2489696E+00 /
      data (ref_adm( 3,iz, 3, 4),iz = 1,20) / &
     & 0.3532300E+00, 0.3532300E+00, 0.3552300E+00, 0.2912000E+00, &
     & 0.3510000E+00, 0.3591500E+00, 0.3707700E+00, 0.3551400E+00, &
     & 0.2442800E+00, 0.2355900E+00, 0.3274402E+00, 0.3263671E+00, &
     & 0.3712600E+00, 0.2456800E+00, 0.2374200E+00, 0.3130713E+00, &
     & 0.3007965E+00, 0.3033100E+00, 0.3876164E-01, 0.3876164E-01 /
      data (ref_adm( 3,iz, 4, 4),iz = 1,20) / &
     & 0.3490341E+00, 0.3490341E+00, 0.3578600E+00, 0.3568000E+00, &
     & 0.2028700E+00, 0.3868400E+00, 0.3824300E+00, 0.3706000E+00, &
     & 0.3890700E+00, 0.1835400E+00, 0.2322600E+00, 0.3262731E+00, &
     & 0.3814200E+00, 0.2477500E+00, 0.2510700E+00, 0.3319800E+00, &
     & 0.3710000E+00, 0.2798789E+00, 0.2484269E+00, 0.2484269E+00 /
      data (ref_adm( 3,iz, 5, 4),iz = 1,20) / &
     & 0.3875400E+00, 0.3875400E+00, 0.3983600E+00, 0.3794300E+00, &
     & 0.3119800E+00, 0.3318700E+00, 0.3355900E+00, 0.3135500E+00, &
     & 0.3090900E+00, 0.2866600E+00, 0.2677600E+00, 0.2792100E+00, &
     & 0.3811500E+00, 0.3127100E+00, 0.4108200E+00, 0.3634600E+00, &
     & 0.3725000E+00, 0.3379100E+00, 0.2478813E+00, 0.2478813E+00 /
      data (ref_adm( 3,iz, 6, 4),iz = 1,20) / &
     & 0.2934200E+00, 0.2934200E+00, 0.3078700E+00, 0.2985000E+00, &
     & 0.3128900E+00, 0.3709900E+00, 0.3406000E+00, 0.2948300E+00, &
     & 0.2969300E+00, 0.3272100E+00, 0.2982300E+00, 0.2400600E+00, &
     & 0.3533400E+00, 0.3264000E+00, 0.4212600E+00, 0.3430200E+00, &
     & 0.3974500E+00, 0.2999700E+00, 0.2565600E+00, 0.2565600E+00 /
      data (ref_adm( 3,iz, 7, 4),iz = 1,20) / &
     & 0.3437200E+00, 0.3437200E+00, 0.3554500E+00, 0.3115200E+00, &
     & 0.3843700E+00, 0.3624900E+00, 0.3227500E+00, 0.2980100E+00, &
     & 0.3150000E+00, 0.3400600E+00, 0.3056700E+00, 0.2123700E+00, &
     & 0.2924300E+00, 0.2940800E+00, 0.3502900E+00, 0.3465300E+00, &
     & 0.3651300E+00, 0.3316500E+00, 0.2463130E+00, 0.2463130E+00 /
      data (ref_adm( 3,iz, 8, 4),iz = 1,20) / &
     & 0.3350100E+00, 0.3350100E+00, 0.3142400E+00, 0.3271800E+00, &
     & 0.3397200E+00, 0.3748500E+00, 0.3625500E+00, 0.3695600E+00, &
     & 0.3366200E+00, 0.2979800E+00, 0.3192800E+00, 0.3439000E+00, &
     & 0.2524400E+00, 0.2230600E+00, 0.3242900E+00, 0.3178100E+00, &
     & 0.3765800E+00, 0.3571100E+00, 0.3240900E+00, 0.3240900E+00 /
      data (ref_adm( 3,iz, 9, 4),iz = 1,20) / &
     & 0.2959000E+00, 0.2959000E+00, 0.3820200E+00, 0.3468400E+00, &
     & 0.2973100E+00, 0.3737800E+00, 0.3943000E+00, 0.4076200E+00, &
     & 0.3629400E+00, 0.3378300E+00, 0.3189600E+00, 0.3051200E+00, &
     & 0.2497900E+00, 0.2919300E+00, 0.3173972E+00, 0.3437600E+00, &
     & 0.2950435E+00, 0.3142100E+00, 0.2442943E+00, 0.2442943E+00 /
      data (ref_adm( 3,iz,10, 4),iz = 1,20) / &
     & 0.3490853E+00, 0.3490853E+00, 0.3498514E+00, 0.3515772E+00, &
     & 0.3453000E+00, 0.3529100E+00, 0.4154700E+00, 0.3553400E+00, &
     & 0.3737500E+00, 0.3445200E+00, 0.3628900E+00, 0.3355700E+00, &
     & 0.2974500E+00, 0.2938000E+00, 0.3165103E+00, 0.2680700E+00, &
     & 0.3440700E+00, 0.3314300E+00, 0.3224100E+00, 0.3224100E+00 /
      data (ref_adm( 3,iz,11, 4),iz = 1,20) / &
     & 0.3490877E+00, 0.3490877E+00, 0.3498836E+00, 0.3515888E+00, &
     & 0.3534958E+00, 0.3611148E+00, 0.4468600E+00, 0.3268800E+00, &
     & 0.3623800E+00, 0.3695700E+00, 0.3338800E+00, 0.3390400E+00, &
     & 0.3278100E+00, 0.2963200E+00, 0.3156001E+00, 0.3241500E+00, &
     & 0.2922083E+00, 0.2711439E+00, 0.2420518E+00, 0.2420518E+00 /
      data (ref_adm( 3,iz,12, 4),iz = 1,20) / &
     & 0.3491099E+00, 0.3491099E+00, 0.3498570E+00, 0.2302300E+00, &
     & 0.2429000E+00, 0.3229800E+00, 0.3548100E+00, 0.3053000E+00, &
     & 0.3345642E+00, 0.3326948E+00, 0.3314120E+00, 0.3626100E+00, &
     & 0.3342000E+00, 0.3273100E+00, 0.3147067E+00, 0.3689700E+00, &
     & 0.2907383E+00, 0.3833500E+00, 0.2409225E+00, 0.2409225E+00 /
      data (ref_adm( 3,iz,13, 4),iz = 1,20) / &
     & 0.3491330E+00, 0.3491330E+00, 0.3497908E+00, 0.3516485E+00, &
     & 0.2533800E+00, 0.3572641E+00, 0.3341300E+00, 0.4118200E+00, &
     & 0.3362722E+00, 0.2905000E+00, 0.2022300E+00, 0.3377600E+00, &
     & 0.3921600E+00, 0.3220700E+00, 0.3138744E+00, 0.3032207E+00, &
     & 0.2893445E+00, 0.2681100E+00, 0.2398353E+00, 0.2398353E+00 /
      data (ref_adm( 3,iz,14, 4),iz = 1,20) / &
     & 0.3492292E+00, 0.3492292E+00, 0.3498052E+00, 0.3516706E+00, &
     & 0.3228000E+00, 0.3526200E+00, 0.3348800E+00, 0.4242400E+00, &
     & 0.3388410E+00, 0.4446100E+00, 0.4064600E+00, 0.3294000E+00, &
     & 0.2987400E+00, 0.3308800E+00, 0.3857300E+00, 0.3021840E+00, &
     & 0.2879893E+00, 0.2667006E+00, 0.2388101E+00, 0.2388101E+00 /
      data (ref_adm( 3,iz,15, 4),iz = 1,20) / &
     & 0.3492766E+00, 0.3492766E+00, 0.3498555E+00, 0.3515993E+00, &
     & 0.3539261E+00, 0.3131600E+00, 0.3809500E+00, 0.3472700E+00, &
     & 0.4209400E+00, 0.4467400E+00, 0.3090100E+00, 0.3294400E+00, &
     & 0.3161900E+00, 0.3093400E+00, 0.3405800E+00, 0.3011686E+00, &
     & 0.2867879E+00, 0.2653956E+00, 0.2378717E+00, 0.2378717E+00 /
      data (ref_adm( 3,iz,16, 4),iz = 1,20) / &
     & 0.3492771E+00, 0.3492771E+00, 0.3189200E+00, 0.3321400E+00, &
     & 0.3540164E+00, 0.4157800E+00, 0.1941900E+00, 0.3508000E+00, &
     & 0.4056200E+00, 0.3747600E+00, 0.4325300E+00, 0.2666900E+00, &
     & 0.3988500E+00, 0.3073200E+00, 0.3060800E+00, 0.3003250E+00, &
     & 0.2856584E+00, 0.2661100E+00, 0.2370480E+00, 0.2370480E+00 /
      data (ref_adm( 3,iz,17, 4),iz = 1,20) / &
     & 0.3471500E+00, 0.3471500E+00, 0.3750500E+00, 0.2859200E+00, &
     & 0.2885400E+00, 0.4110500E+00, 0.3620495E+00, 0.3830985E+00, &
     & 0.4643400E+00, 0.3893900E+00, 0.3664300E+00, 0.3314294E+00, &
     & 0.3276700E+00, 0.3096500E+00, 0.2882000E+00, 0.2996055E+00, &
     & 0.2846967E+00, 0.2632186E+00, 0.2363581E+00, 0.2363581E+00 /
      data (ref_adm( 3,iz,18, 4),iz = 1,20) / &
     & 0.2360100E+00, 0.2360100E+00, 0.3313973E+00, 0.2985900E+00, &
     & 0.2969200E+00, 0.3421015E+00, 0.3342100E+00, 0.3397253E+00, &
     & 0.3374486E+00, 0.2686500E+00, 0.3295400E+00, 0.3563100E+00, &
     & 0.2964000E+00, 0.3299000E+00, 0.3209800E+00, 0.3541653E+00, &
     & 0.3507409E+00, 0.3329892E+00, 0.2798000E+00, 0.2798000E+00 /
      data (ref_adm( 3,iz,19, 4),iz = 1,20) / &
     & 0.2381700E+00, 0.2381700E+00, 0.3319131E+00, 0.3513400E+00, &
     & 0.3349027E+00, 0.3422008E+00, 0.3433239E+00, 0.3373500E+00, &
     & 0.3374734E+00, 0.2702800E+00, 0.3802900E+00, 0.3466900E+00, &
     & 0.3239900E+00, 0.3371600E+00, 0.3298700E+00, 0.4278400E+00, &
     & 0.3501772E+00, 0.3324378E+00, 0.2794055E+00, 0.2794055E+00 /
      data (ref_adm( 3,iz,20, 4),iz = 1,20) / &
     & 0.3374395E+00, 0.3374395E+00, 0.3316583E+00, 0.3304517E+00, &
     & 0.3341690E+00, 0.3415236E+00, 0.3434658E+00, 0.3646100E+00, &
     & 0.3274100E+00, 0.3368901E+00, 0.4234000E+00, 0.4007800E+00, &
     & 0.3704900E+00, 0.3741100E+00, 0.3449500E+00, 0.3351400E+00, &
     & 0.3754500E+00, 0.3831000E+00, 0.2789849E+00, 0.2789849E+00 /
      data (ref_adm( 3,iz,21, 4),iz = 1,20) / &
     & 0.3373565E+00, 0.3373565E+00, 0.3318582E+00, 0.3305451E+00, &
     & 0.3334433E+00, 0.3412594E+00, 0.3436124E+00, 0.3408700E+00, &
     & 0.3596100E+00, 0.3628500E+00, 0.4608300E+00, 0.3776000E+00, &
     & 0.3623300E+00, 0.3732000E+00, 0.3973200E+00, 0.3363300E+00, &
     & 0.3483546E+00, 0.3305951E+00, 0.2786745E+00, 0.2786745E+00 /
      data (ref_adm( 3,iz,22, 4),iz = 1,20) / &
     & 0.3218753E+00, 0.3218753E+00, 0.3232451E+00, 0.3272890E+00, &
     & 0.3331727E+00, 0.3371810E+00, 0.2709100E+00, 0.2620900E+00, &
     & 0.3043100E+00, 0.3413012E+00, 0.3854000E+00, 0.4028800E+00, &
     & 0.4000600E+00, 0.3959600E+00, 0.3759200E+00, 0.3797400E+00, &
     & 0.3453742E+00, 0.3250203E+00, 0.2746711E+00, 0.2746711E+00 /
      data (ref_adm( 3,iz,23, 4),iz = 1,20) / &
     & 0.3217490E+00, 0.3217490E+00, 0.2988300E+00, 0.3124900E+00, &
     & 0.3316660E+00, 0.3370615E+00, 0.2427100E+00, 0.2540200E+00, &
     & 0.3319100E+00, 0.3347200E+00, 0.3235500E+00, 0.3482967E+00, &
     & 0.3527200E+00, 0.3539331E+00, 0.3888800E+00, 0.3752300E+00, &
     & 0.3342100E+00, 0.2176900E+00, 0.2658200E+00, 0.2658200E+00 /
      data (ref_adm( 3,iz,24, 4),iz = 1,20) / &
     & 0.3214038E+00, 0.3214038E+00, 0.3209560E+00, 0.3238232E+00, &
     & 0.2516500E+00, 0.2438000E+00, 0.3408187E+00, 0.3418146E+00, &
     & 0.2618000E+00, 0.3438861E+00, 0.3398000E+00, 0.3262000E+00, &
     & 0.4069300E+00, 0.3530796E+00, 0.3526809E+00, 0.4047300E+00, &
     & 0.3398044E+00, 0.2915300E+00, 0.2719458E+00, 0.2719458E+00 /
      data (ref_adm( 3,iz,25, 4),iz = 1,20) / &
     & 0.4706500E+00, 0.4706500E+00, 0.2800900E+00, 0.2703500E+00, &
     & 0.2445200E+00, 0.3343228E+00, 0.3412781E+00, 0.3436884E+00, &
     & 0.3444971E+00, 0.3455141E+00, 0.3464084E+00, 0.3488915E+00, &
     & 0.3512630E+00, 0.3526399E+00, 0.3510881E+00, 0.3467815E+00, &
     & 0.3375331E+00, 0.3165255E+00, 0.2710787E+00, 0.2710787E+00 /
      data (ref_adm( 3,iz,26, 4),iz = 1,20) / &
     & 0.2360700E+00, 0.2360700E+00, 0.2368700E+00, 0.2389000E+00, &
     & 0.4654900E+00, 0.3618900E+00, 0.3311900E+00, 0.3453988E+00, &
     & 0.3464054E+00, 0.3474045E+00, 0.3479424E+00, 0.3495141E+00, &
     & 0.3510157E+00, 0.3521319E+00, 0.3504405E+00, 0.3444207E+00, &
     & 0.3349321E+00, 0.3140435E+00, 0.2701046E+00, 0.2701046E+00 /
      data (ref_adm( 3,iz,27, 4),iz = 1,20) / &
     & 0.5275500E+00, 0.5275500E+00, 0.2160700E+00, 0.3203017E+00, &
     & 0.3233590E+00, 0.3289458E+00, 0.3382832E+00, 0.3459764E+00, &
     & 0.3483292E+00, 0.3489420E+00, 0.3494690E+00, 0.3505170E+00, &
     & 0.3510668E+00, 0.3514798E+00, 0.3497284E+00, 0.3429200E+00, &
     & 0.3326456E+00, 0.3119628E+00, 0.2693194E+00, 0.2693194E+00 /
      data (ref_adm( 3,iz,28, 4),iz = 1,20) / &
     & 0.3203549E+00, 0.3203549E+00, 0.4571000E+00, 0.3195070E+00, &
     & 0.3221861E+00, 0.3270228E+00, 0.3355286E+00, 0.3450778E+00, &
     & 0.3502681E+00, 0.3507018E+00, 0.3513445E+00, 0.3510307E+00, &
     & 0.3515005E+00, 0.3511790E+00, 0.3494522E+00, 0.3419385E+00, &
     & 0.3308771E+00, 0.3103557E+00, 0.2684848E+00, 0.2684848E+00 /
      data (ref_adm( 3,iz,29, 4),iz = 1,20) / &
     & 0.4100600E+00, 0.4100600E+00, 0.4349900E+00, 0.3197575E+00, &
     & 0.2792100E+00, 0.3254553E+00, 0.3326616E+00, 0.3431859E+00, &
     & 0.3511952E+00, 0.3526289E+00, 0.3530073E+00, 0.3520234E+00, &
     & 0.3521897E+00, 0.3510934E+00, 0.3487447E+00, 0.3409422E+00, &
     & 0.3294055E+00, 0.3086174E+00, 0.2679389E+00, 0.2679389E+00 /
      data (ref_adm( 3,iz,30, 4),iz = 1,20) / &
     & 0.3200566E+00, 0.3200566E+00, 0.3176738E+00, 0.3196485E+00, &
     & 0.3222628E+00, 0.3251610E+00, 0.3305109E+00, 0.3405737E+00, &
     & 0.3504248E+00, 0.3543745E+00, 0.3543231E+00, 0.3538690E+00, &
     & 0.3529995E+00, 0.3516595E+00, 0.3487508E+00, 0.3405507E+00, &
     & 0.3282278E+00, 0.3072329E+00, 0.2674637E+00, 0.2674637E+00 /
      data (ref_adm( 3,iz,31, 4),iz = 1,20) / &
     & 0.3201044E+00, 0.3201044E+00, 0.3178200E+00, 0.3202645E+00, &
     & 0.3229466E+00, 0.3253980E+00, 0.3294097E+00, 0.3380697E+00, &
     & 0.3492989E+00, 0.3558343E+00, 0.3555410E+00, 0.3552911E+00, &
     & 0.3536220E+00, 0.3523206E+00, 0.3483118E+00, 0.3402459E+00, &
     & 0.3275092E+00, 0.3057707E+00, 0.2672167E+00, 0.2672167E+00 /
      data (ref_adm( 3,iz,32, 4),iz = 1,20) / &
     & 0.3198503E+00, 0.3198503E+00, 0.3180064E+00, 0.3203233E+00, &
     & 0.3234325E+00, 0.3260141E+00, 0.3290732E+00, 0.3359696E+00, &
     & 0.3472836E+00, 0.3560385E+00, 0.3572511E+00, 0.3565629E+00, &
     & 0.3542511E+00, 0.3526629E+00, 0.3480729E+00, 0.3400064E+00, &
     & 0.3266769E+00, 0.3048370E+00, 0.2671449E+00, 0.2671449E+00 /
      data (ref_adm( 3,iz,33, 4),iz = 1,20) / &
     & 0.3199882E+00, 0.3199882E+00, 0.3177204E+00, 0.3210207E+00, &
     & 0.3245714E+00, 0.3269079E+00, 0.3297151E+00, 0.3342173E+00, &
     & 0.3450335E+00, 0.3557630E+00, 0.3586047E+00, 0.3577593E+00, &
     & 0.3554915E+00, 0.3533668E+00, 0.3483648E+00, 0.3400731E+00, &
     & 0.3262100E+00, 0.3041719E+00, 0.2670502E+00, 0.2670502E+00 /
      data (ref_adm( 3,iz,34, 4),iz = 1,20) / &
     & 0.2924500E+00, 0.2924500E+00, 0.2166000E+00, 0.3218966E+00, &
     & 0.3278203E+00, 0.3292916E+00, 0.3299686E+00, 0.3338634E+00, &
     & 0.3435305E+00, 0.3550009E+00, 0.3596633E+00, 0.3585103E+00, &
     & 0.3560573E+00, 0.3535252E+00, 0.3483520E+00, 0.3397672E+00, &
     & 0.3257670E+00, 0.3032647E+00, 0.2669970E+00, 0.2669970E+00 /
      data (ref_adm( 3,iz,35, 4),iz = 1,20) / &
     & 0.3523300E+00, 0.3523300E+00, 0.3183599E+00, 0.3229294E+00, &
     & 0.3340966E+00, 0.3330569E+00, 0.3305328E+00, 0.3334664E+00, &
     & 0.3416980E+00, 0.3543663E+00, 0.3602064E+00, 0.3593457E+00, &
     & 0.3567152E+00, 0.3539064E+00, 0.3487165E+00, 0.3396151E+00, &
     & 0.3255932E+00, 0.3029244E+00, 0.2669738E+00, 0.2669738E+00 /
      data (ref_adm( 3,iz,36, 4),iz = 1,20) / &
     & 0.3402700E+00, 0.3402700E+00, 0.2643600E+00, 0.3104800E+00, &
     & 0.3471065E+00, 0.3420237E+00, 0.3313577E+00, 0.3333779E+00, &
     & 0.3410163E+00, 0.3534453E+00, 0.3607692E+00, 0.3600149E+00, &
     & 0.3571584E+00, 0.3541789E+00, 0.3488008E+00, 0.3396830E+00, &
     & 0.3257071E+00, 0.3028544E+00, 0.2669603E+00, 0.2669603E+00 /
      data (ref_adm( 3,iz,37, 4),iz = 1,20) / &
     & 0.3293300E+00, 0.3293300E+00, 0.4684800E+00, 0.3987300E+00, &
     & 0.4591500E+00, 0.3529013E+00, 0.3318834E+00, 0.3333571E+00, &
     & 0.3407077E+00, 0.3530123E+00, 0.3609121E+00, 0.3600111E+00, &
     & 0.3577006E+00, 0.3545994E+00, 0.3491026E+00, 0.3398587E+00, &
     & 0.3253995E+00, 0.3026774E+00, 0.2669294E+00, 0.2669294E+00 /
      data (ref_adm( 3,iz,38, 4),iz = 1,20) / &
     & 0.3293300E+00, 0.3293300E+00, 0.4684800E+00, 0.3987300E+00, &
     & 0.4591500E+00, 0.3529013E+00, 0.3318834E+00, 0.3333571E+00, &
     & 0.3407077E+00, 0.3530123E+00, 0.3609121E+00, 0.3600111E+00, &
     & 0.3577006E+00, 0.3545994E+00, 0.3491026E+00, 0.3398587E+00, &
     & 0.3253995E+00, 0.3026774E+00, 0.2669294E+00, 0.2669294E+00 /
! Solar Zenith Angle 20.0 Albedo  0.3287703E+00
      data (ref_adm( 3,iz, 1, 5),iz = 1,20) / &
     & 0.3708900E+00, 0.3708900E+00, 0.3359400E+00, 0.3000500E+00, &
     & 0.3047200E+00, 0.2792100E+00, 0.2831800E+00, 0.2934600E+00, &
     & 0.2334800E+00, 0.2861700E+00, 0.3085100E+00, 0.3613100E+00, &
     & 0.2878200E+00, 0.2276300E+00, 0.3274300E+00, 0.3625918E+00, &
     & 0.3606000E+00, 0.4281300E+00, 0.3108816E+00, 0.3108816E+00 /
      data (ref_adm( 3,iz, 2, 5),iz = 1,20) / &
     & 0.3708900E+00, 0.3708900E+00, 0.3359400E+00, 0.3000500E+00, &
     & 0.3047200E+00, 0.2792100E+00, 0.2831800E+00, 0.2934600E+00, &
     & 0.2334800E+00, 0.2861700E+00, 0.3085100E+00, 0.3613100E+00, &
     & 0.2878200E+00, 0.2276300E+00, 0.3274300E+00, 0.3625918E+00, &
     & 0.3606000E+00, 0.4281300E+00, 0.3108816E+00, 0.3108816E+00 /
      data (ref_adm( 3,iz, 3, 5),iz = 1,20) / &
     & 0.3016200E+00, 0.3016200E+00, 0.4242000E+00, 0.3194600E+00, &
     & 0.2810800E+00, 0.3189100E+00, 0.2713400E+00, 0.2900000E+00, &
     & 0.2856300E+00, 0.2780800E+00, 0.2776700E+00, 0.3683900E+00, &
     & 0.4044700E+00, 0.2575400E+00, 0.3217200E+00, 0.3945000E+00, &
     & 0.3632500E+00, 0.4042000E+00, 0.3765158E-01, 0.3765158E-01 /
      data (ref_adm( 3,iz, 4, 5),iz = 1,20) / &
     & 0.2951400E+00, 0.2951400E+00, 0.3235900E+00, 0.3417300E+00, &
     & 0.2870800E+00, 0.2955800E+00, 0.3325500E+00, 0.2804000E+00, &
     & 0.2833600E+00, 0.2787500E+00, 0.3252200E+00, 0.2323500E+00, &
     & 0.3381300E+00, 0.3266300E+00, 0.3400900E+00, 0.2959200E+00, &
     & 0.3934300E+00, 0.3637715E+00, 0.3101310E+00, 0.3101310E+00 /
      data (ref_adm( 3,iz, 5, 5),iz = 1,20) / &
     & 0.3515900E+00, 0.3515900E+00, 0.3669300E+00, 0.3374300E+00, &
     & 0.3287700E+00, 0.2567900E+00, 0.3067100E+00, 0.2710200E+00, &
     & 0.2900100E+00, 0.2983800E+00, 0.2883200E+00, 0.3155911E+00, &
     & 0.2574600E+00, 0.2709400E+00, 0.2483700E+00, 0.3608600E+00, &
     & 0.3367500E+00, 0.3491800E+00, 0.3092171E+00, 0.3092171E+00 /
      data (ref_adm( 3,iz, 6, 5),iz = 1,20) / &
     & 0.3062800E+00, 0.3062800E+00, 0.3238700E+00, 0.2748700E+00, &
     & 0.3101400E+00, 0.2682700E+00, 0.2777800E+00, 0.2734700E+00, &
     & 0.2657400E+00, 0.2163100E+00, 0.2377200E+00, 0.2759900E+00, &
     & 0.2430400E+00, 0.2538400E+00, 0.4590700E+00, 0.3544000E+00, &
     & 0.3673512E+00, 0.3611049E+00, 0.3081967E+00, 0.3081967E+00 /
      data (ref_adm( 3,iz, 7, 5),iz = 1,20) / &
     & 0.3008800E+00, 0.3008800E+00, 0.3330600E+00, 0.2997600E+00, &
     & 0.3135700E+00, 0.2960500E+00, 0.2884500E+00, 0.2459200E+00, &
     & 0.2707600E+00, 0.2187800E+00, 0.3329300E+00, 0.2714400E+00, &
     & 0.2261000E+00, 0.2815200E+00, 0.4319300E+00, 0.3790300E+00, &
     & 0.3529300E+00, 0.3593098E+00, 0.3066873E+00, 0.3066873E+00 /
      data (ref_adm( 3,iz, 8, 5),iz = 1,20) / &
     & 0.3470000E+00, 0.3470000E+00, 0.3439500E+00, 0.3274200E+00, &
     & 0.3279500E+00, 0.3199600E+00, 0.2642000E+00, 0.3091600E+00, &
     & 0.2695400E+00, 0.3523300E+00, 0.2060400E+00, 0.4969300E+00, &
     & 0.2596300E+00, 0.3735700E+00, 0.3502900E+00, 0.3189000E+00, &
     & 0.3613900E+00, 0.3572986E+00, 0.3049772E+00, 0.3049772E+00 /
      data (ref_adm( 3,iz, 9, 5),iz = 1,20) / &
     & 0.3396200E+00, 0.3396200E+00, 0.3411300E+00, 0.3329100E+00, &
     & 0.3306200E+00, 0.3188700E+00, 0.3074400E+00, 0.3257200E+00, &
     & 0.2775400E+00, 0.3481600E+00, 0.3547500E+00, 0.3884800E+00, &
     & 0.2745500E+00, 0.3793500E+00, 0.3165700E+00, 0.3656600E+00, &
     & 0.3319400E+00, 0.3776600E+00, 0.3028971E+00, 0.3028971E+00 /
      data (ref_adm( 3,iz,10, 5),iz = 1,20) / &
     & 0.3208000E+00, 0.3208000E+00, 0.3325000E+00, 0.2832700E+00, &
     & 0.3320600E+00, 0.2981300E+00, 0.2908800E+00, 0.3201500E+00, &
     & 0.3132100E+00, 0.3335400E+00, 0.3222800E+00, 0.2828900E+00, &
     & 0.2361600E+00, 0.3244500E+00, 0.3425060E+00, 0.3531314E+00, &
     & 0.4324000E+00, 0.3451100E+00, 0.3004589E+00, 0.3004589E+00 /
      data (ref_adm( 3,iz,11, 5),iz = 1,20) / &
     & 0.3321100E+00, 0.3321100E+00, 0.3402100E+00, 0.2661000E+00, &
     & 0.2810300E+00, 0.3335000E+00, 0.3349500E+00, 0.3265300E+00, &
     & 0.2897500E+00, 0.3066300E+00, 0.3118000E+00, 0.3103700E+00, &
     & 0.4118200E+00, 0.3562500E+00, 0.3021800E+00, 0.3162300E+00, &
     & 0.3559067E+00, 0.4091000E+00, 0.2980019E+00, 0.2980019E+00 /
      data (ref_adm( 3,iz,12, 5),iz = 1,20) / &
     & 0.3081500E+00, 0.3081500E+00, 0.3540900E+00, 0.2678000E+00, &
     & 0.2258100E+00, 0.2496400E+00, 0.2870300E+00, 0.3367100E+00, &
     & 0.3402600E+00, 0.3207100E+00, 0.3076100E+00, 0.3262900E+00, &
     & 0.3174100E+00, 0.3146600E+00, 0.2763600E+00, 0.3011800E+00, &
     & 0.3533309E+00, 0.3460695E+00, 0.2955925E+00, 0.2955925E+00 /
      data (ref_adm( 3,iz,13, 5),iz = 1,20) / &
     & 0.3359200E+00, 0.3359200E+00, 0.3751700E+00, 0.3381100E+00, &
     & 0.3181600E+00, 0.2953900E+00, 0.2612200E+00, 0.3288500E+00, &
     & 0.3179800E+00, 0.3015100E+00, 0.3010000E+00, 0.3294200E+00, &
     & 0.3074000E+00, 0.3085100E+00, 0.3122600E+00, 0.2867800E+00, &
     & 0.3504903E+00, 0.3424788E+00, 0.2933066E+00, 0.2933066E+00 /
      data (ref_adm( 3,iz,14, 5),iz = 1,20) / &
     & 0.3336500E+00, 0.3336500E+00, 0.3549500E+00, 0.3363100E+00, &
     & 0.3321500E+00, 0.3426700E+00, 0.3414200E+00, 0.3089600E+00, &
     & 0.2944700E+00, 0.2889200E+00, 0.2993700E+00, 0.3194300E+00, &
     & 0.3290800E+00, 0.3383500E+00, 0.3105400E+00, 0.3127200E+00, &
     & 0.3067400E+00, 0.3073700E+00, 0.2906548E+00, 0.2906548E+00 /
      data (ref_adm( 3,iz,15, 5),iz = 1,20) / &
     & 0.2987100E+00, 0.2987100E+00, 0.2657800E+00, 0.2874900E+00, &
     & 0.3197300E+00, 0.3765300E+00, 0.3183700E+00, 0.3468400E+00, &
     & 0.3012200E+00, 0.2888900E+00, 0.2852700E+00, 0.3178000E+00, &
     & 0.3620600E+00, 0.3374800E+00, 0.3058100E+00, 0.3415037E+00, &
     & 0.3453550E+00, 0.2931400E+00, 0.2881122E+00, 0.2881122E+00 /
      data (ref_adm( 3,iz,16, 5),iz = 1,20) / &
     & 0.3034100E+00, 0.3034100E+00, 0.2882600E+00, 0.2825500E+00, &
     & 0.2867800E+00, 0.3777500E+00, 0.3113900E+00, 0.3474500E+00, &
     & 0.2670300E+00, 0.3178800E+00, 0.3348300E+00, 0.3167900E+00, &
     & 0.3365800E+00, 0.3997500E+00, 0.3407800E+00, 0.3581400E+00, &
     & 0.3422010E+00, 0.3327866E+00, 0.2852607E+00, 0.2852607E+00 /
      data (ref_adm( 3,iz,17, 5),iz = 1,20) / &
     & 0.3144100E+00, 0.3144100E+00, 0.2889200E+00, 0.2236600E+00, &
     & 0.4336000E+00, 0.4958500E+00, 0.3456000E+00, 0.3223900E+00, &
     & 0.2902200E+00, 0.3136300E+00, 0.3292700E+00, 0.3356900E+00, &
     & 0.3357800E+00, 0.3445000E+00, 0.3766300E+00, 0.3340900E+00, &
     & 0.3393043E+00, 0.3299475E+00, 0.2827420E+00, 0.2827420E+00 /
      data (ref_adm( 3,iz,18, 5),iz = 1,20) / &
     & 0.3184100E+00, 0.3184100E+00, 0.2674800E+00, 0.3736100E+00, &
     & 0.4378100E+00, 0.3840100E+00, 0.3414000E+00, 0.2704800E+00, &
     & 0.3177400E+00, 0.2975200E+00, 0.3091300E+00, 0.3292800E+00, &
     & 0.3291600E+00, 0.3718900E+00, 0.3856200E+00, 0.3205100E+00, &
     & 0.3373746E+00, 0.3249114E+00, 0.2764952E+00, 0.2764952E+00 /
      data (ref_adm( 3,iz,19, 5),iz = 1,20) / &
     & 0.3021100E+00, 0.3021100E+00, 0.3893300E+00, 0.3441400E+00, &
     & 0.3814100E+00, 0.3960800E+00, 0.1970000E+00, 0.1731000E+00, &
     & 0.3366900E+00, 0.3343600E+00, 0.3785000E+00, 0.3186300E+00, &
     & 0.2562100E+00, 0.3870600E+00, 0.3872700E+00, 0.2964100E+00, &
     & 0.2848400E+00, 0.3231577E+00, 0.2755067E+00, 0.2755067E+00 /
      data (ref_adm( 3,iz,20, 5),iz = 1,20) / &
     & 0.3611400E+00, 0.3611400E+00, 0.3588100E+00, 0.3321700E+00, &
     & 0.3134300E+00, 0.4003600E+00, 0.2065000E+00, 0.2897400E+00, &
     & 0.3887800E+00, 0.3354300E+00, 0.3417200E+00, 0.4169300E+00, &
     & 0.3296300E+00, 0.3045600E+00, 0.3209900E+00, 0.3222600E+00, &
     & 0.3339912E+00, 0.3213788E+00, 0.2746345E+00, 0.2746345E+00 /
      data (ref_adm( 3,iz,21, 5),iz = 1,20) / &
     & 0.3510800E+00, 0.3510800E+00, 0.2701600E+00, 0.2851700E+00, &
     & 0.3281224E+00, 0.3321754E+00, 0.2189800E+00, 0.4014300E+00, &
     & 0.3959000E+00, 0.2979000E+00, 0.2808400E+00, 0.3236900E+00, &
     & 0.3045200E+00, 0.3424400E+00, 0.3317300E+00, 0.3115600E+00, &
     & 0.3111300E+00, 0.2750300E+00, 0.2737199E+00, 0.2737199E+00 /
      data (ref_adm( 3,iz,22, 5),iz = 1,20) / &
     & 0.3049800E+00, 0.3049800E+00, 0.2187500E+00, 0.3757600E+00, &
     & 0.2784200E+00, 0.3375600E+00, 0.3166200E+00, 0.3839600E+00, &
     & 0.3453100E+00, 0.3601300E+00, 0.2446200E+00, 0.3231300E+00, &
     & 0.3591800E+00, 0.3494000E+00, 0.3487100E+00, 0.3069900E+00, &
     & 0.2780907E+00, 0.2554351E+00, 0.2287070E+00, 0.2287070E+00 /
      data (ref_adm( 3,iz,23, 5),iz = 1,20) / &
     & 0.3102900E+00, 0.3102900E+00, 0.2776700E+00, 0.3059100E+00, &
     & 0.3465900E+00, 0.3264200E+00, 0.3753600E+00, 0.3506600E+00, &
     & 0.2321400E+00, 0.2117400E+00, 0.2870100E+00, 0.2826200E+00, &
     & 0.3138000E+00, 0.2850200E+00, 0.3764400E+00, 0.3444100E+00, &
     & 0.2892800E+00, 0.2554673E+00, 0.2288903E+00, 0.2288903E+00 /
      data (ref_adm( 3,iz,24, 5),iz = 1,20) / &
     & 0.3046000E+00, 0.3046000E+00, 0.3192400E+00, 0.2908600E+00, &
     & 0.3301700E+00, 0.3370700E+00, 0.3285700E+00, 0.3292300E+00, &
     & 0.3272100E+00, 0.3736000E+00, 0.2915900E+00, 0.3283300E+00, &
     & 0.3867400E+00, 0.3779400E+00, 0.3755600E+00, 0.3875600E+00, &
     & 0.3242500E+00, 0.2556456E+00, 0.2291933E+00, 0.2291933E+00 /
      data (ref_adm( 3,iz,25, 5),iz = 1,20) / &
     & 0.3232800E+00, 0.3232800E+00, 0.3443500E+00, 0.3409300E+00, &
     & 0.3348400E+00, 0.3382500E+00, 0.3590600E+00, 0.3761600E+00, &
     & 0.3652900E+00, 0.3867700E+00, 0.3583300E+00, 0.3653600E+00, &
     & 0.3477300E+00, 0.3267900E+00, 0.2903200E+00, 0.3584000E+00, &
     & 0.4350500E+00, 0.2559367E+00, 0.2296048E+00, 0.2296048E+00 /
      data (ref_adm( 3,iz,26, 5),iz = 1,20) / &
     & 0.3041900E+00, 0.3041900E+00, 0.3009800E+00, 0.3362500E+00, &
     & 0.3259500E+00, 0.3513200E+00, 0.3594900E+00, 0.3781200E+00, &
     & 0.3029800E+00, 0.3894600E+00, 0.3958000E+00, 0.3840500E+00, &
     & 0.3376400E+00, 0.4130300E+00, 0.3970500E+00, 0.3502900E+00, &
     & 0.3719900E+00, 0.3747800E+00, 0.2980800E+00, 0.2980800E+00 /
      data (ref_adm( 3,iz,27, 5),iz = 1,20) / &
     & 0.3084000E+00, 0.3084000E+00, 0.3178700E+00, 0.3184900E+00, &
     & 0.3406600E+00, 0.3215000E+00, 0.3452800E+00, 0.3012200E+00, &
     & 0.2960500E+00, 0.3522700E+00, 0.3850400E+00, 0.3864200E+00, &
     & 0.3828300E+00, 0.3797400E+00, 0.3903800E+00, 0.4118000E+00, &
     & 0.3672500E+00, 0.2568020E+00, 0.2306637E+00, 0.2306637E+00 /
      data (ref_adm( 3,iz,28, 5),iz = 1,20) / &
     & 0.3203000E+00, 0.3203000E+00, 0.3426400E+00, 0.3737000E+00, &
     & 0.3598800E+00, 0.3562600E+00, 0.3037300E+00, 0.2324500E+00, &
     & 0.3264900E+00, 0.3776600E+00, 0.5052200E+00, 0.3818500E+00, &
     & 0.3552000E+00, 0.3540100E+00, 0.3654900E+00, 0.4157300E+00, &
     & 0.2805505E+00, 0.2573369E+00, 0.2312637E+00, 0.2312637E+00 /
      data (ref_adm( 3,iz,29, 5),iz = 1,20) / &
     & 0.3301400E+00, 0.3301400E+00, 0.3796500E+00, 0.3846500E+00, &
     & 0.4044100E+00, 0.3026500E+00, 0.2767900E+00, 0.3623100E+00, &
     & 0.3723600E+00, 0.3321100E+00, 0.3000100E+00, 0.3445200E+00, &
     & 0.3891600E+00, 0.3276000E+00, 0.3754500E+00, 0.3002180E+00, &
     & 0.2812896E+00, 0.2579267E+00, 0.2318784E+00, 0.2318784E+00 /
      data (ref_adm( 3,iz,30, 5),iz = 1,20) / &
     & 0.3284700E+00, 0.3284700E+00, 0.3805500E+00, 0.4337300E+00, &
     & 0.3651300E+00, 0.2581700E+00, 0.3407300E+00, 0.3809200E+00, &
     & 0.3107600E+00, 0.3567300E+00, 0.3215200E+00, 0.3649500E+00, &
     & 0.4172700E+00, 0.4096000E+00, 0.3198257E+00, 0.3015251E+00, &
     & 0.2820733E+00, 0.2585224E+00, 0.2324808E+00, 0.2324808E+00 /
      data (ref_adm( 3,iz,31, 5),iz = 1,20) / &
     & 0.3422900E+00, 0.3422900E+00, 0.3806600E+00, 0.3544100E+00, &
     & 0.3436600E+00, 0.3118400E+00, 0.3840100E+00, 0.3790700E+00, &
     & 0.3576700E+00, 0.3167700E+00, 0.2891900E+00, 0.3822615E+00, &
     & 0.3436489E+00, 0.3312141E+00, 0.3207664E+00, 0.3027929E+00, &
     & 0.2828532E+00, 0.2591134E+00, 0.2330690E+00, 0.2330690E+00 /
      data (ref_adm( 3,iz,32, 5),iz = 1,20) / &
     & 0.3450300E+00, 0.3450300E+00, 0.3657000E+00, 0.3643200E+00, &
     & 0.3734500E+00, 0.3488600E+00, 0.3664300E+00, 0.3159000E+00, &
     & 0.3822400E+00, 0.3058600E+00, 0.3115000E+00, 0.3860564E+00, &
     & 0.3475052E+00, 0.3323337E+00, 0.3215291E+00, 0.3039798E+00, &
     & 0.2836509E+00, 0.2596897E+00, 0.2336081E+00, 0.2336081E+00 /
      data (ref_adm( 3,iz,33, 5),iz = 1,20) / &
     & 0.3375500E+00, 0.3375500E+00, 0.3659400E+00, 0.3610500E+00, &
     & 0.3854000E+00, 0.3536400E+00, 0.3815700E+00, 0.3617900E+00, &
     & 0.3507500E+00, 0.2781300E+00, 0.3383600E+00, 0.3880846E+00, &
     & 0.3515647E+00, 0.3335512E+00, 0.3221885E+00, 0.3049876E+00, &
     & 0.2843775E+00, 0.2602138E+00, 0.2341000E+00, 0.2341000E+00 /
      data (ref_adm( 3,iz,34, 5),iz = 1,20) / &
     & 0.3436600E+00, 0.3436600E+00, 0.3193000E+00, 0.3112600E+00, &
     & 0.3901800E+00, 0.3797200E+00, 0.3874100E+00, 0.3769800E+00, &
     & 0.3464500E+00, 0.3429300E+00, 0.3962800E+00, 0.3886322E+00, &
     & 0.3554374E+00, 0.3347090E+00, 0.3227094E+00, 0.3058408E+00, &
     & 0.2850722E+00, 0.2606481E+00, 0.2345093E+00, 0.2345093E+00 /
      data (ref_adm( 3,iz,35, 5),iz = 1,20) / &
     & 0.3314200E+00, 0.3314200E+00, 0.3903700E+00, 0.3854900E+00, &
     & 0.4093200E+00, 0.4083200E+00, 0.3691800E+00, 0.3111500E+00, &
     & 0.3105600E+00, 0.3383500E+00, 0.3209500E+00, 0.3885224E+00, &
     & 0.3588424E+00, 0.3358285E+00, 0.3230594E+00, 0.3064644E+00, &
     & 0.2855783E+00, 0.2609923E+00, 0.2348457E+00, 0.2348457E+00 /
      data (ref_adm( 3,iz,36, 5),iz = 1,20) / &
     & 0.3284400E+00, 0.3284400E+00, 0.3913700E+00, 0.3839600E+00, &
     & 0.3705000E+00, 0.3781100E+00, 0.3441700E+00, 0.3345400E+00, &
     & 0.4001700E+00, 0.3059700E+00, 0.3582800E+00, 0.3953600E+00, &
     & 0.3613017E+00, 0.3365716E+00, 0.3233486E+00, 0.3069071E+00, &
     & 0.2859042E+00, 0.2612237E+00, 0.2350695E+00, 0.2350695E+00 /
      data (ref_adm( 3,iz,37, 5),iz = 1,20) / &
     & 0.3188300E+00, 0.3188300E+00, 0.3563000E+00, 0.4116400E+00, &
     & 0.4016700E+00, 0.3867600E+00, 0.3885200E+00, 0.3531900E+00, &
     & 0.3963400E+00, 0.3682571E+00, 0.4270800E+00, 0.4512500E+00, &
     & 0.3627324E+00, 0.3370756E+00, 0.3235468E+00, 0.3071361E+00, &
     & 0.2861194E+00, 0.2613576E+00, 0.2351927E+00, 0.2351927E+00 /
      data (ref_adm( 3,iz,38, 5),iz = 1,20) / &
     & 0.3188300E+00, 0.3188300E+00, 0.3563000E+00, 0.4116400E+00, &
     & 0.4016700E+00, 0.3867600E+00, 0.3885200E+00, 0.3531900E+00, &
     & 0.3963400E+00, 0.3682571E+00, 0.4270800E+00, 0.4512500E+00, &
     & 0.3627324E+00, 0.3370756E+00, 0.3235468E+00, 0.3071361E+00, &
     & 0.2861194E+00, 0.2613576E+00, 0.2351927E+00, 0.2351927E+00 /
! Solar Zenith Angle 25.0 Albedo  0.3473719E+00
      data (ref_adm( 3,iz, 1, 6),iz = 1,20) / &
     & 0.3112700E+00, 0.3112700E+00, 0.2949400E+00, 0.3223300E+00, &
     & 0.3160500E+00, 0.3683500E+00, 0.4110200E+00, 0.4800700E+00, &
     & 0.3522200E+00, 0.3259700E+00, 0.2926400E+00, 0.3775000E+00, &
     & 0.3602400E+00, 0.3517200E+00, 0.3490100E+00, 0.4015400E+00, &
     & 0.4485500E+00, 0.4726600E+00, 0.4327793E+00, 0.4327793E+00 /
      data (ref_adm( 3,iz, 2, 6),iz = 1,20) / &
     & 0.3112700E+00, 0.3112700E+00, 0.2949400E+00, 0.3223300E+00, &
     & 0.3160500E+00, 0.3683500E+00, 0.4110200E+00, 0.4800700E+00, &
     & 0.3522200E+00, 0.3259700E+00, 0.2926400E+00, 0.3775000E+00, &
     & 0.3602400E+00, 0.3517200E+00, 0.3490100E+00, 0.4015400E+00, &
     & 0.4485500E+00, 0.4726600E+00, 0.4327793E+00, 0.4327793E+00 /
      data (ref_adm( 3,iz, 3, 6),iz = 1,20) / &
     & 0.3031200E+00, 0.3031200E+00, 0.3259300E+00, 0.3393200E+00, &
     & 0.3179900E+00, 0.3400700E+00, 0.2858500E+00, 0.4249700E+00, &
     & 0.3901500E+00, 0.3042400E+00, 0.3179900E+00, 0.2557600E+00, &
     & 0.3591100E+00, 0.3910900E+00, 0.3565600E+00, 0.4064900E+00, &
     & 0.3963600E+00, 0.3840500E+00, 0.2058372E+00, 0.2058372E+00 /
      data (ref_adm( 3,iz, 4, 6),iz = 1,20) / &
     & 0.3916600E+00, 0.3916600E+00, 0.2353100E+00, 0.3344400E+00, &
     & 0.3378100E+00, 0.3355700E+00, 0.2903000E+00, 0.3188300E+00, &
     & 0.3625700E+00, 0.2997700E+00, 0.3966300E+00, 0.3293500E+00, &
     & 0.3085300E+00, 0.3488000E+00, 0.4065000E+00, 0.4054200E+00, &
     & 0.3912200E+00, 0.4156200E+00, 0.4240956E+00, 0.4240956E+00 /
      data (ref_adm( 3,iz, 5, 6),iz = 1,20) / &
     & 0.3111500E+00, 0.3111500E+00, 0.3137600E+00, 0.2823400E+00, &
     & 0.2709800E+00, 0.3516100E+00, 0.2919100E+00, 0.3397300E+00, &
     & 0.2923000E+00, 0.3541500E+00, 0.3691700E+00, 0.4331800E+00, &
     & 0.3027000E+00, 0.4224500E+00, 0.4135500E+00, 0.3725000E+00, &
     & 0.3794500E+00, 0.3920100E+00, 0.4161653E+00, 0.4161653E+00 /
      data (ref_adm( 3,iz, 6, 6),iz = 1,20) / &
     & 0.3945800E+00, 0.3945800E+00, 0.3363900E+00, 0.3435500E+00, &
     & 0.3362800E+00, 0.3426000E+00, 0.3414500E+00, 0.3459600E+00, &
     & 0.3142800E+00, 0.3325500E+00, 0.2987300E+00, 0.2822100E+00, &
     & 0.3506100E+00, 0.3696200E+00, 0.3746000E+00, 0.3492600E+00, &
     & 0.3934160E+00, 0.3429400E+00, 0.3483400E+00, 0.3483400E+00 /
      data (ref_adm( 3,iz, 7, 6),iz = 1,20) / &
     & 0.2965900E+00, 0.2965900E+00, 0.3139200E+00, 0.3377600E+00, &
     & 0.2933200E+00, 0.3111200E+00, 0.1925300E+00, 0.3028900E+00, &
     & 0.3085300E+00, 0.3346700E+00, 0.3260900E+00, 0.3405700E+00, &
     & 0.3459700E+00, 0.3481300E+00, 0.3622400E+00, 0.4106900E+00, &
     & 0.3605200E+00, 0.4049834E+00, 0.3972997E+00, 0.3972997E+00 /
      data (ref_adm( 3,iz, 8, 6),iz = 1,20) / &
     & 0.3385100E+00, 0.3385100E+00, 0.3030800E+00, 0.2741100E+00, &
     & 0.2595600E+00, 0.3637300E+00, 0.3043200E+00, 0.2986100E+00, &
     & 0.2343600E+00, 0.2934900E+00, 0.2924500E+00, 0.3385900E+00, &
     & 0.3677900E+00, 0.3309500E+00, 0.3822200E+00, 0.4903700E+00, &
     & 0.3876159E+00, 0.4018900E+00, 0.3885040E+00, 0.3885040E+00 /
      data (ref_adm( 3,iz, 9, 6),iz = 1,20) / &
     & 0.3299800E+00, 0.3299800E+00, 0.3301200E+00, 0.3727000E+00, &
     & 0.2922800E+00, 0.3503600E+00, 0.3343500E+00, 0.2846900E+00, &
     & 0.3200600E+00, 0.2810300E+00, 0.3284900E+00, 0.3164400E+00, &
     & 0.3342600E+00, 0.3096600E+00, 0.3316500E+00, 0.2956400E+00, &
     & 0.3850625E+00, 0.3954266E+00, 0.3802644E+00, 0.3802644E+00 /
      data (ref_adm( 3,iz,10, 6),iz = 1,20) / &
     & 0.3203300E+00, 0.3203300E+00, 0.3370500E+00, 0.3345500E+00, &
     & 0.3621900E+00, 0.3079100E+00, 0.3203600E+00, 0.2932700E+00, &
     & 0.3271000E+00, 0.2855400E+00, 0.3262100E+00, 0.3560900E+00, &
     & 0.3195900E+00, 0.4084000E+00, 0.4629700E+00, 0.4496100E+00, &
     & 0.3822067E+00, 0.3908795E+00, 0.3730497E+00, 0.3730497E+00 /
      data (ref_adm( 3,iz,11, 6),iz = 1,20) / &
     & 0.3195600E+00, 0.3195600E+00, 0.3347600E+00, 0.3356300E+00, &
     & 0.3345400E+00, 0.3508300E+00, 0.3450100E+00, 0.3273500E+00, &
     & 0.3178900E+00, 0.3153900E+00, 0.2981700E+00, 0.3324900E+00, &
     & 0.3464000E+00, 0.3285500E+00, 0.3847200E+00, 0.4095100E+00, &
     & 0.3791640E+00, 0.3868022E+00, 0.3663362E+00, 0.3663362E+00 /
      data (ref_adm( 3,iz,12, 6),iz = 1,20) / &
     & 0.3107900E+00, 0.3107900E+00, 0.3450400E+00, 0.3166600E+00, &
     & 0.3364400E+00, 0.3264900E+00, 0.3368600E+00, 0.3270100E+00, &
     & 0.3217900E+00, 0.3251000E+00, 0.3378200E+00, 0.3136300E+00, &
     & 0.3543100E+00, 0.3253900E+00, 0.3478500E+00, 0.4062800E+00, &
     & 0.3753341E+00, 0.4213700E+00, 0.3603923E+00, 0.3603923E+00 /
      data (ref_adm( 3,iz,13, 6),iz = 1,20) / &
     & 0.3550800E+00, 0.3550800E+00, 0.3694600E+00, 0.3777800E+00, &
     & 0.3456400E+00, 0.3141600E+00, 0.3321000E+00, 0.3527000E+00, &
     & 0.3412000E+00, 0.3203200E+00, 0.3391600E+00, 0.3122700E+00, &
     & 0.3099200E+00, 0.3036900E+00, 0.1825900E+00, 0.3697800E+00, &
     & 0.3226300E+00, 0.3782967E+00, 0.3547409E+00, 0.3547409E+00 /
      data (ref_adm( 3,iz,14, 6),iz = 1,20) / &
     & 0.3279300E+00, 0.3279300E+00, 0.3208900E+00, 0.3167800E+00, &
     & 0.3296400E+00, 0.4148500E+00, 0.3733700E+00, 0.3155300E+00, &
     & 0.3628200E+00, 0.3463900E+00, 0.2914100E+00, 0.3571500E+00, &
     & 0.3557400E+00, 0.3239100E+00, 0.3527700E+00, 0.3834200E+00, &
     & 0.3563000E+00, 0.3293300E+00, 0.3490569E+00, 0.3490569E+00 /
      data (ref_adm( 3,iz,15, 6),iz = 1,20) / &
     & 0.3351200E+00, 0.3351200E+00, 0.3219100E+00, 0.3232500E+00, &
     & 0.3085700E+00, 0.3361700E+00, 0.3666400E+00, 0.4033300E+00, &
     & 0.3801800E+00, 0.2936200E+00, 0.2997400E+00, 0.2934100E+00, &
     & 0.3327200E+00, 0.3235500E+00, 0.3703800E+00, 0.3899800E+00, &
     & 0.4092500E+00, 0.3446000E+00, 0.3425457E+00, 0.3425457E+00 /
      data (ref_adm( 3,iz,16, 6),iz = 1,20) / &
     & 0.2932000E+00, 0.2932000E+00, 0.3388000E+00, 0.3590900E+00, &
     & 0.3548700E+00, 0.3315000E+00, 0.2430800E+00, 0.3429100E+00, &
     & 0.3541500E+00, 0.4503100E+00, 0.3325200E+00, 0.2597900E+00, &
     & 0.3293500E+00, 0.2859700E+00, 0.3271300E+00, 0.3373200E+00, &
     & 0.3899500E+00, 0.3454000E+00, 0.3360688E+00, 0.3360688E+00 /
      data (ref_adm( 3,iz,17, 6),iz = 1,20) / &
     & 0.2797700E+00, 0.2797700E+00, 0.2756400E+00, 0.2857200E+00, &
     & 0.2595400E+00, 0.2450800E+00, 0.2815000E+00, 0.3670200E+00, &
     & 0.3535200E+00, 0.4175200E+00, 0.3521300E+00, 0.2654900E+00, &
     & 0.3049500E+00, 0.3296300E+00, 0.3288200E+00, 0.3576300E+00, &
     & 0.3239400E+00, 0.3698000E+00, 0.3083200E+00, 0.3083200E+00 /
      data (ref_adm( 3,iz,18, 6),iz = 1,20) / &
     & 0.3065700E+00, 0.3065700E+00, 0.3455400E+00, 0.2528500E+00, &
     & 0.2201100E+00, 0.3752000E+00, 0.3409700E+00, 0.2847500E+00, &
     & 0.2719800E+00, 0.4003700E+00, 0.3070000E+00, 0.2771800E+00, &
     & 0.2799100E+00, 0.3170400E+00, 0.3304500E+00, 0.3323400E+00, &
     & 0.3634500E+00, 0.3377564E+00, 0.3045040E+00, 0.3045040E+00 /
      data (ref_adm( 3,iz,19, 6),iz = 1,20) / &
     & 0.2651100E+00, 0.2651100E+00, 0.3252900E+00, 0.3648000E+00, &
     & 0.3492100E+00, 0.3949600E+00, 0.3993900E+00, 0.3324924E+00, &
     & 0.3408600E+00, 0.3837500E+00, 0.2807300E+00, 0.3039500E+00, &
     & 0.3486500E+00, 0.3471500E+00, 0.2846200E+00, 0.3484300E+00, &
     & 0.3361700E+00, 0.3012200E+00, 0.2307300E+00, 0.2307300E+00 /
      data (ref_adm( 3,iz,20, 6),iz = 1,20) / &
     & 0.3030800E+00, 0.3030800E+00, 0.3069200E+00, 0.3402000E+00, &
     & 0.3502700E+00, 0.4052700E+00, 0.3570400E+00, 0.3981700E+00, &
     & 0.3205800E+00, 0.3060200E+00, 0.3210900E+00, 0.3527200E+00, &
     & 0.3308800E+00, 0.3314400E+00, 0.3218500E+00, 0.3416700E+00, &
     & 0.3645400E+00, 0.3351336E+00, 0.3003061E+00, 0.3003061E+00 /
      data (ref_adm( 3,iz,21, 6),iz = 1,20) / &
     & 0.3612200E+00, 0.3612200E+00, 0.3558800E+00, 0.3278500E+00, &
     & 0.3812000E+00, 0.3869800E+00, 0.3450200E+00, 0.3376500E+00, &
     & 0.3317900E+00, 0.3175700E+00, 0.3425600E+00, 0.3741700E+00, &
     & 0.3229400E+00, 0.3168100E+00, 0.3496200E+00, 0.3658300E+00, &
     & 0.3532000E+00, 0.2894500E+00, 0.2992507E+00, 0.2992507E+00 /
      data (ref_adm( 3,iz,22, 6),iz = 1,20) / &
     & 0.3257900E+00, 0.3257900E+00, 0.3734000E+00, 0.3275100E+00, &
     & 0.3227500E+00, 0.4045700E+00, 0.3217500E+00, 0.3237200E+00, &
     & 0.3243900E+00, 0.3627400E+00, 0.3520200E+00, 0.4340200E+00, &
     & 0.3954100E+00, 0.3460100E+00, 0.3544900E+00, 0.3401700E+00, &
     & 0.3644100E+00, 0.2914700E+00, 0.2474671E+00, 0.2474671E+00 /
      data (ref_adm( 3,iz,23, 6),iz = 1,20) / &
     & 0.3372500E+00, 0.3372500E+00, 0.2656200E+00, 0.3378400E+00, &
     & 0.3565400E+00, 0.3212600E+00, 0.3061400E+00, 0.3848800E+00, &
     & 0.3780800E+00, 0.3381700E+00, 0.3019700E+00, 0.3610800E+00, &
     & 0.3867500E+00, 0.3388500E+00, 0.3412200E+00, 0.3145300E+00, &
     & 0.3311900E+00, 0.2632300E+00, 0.2484292E+00, 0.2484292E+00 /
      data (ref_adm( 3,iz,24, 6),iz = 1,20) / &
     & 0.3253100E+00, 0.3253100E+00, 0.3022300E+00, 0.3210200E+00, &
     & 0.3614600E+00, 0.3007800E+00, 0.3143500E+00, 0.3141300E+00, &
     & 0.2997300E+00, 0.3233800E+00, 0.4734200E+00, 0.3902200E+00, &
     & 0.3709600E+00, 0.3360500E+00, 0.3486700E+00, 0.3528300E+00, &
     & 0.3535200E+00, 0.3502100E+00, 0.2498755E+00, 0.2498755E+00 /
      data (ref_adm( 3,iz,25, 6),iz = 1,20) / &
     & 0.3200300E+00, 0.3200300E+00, 0.3191100E+00, 0.2857200E+00, &
     & 0.2974000E+00, 0.4055500E+00, 0.3081500E+00, 0.3051600E+00, &
     & 0.3368100E+00, 0.3880900E+00, 0.3663400E+00, 0.3924700E+00, &
     & 0.3889400E+00, 0.4065600E+00, 0.3551400E+00, 0.3670500E+00, &
     & 0.3806500E+00, 0.3330900E+00, 0.2516599E+00, 0.2516599E+00 /
      data (ref_adm( 3,iz,26, 6),iz = 1,20) / &
     & 0.3433300E+00, 0.3433300E+00, 0.3089000E+00, 0.2209800E+00, &
     & 0.3120400E+00, 0.3445700E+00, 0.3694000E+00, 0.3658200E+00, &
     & 0.3481600E+00, 0.3384400E+00, 0.4073000E+00, 0.3578800E+00, &
     & 0.4119100E+00, 0.3746900E+00, 0.3862300E+00, 0.3554300E+00, &
     & 0.3907100E+00, 0.3513600E+00, 0.2537951E+00, 0.2537951E+00 /
      data (ref_adm( 3,iz,27, 6),iz = 1,20) / &
     & 0.3706600E+00, 0.3706600E+00, 0.3671000E+00, 0.3604700E+00, &
     & 0.3403400E+00, 0.3658300E+00, 0.3856500E+00, 0.4413600E+00, &
     & 0.3994500E+00, 0.3709200E+00, 0.3598800E+00, 0.3727000E+00, &
     & 0.3723900E+00, 0.3400600E+00, 0.3377800E+00, 0.3491800E+00, &
     & 0.3739700E+00, 0.3500300E+00, 0.2994500E+00, 0.2994500E+00 /
      data (ref_adm( 3,iz,28, 6),iz = 1,20) / &
     & 0.3855100E+00, 0.3855100E+00, 0.3701500E+00, 0.3923300E+00, &
     & 0.3356500E+00, 0.3056800E+00, 0.3308100E+00, 0.3299500E+00, &
     & 0.3293700E+00, 0.3321300E+00, 0.3951900E+00, 0.3749400E+00, &
     & 0.3751700E+00, 0.3261800E+00, 0.2949500E+00, 0.3227500E+00, &
     & 0.3075200E+00, 0.3017400E+00, 0.2090500E+00, 0.2090500E+00 /
      data (ref_adm( 3,iz,29, 6),iz = 1,20) / &
     & 0.3435000E+00, 0.3435000E+00, 0.3594500E+00, 0.3372300E+00, &
     & 0.3362200E+00, 0.3361000E+00, 0.3400000E+00, 0.3838200E+00, &
     & 0.3252400E+00, 0.3498200E+00, 0.4121900E+00, 0.3772400E+00, &
     & 0.3526400E+00, 0.3737200E+00, 0.3605100E+00, 0.3617800E+00, &
     & 0.3413600E+00, 0.3202500E+00, 0.2495300E+00, 0.2495300E+00 /
      data (ref_adm( 3,iz,30, 6),iz = 1,20) / &
     & 0.3442500E+00, 0.3442500E+00, 0.3345400E+00, 0.3382700E+00, &
     & 0.3415700E+00, 0.3492100E+00, 0.3581100E+00, 0.3418700E+00, &
     & 0.3351100E+00, 0.3819700E+00, 0.3713600E+00, 0.3957300E+00, &
     & 0.3956800E+00, 0.3802900E+00, 0.3689200E+00, 0.3618900E+00, &
     & 0.3829100E+00, 0.2912283E+00, 0.2643654E+00, 0.2643654E+00 /
      data (ref_adm( 3,iz,31, 6),iz = 1,20) / &
     & 0.3483400E+00, 0.3483400E+00, 0.3218300E+00, 0.3464700E+00, &
     & 0.3487300E+00, 0.3364400E+00, 0.3672500E+00, 0.3479800E+00, &
     & 0.3286300E+00, 0.3364100E+00, 0.3827600E+00, 0.4142900E+00, &
     & 0.3990400E+00, 0.3851600E+00, 0.3903400E+00, 0.3378000E+00, &
     & 0.3204400E+00, 0.2947198E+00, 0.2671824E+00, 0.2671824E+00 /
      data (ref_adm( 3,iz,32, 6),iz = 1,20) / &
     & 0.3514400E+00, 0.3514400E+00, 0.3138400E+00, 0.3917900E+00, &
     & 0.3353700E+00, 0.3179100E+00, 0.3283900E+00, 0.3574600E+00, &
     & 0.3427800E+00, 0.3618700E+00, 0.3711300E+00, 0.3490400E+00, &
     & 0.4143800E+00, 0.3863600E+00, 0.3635100E+00, 0.3426388E+00, &
     & 0.3217401E+00, 0.2977372E+00, 0.2698939E+00, 0.2698939E+00 /
      data (ref_adm( 3,iz,33, 6),iz = 1,20) / &
     & 0.3256800E+00, 0.3256800E+00, 0.2959900E+00, 0.3198400E+00, &
     & 0.2898700E+00, 0.2963900E+00, 0.3143600E+00, 0.3428900E+00, &
     & 0.3441000E+00, 0.3814800E+00, 0.3932100E+00, 0.3650700E+00, &
     & 0.3664500E+00, 0.3928300E+00, 0.3933700E+00, 0.3287900E+00, &
     & 0.3241026E+00, 0.3002456E+00, 0.2723702E+00, 0.2723702E+00 /
      data (ref_adm( 3,iz,34, 6),iz = 1,20) / &
     & 0.3311200E+00, 0.3311200E+00, 0.3460600E+00, 0.3065300E+00, &
     & 0.3387500E+00, 0.3240800E+00, 0.3252800E+00, 0.3733900E+00, &
     & 0.3947700E+00, 0.3857700E+00, 0.3806200E+00, 0.3751900E+00, &
     & 0.3891800E+00, 0.3965900E+00, 0.4156300E+00, 0.3580829E+00, &
     & 0.3265682E+00, 0.3021580E+00, 0.2744284E+00, 0.2744284E+00 /
      data (ref_adm( 3,iz,35, 6),iz = 1,20) / &
     & 0.3497500E+00, 0.3497500E+00, 0.3007100E+00, 0.3452300E+00, &
     & 0.3804000E+00, 0.3335500E+00, 0.3649600E+00, 0.4109600E+00, &
     & 0.4359300E+00, 0.3793300E+00, 0.3698000E+00, 0.3853700E+00, &
     & 0.3733900E+00, 0.3756900E+00, 0.4358100E+00, 0.3663434E+00, &
     & 0.3290174E+00, 0.3036415E+00, 0.2760676E+00, 0.2760676E+00 /
      data (ref_adm( 3,iz,36, 6),iz = 1,20) / &
     & 0.3215300E+00, 0.3215300E+00, 0.3366500E+00, 0.3597600E+00, &
     & 0.3701200E+00, 0.3658300E+00, 0.3897600E+00, 0.4092000E+00, &
     & 0.4039600E+00, 0.3866100E+00, 0.3850800E+00, 0.4297200E+00, &
     & 0.3773600E+00, 0.3626800E+00, 0.4053325E+00, 0.3728476E+00, &
     & 0.3310284E+00, 0.3046418E+00, 0.2771708E+00, 0.2771708E+00 /
      data (ref_adm( 3,iz,37, 6),iz = 1,20) / &
     & 0.3568200E+00, 0.3568200E+00, 0.3767200E+00, 0.3520200E+00, &
     & 0.3360700E+00, 0.3879900E+00, 0.4049700E+00, 0.4132200E+00, &
     & 0.3862300E+00, 0.2928700E+00, 0.4188200E+00, 0.4163100E+00, &
     & 0.3622300E+00, 0.3702300E+00, 0.4039302E+00, 0.3765613E+00, &
     & 0.3322097E+00, 0.3051636E+00, 0.2777841E+00, 0.2777841E+00 /
      data (ref_adm( 3,iz,38, 6),iz = 1,20) / &
     & 0.3568200E+00, 0.3568200E+00, 0.3767200E+00, 0.3520200E+00, &
     & 0.3360700E+00, 0.3879900E+00, 0.4049700E+00, 0.4132200E+00, &
     & 0.3862300E+00, 0.2928700E+00, 0.4188200E+00, 0.4163100E+00, &
     & 0.3622300E+00, 0.3702300E+00, 0.4039302E+00, 0.3765613E+00, &
     & 0.3322097E+00, 0.3051636E+00, 0.2777841E+00, 0.2777841E+00 /
! Solar Zenith Angle 30.0 Albedo  0.3578871E+00
      data (ref_adm( 3,iz, 1, 7),iz = 1,20) / &
     & 0.2874200E+00, 0.2874200E+00, 0.3070600E+00, 0.3289000E+00, &
     & 0.3125300E+00, 0.3645400E+00, 0.3571800E+00, 0.3882200E+00, &
     & 0.3924600E+00, 0.3304700E+00, 0.3507400E+00, 0.3412700E+00, &
     & 0.4182100E+00, 0.3937500E+00, 0.4417500E+00, 0.3951100E+00, &
     & 0.4555200E+00, 0.4397800E+00, 0.4711581E+00, 0.4711581E+00 /
      data (ref_adm( 3,iz, 2, 7),iz = 1,20) / &
     & 0.2874200E+00, 0.2874200E+00, 0.3070600E+00, 0.3289000E+00, &
     & 0.3125300E+00, 0.3645400E+00, 0.3571800E+00, 0.3882200E+00, &
     & 0.3924600E+00, 0.3304700E+00, 0.3507400E+00, 0.3412700E+00, &
     & 0.4182100E+00, 0.3937500E+00, 0.4417500E+00, 0.3951100E+00, &
     & 0.4555200E+00, 0.4397800E+00, 0.4711581E+00, 0.4711581E+00 /
      data (ref_adm( 3,iz, 3, 7),iz = 1,20) / &
     & 0.3313600E+00, 0.3313600E+00, 0.3137800E+00, 0.3147400E+00, &
     & 0.3449300E+00, 0.3202300E+00, 0.3670100E+00, 0.3533500E+00, &
     & 0.3769800E+00, 0.2938100E+00, 0.3619200E+00, 0.3496600E+00, &
     & 0.3907300E+00, 0.4009200E+00, 0.4275500E+00, 0.4034800E+00, &
     & 0.4757200E+00, 0.4517800E+00, 0.4037800E+00, 0.4037800E+00 /
      data (ref_adm( 3,iz, 4, 7),iz = 1,20) / &
     & 0.3173000E+00, 0.3173000E+00, 0.3818300E+00, 0.3181700E+00, &
     & 0.2913700E+00, 0.3037700E+00, 0.3120800E+00, 0.3609600E+00, &
     & 0.3644000E+00, 0.3295200E+00, 0.4083900E+00, 0.3834400E+00, &
     & 0.3752100E+00, 0.3656300E+00, 0.4179500E+00, 0.4330300E+00, &
     & 0.4285900E+00, 0.4656400E+00, 0.4805300E+00, 0.4805300E+00 /
      data (ref_adm( 3,iz, 5, 7),iz = 1,20) / &
     & 0.3408500E+00, 0.3408500E+00, 0.3869900E+00, 0.3397600E+00, &
     & 0.3116600E+00, 0.3215400E+00, 0.3895600E+00, 0.3819700E+00, &
     & 0.3517900E+00, 0.3779400E+00, 0.3802700E+00, 0.3571100E+00, &
     & 0.3882400E+00, 0.3534400E+00, 0.3779600E+00, 0.4475700E+00, &
     & 0.4356300E+00, 0.4718100E+00, 0.4592835E+00, 0.4592835E+00 /
      data (ref_adm( 3,iz, 6, 7),iz = 1,20) / &
     & 0.3637300E+00, 0.3637300E+00, 0.3694800E+00, 0.3174700E+00, &
     & 0.3502200E+00, 0.3169200E+00, 0.3372200E+00, 0.3409200E+00, &
     & 0.3085500E+00, 0.3527900E+00, 0.3510700E+00, 0.4656300E+00, &
     & 0.3673000E+00, 0.3611500E+00, 0.3815400E+00, 0.3803600E+00, &
     & 0.5026100E+00, 0.4266900E+00, 0.3465400E+00, 0.3465400E+00 /
      data (ref_adm( 3,iz, 7, 7),iz = 1,20) / &
     & 0.3256400E+00, 0.3256400E+00, 0.3746600E+00, 0.3674400E+00, &
     & 0.3173700E+00, 0.3935100E+00, 0.3580100E+00, 0.3899900E+00, &
     & 0.3259800E+00, 0.3455700E+00, 0.2805600E+00, 0.3791400E+00, &
     & 0.3769200E+00, 0.3382400E+00, 0.3674400E+00, 0.4158400E+00, &
     & 0.5068300E+00, 0.4355700E+00, 0.4362823E+00, 0.4362823E+00 /
      data (ref_adm( 3,iz, 8, 7),iz = 1,20) / &
     & 0.3332900E+00, 0.3332900E+00, 0.3595500E+00, 0.2882800E+00, &
     & 0.3578500E+00, 0.2821300E+00, 0.3316100E+00, 0.3786900E+00, &
     & 0.2911800E+00, 0.3000300E+00, 0.3566100E+00, 0.3608000E+00, &
     & 0.3509400E+00, 0.3133300E+00, 0.3797300E+00, 0.4697200E+00, &
     & 0.3935300E+00, 0.4062300E+00, 0.4229065E+00, 0.4229065E+00 /
      data (ref_adm( 3,iz, 9, 7),iz = 1,20) / &
     & 0.3435900E+00, 0.3435900E+00, 0.3249400E+00, 0.3346400E+00, &
     & 0.3414200E+00, 0.3237300E+00, 0.3213300E+00, 0.2965300E+00, &
     & 0.3417900E+00, 0.3164700E+00, 0.3671700E+00, 0.3720000E+00, &
     & 0.3712700E+00, 0.4051000E+00, 0.4038000E+00, 0.4261200E+00, &
     & 0.4250100E+00, 0.4055600E+00, 0.4114517E+00, 0.4114517E+00 /
      data (ref_adm( 3,iz,10, 7),iz = 1,20) / &
     & 0.3525600E+00, 0.3525600E+00, 0.3269300E+00, 0.3138600E+00, &
     & 0.3540500E+00, 0.3390200E+00, 0.3196200E+00, 0.3285400E+00, &
     & 0.3201300E+00, 0.3238900E+00, 0.3400300E+00, 0.3294800E+00, &
     & 0.3248000E+00, 0.3250100E+00, 0.4324600E+00, 0.3838100E+00, &
     & 0.4677300E+00, 0.4223100E+00, 0.3925500E+00, 0.3925500E+00 /
      data (ref_adm( 3,iz,11, 7),iz = 1,20) / &
     & 0.3272200E+00, 0.3272200E+00, 0.3245700E+00, 0.3152900E+00, &
     & 0.3421100E+00, 0.3212400E+00, 0.3151500E+00, 0.3140400E+00, &
     & 0.3051500E+00, 0.2873700E+00, 0.3132600E+00, 0.3609500E+00, &
     & 0.3064900E+00, 0.3475700E+00, 0.4531200E+00, 0.4232700E+00, &
     & 0.4844900E+00, 0.4201151E+00, 0.3929912E+00, 0.3929912E+00 /
      data (ref_adm( 3,iz,12, 7),iz = 1,20) / &
     & 0.3521500E+00, 0.3521500E+00, 0.3465300E+00, 0.3347900E+00, &
     & 0.3500200E+00, 0.3322700E+00, 0.3379800E+00, 0.3198600E+00, &
     & 0.3162400E+00, 0.3218400E+00, 0.3321400E+00, 0.3387800E+00, &
     & 0.3441800E+00, 0.3954600E+00, 0.3769400E+00, 0.3712200E+00, &
     & 0.5472900E+00, 0.4144630E+00, 0.3855067E+00, 0.3855067E+00 /
      data (ref_adm( 3,iz,13, 7),iz = 1,20) / &
     & 0.3345400E+00, 0.3345400E+00, 0.4023800E+00, 0.3601000E+00, &
     & 0.3009600E+00, 0.3080600E+00, 0.3164500E+00, 0.3562300E+00, &
     & 0.3388500E+00, 0.3456600E+00, 0.3317200E+00, 0.3329700E+00, &
     & 0.3383900E+00, 0.3392200E+00, 0.3550900E+00, 0.3837600E+00, &
     & 0.4242200E+00, 0.4217300E+00, 0.3787661E+00, 0.3787661E+00 /
      data (ref_adm( 3,iz,14, 7),iz = 1,20) / &
     & 0.3040300E+00, 0.3040300E+00, 0.4094600E+00, 0.3295300E+00, &
     & 0.3186900E+00, 0.3235000E+00, 0.3263300E+00, 0.3213800E+00, &
     & 0.3533300E+00, 0.3355600E+00, 0.3511600E+00, 0.3404200E+00, &
     & 0.3403000E+00, 0.3494200E+00, 0.3487700E+00, 0.3841100E+00, &
     & 0.4147500E+00, 0.4019126E+00, 0.3721500E+00, 0.3721500E+00 /
      data (ref_adm( 3,iz,15, 7),iz = 1,20) / &
     & 0.3133600E+00, 0.3133600E+00, 0.3048600E+00, 0.3470300E+00, &
     & 0.3360700E+00, 0.3356300E+00, 0.3194900E+00, 0.3454500E+00, &
     & 0.2904300E+00, 0.3337900E+00, 0.3244900E+00, 0.3555100E+00, &
     & 0.3614100E+00, 0.3382300E+00, 0.3619400E+00, 0.3373600E+00, &
     & 0.3849800E+00, 0.3214500E+00, 0.3649866E+00, 0.3649866E+00 /
      data (ref_adm( 3,iz,16, 7),iz = 1,20) / &
     & 0.3423200E+00, 0.3423200E+00, 0.3475500E+00, 0.2788100E+00, &
     & 0.2674300E+00, 0.3425600E+00, 0.4088800E+00, 0.4348100E+00, &
     & 0.3265200E+00, 0.3089500E+00, 0.3406600E+00, 0.3701300E+00, &
     & 0.3462500E+00, 0.3473900E+00, 0.3475300E+00, 0.3910700E+00, &
     & 0.3876100E+00, 0.2880500E+00, 0.3573167E+00, 0.3573167E+00 /
      data (ref_adm( 3,iz,17, 7),iz = 1,20) / &
     & 0.3020200E+00, 0.3020200E+00, 0.2875700E+00, 0.3535400E+00, &
     & 0.2727900E+00, 0.3406700E+00, 0.3254100E+00, 0.3501800E+00, &
     & 0.3056400E+00, 0.3243800E+00, 0.3511700E+00, 0.3482300E+00, &
     & 0.3726500E+00, 0.3881600E+00, 0.3692400E+00, 0.4359000E+00, &
     & 0.3674600E+00, 0.3109100E+00, 0.3508125E+00, 0.3508125E+00 /
      data (ref_adm( 3,iz,18, 7),iz = 1,20) / &
     & 0.2677400E+00, 0.2677400E+00, 0.3250300E+00, 0.3232200E+00, &
     & 0.3670500E+00, 0.3542800E+00, 0.3092000E+00, 0.2926500E+00, &
     & 0.3205800E+00, 0.3237500E+00, 0.3525900E+00, 0.3468200E+00, &
     & 0.3246800E+00, 0.3129600E+00, 0.3593100E+00, 0.3240400E+00, &
     & 0.3752800E+00, 0.3252018E+00, 0.2956093E+00, 0.2956093E+00 /
      data (ref_adm( 3,iz,19, 7),iz = 1,20) / &
     & 0.3135000E+00, 0.3135000E+00, 0.2967500E+00, 0.3019000E+00, &
     & 0.3597800E+00, 0.3336200E+00, 0.3303600E+00, 0.2559900E+00, &
     & 0.3337200E+00, 0.3058000E+00, 0.3706300E+00, 0.3361000E+00, &
     & 0.3185700E+00, 0.3520600E+00, 0.3752100E+00, 0.3365400E+00, &
     & 0.3384400E+00, 0.3382000E+00, 0.2544800E+00, 0.2544800E+00 /
      data (ref_adm( 3,iz,20, 7),iz = 1,20) / &
     & 0.3199300E+00, 0.3199300E+00, 0.3157700E+00, 0.3327200E+00, &
     & 0.3085700E+00, 0.3429300E+00, 0.3293700E+00, 0.2990800E+00, &
     & 0.3634700E+00, 0.3038500E+00, 0.3339200E+00, 0.3374400E+00, &
     & 0.3475100E+00, 0.3233500E+00, 0.3381700E+00, 0.3244900E+00, &
     & 0.3161600E+00, 0.3572800E+00, 0.2907178E+00, 0.2907178E+00 /
      data (ref_adm( 3,iz,21, 7),iz = 1,20) / &
     & 0.3040400E+00, 0.3040400E+00, 0.2849800E+00, 0.2963100E+00, &
     & 0.3174700E+00, 0.3302500E+00, 0.3372400E+00, 0.3182300E+00, &
     & 0.3230600E+00, 0.3285500E+00, 0.3563900E+00, 0.3511500E+00, &
     & 0.3663000E+00, 0.3259700E+00, 0.3628500E+00, 0.3457700E+00, &
     & 0.3301800E+00, 0.2923000E+00, 0.2904988E+00, 0.2904988E+00 /
      data (ref_adm( 3,iz,22, 7),iz = 1,20) / &
     & 0.3253300E+00, 0.3253300E+00, 0.3303500E+00, 0.3203800E+00, &
     & 0.3785900E+00, 0.3686700E+00, 0.3654900E+00, 0.3447800E+00, &
     & 0.3500000E+00, 0.3476300E+00, 0.3637800E+00, 0.3316200E+00, &
     & 0.3400300E+00, 0.4369800E+00, 0.3540000E+00, 0.3428700E+00, &
     & 0.3289700E+00, 0.3477985E+00, 0.2952958E+00, 0.2952958E+00 /
      data (ref_adm( 3,iz,23, 7),iz = 1,20) / &
     & 0.3164400E+00, 0.3164400E+00, 0.3567000E+00, 0.3099000E+00, &
     & 0.3153600E+00, 0.3454900E+00, 0.3582900E+00, 0.3655800E+00, &
     & 0.3556000E+00, 0.4220100E+00, 0.3763000E+00, 0.2952800E+00, &
     & 0.3233700E+00, 0.3427200E+00, 0.2863200E+00, 0.3930100E+00, &
     & 0.3089900E+00, 0.3429200E+00, 0.2939232E+00, 0.2939232E+00 /
      data (ref_adm( 3,iz,24, 7),iz = 1,20) / &
     & 0.3504200E+00, 0.3504200E+00, 0.3585400E+00, 0.3681700E+00, &
     & 0.3685400E+00, 0.3317300E+00, 0.3737200E+00, 0.3584200E+00, &
     & 0.3879700E+00, 0.4423500E+00, 0.3394300E+00, 0.3239500E+00, &
     & 0.3275600E+00, 0.3025900E+00, 0.3270900E+00, 0.3591700E+00, &
     & 0.3611600E+00, 0.3424247E+00, 0.2926187E+00, 0.2926187E+00 /
      data (ref_adm( 3,iz,25, 7),iz = 1,20) / &
     & 0.3172000E+00, 0.3172000E+00, 0.3857700E+00, 0.3139300E+00, &
     & 0.3753200E+00, 0.3781200E+00, 0.3626700E+00, 0.3705300E+00, &
     & 0.4221200E+00, 0.4372400E+00, 0.3088600E+00, 0.3553300E+00, &
     & 0.3632400E+00, 0.3560100E+00, 0.3581500E+00, 0.3652900E+00, &
     & 0.3571400E+00, 0.3550200E+00, 0.2916846E+00, 0.2916846E+00 /
      data (ref_adm( 3,iz,26, 7),iz = 1,20) / &
     & 0.3037300E+00, 0.3037300E+00, 0.3268800E+00, 0.3819200E+00, &
     & 0.3856600E+00, 0.3843400E+00, 0.3678800E+00, 0.3452300E+00, &
     & 0.4289000E+00, 0.3814500E+00, 0.3428500E+00, 0.3801700E+00, &
     & 0.4076600E+00, 0.3755900E+00, 0.4085300E+00, 0.3875500E+00, &
     & 0.3547900E+00, 0.3551600E+00, 0.2903000E+00, 0.2903000E+00 /
      data (ref_adm( 3,iz,27, 7),iz = 1,20) / &
     & 0.3420200E+00, 0.3420200E+00, 0.3171400E+00, 0.3419000E+00, &
     & 0.3636200E+00, 0.3907900E+00, 0.3662000E+00, 0.3890400E+00, &
     & 0.3767800E+00, 0.4014700E+00, 0.3397100E+00, 0.3847300E+00, &
     & 0.4431200E+00, 0.3567500E+00, 0.3727000E+00, 0.3760000E+00, &
     & 0.3947700E+00, 0.3697800E+00, 0.3426800E+00, 0.3426800E+00 /
      data (ref_adm( 3,iz,28, 7),iz = 1,20) / &
     & 0.3370600E+00, 0.3370600E+00, 0.3336100E+00, 0.3199000E+00, &
     & 0.3592700E+00, 0.3331900E+00, 0.3384900E+00, 0.3685500E+00, &
     & 0.3505700E+00, 0.3677000E+00, 0.3791300E+00, 0.3505800E+00, &
     & 0.3854300E+00, 0.3687000E+00, 0.3930100E+00, 0.3830900E+00, &
     & 0.3823200E+00, 0.3745100E+00, 0.3366300E+00, 0.3366300E+00 /
      data (ref_adm( 3,iz,29, 7),iz = 1,20) / &
     & 0.3371300E+00, 0.3371300E+00, 0.3323500E+00, 0.3317000E+00, &
     & 0.3310400E+00, 0.3289300E+00, 0.3469000E+00, 0.3472700E+00, &
     & 0.3563100E+00, 0.3640800E+00, 0.3468100E+00, 0.3822300E+00, &
     & 0.3993600E+00, 0.4028100E+00, 0.4161400E+00, 0.3903100E+00, &
     & 0.3614900E+00, 0.3568600E+00, 0.2695300E+00, 0.2695300E+00 /
      data (ref_adm( 3,iz,30, 7),iz = 1,20) / &
     & 0.3495800E+00, 0.3495800E+00, 0.3532000E+00, 0.3685100E+00, &
     & 0.3643000E+00, 0.3639100E+00, 0.3824900E+00, 0.3684800E+00, &
     & 0.3618100E+00, 0.3522400E+00, 0.3837800E+00, 0.3692900E+00, &
     & 0.3659500E+00, 0.3838700E+00, 0.4157500E+00, 0.3822600E+00, &
     & 0.4053600E+00, 0.3544900E+00, 0.2555100E+00, 0.2555100E+00 /
      data (ref_adm( 3,iz,31, 7),iz = 1,20) / &
     & 0.3493100E+00, 0.3493100E+00, 0.3362500E+00, 0.3599900E+00, &
     & 0.3844400E+00, 0.3637400E+00, 0.3519000E+00, 0.3977900E+00, &
     & 0.3848300E+00, 0.3780300E+00, 0.3614600E+00, 0.3328900E+00, &
     & 0.3668800E+00, 0.3705900E+00, 0.4044500E+00, 0.3980100E+00, &
     & 0.3870500E+00, 0.3739200E+00, 0.2876458E+00, 0.2876458E+00 /
      data (ref_adm( 3,iz,32, 7),iz = 1,20) / &
     & 0.3180900E+00, 0.3180900E+00, 0.2805100E+00, 0.3384400E+00, &
     & 0.3710700E+00, 0.3157500E+00, 0.3150300E+00, 0.3779900E+00, &
     & 0.2685500E+00, 0.3815900E+00, 0.3504400E+00, 0.3524500E+00, &
     & 0.3483800E+00, 0.3764000E+00, 0.3321200E+00, 0.4053500E+00, &
     & 0.3649200E+00, 0.3283030E+00, 0.2874172E+00, 0.2874172E+00 /
      data (ref_adm( 3,iz,33, 7),iz = 1,20) / &
     & 0.3748100E+00, 0.3748100E+00, 0.3602400E+00, 0.3763800E+00, &
     & 0.3970600E+00, 0.4161200E+00, 0.3488500E+00, 0.3350100E+00, &
     & 0.3218700E+00, 0.3602700E+00, 0.3495900E+00, 0.3494700E+00, &
     & 0.3660600E+00, 0.3664100E+00, 0.3643400E+00, 0.3842400E+00, &
     & 0.3499660E+00, 0.3276007E+00, 0.2872434E+00, 0.2872434E+00 /
      data (ref_adm( 3,iz,34, 7),iz = 1,20) / &
     & 0.3174500E+00, 0.3174500E+00, 0.3665500E+00, 0.3420100E+00, &
     & 0.3629600E+00, 0.3877500E+00, 0.3607300E+00, 0.4142500E+00, &
     & 0.4327800E+00, 0.3317100E+00, 0.4129700E+00, 0.3224700E+00, &
     & 0.3726500E+00, 0.3553400E+00, 0.3613600E+00, 0.3514700E+00, &
     & 0.3495109E+00, 0.3267801E+00, 0.2870911E+00, 0.2870911E+00 /
      data (ref_adm( 3,iz,35, 7),iz = 1,20) / &
     & 0.2677400E+00, 0.2677400E+00, 0.3463800E+00, 0.3596700E+00, &
     & 0.3761300E+00, 0.3822400E+00, 0.4054900E+00, 0.3810700E+00, &
     & 0.4339500E+00, 0.4135500E+00, 0.4133300E+00, 0.3750700E+00, &
     & 0.3820100E+00, 0.3767200E+00, 0.3986200E+00, 0.3631764E+00, &
     & 0.3490822E+00, 0.3263141E+00, 0.2870263E+00, 0.2870263E+00 /
      data (ref_adm( 3,iz,36, 7),iz = 1,20) / &
     & 0.3297900E+00, 0.3297900E+00, 0.3339300E+00, 0.3373500E+00, &
     & 0.3217700E+00, 0.3337300E+00, 0.4068900E+00, 0.4328400E+00, &
     & 0.3866300E+00, 0.4055600E+00, 0.4165000E+00, 0.3917200E+00, &
     & 0.4160800E+00, 0.3453600E+00, 0.3730500E+00, 0.3632160E+00, &
     & 0.3489254E+00, 0.3261128E+00, 0.2869421E+00, 0.2869421E+00 /
      data (ref_adm( 3,iz,37, 7),iz = 1,20) / &
     & 0.3289800E+00, 0.3289800E+00, 0.3480800E+00, 0.3640500E+00, &
     & 0.4112800E+00, 0.3512900E+00, 0.3919700E+00, 0.3918500E+00, &
     & 0.3926800E+00, 0.4169600E+00, 0.4258400E+00, 0.4598700E+00, &
     & 0.4322200E+00, 0.3469500E+00, 0.3107000E+00, 0.3632213E+00, &
     & 0.3487749E+00, 0.3259352E+00, 0.2868768E+00, 0.2868768E+00 /
      data (ref_adm( 3,iz,38, 7),iz = 1,20) / &
     & 0.3289800E+00, 0.3289800E+00, 0.3480800E+00, 0.3640500E+00, &
     & 0.4112800E+00, 0.3512900E+00, 0.3919700E+00, 0.3918500E+00, &
     & 0.3926800E+00, 0.4169600E+00, 0.4258400E+00, 0.4598700E+00, &
     & 0.4322200E+00, 0.3469500E+00, 0.3107000E+00, 0.3632213E+00, &
     & 0.3487749E+00, 0.3259352E+00, 0.2868768E+00, 0.2868768E+00 /
! Solar Zenith Angle 35.0 Albedo  0.3684972E+00
      data (ref_adm( 3,iz, 1, 8),iz = 1,20) / &
     & 0.2912000E+00, 0.2912000E+00, 0.3076600E+00, 0.3427600E+00, &
     & 0.3077900E+00, 0.3252300E+00, 0.3123900E+00, 0.3270000E+00, &
     & 0.3618300E+00, 0.3246600E+00, 0.3545900E+00, 0.3593600E+00, &
     & 0.4377500E+00, 0.4364500E+00, 0.4392200E+00, 0.4609800E+00, &
     & 0.4581400E+00, 0.4706500E+00, 0.3679400E+00, 0.3679400E+00 /
      data (ref_adm( 3,iz, 2, 8),iz = 1,20) / &
     & 0.2912000E+00, 0.2912000E+00, 0.3076600E+00, 0.3427600E+00, &
     & 0.3077900E+00, 0.3252300E+00, 0.3123900E+00, 0.3270000E+00, &
     & 0.3618300E+00, 0.3246600E+00, 0.3545900E+00, 0.3593600E+00, &
     & 0.4377500E+00, 0.4364500E+00, 0.4392200E+00, 0.4609800E+00, &
     & 0.4581400E+00, 0.4706500E+00, 0.3679400E+00, 0.3679400E+00 /
      data (ref_adm( 3,iz, 3, 8),iz = 1,20) / &
     & 0.3174800E+00, 0.3174800E+00, 0.3201200E+00, 0.3088600E+00, &
     & 0.3211400E+00, 0.3240800E+00, 0.3182300E+00, 0.3049600E+00, &
     & 0.3600300E+00, 0.3446000E+00, 0.3736400E+00, 0.3551600E+00, &
     & 0.4107700E+00, 0.4119700E+00, 0.4250800E+00, 0.4612600E+00, &
     & 0.4911700E+00, 0.4925600E+00, 0.4130000E+00, 0.4130000E+00 /
      data (ref_adm( 3,iz, 4, 8),iz = 1,20) / &
     & 0.3196400E+00, 0.3196400E+00, 0.3076000E+00, 0.3389600E+00, &
     & 0.2986900E+00, 0.3194400E+00, 0.3147300E+00, 0.3303200E+00, &
     & 0.3284600E+00, 0.3539500E+00, 0.3620900E+00, 0.3814800E+00, &
     & 0.3782600E+00, 0.4163200E+00, 0.4050300E+00, 0.4383300E+00, &
     & 0.4681000E+00, 0.4882600E+00, 0.3972800E+00, 0.3972800E+00 /
      data (ref_adm( 3,iz, 5, 8),iz = 1,20) / &
     & 0.3327800E+00, 0.3327800E+00, 0.3020000E+00, 0.3707200E+00, &
     & 0.3713300E+00, 0.3279700E+00, 0.3022000E+00, 0.3382100E+00, &
     & 0.3529200E+00, 0.3466500E+00, 0.3618900E+00, 0.3873600E+00, &
     & 0.3722900E+00, 0.4108300E+00, 0.4380800E+00, 0.4714900E+00, &
     & 0.4868600E+00, 0.4933500E+00, 0.4125600E+00, 0.4125600E+00 /
      data (ref_adm( 3,iz, 6, 8),iz = 1,20) / &
     & 0.3245900E+00, 0.3245900E+00, 0.3232400E+00, 0.3202800E+00, &
     & 0.3062000E+00, 0.3341200E+00, 0.3498100E+00, 0.3464200E+00, &
     & 0.3306500E+00, 0.3613200E+00, 0.3466200E+00, 0.3469500E+00, &
     & 0.3639300E+00, 0.4216700E+00, 0.4653200E+00, 0.4840200E+00, &
     & 0.5023100E+00, 0.4786500E+00, 0.5065000E+00, 0.5065000E+00 /
      data (ref_adm( 3,iz, 7, 8),iz = 1,20) / &
     & 0.3197700E+00, 0.3197700E+00, 0.3093400E+00, 0.3319500E+00, &
     & 0.3148500E+00, 0.3235200E+00, 0.3321000E+00, 0.2871100E+00, &
     & 0.2993700E+00, 0.3464200E+00, 0.3483800E+00, 0.3439300E+00, &
     & 0.3446200E+00, 0.4121100E+00, 0.4176800E+00, 0.5068400E+00, &
     & 0.5157100E+00, 0.5593800E+00, 0.4963600E+00, 0.4963600E+00 /
      data (ref_adm( 3,iz, 8, 8),iz = 1,20) / &
     & 0.3099600E+00, 0.3099600E+00, 0.3361700E+00, 0.2968800E+00, &
     & 0.3020500E+00, 0.3121600E+00, 0.2847300E+00, 0.3202600E+00, &
     & 0.3331900E+00, 0.3146700E+00, 0.3494300E+00, 0.3791200E+00, &
     & 0.3334900E+00, 0.4048500E+00, 0.4462400E+00, 0.4978000E+00, &
     & 0.5262100E+00, 0.4798700E+00, 0.3875100E+00, 0.3875100E+00 /
      data (ref_adm( 3,iz, 9, 8),iz = 1,20) / &
     & 0.3204700E+00, 0.3204700E+00, 0.3072000E+00, 0.2995400E+00, &
     & 0.3132100E+00, 0.2945100E+00, 0.3151300E+00, 0.2948900E+00, &
     & 0.3592200E+00, 0.3658000E+00, 0.4061600E+00, 0.3617000E+00, &
     & 0.4111600E+00, 0.4162200E+00, 0.4736400E+00, 0.4615600E+00, &
     & 0.4470800E+00, 0.4386900E+00, 0.3968070E+00, 0.3968070E+00 /
      data (ref_adm( 3,iz,10, 8),iz = 1,20) / &
     & 0.3026800E+00, 0.3026800E+00, 0.3068100E+00, 0.3067800E+00, &
     & 0.3071100E+00, 0.2987900E+00, 0.2933400E+00, 0.3212800E+00, &
     & 0.3258300E+00, 0.3344100E+00, 0.3842900E+00, 0.3461300E+00, &
     & 0.3645600E+00, 0.3717900E+00, 0.3716900E+00, 0.3605900E+00, &
     & 0.3767800E+00, 0.4120800E+00, 0.3928504E+00, 0.3928504E+00 /
      data (ref_adm( 3,iz,11, 8),iz = 1,20) / &
     & 0.3367600E+00, 0.3367600E+00, 0.3457500E+00, 0.3344500E+00, &
     & 0.3446400E+00, 0.3389500E+00, 0.3465100E+00, 0.3745000E+00, &
     & 0.3312200E+00, 0.3100200E+00, 0.3385700E+00, 0.3240700E+00, &
     & 0.3597100E+00, 0.4143300E+00, 0.4134900E+00, 0.4033900E+00, &
     & 0.4354400E+00, 0.3910500E+00, 0.2735600E+00, 0.2735600E+00 /
      data (ref_adm( 3,iz,12, 8),iz = 1,20) / &
     & 0.3181900E+00, 0.3181900E+00, 0.3170900E+00, 0.3204700E+00, &
     & 0.3085400E+00, 0.3105400E+00, 0.3102700E+00, 0.3383500E+00, &
     & 0.3464000E+00, 0.3491400E+00, 0.3631000E+00, 0.3255500E+00, &
     & 0.3668900E+00, 0.3814200E+00, 0.4099400E+00, 0.3910900E+00, &
     & 0.5688500E+00, 0.3956900E+00, 0.3838169E+00, 0.3838169E+00 /
      data (ref_adm( 3,iz,13, 8),iz = 1,20) / &
     & 0.3445100E+00, 0.3445100E+00, 0.3446100E+00, 0.3381500E+00, &
     & 0.3438700E+00, 0.3447200E+00, 0.3229000E+00, 0.3027800E+00, &
     & 0.3250200E+00, 0.3339400E+00, 0.3315400E+00, 0.3369300E+00, &
     & 0.3522000E+00, 0.3732200E+00, 0.3662900E+00, 0.4537000E+00, &
     & 0.4631100E+00, 0.4843100E+00, 0.3780676E+00, 0.3780676E+00 /
      data (ref_adm( 3,iz,14, 8),iz = 1,20) / &
     & 0.3412700E+00, 0.3412700E+00, 0.3272500E+00, 0.3417700E+00, &
     & 0.3459800E+00, 0.3434500E+00, 0.3030900E+00, 0.3339700E+00, &
     & 0.3381800E+00, 0.3306400E+00, 0.3266000E+00, 0.3300100E+00, &
     & 0.3289000E+00, 0.3673100E+00, 0.4336800E+00, 0.4159500E+00, &
     & 0.4393000E+00, 0.5389100E+00, 0.2858100E+00, 0.2858100E+00 /
      data (ref_adm( 3,iz,15, 8),iz = 1,20) / &
     & 0.3330800E+00, 0.3330800E+00, 0.3182900E+00, 0.3310200E+00, &
     & 0.3416300E+00, 0.3607800E+00, 0.3270600E+00, 0.3543600E+00, &
     & 0.3322100E+00, 0.3486100E+00, 0.3159300E+00, 0.3320300E+00, &
     & 0.3313700E+00, 0.3450100E+00, 0.3978700E+00, 0.3862300E+00, &
     & 0.3566500E+00, 0.3655800E+00, 0.3639254E+00, 0.3639254E+00 /
      data (ref_adm( 3,iz,16, 8),iz = 1,20) / &
     & 0.3500300E+00, 0.3500300E+00, 0.3545500E+00, 0.3521400E+00, &
     & 0.3296400E+00, 0.3189400E+00, 0.3538600E+00, 0.3651600E+00, &
     & 0.3568600E+00, 0.3728600E+00, 0.3484200E+00, 0.3359900E+00, &
     & 0.3129700E+00, 0.3535700E+00, 0.4139000E+00, 0.3664500E+00, &
     & 0.3842100E+00, 0.3554000E+00, 0.3574400E+00, 0.3574400E+00 /
      data (ref_adm( 3,iz,17, 8),iz = 1,20) / &
     & 0.3601800E+00, 0.3601800E+00, 0.3359500E+00, 0.3041900E+00, &
     & 0.3582400E+00, 0.3079800E+00, 0.3666000E+00, 0.3368000E+00, &
     & 0.3334200E+00, 0.3667200E+00, 0.3639900E+00, 0.3397600E+00, &
     & 0.3289800E+00, 0.3256700E+00, 0.3461500E+00, 0.3515900E+00, &
     & 0.3776000E+00, 0.3283700E+00, 0.3081100E+00, 0.3081100E+00 /
      data (ref_adm( 3,iz,18, 8),iz = 1,20) / &
     & 0.2839800E+00, 0.2839800E+00, 0.3432300E+00, 0.3258600E+00, &
     & 0.3204100E+00, 0.3324400E+00, 0.3454000E+00, 0.3401100E+00, &
     & 0.3370000E+00, 0.3586600E+00, 0.3636400E+00, 0.3147800E+00, &
     & 0.3311300E+00, 0.3494100E+00, 0.3514700E+00, 0.3571500E+00, &
     & 0.4032400E+00, 0.3643100E+00, 0.2930400E+00, 0.2930400E+00 /
      data (ref_adm( 3,iz,19, 8),iz = 1,20) / &
     & 0.3368500E+00, 0.3368500E+00, 0.3413100E+00, 0.3193200E+00, &
     & 0.3709200E+00, 0.3654200E+00, 0.3519600E+00, 0.3575100E+00, &
     & 0.3718200E+00, 0.3776900E+00, 0.3802100E+00, 0.3502200E+00, &
     & 0.3335000E+00, 0.3182400E+00, 0.3231300E+00, 0.3217500E+00, &
     & 0.3806900E+00, 0.2951200E+00, 0.3201207E+00, 0.3201207E+00 /
      data (ref_adm( 3,iz,20, 8),iz = 1,20) / &
     & 0.3629300E+00, 0.3629300E+00, 0.3586800E+00, 0.3434800E+00, &
     & 0.3486100E+00, 0.4051900E+00, 0.3416800E+00, 0.3512400E+00, &
     & 0.4012300E+00, 0.3968200E+00, 0.3724700E+00, 0.3994800E+00, &
     & 0.3734600E+00, 0.3440100E+00, 0.3649800E+00, 0.3428500E+00, &
     & 0.3629000E+00, 0.3544916E+00, 0.3180715E+00, 0.3180715E+00 /
      data (ref_adm( 3,iz,21, 8),iz = 1,20) / &
     & 0.3631400E+00, 0.3631400E+00, 0.3477400E+00, 0.3598600E+00, &
     & 0.3402700E+00, 0.3445000E+00, 0.3873400E+00, 0.3707800E+00, &
     & 0.3985100E+00, 0.3735500E+00, 0.3785500E+00, 0.3671200E+00, &
     & 0.3979000E+00, 0.3897200E+00, 0.3527000E+00, 0.3444500E+00, &
     & 0.3713900E+00, 0.3520584E+00, 0.3166304E+00, 0.3166304E+00 /
      data (ref_adm( 3,iz,22, 8),iz = 1,20) / &
     & 0.3271400E+00, 0.3271400E+00, 0.3470400E+00, 0.3597300E+00, &
     & 0.3332400E+00, 0.3621900E+00, 0.3742800E+00, 0.3923900E+00, &
     & 0.4000800E+00, 0.3586400E+00, 0.3630200E+00, 0.3698100E+00, &
     & 0.3800000E+00, 0.3634300E+00, 0.3564800E+00, 0.3973100E+00, &
     & 0.3013800E+00, 0.2994168E+00, 0.2727800E+00, 0.2727800E+00 /
      data (ref_adm( 3,iz,23, 8),iz = 1,20) / &
     & 0.3359400E+00, 0.3359400E+00, 0.3475300E+00, 0.3462500E+00, &
     & 0.3862500E+00, 0.3625100E+00, 0.3880700E+00, 0.4100900E+00, &
     & 0.4098500E+00, 0.4075200E+00, 0.3707300E+00, 0.3636100E+00, &
     & 0.3727100E+00, 0.3526300E+00, 0.3645200E+00, 0.3574400E+00, &
     & 0.3581600E+00, 0.3000510E+00, 0.2744166E+00, 0.2744166E+00 /
      data (ref_adm( 3,iz,24, 8),iz = 1,20) / &
     & 0.3299300E+00, 0.3299300E+00, 0.3295200E+00, 0.4108900E+00, &
     & 0.3672400E+00, 0.3498700E+00, 0.3760000E+00, 0.4208000E+00, &
     & 0.3911300E+00, 0.4194100E+00, 0.3802700E+00, 0.3677600E+00, &
     & 0.4007800E+00, 0.3723400E+00, 0.3575700E+00, 0.3645300E+00, &
     & 0.3695800E+00, 0.3017552E+00, 0.2768177E+00, 0.2768177E+00 /
      data (ref_adm( 3,iz,25, 8),iz = 1,20) / &
     & 0.3576100E+00, 0.3576100E+00, 0.4020700E+00, 0.3080200E+00, &
     & 0.3788500E+00, 0.3617600E+00, 0.3625900E+00, 0.3750200E+00, &
     & 0.3722300E+00, 0.4110100E+00, 0.3199200E+00, 0.3503700E+00, &
     & 0.3894100E+00, 0.4080100E+00, 0.4052900E+00, 0.4064600E+00, &
     & 0.3685200E+00, 0.4254700E+00, 0.2798385E+00, 0.2798385E+00 /
      data (ref_adm( 3,iz,26, 8),iz = 1,20) / &
     & 0.3534200E+00, 0.3534200E+00, 0.3394200E+00, 0.3822600E+00, &
     & 0.3419900E+00, 0.3277700E+00, 0.3653700E+00, 0.3488800E+00, &
     & 0.3602400E+00, 0.3989000E+00, 0.3802500E+00, 0.3399400E+00, &
     & 0.3855400E+00, 0.3982800E+00, 0.3946400E+00, 0.3902500E+00, &
     & 0.3841800E+00, 0.3895400E+00, 0.3444200E+00, 0.3444200E+00 /
      data (ref_adm( 3,iz,27, 8),iz = 1,20) / &
     & 0.3585800E+00, 0.3585800E+00, 0.3426400E+00, 0.3446400E+00, &
     & 0.3557400E+00, 0.3527300E+00, 0.3732000E+00, 0.3800700E+00, &
     & 0.3595200E+00, 0.3702600E+00, 0.4128800E+00, 0.4250400E+00, &
     & 0.3775700E+00, 0.4246800E+00, 0.3945300E+00, 0.3974900E+00, &
     & 0.4102700E+00, 0.3825000E+00, 0.3407900E+00, 0.3407900E+00 /
      data (ref_adm( 3,iz,28, 8),iz = 1,20) / &
     & 0.3359500E+00, 0.3359500E+00, 0.3281300E+00, 0.3321800E+00, &
     & 0.3368100E+00, 0.3360400E+00, 0.3427900E+00, 0.3526100E+00, &
     & 0.3657100E+00, 0.3724500E+00, 0.3764700E+00, 0.3693000E+00, &
     & 0.4504000E+00, 0.4518800E+00, 0.3817600E+00, 0.4071300E+00, &
     & 0.4007000E+00, 0.4006500E+00, 0.3248800E+00, 0.3248800E+00 /
      data (ref_adm( 3,iz,29, 8),iz = 1,20) / &
     & 0.3319200E+00, 0.3319200E+00, 0.3367300E+00, 0.3405500E+00, &
     & 0.3516100E+00, 0.3474800E+00, 0.3377500E+00, 0.3440500E+00, &
     & 0.3586100E+00, 0.3493700E+00, 0.3613700E+00, 0.3750700E+00, &
     & 0.3810000E+00, 0.3783700E+00, 0.3713100E+00, 0.3685800E+00, &
     & 0.3835200E+00, 0.3609900E+00, 0.2993100E+00, 0.2993100E+00 /
      data (ref_adm( 3,iz,30, 8),iz = 1,20) / &
     & 0.3232200E+00, 0.3232200E+00, 0.3497100E+00, 0.3079600E+00, &
     & 0.3071700E+00, 0.3183100E+00, 0.3302300E+00, 0.3295900E+00, &
     & 0.3677500E+00, 0.3686400E+00, 0.3493800E+00, 0.3747800E+00, &
     & 0.3792500E+00, 0.4050400E+00, 0.4148100E+00, 0.4085900E+00, &
     & 0.4137000E+00, 0.4035000E+00, 0.2960400E+00, 0.2960400E+00 /
      data (ref_adm( 3,iz,31, 8),iz = 1,20) / &
     & 0.3296600E+00, 0.3296600E+00, 0.3444600E+00, 0.3602700E+00, &
     & 0.3539300E+00, 0.3441200E+00, 0.3639000E+00, 0.3847200E+00, &
     & 0.3732200E+00, 0.4075200E+00, 0.4043900E+00, 0.3892900E+00, &
     & 0.3910500E+00, 0.4111100E+00, 0.4238100E+00, 0.4130500E+00, &
     & 0.4020300E+00, 0.3949900E+00, 0.2987100E+00, 0.2987100E+00 /
      data (ref_adm( 3,iz,32, 8),iz = 1,20) / &
     & 0.3100600E+00, 0.3100600E+00, 0.3526000E+00, 0.3190300E+00, &
     & 0.3292000E+00, 0.3037300E+00, 0.3499500E+00, 0.3515600E+00, &
     & 0.3956700E+00, 0.3806200E+00, 0.3853800E+00, 0.3925700E+00, &
     & 0.4294500E+00, 0.3854500E+00, 0.4025100E+00, 0.4125200E+00, &
     & 0.3900000E+00, 0.3770700E+00, 0.3115787E+00, 0.3115787E+00 /
      data (ref_adm( 3,iz,33, 8),iz = 1,20) / &
     & 0.3420700E+00, 0.3420700E+00, 0.3312700E+00, 0.3091400E+00, &
     & 0.3030700E+00, 0.2984500E+00, 0.3704600E+00, 0.3711500E+00, &
     & 0.4022600E+00, 0.3631800E+00, 0.4301500E+00, 0.3293300E+00, &
     & 0.3791000E+00, 0.4022000E+00, 0.4270600E+00, 0.4045900E+00, &
     & 0.4229800E+00, 0.4125600E+00, 0.3154333E+00, 0.3154333E+00 /
      data (ref_adm( 3,iz,34, 8),iz = 1,20) / &
     & 0.3351300E+00, 0.3351300E+00, 0.3125400E+00, 0.3568600E+00, &
     & 0.3380900E+00, 0.3605300E+00, 0.3696900E+00, 0.4038200E+00, &
     & 0.4033800E+00, 0.4458500E+00, 0.3986900E+00, 0.3736700E+00, &
     & 0.4250000E+00, 0.4000800E+00, 0.4178100E+00, 0.4341400E+00, &
     & 0.4260600E+00, 0.4560300E+00, 0.3187441E+00, 0.3187441E+00 /
      data (ref_adm( 3,iz,35, 8),iz = 1,20) / &
     & 0.3440400E+00, 0.3440400E+00, 0.3314300E+00, 0.3390800E+00, &
     & 0.3367900E+00, 0.3478900E+00, 0.3827000E+00, 0.3859700E+00, &
     & 0.3830900E+00, 0.4402700E+00, 0.3964900E+00, 0.4210000E+00, &
     & 0.3763300E+00, 0.4258800E+00, 0.4365900E+00, 0.4472100E+00, &
     & 0.4238500E+00, 0.3571983E+00, 0.3215083E+00, 0.3215083E+00 /
      data (ref_adm( 3,iz,36, 8),iz = 1,20) / &
     & 0.3510900E+00, 0.3510900E+00, 0.3387500E+00, 0.2964400E+00, &
     & 0.3425600E+00, 0.3498600E+00, 0.3802500E+00, 0.4269100E+00, &
     & 0.4297400E+00, 0.4131200E+00, 0.3924800E+00, 0.3860400E+00, &
     & 0.3635300E+00, 0.4238500E+00, 0.4197600E+00, 0.4196900E+00, &
     & 0.4132624E+00, 0.3625975E+00, 0.3234839E+00, 0.3234839E+00 /
      data (ref_adm( 3,iz,37, 8),iz = 1,20) / &
     & 0.3142100E+00, 0.3142100E+00, 0.3253000E+00, 0.3056900E+00, &
     & 0.3224000E+00, 0.3542000E+00, 0.4198800E+00, 0.4777300E+00, &
     & 0.4861400E+00, 0.4076600E+00, 0.4460500E+00, 0.4104100E+00, &
     & 0.4480400E+00, 0.4358000E+00, 0.4033300E+00, 0.4780200E+00, &
     & 0.4146834E+00, 0.3658068E+00, 0.3246332E+00, 0.3246332E+00 /
      data (ref_adm( 3,iz,38, 8),iz = 1,20) / &
     & 0.3142100E+00, 0.3142100E+00, 0.3253000E+00, 0.3056900E+00, &
     & 0.3224000E+00, 0.3542000E+00, 0.4198800E+00, 0.4777300E+00, &
     & 0.4861400E+00, 0.4076600E+00, 0.4460500E+00, 0.4104100E+00, &
     & 0.4480400E+00, 0.4358000E+00, 0.4033300E+00, 0.4780200E+00, &
     & 0.4146834E+00, 0.3658068E+00, 0.3246332E+00, 0.3246332E+00 /
! Solar Zenith Angle 40.0 Albedo  0.3676940E+00
      data (ref_adm( 3,iz, 1, 9),iz = 1,20) / &
     & 0.3646400E+00, 0.3646400E+00, 0.3441900E+00, 0.3144400E+00, &
     & 0.3540500E+00, 0.3478000E+00, 0.2936100E+00, 0.3063200E+00, &
     & 0.3381000E+00, 0.3724000E+00, 0.4033500E+00, 0.4215600E+00, &
     & 0.4471200E+00, 0.4685900E+00, 0.4908200E+00, 0.4880100E+00, &
     & 0.5451900E+00, 0.4925200E+00, 0.4661700E+00, 0.4661700E+00 /
      data (ref_adm( 3,iz, 2, 9),iz = 1,20) / &
     & 0.3646400E+00, 0.3646400E+00, 0.3441900E+00, 0.3144400E+00, &
     & 0.3540500E+00, 0.3478000E+00, 0.2936100E+00, 0.3063200E+00, &
     & 0.3381000E+00, 0.3724000E+00, 0.4033500E+00, 0.4215600E+00, &
     & 0.4471200E+00, 0.4685900E+00, 0.4908200E+00, 0.4880100E+00, &
     & 0.5451900E+00, 0.4925200E+00, 0.4661700E+00, 0.4661700E+00 /
      data (ref_adm( 3,iz, 3, 9),iz = 1,20) / &
     & 0.3499800E+00, 0.3499800E+00, 0.3373900E+00, 0.3428500E+00, &
     & 0.3299700E+00, 0.3030000E+00, 0.2990500E+00, 0.3114600E+00, &
     & 0.3056400E+00, 0.3804500E+00, 0.3791000E+00, 0.4154000E+00, &
     & 0.4145400E+00, 0.4630800E+00, 0.4734700E+00, 0.5095100E+00, &
     & 0.5330600E+00, 0.5013500E+00, 0.4297700E+00, 0.4297700E+00 /
      data (ref_adm( 3,iz, 4, 9),iz = 1,20) / &
     & 0.3177300E+00, 0.3177300E+00, 0.3226200E+00, 0.3119300E+00, &
     & 0.3160000E+00, 0.3068000E+00, 0.3385200E+00, 0.3097000E+00, &
     & 0.3411700E+00, 0.3436600E+00, 0.3919000E+00, 0.4141700E+00, &
     & 0.4170700E+00, 0.4422600E+00, 0.5071800E+00, 0.4985300E+00, &
     & 0.5112300E+00, 0.5217000E+00, 0.4621200E+00, 0.4621200E+00 /
      data (ref_adm( 3,iz, 5, 9),iz = 1,20) / &
     & 0.3282400E+00, 0.3282400E+00, 0.2851900E+00, 0.3310500E+00, &
     & 0.3063700E+00, 0.3027700E+00, 0.3345600E+00, 0.3533000E+00, &
     & 0.3636700E+00, 0.3463600E+00, 0.3883000E+00, 0.3790300E+00, &
     & 0.4433100E+00, 0.4579600E+00, 0.4532000E+00, 0.4746000E+00, &
     & 0.5344600E+00, 0.5070900E+00, 0.4664800E+00, 0.4664800E+00 /
      data (ref_adm( 3,iz, 6, 9),iz = 1,20) / &
     & 0.3231400E+00, 0.3231400E+00, 0.3083200E+00, 0.3011500E+00, &
     & 0.3449100E+00, 0.3264900E+00, 0.3142100E+00, 0.3700400E+00, &
     & 0.3244500E+00, 0.3366000E+00, 0.3449600E+00, 0.3677600E+00, &
     & 0.4199100E+00, 0.4482100E+00, 0.4468100E+00, 0.5049600E+00, &
     & 0.5502500E+00, 0.5316400E+00, 0.4902100E+00, 0.4902100E+00 /
      data (ref_adm( 3,iz, 7, 9),iz = 1,20) / &
     & 0.3225900E+00, 0.3225900E+00, 0.3090700E+00, 0.3207600E+00, &
     & 0.3110400E+00, 0.3380300E+00, 0.3328900E+00, 0.3489200E+00, &
     & 0.3415700E+00, 0.3783200E+00, 0.3832900E+00, 0.4295000E+00, &
     & 0.4260500E+00, 0.4389500E+00, 0.4253100E+00, 0.5024400E+00, &
     & 0.5104700E+00, 0.4667700E+00, 0.4327200E+00, 0.4327200E+00 /
      data (ref_adm( 3,iz, 8, 9),iz = 1,20) / &
     & 0.2947400E+00, 0.2947400E+00, 0.2740500E+00, 0.2913800E+00, &
     & 0.3003000E+00, 0.3010700E+00, 0.3066300E+00, 0.3034700E+00, &
     & 0.3292700E+00, 0.3365100E+00, 0.3669100E+00, 0.3989800E+00, &
     & 0.4350500E+00, 0.4430100E+00, 0.4535400E+00, 0.4871700E+00, &
     & 0.4850600E+00, 0.4659600E+00, 0.3957500E+00, 0.3957500E+00 /
      data (ref_adm( 3,iz, 9, 9),iz = 1,20) / &
     & 0.3135900E+00, 0.3135900E+00, 0.3371600E+00, 0.3421900E+00, &
     & 0.3738800E+00, 0.3477400E+00, 0.3406100E+00, 0.3464300E+00, &
     & 0.3688400E+00, 0.3593900E+00, 0.3777900E+00, 0.3982700E+00, &
     & 0.4019800E+00, 0.4289900E+00, 0.4698400E+00, 0.5059100E+00, &
     & 0.5193600E+00, 0.4874300E+00, 0.4483400E+00, 0.4483400E+00 /
      data (ref_adm( 3,iz,10, 9),iz = 1,20) / &
     & 0.3411300E+00, 0.3411300E+00, 0.3399900E+00, 0.3456100E+00, &
     & 0.3354700E+00, 0.3442700E+00, 0.3561900E+00, 0.3624200E+00, &
     & 0.3488300E+00, 0.3866100E+00, 0.3793000E+00, 0.3808000E+00, &
     & 0.3840100E+00, 0.4055700E+00, 0.4227800E+00, 0.4981700E+00, &
     & 0.4261400E+00, 0.4507100E+00, 0.3966300E+00, 0.3966300E+00 /
      data (ref_adm( 3,iz,11, 9),iz = 1,20) / &
     & 0.3304400E+00, 0.3304400E+00, 0.3430700E+00, 0.3344200E+00, &
     & 0.3255200E+00, 0.3307300E+00, 0.3269800E+00, 0.3244500E+00, &
     & 0.3471700E+00, 0.3594800E+00, 0.3453700E+00, 0.3531800E+00, &
     & 0.3668000E+00, 0.4050300E+00, 0.4183300E+00, 0.4446200E+00, &
     & 0.4398800E+00, 0.4139500E+00, 0.2991500E+00, 0.2991500E+00 /
      data (ref_adm( 3,iz,12, 9),iz = 1,20) / &
     & 0.3284800E+00, 0.3284800E+00, 0.3228300E+00, 0.3197300E+00, &
     & 0.3224000E+00, 0.3249100E+00, 0.3272000E+00, 0.3412200E+00, &
     & 0.3264300E+00, 0.3656300E+00, 0.3567000E+00, 0.3817800E+00, &
     & 0.3858300E+00, 0.4000300E+00, 0.3824000E+00, 0.4369200E+00, &
     & 0.4204600E+00, 0.4024500E+00, 0.3789800E+00, 0.3789800E+00 /
      data (ref_adm( 3,iz,13, 9),iz = 1,20) / &
     & 0.3262200E+00, 0.3262200E+00, 0.2992100E+00, 0.3037100E+00, &
     & 0.2904600E+00, 0.2971900E+00, 0.3132700E+00, 0.3266700E+00, &
     & 0.3384700E+00, 0.3474800E+00, 0.3462900E+00, 0.3643400E+00, &
     & 0.3546100E+00, 0.3913000E+00, 0.3798800E+00, 0.4443800E+00, &
     & 0.4016500E+00, 0.4281600E+00, 0.3692700E+00, 0.3692700E+00 /
      data (ref_adm( 3,iz,14, 9),iz = 1,20) / &
     & 0.3141000E+00, 0.3141000E+00, 0.3212900E+00, 0.3194100E+00, &
     & 0.3153000E+00, 0.3213800E+00, 0.3294400E+00, 0.3082300E+00, &
     & 0.3199800E+00, 0.3219600E+00, 0.3000700E+00, 0.3092900E+00, &
     & 0.3439300E+00, 0.3583200E+00, 0.3441000E+00, 0.3844300E+00, &
     & 0.4383000E+00, 0.4058000E+00, 0.3881227E+00, 0.3881227E+00 /
      data (ref_adm( 3,iz,15, 9),iz = 1,20) / &
     & 0.3217300E+00, 0.3217300E+00, 0.3120600E+00, 0.2947900E+00, &
     & 0.3227300E+00, 0.3083700E+00, 0.2900300E+00, 0.3039500E+00, &
     & 0.3181400E+00, 0.3186600E+00, 0.3336600E+00, 0.3437900E+00, &
     & 0.3566600E+00, 0.3343900E+00, 0.3379600E+00, 0.4002500E+00, &
     & 0.4208700E+00, 0.3940700E+00, 0.3511300E+00, 0.3511300E+00 /
      data (ref_adm( 3,iz,16, 9),iz = 1,20) / &
     & 0.3391000E+00, 0.3391000E+00, 0.3324200E+00, 0.3112500E+00, &
     & 0.3120600E+00, 0.3121800E+00, 0.3105400E+00, 0.3314800E+00, &
     & 0.3337900E+00, 0.3209100E+00, 0.3248600E+00, 0.3783800E+00, &
     & 0.3553200E+00, 0.3616900E+00, 0.3466400E+00, 0.3587700E+00, &
     & 0.4285400E+00, 0.3746300E+00, 0.3716642E+00, 0.3716642E+00 /
      data (ref_adm( 3,iz,17, 9),iz = 1,20) / &
     & 0.3191000E+00, 0.3191000E+00, 0.3302800E+00, 0.3246900E+00, &
     & 0.2819100E+00, 0.2896200E+00, 0.2960000E+00, 0.3513900E+00, &
     & 0.3160700E+00, 0.3135800E+00, 0.3231500E+00, 0.3538000E+00, &
     & 0.3476000E+00, 0.3471800E+00, 0.3553900E+00, 0.3650800E+00, &
     & 0.3877500E+00, 0.3731500E+00, 0.3641774E+00, 0.3641774E+00 /
      data (ref_adm( 3,iz,18, 9),iz = 1,20) / &
     & 0.3341600E+00, 0.3341600E+00, 0.3196600E+00, 0.2960500E+00, &
     & 0.3086700E+00, 0.3316600E+00, 0.3351200E+00, 0.3048500E+00, &
     & 0.2844500E+00, 0.3190000E+00, 0.3394600E+00, 0.3497100E+00, &
     & 0.3264000E+00, 0.3160200E+00, 0.3786000E+00, 0.3571300E+00, &
     & 0.4235400E+00, 0.3714100E+00, 0.3494883E+00, 0.3494883E+00 /
      data (ref_adm( 3,iz,19, 9),iz = 1,20) / &
     & 0.3216800E+00, 0.3216800E+00, 0.3305000E+00, 0.3374900E+00, &
     & 0.3573400E+00, 0.3176500E+00, 0.3220300E+00, 0.2922200E+00, &
     & 0.3119600E+00, 0.3246000E+00, 0.3417400E+00, 0.3511600E+00, &
     & 0.3597300E+00, 0.2991900E+00, 0.3904600E+00, 0.3563200E+00, &
     & 0.3493900E+00, 0.3309500E+00, 0.3448579E+00, 0.3448579E+00 /
      data (ref_adm( 3,iz,20, 9),iz = 1,20) / &
     & 0.3304500E+00, 0.3304500E+00, 0.3171900E+00, 0.3246800E+00, &
     & 0.3336200E+00, 0.3626100E+00, 0.3442500E+00, 0.3111600E+00, &
     & 0.3680900E+00, 0.3260800E+00, 0.3212800E+00, 0.3365200E+00, &
     & 0.3340600E+00, 0.3377900E+00, 0.3379000E+00, 0.3456500E+00, &
     & 0.3402000E+00, 0.3685897E+00, 0.3422788E+00, 0.3422788E+00 /
      data (ref_adm( 3,iz,21, 9),iz = 1,20) / &
     & 0.3194600E+00, 0.3194600E+00, 0.2915800E+00, 0.3136800E+00, &
     & 0.3326600E+00, 0.3130000E+00, 0.3201600E+00, 0.3431500E+00, &
     & 0.3345700E+00, 0.3449500E+00, 0.3385300E+00, 0.3729100E+00, &
     & 0.3533700E+00, 0.3217300E+00, 0.3268600E+00, 0.3423900E+00, &
     & 0.4648600E+00, 0.3670784E+00, 0.3407402E+00, 0.3407402E+00 /
      data (ref_adm( 3,iz,22, 9),iz = 1,20) / &
     & 0.3421400E+00, 0.3421400E+00, 0.3254800E+00, 0.3353600E+00, &
     & 0.3312200E+00, 0.3253400E+00, 0.3308100E+00, 0.3339700E+00, &
     & 0.3310600E+00, 0.3388900E+00, 0.3475900E+00, 0.4004000E+00, &
     & 0.3816800E+00, 0.3465200E+00, 0.3618800E+00, 0.3858200E+00, &
     & 0.3205082E+00, 0.2988669E+00, 0.2722608E+00, 0.2722608E+00 /
      data (ref_adm( 3,iz,23, 9),iz = 1,20) / &
     & 0.3275800E+00, 0.3275800E+00, 0.3417600E+00, 0.2944900E+00, &
     & 0.3376600E+00, 0.3559700E+00, 0.3665700E+00, 0.3345200E+00, &
     & 0.3396400E+00, 0.3408200E+00, 0.2997200E+00, 0.4047300E+00, &
     & 0.3916000E+00, 0.3765200E+00, 0.3662900E+00, 0.3874100E+00, &
     & 0.4066800E+00, 0.2998737E+00, 0.2740012E+00, 0.2740012E+00 /
      data (ref_adm( 3,iz,24, 9),iz = 1,20) / &
     & 0.3293900E+00, 0.3293900E+00, 0.3463000E+00, 0.3370300E+00, &
     & 0.3682600E+00, 0.3488300E+00, 0.3650900E+00, 0.3788200E+00, &
     & 0.3795000E+00, 0.3993500E+00, 0.3091400E+00, 0.3443100E+00, &
     & 0.3763400E+00, 0.3652000E+00, 0.3729600E+00, 0.3919800E+00, &
     & 0.3690500E+00, 0.3019176E+00, 0.2765111E+00, 0.2765111E+00 /
      data (ref_adm( 3,iz,25, 9),iz = 1,20) / &
     & 0.3273600E+00, 0.3273600E+00, 0.3259300E+00, 0.3320500E+00, &
     & 0.3206900E+00, 0.3299000E+00, 0.3461700E+00, 0.3446000E+00, &
     & 0.3491900E+00, 0.3744500E+00, 0.3445500E+00, 0.3577400E+00, &
     & 0.3695200E+00, 0.3760100E+00, 0.3773500E+00, 0.4136900E+00, &
     & 0.4184600E+00, 0.3815600E+00, 0.2796396E+00, 0.2796396E+00 /
      data (ref_adm( 3,iz,26, 9),iz = 1,20) / &
     & 0.3235100E+00, 0.3235100E+00, 0.3435800E+00, 0.3359400E+00, &
     & 0.3474100E+00, 0.3458000E+00, 0.3354800E+00, 0.3333400E+00, &
     & 0.3526700E+00, 0.3626400E+00, 0.3603200E+00, 0.3768400E+00, &
     & 0.3881200E+00, 0.3979800E+00, 0.3793500E+00, 0.4157500E+00, &
     & 0.4083500E+00, 0.3933700E+00, 0.3248000E+00, 0.3248000E+00 /
      data (ref_adm( 3,iz,27, 9),iz = 1,20) / &
     & 0.3227500E+00, 0.3227500E+00, 0.3186500E+00, 0.3243700E+00, &
     & 0.3343500E+00, 0.3574500E+00, 0.3390000E+00, 0.3513000E+00, &
     & 0.3554800E+00, 0.3583500E+00, 0.3562800E+00, 0.3656100E+00, &
     & 0.3941400E+00, 0.4029800E+00, 0.4187900E+00, 0.4099000E+00, &
     & 0.4196500E+00, 0.4148700E+00, 0.3423000E+00, 0.3423000E+00 /
      data (ref_adm( 3,iz,28, 9),iz = 1,20) / &
     & 0.3282900E+00, 0.3282900E+00, 0.3270200E+00, 0.3331500E+00, &
     & 0.3469700E+00, 0.3343600E+00, 0.3502600E+00, 0.3456100E+00, &
     & 0.3490600E+00, 0.3478500E+00, 0.3816200E+00, 0.3749300E+00, &
     & 0.4009900E+00, 0.3819900E+00, 0.4123300E+00, 0.4066000E+00, &
     & 0.4311800E+00, 0.4065600E+00, 0.3594300E+00, 0.3594300E+00 /
      data (ref_adm( 3,iz,29, 9),iz = 1,20) / &
     & 0.3302700E+00, 0.3302700E+00, 0.3331300E+00, 0.3304500E+00, &
     & 0.3583500E+00, 0.3787400E+00, 0.3831800E+00, 0.3667800E+00, &
     & 0.3650400E+00, 0.3475000E+00, 0.3569500E+00, 0.3607400E+00, &
     & 0.3836700E+00, 0.4102800E+00, 0.4233400E+00, 0.4187000E+00, &
     & 0.4306200E+00, 0.4164300E+00, 0.3216800E+00, 0.3216800E+00 /
      data (ref_adm( 3,iz,30, 9),iz = 1,20) / &
     & 0.3579100E+00, 0.3579100E+00, 0.3753300E+00, 0.3451800E+00, &
     & 0.3479900E+00, 0.3605900E+00, 0.4077400E+00, 0.3966300E+00, &
     & 0.3987800E+00, 0.4241900E+00, 0.4234800E+00, 0.3825800E+00, &
     & 0.4030100E+00, 0.4113200E+00, 0.4516500E+00, 0.4475200E+00, &
     & 0.4373200E+00, 0.4133100E+00, 0.3383300E+00, 0.3383300E+00 /
      data (ref_adm( 3,iz,31, 9),iz = 1,20) / &
     & 0.3375600E+00, 0.3375600E+00, 0.3403300E+00, 0.3261900E+00, &
     & 0.3239200E+00, 0.3294700E+00, 0.3504200E+00, 0.3683200E+00, &
     & 0.3896800E+00, 0.3830500E+00, 0.4055600E+00, 0.4074000E+00, &
     & 0.4123600E+00, 0.4243900E+00, 0.4366900E+00, 0.4113000E+00, &
     & 0.4386600E+00, 0.4230900E+00, 0.3520500E+00, 0.3520500E+00 /
      data (ref_adm( 3,iz,32, 9),iz = 1,20) / &
     & 0.3206700E+00, 0.3206700E+00, 0.3350000E+00, 0.3582800E+00, &
     & 0.3387900E+00, 0.3182000E+00, 0.3473900E+00, 0.3683200E+00, &
     & 0.3502900E+00, 0.3448100E+00, 0.3497100E+00, 0.3685300E+00, &
     & 0.3909600E+00, 0.4295800E+00, 0.4118700E+00, 0.3973800E+00, &
     & 0.4176300E+00, 0.3914000E+00, 0.3116500E+00, 0.3116500E+00 /
      data (ref_adm( 3,iz,33, 9),iz = 1,20) / &
     & 0.3175800E+00, 0.3175800E+00, 0.3676500E+00, 0.3642300E+00, &
     & 0.3482300E+00, 0.3289800E+00, 0.3458500E+00, 0.3714600E+00, &
     & 0.3707200E+00, 0.3680000E+00, 0.3782900E+00, 0.4063500E+00, &
     & 0.3896900E+00, 0.4317000E+00, 0.4415400E+00, 0.4096900E+00, &
     & 0.4126700E+00, 0.4028100E+00, 0.3116500E+00, 0.3116500E+00 /
      data (ref_adm( 3,iz,34, 9),iz = 1,20) / &
     & 0.3170900E+00, 0.3170900E+00, 0.3196300E+00, 0.3389400E+00, &
     & 0.3757300E+00, 0.3782900E+00, 0.3384100E+00, 0.3568700E+00, &
     & 0.3807900E+00, 0.4017100E+00, 0.3916800E+00, 0.3875500E+00, &
     & 0.4168600E+00, 0.4341600E+00, 0.4042900E+00, 0.3911500E+00, &
     & 0.3991400E+00, 0.4076300E+00, 0.3165600E+00, 0.3165600E+00 /
      data (ref_adm( 3,iz,35, 9),iz = 1,20) / &
     & 0.3064900E+00, 0.3064900E+00, 0.3102300E+00, 0.3280000E+00, &
     & 0.3584300E+00, 0.3625100E+00, 0.3904900E+00, 0.3955200E+00, &
     & 0.4158300E+00, 0.4446500E+00, 0.4398600E+00, 0.3852700E+00, &
     & 0.4171100E+00, 0.4134100E+00, 0.4001600E+00, 0.4015900E+00, &
     & 0.4059200E+00, 0.3585000E+00, 0.3219619E+00, 0.3219619E+00 /
      data (ref_adm( 3,iz,36, 9),iz = 1,20) / &
     & 0.3049200E+00, 0.3049200E+00, 0.3335600E+00, 0.3534200E+00, &
     & 0.3592300E+00, 0.3573600E+00, 0.3759300E+00, 0.3707700E+00, &
     & 0.3833600E+00, 0.4123900E+00, 0.4123000E+00, 0.4257900E+00, &
     & 0.4094500E+00, 0.3952400E+00, 0.3777800E+00, 0.4378500E+00, &
     & 0.4105700E+00, 0.3645458E+00, 0.3239560E+00, 0.3239560E+00 /
      data (ref_adm( 3,iz,37, 9),iz = 1,20) / &
     & 0.3177500E+00, 0.3177500E+00, 0.3453100E+00, 0.3184300E+00, &
     & 0.3456200E+00, 0.3662100E+00, 0.3586300E+00, 0.3893800E+00, &
     & 0.4121400E+00, 0.4207200E+00, 0.4198100E+00, 0.4236200E+00, &
     & 0.4166900E+00, 0.4278600E+00, 0.3959500E+00, 0.4253300E+00, &
     & 0.4290100E+00, 0.3677734E+00, 0.3251119E+00, 0.3251119E+00 /
      data (ref_adm( 3,iz,38, 9),iz = 1,20) / &
     & 0.3177500E+00, 0.3177500E+00, 0.3453100E+00, 0.3184300E+00, &
     & 0.3456200E+00, 0.3662100E+00, 0.3586300E+00, 0.3893800E+00, &
     & 0.4121400E+00, 0.4207200E+00, 0.4198100E+00, 0.4236200E+00, &
     & 0.4166900E+00, 0.4278600E+00, 0.3959500E+00, 0.4253300E+00, &
     & 0.4290100E+00, 0.3677734E+00, 0.3251119E+00, 0.3251119E+00 /
! Solar Zenith Angle 45.0 Albedo  0.3733931E+00
      data (ref_adm( 3,iz, 1,10),iz = 1,20) / &
     & 0.3270100E+00, 0.3270100E+00, 0.3207100E+00, 0.3183800E+00, &
     & 0.3311400E+00, 0.3417100E+00, 0.3315100E+00, 0.3427700E+00, &
     & 0.4047200E+00, 0.4137800E+00, 0.4376900E+00, 0.4311200E+00, &
     & 0.4411500E+00, 0.4911400E+00, 0.4977800E+00, 0.5519300E+00, &
     & 0.6062500E+00, 0.6272500E+00, 0.5241200E+00, 0.5241200E+00 /
      data (ref_adm( 3,iz, 2,10),iz = 1,20) / &
     & 0.3270100E+00, 0.3270100E+00, 0.3207100E+00, 0.3183800E+00, &
     & 0.3311400E+00, 0.3417100E+00, 0.3315100E+00, 0.3427700E+00, &
     & 0.4047200E+00, 0.4137800E+00, 0.4376900E+00, 0.4311200E+00, &
     & 0.4411500E+00, 0.4911400E+00, 0.4977800E+00, 0.5519300E+00, &
     & 0.6062500E+00, 0.6272500E+00, 0.5241200E+00, 0.5241200E+00 /
      data (ref_adm( 3,iz, 3,10),iz = 1,20) / &
     & 0.3239200E+00, 0.3239200E+00, 0.3249400E+00, 0.3212400E+00, &
     & 0.3102200E+00, 0.3380700E+00, 0.3646700E+00, 0.3621400E+00, &
     & 0.3765800E+00, 0.3736500E+00, 0.3864900E+00, 0.4473300E+00, &
     & 0.4481700E+00, 0.4773800E+00, 0.5157600E+00, 0.5470100E+00, &
     & 0.5846900E+00, 0.5861400E+00, 0.5559000E+00, 0.5559000E+00 /
      data (ref_adm( 3,iz, 4,10),iz = 1,20) / &
     & 0.3060500E+00, 0.3060500E+00, 0.3014600E+00, 0.3002400E+00, &
     & 0.3221200E+00, 0.3354600E+00, 0.3397300E+00, 0.3653100E+00, &
     & 0.3774800E+00, 0.4133300E+00, 0.4167300E+00, 0.3873100E+00, &
     & 0.4402600E+00, 0.4840800E+00, 0.5101500E+00, 0.5547000E+00, &
     & 0.5798500E+00, 0.5977400E+00, 0.5498000E+00, 0.5498000E+00 /
      data (ref_adm( 3,iz, 5,10),iz = 1,20) / &
     & 0.3138400E+00, 0.3138400E+00, 0.3015600E+00, 0.3233500E+00, &
     & 0.3273500E+00, 0.3308000E+00, 0.3318800E+00, 0.3753300E+00, &
     & 0.3919700E+00, 0.3701300E+00, 0.3968000E+00, 0.4037900E+00, &
     & 0.4374900E+00, 0.4968400E+00, 0.5188100E+00, 0.5390300E+00, &
     & 0.5738000E+00, 0.6040200E+00, 0.5725500E+00, 0.5725500E+00 /
      data (ref_adm( 3,iz, 6,10),iz = 1,20) / &
     & 0.2994300E+00, 0.2994300E+00, 0.3105500E+00, 0.3082500E+00, &
     & 0.3493900E+00, 0.3686400E+00, 0.3343800E+00, 0.3732400E+00, &
     & 0.3636200E+00, 0.3620000E+00, 0.3706600E+00, 0.4032400E+00, &
     & 0.4239300E+00, 0.4618000E+00, 0.4936500E+00, 0.5487800E+00, &
     & 0.5981500E+00, 0.6066600E+00, 0.5412100E+00, 0.5412100E+00 /
      data (ref_adm( 3,iz, 7,10),iz = 1,20) / &
     & 0.3068600E+00, 0.3068600E+00, 0.3246600E+00, 0.2999400E+00, &
     & 0.2989500E+00, 0.3192000E+00, 0.3206300E+00, 0.3490200E+00, &
     & 0.3575600E+00, 0.3557200E+00, 0.3665500E+00, 0.3950700E+00, &
     & 0.4208700E+00, 0.4358400E+00, 0.4839900E+00, 0.5287600E+00, &
     & 0.6002300E+00, 0.5909600E+00, 0.5071300E+00, 0.5071300E+00 /
      data (ref_adm( 3,iz, 8,10),iz = 1,20) / &
     & 0.3570000E+00, 0.3570000E+00, 0.3289600E+00, 0.3257200E+00, &
     & 0.3025500E+00, 0.3205600E+00, 0.3212000E+00, 0.3365400E+00, &
     & 0.3422600E+00, 0.3818100E+00, 0.3819500E+00, 0.3989500E+00, &
     & 0.4336800E+00, 0.4462000E+00, 0.4708300E+00, 0.5376900E+00, &
     & 0.5797100E+00, 0.5590400E+00, 0.4469700E+00, 0.4469700E+00 /
      data (ref_adm( 3,iz, 9,10),iz = 1,20) / &
     & 0.2974300E+00, 0.2974300E+00, 0.3197500E+00, 0.3059900E+00, &
     & 0.3129500E+00, 0.3051700E+00, 0.3141600E+00, 0.3260300E+00, &
     & 0.3484700E+00, 0.3474900E+00, 0.3587400E+00, 0.3848900E+00, &
     & 0.4296000E+00, 0.4323000E+00, 0.4660700E+00, 0.4996900E+00, &
     & 0.5392800E+00, 0.5259100E+00, 0.4915700E+00, 0.4915700E+00 /
      data (ref_adm( 3,iz,10,10),iz = 1,20) / &
     & 0.3301600E+00, 0.3301600E+00, 0.3129300E+00, 0.3300200E+00, &
     & 0.3261200E+00, 0.3128300E+00, 0.3080400E+00, 0.3144600E+00, &
     & 0.3229800E+00, 0.3471100E+00, 0.3673500E+00, 0.3738200E+00, &
     & 0.4117500E+00, 0.4018200E+00, 0.4672900E+00, 0.5080800E+00, &
     & 0.5503400E+00, 0.5209100E+00, 0.4043500E+00, 0.4043500E+00 /
      data (ref_adm( 3,iz,11,10),iz = 1,20) / &
     & 0.3163400E+00, 0.3163400E+00, 0.3016300E+00, 0.3121300E+00, &
     & 0.3253200E+00, 0.3288600E+00, 0.3180100E+00, 0.3085700E+00, &
     & 0.3300400E+00, 0.3648300E+00, 0.3731400E+00, 0.3528000E+00, &
     & 0.4080600E+00, 0.4200400E+00, 0.4694900E+00, 0.4872500E+00, &
     & 0.5142700E+00, 0.4859700E+00, 0.3969600E+00, 0.3969600E+00 /
      data (ref_adm( 3,iz,12,10),iz = 1,20) / &
     & 0.3213700E+00, 0.3213700E+00, 0.3247400E+00, 0.3176700E+00, &
     & 0.3250100E+00, 0.3044700E+00, 0.3130800E+00, 0.3336200E+00, &
     & 0.3480700E+00, 0.3560500E+00, 0.3632300E+00, 0.3324300E+00, &
     & 0.3746800E+00, 0.4024100E+00, 0.4471300E+00, 0.4927900E+00, &
     & 0.5181000E+00, 0.4602400E+00, 0.3897800E+00, 0.3897800E+00 /
      data (ref_adm( 3,iz,13,10),iz = 1,20) / &
     & 0.3128700E+00, 0.3128700E+00, 0.3122400E+00, 0.3160200E+00, &
     & 0.3183300E+00, 0.3173500E+00, 0.3257000E+00, 0.3381500E+00, &
     & 0.3360800E+00, 0.3471300E+00, 0.3376900E+00, 0.3483800E+00, &
     & 0.3812000E+00, 0.3907400E+00, 0.4479000E+00, 0.4597600E+00, &
     & 0.4807000E+00, 0.4364900E+00, 0.3781400E+00, 0.3781400E+00 /
      data (ref_adm( 3,iz,14,10),iz = 1,20) / &
     & 0.3081400E+00, 0.3081400E+00, 0.2993900E+00, 0.2911600E+00, &
     & 0.3048200E+00, 0.3127800E+00, 0.3137200E+00, 0.3157100E+00, &
     & 0.3188500E+00, 0.3377400E+00, 0.3194800E+00, 0.3428100E+00, &
     & 0.3563700E+00, 0.3793100E+00, 0.4094200E+00, 0.4404200E+00, &
     & 0.4550900E+00, 0.4167200E+00, 0.3998200E+00, 0.3998200E+00 /
      data (ref_adm( 3,iz,15,10),iz = 1,20) / &
     & 0.3150300E+00, 0.3150300E+00, 0.3033700E+00, 0.3027200E+00, &
     & 0.3115100E+00, 0.3103800E+00, 0.3160700E+00, 0.3107400E+00, &
     & 0.3245200E+00, 0.3269400E+00, 0.3385300E+00, 0.3426600E+00, &
     & 0.3472100E+00, 0.3414600E+00, 0.3929300E+00, 0.4232600E+00, &
     & 0.4436000E+00, 0.3968500E+00, 0.3642700E+00, 0.3642700E+00 /
      data (ref_adm( 3,iz,16,10),iz = 1,20) / &
     & 0.3010500E+00, 0.3010500E+00, 0.2840600E+00, 0.3072000E+00, &
     & 0.3281600E+00, 0.3368900E+00, 0.3323600E+00, 0.3195700E+00, &
     & 0.3274300E+00, 0.3113000E+00, 0.3290800E+00, 0.3376500E+00, &
     & 0.3502900E+00, 0.3503600E+00, 0.3647200E+00, 0.3829000E+00, &
     & 0.4156700E+00, 0.4038500E+00, 0.3921918E+00, 0.3921918E+00 /
      data (ref_adm( 3,iz,17,10),iz = 1,20) / &
     & 0.3040300E+00, 0.3040300E+00, 0.3048500E+00, 0.3280200E+00, &
     & 0.3179500E+00, 0.3295100E+00, 0.3252700E+00, 0.3434500E+00, &
     & 0.3372300E+00, 0.3490100E+00, 0.3334800E+00, 0.3425000E+00, &
     & 0.3199500E+00, 0.3597000E+00, 0.3832900E+00, 0.3903500E+00, &
     & 0.4205000E+00, 0.4061900E+00, 0.3832281E+00, 0.3832281E+00 /
      data (ref_adm( 3,iz,18,10),iz = 1,20) / &
     & 0.3046000E+00, 0.3046000E+00, 0.3148400E+00, 0.3154900E+00, &
     & 0.2989000E+00, 0.3275600E+00, 0.3628500E+00, 0.3608700E+00, &
     & 0.3389100E+00, 0.3334700E+00, 0.3410600E+00, 0.3391000E+00, &
     & 0.3255600E+00, 0.3512400E+00, 0.3768100E+00, 0.3717800E+00, &
     & 0.3919100E+00, 0.3653700E+00, 0.3879743E+00, 0.3879743E+00 /
      data (ref_adm( 3,iz,19,10),iz = 1,20) / &
     & 0.2985000E+00, 0.2985000E+00, 0.3072200E+00, 0.3295800E+00, &
     & 0.3148700E+00, 0.3153000E+00, 0.3327700E+00, 0.3219100E+00, &
     & 0.3343500E+00, 0.3324500E+00, 0.3566700E+00, 0.3477400E+00, &
     & 0.3308800E+00, 0.3575000E+00, 0.3511200E+00, 0.3798000E+00, &
     & 0.4149100E+00, 0.4518600E+00, 0.3815107E+00, 0.3815107E+00 /
      data (ref_adm( 3,iz,20,10),iz = 1,20) / &
     & 0.2917800E+00, 0.2917800E+00, 0.3062300E+00, 0.3228700E+00, &
     & 0.3192300E+00, 0.3128600E+00, 0.3222100E+00, 0.3301800E+00, &
     & 0.3128900E+00, 0.3161800E+00, 0.3389600E+00, 0.3247500E+00, &
     & 0.3580400E+00, 0.3491000E+00, 0.3633100E+00, 0.3578000E+00, &
     & 0.4386200E+00, 0.3977801E+00, 0.3777358E+00, 0.3777358E+00 /
      data (ref_adm( 3,iz,21,10),iz = 1,20) / &
     & 0.2958000E+00, 0.2958000E+00, 0.3328100E+00, 0.3036700E+00, &
     & 0.3193900E+00, 0.3198700E+00, 0.3114200E+00, 0.3125900E+00, &
     & 0.3252000E+00, 0.3301100E+00, 0.3237900E+00, 0.3276800E+00, &
     & 0.3423100E+00, 0.3449000E+00, 0.3497300E+00, 0.3869600E+00, &
     & 0.3879377E+00, 0.3941530E+00, 0.3754194E+00, 0.3754194E+00 /
      data (ref_adm( 3,iz,22,10),iz = 1,20) / &
     & 0.2944100E+00, 0.2944100E+00, 0.3019900E+00, 0.3192100E+00, &
     & 0.3279100E+00, 0.3131900E+00, 0.3062700E+00, 0.3561000E+00, &
     & 0.3345700E+00, 0.3493000E+00, 0.3327900E+00, 0.3338100E+00, &
     & 0.3448400E+00, 0.3551300E+00, 0.3574300E+00, 0.3991900E+00, &
     & 0.3344557E+00, 0.3173761E+00, 0.3012981E+00, 0.3012981E+00 /
      data (ref_adm( 3,iz,23,10),iz = 1,20) / &
     & 0.2999900E+00, 0.2999900E+00, 0.3076800E+00, 0.3002100E+00, &
     & 0.3101300E+00, 0.3324600E+00, 0.3014300E+00, 0.3380500E+00, &
     & 0.3309200E+00, 0.3547600E+00, 0.3440000E+00, 0.3527200E+00, &
     & 0.3674200E+00, 0.3682000E+00, 0.3695000E+00, 0.3901900E+00, &
     & 0.3751100E+00, 0.3190418E+00, 0.3044398E+00, 0.3044398E+00 /
      data (ref_adm( 3,iz,24,10),iz = 1,20) / &
     & 0.3145600E+00, 0.3145600E+00, 0.3123500E+00, 0.3010100E+00, &
     & 0.3254700E+00, 0.3142100E+00, 0.3325300E+00, 0.3431500E+00, &
     & 0.3321100E+00, 0.3340200E+00, 0.3646800E+00, 0.3645100E+00, &
     & 0.3663000E+00, 0.3735300E+00, 0.3744800E+00, 0.3728600E+00, &
     & 0.3763400E+00, 0.3226388E+00, 0.3090040E+00, 0.3090040E+00 /
      data (ref_adm( 3,iz,25,10),iz = 1,20) / &
     & 0.3017800E+00, 0.3017800E+00, 0.3169700E+00, 0.3157900E+00, &
     & 0.3207300E+00, 0.3286200E+00, 0.3412900E+00, 0.3440700E+00, &
     & 0.3417900E+00, 0.3648300E+00, 0.3569600E+00, 0.3623700E+00, &
     & 0.3980000E+00, 0.3762000E+00, 0.3718100E+00, 0.3850000E+00, &
     & 0.3913900E+00, 0.4023900E+00, 0.3147541E+00, 0.3147541E+00 /
      data (ref_adm( 3,iz,26,10),iz = 1,20) / &
     & 0.3106900E+00, 0.3106900E+00, 0.3181000E+00, 0.2986800E+00, &
     & 0.3301800E+00, 0.3295000E+00, 0.3457500E+00, 0.3516700E+00, &
     & 0.3426600E+00, 0.3512800E+00, 0.3637400E+00, 0.3612000E+00, &
     & 0.3856900E+00, 0.4076600E+00, 0.3925600E+00, 0.3844900E+00, &
     & 0.4021500E+00, 0.3938700E+00, 0.3141000E+00, 0.3141000E+00 /
      data (ref_adm( 3,iz,27,10),iz = 1,20) / &
     & 0.3029300E+00, 0.3029300E+00, 0.3194200E+00, 0.3301600E+00, &
     & 0.3297200E+00, 0.3259300E+00, 0.3112500E+00, 0.3276900E+00, &
     & 0.3358900E+00, 0.3527600E+00, 0.3603800E+00, 0.3747800E+00, &
     & 0.3799700E+00, 0.3744600E+00, 0.4142900E+00, 0.4194800E+00, &
     & 0.4106300E+00, 0.3949900E+00, 0.3318100E+00, 0.3318100E+00 /
      data (ref_adm( 3,iz,28,10),iz = 1,20) / &
     & 0.3126000E+00, 0.3126000E+00, 0.3500000E+00, 0.3506400E+00, &
     & 0.3524100E+00, 0.3773700E+00, 0.3606400E+00, 0.3652700E+00, &
     & 0.3801200E+00, 0.3699800E+00, 0.3668600E+00, 0.3805900E+00, &
     & 0.3770800E+00, 0.3808700E+00, 0.4199100E+00, 0.4350400E+00, &
     & 0.4275000E+00, 0.4096400E+00, 0.3617800E+00, 0.3617800E+00 /
      data (ref_adm( 3,iz,29,10),iz = 1,20) / &
     & 0.3111500E+00, 0.3111500E+00, 0.3272300E+00, 0.3673300E+00, &
     & 0.3569600E+00, 0.3487000E+00, 0.3738500E+00, 0.3708800E+00, &
     & 0.3478100E+00, 0.3706200E+00, 0.3958300E+00, 0.4036000E+00, &
     & 0.3978800E+00, 0.4016000E+00, 0.4275700E+00, 0.4396400E+00, &
     & 0.4506900E+00, 0.4302200E+00, 0.3680300E+00, 0.3680300E+00 /
      data (ref_adm( 3,iz,30,10),iz = 1,20) / &
     & 0.3124100E+00, 0.3124100E+00, 0.3087200E+00, 0.3403400E+00, &
     & 0.3401300E+00, 0.3707900E+00, 0.3909700E+00, 0.3672000E+00, &
     & 0.3773700E+00, 0.3737600E+00, 0.3851100E+00, 0.4341000E+00, &
     & 0.4308800E+00, 0.4400300E+00, 0.4494500E+00, 0.4480100E+00, &
     & 0.4461700E+00, 0.4348600E+00, 0.3374000E+00, 0.3374000E+00 /
      data (ref_adm( 3,iz,31,10),iz = 1,20) / &
     & 0.3079900E+00, 0.3079900E+00, 0.3247300E+00, 0.3063400E+00, &
     & 0.3375800E+00, 0.3288100E+00, 0.3666800E+00, 0.3542100E+00, &
     & 0.3660800E+00, 0.3632100E+00, 0.3928100E+00, 0.3816100E+00, &
     & 0.3952900E+00, 0.4277300E+00, 0.4349500E+00, 0.4541400E+00, &
     & 0.4397800E+00, 0.4205000E+00, 0.3252500E+00, 0.3252500E+00 /
      data (ref_adm( 3,iz,32,10),iz = 1,20) / &
     & 0.3033900E+00, 0.3033900E+00, 0.2988200E+00, 0.3184800E+00, &
     & 0.3248300E+00, 0.3373300E+00, 0.3306700E+00, 0.3603600E+00, &
     & 0.3822100E+00, 0.3996400E+00, 0.3973900E+00, 0.4209800E+00, &
     & 0.4313500E+00, 0.4247100E+00, 0.4261700E+00, 0.4497800E+00, &
     & 0.4636400E+00, 0.4425800E+00, 0.3448700E+00, 0.3448700E+00 /
      data (ref_adm( 3,iz,33,10),iz = 1,20) / &
     & 0.3216100E+00, 0.3216100E+00, 0.3295900E+00, 0.3033400E+00, &
     & 0.3157000E+00, 0.3397500E+00, 0.3539800E+00, 0.3418400E+00, &
     & 0.3636400E+00, 0.3778800E+00, 0.3898200E+00, 0.4119600E+00, &
     & 0.4193400E+00, 0.4226000E+00, 0.4453500E+00, 0.4447300E+00, &
     & 0.4425600E+00, 0.4337600E+00, 0.3412100E+00, 0.3412100E+00 /
      data (ref_adm( 3,iz,34,10),iz = 1,20) / &
     & 0.3193700E+00, 0.3193700E+00, 0.3366300E+00, 0.3518700E+00, &
     & 0.3646400E+00, 0.3654800E+00, 0.3368700E+00, 0.3601200E+00, &
     & 0.3831600E+00, 0.3910500E+00, 0.3948700E+00, 0.3941000E+00, &
     & 0.4258400E+00, 0.4199400E+00, 0.4293300E+00, 0.4506300E+00, &
     & 0.4421600E+00, 0.3987100E+00, 0.3319700E+00, 0.3319700E+00 /
      data (ref_adm( 3,iz,35,10),iz = 1,20) / &
     & 0.3149100E+00, 0.3149100E+00, 0.3300400E+00, 0.3439300E+00, &
     & 0.3523000E+00, 0.3494800E+00, 0.3369900E+00, 0.3611600E+00, &
     & 0.3955700E+00, 0.3689000E+00, 0.3927100E+00, 0.4133600E+00, &
     & 0.4215100E+00, 0.4369700E+00, 0.4417100E+00, 0.4421600E+00, &
     & 0.4343800E+00, 0.4101300E+00, 0.3127400E+00, 0.3127400E+00 /
      data (ref_adm( 3,iz,36,10),iz = 1,20) / &
     & 0.3125400E+00, 0.3125400E+00, 0.3244200E+00, 0.3447100E+00, &
     & 0.3465800E+00, 0.3504100E+00, 0.3398600E+00, 0.3493300E+00, &
     & 0.3625200E+00, 0.3928300E+00, 0.4260600E+00, 0.4271000E+00, &
     & 0.4225600E+00, 0.4359700E+00, 0.4363700E+00, 0.4352400E+00, &
     & 0.4447900E+00, 0.4127800E+00, 0.4120369E+00, 0.4120369E+00 /
      data (ref_adm( 3,iz,37,10),iz = 1,20) / &
     & 0.3188300E+00, 0.3188300E+00, 0.3091900E+00, 0.3416300E+00, &
     & 0.3353700E+00, 0.3433400E+00, 0.3504800E+00, 0.3416500E+00, &
     & 0.3681200E+00, 0.4413400E+00, 0.4514200E+00, 0.4376600E+00, &
     & 0.4294300E+00, 0.4515700E+00, 0.4401200E+00, 0.4430400E+00, &
     & 0.4074100E+00, 0.4477721E+00, 0.4141077E+00, 0.4141077E+00 /
      data (ref_adm( 3,iz,38,10),iz = 1,20) / &
     & 0.3188300E+00, 0.3188300E+00, 0.3091900E+00, 0.3416300E+00, &
     & 0.3353700E+00, 0.3433400E+00, 0.3504800E+00, 0.3416500E+00, &
     & 0.3681200E+00, 0.4413400E+00, 0.4514200E+00, 0.4376600E+00, &
     & 0.4294300E+00, 0.4515700E+00, 0.4401200E+00, 0.4430400E+00, &
     & 0.4074100E+00, 0.4477721E+00, 0.4141077E+00, 0.4141077E+00 /
! Solar Zenith Angle 50.0 Albedo  0.3760711E+00
      data (ref_adm( 3,iz, 1,11),iz = 1,20) / &
     & 0.3220700E+00, 0.3220700E+00, 0.3083400E+00, 0.3084400E+00, &
     & 0.3043500E+00, 0.3188600E+00, 0.3247300E+00, 0.3531000E+00, &
     & 0.3495400E+00, 0.3694500E+00, 0.4074400E+00, 0.4640000E+00, &
     & 0.4926000E+00, 0.5219000E+00, 0.5891100E+00, 0.6418700E+00, &
     & 0.7065500E+00, 0.7274700E+00, 0.6535400E+00, 0.6535400E+00 /
      data (ref_adm( 3,iz, 2,11),iz = 1,20) / &
     & 0.3220700E+00, 0.3220700E+00, 0.3083400E+00, 0.3084400E+00, &
     & 0.3043500E+00, 0.3188600E+00, 0.3247300E+00, 0.3531000E+00, &
     & 0.3495400E+00, 0.3694500E+00, 0.4074400E+00, 0.4640000E+00, &
     & 0.4926000E+00, 0.5219000E+00, 0.5891100E+00, 0.6418700E+00, &
     & 0.7065500E+00, 0.7274700E+00, 0.6535400E+00, 0.6535400E+00 /
      data (ref_adm( 3,iz, 3,11),iz = 1,20) / &
     & 0.3118300E+00, 0.3118300E+00, 0.3030600E+00, 0.3442000E+00, &
     & 0.3166100E+00, 0.3256700E+00, 0.3096100E+00, 0.3547800E+00, &
     & 0.3351300E+00, 0.3970200E+00, 0.3724800E+00, 0.4663900E+00, &
     & 0.4760500E+00, 0.5314800E+00, 0.5670200E+00, 0.6309500E+00, &
     & 0.6778300E+00, 0.7109700E+00, 0.6637800E+00, 0.6637800E+00 /
      data (ref_adm( 3,iz, 4,11),iz = 1,20) / &
     & 0.3054000E+00, 0.3054000E+00, 0.3169700E+00, 0.3044200E+00, &
     & 0.3089200E+00, 0.3151500E+00, 0.3284000E+00, 0.3407600E+00, &
     & 0.3360700E+00, 0.3627600E+00, 0.3926300E+00, 0.4364800E+00, &
     & 0.4763600E+00, 0.5316800E+00, 0.5794100E+00, 0.6100100E+00, &
     & 0.6756200E+00, 0.7233900E+00, 0.6284900E+00, 0.6284900E+00 /
      data (ref_adm( 3,iz, 5,11),iz = 1,20) / &
     & 0.3131000E+00, 0.3131000E+00, 0.2968300E+00, 0.3161400E+00, &
     & 0.3102300E+00, 0.3422900E+00, 0.3303700E+00, 0.3118300E+00, &
     & 0.3512300E+00, 0.3460300E+00, 0.3990000E+00, 0.4292600E+00, &
     & 0.4567700E+00, 0.5164900E+00, 0.5474700E+00, 0.6105200E+00, &
     & 0.6634800E+00, 0.6946700E+00, 0.6485000E+00, 0.6485000E+00 /
      data (ref_adm( 3,iz, 6,11),iz = 1,20) / &
     & 0.3190000E+00, 0.3190000E+00, 0.3219100E+00, 0.2866700E+00, &
     & 0.3079800E+00, 0.3110900E+00, 0.3243800E+00, 0.3383700E+00, &
     & 0.3598200E+00, 0.3599500E+00, 0.3821700E+00, 0.4246200E+00, &
     & 0.4454300E+00, 0.5010300E+00, 0.5525700E+00, 0.5995900E+00, &
     & 0.6911500E+00, 0.6875400E+00, 0.6064200E+00, 0.6064200E+00 /
      data (ref_adm( 3,iz, 7,11),iz = 1,20) / &
     & 0.3015700E+00, 0.3015700E+00, 0.2930400E+00, 0.3088900E+00, &
     & 0.2993900E+00, 0.3014000E+00, 0.3138300E+00, 0.3356500E+00, &
     & 0.3611800E+00, 0.3665900E+00, 0.3937700E+00, 0.4443500E+00, &
     & 0.4525700E+00, 0.5065500E+00, 0.5538100E+00, 0.6209600E+00, &
     & 0.6768000E+00, 0.6842100E+00, 0.5751200E+00, 0.5751200E+00 /
      data (ref_adm( 3,iz, 8,11),iz = 1,20) / &
     & 0.3032300E+00, 0.3032300E+00, 0.3119300E+00, 0.3085400E+00, &
     & 0.3153300E+00, 0.3086700E+00, 0.3099500E+00, 0.3189300E+00, &
     & 0.3186000E+00, 0.3282000E+00, 0.3866000E+00, 0.4097900E+00, &
     & 0.4547600E+00, 0.4977800E+00, 0.5074500E+00, 0.5587300E+00, &
     & 0.5988800E+00, 0.6065300E+00, 0.5294300E+00, 0.5294300E+00 /
      data (ref_adm( 3,iz, 9,11),iz = 1,20) / &
     & 0.2882000E+00, 0.2882000E+00, 0.2930700E+00, 0.3009000E+00, &
     & 0.2998300E+00, 0.2951500E+00, 0.3319800E+00, 0.3318800E+00, &
     & 0.3316400E+00, 0.3596600E+00, 0.3873400E+00, 0.3918000E+00, &
     & 0.4200300E+00, 0.4346200E+00, 0.4959500E+00, 0.5719400E+00, &
     & 0.5921600E+00, 0.5675100E+00, 0.5037200E+00, 0.5037200E+00 /
      data (ref_adm( 3,iz,10,11),iz = 1,20) / &
     & 0.2844800E+00, 0.2844800E+00, 0.2995500E+00, 0.3084400E+00, &
     & 0.2928800E+00, 0.3020500E+00, 0.2938900E+00, 0.3095300E+00, &
     & 0.3240700E+00, 0.3495600E+00, 0.3642100E+00, 0.3918100E+00, &
     & 0.3838900E+00, 0.4359900E+00, 0.5001600E+00, 0.5444400E+00, &
     & 0.5646000E+00, 0.5503000E+00, 0.4937700E+00, 0.4937700E+00 /
      data (ref_adm( 3,iz,11,11),iz = 1,20) / &
     & 0.3124800E+00, 0.3124800E+00, 0.2946700E+00, 0.2959400E+00, &
     & 0.2864300E+00, 0.2832800E+00, 0.3168200E+00, 0.3150300E+00, &
     & 0.3451900E+00, 0.3437700E+00, 0.3602400E+00, 0.3726400E+00, &
     & 0.4028900E+00, 0.4526900E+00, 0.4730900E+00, 0.5101900E+00, &
     & 0.5437300E+00, 0.5206600E+00, 0.4274400E+00, 0.4274400E+00 /
      data (ref_adm( 3,iz,12,11),iz = 1,20) / &
     & 0.3150400E+00, 0.3150400E+00, 0.3083400E+00, 0.2836900E+00, &
     & 0.2959600E+00, 0.3079500E+00, 0.2979000E+00, 0.3023400E+00, &
     & 0.3022900E+00, 0.3294100E+00, 0.3647000E+00, 0.3580700E+00, &
     & 0.3877100E+00, 0.4099100E+00, 0.4562200E+00, 0.5039600E+00, &
     & 0.5163300E+00, 0.5023200E+00, 0.4134600E+00, 0.4134600E+00 /
      data (ref_adm( 3,iz,13,11),iz = 1,20) / &
     & 0.2986800E+00, 0.2986800E+00, 0.2999500E+00, 0.2980300E+00, &
     & 0.3025500E+00, 0.3075200E+00, 0.3085800E+00, 0.2999600E+00, &
     & 0.3209800E+00, 0.3146500E+00, 0.3244600E+00, 0.3564200E+00, &
     & 0.3703900E+00, 0.3787400E+00, 0.4187300E+00, 0.4736300E+00, &
     & 0.4831900E+00, 0.4907600E+00, 0.4057000E+00, 0.4057000E+00 /
      data (ref_adm( 3,iz,14,11),iz = 1,20) / &
     & 0.2947900E+00, 0.2947900E+00, 0.2977700E+00, 0.2906500E+00, &
     & 0.3008400E+00, 0.3145600E+00, 0.3065900E+00, 0.3066200E+00, &
     & 0.3071100E+00, 0.3100600E+00, 0.3221400E+00, 0.3272700E+00, &
     & 0.3484000E+00, 0.3580800E+00, 0.3855400E+00, 0.4612500E+00, &
     & 0.4668600E+00, 0.4666400E+00, 0.4070800E+00, 0.4070800E+00 /
      data (ref_adm( 3,iz,15,11),iz = 1,20) / &
     & 0.3025400E+00, 0.3025400E+00, 0.3023100E+00, 0.3051100E+00, &
     & 0.3121600E+00, 0.3129900E+00, 0.3101200E+00, 0.3124400E+00, &
     & 0.3248300E+00, 0.3284400E+00, 0.3308400E+00, 0.3342700E+00, &
     & 0.3550600E+00, 0.3513400E+00, 0.4125800E+00, 0.4468100E+00, &
     & 0.4715200E+00, 0.4453500E+00, 0.3856600E+00, 0.3856600E+00 /
      data (ref_adm( 3,iz,16,11),iz = 1,20) / &
     & 0.3019800E+00, 0.3019800E+00, 0.2984600E+00, 0.3105900E+00, &
     & 0.3143700E+00, 0.3304700E+00, 0.3053900E+00, 0.3081100E+00, &
     & 0.3251300E+00, 0.3151000E+00, 0.3177900E+00, 0.3406200E+00, &
     & 0.3573700E+00, 0.3566700E+00, 0.3865800E+00, 0.4311400E+00, &
     & 0.4675700E+00, 0.4233100E+00, 0.3653400E+00, 0.3653400E+00 /
      data (ref_adm( 3,iz,17,11),iz = 1,20) / &
     & 0.3069300E+00, 0.3069300E+00, 0.2853000E+00, 0.2993600E+00, &
     & 0.3151800E+00, 0.3073900E+00, 0.3147900E+00, 0.3362800E+00, &
     & 0.3222100E+00, 0.3178400E+00, 0.3124800E+00, 0.3408600E+00, &
     & 0.3618900E+00, 0.3694500E+00, 0.4018500E+00, 0.4036300E+00, &
     & 0.4227900E+00, 0.4429500E+00, 0.3630600E+00, 0.3630600E+00 /
      data (ref_adm( 3,iz,18,11),iz = 1,20) / &
     & 0.2878900E+00, 0.2878900E+00, 0.2988700E+00, 0.3131700E+00, &
     & 0.2986100E+00, 0.2960200E+00, 0.3376500E+00, 0.3149800E+00, &
     & 0.3286200E+00, 0.3166400E+00, 0.3252700E+00, 0.3227800E+00, &
     & 0.3622500E+00, 0.3729400E+00, 0.3890900E+00, 0.4088900E+00, &
     & 0.4016400E+00, 0.3686700E+00, 0.3562661E+00, 0.3562661E+00 /
      data (ref_adm( 3,iz,19,11),iz = 1,20) / &
     & 0.3037100E+00, 0.3037100E+00, 0.3055900E+00, 0.2919300E+00, &
     & 0.2937000E+00, 0.3091700E+00, 0.3167000E+00, 0.3225200E+00, &
     & 0.3330000E+00, 0.3378200E+00, 0.3192000E+00, 0.3159800E+00, &
     & 0.3571200E+00, 0.3718100E+00, 0.3815900E+00, 0.3830000E+00, &
     & 0.4099500E+00, 0.3997243E+00, 0.3497651E+00, 0.3497651E+00 /
      data (ref_adm( 3,iz,20,11),iz = 1,20) / &
     & 0.3176800E+00, 0.3176800E+00, 0.3060600E+00, 0.3023900E+00, &
     & 0.3142500E+00, 0.3180900E+00, 0.3323200E+00, 0.3280000E+00, &
     & 0.3213700E+00, 0.3337200E+00, 0.3357100E+00, 0.3305500E+00, &
     & 0.3471100E+00, 0.3713300E+00, 0.3772400E+00, 0.3856900E+00, &
     & 0.4389500E+00, 0.3916027E+00, 0.3453636E+00, 0.3453636E+00 /
      data (ref_adm( 3,iz,21,11),iz = 1,20) / &
     & 0.3013900E+00, 0.3013900E+00, 0.3032000E+00, 0.3036300E+00, &
     & 0.3127300E+00, 0.3166500E+00, 0.3156100E+00, 0.3112000E+00, &
     & 0.3331300E+00, 0.3269200E+00, 0.3381000E+00, 0.3418800E+00, &
     & 0.3549600E+00, 0.3612200E+00, 0.3724700E+00, 0.3953800E+00, &
     & 0.3897933E+00, 0.3836598E+00, 0.3414696E+00, 0.3414696E+00 /
      data (ref_adm( 3,iz,22,11),iz = 1,20) / &
     & 0.2937700E+00, 0.2937700E+00, 0.2897700E+00, 0.3034200E+00, &
     & 0.3127700E+00, 0.3136400E+00, 0.3165000E+00, 0.2993900E+00, &
     & 0.3283800E+00, 0.3187200E+00, 0.3317300E+00, 0.3373000E+00, &
     & 0.3422900E+00, 0.3412700E+00, 0.3759800E+00, 0.3921100E+00, &
     & 0.3429866E+00, 0.3268353E+00, 0.3119593E+00, 0.3119593E+00 /
      data (ref_adm( 3,iz,23,11),iz = 1,20) / &
     & 0.3009200E+00, 0.3009200E+00, 0.3072900E+00, 0.3046100E+00, &
     & 0.3303800E+00, 0.3167700E+00, 0.3368800E+00, 0.3283700E+00, &
     & 0.3218900E+00, 0.3265900E+00, 0.3506500E+00, 0.3512800E+00, &
     & 0.3524500E+00, 0.3485300E+00, 0.3592500E+00, 0.3700500E+00, &
     & 0.2983000E+00, 0.3286046E+00, 0.3154377E+00, 0.3154377E+00 /
      data (ref_adm( 3,iz,24,11),iz = 1,20) / &
     & 0.3143400E+00, 0.3143400E+00, 0.3033100E+00, 0.3044300E+00, &
     & 0.3215300E+00, 0.3208400E+00, 0.3418200E+00, 0.3224700E+00, &
     & 0.3447100E+00, 0.3367500E+00, 0.3408300E+00, 0.3770900E+00, &
     & 0.3676500E+00, 0.3777000E+00, 0.3913200E+00, 0.3965300E+00, &
     & 0.3710100E+00, 0.3325354E+00, 0.3205386E+00, 0.3205386E+00 /
      data (ref_adm( 3,iz,25,11),iz = 1,20) / &
     & 0.3009900E+00, 0.3009900E+00, 0.3116000E+00, 0.3134400E+00, &
     & 0.3263900E+00, 0.3242100E+00, 0.3314200E+00, 0.3362900E+00, &
     & 0.3371300E+00, 0.3424600E+00, 0.3476400E+00, 0.3693900E+00, &
     & 0.3863900E+00, 0.4016000E+00, 0.4058100E+00, 0.4097000E+00, &
     & 0.3778500E+00, 0.3915400E+00, 0.3269703E+00, 0.3269703E+00 /
      data (ref_adm( 3,iz,26,11),iz = 1,20) / &
     & 0.3050900E+00, 0.3050900E+00, 0.3034000E+00, 0.3064800E+00, &
     & 0.2928300E+00, 0.2863000E+00, 0.3064000E+00, 0.3252300E+00, &
     & 0.3391100E+00, 0.3401200E+00, 0.3514300E+00, 0.3615200E+00, &
     & 0.3741500E+00, 0.3754600E+00, 0.4017200E+00, 0.4175100E+00, &
     & 0.3998400E+00, 0.3959100E+00, 0.4330400E+00, 0.4330400E+00 /
      data (ref_adm( 3,iz,27,11),iz = 1,20) / &
     & 0.3057000E+00, 0.3057000E+00, 0.3056800E+00, 0.3095800E+00, &
     & 0.3115100E+00, 0.3109300E+00, 0.3194400E+00, 0.3237500E+00, &
     & 0.3342700E+00, 0.3459600E+00, 0.3488700E+00, 0.3512800E+00, &
     & 0.3610500E+00, 0.3771700E+00, 0.4026200E+00, 0.4212600E+00, &
     & 0.4149300E+00, 0.4049800E+00, 0.3505000E+00, 0.3505000E+00 /
      data (ref_adm( 3,iz,28,11),iz = 1,20) / &
     & 0.3045100E+00, 0.3045100E+00, 0.3222800E+00, 0.3191900E+00, &
     & 0.3187900E+00, 0.3471200E+00, 0.3398600E+00, 0.3489900E+00, &
     & 0.3604900E+00, 0.3688800E+00, 0.3829300E+00, 0.3788100E+00, &
     & 0.3929200E+00, 0.3915500E+00, 0.4233100E+00, 0.4349800E+00, &
     & 0.4268400E+00, 0.4096700E+00, 0.3500400E+00, 0.3500400E+00 /
      data (ref_adm( 3,iz,29,11),iz = 1,20) / &
     & 0.3117100E+00, 0.3117100E+00, 0.3176400E+00, 0.3299600E+00, &
     & 0.3090700E+00, 0.3447300E+00, 0.3685500E+00, 0.3576700E+00, &
     & 0.3525600E+00, 0.3916200E+00, 0.3870100E+00, 0.3981400E+00, &
     & 0.4022200E+00, 0.4147200E+00, 0.4566200E+00, 0.4632500E+00, &
     & 0.4550600E+00, 0.4334400E+00, 0.3468800E+00, 0.3468800E+00 /
      data (ref_adm( 3,iz,30,11),iz = 1,20) / &
     & 0.3004800E+00, 0.3004800E+00, 0.3048100E+00, 0.3046800E+00, &
     & 0.3087300E+00, 0.3475200E+00, 0.3510500E+00, 0.3668700E+00, &
     & 0.3566400E+00, 0.3791600E+00, 0.4036200E+00, 0.4058200E+00, &
     & 0.4312200E+00, 0.4347300E+00, 0.4793500E+00, 0.4690400E+00, &
     & 0.4570500E+00, 0.4465000E+00, 0.3497300E+00, 0.3497300E+00 /
      data (ref_adm( 3,iz,31,11),iz = 1,20) / &
     & 0.3090900E+00, 0.3090900E+00, 0.3188800E+00, 0.3203400E+00, &
     & 0.3413900E+00, 0.3399800E+00, 0.3645100E+00, 0.3884500E+00, &
     & 0.3884000E+00, 0.3902300E+00, 0.4029000E+00, 0.4259500E+00, &
     & 0.4318600E+00, 0.4508800E+00, 0.4755500E+00, 0.4847000E+00, &
     & 0.4886700E+00, 0.4516400E+00, 0.3519700E+00, 0.3519700E+00 /
      data (ref_adm( 3,iz,32,11),iz = 1,20) / &
     & 0.3047400E+00, 0.3047400E+00, 0.2999100E+00, 0.3106100E+00, &
     & 0.3367300E+00, 0.3786700E+00, 0.3577700E+00, 0.3675600E+00, &
     & 0.3640900E+00, 0.3818100E+00, 0.4062300E+00, 0.4201700E+00, &
     & 0.4403800E+00, 0.4427700E+00, 0.4587700E+00, 0.4606200E+00, &
     & 0.4678200E+00, 0.4611200E+00, 0.3670400E+00, 0.3670400E+00 /
      data (ref_adm( 3,iz,33,11),iz = 1,20) / &
     & 0.2961000E+00, 0.2961000E+00, 0.3054100E+00, 0.3287000E+00, &
     & 0.3428700E+00, 0.3561700E+00, 0.3692600E+00, 0.3722800E+00, &
     & 0.3808800E+00, 0.3956800E+00, 0.4191600E+00, 0.4077100E+00, &
     & 0.4146600E+00, 0.4424900E+00, 0.4567600E+00, 0.4835400E+00, &
     & 0.4715300E+00, 0.4589100E+00, 0.3641800E+00, 0.3641800E+00 /
      data (ref_adm( 3,iz,34,11),iz = 1,20) / &
     & 0.3017000E+00, 0.3017000E+00, 0.3189000E+00, 0.3332000E+00, &
     & 0.3500200E+00, 0.3668200E+00, 0.3304800E+00, 0.3430400E+00, &
     & 0.3773400E+00, 0.3837500E+00, 0.4058600E+00, 0.4215200E+00, &
     & 0.4242300E+00, 0.4403900E+00, 0.4679700E+00, 0.4787900E+00, &
     & 0.4854700E+00, 0.4613000E+00, 0.3514000E+00, 0.3514000E+00 /
      data (ref_adm( 3,iz,35,11),iz = 1,20) / &
     & 0.3130800E+00, 0.3130800E+00, 0.3306100E+00, 0.3481400E+00, &
     & 0.3570600E+00, 0.3576400E+00, 0.3463200E+00, 0.3545500E+00, &
     & 0.3690900E+00, 0.3919400E+00, 0.4023400E+00, 0.4275200E+00, &
     & 0.4277600E+00, 0.4423300E+00, 0.4687400E+00, 0.4745900E+00, &
     & 0.4729000E+00, 0.4565300E+00, 0.3594100E+00, 0.3594100E+00 /
      data (ref_adm( 3,iz,36,11),iz = 1,20) / &
     & 0.2954900E+00, 0.2954900E+00, 0.3264100E+00, 0.3519500E+00, &
     & 0.3500900E+00, 0.3391100E+00, 0.3460900E+00, 0.3545000E+00, &
     & 0.3696100E+00, 0.3982700E+00, 0.4053200E+00, 0.4255600E+00, &
     & 0.4498400E+00, 0.4549700E+00, 0.4507900E+00, 0.4701100E+00, &
     & 0.4643900E+00, 0.4461700E+00, 0.3396500E+00, 0.3396500E+00 /
      data (ref_adm( 3,iz,37,11),iz = 1,20) / &
     & 0.2997200E+00, 0.2997200E+00, 0.3096700E+00, 0.3217400E+00, &
     & 0.3365200E+00, 0.3563800E+00, 0.3566700E+00, 0.3647600E+00, &
     & 0.3696400E+00, 0.3835100E+00, 0.4258600E+00, 0.4539800E+00, &
     & 0.4447800E+00, 0.4697800E+00, 0.4525900E+00, 0.4641900E+00, &
     & 0.4593200E+00, 0.4330800E+00, 0.4402182E+00, 0.4402182E+00 /
      data (ref_adm( 3,iz,38,11),iz = 1,20) / &
     & 0.2997200E+00, 0.2997200E+00, 0.3096700E+00, 0.3217400E+00, &
     & 0.3365200E+00, 0.3563800E+00, 0.3566700E+00, 0.3647600E+00, &
     & 0.3696400E+00, 0.3835100E+00, 0.4258600E+00, 0.4539800E+00, &
     & 0.4447800E+00, 0.4697800E+00, 0.4525900E+00, 0.4641900E+00, &
     & 0.4593200E+00, 0.4330800E+00, 0.4402182E+00, 0.4402182E+00 /
! Solar Zenith Angle 55.0 Albedo  0.3894282E+00
      data (ref_adm( 3,iz, 1,12),iz = 1,20) / &
     & 0.2938900E+00, 0.2938900E+00, 0.3061000E+00, 0.3191900E+00, &
     & 0.3062400E+00, 0.3192900E+00, 0.3378300E+00, 0.3658000E+00, &
     & 0.3888800E+00, 0.4163700E+00, 0.4529500E+00, 0.5048000E+00, &
     & 0.5586500E+00, 0.5949200E+00, 0.6587700E+00, 0.7400200E+00, &
     & 0.8325800E+00, 0.8757900E+00, 0.8105800E+00, 0.8105800E+00 /
      data (ref_adm( 3,iz, 2,12),iz = 1,20) / &
     & 0.2938900E+00, 0.2938900E+00, 0.3061000E+00, 0.3191900E+00, &
     & 0.3062400E+00, 0.3192900E+00, 0.3378300E+00, 0.3658000E+00, &
     & 0.3888800E+00, 0.4163700E+00, 0.4529500E+00, 0.5048000E+00, &
     & 0.5586500E+00, 0.5949200E+00, 0.6587700E+00, 0.7400200E+00, &
     & 0.8325800E+00, 0.8757900E+00, 0.8105800E+00, 0.8105800E+00 /
      data (ref_adm( 3,iz, 3,12),iz = 1,20) / &
     & 0.3034800E+00, 0.3034800E+00, 0.2971100E+00, 0.3004900E+00, &
     & 0.2926200E+00, 0.3380200E+00, 0.3276700E+00, 0.3545800E+00, &
     & 0.3894500E+00, 0.4024700E+00, 0.4451200E+00, 0.4814700E+00, &
     & 0.5377800E+00, 0.5809800E+00, 0.6502900E+00, 0.7409000E+00, &
     & 0.8108200E+00, 0.8791000E+00, 0.7985000E+00, 0.7985000E+00 /
      data (ref_adm( 3,iz, 4,12),iz = 1,20) / &
     & 0.2918700E+00, 0.2918700E+00, 0.2929700E+00, 0.3052900E+00, &
     & 0.3136800E+00, 0.3189200E+00, 0.3424600E+00, 0.3588100E+00, &
     & 0.3628700E+00, 0.3935500E+00, 0.4319800E+00, 0.4757000E+00, &
     & 0.5334900E+00, 0.5963900E+00, 0.6371100E+00, 0.7222300E+00, &
     & 0.8031000E+00, 0.8554400E+00, 0.7720900E+00, 0.7720900E+00 /
      data (ref_adm( 3,iz, 5,12),iz = 1,20) / &
     & 0.2898300E+00, 0.2898300E+00, 0.2879800E+00, 0.2915800E+00, &
     & 0.3028100E+00, 0.3161000E+00, 0.3318400E+00, 0.3476700E+00, &
     & 0.3655700E+00, 0.3854600E+00, 0.4331500E+00, 0.4666400E+00, &
     & 0.5193700E+00, 0.5779800E+00, 0.6373200E+00, 0.6990200E+00, &
     & 0.7795800E+00, 0.8176400E+00, 0.7351600E+00, 0.7351600E+00 /
      data (ref_adm( 3,iz, 6,12),iz = 1,20) / &
     & 0.3033000E+00, 0.3033000E+00, 0.2867500E+00, 0.3124500E+00, &
     & 0.3031100E+00, 0.3125800E+00, 0.3321300E+00, 0.3574000E+00, &
     & 0.3592700E+00, 0.3970000E+00, 0.4393700E+00, 0.4636800E+00, &
     & 0.5015600E+00, 0.5660800E+00, 0.6199300E+00, 0.6908300E+00, &
     & 0.7714900E+00, 0.7965900E+00, 0.6929800E+00, 0.6929800E+00 /
      data (ref_adm( 3,iz, 7,12),iz = 1,20) / &
     & 0.2967900E+00, 0.2967900E+00, 0.3003800E+00, 0.2970600E+00, &
     & 0.3052500E+00, 0.3029600E+00, 0.3207900E+00, 0.3395500E+00, &
     & 0.3470000E+00, 0.3813100E+00, 0.4175900E+00, 0.4602600E+00, &
     & 0.4833400E+00, 0.5369700E+00, 0.5917700E+00, 0.6719900E+00, &
     & 0.7354500E+00, 0.7402400E+00, 0.6551100E+00, 0.6551100E+00 /
      data (ref_adm( 3,iz, 8,12),iz = 1,20) / &
     & 0.2972100E+00, 0.2972100E+00, 0.2899100E+00, 0.2967000E+00, &
     & 0.2955600E+00, 0.3038900E+00, 0.3293200E+00, 0.3433900E+00, &
     & 0.3535300E+00, 0.3843700E+00, 0.3962200E+00, 0.4159800E+00, &
     & 0.4642000E+00, 0.4932400E+00, 0.5353600E+00, 0.6202900E+00, &
     & 0.6824100E+00, 0.6950400E+00, 0.6122000E+00, 0.6122000E+00 /
      data (ref_adm( 3,iz, 9,12),iz = 1,20) / &
     & 0.2821900E+00, 0.2821900E+00, 0.2904100E+00, 0.2717600E+00, &
     & 0.2825000E+00, 0.2994700E+00, 0.3179300E+00, 0.3252400E+00, &
     & 0.3566500E+00, 0.3865300E+00, 0.4082100E+00, 0.4138300E+00, &
     & 0.4558900E+00, 0.5148400E+00, 0.5359700E+00, 0.6213700E+00, &
     & 0.6576300E+00, 0.6558900E+00, 0.5459900E+00, 0.5459900E+00 /
      data (ref_adm( 3,iz,10,12),iz = 1,20) / &
     & 0.2954400E+00, 0.2954400E+00, 0.2882200E+00, 0.2771900E+00, &
     & 0.3003500E+00, 0.3034100E+00, 0.3085200E+00, 0.3249500E+00, &
     & 0.3612600E+00, 0.3744900E+00, 0.3918900E+00, 0.4098500E+00, &
     & 0.4558600E+00, 0.4811200E+00, 0.5325400E+00, 0.5986800E+00, &
     & 0.6238700E+00, 0.6111500E+00, 0.5145200E+00, 0.5145200E+00 /
      data (ref_adm( 3,iz,11,12),iz = 1,20) / &
     & 0.2989100E+00, 0.2989100E+00, 0.2899800E+00, 0.2983100E+00, &
     & 0.2970500E+00, 0.2994700E+00, 0.3255200E+00, 0.3538500E+00, &
     & 0.3485700E+00, 0.3636100E+00, 0.3941300E+00, 0.4108100E+00, &
     & 0.4205800E+00, 0.4738200E+00, 0.5077800E+00, 0.5565300E+00, &
     & 0.5888200E+00, 0.5792100E+00, 0.4851100E+00, 0.4851100E+00 /
      data (ref_adm( 3,iz,12,12),iz = 1,20) / &
     & 0.2941300E+00, 0.2941300E+00, 0.2883900E+00, 0.2958700E+00, &
     & 0.3025900E+00, 0.3151800E+00, 0.3100500E+00, 0.3185300E+00, &
     & 0.3405500E+00, 0.3430100E+00, 0.3580600E+00, 0.3827700E+00, &
     & 0.4156100E+00, 0.4299700E+00, 0.4914700E+00, 0.5435600E+00, &
     & 0.5640300E+00, 0.5352700E+00, 0.4693700E+00, 0.4693700E+00 /
      data (ref_adm( 3,iz,13,12),iz = 1,20) / &
     & 0.2888700E+00, 0.2888700E+00, 0.2811400E+00, 0.2769400E+00, &
     & 0.2799600E+00, 0.2973500E+00, 0.3065000E+00, 0.3171000E+00, &
     & 0.3379300E+00, 0.3368400E+00, 0.3552000E+00, 0.3803500E+00, &
     & 0.4034300E+00, 0.4136400E+00, 0.4654000E+00, 0.5065700E+00, &
     & 0.5246300E+00, 0.5098000E+00, 0.4361300E+00, 0.4361300E+00 /
      data (ref_adm( 3,iz,14,12),iz = 1,20) / &
     & 0.2870800E+00, 0.2870800E+00, 0.2897300E+00, 0.2937100E+00, &
     & 0.2938200E+00, 0.3004700E+00, 0.3048300E+00, 0.3090400E+00, &
     & 0.3152600E+00, 0.3174800E+00, 0.3273100E+00, 0.3409600E+00, &
     & 0.3639300E+00, 0.3776500E+00, 0.4577200E+00, 0.4847200E+00, &
     & 0.4965800E+00, 0.4775600E+00, 0.4059400E+00, 0.4059400E+00 /
      data (ref_adm( 3,iz,15,12),iz = 1,20) / &
     & 0.2985500E+00, 0.2985500E+00, 0.3015700E+00, 0.3058000E+00, &
     & 0.3073200E+00, 0.3086700E+00, 0.3175800E+00, 0.3214000E+00, &
     & 0.3303300E+00, 0.3327600E+00, 0.3386700E+00, 0.3527700E+00, &
     & 0.3650000E+00, 0.3685200E+00, 0.4185400E+00, 0.4504100E+00, &
     & 0.4891400E+00, 0.4442900E+00, 0.4954800E+00, 0.4954800E+00 /
      data (ref_adm( 3,iz,16,12),iz = 1,20) / &
     & 0.3006200E+00, 0.3006200E+00, 0.2871800E+00, 0.3162900E+00, &
     & 0.3064600E+00, 0.3117100E+00, 0.3251100E+00, 0.3391900E+00, &
     & 0.3329000E+00, 0.3316600E+00, 0.3459400E+00, 0.3569700E+00, &
     & 0.3606700E+00, 0.3721100E+00, 0.4027000E+00, 0.4452200E+00, &
     & 0.4518000E+00, 0.4362200E+00, 0.3764500E+00, 0.3764500E+00 /
      data (ref_adm( 3,iz,17,12),iz = 1,20) / &
     & 0.2960500E+00, 0.2960500E+00, 0.2953200E+00, 0.3094900E+00, &
     & 0.3138500E+00, 0.3112800E+00, 0.3219200E+00, 0.3295000E+00, &
     & 0.3302500E+00, 0.3292800E+00, 0.3450500E+00, 0.3534300E+00, &
     & 0.3610000E+00, 0.3730400E+00, 0.4008100E+00, 0.4180800E+00, &
     & 0.4575200E+00, 0.4708500E+00, 0.4246186E+00, 0.4246186E+00 /
      data (ref_adm( 3,iz,18,12),iz = 1,20) / &
     & 0.2898500E+00, 0.2898500E+00, 0.2963200E+00, 0.3115600E+00, &
     & 0.3141300E+00, 0.3245600E+00, 0.3151600E+00, 0.3332200E+00, &
     & 0.3291600E+00, 0.3373400E+00, 0.3481100E+00, 0.3533800E+00, &
     & 0.3402300E+00, 0.3748600E+00, 0.3716400E+00, 0.3951500E+00, &
     & 0.4107100E+00, 0.4424244E+00, 0.4292561E+00, 0.4292561E+00 /
      data (ref_adm( 3,iz,19,12),iz = 1,20) / &
     & 0.2923700E+00, 0.2923700E+00, 0.2922400E+00, 0.2992000E+00, &
     & 0.3192900E+00, 0.3052900E+00, 0.3201200E+00, 0.3264000E+00, &
     & 0.3332700E+00, 0.3408300E+00, 0.3447200E+00, 0.3482700E+00, &
     & 0.3387700E+00, 0.3675700E+00, 0.3876000E+00, 0.4066000E+00, &
     & 0.4053000E+00, 0.4350687E+00, 0.4211811E+00, 0.4211811E+00 /
      data (ref_adm( 3,iz,20,12),iz = 1,20) / &
     & 0.3043800E+00, 0.3043800E+00, 0.3063200E+00, 0.3066500E+00, &
     & 0.3113500E+00, 0.3133200E+00, 0.3205200E+00, 0.3215800E+00, &
     & 0.3322600E+00, 0.3470600E+00, 0.3375500E+00, 0.3474100E+00, &
     & 0.3532100E+00, 0.3565700E+00, 0.3847000E+00, 0.3927400E+00, &
     & 0.4154697E+00, 0.4299615E+00, 0.4164878E+00, 0.4164878E+00 /
      data (ref_adm( 3,iz,21,12),iz = 1,20) / &
     & 0.2942600E+00, 0.2942600E+00, 0.2919500E+00, 0.2918000E+00, &
     & 0.3031000E+00, 0.3115600E+00, 0.3114400E+00, 0.3208500E+00, &
     & 0.3388500E+00, 0.3404000E+00, 0.3461000E+00, 0.3483800E+00, &
     & 0.3609400E+00, 0.3727000E+00, 0.3789500E+00, 0.4039500E+00, &
     & 0.4120235E+00, 0.4255424E+00, 0.4136002E+00, 0.4136002E+00 /
      data (ref_adm( 3,iz,22,12),iz = 1,20) / &
     & 0.2925900E+00, 0.2925900E+00, 0.2987600E+00, 0.2932700E+00, &
     & 0.3098800E+00, 0.2964600E+00, 0.3048600E+00, 0.3314300E+00, &
     & 0.3293300E+00, 0.3551200E+00, 0.3508700E+00, 0.3583400E+00, &
     & 0.3638600E+00, 0.3698700E+00, 0.3856400E+00, 0.3641300E+00, &
     & 0.3629314E+00, 0.3498232E+00, 0.3393876E+00, 0.3393876E+00 /
      data (ref_adm( 3,iz,23,12),iz = 1,20) / &
     & 0.2950900E+00, 0.2950900E+00, 0.3010900E+00, 0.3032800E+00, &
     & 0.3101700E+00, 0.3072800E+00, 0.3127700E+00, 0.3308500E+00, &
     & 0.3352300E+00, 0.3473100E+00, 0.3527600E+00, 0.3578000E+00, &
     & 0.3624000E+00, 0.3859000E+00, 0.3993200E+00, 0.4078100E+00, &
     & 0.3293900E+00, 0.3517713E+00, 0.3436901E+00, 0.3436901E+00 /
      data (ref_adm( 3,iz,24,12),iz = 1,20) / &
     & 0.2847400E+00, 0.2847400E+00, 0.2949600E+00, 0.3101800E+00, &
     & 0.3094600E+00, 0.3133400E+00, 0.3255800E+00, 0.3231400E+00, &
     & 0.3528800E+00, 0.3422900E+00, 0.3584300E+00, 0.3755300E+00, &
     & 0.3760800E+00, 0.3893100E+00, 0.3985200E+00, 0.3971900E+00, &
     & 0.4020400E+00, 0.3564601E+00, 0.3500916E+00, 0.3500916E+00 /
      data (ref_adm( 3,iz,25,12),iz = 1,20) / &
     & 0.3005100E+00, 0.3005100E+00, 0.3064500E+00, 0.3054400E+00, &
     & 0.3073600E+00, 0.3141300E+00, 0.3196600E+00, 0.3233000E+00, &
     & 0.3328000E+00, 0.3404100E+00, 0.3489100E+00, 0.3672800E+00, &
     & 0.3809600E+00, 0.3980800E+00, 0.3973800E+00, 0.4158100E+00, &
     & 0.4229200E+00, 0.4170000E+00, 0.3582205E+00, 0.3582205E+00 /
      data (ref_adm( 3,iz,26,12),iz = 1,20) / &
     & 0.2915800E+00, 0.2915800E+00, 0.2854800E+00, 0.2967800E+00, &
     & 0.3042900E+00, 0.2974400E+00, 0.3100800E+00, 0.3101100E+00, &
     & 0.3223300E+00, 0.3157800E+00, 0.3331700E+00, 0.3535500E+00, &
     & 0.3681800E+00, 0.3794500E+00, 0.3972400E+00, 0.4337300E+00, &
     & 0.4238200E+00, 0.4170100E+00, 0.4300600E+00, 0.4300600E+00 /
      data (ref_adm( 3,iz,27,12),iz = 1,20) / &
     & 0.2937100E+00, 0.2937100E+00, 0.3056500E+00, 0.3072900E+00, &
     & 0.3097600E+00, 0.3238500E+00, 0.3265600E+00, 0.3235000E+00, &
     & 0.3330200E+00, 0.3447100E+00, 0.3554300E+00, 0.3528300E+00, &
     & 0.3676900E+00, 0.3697400E+00, 0.4088500E+00, 0.4300600E+00, &
     & 0.4392800E+00, 0.4295100E+00, 0.3650300E+00, 0.3650300E+00 /
      data (ref_adm( 3,iz,28,12),iz = 1,20) / &
     & 0.2968800E+00, 0.2968800E+00, 0.2861700E+00, 0.3011500E+00, &
     & 0.3092000E+00, 0.3362100E+00, 0.3288200E+00, 0.3349000E+00, &
     & 0.3597300E+00, 0.3891700E+00, 0.3931200E+00, 0.3992900E+00, &
     & 0.4084100E+00, 0.4084900E+00, 0.4404900E+00, 0.4611800E+00, &
     & 0.4515600E+00, 0.4410400E+00, 0.3755100E+00, 0.3755100E+00 /
      data (ref_adm( 3,iz,29,12),iz = 1,20) / &
     & 0.2954900E+00, 0.2954900E+00, 0.2979300E+00, 0.3027300E+00, &
     & 0.3099700E+00, 0.3143900E+00, 0.3363000E+00, 0.3463100E+00, &
     & 0.3564300E+00, 0.3676500E+00, 0.3950900E+00, 0.4055400E+00, &
     & 0.4172200E+00, 0.4465600E+00, 0.4722500E+00, 0.4868800E+00, &
     & 0.4803400E+00, 0.4461700E+00, 0.3847600E+00, 0.3847600E+00 /
      data (ref_adm( 3,iz,30,12),iz = 1,20) / &
     & 0.2994100E+00, 0.2994100E+00, 0.2880200E+00, 0.2954600E+00, &
     & 0.3303000E+00, 0.3547500E+00, 0.3458700E+00, 0.3572200E+00, &
     & 0.3494700E+00, 0.3672100E+00, 0.3773200E+00, 0.3977500E+00, &
     & 0.4323400E+00, 0.4519000E+00, 0.4676200E+00, 0.4957700E+00, &
     & 0.4892900E+00, 0.4626800E+00, 0.3821000E+00, 0.3821000E+00 /
      data (ref_adm( 3,iz,31,12),iz = 1,20) / &
     & 0.3057900E+00, 0.3057900E+00, 0.3130100E+00, 0.3069600E+00, &
     & 0.3219300E+00, 0.3263000E+00, 0.3602500E+00, 0.3396900E+00, &
     & 0.3647000E+00, 0.3658500E+00, 0.3885300E+00, 0.4128900E+00, &
     & 0.4250700E+00, 0.4495500E+00, 0.4715200E+00, 0.4989300E+00, &
     & 0.5073200E+00, 0.4864600E+00, 0.3967400E+00, 0.3967400E+00 /
      data (ref_adm( 3,iz,32,12),iz = 1,20) / &
     & 0.2955100E+00, 0.2955100E+00, 0.2958600E+00, 0.3096600E+00, &
     & 0.3175100E+00, 0.3310400E+00, 0.3442700E+00, 0.3470000E+00, &
     & 0.3653300E+00, 0.3740800E+00, 0.3957100E+00, 0.4187700E+00, &
     & 0.4319000E+00, 0.4622600E+00, 0.4796500E+00, 0.4983500E+00, &
     & 0.5087900E+00, 0.5016100E+00, 0.4035200E+00, 0.4035200E+00 /
      data (ref_adm( 3,iz,33,12),iz = 1,20) / &
     & 0.2957400E+00, 0.2957400E+00, 0.3036000E+00, 0.3086900E+00, &
     & 0.3195500E+00, 0.3337000E+00, 0.3516500E+00, 0.3616800E+00, &
     & 0.3656500E+00, 0.3962300E+00, 0.4062800E+00, 0.4301300E+00, &
     & 0.4449800E+00, 0.4616000E+00, 0.4847000E+00, 0.5002500E+00, &
     & 0.4995700E+00, 0.4884500E+00, 0.4003600E+00, 0.4003600E+00 /
      data (ref_adm( 3,iz,34,12),iz = 1,20) / &
     & 0.2982500E+00, 0.2982500E+00, 0.3009400E+00, 0.3064900E+00, &
     & 0.3318600E+00, 0.3404100E+00, 0.3582500E+00, 0.3804000E+00, &
     & 0.3918600E+00, 0.3972600E+00, 0.4107200E+00, 0.4274800E+00, &
     & 0.4597500E+00, 0.4628600E+00, 0.4742400E+00, 0.4889600E+00, &
     & 0.5047200E+00, 0.4908200E+00, 0.3938400E+00, 0.3938400E+00 /
      data (ref_adm( 3,iz,35,12),iz = 1,20) / &
     & 0.2946900E+00, 0.2946900E+00, 0.3170800E+00, 0.3124700E+00, &
     & 0.3287800E+00, 0.3367700E+00, 0.3611400E+00, 0.3774000E+00, &
     & 0.3853900E+00, 0.3912200E+00, 0.4106100E+00, 0.4300200E+00, &
     & 0.4467400E+00, 0.4700800E+00, 0.4724400E+00, 0.4869500E+00, &
     & 0.4915300E+00, 0.4858500E+00, 0.3861100E+00, 0.3861100E+00 /
      data (ref_adm( 3,iz,36,12),iz = 1,20) / &
     & 0.2990000E+00, 0.2990000E+00, 0.3012000E+00, 0.3294000E+00, &
     & 0.3517100E+00, 0.3574400E+00, 0.3799600E+00, 0.3695700E+00, &
     & 0.3741000E+00, 0.3925900E+00, 0.4130400E+00, 0.4484800E+00, &
     & 0.4583700E+00, 0.4768100E+00, 0.4960700E+00, 0.4977200E+00, &
     & 0.4975400E+00, 0.4861400E+00, 0.3828500E+00, 0.3828500E+00 /
      data (ref_adm( 3,iz,37,12),iz = 1,20) / &
     & 0.3025400E+00, 0.3025400E+00, 0.3197000E+00, 0.3423400E+00, &
     & 0.3378800E+00, 0.3620300E+00, 0.3538200E+00, 0.3619900E+00, &
     & 0.3873100E+00, 0.4092400E+00, 0.4216300E+00, 0.4445200E+00, &
     & 0.4830000E+00, 0.4913800E+00, 0.4814700E+00, 0.4993400E+00, &
     & 0.4971500E+00, 0.4915900E+00, 0.4579700E+00, 0.4579700E+00 /
      data (ref_adm( 3,iz,38,12),iz = 1,20) / &
     & 0.3025400E+00, 0.3025400E+00, 0.3197000E+00, 0.3423400E+00, &
     & 0.3378800E+00, 0.3620300E+00, 0.3538200E+00, 0.3619900E+00, &
     & 0.3873100E+00, 0.4092400E+00, 0.4216300E+00, 0.4445200E+00, &
     & 0.4830000E+00, 0.4913800E+00, 0.4814700E+00, 0.4993400E+00, &
     & 0.4971500E+00, 0.4915900E+00, 0.4579700E+00, 0.4579700E+00 /
! Solar Zenith Angle 60.0 Albedo  0.4094311E+00
      data (ref_adm( 3,iz, 1,13),iz = 1,20) / &
     & 0.3227600E+00, 0.3227600E+00, 0.3040100E+00, 0.3214600E+00, &
     & 0.3053900E+00, 0.3257700E+00, 0.3376500E+00, 0.3767800E+00, &
     & 0.4114500E+00, 0.4543900E+00, 0.4886200E+00, 0.5367100E+00, &
     & 0.6069100E+00, 0.7293300E+00, 0.8340600E+00, 0.9453000E+00, &
     & 0.1082300E+01, 0.1136300E+01, 0.9991300E+00, 0.9991300E+00 /
      data (ref_adm( 3,iz, 2,13),iz = 1,20) / &
     & 0.3227600E+00, 0.3227600E+00, 0.3040100E+00, 0.3214600E+00, &
     & 0.3053900E+00, 0.3257700E+00, 0.3376500E+00, 0.3767800E+00, &
     & 0.4114500E+00, 0.4543900E+00, 0.4886200E+00, 0.5367100E+00, &
     & 0.6069100E+00, 0.7293300E+00, 0.8340600E+00, 0.9453000E+00, &
     & 0.1082300E+01, 0.1136300E+01, 0.9991300E+00, 0.9991300E+00 /
      data (ref_adm( 3,iz, 3,13),iz = 1,20) / &
     & 0.3086400E+00, 0.3086400E+00, 0.3004900E+00, 0.3055400E+00, &
     & 0.3197200E+00, 0.3277300E+00, 0.3413700E+00, 0.3679500E+00, &
     & 0.4097500E+00, 0.4342900E+00, 0.4809300E+00, 0.5303600E+00, &
     & 0.6088400E+00, 0.7088800E+00, 0.7784800E+00, 0.8915800E+00, &
     & 0.1018500E+01, 0.1116400E+01, 0.9472500E+00, 0.9472500E+00 /
      data (ref_adm( 3,iz, 4,13),iz = 1,20) / &
     & 0.2988800E+00, 0.2988800E+00, 0.3061200E+00, 0.3184400E+00, &
     & 0.3375400E+00, 0.3426800E+00, 0.3450500E+00, 0.3677400E+00, &
     & 0.3897700E+00, 0.4313000E+00, 0.4697000E+00, 0.5339600E+00, &
     & 0.5800500E+00, 0.6840900E+00, 0.7644700E+00, 0.8753700E+00, &
     & 0.1003700E+01, 0.1084900E+01, 0.9144300E+00, 0.9144300E+00 /
      data (ref_adm( 3,iz, 5,13),iz = 1,20) / &
     & 0.2919500E+00, 0.2919500E+00, 0.3064100E+00, 0.3140300E+00, &
     & 0.3363900E+00, 0.3448100E+00, 0.3517800E+00, 0.3593100E+00, &
     & 0.3882800E+00, 0.4248000E+00, 0.4632400E+00, 0.5140700E+00, &
     & 0.5608000E+00, 0.6553700E+00, 0.7420500E+00, 0.8367900E+00, &
     & 0.9342200E+00, 0.1013300E+01, 0.8850300E+00, 0.8850300E+00 /
      data (ref_adm( 3,iz, 6,13),iz = 1,20) / &
     & 0.2919300E+00, 0.2919300E+00, 0.2910200E+00, 0.2980100E+00, &
     & 0.3003600E+00, 0.3318400E+00, 0.3477600E+00, 0.3692400E+00, &
     & 0.3870600E+00, 0.4201300E+00, 0.4641200E+00, 0.5169700E+00, &
     & 0.5809400E+00, 0.6640100E+00, 0.7400500E+00, 0.8400400E+00, &
     & 0.9433700E+00, 0.9617500E+00, 0.8448600E+00, 0.8448600E+00 /
      data (ref_adm( 3,iz, 7,13),iz = 1,20) / &
     & 0.2867500E+00, 0.2867500E+00, 0.2820000E+00, 0.2971300E+00, &
     & 0.3090100E+00, 0.3270200E+00, 0.3447300E+00, 0.3624200E+00, &
     & 0.3809200E+00, 0.4109900E+00, 0.4410000E+00, 0.4707400E+00, &
     & 0.5273200E+00, 0.6033300E+00, 0.6475400E+00, 0.7387700E+00, &
     & 0.8689600E+00, 0.8844300E+00, 0.8017700E+00, 0.8017700E+00 /
      data (ref_adm( 3,iz, 8,13),iz = 1,20) / &
     & 0.2885800E+00, 0.2885800E+00, 0.2913100E+00, 0.2762000E+00, &
     & 0.3059600E+00, 0.3117500E+00, 0.3260900E+00, 0.3504700E+00, &
     & 0.3717000E+00, 0.4003700E+00, 0.4478600E+00, 0.4749500E+00, &
     & 0.5250300E+00, 0.5986400E+00, 0.6534900E+00, 0.7555600E+00, &
     & 0.8383800E+00, 0.8333400E+00, 0.7202200E+00, 0.7202200E+00 /
      data (ref_adm( 3,iz, 9,13),iz = 1,20) / &
     & 0.2856300E+00, 0.2856300E+00, 0.2799200E+00, 0.2837000E+00, &
     & 0.2952800E+00, 0.3112600E+00, 0.3325800E+00, 0.3461900E+00, &
     & 0.3871600E+00, 0.3847800E+00, 0.4294900E+00, 0.4493800E+00, &
     & 0.5006700E+00, 0.5483800E+00, 0.6135900E+00, 0.7067700E+00, &
     & 0.7802000E+00, 0.7644200E+00, 0.6531900E+00, 0.6531900E+00 /
      data (ref_adm( 3,iz,10,13),iz = 1,20) / &
     & 0.2903900E+00, 0.2903900E+00, 0.2993500E+00, 0.2945400E+00, &
     & 0.2987700E+00, 0.3031700E+00, 0.3320800E+00, 0.3512100E+00, &
     & 0.3637700E+00, 0.3881200E+00, 0.4138400E+00, 0.4380700E+00, &
     & 0.4869500E+00, 0.5261200E+00, 0.5936500E+00, 0.6540800E+00, &
     & 0.7192300E+00, 0.7009000E+00, 0.5927200E+00, 0.5927200E+00 /
      data (ref_adm( 3,iz,11,13),iz = 1,20) / &
     & 0.3061500E+00, 0.3061500E+00, 0.3046700E+00, 0.2838200E+00, &
     & 0.3004900E+00, 0.3182700E+00, 0.3003400E+00, 0.3241700E+00, &
     & 0.3592200E+00, 0.3781000E+00, 0.4003300E+00, 0.4257200E+00, &
     & 0.4834400E+00, 0.4978100E+00, 0.5549400E+00, 0.6124300E+00, &
     & 0.6578700E+00, 0.6503000E+00, 0.5521200E+00, 0.5521200E+00 /
      data (ref_adm( 3,iz,12,13),iz = 1,20) / &
     & 0.2871400E+00, 0.2871400E+00, 0.2874900E+00, 0.3065700E+00, &
     & 0.3090100E+00, 0.3048300E+00, 0.2998700E+00, 0.3349400E+00, &
     & 0.3646900E+00, 0.3658000E+00, 0.3836800E+00, 0.4083500E+00, &
     & 0.4376500E+00, 0.4632000E+00, 0.5241900E+00, 0.5775300E+00, &
     & 0.6201700E+00, 0.6005900E+00, 0.5211600E+00, 0.5211600E+00 /
      data (ref_adm( 3,iz,13,13),iz = 1,20) / &
     & 0.2974800E+00, 0.2974800E+00, 0.2928100E+00, 0.2959500E+00, &
     & 0.3114400E+00, 0.3038100E+00, 0.2992400E+00, 0.3200700E+00, &
     & 0.3406400E+00, 0.3658000E+00, 0.3906600E+00, 0.4025900E+00, &
     & 0.4214900E+00, 0.4586300E+00, 0.5009500E+00, 0.5540300E+00, &
     & 0.5863200E+00, 0.5539200E+00, 0.4625500E+00, 0.4625500E+00 /
      data (ref_adm( 3,iz,14,13),iz = 1,20) / &
     & 0.2933800E+00, 0.2933800E+00, 0.3012000E+00, 0.3038300E+00, &
     & 0.3050700E+00, 0.3078200E+00, 0.3170900E+00, 0.3211600E+00, &
     & 0.3351200E+00, 0.3483200E+00, 0.3491600E+00, 0.3699600E+00, &
     & 0.3944900E+00, 0.4185900E+00, 0.4729900E+00, 0.5223200E+00, &
     & 0.5448000E+00, 0.5239600E+00, 0.4421800E+00, 0.4421800E+00 /
      data (ref_adm( 3,iz,15,13),iz = 1,20) / &
     & 0.2975000E+00, 0.2975000E+00, 0.2973300E+00, 0.3003900E+00, &
     & 0.3029000E+00, 0.3100300E+00, 0.3173800E+00, 0.3220700E+00, &
     & 0.3353500E+00, 0.3400600E+00, 0.3593200E+00, 0.3771100E+00, &
     & 0.3970700E+00, 0.4162800E+00, 0.4528800E+00, 0.5042100E+00, &
     & 0.5122500E+00, 0.5142300E+00, 0.4096000E+00, 0.4096000E+00 /
      data (ref_adm( 3,iz,16,13),iz = 1,20) / &
     & 0.2949000E+00, 0.2949000E+00, 0.2963900E+00, 0.3051600E+00, &
     & 0.3123600E+00, 0.3096200E+00, 0.3086600E+00, 0.3269600E+00, &
     & 0.3287500E+00, 0.3386600E+00, 0.3566500E+00, 0.3621300E+00, &
     & 0.3748600E+00, 0.3891200E+00, 0.4511000E+00, 0.4627200E+00, &
     & 0.4815600E+00, 0.4653500E+00, 0.4870429E+00, 0.4870429E+00 /
      data (ref_adm( 3,iz,17,13),iz = 1,20) / &
     & 0.2980400E+00, 0.2980400E+00, 0.3045400E+00, 0.3030300E+00, &
     & 0.3014200E+00, 0.3032400E+00, 0.3235500E+00, 0.3361300E+00, &
     & 0.3371700E+00, 0.3417700E+00, 0.3612500E+00, 0.3699800E+00, &
     & 0.3821700E+00, 0.4120300E+00, 0.4367000E+00, 0.4506300E+00, &
     & 0.4409400E+00, 0.3603600E+00, 0.4712364E+00, 0.4712364E+00 /
      data (ref_adm( 3,iz,18,13),iz = 1,20) / &
     & 0.2970100E+00, 0.2970100E+00, 0.2910000E+00, 0.2948600E+00, &
     & 0.3134800E+00, 0.3078300E+00, 0.3191100E+00, 0.3213600E+00, &
     & 0.3222600E+00, 0.3434000E+00, 0.3593900E+00, 0.3584100E+00, &
     & 0.3678900E+00, 0.3848600E+00, 0.3991400E+00, 0.4402200E+00, &
     & 0.4165900E+00, 0.4530318E+00, 0.4009121E+00, 0.4009121E+00 /
      data (ref_adm( 3,iz,19,13),iz = 1,20) / &
     & 0.2923200E+00, 0.2923200E+00, 0.3013800E+00, 0.2898800E+00, &
     & 0.3063400E+00, 0.3083300E+00, 0.3187700E+00, 0.3242700E+00, &
     & 0.3281600E+00, 0.3548500E+00, 0.3581000E+00, 0.3636000E+00, &
     & 0.3708400E+00, 0.3771600E+00, 0.3926700E+00, 0.4100400E+00, &
     & 0.3880500E+00, 0.4419541E+00, 0.3925187E+00, 0.3925187E+00 /
      data (ref_adm( 3,iz,20,13),iz = 1,20) / &
     & 0.2849500E+00, 0.2849500E+00, 0.3021800E+00, 0.2860800E+00, &
     & 0.2895800E+00, 0.3124500E+00, 0.3087600E+00, 0.3217100E+00, &
     & 0.3366200E+00, 0.3367500E+00, 0.3578300E+00, 0.3741700E+00, &
     & 0.3637500E+00, 0.3645200E+00, 0.3865100E+00, 0.4012500E+00, &
     & 0.4325985E+00, 0.4321104E+00, 0.3868013E+00, 0.3868013E+00 /
      data (ref_adm( 3,iz,21,13),iz = 1,20) / &
     & 0.2968600E+00, 0.2968600E+00, 0.3047200E+00, 0.2883400E+00, &
     & 0.3005300E+00, 0.3002300E+00, 0.3275000E+00, 0.3282900E+00, &
     & 0.3312800E+00, 0.3372800E+00, 0.3602600E+00, 0.3711900E+00, &
     & 0.3777500E+00, 0.3740600E+00, 0.3949200E+00, 0.4305600E+00, &
     & 0.4233955E+00, 0.4221188E+00, 0.3822321E+00, 0.3822321E+00 /
      data (ref_adm( 3,iz,22,13),iz = 1,20) / &
     & 0.2856400E+00, 0.2856400E+00, 0.3030400E+00, 0.3109900E+00, &
     & 0.3026700E+00, 0.3086600E+00, 0.3264100E+00, 0.3240900E+00, &
     & 0.3339200E+00, 0.3424200E+00, 0.3627000E+00, 0.3663400E+00, &
     & 0.3873000E+00, 0.3804900E+00, 0.3999000E+00, 0.4394400E+00, &
     & 0.3818745E+00, 0.3703007E+00, 0.3574441E+00, 0.3574441E+00 /
      data (ref_adm( 3,iz,23,13),iz = 1,20) / &
     & 0.3057800E+00, 0.3057800E+00, 0.3059800E+00, 0.3047000E+00, &
     & 0.3080800E+00, 0.3171600E+00, 0.3241400E+00, 0.3335700E+00, &
     & 0.3303200E+00, 0.3389100E+00, 0.3656000E+00, 0.3698900E+00, &
     & 0.3830500E+00, 0.3862500E+00, 0.3877300E+00, 0.3970100E+00, &
     & 0.4749900E+00, 0.3713616E+00, 0.3616591E+00, 0.3616591E+00 /
      data (ref_adm( 3,iz,24,13),iz = 1,20) / &
     & 0.2970300E+00, 0.2970300E+00, 0.2994300E+00, 0.3018300E+00, &
     & 0.3050200E+00, 0.3112100E+00, 0.3206900E+00, 0.3229900E+00, &
     & 0.3182900E+00, 0.3286400E+00, 0.3584000E+00, 0.3565000E+00, &
     & 0.3726700E+00, 0.3930800E+00, 0.4004900E+00, 0.4198500E+00, &
     & 0.4026100E+00, 0.3753591E+00, 0.3681652E+00, 0.3681652E+00 /
      data (ref_adm( 3,iz,25,13),iz = 1,20) / &
     & 0.2970000E+00, 0.2970000E+00, 0.3057400E+00, 0.3109800E+00, &
     & 0.3143200E+00, 0.3156100E+00, 0.3206000E+00, 0.3275200E+00, &
     & 0.3359900E+00, 0.3442100E+00, 0.3549600E+00, 0.3700100E+00, &
     & 0.3753500E+00, 0.3912400E+00, 0.4004900E+00, 0.4153200E+00, &
     & 0.4237900E+00, 0.3678300E+00, 0.3765573E+00, 0.3765573E+00 /
      data (ref_adm( 3,iz,26,13),iz = 1,20) / &
     & 0.2959900E+00, 0.2959900E+00, 0.2992600E+00, 0.2933400E+00, &
     & 0.2911000E+00, 0.3117300E+00, 0.3151400E+00, 0.3158300E+00, &
     & 0.3252700E+00, 0.3345900E+00, 0.3496200E+00, 0.3595400E+00, &
     & 0.3714900E+00, 0.3881300E+00, 0.4057800E+00, 0.4428400E+00, &
     & 0.4581600E+00, 0.4496600E+00, 0.3872939E+00, 0.3872939E+00 /
      data (ref_adm( 3,iz,27,13),iz = 1,20) / &
     & 0.2986600E+00, 0.2986600E+00, 0.3043800E+00, 0.3009500E+00, &
     & 0.3010200E+00, 0.3133500E+00, 0.3356400E+00, 0.3431100E+00, &
     & 0.3556100E+00, 0.3471800E+00, 0.3615600E+00, 0.3622500E+00, &
     & 0.3798900E+00, 0.3947800E+00, 0.4187500E+00, 0.4488700E+00, &
     & 0.4641400E+00, 0.4535800E+00, 0.3978000E+00, 0.3978000E+00 /
      data (ref_adm( 3,iz,28,13),iz = 1,20) / &
     & 0.2947800E+00, 0.2947800E+00, 0.2982700E+00, 0.2981300E+00, &
     & 0.3065200E+00, 0.3065600E+00, 0.3260200E+00, 0.3421000E+00, &
     & 0.3637000E+00, 0.3662300E+00, 0.3930100E+00, 0.4036300E+00, &
     & 0.4302000E+00, 0.4466800E+00, 0.4614600E+00, 0.4772500E+00, &
     & 0.4791400E+00, 0.4633100E+00, 0.4046900E+00, 0.4046900E+00 /
      data (ref_adm( 3,iz,29,13),iz = 1,20) / &
     & 0.2923000E+00, 0.2923000E+00, 0.2892100E+00, 0.2924000E+00, &
     & 0.3136900E+00, 0.3213000E+00, 0.3300400E+00, 0.3553000E+00, &
     & 0.3814400E+00, 0.3987300E+00, 0.4028100E+00, 0.4179200E+00, &
     & 0.4395100E+00, 0.4567900E+00, 0.4833900E+00, 0.5069900E+00, &
     & 0.4960500E+00, 0.4878800E+00, 0.4068400E+00, 0.4068400E+00 /
      data (ref_adm( 3,iz,30,13),iz = 1,20) / &
     & 0.2909900E+00, 0.2909900E+00, 0.2982900E+00, 0.2970200E+00, &
     & 0.3014300E+00, 0.3214700E+00, 0.3322300E+00, 0.3627300E+00, &
     & 0.3803900E+00, 0.4039200E+00, 0.4188400E+00, 0.4226400E+00, &
     & 0.4485500E+00, 0.4620400E+00, 0.4912000E+00, 0.5183400E+00, &
     & 0.5206700E+00, 0.5118600E+00, 0.4229800E+00, 0.4229800E+00 /
      data (ref_adm( 3,iz,31,13),iz = 1,20) / &
     & 0.2914100E+00, 0.2914100E+00, 0.2974700E+00, 0.3109600E+00, &
     & 0.3039600E+00, 0.3263500E+00, 0.3350200E+00, 0.3627600E+00, &
     & 0.3666600E+00, 0.3859800E+00, 0.4188300E+00, 0.4207000E+00, &
     & 0.4349600E+00, 0.4561400E+00, 0.4888900E+00, 0.5267600E+00, &
     & 0.5351700E+00, 0.5254500E+00, 0.4322900E+00, 0.4322900E+00 /
      data (ref_adm( 3,iz,32,13),iz = 1,20) / &
     & 0.2957000E+00, 0.2957000E+00, 0.2927700E+00, 0.2947200E+00, &
     & 0.3118200E+00, 0.3364300E+00, 0.3452300E+00, 0.3576300E+00, &
     & 0.3616700E+00, 0.3897100E+00, 0.4072800E+00, 0.4224700E+00, &
     & 0.4469600E+00, 0.4597600E+00, 0.4907900E+00, 0.5315300E+00, &
     & 0.5460700E+00, 0.5328600E+00, 0.4507200E+00, 0.4507200E+00 /
      data (ref_adm( 3,iz,33,13),iz = 1,20) / &
     & 0.2932000E+00, 0.2932000E+00, 0.2858500E+00, 0.3083400E+00, &
     & 0.3192100E+00, 0.3327400E+00, 0.3510400E+00, 0.3645500E+00, &
     & 0.3732200E+00, 0.3934700E+00, 0.4118700E+00, 0.4334100E+00, &
     & 0.4580500E+00, 0.4893300E+00, 0.5129100E+00, 0.5343900E+00, &
     & 0.5421800E+00, 0.5270600E+00, 0.4366100E+00, 0.4366100E+00 /
      data (ref_adm( 3,iz,34,13),iz = 1,20) / &
     & 0.3078200E+00, 0.3078200E+00, 0.3057800E+00, 0.3100500E+00, &
     & 0.3374000E+00, 0.3470400E+00, 0.3689600E+00, 0.3521100E+00, &
     & 0.3759300E+00, 0.4016100E+00, 0.4089000E+00, 0.4400700E+00, &
     & 0.4587300E+00, 0.4833300E+00, 0.5032800E+00, 0.5233600E+00, &
     & 0.5348400E+00, 0.5299200E+00, 0.4303900E+00, 0.4303900E+00 /
      data (ref_adm( 3,iz,35,13),iz = 1,20) / &
     & 0.3081800E+00, 0.3081800E+00, 0.3158500E+00, 0.3029700E+00, &
     & 0.3258200E+00, 0.3615300E+00, 0.3644000E+00, 0.3681400E+00, &
     & 0.3794200E+00, 0.4160800E+00, 0.4225000E+00, 0.4407700E+00, &
     & 0.4831100E+00, 0.4902600E+00, 0.5168000E+00, 0.5252600E+00, &
     & 0.5448200E+00, 0.5246600E+00, 0.4362900E+00, 0.4362900E+00 /
      data (ref_adm( 3,iz,36,13),iz = 1,20) / &
     & 0.3143800E+00, 0.3143800E+00, 0.3062300E+00, 0.3025400E+00, &
     & 0.3171400E+00, 0.3612700E+00, 0.3748200E+00, 0.3733300E+00, &
     & 0.3845700E+00, 0.4106300E+00, 0.4186600E+00, 0.4580500E+00, &
     & 0.4829900E+00, 0.5039000E+00, 0.5194300E+00, 0.5300000E+00, &
     & 0.5335700E+00, 0.5229600E+00, 0.4311100E+00, 0.4311100E+00 /
      data (ref_adm( 3,iz,37,13),iz = 1,20) / &
     & 0.3078700E+00, 0.3078700E+00, 0.3152900E+00, 0.3087000E+00, &
     & 0.3295600E+00, 0.3514400E+00, 0.3730500E+00, 0.3768700E+00, &
     & 0.3974900E+00, 0.4098800E+00, 0.4325700E+00, 0.4540500E+00, &
     & 0.5013600E+00, 0.5275200E+00, 0.5209700E+00, 0.5405700E+00, &
     & 0.5394500E+00, 0.5294400E+00, 0.4202100E+00, 0.4202100E+00 /
      data (ref_adm( 3,iz,38,13),iz = 1,20) / &
     & 0.3078700E+00, 0.3078700E+00, 0.3152900E+00, 0.3087000E+00, &
     & 0.3295600E+00, 0.3514400E+00, 0.3730500E+00, 0.3768700E+00, &
     & 0.3974900E+00, 0.4098800E+00, 0.4325700E+00, 0.4540500E+00, &
     & 0.5013600E+00, 0.5275200E+00, 0.5209700E+00, 0.5405700E+00, &
     & 0.5394500E+00, 0.5294400E+00, 0.4202100E+00, 0.4202100E+00 /
! Solar Zenith Angle 65.0 Albedo  0.4321052E+00
      data (ref_adm( 3,iz, 1,14),iz = 1,20) / &
     & 0.3118300E+00, 0.3118300E+00, 0.3191500E+00, 0.3058700E+00, &
     & 0.3184100E+00, 0.3337200E+00, 0.3437700E+00, 0.3929700E+00, &
     & 0.4207900E+00, 0.4709300E+00, 0.5234800E+00, 0.6094800E+00, &
     & 0.6932200E+00, 0.8690300E+00, 0.1038300E+01, 0.1194700E+01, &
     & 0.1300100E+01, 0.1407600E+01, 0.9798076E+00, 0.9798076E+00 /
      data (ref_adm( 3,iz, 2,14),iz = 1,20) / &
     & 0.3118300E+00, 0.3118300E+00, 0.3191500E+00, 0.3058700E+00, &
     & 0.3184100E+00, 0.3337200E+00, 0.3437700E+00, 0.3929700E+00, &
     & 0.4207900E+00, 0.4709300E+00, 0.5234800E+00, 0.6094800E+00, &
     & 0.6932200E+00, 0.8690300E+00, 0.1038300E+01, 0.1194700E+01, &
     & 0.1300100E+01, 0.1407600E+01, 0.9798076E+00, 0.9798076E+00 /
      data (ref_adm( 3,iz, 3,14),iz = 1,20) / &
     & 0.2910700E+00, 0.2910700E+00, 0.2932100E+00, 0.2998900E+00, &
     & 0.3314400E+00, 0.3212100E+00, 0.3532600E+00, 0.3768800E+00, &
     & 0.4214000E+00, 0.4580500E+00, 0.5234600E+00, 0.6097800E+00, &
     & 0.6900600E+00, 0.8008000E+00, 0.9514600E+00, 0.1131000E+01, &
     & 0.1256000E+01, 0.1329200E+01, 0.9078065E-01, 0.9078065E-01 /
      data (ref_adm( 3,iz, 4,14),iz = 1,20) / &
     & 0.3015600E+00, 0.3015600E+00, 0.2989200E+00, 0.3083900E+00, &
     & 0.3151800E+00, 0.3254400E+00, 0.3487800E+00, 0.3722300E+00, &
     & 0.4047200E+00, 0.4376600E+00, 0.4945400E+00, 0.5947500E+00, &
     & 0.6927400E+00, 0.7893900E+00, 0.9047800E+00, 0.1091000E+01, &
     & 0.1208600E+01, 0.1214800E+01, 0.9251989E+00, 0.9251989E+00 /
      data (ref_adm( 3,iz, 5,14),iz = 1,20) / &
     & 0.3102600E+00, 0.3102600E+00, 0.3082100E+00, 0.3176200E+00, &
     & 0.3320900E+00, 0.3407900E+00, 0.3650000E+00, 0.3888100E+00, &
     & 0.3989900E+00, 0.4437100E+00, 0.4938500E+00, 0.5542100E+00, &
     & 0.6541300E+00, 0.7542700E+00, 0.8558600E+00, 0.1022000E+01, &
     & 0.1160100E+01, 0.1188100E+01, 0.8768665E+00, 0.8768665E+00 /
      data (ref_adm( 3,iz, 6,14),iz = 1,20) / &
     & 0.2898300E+00, 0.2898300E+00, 0.3057400E+00, 0.3033400E+00, &
     & 0.3190800E+00, 0.3338000E+00, 0.3624600E+00, 0.3889800E+00, &
     & 0.4213600E+00, 0.4527400E+00, 0.5171700E+00, 0.5774100E+00, &
     & 0.6431400E+00, 0.7580500E+00, 0.8629900E+00, 0.9963900E+00, &
     & 0.1139500E+01, 0.1203400E+01, 0.1027400E+01, 0.1027400E+01 /
      data (ref_adm( 3,iz, 7,14),iz = 1,20) / &
     & 0.3079100E+00, 0.3079100E+00, 0.3272400E+00, 0.3078500E+00, &
     & 0.3215900E+00, 0.3398000E+00, 0.3558800E+00, 0.3694800E+00, &
     & 0.4098500E+00, 0.4511100E+00, 0.4878700E+00, 0.5356900E+00, &
     & 0.6030000E+00, 0.6848000E+00, 0.7638400E+00, 0.8924300E+00, &
     & 0.1011400E+01, 0.1044200E+01, 0.9355100E+00, 0.9355100E+00 /
      data (ref_adm( 3,iz, 8,14),iz = 1,20) / &
     & 0.3024600E+00, 0.3024600E+00, 0.3143700E+00, 0.3160000E+00, &
     & 0.3180400E+00, 0.3322500E+00, 0.3372000E+00, 0.3635300E+00, &
     & 0.3908600E+00, 0.4335800E+00, 0.4672700E+00, 0.5143000E+00, &
     & 0.5637000E+00, 0.6326000E+00, 0.7364000E+00, 0.8606300E+00, &
     & 0.9828300E+00, 0.9758100E+00, 0.8253900E+00, 0.8253900E+00 /
      data (ref_adm( 3,iz, 9,14),iz = 1,20) / &
     & 0.3153400E+00, 0.3153400E+00, 0.2975600E+00, 0.3198500E+00, &
     & 0.3182800E+00, 0.3352200E+00, 0.3526700E+00, 0.3645600E+00, &
     & 0.3850000E+00, 0.4136600E+00, 0.4322300E+00, 0.4876200E+00, &
     & 0.5311500E+00, 0.6127100E+00, 0.6877000E+00, 0.7963900E+00, &
     & 0.9052100E+00, 0.8864800E+00, 0.7376900E+00, 0.7376900E+00 /
      data (ref_adm( 3,iz,10,14),iz = 1,20) / &
     & 0.3030400E+00, 0.3030400E+00, 0.3080400E+00, 0.3153100E+00, &
     & 0.3165600E+00, 0.3423400E+00, 0.3542300E+00, 0.3576800E+00, &
     & 0.3795800E+00, 0.3941200E+00, 0.4061200E+00, 0.4628000E+00, &
     & 0.5130400E+00, 0.5745400E+00, 0.6408300E+00, 0.7547500E+00, &
     & 0.8022800E+00, 0.8048300E+00, 0.6706200E+00, 0.6706200E+00 /
      data (ref_adm( 3,iz,11,14),iz = 1,20) / &
     & 0.3039200E+00, 0.3039200E+00, 0.3012800E+00, 0.3134300E+00, &
     & 0.3039200E+00, 0.3284600E+00, 0.3310100E+00, 0.3608300E+00, &
     & 0.3584100E+00, 0.3717000E+00, 0.4097200E+00, 0.4397000E+00, &
     & 0.4865400E+00, 0.5520100E+00, 0.6208500E+00, 0.6876400E+00, &
     & 0.7407700E+00, 0.7408600E+00, 0.6132900E+00, 0.6132900E+00 /
      data (ref_adm( 3,iz,12,14),iz = 1,20) / &
     & 0.2930200E+00, 0.2930200E+00, 0.3221400E+00, 0.3099200E+00, &
     & 0.3234800E+00, 0.3226500E+00, 0.3318700E+00, 0.3356900E+00, &
     & 0.3484900E+00, 0.3682200E+00, 0.4002600E+00, 0.4399900E+00, &
     & 0.4759200E+00, 0.5096400E+00, 0.5915800E+00, 0.6281500E+00, &
     & 0.6915400E+00, 0.6756500E+00, 0.5561600E+00, 0.5561600E+00 /
      data (ref_adm( 3,iz,13,14),iz = 1,20) / &
     & 0.2987100E+00, 0.2987100E+00, 0.2933100E+00, 0.2966800E+00, &
     & 0.3117000E+00, 0.3234300E+00, 0.3210400E+00, 0.3378400E+00, &
     & 0.3643500E+00, 0.3746600E+00, 0.3874500E+00, 0.4211600E+00, &
     & 0.4462900E+00, 0.4932800E+00, 0.5443400E+00, 0.5971000E+00, &
     & 0.6314000E+00, 0.6213300E+00, 0.5261700E+00, 0.5261700E+00 /
      data (ref_adm( 3,iz,14,14),iz = 1,20) / &
     & 0.3101800E+00, 0.3101800E+00, 0.3198300E+00, 0.3213800E+00, &
     & 0.3269700E+00, 0.3360900E+00, 0.3389100E+00, 0.3437500E+00, &
     & 0.3586400E+00, 0.3573700E+00, 0.3800300E+00, 0.3934300E+00, &
     & 0.4220900E+00, 0.4610900E+00, 0.5157000E+00, 0.5595900E+00, &
     & 0.5915200E+00, 0.5880000E+00, 0.5414100E+00, 0.5414100E+00 /
      data (ref_adm( 3,iz,15,14),iz = 1,20) / &
     & 0.2989200E+00, 0.2989200E+00, 0.2936900E+00, 0.2956300E+00, &
     & 0.2966500E+00, 0.3059500E+00, 0.3107200E+00, 0.3265800E+00, &
     & 0.3359300E+00, 0.3515200E+00, 0.3757200E+00, 0.3962500E+00, &
     & 0.4129000E+00, 0.4403500E+00, 0.4865700E+00, 0.5268600E+00, &
     & 0.5635100E+00, 0.5515100E+00, 0.4441887E+00, 0.4441887E+00 /
      data (ref_adm( 3,iz,16,14),iz = 1,20) / &
     & 0.2957000E+00, 0.2957000E+00, 0.2952500E+00, 0.3013000E+00, &
     & 0.2958200E+00, 0.3062100E+00, 0.3119600E+00, 0.3163700E+00, &
     & 0.3252000E+00, 0.3392800E+00, 0.3506800E+00, 0.3669200E+00, &
     & 0.3845000E+00, 0.4034800E+00, 0.4592600E+00, 0.5080800E+00, &
     & 0.5390700E+00, 0.6332600E+00, 0.4254733E+00, 0.4254733E+00 /
      data (ref_adm( 3,iz,17,14),iz = 1,20) / &
     & 0.2927900E+00, 0.2927900E+00, 0.2838900E+00, 0.2868100E+00, &
     & 0.2851700E+00, 0.3118600E+00, 0.3151300E+00, 0.3271200E+00, &
     & 0.3401300E+00, 0.3457000E+00, 0.3608300E+00, 0.3684000E+00, &
     & 0.3833200E+00, 0.4123800E+00, 0.4436100E+00, 0.4668500E+00, &
     & 0.4661500E+00, 0.4463047E+00, 0.4104734E+00, 0.4104734E+00 /
      data (ref_adm( 3,iz,18,14),iz = 1,20) / &
     & 0.2940800E+00, 0.2940800E+00, 0.2966700E+00, 0.2866700E+00, &
     & 0.2957000E+00, 0.2881300E+00, 0.3125600E+00, 0.3264700E+00, &
     & 0.3343400E+00, 0.3430900E+00, 0.3572500E+00, 0.3704000E+00, &
     & 0.3767700E+00, 0.4023000E+00, 0.4432600E+00, 0.4569800E+00, &
     & 0.4541400E+00, 0.5309163E+00, 0.5324259E+00, 0.5324259E+00 /
      data (ref_adm( 3,iz,19,14),iz = 1,20) / &
     & 0.2990100E+00, 0.2990100E+00, 0.3000900E+00, 0.3043800E+00, &
     & 0.3072900E+00, 0.3112300E+00, 0.3012800E+00, 0.3108900E+00, &
     & 0.3179000E+00, 0.3326700E+00, 0.3523500E+00, 0.3611300E+00, &
     & 0.3817500E+00, 0.3945100E+00, 0.4259700E+00, 0.4155600E+00, &
     & 0.4846025E+00, 0.5185009E+00, 0.5203391E+00, 0.5203391E+00 /
      data (ref_adm( 3,iz,20,14),iz = 1,20) / &
     & 0.2851400E+00, 0.2851400E+00, 0.2927700E+00, 0.2924100E+00, &
     & 0.3191700E+00, 0.3074300E+00, 0.2975700E+00, 0.3230700E+00, &
     & 0.3391700E+00, 0.3372800E+00, 0.3449700E+00, 0.3634800E+00, &
     & 0.3743100E+00, 0.3922600E+00, 0.4156200E+00, 0.4274900E+00, &
     & 0.4768088E+00, 0.5098734E+00, 0.5132591E+00, 0.5132591E+00 /
      data (ref_adm( 3,iz,21,14),iz = 1,20) / &
     & 0.2912800E+00, 0.2912800E+00, 0.2830400E+00, 0.3002500E+00, &
     & 0.3004300E+00, 0.3048700E+00, 0.3094100E+00, 0.3237100E+00, &
     & 0.3417400E+00, 0.3287200E+00, 0.3551400E+00, 0.3651900E+00, &
     & 0.3670600E+00, 0.3907000E+00, 0.3984700E+00, 0.4525700E+00, &
     & 0.4699195E+00, 0.5023493E+00, 0.5088734E+00, 0.5088734E+00 /
      data (ref_adm( 3,iz,22,14),iz = 1,20) / &
     & 0.2911700E+00, 0.2911700E+00, 0.2865800E+00, 0.2988400E+00, &
     & 0.3015900E+00, 0.3019300E+00, 0.3131600E+00, 0.3256100E+00, &
     & 0.3258900E+00, 0.3289500E+00, 0.3515100E+00, 0.3606600E+00, &
     & 0.3696700E+00, 0.3908400E+00, 0.3939300E+00, 0.4228800E+00, &
     & 0.4172724E+00, 0.4116535E+00, 0.4089212E+00, 0.4089212E+00 /
      data (ref_adm( 3,iz,23,14),iz = 1,20) / &
     & 0.2915400E+00, 0.2915400E+00, 0.3037200E+00, 0.3013300E+00, &
     & 0.2975400E+00, 0.3039300E+00, 0.3192000E+00, 0.3199800E+00, &
     & 0.3408400E+00, 0.3422200E+00, 0.3526200E+00, 0.3549600E+00, &
     & 0.3770900E+00, 0.4026100E+00, 0.4155300E+00, 0.4348800E+00, &
     & 0.4598600E+00, 0.4128491E+00, 0.4143549E+00, 0.4143549E+00 /
      data (ref_adm( 3,iz,24,14),iz = 1,20) / &
     & 0.2827100E+00, 0.2827100E+00, 0.2977000E+00, 0.2984800E+00, &
     & 0.2995400E+00, 0.3049600E+00, 0.3120800E+00, 0.3194200E+00, &
     & 0.3232100E+00, 0.3347300E+00, 0.3438400E+00, 0.3612800E+00, &
     & 0.3795800E+00, 0.3997000E+00, 0.4163900E+00, 0.4357300E+00, &
     & 0.4701600E+00, 0.4177850E+00, 0.4228482E+00, 0.4228482E+00 /
      data (ref_adm( 3,iz,25,14),iz = 1,20) / &
     & 0.3038600E+00, 0.3038600E+00, 0.3157500E+00, 0.3160800E+00, &
     & 0.3254100E+00, 0.3294200E+00, 0.3368500E+00, 0.3377200E+00, &
     & 0.3446800E+00, 0.3581500E+00, 0.3584900E+00, 0.3704800E+00, &
     & 0.3822200E+00, 0.4025100E+00, 0.4196500E+00, 0.4508600E+00, &
     & 0.4816500E+00, 0.4265033E+00, 0.4338706E+00, 0.4338706E+00 /
      data (ref_adm( 3,iz,26,14),iz = 1,20) / &
     & 0.3092000E+00, 0.3092000E+00, 0.3080900E+00, 0.3003100E+00, &
     & 0.3147200E+00, 0.3368600E+00, 0.3372100E+00, 0.3415500E+00, &
     & 0.3490900E+00, 0.3579300E+00, 0.3716700E+00, 0.3831800E+00, &
     & 0.4002400E+00, 0.4118900E+00, 0.4384100E+00, 0.4518000E+00, &
     & 0.4685600E+00, 0.4986300E+00, 0.4480979E+00, 0.4480979E+00 /
      data (ref_adm( 3,iz,27,14),iz = 1,20) / &
     & 0.3089000E+00, 0.3089000E+00, 0.3019800E+00, 0.3157900E+00, &
     & 0.3199500E+00, 0.3091400E+00, 0.3222400E+00, 0.3373500E+00, &
     & 0.3488200E+00, 0.3571100E+00, 0.3830700E+00, 0.3944200E+00, &
     & 0.4026600E+00, 0.4230500E+00, 0.4482900E+00, 0.4685500E+00, &
     & 0.4905800E+00, 0.4944400E+00, 0.4525800E+00, 0.4525800E+00 /
      data (ref_adm( 3,iz,28,14),iz = 1,20) / &
     & 0.3077800E+00, 0.3077800E+00, 0.3168900E+00, 0.3175400E+00, &
     & 0.3257900E+00, 0.3126300E+00, 0.3325500E+00, 0.3415000E+00, &
     & 0.3537700E+00, 0.3588400E+00, 0.3910600E+00, 0.4176400E+00, &
     & 0.4339700E+00, 0.4556400E+00, 0.4915800E+00, 0.5046000E+00, &
     & 0.5072300E+00, 0.5067000E+00, 0.4477200E+00, 0.4477200E+00 /
      data (ref_adm( 3,iz,29,14),iz = 1,20) / &
     & 0.2980800E+00, 0.2980800E+00, 0.3300400E+00, 0.3265100E+00, &
     & 0.3256800E+00, 0.3308600E+00, 0.3329700E+00, 0.3524300E+00, &
     & 0.3830900E+00, 0.3813900E+00, 0.4052900E+00, 0.4337500E+00, &
     & 0.4459400E+00, 0.4824200E+00, 0.5181600E+00, 0.5272300E+00, &
     & 0.5450000E+00, 0.5425700E+00, 0.4510700E+00, 0.4510700E+00 /
      data (ref_adm( 3,iz,30,14),iz = 1,20) / &
     & 0.3131900E+00, 0.3131900E+00, 0.3155500E+00, 0.3206000E+00, &
     & 0.3252100E+00, 0.3149600E+00, 0.3412500E+00, 0.3451600E+00, &
     & 0.3633200E+00, 0.4113400E+00, 0.4158000E+00, 0.4443200E+00, &
     & 0.4508600E+00, 0.4872200E+00, 0.5225600E+00, 0.5545100E+00, &
     & 0.5747900E+00, 0.5628100E+00, 0.4747000E+00, 0.4747000E+00 /
      data (ref_adm( 3,iz,31,14),iz = 1,20) / &
     & 0.3003600E+00, 0.3003600E+00, 0.3036700E+00, 0.3163000E+00, &
     & 0.3250100E+00, 0.3295600E+00, 0.3535000E+00, 0.3665600E+00, &
     & 0.3725800E+00, 0.4007200E+00, 0.4106200E+00, 0.4409000E+00, &
     & 0.4548000E+00, 0.4836200E+00, 0.5157300E+00, 0.5520600E+00, &
     & 0.5709100E+00, 0.5685600E+00, 0.4901500E+00, 0.4901500E+00 /
      data (ref_adm( 3,iz,32,14),iz = 1,20) / &
     & 0.3084000E+00, 0.3084000E+00, 0.3308600E+00, 0.3255500E+00, &
     & 0.3414200E+00, 0.3522500E+00, 0.3596000E+00, 0.3983800E+00, &
     & 0.4064700E+00, 0.4122000E+00, 0.4448600E+00, 0.4503700E+00, &
     & 0.4758200E+00, 0.4982200E+00, 0.5234700E+00, 0.5549800E+00, &
     & 0.5691900E+00, 0.5764200E+00, 0.5042400E+00, 0.5042400E+00 /
      data (ref_adm( 3,iz,33,14),iz = 1,20) / &
     & 0.3012200E+00, 0.3012200E+00, 0.2943700E+00, 0.3123900E+00, &
     & 0.3127300E+00, 0.3244500E+00, 0.3522300E+00, 0.3788300E+00, &
     & 0.4031400E+00, 0.4144900E+00, 0.4322500E+00, 0.4572000E+00, &
     & 0.4744400E+00, 0.5168700E+00, 0.5379200E+00, 0.5712700E+00, &
     & 0.5946200E+00, 0.5851700E+00, 0.4899100E+00, 0.4899100E+00 /
      data (ref_adm( 3,iz,34,14),iz = 1,20) / &
     & 0.3046800E+00, 0.3046800E+00, 0.2860300E+00, 0.3052400E+00, &
     & 0.3243200E+00, 0.3320400E+00, 0.3433800E+00, 0.3639200E+00, &
     & 0.3956500E+00, 0.4040000E+00, 0.4320800E+00, 0.4605000E+00, &
     & 0.4769000E+00, 0.5055300E+00, 0.5274100E+00, 0.5645000E+00, &
     & 0.5822800E+00, 0.5880800E+00, 0.4868400E+00, 0.4868400E+00 /
      data (ref_adm( 3,iz,35,14),iz = 1,20) / &
     & 0.3201500E+00, 0.3201500E+00, 0.3211100E+00, 0.3075800E+00, &
     & 0.3299800E+00, 0.3343400E+00, 0.3603800E+00, 0.3788400E+00, &
     & 0.3974000E+00, 0.4302300E+00, 0.4292300E+00, 0.4543500E+00, &
     & 0.4866000E+00, 0.5325000E+00, 0.5480300E+00, 0.5768700E+00, &
     & 0.5991300E+00, 0.5768900E+00, 0.4871500E+00, 0.4871500E+00 /
      data (ref_adm( 3,iz,36,14),iz = 1,20) / &
     & 0.2956900E+00, 0.2956900E+00, 0.3012300E+00, 0.3176200E+00, &
     & 0.3232200E+00, 0.3372600E+00, 0.3713300E+00, 0.3793100E+00, &
     & 0.3943600E+00, 0.4175500E+00, 0.4386600E+00, 0.4620700E+00, &
     & 0.4892600E+00, 0.5234300E+00, 0.5672400E+00, 0.5828800E+00, &
     & 0.5908400E+00, 0.5804900E+00, 0.4872400E+00, 0.4872400E+00 /
      data (ref_adm( 3,iz,37,14),iz = 1,20) / &
     & 0.3058900E+00, 0.3058900E+00, 0.2968500E+00, 0.3081000E+00, &
     & 0.3249300E+00, 0.3559500E+00, 0.3758000E+00, 0.3932500E+00, &
     & 0.4038400E+00, 0.4166700E+00, 0.4470400E+00, 0.4658900E+00, &
     & 0.4852500E+00, 0.5483400E+00, 0.5925200E+00, 0.5888000E+00, &
     & 0.5910800E+00, 0.5735400E+00, 0.4781500E+00, 0.4781500E+00 /
      data (ref_adm( 3,iz,38,14),iz = 1,20) / &
     & 0.3058900E+00, 0.3058900E+00, 0.2968500E+00, 0.3081000E+00, &
     & 0.3249300E+00, 0.3559500E+00, 0.3758000E+00, 0.3932500E+00, &
     & 0.4038400E+00, 0.4166700E+00, 0.4470400E+00, 0.4658900E+00, &
     & 0.4852500E+00, 0.5483400E+00, 0.5925200E+00, 0.5888000E+00, &
     & 0.5910800E+00, 0.5735400E+00, 0.4781500E+00, 0.4781500E+00 /
! Solar Zenith Angle 70.0 Albedo  0.4472719E+00
      data (ref_adm( 3,iz, 1,15),iz = 1,20) / &
     & 0.2784300E+00, 0.2784300E+00, 0.2801400E+00, 0.2783300E+00, &
     & 0.3079300E+00, 0.3254200E+00, 0.3606800E+00, 0.3842000E+00, &
     & 0.4147100E+00, 0.4812000E+00, 0.5581400E+00, 0.6445200E+00, &
     & 0.7880300E+00, 0.9865300E+00, 0.1152400E+01, 0.1396000E+01, &
     & 0.1453913E+01, 0.1602357E+01, 0.1165237E+01, 0.1165237E+01 /
      data (ref_adm( 3,iz, 2,15),iz = 1,20) / &
     & 0.2784300E+00, 0.2784300E+00, 0.2801400E+00, 0.2783300E+00, &
     & 0.3079300E+00, 0.3254200E+00, 0.3606800E+00, 0.3842000E+00, &
     & 0.4147100E+00, 0.4812000E+00, 0.5581400E+00, 0.6445200E+00, &
     & 0.7880300E+00, 0.9865300E+00, 0.1152400E+01, 0.1396000E+01, &
     & 0.1453913E+01, 0.1602357E+01, 0.1165237E+01, 0.1165237E+01 /
      data (ref_adm( 3,iz, 3,15),iz = 1,20) / &
     & 0.2829700E+00, 0.2829700E+00, 0.2885800E+00, 0.2858100E+00, &
     & 0.3137400E+00, 0.3172800E+00, 0.3518000E+00, 0.3801000E+00, &
     & 0.4124500E+00, 0.4664000E+00, 0.5315300E+00, 0.6391500E+00, &
     & 0.7426200E+00, 0.9254600E+00, 0.1088900E+01, 0.1298800E+01, &
     & 0.1263800E+01, 0.1566274E+01, 0.1123814E+00, 0.1123814E+00 /
      data (ref_adm( 3,iz, 4,15),iz = 1,20) / &
     & 0.2665300E+00, 0.2665300E+00, 0.2894900E+00, 0.3005700E+00, &
     & 0.3155400E+00, 0.3155900E+00, 0.3540900E+00, 0.3887700E+00, &
     & 0.4190400E+00, 0.4552100E+00, 0.5313900E+00, 0.6096300E+00, &
     & 0.6996400E+00, 0.8928900E+00, 0.1060300E+01, 0.1244100E+01, &
     & 0.1284500E+01, 0.1493785E+01, 0.1085066E+01, 0.1085066E+01 /
      data (ref_adm( 3,iz, 5,15),iz = 1,20) / &
     & 0.2737500E+00, 0.2737500E+00, 0.2866900E+00, 0.2898100E+00, &
     & 0.3103900E+00, 0.3369800E+00, 0.3309800E+00, 0.3793800E+00, &
     & 0.4233500E+00, 0.4625000E+00, 0.5309500E+00, 0.6203400E+00, &
     & 0.7286800E+00, 0.8625600E+00, 0.1010900E+01, 0.1211100E+01, &
     & 0.1247600E+01, 0.1397707E+01, 0.1017545E+01, 0.1017545E+01 /
      data (ref_adm( 3,iz, 6,15),iz = 1,20) / &
     & 0.2931800E+00, 0.2931800E+00, 0.2903800E+00, 0.3114600E+00, &
     & 0.3183400E+00, 0.3292100E+00, 0.3484100E+00, 0.3831900E+00, &
     & 0.4265000E+00, 0.4647900E+00, 0.5260100E+00, 0.6062600E+00, &
     & 0.7231200E+00, 0.8652500E+00, 0.9961300E+00, 0.1136200E+01, &
     & 0.1406900E+01, 0.1480300E+01, 0.1426100E+01, 0.1426100E+01 /
      data (ref_adm( 3,iz, 7,15),iz = 1,20) / &
     & 0.2750000E+00, 0.2750000E+00, 0.2791900E+00, 0.2887000E+00, &
     & 0.3049800E+00, 0.3147700E+00, 0.3521000E+00, 0.3926300E+00, &
     & 0.4140800E+00, 0.4765000E+00, 0.5308900E+00, 0.5979700E+00, &
     & 0.7024600E+00, 0.8227300E+00, 0.9086800E+00, 0.1073900E+01, &
     & 0.1314900E+01, 0.1340500E+01, 0.1188200E+01, 0.1188200E+01 /
      data (ref_adm( 3,iz, 8,15),iz = 1,20) / &
     & 0.2749400E+00, 0.2749400E+00, 0.2830700E+00, 0.2806900E+00, &
     & 0.2912400E+00, 0.3085100E+00, 0.3310200E+00, 0.3438900E+00, &
     & 0.3792000E+00, 0.4307500E+00, 0.4718500E+00, 0.5672900E+00, &
     & 0.6322200E+00, 0.7261500E+00, 0.8136700E+00, 0.9570900E+00, &
     & 0.1148600E+01, 0.1123000E+01, 0.1180900E+01, 0.1180900E+01 /
      data (ref_adm( 3,iz, 9,15),iz = 1,20) / &
     & 0.2939500E+00, 0.2939500E+00, 0.2933700E+00, 0.2827700E+00, &
     & 0.2920800E+00, 0.2965300E+00, 0.3314100E+00, 0.3492100E+00, &
     & 0.3912400E+00, 0.4175000E+00, 0.4667400E+00, 0.5280600E+00, &
     & 0.5939500E+00, 0.6765800E+00, 0.7700100E+00, 0.9186200E+00, &
     & 0.1036000E+01, 0.1013700E+01, 0.9490300E+00, 0.9490300E+00 /
      data (ref_adm( 3,iz,10,15),iz = 1,20) / &
     & 0.2808600E+00, 0.2808600E+00, 0.2847100E+00, 0.2864500E+00, &
     & 0.3069200E+00, 0.3120200E+00, 0.3201000E+00, 0.3473000E+00, &
     & 0.3769600E+00, 0.4032600E+00, 0.4499400E+00, 0.5096800E+00, &
     & 0.5576100E+00, 0.6458200E+00, 0.7169400E+00, 0.8704800E+00, &
     & 0.9412500E+00, 0.9112300E+00, 0.8668100E+00, 0.8668100E+00 /
      data (ref_adm( 3,iz,11,15),iz = 1,20) / &
     & 0.2835300E+00, 0.2835300E+00, 0.2891200E+00, 0.2905900E+00, &
     & 0.2803900E+00, 0.2979700E+00, 0.3311600E+00, 0.3455000E+00, &
     & 0.3666500E+00, 0.4001200E+00, 0.4334000E+00, 0.4814800E+00, &
     & 0.5392200E+00, 0.6060100E+00, 0.6664700E+00, 0.7767400E+00, &
     & 0.8512000E+00, 0.8266600E+00, 0.7123200E+00, 0.7123200E+00 /
      data (ref_adm( 3,iz,12,15),iz = 1,20) / &
     & 0.2771000E+00, 0.2771000E+00, 0.2869300E+00, 0.2973000E+00, &
     & 0.2995500E+00, 0.2898400E+00, 0.3150400E+00, 0.3377800E+00, &
     & 0.3599500E+00, 0.3959000E+00, 0.4241000E+00, 0.4754700E+00, &
     & 0.5252700E+00, 0.5622700E+00, 0.6148900E+00, 0.6962600E+00, &
     & 0.8015500E+00, 0.7616400E+00, 0.6496700E+00, 0.6496700E+00 /
      data (ref_adm( 3,iz,13,15),iz = 1,20) / &
     & 0.2846500E+00, 0.2846500E+00, 0.2766900E+00, 0.2962200E+00, &
     & 0.2967300E+00, 0.3051000E+00, 0.3220600E+00, 0.3418500E+00, &
     & 0.3583200E+00, 0.3752400E+00, 0.4114800E+00, 0.4486200E+00, &
     & 0.4871000E+00, 0.5172300E+00, 0.5797600E+00, 0.6556000E+00, &
     & 0.7098900E+00, 0.7107300E+00, 0.6081800E+00, 0.6081800E+00 /
      data (ref_adm( 3,iz,14,15),iz = 1,20) / &
     & 0.2869800E+00, 0.2869800E+00, 0.2845200E+00, 0.2988700E+00, &
     & 0.3166400E+00, 0.3201700E+00, 0.3275400E+00, 0.3390900E+00, &
     & 0.3551400E+00, 0.3762000E+00, 0.4005500E+00, 0.4166400E+00, &
     & 0.4623400E+00, 0.5060700E+00, 0.5309200E+00, 0.6006700E+00, &
     & 0.6632400E+00, 0.6760300E+00, 0.5058836E+00, 0.5058836E+00 /
      data (ref_adm( 3,iz,15,15),iz = 1,20) / &
     & 0.2845600E+00, 0.2845600E+00, 0.2818100E+00, 0.2806700E+00, &
     & 0.2892300E+00, 0.3003700E+00, 0.3111400E+00, 0.3181700E+00, &
     & 0.3348400E+00, 0.3504400E+00, 0.3714200E+00, 0.4022500E+00, &
     & 0.4291800E+00, 0.4578600E+00, 0.5223500E+00, 0.5473800E+00, &
     & 0.6185500E+00, 0.6563900E+00, 0.4788001E+00, 0.4788001E+00 /
      data (ref_adm( 3,iz,16,15),iz = 1,20) / &
     & 0.2775800E+00, 0.2775800E+00, 0.2850400E+00, 0.2823700E+00, &
     & 0.2944600E+00, 0.2928500E+00, 0.3056200E+00, 0.3104500E+00, &
     & 0.3249300E+00, 0.3391500E+00, 0.3554900E+00, 0.3766300E+00, &
     & 0.3997800E+00, 0.4274300E+00, 0.4906600E+00, 0.5430600E+00, &
     & 0.5396800E+00, 0.5006592E+00, 0.4570931E+00, 0.4570931E+00 /
      data (ref_adm( 3,iz,17,15),iz = 1,20) / &
     & 0.2801800E+00, 0.2801800E+00, 0.2780100E+00, 0.2812700E+00, &
     & 0.2995400E+00, 0.3165000E+00, 0.3161700E+00, 0.3197900E+00, &
     & 0.3408300E+00, 0.3367100E+00, 0.3568100E+00, 0.3786200E+00, &
     & 0.3905500E+00, 0.4337300E+00, 0.4735700E+00, 0.5089400E+00, &
     & 0.5340400E+00, 0.4723924E+00, 0.4397339E+00, 0.4397339E+00 /
      data (ref_adm( 3,iz,18,15),iz = 1,20) / &
     & 0.2857500E+00, 0.2857500E+00, 0.3054900E+00, 0.2767000E+00, &
     & 0.2849800E+00, 0.2961100E+00, 0.2995100E+00, 0.2937000E+00, &
     & 0.3154400E+00, 0.3407700E+00, 0.3488000E+00, 0.3858600E+00, &
     & 0.4023300E+00, 0.4280700E+00, 0.4415000E+00, 0.5157000E+00, &
     & 0.5379229E+00, 0.5992009E+00, 0.6385296E+00, 0.6385296E+00 /
      data (ref_adm( 3,iz,19,15),iz = 1,20) / &
     & 0.2847000E+00, 0.2847000E+00, 0.2883600E+00, 0.2910800E+00, &
     & 0.2994100E+00, 0.3061700E+00, 0.2824200E+00, 0.2998200E+00, &
     & 0.3390700E+00, 0.3433100E+00, 0.3465200E+00, 0.3656000E+00, &
     & 0.3823400E+00, 0.4099000E+00, 0.4372900E+00, 0.4835100E+00, &
     & 0.5247592E+00, 0.5830321E+00, 0.6226062E+00, 0.6226062E+00 /
      data (ref_adm( 3,iz,20,15),iz = 1,20) / &
     & 0.2825100E+00, 0.2825100E+00, 0.2935400E+00, 0.2924900E+00, &
     & 0.2913300E+00, 0.3069800E+00, 0.2977500E+00, 0.3137400E+00, &
     & 0.3382200E+00, 0.3289800E+00, 0.3655300E+00, 0.3569800E+00, &
     & 0.3932300E+00, 0.4000800E+00, 0.4330300E+00, 0.4660700E+00, &
     & 0.5149306E+00, 0.5719266E+00, 0.6131519E+00, 0.6131519E+00 /
      data (ref_adm( 3,iz,21,15),iz = 1,20) / &
     & 0.2977500E+00, 0.2977500E+00, 0.2911100E+00, 0.2784000E+00, &
     & 0.2872000E+00, 0.2946300E+00, 0.3156800E+00, 0.3144900E+00, &
     & 0.3404900E+00, 0.3357900E+00, 0.3612500E+00, 0.3565900E+00, &
     & 0.3839300E+00, 0.4004900E+00, 0.4195200E+00, 0.4620300E+00, &
     & 0.5066764E+00, 0.5626449E+00, 0.6075997E+00, 0.6075997E+00 /
      data (ref_adm( 3,iz,22,15),iz = 1,20) / &
     & 0.2747600E+00, 0.2747600E+00, 0.2736700E+00, 0.2865800E+00, &
     & 0.2918000E+00, 0.3169700E+00, 0.3300200E+00, 0.3079400E+00, &
     & 0.3315600E+00, 0.3409900E+00, 0.3565600E+00, 0.3681200E+00, &
     & 0.3756700E+00, 0.3905900E+00, 0.4127000E+00, 0.4384000E+00, &
     & 0.4447606E+00, 0.4508018E+00, 0.4756852E+00, 0.4756852E+00 /
      data (ref_adm( 3,iz,23,15),iz = 1,20) / &
     & 0.2792100E+00, 0.2792100E+00, 0.2725700E+00, 0.2770800E+00, &
     & 0.2930800E+00, 0.3186400E+00, 0.3110500E+00, 0.3309900E+00, &
     & 0.3308800E+00, 0.3481800E+00, 0.3395800E+00, 0.3563200E+00, &
     & 0.3902500E+00, 0.4143200E+00, 0.4256100E+00, 0.4381100E+00, &
     & 0.4461305E+00, 0.4535772E+00, 0.4837248E+00, 0.4837248E+00 /
      data (ref_adm( 3,iz,24,15),iz = 1,20) / &
     & 0.2729500E+00, 0.2729500E+00, 0.2773500E+00, 0.2851000E+00, &
     & 0.2881300E+00, 0.2931800E+00, 0.3072200E+00, 0.3120300E+00, &
     & 0.3240800E+00, 0.3367600E+00, 0.3433700E+00, 0.3625600E+00, &
     & 0.3771500E+00, 0.4029900E+00, 0.4334300E+00, 0.4501800E+00, &
     & 0.4988100E+00, 0.4612857E+00, 0.4959949E+00, 0.4959949E+00 /
      data (ref_adm( 3,iz,25,15),iz = 1,20) / &
     & 0.2889200E+00, 0.2889200E+00, 0.2939200E+00, 0.2996100E+00, &
     & 0.2964500E+00, 0.3053300E+00, 0.3169100E+00, 0.3236400E+00, &
     & 0.3344300E+00, 0.3529300E+00, 0.3631500E+00, 0.3845500E+00, &
     & 0.3957900E+00, 0.4157800E+00, 0.4326100E+00, 0.4703700E+00, &
     & 0.4987100E+00, 0.4926800E+00, 0.5119047E+00, 0.5119047E+00 /
      data (ref_adm( 3,iz,26,15),iz = 1,20) / &
     & 0.2884000E+00, 0.2884000E+00, 0.2887200E+00, 0.2862600E+00, &
     & 0.2910700E+00, 0.3100300E+00, 0.3133000E+00, 0.3223800E+00, &
     & 0.3468000E+00, 0.3579600E+00, 0.3717200E+00, 0.3990700E+00, &
     & 0.4227000E+00, 0.4365500E+00, 0.4474400E+00, 0.4752500E+00, &
     & 0.5054300E+00, 0.5627200E+00, 0.5320901E+00, 0.5320901E+00 /
      data (ref_adm( 3,iz,27,15),iz = 1,20) / &
     & 0.2867900E+00, 0.2867900E+00, 0.2789900E+00, 0.2966900E+00, &
     & 0.2828200E+00, 0.2940200E+00, 0.2977500E+00, 0.3259000E+00, &
     & 0.3299400E+00, 0.3693500E+00, 0.3682400E+00, 0.3961200E+00, &
     & 0.4192500E+00, 0.4377600E+00, 0.4857100E+00, 0.5080200E+00, &
     & 0.5237500E+00, 0.5390200E+00, 0.4851500E+00, 0.4851500E+00 /
      data (ref_adm( 3,iz,28,15),iz = 1,20) / &
     & 0.2903700E+00, 0.2903700E+00, 0.2840700E+00, 0.2939800E+00, &
     & 0.2946600E+00, 0.3023200E+00, 0.3305000E+00, 0.3082200E+00, &
     & 0.3372300E+00, 0.3654600E+00, 0.3973300E+00, 0.4278200E+00, &
     & 0.4412700E+00, 0.4678200E+00, 0.4938500E+00, 0.5368500E+00, &
     & 0.5428000E+00, 0.5643700E+00, 0.4961100E+00, 0.4961100E+00 /
      data (ref_adm( 3,iz,29,15),iz = 1,20) / &
     & 0.2896600E+00, 0.2896600E+00, 0.2825700E+00, 0.2984000E+00, &
     & 0.3067800E+00, 0.3046400E+00, 0.3309400E+00, 0.3346400E+00, &
     & 0.3473400E+00, 0.3707500E+00, 0.4125700E+00, 0.4466100E+00, &
     & 0.4646300E+00, 0.5031500E+00, 0.5337500E+00, 0.5729300E+00, &
     & 0.5904600E+00, 0.5902600E+00, 0.5067900E+00, 0.5067900E+00 /
      data (ref_adm( 3,iz,30,15),iz = 1,20) / &
     & 0.2960300E+00, 0.2960300E+00, 0.2880300E+00, 0.3109200E+00, &
     & 0.2926200E+00, 0.3046000E+00, 0.3140000E+00, 0.3427300E+00, &
     & 0.3606500E+00, 0.3827600E+00, 0.4249300E+00, 0.4490900E+00, &
     & 0.4741700E+00, 0.4991300E+00, 0.5339500E+00, 0.5938200E+00, &
     & 0.6157300E+00, 0.6319000E+00, 0.5427100E+00, 0.5427100E+00 /
      data (ref_adm( 3,iz,31,15),iz = 1,20) / &
     & 0.2787800E+00, 0.2787800E+00, 0.2879100E+00, 0.2961400E+00, &
     & 0.3051700E+00, 0.3177400E+00, 0.3373800E+00, 0.3600700E+00, &
     & 0.3712900E+00, 0.3976200E+00, 0.4179000E+00, 0.4510400E+00, &
     & 0.4854900E+00, 0.4970500E+00, 0.5311200E+00, 0.5825000E+00, &
     & 0.6100000E+00, 0.6317000E+00, 0.5581000E+00, 0.5581000E+00 /
      data (ref_adm( 3,iz,32,15),iz = 1,20) / &
     & 0.2781600E+00, 0.2781600E+00, 0.2875300E+00, 0.2931700E+00, &
     & 0.3128400E+00, 0.3132100E+00, 0.3280200E+00, 0.3690400E+00, &
     & 0.3912200E+00, 0.4165500E+00, 0.4302200E+00, 0.4635300E+00, &
     & 0.4913500E+00, 0.5270800E+00, 0.5485300E+00, 0.6104000E+00, &
     & 0.6457500E+00, 0.6490000E+00, 0.5649500E+00, 0.5649500E+00 /
      data (ref_adm( 3,iz,33,15),iz = 1,20) / &
     & 0.2776200E+00, 0.2776200E+00, 0.2847600E+00, 0.2913100E+00, &
     & 0.3008100E+00, 0.3141900E+00, 0.3242700E+00, 0.3494700E+00, &
     & 0.3756700E+00, 0.4021900E+00, 0.4322900E+00, 0.4602600E+00, &
     & 0.4949300E+00, 0.5347900E+00, 0.5728800E+00, 0.6184800E+00, &
     & 0.6587100E+00, 0.6714000E+00, 0.5776200E+00, 0.5776200E+00 /
      data (ref_adm( 3,iz,34,15),iz = 1,20) / &
     & 0.2737500E+00, 0.2737500E+00, 0.2734600E+00, 0.2864500E+00, &
     & 0.3086100E+00, 0.3332200E+00, 0.3371500E+00, 0.3607300E+00, &
     & 0.3823800E+00, 0.3885600E+00, 0.4196900E+00, 0.4485600E+00, &
     & 0.4931800E+00, 0.5209600E+00, 0.5623400E+00, 0.6051200E+00, &
     & 0.6679200E+00, 0.6736700E+00, 0.5886200E+00, 0.5886200E+00 /
      data (ref_adm( 3,iz,35,15),iz = 1,20) / &
     & 0.2868000E+00, 0.2868000E+00, 0.2923800E+00, 0.2956600E+00, &
     & 0.2935300E+00, 0.3022400E+00, 0.3394100E+00, 0.3621600E+00, &
     & 0.3912700E+00, 0.4014100E+00, 0.4334600E+00, 0.4477600E+00, &
     & 0.4910100E+00, 0.5444300E+00, 0.5829300E+00, 0.6223000E+00, &
     & 0.6590200E+00, 0.6705100E+00, 0.5756500E+00, 0.5756500E+00 /
      data (ref_adm( 3,iz,36,15),iz = 1,20) / &
     & 0.2857700E+00, 0.2857700E+00, 0.3091600E+00, 0.2939200E+00, &
     & 0.3068600E+00, 0.3155900E+00, 0.3256100E+00, 0.3641200E+00, &
     & 0.4009400E+00, 0.4025500E+00, 0.4283000E+00, 0.4724000E+00, &
     & 0.4970700E+00, 0.5595000E+00, 0.5895900E+00, 0.6462200E+00, &
     & 0.6823700E+00, 0.6696000E+00, 0.5582100E+00, 0.5582100E+00 /
      data (ref_adm( 3,iz,37,15),iz = 1,20) / &
     & 0.2790500E+00, 0.2790500E+00, 0.2850300E+00, 0.3065300E+00, &
     & 0.3099900E+00, 0.3265800E+00, 0.3361200E+00, 0.3511700E+00, &
     & 0.3781000E+00, 0.4088900E+00, 0.4480000E+00, 0.4726300E+00, &
     & 0.5004500E+00, 0.5625400E+00, 0.6117200E+00, 0.6852200E+00, &
     & 0.6874000E+00, 0.6732700E+00, 0.5627000E+00, 0.5627000E+00 /
      data (ref_adm( 3,iz,38,15),iz = 1,20) / &
     & 0.2790500E+00, 0.2790500E+00, 0.2850300E+00, 0.3065300E+00, &
     & 0.3099900E+00, 0.3265800E+00, 0.3361200E+00, 0.3511700E+00, &
     & 0.3781000E+00, 0.4088900E+00, 0.4480000E+00, 0.4726300E+00, &
     & 0.5004500E+00, 0.5625400E+00, 0.6117200E+00, 0.6852200E+00, &
     & 0.6874000E+00, 0.6732700E+00, 0.5627000E+00, 0.5627000E+00 /
! Solar Zenith Angle 75.0 Albedo  0.4732751E+00
      data (ref_adm( 3,iz, 1,16),iz = 1,20) / &
     & 0.2787700E+00, 0.2787700E+00, 0.3188200E+00, 0.3299600E+00, &
     & 0.3427900E+00, 0.3410400E+00, 0.3715000E+00, 0.3932700E+00, &
     & 0.4548400E+00, 0.4888600E+00, 0.6225900E+00, 0.7473500E+00, &
     & 0.9001300E+00, 0.8874100E+00, 0.1121557E+01, 0.1348698E+01, &
     & 0.1577234E+01, 0.1792866E+01, 0.1356909E+01, 0.1356909E+01 /
      data (ref_adm( 3,iz, 2,16),iz = 1,20) / &
     & 0.2787700E+00, 0.2787700E+00, 0.3188200E+00, 0.3299600E+00, &
     & 0.3427900E+00, 0.3410400E+00, 0.3715000E+00, 0.3932700E+00, &
     & 0.4548400E+00, 0.4888600E+00, 0.6225900E+00, 0.7473500E+00, &
     & 0.9001300E+00, 0.8874100E+00, 0.1121557E+01, 0.1348698E+01, &
     & 0.1577234E+01, 0.1792866E+01, 0.1356909E+01, 0.1356909E+01 /
      data (ref_adm( 3,iz, 3,16),iz = 1,20) / &
     & 0.2662400E+00, 0.2662400E+00, 0.3122200E+00, 0.3102900E+00, &
     & 0.3118400E+00, 0.3602600E+00, 0.3486000E+00, 0.4038900E+00, &
     & 0.4735800E+00, 0.5206700E+00, 0.6507100E+00, 0.7721900E+00, &
     & 0.8745900E+00, 0.6252900E+00, 0.1107339E+01, 0.1329060E+01, &
     & 0.1546507E+01, 0.1746285E+01, 0.2680442E+00, 0.2680442E+00 /
      data (ref_adm( 3,iz, 4,16),iz = 1,20) / &
     & 0.2911400E+00, 0.2911400E+00, 0.3006900E+00, 0.2976400E+00, &
     & 0.3225500E+00, 0.3221600E+00, 0.3891900E+00, 0.4202400E+00, &
     & 0.4665400E+00, 0.5110600E+00, 0.6114000E+00, 0.7102900E+00, &
     & 0.8231900E+00, 0.8864500E+00, 0.1077175E+01, 0.1287019E+01, &
     & 0.1484547E+01, 0.1654690E+01, 0.1237946E+01, 0.1237946E+01 /
      data (ref_adm( 3,iz, 5,16),iz = 1,20) / &
     & 0.3085900E+00, 0.3085900E+00, 0.2884600E+00, 0.3121000E+00, &
     & 0.3103800E+00, 0.3431200E+00, 0.3631900E+00, 0.4081200E+00, &
     & 0.4389900E+00, 0.4893400E+00, 0.5822200E+00, 0.6812600E+00, &
     & 0.7755600E+00, 0.8619600E+00, 0.1035480E+01, 0.1229779E+01, &
     & 0.1401632E+01, 0.1536153E+01, 0.1145671E+01, 0.1145671E+01 /
      data (ref_adm( 3,iz, 6,16),iz = 1,20) / &
     & 0.2870500E+00, 0.2870500E+00, 0.2988700E+00, 0.3012700E+00, &
     & 0.2984300E+00, 0.3392800E+00, 0.3660800E+00, 0.4004100E+00, &
     & 0.4478800E+00, 0.4993400E+00, 0.5732700E+00, 0.6949900E+00, &
     & 0.7773600E+00, 0.9585300E+00, 0.1144800E+01, 0.1367400E+01, &
     & 0.1596500E+01, 0.1749000E+01, 0.1050629E+01, 0.1050629E+01 /
      data (ref_adm( 3,iz, 7,16),iz = 1,20) / &
     & 0.3008700E+00, 0.3008700E+00, 0.3027100E+00, 0.2963100E+00, &
     & 0.3173100E+00, 0.3398600E+00, 0.3402900E+00, 0.3904000E+00, &
     & 0.4048100E+00, 0.4643400E+00, 0.5362600E+00, 0.6255600E+00, &
     & 0.7274400E+00, 0.8681700E+00, 0.9963400E+00, 0.1234100E+01, &
     & 0.1508500E+01, 0.1619800E+01, 0.1399200E+01, 0.1399200E+01 /
      data (ref_adm( 3,iz, 8,16),iz = 1,20) / &
     & 0.2876000E+00, 0.2876000E+00, 0.3065400E+00, 0.3255800E+00, &
     & 0.3210100E+00, 0.3610300E+00, 0.3645400E+00, 0.3846800E+00, &
     & 0.4220000E+00, 0.4648800E+00, 0.5190000E+00, 0.6164500E+00, &
     & 0.7250500E+00, 0.8235700E+00, 0.1009900E+01, 0.1232300E+01, &
     & 0.1396100E+01, 0.1509100E+01, 0.1590100E+01, 0.1590100E+01 /
      data (ref_adm( 3,iz, 9,16),iz = 1,20) / &
     & 0.3041300E+00, 0.3041300E+00, 0.3198000E+00, 0.3222400E+00, &
     & 0.3077000E+00, 0.3163700E+00, 0.3488100E+00, 0.3567300E+00, &
     & 0.3976500E+00, 0.4559500E+00, 0.4973100E+00, 0.5660500E+00, &
     & 0.6731800E+00, 0.7674400E+00, 0.8812900E+00, 0.1090200E+01, &
     & 0.1227600E+01, 0.1218300E+01, 0.1275300E+01, 0.1275300E+01 /
      data (ref_adm( 3,iz,10,16),iz = 1,20) / &
     & 0.2923700E+00, 0.2923700E+00, 0.3063500E+00, 0.3070000E+00, &
     & 0.3084600E+00, 0.3262300E+00, 0.3345400E+00, 0.3500000E+00, &
     & 0.3885700E+00, 0.4177000E+00, 0.4833200E+00, 0.5510700E+00, &
     & 0.6286300E+00, 0.6987600E+00, 0.8158000E+00, 0.9765600E+00, &
     & 0.1103100E+01, 0.1078300E+01, 0.9192300E+00, 0.9192300E+00 /
      data (ref_adm( 3,iz,11,16),iz = 1,20) / &
     & 0.2852900E+00, 0.2852900E+00, 0.3162800E+00, 0.2891300E+00, &
     & 0.3093000E+00, 0.3239800E+00, 0.3391000E+00, 0.3569900E+00, &
     & 0.3754000E+00, 0.3914300E+00, 0.4644000E+00, 0.5040500E+00, &
     & 0.5883700E+00, 0.6537500E+00, 0.7494100E+00, 0.8882200E+00, &
     & 0.9840200E+00, 0.9809900E+00, 0.7434300E+00, 0.7434300E+00 /
      data (ref_adm( 3,iz,12,16),iz = 1,20) / &
     & 0.2904900E+00, 0.2904900E+00, 0.2956200E+00, 0.2895200E+00, &
     & 0.2963700E+00, 0.3334900E+00, 0.3347600E+00, 0.3683900E+00, &
     & 0.3589700E+00, 0.4065400E+00, 0.4467000E+00, 0.4857200E+00, &
     & 0.5158000E+00, 0.6116400E+00, 0.6861100E+00, 0.8148300E+00, &
     & 0.8803900E+00, 0.8581500E+00, 0.8285200E+00, 0.8285200E+00 /
      data (ref_adm( 3,iz,13,16),iz = 1,20) / &
     & 0.2763700E+00, 0.2763700E+00, 0.2971100E+00, 0.2779600E+00, &
     & 0.2924100E+00, 0.3165800E+00, 0.3160700E+00, 0.3285100E+00, &
     & 0.3511200E+00, 0.3942500E+00, 0.4232900E+00, 0.4684900E+00, &
     & 0.5144500E+00, 0.5665900E+00, 0.6477000E+00, 0.7552700E+00, &
     & 0.8028600E+00, 0.7977900E+00, 0.7749700E+00, 0.7749700E+00 /
      data (ref_adm( 3,iz,14,16),iz = 1,20) / &
     & 0.2862000E+00, 0.2862000E+00, 0.2962800E+00, 0.3118600E+00, &
     & 0.3316700E+00, 0.3224300E+00, 0.3235700E+00, 0.3444600E+00, &
     & 0.3523900E+00, 0.3632900E+00, 0.4277600E+00, 0.4475400E+00, &
     & 0.4842000E+00, 0.5487200E+00, 0.5947400E+00, 0.6966300E+00, &
     & 0.7650300E+00, 0.7746200E+00, 0.5540675E+00, 0.5540675E+00 /
      data (ref_adm( 3,iz,15,16),iz = 1,20) / &
     & 0.2843500E+00, 0.2843500E+00, 0.2922700E+00, 0.2955000E+00, &
     & 0.2981700E+00, 0.3063200E+00, 0.3114800E+00, 0.3297000E+00, &
     & 0.3427900E+00, 0.3679600E+00, 0.3959900E+00, 0.4280800E+00, &
     & 0.4676300E+00, 0.5128700E+00, 0.5801500E+00, 0.6424400E+00, &
     & 0.6834400E+00, 0.5886001E+00, 0.5249062E+00, 0.5249062E+00 /
      data (ref_adm( 3,iz,16,16),iz = 1,20) / &
     & 0.2911100E+00, 0.2911100E+00, 0.2884500E+00, 0.2873300E+00, &
     & 0.2930400E+00, 0.2996900E+00, 0.3050000E+00, 0.3216800E+00, &
     & 0.3352400E+00, 0.3528300E+00, 0.3842900E+00, 0.4010500E+00, &
     & 0.4255400E+00, 0.4595800E+00, 0.5319100E+00, 0.6083600E+00, &
     & 0.5888900E+00, 0.5512701E+00, 0.5012693E+00, 0.5012693E+00 /
      data (ref_adm( 3,iz,17,16),iz = 1,20) / &
     & 0.2830800E+00, 0.2830800E+00, 0.2866000E+00, 0.2867400E+00, &
     & 0.2994100E+00, 0.2918000E+00, 0.2993700E+00, 0.3065000E+00, &
     & 0.3307000E+00, 0.3492000E+00, 0.3735000E+00, 0.3962600E+00, &
     & 0.4267100E+00, 0.4674800E+00, 0.5180100E+00, 0.5805500E+00, &
     & 0.5271482E+00, 0.5209742E+00, 0.4820175E+00, 0.4820175E+00 /
      data (ref_adm( 3,iz,18,16),iz = 1,20) / &
     & 0.3026800E+00, 0.3026800E+00, 0.2766200E+00, 0.2952000E+00, &
     & 0.2877900E+00, 0.2987100E+00, 0.3124500E+00, 0.3269100E+00, &
     & 0.3457100E+00, 0.3521200E+00, 0.3713400E+00, 0.4031300E+00, &
     & 0.4151700E+00, 0.4516500E+00, 0.4762900E+00, 0.5306500E+00, &
     & 0.5508377E+00, 0.5710634E+00, 0.5894340E+00, 0.5894340E+00 /
      data (ref_adm( 3,iz,19,16),iz = 1,20) / &
     & 0.2868600E+00, 0.2868600E+00, 0.3075000E+00, 0.2835400E+00, &
     & 0.2875800E+00, 0.2961500E+00, 0.3039700E+00, 0.3262000E+00, &
     & 0.3224600E+00, 0.3360000E+00, 0.3579000E+00, 0.3883900E+00, &
     & 0.4091900E+00, 0.4483700E+00, 0.4707900E+00, 0.5148000E+00, &
     & 0.5258331E+00, 0.5455205E+00, 0.5744110E+00, 0.5744110E+00 /
      data (ref_adm( 3,iz,20,16),iz = 1,20) / &
     & 0.2973100E+00, 0.2973100E+00, 0.2797800E+00, 0.2958200E+00, &
     & 0.2924000E+00, 0.2961200E+00, 0.2961300E+00, 0.3214200E+00, &
     & 0.3275500E+00, 0.3326700E+00, 0.3540600E+00, 0.3745900E+00, &
     & 0.4007000E+00, 0.4316100E+00, 0.4561000E+00, 0.6411200E+00, &
     & 0.5089102E+00, 0.5290464E+00, 0.5669882E+00, 0.5669882E+00 /
      data (ref_adm( 3,iz,21,16),iz = 1,20) / &
     & 0.2730500E+00, 0.2730500E+00, 0.2814000E+00, 0.2840800E+00, &
     & 0.3024000E+00, 0.2865800E+00, 0.3106500E+00, 0.3263000E+00, &
     & 0.3309800E+00, 0.3382400E+00, 0.3472600E+00, 0.3663300E+00, &
     & 0.3852500E+00, 0.4294400E+00, 0.4518200E+00, 0.5717800E+00, &
     & 0.4981099E+00, 0.5192202E+00, 0.5656381E+00, 0.5656381E+00 /
      data (ref_adm( 3,iz,22,16),iz = 1,20) / &
     & 0.2785300E+00, 0.2785300E+00, 0.2922500E+00, 0.3111300E+00, &
     & 0.3103600E+00, 0.2898500E+00, 0.3184700E+00, 0.3120100E+00, &
     & 0.3476500E+00, 0.3247900E+00, 0.3592700E+00, 0.3833200E+00, &
     & 0.3985200E+00, 0.4347700E+00, 0.4345100E+00, 0.4845300E+00, &
     & 0.4736036E+00, 0.4838853E+00, 0.5118212E+00, 0.5118212E+00 /
      data (ref_adm( 3,iz,23,16),iz = 1,20) / &
     & 0.2765300E+00, 0.2765300E+00, 0.2817200E+00, 0.2936300E+00, &
     & 0.3081600E+00, 0.2958000E+00, 0.2976800E+00, 0.3139900E+00, &
     & 0.3301200E+00, 0.3445900E+00, 0.3527600E+00, 0.3905700E+00, &
     & 0.4096400E+00, 0.4413700E+00, 0.4411300E+00, 0.4701700E+00, &
     & 0.4738179E+00, 0.4856232E+00, 0.5200031E+00, 0.5200031E+00 /
      data (ref_adm( 3,iz,24,16),iz = 1,20) / &
     & 0.2835100E+00, 0.2835100E+00, 0.2804400E+00, 0.2842800E+00, &
     & 0.2978400E+00, 0.3045000E+00, 0.3072100E+00, 0.3234800E+00, &
     & 0.3321300E+00, 0.3515900E+00, 0.3666900E+00, 0.3928800E+00, &
     & 0.4123200E+00, 0.4403900E+00, 0.4601900E+00, 0.4829400E+00, &
     & 0.4949900E+00, 0.4924950E+00, 0.5328026E+00, 0.5328026E+00 /
      data (ref_adm( 3,iz,25,16),iz = 1,20) / &
     & 0.2972600E+00, 0.2972600E+00, 0.3024800E+00, 0.2921500E+00, &
     & 0.3008100E+00, 0.3188500E+00, 0.3226000E+00, 0.3319600E+00, &
     & 0.3456700E+00, 0.3545400E+00, 0.3752900E+00, 0.4047300E+00, &
     & 0.4345300E+00, 0.4547800E+00, 0.4607700E+00, 0.4975900E+00, &
     & 0.5323700E+00, 0.5048640E+00, 0.5495328E+00, 0.5495328E+00 /
      data (ref_adm( 3,iz,26,16),iz = 1,20) / &
     & 0.2864700E+00, 0.2864700E+00, 0.2891000E+00, 0.3174800E+00, &
     & 0.3047100E+00, 0.3137000E+00, 0.3222300E+00, 0.3226200E+00, &
     & 0.3400800E+00, 0.3416800E+00, 0.3849100E+00, 0.4106100E+00, &
     & 0.4300100E+00, 0.4616100E+00, 0.4811100E+00, 0.5198800E+00, &
     & 0.5510100E+00, 0.6248000E+00, 0.5709621E+00, 0.5709621E+00 /
      data (ref_adm( 3,iz,27,16),iz = 1,20) / &
     & 0.2906500E+00, 0.2906500E+00, 0.2773700E+00, 0.2956100E+00, &
     & 0.3123000E+00, 0.2974600E+00, 0.3221900E+00, 0.3296700E+00, &
     & 0.3350800E+00, 0.3617600E+00, 0.3820100E+00, 0.4180800E+00, &
     & 0.4388600E+00, 0.4654000E+00, 0.4835000E+00, 0.5317900E+00, &
     & 0.5712100E+00, 0.6082200E+00, 0.6437100E+00, 0.6437100E+00 /
      data (ref_adm( 3,iz,28,16),iz = 1,20) / &
     & 0.2877000E+00, 0.2877000E+00, 0.3026700E+00, 0.2911300E+00, &
     & 0.3047200E+00, 0.3157400E+00, 0.3071600E+00, 0.3589700E+00, &
     & 0.3659700E+00, 0.3857700E+00, 0.3831700E+00, 0.4148900E+00, &
     & 0.4520700E+00, 0.4762100E+00, 0.5195800E+00, 0.5579000E+00, &
     & 0.6114600E+00, 0.6313700E+00, 0.5771700E+00, 0.5771700E+00 /
      data (ref_adm( 3,iz,29,16),iz = 1,20) / &
     & 0.2969100E+00, 0.2969100E+00, 0.2840300E+00, 0.2830000E+00, &
     & 0.2946300E+00, 0.3089500E+00, 0.3355800E+00, 0.3368600E+00, &
     & 0.3590700E+00, 0.3910400E+00, 0.3884600E+00, 0.4289200E+00, &
     & 0.4534700E+00, 0.5157800E+00, 0.5653700E+00, 0.6199100E+00, &
     & 0.6598200E+00, 0.6784800E+00, 0.6163700E+00, 0.6163700E+00 /
      data (ref_adm( 3,iz,30,16),iz = 1,20) / &
     & 0.2949400E+00, 0.2949400E+00, 0.2706800E+00, 0.2855700E+00, &
     & 0.2951300E+00, 0.2980500E+00, 0.3251800E+00, 0.3589800E+00, &
     & 0.3601700E+00, 0.3982200E+00, 0.4333800E+00, 0.4518800E+00, &
     & 0.4733900E+00, 0.5256300E+00, 0.5839700E+00, 0.6527400E+00, &
     & 0.6916500E+00, 0.7060800E+00, 0.6592700E+00, 0.6592700E+00 /
      data (ref_adm( 3,iz,31,16),iz = 1,20) / &
     & 0.2877600E+00, 0.2877600E+00, 0.2927500E+00, 0.2753700E+00, &
     & 0.2806300E+00, 0.3296900E+00, 0.3460900E+00, 0.3647300E+00, &
     & 0.3665600E+00, 0.4002400E+00, 0.4641100E+00, 0.4912300E+00, &
     & 0.5112200E+00, 0.5504300E+00, 0.5936600E+00, 0.6655600E+00, &
     & 0.7033200E+00, 0.7460600E+00, 0.6667900E+00, 0.6667900E+00 /
      data (ref_adm( 3,iz,32,16),iz = 1,20) / &
     & 0.3157300E+00, 0.3157300E+00, 0.2780700E+00, 0.2865600E+00, &
     & 0.2951700E+00, 0.3126300E+00, 0.3292000E+00, 0.3317700E+00, &
     & 0.3717000E+00, 0.3674700E+00, 0.4313800E+00, 0.4755100E+00, &
     & 0.4892500E+00, 0.5456800E+00, 0.5754500E+00, 0.6229700E+00, &
     & 0.7056000E+00, 0.7344100E+00, 0.6464000E+00, 0.6464000E+00 /
      data (ref_adm( 3,iz,33,16),iz = 1,20) / &
     & 0.2939600E+00, 0.2939600E+00, 0.2901700E+00, 0.2805000E+00, &
     & 0.3213000E+00, 0.3226300E+00, 0.3355000E+00, 0.3601100E+00, &
     & 0.3883500E+00, 0.4278900E+00, 0.4525100E+00, 0.4888800E+00, &
     & 0.5159200E+00, 0.5662500E+00, 0.6112700E+00, 0.6724100E+00, &
     & 0.7476200E+00, 0.7761800E+00, 0.7050100E+00, 0.7050100E+00 /
      data (ref_adm( 3,iz,34,16),iz = 1,20) / &
     & 0.3011600E+00, 0.3011600E+00, 0.3179500E+00, 0.3115800E+00, &
     & 0.3238400E+00, 0.3307600E+00, 0.3434600E+00, 0.3795700E+00, &
     & 0.4012700E+00, 0.4292600E+00, 0.4311900E+00, 0.4682600E+00, &
     & 0.5151000E+00, 0.5602700E+00, 0.6030200E+00, 0.6605800E+00, &
     & 0.7073500E+00, 0.7575100E+00, 0.6688700E+00, 0.6688700E+00 /
      data (ref_adm( 3,iz,35,16),iz = 1,20) / &
     & 0.2941200E+00, 0.2941200E+00, 0.3148700E+00, 0.2934000E+00, &
     & 0.3079900E+00, 0.3446900E+00, 0.3606300E+00, 0.3679200E+00, &
     & 0.4010400E+00, 0.4051200E+00, 0.4413100E+00, 0.4647800E+00, &
     & 0.5226300E+00, 0.5536400E+00, 0.6089700E+00, 0.6870800E+00, &
     & 0.7317800E+00, 0.7759600E+00, 0.6524800E+00, 0.6524800E+00 /
      data (ref_adm( 3,iz,36,16),iz = 1,20) / &
     & 0.2886600E+00, 0.2886600E+00, 0.3005000E+00, 0.2912800E+00, &
     & 0.3028400E+00, 0.3481800E+00, 0.3591400E+00, 0.3702100E+00, &
     & 0.3938900E+00, 0.4138200E+00, 0.4413100E+00, 0.4815900E+00, &
     & 0.5360300E+00, 0.5624700E+00, 0.6119000E+00, 0.6747700E+00, &
     & 0.7542600E+00, 0.7923500E+00, 0.6859200E+00, 0.6859200E+00 /
      data (ref_adm( 3,iz,37,16),iz = 1,20) / &
     & 0.2876800E+00, 0.2876800E+00, 0.3010100E+00, 0.3037500E+00, &
     & 0.3192500E+00, 0.3298400E+00, 0.3297600E+00, 0.3742800E+00, &
     & 0.3983300E+00, 0.4099700E+00, 0.4576000E+00, 0.4963700E+00, &
     & 0.5092400E+00, 0.5662500E+00, 0.6280500E+00, 0.7176900E+00, &
     & 0.8055900E+00, 0.8254000E+00, 0.7072300E+00, 0.7072300E+00 /
      data (ref_adm( 3,iz,38,16),iz = 1,20) / &
     & 0.2876800E+00, 0.2876800E+00, 0.3010100E+00, 0.3037500E+00, &
     & 0.3192500E+00, 0.3298400E+00, 0.3297600E+00, 0.3742800E+00, &
     & 0.3983300E+00, 0.4099700E+00, 0.4576000E+00, 0.4963700E+00, &
     & 0.5092400E+00, 0.5662500E+00, 0.6280500E+00, 0.7176900E+00, &
     & 0.8055900E+00, 0.8254000E+00, 0.7072300E+00, 0.7072300E+00 /
! Solar Zenith Angle 80.0 Albedo  0.5033947E+00
      data (ref_adm( 3,iz, 1,17),iz = 1,20) / &
     & 0.3294300E+00, 0.3294300E+00, 0.2770500E+00, 0.3049400E+00, &
     & 0.3122400E+00, 0.3239900E+00, 0.4112900E+00, 0.4405800E+00, &
     & 0.4679200E+00, 0.5305300E+00, 0.6278400E+00, 0.8059000E+00, &
     & 0.9759806E+00, 0.1161160E+01, 0.1432507E+01, 0.1814473E+01, &
     & 0.2232307E+01, 0.2693580E+01, 0.2036385E+01, 0.2036385E+01 /
      data (ref_adm( 3,iz, 2,17),iz = 1,20) / &
     & 0.3294300E+00, 0.3294300E+00, 0.2770500E+00, 0.3049400E+00, &
     & 0.3122400E+00, 0.3239900E+00, 0.4112900E+00, 0.4405800E+00, &
     & 0.4679200E+00, 0.5305300E+00, 0.6278400E+00, 0.8059000E+00, &
     & 0.9759806E+00, 0.1161160E+01, 0.1432507E+01, 0.1814473E+01, &
     & 0.2232307E+01, 0.2693580E+01, 0.2036385E+01, 0.2036385E+01 /
      data (ref_adm( 3,iz, 3,17),iz = 1,20) / &
     & 0.3015300E+00, 0.3015300E+00, 0.3105200E+00, 0.2992400E+00, &
     & 0.3081300E+00, 0.3411600E+00, 0.3724600E+00, 0.4166200E+00, &
     & 0.4460900E+00, 0.5436100E+00, 0.6442300E+00, 0.7639600E+00, &
     & 0.9651272E+00, 0.1146237E+01, 0.1410484E+01, 0.1778638E+01, &
     & 0.2178064E+01, 0.2602792E+01, 0.2640980E+00, 0.2640980E+00 /
      data (ref_adm( 3,iz, 4,17),iz = 1,20) / &
     & 0.2783900E+00, 0.2783900E+00, 0.2870500E+00, 0.3163600E+00, &
     & 0.2900800E+00, 0.3178800E+00, 0.3734400E+00, 0.4547900E+00, &
     & 0.4543800E+00, 0.5480400E+00, 0.6320800E+00, 0.7470800E+00, &
     & 0.9427564E+00, 0.1114239E+01, 0.1364479E+01, 0.1705383E+01, &
     & 0.2066377E+01, 0.2426158E+01, 0.1828740E+01, 0.1828740E+01 /
      data (ref_adm( 3,iz, 5,17),iz = 1,20) / &
     & 0.2665000E+00, 0.2665000E+00, 0.2790900E+00, 0.2866100E+00, &
     & 0.3238200E+00, 0.3357000E+00, 0.3718500E+00, 0.3967400E+00, &
     & 0.4375400E+00, 0.4986200E+00, 0.6123600E+00, 0.7624200E+00, &
     & 0.9103524E+00, 0.1069524E+01, 0.1301051E+01, 0.1606725E+01, &
     & 0.1921120E+01, 0.2208797E+01, 0.1647069E+01, 0.1647069E+01 /
      data (ref_adm( 3,iz, 6,17),iz = 1,20) / &
     & 0.2879300E+00, 0.2879300E+00, 0.3087200E+00, 0.3081900E+00, &
     & 0.3433300E+00, 0.3937700E+00, 0.3986900E+00, 0.4500000E+00, &
     & 0.4963200E+00, 0.5679200E+00, 0.6460400E+00, 0.7419000E+00, &
     & 0.9436200E+00, 0.1120400E+01, 0.1360200E+01, 0.1795900E+01, &
     & 0.2024700E+01, 0.2312400E+01, 0.1473241E+01, 0.1473241E+01 /
      data (ref_adm( 3,iz, 7,17),iz = 1,20) / &
     & 0.2918100E+00, 0.2918100E+00, 0.2974900E+00, 0.2883000E+00, &
     & 0.3169500E+00, 0.3198300E+00, 0.3440100E+00, 0.3909400E+00, &
     & 0.3865500E+00, 0.4997800E+00, 0.6076400E+00, 0.6696100E+00, &
     & 0.8342700E+00, 0.1067800E+01, 0.1306000E+01, 0.1660900E+01, &
     & 0.2059900E+01, 0.2173400E+01, 0.1792000E+01, 0.1792000E+01 /
      data (ref_adm( 3,iz, 8,17),iz = 1,20) / &
     & 0.2878000E+00, 0.2878000E+00, 0.2753700E+00, 0.2940500E+00, &
     & 0.3338900E+00, 0.3259300E+00, 0.3672800E+00, 0.4054000E+00, &
     & 0.4401300E+00, 0.4821400E+00, 0.5687600E+00, 0.6123700E+00, &
     & 0.8496700E+00, 0.1022400E+01, 0.1204300E+01, 0.1418100E+01, &
     & 0.1747500E+01, 0.1860100E+01, 0.1607100E+01, 0.1607100E+01 /
      data (ref_adm( 3,iz, 9,17),iz = 1,20) / &
     & 0.2785800E+00, 0.2785800E+00, 0.2645200E+00, 0.2851300E+00, &
     & 0.3331700E+00, 0.3247800E+00, 0.3630500E+00, 0.4054400E+00, &
     & 0.4044500E+00, 0.4848600E+00, 0.5313100E+00, 0.5686100E+00, &
     & 0.7898600E+00, 0.9278300E+00, 0.1069300E+01, 0.1288700E+01, &
     & 0.1553500E+01, 0.1680300E+01, 0.1375900E+01, 0.1375900E+01 /
      data (ref_adm( 3,iz,10,17),iz = 1,20) / &
     & 0.2762600E+00, 0.2762600E+00, 0.2591500E+00, 0.2649900E+00, &
     & 0.3200000E+00, 0.3488800E+00, 0.3482500E+00, 0.3571800E+00, &
     & 0.3857600E+00, 0.4767500E+00, 0.4818000E+00, 0.5675100E+00, &
     & 0.6946300E+00, 0.8631600E+00, 0.9969800E+00, 0.1111500E+01, &
     & 0.1343100E+01, 0.1419200E+01, 0.1136600E+01, 0.1136600E+01 /
      data (ref_adm( 3,iz,11,17),iz = 1,20) / &
     & 0.2965600E+00, 0.2965600E+00, 0.2937500E+00, 0.2962600E+00, &
     & 0.2941500E+00, 0.3412300E+00, 0.3198300E+00, 0.3660900E+00, &
     & 0.3954600E+00, 0.4303100E+00, 0.4755100E+00, 0.5295300E+00, &
     & 0.6516000E+00, 0.7861400E+00, 0.8393600E+00, 0.1055100E+01, &
     & 0.1154700E+01, 0.1178900E+01, 0.1023800E+01, 0.1023800E+01 /
      data (ref_adm( 3,iz,12,17),iz = 1,20) / &
     & 0.2914300E+00, 0.2914300E+00, 0.2760100E+00, 0.2618700E+00, &
     & 0.3034900E+00, 0.3227500E+00, 0.3279200E+00, 0.3842800E+00, &
     & 0.3582000E+00, 0.3531200E+00, 0.4353300E+00, 0.4954500E+00, &
     & 0.5670700E+00, 0.7208900E+00, 0.7879700E+00, 0.9302100E+00, &
     & 0.1034800E+01, 0.1026600E+01, 0.7881247E+00, 0.7881247E+00 /
      data (ref_adm( 3,iz,13,17),iz = 1,20) / &
     & 0.2728700E+00, 0.2728700E+00, 0.2822700E+00, 0.3303000E+00, &
     & 0.2991600E+00, 0.2938600E+00, 0.3340000E+00, 0.3274700E+00, &
     & 0.3910800E+00, 0.4127000E+00, 0.4199700E+00, 0.4748700E+00, &
     & 0.5285800E+00, 0.6180600E+00, 0.7396600E+00, 0.8103100E+00, &
     & 0.9085100E+00, 0.9639700E+00, 0.7244028E+00, 0.7244028E+00 /
      data (ref_adm( 3,iz,14,17),iz = 1,20) / &
     & 0.2633400E+00, 0.2633400E+00, 0.2918400E+00, 0.3105000E+00, &
     & 0.3268200E+00, 0.3293200E+00, 0.3284500E+00, 0.3345000E+00, &
     & 0.3892100E+00, 0.4210600E+00, 0.4390200E+00, 0.4543600E+00, &
     & 0.5058000E+00, 0.5699200E+00, 0.6557500E+00, 0.7590900E+00, &
     & 0.8397500E+00, 0.8659300E+00, 0.6726429E+00, 0.6726429E+00 /
      data (ref_adm( 3,iz,15,17),iz = 1,20) / &
     & 0.2751500E+00, 0.2751500E+00, 0.2813500E+00, 0.2945400E+00, &
     & 0.2973800E+00, 0.3030900E+00, 0.3105100E+00, 0.3394500E+00, &
     & 0.3532300E+00, 0.3647600E+00, 0.3972600E+00, 0.4301700E+00, &
     & 0.4588200E+00, 0.4966700E+00, 0.5713200E+00, 0.6802100E+00, &
     & 0.7588100E+00, 0.6803837E+00, 0.6298993E+00, 0.6298993E+00 /
      data (ref_adm( 3,iz,16,17),iz = 1,20) / &
     & 0.3048600E+00, 0.3048600E+00, 0.2668300E+00, 0.2649000E+00, &
     & 0.2865100E+00, 0.2883000E+00, 0.2935900E+00, 0.3128600E+00, &
     & 0.3304400E+00, 0.3454200E+00, 0.3750600E+00, 0.3969500E+00, &
     & 0.4295500E+00, 0.4657400E+00, 0.5482300E+00, 0.6432600E+00, &
     & 0.6977700E+00, 0.6281993E+00, 0.5961465E+00, 0.5961465E+00 /
      data (ref_adm( 3,iz,17,17),iz = 1,20) / &
     & 0.2936100E+00, 0.2936100E+00, 0.2900400E+00, 0.3105600E+00, &
     & 0.3039500E+00, 0.3103900E+00, 0.3432900E+00, 0.3439300E+00, &
     & 0.3394500E+00, 0.3664200E+00, 0.4014000E+00, 0.4278700E+00, &
     & 0.4391900E+00, 0.4727400E+00, 0.5428600E+00, 0.5717700E+00, &
     & 0.5790295E+00, 0.5865444E+00, 0.5692866E+00, 0.5692866E+00 /
      data (ref_adm( 3,iz,18,17),iz = 1,20) / &
     & 0.2970100E+00, 0.2970100E+00, 0.2794300E+00, 0.2914100E+00, &
     & 0.2839700E+00, 0.3287600E+00, 0.3180400E+00, 0.3101000E+00, &
     & 0.3139200E+00, 0.3449900E+00, 0.3818500E+00, 0.4034400E+00, &
     & 0.4134000E+00, 0.4349200E+00, 0.4837200E+00, 0.4804700E+00, &
     & 0.6031511E+00, 0.6788226E+00, 0.8266943E+00, 0.8266943E+00 /
      data (ref_adm( 3,iz,19,17),iz = 1,20) / &
     & 0.2960500E+00, 0.2960500E+00, 0.2587400E+00, 0.2702800E+00, &
     & 0.2865700E+00, 0.3089700E+00, 0.3009600E+00, 0.3176900E+00, &
     & 0.3304900E+00, 0.3491500E+00, 0.3692400E+00, 0.3992100E+00, &
     & 0.3964600E+00, 0.4275800E+00, 0.4959700E+00, 0.6230000E+00, &
     & 0.5761613E+00, 0.6481715E+00, 0.8040249E+00, 0.8040249E+00 /
      data (ref_adm( 3,iz,20,17),iz = 1,20) / &
     & 0.2919600E+00, 0.2919600E+00, 0.2917300E+00, 0.2506700E+00, &
     & 0.2641100E+00, 0.2609000E+00, 0.3092900E+00, 0.3186600E+00, &
     & 0.3440600E+00, 0.3295400E+00, 0.3507500E+00, 0.3904700E+00, &
     & 0.3987300E+00, 0.4143200E+00, 0.4487800E+00, 0.5121843E+00, &
     & 0.5588101E+00, 0.6290492E+00, 0.7933868E+00, 0.7933868E+00 /
      data (ref_adm( 3,iz,21,17),iz = 1,20) / &
     & 0.2727900E+00, 0.2727900E+00, 0.2697900E+00, 0.2744600E+00, &
     & 0.2802700E+00, 0.2981500E+00, 0.3468300E+00, 0.2864500E+00, &
     & 0.3389700E+00, 0.3580700E+00, 0.3683400E+00, 0.3915800E+00, &
     & 0.3979200E+00, 0.4172200E+00, 0.4391000E+00, 0.5555400E+00, &
     & 0.5484661E+00, 0.6185665E+00, 0.7923014E+00, 0.7923014E+00 /
      data (ref_adm( 3,iz,22,17),iz = 1,20) / &
     & 0.2611800E+00, 0.2611800E+00, 0.2785400E+00, 0.2826400E+00, &
     & 0.2664400E+00, 0.2931300E+00, 0.3148200E+00, 0.3148800E+00, &
     & 0.3304300E+00, 0.3593800E+00, 0.3802900E+00, 0.3764400E+00, &
     & 0.3946800E+00, 0.4245800E+00, 0.4415800E+00, 0.4811100E+00, &
     & 0.5373881E+00, 0.5909641E+00, 0.7253947E+00, 0.7253947E+00 /
      data (ref_adm( 3,iz,23,17),iz = 1,20) / &
     & 0.2512000E+00, 0.2512000E+00, 0.2615000E+00, 0.2547700E+00, &
     & 0.2501100E+00, 0.2643800E+00, 0.2781400E+00, 0.2894500E+00, &
     & 0.2995700E+00, 0.3190800E+00, 0.3212800E+00, 0.3478600E+00, &
     & 0.3766900E+00, 0.4041300E+00, 0.4538700E+00, 0.4742300E+00, &
     & 0.5383062E+00, 0.5944021E+00, 0.7399319E+00, 0.7399319E+00 /
      data (ref_adm( 3,iz,24,17),iz = 1,20) / &
     & 0.2886300E+00, 0.2886300E+00, 0.2920600E+00, 0.2957800E+00, &
     & 0.3010600E+00, 0.3137800E+00, 0.3129200E+00, 0.3210900E+00, &
     & 0.3258700E+00, 0.3417100E+00, 0.3640100E+00, 0.3934400E+00, &
     & 0.4144000E+00, 0.4381200E+00, 0.4633800E+00, 0.5024200E+00, &
     & 0.7114200E+00, 0.6051897E+00, 0.7623593E+00, 0.7623593E+00 /
      data (ref_adm( 3,iz,25,17),iz = 1,20) / &
     & 0.3177200E+00, 0.3177200E+00, 0.3046600E+00, 0.3225600E+00, &
     & 0.3086300E+00, 0.3221100E+00, 0.3339200E+00, 0.3459800E+00, &
     & 0.3605400E+00, 0.3683300E+00, 0.3935900E+00, 0.4057100E+00, &
     & 0.4254300E+00, 0.4604400E+00, 0.4720400E+00, 0.5266900E+00, &
     & 0.5467000E+00, 0.6236792E+00, 0.7916112E+00, 0.7916112E+00 /
      data (ref_adm( 3,iz,26,17),iz = 1,20) / &
     & 0.3044400E+00, 0.3044400E+00, 0.2629400E+00, 0.2880300E+00, &
     & 0.3128700E+00, 0.3054200E+00, 0.3375800E+00, 0.3301400E+00, &
     & 0.3434500E+00, 0.3621600E+00, 0.3623200E+00, 0.3788900E+00, &
     & 0.4070900E+00, 0.4462300E+00, 0.4722100E+00, 0.5268900E+00, &
     & 0.5842200E+00, 0.7026000E+00, 0.8284873E+00, 0.8284873E+00 /
      data (ref_adm( 3,iz,27,17),iz = 1,20) / &
     & 0.2986200E+00, 0.2986200E+00, 0.2507400E+00, 0.2678900E+00, &
     & 0.3227000E+00, 0.3132400E+00, 0.3377200E+00, 0.3573300E+00, &
     & 0.3687100E+00, 0.3453200E+00, 0.3698800E+00, 0.4066000E+00, &
     & 0.4285600E+00, 0.4600800E+00, 0.5100500E+00, 0.5564500E+00, &
     & 0.6152400E+00, 0.6803200E+00, 0.8052600E+00, 0.8052600E+00 /
      data (ref_adm( 3,iz,28,17),iz = 1,20) / &
     & 0.2947800E+00, 0.2947800E+00, 0.2721600E+00, 0.2779300E+00, &
     & 0.2820700E+00, 0.2621300E+00, 0.3105900E+00, 0.3330800E+00, &
     & 0.3394000E+00, 0.3372300E+00, 0.3862900E+00, 0.4230800E+00, &
     & 0.4672300E+00, 0.4885700E+00, 0.5305600E+00, 0.6003700E+00, &
     & 0.6582900E+00, 0.7424000E+00, 0.7535600E+00, 0.7535600E+00 /
      data (ref_adm( 3,iz,29,17),iz = 1,20) / &
     & 0.2850000E+00, 0.2850000E+00, 0.2738000E+00, 0.2627400E+00, &
     & 0.2515300E+00, 0.2640500E+00, 0.2982500E+00, 0.3386200E+00, &
     & 0.3226000E+00, 0.3442300E+00, 0.3898700E+00, 0.4216500E+00, &
     & 0.4611800E+00, 0.4989400E+00, 0.5532600E+00, 0.6293800E+00, &
     & 0.6879400E+00, 0.8065100E+00, 0.7781400E+00, 0.7781400E+00 /
      data (ref_adm( 3,iz,30,17),iz = 1,20) / &
     & 0.2672200E+00, 0.2672200E+00, 0.3077800E+00, 0.2633400E+00, &
     & 0.2603900E+00, 0.2718200E+00, 0.2988700E+00, 0.3377100E+00, &
     & 0.3360400E+00, 0.3739300E+00, 0.3973400E+00, 0.4342100E+00, &
     & 0.4734600E+00, 0.5436600E+00, 0.6099900E+00, 0.6703200E+00, &
     & 0.7471600E+00, 0.8569300E+00, 0.8397500E+00, 0.8397500E+00 /
      data (ref_adm( 3,iz,31,17),iz = 1,20) / &
     & 0.2694400E+00, 0.2694400E+00, 0.3062900E+00, 0.2835700E+00, &
     & 0.2817700E+00, 0.3147600E+00, 0.2910000E+00, 0.3053000E+00, &
     & 0.3265600E+00, 0.3749100E+00, 0.4196600E+00, 0.4479200E+00, &
     & 0.4874700E+00, 0.5437100E+00, 0.6023200E+00, 0.6767400E+00, &
     & 0.7395300E+00, 0.8519300E+00, 0.8263800E+00, 0.8263800E+00 /
      data (ref_adm( 3,iz,32,17),iz = 1,20) / &
     & 0.2659500E+00, 0.2659500E+00, 0.2789800E+00, 0.2747100E+00, &
     & 0.2759600E+00, 0.2939500E+00, 0.2838000E+00, 0.3109700E+00, &
     & 0.3306500E+00, 0.3790000E+00, 0.4137100E+00, 0.4712500E+00, &
     & 0.5137400E+00, 0.5589500E+00, 0.6077000E+00, 0.6724400E+00, &
     & 0.7607300E+00, 0.8757200E+00, 0.8171000E+00, 0.8171000E+00 /
      data (ref_adm( 3,iz,33,17),iz = 1,20) / &
     & 0.3206300E+00, 0.3206300E+00, 0.3139400E+00, 0.3396500E+00, &
     & 0.3112100E+00, 0.3421800E+00, 0.3698200E+00, 0.3689400E+00, &
     & 0.3988000E+00, 0.4328800E+00, 0.4556100E+00, 0.4807800E+00, &
     & 0.5289100E+00, 0.5759700E+00, 0.6256900E+00, 0.6992800E+00, &
     & 0.7978100E+00, 0.9414700E+00, 0.8961700E+00, 0.8961700E+00 /
      data (ref_adm( 3,iz,34,17),iz = 1,20) / &
     & 0.2989200E+00, 0.2989200E+00, 0.2680000E+00, 0.2791500E+00, &
     & 0.3015600E+00, 0.2932900E+00, 0.3268600E+00, 0.3388600E+00, &
     & 0.3670200E+00, 0.4278400E+00, 0.4524200E+00, 0.4987700E+00, &
     & 0.5130900E+00, 0.5626900E+00, 0.6216200E+00, 0.7038800E+00, &
     & 0.8026900E+00, 0.9362600E+00, 0.9026700E+00, 0.9026700E+00 /
      data (ref_adm( 3,iz,35,17),iz = 1,20) / &
     & 0.2997900E+00, 0.2997900E+00, 0.2661900E+00, 0.2735300E+00, &
     & 0.2864400E+00, 0.3098900E+00, 0.3121800E+00, 0.3129600E+00, &
     & 0.3432100E+00, 0.4092800E+00, 0.4442200E+00, 0.4833500E+00, &
     & 0.5282400E+00, 0.5765200E+00, 0.6396400E+00, 0.7185100E+00, &
     & 0.8243600E+00, 0.9664200E+00, 0.8944300E+00, 0.8944300E+00 /
      data (ref_adm( 3,iz,36,17),iz = 1,20) / &
     & 0.2424800E+00, 0.2424800E+00, 0.2764400E+00, 0.2671100E+00, &
     & 0.2856100E+00, 0.2898400E+00, 0.3040200E+00, 0.3224000E+00, &
     & 0.3555400E+00, 0.3761400E+00, 0.4200300E+00, 0.4788100E+00, &
     & 0.5171400E+00, 0.5987700E+00, 0.6576600E+00, 0.7406800E+00, &
     & 0.8240700E+00, 0.9567100E+00, 0.9661000E+00, 0.9661000E+00 /
      data (ref_adm( 3,iz,37,17),iz = 1,20) / &
     & 0.2710600E+00, 0.2710600E+00, 0.2576300E+00, 0.2916800E+00, &
     & 0.2855200E+00, 0.2830500E+00, 0.3230000E+00, 0.3170300E+00, &
     & 0.3441700E+00, 0.3729300E+00, 0.3824500E+00, 0.4633700E+00, &
     & 0.4953300E+00, 0.5913900E+00, 0.6565300E+00, 0.7360300E+00, &
     & 0.8411300E+00, 0.9976900E+00, 0.9719100E+00, 0.9719100E+00 /
      data (ref_adm( 3,iz,38,17),iz = 1,20) / &
     & 0.2710600E+00, 0.2710600E+00, 0.2576300E+00, 0.2916800E+00, &
     & 0.2855200E+00, 0.2830500E+00, 0.3230000E+00, 0.3170300E+00, &
     & 0.3441700E+00, 0.3729300E+00, 0.3824500E+00, 0.4633700E+00, &
     & 0.4953300E+00, 0.5913900E+00, 0.6565300E+00, 0.7360300E+00, &
     & 0.8411300E+00, 0.9976900E+00, 0.9719100E+00, 0.9719100E+00 /
! Solar Zenith Angle 85.0 Albedo  0.5975061E+00
      data (ref_adm( 3,iz, 1,18),iz = 1,20) / &
     & 0.3179100E+00, 0.3179100E+00, 0.2806600E+00, 0.3023900E+00, &
     & 0.3009300E+00, 0.3756000E+00, 0.4149700E+00, 0.4084700E+00, &
     & 0.5049500E+00, 0.5593600E+00, 0.7205500E+00, 0.9102600E+00, &
     & 0.1213305E+01, 0.1512572E+01, 0.2030360E+01, 0.2937618E+01, &
     & 0.4231194E+01, 0.5075955E+01, 0.4478514E+01, 0.4478514E+01 /
      data (ref_adm( 3,iz, 2,18),iz = 1,20) / &
     & 0.3179100E+00, 0.3179100E+00, 0.2806600E+00, 0.3023900E+00, &
     & 0.3009300E+00, 0.3756000E+00, 0.4149700E+00, 0.4084700E+00, &
     & 0.5049500E+00, 0.5593600E+00, 0.7205500E+00, 0.9102600E+00, &
     & 0.1213305E+01, 0.1512572E+01, 0.2030360E+01, 0.2937618E+01, &
     & 0.4231194E+01, 0.5075955E+01, 0.4478514E+01, 0.4478514E+01 /
      data (ref_adm( 3,iz, 3,18),iz = 1,20) / &
     & 0.2917000E+00, 0.2917000E+00, 0.2731700E+00, 0.3236900E+00, &
     & 0.3274500E+00, 0.3511700E+00, 0.4579800E+00, 0.3892000E+00, &
     & 0.5374800E+00, 0.5635500E+00, 0.7105200E+00, 0.9978600E+00, &
     & 0.1196370E+01, 0.1484414E+01, 0.1979464E+01, 0.2828515E+01, &
     & 0.4101821E+01, 0.4928809E+01, 0.5380790E+00, 0.5380790E+00 /
      data (ref_adm( 3,iz, 4,18),iz = 1,20) / &
     & 0.2813200E+00, 0.2813200E+00, 0.3299200E+00, 0.2831500E+00, &
     & 0.2720100E+00, 0.4091700E+00, 0.3640100E+00, 0.4815400E+00, &
     & 0.5132300E+00, 0.5948300E+00, 0.7293600E+00, 0.8969900E+00, &
     & 0.1160190E+01, 0.1426411E+01, 0.1878741E+01, 0.2621168E+01, &
     & 0.3686992E+01, 0.4796729E+01, 0.3775063E+01, 0.3775063E+01 /
      data (ref_adm( 3,iz, 5,18),iz = 1,20) / &
     & 0.2758700E+00, 0.2758700E+00, 0.3183800E+00, 0.3671600E+00, &
     & 0.2875300E+00, 0.2862000E+00, 0.3326000E+00, 0.4483300E+00, &
     & 0.4680400E+00, 0.4958000E+00, 0.5793400E+00, 0.7834400E+00, &
     & 0.1111152E+01, 0.1349481E+01, 0.1746793E+01, 0.2371570E+01, &
     & 0.3184216E+01, 0.4436861E+01, 0.3615655E+01, 0.3615655E+01 /
      data (ref_adm( 3,iz, 6,18),iz = 1,20) / &
     & 0.3075200E+00, 0.3075200E+00, 0.3136700E+00, 0.3271100E+00, &
     & 0.3426900E+00, 0.3892900E+00, 0.4326700E+00, 0.4569100E+00, &
     & 0.5079900E+00, 0.5284400E+00, 0.6691200E+00, 0.8120200E+00, &
     & 0.8676400E+00, 0.1001900E+01, 0.1940800E+01, 0.2115900E+01, &
     & 0.2739128E+01, 0.3292900E+01, 0.3189948E+01, 0.3189948E+01 /
      data (ref_adm( 3,iz, 7,18),iz = 1,20) / &
     & 0.3428700E+00, 0.3428700E+00, 0.2681500E+00, 0.3951900E+00, &
     & 0.3138500E+00, 0.3469900E+00, 0.3798700E+00, 0.3806100E+00, &
     & 0.4885000E+00, 0.5677600E+00, 0.6806500E+00, 0.7921000E+00, &
     & 0.8951700E+00, 0.1196500E+01, 0.1529200E+01, 0.2084200E+01, &
     & 0.2434000E+01, 0.2890500E+01, 0.2285000E+01, 0.2285000E+01 /
      data (ref_adm( 3,iz, 8,18),iz = 1,20) / &
     & 0.2808400E+00, 0.2808400E+00, 0.3344500E+00, 0.2857200E+00, &
     & 0.2628200E+00, 0.3617100E+00, 0.3845700E+00, 0.3496600E+00, &
     & 0.4291000E+00, 0.5617400E+00, 0.6506100E+00, 0.7766600E+00, &
     & 0.9588000E+00, 0.1194200E+01, 0.1375700E+01, 0.1774600E+01, &
     & 0.2272000E+01, 0.2605300E+01, 0.2280800E+01, 0.2280800E+01 /
      data (ref_adm( 3,iz, 9,18),iz = 1,20) / &
     & 0.3819400E+00, 0.3819400E+00, 0.2774100E+00, 0.3008700E+00, &
     & 0.3657600E+00, 0.3764500E+00, 0.3134500E+00, 0.4111600E+00, &
     & 0.4799600E+00, 0.4970100E+00, 0.6031400E+00, 0.6744400E+00, &
     & 0.9142400E+00, 0.1048000E+01, 0.1326600E+01, 0.1529200E+01, &
     & 0.1941600E+01, 0.2227500E+01, 0.1803900E+01, 0.1803900E+01 /
      data (ref_adm( 3,iz,10,18),iz = 1,20) / &
     & 0.3029000E+00, 0.3029000E+00, 0.2784800E+00, 0.2942600E+00, &
     & 0.3656100E+00, 0.3523400E+00, 0.3162400E+00, 0.4372800E+00, &
     & 0.4065200E+00, 0.5543000E+00, 0.5327100E+00, 0.6028300E+00, &
     & 0.8578300E+00, 0.9812200E+00, 0.1143000E+01, 0.1391900E+01, &
     & 0.1848500E+01, 0.1985400E+01, 0.1591600E+01, 0.1591600E+01 /
      data (ref_adm( 3,iz,11,18),iz = 1,20) / &
     & 0.2998000E+00, 0.2998000E+00, 0.2913200E+00, 0.3608200E+00, &
     & 0.3441800E+00, 0.3306900E+00, 0.4075200E+00, 0.3554000E+00, &
     & 0.3946900E+00, 0.4446700E+00, 0.5207400E+00, 0.6837700E+00, &
     & 0.7585700E+00, 0.8172100E+00, 0.1020400E+01, 0.1230300E+01, &
     & 0.1777200E+01, 0.1725400E+01, 0.1505801E+01, 0.1505801E+01 /
      data (ref_adm( 3,iz,12,18),iz = 1,20) / &
     & 0.3518900E+00, 0.3518900E+00, 0.3158400E+00, 0.3130700E+00, &
     & 0.3157500E+00, 0.3279400E+00, 0.3452900E+00, 0.3241800E+00, &
     & 0.4470400E+00, 0.4051000E+00, 0.5854000E+00, 0.6249700E+00, &
     & 0.6291700E+00, 0.8528200E+00, 0.1011300E+01, 0.1104700E+01, &
     & 0.1480400E+01, 0.1570000E+01, 0.1349722E+01, 0.1349722E+01 /
      data (ref_adm( 3,iz,13,18),iz = 1,20) / &
     & 0.3198800E+00, 0.3198800E+00, 0.3352200E+00, 0.3155135E+00, &
     & 0.3627000E+00, 0.3014400E+00, 0.3596200E+00, 0.3239100E+00, &
     & 0.3758800E+00, 0.4285400E+00, 0.4850300E+00, 0.5773000E+00, &
     & 0.6580500E+00, 0.8063600E+00, 0.8552800E+00, 0.1054900E+01, &
     & 0.1210300E+01, 0.1171984E+01, 0.1223257E+01, 0.1223257E+01 /
      data (ref_adm( 3,iz,14,18),iz = 1,20) / &
     & 0.2717700E+00, 0.2717700E+00, 0.2933100E+00, 0.3371000E+00, &
     & 0.3610600E+00, 0.2982700E+00, 0.3620000E+00, 0.3538800E+00, &
     & 0.3351500E+00, 0.4497300E+00, 0.4552800E+00, 0.5115100E+00, &
     & 0.6090300E+00, 0.7615400E+00, 0.7900800E+00, 0.9010900E+00, &
     & 0.9552100E+00, 0.1044444E+01, 0.1123085E+01, 0.1123085E+01 /
      data (ref_adm( 3,iz,15,18),iz = 1,20) / &
     & 0.2852400E+00, 0.2852400E+00, 0.2971100E+00, 0.2840400E+00, &
     & 0.3080100E+00, 0.3126100E+00, 0.3443500E+00, 0.3483000E+00, &
     & 0.3637900E+00, 0.3749700E+00, 0.4137000E+00, 0.4484900E+00, &
     & 0.4568900E+00, 0.4978000E+00, 0.7372800E+00, 0.8487100E+00, &
     & 0.1075300E+01, 0.9429716E+00, 0.1041930E+01, 0.1041930E+01 /
      data (ref_adm( 3,iz,16,18),iz = 1,20) / &
     & 0.3324100E+00, 0.3324100E+00, 0.3139500E+00, 0.2946000E+00, &
     & 0.2844000E+00, 0.2894100E+00, 0.2974700E+00, 0.3179400E+00, &
     & 0.3612400E+00, 0.3600800E+00, 0.3565800E+00, 0.4437800E+00, &
     & 0.4678700E+00, 0.4959500E+00, 0.7031000E+00, 0.7204100E+00, &
     & 0.7725352E+00, 0.8643727E+00, 0.9785815E+00, 0.9785815E+00 /
      data (ref_adm( 3,iz,17,18),iz = 1,20) / &
     & 0.2862700E+00, 0.2862700E+00, 0.3020200E+00, 0.3569100E+00, &
     & 0.3373300E+00, 0.3274483E+00, 0.3087500E+00, 0.3428800E+00, &
     & 0.3431600E+00, 0.3486700E+00, 0.3630300E+00, 0.4638600E+00, &
     & 0.5571200E+00, 0.5848100E+00, 0.6644900E+00, 0.7197800E+00, &
     & 0.7176639E+00, 0.8010823E+00, 0.9277745E+00, 0.9277745E+00 /
      data (ref_adm( 3,iz,18,18),iz = 1,20) / &
     & 0.3217500E+00, 0.3217500E+00, 0.3223500E+00, 0.3159300E+00, &
     & 0.3599500E+00, 0.3440500E+00, 0.4081700E+00, 0.3480700E+00, &
     & 0.3229600E+00, 0.3568400E+00, 0.3438500E+00, 0.4109200E+00, &
     & 0.5067300E+00, 0.5239000E+00, 0.6478300E+00, 0.6460055E+00, &
     & 0.7432472E+00, 0.9138533E+00, 0.1374979E+01, 0.1374979E+01 /
      data (ref_adm( 3,iz,19,18),iz = 1,20) / &
     & 0.3460200E+00, 0.3460200E+00, 0.2892500E+00, 0.3267700E+00, &
     & 0.3168800E+00, 0.3480400E+00, 0.3723900E+00, 0.3698900E+00, &
     & 0.3159800E+00, 0.3150800E+00, 0.3475100E+00, 0.4353400E+00, &
     & 0.4833700E+00, 0.4830900E+00, 0.5578400E+00, 0.6222878E+00, &
     & 0.7132278E+00, 0.8757896E+00, 0.1336650E+01, 0.1336650E+01 /
      data (ref_adm( 3,iz,20,18),iz = 1,20) / &
     & 0.2729700E+00, 0.2729700E+00, 0.3113600E+00, 0.3238900E+00, &
     & 0.3100600E+00, 0.3709700E+00, 0.3408100E+00, 0.3544600E+00, &
     & 0.3836100E+00, 0.3044600E+00, 0.3366100E+00, 0.4021500E+00, &
     & 0.4642500E+00, 0.5231700E+00, 0.5760700E+00, 0.6066593E+00, &
     & 0.6938238E+00, 0.8516411E+00, 0.1319061E+01, 0.1319061E+01 /
      data (ref_adm( 3,iz,21,18),iz = 1,20) / &
     & 0.3070600E+00, 0.3070600E+00, 0.3418000E+00, 0.2860900E+00, &
     & 0.3314100E+00, 0.2622400E+00, 0.2777100E+00, 0.3436600E+00, &
     & 0.3870600E+00, 0.3923800E+00, 0.3352800E+00, 0.3880800E+00, &
     & 0.4986500E+00, 0.4943300E+00, 0.4691500E+00, 0.5959628E+00, &
     & 0.6810979E+00, 0.8373887E+00, 0.1317041E+01, 0.1317041E+01 /
      data (ref_adm( 3,iz,22,18),iz = 1,20) / &
     & 0.3029600E+00, 0.3029600E+00, 0.3057100E+00, 0.3548800E+00, &
     & 0.2918500E+00, 0.3257200E+00, 0.3040900E+00, 0.2728400E+00, &
     & 0.3307300E+00, 0.3742100E+00, 0.3406200E+00, 0.3762200E+00, &
     & 0.4145000E+00, 0.4460700E+00, 0.4348500E+00, 0.5803586E+00, &
     & 0.6452722E+00, 0.7568617E+00, 0.1080229E+01, 0.1080229E+01 /
      data (ref_adm( 3,iz,23,18),iz = 1,20) / &
     & 0.2967300E+00, 0.2967300E+00, 0.2828000E+00, 0.2984300E+00, &
     & 0.2953900E+00, 0.3035600E+00, 0.3035200E+00, 0.3117400E+00, &
     & 0.3399700E+00, 0.3468200E+00, 0.3688100E+00, 0.3913800E+00, &
     & 0.4324300E+00, 0.4822300E+00, 0.4794700E+00, 0.5346400E+00, &
     & 0.6439317E+00, 0.7582217E+00, 0.1101238E+01, 0.1101238E+01 /
      data (ref_adm( 3,iz,24,18),iz = 1,20) / &
     & 0.3026800E+00, 0.3026800E+00, 0.3108300E+00, 0.3362300E+00, &
     & 0.3259700E+00, 0.3406500E+00, 0.3475600E+00, 0.3557500E+00, &
     & 0.3533600E+00, 0.3848200E+00, 0.4101700E+00, 0.4323700E+00, &
     & 0.4821700E+00, 0.5253100E+00, 0.5173800E+00, 0.5581600E+00, &
     & 0.6492538E+00, 0.7677358E+00, 0.1134184E+01, 0.1134184E+01 /
      data (ref_adm( 3,iz,25,18),iz = 1,20) / &
     & 0.3233600E+00, 0.3233600E+00, 0.3195800E+00, 0.4109000E+00, &
     & 0.3311300E+00, 0.3067900E+00, 0.4292300E+00, 0.3572500E+00, &
     & 0.4413800E+00, 0.4158100E+00, 0.3704900E+00, 0.3799300E+00, &
     & 0.4986500E+00, 0.5404700E+00, 0.5197900E+00, 0.5903100E+00, &
     & 0.7225800E+00, 0.7852420E+00, 0.1177170E+01, 0.1177170E+01 /
      data (ref_adm( 3,iz,26,18),iz = 1,20) / &
     & 0.2839100E+00, 0.2839100E+00, 0.3129600E+00, 0.3271800E+00, &
     & 0.2883300E+00, 0.3536300E+00, 0.3729100E+00, 0.3758000E+00, &
     & 0.3671500E+00, 0.4107100E+00, 0.3782500E+00, 0.4111200E+00, &
     & 0.5074000E+00, 0.5562400E+00, 0.5181300E+00, 0.6317600E+00, &
     & 0.7207800E+00, 0.8135023E+00, 0.1232206E+01, 0.1232206E+01 /
      data (ref_adm( 3,iz,27,18),iz = 1,20) / &
     & 0.3008900E+00, 0.3008900E+00, 0.3083900E+00, 0.3788600E+00, &
     & 0.3397500E+00, 0.3241800E+00, 0.3628300E+00, 0.3191100E+00, &
     & 0.3051400E+00, 0.3816200E+00, 0.4103800E+00, 0.4271200E+00, &
     & 0.4678400E+00, 0.5684600E+00, 0.5452200E+00, 0.6258500E+00, &
     & 0.7506800E+00, 0.9406000E+00, 0.1292130E+01, 0.1292130E+01 /
      data (ref_adm( 3,iz,28,18),iz = 1,20) / &
     & 0.3138900E+00, 0.3138900E+00, 0.3366000E+00, 0.2922000E+00, &
     & 0.2294200E+00, 0.2933700E+00, 0.3161800E+00, 0.3414900E+00, &
     & 0.3489000E+00, 0.3702500E+00, 0.4593200E+00, 0.4192400E+00, &
     & 0.5109600E+00, 0.5354500E+00, 0.6061700E+00, 0.7173900E+00, &
     & 0.8137600E+00, 0.1008700E+01, 0.1108200E+01, 0.1108200E+01 /
      data (ref_adm( 3,iz,29,18),iz = 1,20) / &
     & 0.2871400E+00, 0.2871400E+00, 0.3534800E+00, 0.3353200E+00, &
     & 0.2727100E+00, 0.2713400E+00, 0.3800900E+00, 0.3112800E+00, &
     & 0.3862000E+00, 0.4290000E+00, 0.4284000E+00, 0.4339800E+00, &
     & 0.5042000E+00, 0.6310000E+00, 0.6563100E+00, 0.7433600E+00, &
     & 0.8726800E+00, 0.1088100E+01, 0.1153900E+01, 0.1153900E+01 /
      data (ref_adm( 3,iz,30,18),iz = 1,20) / &
     & 0.3578000E+00, 0.3578000E+00, 0.2747600E+00, 0.2919200E+00, &
     & 0.3543000E+00, 0.2826000E+00, 0.3606600E+00, 0.3895400E+00, &
     & 0.3524400E+00, 0.4414500E+00, 0.3942200E+00, 0.4504100E+00, &
     & 0.5155300E+00, 0.6081300E+00, 0.6907300E+00, 0.8176700E+00, &
     & 0.1010100E+01, 0.1217000E+01, 0.1419900E+01, 0.1419900E+01 /
      data (ref_adm( 3,iz,31,18),iz = 1,20) / &
     & 0.3416300E+00, 0.3416300E+00, 0.2605300E+00, 0.2803200E+00, &
     & 0.3542200E+00, 0.2862400E+00, 0.3654100E+00, 0.3415700E+00, &
     & 0.3254100E+00, 0.4274700E+00, 0.4519300E+00, 0.4547500E+00, &
     & 0.5539700E+00, 0.6549600E+00, 0.7375700E+00, 0.8056000E+00, &
     & 0.1003400E+01, 0.1279700E+01, 0.1221100E+01, 0.1221100E+01 /
      data (ref_adm( 3,iz,32,18),iz = 1,20) / &
     & 0.2900500E+00, 0.2900500E+00, 0.2847500E+00, 0.3045500E+00, &
     & 0.3833800E+00, 0.3465700E+00, 0.3611100E+00, 0.3278400E+00, &
     & 0.3311500E+00, 0.4376800E+00, 0.4508400E+00, 0.5521700E+00, &
     & 0.5588900E+00, 0.6987600E+00, 0.7100800E+00, 0.8163600E+00, &
     & 0.1027700E+01, 0.1198300E+01, 0.1306800E+01, 0.1306800E+01 /
      data (ref_adm( 3,iz,33,18),iz = 1,20) / &
     & 0.2708100E+00, 0.2708100E+00, 0.3205300E+00, 0.3458300E+00, &
     & 0.4040900E+00, 0.3833600E+00, 0.4116800E+00, 0.4569200E+00, &
     & 0.4057300E+00, 0.4850700E+00, 0.5251200E+00, 0.5759300E+00, &
     & 0.6133000E+00, 0.7308400E+00, 0.7942500E+00, 0.9418400E+00, &
     & 0.1180900E+01, 0.1363800E+01, 0.1594500E+01, 0.1594500E+01 /
      data (ref_adm( 3,iz,34,18),iz = 1,20) / &
     & 0.2868500E+00, 0.2868500E+00, 0.2458600E+00, 0.2406700E+00, &
     & 0.2868900E+00, 0.3074900E+00, 0.3772200E+00, 0.3776400E+00, &
     & 0.4185700E+00, 0.4136000E+00, 0.4762400E+00, 0.5104200E+00, &
     & 0.6117500E+00, 0.6610700E+00, 0.7772700E+00, 0.8796300E+00, &
     & 0.1231200E+01, 0.1333300E+01, 0.1205500E+01, 0.1205500E+01 /
      data (ref_adm( 3,iz,35,18),iz = 1,20) / &
     & 0.2511700E+00, 0.2511700E+00, 0.3525400E+00, 0.2874200E+00, &
     & 0.2604000E+00, 0.2669400E+00, 0.3715600E+00, 0.4454000E+00, &
     & 0.3875600E+00, 0.4287200E+00, 0.4768900E+00, 0.5591900E+00, &
     & 0.5974000E+00, 0.7991800E+00, 0.7579500E+00, 0.9555000E+00, &
     & 0.1086700E+01, 0.1412700E+01, 0.1696100E+01, 0.1696100E+01 /
      data (ref_adm( 3,iz,36,18),iz = 1,20) / &
     & 0.3120900E+00, 0.3120900E+00, 0.3054600E+00, 0.2965300E+00, &
     & 0.2960200E+00, 0.2581600E+00, 0.3270000E+00, 0.3326600E+00, &
     & 0.4211400E+00, 0.4603400E+00, 0.5101800E+00, 0.5608700E+00, &
     & 0.5547200E+00, 0.6848800E+00, 0.8252800E+00, 0.9569000E+00, &
     & 0.1141600E+01, 0.1430500E+01, 0.1572400E+01, 0.1572400E+01 /
      data (ref_adm( 3,iz,37,18),iz = 1,20) / &
     & 0.2313100E+00, 0.2313100E+00, 0.2491300E+00, 0.3322000E+00, &
     & 0.2444600E+00, 0.2948900E+00, 0.3727700E+00, 0.3591500E+00, &
     & 0.5024300E+00, 0.5275300E+00, 0.4661900E+00, 0.5451100E+00, &
     & 0.6982700E+00, 0.6920400E+00, 0.8790600E+00, 0.9144100E+00, &
     & 0.1075400E+01, 0.1390800E+01, 0.1491800E+01, 0.1491800E+01 /
      data (ref_adm( 3,iz,38,18),iz = 1,20) / &
     & 0.2313100E+00, 0.2313100E+00, 0.2491300E+00, 0.3322000E+00, &
     & 0.2444600E+00, 0.2948900E+00, 0.3727700E+00, 0.3591500E+00, &
     & 0.5024300E+00, 0.5275300E+00, 0.4661900E+00, 0.5451100E+00, &
     & 0.6982700E+00, 0.6920400E+00, 0.8790600E+00, 0.9144100E+00, &
     & 0.1075400E+01, 0.1390800E+01, 0.1491800E+01, 0.1491800E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm( 4,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.5550630E+04
      data (ref_adm( 4,iz, 1, 2),iz = 1,20) / &
     & 0.2305579E+00, 0.2305579E+00, 0.2264321E+00, 0.2250029E+00, &
     & 0.2238732E+00, 0.2231006E+00, 0.2217387E+00, 0.2194187E+00, &
     & 0.2164387E+00, 0.2128704E+00, 0.2089894E+00, 0.2036012E+00, &
     & 0.1973122E+00, 0.1913900E+00, 0.1828854E+00, 0.1716857E+00, &
     & 0.1601314E+00, 0.1450136E+00, 0.1183199E+00, 0.1183199E+00 /
      data (ref_adm( 4,iz, 2, 2),iz = 1,20) / &
     & 0.2305579E+00, 0.2305579E+00, 0.2264321E+00, 0.2250029E+00, &
     & 0.2238732E+00, 0.2231006E+00, 0.2217387E+00, 0.2194187E+00, &
     & 0.2164387E+00, 0.2128704E+00, 0.2089894E+00, 0.2036012E+00, &
     & 0.1973122E+00, 0.1913900E+00, 0.1828854E+00, 0.1716857E+00, &
     & 0.1601314E+00, 0.1450136E+00, 0.1183199E+00, 0.1183199E+00 /
      data (ref_adm( 4,iz, 3, 2),iz = 1,20) / &
     & 0.2305579E+00, 0.2305579E+00, 0.2264321E+00, 0.2250029E+00, &
     & 0.2238732E+00, 0.2231006E+00, 0.2217387E+00, 0.2194186E+00, &
     & 0.2164387E+00, 0.2128704E+00, 0.2089894E+00, 0.2036012E+00, &
     & 0.1973122E+00, 0.1913900E+00, 0.1828854E+00, 0.1716857E+00, &
     & 0.1601314E+00, 0.1450136E+00, 0.1183199E+00, 0.1183199E+00 /
      data (ref_adm( 4,iz, 4, 2),iz = 1,20) / &
     & 0.2305579E+00, 0.2305579E+00, 0.2264321E+00, 0.2250029E+00, &
     & 0.2238732E+00, 0.2231006E+00, 0.2217387E+00, 0.2194187E+00, &
     & 0.2164387E+00, 0.2128704E+00, 0.2089894E+00, 0.2036012E+00, &
     & 0.1973122E+00, 0.1810300E+00, 0.1828854E+00, 0.1716857E+00, &
     & 0.1601314E+00, 0.1450136E+00, 0.1183199E+00, 0.1183199E+00 /
      data (ref_adm( 4,iz, 5, 2),iz = 1,20) / &
     & 0.2305579E+00, 0.2305579E+00, 0.2264321E+00, 0.2250029E+00, &
     & 0.2238732E+00, 0.2231006E+00, 0.2217387E+00, 0.2194186E+00, &
     & 0.2164387E+00, 0.2128704E+00, 0.2089894E+00, 0.2036012E+00, &
     & 0.1973122E+00, 0.2017500E+00, 0.1828854E+00, 0.1716857E+00, &
     & 0.1601314E+00, 0.1450136E+00, 0.1183199E+00, 0.1183199E+00 /
      data (ref_adm( 4,iz, 6, 2),iz = 1,20) / &
     & 0.2305579E+00, 0.2305579E+00, 0.2264321E+00, 0.2250029E+00, &
     & 0.2238732E+00, 0.2231006E+00, 0.2217387E+00, 0.2194187E+00, &
     & 0.2164387E+00, 0.2128704E+00, 0.2089894E+00, 0.2036012E+00, &
     & 0.1973122E+00, 0.1913900E+00, 0.1828854E+00, 0.1716857E+00, &
     & 0.1601314E+00, 0.1450136E+00, 0.1183199E+00, 0.1183199E+00 /
      data (ref_adm( 4,iz, 7, 2),iz = 1,20) / &
     & 0.2305579E+00, 0.2305579E+00, 0.2264321E+00, 0.2250029E+00, &
     & 0.2238732E+00, 0.2231006E+00, 0.2217387E+00, 0.2194186E+00, &
     & 0.2164387E+00, 0.2128704E+00, 0.2089894E+00, 0.2036012E+00, &
     & 0.1973122E+00, 0.1913900E+00, 0.1828854E+00, 0.1716857E+00, &
     & 0.1601314E+00, 0.1450136E+00, 0.1183199E+00, 0.1183199E+00 /
      data (ref_adm( 4,iz, 8, 2),iz = 1,20) / &
     & 0.2305579E+00, 0.2305579E+00, 0.2264321E+00, 0.2250029E+00, &
     & 0.2238732E+00, 0.2231006E+00, 0.2217387E+00, 0.2194187E+00, &
     & 0.2164387E+00, 0.2128704E+00, 0.2089894E+00, 0.2036012E+00, &
     & 0.1973122E+00, 0.1913900E+00, 0.1828854E+00, 0.1716857E+00, &
     & 0.1601314E+00, 0.1450136E+00, 0.1183199E+00, 0.1183199E+00 /
      data (ref_adm( 4,iz, 9, 2),iz = 1,20) / &
     & 0.2305579E+00, 0.2305579E+00, 0.2264321E+00, 0.2250029E+00, &
     & 0.2238732E+00, 0.2231006E+00, 0.2217387E+00, 0.2194186E+00, &
     & 0.2164387E+00, 0.2128704E+00, 0.2089894E+00, 0.2036012E+00, &
     & 0.1973122E+00, 0.1913900E+00, 0.1828854E+00, 0.1716857E+00, &
     & 0.1601314E+00, 0.1450136E+00, 0.1183199E+00, 0.1183199E+00 /
      data (ref_adm( 4,iz,10, 2),iz = 1,20) / &
     & 0.2305579E+00, 0.2305579E+00, 0.2264321E+00, 0.2250029E+00, &
     & 0.2238732E+00, 0.2231006E+00, 0.2217387E+00, 0.2194187E+00, &
     & 0.2164387E+00, 0.2128704E+00, 0.2089894E+00, 0.2036012E+00, &
     & 0.1973122E+00, 0.1913900E+00, 0.1828854E+00, 0.1716857E+00, &
     & 0.1601314E+00, 0.1450136E+00, 0.1183199E+00, 0.1183199E+00 /
      data (ref_adm( 4,iz,11, 2),iz = 1,20) / &
     & 0.2305579E+00, 0.2305579E+00, 0.2264321E+00, 0.2250029E+00, &
     & 0.2238732E+00, 0.2231006E+00, 0.2217387E+00, 0.2194186E+00, &
     & 0.2164387E+00, 0.2128704E+00, 0.2089894E+00, 0.2036012E+00, &
     & 0.1973122E+00, 0.1913900E+00, 0.1828854E+00, 0.1716857E+00, &
     & 0.1601314E+00, 0.1450136E+00, 0.1183199E+00, 0.1183199E+00 /
      data (ref_adm( 4,iz,12, 2),iz = 1,20) / &
     & 0.2305579E+00, 0.2305579E+00, 0.2264321E+00, 0.2250029E+00, &
     & 0.2238732E+00, 0.2231006E+00, 0.2217387E+00, 0.2194187E+00, &
     & 0.2164387E+00, 0.2128704E+00, 0.2089894E+00, 0.2036012E+00, &
     & 0.1973122E+00, 0.1913900E+00, 0.1828854E+00, 0.1716857E+00, &
     & 0.1601314E+00, 0.1450136E+00, 0.1183199E+00, 0.1183199E+00 /
      data (ref_adm( 4,iz,13, 2),iz = 1,20) / &
     & 0.2305579E+00, 0.2305579E+00, 0.2264321E+00, 0.2250029E+00, &
     & 0.2238732E+00, 0.2231006E+00, 0.2217387E+00, 0.2194186E+00, &
     & 0.2164387E+00, 0.2128704E+00, 0.2089894E+00, 0.2036012E+00, &
     & 0.1973122E+00, 0.1913900E+00, 0.1828854E+00, 0.1716857E+00, &
     & 0.1601314E+00, 0.1450136E+00, 0.1183199E+00, 0.1183199E+00 /
      data (ref_adm( 4,iz,14, 2),iz = 1,20) / &
     & 0.2305579E+00, 0.2305579E+00, 0.2264321E+00, 0.2250029E+00, &
     & 0.2238732E+00, 0.2231006E+00, 0.2217387E+00, 0.2194187E+00, &
     & 0.2164387E+00, 0.2128704E+00, 0.2089894E+00, 0.2036012E+00, &
     & 0.1973122E+00, 0.1913900E+00, 0.1828854E+00, 0.1716857E+00, &
     & 0.1601314E+00, 0.1450136E+00, 0.1183199E+00, 0.1183199E+00 /
      data (ref_adm( 4,iz,15, 2),iz = 1,20) / &
     & 0.2305579E+00, 0.2305579E+00, 0.2264321E+00, 0.2250029E+00, &
     & 0.2238732E+00, 0.2231006E+00, 0.2217387E+00, 0.2194186E+00, &
     & 0.2164387E+00, 0.2128704E+00, 0.2089894E+00, 0.2036012E+00, &
     & 0.1973122E+00, 0.1913900E+00, 0.1828854E+00, 0.1716857E+00, &
     & 0.1601314E+00, 0.1450136E+00, 0.1183199E+00, 0.1183199E+00 /
      data (ref_adm( 4,iz,16, 2),iz = 1,20) / &
     & 0.2305579E+00, 0.2305579E+00, 0.2264321E+00, 0.2250029E+00, &
     & 0.2238732E+00, 0.2231006E+00, 0.2217387E+00, 0.2194187E+00, &
     & 0.2164387E+00, 0.2128704E+00, 0.2089894E+00, 0.2036012E+00, &
     & 0.1973122E+00, 0.1913900E+00, 0.1828854E+00, 0.1716857E+00, &
     & 0.1601314E+00, 0.1450136E+00, 0.1183199E+00, 0.1183199E+00 /
      data (ref_adm( 4,iz,17, 2),iz = 1,20) / &
     & 0.2305579E+00, 0.2305579E+00, 0.2264321E+00, 0.2250029E+00, &
     & 0.2238732E+00, 0.2231006E+00, 0.2217387E+00, 0.2194186E+00, &
     & 0.2164387E+00, 0.2128704E+00, 0.2089894E+00, 0.2036012E+00, &
     & 0.1973122E+00, 0.1913900E+00, 0.1828854E+00, 0.1716857E+00, &
     & 0.1601314E+00, 0.1450136E+00, 0.1183199E+00, 0.1183199E+00 /
      data (ref_adm( 4,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.4448163E+04
      data (ref_adm( 4,iz, 1, 3),iz = 1,20) / &
     & 0.2154347E+00, 0.2154347E+00, 0.2124311E+00, 0.2093900E+00, &
     & 0.2057105E+00, 0.2027168E+00, 0.2006429E+00, 0.1992119E+00, &
     & 0.1988069E+00, 0.1989556E+00, 0.2000772E+00, 0.2028541E+00, &
     & 0.2068209E+00, 0.2108378E+00, 0.2163712E+00, 0.2237242E+00, &
     & 0.2136200E+00, 0.2421528E+00, 0.2418871E+00, 0.2418871E+00 /
      data (ref_adm( 4,iz, 2, 3),iz = 1,20) / &
     & 0.2154347E+00, 0.2154347E+00, 0.2124311E+00, 0.2093900E+00, &
     & 0.2057105E+00, 0.2027168E+00, 0.2006429E+00, 0.1992119E+00, &
     & 0.1988069E+00, 0.1989556E+00, 0.2000772E+00, 0.2028541E+00, &
     & 0.2068209E+00, 0.2108378E+00, 0.2163712E+00, 0.2237242E+00, &
     & 0.2136200E+00, 0.2421528E+00, 0.2418871E+00, 0.2418871E+00 /
      data (ref_adm( 4,iz, 3, 3),iz = 1,20) / &
     & 0.2154397E+00, 0.2154397E+00, 0.2124661E+00, 0.2094375E+00, &
     & 0.2057557E+00, 0.2028379E+00, 0.2006647E+00, 0.1993179E+00, &
     & 0.1988504E+00, 0.1990291E+00, 0.1780100E+00, 0.2029794E+00, &
     & 0.2068326E+00, 0.2379500E+00, 0.2164282E+00, 0.2237227E+00, &
     & 0.2315296E+00, 0.2419008E+00, 0.4314137E-01, 0.4314137E-01 /
      data (ref_adm( 4,iz, 4, 3),iz = 1,20) / &
     & 0.2154486E+00, 0.2154486E+00, 0.2125363E+00, 0.2095340E+00, &
     & 0.2059345E+00, 0.2030036E+00, 0.2007777E+00, 0.1994050E+00, &
     & 0.1989409E+00, 0.1991441E+00, 0.2002039E+00, 0.2029427E+00, &
     & 0.2068588E+00, 0.2108452E+00, 0.2163669E+00, 0.2236561E+00, &
     & 0.2314681E+00, 0.2417144E+00, 0.2414128E+00, 0.2414128E+00 /
      data (ref_adm( 4,iz, 5, 3),iz = 1,20) / &
     & 0.2155212E+00, 0.2155212E+00, 0.2125960E+00, 0.2096675E+00, &
     & 0.2061705E+00, 0.2032474E+00, 0.2009595E+00, 0.1995755E+00, &
     & 0.2300700E+00, 0.1992548E+00, 0.2003204E+00, 0.2260400E+00, &
     & 0.2068886E+00, 0.1645600E+00, 0.2163466E+00, 0.2236211E+00, &
     & 0.2311941E+00, 0.2413730E+00, 0.2409401E+00, 0.2409401E+00 /
      data (ref_adm( 4,iz, 6, 3),iz = 1,20) / &
     & 0.2155722E+00, 0.2155722E+00, 0.2126970E+00, 0.2098951E+00, &
     & 0.2064346E+00, 0.2035137E+00, 0.2012631E+00, 0.1998549E+00, &
     & 0.1993451E+00, 0.1951000E+00, 0.1965700E+00, 0.2032058E+00, &
     & 0.2068728E+00, 0.2108668E+00, 0.2162098E+00, 0.2234211E+00, &
     & 0.2310217E+00, 0.2408507E+00, 0.2403391E+00, 0.2403391E+00 /
      data (ref_adm( 4,iz, 7, 3),iz = 1,20) / &
     & 0.2156144E+00, 0.2156144E+00, 0.2127515E+00, 0.2101635E+00, &
     & 0.2067472E+00, 0.2038932E+00, 0.2016767E+00, 0.2002504E+00, &
     & 0.1995720E+00, 0.2118300E+00, 0.2007588E+00, 0.2475100E+00, &
     & 0.2069775E+00, 0.1801300E+00, 0.2161124E+00, 0.2232252E+00, &
     & 0.2306466E+00, 0.2403591E+00, 0.2395521E+00, 0.2395521E+00 /
      data (ref_adm( 4,iz, 8, 3),iz = 1,20) / &
     & 0.2156559E+00, 0.2156559E+00, 0.2129434E+00, 0.2105051E+00, &
     & 0.2071504E+00, 0.2042758E+00, 0.2020281E+00, 0.2006284E+00, &
     & 0.1999189E+00, 0.2001046E+00, 0.2009615E+00, 0.2144400E+00, &
     & 0.2614600E+00, 0.2267900E+00, 0.2161261E+00, 0.2231284E+00, &
     & 0.2303564E+00, 0.2397951E+00, 0.2386492E+00, 0.2386492E+00 /
      data (ref_adm( 4,iz, 9, 3),iz = 1,20) / &
     & 0.2156739E+00, 0.2156739E+00, 0.2131100E+00, 0.2108677E+00, &
     & 0.2075452E+00, 0.2047950E+00, 0.2025044E+00, 0.2010799E+00, &
     & 0.2003423E+00, 0.2005087E+00, 0.2012888E+00, 0.2036920E+00, &
     & 0.1911000E+00, 0.2108184E+00, 0.2160426E+00, 0.2229427E+00, &
     & 0.2300387E+00, 0.2391028E+00, 0.2377116E+00, 0.2377116E+00 /
      data (ref_adm( 4,iz,10, 3),iz = 1,20) / &
     & 0.2157470E+00, 0.2157470E+00, 0.2132973E+00, 0.2112516E+00, &
     & 0.2080981E+00, 0.2053707E+00, 0.2030403E+00, 0.2015786E+00, &
     & 0.2008226E+00, 0.2009537E+00, 0.3414400E+00, 0.1547100E+00, &
     & 0.1971000E+00, 0.2084000E+00, 0.2159880E+00, 0.2227208E+00, &
     & 0.2296154E+00, 0.2383685E+00, 0.2367220E+00, 0.2367220E+00 /
      data (ref_adm( 4,iz,11, 3),iz = 1,20) / &
     & 0.2158205E+00, 0.2158205E+00, 0.2135351E+00, 0.2116809E+00, &
     & 0.2087526E+00, 0.2059750E+00, 0.2037247E+00, 0.2022219E+00, &
     & 0.2013552E+00, 0.2014843E+00, 0.2021296E+00, 0.1675400E+00, &
     & 0.2058200E+00, 0.2265100E+00, 0.2159750E+00, 0.2225208E+00, &
     & 0.2294016E+00, 0.2374706E+00, 0.2355556E+00, 0.2355556E+00 /
      data (ref_adm( 4,iz,12, 3),iz = 1,20) / &
     & 0.2159129E+00, 0.2159129E+00, 0.2137343E+00, 0.2121536E+00, &
     & 0.2094019E+00, 0.2067191E+00, 0.2044362E+00, 0.2028520E+00, &
     & 0.2020098E+00, 0.2020402E+00, 0.2026780E+00, 0.2046424E+00, &
     & 0.1564300E+00, 0.1867500E+00, 0.2159103E+00, 0.2222778E+00, &
     & 0.2289803E+00, 0.2367006E+00, 0.2343975E+00, 0.2343975E+00 /
      data (ref_adm( 4,iz,13, 3),iz = 1,20) / &
     & 0.2159676E+00, 0.2159676E+00, 0.2139022E+00, 0.2125001E+00, &
     & 0.2100812E+00, 0.2074613E+00, 0.2052064E+00, 0.2035983E+00, &
     & 0.2027168E+00, 0.2026518E+00, 0.2032062E+00, 0.2050871E+00, &
     & 0.2081939E+00, 0.1960200E+00, 0.2159541E+00, 0.2220889E+00, &
     & 0.2286492E+00, 0.2360037E+00, 0.2332521E+00, 0.2332521E+00 /
      data (ref_adm( 4,iz,14, 3),iz = 1,20) / &
     & 0.2160882E+00, 0.2160882E+00, 0.2142421E+00, 0.2129876E+00, &
     & 0.2109113E+00, 0.2082715E+00, 0.2061294E+00, 0.2044216E+00, &
     & 0.2035532E+00, 0.2032738E+00, 0.2038909E+00, 0.2055918E+00, &
     & 0.2084795E+00, 0.2115386E+00, 0.2159795E+00, 0.2220289E+00, &
     & 0.2282564E+00, 0.2353110E+00, 0.2320347E+00, 0.2320347E+00 /
      data (ref_adm( 4,iz,15, 3),iz = 1,20) / &
     & 0.2161826E+00, 0.2161826E+00, 0.2144726E+00, 0.2134483E+00, &
     & 0.2116599E+00, 0.2092213E+00, 0.2070280E+00, 0.2052956E+00, &
     & 0.2044228E+00, 0.2040689E+00, 0.2046790E+00, 0.2061929E+00, &
     & 0.2088221E+00, 0.1802100E+00, 0.1978600E+00, 0.2219263E+00, &
     & 0.2279904E+00, 0.2347017E+00, 0.2307863E+00, 0.2307863E+00 /
      data (ref_adm( 4,iz,16, 3),iz = 1,20) / &
     & 0.2162849E+00, 0.2162849E+00, 0.2147491E+00, 0.2139155E+00, &
     & 0.2125103E+00, 0.2100879E+00, 0.2079773E+00, 0.2063031E+00, &
     & 0.2053545E+00, 0.2049856E+00, 0.2054659E+00, 0.2068453E+00, &
     & 0.2093129E+00, 0.2121940E+00, 0.2162433E+00, 0.2218729E+00, &
     & 0.2276471E+00, 0.2340861E+00, 0.2296195E+00, 0.2296195E+00 /
      data (ref_adm( 4,iz,17, 3),iz = 1,20) / &
     & 0.2164358E+00, 0.2164358E+00, 0.2150559E+00, 0.2143513E+00, &
     & 0.2132057E+00, 0.2111693E+00, 0.2090865E+00, 0.2073830E+00, &
     & 0.2062804E+00, 0.2058875E+00, 0.2063482E+00, 0.2076031E+00, &
     & 0.2098756E+00, 0.2125291E+00, 0.2164721E+00, 0.2218553E+00, &
     & 0.2273969E+00, 0.2335829E+00, 0.2285902E+00, 0.2285902E+00 /
      data (ref_adm( 4,iz,18, 3),iz = 1,20) / &
     & 0.2332630E+00, 0.2332630E+00, 0.2290887E+00, 0.2276427E+00, &
     & 0.2264998E+00, 0.2257181E+00, 0.2243403E+00, 0.2219930E+00, &
     & 0.2189781E+00, 0.2153679E+00, 0.2114413E+00, 0.2059900E+00, &
     & 0.1996271E+00, 0.1936355E+00, 0.1850311E+00, 0.1737000E+00, &
     & 0.1620101E+00, 0.1467150E+00, 0.1197080E+00, 0.1197080E+00 /
      data (ref_adm( 4,iz,19, 3),iz = 1,20) / &
     & 0.2332630E+00, 0.2332630E+00, 0.2290887E+00, 0.2276428E+00, &
     & 0.2264998E+00, 0.2257181E+00, 0.2243403E+00, 0.2219930E+00, &
     & 0.2189781E+00, 0.2153679E+00, 0.2114413E+00, 0.2059900E+00, &
     & 0.1996271E+00, 0.1936355E+00, 0.1850311E+00, 0.1737000E+00, &
     & 0.1620101E+00, 0.1467150E+00, 0.1197080E+00, 0.1197080E+00 /
      data (ref_adm( 4,iz,20, 3),iz = 1,20) / &
     & 0.2332630E+00, 0.2332630E+00, 0.2290887E+00, 0.2276427E+00, &
     & 0.2264998E+00, 0.2257181E+00, 0.2243403E+00, 0.2219930E+00, &
     & 0.2189781E+00, 0.2153679E+00, 0.2114413E+00, 0.2059900E+00, &
     & 0.1996271E+00, 0.1936355E+00, 0.1850311E+00, 0.1737000E+00, &
     & 0.1620101E+00, 0.1467150E+00, 0.1197080E+00, 0.1197080E+00 /
      data (ref_adm( 4,iz,21, 3),iz = 1,20) / &
     & 0.2332630E+00, 0.2332630E+00, 0.2290887E+00, 0.2276428E+00, &
     & 0.2264998E+00, 0.2257181E+00, 0.2243403E+00, 0.2219930E+00, &
     & 0.2189781E+00, 0.2153679E+00, 0.2114413E+00, 0.2059900E+00, &
     & 0.1996271E+00, 0.1936355E+00, 0.1850311E+00, 0.1737000E+00, &
     & 0.1620101E+00, 0.1467150E+00, 0.1197080E+00, 0.1197080E+00 /
      data (ref_adm( 4,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 4,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo  0.2257664E+00
      data (ref_adm( 4,iz, 1, 4),iz = 1,20) / &
     & 0.2462174E+00, 0.2462174E+00, 0.2022400E+00, 0.2260232E+00, &
     & 0.2236519E+00, 0.2314200E+00, 0.2245500E+00, 0.1168500E+00, &
     & 0.2107900E+00, 0.2365000E+00, 0.2146816E+00, 0.2150024E+00, &
     & 0.1843400E+00, 0.2178851E+00, 0.2207114E+00, 0.1879000E+00, &
     & 0.2651400E+00, 0.2227700E+00, 0.2275459E+00, 0.2275459E+00 /
      data (ref_adm( 4,iz, 2, 4),iz = 1,20) / &
     & 0.2462174E+00, 0.2462174E+00, 0.2022400E+00, 0.2260232E+00, &
     & 0.2236519E+00, 0.2314200E+00, 0.2245500E+00, 0.1168500E+00, &
     & 0.2107900E+00, 0.2365000E+00, 0.2146816E+00, 0.2150024E+00, &
     & 0.1843400E+00, 0.2178851E+00, 0.2207114E+00, 0.1879000E+00, &
     & 0.2651400E+00, 0.2227700E+00, 0.2275459E+00, 0.2275459E+00 /
      data (ref_adm( 4,iz, 3, 4),iz = 1,20) / &
     & 0.2208000E+00, 0.2208000E+00, 0.2786000E+00, 0.2417300E+00, &
     & 0.2236519E+00, 0.2455700E+00, 0.2068900E+00, 0.1900800E+00, &
     & 0.1915200E+00, 0.1847300E+00, 0.1742000E+00, 0.1735400E+00, &
     & 0.2168600E+00, 0.2276500E+00, 0.1957700E+00, 0.1977700E+00, &
     & 0.2292657E+00, 0.2339503E+00, 0.4217744E-01, 0.4217744E-01 /
      data (ref_adm( 4,iz, 4, 4),iz = 1,20) / &
     & 0.2614300E+00, 0.2614300E+00, 0.2006100E+00, 0.2959000E+00, &
     & 0.2317200E+00, 0.2038700E+00, 0.2708200E+00, 0.2437800E+00, &
     & 0.1846500E+00, 0.1603200E+00, 0.2146816E+00, 0.2150024E+00, &
     & 0.2161653E+00, 0.2897800E+00, 0.2148300E+00, 0.1976600E+00, &
     & 0.2866300E+00, 0.2339503E+00, 0.2275459E+00, 0.2275459E+00 /
      data (ref_adm( 4,iz, 5, 4),iz = 1,20) / &
     & 0.2501400E+00, 0.2501400E+00, 0.2086800E+00, 0.2260232E+00, &
     & 0.2311200E+00, 0.2505800E+00, 0.2318900E+00, 0.2390900E+00, &
     & 0.1916400E+00, 0.2015500E+00, 0.1948200E+00, 0.1696600E+00, &
     & 0.1730200E+00, 0.1855800E+00, 0.2286300E+00, 0.2361100E+00, &
     & 0.2561700E+00, 0.2893600E+00, 0.2275460E+00, 0.2275460E+00 /
      data (ref_adm( 4,iz, 6, 4),iz = 1,20) / &
     & 0.2462174E+00, 0.2462174E+00, 0.2859100E+00, 0.2343400E+00, &
     & 0.2316500E+00, 0.2276700E+00, 0.2208400E+00, 0.2028200E+00, &
     & 0.1877600E+00, 0.1820200E+00, 0.1930400E+00, 0.1996600E+00, &
     & 0.2161653E+00, 0.1592600E+00, 0.2007200E+00, 0.2247655E+00, &
     & 0.2150700E+00, 0.2339503E+00, 0.1951200E+00, 0.1951200E+00 /
      data (ref_adm( 4,iz, 7, 4),iz = 1,20) / &
     & 0.3043300E+00, 0.3043300E+00, 0.2862800E+00, 0.2199000E+00, &
     & 0.2246800E+00, 0.2572600E+00, 0.2057600E+00, 0.2105500E+00, &
     & 0.1956400E+00, 0.1803500E+00, 0.1755900E+00, 0.1795600E+00, &
     & 0.1580600E+00, 0.1884500E+00, 0.2207114E+00, 0.2247655E+00, &
     & 0.3140000E+00, 0.2339503E+00, 0.2275460E+00, 0.2275460E+00 /
      data (ref_adm( 4,iz, 8, 4),iz = 1,20) / &
     & 0.2462174E+00, 0.2462174E+00, 0.1753100E+00, 0.3082300E+00, &
     & 0.2694800E+00, 0.2188200E+00, 0.2243400E+00, 0.2099400E+00, &
     & 0.1832100E+00, 0.1957600E+00, 0.2192600E+00, 0.2205600E+00, &
     & 0.1930900E+00, 0.1677400E+00, 0.1636500E+00, 0.2247655E+00, &
     & 0.2999100E+00, 0.2956100E+00, 0.2275459E+00, 0.2275459E+00 /
      data (ref_adm( 4,iz, 9, 4),iz = 1,20) / &
     & 0.2462174E+00, 0.2462174E+00, 0.3341100E+00, 0.1968400E+00, &
     & 0.2889800E+00, 0.2156100E+00, 0.2134200E+00, 0.2564800E+00, &
     & 0.2034100E+00, 0.2066800E+00, 0.1887600E+00, 0.1943000E+00, &
     & 0.2016700E+00, 0.1869600E+00, 0.2207114E+00, 0.2187100E+00, &
     & 0.2292657E+00, 0.2952700E+00, 0.2275460E+00, 0.2275460E+00 /
      data (ref_adm( 4,iz,10, 4),iz = 1,20) / &
     & 0.2194900E+00, 0.2194900E+00, 0.2299729E+00, 0.2260232E+00, &
     & 0.3553300E+00, 0.3081500E+00, 0.2211173E+00, 0.2048500E+00, &
     & 0.1938100E+00, 0.2241800E+00, 0.2076300E+00, 0.2036600E+00, &
     & 0.1831800E+00, 0.2066000E+00, 0.2207114E+00, 0.2138400E+00, &
     & 0.2292657E+00, 0.2339503E+00, 0.3397000E+00, 0.3397000E+00 /
      data (ref_adm( 4,iz,11, 4),iz = 1,20) / &
     & 0.2462174E+00, 0.2462174E+00, 0.2299729E+00, 0.2260232E+00, &
     & 0.2236519E+00, 0.2497800E+00, 0.2211173E+00, 0.1904600E+00, &
     & 0.2645400E+00, 0.1949900E+00, 0.2065700E+00, 0.2091800E+00, &
     & 0.2029900E+00, 0.2144900E+00, 0.2207114E+00, 0.2247655E+00, &
     & 0.2292657E+00, 0.2339503E+00, 0.2275460E+00, 0.2275460E+00 /
      data (ref_adm( 4,iz,12, 4),iz = 1,20) / &
     & 0.2462174E+00, 0.2462174E+00, 0.2857300E+00, 0.2208900E+00, &
     & 0.2548900E+00, 0.2738500E+00, 0.2504000E+00, 0.2185818E+00, &
     & 0.2743000E+00, 0.2152514E+00, 0.1060400E+00, 0.2004100E+00, &
     & 0.2077300E+00, 0.1978400E+00, 0.2536200E+00, 0.2247655E+00, &
     & 0.2292657E+00, 0.2339503E+00, 0.2275459E+00, 0.2275459E+00 /
      data (ref_adm( 4,iz,13, 4),iz = 1,20) / &
     & 0.2462174E+00, 0.2462174E+00, 0.2299729E+00, 0.2288000E+00, &
     & 0.2415100E+00, 0.2227891E+00, 0.1946800E+00, 0.2185818E+00, &
     & 0.2166691E+00, 0.2152514E+00, 0.2146816E+00, 0.2186100E+00, &
     & 0.2253200E+00, 0.2041600E+00, 0.1677600E+00, 0.2247655E+00, &
     & 0.2292657E+00, 0.2339503E+00, 0.2275460E+00, 0.2275460E+00 /
      data (ref_adm( 4,iz,14, 4),iz = 1,20) / &
     & 0.2462174E+00, 0.2462174E+00, 0.2299729E+00, 0.2260232E+00, &
     & 0.2236519E+00, 0.2420200E+00, 0.2339100E+00, 0.2185818E+00, &
     & 0.2166691E+00, 0.1557000E+00, 0.1980600E+00, 0.2126500E+00, &
     & 0.2184000E+00, 0.2063100E+00, 0.2207114E+00, 0.2247655E+00, &
     & 0.2292657E+00, 0.2339503E+00, 0.2275459E+00, 0.2275459E+00 /
      data (ref_adm( 4,iz,15, 4),iz = 1,20) / &
     & 0.2462174E+00, 0.2462174E+00, 0.2299729E+00, 0.2260232E+00, &
     & 0.2236519E+00, 0.2227891E+00, 0.2800300E+00, 0.2523500E+00, &
     & 0.2166691E+00, 0.2152514E+00, 0.1825300E+00, 0.2240300E+00, &
     & 0.2481300E+00, 0.1957100E+00, 0.2207114E+00, 0.2247655E+00, &
     & 0.2292657E+00, 0.2339503E+00, 0.2275460E+00, 0.2275460E+00 /
      data (ref_adm( 4,iz,16, 4),iz = 1,20) / &
     & 0.2462174E+00, 0.2462174E+00, 0.2299729E+00, 0.2260232E+00, &
     & 0.2236519E+00, 0.2227891E+00, 0.2211173E+00, 0.1983900E+00, &
     & 0.2166691E+00, 0.2152514E+00, 0.2146816E+00, 0.2065900E+00, &
     & 0.2238700E+00, 0.2177200E+00, 0.2207114E+00, 0.2247655E+00, &
     & 0.2292657E+00, 0.2339503E+00, 0.2275459E+00, 0.2275459E+00 /
      data (ref_adm( 4,iz,17, 4),iz = 1,20) / &
     & 0.2462174E+00, 0.2462174E+00, 0.2299729E+00, 0.2260232E+00, &
     & 0.2236519E+00, 0.2227891E+00, 0.2211173E+00, 0.2185818E+00, &
     & 0.1870000E+00, 0.2152514E+00, 0.2756600E+00, 0.2231800E+00, &
     & 0.2264900E+00, 0.2307600E+00, 0.2383700E+00, 0.2247655E+00, &
     & 0.2292657E+00, 0.2339503E+00, 0.2275460E+00, 0.2275460E+00 /
      data (ref_adm( 4,iz,18, 4),iz = 1,20) / &
     & 0.2410883E+00, 0.2410883E+00, 0.2381663E+00, 0.2356901E+00, &
     & 0.2340022E+00, 0.2327139E+00, 0.2308708E+00, 0.2289296E+00, &
     & 0.2270995E+00, 0.2293800E+00, 0.2245402E+00, 0.2305000E+00, &
     & 0.2200000E+00, 0.2239371E+00, 0.2231200E+00, 0.1775600E+00, &
     & 0.2270958E+00, 0.2291709E+00, 0.2205976E+00, 0.2205976E+00 /
      data (ref_adm( 4,iz,19, 4),iz = 1,20) / &
     & 0.2412238E+00, 0.2412238E+00, 0.2384808E+00, 0.2360134E+00, &
     & 0.2342970E+00, 0.2330989E+00, 0.2313747E+00, 0.2011300E+00, &
     & 0.2275394E+00, 0.2401600E+00, 0.2933800E+00, 0.2542000E+00, &
     & 0.2348900E+00, 0.2177500E+00, 0.2008800E+00, 0.1933100E+00, &
     & 0.2270023E+00, 0.2289913E+00, 0.2202835E+00, 0.2202835E+00 /
      data (ref_adm( 4,iz,20, 4),iz = 1,20) / &
     & 0.2413543E+00, 0.2413543E+00, 0.2387865E+00, 0.2362933E+00, &
     & 0.2345694E+00, 0.2334419E+00, 0.2318352E+00, 0.2298805E+00, &
     & 0.2280395E+00, 0.2264706E+00, 0.2253522E+00, 0.2246471E+00, &
     & 0.2646400E+00, 0.2030200E+00, 0.2126500E+00, 0.1841800E+00, &
     & 0.1858400E+00, 0.2287049E+00, 0.2200227E+00, 0.2200227E+00 /
      data (ref_adm( 4,iz,21, 4),iz = 1,20) / &
     & 0.2414688E+00, 0.2414688E+00, 0.2391274E+00, 0.2366622E+00, &
     & 0.2348412E+00, 0.2338097E+00, 0.2323209E+00, 0.2303535E+00, &
     & 0.2285551E+00, 0.2269602E+00, 0.2257997E+00, 0.2250084E+00, &
     & 0.2245767E+00, 0.2083000E+00, 0.2320600E+00, 0.1694500E+00, &
     & 0.2268589E+00, 0.2284702E+00, 0.2197585E+00, 0.2197585E+00 /
      data (ref_adm( 4,iz,22, 4),iz = 1,20) / &
     & 0.2643317E+00, 0.2643317E+00, 0.2596014E+00, 0.2579628E+00, &
     & 0.2566677E+00, 0.2557818E+00, 0.2542205E+00, 0.2063100E+00, &
     & 0.2481441E+00, 0.2440531E+00, 0.2396035E+00, 0.1958600E+00, &
     & 0.2461600E+00, 0.2194261E+00, 0.2096756E+00, 0.3278400E+00, &
     & 0.1835885E+00, 0.1662561E+00, 0.1356521E+00, 0.1356521E+00 /
      data (ref_adm( 4,iz,23, 4),iz = 1,20) / &
     & 0.2643317E+00, 0.2643317E+00, 0.2596014E+00, 0.2579629E+00, &
     & 0.2566676E+00, 0.2557818E+00, 0.2542205E+00, 0.2438100E+00, &
     & 0.2311400E+00, 0.2440531E+00, 0.2396035E+00, 0.2334261E+00, &
     & 0.2262158E+00, 0.2194261E+00, 0.2096756E+00, 0.1968355E+00, &
     & 0.1835885E+00, 0.1662561E+00, 0.1356521E+00, 0.1356521E+00 /
      data (ref_adm( 4,iz,24, 4),iz = 1,20) / &
     & 0.2643317E+00, 0.2643317E+00, 0.2596014E+00, 0.2579628E+00, &
     & 0.2298500E+00, 0.2532400E+00, 0.2542205E+00, 0.2515606E+00, &
     & 0.2537500E+00, 0.2440531E+00, 0.2396035E+00, 0.2334261E+00, &
     & 0.3441900E+00, 0.2194261E+00, 0.2096756E+00, 0.1968355E+00, &
     & 0.1835885E+00, 0.1662561E+00, 0.1356521E+00, 0.1356521E+00 /
      data (ref_adm( 4,iz,25, 4),iz = 1,20) / &
     & 0.2643317E+00, 0.2643317E+00, 0.2596014E+00, 0.2579629E+00, &
     & 0.2566676E+00, 0.2274400E+00, 0.2505000E+00, 0.2515606E+00, &
     & 0.2481441E+00, 0.2440531E+00, 0.2396035E+00, 0.2334261E+00, &
     & 0.2262158E+00, 0.2194261E+00, 0.2096756E+00, 0.1968355E+00, &
     & 0.1835885E+00, 0.1662561E+00, 0.1356521E+00, 0.1356521E+00 /
      data (ref_adm( 4,iz,26, 4),iz = 1,20) / &
     & 0.2643317E+00, 0.2643317E+00, 0.2596014E+00, 0.1927900E+00, &
     & 0.2566677E+00, 0.2557818E+00, 0.2676000E+00, 0.2515606E+00, &
     & 0.2481441E+00, 0.2440531E+00, 0.2396035E+00, 0.2334261E+00, &
     & 0.2262158E+00, 0.2194261E+00, 0.2096756E+00, 0.1968355E+00, &
     & 0.1835885E+00, 0.1662561E+00, 0.1356521E+00, 0.1356521E+00 /
      data (ref_adm( 4,iz,27, 4),iz = 1,20) / &
     & 0.2643317E+00, 0.2643317E+00, 0.2596014E+00, 0.2579629E+00, &
     & 0.2566676E+00, 0.2557818E+00, 0.2542205E+00, 0.2515606E+00, &
     & 0.2481441E+00, 0.2440531E+00, 0.2396035E+00, 0.2334261E+00, &
     & 0.2262158E+00, 0.2194261E+00, 0.2096756E+00, 0.1968355E+00, &
     & 0.1835885E+00, 0.1662561E+00, 0.1356521E+00, 0.1356521E+00 /
      data (ref_adm( 4,iz,28, 4),iz = 1,20) / &
     & 0.2643317E+00, 0.2643317E+00, 0.2596014E+00, 0.2579628E+00, &
     & 0.2566677E+00, 0.2557818E+00, 0.2542205E+00, 0.2515606E+00, &
     & 0.2481441E+00, 0.2440531E+00, 0.2396035E+00, 0.2334261E+00, &
     & 0.2262158E+00, 0.2194261E+00, 0.2096756E+00, 0.1968355E+00, &
     & 0.1835885E+00, 0.1662561E+00, 0.1356521E+00, 0.1356521E+00 /
      data (ref_adm( 4,iz,29, 4),iz = 1,20) / &
     & 0.2643317E+00, 0.2643317E+00, 0.2596014E+00, 0.2579629E+00, &
     & 0.2566676E+00, 0.2557818E+00, 0.2542205E+00, 0.2515606E+00, &
     & 0.2481441E+00, 0.2440531E+00, 0.2396035E+00, 0.2334261E+00, &
     & 0.2262158E+00, 0.2194261E+00, 0.2096756E+00, 0.1968355E+00, &
     & 0.1835885E+00, 0.1662561E+00, 0.1356521E+00, 0.1356521E+00 /
      data (ref_adm( 4,iz,30, 4),iz = 1,20) / &
     & 0.2643317E+00, 0.2643317E+00, 0.2596014E+00, 0.2579628E+00, &
     & 0.2566677E+00, 0.2557818E+00, 0.2542205E+00, 0.2515606E+00, &
     & 0.2481441E+00, 0.2440531E+00, 0.2396035E+00, 0.2334261E+00, &
     & 0.2262158E+00, 0.2194261E+00, 0.2096756E+00, 0.1968355E+00, &
     & 0.1835885E+00, 0.1662561E+00, 0.1356521E+00, 0.1356521E+00 /
      data (ref_adm( 4,iz,31, 4),iz = 1,20) / &
     & 0.2643317E+00, 0.2643317E+00, 0.2596014E+00, 0.2579629E+00, &
     & 0.2566676E+00, 0.2557818E+00, 0.2542205E+00, 0.2515606E+00, &
     & 0.2481441E+00, 0.2440531E+00, 0.2396035E+00, 0.2334261E+00, &
     & 0.2262158E+00, 0.2194261E+00, 0.2096756E+00, 0.1968355E+00, &
     & 0.1835885E+00, 0.1662561E+00, 0.1356521E+00, 0.1356521E+00 /
      data (ref_adm( 4,iz,32, 4),iz = 1,20) / &
     & 0.2643317E+00, 0.2643317E+00, 0.2596014E+00, 0.2579628E+00, &
     & 0.2566677E+00, 0.2557818E+00, 0.2542205E+00, 0.2515606E+00, &
     & 0.2481441E+00, 0.2440531E+00, 0.2396035E+00, 0.2334261E+00, &
     & 0.2262158E+00, 0.2194261E+00, 0.2096756E+00, 0.1968355E+00, &
     & 0.1835885E+00, 0.1662561E+00, 0.1356521E+00, 0.1356521E+00 /
      data (ref_adm( 4,iz,33, 4),iz = 1,20) / &
     & 0.2643317E+00, 0.2643317E+00, 0.2596014E+00, 0.2579629E+00, &
     & 0.2566676E+00, 0.2557818E+00, 0.2542205E+00, 0.2515606E+00, &
     & 0.2481441E+00, 0.2440531E+00, 0.2396035E+00, 0.2334261E+00, &
     & 0.2262158E+00, 0.2194261E+00, 0.2096756E+00, 0.1968355E+00, &
     & 0.1835885E+00, 0.1662561E+00, 0.1356521E+00, 0.1356521E+00 /
      data (ref_adm( 4,iz,34, 4),iz = 1,20) / &
     & 0.1957100E+00, 0.1957100E+00, 0.2329700E+00, 0.2579628E+00, &
     & 0.2566677E+00, 0.2557818E+00, 0.2542205E+00, 0.2515606E+00, &
     & 0.2481441E+00, 0.2440531E+00, 0.2396035E+00, 0.2334261E+00, &
     & 0.2262158E+00, 0.2194261E+00, 0.2096756E+00, 0.1968355E+00, &
     & 0.1835885E+00, 0.1662561E+00, 0.1356521E+00, 0.1356521E+00 /
      data (ref_adm( 4,iz,35, 4),iz = 1,20) / &
     & 0.2643317E+00, 0.2643317E+00, 0.2596014E+00, 0.2579629E+00, &
     & 0.2566676E+00, 0.2557818E+00, 0.2542205E+00, 0.2515606E+00, &
     & 0.2481441E+00, 0.2440531E+00, 0.2396035E+00, 0.2334261E+00, &
     & 0.2262158E+00, 0.2194261E+00, 0.2096756E+00, 0.1968355E+00, &
     & 0.1835885E+00, 0.1662561E+00, 0.1356521E+00, 0.1356521E+00 /
      data (ref_adm( 4,iz,36, 4),iz = 1,20) / &
     & 0.2643317E+00, 0.2643317E+00, 0.2279900E+00, 0.2750300E+00, &
     & 0.2566677E+00, 0.2557818E+00, 0.2542205E+00, 0.2515606E+00, &
     & 0.2481441E+00, 0.2440531E+00, 0.2396035E+00, 0.2334261E+00, &
     & 0.2262158E+00, 0.2194261E+00, 0.2096756E+00, 0.1968355E+00, &
     & 0.1835885E+00, 0.1662561E+00, 0.1356521E+00, 0.1356521E+00 /
      data (ref_adm( 4,iz,37, 4),iz = 1,20) / &
     & 0.2643317E+00, 0.2643317E+00, 0.2596014E+00, 0.2579628E+00, &
     & 0.2566677E+00, 0.2557818E+00, 0.2542205E+00, 0.2515606E+00, &
     & 0.2481441E+00, 0.2440531E+00, 0.2396035E+00, 0.2334261E+00, &
     & 0.2262158E+00, 0.2194261E+00, 0.2096756E+00, 0.1968355E+00, &
     & 0.1835885E+00, 0.1662561E+00, 0.1356521E+00, 0.1356521E+00 /
      data (ref_adm( 4,iz,38, 4),iz = 1,20) / &
     & 0.2643317E+00, 0.2643317E+00, 0.2596014E+00, 0.2579628E+00, &
     & 0.2566677E+00, 0.2557818E+00, 0.2542205E+00, 0.2515606E+00, &
     & 0.2481441E+00, 0.2440531E+00, 0.2396035E+00, 0.2334261E+00, &
     & 0.2262158E+00, 0.2194261E+00, 0.2096756E+00, 0.1968355E+00, &
     & 0.1835885E+00, 0.1662561E+00, 0.1356521E+00, 0.1356521E+00 /
! Solar Zenith Angle 20.0 Albedo  0.2369257E+00
      data (ref_adm( 4,iz, 1, 5),iz = 1,20) / &
     & 0.2315900E+00, 0.2315900E+00, 0.2243900E+00, 0.2204500E+00, &
     & 0.2274300E+00, 0.1943100E+00, 0.2072600E+00, 0.2197400E+00, &
     & 0.1870100E+00, 0.2226200E+00, 0.2291300E+00, 0.2088400E+00, &
     & 0.2275144E+00, 0.2171900E+00, 0.2449722E+00, 0.2564772E+00, &
     & 0.2666500E+00, 0.2654372E+00, 0.1629900E+00, 0.1629900E+00 /
      data (ref_adm( 4,iz, 2, 5),iz = 1,20) / &
     & 0.2315900E+00, 0.2315900E+00, 0.2243900E+00, 0.2204500E+00, &
     & 0.2274300E+00, 0.1943100E+00, 0.2072600E+00, 0.2197400E+00, &
     & 0.1870100E+00, 0.2226200E+00, 0.2291300E+00, 0.2088400E+00, &
     & 0.2275144E+00, 0.2171900E+00, 0.2449722E+00, 0.2564772E+00, &
     & 0.2666500E+00, 0.2654372E+00, 0.1629900E+00, 0.1629900E+00 /
      data (ref_adm( 4,iz, 3, 5),iz = 1,20) / &
     & 0.2154900E+00, 0.2154900E+00, 0.2043500E+00, 0.2181900E+00, &
     & 0.2231700E+00, 0.1972100E+00, 0.2142200E+00, 0.2127900E+00, &
     & 0.2195800E+00, 0.2043100E+00, 0.2161800E+00, 0.2342600E+00, &
     & 0.2275003E+00, 0.2502800E+00, 0.2763700E+00, 0.2760800E+00, &
     & 0.2814800E+00, 0.2652899E+00, 0.3267944E-01, 0.3267944E-01 /
      data (ref_adm( 4,iz, 4, 5),iz = 1,20) / &
     & 0.2079000E+00, 0.2079000E+00, 0.2252700E+00, 0.2098000E+00, &
     & 0.2339500E+00, 0.1942300E+00, 0.1934600E+00, 0.2161000E+00, &
     & 0.2198200E+00, 0.2069600E+00, 0.1983600E+00, 0.2164500E+00, &
     & 0.2709100E+00, 0.1788400E+00, 0.1922700E+00, 0.2283600E+00, &
     & 0.2534300E+00, 0.2648579E+00, 0.2363900E+00, 0.2363900E+00 /
      data (ref_adm( 4,iz, 5, 5),iz = 1,20) / &
     & 0.1951700E+00, 0.1951700E+00, 0.2588500E+00, 0.1948500E+00, &
     & 0.2254700E+00, 0.2027300E+00, 0.1942900E+00, 0.2130300E+00, &
     & 0.2054200E+00, 0.2165900E+00, 0.2298600E+00, 0.2353100E+00, &
     & 0.1959800E+00, 0.2164100E+00, 0.2145500E+00, 0.2560881E+00, &
     & 0.3748300E+00, 0.2649613E+00, 0.2362351E+00, 0.2362351E+00 /
      data (ref_adm( 4,iz, 6, 5),iz = 1,20) / &
     & 0.2483300E+00, 0.2483300E+00, 0.2204800E+00, 0.2003400E+00, &
     & 0.1998800E+00, 0.1903700E+00, 0.1833500E+00, 0.1825900E+00, &
     & 0.1919700E+00, 0.1789400E+00, 0.1964800E+00, 0.2104400E+00, &
     & 0.1841800E+00, 0.2528100E+00, 0.2390800E+00, 0.2756000E+00, &
     & 0.2032300E+00, 0.1804100E+00, 0.2360796E+00, 0.2360796E+00 /
      data (ref_adm( 4,iz, 7, 5),iz = 1,20) / &
     & 0.2191300E+00, 0.2191300E+00, 0.2084900E+00, 0.2147600E+00, &
     & 0.1911900E+00, 0.2258000E+00, 0.1851300E+00, 0.1948600E+00, &
     & 0.1807800E+00, 0.2077900E+00, 0.2389300E+00, 0.2214400E+00, &
     & 0.1908800E+00, 0.2210300E+00, 0.2274800E+00, 0.2259300E+00, &
     & 0.2544800E+00, 0.2582900E+00, 0.2214100E+00, 0.2214100E+00 /
      data (ref_adm( 4,iz, 8, 5),iz = 1,20) / &
     & 0.2323100E+00, 0.2323100E+00, 0.2482400E+00, 0.2270200E+00, &
     & 0.2215600E+00, 0.2116400E+00, 0.1992500E+00, 0.2168300E+00, &
     & 0.2035400E+00, 0.1755100E+00, 0.1833700E+00, 0.2492100E+00, &
     & 0.1847100E+00, 0.2750500E+00, 0.2095000E+00, 0.2391600E+00, &
     & 0.2608500E+00, 0.2640549E+00, 0.2355041E+00, 0.2355041E+00 /
      data (ref_adm( 4,iz, 9, 5),iz = 1,20) / &
     & 0.2343800E+00, 0.2343800E+00, 0.2444800E+00, 0.2472400E+00, &
     & 0.2289800E+00, 0.2201100E+00, 0.2127500E+00, 0.2397300E+00, &
     & 0.2071400E+00, 0.2315300E+00, 0.2198500E+00, 0.2153300E+00, &
     & 0.2032400E+00, 0.2207600E+00, 0.1964900E+00, 0.1900300E+00, &
     & 0.2797000E+00, 0.2636202E+00, 0.2352442E+00, 0.2352442E+00 /
      data (ref_adm( 4,iz,10, 5),iz = 1,20) / &
     & 0.2571300E+00, 0.2571300E+00, 0.2336400E+00, 0.2417300E+00, &
     & 0.2270100E+00, 0.2107300E+00, 0.2258300E+00, 0.2187400E+00, &
     & 0.2281100E+00, 0.2262500E+00, 0.2037800E+00, 0.1959900E+00, &
     & 0.2044400E+00, 0.2595500E+00, 0.2403100E+00, 0.2540500E+00, &
     & 0.2626974E+00, 0.3031700E+00, 0.2349169E+00, 0.2349169E+00 /
      data (ref_adm( 4,iz,11, 5),iz = 1,20) / &
     & 0.2420400E+00, 0.2420400E+00, 0.2708000E+00, 0.2541700E+00, &
     & 0.2284200E+00, 0.2094300E+00, 0.2119800E+00, 0.2234900E+00, &
     & 0.2224300E+00, 0.2108800E+00, 0.2096900E+00, 0.2173100E+00, &
     & 0.1818000E+00, 0.2222600E+00, 0.2235300E+00, 0.2528200E+00, &
     & 0.2024800E+00, 0.2627918E+00, 0.2345501E+00, 0.2345501E+00 /
      data (ref_adm( 4,iz,12, 5),iz = 1,20) / &
     & 0.2364200E+00, 0.2364200E+00, 0.2161200E+00, 0.2126400E+00, &
     & 0.1979800E+00, 0.2015700E+00, 0.2030600E+00, 0.1783500E+00, &
     & 0.2088600E+00, 0.2065900E+00, 0.2064600E+00, 0.2047300E+00, &
     & 0.1978300E+00, 0.2321800E+00, 0.2718000E+00, 0.2888200E+00, &
     & 0.2528000E+00, 0.2623451E+00, 0.2341471E+00, 0.2341471E+00 /
      data (ref_adm( 4,iz,13, 5),iz = 1,20) / &
     & 0.2719100E+00, 0.2719100E+00, 0.2616000E+00, 0.2650800E+00, &
     & 0.2578800E+00, 0.2494300E+00, 0.2127400E+00, 0.2205300E+00, &
     & 0.2452900E+00, 0.2147400E+00, 0.2086500E+00, 0.2143700E+00, &
     & 0.2076600E+00, 0.2088600E+00, 0.1926800E+00, 0.2080400E+00, &
     & 0.2612393E+00, 0.2616749E+00, 0.2337347E+00, 0.2337347E+00 /
      data (ref_adm( 4,iz,14, 5),iz = 1,20) / &
     & 0.2558800E+00, 0.2558800E+00, 0.2732200E+00, 0.2676900E+00, &
     & 0.2805400E+00, 0.2660700E+00, 0.2472500E+00, 0.1846400E+00, &
     & 0.1778800E+00, 0.2025900E+00, 0.2156649E+00, 0.2304000E+00, &
     & 0.2133000E+00, 0.2267600E+00, 0.2426033E+00, 0.2437300E+00, &
     & 0.2946400E+00, 0.2491600E+00, 0.2333775E+00, 0.2333775E+00 /
      data (ref_adm( 4,iz,15, 5),iz = 1,20) / &
     & 0.2468100E+00, 0.2468100E+00, 0.2421700E+00, 0.2629900E+00, &
     & 0.2540300E+00, 0.2549100E+00, 0.2282000E+00, 0.2319400E+00, &
     & 0.1991800E+00, 0.1962700E+00, 0.2451800E+00, 0.2607500E+00, &
     & 0.2040600E+00, 0.2441300E+00, 0.2100200E+00, 0.2522800E+00, &
     & 0.2600319E+00, 0.2604606E+00, 0.2590900E+00, 0.2590900E+00 /
      data (ref_adm( 4,iz,16, 5),iz = 1,20) / &
     & 0.2389400E+00, 0.2389400E+00, 0.2327200E+00, 0.1983900E+00, &
     & 0.2230200E+00, 0.2289200E+00, 0.2345500E+00, 0.2287400E+00, &
     & 0.1503000E+00, 0.1800900E+00, 0.2080200E+00, 0.2050000E+00, &
     & 0.1926100E+00, 0.2329232E+00, 0.2319600E+00, 0.2520083E+00, &
     & 0.2597033E+00, 0.2599895E+00, 0.2325259E+00, 0.2325259E+00 /
      data (ref_adm( 4,iz,17, 5),iz = 1,20) / &
     & 0.2450100E+00, 0.2450100E+00, 0.2288600E+00, 0.1868000E+00, &
     & 0.1909200E+00, 0.2139600E+00, 0.2490100E+00, 0.2244300E+00, &
     & 0.2199600E+00, 0.2046600E+00, 0.1751200E+00, 0.2548400E+00, &
     & 0.2249700E+00, 0.2036100E+00, 0.2479900E+00, 0.3009400E+00, &
     & 0.1605700E+00, 0.2591948E+00, 0.2321157E+00, 0.2321157E+00 /
      data (ref_adm( 4,iz,18, 5),iz = 1,20) / &
     & 0.2288000E+00, 0.2288000E+00, 0.2403200E+00, 0.2706300E+00, &
     & 0.1952400E+00, 0.2148900E+00, 0.2229200E+00, 0.2370600E+00, &
     & 0.1963600E+00, 0.1874900E+00, 0.2672200E+00, 0.2281700E+00, &
     & 0.2142500E+00, 0.2306400E+00, 0.2284400E+00, 0.2319177E+00, &
     & 0.2347392E+00, 0.2382320E+00, 0.2304103E+00, 0.2304103E+00 /
      data (ref_adm( 4,iz,19, 5),iz = 1,20) / &
     & 0.2361400E+00, 0.2361400E+00, 0.2325500E+00, 0.2316979E+00, &
     & 0.2128700E+00, 0.2296360E+00, 0.1851900E+00, 0.1892000E+00, &
     & 0.1558700E+00, 0.2393600E+00, 0.2643500E+00, 0.2198200E+00, &
     & 0.2214600E+00, 0.2020500E+00, 0.2072800E+00, 0.2523200E+00, &
     & 0.2342928E+00, 0.2374678E+00, 0.2293785E+00, 0.2293785E+00 /
      data (ref_adm( 4,iz,20, 5),iz = 1,20) / &
     & 0.2245300E+00, 0.2245300E+00, 0.2374400E+00, 0.2078600E+00, &
     & 0.2106900E+00, 0.2306728E+00, 0.1883400E+00, 0.1628800E+00, &
     & 0.2066900E+00, 0.2243100E+00, 0.2347300E+00, 0.2145700E+00, &
     & 0.1923100E+00, 0.2053400E+00, 0.1865500E+00, 0.2356900E+00, &
     & 0.2339921E+00, 0.2367904E+00, 0.2285837E+00, 0.2285837E+00 /
      data (ref_adm( 4,iz,21, 5),iz = 1,20) / &
     & 0.2394000E+00, 0.2394000E+00, 0.1896700E+00, 0.2951500E+00, &
     & 0.2324566E+00, 0.2661300E+00, 0.2306928E+00, 0.2297501E+00, &
     & 0.2432100E+00, 0.2320800E+00, 0.2280200E+00, 0.2187600E+00, &
     & 0.2095300E+00, 0.2124100E+00, 0.2344100E+00, 0.2207600E+00, &
     & 0.1878000E+00, 0.2362359E+00, 0.2279277E+00, 0.2279277E+00 /
      data (ref_adm( 4,iz,22, 5),iz = 1,20) / &
     & 0.2389700E+00, 0.2389700E+00, 0.2068100E+00, 0.2420000E+00, &
     & 0.2655100E+00, 0.2052700E+00, 0.2132400E+00, 0.2412700E+00, &
     & 0.1964900E+00, 0.2529200E+00, 0.2248900E+00, 0.2298100E+00, &
     & 0.2209300E+00, 0.2206100E+00, 0.2202000E+00, 0.2009500E+00, &
     & 0.2518784E+00, 0.2513012E+00, 0.2361623E+00, 0.2361623E+00 /
      data (ref_adm( 4,iz,23, 5),iz = 1,20) / &
     & 0.2250400E+00, 0.2250400E+00, 0.2155600E+00, 0.2071500E+00, &
     & 0.2555800E+00, 0.2911100E+00, 0.2240600E+00, 0.2322000E+00, &
     & 0.1913500E+00, 0.2032200E+00, 0.2369300E+00, 0.2766300E+00, &
     & 0.2119500E+00, 0.2510100E+00, 0.2420900E+00, 0.1989900E+00, &
     & 0.1695200E+00, 0.2509511E+00, 0.2356751E+00, 0.2356751E+00 /
      data (ref_adm( 4,iz,24, 5),iz = 1,20) / &
     & 0.2447200E+00, 0.2447200E+00, 0.2310600E+00, 0.2421400E+00, &
     & 0.2527100E+00, 0.2477400E+00, 0.2657300E+00, 0.2348800E+00, &
     & 0.2470900E+00, 0.2072600E+00, 0.3239300E+00, 0.2402800E+00, &
     & 0.2359600E+00, 0.2120000E+00, 0.2485900E+00, 0.2860000E+00, &
     & 0.2377900E+00, 0.2506683E+00, 0.2354117E+00, 0.2354117E+00 /
      data (ref_adm( 4,iz,25, 5),iz = 1,20) / &
     & 0.2778900E+00, 0.2778900E+00, 0.2501000E+00, 0.2350000E+00, &
     & 0.2491100E+00, 0.2711700E+00, 0.2452900E+00, 0.2271500E+00, &
     & 0.2677500E+00, 0.2446700E+00, 0.2138700E+00, 0.2033500E+00, &
     & 0.2502168E+00, 0.4128300E+00, 0.2727100E+00, 0.3327900E+00, &
     & 0.2682100E+00, 0.2074100E+00, 0.2354286E+00, 0.2354286E+00 /
      data (ref_adm( 4,iz,26, 5),iz = 1,20) / &
     & 0.2554200E+00, 0.2554200E+00, 0.2393500E+00, 0.2419300E+00, &
     & 0.2468600E+00, 0.2564900E+00, 0.2499700E+00, 0.2393700E+00, &
     & 0.2397300E+00, 0.2456500E+00, 0.2494300E+00, 0.2544000E+00, &
     & 0.2400600E+00, 0.2631500E+00, 0.2422300E+00, 0.2687400E+00, &
     & 0.2892700E+00, 0.1839800E+00, 0.2354920E+00, 0.2354920E+00 /
      data (ref_adm( 4,iz,27, 5),iz = 1,20) / &
     & 0.2326600E+00, 0.2326600E+00, 0.2901700E+00, 0.2461000E+00, &
     & 0.2360700E+00, 0.2246800E+00, 0.2488400E+00, 0.2734500E+00, &
     & 0.2263700E+00, 0.2374000E+00, 0.2613800E+00, 0.2680800E+00, &
     & 0.2899000E+00, 0.2360200E+00, 0.2581200E+00, 0.2497800E+00, &
     & 0.2366500E+00, 0.2156200E+00, 0.2356956E+00, 0.2356956E+00 /
      data (ref_adm( 4,iz,28, 5),iz = 1,20) / &
     & 0.2264000E+00, 0.2264000E+00, 0.2520700E+00, 0.2628000E+00, &
     & 0.2452100E+00, 0.2677900E+00, 0.2694500E+00, 0.2450100E+00, &
     & 0.2266900E+00, 0.2332900E+00, 0.2563244E+00, 0.2841200E+00, &
     & 0.2632700E+00, 0.2757900E+00, 0.2519400E+00, 0.2547984E+00, &
     & 0.2540946E+00, 0.2512471E+00, 0.2360130E+00, 0.2360130E+00 /
      data (ref_adm( 4,iz,29, 5),iz = 1,20) / &
     & 0.2218600E+00, 0.2218600E+00, 0.3818600E+00, 0.2626100E+00, &
     & 0.2682600E+00, 0.2497400E+00, 0.3255900E+00, 0.2445300E+00, &
     & 0.2229000E+00, 0.2290900E+00, 0.2893000E+00, 0.2572000E+00, &
     & 0.2582600E+00, 0.2976100E+00, 0.2495200E+00, 0.2559603E+00, &
     & 0.2548731E+00, 0.2516737E+00, 0.2364705E+00, 0.2364705E+00 /
      data (ref_adm( 4,iz,30, 5),iz = 1,20) / &
     & 0.2420900E+00, 0.2420900E+00, 0.2641600E+00, 0.2672500E+00, &
     & 0.2614100E+00, 0.2166300E+00, 0.2524500E+00, 0.2800700E+00, &
     & 0.2702800E+00, 0.2689000E+00, 0.3233500E+00, 0.2594210E+00, &
     & 0.2585725E+00, 0.2582181E+00, 0.2578078E+00, 0.2572105E+00, &
     & 0.2558173E+00, 0.2522014E+00, 0.2370266E+00, 0.2370266E+00 /
      data (ref_adm( 4,iz,31, 5),iz = 1,20) / &
     & 0.2395900E+00, 0.2395900E+00, 0.2632600E+00, 0.2708800E+00, &
     & 0.2491700E+00, 0.2455100E+00, 0.2347800E+00, 0.2642700E+00, &
     & 0.3303000E+00, 0.2795800E+00, 0.2630900E+00, 0.2612412E+00, &
     & 0.2602608E+00, 0.2597545E+00, 0.2590768E+00, 0.2583379E+00, &
     & 0.2567970E+00, 0.2527349E+00, 0.2375977E+00, 0.2375977E+00 /
      data (ref_adm( 4,iz,32, 5),iz = 1,20) / &
     & 0.2348500E+00, 0.2348500E+00, 0.2544900E+00, 0.2592800E+00, &
     & 0.2758700E+00, 0.2725000E+00, 0.2970900E+00, 0.2635300E+00, &
     & 0.2614400E+00, 0.2580300E+00, 0.2727300E+00, 0.2629652E+00, &
     & 0.2618090E+00, 0.2611026E+00, 0.2603613E+00, 0.2593737E+00, &
     & 0.2577424E+00, 0.2533475E+00, 0.2381832E+00, 0.2381832E+00 /
      data (ref_adm( 4,iz,33, 5),iz = 1,20) / &
     & 0.2344500E+00, 0.2344500E+00, 0.2615500E+00, 0.2676400E+00, &
     & 0.2729200E+00, 0.2664400E+00, 0.2759100E+00, 0.2760000E+00, &
     & 0.2841100E+00, 0.2675200E+00, 0.2910000E+00, 0.2644752E+00, &
     & 0.2633641E+00, 0.2624888E+00, 0.2615026E+00, 0.2603839E+00, &
     & 0.2586214E+00, 0.2540000E+00, 0.2387326E+00, 0.2387326E+00 /
      data (ref_adm( 4,iz,34, 5),iz = 1,20) / &
     & 0.2292600E+00, 0.2292600E+00, 0.2285600E+00, 0.2528500E+00, &
     & 0.2902800E+00, 0.2476000E+00, 0.2623600E+00, 0.2579400E+00, &
     & 0.2553900E+00, 0.2608200E+00, 0.2089600E+00, 0.2657544E+00, &
     & 0.2644575E+00, 0.2635063E+00, 0.2624285E+00, 0.2611516E+00, &
     & 0.2593026E+00, 0.2544540E+00, 0.2392272E+00, 0.2392272E+00 /
      data (ref_adm( 4,iz,35, 5),iz = 1,20) / &
     & 0.2297600E+00, 0.2297600E+00, 0.2532500E+00, 0.2735300E+00, &
     & 0.2948800E+00, 0.2843200E+00, 0.2666600E+00, 0.2529300E+00, &
     & 0.2614300E+00, 0.2445800E+00, 0.2980600E+00, 0.2667370E+00, &
     & 0.2654717E+00, 0.2644883E+00, 0.2632508E+00, 0.2617927E+00, &
     & 0.2598166E+00, 0.2549354E+00, 0.2396262E+00, 0.2396262E+00 /
      data (ref_adm( 4,iz,36, 5),iz = 1,20) / &
     & 0.2348900E+00, 0.2348900E+00, 0.2762500E+00, 0.2998500E+00, &
     & 0.2711400E+00, 0.2951600E+00, 0.2648800E+00, 0.2765600E+00, &
     & 0.2586800E+00, 0.2561400E+00, 0.3178900E+00, 0.2189700E+00, &
     & 0.2660525E+00, 0.2650726E+00, 0.2637660E+00, 0.2622816E+00, &
     & 0.2602954E+00, 0.2552886E+00, 0.2399386E+00, 0.2399386E+00 /
      data (ref_adm( 4,iz,37, 5),iz = 1,20) / &
     & 0.2288000E+00, 0.2288000E+00, 0.1918800E+00, 0.2815600E+00, &
     & 0.3062200E+00, 0.3284800E+00, 0.3147800E+00, 0.2912300E+00, &
     & 0.2987400E+00, 0.2529400E+00, 0.2305100E+00, 0.3432900E+00, &
     & 0.2664724E+00, 0.2654490E+00, 0.2640851E+00, 0.2625871E+00, &
     & 0.2604870E+00, 0.2554595E+00, 0.2400917E+00, 0.2400917E+00 /
      data (ref_adm( 4,iz,38, 5),iz = 1,20) / &
     & 0.2288000E+00, 0.2288000E+00, 0.1918800E+00, 0.2815600E+00, &
     & 0.3062200E+00, 0.3284800E+00, 0.3147800E+00, 0.2912300E+00, &
     & 0.2987400E+00, 0.2529400E+00, 0.2305100E+00, 0.3432900E+00, &
     & 0.2664724E+00, 0.2654490E+00, 0.2640851E+00, 0.2625871E+00, &
     & 0.2604870E+00, 0.2554595E+00, 0.2400917E+00, 0.2400917E+00 /
! Solar Zenith Angle 25.0 Albedo  0.2365393E+00
      data (ref_adm( 4,iz, 1, 6),iz = 1,20) / &
     & 0.2705500E+00, 0.2705500E+00, 0.2239300E+00, 0.2623800E+00, &
     & 0.2665600E+00, 0.2210100E+00, 0.2739000E+00, 0.2221300E+00, &
     & 0.1872200E+00, 0.2186400E+00, 0.2524500E+00, 0.2202476E+00, &
     & 0.2574400E+00, 0.2668900E+00, 0.2800200E+00, 0.2524500E+00, &
     & 0.1964100E+00, 0.2759600E+00, 0.2536672E+00, 0.2536672E+00 /
      data (ref_adm( 4,iz, 2, 6),iz = 1,20) / &
     & 0.2705500E+00, 0.2705500E+00, 0.2239300E+00, 0.2623800E+00, &
     & 0.2665600E+00, 0.2210100E+00, 0.2739000E+00, 0.2221300E+00, &
     & 0.1872200E+00, 0.2186400E+00, 0.2524500E+00, 0.2202476E+00, &
     & 0.2574400E+00, 0.2668900E+00, 0.2800200E+00, 0.2524500E+00, &
     & 0.1964100E+00, 0.2759600E+00, 0.2536672E+00, 0.2536672E+00 /
      data (ref_adm( 4,iz, 3, 6),iz = 1,20) / &
     & 0.2321600E+00, 0.2321600E+00, 0.2659000E+00, 0.2503500E+00, &
     & 0.2131700E+00, 0.1865000E+00, 0.1784200E+00, 0.2329700E+00, &
     & 0.1799600E+00, 0.2434600E+00, 0.2622300E+00, 0.1870400E+00, &
     & 0.1975800E+00, 0.2286994E+00, 0.2428500E+00, 0.2494900E+00, &
     & 0.2507200E+00, 0.2374700E+00, 0.7333699E-01, 0.7333699E-01 /
      data (ref_adm( 4,iz, 4, 6),iz = 1,20) / &
     & 0.2277500E+00, 0.2277500E+00, 0.2021300E+00, 0.1785200E+00, &
     & 0.1669400E+00, 0.2729400E+00, 0.1582600E+00, 0.1664700E+00, &
     & 0.1727100E+00, 0.2098900E+00, 0.1805600E+00, 0.2071000E+00, &
     & 0.2153800E+00, 0.2284876E+00, 0.2338500E+00, 0.2283800E+00, &
     & 0.2346300E+00, 0.4337700E+00, 0.2529682E+00, 0.2529682E+00 /
      data (ref_adm( 4,iz, 5, 6),iz = 1,20) / &
     & 0.1941200E+00, 0.1941200E+00, 0.2665700E+00, 0.1973400E+00, &
     & 0.2409900E+00, 0.2588600E+00, 0.2518400E+00, 0.1780200E+00, &
     & 0.2086700E+00, 0.1698600E+00, 0.2267200E+00, 0.1797400E+00, &
     & 0.2243120E+00, 0.2282333E+00, 0.2196500E+00, 0.2479100E+00, &
     & 0.2861400E+00, 0.3178100E+00, 0.2522619E+00, 0.2522619E+00 /
      data (ref_adm( 4,iz, 6, 6),iz = 1,20) / &
     & 0.2796900E+00, 0.2796900E+00, 0.2166300E+00, 0.1959500E+00, &
     & 0.1891300E+00, 0.2258500E+00, 0.2136750E+00, 0.1978000E+00, &
     & 0.1760300E+00, 0.1552000E+00, 0.1844800E+00, 0.2249800E+00, &
     & 0.2241124E+00, 0.2079700E+00, 0.2361900E+00, 0.2495000E+00, &
     & 0.2375400E+00, 0.2571737E+00, 0.2654700E+00, 0.2654700E+00 /
      data (ref_adm( 4,iz, 7, 6),iz = 1,20) / &
     & 0.2141400E+00, 0.2141400E+00, 0.2266400E+00, 0.2278200E+00, &
     & 0.2038200E+00, 0.1963300E+00, 0.1591800E+00, 0.1760600E+00, &
     & 0.1770800E+00, 0.2011500E+00, 0.2285100E+00, 0.1782900E+00, &
     & 0.2080300E+00, 0.2319800E+00, 0.2706800E+00, 0.2099800E+00, &
     & 0.3201900E+00, 0.2560626E+00, 0.2501525E+00, 0.2501525E+00 /
      data (ref_adm( 4,iz, 8, 6),iz = 1,20) / &
     & 0.2159500E+00, 0.2159500E+00, 0.2174800E+00, 0.2299800E+00, &
     & 0.2032500E+00, 0.3027400E+00, 0.2072500E+00, 0.1861700E+00, &
     & 0.1791600E+00, 0.1998200E+00, 0.1961000E+00, 0.2703300E+00, &
     & 0.2212700E+00, 0.2259700E+00, 0.2280600E+00, 0.2525400E+00, &
     & 0.2461195E+00, 0.3073600E+00, 0.2487988E+00, 0.2487988E+00 /
      data (ref_adm( 4,iz, 9, 6),iz = 1,20) / &
     & 0.2341000E+00, 0.2341000E+00, 0.2281000E+00, 0.2273500E+00, &
     & 0.2115700E+00, 0.2385800E+00, 0.2329000E+00, 0.1992100E+00, &
     & 0.2325100E+00, 0.2220300E+00, 0.2244500E+00, 0.2395300E+00, &
     & 0.2080100E+00, 0.2560600E+00, 0.2318162E+00, 0.3034200E+00, &
     & 0.2935000E+00, 0.2782700E+00, 0.2472160E+00, 0.2472160E+00 /
      data (ref_adm( 4,iz,10, 6),iz = 1,20) / &
     & 0.2351600E+00, 0.2351600E+00, 0.2473200E+00, 0.2289200E+00, &
     & 0.2334000E+00, 0.2349100E+00, 0.2161100E+00, 0.1744800E+00, &
     & 0.1848000E+00, 0.1842800E+00, 0.2015400E+00, 0.2080500E+00, &
     & 0.2199400E+00, 0.2264135E+00, 0.2311820E+00, 0.2848600E+00, &
     & 0.2905800E+00, 0.1835800E+00, 0.2452105E+00, 0.2452105E+00 /
      data (ref_adm( 4,iz,11, 6),iz = 1,20) / &
     & 0.2332700E+00, 0.2332700E+00, 0.2361700E+00, 0.2252000E+00, &
     & 0.2286500E+00, 0.2171700E+00, 0.2190000E+00, 0.2077900E+00, &
     & 0.2107800E+00, 0.2324200E+00, 0.2419200E+00, 0.2714400E+00, &
     & 0.2131300E+00, 0.2370900E+00, 0.3480000E+00, 0.2364246E+00, &
     & 0.2425955E+00, 0.2500955E+00, 0.2431601E+00, 0.2431601E+00 /
      data (ref_adm( 4,iz,12, 6),iz = 1,20) / &
     & 0.2458300E+00, 0.2458300E+00, 0.2295100E+00, 0.2547700E+00, &
     & 0.1925600E+00, 0.2182700E+00, 0.2440000E+00, 0.2202600E+00, &
     & 0.2146100E+00, 0.2192100E+00, 0.2225700E+00, 0.2426600E+00, &
     & 0.2063400E+00, 0.2557100E+00, 0.2428900E+00, 0.3360400E+00, &
     & 0.2413622E+00, 0.2484252E+00, 0.2410093E+00, 0.2410093E+00 /
      data (ref_adm( 4,iz,13, 6),iz = 1,20) / &
     & 0.2214400E+00, 0.2214400E+00, 0.2682300E+00, 0.2920000E+00, &
     & 0.2163300E+00, 0.2070900E+00, 0.1417500E+00, 0.1936300E+00, &
     & 0.2064000E+00, 0.2228300E+00, 0.2087600E+00, 0.2199600E+00, &
     & 0.2174700E+00, 0.2057000E+00, 0.1679300E+00, 0.2346886E+00, &
     & 0.2859600E+00, 0.2466628E+00, 0.2388957E+00, 0.2388957E+00 /
      data (ref_adm( 4,iz,14, 6),iz = 1,20) / &
     & 0.2126300E+00, 0.2126300E+00, 0.2393200E+00, 0.2262100E+00, &
     & 0.2026800E+00, 0.2616800E+00, 0.2173669E+00, 0.1779300E+00, &
     & 0.2183000E+00, 0.2147200E+00, 0.1728500E+00, 0.2194900E+00, &
     & 0.2161800E+00, 0.2168600E+00, 0.1810400E+00, 0.2339165E+00, &
     & 0.2680500E+00, 0.2247900E+00, 0.2367983E+00, 0.2367983E+00 /
      data (ref_adm( 4,iz,15, 6),iz = 1,20) / &
     & 0.2036500E+00, 0.2036500E+00, 0.2025400E+00, 0.2098000E+00, &
     & 0.2481300E+00, 0.2421600E+00, 0.2293200E+00, 0.1771400E+00, &
     & 0.2007300E+00, 0.2196100E+00, 0.2450800E+00, 0.2446900E+00, &
     & 0.2552100E+00, 0.2111200E+00, 0.1918500E+00, 0.1998500E+00, &
     & 0.1871300E+00, 0.2433793E+00, 0.2348296E+00, 0.2348296E+00 /
      data (ref_adm( 4,iz,16, 6),iz = 1,20) / &
     & 0.2354700E+00, 0.2354700E+00, 0.2121600E+00, 0.2277500E+00, &
     & 0.2240000E+00, 0.2115300E+00, 0.2189996E+00, 0.2066900E+00, &
     & 0.2090800E+00, 0.1945600E+00, 0.1776300E+00, 0.2246300E+00, &
     & 0.2301300E+00, 0.1765800E+00, 0.1902900E+00, 0.2073800E+00, &
     & 0.2119000E+00, 0.1932100E+00, 0.1717900E+00, 0.1717900E+00 /
      data (ref_adm( 4,iz,17, 6),iz = 1,20) / &
     & 0.2343200E+00, 0.2343200E+00, 0.2240000E+00, 0.2211500E+00, &
     & 0.2091400E+00, 0.2211154E+00, 0.2056300E+00, 0.2295300E+00, &
     & 0.1883000E+00, 0.2187124E+00, 0.2583800E+00, 0.2141000E+00, &
     & 0.2016400E+00, 0.2207700E+00, 0.2022600E+00, 0.2008100E+00, &
     & 0.2101900E+00, 0.2070400E+00, 0.2309151E+00, 0.2309151E+00 /
      data (ref_adm( 4,iz,18, 6),iz = 1,20) / &
     & 0.2159400E+00, 0.2159400E+00, 0.2216300E+00, 0.2276600E+00, &
     & 0.1879100E+00, 0.2383400E+00, 0.2234800E+00, 0.2536600E+00, &
     & 0.1953700E+00, 0.1945600E+00, 0.2208700E+00, 0.2066200E+00, &
     & 0.2217800E+00, 0.2003700E+00, 0.2137500E+00, 0.2439600E+00, &
     & 0.2281500E+00, 0.2553900E+00, 0.2292122E+00, 0.2292122E+00 /
      data (ref_adm( 4,iz,19, 6),iz = 1,20) / &
     & 0.2115300E+00, 0.2115300E+00, 0.2646200E+00, 0.2776100E+00, &
     & 0.2109800E+00, 0.2429500E+00, 0.2129900E+00, 0.2328100E+00, &
     & 0.2642400E+00, 0.2496700E+00, 0.2229100E+00, 0.2063200E+00, &
     & 0.2394500E+00, 0.1904500E+00, 0.2496700E+00, 0.2939600E+00, &
     & 0.2723800E+00, 0.2366199E+00, 0.2283335E+00, 0.2283335E+00 /
      data (ref_adm( 4,iz,20, 6),iz = 1,20) / &
     & 0.2345900E+00, 0.2345900E+00, 0.2397900E+00, 0.2521600E+00, &
     & 0.2282800E+00, 0.2798100E+00, 0.2615100E+00, 0.2191100E+00, &
     & 0.2116800E+00, 0.2013000E+00, 0.2093100E+00, 0.2566900E+00, &
     & 0.2399000E+00, 0.1903700E+00, 0.2074700E+00, 0.3053900E+00, &
     & 0.2618600E+00, 0.2440200E+00, 0.2276571E+00, 0.2276571E+00 /
      data (ref_adm( 4,iz,21, 6),iz = 1,20) / &
     & 0.2206300E+00, 0.2206300E+00, 0.2355300E+00, 0.2679700E+00, &
     & 0.2913800E+00, 0.2511500E+00, 0.2486900E+00, 0.2247800E+00, &
     & 0.2244600E+00, 0.2450900E+00, 0.2611800E+00, 0.3033700E+00, &
     & 0.2121700E+00, 0.2378800E+00, 0.2420900E+00, 0.2545500E+00, &
     & 0.2540800E+00, 0.2355653E+00, 0.2270709E+00, 0.2270709E+00 /
      data (ref_adm( 4,iz,22, 6),iz = 1,20) / &
     & 0.2189900E+00, 0.2189900E+00, 0.2762700E+00, 0.2671000E+00, &
     & 0.2271400E+00, 0.2623800E+00, 0.2396800E+00, 0.2397700E+00, &
     & 0.2338000E+00, 0.3110300E+00, 0.2842000E+00, 0.2392650E+00, &
     & 0.1922800E+00, 0.2693900E+00, 0.2932200E+00, 0.2731600E+00, &
     & 0.2805000E+00, 0.2336000E+00, 0.2441704E+00, 0.2441704E+00 /
      data (ref_adm( 4,iz,23, 6),iz = 1,20) / &
     & 0.2558200E+00, 0.2558200E+00, 0.2135900E+00, 0.2340200E+00, &
     & 0.2833300E+00, 0.2129200E+00, 0.2700800E+00, 0.2457700E+00, &
     & 0.2555000E+00, 0.2647500E+00, 0.2499900E+00, 0.2472500E+00, &
     & 0.2705400E+00, 0.2676000E+00, 0.2505900E+00, 0.2482100E+00, &
     & 0.2265300E+00, 0.2567392E+00, 0.2437523E+00, 0.2437523E+00 /
      data (ref_adm( 4,iz,24, 6),iz = 1,20) / &
     & 0.2318900E+00, 0.2318900E+00, 0.2733000E+00, 0.2094100E+00, &
     & 0.2237400E+00, 0.2547800E+00, 0.2415500E+00, 0.2410100E+00, &
     & 0.2986000E+00, 0.2564700E+00, 0.1962400E+00, 0.2092200E+00, &
     & 0.2001500E+00, 0.2084400E+00, 0.2501500E+00, 0.2486600E+00, &
     & 0.2646400E+00, 0.2564140E+00, 0.2436825E+00, 0.2436825E+00 /
      data (ref_adm( 4,iz,25, 6),iz = 1,20) / &
     & 0.2133100E+00, 0.2133100E+00, 0.2204200E+00, 0.2536200E+00, &
     & 0.2116200E+00, 0.2061800E+00, 0.2270600E+00, 0.2196600E+00, &
     & 0.2112300E+00, 0.2990900E+00, 0.2487000E+00, 0.1977100E+00, &
     & 0.2281500E+00, 0.2350600E+00, 0.2802400E+00, 0.2327900E+00, &
     & 0.2192300E+00, 0.2566750E+00, 0.2439075E+00, 0.2439075E+00 /
      data (ref_adm( 4,iz,26, 6),iz = 1,20) / &
     & 0.2187400E+00, 0.2187400E+00, 0.2370500E+00, 0.2097700E+00, &
     & 0.2529900E+00, 0.2096900E+00, 0.2791100E+00, 0.2390700E+00, &
     & 0.2626600E+00, 0.2694300E+00, 0.2483500E+00, 0.2270000E+00, &
     & 0.2134800E+00, 0.2283300E+00, 0.2497600E+00, 0.2584700E+00, &
     & 0.2572428E+00, 0.2633700E+00, 0.2443780E+00, 0.2443780E+00 /
      data (ref_adm( 4,iz,27, 6),iz = 1,20) / &
     & 0.2428200E+00, 0.2428200E+00, 0.2371800E+00, 0.2386200E+00, &
     & 0.2390400E+00, 0.2441800E+00, 0.2510700E+00, 0.2505300E+00, &
     & 0.2620800E+00, 0.2335300E+00, 0.2583800E+00, 0.2272900E+00, &
     & 0.2321400E+00, 0.2317600E+00, 0.2649700E+00, 0.1916900E+00, &
     & 0.2585627E+00, 0.2578493E+00, 0.1558500E+00, 0.1558500E+00 /
      data (ref_adm( 4,iz,28, 6),iz = 1,20) / &
     & 0.2165100E+00, 0.2165100E+00, 0.2177500E+00, 0.2460000E+00, &
     & 0.2331400E+00, 0.2411700E+00, 0.2231900E+00, 0.2396500E+00, &
     & 0.2382300E+00, 0.2510200E+00, 0.2512300E+00, 0.2494700E+00, &
     & 0.2091100E+00, 0.2367900E+00, 0.2411100E+00, 0.2603700E+00, &
     & 0.2602800E+00, 0.2411300E+00, 0.2055700E+00, 0.2055700E+00 /
      data (ref_adm( 4,iz,29, 6),iz = 1,20) / &
     & 0.2171900E+00, 0.2171900E+00, 0.2272200E+00, 0.2465900E+00, &
     & 0.2608400E+00, 0.2532000E+00, 0.2314200E+00, 0.2512300E+00, &
     & 0.2374200E+00, 0.2512700E+00, 0.2190700E+00, 0.2261600E+00, &
     & 0.2481500E+00, 0.2665700E+00, 0.2538600E+00, 0.2507200E+00, &
     & 0.2935200E+00, 0.3133300E+00, 0.2475489E+00, 0.2475489E+00 /
      data (ref_adm( 4,iz,30, 6),iz = 1,20) / &
     & 0.2423800E+00, 0.2423800E+00, 0.2487500E+00, 0.2601700E+00, &
     & 0.2508500E+00, 0.2560800E+00, 0.2624100E+00, 0.2435100E+00, &
     & 0.2509200E+00, 0.2276500E+00, 0.2412000E+00, 0.2938300E+00, &
     & 0.2602900E+00, 0.2664500E+00, 0.2538900E+00, 0.2541300E+00, &
     & 0.2647700E+00, 0.2469200E+00, 0.2488343E+00, 0.2488343E+00 /
      data (ref_adm( 4,iz,31, 6),iz = 1,20) / &
     & 0.2384400E+00, 0.2384400E+00, 0.2398500E+00, 0.2456500E+00, &
     & 0.2570300E+00, 0.2586900E+00, 0.2695900E+00, 0.2584800E+00, &
     & 0.2702800E+00, 0.2507900E+00, 0.2494500E+00, 0.3016200E+00, &
     & 0.2688300E+00, 0.2596300E+00, 0.2708100E+00, 0.2984500E+00, &
     & 0.2657370E+00, 0.2631226E+00, 0.2501998E+00, 0.2501998E+00 /
      data (ref_adm( 4,iz,32, 6),iz = 1,20) / &
     & 0.2305900E+00, 0.2305900E+00, 0.2270200E+00, 0.2039400E+00, &
     & 0.2444700E+00, 0.2566800E+00, 0.2513900E+00, 0.2592000E+00, &
     & 0.2585400E+00, 0.2612300E+00, 0.2634800E+00, 0.2396300E+00, &
     & 0.2696000E+00, 0.2452600E+00, 0.2609500E+00, 0.2672043E+00, &
     & 0.2673939E+00, 0.2647322E+00, 0.2518277E+00, 0.2518277E+00 /
      data (ref_adm( 4,iz,33, 6),iz = 1,20) / &
     & 0.2305100E+00, 0.2305100E+00, 0.2089400E+00, 0.2333400E+00, &
     & 0.2284200E+00, 0.2428200E+00, 0.2396000E+00, 0.2571900E+00, &
     & 0.2480400E+00, 0.2573100E+00, 0.2714600E+00, 0.2585200E+00, &
     & 0.2737200E+00, 0.2742400E+00, 0.2757000E+00, 0.2691360E+00, &
     & 0.2689255E+00, 0.2662703E+00, 0.2533921E+00, 0.2533921E+00 /
      data (ref_adm( 4,iz,34, 6),iz = 1,20) / &
     & 0.2413200E+00, 0.2413200E+00, 0.2622800E+00, 0.2344700E+00, &
     & 0.2597700E+00, 0.2657200E+00, 0.2459700E+00, 0.2510500E+00, &
     & 0.2634000E+00, 0.2472500E+00, 0.2446700E+00, 0.2484100E+00, &
     & 0.2660200E+00, 0.2557000E+00, 0.2648300E+00, 0.2706624E+00, &
     & 0.2702391E+00, 0.2675252E+00, 0.2546465E+00, 0.2546465E+00 /
      data (ref_adm( 4,iz,35, 6),iz = 1,20) / &
     & 0.2277300E+00, 0.2277300E+00, 0.2185800E+00, 0.2437700E+00, &
     & 0.2587000E+00, 0.2542800E+00, 0.3066700E+00, 0.3072500E+00, &
     & 0.2894100E+00, 0.2638200E+00, 0.2612600E+00, 0.2604700E+00, &
     & 0.2614600E+00, 0.2621900E+00, 0.2794600E+00, 0.2719548E+00, &
     & 0.2714609E+00, 0.2686147E+00, 0.2557213E+00, 0.2557213E+00 /
      data (ref_adm( 4,iz,36, 6),iz = 1,20) / &
     & 0.2234100E+00, 0.2234100E+00, 0.2441400E+00, 0.2383500E+00, &
     & 0.2930900E+00, 0.2804200E+00, 0.2873700E+00, 0.2996900E+00, &
     & 0.2781000E+00, 0.2690100E+00, 0.2801200E+00, 0.2814100E+00, &
     & 0.2474300E+00, 0.3012700E+00, 0.2729364E+00, 0.2728875E+00, &
     & 0.2722647E+00, 0.2692746E+00, 0.2564619E+00, 0.2564619E+00 /
      data (ref_adm( 4,iz,37, 6),iz = 1,20) / &
     & 0.2411500E+00, 0.2411500E+00, 0.1978100E+00, 0.2401800E+00, &
     & 0.2684600E+00, 0.2535200E+00, 0.3108500E+00, 0.3356400E+00, &
     & 0.2489900E+00, 0.2457600E+00, 0.2470300E+00, 0.2351000E+00, &
     & 0.2729752E+00, 0.2927600E+00, 0.2735804E+00, 0.2733482E+00, &
     & 0.2727130E+00, 0.2696052E+00, 0.2569195E+00, 0.2569195E+00 /
      data (ref_adm( 4,iz,38, 6),iz = 1,20) / &
     & 0.2411500E+00, 0.2411500E+00, 0.1978100E+00, 0.2401800E+00, &
     & 0.2684600E+00, 0.2535200E+00, 0.3108500E+00, 0.3356400E+00, &
     & 0.2489900E+00, 0.2457600E+00, 0.2470300E+00, 0.2351000E+00, &
     & 0.2729752E+00, 0.2927600E+00, 0.2735804E+00, 0.2733482E+00, &
     & 0.2727130E+00, 0.2696052E+00, 0.2569195E+00, 0.2569195E+00 /
! Solar Zenith Angle 30.0 Albedo  0.2491410E+00
      data (ref_adm( 4,iz, 1, 7),iz = 1,20) / &
     & 0.2279200E+00, 0.2279200E+00, 0.2622100E+00, 0.2413600E+00, &
     & 0.2754900E+00, 0.1935000E+00, 0.2005000E+00, 0.2558500E+00, &
     & 0.1952000E+00, 0.2119400E+00, 0.2618100E+00, 0.2304800E+00, &
     & 0.2425600E+00, 0.2546200E+00, 0.2765100E+00, 0.2951000E+00, &
     & 0.3040800E+00, 0.3589900E+00, 0.2632500E+00, 0.2632500E+00 /
      data (ref_adm( 4,iz, 2, 7),iz = 1,20) / &
     & 0.2279200E+00, 0.2279200E+00, 0.2622100E+00, 0.2413600E+00, &
     & 0.2754900E+00, 0.1935000E+00, 0.2005000E+00, 0.2558500E+00, &
     & 0.1952000E+00, 0.2119400E+00, 0.2618100E+00, 0.2304800E+00, &
     & 0.2425600E+00, 0.2546200E+00, 0.2765100E+00, 0.2951000E+00, &
     & 0.3040800E+00, 0.3589900E+00, 0.2632500E+00, 0.2632500E+00 /
      data (ref_adm( 4,iz, 3, 7),iz = 1,20) / &
     & 0.2259200E+00, 0.2259200E+00, 0.2095200E+00, 0.2161300E+00, &
     & 0.2107000E+00, 0.1988200E+00, 0.2304400E+00, 0.1890400E+00, &
     & 0.2196000E+00, 0.2205000E+00, 0.2405700E+00, 0.1961500E+00, &
     & 0.2562200E+00, 0.2543000E+00, 0.2949700E+00, 0.2978000E+00, &
     & 0.2848200E+00, 0.3205800E+00, 0.3295800E+00, 0.3295800E+00 /
      data (ref_adm( 4,iz, 4, 7),iz = 1,20) / &
     & 0.2322100E+00, 0.2322100E+00, 0.2251400E+00, 0.1903200E+00, &
     & 0.1828800E+00, 0.2246300E+00, 0.2245800E+00, 0.2103200E+00, &
     & 0.2135200E+00, 0.2247300E+00, 0.2061000E+00, 0.2395100E+00, &
     & 0.2234100E+00, 0.2227400E+00, 0.2494900E+00, 0.3047200E+00, &
     & 0.3203800E+00, 0.3335200E+00, 0.3865300E+00, 0.3865300E+00 /
      data (ref_adm( 4,iz, 5, 7),iz = 1,20) / &
     & 0.2074024E+00, 0.2074024E+00, 0.2517600E+00, 0.2170100E+00, &
     & 0.2175300E+00, 0.2316100E+00, 0.2342200E+00, 0.2108700E+00, &
     & 0.1948200E+00, 0.1938500E+00, 0.2076100E+00, 0.2232900E+00, &
     & 0.2294600E+00, 0.2729000E+00, 0.3027400E+00, 0.2622200E+00, &
     & 0.3485000E+00, 0.3089500E+00, 0.2624780E+00, 0.2624780E+00 /
      data (ref_adm( 4,iz, 6, 7),iz = 1,20) / &
     & 0.2709100E+00, 0.2709100E+00, 0.2434300E+00, 0.2663700E+00, &
     & 0.3028800E+00, 0.2463000E+00, 0.1842500E+00, 0.2405400E+00, &
     & 0.2364300E+00, 0.2085500E+00, 0.1945800E+00, 0.1851500E+00, &
     & 0.2314400E+00, 0.2273100E+00, 0.2798900E+00, 0.3048400E+00, &
     & 0.3081500E+00, 0.3910600E+00, 0.2620369E+00, 0.2620369E+00 /
      data (ref_adm( 4,iz, 7, 7),iz = 1,20) / &
     & 0.2418900E+00, 0.2418900E+00, 0.2059100E+00, 0.2442800E+00, &
     & 0.2339500E+00, 0.2369100E+00, 0.2370000E+00, 0.2089000E+00, &
     & 0.2229400E+00, 0.2090300E+00, 0.2207600E+00, 0.2162800E+00, &
     & 0.2498200E+00, 0.2118700E+00, 0.2092500E+00, 0.3101400E+00, &
     & 0.3484900E+00, 0.3332000E+00, 0.3191600E+00, 0.3191600E+00 /
      data (ref_adm( 4,iz, 8, 7),iz = 1,20) / &
     & 0.2395500E+00, 0.2395500E+00, 0.1950300E+00, 0.2193700E+00, &
     & 0.1975400E+00, 0.2054600E+00, 0.2345400E+00, 0.2048800E+00, &
     & 0.1952000E+00, 0.2293600E+00, 0.1852300E+00, 0.2485200E+00, &
     & 0.2344700E+00, 0.3475700E+00, 0.3094200E+00, 0.3767000E+00, &
     & 0.3057947E+00, 0.3190500E+00, 0.2606739E+00, 0.2606739E+00 /
      data (ref_adm( 4,iz, 9, 7),iz = 1,20) / &
     & 0.2216300E+00, 0.2216300E+00, 0.2132500E+00, 0.2417200E+00, &
     & 0.1822100E+00, 0.2252800E+00, 0.1880600E+00, 0.2123000E+00, &
     & 0.2209800E+00, 0.2298400E+00, 0.2155000E+00, 0.2210100E+00, &
     & 0.2606000E+00, 0.2970000E+00, 0.3371100E+00, 0.3353000E+00, &
     & 0.3318400E+00, 0.3703400E+00, 0.2597572E+00, 0.2597572E+00 /
      data (ref_adm( 4,iz,10, 7),iz = 1,20) / &
     & 0.2451900E+00, 0.2451900E+00, 0.2228500E+00, 0.2250700E+00, &
     & 0.2255400E+00, 0.2100200E+00, 0.1692500E+00, 0.1874500E+00, &
     & 0.2111500E+00, 0.1944700E+00, 0.2025700E+00, 0.2366200E+00, &
     & 0.2720000E+00, 0.3334000E+00, 0.2949500E+00, 0.2755400E+00, &
     & 0.2303600E+00, 0.2374000E+00, 0.2587778E+00, 0.2587778E+00 /
      data (ref_adm( 4,iz,11, 7),iz = 1,20) / &
     & 0.2218200E+00, 0.2218200E+00, 0.2221200E+00, 0.2217500E+00, &
     & 0.2214700E+00, 0.2316300E+00, 0.2353200E+00, 0.2147700E+00, &
     & 0.2163300E+00, 0.2060300E+00, 0.1938800E+00, 0.2339300E+00, &
     & 0.2479400E+00, 0.2723000E+00, 0.2644900E+00, 0.2437700E+00, &
     & 0.3138000E+00, 0.2961394E+00, 0.2527100E+00, 0.2527100E+00 /
      data (ref_adm( 4,iz,12, 7),iz = 1,20) / &
     & 0.2340400E+00, 0.2340400E+00, 0.2339100E+00, 0.2196900E+00, &
     & 0.2215500E+00, 0.2241600E+00, 0.2148500E+00, 0.2231400E+00, &
     & 0.2249800E+00, 0.2231900E+00, 0.2229600E+00, 0.2352900E+00, &
     & 0.2358300E+00, 0.2371600E+00, 0.2577000E+00, 0.2795500E+00, &
     & 0.2574600E+00, 0.2948303E+00, 0.2566624E+00, 0.2566624E+00 /
      data (ref_adm( 4,iz,13, 7),iz = 1,20) / &
     & 0.2251400E+00, 0.2251400E+00, 0.2105200E+00, 0.2180800E+00, &
     & 0.2090200E+00, 0.2283700E+00, 0.2140700E+00, 0.2298500E+00, &
     & 0.2193500E+00, 0.2243400E+00, 0.2210100E+00, 0.2293200E+00, &
     & 0.2225400E+00, 0.1964300E+00, 0.1900200E+00, 0.2030800E+00, &
     & 0.2867700E+00, 0.2935869E+00, 0.2555360E+00, 0.2555360E+00 /
      data (ref_adm( 4,iz,14, 7),iz = 1,20) / &
     & 0.2421200E+00, 0.2421200E+00, 0.2324100E+00, 0.2297300E+00, &
     & 0.2258600E+00, 0.1698500E+00, 0.2746000E+00, 0.2194100E+00, &
     & 0.2198300E+00, 0.2248400E+00, 0.2260600E+00, 0.2231300E+00, &
     & 0.2172700E+00, 0.2268700E+00, 0.1909000E+00, 0.1917400E+00, &
     & 0.2984707E+00, 0.2920408E+00, 0.2543340E+00, 0.2543340E+00 /
      data (ref_adm( 4,iz,15, 7),iz = 1,20) / &
     & 0.2337700E+00, 0.2337700E+00, 0.2476400E+00, 0.2323700E+00, &
     & 0.2679200E+00, 0.2253700E+00, 0.2708100E+00, 0.2444000E+00, &
     & 0.2472700E+00, 0.2151100E+00, 0.2246300E+00, 0.2693800E+00, &
     & 0.2389400E+00, 0.2308200E+00, 0.2262100E+00, 0.2181200E+00, &
     & 0.1813700E+00, 0.2688900E+00, 0.2532472E+00, 0.2532472E+00 /
      data (ref_adm( 4,iz,16, 7),iz = 1,20) / &
     & 0.2501600E+00, 0.2501600E+00, 0.2774800E+00, 0.2126000E+00, &
     & 0.2347400E+00, 0.2109600E+00, 0.2592000E+00, 0.2473300E+00, &
     & 0.1944900E+00, 0.2384100E+00, 0.2280800E+00, 0.3096500E+00, &
     & 0.2770800E+00, 0.2225900E+00, 0.1993900E+00, 0.2190300E+00, &
     & 0.2952609E+00, 0.2891157E+00, 0.2521302E+00, 0.2521302E+00 /
      data (ref_adm( 4,iz,17, 7),iz = 1,20) / &
     & 0.2195400E+00, 0.2195400E+00, 0.2106200E+00, 0.1979800E+00, &
     & 0.1948900E+00, 0.2496300E+00, 0.1982100E+00, 0.2879100E+00, &
     & 0.2530400E+00, 0.2780300E+00, 0.1627300E+00, 0.2361000E+00, &
     & 0.2940000E+00, 0.3192600E+00, 0.2759588E+00, 0.1883300E+00, &
     & 0.2271900E+00, 0.2894300E+00, 0.2511217E+00, 0.2511217E+00 /
      data (ref_adm( 4,iz,18, 7),iz = 1,20) / &
     & 0.2104800E+00, 0.2104800E+00, 0.2212500E+00, 0.2196400E+00, &
     & 0.2312800E+00, 0.2274900E+00, 0.2323000E+00, 0.2187700E+00, &
     & 0.2154600E+00, 0.1997400E+00, 0.2167200E+00, 0.2911800E+00, &
     & 0.2428000E+00, 0.2401524E+00, 0.2282100E+00, 0.2168800E+00, &
     & 0.1780500E+00, 0.2575400E+00, 0.2497316E+00, 0.2497316E+00 /
      data (ref_adm( 4,iz,19, 7),iz = 1,20) / &
     & 0.2425100E+00, 0.2425100E+00, 0.2112900E+00, 0.2338600E+00, &
     & 0.1924300E+00, 0.2296200E+00, 0.2268600E+00, 0.2140900E+00, &
     & 0.2414800E+00, 0.1554900E+00, 0.2279900E+00, 0.2447200E+00, &
     & 0.2558600E+00, 0.2388400E+00, 0.2275700E+00, 0.2351600E+00, &
     & 0.2183800E+00, 0.2556174E+00, 0.2479735E+00, 0.2479735E+00 /
      data (ref_adm( 4,iz,20, 7),iz = 1,20) / &
     & 0.2116900E+00, 0.2116900E+00, 0.2493200E+00, 0.2300000E+00, &
     & 0.2400500E+00, 0.2593700E+00, 0.2444900E+00, 0.2383200E+00, &
     & 0.2165400E+00, 0.2484500E+00, 0.2086900E+00, 0.2407600E+00, &
     & 0.2403100E+00, 0.2362400E+00, 0.2169500E+00, 0.2331400E+00, &
     & 0.2580300E+00, 0.2545007E+00, 0.2467960E+00, 0.2467960E+00 /
      data (ref_adm( 4,iz,21, 7),iz = 1,20) / &
     & 0.2441900E+00, 0.2441900E+00, 0.2419000E+00, 0.2157000E+00, &
     & 0.2482100E+00, 0.2139900E+00, 0.2066500E+00, 0.2415400E+00, &
     & 0.2700900E+00, 0.2968100E+00, 0.2441500E+00, 0.2515100E+00, &
     & 0.2443200E+00, 0.2259400E+00, 0.2302000E+00, 0.2349900E+00, &
     & 0.2382600E+00, 0.2639700E+00, 0.2458635E+00, 0.2458635E+00 /
      data (ref_adm( 4,iz,22, 7),iz = 1,20) / &
     & 0.2292600E+00, 0.2292600E+00, 0.2711600E+00, 0.2456400E+00, &
     & 0.2125300E+00, 0.2274900E+00, 0.3335400E+00, 0.2227900E+00, &
     & 0.2627500E+00, 0.2930700E+00, 0.2483900E+00, 0.2510700E+00, &
     & 0.2446100E+00, 0.2490100E+00, 0.2264200E+00, 0.2198600E+00, &
     & 0.2465200E+00, 0.2699835E+00, 0.2567032E+00, 0.2567032E+00 /
      data (ref_adm( 4,iz,23, 7),iz = 1,20) / &
     & 0.2338600E+00, 0.2338600E+00, 0.2356500E+00, 0.2435000E+00, &
     & 0.2110000E+00, 0.2390900E+00, 0.2686400E+00, 0.3079100E+00, &
     & 0.2092400E+00, 0.2731300E+00, 0.2653200E+00, 0.1983900E+00, &
     & 0.2464000E+00, 0.2218700E+00, 0.2300200E+00, 0.2734600E+00, &
     & 0.2428300E+00, 0.2695008E+00, 0.2564185E+00, 0.2564185E+00 /
      data (ref_adm( 4,iz,24, 7),iz = 1,20) / &
     & 0.2103200E+00, 0.2103200E+00, 0.2429300E+00, 0.2544400E+00, &
     & 0.2694800E+00, 0.2829000E+00, 0.2658300E+00, 0.2352000E+00, &
     & 0.2690600E+00, 0.2500600E+00, 0.2354600E+00, 0.2287800E+00, &
     & 0.2444600E+00, 0.2479400E+00, 0.2568400E+00, 0.3051500E+00, &
     & 0.2957400E+00, 0.2694450E+00, 0.2565697E+00, 0.2565697E+00 /
      data (ref_adm( 4,iz,25, 7),iz = 1,20) / &
     & 0.2257300E+00, 0.2257300E+00, 0.2333600E+00, 0.1904500E+00, &
     & 0.2273700E+00, 0.2041700E+00, 0.2428200E+00, 0.2433600E+00, &
     & 0.2862800E+00, 0.2179200E+00, 0.2284900E+00, 0.2436400E+00, &
     & 0.3323800E+00, 0.2476000E+00, 0.2844000E+00, 0.2874900E+00, &
     & 0.3080900E+00, 0.3167800E+00, 0.2570254E+00, 0.2570254E+00 /
      data (ref_adm( 4,iz,26, 7),iz = 1,20) / &
     & 0.2484800E+00, 0.2484800E+00, 0.2270600E+00, 0.2152800E+00, &
     & 0.2457300E+00, 0.2417100E+00, 0.2669000E+00, 0.2761200E+00, &
     & 0.3196900E+00, 0.2514700E+00, 0.3123800E+00, 0.2874600E+00, &
     & 0.2383800E+00, 0.2307100E+00, 0.2946400E+00, 0.2776500E+00, &
     & 0.2939700E+00, 0.2707153E+00, 0.2580845E+00, 0.2580845E+00 /
      data (ref_adm( 4,iz,27, 7),iz = 1,20) / &
     & 0.1998200E+00, 0.1998200E+00, 0.2324300E+00, 0.2248800E+00, &
     & 0.2517000E+00, 0.2501401E+00, 0.2384300E+00, 0.3276400E+00, &
     & 0.2724500E+00, 0.2772400E+00, 0.3008300E+00, 0.2681500E+00, &
     & 0.2643100E+00, 0.2415500E+00, 0.2478100E+00, 0.3097500E+00, &
     & 0.2859200E+00, 0.2867200E+00, 0.2595642E+00, 0.2595642E+00 /
      data (ref_adm( 4,iz,28, 7),iz = 1,20) / &
     & 0.2387500E+00, 0.2387500E+00, 0.2330900E+00, 0.2401800E+00, &
     & 0.2459000E+00, 0.2444600E+00, 0.2598100E+00, 0.2427700E+00, &
     & 0.2670800E+00, 0.2700900E+00, 0.2887600E+00, 0.2729700E+00, &
     & 0.2224400E+00, 0.2400000E+00, 0.2391700E+00, 0.2997300E+00, &
     & 0.2750430E+00, 0.2800600E+00, 0.2479000E+00, 0.2479000E+00 /
      data (ref_adm( 4,iz,29, 7),iz = 1,20) / &
     & 0.2377900E+00, 0.2377900E+00, 0.2316000E+00, 0.2436500E+00, &
     & 0.2492100E+00, 0.2417500E+00, 0.2499000E+00, 0.2553300E+00, &
     & 0.2604300E+00, 0.2680100E+00, 0.2646000E+00, 0.2653300E+00, &
     & 0.2534700E+00, 0.2495000E+00, 0.3192500E+00, 0.3244500E+00, &
     & 0.2866800E+00, 0.2940600E+00, 0.2666800E+00, 0.2666800E+00 /
      data (ref_adm( 4,iz,30, 7),iz = 1,20) / &
     & 0.2447000E+00, 0.2447000E+00, 0.2376500E+00, 0.2549900E+00, &
     & 0.2722400E+00, 0.2510400E+00, 0.2693000E+00, 0.2522700E+00, &
     & 0.2547400E+00, 0.2646200E+00, 0.2611400E+00, 0.2730100E+00, &
     & 0.2745800E+00, 0.2573000E+00, 0.3048800E+00, 0.2985900E+00, &
     & 0.2828100E+00, 0.2684200E+00, 0.2204000E+00, 0.2204000E+00 /
      data (ref_adm( 4,iz,31, 7),iz = 1,20) / &
     & 0.2292300E+00, 0.2292300E+00, 0.2677300E+00, 0.2442400E+00, &
     & 0.2508000E+00, 0.2653500E+00, 0.2511400E+00, 0.2231800E+00, &
     & 0.2703900E+00, 0.2683600E+00, 0.2650500E+00, 0.2538600E+00, &
     & 0.2728600E+00, 0.2543900E+00, 0.2840900E+00, 0.2971200E+00, &
     & 0.2956000E+00, 0.2904700E+00, 0.2175300E+00, 0.2175300E+00 /
      data (ref_adm( 4,iz,32, 7),iz = 1,20) / &
     & 0.2325400E+00, 0.2325400E+00, 0.2103000E+00, 0.2653900E+00, &
     & 0.2468700E+00, 0.2384900E+00, 0.2421500E+00, 0.2650000E+00, &
     & 0.2669400E+00, 0.2838500E+00, 0.2571600E+00, 0.2627900E+00, &
     & 0.2692200E+00, 0.2729700E+00, 0.2510100E+00, 0.2652000E+00, &
     & 0.2462400E+00, 0.2376400E+00, 0.2707798E+00, 0.2707798E+00 /
      data (ref_adm( 4,iz,33, 7),iz = 1,20) / &
     & 0.2300200E+00, 0.2300200E+00, 0.2306700E+00, 0.2446700E+00, &
     & 0.2525600E+00, 0.2317400E+00, 0.2789900E+00, 0.2664300E+00, &
     & 0.2569400E+00, 0.2493400E+00, 0.2495000E+00, 0.2565000E+00, &
     & 0.2587700E+00, 0.2707000E+00, 0.2778800E+00, 0.2977500E+00, &
     & 0.2704200E+00, 0.2850412E+00, 0.2731734E+00, 0.2731734E+00 /
      data (ref_adm( 4,iz,34, 7),iz = 1,20) / &
     & 0.2204300E+00, 0.2204300E+00, 0.2532600E+00, 0.2684100E+00, &
     & 0.2468800E+00, 0.2608300E+00, 0.2740000E+00, 0.2774600E+00, &
     & 0.2596300E+00, 0.2567900E+00, 0.2715400E+00, 0.2719600E+00, &
     & 0.2453300E+00, 0.2692700E+00, 0.2689900E+00, 0.3030200E+00, &
     & 0.2898867E+00, 0.2868554E+00, 0.2751414E+00, 0.2751414E+00 /
      data (ref_adm( 4,iz,35, 7),iz = 1,20) / &
     & 0.2130000E+00, 0.2130000E+00, 0.2489900E+00, 0.2436600E+00, &
     & 0.2727500E+00, 0.2749000E+00, 0.2782500E+00, 0.3098200E+00, &
     & 0.2777500E+00, 0.3087200E+00, 0.3407200E+00, 0.2680700E+00, &
     & 0.3015800E+00, 0.2815800E+00, 0.2765700E+00, 0.2621200E+00, &
     & 0.2915611E+00, 0.2883010E+00, 0.2767951E+00, 0.2767951E+00 /
      data (ref_adm( 4,iz,36, 7),iz = 1,20) / &
     & 0.2425100E+00, 0.2425100E+00, 0.2502500E+00, 0.2485700E+00, &
     & 0.2267300E+00, 0.2590100E+00, 0.2859100E+00, 0.2975400E+00, &
     & 0.3309700E+00, 0.3092000E+00, 0.3146000E+00, 0.2840000E+00, &
     & 0.2779400E+00, 0.2979800E+00, 0.2839700E+00, 0.2931986E+00, &
     & 0.2926534E+00, 0.2894687E+00, 0.2778681E+00, 0.2778681E+00 /
      data (ref_adm( 4,iz,37, 7),iz = 1,20) / &
     & 0.2235500E+00, 0.2235500E+00, 0.2119900E+00, 0.2267800E+00, &
     & 0.2423700E+00, 0.2692100E+00, 0.2586600E+00, 0.3266400E+00, &
     & 0.3229200E+00, 0.2786900E+00, 0.3054600E+00, 0.3351300E+00, &
     & 0.3191300E+00, 0.2831900E+00, 0.2731600E+00, 0.2940757E+00, &
     & 0.2933800E+00, 0.2900503E+00, 0.2785294E+00, 0.2785294E+00 /
      data (ref_adm( 4,iz,38, 7),iz = 1,20) / &
     & 0.2235500E+00, 0.2235500E+00, 0.2119900E+00, 0.2267800E+00, &
     & 0.2423700E+00, 0.2692100E+00, 0.2586600E+00, 0.3266400E+00, &
     & 0.3229200E+00, 0.2786900E+00, 0.3054600E+00, 0.3351300E+00, &
     & 0.3191300E+00, 0.2831900E+00, 0.2731600E+00, 0.2940757E+00, &
     & 0.2933800E+00, 0.2900503E+00, 0.2785294E+00, 0.2785294E+00 /
! Solar Zenith Angle 35.0 Albedo  0.2591574E+00
      data (ref_adm( 4,iz, 1, 8),iz = 1,20) / &
     & 0.2352700E+00, 0.2352700E+00, 0.2118300E+00, 0.2588700E+00, &
     & 0.2184600E+00, 0.2470900E+00, 0.2136500E+00, 0.2099900E+00, &
     & 0.2393600E+00, 0.2556200E+00, 0.2278000E+00, 0.2396700E+00, &
     & 0.2454700E+00, 0.2775300E+00, 0.3443400E+00, 0.3077900E+00, &
     & 0.3418100E+00, 0.3308800E+00, 0.4022969E+00, 0.4022969E+00 /
      data (ref_adm( 4,iz, 2, 8),iz = 1,20) / &
     & 0.2352700E+00, 0.2352700E+00, 0.2118300E+00, 0.2588700E+00, &
     & 0.2184600E+00, 0.2470900E+00, 0.2136500E+00, 0.2099900E+00, &
     & 0.2393600E+00, 0.2556200E+00, 0.2278000E+00, 0.2396700E+00, &
     & 0.2454700E+00, 0.2775300E+00, 0.3443400E+00, 0.3077900E+00, &
     & 0.3418100E+00, 0.3308800E+00, 0.4022969E+00, 0.4022969E+00 /
      data (ref_adm( 4,iz, 3, 8),iz = 1,20) / &
     & 0.2302900E+00, 0.2302900E+00, 0.2337500E+00, 0.2044200E+00, &
     & 0.2548200E+00, 0.2414300E+00, 0.2125200E+00, 0.2123300E+00, &
     & 0.2220300E+00, 0.2193100E+00, 0.2225200E+00, 0.2307700E+00, &
     & 0.2513100E+00, 0.3140700E+00, 0.3089100E+00, 0.3096200E+00, &
     & 0.3156400E+00, 0.4234000E+00, 0.1010906E+00, 0.1010906E+00 /
      data (ref_adm( 4,iz, 4, 8),iz = 1,20) / &
     & 0.2376100E+00, 0.2376100E+00, 0.2237200E+00, 0.2254800E+00, &
     & 0.2255000E+00, 0.2274400E+00, 0.2272800E+00, 0.2347700E+00, &
     & 0.2219800E+00, 0.2117300E+00, 0.2518700E+00, 0.2062400E+00, &
     & 0.2350600E+00, 0.2585200E+00, 0.2957700E+00, 0.3037900E+00, &
     & 0.3248700E+00, 0.3962800E+00, 0.3825000E+00, 0.3825000E+00 /
      data (ref_adm( 4,iz, 5, 8),iz = 1,20) / &
     & 0.2219500E+00, 0.2219500E+00, 0.2409900E+00, 0.2075100E+00, &
     & 0.2311200E+00, 0.2349000E+00, 0.2451300E+00, 0.2069700E+00, &
     & 0.2255800E+00, 0.2310100E+00, 0.2421600E+00, 0.2689300E+00, &
     & 0.2425600E+00, 0.2535100E+00, 0.3016900E+00, 0.3009700E+00, &
     & 0.4029100E+00, 0.3725000E+00, 0.3599800E+00, 0.3599800E+00 /
      data (ref_adm( 4,iz, 6, 8),iz = 1,20) / &
     & 0.1992300E+00, 0.1992300E+00, 0.2156800E+00, 0.2178500E+00, &
     & 0.2289300E+00, 0.2180000E+00, 0.2135000E+00, 0.2048400E+00, &
     & 0.2076400E+00, 0.2388100E+00, 0.2406200E+00, 0.2390000E+00, &
     & 0.2390500E+00, 0.2755100E+00, 0.2586700E+00, 0.2779900E+00, &
     & 0.3738200E+00, 0.3847200E+00, 0.3841200E+00, 0.3841200E+00 /
      data (ref_adm( 4,iz, 7, 8),iz = 1,20) / &
     & 0.2260900E+00, 0.2260900E+00, 0.2076500E+00, 0.2047100E+00, &
     & 0.2306200E+00, 0.2055400E+00, 0.2200800E+00, 0.2526300E+00, &
     & 0.2291900E+00, 0.2521800E+00, 0.2232000E+00, 0.2585600E+00, &
     & 0.2313300E+00, 0.2665900E+00, 0.2754700E+00, 0.2604200E+00, &
     & 0.4101300E+00, 0.3830100E+00, 0.3611400E+00, 0.3611400E+00 /
      data (ref_adm( 4,iz, 8, 8),iz = 1,20) / &
     & 0.2459200E+00, 0.2459200E+00, 0.2170400E+00, 0.2105400E+00, &
     & 0.2019800E+00, 0.2251000E+00, 0.2070600E+00, 0.2140300E+00, &
     & 0.2266600E+00, 0.2304900E+00, 0.2315200E+00, 0.2237200E+00, &
     & 0.2368100E+00, 0.2482900E+00, 0.2734900E+00, 0.3137200E+00, &
     & 0.4521800E+00, 0.4248400E+00, 0.3454700E+00, 0.3454700E+00 /
      data (ref_adm( 4,iz, 9, 8),iz = 1,20) / &
     & 0.2316300E+00, 0.2316300E+00, 0.2572900E+00, 0.2446800E+00, &
     & 0.2330200E+00, 0.2225200E+00, 0.2329800E+00, 0.2293300E+00, &
     & 0.2469500E+00, 0.2453900E+00, 0.2391000E+00, 0.2536200E+00, &
     & 0.2721500E+00, 0.2813300E+00, 0.2914600E+00, 0.3029400E+00, &
     & 0.3864300E+00, 0.3953400E+00, 0.3567300E+00, 0.3567300E+00 /
      data (ref_adm( 4,iz,10, 8),iz = 1,20) / &
     & 0.2519800E+00, 0.2519800E+00, 0.2292600E+00, 0.2413400E+00, &
     & 0.2289400E+00, 0.2160000E+00, 0.2268300E+00, 0.2305600E+00, &
     & 0.2378600E+00, 0.2476000E+00, 0.2615700E+00, 0.2395700E+00, &
     & 0.2791300E+00, 0.2805900E+00, 0.2757000E+00, 0.2997400E+00, &
     & 0.3263500E+00, 0.3433100E+00, 0.3398000E+00, 0.3398000E+00 /
      data (ref_adm( 4,iz,11, 8),iz = 1,20) / &
     & 0.2490400E+00, 0.2490400E+00, 0.2484100E+00, 0.2239200E+00, &
     & 0.2202700E+00, 0.2253700E+00, 0.2286700E+00, 0.2346400E+00, &
     & 0.2230800E+00, 0.2404300E+00, 0.2204900E+00, 0.2448200E+00, &
     & 0.2336800E+00, 0.2432600E+00, 0.3149200E+00, 0.3105500E+00, &
     & 0.3723500E+00, 0.3456600E+00, 0.2840700E+00, 0.2840700E+00 /
      data (ref_adm( 4,iz,12, 8),iz = 1,20) / &
     & 0.2436400E+00, 0.2436400E+00, 0.2370000E+00, 0.2347900E+00, &
     & 0.2410000E+00, 0.2227400E+00, 0.2319400E+00, 0.2457800E+00, &
     & 0.2299900E+00, 0.2368900E+00, 0.2389900E+00, 0.2254800E+00, &
     & 0.2643700E+00, 0.2921100E+00, 0.3008100E+00, 0.3002900E+00, &
     & 0.3034300E+00, 0.3731100E+00, 0.3295346E+00, 0.3295346E+00 /
      data (ref_adm( 4,iz,13, 8),iz = 1,20) / &
     & 0.2445700E+00, 0.2445700E+00, 0.2241700E+00, 0.2208700E+00, &
     & 0.2220200E+00, 0.2119800E+00, 0.2193600E+00, 0.2202500E+00, &
     & 0.2314300E+00, 0.2277200E+00, 0.2340000E+00, 0.2327700E+00, &
     & 0.2387000E+00, 0.2349300E+00, 0.2827700E+00, 0.3010500E+00, &
     & 0.3111700E+00, 0.3100100E+00, 0.3240534E+00, 0.3240534E+00 /
      data (ref_adm( 4,iz,14, 8),iz = 1,20) / &
     & 0.2383500E+00, 0.2383500E+00, 0.2340400E+00, 0.2231800E+00, &
     & 0.2129500E+00, 0.2103200E+00, 0.2196500E+00, 0.2169800E+00, &
     & 0.2168300E+00, 0.2232800E+00, 0.2153800E+00, 0.2389600E+00, &
     & 0.2390800E+00, 0.2468100E+00, 0.2739800E+00, 0.3160900E+00, &
     & 0.3501800E+00, 0.3124000E+00, 0.2437700E+00, 0.2437700E+00 /
      data (ref_adm( 4,iz,15, 8),iz = 1,20) / &
     & 0.2405100E+00, 0.2405100E+00, 0.2522100E+00, 0.2649700E+00, &
     & 0.2333300E+00, 0.2309500E+00, 0.2198700E+00, 0.2441100E+00, &
     & 0.2310700E+00, 0.2192500E+00, 0.2256700E+00, 0.2216800E+00, &
     & 0.2278000E+00, 0.2242000E+00, 0.3624800E+00, 0.3135000E+00, &
     & 0.2758600E+00, 0.3173200E+00, 0.3121383E+00, 0.3121383E+00 /
      data (ref_adm( 4,iz,16, 8),iz = 1,20) / &
     & 0.2537500E+00, 0.2537500E+00, 0.2331400E+00, 0.2438900E+00, &
     & 0.2220200E+00, 0.2203300E+00, 0.2339300E+00, 0.2624800E+00, &
     & 0.2273100E+00, 0.2317400E+00, 0.2320700E+00, 0.2402600E+00, &
     & 0.2191200E+00, 0.2321700E+00, 0.2618900E+00, 0.2542800E+00, &
     & 0.2944010E+00, 0.2994400E+00, 0.3056947E+00, 0.3056947E+00 /
      data (ref_adm( 4,iz,17, 8),iz = 1,20) / &
     & 0.2453600E+00, 0.2453600E+00, 0.2615300E+00, 0.2011900E+00, &
     & 0.2288400E+00, 0.2266100E+00, 0.2827400E+00, 0.2440300E+00, &
     & 0.2357900E+00, 0.2072600E+00, 0.2320200E+00, 0.2295100E+00, &
     & 0.2227600E+00, 0.2471700E+00, 0.2497500E+00, 0.1947900E+00, &
     & 0.3289300E+00, 0.2937000E+00, 0.3001749E+00, 0.3001749E+00 /
      data (ref_adm( 4,iz,18, 8),iz = 1,20) / &
     & 0.2610300E+00, 0.2610300E+00, 0.2425500E+00, 0.2314300E+00, &
     & 0.2384500E+00, 0.2421500E+00, 0.2227900E+00, 0.2350400E+00, &
     & 0.2478900E+00, 0.2222600E+00, 0.2378300E+00, 0.2359300E+00, &
     & 0.2358600E+00, 0.2478400E+00, 0.2527500E+00, 0.2581400E+00, &
     & 0.2565100E+00, 0.2777857E+00, 0.2666861E+00, 0.2666861E+00 /
      data (ref_adm( 4,iz,19, 8),iz = 1,20) / &
     & 0.2351300E+00, 0.2351300E+00, 0.2309900E+00, 0.2219500E+00, &
     & 0.2298400E+00, 0.2156500E+00, 0.2453500E+00, 0.2577500E+00, &
     & 0.2447300E+00, 0.1834200E+00, 0.2568700E+00, 0.2323800E+00, &
     & 0.2366100E+00, 0.2229200E+00, 0.2447100E+00, 0.2674300E+00, &
     & 0.2289600E+00, 0.2486800E+00, 0.2642121E+00, 0.2642121E+00 /
      data (ref_adm( 4,iz,20, 8),iz = 1,20) / &
     & 0.2385200E+00, 0.2385200E+00, 0.2304300E+00, 0.2346300E+00, &
     & 0.2370400E+00, 0.2614000E+00, 0.2368000E+00, 0.2506600E+00, &
     & 0.2424100E+00, 0.2245100E+00, 0.2476300E+00, 0.2507700E+00, &
     & 0.2402100E+00, 0.2549500E+00, 0.2433600E+00, 0.2470400E+00, &
     & 0.2706082E+00, 0.2748507E+00, 0.2626131E+00, 0.2626131E+00 /
      data (ref_adm( 4,iz,21, 8),iz = 1,20) / &
     & 0.2633600E+00, 0.2633600E+00, 0.2523400E+00, 0.2344000E+00, &
     & 0.2265100E+00, 0.2426000E+00, 0.2448100E+00, 0.2358400E+00, &
     & 0.2215500E+00, 0.2385000E+00, 0.1931500E+00, 0.2434100E+00, &
     & 0.2275700E+00, 0.2976800E+00, 0.2511300E+00, 0.2564600E+00, &
     & 0.2606800E+00, 0.2737298E+00, 0.2614506E+00, 0.2614506E+00 /
      data (ref_adm( 4,iz,22, 8),iz = 1,20) / &
     & 0.2656600E+00, 0.2656600E+00, 0.2380400E+00, 0.2287200E+00, &
     & 0.2546200E+00, 0.2300700E+00, 0.2522100E+00, 0.2429200E+00, &
     & 0.2602700E+00, 0.2351500E+00, 0.2620500E+00, 0.2249300E+00, &
     & 0.2506700E+00, 0.2518500E+00, 0.2148000E+00, 0.2621200E+00, &
     & 0.2207000E+00, 0.2806742E+00, 0.2673678E+00, 0.2673678E+00 /
      data (ref_adm( 4,iz,23, 8),iz = 1,20) / &
     & 0.2603000E+00, 0.2603000E+00, 0.2423500E+00, 0.2568800E+00, &
     & 0.2541200E+00, 0.2519500E+00, 0.2469100E+00, 0.2707700E+00, &
     & 0.2894700E+00, 0.2307000E+00, 0.2745700E+00, 0.2574000E+00, &
     & 0.2494500E+00, 0.2522700E+00, 0.2456800E+00, 0.3193400E+00, &
     & 0.2581000E+00, 0.2801175E+00, 0.2671372E+00, 0.2671372E+00 /
      data (ref_adm( 4,iz,24, 8),iz = 1,20) / &
     & 0.2329800E+00, 0.2329800E+00, 0.2459500E+00, 0.2667300E+00, &
     & 0.2545700E+00, 0.2810400E+00, 0.2505300E+00, 0.2569100E+00, &
     & 0.2711100E+00, 0.2849700E+00, 0.2627700E+00, 0.2857000E+00, &
     & 0.2685000E+00, 0.2742700E+00, 0.2804400E+00, 0.2814000E+00, &
     & 0.3511300E+00, 0.2583500E+00, 0.2673941E+00, 0.2673941E+00 /
      data (ref_adm( 4,iz,25, 8),iz = 1,20) / &
     & 0.2411600E+00, 0.2411600E+00, 0.2283600E+00, 0.2396600E+00, &
     & 0.2619900E+00, 0.2265400E+00, 0.2595900E+00, 0.2717800E+00, &
     & 0.2993000E+00, 0.2681700E+00, 0.2475700E+00, 0.2785500E+00, &
     & 0.2812600E+00, 0.2874100E+00, 0.2565000E+00, 0.2559000E+00, &
     & 0.2921600E+00, 0.2737400E+00, 0.2681161E+00, 0.2681161E+00 /
      data (ref_adm( 4,iz,26, 8),iz = 1,20) / &
     & 0.2299500E+00, 0.2299500E+00, 0.2288800E+00, 0.2230400E+00, &
     & 0.2420700E+00, 0.2467300E+00, 0.2492600E+00, 0.2418100E+00, &
     & 0.2708900E+00, 0.2786600E+00, 0.2785500E+00, 0.2817100E+00, &
     & 0.2516200E+00, 0.2912800E+00, 0.2848900E+00, 0.2935600E+00, &
     & 0.3070100E+00, 0.2844200E+00, 0.2695391E+00, 0.2695391E+00 /
      data (ref_adm( 4,iz,27, 8),iz = 1,20) / &
     & 0.2368400E+00, 0.2368400E+00, 0.2317900E+00, 0.2270700E+00, &
     & 0.2512200E+00, 0.2440900E+00, 0.2589900E+00, 0.2594200E+00, &
     & 0.2522200E+00, 0.2755100E+00, 0.2783300E+00, 0.2824800E+00, &
     & 0.2550300E+00, 0.2859500E+00, 0.3091000E+00, 0.2947800E+00, &
     & 0.2911000E+00, 0.3040300E+00, 0.2712550E+00, 0.2712550E+00 /
      data (ref_adm( 4,iz,28, 8),iz = 1,20) / &
     & 0.2395000E+00, 0.2395000E+00, 0.2478000E+00, 0.2553000E+00, &
     & 0.2556700E+00, 0.2543600E+00, 0.2598400E+00, 0.2538300E+00, &
     & 0.2629500E+00, 0.2488600E+00, 0.2697800E+00, 0.2926400E+00, &
     & 0.3215900E+00, 0.3154500E+00, 0.2996500E+00, 0.3028100E+00, &
     & 0.3049400E+00, 0.2826500E+00, 0.2534500E+00, 0.2534500E+00 /
      data (ref_adm( 4,iz,29, 8),iz = 1,20) / &
     & 0.2470900E+00, 0.2470900E+00, 0.2430100E+00, 0.2606900E+00, &
     & 0.2439800E+00, 0.2491900E+00, 0.2557700E+00, 0.2699100E+00, &
     & 0.2686800E+00, 0.2651200E+00, 0.2729200E+00, 0.2724800E+00, &
     & 0.2808200E+00, 0.2810200E+00, 0.3131700E+00, 0.3174600E+00, &
     & 0.3170000E+00, 0.3026800E+00, 0.2538300E+00, 0.2538300E+00 /
      data (ref_adm( 4,iz,30, 8),iz = 1,20) / &
     & 0.2488400E+00, 0.2488400E+00, 0.2440900E+00, 0.2632600E+00, &
     & 0.2385300E+00, 0.2582400E+00, 0.2546100E+00, 0.2509800E+00, &
     & 0.2584900E+00, 0.2505100E+00, 0.2704400E+00, 0.2845400E+00, &
     & 0.2776900E+00, 0.2802900E+00, 0.3072900E+00, 0.3186400E+00, &
     & 0.3122100E+00, 0.3110800E+00, 0.2123600E+00, 0.2123600E+00 /
      data (ref_adm( 4,iz,31, 8),iz = 1,20) / &
     & 0.2420200E+00, 0.2420200E+00, 0.2491200E+00, 0.2569000E+00, &
     & 0.2366900E+00, 0.2388800E+00, 0.2720100E+00, 0.2815600E+00, &
     & 0.2400200E+00, 0.2778800E+00, 0.3000300E+00, 0.2677900E+00, &
     & 0.2576400E+00, 0.2777700E+00, 0.2897800E+00, 0.3179100E+00, &
     & 0.3353800E+00, 0.2842800E+00, 0.2385000E+00, 0.2385000E+00 /
      data (ref_adm( 4,iz,32, 8),iz = 1,20) / &
     & 0.2356400E+00, 0.2356400E+00, 0.2340000E+00, 0.2448200E+00, &
     & 0.2350100E+00, 0.2379200E+00, 0.2585500E+00, 0.2572300E+00, &
     & 0.2848000E+00, 0.3095300E+00, 0.2989000E+00, 0.2772500E+00, &
     & 0.2809000E+00, 0.2651000E+00, 0.3066900E+00, 0.3150300E+00, &
     & 0.3246500E+00, 0.2884900E+00, 0.2465300E+00, 0.2465300E+00 /
      data (ref_adm( 4,iz,33, 8),iz = 1,20) / &
     & 0.2168200E+00, 0.2168200E+00, 0.2468800E+00, 0.2627200E+00, &
     & 0.2347100E+00, 0.2418700E+00, 0.2714300E+00, 0.2732300E+00, &
     & 0.2608300E+00, 0.2998200E+00, 0.2783400E+00, 0.2770100E+00, &
     & 0.2686000E+00, 0.2636700E+00, 0.2927700E+00, 0.3072800E+00, &
     & 0.2861300E+00, 0.2628200E+00, 0.2083800E+00, 0.2083800E+00 /
      data (ref_adm( 4,iz,34, 8),iz = 1,20) / &
     & 0.2406000E+00, 0.2406000E+00, 0.2350500E+00, 0.2248300E+00, &
     & 0.2557300E+00, 0.2376600E+00, 0.2367400E+00, 0.2502200E+00, &
     & 0.3044100E+00, 0.3069900E+00, 0.2992500E+00, 0.3195300E+00, &
     & 0.3102000E+00, 0.2631000E+00, 0.2988500E+00, 0.3356700E+00, &
     & 0.2738200E+00, 0.3020307E+00, 0.2908595E+00, 0.2908595E+00 /
      data (ref_adm( 4,iz,35, 8),iz = 1,20) / &
     & 0.2271600E+00, 0.2271600E+00, 0.2471700E+00, 0.2488200E+00, &
     & 0.2563800E+00, 0.2911200E+00, 0.2357100E+00, 0.2826500E+00, &
     & 0.3006300E+00, 0.3150400E+00, 0.2877400E+00, 0.3061200E+00, &
     & 0.3251100E+00, 0.3100200E+00, 0.3017200E+00, 0.2978400E+00, &
     & 0.2784500E+00, 0.2757700E+00, 0.2928390E+00, 0.2928390E+00 /
      data (ref_adm( 4,iz,36, 8),iz = 1,20) / &
     & 0.2519200E+00, 0.2519200E+00, 0.2621800E+00, 0.2622600E+00, &
     & 0.2861900E+00, 0.2656300E+00, 0.2649300E+00, 0.2895200E+00, &
     & 0.3220800E+00, 0.3291100E+00, 0.2915200E+00, 0.3240200E+00, &
     & 0.2858700E+00, 0.2565500E+00, 0.2948000E+00, 0.2911500E+00, &
     & 0.3081123E+00, 0.3053021E+00, 0.2941748E+00, 0.2941748E+00 /
      data (ref_adm( 4,iz,37, 8),iz = 1,20) / &
     & 0.2425900E+00, 0.2425900E+00, 0.2454900E+00, 0.2516800E+00, &
     & 0.2329100E+00, 0.2914800E+00, 0.3011100E+00, 0.2847000E+00, &
     & 0.3324700E+00, 0.3209800E+00, 0.3175500E+00, 0.3157600E+00, &
     & 0.2996600E+00, 0.2749200E+00, 0.3225000E+00, 0.4567600E+00, &
     & 0.3090452E+00, 0.3060140E+00, 0.2949592E+00, 0.2949592E+00 /
      data (ref_adm( 4,iz,38, 8),iz = 1,20) / &
     & 0.2425900E+00, 0.2425900E+00, 0.2454900E+00, 0.2516800E+00, &
     & 0.2329100E+00, 0.2914800E+00, 0.3011100E+00, 0.2847000E+00, &
     & 0.3324700E+00, 0.3209800E+00, 0.3175500E+00, 0.3157600E+00, &
     & 0.2996600E+00, 0.2749200E+00, 0.3225000E+00, 0.4567600E+00, &
     & 0.3090452E+00, 0.3060140E+00, 0.2949592E+00, 0.2949592E+00 /
! Solar Zenith Angle 40.0 Albedo  0.2660691E+00
      data (ref_adm( 4,iz, 1, 9),iz = 1,20) / &
     & 0.2174200E+00, 0.2174200E+00, 0.2291300E+00, 0.2217200E+00, &
     & 0.2462900E+00, 0.2260300E+00, 0.2151500E+00, 0.2246500E+00, &
     & 0.2509500E+00, 0.2534000E+00, 0.2859800E+00, 0.2933600E+00, &
     & 0.2600000E+00, 0.2805700E+00, 0.3740200E+00, 0.3219500E+00, &
     & 0.3446500E+00, 0.3565500E+00, 0.3492100E+00, 0.3492100E+00 /
      data (ref_adm( 4,iz, 2, 9),iz = 1,20) / &
     & 0.2174200E+00, 0.2174200E+00, 0.2291300E+00, 0.2217200E+00, &
     & 0.2462900E+00, 0.2260300E+00, 0.2151500E+00, 0.2246500E+00, &
     & 0.2509500E+00, 0.2534000E+00, 0.2859800E+00, 0.2933600E+00, &
     & 0.2600000E+00, 0.2805700E+00, 0.3740200E+00, 0.3219500E+00, &
     & 0.3446500E+00, 0.3565500E+00, 0.3492100E+00, 0.3492100E+00 /
      data (ref_adm( 4,iz, 3, 9),iz = 1,20) / &
     & 0.2393500E+00, 0.2393500E+00, 0.2516400E+00, 0.2383400E+00, &
     & 0.2407600E+00, 0.2247300E+00, 0.2194100E+00, 0.2282500E+00, &
     & 0.2179600E+00, 0.2584400E+00, 0.2788500E+00, 0.2697200E+00, &
     & 0.2286500E+00, 0.2649800E+00, 0.3745500E+00, 0.3538900E+00, &
     & 0.3538200E+00, 0.3765500E+00, 0.3278000E+00, 0.3278000E+00 /
      data (ref_adm( 4,iz, 4, 9),iz = 1,20) / &
     & 0.2470700E+00, 0.2470700E+00, 0.2427400E+00, 0.2389200E+00, &
     & 0.2211700E+00, 0.2416300E+00, 0.2011900E+00, 0.2197200E+00, &
     & 0.2251300E+00, 0.2445200E+00, 0.2720100E+00, 0.2734400E+00, &
     & 0.2820500E+00, 0.2649200E+00, 0.3044700E+00, 0.3081000E+00, &
     & 0.3765500E+00, 0.4301500E+00, 0.3774100E+00, 0.3774100E+00 /
      data (ref_adm( 4,iz, 5, 9),iz = 1,20) / &
     & 0.2256400E+00, 0.2256400E+00, 0.2142000E+00, 0.2580500E+00, &
     & 0.2294700E+00, 0.2433600E+00, 0.2402800E+00, 0.2090400E+00, &
     & 0.2298200E+00, 0.2470000E+00, 0.2687000E+00, 0.2012100E+00, &
     & 0.2491600E+00, 0.2855400E+00, 0.2973200E+00, 0.2904600E+00, &
     & 0.4153900E+00, 0.3648100E+00, 0.3872100E+00, 0.3872100E+00 /
      data (ref_adm( 4,iz, 6, 9),iz = 1,20) / &
     & 0.2473700E+00, 0.2473700E+00, 0.2372500E+00, 0.2194200E+00, &
     & 0.2204500E+00, 0.2290200E+00, 0.2123700E+00, 0.2084500E+00, &
     & 0.2224100E+00, 0.2562800E+00, 0.2626300E+00, 0.2548400E+00, &
     & 0.2367900E+00, 0.2870400E+00, 0.3239000E+00, 0.3498200E+00, &
     & 0.3805300E+00, 0.4121000E+00, 0.3879200E+00, 0.3879200E+00 /
      data (ref_adm( 4,iz, 7, 9),iz = 1,20) / &
     & 0.2419200E+00, 0.2419200E+00, 0.2122000E+00, 0.2175300E+00, &
     & 0.2336900E+00, 0.2151300E+00, 0.2323700E+00, 0.2269000E+00, &
     & 0.2550700E+00, 0.2628300E+00, 0.2326900E+00, 0.2403400E+00, &
     & 0.2832900E+00, 0.2846400E+00, 0.3006100E+00, 0.3486000E+00, &
     & 0.3970600E+00, 0.4011500E+00, 0.3730000E+00, 0.3730000E+00 /
      data (ref_adm( 4,iz, 8, 9),iz = 1,20) / &
     & 0.2334900E+00, 0.2334900E+00, 0.2287700E+00, 0.2156600E+00, &
     & 0.2488200E+00, 0.2163500E+00, 0.2304500E+00, 0.2314900E+00, &
     & 0.2707900E+00, 0.2241400E+00, 0.2444800E+00, 0.2702400E+00, &
     & 0.2886200E+00, 0.2983300E+00, 0.3099500E+00, 0.3195100E+00, &
     & 0.3986500E+00, 0.3591800E+00, 0.3254200E+00, 0.3254200E+00 /
      data (ref_adm( 4,iz, 9, 9),iz = 1,20) / &
     & 0.2293500E+00, 0.2293500E+00, 0.2247700E+00, 0.2068300E+00, &
     & 0.2318900E+00, 0.2167600E+00, 0.2064800E+00, 0.2343300E+00, &
     & 0.2668900E+00, 0.2349800E+00, 0.2296000E+00, 0.3002500E+00, &
     & 0.3039400E+00, 0.2900600E+00, 0.3173500E+00, 0.3538500E+00, &
     & 0.3854500E+00, 0.3772800E+00, 0.2982586E+00, 0.2982586E+00 /
      data (ref_adm( 4,iz,10, 9),iz = 1,20) / &
     & 0.2411700E+00, 0.2411700E+00, 0.2120400E+00, 0.2309400E+00, &
     & 0.2460900E+00, 0.2341100E+00, 0.2252900E+00, 0.2179700E+00, &
     & 0.2400700E+00, 0.2324300E+00, 0.2383300E+00, 0.2669500E+00, &
     & 0.2700800E+00, 0.2736700E+00, 0.2912500E+00, 0.3174400E+00, &
     & 0.3113500E+00, 0.3623800E+00, 0.3492000E+00, 0.3492000E+00 /
      data (ref_adm( 4,iz,11, 9),iz = 1,20) / &
     & 0.2218400E+00, 0.2218400E+00, 0.2194900E+00, 0.2205700E+00, &
     & 0.2308100E+00, 0.2349100E+00, 0.2291500E+00, 0.2205600E+00, &
     & 0.2541300E+00, 0.2442500E+00, 0.2443800E+00, 0.2104100E+00, &
     & 0.2351500E+00, 0.2777000E+00, 0.2873000E+00, 0.3223300E+00, &
     & 0.3558700E+00, 0.3716000E+00, 0.3359900E+00, 0.3359900E+00 /
      data (ref_adm( 4,iz,12, 9),iz = 1,20) / &
     & 0.2245900E+00, 0.2245900E+00, 0.2295900E+00, 0.2313300E+00, &
     & 0.2261300E+00, 0.2225200E+00, 0.2211200E+00, 0.2190200E+00, &
     & 0.2131700E+00, 0.2308700E+00, 0.2689000E+00, 0.2346100E+00, &
     & 0.2356600E+00, 0.2717900E+00, 0.2644400E+00, 0.3102900E+00, &
     & 0.3388900E+00, 0.3459500E+00, 0.2609000E+00, 0.2609000E+00 /
      data (ref_adm( 4,iz,13, 9),iz = 1,20) / &
     & 0.2272300E+00, 0.2272300E+00, 0.2255100E+00, 0.2146800E+00, &
     & 0.2256200E+00, 0.2311700E+00, 0.2327700E+00, 0.2254000E+00, &
     & 0.2344000E+00, 0.2286700E+00, 0.2457800E+00, 0.2408400E+00, &
     & 0.2514200E+00, 0.2495300E+00, 0.2865000E+00, 0.3004500E+00, &
     & 0.3208700E+00, 0.3153300E+00, 0.2860759E+00, 0.2860759E+00 /
      data (ref_adm( 4,iz,14, 9),iz = 1,20) / &
     & 0.2183600E+00, 0.2183600E+00, 0.2197100E+00, 0.2192600E+00, &
     & 0.2253600E+00, 0.2235500E+00, 0.2272500E+00, 0.2313700E+00, &
     & 0.2181700E+00, 0.2191000E+00, 0.2187900E+00, 0.2204300E+00, &
     & 0.2377500E+00, 0.2453000E+00, 0.2713100E+00, 0.2503300E+00, &
     & 0.3251500E+00, 0.3345100E+00, 0.2599600E+00, 0.2599600E+00 /
      data (ref_adm( 4,iz,15, 9),iz = 1,20) / &
     & 0.2327500E+00, 0.2327500E+00, 0.1989500E+00, 0.2348600E+00, &
     & 0.2105200E+00, 0.2350900E+00, 0.2081100E+00, 0.2205100E+00, &
     & 0.2151300E+00, 0.2189900E+00, 0.2233500E+00, 0.2263400E+00, &
     & 0.2301900E+00, 0.2315800E+00, 0.2775300E+00, 0.2737700E+00, &
     & 0.3151300E+00, 0.3201200E+00, 0.2796409E+00, 0.2796409E+00 /
      data (ref_adm( 4,iz,16, 9),iz = 1,20) / &
     & 0.2121200E+00, 0.2121200E+00, 0.2166800E+00, 0.2318100E+00, &
     & 0.2038400E+00, 0.2177000E+00, 0.2193800E+00, 0.2215900E+00, &
     & 0.2047500E+00, 0.2329000E+00, 0.2403900E+00, 0.2197200E+00, &
     & 0.2316700E+00, 0.2420200E+00, 0.2593000E+00, 0.2949700E+00, &
     & 0.2967100E+00, 0.2951500E+00, 0.2300200E+00, 0.2300200E+00 /
      data (ref_adm( 4,iz,17, 9),iz = 1,20) / &
     & 0.2169800E+00, 0.2169800E+00, 0.2343800E+00, 0.2349100E+00, &
     & 0.2122800E+00, 0.2373700E+00, 0.2233000E+00, 0.2168700E+00, &
     & 0.2355400E+00, 0.2217300E+00, 0.2368400E+00, 0.2082500E+00, &
     & 0.2307100E+00, 0.2822900E+00, 0.2875300E+00, 0.2737000E+00, &
     & 0.2974900E+00, 0.2665500E+00, 0.2729989E+00, 0.2729989E+00 /
      data (ref_adm( 4,iz,18, 9),iz = 1,20) / &
     & 0.2431200E+00, 0.2431200E+00, 0.2055000E+00, 0.2244200E+00, &
     & 0.2194300E+00, 0.2379000E+00, 0.2363900E+00, 0.2404800E+00, &
     & 0.2310000E+00, 0.2214300E+00, 0.2317200E+00, 0.2260100E+00, &
     & 0.2449400E+00, 0.2662900E+00, 0.2638900E+00, 0.2637600E+00, &
     & 0.3093100E+00, 0.3112300E+00, 0.2609905E+00, 0.2609905E+00 /
      data (ref_adm( 4,iz,19, 9),iz = 1,20) / &
     & 0.2373000E+00, 0.2373000E+00, 0.2196100E+00, 0.2510300E+00, &
     & 0.2409900E+00, 0.2598000E+00, 0.2420900E+00, 0.2264700E+00, &
     & 0.2210800E+00, 0.2368300E+00, 0.2407400E+00, 0.2033000E+00, &
     & 0.2596500E+00, 0.2606200E+00, 0.2495800E+00, 0.2904200E+00, &
     & 0.3025900E+00, 0.2916438E+00, 0.2588431E+00, 0.2588431E+00 /
      data (ref_adm( 4,iz,20, 9),iz = 1,20) / &
     & 0.2472400E+00, 0.2472400E+00, 0.2271800E+00, 0.2330100E+00, &
     & 0.2060200E+00, 0.2154400E+00, 0.2308500E+00, 0.2199600E+00, &
     & 0.2272800E+00, 0.2216200E+00, 0.2082200E+00, 0.2398900E+00, &
     & 0.2426400E+00, 0.2589300E+00, 0.2543400E+00, 0.2489100E+00, &
     & 0.2889956E+00, 0.2883290E+00, 0.2570699E+00, 0.2570699E+00 /
      data (ref_adm( 4,iz,21, 9),iz = 1,20) / &
     & 0.2249800E+00, 0.2249800E+00, 0.2301300E+00, 0.2306800E+00, &
     & 0.2184300E+00, 0.2180000E+00, 0.2370200E+00, 0.2419100E+00, &
     & 0.2469400E+00, 0.2360600E+00, 0.2318500E+00, 0.2641100E+00, &
     & 0.2516900E+00, 0.3193100E+00, 0.2460100E+00, 0.2820200E+00, &
     & 0.2864409E+00, 0.2853819E+00, 0.2554055E+00, 0.2554055E+00 /
      data (ref_adm( 4,iz,22, 9),iz = 1,20) / &
     & 0.2481500E+00, 0.2481500E+00, 0.2401300E+00, 0.2251400E+00, &
     & 0.2459000E+00, 0.2463300E+00, 0.2181700E+00, 0.2380400E+00, &
     & 0.2318500E+00, 0.2447200E+00, 0.2493300E+00, 0.2361200E+00, &
     & 0.2368500E+00, 0.2359800E+00, 0.2820900E+00, 0.2749800E+00, &
     & 0.2947196E+00, 0.3000602E+00, 0.2884692E+00, 0.2884692E+00 /
      data (ref_adm( 4,iz,23, 9),iz = 1,20) / &
     & 0.2229500E+00, 0.2229500E+00, 0.2189600E+00, 0.2159300E+00, &
     & 0.2439800E+00, 0.2423400E+00, 0.2468100E+00, 0.2493700E+00, &
     & 0.2305200E+00, 0.2326600E+00, 0.2496500E+00, 0.2806400E+00, &
     & 0.2397400E+00, 0.2742300E+00, 0.2927500E+00, 0.3042300E+00, &
     & 0.2950796E+00, 0.2995071E+00, 0.2884360E+00, 0.2884360E+00 /
      data (ref_adm( 4,iz,24, 9),iz = 1,20) / &
     & 0.2296800E+00, 0.2296800E+00, 0.2628900E+00, 0.2263800E+00, &
     & 0.2577100E+00, 0.2502200E+00, 0.2492200E+00, 0.2477400E+00, &
     & 0.2317700E+00, 0.2377600E+00, 0.2491200E+00, 0.2635300E+00, &
     & 0.2451400E+00, 0.2267700E+00, 0.2773900E+00, 0.3001100E+00, &
     & 0.2959210E+00, 0.2999686E+00, 0.2890200E+00, 0.2890200E+00 /
      data (ref_adm( 4,iz,25, 9),iz = 1,20) / &
     & 0.2304600E+00, 0.2304600E+00, 0.2378400E+00, 0.2275600E+00, &
     & 0.2204500E+00, 0.2352700E+00, 0.2235500E+00, 0.2554300E+00, &
     & 0.2356500E+00, 0.2529400E+00, 0.2734500E+00, 0.2432100E+00, &
     & 0.2488900E+00, 0.2731700E+00, 0.2843000E+00, 0.3402400E+00, &
     & 0.2680000E+00, 0.3010319E+00, 0.2906441E+00, 0.2906441E+00 /
      data (ref_adm( 4,iz,26, 9),iz = 1,20) / &
     & 0.2242400E+00, 0.2242400E+00, 0.2355600E+00, 0.2346900E+00, &
     & 0.2360700E+00, 0.2447600E+00, 0.2424400E+00, 0.2487100E+00, &
     & 0.2282300E+00, 0.2376300E+00, 0.2582300E+00, 0.2714000E+00, &
     & 0.2730100E+00, 0.2842300E+00, 0.2752000E+00, 0.2846300E+00, &
     & 0.3055100E+00, 0.2954900E+00, 0.2929948E+00, 0.2929948E+00 /
      data (ref_adm( 4,iz,27, 9),iz = 1,20) / &
     & 0.2166400E+00, 0.2166400E+00, 0.2402100E+00, 0.2455500E+00, &
     & 0.2536100E+00, 0.2455900E+00, 0.2405400E+00, 0.2582800E+00, &
     & 0.2576900E+00, 0.2641900E+00, 0.2697500E+00, 0.2627000E+00, &
     & 0.2691300E+00, 0.2824600E+00, 0.2936900E+00, 0.2963200E+00, &
     & 0.3134800E+00, 0.3426000E+00, 0.2703000E+00, 0.2703000E+00 /
      data (ref_adm( 4,iz,28, 9),iz = 1,20) / &
     & 0.2301100E+00, 0.2301100E+00, 0.2479300E+00, 0.2404700E+00, &
     & 0.2537200E+00, 0.2636700E+00, 0.2687400E+00, 0.2715000E+00, &
     & 0.2724600E+00, 0.2738700E+00, 0.2774600E+00, 0.2702300E+00, &
     & 0.2764100E+00, 0.2804000E+00, 0.3258900E+00, 0.3522600E+00, &
     & 0.3023100E+00, 0.3238900E+00, 0.2479300E+00, 0.2479300E+00 /
      data (ref_adm( 4,iz,29, 9),iz = 1,20) / &
     & 0.2321400E+00, 0.2321400E+00, 0.2204300E+00, 0.2395000E+00, &
     & 0.2570200E+00, 0.2642000E+00, 0.2601300E+00, 0.2636600E+00, &
     & 0.2667800E+00, 0.2762700E+00, 0.3021400E+00, 0.2853900E+00, &
     & 0.3004300E+00, 0.2962400E+00, 0.3438700E+00, 0.3539600E+00, &
     & 0.3669300E+00, 0.3158600E+00, 0.2363300E+00, 0.2363300E+00 /
      data (ref_adm( 4,iz,30, 9),iz = 1,20) / &
     & 0.2338700E+00, 0.2338700E+00, 0.2486200E+00, 0.2353500E+00, &
     & 0.2727000E+00, 0.2529000E+00, 0.2443300E+00, 0.2743300E+00, &
     & 0.2903300E+00, 0.2777800E+00, 0.2974800E+00, 0.3084400E+00, &
     & 0.3105400E+00, 0.3097800E+00, 0.3069900E+00, 0.3215400E+00, &
     & 0.3504300E+00, 0.3384400E+00, 0.2613400E+00, 0.2613400E+00 /
      data (ref_adm( 4,iz,31, 9),iz = 1,20) / &
     & 0.2343400E+00, 0.2343400E+00, 0.2252700E+00, 0.2463200E+00, &
     & 0.2507900E+00, 0.2830400E+00, 0.2883400E+00, 0.2692700E+00, &
     & 0.2969300E+00, 0.2938300E+00, 0.3068400E+00, 0.2993700E+00, &
     & 0.3084400E+00, 0.3105500E+00, 0.3302800E+00, 0.3277700E+00, &
     & 0.3447600E+00, 0.3547600E+00, 0.2548300E+00, 0.2548300E+00 /
      data (ref_adm( 4,iz,32, 9),iz = 1,20) / &
     & 0.2267100E+00, 0.2267100E+00, 0.2406000E+00, 0.2470300E+00, &
     & 0.2729500E+00, 0.2621100E+00, 0.2671100E+00, 0.2491100E+00, &
     & 0.2740500E+00, 0.3161500E+00, 0.3105200E+00, 0.3190700E+00, &
     & 0.3053600E+00, 0.3247700E+00, 0.3491800E+00, 0.3582100E+00, &
     & 0.3522600E+00, 0.3397200E+00, 0.3202031E+00, 0.3202031E+00 /
      data (ref_adm( 4,iz,33, 9),iz = 1,20) / &
     & 0.2282200E+00, 0.2282200E+00, 0.2773300E+00, 0.2337800E+00, &
     & 0.2571900E+00, 0.2828700E+00, 0.2774400E+00, 0.2946500E+00, &
     & 0.2935200E+00, 0.3101200E+00, 0.3225500E+00, 0.2955300E+00, &
     & 0.3260200E+00, 0.3141800E+00, 0.3182300E+00, 0.3576700E+00, &
     & 0.3675100E+00, 0.3387000E+00, 0.2575700E+00, 0.2575700E+00 /
      data (ref_adm( 4,iz,34, 9),iz = 1,20) / &
     & 0.2326500E+00, 0.2326500E+00, 0.2547200E+00, 0.2434000E+00, &
     & 0.2722800E+00, 0.2809300E+00, 0.2943800E+00, 0.3091200E+00, &
     & 0.3160000E+00, 0.3088200E+00, 0.3369200E+00, 0.3354400E+00, &
     & 0.3299500E+00, 0.3325600E+00, 0.3336100E+00, 0.3400400E+00, &
     & 0.3489100E+00, 0.3339300E+00, 0.3289380E+00, 0.3289380E+00 /
      data (ref_adm( 4,iz,35, 9),iz = 1,20) / &
     & 0.2470100E+00, 0.2470100E+00, 0.2480800E+00, 0.2622700E+00, &
     & 0.2726300E+00, 0.2785700E+00, 0.2879700E+00, 0.3045200E+00, &
     & 0.3074100E+00, 0.3394200E+00, 0.3379000E+00, 0.3171000E+00, &
     & 0.3298100E+00, 0.3180600E+00, 0.3359100E+00, 0.3513400E+00, &
     & 0.3387500E+00, 0.3392425E+00, 0.3321795E+00, 0.3321795E+00 /
      data (ref_adm( 4,iz,36, 9),iz = 1,20) / &
     & 0.2325200E+00, 0.2325200E+00, 0.2521700E+00, 0.2547500E+00, &
     & 0.2696200E+00, 0.2875800E+00, 0.2621900E+00, 0.3089800E+00, &
     & 0.3171400E+00, 0.3429300E+00, 0.3500500E+00, 0.3325100E+00, &
     & 0.3372200E+00, 0.3351300E+00, 0.3223200E+00, 0.3849600E+00, &
     & 0.3141600E+00, 0.3416582E+00, 0.3343380E+00, 0.3343380E+00 /
      data (ref_adm( 4,iz,37, 9),iz = 1,20) / &
     & 0.2279500E+00, 0.2279500E+00, 0.2348100E+00, 0.2594100E+00, &
     & 0.2692900E+00, 0.2480600E+00, 0.2647100E+00, 0.3095100E+00, &
     & 0.3245400E+00, 0.3475900E+00, 0.3426900E+00, 0.3661900E+00, &
     & 0.3185400E+00, 0.3161300E+00, 0.3473800E+00, 0.3131300E+00, &
     & 0.3424602E+00, 0.3430198E+00, 0.3355843E+00, 0.3355843E+00 /
      data (ref_adm( 4,iz,38, 9),iz = 1,20) / &
     & 0.2279500E+00, 0.2279500E+00, 0.2348100E+00, 0.2594100E+00, &
     & 0.2692900E+00, 0.2480600E+00, 0.2647100E+00, 0.3095100E+00, &
     & 0.3245400E+00, 0.3475900E+00, 0.3426900E+00, 0.3661900E+00, &
     & 0.3185400E+00, 0.3161300E+00, 0.3473800E+00, 0.3131300E+00, &
     & 0.3424602E+00, 0.3430198E+00, 0.3355843E+00, 0.3355843E+00 /
! Solar Zenith Angle 45.0 Albedo  0.2713313E+00
      data (ref_adm( 4,iz, 1,10),iz = 1,20) / &
     & 0.2266200E+00, 0.2266200E+00, 0.2346200E+00, 0.2501100E+00, &
     & 0.2346700E+00, 0.2333800E+00, 0.2328300E+00, 0.2415300E+00, &
     & 0.2444700E+00, 0.3134000E+00, 0.2729300E+00, 0.3006300E+00, &
     & 0.3046300E+00, 0.3292300E+00, 0.3364000E+00, 0.3738300E+00, &
     & 0.4106200E+00, 0.4600100E+00, 0.4519900E+00, 0.4519900E+00 /
      data (ref_adm( 4,iz, 2,10),iz = 1,20) / &
     & 0.2266200E+00, 0.2266200E+00, 0.2346200E+00, 0.2501100E+00, &
     & 0.2346700E+00, 0.2333800E+00, 0.2328300E+00, 0.2415300E+00, &
     & 0.2444700E+00, 0.3134000E+00, 0.2729300E+00, 0.3006300E+00, &
     & 0.3046300E+00, 0.3292300E+00, 0.3364000E+00, 0.3738300E+00, &
     & 0.4106200E+00, 0.4600100E+00, 0.4519900E+00, 0.4519900E+00 /
      data (ref_adm( 4,iz, 3,10),iz = 1,20) / &
     & 0.2283400E+00, 0.2283400E+00, 0.2103700E+00, 0.2169100E+00, &
     & 0.2386200E+00, 0.2223500E+00, 0.2389900E+00, 0.2304200E+00, &
     & 0.2810200E+00, 0.2672200E+00, 0.2778100E+00, 0.2796700E+00, &
     & 0.2794900E+00, 0.3053600E+00, 0.3482800E+00, 0.3746000E+00, &
     & 0.4151000E+00, 0.4484600E+00, 0.4340000E+00, 0.4340000E+00 /
      data (ref_adm( 4,iz, 4,10),iz = 1,20) / &
     & 0.2363500E+00, 0.2363500E+00, 0.2253100E+00, 0.2274500E+00, &
     & 0.2500700E+00, 0.2594700E+00, 0.2522300E+00, 0.2370900E+00, &
     & 0.2854000E+00, 0.2401100E+00, 0.3064000E+00, 0.2696000E+00, &
     & 0.2896300E+00, 0.3422600E+00, 0.3533300E+00, 0.3719600E+00, &
     & 0.4037100E+00, 0.4806100E+00, 0.4620200E+00, 0.4620200E+00 /
      data (ref_adm( 4,iz, 5,10),iz = 1,20) / &
     & 0.2434300E+00, 0.2434300E+00, 0.2338600E+00, 0.2183600E+00, &
     & 0.2477500E+00, 0.2508300E+00, 0.2916400E+00, 0.2592200E+00, &
     & 0.2468100E+00, 0.2477200E+00, 0.2528100E+00, 0.2895700E+00, &
     & 0.2882200E+00, 0.3028200E+00, 0.3351600E+00, 0.3512700E+00, &
     & 0.4059800E+00, 0.5039000E+00, 0.4645400E+00, 0.4645400E+00 /
      data (ref_adm( 4,iz, 6,10),iz = 1,20) / &
     & 0.2089200E+00, 0.2089200E+00, 0.2093300E+00, 0.2430500E+00, &
     & 0.2361400E+00, 0.2700200E+00, 0.2356800E+00, 0.2157800E+00, &
     & 0.2394800E+00, 0.2915300E+00, 0.2721300E+00, 0.2858400E+00, &
     & 0.2932000E+00, 0.3216300E+00, 0.3410600E+00, 0.3415000E+00, &
     & 0.4498500E+00, 0.4550800E+00, 0.4320500E+00, 0.4320500E+00 /
      data (ref_adm( 4,iz, 7,10),iz = 1,20) / &
     & 0.2119000E+00, 0.2119000E+00, 0.2259500E+00, 0.2334700E+00, &
     & 0.2230800E+00, 0.2199400E+00, 0.2199200E+00, 0.2230300E+00, &
     & 0.2355500E+00, 0.2588200E+00, 0.2609700E+00, 0.2526900E+00, &
     & 0.2787400E+00, 0.3175800E+00, 0.3185900E+00, 0.3117900E+00, &
     & 0.3522300E+00, 0.4067900E+00, 0.4551700E+00, 0.4551700E+00 /
      data (ref_adm( 4,iz, 8,10),iz = 1,20) / &
     & 0.2248100E+00, 0.2248100E+00, 0.2271000E+00, 0.2590300E+00, &
     & 0.2430300E+00, 0.2618900E+00, 0.2391400E+00, 0.2495200E+00, &
     & 0.2742600E+00, 0.2879600E+00, 0.2619500E+00, 0.2330800E+00, &
     & 0.2662700E+00, 0.2812100E+00, 0.3278000E+00, 0.3577800E+00, &
     & 0.3658300E+00, 0.3670400E+00, 0.4860200E+00, 0.4860200E+00 /
      data (ref_adm( 4,iz, 9,10),iz = 1,20) / &
     & 0.2396700E+00, 0.2396700E+00, 0.2356200E+00, 0.2391800E+00, &
     & 0.2322800E+00, 0.2327500E+00, 0.2220400E+00, 0.2399200E+00, &
     & 0.2579600E+00, 0.2373900E+00, 0.2701700E+00, 0.2816200E+00, &
     & 0.2691000E+00, 0.2976900E+00, 0.3277600E+00, 0.3677200E+00, &
     & 0.3885200E+00, 0.4026200E+00, 0.3795600E+00, 0.3795600E+00 /
      data (ref_adm( 4,iz,10,10),iz = 1,20) / &
     & 0.2161200E+00, 0.2161200E+00, 0.2301300E+00, 0.2234000E+00, &
     & 0.2103900E+00, 0.2471500E+00, 0.2240000E+00, 0.2258500E+00, &
     & 0.2322300E+00, 0.2357900E+00, 0.2405900E+00, 0.2461400E+00, &
     & 0.2615300E+00, 0.2730400E+00, 0.3175700E+00, 0.3273800E+00, &
     & 0.3403200E+00, 0.4198200E+00, 0.4208000E+00, 0.4208000E+00 /
      data (ref_adm( 4,iz,11,10),iz = 1,20) / &
     & 0.2306200E+00, 0.2306200E+00, 0.2217400E+00, 0.2129600E+00, &
     & 0.2227000E+00, 0.2165200E+00, 0.2102000E+00, 0.2336400E+00, &
     & 0.2162800E+00, 0.2527900E+00, 0.2251800E+00, 0.2429300E+00, &
     & 0.2635600E+00, 0.2547200E+00, 0.2955600E+00, 0.3337000E+00, &
     & 0.3685000E+00, 0.4217800E+00, 0.3460300E+00, 0.3460300E+00 /
      data (ref_adm( 4,iz,12,10),iz = 1,20) / &
     & 0.2216800E+00, 0.2216800E+00, 0.2300400E+00, 0.2347700E+00, &
     & 0.2191300E+00, 0.1977800E+00, 0.2140900E+00, 0.2126600E+00, &
     & 0.2332800E+00, 0.2402600E+00, 0.2294600E+00, 0.2304000E+00, &
     & 0.2485400E+00, 0.3030000E+00, 0.3114700E+00, 0.3126000E+00, &
     & 0.3423200E+00, 0.3722000E+00, 0.3415500E+00, 0.3415500E+00 /
      data (ref_adm( 4,iz,13,10),iz = 1,20) / &
     & 0.2250500E+00, 0.2250500E+00, 0.2319400E+00, 0.2318100E+00, &
     & 0.2283500E+00, 0.2277400E+00, 0.2304400E+00, 0.2236200E+00, &
     & 0.2242700E+00, 0.2414000E+00, 0.2333700E+00, 0.2418100E+00, &
     & 0.2292100E+00, 0.2400100E+00, 0.3235100E+00, 0.2964800E+00, &
     & 0.3465000E+00, 0.3924500E+00, 0.2972800E+00, 0.2972800E+00 /
      data (ref_adm( 4,iz,14,10),iz = 1,20) / &
     & 0.2276600E+00, 0.2276600E+00, 0.2148800E+00, 0.2183900E+00, &
     & 0.2192200E+00, 0.2074100E+00, 0.2129800E+00, 0.2126400E+00, &
     & 0.2249900E+00, 0.2366600E+00, 0.2387700E+00, 0.2427900E+00, &
     & 0.2366200E+00, 0.2496100E+00, 0.2565300E+00, 0.2921300E+00, &
     & 0.2971400E+00, 0.3301000E+00, 0.3193600E+00, 0.3193600E+00 /
      data (ref_adm( 4,iz,15,10),iz = 1,20) / &
     & 0.2294000E+00, 0.2294000E+00, 0.2351000E+00, 0.2261000E+00, &
     & 0.2284300E+00, 0.2380800E+00, 0.2248300E+00, 0.2276100E+00, &
     & 0.2264400E+00, 0.2269000E+00, 0.2324800E+00, 0.2300500E+00, &
     & 0.2224900E+00, 0.2413000E+00, 0.2537700E+00, 0.2916800E+00, &
     & 0.3303400E+00, 0.3153200E+00, 0.3083700E+00, 0.3083700E+00 /
      data (ref_adm( 4,iz,16,10),iz = 1,20) / &
     & 0.2357100E+00, 0.2357100E+00, 0.2150900E+00, 0.2288600E+00, &
     & 0.2399600E+00, 0.2135700E+00, 0.2195100E+00, 0.2439300E+00, &
     & 0.2206200E+00, 0.2322400E+00, 0.2391900E+00, 0.2455000E+00, &
     & 0.2474200E+00, 0.2441600E+00, 0.2575700E+00, 0.2979000E+00, &
     & 0.3297400E+00, 0.2826100E+00, 0.2981800E+00, 0.2981800E+00 /
      data (ref_adm( 4,iz,17,10),iz = 1,20) / &
     & 0.2355300E+00, 0.2355300E+00, 0.2292300E+00, 0.2219600E+00, &
     & 0.2229000E+00, 0.2332200E+00, 0.2371400E+00, 0.2385400E+00, &
     & 0.2478200E+00, 0.2339700E+00, 0.2387800E+00, 0.2511000E+00, &
     & 0.2310100E+00, 0.2388000E+00, 0.3033600E+00, 0.2676600E+00, &
     & 0.2970900E+00, 0.2824800E+00, 0.3384400E+00, 0.3384400E+00 /
      data (ref_adm( 4,iz,18,10),iz = 1,20) / &
     & 0.2200200E+00, 0.2200200E+00, 0.2120300E+00, 0.2251900E+00, &
     & 0.2278200E+00, 0.2333600E+00, 0.2545100E+00, 0.2265200E+00, &
     & 0.2522100E+00, 0.2337000E+00, 0.2409200E+00, 0.2349100E+00, &
     & 0.2490000E+00, 0.2589500E+00, 0.2541300E+00, 0.2523900E+00, &
     & 0.3314600E+00, 0.3051260E+00, 0.2990411E+00, 0.2990411E+00 /
      data (ref_adm( 4,iz,19,10),iz = 1,20) / &
     & 0.2053600E+00, 0.2053600E+00, 0.2000400E+00, 0.2117000E+00, &
     & 0.2123900E+00, 0.2165900E+00, 0.2607200E+00, 0.2292900E+00, &
     & 0.2352800E+00, 0.2478700E+00, 0.2326600E+00, 0.2310800E+00, &
     & 0.2566000E+00, 0.2546400E+00, 0.2666100E+00, 0.2793100E+00, &
     & 0.3599500E+00, 0.3021067E+00, 0.2948676E+00, 0.2948676E+00 /
      data (ref_adm( 4,iz,20,10),iz = 1,20) / &
     & 0.2256500E+00, 0.2256500E+00, 0.2111000E+00, 0.2166700E+00, &
     & 0.2197300E+00, 0.2197200E+00, 0.2232900E+00, 0.2296700E+00, &
     & 0.2198900E+00, 0.2163800E+00, 0.2427000E+00, 0.2487100E+00, &
     & 0.2642800E+00, 0.2658000E+00, 0.2621200E+00, 0.2671000E+00, &
     & 0.2886781E+00, 0.2995672E+00, 0.2924933E+00, 0.2924933E+00 /
      data (ref_adm( 4,iz,21,10),iz = 1,20) / &
     & 0.2265400E+00, 0.2265400E+00, 0.2298500E+00, 0.2355700E+00, &
     & 0.2311700E+00, 0.2251700E+00, 0.2285800E+00, 0.2380500E+00, &
     & 0.2326000E+00, 0.2409300E+00, 0.2410200E+00, 0.2488300E+00, &
     & 0.3078000E+00, 0.2761400E+00, 0.2624300E+00, 0.2854700E+00, &
     & 0.2874878E+00, 0.2975470E+00, 0.2908199E+00, 0.2908199E+00 /
      data (ref_adm( 4,iz,22,10),iz = 1,20) / &
     & 0.2105300E+00, 0.2105300E+00, 0.2172500E+00, 0.2031000E+00, &
     & 0.2185400E+00, 0.2036700E+00, 0.2332700E+00, 0.2395000E+00, &
     & 0.2412400E+00, 0.2434700E+00, 0.2344900E+00, 0.2588800E+00, &
     & 0.2701100E+00, 0.2535500E+00, 0.2797500E+00, 0.2943900E+00, &
     & 0.3013403E+00, 0.3088891E+00, 0.2992181E+00, 0.2992181E+00 /
      data (ref_adm( 4,iz,23,10),iz = 1,20) / &
     & 0.2271800E+00, 0.2271800E+00, 0.2136500E+00, 0.2131000E+00, &
     & 0.2449200E+00, 0.2484500E+00, 0.2671900E+00, 0.2488600E+00, &
     & 0.2339100E+00, 0.2069900E+00, 0.2366700E+00, 0.2842200E+00, &
     & 0.2710400E+00, 0.2883200E+00, 0.2778700E+00, 0.2992300E+00, &
     & 0.3176500E+00, 0.3082692E+00, 0.2992733E+00, 0.2992733E+00 /
      data (ref_adm( 4,iz,24,10),iz = 1,20) / &
     & 0.2387700E+00, 0.2387700E+00, 0.2174000E+00, 0.2261600E+00, &
     & 0.2290900E+00, 0.2532400E+00, 0.2568500E+00, 0.2462200E+00, &
     & 0.2335900E+00, 0.2565000E+00, 0.2475200E+00, 0.2657400E+00, &
     & 0.2778600E+00, 0.2977800E+00, 0.2940100E+00, 0.2810200E+00, &
     & 0.3289600E+00, 0.3088791E+00, 0.3001046E+00, 0.3001046E+00 /
      data (ref_adm( 4,iz,25,10),iz = 1,20) / &
     & 0.2338300E+00, 0.2338300E+00, 0.2290400E+00, 0.2400500E+00, &
     & 0.2332100E+00, 0.2360000E+00, 0.2450000E+00, 0.2498400E+00, &
     & 0.2544400E+00, 0.2477800E+00, 0.2633800E+00, 0.2586600E+00, &
     & 0.2578600E+00, 0.2885900E+00, 0.2990100E+00, 0.2916100E+00, &
     & 0.2711200E+00, 0.3100245E+00, 0.3021120E+00, 0.3021120E+00 /
      data (ref_adm( 4,iz,26,10),iz = 1,20) / &
     & 0.2313500E+00, 0.2313500E+00, 0.2213000E+00, 0.2251700E+00, &
     & 0.2316400E+00, 0.2405700E+00, 0.2374900E+00, 0.2512400E+00, &
     & 0.2538700E+00, 0.2538200E+00, 0.2571000E+00, 0.2738400E+00, &
     & 0.2673900E+00, 0.2949300E+00, 0.2964600E+00, 0.3175500E+00, &
     & 0.2918900E+00, 0.3028900E+00, 0.3048752E+00, 0.3048752E+00 /
      data (ref_adm( 4,iz,27,10),iz = 1,20) / &
     & 0.2401900E+00, 0.2401900E+00, 0.2383200E+00, 0.2205300E+00, &
     & 0.2427200E+00, 0.2385100E+00, 0.2372800E+00, 0.2353600E+00, &
     & 0.2470400E+00, 0.2498600E+00, 0.2551500E+00, 0.2703600E+00, &
     & 0.2730700E+00, 0.2834400E+00, 0.2953200E+00, 0.3102500E+00, &
     & 0.3392100E+00, 0.3118500E+00, 0.2684700E+00, 0.2684700E+00 /
      data (ref_adm( 4,iz,28,10),iz = 1,20) / &
     & 0.2262500E+00, 0.2262500E+00, 0.2399400E+00, 0.2361000E+00, &
     & 0.2455000E+00, 0.2561600E+00, 0.2511900E+00, 0.2612800E+00, &
     & 0.2652900E+00, 0.2863100E+00, 0.2826000E+00, 0.2761500E+00, &
     & 0.2817900E+00, 0.2932000E+00, 0.3177300E+00, 0.3377000E+00, &
     & 0.3725000E+00, 0.3298000E+00, 0.2968500E+00, 0.2968500E+00 /
      data (ref_adm( 4,iz,29,10),iz = 1,20) / &
     & 0.2259600E+00, 0.2259600E+00, 0.2370400E+00, 0.2403500E+00, &
     & 0.2538700E+00, 0.2596400E+00, 0.2768800E+00, 0.2587400E+00, &
     & 0.2611600E+00, 0.2664200E+00, 0.2798600E+00, 0.2927200E+00, &
     & 0.3050800E+00, 0.3018300E+00, 0.3328800E+00, 0.3536100E+00, &
     & 0.3630400E+00, 0.3208200E+00, 0.2900300E+00, 0.2900300E+00 /
      data (ref_adm( 4,iz,30,10),iz = 1,20) / &
     & 0.2432700E+00, 0.2432700E+00, 0.2538600E+00, 0.2519000E+00, &
     & 0.2497800E+00, 0.2656400E+00, 0.2644500E+00, 0.2808400E+00, &
     & 0.2859100E+00, 0.2999500E+00, 0.2998900E+00, 0.3041000E+00, &
     & 0.3268700E+00, 0.3162800E+00, 0.3382600E+00, 0.3695000E+00, &
     & 0.3822700E+00, 0.3402600E+00, 0.2818400E+00, 0.2818400E+00 /
      data (ref_adm( 4,iz,31,10),iz = 1,20) / &
     & 0.2330500E+00, 0.2330500E+00, 0.2321700E+00, 0.2396700E+00, &
     & 0.2427900E+00, 0.2613400E+00, 0.2531300E+00, 0.2900400E+00, &
     & 0.2815100E+00, 0.2782300E+00, 0.2759800E+00, 0.2974900E+00, &
     & 0.3037700E+00, 0.3295400E+00, 0.3506000E+00, 0.3543500E+00, &
     & 0.3562200E+00, 0.3407100E+00, 0.2759300E+00, 0.2759300E+00 /
      data (ref_adm( 4,iz,32,10),iz = 1,20) / &
     & 0.2230200E+00, 0.2230200E+00, 0.2239400E+00, 0.2299300E+00, &
     & 0.2438300E+00, 0.2491300E+00, 0.2558500E+00, 0.2760900E+00, &
     & 0.2691900E+00, 0.3025200E+00, 0.3132400E+00, 0.3184100E+00, &
     & 0.3141600E+00, 0.3290400E+00, 0.3326000E+00, 0.3530500E+00, &
     & 0.3511500E+00, 0.3458500E+00, 0.2904700E+00, 0.2904700E+00 /
      data (ref_adm( 4,iz,33,10),iz = 1,20) / &
     & 0.2107200E+00, 0.2107200E+00, 0.2243500E+00, 0.2162800E+00, &
     & 0.2262800E+00, 0.2523900E+00, 0.2728600E+00, 0.2723400E+00, &
     & 0.2965600E+00, 0.3058800E+00, 0.3330500E+00, 0.3381200E+00, &
     & 0.3116500E+00, 0.3194500E+00, 0.3288100E+00, 0.3529300E+00, &
     & 0.3753000E+00, 0.3469300E+00, 0.2816700E+00, 0.2816700E+00 /
      data (ref_adm( 4,iz,34,10),iz = 1,20) / &
     & 0.2249100E+00, 0.2249100E+00, 0.2229200E+00, 0.2494400E+00, &
     & 0.2728300E+00, 0.2654900E+00, 0.2701000E+00, 0.2786100E+00, &
     & 0.2721300E+00, 0.3287700E+00, 0.3329700E+00, 0.3330500E+00, &
     & 0.3215900E+00, 0.3186500E+00, 0.3525200E+00, 0.3398100E+00, &
     & 0.3507300E+00, 0.3349700E+00, 0.2745800E+00, 0.2745800E+00 /
      data (ref_adm( 4,iz,35,10),iz = 1,20) / &
     & 0.2445200E+00, 0.2445200E+00, 0.2246500E+00, 0.2474000E+00, &
     & 0.2592400E+00, 0.2748100E+00, 0.2718600E+00, 0.2813000E+00, &
     & 0.3008100E+00, 0.3245400E+00, 0.3250200E+00, 0.3396700E+00, &
     & 0.3251400E+00, 0.3320300E+00, 0.3386400E+00, 0.3516200E+00, &
     & 0.3555000E+00, 0.3319300E+00, 0.2794600E+00, 0.2794600E+00 /
      data (ref_adm( 4,iz,36,10),iz = 1,20) / &
     & 0.2313100E+00, 0.2313100E+00, 0.2414600E+00, 0.2391500E+00, &
     & 0.2675700E+00, 0.2833600E+00, 0.2872800E+00, 0.2941200E+00, &
     & 0.3009900E+00, 0.3147300E+00, 0.3192800E+00, 0.3511500E+00, &
     & 0.3321400E+00, 0.3234600E+00, 0.3383100E+00, 0.3657600E+00, &
     & 0.3924100E+00, 0.4052600E+00, 0.3544978E+00, 0.3544978E+00 /
      data (ref_adm( 4,iz,37,10),iz = 1,20) / &
     & 0.2435600E+00, 0.2435600E+00, 0.2271600E+00, 0.2504300E+00, &
     & 0.2534300E+00, 0.2752100E+00, 0.2850600E+00, 0.2986100E+00, &
     & 0.2960000E+00, 0.2936500E+00, 0.3348400E+00, 0.3481800E+00, &
     & 0.3740300E+00, 0.3520200E+00, 0.3524300E+00, 0.3526300E+00, &
     & 0.3330200E+00, 0.3598751E+00, 0.3560199E+00, 0.3560199E+00 /
      data (ref_adm( 4,iz,38,10),iz = 1,20) / &
     & 0.2435600E+00, 0.2435600E+00, 0.2271600E+00, 0.2504300E+00, &
     & 0.2534300E+00, 0.2752100E+00, 0.2850600E+00, 0.2986100E+00, &
     & 0.2960000E+00, 0.2936500E+00, 0.3348400E+00, 0.3481800E+00, &
     & 0.3740300E+00, 0.3520200E+00, 0.3524300E+00, 0.3526300E+00, &
     & 0.3330200E+00, 0.3598751E+00, 0.3560199E+00, 0.3560199E+00 /
! Solar Zenith Angle 50.0 Albedo  0.2719613E+00
      data (ref_adm( 4,iz, 1,11),iz = 1,20) / &
     & 0.2161600E+00, 0.2161600E+00, 0.2234600E+00, 0.2214600E+00, &
     & 0.2106100E+00, 0.2210100E+00, 0.1941500E+00, 0.2152400E+00, &
     & 0.2472200E+00, 0.2488800E+00, 0.2595600E+00, 0.3470800E+00, &
     & 0.3403300E+00, 0.3492700E+00, 0.3744600E+00, 0.4276500E+00, &
     & 0.4681700E+00, 0.5260500E+00, 0.4793300E+00, 0.4793300E+00 /
      data (ref_adm( 4,iz, 2,11),iz = 1,20) / &
     & 0.2161600E+00, 0.2161600E+00, 0.2234600E+00, 0.2214600E+00, &
     & 0.2106100E+00, 0.2210100E+00, 0.1941500E+00, 0.2152400E+00, &
     & 0.2472200E+00, 0.2488800E+00, 0.2595600E+00, 0.3470800E+00, &
     & 0.3403300E+00, 0.3492700E+00, 0.3744600E+00, 0.4276500E+00, &
     & 0.4681700E+00, 0.5260500E+00, 0.4793300E+00, 0.4793300E+00 /
      data (ref_adm( 4,iz, 3,11),iz = 1,20) / &
     & 0.2158600E+00, 0.2158600E+00, 0.2259200E+00, 0.2225800E+00, &
     & 0.2226800E+00, 0.2156600E+00, 0.2194600E+00, 0.2208800E+00, &
     & 0.2249900E+00, 0.2363000E+00, 0.2849300E+00, 0.2989600E+00, &
     & 0.3052800E+00, 0.3400500E+00, 0.3854000E+00, 0.4175100E+00, &
     & 0.4665300E+00, 0.5179200E+00, 0.4916900E+00, 0.4916900E+00 /
      data (ref_adm( 4,iz, 4,11),iz = 1,20) / &
     & 0.2192300E+00, 0.2192300E+00, 0.2249700E+00, 0.2231500E+00, &
     & 0.2258600E+00, 0.2126300E+00, 0.2266800E+00, 0.2279400E+00, &
     & 0.2289200E+00, 0.2531600E+00, 0.2704300E+00, 0.2769300E+00, &
     & 0.2954300E+00, 0.3456800E+00, 0.3790800E+00, 0.4073800E+00, &
     & 0.4685900E+00, 0.5421100E+00, 0.5276800E+00, 0.5276800E+00 /
      data (ref_adm( 4,iz, 5,11),iz = 1,20) / &
     & 0.2170200E+00, 0.2170200E+00, 0.2115000E+00, 0.2190900E+00, &
     & 0.2110500E+00, 0.2314100E+00, 0.2195800E+00, 0.2192400E+00, &
     & 0.2347200E+00, 0.2529600E+00, 0.2600900E+00, 0.2527400E+00, &
     & 0.2877700E+00, 0.3237300E+00, 0.3713300E+00, 0.3799100E+00, &
     & 0.4892400E+00, 0.5299600E+00, 0.5261600E+00, 0.5261600E+00 /
      data (ref_adm( 4,iz, 6,11),iz = 1,20) / &
     & 0.2232400E+00, 0.2232400E+00, 0.2269600E+00, 0.2118200E+00, &
     & 0.2157800E+00, 0.2065200E+00, 0.2028300E+00, 0.2317600E+00, &
     & 0.2338600E+00, 0.2607700E+00, 0.2460100E+00, 0.2884300E+00, &
     & 0.2853500E+00, 0.3517900E+00, 0.4030300E+00, 0.4098700E+00, &
     & 0.5039800E+00, 0.5011900E+00, 0.4877517E+00, 0.4877517E+00 /
      data (ref_adm( 4,iz, 7,11),iz = 1,20) / &
     & 0.2255900E+00, 0.2255900E+00, 0.2159000E+00, 0.2290700E+00, &
     & 0.2180700E+00, 0.2135300E+00, 0.2194000E+00, 0.2322900E+00, &
     & 0.2403900E+00, 0.2662700E+00, 0.2731500E+00, 0.2837900E+00, &
     & 0.2980400E+00, 0.3390500E+00, 0.3633000E+00, 0.4369300E+00, &
     & 0.4956300E+00, 0.5027900E+00, 0.4227800E+00, 0.4227800E+00 /
      data (ref_adm( 4,iz, 8,11),iz = 1,20) / &
     & 0.2218700E+00, 0.2218700E+00, 0.2125600E+00, 0.2012300E+00, &
     & 0.1869700E+00, 0.1935100E+00, 0.1919200E+00, 0.2102200E+00, &
     & 0.2108700E+00, 0.2072500E+00, 0.2263100E+00, 0.2455000E+00, &
     & 0.2604600E+00, 0.2877500E+00, 0.3117000E+00, 0.3961200E+00, &
     & 0.4571200E+00, 0.4729100E+00, 0.4012100E+00, 0.4012100E+00 /
      data (ref_adm( 4,iz, 9,11),iz = 1,20) / &
     & 0.2130500E+00, 0.2130500E+00, 0.2065400E+00, 0.2185200E+00, &
     & 0.2134600E+00, 0.2240200E+00, 0.2129000E+00, 0.2246300E+00, &
     & 0.2147700E+00, 0.2384300E+00, 0.2318600E+00, 0.2610500E+00, &
     & 0.2713700E+00, 0.3102400E+00, 0.3291800E+00, 0.3828200E+00, &
     & 0.4332100E+00, 0.4514400E+00, 0.4496200E+00, 0.4496200E+00 /
      data (ref_adm( 4,iz,10,11),iz = 1,20) / &
     & 0.2370800E+00, 0.2370800E+00, 0.2112800E+00, 0.2143400E+00, &
     & 0.2117500E+00, 0.2168500E+00, 0.1957700E+00, 0.2275100E+00, &
     & 0.2271500E+00, 0.2317400E+00, 0.2569600E+00, 0.2512200E+00, &
     & 0.2665400E+00, 0.2610100E+00, 0.3314100E+00, 0.3772600E+00, &
     & 0.4216800E+00, 0.4509200E+00, 0.3520000E+00, 0.3520000E+00 /
      data (ref_adm( 4,iz,11,11),iz = 1,20) / &
     & 0.2144400E+00, 0.2144400E+00, 0.2233900E+00, 0.2140800E+00, &
     & 0.2177400E+00, 0.2258400E+00, 0.2227800E+00, 0.2046800E+00, &
     & 0.2136200E+00, 0.2151300E+00, 0.2383300E+00, 0.2662800E+00, &
     & 0.2602200E+00, 0.2847200E+00, 0.3134700E+00, 0.3702000E+00, &
     & 0.4110500E+00, 0.3946000E+00, 0.3902200E+00, 0.3902200E+00 /
      data (ref_adm( 4,iz,12,11),iz = 1,20) / &
     & 0.2293100E+00, 0.2293100E+00, 0.2193800E+00, 0.2189200E+00, &
     & 0.2204300E+00, 0.2094100E+00, 0.2363400E+00, 0.2196100E+00, &
     & 0.2311500E+00, 0.2342500E+00, 0.2431000E+00, 0.2437600E+00, &
     & 0.2620800E+00, 0.2623800E+00, 0.2895000E+00, 0.3386500E+00, &
     & 0.3961100E+00, 0.4160500E+00, 0.3541700E+00, 0.3541700E+00 /
      data (ref_adm( 4,iz,13,11),iz = 1,20) / &
     & 0.2195100E+00, 0.2195100E+00, 0.2094600E+00, 0.2145500E+00, &
     & 0.2060000E+00, 0.2120500E+00, 0.2175600E+00, 0.2111300E+00, &
     & 0.2270500E+00, 0.2220100E+00, 0.2270200E+00, 0.2414900E+00, &
     & 0.2594900E+00, 0.2566100E+00, 0.2785200E+00, 0.3299400E+00, &
     & 0.3643800E+00, 0.3548700E+00, 0.3922100E+00, 0.3922100E+00 /
      data (ref_adm( 4,iz,14,11),iz = 1,20) / &
     & 0.2103200E+00, 0.2103200E+00, 0.2065800E+00, 0.1978600E+00, &
     & 0.1966100E+00, 0.1994200E+00, 0.2100900E+00, 0.2025600E+00, &
     & 0.2012800E+00, 0.2171700E+00, 0.2187500E+00, 0.2240900E+00, &
     & 0.2254600E+00, 0.2367900E+00, 0.2918600E+00, 0.3069800E+00, &
     & 0.3302400E+00, 0.3673200E+00, 0.3396600E+00, 0.3396600E+00 /
      data (ref_adm( 4,iz,15,11),iz = 1,20) / &
     & 0.2227600E+00, 0.2227600E+00, 0.2196700E+00, 0.2242900E+00, &
     & 0.2244200E+00, 0.2259200E+00, 0.2266500E+00, 0.2272900E+00, &
     & 0.2273400E+00, 0.2324800E+00, 0.2352100E+00, 0.2348200E+00, &
     & 0.2313100E+00, 0.2321500E+00, 0.2623400E+00, 0.3020500E+00, &
     & 0.3627800E+00, 0.3499200E+00, 0.3148600E+00, 0.3148600E+00 /
      data (ref_adm( 4,iz,16,11),iz = 1,20) / &
     & 0.2128300E+00, 0.2128300E+00, 0.2130300E+00, 0.2138600E+00, &
     & 0.2298700E+00, 0.2401900E+00, 0.2162500E+00, 0.2331600E+00, &
     & 0.2106800E+00, 0.2279900E+00, 0.2271500E+00, 0.2370900E+00, &
     & 0.2443700E+00, 0.2487400E+00, 0.2792400E+00, 0.3341700E+00, &
     & 0.3559500E+00, 0.3276900E+00, 0.3647656E+00, 0.3647656E+00 /
      data (ref_adm( 4,iz,17,11),iz = 1,20) / &
     & 0.2120600E+00, 0.2120600E+00, 0.2169500E+00, 0.2244700E+00, &
     & 0.2213800E+00, 0.2258900E+00, 0.2314100E+00, 0.2285600E+00, &
     & 0.2359000E+00, 0.2114700E+00, 0.2272300E+00, 0.2289800E+00, &
     & 0.2286500E+00, 0.2591500E+00, 0.2986100E+00, 0.2914600E+00, &
     & 0.3184000E+00, 0.5123900E+00, 0.3552847E+00, 0.3552847E+00 /
      data (ref_adm( 4,iz,18,11),iz = 1,20) / &
     & 0.2228200E+00, 0.2228200E+00, 0.2083100E+00, 0.2233600E+00, &
     & 0.2377500E+00, 0.2332500E+00, 0.2328200E+00, 0.2507700E+00, &
     & 0.2141700E+00, 0.2303900E+00, 0.2373300E+00, 0.2437700E+00, &
     & 0.2420000E+00, 0.2559200E+00, 0.2862500E+00, 0.2919600E+00, &
     & 0.3211000E+00, 0.3122449E+00, 0.3074324E+00, 0.3074324E+00 /
      data (ref_adm( 4,iz,19,11),iz = 1,20) / &
     & 0.2428000E+00, 0.2428000E+00, 0.2324600E+00, 0.2228100E+00, &
     & 0.2253800E+00, 0.2336700E+00, 0.2448700E+00, 0.2338500E+00, &
     & 0.2369100E+00, 0.2454900E+00, 0.2349000E+00, 0.2338600E+00, &
     & 0.2426300E+00, 0.2519600E+00, 0.2518400E+00, 0.2816900E+00, &
     & 0.2843400E+00, 0.3087495E+00, 0.3028015E+00, 0.3028015E+00 /
      data (ref_adm( 4,iz,20,11),iz = 1,20) / &
     & 0.2325500E+00, 0.2325500E+00, 0.2200300E+00, 0.2165800E+00, &
     & 0.2193700E+00, 0.2216100E+00, 0.2163800E+00, 0.2378400E+00, &
     & 0.2203200E+00, 0.2227600E+00, 0.2458500E+00, 0.2299900E+00, &
     & 0.2538500E+00, 0.2583800E+00, 0.2569600E+00, 0.2967800E+00, &
     & 0.2935155E+00, 0.3060356E+00, 0.3001193E+00, 0.3001193E+00 /
      data (ref_adm( 4,iz,21,11),iz = 1,20) / &
     & 0.2141600E+00, 0.2141600E+00, 0.2251100E+00, 0.2260600E+00, &
     & 0.2319300E+00, 0.2202800E+00, 0.2271600E+00, 0.2331200E+00, &
     & 0.2411700E+00, 0.2392500E+00, 0.2454500E+00, 0.2402100E+00, &
     & 0.2582500E+00, 0.2576700E+00, 0.2623700E+00, 0.2867900E+00, &
     & 0.2922242E+00, 0.3038237E+00, 0.2982960E+00, 0.2982960E+00 /
      data (ref_adm( 4,iz,22,11),iz = 1,20) / &
     & 0.2228800E+00, 0.2228800E+00, 0.2249600E+00, 0.2162300E+00, &
     & 0.2236700E+00, 0.2205000E+00, 0.2334300E+00, 0.2391900E+00, &
     & 0.2405700E+00, 0.2411400E+00, 0.2453300E+00, 0.2318500E+00, &
     & 0.2555000E+00, 0.2692500E+00, 0.2767500E+00, 0.2792600E+00, &
     & 0.3017415E+00, 0.3089869E+00, 0.2988393E+00, 0.2988393E+00 /
      data (ref_adm( 4,iz,23,11),iz = 1,20) / &
     & 0.2037800E+00, 0.2037800E+00, 0.2135600E+00, 0.2166000E+00, &
     & 0.2244700E+00, 0.2133300E+00, 0.2365300E+00, 0.2369400E+00, &
     & 0.2272800E+00, 0.2545800E+00, 0.2614700E+00, 0.2604300E+00, &
     & 0.2652200E+00, 0.2641200E+00, 0.2874400E+00, 0.2832600E+00, &
     & 0.3021181E+00, 0.3083718E+00, 0.2988946E+00, 0.2988946E+00 /
      data (ref_adm( 4,iz,24,11),iz = 1,20) / &
     & 0.2087800E+00, 0.2087800E+00, 0.2152000E+00, 0.2216500E+00, &
     & 0.2325400E+00, 0.2354800E+00, 0.2282900E+00, 0.2338900E+00, &
     & 0.2498000E+00, 0.2499400E+00, 0.2636600E+00, 0.2631000E+00, &
     & 0.2643200E+00, 0.2731000E+00, 0.2953200E+00, 0.2964500E+00, &
     & 0.3223600E+00, 0.3089817E+00, 0.2997232E+00, 0.2997232E+00 /
      data (ref_adm( 4,iz,25,11),iz = 1,20) / &
     & 0.2219600E+00, 0.2219600E+00, 0.2228000E+00, 0.2315800E+00, &
     & 0.2359000E+00, 0.2421100E+00, 0.2468100E+00, 0.2529800E+00, &
     & 0.2555100E+00, 0.2653500E+00, 0.2683100E+00, 0.2736300E+00, &
     & 0.2713900E+00, 0.2869900E+00, 0.3110600E+00, 0.3093400E+00, &
     & 0.2748500E+00, 0.3246200E+00, 0.3017226E+00, 0.3017226E+00 /
      data (ref_adm( 4,iz,26,11),iz = 1,20) / &
     & 0.2105300E+00, 0.2105300E+00, 0.2209000E+00, 0.2182500E+00, &
     & 0.2110300E+00, 0.2111800E+00, 0.2243700E+00, 0.2332600E+00, &
     & 0.2414700E+00, 0.2516300E+00, 0.2620300E+00, 0.2669000E+00, &
     & 0.2784400E+00, 0.2843200E+00, 0.3021200E+00, 0.3156300E+00, &
     & 0.3266000E+00, 0.2943700E+00, 0.3044747E+00, 0.3044747E+00 /
      data (ref_adm( 4,iz,27,11),iz = 1,20) / &
     & 0.2136300E+00, 0.2136300E+00, 0.2281600E+00, 0.2300200E+00, &
     & 0.2290000E+00, 0.2348600E+00, 0.2464900E+00, 0.2486400E+00, &
     & 0.2568100E+00, 0.2639700E+00, 0.2587700E+00, 0.2603900E+00, &
     & 0.2781400E+00, 0.2772700E+00, 0.3092200E+00, 0.3528100E+00, &
     & 0.3386700E+00, 0.3316900E+00, 0.3197300E+00, 0.3197300E+00 /
      data (ref_adm( 4,iz,28,11),iz = 1,20) / &
     & 0.2190500E+00, 0.2190500E+00, 0.2476300E+00, 0.2288700E+00, &
     & 0.2382900E+00, 0.2408400E+00, 0.2544700E+00, 0.2464000E+00, &
     & 0.2624800E+00, 0.2711600E+00, 0.2855400E+00, 0.3009000E+00, &
     & 0.3062100E+00, 0.3036300E+00, 0.3321000E+00, 0.3470500E+00, &
     & 0.3523400E+00, 0.3325300E+00, 0.3013500E+00, 0.3013500E+00 /
      data (ref_adm( 4,iz,29,11),iz = 1,20) / &
     & 0.2141400E+00, 0.2141400E+00, 0.2142800E+00, 0.2273700E+00, &
     & 0.2524900E+00, 0.2511000E+00, 0.2582800E+00, 0.2589400E+00, &
     & 0.2526800E+00, 0.2812900E+00, 0.3093700E+00, 0.3073900E+00, &
     & 0.3100700E+00, 0.3134600E+00, 0.3411400E+00, 0.3303200E+00, &
     & 0.3583700E+00, 0.3591600E+00, 0.2888800E+00, 0.2888800E+00 /
      data (ref_adm( 4,iz,30,11),iz = 1,20) / &
     & 0.2199100E+00, 0.2199100E+00, 0.2119200E+00, 0.2432800E+00, &
     & 0.2446400E+00, 0.2409100E+00, 0.2538800E+00, 0.2674600E+00, &
     & 0.2751100E+00, 0.2745900E+00, 0.2918100E+00, 0.3035300E+00, &
     & 0.3324600E+00, 0.3343600E+00, 0.3612500E+00, 0.3724200E+00, &
     & 0.3784000E+00, 0.3713400E+00, 0.2936100E+00, 0.2936100E+00 /
      data (ref_adm( 4,iz,31,11),iz = 1,20) / &
     & 0.2271400E+00, 0.2271400E+00, 0.2194600E+00, 0.2183300E+00, &
     & 0.2430600E+00, 0.2572700E+00, 0.2465000E+00, 0.2549100E+00, &
     & 0.2583400E+00, 0.2601300E+00, 0.2645300E+00, 0.2993800E+00, &
     & 0.3043300E+00, 0.3271600E+00, 0.3483900E+00, 0.3550200E+00, &
     & 0.3692600E+00, 0.3646900E+00, 0.3165600E+00, 0.3165600E+00 /
      data (ref_adm( 4,iz,32,11),iz = 1,20) / &
     & 0.2211800E+00, 0.2211800E+00, 0.2307700E+00, 0.2514200E+00, &
     & 0.2496500E+00, 0.2644400E+00, 0.2702700E+00, 0.2757500E+00, &
     & 0.2832200E+00, 0.2920600E+00, 0.3103300E+00, 0.3233800E+00, &
     & 0.3300400E+00, 0.3502900E+00, 0.3668000E+00, 0.3787600E+00, &
     & 0.4001800E+00, 0.3718000E+00, 0.3015700E+00, 0.3015700E+00 /
      data (ref_adm( 4,iz,33,11),iz = 1,20) / &
     & 0.2194400E+00, 0.2194400E+00, 0.2398800E+00, 0.2437600E+00, &
     & 0.2524300E+00, 0.2675200E+00, 0.2775300E+00, 0.2726400E+00, &
     & 0.2907500E+00, 0.3028100E+00, 0.3179600E+00, 0.3407200E+00, &
     & 0.3426000E+00, 0.3457100E+00, 0.3485100E+00, 0.3460000E+00, &
     & 0.3690400E+00, 0.3677400E+00, 0.3078400E+00, 0.3078400E+00 /
      data (ref_adm( 4,iz,34,11),iz = 1,20) / &
     & 0.2150300E+00, 0.2150300E+00, 0.2239000E+00, 0.2412500E+00, &
     & 0.2762900E+00, 0.2793700E+00, 0.2647500E+00, 0.2817300E+00, &
     & 0.3060400E+00, 0.3144700E+00, 0.3383700E+00, 0.3274800E+00, &
     & 0.3379600E+00, 0.3429700E+00, 0.3569100E+00, 0.3707900E+00, &
     & 0.3916100E+00, 0.3602900E+00, 0.3049300E+00, 0.3049300E+00 /
      data (ref_adm( 4,iz,35,11),iz = 1,20) / &
     & 0.2268300E+00, 0.2268300E+00, 0.2422500E+00, 0.2566000E+00, &
     & 0.2760100E+00, 0.2655300E+00, 0.2709600E+00, 0.2922400E+00, &
     & 0.2993100E+00, 0.3145200E+00, 0.3303900E+00, 0.3510300E+00, &
     & 0.3464200E+00, 0.3452000E+00, 0.3565500E+00, 0.3729700E+00, &
     & 0.3922900E+00, 0.3553300E+00, 0.3040400E+00, 0.3040400E+00 /
      data (ref_adm( 4,iz,36,11),iz = 1,20) / &
     & 0.2252200E+00, 0.2252200E+00, 0.2494700E+00, 0.2653900E+00, &
     & 0.2523100E+00, 0.2602300E+00, 0.2716200E+00, 0.2912400E+00, &
     & 0.3002700E+00, 0.3210200E+00, 0.3439800E+00, 0.3524400E+00, &
     & 0.3496700E+00, 0.3572100E+00, 0.3607500E+00, 0.3757200E+00, &
     & 0.3763800E+00, 0.3681800E+00, 0.3538930E+00, 0.3538930E+00 /
      data (ref_adm( 4,iz,37,11),iz = 1,20) / &
     & 0.2226400E+00, 0.2226400E+00, 0.2299700E+00, 0.2270900E+00, &
     & 0.2514400E+00, 0.2737900E+00, 0.2763600E+00, 0.2869300E+00, &
     & 0.2970500E+00, 0.3052800E+00, 0.3280400E+00, 0.3405700E+00, &
     & 0.3718600E+00, 0.3730700E+00, 0.3771600E+00, 0.3939500E+00, &
     & 0.3903400E+00, 0.3481000E+00, 0.3554087E+00, 0.3554087E+00 /
      data (ref_adm( 4,iz,38,11),iz = 1,20) / &
     & 0.2226400E+00, 0.2226400E+00, 0.2299700E+00, 0.2270900E+00, &
     & 0.2514400E+00, 0.2737900E+00, 0.2763600E+00, 0.2869300E+00, &
     & 0.2970500E+00, 0.3052800E+00, 0.3280400E+00, 0.3405700E+00, &
     & 0.3718600E+00, 0.3730700E+00, 0.3771600E+00, 0.3939500E+00, &
     & 0.3903400E+00, 0.3481000E+00, 0.3554087E+00, 0.3554087E+00 /
! Solar Zenith Angle 55.0 Albedo  0.2834398E+00
      data (ref_adm( 4,iz, 1,12),iz = 1,20) / &
     & 0.2183900E+00, 0.2183900E+00, 0.2223500E+00, 0.2262700E+00, &
     & 0.2266100E+00, 0.2065100E+00, 0.2156100E+00, 0.2346700E+00, &
     & 0.2420800E+00, 0.2649600E+00, 0.2761300E+00, 0.3646500E+00, &
     & 0.3978100E+00, 0.3923900E+00, 0.4564400E+00, 0.5161600E+00, &
     & 0.6195500E+00, 0.6662400E+00, 0.6985200E+00, 0.6985200E+00 /
      data (ref_adm( 4,iz, 2,12),iz = 1,20) / &
     & 0.2183900E+00, 0.2183900E+00, 0.2223500E+00, 0.2262700E+00, &
     & 0.2266100E+00, 0.2065100E+00, 0.2156100E+00, 0.2346700E+00, &
     & 0.2420800E+00, 0.2649600E+00, 0.2761300E+00, 0.3646500E+00, &
     & 0.3978100E+00, 0.3923900E+00, 0.4564400E+00, 0.5161600E+00, &
     & 0.6195500E+00, 0.6662400E+00, 0.6985200E+00, 0.6985200E+00 /
      data (ref_adm( 4,iz, 3,12),iz = 1,20) / &
     & 0.2149400E+00, 0.2149400E+00, 0.2100400E+00, 0.2137600E+00, &
     & 0.2060700E+00, 0.2173100E+00, 0.2156000E+00, 0.2264400E+00, &
     & 0.2363500E+00, 0.2747300E+00, 0.2763700E+00, 0.3052500E+00, &
     & 0.3459900E+00, 0.3928300E+00, 0.4355800E+00, 0.5094600E+00, &
     & 0.5712900E+00, 0.6841700E+00, 0.7301600E+00, 0.7301600E+00 /
      data (ref_adm( 4,iz, 4,12),iz = 1,20) / &
     & 0.2215700E+00, 0.2215700E+00, 0.2023300E+00, 0.2037200E+00, &
     & 0.2365800E+00, 0.2173300E+00, 0.2299900E+00, 0.2281500E+00, &
     & 0.2502300E+00, 0.2511700E+00, 0.2563400E+00, 0.3077000E+00, &
     & 0.3421300E+00, 0.3735500E+00, 0.4197700E+00, 0.4894100E+00, &
     & 0.5710600E+00, 0.6108200E+00, 0.6582300E+00, 0.6582300E+00 /
      data (ref_adm( 4,iz, 5,12),iz = 1,20) / &
     & 0.2125800E+00, 0.2125800E+00, 0.2046000E+00, 0.2103000E+00, &
     & 0.1973500E+00, 0.2120900E+00, 0.2248800E+00, 0.2439100E+00, &
     & 0.2433600E+00, 0.2555100E+00, 0.2740300E+00, 0.3037600E+00, &
     & 0.3268900E+00, 0.3682600E+00, 0.4298300E+00, 0.4895500E+00, &
     & 0.5555500E+00, 0.6139700E+00, 0.6060500E+00, 0.6060500E+00 /
      data (ref_adm( 4,iz, 6,12),iz = 1,20) / &
     & 0.2136200E+00, 0.2136200E+00, 0.2140000E+00, 0.2121800E+00, &
     & 0.2151400E+00, 0.2160100E+00, 0.2253200E+00, 0.2420400E+00, &
     & 0.2541400E+00, 0.2515900E+00, 0.2692400E+00, 0.2962000E+00, &
     & 0.3308100E+00, 0.3789800E+00, 0.4324500E+00, 0.5010800E+00, &
     & 0.5744300E+00, 0.6214900E+00, 0.6662000E+00, 0.6662000E+00 /
      data (ref_adm( 4,iz, 7,12),iz = 1,20) / &
     & 0.2169000E+00, 0.2169000E+00, 0.2108700E+00, 0.2088000E+00, &
     & 0.2114800E+00, 0.2181800E+00, 0.2205000E+00, 0.2302600E+00, &
     & 0.2354400E+00, 0.2458500E+00, 0.2652000E+00, 0.2932800E+00, &
     & 0.3060900E+00, 0.3539000E+00, 0.4001000E+00, 0.5122200E+00, &
     & 0.5622900E+00, 0.5851800E+00, 0.5799000E+00, 0.5799000E+00 /
      data (ref_adm( 4,iz, 8,12),iz = 1,20) / &
     & 0.2131400E+00, 0.2131400E+00, 0.2168800E+00, 0.2136200E+00, &
     & 0.2032100E+00, 0.2116800E+00, 0.2206100E+00, 0.2278100E+00, &
     & 0.2355700E+00, 0.2611500E+00, 0.2774000E+00, 0.2884700E+00, &
     & 0.2844100E+00, 0.3163200E+00, 0.3625000E+00, 0.4415700E+00, &
     & 0.5029200E+00, 0.5438500E+00, 0.4776800E+00, 0.4776800E+00 /
      data (ref_adm( 4,iz, 9,12),iz = 1,20) / &
     & 0.2144000E+00, 0.2144000E+00, 0.2140600E+00, 0.2175000E+00, &
     & 0.2174100E+00, 0.2071300E+00, 0.2163100E+00, 0.2192400E+00, &
     & 0.2189500E+00, 0.2420000E+00, 0.2631700E+00, 0.2907300E+00, &
     & 0.3052700E+00, 0.3353800E+00, 0.3948400E+00, 0.4521100E+00, &
     & 0.4984300E+00, 0.5134800E+00, 0.4616700E+00, 0.4616700E+00 /
      data (ref_adm( 4,iz,10,12),iz = 1,20) / &
     & 0.2100600E+00, 0.2100600E+00, 0.2124000E+00, 0.2194600E+00, &
     & 0.2123200E+00, 0.2109700E+00, 0.2122300E+00, 0.2339600E+00, &
     & 0.2349100E+00, 0.2376200E+00, 0.2617200E+00, 0.2761800E+00, &
     & 0.2892400E+00, 0.3205700E+00, 0.3532700E+00, 0.4499200E+00, &
     & 0.4730200E+00, 0.4932100E+00, 0.4298600E+00, 0.4298600E+00 /
      data (ref_adm( 4,iz,11,12),iz = 1,20) / &
     & 0.2231300E+00, 0.2231300E+00, 0.2136500E+00, 0.2212100E+00, &
     & 0.2098500E+00, 0.2078100E+00, 0.2392400E+00, 0.2272000E+00, &
     & 0.2193900E+00, 0.2299700E+00, 0.2521200E+00, 0.2650200E+00, &
     & 0.2774800E+00, 0.3202600E+00, 0.3389700E+00, 0.3889900E+00, &
     & 0.4493200E+00, 0.4460100E+00, 0.4109700E+00, 0.4109700E+00 /
      data (ref_adm( 4,iz,12,12),iz = 1,20) / &
     & 0.2164900E+00, 0.2164900E+00, 0.2149300E+00, 0.2211700E+00, &
     & 0.2148500E+00, 0.2261600E+00, 0.2239300E+00, 0.2183000E+00, &
     & 0.2287900E+00, 0.2362500E+00, 0.2333700E+00, 0.2447900E+00, &
     & 0.2672900E+00, 0.2944800E+00, 0.3358400E+00, 0.3697000E+00, &
     & 0.4224000E+00, 0.4319800E+00, 0.3657600E+00, 0.3657600E+00 /
      data (ref_adm( 4,iz,13,12),iz = 1,20) / &
     & 0.2126100E+00, 0.2126100E+00, 0.2117000E+00, 0.2077400E+00, &
     & 0.2089100E+00, 0.2047100E+00, 0.2153300E+00, 0.2120000E+00, &
     & 0.2181200E+00, 0.2233300E+00, 0.2334200E+00, 0.2297700E+00, &
     & 0.2715900E+00, 0.2844400E+00, 0.3311200E+00, 0.3581900E+00, &
     & 0.3917100E+00, 0.3735500E+00, 0.3830600E+00, 0.3830600E+00 /
      data (ref_adm( 4,iz,14,12),iz = 1,20) / &
     & 0.2135200E+00, 0.2135200E+00, 0.2110900E+00, 0.2106600E+00, &
     & 0.2136900E+00, 0.2122200E+00, 0.2153600E+00, 0.2140000E+00, &
     & 0.2190800E+00, 0.2228400E+00, 0.2243300E+00, 0.2336500E+00, &
     & 0.2477800E+00, 0.2668900E+00, 0.3261300E+00, 0.3304900E+00, &
     & 0.3538600E+00, 0.3828100E+00, 0.3604500E+00, 0.3604500E+00 /
      data (ref_adm( 4,iz,15,12),iz = 1,20) / &
     & 0.2157700E+00, 0.2157700E+00, 0.2189900E+00, 0.2134800E+00, &
     & 0.2174500E+00, 0.2187400E+00, 0.2237800E+00, 0.2237700E+00, &
     & 0.2274200E+00, 0.2311300E+00, 0.2342000E+00, 0.2376300E+00, &
     & 0.2455000E+00, 0.2565700E+00, 0.2811400E+00, 0.3230300E+00, &
     & 0.3379800E+00, 0.3463100E+00, 0.4040380E+00, 0.4040380E+00 /
      data (ref_adm( 4,iz,16,12),iz = 1,20) / &
     & 0.2168600E+00, 0.2168600E+00, 0.2188200E+00, 0.2127800E+00, &
     & 0.2198700E+00, 0.2177400E+00, 0.2194700E+00, 0.2171000E+00, &
     & 0.2413900E+00, 0.2350000E+00, 0.2394500E+00, 0.2456500E+00, &
     & 0.2544100E+00, 0.2606000E+00, 0.2732100E+00, 0.3079100E+00, &
     & 0.3328200E+00, 0.3423900E+00, 0.3913906E+00, 0.3913906E+00 /
      data (ref_adm( 4,iz,17,12),iz = 1,20) / &
     & 0.2171500E+00, 0.2171500E+00, 0.2161600E+00, 0.2186500E+00, &
     & 0.2141900E+00, 0.2229800E+00, 0.2246000E+00, 0.2290300E+00, &
     & 0.2368400E+00, 0.2370200E+00, 0.2463400E+00, 0.2427900E+00, &
     & 0.2432300E+00, 0.2546600E+00, 0.2824000E+00, 0.2923600E+00, &
     & 0.3083600E+00, 0.4137229E+00, 0.3799642E+00, 0.3799642E+00 /
      data (ref_adm( 4,iz,18,12),iz = 1,20) / &
     & 0.2164300E+00, 0.2164300E+00, 0.2258000E+00, 0.2285000E+00, &
     & 0.2334700E+00, 0.2261200E+00, 0.2396300E+00, 0.2333700E+00, &
     & 0.2373000E+00, 0.2400600E+00, 0.2377700E+00, 0.2444200E+00, &
     & 0.2608200E+00, 0.2578300E+00, 0.2969600E+00, 0.2646900E+00, &
     & 0.3035600E+00, 0.3247080E+00, 0.3210732E+00, 0.3210732E+00 /
      data (ref_adm( 4,iz,19,12),iz = 1,20) / &
     & 0.2259500E+00, 0.2259500E+00, 0.2178400E+00, 0.2208500E+00, &
     & 0.2298800E+00, 0.2224800E+00, 0.2169400E+00, 0.2499000E+00, &
     & 0.2403900E+00, 0.2456200E+00, 0.2422300E+00, 0.2458500E+00, &
     & 0.2532100E+00, 0.2546000E+00, 0.2847800E+00, 0.2670000E+00, &
     & 0.2902200E+00, 0.3206802E+00, 0.3159087E+00, 0.3159087E+00 /
      data (ref_adm( 4,iz,20,12),iz = 1,20) / &
     & 0.2156000E+00, 0.2156000E+00, 0.2157200E+00, 0.2219300E+00, &
     & 0.2121500E+00, 0.2187000E+00, 0.2226100E+00, 0.2390800E+00, &
     & 0.2449200E+00, 0.2361300E+00, 0.2439700E+00, 0.2505800E+00, &
     & 0.2626700E+00, 0.2669500E+00, 0.2695600E+00, 0.2884000E+00, &
     & 0.3033930E+00, 0.3177466E+00, 0.3128752E+00, 0.3128752E+00 /
      data (ref_adm( 4,iz,21,12),iz = 1,20) / &
     & 0.2200300E+00, 0.2200300E+00, 0.2199100E+00, 0.2156500E+00, &
     & 0.2198400E+00, 0.2239200E+00, 0.2271200E+00, 0.2417700E+00, &
     & 0.2538100E+00, 0.2457000E+00, 0.2603300E+00, 0.2486300E+00, &
     & 0.2620500E+00, 0.2781900E+00, 0.2758300E+00, 0.3309500E+00, &
     & 0.3019796E+00, 0.3153062E+00, 0.3108718E+00, 0.3108718E+00 /
      data (ref_adm( 4,iz,22,12),iz = 1,20) / &
     & 0.2187400E+00, 0.2187400E+00, 0.2151000E+00, 0.2141600E+00, &
     & 0.2316900E+00, 0.2326000E+00, 0.2337900E+00, 0.2346100E+00, &
     & 0.2560600E+00, 0.2504400E+00, 0.2597000E+00, 0.2493200E+00, &
     & 0.2589700E+00, 0.2724000E+00, 0.2925300E+00, 0.3089500E+00, &
     & 0.3709690E+00, 0.3693563E+00, 0.3400756E+00, 0.3400756E+00 /
      data (ref_adm( 4,iz,23,12),iz = 1,20) / &
     & 0.2164800E+00, 0.2164800E+00, 0.2264400E+00, 0.2151500E+00, &
     & 0.2250000E+00, 0.2333300E+00, 0.2382500E+00, 0.2438900E+00, &
     & 0.2421500E+00, 0.2562600E+00, 0.2676800E+00, 0.2648400E+00, &
     & 0.2728300E+00, 0.2906300E+00, 0.2841500E+00, 0.2855400E+00, &
     & 0.3631472E+00, 0.3602683E+00, 0.3367365E+00, 0.3367365E+00 /
      data (ref_adm( 4,iz,24,12),iz = 1,20) / &
     & 0.2162800E+00, 0.2162800E+00, 0.2181700E+00, 0.2174400E+00, &
     & 0.2180600E+00, 0.2281300E+00, 0.2366700E+00, 0.2373300E+00, &
     & 0.2450500E+00, 0.2701100E+00, 0.2744900E+00, 0.2736500E+00, &
     & 0.2864700E+00, 0.2921000E+00, 0.2955800E+00, 0.3216400E+00, &
     & 0.3307500E+00, 0.3533386E+00, 0.3342934E+00, 0.3342934E+00 /
      data (ref_adm( 4,iz,25,12),iz = 1,20) / &
     & 0.2182000E+00, 0.2182000E+00, 0.2168600E+00, 0.2191600E+00, &
     & 0.2244800E+00, 0.2293100E+00, 0.2319900E+00, 0.2359100E+00, &
     & 0.2479400E+00, 0.2550800E+00, 0.2672700E+00, 0.2759600E+00, &
     & 0.2878400E+00, 0.2922800E+00, 0.3051300E+00, 0.3163400E+00, &
     & 0.3218700E+00, 0.4166300E+00, 0.3333964E+00, 0.3333964E+00 /
      data (ref_adm( 4,iz,26,12),iz = 1,20) / &
     & 0.2099700E+00, 0.2099700E+00, 0.2166000E+00, 0.2205900E+00, &
     & 0.2217300E+00, 0.2217500E+00, 0.2302200E+00, 0.2324500E+00, &
     & 0.2383000E+00, 0.2457200E+00, 0.2516000E+00, 0.2681300E+00, &
     & 0.2789800E+00, 0.2892000E+00, 0.3110800E+00, 0.3293800E+00, &
     & 0.3461800E+00, 0.3659300E+00, 0.3333754E+00, 0.3333754E+00 /
      data (ref_adm( 4,iz,27,12),iz = 1,20) / &
     & 0.2128500E+00, 0.2128500E+00, 0.2257000E+00, 0.2212900E+00, &
     & 0.2261000E+00, 0.2455300E+00, 0.2419500E+00, 0.2457000E+00, &
     & 0.2501500E+00, 0.2637300E+00, 0.2629900E+00, 0.2718100E+00, &
     & 0.2748700E+00, 0.2845300E+00, 0.3043400E+00, 0.3446500E+00, &
     & 0.3609100E+00, 0.3408300E+00, 0.3026000E+00, 0.3026000E+00 /
      data (ref_adm( 4,iz,28,12),iz = 1,20) / &
     & 0.2123600E+00, 0.2123600E+00, 0.2151100E+00, 0.2192200E+00, &
     & 0.2226400E+00, 0.2336400E+00, 0.2407000E+00, 0.2616700E+00, &
     & 0.2762300E+00, 0.2882400E+00, 0.3008700E+00, 0.3022300E+00, &
     & 0.3094200E+00, 0.3148800E+00, 0.3367700E+00, 0.3601000E+00, &
     & 0.3668700E+00, 0.3688400E+00, 0.2998200E+00, 0.2998200E+00 /
      data (ref_adm( 4,iz,29,12),iz = 1,20) / &
     & 0.2151400E+00, 0.2151400E+00, 0.2157100E+00, 0.2251000E+00, &
     & 0.2327100E+00, 0.2368700E+00, 0.2424400E+00, 0.2644700E+00, &
     & 0.2806000E+00, 0.2808500E+00, 0.2902000E+00, 0.3085700E+00, &
     & 0.3320600E+00, 0.3610900E+00, 0.3709700E+00, 0.3842800E+00, &
     & 0.3772000E+00, 0.3804500E+00, 0.3117400E+00, 0.3117400E+00 /
      data (ref_adm( 4,iz,30,12),iz = 1,20) / &
     & 0.2151900E+00, 0.2151900E+00, 0.2333600E+00, 0.2274400E+00, &
     & 0.2376600E+00, 0.2535000E+00, 0.2523100E+00, 0.2721000E+00, &
     & 0.2706700E+00, 0.2803400E+00, 0.3038300E+00, 0.3198000E+00, &
     & 0.3384500E+00, 0.3670800E+00, 0.3792400E+00, 0.3876600E+00, &
     & 0.3946800E+00, 0.3905400E+00, 0.3215900E+00, 0.3215900E+00 /
      data (ref_adm( 4,iz,31,12),iz = 1,20) / &
     & 0.2283900E+00, 0.2283900E+00, 0.2352400E+00, 0.2395000E+00, &
     & 0.2442100E+00, 0.2509100E+00, 0.2647100E+00, 0.2690800E+00, &
     & 0.2842300E+00, 0.2987200E+00, 0.3158800E+00, 0.3250300E+00, &
     & 0.3351100E+00, 0.3522100E+00, 0.3700500E+00, 0.4053800E+00, &
     & 0.4099300E+00, 0.3938700E+00, 0.3440500E+00, 0.3440500E+00 /
      data (ref_adm( 4,iz,32,12),iz = 1,20) / &
     & 0.2166600E+00, 0.2166600E+00, 0.2114800E+00, 0.2247600E+00, &
     & 0.2352800E+00, 0.2458200E+00, 0.2512200E+00, 0.2597500E+00, &
     & 0.2778300E+00, 0.2917000E+00, 0.3081400E+00, 0.3207600E+00, &
     & 0.3468400E+00, 0.3573500E+00, 0.3776200E+00, 0.3885500E+00, &
     & 0.3986700E+00, 0.4015200E+00, 0.3426400E+00, 0.3426400E+00 /
      data (ref_adm( 4,iz,33,12),iz = 1,20) / &
     & 0.2264300E+00, 0.2264300E+00, 0.2322100E+00, 0.2348800E+00, &
     & 0.2471400E+00, 0.2567700E+00, 0.2697000E+00, 0.2745200E+00, &
     & 0.2917200E+00, 0.3084100E+00, 0.3187900E+00, 0.3412400E+00, &
     & 0.3541500E+00, 0.3807800E+00, 0.3945900E+00, 0.4052600E+00, &
     & 0.4228600E+00, 0.4132500E+00, 0.3476800E+00, 0.3476800E+00 /
      data (ref_adm( 4,iz,34,12),iz = 1,20) / &
     & 0.2238800E+00, 0.2238800E+00, 0.2253800E+00, 0.2404700E+00, &
     & 0.2371100E+00, 0.2616800E+00, 0.2633300E+00, 0.2705300E+00, &
     & 0.2839100E+00, 0.2988400E+00, 0.3211800E+00, 0.3374200E+00, &
     & 0.3620800E+00, 0.3746400E+00, 0.3877100E+00, 0.4175900E+00, &
     & 0.3991600E+00, 0.3991500E+00, 0.3334800E+00, 0.3334800E+00 /
      data (ref_adm( 4,iz,35,12),iz = 1,20) / &
     & 0.2162500E+00, 0.2162500E+00, 0.2183400E+00, 0.2296500E+00, &
     & 0.2643000E+00, 0.2634900E+00, 0.2763900E+00, 0.2743600E+00, &
     & 0.2861000E+00, 0.2867000E+00, 0.3285900E+00, 0.3530200E+00, &
     & 0.3713400E+00, 0.3893300E+00, 0.3969100E+00, 0.4244100E+00, &
     & 0.4183500E+00, 0.4103700E+00, 0.3531000E+00, 0.3531000E+00 /
      data (ref_adm( 4,iz,36,12),iz = 1,20) / &
     & 0.2156700E+00, 0.2156700E+00, 0.2226700E+00, 0.2332900E+00, &
     & 0.2566700E+00, 0.2596200E+00, 0.2631900E+00, 0.2849400E+00, &
     & 0.2894000E+00, 0.3164400E+00, 0.3474900E+00, 0.3633700E+00, &
     & 0.3874300E+00, 0.4040700E+00, 0.3992900E+00, 0.4065500E+00, &
     & 0.4197200E+00, 0.4085200E+00, 0.3489800E+00, 0.3489800E+00 /
      data (ref_adm( 4,iz,37,12),iz = 1,20) / &
     & 0.2182800E+00, 0.2182800E+00, 0.2240000E+00, 0.2441300E+00, &
     & 0.2532800E+00, 0.2719100E+00, 0.2683300E+00, 0.2782500E+00, &
     & 0.2886300E+00, 0.3063200E+00, 0.3338400E+00, 0.3822600E+00, &
     & 0.4059200E+00, 0.4050000E+00, 0.3914700E+00, 0.3976700E+00, &
     & 0.4136700E+00, 0.4178200E+00, 0.3161500E+00, 0.3161500E+00 /
      data (ref_adm( 4,iz,38,12),iz = 1,20) / &
     & 0.2182800E+00, 0.2182800E+00, 0.2240000E+00, 0.2441300E+00, &
     & 0.2532800E+00, 0.2719100E+00, 0.2683300E+00, 0.2782500E+00, &
     & 0.2886300E+00, 0.3063200E+00, 0.3338400E+00, 0.3822600E+00, &
     & 0.4059200E+00, 0.4050000E+00, 0.3914700E+00, 0.3976700E+00, &
     & 0.4136700E+00, 0.4178200E+00, 0.3161500E+00, 0.3161500E+00 /
! Solar Zenith Angle 60.0 Albedo  0.2968576E+00
      data (ref_adm( 4,iz, 1,13),iz = 1,20) / &
     & 0.2104100E+00, 0.2104100E+00, 0.2066200E+00, 0.2245200E+00, &
     & 0.2177200E+00, 0.2257700E+00, 0.2278000E+00, 0.2431300E+00, &
     & 0.2668500E+00, 0.2732600E+00, 0.3165900E+00, 0.3743600E+00, &
     & 0.4089300E+00, 0.5543500E+00, 0.5923200E+00, 0.6907400E+00, &
     & 0.7883000E+00, 0.8994400E+00, 0.8170000E+00, 0.8170000E+00 /
      data (ref_adm( 4,iz, 2,13),iz = 1,20) / &
     & 0.2104100E+00, 0.2104100E+00, 0.2066200E+00, 0.2245200E+00, &
     & 0.2177200E+00, 0.2257700E+00, 0.2278000E+00, 0.2431300E+00, &
     & 0.2668500E+00, 0.2732600E+00, 0.3165900E+00, 0.3743600E+00, &
     & 0.4089300E+00, 0.5543500E+00, 0.5923200E+00, 0.6907400E+00, &
     & 0.7883000E+00, 0.8994400E+00, 0.8170000E+00, 0.8170000E+00 /
      data (ref_adm( 4,iz, 3,13),iz = 1,20) / &
     & 0.2115200E+00, 0.2115200E+00, 0.2062200E+00, 0.2116200E+00, &
     & 0.2313000E+00, 0.2467200E+00, 0.2415500E+00, 0.2298300E+00, &
     & 0.2617400E+00, 0.2987000E+00, 0.3270200E+00, 0.3694900E+00, &
     & 0.4041500E+00, 0.4790700E+00, 0.5585600E+00, 0.6230800E+00, &
     & 0.7462100E+00, 0.8648500E+00, 0.6379300E+00, 0.6379300E+00 /
      data (ref_adm( 4,iz, 4,13),iz = 1,20) / &
     & 0.2158900E+00, 0.2158900E+00, 0.2053200E+00, 0.2124000E+00, &
     & 0.2319700E+00, 0.2178800E+00, 0.2170000E+00, 0.2428600E+00, &
     & 0.2652300E+00, 0.2848900E+00, 0.3018100E+00, 0.3405000E+00, &
     & 0.3948500E+00, 0.4781500E+00, 0.5437700E+00, 0.6200000E+00, &
     & 0.7345000E+00, 0.8447200E+00, 0.7026900E+00, 0.7026900E+00 /
      data (ref_adm( 4,iz, 5,13),iz = 1,20) / &
     & 0.2087600E+00, 0.2087600E+00, 0.2163800E+00, 0.2171900E+00, &
     & 0.2117200E+00, 0.2154800E+00, 0.2223000E+00, 0.2397800E+00, &
     & 0.2537000E+00, 0.2826900E+00, 0.3145900E+00, 0.3503500E+00, &
     & 0.3730000E+00, 0.4633100E+00, 0.5341500E+00, 0.6057100E+00, &
     & 0.6877400E+00, 0.8287600E+00, 0.7258900E+00, 0.7258900E+00 /
      data (ref_adm( 4,iz, 6,13),iz = 1,20) / &
     & 0.2071700E+00, 0.2071700E+00, 0.2041500E+00, 0.2071400E+00, &
     & 0.2041300E+00, 0.2128300E+00, 0.2201100E+00, 0.2437400E+00, &
     & 0.2639600E+00, 0.2710100E+00, 0.3085400E+00, 0.3572300E+00, &
     & 0.3899000E+00, 0.4417900E+00, 0.5096900E+00, 0.6229500E+00, &
     & 0.7329500E+00, 0.7975100E+00, 0.7143400E+00, 0.7143400E+00 /
      data (ref_adm( 4,iz, 7,13),iz = 1,20) / &
     & 0.2108500E+00, 0.2108500E+00, 0.2015500E+00, 0.2061900E+00, &
     & 0.2073000E+00, 0.2023600E+00, 0.2113600E+00, 0.2214100E+00, &
     & 0.2410300E+00, 0.2574700E+00, 0.2779700E+00, 0.2954100E+00, &
     & 0.3498200E+00, 0.4271200E+00, 0.4587000E+00, 0.5287500E+00, &
     & 0.6178000E+00, 0.6803200E+00, 0.6652800E+00, 0.6652800E+00 /
      data (ref_adm( 4,iz, 8,13),iz = 1,20) / &
     & 0.2111300E+00, 0.2111300E+00, 0.2131300E+00, 0.2072800E+00, &
     & 0.2071800E+00, 0.2232900E+00, 0.2292600E+00, 0.2352400E+00, &
     & 0.2410100E+00, 0.2567500E+00, 0.2650500E+00, 0.2947200E+00, &
     & 0.3334300E+00, 0.4082500E+00, 0.4545600E+00, 0.5179500E+00, &
     & 0.5794100E+00, 0.6590400E+00, 0.6016200E+00, 0.6016200E+00 /
      data (ref_adm( 4,iz, 9,13),iz = 1,20) / &
     & 0.2033300E+00, 0.2033300E+00, 0.2036200E+00, 0.2003000E+00, &
     & 0.2143500E+00, 0.2100200E+00, 0.2150000E+00, 0.2387200E+00, &
     & 0.2488800E+00, 0.2438300E+00, 0.2888600E+00, 0.2880900E+00, &
     & 0.3432900E+00, 0.3948200E+00, 0.4271400E+00, 0.4955300E+00, &
     & 0.5627200E+00, 0.5928800E+00, 0.5259300E+00, 0.5259300E+00 /
      data (ref_adm( 4,iz,10,13),iz = 1,20) / &
     & 0.2169300E+00, 0.2169300E+00, 0.1930100E+00, 0.2000600E+00, &
     & 0.2086700E+00, 0.2011700E+00, 0.2145300E+00, 0.2397200E+00, &
     & 0.2369400E+00, 0.2359500E+00, 0.2853700E+00, 0.2832100E+00, &
     & 0.3164800E+00, 0.3532800E+00, 0.4080800E+00, 0.4545300E+00, &
     & 0.5349500E+00, 0.5645900E+00, 0.5025000E+00, 0.5025000E+00 /
      data (ref_adm( 4,iz,11,13),iz = 1,20) / &
     & 0.2046200E+00, 0.2046200E+00, 0.2108400E+00, 0.2267300E+00, &
     & 0.2088600E+00, 0.2134800E+00, 0.2117100E+00, 0.2219300E+00, &
     & 0.2306000E+00, 0.2493000E+00, 0.2527100E+00, 0.2778700E+00, &
     & 0.3113700E+00, 0.3390800E+00, 0.3920700E+00, 0.4448400E+00, &
     & 0.4983900E+00, 0.5153500E+00, 0.4480100E+00, 0.4480100E+00 /
      data (ref_adm( 4,iz,12,13),iz = 1,20) / &
     & 0.2046700E+00, 0.2046700E+00, 0.2122400E+00, 0.2203400E+00, &
     & 0.2187500E+00, 0.2073600E+00, 0.2080200E+00, 0.2133700E+00, &
     & 0.2377800E+00, 0.2289700E+00, 0.2566700E+00, 0.2823000E+00, &
     & 0.3013000E+00, 0.3327900E+00, 0.3731300E+00, 0.4124100E+00, &
     & 0.4555500E+00, 0.4652600E+00, 0.4590400E+00, 0.4590400E+00 /
      data (ref_adm( 4,iz,13,13),iz = 1,20) / &
     & 0.2130200E+00, 0.2130200E+00, 0.2118800E+00, 0.2079600E+00, &
     & 0.2167000E+00, 0.2128000E+00, 0.1994900E+00, 0.2230700E+00, &
     & 0.2303400E+00, 0.2472800E+00, 0.2634700E+00, 0.2638300E+00, &
     & 0.2932500E+00, 0.3238600E+00, 0.3530900E+00, 0.3856700E+00, &
     & 0.4151000E+00, 0.4291900E+00, 0.3859300E+00, 0.3859300E+00 /
      data (ref_adm( 4,iz,14,13),iz = 1,20) / &
     & 0.2107700E+00, 0.2107700E+00, 0.2160700E+00, 0.2083400E+00, &
     & 0.2178000E+00, 0.2200200E+00, 0.2208400E+00, 0.2278000E+00, &
     & 0.2297800E+00, 0.2296900E+00, 0.2411900E+00, 0.2563000E+00, &
     & 0.2718000E+00, 0.2909900E+00, 0.3600200E+00, 0.3597900E+00, &
     & 0.3917600E+00, 0.3977500E+00, 0.3748900E+00, 0.3748900E+00 /
      data (ref_adm( 4,iz,15,13),iz = 1,20) / &
     & 0.2102200E+00, 0.2102200E+00, 0.2038400E+00, 0.2083300E+00, &
     & 0.2081300E+00, 0.2126500E+00, 0.2165400E+00, 0.2241000E+00, &
     & 0.2316500E+00, 0.2338800E+00, 0.2422300E+00, 0.2577900E+00, &
     & 0.2698400E+00, 0.2831200E+00, 0.3199500E+00, 0.3317000E+00, &
     & 0.3620800E+00, 0.3615900E+00, 0.3581700E+00, 0.3581700E+00 /
      data (ref_adm( 4,iz,16,13),iz = 1,20) / &
     & 0.2073800E+00, 0.2073800E+00, 0.2156900E+00, 0.2131600E+00, &
     & 0.2034600E+00, 0.2109700E+00, 0.2273600E+00, 0.2260600E+00, &
     & 0.2224200E+00, 0.2271900E+00, 0.2416300E+00, 0.2498600E+00, &
     & 0.2658900E+00, 0.2703300E+00, 0.3057100E+00, 0.3239400E+00, &
     & 0.3467500E+00, 0.3579200E+00, 0.4275301E+00, 0.4275301E+00 /
      data (ref_adm( 4,iz,17,13),iz = 1,20) / &
     & 0.2101200E+00, 0.2101200E+00, 0.2125600E+00, 0.2163400E+00, &
     & 0.2177300E+00, 0.2268600E+00, 0.2164100E+00, 0.2309000E+00, &
     & 0.2357200E+00, 0.2453000E+00, 0.2458600E+00, 0.2595700E+00, &
     & 0.2691900E+00, 0.2786700E+00, 0.3032000E+00, 0.3060200E+00, &
     & 0.3083600E+00, 0.4468260E+00, 0.4135081E+00, 0.4135081E+00 /
      data (ref_adm( 4,iz,18,13),iz = 1,20) / &
     & 0.2112800E+00, 0.2112800E+00, 0.2098300E+00, 0.2131400E+00, &
     & 0.2260400E+00, 0.2192000E+00, 0.2355800E+00, 0.2283800E+00, &
     & 0.2347300E+00, 0.2402400E+00, 0.2471500E+00, 0.2626300E+00, &
     & 0.2628900E+00, 0.2817000E+00, 0.2947200E+00, 0.3121200E+00, &
     & 0.3185200E+00, 0.3415741E+00, 0.3461534E+00, 0.3461534E+00 /
      data (ref_adm( 4,iz,19,13),iz = 1,20) / &
     & 0.2010900E+00, 0.2010900E+00, 0.2059900E+00, 0.2166100E+00, &
     & 0.2083100E+00, 0.2196200E+00, 0.2202200E+00, 0.2122500E+00, &
     & 0.2348900E+00, 0.2302600E+00, 0.2465400E+00, 0.2573700E+00, &
     & 0.2576800E+00, 0.2784200E+00, 0.2848800E+00, 0.2931300E+00, &
     & 0.2799200E+00, 0.3365864E+00, 0.3398182E+00, 0.3398182E+00 /
      data (ref_adm( 4,iz,20,13),iz = 1,20) / &
     & 0.2065900E+00, 0.2065900E+00, 0.2104000E+00, 0.2136200E+00, &
     & 0.2158900E+00, 0.2174800E+00, 0.2185500E+00, 0.2274800E+00, &
     & 0.2336200E+00, 0.2382600E+00, 0.2462300E+00, 0.2558200E+00, &
     & 0.2687700E+00, 0.2844300E+00, 0.2815900E+00, 0.2687000E+00, &
     & 0.3142553E+00, 0.3330903E+00, 0.3361010E+00, 0.3361010E+00 /
      data (ref_adm( 4,iz,21,13),iz = 1,20) / &
     & 0.2147500E+00, 0.2147500E+00, 0.2106900E+00, 0.2033900E+00, &
     & 0.2212500E+00, 0.2232800E+00, 0.2332200E+00, 0.2364400E+00, &
     & 0.2407100E+00, 0.2466600E+00, 0.2404600E+00, 0.2703400E+00, &
     & 0.2701100E+00, 0.2794300E+00, 0.2820700E+00, 0.2702900E+00, &
     & 0.3123844E+00, 0.3302338E+00, 0.3338164E+00, 0.3338164E+00 /
      data (ref_adm( 4,iz,22,13),iz = 1,20) / &
     & 0.2117500E+00, 0.2117500E+00, 0.2138700E+00, 0.2173800E+00, &
     & 0.2269100E+00, 0.2197500E+00, 0.2331800E+00, 0.2322600E+00, &
     & 0.2342500E+00, 0.2465300E+00, 0.2506700E+00, 0.2698000E+00, &
     & 0.2736100E+00, 0.2736500E+00, 0.2879700E+00, 0.3503400E+00, &
     & 0.3890391E+00, 0.3904542E+00, 0.3632147E+00, 0.3632147E+00 /
      data (ref_adm( 4,iz,23,13),iz = 1,20) / &
     & 0.2056500E+00, 0.2056500E+00, 0.2214100E+00, 0.2066300E+00, &
     & 0.2251000E+00, 0.2412100E+00, 0.2345100E+00, 0.2385000E+00, &
     & 0.2373400E+00, 0.2515400E+00, 0.2604300E+00, 0.2679600E+00, &
     & 0.2819300E+00, 0.2862500E+00, 0.2979200E+00, 0.3336100E+00, &
     & 0.3805668E+00, 0.3800671E+00, 0.3595355E+00, 0.3595355E+00 /
      data (ref_adm( 4,iz,24,13),iz = 1,20) / &
     & 0.2149300E+00, 0.2149300E+00, 0.2135700E+00, 0.2154500E+00, &
     & 0.2155200E+00, 0.2170000E+00, 0.2248700E+00, 0.2345800E+00, &
     & 0.2341600E+00, 0.2439800E+00, 0.2601500E+00, 0.2802200E+00, &
     & 0.2752200E+00, 0.2968000E+00, 0.3067400E+00, 0.3239600E+00, &
     & 0.3428500E+00, 0.3721565E+00, 0.3573363E+00, 0.3573363E+00 /
      data (ref_adm( 4,iz,25,13),iz = 1,20) / &
     & 0.2111800E+00, 0.2111800E+00, 0.2188700E+00, 0.2223500E+00, &
     & 0.2268100E+00, 0.2310900E+00, 0.2336900E+00, 0.2412900E+00, &
     & 0.2453100E+00, 0.2517100E+00, 0.2631800E+00, 0.2716500E+00, &
     & 0.2813000E+00, 0.3001200E+00, 0.3023300E+00, 0.3296000E+00, &
     & 0.3490000E+00, 0.3652837E+00, 0.3566033E+00, 0.3566033E+00 /
      data (ref_adm( 4,iz,26,13),iz = 1,20) / &
     & 0.2136900E+00, 0.2136900E+00, 0.2201600E+00, 0.2143000E+00, &
     & 0.2190800E+00, 0.2259400E+00, 0.2315000E+00, 0.2400000E+00, &
     & 0.2515200E+00, 0.2603100E+00, 0.2701500E+00, 0.2803000E+00, &
     & 0.2905200E+00, 0.2990700E+00, 0.3126000E+00, 0.3571500E+00, &
     & 0.3709100E+00, 0.3673000E+00, 0.3575758E+00, 0.3575758E+00 /
      data (ref_adm( 4,iz,27,13),iz = 1,20) / &
     & 0.2133100E+00, 0.2133100E+00, 0.2107000E+00, 0.2200200E+00, &
     & 0.2288200E+00, 0.2262200E+00, 0.2431600E+00, 0.2460300E+00, &
     & 0.2626700E+00, 0.2670200E+00, 0.2634000E+00, 0.2784400E+00, &
     & 0.2950100E+00, 0.3088100E+00, 0.3258600E+00, 0.3678600E+00, &
     & 0.3919500E+00, 0.3837100E+00, 0.3841000E+00, 0.3841000E+00 /
      data (ref_adm( 4,iz,28,13),iz = 1,20) / &
     & 0.2073300E+00, 0.2073300E+00, 0.2187800E+00, 0.2135800E+00, &
     & 0.2235600E+00, 0.2362000E+00, 0.2488800E+00, 0.2715500E+00, &
     & 0.2610300E+00, 0.2729200E+00, 0.2906900E+00, 0.3028700E+00, &
     & 0.3202700E+00, 0.3302400E+00, 0.3599200E+00, 0.3795300E+00, &
     & 0.3875800E+00, 0.3837000E+00, 0.3570300E+00, 0.3570300E+00 /
      data (ref_adm( 4,iz,29,13),iz = 1,20) / &
     & 0.2123700E+00, 0.2123700E+00, 0.2151800E+00, 0.2218100E+00, &
     & 0.2189000E+00, 0.2335100E+00, 0.2461500E+00, 0.2590500E+00, &
     & 0.2646100E+00, 0.2814000E+00, 0.2987300E+00, 0.3211200E+00, &
     & 0.3252300E+00, 0.3588700E+00, 0.3706300E+00, 0.3998100E+00, &
     & 0.4090300E+00, 0.4064000E+00, 0.3489900E+00, 0.3489900E+00 /
      data (ref_adm( 4,iz,30,13),iz = 1,20) / &
     & 0.2109800E+00, 0.2109800E+00, 0.2217000E+00, 0.2220400E+00, &
     & 0.2288900E+00, 0.2541100E+00, 0.2528200E+00, 0.2590800E+00, &
     & 0.2815600E+00, 0.3005000E+00, 0.3101300E+00, 0.3240800E+00, &
     & 0.3520800E+00, 0.3661900E+00, 0.3957700E+00, 0.4221200E+00, &
     & 0.4403500E+00, 0.4389900E+00, 0.3643400E+00, 0.3643400E+00 /
      data (ref_adm( 4,iz,31,13),iz = 1,20) / &
     & 0.2271300E+00, 0.2271300E+00, 0.2297200E+00, 0.2509400E+00, &
     & 0.2486000E+00, 0.2414400E+00, 0.2476100E+00, 0.2556300E+00, &
     & 0.2778300E+00, 0.2919000E+00, 0.3175600E+00, 0.3314500E+00, &
     & 0.3447100E+00, 0.3826500E+00, 0.4017200E+00, 0.4130600E+00, &
     & 0.4399100E+00, 0.4488800E+00, 0.3665500E+00, 0.3665500E+00 /
      data (ref_adm( 4,iz,32,13),iz = 1,20) / &
     & 0.2172900E+00, 0.2172900E+00, 0.2336400E+00, 0.2367600E+00, &
     & 0.2365600E+00, 0.2447400E+00, 0.2769500E+00, 0.2806300E+00, &
     & 0.2989600E+00, 0.3087600E+00, 0.3210200E+00, 0.3337300E+00, &
     & 0.3546000E+00, 0.3820500E+00, 0.4054600E+00, 0.4263600E+00, &
     & 0.4499900E+00, 0.4477000E+00, 0.3762200E+00, 0.3762200E+00 /
      data (ref_adm( 4,iz,33,13),iz = 1,20) / &
     & 0.2256900E+00, 0.2256900E+00, 0.2197300E+00, 0.2198800E+00, &
     & 0.2271600E+00, 0.2414700E+00, 0.2603400E+00, 0.2737100E+00, &
     & 0.2872600E+00, 0.3017400E+00, 0.3207700E+00, 0.3328300E+00, &
     & 0.3522300E+00, 0.3823400E+00, 0.4079100E+00, 0.4338200E+00, &
     & 0.4643800E+00, 0.4552700E+00, 0.3883900E+00, 0.3883900E+00 /
      data (ref_adm( 4,iz,34,13),iz = 1,20) / &
     & 0.2147800E+00, 0.2147800E+00, 0.2176800E+00, 0.2286600E+00, &
     & 0.2364800E+00, 0.2480100E+00, 0.2525700E+00, 0.2640800E+00, &
     & 0.2813200E+00, 0.3097500E+00, 0.3269600E+00, 0.3358800E+00, &
     & 0.3782200E+00, 0.3938900E+00, 0.4185200E+00, 0.4495800E+00, &
     & 0.4518400E+00, 0.4491100E+00, 0.3780800E+00, 0.3780800E+00 /
      data (ref_adm( 4,iz,35,13),iz = 1,20) / &
     & 0.2177300E+00, 0.2177300E+00, 0.2220100E+00, 0.2347800E+00, &
     & 0.2495000E+00, 0.2428600E+00, 0.2565200E+00, 0.2622800E+00, &
     & 0.2897400E+00, 0.3175300E+00, 0.3100300E+00, 0.3473200E+00, &
     & 0.3689300E+00, 0.4059100E+00, 0.4271400E+00, 0.4353900E+00, &
     & 0.4516700E+00, 0.4582000E+00, 0.3906300E+00, 0.3906300E+00 /
      data (ref_adm( 4,iz,36,13),iz = 1,20) / &
     & 0.2155700E+00, 0.2155700E+00, 0.2246900E+00, 0.2227200E+00, &
     & 0.2347900E+00, 0.2557000E+00, 0.2753100E+00, 0.2777900E+00, &
     & 0.2887000E+00, 0.3113200E+00, 0.3340600E+00, 0.3638400E+00, &
     & 0.3827300E+00, 0.4173200E+00, 0.4313000E+00, 0.4496600E+00, &
     & 0.4587600E+00, 0.4480300E+00, 0.3826600E+00, 0.3826600E+00 /
      data (ref_adm( 4,iz,37,13),iz = 1,20) / &
     & 0.2111200E+00, 0.2111200E+00, 0.2283900E+00, 0.2336600E+00, &
     & 0.2393600E+00, 0.2485700E+00, 0.2741700E+00, 0.2762700E+00, &
     & 0.2769000E+00, 0.2920200E+00, 0.3417400E+00, 0.3549100E+00, &
     & 0.4096200E+00, 0.4360200E+00, 0.4426900E+00, 0.4563800E+00, &
     & 0.4579800E+00, 0.4636500E+00, 0.4148900E+00, 0.4148900E+00 /
      data (ref_adm( 4,iz,38,13),iz = 1,20) / &
     & 0.2111200E+00, 0.2111200E+00, 0.2283900E+00, 0.2336600E+00, &
     & 0.2393600E+00, 0.2485700E+00, 0.2741700E+00, 0.2762700E+00, &
     & 0.2769000E+00, 0.2920200E+00, 0.3417400E+00, 0.3549100E+00, &
     & 0.4096200E+00, 0.4360200E+00, 0.4426900E+00, 0.4563800E+00, &
     & 0.4579800E+00, 0.4636500E+00, 0.4148900E+00, 0.4148900E+00 /
! Solar Zenith Angle 65.0 Albedo  0.3093537E+00
      data (ref_adm( 4,iz, 1,14),iz = 1,20) / &
     & 0.1987300E+00, 0.1987300E+00, 0.2132600E+00, 0.2005400E+00, &
     & 0.2076600E+00, 0.2267900E+00, 0.2203600E+00, 0.2475200E+00, &
     & 0.2846600E+00, 0.3087900E+00, 0.3474200E+00, 0.3912700E+00, &
     & 0.4934900E+00, 0.6313000E+00, 0.8082100E+00, 0.8874400E+00, &
     & 0.1006800E+01, 0.1035400E+01, 0.1349211E+01, 0.1349211E+01 /
      data (ref_adm( 4,iz, 2,14),iz = 1,20) / &
     & 0.1987300E+00, 0.1987300E+00, 0.2132600E+00, 0.2005400E+00, &
     & 0.2076600E+00, 0.2267900E+00, 0.2203600E+00, 0.2475200E+00, &
     & 0.2846600E+00, 0.3087900E+00, 0.3474200E+00, 0.3912700E+00, &
     & 0.4934900E+00, 0.6313000E+00, 0.8082100E+00, 0.8874400E+00, &
     & 0.1006800E+01, 0.1035400E+01, 0.1349211E+01, 0.1349211E+01 /
      data (ref_adm( 4,iz, 3,14),iz = 1,20) / &
     & 0.1976200E+00, 0.1976200E+00, 0.1962100E+00, 0.1986400E+00, &
     & 0.2122600E+00, 0.2140600E+00, 0.2408800E+00, 0.2475000E+00, &
     & 0.2725300E+00, 0.2908600E+00, 0.3322700E+00, 0.3979700E+00, &
     & 0.4443500E+00, 0.5444100E+00, 0.6802100E+00, 0.8203700E+00, &
     & 0.9477700E+00, 0.1032100E+01, 0.1949046E-07, 0.1949046E-07 /
      data (ref_adm( 4,iz, 4,14),iz = 1,20) / &
     & 0.2009500E+00, 0.2009500E+00, 0.2002900E+00, 0.2211700E+00, &
     & 0.2162700E+00, 0.2127900E+00, 0.2362400E+00, 0.2479100E+00, &
     & 0.2659000E+00, 0.2818600E+00, 0.3273800E+00, 0.3634500E+00, &
     & 0.4165800E+00, 0.5368000E+00, 0.6246500E+00, 0.7931400E+00, &
     & 0.9001700E+00, 0.9868400E+00, 0.1108324E+01, 0.1108324E+01 /
      data (ref_adm( 4,iz, 5,14),iz = 1,20) / &
     & 0.1963200E+00, 0.1963200E+00, 0.1985000E+00, 0.2153100E+00, &
     & 0.2058700E+00, 0.2207800E+00, 0.2501100E+00, 0.2553300E+00, &
     & 0.2601600E+00, 0.2987700E+00, 0.3271400E+00, 0.3585000E+00, &
     & 0.4427900E+00, 0.5244100E+00, 0.6079800E+00, 0.6937900E+00, &
     & 0.8919200E+00, 0.1021900E+01, 0.9538112E+00, 0.9538112E+00 /
      data (ref_adm( 4,iz, 6,14),iz = 1,20) / &
     & 0.1944300E+00, 0.1944300E+00, 0.2001200E+00, 0.2103600E+00, &
     & 0.2065100E+00, 0.2234600E+00, 0.2366200E+00, 0.2574700E+00, &
     & 0.2772600E+00, 0.3038600E+00, 0.3375100E+00, 0.3790600E+00, &
     & 0.4325600E+00, 0.5292100E+00, 0.6230500E+00, 0.7308000E+00, &
     & 0.8794000E+00, 0.9134300E+00, 0.7773800E+00, 0.7773800E+00 /
      data (ref_adm( 4,iz, 7,14),iz = 1,20) / &
     & 0.2144400E+00, 0.2144400E+00, 0.2102700E+00, 0.2287300E+00, &
     & 0.1999700E+00, 0.2159000E+00, 0.2368300E+00, 0.2595200E+00, &
     & 0.2862000E+00, 0.3003600E+00, 0.3510900E+00, 0.3623100E+00, &
     & 0.3930000E+00, 0.4802200E+00, 0.5554500E+00, 0.6766800E+00, &
     & 0.7429900E+00, 0.8384500E+00, 0.7193100E+00, 0.7193100E+00 /
      data (ref_adm( 4,iz, 8,14),iz = 1,20) / &
     & 0.2059000E+00, 0.2059000E+00, 0.1868400E+00, 0.1951300E+00, &
     & 0.2075900E+00, 0.2081900E+00, 0.2131600E+00, 0.2245500E+00, &
     & 0.2564000E+00, 0.2702800E+00, 0.3029100E+00, 0.3244000E+00, &
     & 0.3788100E+00, 0.4356800E+00, 0.4790600E+00, 0.6087900E+00, &
     & 0.7584400E+00, 0.7758600E+00, 0.6510600E+00, 0.6510600E+00 /
      data (ref_adm( 4,iz, 9,14),iz = 1,20) / &
     & 0.2085000E+00, 0.2085000E+00, 0.2043200E+00, 0.2049400E+00, &
     & 0.2248300E+00, 0.2051800E+00, 0.2288100E+00, 0.2310100E+00, &
     & 0.2401100E+00, 0.2759800E+00, 0.2933600E+00, 0.3263200E+00, &
     & 0.3719500E+00, 0.4276600E+00, 0.4636500E+00, 0.5987500E+00, &
     & 0.6554800E+00, 0.6925400E+00, 0.6075200E+00, 0.6075200E+00 /
      data (ref_adm( 4,iz,10,14),iz = 1,20) / &
     & 0.2057900E+00, 0.2057900E+00, 0.1986700E+00, 0.1943100E+00, &
     & 0.1928400E+00, 0.2224000E+00, 0.2240200E+00, 0.2211400E+00, &
     & 0.2556700E+00, 0.2733200E+00, 0.2759900E+00, 0.3148700E+00, &
     & 0.3489900E+00, 0.4037000E+00, 0.4418900E+00, 0.5572500E+00, &
     & 0.6171200E+00, 0.6380200E+00, 0.5210000E+00, 0.5210000E+00 /
      data (ref_adm( 4,iz,11,14),iz = 1,20) / &
     & 0.2051000E+00, 0.2051000E+00, 0.2024100E+00, 0.1890400E+00, &
     & 0.2042900E+00, 0.2130100E+00, 0.2179100E+00, 0.2440200E+00, &
     & 0.2448500E+00, 0.2550300E+00, 0.2544400E+00, 0.2943900E+00, &
     & 0.3314000E+00, 0.3822600E+00, 0.4049900E+00, 0.4739200E+00, &
     & 0.5528500E+00, 0.5955400E+00, 0.5017900E+00, 0.5017900E+00 /
      data (ref_adm( 4,iz,12,14),iz = 1,20) / &
     & 0.2404600E+00, 0.2404600E+00, 0.1984000E+00, 0.2053200E+00, &
     & 0.1971700E+00, 0.1988700E+00, 0.2206100E+00, 0.2229200E+00, &
     & 0.2528100E+00, 0.2571500E+00, 0.2653100E+00, 0.2819000E+00, &
     & 0.3190600E+00, 0.3589800E+00, 0.3867900E+00, 0.4545900E+00, &
     & 0.5251600E+00, 0.5341000E+00, 0.4749300E+00, 0.4749300E+00 /
      data (ref_adm( 4,iz,13,14),iz = 1,20) / &
     & 0.2095100E+00, 0.2095100E+00, 0.2127500E+00, 0.2044600E+00, &
     & 0.2002800E+00, 0.2208300E+00, 0.2200700E+00, 0.2333600E+00, &
     & 0.2370500E+00, 0.2455100E+00, 0.2572100E+00, 0.2665500E+00, &
     & 0.3014400E+00, 0.3319000E+00, 0.3918800E+00, 0.4306400E+00, &
     & 0.4783100E+00, 0.4916000E+00, 0.4284400E+00, 0.4284400E+00 /
      data (ref_adm( 4,iz,14,14),iz = 1,20) / &
     & 0.2065600E+00, 0.2065600E+00, 0.2093300E+00, 0.2082600E+00, &
     & 0.2114900E+00, 0.2216600E+00, 0.2190900E+00, 0.2368500E+00, &
     & 0.2336000E+00, 0.2385200E+00, 0.2492000E+00, 0.2565500E+00, &
     & 0.2864200E+00, 0.3111700E+00, 0.3552200E+00, 0.4109900E+00, &
     & 0.4435400E+00, 0.4445700E+00, 0.3882200E+00, 0.3882200E+00 /
      data (ref_adm( 4,iz,15,14),iz = 1,20) / &
     & 0.2050700E+00, 0.2050700E+00, 0.1994600E+00, 0.1966400E+00, &
     & 0.2046700E+00, 0.2085400E+00, 0.2156500E+00, 0.2190600E+00, &
     & 0.2283700E+00, 0.2361700E+00, 0.2475700E+00, 0.2583600E+00, &
     & 0.2758300E+00, 0.2916900E+00, 0.3369800E+00, 0.3798300E+00, &
     & 0.4192300E+00, 0.4404200E+00, 0.4842746E+00, 0.4842746E+00 /
      data (ref_adm( 4,iz,16,14),iz = 1,20) / &
     & 0.1991600E+00, 0.1991600E+00, 0.1926000E+00, 0.2033700E+00, &
     & 0.2107100E+00, 0.2146400E+00, 0.2062000E+00, 0.2092900E+00, &
     & 0.2200700E+00, 0.2213900E+00, 0.2386600E+00, 0.2514600E+00, &
     & 0.2688700E+00, 0.2885200E+00, 0.3218100E+00, 0.3679500E+00, &
     & 0.3846300E+00, 0.4998807E+00, 0.4685180E+00, 0.4685180E+00 /
      data (ref_adm( 4,iz,17,14),iz = 1,20) / &
     & 0.1991300E+00, 0.1991300E+00, 0.1961900E+00, 0.1900200E+00, &
     & 0.2021700E+00, 0.2009600E+00, 0.2105500E+00, 0.2205700E+00, &
     & 0.2206300E+00, 0.2220800E+00, 0.2421400E+00, 0.2547600E+00, &
     & 0.2624400E+00, 0.2990400E+00, 0.3132500E+00, 0.3325000E+00, &
     & 0.3764300E+00, 0.4809383E+00, 0.4516497E+00, 0.4516497E+00 /
      data (ref_adm( 4,iz,18,14),iz = 1,20) / &
     & 0.2015400E+00, 0.2015400E+00, 0.2052700E+00, 0.2025900E+00, &
     & 0.2096800E+00, 0.2195800E+00, 0.2073800E+00, 0.2257400E+00, &
     & 0.2275600E+00, 0.2215700E+00, 0.2339500E+00, 0.2526300E+00, &
     & 0.2659700E+00, 0.2858500E+00, 0.3345200E+00, 0.3530300E+00, &
     & 0.3658900E+00, 0.4036970E+00, 0.4253440E+00, 0.4253440E+00 /
      data (ref_adm( 4,iz,19,14),iz = 1,20) / &
     & 0.1981600E+00, 0.1981600E+00, 0.2003000E+00, 0.2006400E+00, &
     & 0.2120200E+00, 0.2109200E+00, 0.2388000E+00, 0.2342700E+00, &
     & 0.2351400E+00, 0.2310500E+00, 0.2395400E+00, 0.2461400E+00, &
     & 0.2687700E+00, 0.2903600E+00, 0.3128400E+00, 0.3447800E+00, &
     & 0.3607017E+00, 0.3969509E+00, 0.4160696E+00, 0.4160696E+00 /
      data (ref_adm( 4,iz,20,14),iz = 1,20) / &
     & 0.2102300E+00, 0.2102300E+00, 0.1999500E+00, 0.2004600E+00, &
     & 0.2117100E+00, 0.2177800E+00, 0.2089800E+00, 0.2198200E+00, &
     & 0.2253900E+00, 0.2361100E+00, 0.2499100E+00, 0.2461500E+00, &
     & 0.2580800E+00, 0.2772100E+00, 0.3002600E+00, 0.3858200E+00, &
     & 0.3578536E+00, 0.3927256E+00, 0.4107147E+00, 0.4107147E+00 /
      data (ref_adm( 4,iz,21,14),iz = 1,20) / &
     & 0.2006200E+00, 0.2006200E+00, 0.2077800E+00, 0.2011600E+00, &
     & 0.2099300E+00, 0.2091100E+00, 0.2087800E+00, 0.2147600E+00, &
     & 0.2446100E+00, 0.2096400E+00, 0.2515900E+00, 0.2518500E+00, &
     & 0.2613200E+00, 0.2882900E+00, 0.2947900E+00, 0.3293131E+00, &
     & 0.3559843E+00, 0.3893957E+00, 0.4073245E+00, 0.4073245E+00 /
      data (ref_adm( 4,iz,22,14),iz = 1,20) / &
     & 0.2116100E+00, 0.2116100E+00, 0.1867000E+00, 0.2152200E+00, &
     & 0.2171600E+00, 0.2142100E+00, 0.2228300E+00, 0.2180800E+00, &
     & 0.2237800E+00, 0.2375100E+00, 0.2449300E+00, 0.2655700E+00, &
     & 0.2589400E+00, 0.2954000E+00, 0.3027700E+00, 0.3507000E+00, &
     & 0.3983859E+00, 0.4019444E+00, 0.3772052E+00, 0.3772052E+00 /
      data (ref_adm( 4,iz,23,14),iz = 1,20) / &
     & 0.1946600E+00, 0.1946600E+00, 0.2192000E+00, 0.2092100E+00, &
     & 0.2159200E+00, 0.2306100E+00, 0.2156500E+00, 0.2163100E+00, &
     & 0.2445400E+00, 0.2489300E+00, 0.2516900E+00, 0.2747300E+00, &
     & 0.2805800E+00, 0.2864800E+00, 0.3112700E+00, 0.3198400E+00, &
     & 0.3889571E+00, 0.3908805E+00, 0.3731665E+00, 0.3731665E+00 /
      data (ref_adm( 4,iz,24,14),iz = 1,20) / &
     & 0.1981100E+00, 0.1981100E+00, 0.2056000E+00, 0.2043300E+00, &
     & 0.2028000E+00, 0.2099600E+00, 0.2169000E+00, 0.2217100E+00, &
     & 0.2277200E+00, 0.2320600E+00, 0.2447300E+00, 0.2641800E+00, &
     & 0.2731700E+00, 0.2980100E+00, 0.3131200E+00, 0.3321100E+00, &
     & 0.3795290E+00, 0.3825704E+00, 0.3710180E+00, 0.3710180E+00 /
      data (ref_adm( 4,iz,25,14),iz = 1,20) / &
     & 0.2062100E+00, 0.2062100E+00, 0.2101600E+00, 0.2196400E+00, &
     & 0.2226600E+00, 0.2244100E+00, 0.2290300E+00, 0.2376000E+00, &
     & 0.2432700E+00, 0.2553400E+00, 0.2597800E+00, 0.2689100E+00, &
     & 0.2824600E+00, 0.2997600E+00, 0.3216900E+00, 0.3404900E+00, &
     & 0.3509800E+00, 0.3752550E+00, 0.3703837E+00, 0.3703837E+00 /
      data (ref_adm( 4,iz,26,14),iz = 1,20) / &
     & 0.2102500E+00, 0.2102500E+00, 0.2171800E+00, 0.2025600E+00, &
     & 0.2234100E+00, 0.2286700E+00, 0.2291700E+00, 0.2363100E+00, &
     & 0.2502200E+00, 0.2619500E+00, 0.2683700E+00, 0.2871000E+00, &
     & 0.2984200E+00, 0.3253600E+00, 0.3439600E+00, 0.3512400E+00, &
     & 0.3749100E+00, 0.3709500E+00, 0.3721909E+00, 0.3721909E+00 /
      data (ref_adm( 4,iz,27,14),iz = 1,20) / &
     & 0.2093700E+00, 0.2093700E+00, 0.1917700E+00, 0.2002600E+00, &
     & 0.2132600E+00, 0.2188500E+00, 0.2278100E+00, 0.2371600E+00, &
     & 0.2553300E+00, 0.2645100E+00, 0.2727300E+00, 0.2838300E+00, &
     & 0.2982300E+00, 0.3221800E+00, 0.3440200E+00, 0.3693400E+00, &
     & 0.3917200E+00, 0.3919500E+00, 0.3713700E+00, 0.3713700E+00 /
      data (ref_adm( 4,iz,28,14),iz = 1,20) / &
     & 0.2097800E+00, 0.2097800E+00, 0.2127900E+00, 0.2269700E+00, &
     & 0.2278600E+00, 0.2309000E+00, 0.2303100E+00, 0.2453300E+00, &
     & 0.2631400E+00, 0.2702300E+00, 0.2771900E+00, 0.3019300E+00, &
     & 0.3274100E+00, 0.3519600E+00, 0.3667700E+00, 0.3934500E+00, &
     & 0.4096400E+00, 0.4125900E+00, 0.3610500E+00, 0.3610500E+00 /
      data (ref_adm( 4,iz,29,14),iz = 1,20) / &
     & 0.2184900E+00, 0.2184900E+00, 0.2259300E+00, 0.2338600E+00, &
     & 0.2258400E+00, 0.2252500E+00, 0.2286900E+00, 0.2637400E+00, &
     & 0.2724800E+00, 0.2729700E+00, 0.2953700E+00, 0.3169400E+00, &
     & 0.3337700E+00, 0.3711200E+00, 0.4000300E+00, 0.4168400E+00, &
     & 0.4418400E+00, 0.4339400E+00, 0.3769400E+00, 0.3769400E+00 /
      data (ref_adm( 4,iz,30,14),iz = 1,20) / &
     & 0.2086000E+00, 0.2086000E+00, 0.2162800E+00, 0.2038500E+00, &
     & 0.2165200E+00, 0.2530200E+00, 0.2569200E+00, 0.2609300E+00, &
     & 0.2583600E+00, 0.2878700E+00, 0.3148200E+00, 0.3167100E+00, &
     & 0.3478900E+00, 0.3750900E+00, 0.4094900E+00, 0.4298400E+00, &
     & 0.4762200E+00, 0.4534500E+00, 0.3977200E+00, 0.3977200E+00 /
      data (ref_adm( 4,iz,31,14),iz = 1,20) / &
     & 0.2163700E+00, 0.2163700E+00, 0.2248300E+00, 0.2195100E+00, &
     & 0.2209200E+00, 0.2288800E+00, 0.2455400E+00, 0.2561500E+00, &
     & 0.2824900E+00, 0.2908000E+00, 0.3251400E+00, 0.3284800E+00, &
     & 0.3489800E+00, 0.3817300E+00, 0.4056100E+00, 0.4363600E+00, &
     & 0.4770900E+00, 0.4854500E+00, 0.4101700E+00, 0.4101700E+00 /
      data (ref_adm( 4,iz,32,14),iz = 1,20) / &
     & 0.2113800E+00, 0.2113800E+00, 0.2145900E+00, 0.2323600E+00, &
     & 0.2441900E+00, 0.2458300E+00, 0.2612800E+00, 0.2805000E+00, &
     & 0.2890600E+00, 0.3090200E+00, 0.3277900E+00, 0.3537500E+00, &
     & 0.3544800E+00, 0.3995700E+00, 0.4214500E+00, 0.4587700E+00, &
     & 0.4808400E+00, 0.4949400E+00, 0.4179300E+00, 0.4179300E+00 /
      data (ref_adm( 4,iz,33,14),iz = 1,20) / &
     & 0.2068800E+00, 0.2068800E+00, 0.2068800E+00, 0.2126300E+00, &
     & 0.2204800E+00, 0.2257200E+00, 0.2466200E+00, 0.2596300E+00, &
     & 0.2800200E+00, 0.2839700E+00, 0.3144800E+00, 0.3344100E+00, &
     & 0.3581200E+00, 0.3905800E+00, 0.4241000E+00, 0.4624100E+00, &
     & 0.4901500E+00, 0.4965700E+00, 0.4270800E+00, 0.4270800E+00 /
      data (ref_adm( 4,iz,34,14),iz = 1,20) / &
     & 0.2099200E+00, 0.2099200E+00, 0.2056100E+00, 0.2033500E+00, &
     & 0.2263500E+00, 0.2469300E+00, 0.2505800E+00, 0.2852600E+00, &
     & 0.2811500E+00, 0.2973500E+00, 0.3096600E+00, 0.3561300E+00, &
     & 0.3753000E+00, 0.3965600E+00, 0.4288600E+00, 0.4532000E+00, &
     & 0.5004200E+00, 0.5041600E+00, 0.4359800E+00, 0.4359800E+00 /
      data (ref_adm( 4,iz,35,14),iz = 1,20) / &
     & 0.2142000E+00, 0.2142000E+00, 0.2362600E+00, 0.2353300E+00, &
     & 0.2366900E+00, 0.2306300E+00, 0.2713300E+00, 0.2897800E+00, &
     & 0.2940000E+00, 0.3140300E+00, 0.3212400E+00, 0.3539800E+00, &
     & 0.3845100E+00, 0.4264400E+00, 0.4541500E+00, 0.4802500E+00, &
     & 0.5030600E+00, 0.5027300E+00, 0.4270000E+00, 0.4270000E+00 /
      data (ref_adm( 4,iz,36,14),iz = 1,20) / &
     & 0.2100200E+00, 0.2100200E+00, 0.2161700E+00, 0.2209100E+00, &
     & 0.2457800E+00, 0.2377500E+00, 0.2907400E+00, 0.2918300E+00, &
     & 0.2892300E+00, 0.3119700E+00, 0.3321900E+00, 0.3648700E+00, &
     & 0.3703500E+00, 0.4246700E+00, 0.4629900E+00, 0.4921900E+00, &
     & 0.5024200E+00, 0.5035600E+00, 0.4280000E+00, 0.4280000E+00 /
      data (ref_adm( 4,iz,37,14),iz = 1,20) / &
     & 0.2073300E+00, 0.2073300E+00, 0.2033400E+00, 0.2165200E+00, &
     & 0.2332800E+00, 0.2489300E+00, 0.2644300E+00, 0.2727000E+00, &
     & 0.2838900E+00, 0.3202000E+00, 0.3268800E+00, 0.3519300E+00, &
     & 0.3853300E+00, 0.4402500E+00, 0.4815900E+00, 0.4921500E+00, &
     & 0.5036600E+00, 0.5132600E+00, 0.4322700E+00, 0.4322700E+00 /
      data (ref_adm( 4,iz,38,14),iz = 1,20) / &
     & 0.2073300E+00, 0.2073300E+00, 0.2033400E+00, 0.2165200E+00, &
     & 0.2332800E+00, 0.2489300E+00, 0.2644300E+00, 0.2727000E+00, &
     & 0.2838900E+00, 0.3202000E+00, 0.3268800E+00, 0.3519300E+00, &
     & 0.3853300E+00, 0.4402500E+00, 0.4815900E+00, 0.4921500E+00, &
     & 0.5036600E+00, 0.5132600E+00, 0.4322700E+00, 0.4322700E+00 /
! Solar Zenith Angle 70.0 Albedo  0.3316717E+00
      data (ref_adm( 4,iz, 1,15),iz = 1,20) / &
     & 0.2073300E+00, 0.2073300E+00, 0.2081100E+00, 0.2034500E+00, &
     & 0.2101800E+00, 0.2202200E+00, 0.2359500E+00, 0.2625600E+00, &
     & 0.2785100E+00, 0.2914200E+00, 0.3442600E+00, 0.4606200E+00, &
     & 0.4936600E+00, 0.6672600E+00, 0.8059900E+00, 0.1231800E+01, &
     & 0.1860700E+01, 0.2127422E+01, 0.2185273E+01, 0.2185273E+01 /
      data (ref_adm( 4,iz, 2,15),iz = 1,20) / &
     & 0.2073300E+00, 0.2073300E+00, 0.2081100E+00, 0.2034500E+00, &
     & 0.2101800E+00, 0.2202200E+00, 0.2359500E+00, 0.2625600E+00, &
     & 0.2785100E+00, 0.2914200E+00, 0.3442600E+00, 0.4606200E+00, &
     & 0.4936600E+00, 0.6672600E+00, 0.8059900E+00, 0.1231800E+01, &
     & 0.1860700E+01, 0.2127422E+01, 0.2185273E+01, 0.2185273E+01 /
      data (ref_adm( 4,iz, 3,15),iz = 1,20) / &
     & 0.1958200E+00, 0.1958200E+00, 0.1889400E+00, 0.2194900E+00, &
     & 0.1970600E+00, 0.2235500E+00, 0.2338900E+00, 0.2294600E+00, &
     & 0.2840000E+00, 0.3194700E+00, 0.3612800E+00, 0.4365000E+00, &
     & 0.5217100E+00, 0.6904800E+00, 0.7535200E+00, 0.9070000E+00, &
     & 0.1814699E+01, 0.2257658E+01, 0.2314888E+00, 0.2314888E+00 /
      data (ref_adm( 4,iz, 4,15),iz = 1,20) / &
     & 0.1985900E+00, 0.1985900E+00, 0.1977800E+00, 0.1889000E+00, &
     & 0.2242100E+00, 0.2160600E+00, 0.2302700E+00, 0.2414300E+00, &
     & 0.2612600E+00, 0.2989100E+00, 0.3349500E+00, 0.4064100E+00, &
     & 0.4537200E+00, 0.5630900E+00, 0.7014200E+00, 0.8273700E+00, &
     & 0.1538745E+01, 0.2497133E+01, 0.2515559E+01, 0.2515559E+01 /
      data (ref_adm( 4,iz, 5,15),iz = 1,20) / &
     & 0.1878900E+00, 0.1878900E+00, 0.2116200E+00, 0.2020200E+00, &
     & 0.1950000E+00, 0.2347200E+00, 0.2406700E+00, 0.2512800E+00, &
     & 0.2662300E+00, 0.2907800E+00, 0.3471300E+00, 0.4365100E+00, &
     & 0.5258400E+00, 0.6011300E+00, 0.7083600E+00, 0.8379800E+00, &
     & 0.1052600E+01, 0.2427447E+01, 0.3425753E+01, 0.3425753E+01 /
      data (ref_adm( 4,iz, 6,15),iz = 1,20) / &
     & 0.1945900E+00, 0.1945900E+00, 0.2013800E+00, 0.1964900E+00, &
     & 0.2067700E+00, 0.2078100E+00, 0.2332700E+00, 0.2501400E+00, &
     & 0.2704000E+00, 0.2899300E+00, 0.3478200E+00, 0.4105400E+00, &
     & 0.4925400E+00, 0.5880600E+00, 0.6563200E+00, 0.7684100E+00, &
     & 0.1050600E+01, 0.1178400E+01, 0.2943496E+01, 0.2943496E+01 /
      data (ref_adm( 4,iz, 7,15),iz = 1,20) / &
     & 0.1963100E+00, 0.1963100E+00, 0.1955200E+00, 0.2095300E+00, &
     & 0.2107500E+00, 0.2040100E+00, 0.2325100E+00, 0.2549100E+00, &
     & 0.2752400E+00, 0.3032600E+00, 0.3443500E+00, 0.3743700E+00, &
     & 0.5194800E+00, 0.5875800E+00, 0.6505400E+00, 0.7305500E+00, &
     & 0.9616500E+00, 0.9861300E+00, 0.1879306E+01, 0.1879306E+01 /
      data (ref_adm( 4,iz, 8,15),iz = 1,20) / &
     & 0.2068400E+00, 0.2068400E+00, 0.2050000E+00, 0.2055500E+00, &
     & 0.2070700E+00, 0.1987700E+00, 0.2364300E+00, 0.2376900E+00, &
     & 0.2522700E+00, 0.2751500E+00, 0.3367100E+00, 0.3778500E+00, &
     & 0.4335100E+00, 0.5070700E+00, 0.5755000E+00, 0.7067900E+00, &
     & 0.8484000E+00, 0.8812800E+00, 0.6358100E+00, 0.6358100E+00 /
      data (ref_adm( 4,iz, 9,15),iz = 1,20) / &
     & 0.2069400E+00, 0.2069400E+00, 0.2234700E+00, 0.2115300E+00, &
     & 0.1980500E+00, 0.2074300E+00, 0.2148600E+00, 0.2450500E+00, &
     & 0.2786000E+00, 0.2730600E+00, 0.3199900E+00, 0.3595400E+00, &
     & 0.3915900E+00, 0.4899300E+00, 0.5450700E+00, 0.6630200E+00, &
     & 0.7494700E+00, 0.7890200E+00, 0.6270300E+00, 0.6270300E+00 /
      data (ref_adm( 4,iz,10,15),iz = 1,20) / &
     & 0.2038200E+00, 0.2038200E+00, 0.2063600E+00, 0.1891600E+00, &
     & 0.2067200E+00, 0.2272200E+00, 0.2319800E+00, 0.2389300E+00, &
     & 0.2655800E+00, 0.2921700E+00, 0.3161500E+00, 0.3722400E+00, &
     & 0.3890900E+00, 0.4345100E+00, 0.5080000E+00, 0.6303200E+00, &
     & 0.6905700E+00, 0.7008600E+00, 0.1137653E+01, 0.1137653E+01 /
      data (ref_adm( 4,iz,11,15),iz = 1,20) / &
     & 0.1811700E+00, 0.1811700E+00, 0.1902300E+00, 0.1997200E+00, &
     & 0.1978800E+00, 0.2132900E+00, 0.2045000E+00, 0.2290800E+00, &
     & 0.2708200E+00, 0.2724300E+00, 0.2878500E+00, 0.3264900E+00, &
     & 0.3745700E+00, 0.4244200E+00, 0.4560000E+00, 0.5305700E+00, &
     & 0.6107100E+00, 0.6263400E+00, 0.5382900E+00, 0.5382900E+00 /
      data (ref_adm( 4,iz,12,15),iz = 1,20) / &
     & 0.2216700E+00, 0.2216700E+00, 0.2108100E+00, 0.1923400E+00, &
     & 0.1909200E+00, 0.2089900E+00, 0.2414300E+00, 0.2308400E+00, &
     & 0.2422300E+00, 0.2642500E+00, 0.3032100E+00, 0.3108700E+00, &
     & 0.3527800E+00, 0.3837200E+00, 0.4302800E+00, 0.4952500E+00, &
     & 0.5823700E+00, 0.5564400E+00, 0.5135000E+00, 0.5135000E+00 /
      data (ref_adm( 4,iz,13,15),iz = 1,20) / &
     & 0.2075900E+00, 0.2075900E+00, 0.1847500E+00, 0.1997800E+00, &
     & 0.2079000E+00, 0.2124700E+00, 0.2365200E+00, 0.2032000E+00, &
     & 0.2444700E+00, 0.2893500E+00, 0.2853700E+00, 0.3136100E+00, &
     & 0.3336400E+00, 0.3580200E+00, 0.4056200E+00, 0.4699800E+00, &
     & 0.5137800E+00, 0.5580000E+00, 0.9069889E+00, 0.9069889E+00 /
      data (ref_adm( 4,iz,14,15),iz = 1,20) / &
     & 0.1964500E+00, 0.1964500E+00, 0.1990400E+00, 0.2063200E+00, &
     & 0.2007100E+00, 0.2146100E+00, 0.2265600E+00, 0.2116200E+00, &
     & 0.2397100E+00, 0.2554900E+00, 0.2777700E+00, 0.2943600E+00, &
     & 0.3196000E+00, 0.3534000E+00, 0.3714600E+00, 0.4294900E+00, &
     & 0.4797900E+00, 0.5161800E+00, 0.8670235E+00, 0.8670235E+00 /
      data (ref_adm( 4,iz,15,15),iz = 1,20) / &
     & 0.2032500E+00, 0.2032500E+00, 0.2031800E+00, 0.2033800E+00, &
     & 0.2024300E+00, 0.2108200E+00, 0.2107400E+00, 0.2226000E+00, &
     & 0.2337700E+00, 0.2468400E+00, 0.2555400E+00, 0.2766500E+00, &
     & 0.2921400E+00, 0.3267200E+00, 0.3525800E+00, 0.3942900E+00, &
     & 0.4084300E+00, 0.6682962E+00, 0.8356380E+00, 0.8356380E+00 /
      data (ref_adm( 4,iz,16,15),iz = 1,20) / &
     & 0.1950700E+00, 0.1950700E+00, 0.1950400E+00, 0.1953400E+00, &
     & 0.1871800E+00, 0.2043200E+00, 0.2051500E+00, 0.2140900E+00, &
     & 0.2204400E+00, 0.2248000E+00, 0.2470100E+00, 0.2612900E+00, &
     & 0.2807600E+00, 0.3040500E+00, 0.3604900E+00, 0.3908200E+00, &
     & 0.3730600E+00, 0.6477612E+00, 0.8077326E+00, 0.8077326E+00 /
      data (ref_adm( 4,iz,17,15),iz = 1,20) / &
     & 0.1961300E+00, 0.1961300E+00, 0.1886700E+00, 0.2058500E+00, &
     & 0.2027700E+00, 0.2133400E+00, 0.2148600E+00, 0.2282800E+00, &
     & 0.2212500E+00, 0.2397600E+00, 0.2625500E+00, 0.2543100E+00, &
     & 0.2709900E+00, 0.3186700E+00, 0.3221100E+00, 0.3414200E+00, &
     & 0.3530500E+00, 0.6257880E+00, 0.7764457E+00, 0.7764457E+00 /
      data (ref_adm( 4,iz,18,15),iz = 1,20) / &
     & 0.1927200E+00, 0.1927200E+00, 0.1927400E+00, 0.2024000E+00, &
     & 0.2029400E+00, 0.1910100E+00, 0.2051100E+00, 0.2161500E+00, &
     & 0.2142900E+00, 0.2311300E+00, 0.2570300E+00, 0.2696600E+00, &
     & 0.2782700E+00, 0.2987400E+00, 0.3037900E+00, 0.3443800E+00, &
     & 0.4007213E+00, 0.4537954E+00, 0.4928446E+00, 0.4928446E+00 /
      data (ref_adm( 4,iz,19,15),iz = 1,20) / &
     & 0.2061800E+00, 0.2061800E+00, 0.2034700E+00, 0.2041400E+00, &
     & 0.2191700E+00, 0.1956500E+00, 0.1932600E+00, 0.1942000E+00, &
     & 0.2220300E+00, 0.2399900E+00, 0.2443100E+00, 0.2463100E+00, &
     & 0.2832000E+00, 0.3082800E+00, 0.3231400E+00, 0.3589900E+00, &
     & 0.3950651E+00, 0.4449628E+00, 0.4810046E+00, 0.4810046E+00 /
      data (ref_adm( 4,iz,20,15),iz = 1,20) / &
     & 0.2045700E+00, 0.2045700E+00, 0.2043200E+00, 0.2017400E+00, &
     & 0.2279800E+00, 0.2047100E+00, 0.2068800E+00, 0.2025300E+00, &
     & 0.2353000E+00, 0.2438400E+00, 0.2341600E+00, 0.2648400E+00, &
     & 0.2809800E+00, 0.2922700E+00, 0.3298600E+00, 0.3894500E+00, &
     & 0.3914151E+00, 0.4395204E+00, 0.4741280E+00, 0.4741280E+00 /
      data (ref_adm( 4,iz,21,15),iz = 1,20) / &
     & 0.2163600E+00, 0.2163600E+00, 0.1930200E+00, 0.2008300E+00, &
     & 0.2089700E+00, 0.2042100E+00, 0.2105100E+00, 0.2067900E+00, &
     & 0.2340100E+00, 0.2491500E+00, 0.2610700E+00, 0.2581300E+00, &
     & 0.2942200E+00, 0.2944700E+00, 0.3133600E+00, 0.3537082E+00, &
     & 0.3887491E+00, 0.4352987E+00, 0.4698621E+00, 0.4698621E+00 /
      data (ref_adm( 4,iz,22,15),iz = 1,20) / &
     & 0.1935900E+00, 0.1935900E+00, 0.2083800E+00, 0.2079400E+00, &
     & 0.2208300E+00, 0.2192300E+00, 0.2357200E+00, 0.2101100E+00, &
     & 0.2301700E+00, 0.2425000E+00, 0.2638000E+00, 0.2693300E+00, &
     & 0.2779100E+00, 0.3111600E+00, 0.3267000E+00, 0.3111200E+00, &
     & 0.3913069E+00, 0.4287103E+00, 0.4528951E+00, 0.4528951E+00 /
      data (ref_adm( 4,iz,23,15),iz = 1,20) / &
     & 0.2057500E+00, 0.2057500E+00, 0.2000300E+00, 0.2024100E+00, &
     & 0.2209600E+00, 0.2040900E+00, 0.2302500E+00, 0.2264100E+00, &
     & 0.2512500E+00, 0.2440300E+00, 0.2550100E+00, 0.2681300E+00, &
     & 0.2810900E+00, 0.3195500E+00, 0.3319300E+00, 0.3621300E+00, &
     & 0.3910285E+00, 0.4273841E+00, 0.4536871E+00, 0.4536871E+00 /
      data (ref_adm( 4,iz,24,15),iz = 1,20) / &
     & 0.1919800E+00, 0.1919800E+00, 0.1951700E+00, 0.1945700E+00, &
     & 0.1995300E+00, 0.2100300E+00, 0.2197700E+00, 0.2221500E+00, &
     & 0.2313100E+00, 0.2333100E+00, 0.2498000E+00, 0.2609500E+00, &
     & 0.2779900E+00, 0.2999300E+00, 0.3508500E+00, 0.3512100E+00, &
     & 0.3922842E+00, 0.4287370E+00, 0.4578807E+00, 0.4578807E+00 /
      data (ref_adm( 4,iz,25,15),iz = 1,20) / &
     & 0.1992500E+00, 0.1992500E+00, 0.2082500E+00, 0.2143400E+00, &
     & 0.2112300E+00, 0.2153300E+00, 0.2279200E+00, 0.2322800E+00, &
     & 0.2466800E+00, 0.2541500E+00, 0.2653000E+00, 0.2806200E+00, &
     & 0.3008900E+00, 0.3216300E+00, 0.3468000E+00, 0.3757800E+00, &
     & 0.4167700E+00, 0.4319918E+00, 0.4641986E+00, 0.4641986E+00 /
      data (ref_adm( 4,iz,26,15),iz = 1,20) / &
     & 0.1948400E+00, 0.1948400E+00, 0.2227400E+00, 0.2156700E+00, &
     & 0.2064100E+00, 0.2186300E+00, 0.2432100E+00, 0.2495300E+00, &
     & 0.2475800E+00, 0.2579900E+00, 0.2664800E+00, 0.2879800E+00, &
     & 0.3036300E+00, 0.3302600E+00, 0.3591700E+00, 0.3877000E+00, &
     & 0.4065200E+00, 0.4680900E+00, 0.4750711E+00, 0.4750711E+00 /
      data (ref_adm( 4,iz,27,15),iz = 1,20) / &
     & 0.2054100E+00, 0.2054100E+00, 0.1997700E+00, 0.2105500E+00, &
     & 0.2166500E+00, 0.2353300E+00, 0.2328600E+00, 0.2337900E+00, &
     & 0.2406000E+00, 0.2544800E+00, 0.2631100E+00, 0.2952400E+00, &
     & 0.3163000E+00, 0.3455500E+00, 0.3789400E+00, 0.4054000E+00, &
     & 0.4230200E+00, 0.4369600E+00, 0.4890421E+00, 0.4890421E+00 /
      data (ref_adm( 4,iz,28,15),iz = 1,20) / &
     & 0.2014500E+00, 0.2014500E+00, 0.2271700E+00, 0.2239600E+00, &
     & 0.2150700E+00, 0.2357500E+00, 0.2250100E+00, 0.2368500E+00, &
     & 0.2503900E+00, 0.2771700E+00, 0.2799400E+00, 0.2948000E+00, &
     & 0.3221700E+00, 0.3681100E+00, 0.3856700E+00, 0.4128100E+00, &
     & 0.4634400E+00, 0.5098000E+00, 0.4408100E+00, 0.4408100E+00 /
      data (ref_adm( 4,iz,29,15),iz = 1,20) / &
     & 0.2034000E+00, 0.2034000E+00, 0.2059600E+00, 0.2049500E+00, &
     & 0.2059100E+00, 0.2155000E+00, 0.2453700E+00, 0.2523800E+00, &
     & 0.2513500E+00, 0.2720100E+00, 0.3005300E+00, 0.3069000E+00, &
     & 0.3272800E+00, 0.3708900E+00, 0.4185800E+00, 0.4734200E+00, &
     & 0.4987800E+00, 0.5085900E+00, 0.4253600E+00, 0.4253600E+00 /
      data (ref_adm( 4,iz,30,15),iz = 1,20) / &
     & 0.1979800E+00, 0.1979800E+00, 0.2043500E+00, 0.2131000E+00, &
     & 0.2054000E+00, 0.2240000E+00, 0.2430600E+00, 0.2613300E+00, &
     & 0.2642900E+00, 0.2898900E+00, 0.2979900E+00, 0.3391200E+00, &
     & 0.3510400E+00, 0.3762600E+00, 0.4239800E+00, 0.4741900E+00, &
     & 0.5262900E+00, 0.5448200E+00, 0.4622600E+00, 0.4622600E+00 /
      data (ref_adm( 4,iz,31,15),iz = 1,20) / &
     & 0.1908300E+00, 0.1908300E+00, 0.2108200E+00, 0.1966600E+00, &
     & 0.2166000E+00, 0.2317900E+00, 0.2348200E+00, 0.2649400E+00, &
     & 0.2641000E+00, 0.3004500E+00, 0.3290800E+00, 0.3377900E+00, &
     & 0.3849500E+00, 0.4007900E+00, 0.4424400E+00, 0.5037200E+00, &
     & 0.5620500E+00, 0.5447200E+00, 0.4548500E+00, 0.4548500E+00 /
      data (ref_adm( 4,iz,32,15),iz = 1,20) / &
     & 0.2037700E+00, 0.2037700E+00, 0.2184100E+00, 0.2072800E+00, &
     & 0.2167500E+00, 0.2391400E+00, 0.2516500E+00, 0.2667100E+00, &
     & 0.2698200E+00, 0.3181600E+00, 0.3317200E+00, 0.3591400E+00, &
     & 0.3767800E+00, 0.4198100E+00, 0.4441500E+00, 0.5397700E+00, &
     & 0.5468700E+00, 0.5534400E+00, 0.4780300E+00, 0.4780300E+00 /
      data (ref_adm( 4,iz,33,15),iz = 1,20) / &
     & 0.1997500E+00, 0.1997500E+00, 0.1999400E+00, 0.1894800E+00, &
     & 0.2037400E+00, 0.2196000E+00, 0.2231900E+00, 0.2546000E+00, &
     & 0.2675500E+00, 0.2990100E+00, 0.3196000E+00, 0.3296500E+00, &
     & 0.3726400E+00, 0.4240200E+00, 0.4650700E+00, 0.5267300E+00, &
     & 0.5475000E+00, 0.5702400E+00, 0.5159900E+00, 0.5159900E+00 /
      data (ref_adm( 4,iz,34,15),iz = 1,20) / &
     & 0.2083600E+00, 0.2083600E+00, 0.1943900E+00, 0.1982300E+00, &
     & 0.2199000E+00, 0.2112400E+00, 0.2391100E+00, 0.2509900E+00, &
     & 0.2681400E+00, 0.2841400E+00, 0.3276500E+00, 0.3651900E+00, &
     & 0.3732700E+00, 0.4273000E+00, 0.4811800E+00, 0.5168300E+00, &
     & 0.5387000E+00, 0.5748700E+00, 0.5058800E+00, 0.5058800E+00 /
      data (ref_adm( 4,iz,35,15),iz = 1,20) / &
     & 0.2032800E+00, 0.2032800E+00, 0.2137800E+00, 0.2078600E+00, &
     & 0.2199000E+00, 0.2408200E+00, 0.2289800E+00, 0.2644100E+00, &
     & 0.2795400E+00, 0.3003700E+00, 0.3145400E+00, 0.3469400E+00, &
     & 0.3747500E+00, 0.4361200E+00, 0.4898700E+00, 0.5323400E+00, &
     & 0.5666400E+00, 0.5889700E+00, 0.5116100E+00, 0.5116100E+00 /
      data (ref_adm( 4,iz,36,15),iz = 1,20) / &
     & 0.1848700E+00, 0.1848700E+00, 0.2076300E+00, 0.2107000E+00, &
     & 0.2083700E+00, 0.2160000E+00, 0.2462300E+00, 0.2742400E+00, &
     & 0.2914300E+00, 0.3037800E+00, 0.3135100E+00, 0.3687700E+00, &
     & 0.3820300E+00, 0.4514100E+00, 0.4890100E+00, 0.5422900E+00, &
     & 0.5666100E+00, 0.6015800E+00, 0.5098700E+00, 0.5098700E+00 /
      data (ref_adm( 4,iz,37,15),iz = 1,20) / &
     & 0.2058500E+00, 0.2058500E+00, 0.2106400E+00, 0.2240700E+00, &
     & 0.2363600E+00, 0.2245300E+00, 0.2448200E+00, 0.2616300E+00, &
     & 0.2979600E+00, 0.2974400E+00, 0.3186800E+00, 0.3651000E+00, &
     & 0.4012200E+00, 0.4600100E+00, 0.5015600E+00, 0.5777500E+00, &
     & 0.6077200E+00, 0.5936500E+00, 0.5191800E+00, 0.5191800E+00 /
      data (ref_adm( 4,iz,38,15),iz = 1,20) / &
     & 0.2058500E+00, 0.2058500E+00, 0.2106400E+00, 0.2240700E+00, &
     & 0.2363600E+00, 0.2245300E+00, 0.2448200E+00, 0.2616300E+00, &
     & 0.2979600E+00, 0.2974400E+00, 0.3186800E+00, 0.3651000E+00, &
     & 0.4012200E+00, 0.4600100E+00, 0.5015600E+00, 0.5777500E+00, &
     & 0.6077200E+00, 0.5936500E+00, 0.5191800E+00, 0.5191800E+00 /
! Solar Zenith Angle 75.0 Albedo  0.3722437E+00
      data (ref_adm( 4,iz, 1,16),iz = 1,20) / &
     & 0.2429000E+00, 0.2429000E+00, 0.2208100E+00, 0.2361100E+00, &
     & 0.2502900E+00, 0.2364100E+00, 0.2326900E+00, 0.2720000E+00, &
     & 0.3254600E+00, 0.3796500E+00, 0.4538800E+00, 0.5530400E+00, &
     & 0.5421239E+00, 0.8883800E+00, 0.1212428E+01, 0.2355050E+01, &
     & 0.1750729E+01, 0.2745791E+01, 0.6793990E+01, 0.6793990E+01 /
      data (ref_adm( 4,iz, 2,16),iz = 1,20) / &
     & 0.2429000E+00, 0.2429000E+00, 0.2208100E+00, 0.2361100E+00, &
     & 0.2502900E+00, 0.2364100E+00, 0.2326900E+00, 0.2720000E+00, &
     & 0.3254600E+00, 0.3796500E+00, 0.4538800E+00, 0.5530400E+00, &
     & 0.5421239E+00, 0.8883800E+00, 0.1212428E+01, 0.2355050E+01, &
     & 0.1750729E+01, 0.2745791E+01, 0.6793990E+01, 0.6793990E+01 /
      data (ref_adm( 4,iz, 3,16),iz = 1,20) / &
     & 0.2112000E+00, 0.2112000E+00, 0.1931700E+00, 0.2049100E+00, &
     & 0.2005200E+00, 0.2369000E+00, 0.2472900E+00, 0.2747100E+00, &
     & 0.2953800E+00, 0.3704800E+00, 0.5422900E+00, 0.6012400E+00, &
     & 0.6407900E+00, 0.6982911E+00, 0.1133328E+01, 0.2363515E+01, &
     & 0.1926832E+01, 0.2516162E+01, 0.8709539E+00, 0.8709539E+00 /
      data (ref_adm( 4,iz, 4,16),iz = 1,20) / &
     & 0.2279200E+00, 0.2279200E+00, 0.2266100E+00, 0.1780200E+00, &
     & 0.2140300E+00, 0.2362600E+00, 0.2673100E+00, 0.2567000E+00, &
     & 0.3048600E+00, 0.3569800E+00, 0.3448200E+00, 0.5360000E+00, &
     & 0.5695600E+00, 0.6990200E+00, 0.9957727E+00, 0.2010628E+01, &
     & 0.2732406E+01, 0.2411877E+01, 0.3768420E+01, 0.3768420E+01 /
      data (ref_adm( 4,iz, 5,16),iz = 1,20) / &
     & 0.1983000E+00, 0.1983000E+00, 0.1874100E+00, 0.2058900E+00, &
     & 0.2049300E+00, 0.1933000E+00, 0.2444300E+00, 0.2988600E+00, &
     & 0.3472700E+00, 0.3444100E+00, 0.4011400E+00, 0.4238600E+00, &
     & 0.4063100E+00, 0.5107700E+00, 0.8608279E+00, 0.1468025E+01, &
     & 0.2863318E+01, 0.3697876E+01, 0.3772582E+01, 0.3772582E+01 /
      data (ref_adm( 4,iz, 6,16),iz = 1,20) / &
     & 0.1976900E+00, 0.1976900E+00, 0.2096700E+00, 0.2006200E+00, &
     & 0.2099800E+00, 0.2532200E+00, 0.2636400E+00, 0.2704800E+00, &
     & 0.2860200E+00, 0.3376000E+00, 0.3740300E+00, 0.4345000E+00, &
     & 0.5477100E+00, 0.7648400E+00, 0.9180900E+00, 0.1118400E+01, &
     & 0.1301400E+01, 0.3800064E+01, 0.6381530E+01, 0.6381530E+01 /
      data (ref_adm( 4,iz, 7,16),iz = 1,20) / &
     & 0.2258400E+00, 0.2258400E+00, 0.1847500E+00, 0.2132700E+00, &
     & 0.2471100E+00, 0.2466600E+00, 0.2007700E+00, 0.2780400E+00, &
     & 0.3199700E+00, 0.3087200E+00, 0.3460700E+00, 0.4451400E+00, &
     & 0.4891400E+00, 0.6390500E+00, 0.8885100E+00, 0.9791200E+00, &
     & 0.1188900E+01, 0.1209900E+01, 0.4017681E+01, 0.4017681E+01 /
      data (ref_adm( 4,iz, 8,16),iz = 1,20) / &
     & 0.1774800E+00, 0.1774800E+00, 0.2157100E+00, 0.1641900E+00, &
     & 0.2125200E+00, 0.2168800E+00, 0.2291800E+00, 0.2678300E+00, &
     & 0.2409600E+00, 0.3667700E+00, 0.3549300E+00, 0.4662500E+00, &
     & 0.4549400E+00, 0.6031200E+00, 0.7456900E+00, 0.8376200E+00, &
     & 0.1077900E+01, 0.8709600E+00, 0.2781999E+01, 0.2781999E+01 /
      data (ref_adm( 4,iz, 9,16),iz = 1,20) / &
     & 0.1700800E+00, 0.1700800E+00, 0.1960500E+00, 0.1977100E+00, &
     & 0.2129700E+00, 0.2095400E+00, 0.2393500E+00, 0.2311200E+00, &
     & 0.2859700E+00, 0.3023300E+00, 0.3569200E+00, 0.4649200E+00, &
     & 0.3776200E+00, 0.5045400E+00, 0.6585700E+00, 0.8217500E+00, &
     & 0.9397600E+00, 0.9440800E+00, 0.2211089E+01, 0.2211089E+01 /
      data (ref_adm( 4,iz,10,16),iz = 1,20) / &
     & 0.2047300E+00, 0.2047300E+00, 0.2475300E+00, 0.1778400E+00, &
     & 0.1832600E+00, 0.1888100E+00, 0.2489600E+00, 0.2340900E+00, &
     & 0.2214000E+00, 0.2769100E+00, 0.3290500E+00, 0.3418500E+00, &
     & 0.3941300E+00, 0.4583200E+00, 0.5106200E+00, 0.8219300E+00, &
     & 0.8548400E+00, 0.1215604E+01, 0.1992736E+01, 0.1992736E+01 /
      data (ref_adm( 4,iz,11,16),iz = 1,20) / &
     & 0.2282500E+00, 0.2282500E+00, 0.1851400E+00, 0.1848900E+00, &
     & 0.1922700E+00, 0.2353100E+00, 0.2335100E+00, 0.1821300E+00, &
     & 0.2139300E+00, 0.2961400E+00, 0.3187700E+00, 0.3235400E+00, &
     & 0.4132500E+00, 0.4469300E+00, 0.5003900E+00, 0.7114800E+00, &
     & 0.7366200E+00, 0.7468700E+00, 0.1862243E+01, 0.1862243E+01 /
      data (ref_adm( 4,iz,12,16),iz = 1,20) / &
     & 0.2213500E+00, 0.2213500E+00, 0.2065400E+00, 0.2084600E+00, &
     & 0.2034100E+00, 0.2378000E+00, 0.1992500E+00, 0.2132400E+00, &
     & 0.2352500E+00, 0.2804700E+00, 0.3352400E+00, 0.3185700E+00, &
     & 0.3301800E+00, 0.4345900E+00, 0.4882800E+00, 0.5870000E+00, &
     & 0.5172400E+00, 0.7201700E+00, 0.1677294E+01, 0.1677294E+01 /
      data (ref_adm( 4,iz,13,16),iz = 1,20) / &
     & 0.2313400E+00, 0.2313400E+00, 0.1850000E+00, 0.1660400E+00, &
     & 0.1907000E+00, 0.2151000E+00, 0.1985700E+00, 0.2442300E+00, &
     & 0.2400400E+00, 0.2774800E+00, 0.2971300E+00, 0.3180400E+00, &
     & 0.3801100E+00, 0.3910400E+00, 0.4660400E+00, 0.4683600E+00, &
     & 0.6125900E+00, 0.6206400E+00, 0.1558058E+01, 0.1558058E+01 /
      data (ref_adm( 4,iz,14,16),iz = 1,20) / &
     & 0.2120800E+00, 0.2120800E+00, 0.2016200E+00, 0.2192800E+00, &
     & 0.2369800E+00, 0.2104400E+00, 0.2230900E+00, 0.2393300E+00, &
     & 0.2524800E+00, 0.2466300E+00, 0.2584100E+00, 0.3067700E+00, &
     & 0.3104700E+00, 0.3833900E+00, 0.3727100E+00, 0.5055900E+00, &
     & 0.5493400E+00, 0.6421200E+00, 0.1477511E+01, 0.1477511E+01 /
      data (ref_adm( 4,iz,15,16),iz = 1,20) / &
     & 0.2062700E+00, 0.2062700E+00, 0.2039800E+00, 0.2046000E+00, &
     & 0.2092000E+00, 0.2173900E+00, 0.2120600E+00, 0.2305900E+00, &
     & 0.2437100E+00, 0.2464600E+00, 0.2576400E+00, 0.2888900E+00, &
     & 0.2980600E+00, 0.3526800E+00, 0.3807800E+00, 0.4183500E+00, &
     & 0.5425200E+00, 0.8793175E+00, 0.1415771E+01, 0.1415771E+01 /
      data (ref_adm( 4,iz,16,16),iz = 1,20) / &
     & 0.2063400E+00, 0.2063400E+00, 0.1992600E+00, 0.1969100E+00, &
     & 0.1960400E+00, 0.2093900E+00, 0.2194100E+00, 0.2245500E+00, &
     & 0.2355300E+00, 0.2436100E+00, 0.2654300E+00, 0.2852800E+00, &
     & 0.3075500E+00, 0.3324500E+00, 0.3645300E+00, 0.4401100E+00, &
     & 0.5189900E+00, 0.8503637E+00, 0.1362572E+01, 0.1362572E+01 /
      data (ref_adm( 4,iz,17,16),iz = 1,20) / &
     & 0.2034500E+00, 0.2034500E+00, 0.2099200E+00, 0.1873200E+00, &
     & 0.2197700E+00, 0.2049700E+00, 0.1797500E+00, 0.2097300E+00, &
     & 0.2187700E+00, 0.2213600E+00, 0.2738600E+00, 0.2560200E+00, &
     & 0.3054200E+00, 0.3232300E+00, 0.3534800E+00, 0.3912700E+00, &
     & 0.6068280E+00, 0.8164499E+00, 0.1303642E+01, 0.1303642E+01 /
      data (ref_adm( 4,iz,18,16),iz = 1,20) / &
     & 0.2000700E+00, 0.2000700E+00, 0.2144900E+00, 0.2160100E+00, &
     & 0.1866500E+00, 0.2019600E+00, 0.1752900E+00, 0.2210000E+00, &
     & 0.2081400E+00, 0.2450700E+00, 0.2518800E+00, 0.2913400E+00, &
     & 0.3091900E+00, 0.3078200E+00, 0.3681800E+00, 0.3910700E+00, &
     & 0.4510252E+00, 0.5277190E+00, 0.6019894E+00, 0.6019894E+00 /
      data (ref_adm( 4,iz,19,16),iz = 1,20) / &
     & 0.2107100E+00, 0.2107100E+00, 0.2226100E+00, 0.2113500E+00, &
     & 0.2307200E+00, 0.1876900E+00, 0.2027100E+00, 0.2474900E+00, &
     & 0.2151900E+00, 0.2306100E+00, 0.2426000E+00, 0.2666600E+00, &
     & 0.2710700E+00, 0.2929100E+00, 0.3361100E+00, 0.3488600E+00, &
     & 0.4429547E+00, 0.5157393E+00, 0.5862464E+00, 0.5862464E+00 /
      data (ref_adm( 4,iz,20,16),iz = 1,20) / &
     & 0.2129200E+00, 0.2129200E+00, 0.1964000E+00, 0.2514400E+00, &
     & 0.2137700E+00, 0.2085900E+00, 0.2471900E+00, 0.2129800E+00, &
     & 0.2383500E+00, 0.2281800E+00, 0.2403500E+00, 0.2693400E+00, &
     & 0.2796900E+00, 0.2896600E+00, 0.3256600E+00, 0.3889180E+00, &
     & 0.4377252E+00, 0.5082826E+00, 0.5769197E+00, 0.5769197E+00 /
      data (ref_adm( 4,iz,21,16),iz = 1,20) / &
     & 0.2201900E+00, 0.2201900E+00, 0.2346400E+00, 0.2070100E+00, &
     & 0.2354500E+00, 0.2080700E+00, 0.2338700E+00, 0.2245200E+00, &
     & 0.2259800E+00, 0.2309000E+00, 0.2730500E+00, 0.2601900E+00, &
     & 0.2881100E+00, 0.3208200E+00, 0.3337100E+00, 0.3861505E+00, &
     & 0.4339785E+00, 0.5026245E+00, 0.5713596E+00, 0.5713596E+00 /
      data (ref_adm( 4,iz,22,16),iz = 1,20) / &
     & 0.1923800E+00, 0.1923800E+00, 0.1758000E+00, 0.1846000E+00, &
     & 0.2296900E+00, 0.1901300E+00, 0.2276400E+00, 0.2154300E+00, &
     & 0.2503900E+00, 0.2419600E+00, 0.2388100E+00, 0.2620500E+00, &
     & 0.2947900E+00, 0.3225100E+00, 0.3455900E+00, 0.4204100E+00, &
     & 0.4315483E+00, 0.4868748E+00, 0.5400020E+00, 0.5400020E+00 /
      data (ref_adm( 4,iz,23,16),iz = 1,20) / &
     & 0.1849500E+00, 0.1849500E+00, 0.1914900E+00, 0.2003600E+00, &
     & 0.2030600E+00, 0.2124600E+00, 0.2075300E+00, 0.2234100E+00, &
     & 0.2448700E+00, 0.2481700E+00, 0.2568000E+00, 0.2675800E+00, &
     & 0.2679500E+00, 0.3266900E+00, 0.3511500E+00, 0.3613100E+00, &
     & 0.4307946E+00, 0.4850227E+00, 0.5411496E+00, 0.5411496E+00 /
      data (ref_adm( 4,iz,24,16),iz = 1,20) / &
     & 0.1974100E+00, 0.1974100E+00, 0.2036000E+00, 0.2041900E+00, &
     & 0.2042700E+00, 0.2201400E+00, 0.2150700E+00, 0.2358300E+00, &
     & 0.2301700E+00, 0.2408600E+00, 0.2538900E+00, 0.2789400E+00, &
     & 0.2980400E+00, 0.3185500E+00, 0.3390100E+00, 0.4082600E+00, &
     & 0.4040700E+00, 0.4865990E+00, 0.5470080E+00, 0.5470080E+00 /
      data (ref_adm( 4,iz,25,16),iz = 1,20) / &
     & 0.2026400E+00, 0.2026400E+00, 0.2110300E+00, 0.2043600E+00, &
     & 0.2089000E+00, 0.2283600E+00, 0.2254800E+00, 0.2445100E+00, &
     & 0.2465100E+00, 0.2586800E+00, 0.2694900E+00, 0.2891900E+00, &
     & 0.3156100E+00, 0.3448200E+00, 0.3605800E+00, 0.4080000E+00, &
     & 0.4261700E+00, 0.4905763E+00, 0.5557559E+00, 0.5557559E+00 /
      data (ref_adm( 4,iz,26,16),iz = 1,20) / &
     & 0.2135100E+00, 0.2135100E+00, 0.1876700E+00, 0.2072300E+00, &
     & 0.2086400E+00, 0.2613800E+00, 0.1904700E+00, 0.2874600E+00, &
     & 0.2506500E+00, 0.2352700E+00, 0.2822100E+00, 0.3078100E+00, &
     & 0.3067100E+00, 0.3603600E+00, 0.3794900E+00, 0.4236200E+00, &
     & 0.4406100E+00, 0.5290000E+00, 0.5706602E+00, 0.5706602E+00 /
      data (ref_adm( 4,iz,27,16),iz = 1,20) / &
     & 0.1927600E+00, 0.1927600E+00, 0.1757700E+00, 0.1901500E+00, &
     & 0.2152800E+00, 0.1956200E+00, 0.2052000E+00, 0.2233600E+00, &
     & 0.2488000E+00, 0.2375300E+00, 0.2735600E+00, 0.3132600E+00, &
     & 0.3428100E+00, 0.3708700E+00, 0.3936300E+00, 0.4335100E+00, &
     & 0.4850900E+00, 0.5236200E+00, 0.5894901E+00, 0.5894901E+00 /
      data (ref_adm( 4,iz,28,16),iz = 1,20) / &
     & 0.2128500E+00, 0.2128500E+00, 0.2110100E+00, 0.1831000E+00, &
     & 0.2256800E+00, 0.2329400E+00, 0.2158500E+00, 0.2412300E+00, &
     & 0.2334600E+00, 0.2866200E+00, 0.2840300E+00, 0.3151000E+00, &
     & 0.3140400E+00, 0.3752400E+00, 0.4247000E+00, 0.4654200E+00, &
     & 0.5065800E+00, 0.5429300E+00, 0.5063900E+00, 0.5063900E+00 /
      data (ref_adm( 4,iz,29,16),iz = 1,20) / &
     & 0.1960300E+00, 0.1960300E+00, 0.2050800E+00, 0.1956400E+00, &
     & 0.2117700E+00, 0.2352300E+00, 0.2468000E+00, 0.2956200E+00, &
     & 0.2660800E+00, 0.2803700E+00, 0.2622100E+00, 0.3021500E+00, &
     & 0.3431100E+00, 0.4034800E+00, 0.4497800E+00, 0.4961900E+00, &
     & 0.5548800E+00, 0.5892900E+00, 0.5450600E+00, 0.5450600E+00 /
      data (ref_adm( 4,iz,30,16),iz = 1,20) / &
     & 0.1956400E+00, 0.1956400E+00, 0.1871000E+00, 0.2068500E+00, &
     & 0.2162800E+00, 0.2082100E+00, 0.2689600E+00, 0.2617700E+00, &
     & 0.2965500E+00, 0.2381100E+00, 0.2506300E+00, 0.3238600E+00, &
     & 0.3709400E+00, 0.4371600E+00, 0.4652700E+00, 0.5406700E+00, &
     & 0.5938400E+00, 0.6344500E+00, 0.5783300E+00, 0.5783300E+00 /
      data (ref_adm( 4,iz,31,16),iz = 1,20) / &
     & 0.2229200E+00, 0.2229200E+00, 0.1856000E+00, 0.2034300E+00, &
     & 0.2277600E+00, 0.2112400E+00, 0.2204500E+00, 0.2215600E+00, &
     & 0.3543300E+00, 0.2939500E+00, 0.3195700E+00, 0.3434500E+00, &
     & 0.4171800E+00, 0.4555400E+00, 0.4935700E+00, 0.5464600E+00, &
     & 0.6186200E+00, 0.6306800E+00, 0.6119900E+00, 0.6119900E+00 /
      data (ref_adm( 4,iz,32,16),iz = 1,20) / &
     & 0.1825200E+00, 0.1825200E+00, 0.1994700E+00, 0.1995100E+00, &
     & 0.2277400E+00, 0.2193800E+00, 0.2592500E+00, 0.2432900E+00, &
     & 0.2447400E+00, 0.2628700E+00, 0.2963700E+00, 0.3234500E+00, &
     & 0.3784000E+00, 0.4732400E+00, 0.4770400E+00, 0.5224400E+00, &
     & 0.6315800E+00, 0.6768100E+00, 0.6526000E+00, 0.6526000E+00 /
      data (ref_adm( 4,iz,33,16),iz = 1,20) / &
     & 0.1977900E+00, 0.1977900E+00, 0.1931500E+00, 0.1917300E+00, &
     & 0.2182700E+00, 0.2424500E+00, 0.2414500E+00, 0.2775300E+00, &
     & 0.2884400E+00, 0.3048600E+00, 0.3113700E+00, 0.3880600E+00, &
     & 0.4028700E+00, 0.4656900E+00, 0.5011400E+00, 0.5382200E+00, &
     & 0.6374500E+00, 0.6629800E+00, 0.6125800E+00, 0.6125800E+00 /
      data (ref_adm( 4,iz,34,16),iz = 1,20) / &
     & 0.2198500E+00, 0.2198500E+00, 0.1896300E+00, 0.2030000E+00, &
     & 0.2089500E+00, 0.2067100E+00, 0.2265100E+00, 0.2726100E+00, &
     & 0.2980100E+00, 0.2823600E+00, 0.2723800E+00, 0.3465500E+00, &
     & 0.3660700E+00, 0.4417800E+00, 0.4910800E+00, 0.5430800E+00, &
     & 0.6382500E+00, 0.6648000E+00, 0.5925900E+00, 0.5925900E+00 /
      data (ref_adm( 4,iz,35,16),iz = 1,20) / &
     & 0.1910300E+00, 0.1910300E+00, 0.2163900E+00, 0.2251900E+00, &
     & 0.2261600E+00, 0.2050100E+00, 0.2851800E+00, 0.2715900E+00, &
     & 0.3126000E+00, 0.3169800E+00, 0.3459800E+00, 0.3839200E+00, &
     & 0.3973800E+00, 0.4531300E+00, 0.5389300E+00, 0.5775000E+00, &
     & 0.6467300E+00, 0.6939600E+00, 0.5998500E+00, 0.5998500E+00 /
      data (ref_adm( 4,iz,36,16),iz = 1,20) / &
     & 0.2081600E+00, 0.2081600E+00, 0.2343600E+00, 0.2353300E+00, &
     & 0.2356900E+00, 0.2383000E+00, 0.2486500E+00, 0.2688100E+00, &
     & 0.3057600E+00, 0.3067400E+00, 0.3434100E+00, 0.3631000E+00, &
     & 0.4119700E+00, 0.4962600E+00, 0.5735800E+00, 0.6130700E+00, &
     & 0.6567100E+00, 0.7152700E+00, 0.7735600E+00, 0.7735600E+00 /
      data (ref_adm( 4,iz,37,16),iz = 1,20) / &
     & 0.1932500E+00, 0.1932500E+00, 0.2304500E+00, 0.2354400E+00, &
     & 0.2251300E+00, 0.2192500E+00, 0.2455500E+00, 0.2608500E+00, &
     & 0.3079200E+00, 0.2628700E+00, 0.2973100E+00, 0.3374200E+00, &
     & 0.4329400E+00, 0.4815200E+00, 0.5491600E+00, 0.6327300E+00, &
     & 0.7511400E+00, 0.7166200E+00, 0.6437600E+00, 0.6437600E+00 /
      data (ref_adm( 4,iz,38,16),iz = 1,20) / &
     & 0.1932500E+00, 0.1932500E+00, 0.2304500E+00, 0.2354400E+00, &
     & 0.2251300E+00, 0.2192500E+00, 0.2455500E+00, 0.2608500E+00, &
     & 0.3079200E+00, 0.2628700E+00, 0.2973100E+00, 0.3374200E+00, &
     & 0.4329400E+00, 0.4815200E+00, 0.5491600E+00, 0.6327300E+00, &
     & 0.7511400E+00, 0.7166200E+00, 0.6437600E+00, 0.6437600E+00 /
! Solar Zenith Angle 80.0 Albedo  0.3980705E+00
      data (ref_adm( 4,iz, 1,17),iz = 1,20) / &
     & 0.1836300E+00, 0.1836300E+00, 0.1842200E+00, 0.1872100E+00, &
     & 0.2113600E+00, 0.2646300E+00, 0.2651300E+00, 0.2666000E+00, &
     & 0.2867600E+00, 0.3775300E+00, 0.4608900E+00, 0.5870300E+00, &
     & 0.5780499E+00, 0.7710434E+00, 0.1312622E+01, 0.2571393E+01, &
     & 0.1847047E+01, 0.2917850E+01, 0.7893572E+01, 0.7893572E+01 /
      data (ref_adm( 4,iz, 2,17),iz = 1,20) / &
     & 0.1836300E+00, 0.1836300E+00, 0.1842200E+00, 0.1872100E+00, &
     & 0.2113600E+00, 0.2646300E+00, 0.2651300E+00, 0.2666000E+00, &
     & 0.2867600E+00, 0.3775300E+00, 0.4608900E+00, 0.5870300E+00, &
     & 0.5780499E+00, 0.7710434E+00, 0.1312622E+01, 0.2571393E+01, &
     & 0.1847047E+01, 0.2917850E+01, 0.7893572E+01, 0.7893572E+01 /
      data (ref_adm( 4,iz, 3,17),iz = 1,20) / &
     & 0.2287700E+00, 0.2287700E+00, 0.1935700E+00, 0.1691500E+00, &
     & 0.2230000E+00, 0.2259600E+00, 0.2509600E+00, 0.3009100E+00, &
     & 0.3051000E+00, 0.3297700E+00, 0.3527900E+00, 0.4245600E+00, &
     & 0.5674275E+00, 0.7476865E+00, 0.1225252E+01, 0.2587698E+01, &
     & 0.2054951E+01, 0.2689703E+01, 0.4961538E+00, 0.4961538E+00 /
      data (ref_adm( 4,iz, 4,17),iz = 1,20) / &
     & 0.1847100E+00, 0.1847100E+00, 0.2055200E+00, 0.2236200E+00, &
     & 0.2119400E+00, 0.2518100E+00, 0.2204100E+00, 0.2533400E+00, &
     & 0.2777200E+00, 0.3223900E+00, 0.4326600E+00, 0.4758400E+00, &
     & 0.5479516E+00, 0.7049162E+00, 0.1073585E+01, 0.2200708E+01, &
     & 0.2982983E+01, 0.2608474E+01, 0.4324409E+01, 0.4324409E+01 /
      data (ref_adm( 4,iz, 5,17),iz = 1,20) / &
     & 0.2217200E+00, 0.2217200E+00, 0.2435900E+00, 0.2732200E+00, &
     & 0.2346200E+00, 0.2246100E+00, 0.2963100E+00, 0.3619400E+00, &
     & 0.3012100E+00, 0.4726500E+00, 0.4062200E+00, 0.6004200E+00, &
     & 0.5270305E+00, 0.6523077E+00, 0.9257498E+00, 0.1595793E+01, &
     & 0.3160363E+01, 0.4097874E+01, 0.4331283E+01, 0.4331283E+01 /
      data (ref_adm( 4,iz, 6,17),iz = 1,20) / &
     & 0.2088700E+00, 0.2088700E+00, 0.2295200E+00, 0.2197000E+00, &
     & 0.2674200E+00, 0.2556400E+00, 0.2890000E+00, 0.3087000E+00, &
     & 0.3645200E+00, 0.3907800E+00, 0.4715800E+00, 0.6172200E+00, &
     & 0.5806600E+00, 0.8079900E+00, 0.1168600E+01, 0.1702500E+01, &
     & 0.1568700E+01, 0.4257508E+01, 0.7436372E+01, 0.7436372E+01 /
      data (ref_adm( 4,iz, 7,17),iz = 1,20) / &
     & 0.2174100E+00, 0.2174100E+00, 0.2082000E+00, 0.2070100E+00, &
     & 0.1657500E+00, 0.1823700E+00, 0.2155200E+00, 0.2745900E+00, &
     & 0.3199700E+00, 0.3684500E+00, 0.4380200E+00, 0.4840900E+00, &
     & 0.6321900E+00, 0.9353100E+00, 0.1087600E+01, 0.1758500E+01, &
     & 0.1809000E+01, 0.1769100E+01, 0.4652140E+01, 0.4652140E+01 /
      data (ref_adm( 4,iz, 8,17),iz = 1,20) / &
     & 0.2452900E+00, 0.2452900E+00, 0.1693300E+00, 0.1957100E+00, &
     & 0.1890700E+00, 0.2448900E+00, 0.2278500E+00, 0.2384500E+00, &
     & 0.2658500E+00, 0.3267200E+00, 0.3965200E+00, 0.5365700E+00, &
     & 0.6413700E+00, 0.8547300E+00, 0.9371400E+00, 0.1148700E+01, &
     & 0.1563300E+01, 0.1598500E+01, 0.1468700E+01, 0.1468700E+01 /
      data (ref_adm( 4,iz, 9,17),iz = 1,20) / &
     & 0.1880200E+00, 0.1880200E+00, 0.2039600E+00, 0.2012300E+00, &
     & 0.2248900E+00, 0.2750100E+00, 0.2380000E+00, 0.1970400E+00, &
     & 0.2543400E+00, 0.3416700E+00, 0.3714400E+00, 0.4668500E+00, &
     & 0.5600500E+00, 0.6636700E+00, 0.7616800E+00, 0.9896800E+00, &
     & 0.1309600E+01, 0.1397300E+01, 0.1401300E+01, 0.1401300E+01 /
      data (ref_adm( 4,iz,10,17),iz = 1,20) / &
     & 0.1760600E+00, 0.1760600E+00, 0.1716400E+00, 0.1754800E+00, &
     & 0.2001800E+00, 0.2208400E+00, 0.2452900E+00, 0.2591300E+00, &
     & 0.2657600E+00, 0.2469300E+00, 0.4139500E+00, 0.3888800E+00, &
     & 0.5034700E+00, 0.6360500E+00, 0.7915200E+00, 0.9550500E+00, &
     & 0.1110700E+01, 0.1374400E+01, 0.7504900E+00, 0.7504900E+00 /
      data (ref_adm( 4,iz,11,17),iz = 1,20) / &
     & 0.2144600E+00, 0.2144600E+00, 0.1509800E+00, 0.2292500E+00, &
     & 0.2292500E+00, 0.1979300E+00, 0.2346700E+00, 0.2300000E+00, &
     & 0.2623100E+00, 0.2662900E+00, 0.3167700E+00, 0.3385700E+00, &
     & 0.4819500E+00, 0.5142600E+00, 0.6381200E+00, 0.7911000E+00, &
     & 0.8133100E+00, 0.7044100E+00, 0.2120373E+01, 0.2120373E+01 /
      data (ref_adm( 4,iz,12,17),iz = 1,20) / &
     & 0.2361000E+00, 0.2361000E+00, 0.1995800E+00, 0.1677200E+00, &
     & 0.2309000E+00, 0.1857100E+00, 0.1980200E+00, 0.2510900E+00, &
     & 0.2505400E+00, 0.3046700E+00, 0.3671400E+00, 0.2936600E+00, &
     & 0.3532400E+00, 0.4075500E+00, 0.5796200E+00, 0.6812800E+00, &
     & 0.7334200E+00, 0.8147100E+00, 0.1906557E+01, 0.1906557E+01 /
      data (ref_adm( 4,iz,13,17),iz = 1,20) / &
     & 0.1534600E+00, 0.1534600E+00, 0.1804400E+00, 0.2035500E+00, &
     & 0.2036100E+00, 0.1923700E+00, 0.2192200E+00, 0.2043600E+00, &
     & 0.2646500E+00, 0.2697200E+00, 0.3110400E+00, 0.3617800E+00, &
     & 0.3426000E+00, 0.4472300E+00, 0.4911400E+00, 0.6115000E+00, &
     & 0.6209100E+00, 0.1066827E+01, 0.1770025E+01, 0.1770025E+01 /
      data (ref_adm( 4,iz,14,17),iz = 1,20) / &
     & 0.1893800E+00, 0.1893800E+00, 0.1786400E+00, 0.1968800E+00, &
     & 0.2399900E+00, 0.2614700E+00, 0.2338800E+00, 0.2282800E+00, &
     & 0.2443300E+00, 0.2913100E+00, 0.2634400E+00, 0.3293800E+00, &
     & 0.3194000E+00, 0.3556200E+00, 0.4476000E+00, 0.5709300E+00, &
     & 0.6021100E+00, 0.1020534E+01, 0.1678811E+01, 0.1678811E+01 /
      data (ref_adm( 4,iz,15,17),iz = 1,20) / &
     & 0.1941200E+00, 0.1941200E+00, 0.2098800E+00, 0.2077600E+00, &
     & 0.2134400E+00, 0.2197400E+00, 0.2179000E+00, 0.2239900E+00, &
     & 0.2440100E+00, 0.2477900E+00, 0.2662000E+00, 0.2965200E+00, &
     & 0.3137200E+00, 0.3268400E+00, 0.4291000E+00, 0.4315400E+00, &
     & 0.5937700E+00, 0.9851736E+00, 0.1609338E+01, 0.1609338E+01 /
      data (ref_adm( 4,iz,16,17),iz = 1,20) / &
     & 0.2275300E+00, 0.2275300E+00, 0.1956200E+00, 0.1917200E+00, &
     & 0.1955700E+00, 0.2007200E+00, 0.1981500E+00, 0.2087600E+00, &
     & 0.2230300E+00, 0.2369600E+00, 0.2554000E+00, 0.2768700E+00, &
     & 0.3063800E+00, 0.3315300E+00, 0.3844100E+00, 0.4383900E+00, &
     & 0.6988983E+00, 0.9539729E+00, 0.1549338E+01, 0.1549338E+01 /
      data (ref_adm( 4,iz,17,17),iz = 1,20) / &
     & 0.2150300E+00, 0.2150300E+00, 0.1923100E+00, 0.1815800E+00, &
     & 0.2170800E+00, 0.2372200E+00, 0.1879600E+00, 0.2200800E+00, &
     & 0.2573600E+00, 0.2437500E+00, 0.2813900E+00, 0.2749300E+00, &
     & 0.3591200E+00, 0.3085000E+00, 0.3755800E+00, 0.3913800E+00, &
     & 0.6740252E+00, 0.9167685E+00, 0.1481947E+01, 0.1481947E+01 /
      data (ref_adm( 4,iz,18,17),iz = 1,20) / &
     & 0.2140400E+00, 0.2140400E+00, 0.1761100E+00, 0.2265700E+00, &
     & 0.1946700E+00, 0.2364400E+00, 0.2190000E+00, 0.2050700E+00, &
     & 0.2047400E+00, 0.2663100E+00, 0.2535000E+00, 0.3572600E+00, &
     & 0.2967800E+00, 0.2793700E+00, 0.3916600E+00, 0.5012100E+00, &
     & 0.4747757E+00, 0.5640280E+00, 0.6612085E+00, 0.6612085E+00 /
      data (ref_adm( 4,iz,19,17),iz = 1,20) / &
     & 0.2342200E+00, 0.2342200E+00, 0.1945300E+00, 0.1996900E+00, &
     & 0.2004700E+00, 0.2375700E+00, 0.2062300E+00, 0.2289000E+00, &
     & 0.2135100E+00, 0.2219400E+00, 0.2592100E+00, 0.2571700E+00, &
     & 0.2926600E+00, 0.3168500E+00, 0.3192600E+00, 0.4086925E+00, &
     & 0.4654198E+00, 0.5503961E+00, 0.6433417E+00, 0.6433417E+00 /
      data (ref_adm( 4,iz,20,17),iz = 1,20) / &
     & 0.1816000E+00, 0.1816000E+00, 0.1474900E+00, 0.2003800E+00, &
     & 0.1665300E+00, 0.2147300E+00, 0.1920300E+00, 0.2380100E+00, &
     & 0.2219000E+00, 0.2319900E+00, 0.2525300E+00, 0.2495100E+00, &
     & 0.2988900E+00, 0.2706000E+00, 0.3588200E+00, 0.4042479E+00, &
     & 0.4593953E+00, 0.5418278E+00, 0.6326824E+00, 0.6326824E+00 /
      data (ref_adm( 4,iz,21,17),iz = 1,20) / &
     & 0.1972600E+00, 0.1972600E+00, 0.2006100E+00, 0.1834600E+00, &
     & 0.2151300E+00, 0.2614700E+00, 0.2355500E+00, 0.1894900E+00, &
     & 0.2484000E+00, 0.2660500E+00, 0.2814500E+00, 0.2626600E+00, &
     & 0.2857100E+00, 0.2865500E+00, 0.3259300E+00, 0.4009543E+00, &
     & 0.4551350E+00, 0.5354154E+00, 0.6264119E+00, 0.6264119E+00 /
      data (ref_adm( 4,iz,22,17),iz = 1,20) / &
     & 0.1980900E+00, 0.1980900E+00, 0.2016400E+00, 0.1763200E+00, &
     & 0.2396300E+00, 0.2028400E+00, 0.1880500E+00, 0.1869500E+00, &
     & 0.2719000E+00, 0.2542200E+00, 0.2942600E+00, 0.2625300E+00, &
     & 0.2891300E+00, 0.3160500E+00, 0.3185600E+00, 0.4496332E+00, &
     & 0.5235609E+00, 0.6428794E+00, 0.8265482E+00, 0.8265482E+00 /
      data (ref_adm( 4,iz,23,17),iz = 1,20) / &
     & 0.1777800E+00, 0.1777800E+00, 0.1886900E+00, 0.1900700E+00, &
     & 0.1949200E+00, 0.2082900E+00, 0.2096000E+00, 0.2233400E+00, &
     & 0.2200700E+00, 0.2194600E+00, 0.2508600E+00, 0.2647300E+00, &
     & 0.2851400E+00, 0.3440200E+00, 0.3436800E+00, 0.4378700E+00, &
     & 0.5227476E+00, 0.6409687E+00, 0.8291695E+00, 0.8291695E+00 /
      data (ref_adm( 4,iz,24,17),iz = 1,20) / &
     & 0.2134600E+00, 0.2134600E+00, 0.2354900E+00, 0.1949600E+00, &
     & 0.2096100E+00, 0.2264100E+00, 0.2163100E+00, 0.2288400E+00, &
     & 0.2361300E+00, 0.2484200E+00, 0.2672700E+00, 0.2842300E+00, &
     & 0.2954600E+00, 0.3366400E+00, 0.3546700E+00, 0.3692900E+00, &
     & 0.5258768E+00, 0.6441629E+00, 0.8396657E+00, 0.8396657E+00 /
      data (ref_adm( 4,iz,25,17),iz = 1,20) / &
     & 0.2408400E+00, 0.2408400E+00, 0.2526400E+00, 0.2317500E+00, &
     & 0.2317400E+00, 0.2327000E+00, 0.2371300E+00, 0.2422900E+00, &
     & 0.2495700E+00, 0.2629600E+00, 0.2956400E+00, 0.2842900E+00, &
     & 0.2974200E+00, 0.3532500E+00, 0.3849000E+00, 0.4043300E+00, &
     & 0.4084800E+00, 0.6509840E+00, 0.8561180E+00, 0.8561180E+00 /
      data (ref_adm( 4,iz,26,17),iz = 1,20) / &
     & 0.2189400E+00, 0.2189400E+00, 0.1871400E+00, 0.2080800E+00, &
     & 0.2002200E+00, 0.2328800E+00, 0.2862500E+00, 0.2595500E+00, &
     & 0.1945400E+00, 0.2591777E+00, 0.2693800E+00, 0.2593100E+00, &
     & 0.3196100E+00, 0.3445700E+00, 0.4021500E+00, 0.4462000E+00, &
     & 0.4884400E+00, 0.4845100E+00, 0.8837884E+00, 0.8837884E+00 /
      data (ref_adm( 4,iz,27,17),iz = 1,20) / &
     & 0.2937000E+00, 0.2937000E+00, 0.2180900E+00, 0.2221800E+00, &
     & 0.1835200E+00, 0.1925700E+00, 0.2973100E+00, 0.2511500E+00, &
     & 0.2241200E+00, 0.2464400E+00, 0.2643900E+00, 0.2766500E+00, &
     & 0.3425100E+00, 0.3488800E+00, 0.4015900E+00, 0.4890300E+00, &
     & 0.5140100E+00, 0.6223100E+00, 0.9177662E+00, 0.9177662E+00 /
      data (ref_adm( 4,iz,28,17),iz = 1,20) / &
     & 0.1901800E+00, 0.1901800E+00, 0.1969000E+00, 0.2008900E+00, &
     & 0.1900500E+00, 0.1843700E+00, 0.1967300E+00, 0.2244400E+00, &
     & 0.2530400E+00, 0.2335100E+00, 0.2627900E+00, 0.2843100E+00, &
     & 0.3313700E+00, 0.3819700E+00, 0.4265500E+00, 0.5214000E+00, &
     & 0.5651800E+00, 0.6461500E+00, 0.7334600E+00, 0.7334600E+00 /
      data (ref_adm( 4,iz,29,17),iz = 1,20) / &
     & 0.1810400E+00, 0.1810400E+00, 0.1784200E+00, 0.1707000E+00, &
     & 0.1919800E+00, 0.2129700E+00, 0.1996300E+00, 0.2457000E+00, &
     & 0.2930100E+00, 0.2951100E+00, 0.2928100E+00, 0.3063800E+00, &
     & 0.3214000E+00, 0.3773500E+00, 0.4337800E+00, 0.5373000E+00, &
     & 0.6214200E+00, 0.7341800E+00, 0.6232600E+00, 0.6232600E+00 /
      data (ref_adm( 4,iz,30,17),iz = 1,20) / &
     & 0.2382900E+00, 0.2382900E+00, 0.2082700E+00, 0.2295900E+00, &
     & 0.1783300E+00, 0.1826800E+00, 0.3060400E+00, 0.2360600E+00, &
     & 0.2587900E+00, 0.2745900E+00, 0.3097200E+00, 0.3119900E+00, &
     & 0.3984500E+00, 0.4312200E+00, 0.4611100E+00, 0.5752200E+00, &
     & 0.6692300E+00, 0.7336200E+00, 0.7255100E+00, 0.7255100E+00 /
      data (ref_adm( 4,iz,31,17),iz = 1,20) / &
     & 0.1821200E+00, 0.1821200E+00, 0.1836400E+00, 0.2312300E+00, &
     & 0.2302600E+00, 0.1949100E+00, 0.2226200E+00, 0.2220500E+00, &
     & 0.2324700E+00, 0.3151500E+00, 0.3072100E+00, 0.3309600E+00, &
     & 0.3781700E+00, 0.4259200E+00, 0.4837700E+00, 0.5707900E+00, &
     & 0.6022500E+00, 0.7169500E+00, 0.7380900E+00, 0.7380900E+00 /
      data (ref_adm( 4,iz,32,17),iz = 1,20) / &
     & 0.2137800E+00, 0.2137800E+00, 0.1800000E+00, 0.1298600E+00, &
     & 0.2352100E+00, 0.2324300E+00, 0.2194700E+00, 0.2518000E+00, &
     & 0.3059400E+00, 0.3241400E+00, 0.3070600E+00, 0.3587800E+00, &
     & 0.4037700E+00, 0.4028000E+00, 0.4921400E+00, 0.5334800E+00, &
     & 0.7657600E+00, 0.8850800E+00, 0.8877900E+00, 0.8877900E+00 /
      data (ref_adm( 4,iz,33,17),iz = 1,20) / &
     & 0.1775800E+00, 0.1775800E+00, 0.1926100E+00, 0.2160900E+00, &
     & 0.2267400E+00, 0.2387200E+00, 0.2232700E+00, 0.2576500E+00, &
     & 0.2787300E+00, 0.3043800E+00, 0.3547700E+00, 0.3857400E+00, &
     & 0.4067800E+00, 0.5043600E+00, 0.5434300E+00, 0.6215200E+00, &
     & 0.7016200E+00, 0.8333858E+00, 0.1172103E+01, 0.1172103E+01 /
      data (ref_adm( 4,iz,34,17),iz = 1,20) / &
     & 0.2309600E+00, 0.2309600E+00, 0.2636000E+00, 0.2683400E+00, &
     & 0.2367600E+00, 0.2311500E+00, 0.2627000E+00, 0.2775000E+00, &
     & 0.3053900E+00, 0.3429900E+00, 0.3502700E+00, 0.4001800E+00, &
     & 0.3905400E+00, 0.5099300E+00, 0.5522900E+00, 0.6091900E+00, &
     & 0.7196000E+00, 0.8804100E+00, 0.9124000E+00, 0.9124000E+00 /
      data (ref_adm( 4,iz,35,17),iz = 1,20) / &
     & 0.1863700E+00, 0.1863700E+00, 0.2505100E+00, 0.2223500E+00, &
     & 0.2025900E+00, 0.1990600E+00, 0.2218200E+00, 0.2800000E+00, &
     & 0.2477200E+00, 0.3215600E+00, 0.3376100E+00, 0.3810000E+00, &
     & 0.3996100E+00, 0.4611100E+00, 0.5115300E+00, 0.5308600E+00, &
     & 0.7067100E+00, 0.7493700E+00, 0.1182866E+01, 0.1182866E+01 /
      data (ref_adm( 4,iz,36,17),iz = 1,20) / &
     & 0.1850800E+00, 0.1850800E+00, 0.2046600E+00, 0.2240600E+00, &
     & 0.2089500E+00, 0.2023000E+00, 0.2186100E+00, 0.2350400E+00, &
     & 0.2286200E+00, 0.2672100E+00, 0.3285600E+00, 0.3784300E+00, &
     & 0.3857100E+00, 0.5024700E+00, 0.5680400E+00, 0.6316700E+00, &
     & 0.7171700E+00, 0.9033400E+00, 0.1195780E+01, 0.1195780E+01 /
      data (ref_adm( 4,iz,37,17),iz = 1,20) / &
     & 0.1797800E+00, 0.1797800E+00, 0.1773600E+00, 0.1941900E+00, &
     & 0.2149900E+00, 0.2267400E+00, 0.2504000E+00, 0.2242000E+00, &
     & 0.2640400E+00, 0.3276800E+00, 0.3511500E+00, 0.3806200E+00, &
     & 0.3971500E+00, 0.4635900E+00, 0.5244900E+00, 0.7003300E+00, &
     & 0.7423400E+00, 0.8976900E+00, 0.1207225E+01, 0.1207225E+01 /
      data (ref_adm( 4,iz,38,17),iz = 1,20) / &
     & 0.1797800E+00, 0.1797800E+00, 0.1773600E+00, 0.1941900E+00, &
     & 0.2149900E+00, 0.2267400E+00, 0.2504000E+00, 0.2242000E+00, &
     & 0.2640400E+00, 0.3276800E+00, 0.3511500E+00, 0.3806200E+00, &
     & 0.3971500E+00, 0.4635900E+00, 0.5244900E+00, 0.7003300E+00, &
     & 0.7423400E+00, 0.8976900E+00, 0.1207225E+01, 0.1207225E+01 /
! Solar Zenith Angle 85.0 Albedo  0.4975616E+00
      data (ref_adm( 4,iz, 1,18),iz = 1,20) / &
     & 0.1981000E+00, 0.1981000E+00, 0.2008000E+00, 0.2229800E+00, &
     & 0.2499800E+00, 0.3033000E+00, 0.3037100E+00, 0.3253800E+00, &
     & 0.4920700E+00, 0.3882600E+00, 0.6728900E+00, 0.7293100E+00, &
     & 0.9777220E+00, 0.1172198E+01, 0.1463301E+01, 0.1867623E+01, &
     & 0.2294086E+01, 0.2708558E+01, 0.1972313E+01, 0.1972313E+01 /
      data (ref_adm( 4,iz, 2,18),iz = 1,20) / &
     & 0.1981000E+00, 0.1981000E+00, 0.2008000E+00, 0.2229800E+00, &
     & 0.2499800E+00, 0.3033000E+00, 0.3037100E+00, 0.3253800E+00, &
     & 0.4920700E+00, 0.3882600E+00, 0.6728900E+00, 0.7293100E+00, &
     & 0.9777220E+00, 0.1172198E+01, 0.1463301E+01, 0.1867623E+01, &
     & 0.2294086E+01, 0.2708558E+01, 0.1972313E+01, 0.1972313E+01 /
      data (ref_adm( 4,iz, 3,18),iz = 1,20) / &
     & 0.2854100E+00, 0.2854100E+00, 0.2035700E+00, 0.3027700E+00, &
     & 0.2841200E+00, 0.3572900E+00, 0.3498916E+00, 0.3812000E+00, &
     & 0.4306400E+00, 0.4398400E+00, 0.6202760E+00, 0.8013700E+00, &
     & 0.9662307E+00, 0.1156504E+01, 0.1439380E+01, 0.1830449E+01, &
     & 0.2239920E+01, 0.2629532E+01, 0.2952585E-07, 0.2952585E-07 /
      data (ref_adm( 4,iz, 4,18),iz = 1,20) / &
     & 0.2100700E+00, 0.2100700E+00, 0.1907900E+00, 0.2604500E+00, &
     & 0.2943600E+00, 0.2865100E+00, 0.3205100E+00, 0.3199900E+00, &
     & 0.3975000E+00, 0.3223500E+00, 0.5852700E+00, 0.8414600E+00, &
     & 0.9423811E+00, 0.1122950E+01, 0.1389512E+01, 0.1753684E+01, &
     & 0.2127154E+01, 0.2468722E+01, 0.1792119E+01, 0.1792119E+01 /
      data (ref_adm( 4,iz, 5,18),iz = 1,20) / &
     & 0.2387000E+00, 0.2387000E+00, 0.2697600E+00, 0.2172200E+00, &
     & 0.2687200E+00, 0.3236400E+00, 0.2857400E+00, 0.2835300E+00, &
     & 0.3004700E+00, 0.3802000E+00, 0.5574600E+00, 0.6250800E+00, &
     & 0.9081239E+00, 0.1076092E+01, 0.1320781E+01, 0.1649438E+01, &
     & 0.1978818E+01, 0.2261796E+01, 0.1643764E+01, 0.1643764E+01 /
      data (ref_adm( 4,iz, 6,18),iz = 1,20) / &
     & 0.2300300E+00, 0.2300300E+00, 0.1554400E+00, 0.2145200E+00, &
     & 0.2322100E+00, 0.3995200E+00, 0.3126300E+00, 0.3108500E+00, &
     & 0.4073500E+00, 0.3929300E+00, 0.4892300E+00, 0.6485400E+00, &
     & 0.8658546E+00, 0.1018386E+01, 0.1481000E+01, 0.1524980E+01, &
     & 0.1804601E+01, 0.2028922E+01, 0.1484960E+01, 0.1484960E+01 /
      data (ref_adm( 4,iz, 7,18),iz = 1,20) / &
     & 0.2639288E+00, 0.2639288E+00, 0.2438400E+00, 0.3902100E+00, &
     & 0.2754700E+00, 0.3094000E+00, 0.3380745E+00, 0.3748204E+00, &
     & 0.4223224E+00, 0.4825779E+00, 0.4806400E+00, 0.5594700E+00, &
     & 0.8176400E+00, 0.1016800E+01, 0.1417600E+01, 0.1737700E+01, &
     & 0.2452000E+01, 0.2985600E+01, 0.2957700E+01, 0.2957700E+01 /
      data (ref_adm( 4,iz, 8,18),iz = 1,20) / &
     & 0.2433300E+00, 0.2433300E+00, 0.3698700E+00, 0.2507800E+00, &
     & 0.2886602E+00, 0.3076604E+00, 0.3335770E+00, 0.3082600E+00, &
     & 0.3533300E+00, 0.4544300E+00, 0.5349217E+00, 0.6132700E+00, &
     & 0.7680233E+00, 0.9367200E+00, 0.1263700E+01, 0.1689100E+01, &
     & 0.2198300E+01, 0.2330600E+01, 0.2456600E+01, 0.2456600E+01 /
      data (ref_adm( 4,iz, 9,18),iz = 1,20) / &
     & 0.2265300E+00, 0.2265300E+00, 0.2838500E+00, 0.2202000E+00, &
     & 0.2691800E+00, 0.3047649E+00, 0.2611300E+00, 0.3603762E+00, &
     & 0.4006136E+00, 0.3920100E+00, 0.5117062E+00, 0.6014400E+00, &
     & 0.7312800E+00, 0.8924500E+00, 0.1096400E+01, 0.1459400E+01, &
     & 0.2035900E+01, 0.2604300E+01, 0.1746800E+01, 0.1746800E+01 /
      data (ref_adm( 4,iz,10,18),iz = 1,20) / &
     & 0.3293400E+00, 0.3293400E+00, 0.2082900E+00, 0.1944700E+00, &
     & 0.2854648E+00, 0.1874800E+00, 0.2625700E+00, 0.2331400E+00, &
     & 0.3213900E+00, 0.4486900E+00, 0.4885510E+00, 0.5213000E+00, &
     & 0.6465600E+00, 0.8401000E+00, 0.1055400E+01, 0.1390600E+01, &
     & 0.1626600E+01, 0.2276300E+01, 0.1988600E+01, 0.1988600E+01 /
      data (ref_adm( 4,iz,11,18),iz = 1,20) / &
     & 0.2629900E+00, 0.2629900E+00, 0.2438100E+00, 0.2733709E+00, &
     & 0.2838206E+00, 0.2988141E+00, 0.2565800E+00, 0.3451283E+00, &
     & 0.3779401E+00, 0.4002400E+00, 0.4661643E+00, 0.4702700E+00, &
     & 0.6213084E+00, 0.7837100E+00, 0.8544200E+00, 0.9389100E+00, &
     & 0.1586400E+01, 0.1610500E+01, 0.8606923E+00, 0.8606923E+00 /
      data (ref_adm( 4,iz,12,18),iz = 1,20) / &
     & 0.3332600E+00, 0.3332600E+00, 0.2396800E+00, 0.3241400E+00, &
     & 0.2822377E+00, 0.2959106E+00, 0.2928000E+00, 0.3377763E+00, &
     & 0.3040900E+00, 0.4028784E+00, 0.3906300E+00, 0.5409200E+00, &
     & 0.5788071E+00, 0.7007400E+00, 0.9033600E+00, 0.1065800E+01, &
     & 0.1487300E+01, 0.1578800E+01, 0.7816022E+00, 0.7816022E+00 /
      data (ref_adm( 4,iz,13,18),iz = 1,20) / &
     & 0.2398300E+00, 0.2398300E+00, 0.2664721E+00, 0.2720248E+00, &
     & 0.2242400E+00, 0.2062200E+00, 0.2467500E+00, 0.3308839E+00, &
     & 0.2564900E+00, 0.3886831E+00, 0.3442800E+00, 0.3839200E+00, &
     & 0.5513600E+00, 0.5598200E+00, 0.7434500E+00, 0.8584700E+00, &
     & 0.1372700E+01, 0.8157137E+00, 0.7145171E+00, 0.7145171E+00 /
      data (ref_adm( 4,iz,14,18),iz = 1,20) / &
     & 0.2253500E+00, 0.2253500E+00, 0.2271500E+00, 0.1883800E+00, &
     & 0.2793907E+00, 0.2907119E+00, 0.2693800E+00, 0.2945200E+00, &
     & 0.3480010E+00, 0.3489600E+00, 0.4084052E+00, 0.5000400E+00, &
     & 0.5132000E+00, 0.5698900E+00, 0.6486000E+00, 0.8708300E+00, &
     & 0.7116947E+00, 0.7292668E+00, 0.6598303E+00, 0.6598303E+00 /
      data (ref_adm( 4,iz,15,18),iz = 1,20) / &
     & 0.2238000E+00, 0.2238000E+00, 0.2320100E+00, 0.2307800E+00, &
     & 0.2410700E+00, 0.2314900E+00, 0.2528900E+00, 0.2725200E+00, &
     & 0.2752100E+00, 0.2911100E+00, 0.3303800E+00, 0.3323700E+00, &
     & 0.3530300E+00, 0.3770000E+00, 0.5082100E+00, 0.7952600E+00, &
     & 0.6453165E+00, 0.6584724E+00, 0.6146969E+00, 0.6146969E+00 /
      data (ref_adm( 4,iz,16,18),iz = 1,20) / &
     & 0.2785200E+00, 0.2785200E+00, 0.2318800E+00, 0.2287000E+00, &
     & 0.2221600E+00, 0.2229200E+00, 0.2321000E+00, 0.2279400E+00, &
     & 0.2509800E+00, 0.2714300E+00, 0.2680500E+00, 0.2812700E+00, &
     & 0.3175700E+00, 0.3363500E+00, 0.5526900E+00, 0.5648330E+00, &
     & 0.5928160E+00, 0.6033493E+00, 0.5794443E+00, 0.5794443E+00 /
      data (ref_adm( 4,iz,17,18),iz = 1,20) / &
     & 0.2639674E+00, 0.2639674E+00, 0.2660422E+00, 0.2940600E+00, &
     & 0.2878200E+00, 0.2853300E+00, 0.2711700E+00, 0.3105089E+00, &
     & 0.2538800E+00, 0.3016100E+00, 0.3104500E+00, 0.3502100E+00, &
     & 0.4342845E+00, 0.4275800E+00, 0.5895900E+00, 0.5277961E+00, &
     & 0.5506535E+00, 0.5598554E+00, 0.5519258E+00, 0.5519258E+00 /
      data (ref_adm( 4,iz,18,18),iz = 1,20) / &
     & 0.3096300E+00, 0.3096300E+00, 0.2545800E+00, 0.2385221E+00, &
     & 0.2312100E+00, 0.2517561E+00, 0.2346900E+00, 0.3172000E+00, &
     & 0.2528900E+00, 0.3066346E+00, 0.2971700E+00, 0.3595895E+00, &
     & 0.3970495E+00, 0.4322337E+00, 0.4929700E+00, 0.5558208E+00, &
     & 0.6445716E+00, 0.8018297E+00, 0.1278684E+01, 0.1278684E+01 /
      data (ref_adm( 4,iz,19,18),iz = 1,20) / &
     & 0.2577700E+00, 0.2577700E+00, 0.2263200E+00, 0.2542800E+00, &
     & 0.2434532E+00, 0.2193000E+00, 0.2598886E+00, 0.2714302E+00, &
     & 0.2888200E+00, 0.3185000E+00, 0.3219720E+00, 0.3889700E+00, &
     & 0.3844300E+00, 0.4241300E+00, 0.4950600E+00, 0.5330182E+00, &
     & 0.6156757E+00, 0.7653007E+00, 0.1242894E+01, 0.1242894E+01 /
      data (ref_adm( 4,iz,20,18),iz = 1,20) / &
     & 0.2782400E+00, 0.2782400E+00, 0.2343800E+00, 0.2378248E+00, &
     & 0.2430155E+00, 0.2499853E+00, 0.2589072E+00, 0.2700030E+00, &
     & 0.2834841E+00, 0.3154700E+00, 0.3184565E+00, 0.4197300E+00, &
     & 0.3795760E+00, 0.3650800E+00, 0.5058200E+00, 0.5189803E+00, &
     & 0.5981712E+00, 0.7439874E+00, 0.1228132E+01, 0.1228132E+01 /
      data (ref_adm( 4,iz,21,18),iz = 1,20) / &
     & 0.2284200E+00, 0.2284200E+00, 0.2408700E+00, 0.2711600E+00, &
     & 0.2427988E+00, 0.2496372E+00, 0.2584458E+00, 0.2693518E+00, &
     & 0.2825648E+00, 0.2982748E+00, 0.3167016E+00, 0.3440642E+00, &
     & 0.3796900E+00, 0.3966100E+00, 0.4492606E+00, 0.5114309E+00, &
     & 0.5890990E+00, 0.7342910E+00, 0.1230224E+01, 0.1230224E+01 /
      data (ref_adm( 4,iz,22,18),iz = 1,20) / &
     & 0.2447100E+00, 0.2447100E+00, 0.2617900E+00, 0.2500984E+00, &
     & 0.2555283E+00, 0.2629205E+00, 0.2381000E+00, 0.2841130E+00, &
     & 0.2982927E+00, 0.3150834E+00, 0.2989000E+00, 0.3638669E+00, &
     & 0.4040600E+00, 0.3850300E+00, 0.3819000E+00, 0.5413244E+00, &
     & 0.6234460E+00, 0.7765486E+00, 0.1305918E+01, 0.1305918E+01 /
      data (ref_adm( 4,iz,23,18),iz = 1,20) / &
     & 0.2394800E+00, 0.2394800E+00, 0.2318300E+00, 0.2517600E+00, &
     & 0.2503400E+00, 0.2467900E+00, 0.2489300E+00, 0.2479900E+00, &
     & 0.2679400E+00, 0.2998500E+00, 0.2936300E+00, 0.3123100E+00, &
     & 0.3599400E+00, 0.4158300E+00, 0.4234500E+00, 0.5450987E+00, &
     & 0.6288340E+00, 0.7865961E+00, 0.1340746E+01, 0.1340746E+01 /
      data (ref_adm( 4,iz,24,18),iz = 1,20) / &
     & 0.2480300E+00, 0.2480300E+00, 0.2522000E+00, 0.2513500E+00, &
     & 0.2719900E+00, 0.2745100E+00, 0.2976000E+00, 0.3026500E+00, &
     & 0.2957200E+00, 0.3011800E+00, 0.3322600E+00, 0.3762000E+00, &
     & 0.4052500E+00, 0.4352400E+00, 0.4668800E+00, 0.5547104E+00, &
     & 0.6418367E+00, 0.8068936E+00, 0.1391821E+01, 0.1391821E+01 /
      data (ref_adm( 4,iz,25,18),iz = 1,20) / &
     & 0.2444300E+00, 0.2444300E+00, 0.2464434E+00, 0.3038400E+00, &
     & 0.2566476E+00, 0.2065400E+00, 0.3264100E+00, 0.2964200E+00, &
     & 0.2506800E+00, 0.3221399E+00, 0.4159400E+00, 0.4270900E+00, &
     & 0.4682900E+00, 0.4479800E+00, 0.4460900E+00, 0.5702077E+00, &
     & 0.6624329E+00, 0.8374699E+00, 0.1456892E+01, 0.1456892E+01 /
      data (ref_adm( 4,iz,26,18),iz = 1,20) / &
     & 0.2347000E+00, 0.2347000E+00, 0.2782200E+00, 0.2639000E+00, &
     & 0.2486400E+00, 0.2658881E+00, 0.2769746E+00, 0.2906978E+00, &
     & 0.3129200E+00, 0.3268064E+00, 0.3498314E+00, 0.3840339E+00, &
     & 0.4916500E+00, 0.6679900E+00, 0.4796200E+00, 0.5314400E+00, &
     & 0.5795800E+00, 0.8803543E+00, 0.1536894E+01, 0.1536894E+01 /
      data (ref_adm( 4,iz,27,18),iz = 1,20) / &
     & 0.2444879E+00, 0.2444879E+00, 0.2465907E+00, 0.2750300E+00, &
     & 0.2353900E+00, 0.2671969E+00, 0.2790298E+00, 0.2936165E+00, &
     & 0.4273200E+00, 0.3328418E+00, 0.3485200E+00, 0.3950159E+00, &
     & 0.4218700E+00, 0.5335900E+00, 0.4809400E+00, 0.5486600E+00, &
     & 0.6917300E+00, 0.9226410E+00, 0.1621792E+01, 0.1621792E+01 /
      data (ref_adm( 4,iz,28,18),iz = 1,20) / &
     & 0.2444771E+00, 0.2444771E+00, 0.2467191E+00, 0.2485300E+00, &
     & 0.2588358E+00, 0.2176500E+00, 0.2723200E+00, 0.2505200E+00, &
     & 0.3590300E+00, 0.3403044E+00, 0.3570400E+00, 0.4939600E+00, &
     & 0.5107300E+00, 0.5379200E+00, 0.5159300E+00, 0.6425078E+00, &
     & 0.8484400E+00, 0.1103700E+01, 0.1720201E+01, 0.1720201E+01 /
      data (ref_adm( 4,iz,29,18),iz = 1,20) / &
     & 0.2444967E+00, 0.2444967E+00, 0.2469473E+00, 0.2929700E+00, &
     & 0.2317100E+00, 0.2674900E+00, 0.2317900E+00, 0.3612800E+00, &
     & 0.3150500E+00, 0.3027200E+00, 0.3672700E+00, 0.4555200E+00, &
     & 0.5188500E+00, 0.5616300E+00, 0.6678600E+00, 0.6710600E+00, &
     & 0.1111700E+01, 0.1238800E+01, 0.1950300E+01, 0.1950300E+01 /
      data (ref_adm( 4,iz,30,18),iz = 1,20) / &
     & 0.2658900E+00, 0.2658900E+00, 0.2562400E+00, 0.2734700E+00, &
     & 0.2606936E+00, 0.2298900E+00, 0.3257800E+00, 0.2384700E+00, &
     & 0.2885400E+00, 0.3539576E+00, 0.3966600E+00, 0.4375800E+00, &
     & 0.4662100E+00, 0.5449700E+00, 0.6562700E+00, 0.7636100E+00, &
     & 0.1154000E+01, 0.1362300E+01, 0.1367700E+01, 0.1367700E+01 /
      data (ref_adm( 4,iz,31,18),iz = 1,20) / &
     & 0.2444860E+00, 0.2444860E+00, 0.2472154E+00, 0.2315200E+00, &
     & 0.2615984E+00, 0.2734579E+00, 0.2696200E+00, 0.2686900E+00, &
     & 0.3008000E+00, 0.3597145E+00, 0.3780400E+00, 0.4109200E+00, &
     & 0.5121700E+00, 0.5779900E+00, 0.6879800E+00, 0.8495800E+00, &
     & 0.1058800E+01, 0.1542900E+01, 0.2020647E+01, 0.2020647E+01 /
      data (ref_adm( 4,iz,32,18),iz = 1,20) / &
     & 0.1875300E+00, 0.1875300E+00, 0.2473493E+00, 0.2533036E+00, &
     & 0.2624853E+00, 0.2750147E+00, 0.2922582E+00, 0.2585000E+00, &
     & 0.2491400E+00, 0.3662732E+00, 0.4074644E+00, 0.4369200E+00, &
     & 0.5478600E+00, 0.5714100E+00, 0.5924400E+00, 0.8313900E+00, &
     & 0.1235500E+01, 0.1269200E+01, 0.1531300E+01, 0.1531300E+01 /
      data (ref_adm( 4,iz,33,18),iz = 1,20) / &
     & 0.2120100E+00, 0.2120100E+00, 0.2402600E+00, 0.2817700E+00, &
     & 0.2770300E+00, 0.2646500E+00, 0.2849500E+00, 0.3129200E+00, &
     & 0.3017800E+00, 0.3374300E+00, 0.4002700E+00, 0.4669100E+00, &
     & 0.5497700E+00, 0.6451300E+00, 0.8048600E+00, 0.9847400E+00, &
     & 0.1072400E+01, 0.1296500E+01, 0.2140659E+01, 0.2140659E+01 /
      data (ref_adm( 4,iz,34,18),iz = 1,20) / &
     & 0.2450000E+00, 0.2450000E+00, 0.2476019E+00, 0.3068500E+00, &
     & 0.2896700E+00, 0.3510900E+00, 0.2832300E+00, 0.2962700E+00, &
     & 0.3360800E+00, 0.3545000E+00, 0.4399900E+00, 0.4844900E+00, &
     & 0.5279500E+00, 0.6036300E+00, 0.7507500E+00, 0.9099300E+00, &
     & 0.1076400E+01, 0.1472500E+01, 0.2187658E+01, 0.2187658E+01 /
      data (ref_adm( 4,iz,35,18),iz = 1,20) / &
     & 0.2444805E+00, 0.2444805E+00, 0.1845700E+00, 0.2523000E+00, &
     & 0.2353400E+00, 0.2789105E+00, 0.2719100E+00, 0.3563100E+00, &
     & 0.3799500E+00, 0.3314200E+00, 0.3592500E+00, 0.5247300E+00, &
     & 0.5429478E+00, 0.6554600E+00, 0.7131600E+00, 0.8027300E+00, &
     & 0.1136800E+01, 0.1398900E+01, 0.2230440E+01, 0.2230440E+01 /
      data (ref_adm( 4,iz,36,18),iz = 1,20) / &
     & 0.1885400E+00, 0.1885400E+00, 0.2477583E+00, 0.2797500E+00, &
     & 0.2104000E+00, 0.2375000E+00, 0.2555500E+00, 0.3251400E+00, &
     & 0.3555300E+00, 0.3843400E+00, 0.3555600E+00, 0.4605300E+00, &
     & 0.4719800E+00, 0.6754200E+00, 0.6512800E+00, 0.7976900E+00, &
     & 0.9743400E+00, 0.1220800E+01, 0.2274574E+01, 0.2274574E+01 /
      data (ref_adm( 4,iz,37,18),iz = 1,20) / &
     & 0.2241200E+00, 0.2241200E+00, 0.2165600E+00, 0.2366500E+00, &
     & 0.2650367E+00, 0.2725600E+00, 0.2893500E+00, 0.3104400E+00, &
     & 0.3571100E+00, 0.4237200E+00, 0.3852800E+00, 0.4548600E+00, &
     & 0.6065600E+00, 0.5920200E+00, 0.6766700E+00, 0.9337500E+00, &
     & 0.1126700E+01, 0.1299300E+01, 0.1917900E+01, 0.1917900E+01 /
      data (ref_adm( 4,iz,38,18),iz = 1,20) / &
     & 0.2241200E+00, 0.2241200E+00, 0.2165600E+00, 0.2366500E+00, &
     & 0.2650367E+00, 0.2725600E+00, 0.2893500E+00, 0.3104400E+00, &
     & 0.3571100E+00, 0.4237200E+00, 0.3852800E+00, 0.4548600E+00, &
     & 0.6065600E+00, 0.5920200E+00, 0.6766700E+00, 0.9337500E+00, &
     & 0.1126700E+01, 0.1299300E+01, 0.1917900E+01, 0.1917900E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm( 5,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.5550641E+04
      data (ref_adm( 5,iz, 1, 2),iz = 1,20) / &
     & 0.2039412E+00, 0.2039412E+00, 0.2002917E+00, 0.1990274E+00, &
     & 0.1980282E+00, 0.1973447E+00, 0.1961401E+00, 0.1940879E+00, &
     & 0.1914519E+00, 0.1882956E+00, 0.1848626E+00, 0.1800965E+00, &
     & 0.1745335E+00, 0.1692950E+00, 0.1617722E+00, 0.1518655E+00, &
     & 0.1416450E+00, 0.1282725E+00, 0.1046604E+00, 0.1046604E+00 /
      data (ref_adm( 5,iz, 2, 2),iz = 1,20) / &
     & 0.2039412E+00, 0.2039412E+00, 0.2002917E+00, 0.1990274E+00, &
     & 0.1980282E+00, 0.1973447E+00, 0.1961401E+00, 0.1940879E+00, &
     & 0.1914519E+00, 0.1882956E+00, 0.1848626E+00, 0.1800965E+00, &
     & 0.1745335E+00, 0.1692950E+00, 0.1617722E+00, 0.1518655E+00, &
     & 0.1416450E+00, 0.1282725E+00, 0.1046604E+00, 0.1046604E+00 /
      data (ref_adm( 5,iz, 3, 2),iz = 1,20) / &
     & 0.2039412E+00, 0.2039412E+00, 0.2002917E+00, 0.1990275E+00, &
     & 0.1980282E+00, 0.1973447E+00, 0.1961401E+00, 0.1940879E+00, &
     & 0.1914519E+00, 0.1882956E+00, 0.1848626E+00, 0.1800965E+00, &
     & 0.1745335E+00, 0.1692950E+00, 0.1617722E+00, 0.1518655E+00, &
     & 0.1416450E+00, 0.1282725E+00, 0.1046604E+00, 0.1046604E+00 /
      data (ref_adm( 5,iz, 4, 2),iz = 1,20) / &
     & 0.2039412E+00, 0.2039412E+00, 0.2002917E+00, 0.1990274E+00, &
     & 0.1980282E+00, 0.1973447E+00, 0.1961401E+00, 0.1940879E+00, &
     & 0.1914519E+00, 0.1882956E+00, 0.1848626E+00, 0.1800965E+00, &
     & 0.1745335E+00, 0.1692950E+00, 0.1617722E+00, 0.1518655E+00, &
     & 0.1416450E+00, 0.1282725E+00, 0.1046604E+00, 0.1046604E+00 /
      data (ref_adm( 5,iz, 5, 2),iz = 1,20) / &
     & 0.2039412E+00, 0.2039412E+00, 0.2002917E+00, 0.1990275E+00, &
     & 0.1980282E+00, 0.1973447E+00, 0.1961401E+00, 0.1940879E+00, &
     & 0.1914519E+00, 0.1882956E+00, 0.1848626E+00, 0.1800965E+00, &
     & 0.1745335E+00, 0.1724700E+00, 0.1617722E+00, 0.1518655E+00, &
     & 0.1416450E+00, 0.1282725E+00, 0.1046604E+00, 0.1046604E+00 /
      data (ref_adm( 5,iz, 6, 2),iz = 1,20) / &
     & 0.2039412E+00, 0.2039412E+00, 0.2002917E+00, 0.1990274E+00, &
     & 0.1980282E+00, 0.1973447E+00, 0.1961401E+00, 0.1940879E+00, &
     & 0.1914519E+00, 0.1882956E+00, 0.1848626E+00, 0.1800965E+00, &
     & 0.1745335E+00, 0.1661200E+00, 0.1617722E+00, 0.1518655E+00, &
     & 0.1416450E+00, 0.1282725E+00, 0.1046604E+00, 0.1046604E+00 /
      data (ref_adm( 5,iz, 7, 2),iz = 1,20) / &
     & 0.2039412E+00, 0.2039412E+00, 0.2002917E+00, 0.1990275E+00, &
     & 0.1980282E+00, 0.1973447E+00, 0.1961401E+00, 0.1940879E+00, &
     & 0.1914519E+00, 0.1882956E+00, 0.1848626E+00, 0.1800965E+00, &
     & 0.1745335E+00, 0.1692950E+00, 0.1617722E+00, 0.1518655E+00, &
     & 0.1416450E+00, 0.1282725E+00, 0.1046604E+00, 0.1046604E+00 /
      data (ref_adm( 5,iz, 8, 2),iz = 1,20) / &
     & 0.2039412E+00, 0.2039412E+00, 0.2002917E+00, 0.1990274E+00, &
     & 0.1980282E+00, 0.1973447E+00, 0.1961401E+00, 0.1940879E+00, &
     & 0.1914519E+00, 0.1882956E+00, 0.1848626E+00, 0.1800965E+00, &
     & 0.1745335E+00, 0.1692950E+00, 0.1617722E+00, 0.1518655E+00, &
     & 0.1416450E+00, 0.1282725E+00, 0.1046604E+00, 0.1046604E+00 /
      data (ref_adm( 5,iz, 9, 2),iz = 1,20) / &
     & 0.2039412E+00, 0.2039412E+00, 0.2002917E+00, 0.1990275E+00, &
     & 0.1980282E+00, 0.1973447E+00, 0.1961401E+00, 0.1940879E+00, &
     & 0.1914519E+00, 0.1882956E+00, 0.1848626E+00, 0.1800965E+00, &
     & 0.1745335E+00, 0.1692950E+00, 0.1617722E+00, 0.1518655E+00, &
     & 0.1416450E+00, 0.1282725E+00, 0.1046604E+00, 0.1046604E+00 /
      data (ref_adm( 5,iz,10, 2),iz = 1,20) / &
     & 0.2039412E+00, 0.2039412E+00, 0.2002917E+00, 0.1990274E+00, &
     & 0.1980282E+00, 0.1973447E+00, 0.1961401E+00, 0.1940879E+00, &
     & 0.1914519E+00, 0.1882956E+00, 0.1848626E+00, 0.1800965E+00, &
     & 0.1745335E+00, 0.1692950E+00, 0.1617722E+00, 0.1518655E+00, &
     & 0.1416450E+00, 0.1282725E+00, 0.1046604E+00, 0.1046604E+00 /
      data (ref_adm( 5,iz,11, 2),iz = 1,20) / &
     & 0.2039412E+00, 0.2039412E+00, 0.2002917E+00, 0.1990275E+00, &
     & 0.1980282E+00, 0.1973447E+00, 0.1961401E+00, 0.1940879E+00, &
     & 0.1914519E+00, 0.1882956E+00, 0.1848626E+00, 0.1800965E+00, &
     & 0.1745335E+00, 0.1692950E+00, 0.1617722E+00, 0.1518655E+00, &
     & 0.1416450E+00, 0.1282725E+00, 0.1046604E+00, 0.1046604E+00 /
      data (ref_adm( 5,iz,12, 2),iz = 1,20) / &
     & 0.2039412E+00, 0.2039412E+00, 0.2002917E+00, 0.1990274E+00, &
     & 0.1980282E+00, 0.1973447E+00, 0.1961401E+00, 0.1940879E+00, &
     & 0.1914519E+00, 0.1882956E+00, 0.1848626E+00, 0.1800965E+00, &
     & 0.1745335E+00, 0.1692950E+00, 0.1617722E+00, 0.1518655E+00, &
     & 0.1416450E+00, 0.1282725E+00, 0.1046604E+00, 0.1046604E+00 /
      data (ref_adm( 5,iz,13, 2),iz = 1,20) / &
     & 0.2039412E+00, 0.2039412E+00, 0.2002917E+00, 0.1990275E+00, &
     & 0.1980282E+00, 0.1973447E+00, 0.1961401E+00, 0.1940879E+00, &
     & 0.1914519E+00, 0.1882956E+00, 0.1848626E+00, 0.1800965E+00, &
     & 0.1745335E+00, 0.1692950E+00, 0.1617722E+00, 0.1518655E+00, &
     & 0.1416450E+00, 0.1282725E+00, 0.1046604E+00, 0.1046604E+00 /
      data (ref_adm( 5,iz,14, 2),iz = 1,20) / &
     & 0.2039412E+00, 0.2039412E+00, 0.2002917E+00, 0.1990274E+00, &
     & 0.1980282E+00, 0.1973447E+00, 0.1961401E+00, 0.1940879E+00, &
     & 0.1914519E+00, 0.1882956E+00, 0.1848626E+00, 0.1800965E+00, &
     & 0.1745335E+00, 0.1692950E+00, 0.1617722E+00, 0.1518655E+00, &
     & 0.1416450E+00, 0.1282725E+00, 0.1046604E+00, 0.1046604E+00 /
      data (ref_adm( 5,iz,15, 2),iz = 1,20) / &
     & 0.2039412E+00, 0.2039412E+00, 0.2002917E+00, 0.1990275E+00, &
     & 0.1980282E+00, 0.1973447E+00, 0.1961401E+00, 0.1940879E+00, &
     & 0.1914519E+00, 0.1882956E+00, 0.1848626E+00, 0.1800965E+00, &
     & 0.1745335E+00, 0.1692950E+00, 0.1617722E+00, 0.1518655E+00, &
     & 0.1416450E+00, 0.1282725E+00, 0.1046604E+00, 0.1046604E+00 /
      data (ref_adm( 5,iz,16, 2),iz = 1,20) / &
     & 0.2039412E+00, 0.2039412E+00, 0.2002917E+00, 0.1990274E+00, &
     & 0.1980282E+00, 0.1973447E+00, 0.1961401E+00, 0.1940879E+00, &
     & 0.1914519E+00, 0.1882956E+00, 0.1848626E+00, 0.1800965E+00, &
     & 0.1745335E+00, 0.1692950E+00, 0.1617722E+00, 0.1518655E+00, &
     & 0.1416450E+00, 0.1282725E+00, 0.1046604E+00, 0.1046604E+00 /
      data (ref_adm( 5,iz,17, 2),iz = 1,20) / &
     & 0.2039412E+00, 0.2039412E+00, 0.2002917E+00, 0.1990275E+00, &
     & 0.1980282E+00, 0.1973447E+00, 0.1961401E+00, 0.1940879E+00, &
     & 0.1914519E+00, 0.1882956E+00, 0.1848626E+00, 0.1800965E+00, &
     & 0.1745335E+00, 0.1692950E+00, 0.1617722E+00, 0.1518655E+00, &
     & 0.1416450E+00, 0.1282725E+00, 0.1046604E+00, 0.1046604E+00 /
      data (ref_adm( 5,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.4448183E+04
      data (ref_adm( 5,iz, 1, 3),iz = 1,20) / &
     & 0.1778814E+00, 0.1778814E+00, 0.1664060E+00, 0.1624494E+00, &
     & 0.1597786E+00, 0.1583549E+00, 0.1569361E+00, 0.1554613E+00, &
     & 0.1547258E+00, 0.1546798E+00, 0.1555493E+00, 0.1579055E+00, &
     & 0.1614572E+00, 0.1653527E+00, 0.1255100E+00, 0.1441900E+00, &
     & 0.1895961E+00, 0.2022534E+00, 0.2089902E+00, 0.2089902E+00 /
      data (ref_adm( 5,iz, 2, 3),iz = 1,20) / &
     & 0.1778814E+00, 0.1778814E+00, 0.1664060E+00, 0.1624494E+00, &
     & 0.1597786E+00, 0.1583549E+00, 0.1569361E+00, 0.1554613E+00, &
     & 0.1547258E+00, 0.1546798E+00, 0.1555493E+00, 0.1579055E+00, &
     & 0.1614572E+00, 0.1653527E+00, 0.1255100E+00, 0.1441900E+00, &
     & 0.1895961E+00, 0.2022534E+00, 0.2089902E+00, 0.2089902E+00 /
      data (ref_adm( 5,iz, 3, 3),iz = 1,20) / &
     & 0.1778814E+00, 0.1778814E+00, 0.1664060E+00, 0.1624494E+00, &
     & 0.1597786E+00, 0.1583549E+00, 0.1569361E+00, 0.1554613E+00, &
     & 0.1547258E+00, 0.1546798E+00, 0.1555493E+00, 0.1579055E+00, &
     & 0.1614572E+00, 0.1981000E+00, 0.1713481E+00, 0.1467200E+00, &
     & 0.1805900E+00, 0.2022534E+00, 0.3231262E-08, 0.3231262E-08 /
      data (ref_adm( 5,iz, 4, 3),iz = 1,20) / &
     & 0.1778814E+00, 0.1778814E+00, 0.1664060E+00, 0.1624494E+00, &
     & 0.1597786E+00, 0.1583549E+00, 0.1569361E+00, 0.1554613E+00, &
     & 0.1547258E+00, 0.1546798E+00, 0.1555493E+00, 0.1579055E+00, &
     & 0.1614572E+00, 0.1566800E+00, 0.1530900E+00, 0.1798834E+00, &
     & 0.1895961E+00, 0.2022534E+00, 0.2089902E+00, 0.2089902E+00 /
      data (ref_adm( 5,iz, 5, 3),iz = 1,20) / &
     & 0.1778814E+00, 0.1778814E+00, 0.1664060E+00, 0.1624494E+00, &
     & 0.1597786E+00, 0.1583549E+00, 0.1569361E+00, 0.1554613E+00, &
     & 0.1717600E+00, 0.1546798E+00, 0.1555493E+00, 0.1579055E+00, &
     & 0.1614572E+00, 0.1609800E+00, 0.1681300E+00, 0.1798834E+00, &
     & 0.1895961E+00, 0.2022534E+00, 0.2089903E+00, 0.2089903E+00 /
      data (ref_adm( 5,iz, 6, 3),iz = 1,20) / &
     & 0.1778814E+00, 0.1778814E+00, 0.1664060E+00, 0.1624494E+00, &
     & 0.1597786E+00, 0.1583549E+00, 0.1569361E+00, 0.1554613E+00, &
     & 0.1547258E+00, 0.1546798E+00, 0.1735800E+00, 0.1880100E+00, &
     & 0.2378400E+00, 0.1878200E+00, 0.1713481E+00, 0.1798834E+00, &
     & 0.1895961E+00, 0.2022534E+00, 0.2089902E+00, 0.2089902E+00 /
      data (ref_adm( 5,iz, 7, 3),iz = 1,20) / &
     & 0.1778814E+00, 0.1778814E+00, 0.1664060E+00, 0.1624494E+00, &
     & 0.1597786E+00, 0.1583549E+00, 0.1569361E+00, 0.1554613E+00, &
     & 0.1547258E+00, 0.1546798E+00, 0.1379500E+00, 0.1579055E+00, &
     & 0.1456400E+00, 0.1612300E+00, 0.1713481E+00, 0.1798834E+00, &
     & 0.1895961E+00, 0.2022534E+00, 0.2089903E+00, 0.2089903E+00 /
      data (ref_adm( 5,iz, 8, 3),iz = 1,20) / &
     & 0.1778814E+00, 0.1778814E+00, 0.1664060E+00, 0.1624494E+00, &
     & 0.1597786E+00, 0.1583549E+00, 0.1569361E+00, 0.1554613E+00, &
     & 0.1547258E+00, 0.1546798E+00, 0.1555493E+00, 0.1579055E+00, &
     & 0.1513000E+00, 0.1523100E+00, 0.1713481E+00, 0.1798834E+00, &
     & 0.1895961E+00, 0.2022534E+00, 0.2089902E+00, 0.2089902E+00 /
      data (ref_adm( 5,iz, 9, 3),iz = 1,20) / &
     & 0.1778814E+00, 0.1778814E+00, 0.1664060E+00, 0.1624494E+00, &
     & 0.1597786E+00, 0.1583549E+00, 0.1569361E+00, 0.1554613E+00, &
     & 0.1547258E+00, 0.1546798E+00, 0.2172800E+00, 0.1579055E+00, &
     & 0.1573100E+00, 0.1796900E+00, 0.1713481E+00, 0.1798834E+00, &
     & 0.1895961E+00, 0.2022534E+00, 0.2089903E+00, 0.2089903E+00 /
      data (ref_adm( 5,iz,10, 3),iz = 1,20) / &
     & 0.1778814E+00, 0.1778814E+00, 0.1664060E+00, 0.1624494E+00, &
     & 0.1597786E+00, 0.1583549E+00, 0.1569361E+00, 0.1554613E+00, &
     & 0.1547258E+00, 0.1546798E+00, 0.1555493E+00, 0.1579055E+00, &
     & 0.1471200E+00, 0.1602200E+00, 0.1713481E+00, 0.1798834E+00, &
     & 0.1895961E+00, 0.2022534E+00, 0.2089902E+00, 0.2089902E+00 /
      data (ref_adm( 5,iz,11, 3),iz = 1,20) / &
     & 0.1778814E+00, 0.1778814E+00, 0.1664060E+00, 0.1624494E+00, &
     & 0.1597786E+00, 0.1583549E+00, 0.1569361E+00, 0.1554613E+00, &
     & 0.1547258E+00, 0.1546798E+00, 0.1555493E+00, 0.1579055E+00, &
     & 0.1355900E+00, 0.1438200E+00, 0.1713481E+00, 0.1798834E+00, &
     & 0.1895961E+00, 0.2022534E+00, 0.2089903E+00, 0.2089903E+00 /
      data (ref_adm( 5,iz,12, 3),iz = 1,20) / &
     & 0.1778814E+00, 0.1778814E+00, 0.1664060E+00, 0.1624494E+00, &
     & 0.1597786E+00, 0.1583549E+00, 0.1569361E+00, 0.1554613E+00, &
     & 0.1547258E+00, 0.1546798E+00, 0.1555493E+00, 0.1579055E+00, &
     & 0.1614572E+00, 0.1601700E+00, 0.1713481E+00, 0.1798834E+00, &
     & 0.1895961E+00, 0.2022534E+00, 0.2089902E+00, 0.2089902E+00 /
      data (ref_adm( 5,iz,13, 3),iz = 1,20) / &
     & 0.1778814E+00, 0.1778814E+00, 0.1664060E+00, 0.1624494E+00, &
     & 0.1597786E+00, 0.1583549E+00, 0.1569361E+00, 0.1554613E+00, &
     & 0.1547258E+00, 0.1546798E+00, 0.1555493E+00, 0.1579055E+00, &
     & 0.1614572E+00, 0.1810000E+00, 0.1713481E+00, 0.1798834E+00, &
     & 0.1895961E+00, 0.2022534E+00, 0.2089903E+00, 0.2089903E+00 /
      data (ref_adm( 5,iz,14, 3),iz = 1,20) / &
     & 0.1778814E+00, 0.1778814E+00, 0.1664060E+00, 0.1624494E+00, &
     & 0.1597786E+00, 0.1583549E+00, 0.1569361E+00, 0.1554613E+00, &
     & 0.1547258E+00, 0.1546798E+00, 0.1555493E+00, 0.1579055E+00, &
     & 0.1614572E+00, 0.1563100E+00, 0.1713481E+00, 0.1798834E+00, &
     & 0.1895961E+00, 0.2022534E+00, 0.2089902E+00, 0.2089902E+00 /
      data (ref_adm( 5,iz,15, 3),iz = 1,20) / &
     & 0.1778814E+00, 0.1778814E+00, 0.1664060E+00, 0.1624494E+00, &
     & 0.1597786E+00, 0.1583549E+00, 0.1569361E+00, 0.1554613E+00, &
     & 0.1547258E+00, 0.1546798E+00, 0.1555493E+00, 0.1579055E+00, &
     & 0.1614572E+00, 0.1653528E+00, 0.1713481E+00, 0.1798834E+00, &
     & 0.1895961E+00, 0.2022534E+00, 0.2089903E+00, 0.2089903E+00 /
      data (ref_adm( 5,iz,16, 3),iz = 1,20) / &
     & 0.1778814E+00, 0.1778814E+00, 0.1664060E+00, 0.1624494E+00, &
     & 0.1597786E+00, 0.1583549E+00, 0.1569361E+00, 0.1554613E+00, &
     & 0.1547258E+00, 0.1546798E+00, 0.1555493E+00, 0.1579055E+00, &
     & 0.1614572E+00, 0.1653527E+00, 0.1713481E+00, 0.1798834E+00, &
     & 0.1895961E+00, 0.2022534E+00, 0.2089902E+00, 0.2089902E+00 /
      data (ref_adm( 5,iz,17, 3),iz = 1,20) / &
     & 0.1778814E+00, 0.1778814E+00, 0.1664060E+00, 0.1624494E+00, &
     & 0.1597786E+00, 0.1583549E+00, 0.1569361E+00, 0.1554613E+00, &
     & 0.1547258E+00, 0.1546798E+00, 0.1555493E+00, 0.1579055E+00, &
     & 0.1614572E+00, 0.1653528E+00, 0.1713481E+00, 0.1798834E+00, &
     & 0.1895961E+00, 0.2022534E+00, 0.2089903E+00, 0.2089903E+00 /
      data (ref_adm( 5,iz,18, 3),iz = 1,20) / &
     & 0.2435948E+00, 0.2435948E+00, 0.2392357E+00, 0.2377256E+00, &
     & 0.2365321E+00, 0.2357157E+00, 0.2342769E+00, 0.2318256E+00, &
     & 0.2286772E+00, 0.2249071E+00, 0.2208066E+00, 0.2151138E+00, &
     & 0.2084692E+00, 0.2022121E+00, 0.1932266E+00, 0.1813937E+00, &
     & 0.1691860E+00, 0.1532134E+00, 0.1250102E+00, 0.1250102E+00 /
      data (ref_adm( 5,iz,19, 3),iz = 1,20) / &
     & 0.2435948E+00, 0.2435948E+00, 0.2392357E+00, 0.2377257E+00, &
     & 0.2365321E+00, 0.2357157E+00, 0.2342769E+00, 0.2318256E+00, &
     & 0.2286772E+00, 0.2249071E+00, 0.2208066E+00, 0.2151138E+00, &
     & 0.2084692E+00, 0.2022121E+00, 0.1932266E+00, 0.2225700E+00, &
     & 0.1691860E+00, 0.1532134E+00, 0.1250102E+00, 0.1250102E+00 /
      data (ref_adm( 5,iz,20, 3),iz = 1,20) / &
     & 0.2435948E+00, 0.2435948E+00, 0.2392357E+00, 0.2377256E+00, &
     & 0.2365321E+00, 0.2357157E+00, 0.2342769E+00, 0.2318256E+00, &
     & 0.2286772E+00, 0.2249071E+00, 0.2208066E+00, 0.2151138E+00, &
     & 0.2084692E+00, 0.2022121E+00, 0.1932266E+00, 0.1813937E+00, &
     & 0.1691860E+00, 0.1532134E+00, 0.1250102E+00, 0.1250102E+00 /
      data (ref_adm( 5,iz,21, 3),iz = 1,20) / &
     & 0.2435948E+00, 0.2435948E+00, 0.2392357E+00, 0.2377257E+00, &
     & 0.2365321E+00, 0.2357157E+00, 0.2342769E+00, 0.2318256E+00, &
     & 0.2286772E+00, 0.2249071E+00, 0.2208066E+00, 0.2151138E+00, &
     & 0.2084692E+00, 0.2022121E+00, 0.1932266E+00, 0.1813937E+00, &
     & 0.1691860E+00, 0.1532134E+00, 0.1250102E+00, 0.1250102E+00 /
      data (ref_adm( 5,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 5,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo  0.1918544E+00
      data (ref_adm( 5,iz, 1, 4),iz = 1,20) / &
     & 0.1919076E+00, 0.1919076E+00, 0.1613300E+00, 0.1787037E+00, &
     & 0.1764215E+00, 0.2029700E+00, 0.2204200E+00, 0.1878500E+00, &
     & 0.1724300E+00, 0.1701432E+00, 0.1699346E+00, 0.1321400E+00, &
     & 0.1612700E+00, 0.1322500E+00, 0.1314600E+00, 0.1604400E+00, &
     & 0.1846854E+00, 0.1958000E+00, 0.1326100E+00, 0.1326100E+00 /
      data (ref_adm( 5,iz, 2, 4),iz = 1,20) / &
     & 0.1919076E+00, 0.1919076E+00, 0.1613300E+00, 0.1787037E+00, &
     & 0.1764215E+00, 0.2029700E+00, 0.2204200E+00, 0.1878500E+00, &
     & 0.1724300E+00, 0.1701432E+00, 0.1699346E+00, 0.1321400E+00, &
     & 0.1612700E+00, 0.1322500E+00, 0.1314600E+00, 0.1604400E+00, &
     & 0.1846854E+00, 0.1958000E+00, 0.1326100E+00, 0.1326100E+00 /
      data (ref_adm( 5,iz, 3, 4),iz = 1,20) / &
     & 0.1919076E+00, 0.1919076E+00, 0.1820644E+00, 0.1787037E+00, &
     & 0.1764215E+00, 0.3214900E+00, 0.2297200E+00, 0.1757900E+00, &
     & 0.1782800E+00, 0.2318800E+00, 0.1855200E+00, 0.1784300E+00, &
     & 0.1837500E+00, 0.1411000E+00, 0.1760374E+00, 0.1507600E+00, &
     & 0.1846854E+00, 0.1908514E+00, 0.3017119E-01, 0.3017119E-01 /
      data (ref_adm( 5,iz, 4, 4),iz = 1,20) / &
     & 0.2241300E+00, 0.2241300E+00, 0.2472800E+00, 0.1743400E+00, &
     & 0.1635300E+00, 0.2161000E+00, 0.1738494E+00, 0.1652700E+00, &
     & 0.2000200E+00, 0.1665400E+00, 0.1569400E+00, 0.1705247E+00, &
     & 0.1471600E+00, 0.1378700E+00, 0.1489700E+00, 0.1799502E+00, &
     & 0.1846854E+00, 0.1908514E+00, 0.1896321E+00, 0.1896321E+00 /
      data (ref_adm( 5,iz, 5, 4),iz = 1,20) / &
     & 0.1919076E+00, 0.1919076E+00, 0.2396400E+00, 0.1787037E+00, &
     & 0.1723400E+00, 0.1752036E+00, 0.1879700E+00, 0.1722139E+00, &
     & 0.2001500E+00, 0.1763600E+00, 0.1794500E+00, 0.1643000E+00, &
     & 0.1781800E+00, 0.1500800E+00, 0.1530100E+00, 0.1607600E+00, &
     & 0.1481900E+00, 0.1903600E+00, 0.1896321E+00, 0.1896321E+00 /
      data (ref_adm( 5,iz, 6, 4),iz = 1,20) / &
     & 0.1919076E+00, 0.1919076E+00, 0.1820644E+00, 0.1682400E+00, &
     & 0.1795300E+00, 0.2219300E+00, 0.1863400E+00, 0.1655400E+00, &
     & 0.1748600E+00, 0.1598900E+00, 0.1576800E+00, 0.1510000E+00, &
     & 0.1406900E+00, 0.1506200E+00, 0.1522100E+00, 0.1581400E+00, &
     & 0.1846854E+00, 0.1521200E+00, 0.1721600E+00, 0.1721600E+00 /
      data (ref_adm( 5,iz, 7, 4),iz = 1,20) / &
     & 0.1919076E+00, 0.1919076E+00, 0.2736000E+00, 0.1825500E+00, &
     & 0.2095500E+00, 0.1985600E+00, 0.1770200E+00, 0.1568900E+00, &
     & 0.1931000E+00, 0.1659200E+00, 0.1601100E+00, 0.1503800E+00, &
     & 0.1511600E+00, 0.1410600E+00, 0.1509200E+00, 0.1729200E+00, &
     & 0.1846854E+00, 0.1908514E+00, 0.1896321E+00, 0.1896321E+00 /
      data (ref_adm( 5,iz, 8, 4),iz = 1,20) / &
     & 0.1919076E+00, 0.1919076E+00, 0.1820644E+00, 0.1716600E+00, &
     & 0.1845600E+00, 0.1727500E+00, 0.1780300E+00, 0.1644200E+00, &
     & 0.1465800E+00, 0.1608700E+00, 0.1568100E+00, 0.1599200E+00, &
     & 0.1480600E+00, 0.1529000E+00, 0.1437300E+00, 0.1387600E+00, &
     & 0.1663100E+00, 0.1723600E+00, 0.1896321E+00, 0.1896321E+00 /
      data (ref_adm( 5,iz, 9, 4),iz = 1,20) / &
     & 0.1919076E+00, 0.1919076E+00, 0.1820644E+00, 0.1787037E+00, &
     & 0.2378300E+00, 0.1763500E+00, 0.1721300E+00, 0.1866800E+00, &
     & 0.1866300E+00, 0.1659100E+00, 0.1597400E+00, 0.1568100E+00, &
     & 0.1523000E+00, 0.1610100E+00, 0.1767600E+00, 0.1703000E+00, &
     & 0.1555400E+00, 0.1908514E+00, 0.1896321E+00, 0.1896321E+00 /
      data (ref_adm( 5,iz,10, 4),iz = 1,20) / &
     & 0.1919076E+00, 0.1919076E+00, 0.1820644E+00, 0.1787037E+00, &
     & 0.2012400E+00, 0.1611100E+00, 0.1738494E+00, 0.1633000E+00, &
     & 0.1931000E+00, 0.1851100E+00, 0.1588000E+00, 0.1707100E+00, &
     & 0.1606600E+00, 0.1596000E+00, 0.1760374E+00, 0.1799502E+00, &
     & 0.1846854E+00, 0.1908514E+00, 0.1422300E+00, 0.1422300E+00 /
      data (ref_adm( 5,iz,11, 4),iz = 1,20) / &
     & 0.1919076E+00, 0.1919076E+00, 0.1820644E+00, 0.1787037E+00, &
     & 0.1764215E+00, 0.1752036E+00, 0.1425400E+00, 0.1722139E+00, &
     & 0.1709845E+00, 0.1701432E+00, 0.1653600E+00, 0.1770100E+00, &
     & 0.1639300E+00, 0.1703700E+00, 0.1723100E+00, 0.1799502E+00, &
     & 0.1846854E+00, 0.1908514E+00, 0.1896321E+00, 0.1896321E+00 /
      data (ref_adm( 5,iz,12, 4),iz = 1,20) / &
     & 0.1919076E+00, 0.1919076E+00, 0.2745600E+00, 0.2101500E+00, &
     & 0.1764215E+00, 0.1752036E+00, 0.1738494E+00, 0.1722139E+00, &
     & 0.1809300E+00, 0.1701432E+00, 0.1699346E+00, 0.1772600E+00, &
     & 0.1697300E+00, 0.1555700E+00, 0.1596700E+00, 0.1799502E+00, &
     & 0.1846854E+00, 0.1908514E+00, 0.1896321E+00, 0.1896321E+00 /
      data (ref_adm( 5,iz,13, 4),iz = 1,20) / &
     & 0.1919076E+00, 0.1919076E+00, 0.2244700E+00, 0.1787037E+00, &
     & 0.1956700E+00, 0.1652800E+00, 0.2044700E+00, 0.1722139E+00, &
     & 0.1666500E+00, 0.1899300E+00, 0.1478500E+00, 0.1514000E+00, &
     & 0.1665400E+00, 0.1749700E+00, 0.1760374E+00, 0.1799502E+00, &
     & 0.1846854E+00, 0.1908514E+00, 0.1896321E+00, 0.1896321E+00 /
      data (ref_adm( 5,iz,14, 4),iz = 1,20) / &
     & 0.1919076E+00, 0.1919076E+00, 0.2138400E+00, 0.1787037E+00, &
     & 0.1764215E+00, 0.2032800E+00, 0.1858600E+00, 0.1722139E+00, &
     & 0.1412700E+00, 0.1701432E+00, 0.1644600E+00, 0.1705800E+00, &
     & 0.1718122E+00, 0.1764700E+00, 0.1557200E+00, 0.1799502E+00, &
     & 0.1846854E+00, 0.1908514E+00, 0.1896321E+00, 0.1896321E+00 /
      data (ref_adm( 5,iz,15, 4),iz = 1,20) / &
     & 0.1919076E+00, 0.1919076E+00, 0.1820644E+00, 0.1787037E+00, &
     & 0.1764215E+00, 0.1752036E+00, 0.2157300E+00, 0.1800900E+00, &
     & 0.1709845E+00, 0.1534100E+00, 0.1755000E+00, 0.1369100E+00, &
     & 0.1886600E+00, 0.1567700E+00, 0.1760374E+00, 0.1799502E+00, &
     & 0.1846854E+00, 0.1908514E+00, 0.1896321E+00, 0.1896321E+00 /
      data (ref_adm( 5,iz,16, 4),iz = 1,20) / &
     & 0.1919076E+00, 0.1919076E+00, 0.1820644E+00, 0.1787037E+00, &
     & 0.1764215E+00, 0.1752036E+00, 0.1833900E+00, 0.1861400E+00, &
     & 0.1855700E+00, 0.1701432E+00, 0.1644200E+00, 0.2023200E+00, &
     & 0.1555600E+00, 0.1734290E+00, 0.1370800E+00, 0.1799502E+00, &
     & 0.1846854E+00, 0.1908514E+00, 0.1896321E+00, 0.1896321E+00 /
      data (ref_adm( 5,iz,17, 4),iz = 1,20) / &
     & 0.1919076E+00, 0.1919076E+00, 0.1820644E+00, 0.1787037E+00, &
     & 0.1764215E+00, 0.1752036E+00, 0.1738494E+00, 0.1722139E+00, &
     & 0.1879900E+00, 0.1909700E+00, 0.1997400E+00, 0.1705247E+00, &
     & 0.1775900E+00, 0.1738500E+00, 0.1653000E+00, 0.1799502E+00, &
     & 0.1846854E+00, 0.1908514E+00, 0.1896321E+00, 0.1896321E+00 /
      data (ref_adm( 5,iz,18, 4),iz = 1,20) / &
     & 0.1888090E+00, 0.1888090E+00, 0.1852247E+00, 0.1823478E+00, &
     & 0.1803842E+00, 0.1791807E+00, 0.1776386E+00, 0.1760876E+00, &
     & 0.1853000E+00, 0.1991000E+00, 0.2029500E+00, 0.1953500E+00, &
     & 0.1562600E+00, 0.1779687E+00, 0.1544600E+00, 0.1581500E+00, &
     & 0.1900266E+00, 0.1965449E+00, 0.1955302E+00, 0.1955302E+00 /
      data (ref_adm( 5,iz,19, 4),iz = 1,20) / &
     & 0.1889618E+00, 0.1889618E+00, 0.1855531E+00, 0.1826677E+00, &
     & 0.1806695E+00, 0.1795031E+00, 0.1780575E+00, 0.1764665E+00, &
     & 0.1740400E+00, 0.2000800E+00, 0.1961900E+00, 0.1915500E+00, &
     & 0.2223300E+00, 0.1631500E+00, 0.1719600E+00, 0.1543300E+00, &
     & 0.1551800E+00, 0.1789600E+00, 0.1953305E+00, 0.1953305E+00 /
      data (ref_adm( 5,iz,20, 4),iz = 1,20) / &
     & 0.1891263E+00, 0.1891263E+00, 0.1858095E+00, 0.1829218E+00, &
     & 0.1809039E+00, 0.1797464E+00, 0.1783942E+00, 0.1768154E+00, &
     & 0.1756105E+00, 0.1748113E+00, 0.2088700E+00, 0.2114200E+00, &
     & 0.1766718E+00, 0.1572900E+00, 0.1821500E+00, 0.1540500E+00, &
     & 0.1590800E+00, 0.1963302E+00, 0.1951634E+00, 0.1951634E+00 /
      data (ref_adm( 5,iz,21, 4),iz = 1,20) / &
     & 0.1892387E+00, 0.1892387E+00, 0.1861270E+00, 0.1832488E+00, &
     & 0.1811454E+00, 0.1800418E+00, 0.1787362E+00, 0.1771762E+00, &
     & 0.1759892E+00, 0.1751832E+00, 0.1749756E+00, 0.1756168E+00, &
     & 0.1769043E+00, 0.1634000E+00, 0.2215400E+00, 0.1852317E+00, &
     & 0.1477100E+00, 0.1667300E+00, 0.1950318E+00, 0.1950318E+00 /
      data (ref_adm( 5,iz,22, 4),iz = 1,20) / &
     & 0.1942990E+00, 0.1942990E+00, 0.1950448E+00, 0.1970010E+00, &
     & 0.1998354E+00, 0.2014918E+00, 0.2011093E+00, 0.2006832E+00, &
     & 0.2005099E+00, 0.2011276E+00, 0.2029749E+00, 0.2068728E+00, &
     & 0.2122825E+00, 0.2171621E+00, 0.2244700E+00, 0.2333715E+00, &
     & 0.1762500E+00, 0.1519700E+00, 0.1497300E+00, 0.1497300E+00 /
      data (ref_adm( 5,iz,23, 4),iz = 1,20) / &
     & 0.1942872E+00, 0.1942872E+00, 0.1948385E+00, 0.1964261E+00, &
     & 0.1994574E+00, 0.2019961E+00, 0.2029813E+00, 0.2022806E+00, &
     & 0.2022288E+00, 0.2024776E+00, 0.2040454E+00, 0.2073176E+00, &
     & 0.2125531E+00, 0.2169439E+00, 0.2234883E+00, 0.2316070E+00, &
     & 0.2371658E+00, 0.2372543E+00, 0.2168373E+00, 0.2168373E+00 /
      data (ref_adm( 5,iz,24, 4),iz = 1,20) / &
     & 0.1941489E+00, 0.1941489E+00, 0.1942109E+00, 0.1957643E+00, &
     & 0.2093400E+00, 0.2020661E+00, 0.2041397E+00, 0.2040173E+00, &
     & 0.2224300E+00, 0.2041499E+00, 0.2052565E+00, 0.2081707E+00, &
     & 0.2128608E+00, 0.2170037E+00, 0.2228366E+00, 0.2301180E+00, &
     & 0.2354660E+00, 0.2350764E+00, 0.2157065E+00, 0.2157065E+00 /
      data (ref_adm( 5,iz,25, 4),iz = 1,20) / &
     & 0.1940603E+00, 0.1940603E+00, 0.1939713E+00, 0.1951246E+00, &
     & 0.1978405E+00, 0.2296200E+00, 0.2050444E+00, 0.2058066E+00, &
     & 0.2056573E+00, 0.2058744E+00, 0.2064824E+00, 0.2091487E+00, &
     & 0.2131330E+00, 0.2173496E+00, 0.2222606E+00, 0.2290000E+00, &
     & 0.2340062E+00, 0.2328863E+00, 0.2150355E+00, 0.2150355E+00 /
      data (ref_adm( 5,iz,26, 4),iz = 1,20) / &
     & 0.1940996E+00, 0.1940996E+00, 0.1936719E+00, 0.1947531E+00, &
     & 0.1971123E+00, 0.2007248E+00, 0.2429900E+00, 0.2121900E+00, &
     & 0.2263800E+00, 0.2077584E+00, 0.2081793E+00, 0.2102749E+00, &
     & 0.2136497E+00, 0.2176408E+00, 0.2223709E+00, 0.2276424E+00, &
     & 0.2322399E+00, 0.2309541E+00, 0.2142611E+00, 0.2142611E+00 /
      data (ref_adm( 5,iz,27, 4),iz = 1,20) / &
     & 0.1938921E+00, 0.1938921E+00, 0.1937651E+00, 0.1949165E+00, &
     & 0.1966569E+00, 0.1995795E+00, 0.2045389E+00, 0.2085015E+00, &
     & 0.2093542E+00, 0.2094107E+00, 0.2098605E+00, 0.2116358E+00, &
     & 0.2143520E+00, 0.2178083E+00, 0.2224192E+00, 0.2269502E+00, &
     & 0.2307172E+00, 0.2293668E+00, 0.2136638E+00, 0.2136638E+00 /
      data (ref_adm( 5,iz,28, 4),iz = 1,20) / &
     & 0.1937720E+00, 0.1937720E+00, 0.1936812E+00, 0.1948574E+00, &
     & 0.1965133E+00, 0.1990550E+00, 0.2035353E+00, 0.2086069E+00, &
     & 0.2111981E+00, 0.2111788E+00, 0.2117396E+00, 0.2126517E+00, &
     & 0.2152999E+00, 0.2182038E+00, 0.2227665E+00, 0.2266580E+00, &
     & 0.2296118E+00, 0.2281981E+00, 0.2130108E+00, 0.2130108E+00 /
      data (ref_adm( 5,iz,29, 4),iz = 1,20) / &
     & 0.1936989E+00, 0.1936989E+00, 0.1935392E+00, 0.1953953E+00, &
     & 0.1966783E+00, 0.1987429E+00, 0.2024565E+00, 0.2081006E+00, &
     & 0.2124040E+00, 0.2130248E+00, 0.2134557E+00, 0.2139511E+00, &
     & 0.2163919E+00, 0.2187275E+00, 0.2227712E+00, 0.2263196E+00, &
     & 0.2287319E+00, 0.2268936E+00, 0.2126266E+00, 0.2126266E+00 /
      data (ref_adm( 5,iz,30, 4),iz = 1,20) / &
     & 0.1936963E+00, 0.1936963E+00, 0.1937169E+00, 0.1957196E+00, &
     & 0.1976313E+00, 0.1991641E+00, 0.2017875E+00, 0.2071363E+00, &
     & 0.2125403E+00, 0.2147228E+00, 0.2149072E+00, 0.2157705E+00, &
     & 0.2175226E+00, 0.2196669E+00, 0.2232669E+00, 0.2264288E+00, &
     & 0.2280746E+00, 0.2258847E+00, 0.2122994E+00, 0.2122994E+00 /
      data (ref_adm( 5,iz,31, 4),iz = 1,20) / &
     & 0.1914300E+00, 0.1914300E+00, 0.1939999E+00, 0.1964539E+00, &
     & 0.1985443E+00, 0.1998866E+00, 0.2017239E+00, 0.2062084E+00, &
     & 0.2124244E+00, 0.2162039E+00, 0.2162511E+00, 0.2172631E+00, &
     & 0.2184784E+00, 0.2206399E+00, 0.2233953E+00, 0.2265764E+00, &
     & 0.2277849E+00, 0.2247790E+00, 0.2121768E+00, 0.2121768E+00 /
      data (ref_adm( 5,iz,32, 4),iz = 1,20) / &
     & 0.1936571E+00, 0.1936571E+00, 0.1942872E+00, 0.1968472E+00, &
     & 0.1993383E+00, 0.2008226E+00, 0.2020876E+00, 0.2054812E+00, &
     & 0.2117154E+00, 0.2168459E+00, 0.2178466E+00, 0.2185958E+00, &
     & 0.2193797E+00, 0.2213258E+00, 0.2236150E+00, 0.2267331E+00, &
     & 0.2273583E+00, 0.2241233E+00, 0.2122133E+00, 0.2122133E+00 /
      data (ref_adm( 5,iz,33, 4),iz = 1,20) / &
     & 0.1937668E+00, 0.1937668E+00, 0.1942839E+00, 0.1975872E+00, &
     & 0.2005221E+00, 0.2019223E+00, 0.2030022E+00, 0.2049189E+00, &
     & 0.2108081E+00, 0.2171293E+00, 0.2191551E+00, 0.2198158E+00, &
     & 0.2206371E+00, 0.2222130E+00, 0.2241827E+00, 0.2270890E+00, &
     & 0.2272044E+00, 0.2236882E+00, 0.2122126E+00, 0.2122126E+00 /
      data (ref_adm( 5,iz,34, 4),iz = 1,20) / &
     & 0.1936905E+00, 0.1936905E+00, 0.1948052E+00, 0.1983945E+00, &
     & 0.2029446E+00, 0.2038946E+00, 0.2036396E+00, 0.2051287E+00, &
     & 0.2102809E+00, 0.2170351E+00, 0.2201958E+00, 0.2206651E+00, &
     & 0.2213591E+00, 0.2226422E+00, 0.2244580E+00, 0.2270947E+00, &
     & 0.2270309E+00, 0.2229978E+00, 0.2122350E+00, 0.2122350E+00 /
      data (ref_adm( 5,iz,35, 4),iz = 1,20) / &
     & 0.1935640E+00, 0.1935640E+00, 0.1948900E+00, 0.1992473E+00, &
     & 0.2071187E+00, 0.2066439E+00, 0.2043938E+00, 0.2052396E+00, &
     & 0.2094780E+00, 0.2169408E+00, 0.2208340E+00, 0.2214901E+00, &
     & 0.2220691E+00, 0.2231605E+00, 0.2249594E+00, 0.2271690E+00, &
     & 0.2270385E+00, 0.2227987E+00, 0.2122694E+00, 0.2122694E+00 /
      data (ref_adm( 5,iz,36, 4),iz = 1,20) / &
     & 0.1937465E+00, 0.1937465E+00, 0.2360000E+00, 0.2036400E+00, &
     & 0.2459100E+00, 0.2123400E+00, 0.2051910E+00, 0.2054340E+00, &
     & 0.2092795E+00, 0.2165729E+00, 0.2213895E+00, 0.2221204E+00, &
     & 0.2225501E+00, 0.2235201E+00, 0.2251712E+00, 0.2273544E+00, &
     & 0.2272376E+00, 0.2228046E+00, 0.2122947E+00, 0.2122947E+00 /
      data (ref_adm( 5,iz,37, 4),iz = 1,20) / &
     & 0.1937246E+00, 0.1937246E+00, 0.1950900E+00, 0.2002718E+00, &
     & 0.2275614E+00, 0.2189705E+00, 0.2056770E+00, 0.2055653E+00, &
     & 0.2092119E+00, 0.2164198E+00, 0.2215859E+00, 0.2222248E+00, &
     & 0.2230188E+00, 0.2239052E+00, 0.2254821E+00, 0.2275632E+00, &
     & 0.2270312E+00, 0.2226810E+00, 0.2122871E+00, 0.2122871E+00 /
      data (ref_adm( 5,iz,38, 4),iz = 1,20) / &
     & 0.1937246E+00, 0.1937246E+00, 0.1950900E+00, 0.2002718E+00, &
     & 0.2275614E+00, 0.2189705E+00, 0.2056770E+00, 0.2055653E+00, &
     & 0.2092119E+00, 0.2164198E+00, 0.2215859E+00, 0.2222248E+00, &
     & 0.2230188E+00, 0.2239052E+00, 0.2254821E+00, 0.2275632E+00, &
     & 0.2270312E+00, 0.2226810E+00, 0.2122871E+00, 0.2122871E+00 /
! Solar Zenith Angle 20.0 Albedo  0.1921733E+00
      data (ref_adm( 5,iz, 1, 5),iz = 1,20) / &
     & 0.1898400E+00, 0.1898400E+00, 0.2027100E+00, 0.1801900E+00, &
     & 0.1969800E+00, 0.1923600E+00, 0.1828400E+00, 0.1949000E+00, &
     & 0.1637800E+00, 0.1746800E+00, 0.1677588E+00, 0.1781000E+00, &
     & 0.1693600E+00, 0.1511500E+00, 0.1761887E+00, 0.1992800E+00, &
     & 0.1865928E+00, 0.1840100E+00, 0.1660800E+00, 0.1660800E+00 /
      data (ref_adm( 5,iz, 2, 5),iz = 1,20) / &
     & 0.1898400E+00, 0.1898400E+00, 0.2027100E+00, 0.1801900E+00, &
     & 0.1969800E+00, 0.1923600E+00, 0.1828400E+00, 0.1949000E+00, &
     & 0.1637800E+00, 0.1746800E+00, 0.1677588E+00, 0.1781000E+00, &
     & 0.1693600E+00, 0.1511500E+00, 0.1761887E+00, 0.1992800E+00, &
     & 0.1865928E+00, 0.1840100E+00, 0.1660800E+00, 0.1660800E+00 /
      data (ref_adm( 5,iz, 3, 5),iz = 1,20) / &
     & 0.2006100E+00, 0.2006100E+00, 0.1930900E+00, 0.1942800E+00, &
     & 0.1945200E+00, 0.1947600E+00, 0.1869000E+00, 0.1841400E+00, &
     & 0.1698200E+00, 0.1772200E+00, 0.1937000E+00, 0.1817000E+00, &
     & 0.1336300E+00, 0.1554300E+00, 0.1353300E+00, 0.1742700E+00, &
     & 0.1736800E+00, 0.1867400E+00, 0.3068792E-01, 0.3068792E-01 /
      data (ref_adm( 5,iz, 4, 5),iz = 1,20) / &
     & 0.2011800E+00, 0.2011800E+00, 0.1950800E+00, 0.1986000E+00, &
     & 0.1957500E+00, 0.1859300E+00, 0.1808000E+00, 0.1804400E+00, &
     & 0.1710600E+00, 0.1711600E+00, 0.2006400E+00, 0.1751800E+00, &
     & 0.1386800E+00, 0.1844400E+00, 0.1556300E+00, 0.1564600E+00, &
     & 0.1470400E+00, 0.1547900E+00, 0.1440700E+00, 0.1440700E+00 /
      data (ref_adm( 5,iz, 5, 5),iz = 1,20) / &
     & 0.1935900E+00, 0.1935900E+00, 0.1709200E+00, 0.1927200E+00, &
     & 0.2128400E+00, 0.1634700E+00, 0.1770100E+00, 0.1668400E+00, &
     & 0.1827000E+00, 0.1672300E+00, 0.1402400E+00, 0.1554100E+00, &
     & 0.1571800E+00, 0.1237700E+00, 0.1733100E+00, 0.1684400E+00, &
     & 0.1857400E+00, 0.1938665E+00, 0.1939949E+00, 0.1939949E+00 /
      data (ref_adm( 5,iz, 6, 5),iz = 1,20) / &
     & 0.1775200E+00, 0.1775200E+00, 0.1838400E+00, 0.1782700E+00, &
     & 0.1821600E+00, 0.1640400E+00, 0.1719700E+00, 0.1594300E+00, &
     & 0.1539700E+00, 0.1739900E+00, 0.1573600E+00, 0.1504300E+00, &
     & 0.1550800E+00, 0.1729732E+00, 0.1595900E+00, 0.2032800E+00, &
     & 0.1555900E+00, 0.1937812E+00, 0.1939093E+00, 0.1939093E+00 /
      data (ref_adm( 5,iz, 7, 5),iz = 1,20) / &
     & 0.1978600E+00, 0.1978600E+00, 0.1849300E+00, 0.1907000E+00, &
     & 0.1694200E+00, 0.1831600E+00, 0.1546000E+00, 0.1687500E+00, &
     & 0.1624400E+00, 0.1605700E+00, 0.1528700E+00, 0.1394100E+00, &
     & 0.1484200E+00, 0.1676000E+00, 0.1920200E+00, 0.1810381E+00, &
     & 0.1864806E+00, 0.1664200E+00, 0.1937854E+00, 0.1937854E+00 /
      data (ref_adm( 5,iz, 8, 5),iz = 1,20) / &
     & 0.1913400E+00, 0.1913400E+00, 0.2064600E+00, 0.1897000E+00, &
     & 0.1853100E+00, 0.1708100E+00, 0.1736800E+00, 0.1635800E+00, &
     & 0.1617100E+00, 0.1826500E+00, 0.1745900E+00, 0.1414300E+00, &
     & 0.1466500E+00, 0.2142700E+00, 0.1658900E+00, 0.1598900E+00, &
     & 0.1864356E+00, 0.2119300E+00, 0.1935703E+00, 0.1935703E+00 /
      data (ref_adm( 5,iz, 9, 5),iz = 1,20) / &
     & 0.1964600E+00, 0.1964600E+00, 0.2022500E+00, 0.2001900E+00, &
     & 0.1919800E+00, 0.1832700E+00, 0.1785400E+00, 0.1915600E+00, &
     & 0.1674600E+00, 0.1708500E+00, 0.1486600E+00, 0.1476000E+00, &
     & 0.1620400E+00, 0.1468600E+00, 0.1737800E+00, 0.1395100E+00, &
     & 0.2141100E+00, 0.1935500E+00, 0.2029000E+00, 0.2029000E+00 /
      data (ref_adm( 5,iz,10, 5),iz = 1,20) / &
     & 0.1995800E+00, 0.1995800E+00, 0.1805000E+00, 0.2009600E+00, &
     & 0.1907300E+00, 0.1793400E+00, 0.1803200E+00, 0.1813800E+00, &
     & 0.1801100E+00, 0.1754700E+00, 0.1653400E+00, 0.1487500E+00, &
     & 0.1505100E+00, 0.1687100E+00, 0.1764255E+00, 0.1695400E+00, &
     & 0.1863495E+00, 0.1767100E+00, 0.1932380E+00, 0.1932380E+00 /
      data (ref_adm( 5,iz,11, 5),iz = 1,20) / &
     & 0.1992500E+00, 0.1992500E+00, 0.2097300E+00, 0.1969900E+00, &
     & 0.1959000E+00, 0.1738132E+00, 0.1781900E+00, 0.1690300E+00, &
     & 0.1724800E+00, 0.1634800E+00, 0.1650200E+00, 0.1529700E+00, &
     & 0.1488100E+00, 0.1695400E+00, 0.1593700E+00, 0.1441200E+00, &
     & 0.1331600E+00, 0.1693100E+00, 0.1930313E+00, 0.1930313E+00 /
      data (ref_adm( 5,iz,12, 5),iz = 1,20) / &
     & 0.1880800E+00, 0.1880800E+00, 0.1700400E+00, 0.1867800E+00, &
     & 0.1708200E+00, 0.1847700E+00, 0.1937500E+00, 0.1702300E+00, &
     & 0.1743900E+00, 0.1529900E+00, 0.1638900E+00, 0.1587100E+00, &
     & 0.1605500E+00, 0.1734500E+00, 0.1443000E+00, 0.1305900E+00, &
     & 0.1862781E+00, 0.1830200E+00, 0.1928105E+00, 0.1928105E+00 /
      data (ref_adm( 5,iz,13, 5),iz = 1,20) / &
     & 0.2182200E+00, 0.2182200E+00, 0.1700200E+00, 0.1774326E+00, &
     & 0.2018800E+00, 0.1884400E+00, 0.1805400E+00, 0.1760000E+00, &
     & 0.1758900E+00, 0.1654500E+00, 0.1780900E+00, 0.1520300E+00, &
     & 0.1588600E+00, 0.1671200E+00, 0.1593200E+00, 0.1489500E+00, &
     & 0.1862483E+00, 0.1599800E+00, 0.1548900E+00, 0.1548900E+00 /
      data (ref_adm( 5,iz,14, 5),iz = 1,20) / &
     & 0.2059100E+00, 0.2059100E+00, 0.2302400E+00, 0.2220600E+00, &
     & 0.2006400E+00, 0.1689700E+00, 0.1825700E+00, 0.1783200E+00, &
     & 0.1700433E+00, 0.1627800E+00, 0.1643300E+00, 0.1568600E+00, &
     & 0.1685300E+00, 0.1627000E+00, 0.1494200E+00, 0.1538000E+00, &
     & 0.1555400E+00, 0.1482300E+00, 0.1244500E+00, 0.1244500E+00 /
      data (ref_adm( 5,iz,15, 5),iz = 1,20) / &
     & 0.2075000E+00, 0.2075000E+00, 0.2207700E+00, 0.1866500E+00, &
     & 0.2065800E+00, 0.1919800E+00, 0.1913200E+00, 0.1957800E+00, &
     & 0.1841800E+00, 0.1643100E+00, 0.1522500E+00, 0.1761300E+00, &
     & 0.1625100E+00, 0.1346100E+00, 0.1768350E+00, 0.1811027E+00, &
     & 0.1861764E+00, 0.1929098E+00, 0.1921729E+00, 0.1921729E+00 /
      data (ref_adm( 5,iz,16, 5),iz = 1,20) / &
     & 0.1847183E+00, 0.1847183E+00, 0.2108800E+00, 0.1812900E+00, &
     & 0.2028500E+00, 0.2069500E+00, 0.2274100E+00, 0.1900800E+00, &
     & 0.1599500E+00, 0.1825300E+00, 0.1616300E+00, 0.1943000E+00, &
     & 0.1926700E+00, 0.1667000E+00, 0.1631800E+00, 0.1811961E+00, &
     & 0.1767200E+00, 0.1928502E+00, 0.1919418E+00, 0.1919418E+00 /
      data (ref_adm( 5,iz,17, 5),iz = 1,20) / &
     & 0.2068400E+00, 0.2068400E+00, 0.2012800E+00, 0.1767500E+00, &
     & 0.1715800E+00, 0.1811600E+00, 0.2134000E+00, 0.1662900E+00, &
     & 0.1804300E+00, 0.1601700E+00, 0.1558900E+00, 0.1694300E+00, &
     & 0.2026700E+00, 0.1694800E+00, 0.1651400E+00, 0.1812426E+00, &
     & 0.1861521E+00, 0.1926927E+00, 0.1917505E+00, 0.1917505E+00 /
      data (ref_adm( 5,iz,18, 5),iz = 1,20) / &
     & 0.1823400E+00, 0.1823400E+00, 0.2053100E+00, 0.1861100E+00, &
     & 0.1689700E+00, 0.1724000E+00, 0.1806100E+00, 0.1877000E+00, &
     & 0.1780700E+00, 0.1659200E+00, 0.2370500E+00, 0.1628400E+00, &
     & 0.1922300E+00, 0.1743000E+00, 0.1645600E+00, 0.1391200E+00, &
     & 0.1982979E+00, 0.2051000E+00, 0.2040410E+00, 0.2040410E+00 /
      data (ref_adm( 5,iz,19, 5),iz = 1,20) / &
     & 0.2182500E+00, 0.2182500E+00, 0.1984300E+00, 0.2013700E+00, &
     & 0.1885336E+00, 0.1883400E+00, 0.1825700E+00, 0.1899800E+00, &
     & 0.1578200E+00, 0.1683300E+00, 0.2195100E+00, 0.1981700E+00, &
     & 0.1876600E+00, 0.1618000E+00, 0.1655000E+00, 0.1832600E+00, &
     & 0.1983476E+00, 0.2050654E+00, 0.2038328E+00, 0.2038328E+00 /
      data (ref_adm( 5,iz,20, 5),iz = 1,20) / &
     & 0.2072300E+00, 0.2072300E+00, 0.2455100E+00, 0.1877900E+00, &
     & 0.1798500E+00, 0.1773200E+00, 0.1872300E+00, 0.1845117E+00, &
     & 0.1737200E+00, 0.2055100E+00, 0.1725300E+00, 0.1851000E+00, &
     & 0.1627800E+00, 0.1682700E+00, 0.1734400E+00, 0.1416300E+00, &
     & 0.1626300E+00, 0.2048760E+00, 0.2036583E+00, 0.2036583E+00 /
      data (ref_adm( 5,iz,21, 5),iz = 1,20) / &
     & 0.2301400E+00, 0.2301400E+00, 0.1984900E+00, 0.1960300E+00, &
     & 0.1997300E+00, 0.2002200E+00, 0.1865161E+00, 0.2114200E+00, &
     & 0.2337100E+00, 0.2107000E+00, 0.2038600E+00, 0.1752400E+00, &
     & 0.1676100E+00, 0.1559300E+00, 0.1963800E+00, 0.1932943E+00, &
     & 0.1857400E+00, 0.2047523E+00, 0.2035210E+00, 0.2035210E+00 /
      data (ref_adm( 5,iz,22, 5),iz = 1,20) / &
     & 0.1953100E+00, 0.1953100E+00, 0.2079900E+00, 0.1908200E+00, &
     & 0.2068900E+00, 0.2153100E+00, 0.1761000E+00, 0.2120100E+00, &
     & 0.2414700E+00, 0.2254900E+00, 0.1788200E+00, 0.1867900E+00, &
     & 0.1784700E+00, 0.1696100E+00, 0.1667500E+00, 0.1607100E+00, &
     & 0.2188426E+00, 0.1842400E+00, 0.2186557E+00, 0.2186557E+00 /
      data (ref_adm( 5,iz,23, 5),iz = 1,20) / &
     & 0.1820900E+00, 0.1820900E+00, 0.2068200E+00, 0.1985000E+00, &
     & 0.2061700E+00, 0.1969400E+00, 0.2100000E+00, 0.2432900E+00, &
     & 0.2015849E+00, 0.1869700E+00, 0.1774100E+00, 0.1824300E+00, &
     & 0.1721400E+00, 0.1880700E+00, 0.2124900E+00, 0.1646400E+00, &
     & 0.1527500E+00, 0.2237716E+00, 0.2182224E+00, 0.2182224E+00 /
      data (ref_adm( 5,iz,24, 5),iz = 1,20) / &
     & 0.2010923E+00, 0.2010923E+00, 0.2126500E+00, 0.2068400E+00, &
     & 0.2189400E+00, 0.2073200E+00, 0.2390500E+00, 0.2129600E+00, &
     & 0.2034175E+00, 0.1986100E+00, 0.1786900E+00, 0.1767300E+00, &
     & 0.1747200E+00, 0.2050100E+00, 0.2344300E+00, 0.2152168E+00, &
     & 0.1642700E+00, 0.1918500E+00, 0.2178651E+00, 0.2178651E+00 /
      data (ref_adm( 5,iz,25, 5),iz = 1,20) / &
     & 0.1960100E+00, 0.1960100E+00, 0.2089000E+00, 0.2144900E+00, &
     & 0.2157800E+00, 0.2202100E+00, 0.2067800E+00, 0.1798400E+00, &
     & 0.1941600E+00, 0.2308500E+00, 0.1758100E+00, 0.2060199E+00, &
     & 0.2076729E+00, 0.2144900E+00, 0.2364400E+00, 0.2027200E+00, &
     & 0.1669700E+00, 0.1725800E+00, 0.2178525E+00, 0.2178525E+00 /
      data (ref_adm( 5,iz,26, 5),iz = 1,20) / &
     & 0.2137900E+00, 0.2137900E+00, 0.2127100E+00, 0.2134700E+00, &
     & 0.2197100E+00, 0.2274100E+00, 0.2069200E+00, 0.2125000E+00, &
     & 0.1965600E+00, 0.1818200E+00, 0.2090900E+00, 0.2076774E+00, &
     & 0.2067800E+00, 0.1662300E+00, 0.1904600E+00, 0.2895600E+00, &
     & 0.1747700E+00, 0.2238386E+00, 0.1706800E+00, 0.1706800E+00 /
      data (ref_adm( 5,iz,27, 5),iz = 1,20) / &
     & 0.2359300E+00, 0.2359300E+00, 0.2070600E+00, 0.2016300E+00, &
     & 0.2148200E+00, 0.1976200E+00, 0.2179800E+00, 0.2180500E+00, &
     & 0.1974800E+00, 0.1908300E+00, 0.2168000E+00, 0.1923300E+00, &
     & 0.2106241E+00, 0.1697700E+00, 0.1772700E+00, 0.1859400E+00, &
     & 0.1863500E+00, 0.1711500E+00, 0.2179492E+00, 0.2179492E+00 /
      data (ref_adm( 5,iz,28, 5),iz = 1,20) / &
     & 0.2011300E+00, 0.2011300E+00, 0.2530800E+00, 0.2610600E+00, &
     & 0.1969700E+00, 0.2001900E+00, 0.2234800E+00, 0.2145700E+00, &
     & 0.2071400E+00, 0.1878800E+00, 0.2106569E+00, 0.2110023E+00, &
     & 0.1734700E+00, 0.2136043E+00, 0.2159825E+00, 0.2187732E+00, &
     & 0.2218510E+00, 0.2246039E+00, 0.2180290E+00, 0.2180290E+00 /
      data (ref_adm( 5,iz,29, 5),iz = 1,20) / &
     & 0.2034000E+00, 0.2034000E+00, 0.2441900E+00, 0.2353100E+00, &
     & 0.2291400E+00, 0.1990200E+00, 0.2174700E+00, 0.2096000E+00, &
     & 0.1930100E+00, 0.2841400E+00, 0.2230900E+00, 0.2126551E+00, &
     & 0.2021500E+00, 0.2074800E+00, 0.2171616E+00, 0.2198021E+00, &
     & 0.2226230E+00, 0.2250142E+00, 0.2182829E+00, 0.2182829E+00 /
      data (ref_adm( 5,iz,30, 5),iz = 1,20) / &
     & 0.2169600E+00, 0.2169600E+00, 0.2292200E+00, 0.2360800E+00, &
     & 0.2293800E+00, 0.2242000E+00, 0.2287100E+00, 0.2126141E+00, &
     & 0.2300300E+00, 0.2016000E+00, 0.2228700E+00, 0.2144123E+00, &
     & 0.2152621E+00, 0.1866500E+00, 0.2184336E+00, 0.2209210E+00, &
     & 0.2234242E+00, 0.2255073E+00, 0.2185536E+00, 0.2185536E+00 /
      data (ref_adm( 5,iz,31, 5),iz = 1,20) / &
     & 0.1984000E+00, 0.1984000E+00, 0.2164400E+00, 0.2163300E+00, &
     & 0.2259500E+00, 0.2121931E+00, 0.2125647E+00, 0.2119700E+00, &
     & 0.2065900E+00, 0.2533400E+00, 0.2108200E+00, 0.2159918E+00, &
     & 0.2166435E+00, 0.2177832E+00, 0.2195141E+00, 0.2219796E+00, &
     & 0.2242926E+00, 0.2258954E+00, 0.2189279E+00, 0.2189279E+00 /
      data (ref_adm( 5,iz,32, 5),iz = 1,20) / &
     & 0.2101200E+00, 0.2101200E+00, 0.2106700E+00, 0.2225700E+00, &
     & 0.2172100E+00, 0.2178100E+00, 0.2304400E+00, 0.2354700E+00, &
     & 0.2638600E+00, 0.2489600E+00, 0.2172386E+00, 0.2174127E+00, &
     & 0.2179020E+00, 0.2189569E+00, 0.2205171E+00, 0.2229396E+00, &
     & 0.2250131E+00, 0.2263842E+00, 0.2194014E+00, 0.2194014E+00 /
      data (ref_adm( 5,iz,33, 5),iz = 1,20) / &
     & 0.1933400E+00, 0.1933400E+00, 0.2063400E+00, 0.2284500E+00, &
     & 0.2400900E+00, 0.2402400E+00, 0.2508600E+00, 0.2434200E+00, &
     & 0.2470200E+00, 0.2191100E+00, 0.2185804E+00, 0.2186867E+00, &
     & 0.2191592E+00, 0.2200803E+00, 0.2215234E+00, 0.2238563E+00, &
     & 0.2257290E+00, 0.2268883E+00, 0.2197975E+00, 0.2197975E+00 /
      data (ref_adm( 5,iz,34, 5),iz = 1,20) / &
     & 0.1952500E+00, 0.1952500E+00, 0.1980300E+00, 0.2229700E+00, &
     & 0.2323000E+00, 0.2311700E+00, 0.2161800E+00, 0.2243000E+00, &
     & 0.2211300E+00, 0.2079900E+00, 0.2069700E+00, 0.2196884E+00, &
     & 0.2200983E+00, 0.2209102E+00, 0.2222881E+00, 0.2245174E+00, &
     & 0.2263006E+00, 0.2271455E+00, 0.2201442E+00, 0.2201442E+00 /
      data (ref_adm( 5,iz,35, 5),iz = 1,20) / &
     & 0.2045000E+00, 0.2045000E+00, 0.2105100E+00, 0.2019600E+00, &
     & 0.2327600E+00, 0.2223100E+00, 0.2355900E+00, 0.2157800E+00, &
     & 0.2266400E+00, 0.2196498E+00, 0.1989900E+00, 0.2205354E+00, &
     & 0.2208863E+00, 0.2216252E+00, 0.2229897E+00, 0.2250605E+00, &
     & 0.2268047E+00, 0.2275143E+00, 0.2204357E+00, 0.2204357E+00 /
      data (ref_adm( 5,iz,36, 5),iz = 1,20) / &
     & 0.1926900E+00, 0.1926900E+00, 0.2232400E+00, 0.2354900E+00, &
     & 0.2209000E+00, 0.2437100E+00, 0.2054600E+00, 0.2333100E+00, &
     & 0.1836100E+00, 0.2199756E+00, 0.2210999E+00, 0.2211327E+00, &
     & 0.2214196E+00, 0.2221095E+00, 0.2234187E+00, 0.2254728E+00, &
     & 0.2272104E+00, 0.2278145E+00, 0.2206274E+00, 0.2206274E+00 /
      data (ref_adm( 5,iz,37, 5),iz = 1,20) / &
     & 0.2059200E+00, 0.2059200E+00, 0.1865100E+00, 0.2223600E+00, &
     & 0.2458200E+00, 0.2628000E+00, 0.2376600E+00, 0.2370400E+00, &
     & 0.2185034E+00, 0.2201729E+00, 0.2213969E+00, 0.2213764E+00, &
     & 0.2217837E+00, 0.2224447E+00, 0.2237152E+00, 0.2257324E+00, &
     & 0.2273268E+00, 0.2279280E+00, 0.2207298E+00, 0.2207298E+00 /
      data (ref_adm( 5,iz,38, 5),iz = 1,20) / &
     & 0.2059200E+00, 0.2059200E+00, 0.1865100E+00, 0.2223600E+00, &
     & 0.2458200E+00, 0.2628000E+00, 0.2376600E+00, 0.2370400E+00, &
     & 0.2185034E+00, 0.2201729E+00, 0.2213969E+00, 0.2213764E+00, &
     & 0.2217837E+00, 0.2224447E+00, 0.2237152E+00, 0.2257324E+00, &
     & 0.2273268E+00, 0.2279280E+00, 0.2207298E+00, 0.2207298E+00 /
! Solar Zenith Angle 25.0 Albedo  0.1908275E+00
      data (ref_adm( 5,iz, 1, 6),iz = 1,20) / &
     & 0.1772000E+00, 0.1772000E+00, 0.1706500E+00, 0.1978600E+00, &
     & 0.1747300E+00, 0.1803200E+00, 0.1811400E+00, 0.1692200E+00, &
     & 0.1100400E+00, 0.1326000E+00, 0.2005700E+00, 0.1389600E+00, &
     & 0.1686062E+00, 0.1833100E+00, 0.1532300E+00, 0.1812347E+00, &
     & 0.1950000E+00, 0.2223800E+00, 0.1990211E+00, 0.1990211E+00 /
      data (ref_adm( 5,iz, 2, 6),iz = 1,20) / &
     & 0.1772000E+00, 0.1772000E+00, 0.1706500E+00, 0.1978600E+00, &
     & 0.1747300E+00, 0.1803200E+00, 0.1811400E+00, 0.1692200E+00, &
     & 0.1100400E+00, 0.1326000E+00, 0.2005700E+00, 0.1389600E+00, &
     & 0.1686062E+00, 0.1833100E+00, 0.1532300E+00, 0.1812347E+00, &
     & 0.1950000E+00, 0.2223800E+00, 0.1990211E+00, 0.1990211E+00 /
      data (ref_adm( 5,iz, 3, 6),iz = 1,20) / &
     & 0.2022300E+00, 0.2022300E+00, 0.1708500E+00, 0.1949700E+00, &
     & 0.1812800E+00, 0.1975900E+00, 0.1660595E+00, 0.1659400E+00, &
     & 0.1642500E+00, 0.2087600E+00, 0.1443700E+00, 0.1480000E+00, &
     & 0.1248200E+00, 0.1712834E+00, 0.1507800E+00, 0.1682200E+00, &
     & 0.2013600E+00, 0.1965765E+00, 0.3108909E-01, 0.3108909E-01 /
      data (ref_adm( 5,iz, 4, 6),iz = 1,20) / &
     & 0.2066600E+00, 0.2066600E+00, 0.1949300E+00, 0.2043300E+00, &
     & 0.1842500E+00, 0.2105100E+00, 0.1982500E+00, 0.1648849E+00, &
     & 0.1513700E+00, 0.1601300E+00, 0.1201200E+00, 0.1252700E+00, &
     & 0.1365600E+00, 0.1713467E+00, 0.1539300E+00, 0.1739700E+00, &
     & 0.1876732E+00, 0.1964994E+00, 0.1988194E+00, 0.1988194E+00 /
      data (ref_adm( 5,iz, 5, 6),iz = 1,20) / &
     & 0.1956600E+00, 0.1956600E+00, 0.1885900E+00, 0.2066100E+00, &
     & 0.1777400E+00, 0.2469100E+00, 0.1839200E+00, 0.1511800E+00, &
     & 0.1418800E+00, 0.1488800E+00, 0.1494300E+00, 0.1753700E+00, &
     & 0.1324700E+00, 0.1713892E+00, 0.2210000E+00, 0.1567300E+00, &
     & 0.1637700E+00, 0.2068500E+00, 0.1985822E+00, 0.1985822E+00 /
      data (ref_adm( 5,iz, 6, 6),iz = 1,20) / &
     & 0.1986600E+00, 0.1986600E+00, 0.2109800E+00, 0.1879600E+00, &
     & 0.1432100E+00, 0.1474700E+00, 0.1522800E+00, 0.1750600E+00, &
     & 0.1450700E+00, 0.1642584E+00, 0.1763300E+00, 0.1379600E+00, &
     & 0.1978100E+00, 0.1714485E+00, 0.2160900E+00, 0.1888300E+00, &
     & 0.1711500E+00, 0.1961688E+00, 0.1983299E+00, 0.1983299E+00 /
      data (ref_adm( 5,iz, 7, 6),iz = 1,20) / &
     & 0.1888700E+00, 0.1888700E+00, 0.1847800E+00, 0.1612200E+00, &
     & 0.1568700E+00, 0.1644100E+00, 0.1422500E+00, 0.1298900E+00, &
     & 0.1651700E+00, 0.1396700E+00, 0.1648226E+00, 0.1663123E+00, &
     & 0.2079000E+00, 0.2446200E+00, 0.1827200E+00, 0.1777400E+00, &
     & 0.2192500E+00, 0.1959748E+00, 0.1979362E+00, 0.1979362E+00 /
      data (ref_adm( 5,iz, 8, 6),iz = 1,20) / &
     & 0.1683700E+00, 0.1683700E+00, 0.1831400E+00, 0.1891300E+00, &
     & 0.1845400E+00, 0.1830100E+00, 0.1543800E+00, 0.1583900E+00, &
     & 0.1516500E+00, 0.1515100E+00, 0.1565100E+00, 0.1616100E+00, &
     & 0.1905200E+00, 0.1723100E+00, 0.1659200E+00, 0.1604600E+00, &
     & 0.1872619E+00, 0.1956101E+00, 0.1975680E+00, 0.1975680E+00 /
      data (ref_adm( 5,iz, 9, 6),iz = 1,20) / &
     & 0.1745400E+00, 0.1745400E+00, 0.2100200E+00, 0.1829600E+00, &
     & 0.1765900E+00, 0.1971600E+00, 0.1580800E+00, 0.1806200E+00, &
     & 0.1326500E+00, 0.1464000E+00, 0.1510800E+00, 0.1553200E+00, &
     & 0.1763900E+00, 0.1151800E+00, 0.1960000E+00, 0.1417400E+00, &
     & 0.2034800E+00, 0.1953239E+00, 0.1970544E+00, 0.1970544E+00 /
      data (ref_adm( 5,iz,10, 6),iz = 1,20) / &
     & 0.1884800E+00, 0.1884800E+00, 0.1985400E+00, 0.2027300E+00, &
     & 0.1939700E+00, 0.1792800E+00, 0.1790400E+00, 0.1796200E+00, &
     & 0.1515300E+00, 0.1647000E+00, 0.1397200E+00, 0.1502100E+00, &
     & 0.1904500E+00, 0.1767300E+00, 0.1621300E+00, 0.1578000E+00, &
     & 0.1705400E+00, 0.1744000E+00, 0.1606600E+00, 0.1606600E+00 /
      data (ref_adm( 5,iz,11, 6),iz = 1,20) / &
     & 0.1901500E+00, 0.1901500E+00, 0.1871500E+00, 0.1745100E+00, &
     & 0.1807400E+00, 0.1683700E+00, 0.1764400E+00, 0.1625800E+00, &
     & 0.1665000E+00, 0.1622000E+00, 0.1553600E+00, 0.1547300E+00, &
     & 0.1626200E+00, 0.1788700E+00, 0.1467800E+00, 0.1607900E+00, &
     & 0.1869143E+00, 0.1637400E+00, 0.1959680E+00, 0.1959680E+00 /
      data (ref_adm( 5,iz,12, 6),iz = 1,20) / &
     & 0.1949800E+00, 0.1949800E+00, 0.1924700E+00, 0.1872900E+00, &
     & 0.1756300E+00, 0.1859400E+00, 0.1730300E+00, 0.1684200E+00, &
     & 0.1656600E+00, 0.1652400E+00, 0.1579700E+00, 0.1593500E+00, &
     & 0.1539200E+00, 0.1458600E+00, 0.1554300E+00, 0.1808481E+00, &
     & 0.1867518E+00, 0.1944945E+00, 0.1953379E+00, 0.1953379E+00 /
      data (ref_adm( 5,iz,13, 6),iz = 1,20) / &
     & 0.1906000E+00, 0.1906000E+00, 0.1693800E+00, 0.1916600E+00, &
     & 0.1899800E+00, 0.1749500E+00, 0.1696000E+00, 0.1706800E+00, &
     & 0.1730900E+00, 0.1630900E+00, 0.1545600E+00, 0.1613800E+00, &
     & 0.1802900E+00, 0.1817300E+00, 0.1757255E+00, 0.1808291E+00, &
     & 0.1581600E+00, 0.1501700E+00, 0.1947279E+00, 0.1947279E+00 /
      data (ref_adm( 5,iz,14, 6),iz = 1,20) / &
     & 0.1923700E+00, 0.1923700E+00, 0.1722600E+00, 0.2106200E+00, &
     & 0.1844600E+00, 0.1945900E+00, 0.1654800E+00, 0.1858700E+00, &
     & 0.1533500E+00, 0.1666761E+00, 0.1582700E+00, 0.1666900E+00, &
     & 0.1610200E+00, 0.1569300E+00, 0.1553400E+00, 0.1424200E+00, &
     & 0.1823700E+00, 0.1471200E+00, 0.1941026E+00, 0.1941026E+00 /
      data (ref_adm( 5,iz,15, 6),iz = 1,20) / &
     & 0.2055700E+00, 0.2055700E+00, 0.2143900E+00, 0.1894800E+00, &
     & 0.1916400E+00, 0.2135500E+00, 0.1834400E+00, 0.1684969E+00, &
     & 0.1675541E+00, 0.1644000E+00, 0.1479800E+00, 0.1854300E+00, &
     & 0.1673500E+00, 0.1626400E+00, 0.1715300E+00, 0.1571400E+00, &
     & 0.1494400E+00, 0.1936327E+00, 0.1935523E+00, 0.1935523E+00 /
      data (ref_adm( 5,iz,16, 6),iz = 1,20) / &
     & 0.1928300E+00, 0.1928300E+00, 0.1870300E+00, 0.1954600E+00, &
     & 0.2032400E+00, 0.1817100E+00, 0.1703857E+00, 0.2600200E+00, &
     & 0.1613500E+00, 0.1631200E+00, 0.1678516E+00, 0.1576600E+00, &
     & 0.1875100E+00, 0.1552400E+00, 0.1591400E+00, 0.1689900E+00, &
     & 0.1532100E+00, 0.1480600E+00, 0.1930029E+00, 0.1930029E+00 /
      data (ref_adm( 5,iz,17, 6),iz = 1,20) / &
     & 0.1895900E+00, 0.1895900E+00, 0.2113200E+00, 0.1948100E+00, &
     & 0.1808400E+00, 0.1831400E+00, 0.1767900E+00, 0.1300100E+00, &
     & 0.1509500E+00, 0.1682670E+00, 0.1689200E+00, 0.1676500E+00, &
     & 0.1664700E+00, 0.1587500E+00, 0.1750200E+00, 0.1754600E+00, &
     & 0.1486200E+00, 0.1522500E+00, 0.1574700E+00, 0.1574700E+00 /
      data (ref_adm( 5,iz,18, 6),iz = 1,20) / &
     & 0.1941400E+00, 0.1941400E+00, 0.1764800E+00, 0.1909800E+00, &
     & 0.1872700E+00, 0.1603000E+00, 0.1364700E+00, 0.1813523E+00, &
     & 0.1693400E+00, 0.1793296E+00, 0.1902300E+00, 0.1588200E+00, &
     & 0.1635100E+00, 0.1806600E+00, 0.1796200E+00, 0.1792900E+00, &
     & 0.1568800E+00, 0.1468800E+00, 0.2013762E+00, 0.2013762E+00 /
      data (ref_adm( 5,iz,19, 6),iz = 1,20) / &
     & 0.1728400E+00, 0.1728400E+00, 0.1974800E+00, 0.2104300E+00, &
     & 0.1949200E+00, 0.2045800E+00, 0.1877300E+00, 0.1817500E+00, &
     & 0.1825100E+00, 0.2126100E+00, 0.1795350E+00, 0.1802821E+00, &
     & 0.2047900E+00, 0.1723900E+00, 0.1723200E+00, 0.1566700E+00, &
     & 0.1957570E+00, 0.2023872E+00, 0.2011707E+00, 0.2011707E+00 /
      data (ref_adm( 5,iz,20, 6),iz = 1,20) / &
     & 0.1944600E+00, 0.1944600E+00, 0.1917100E+00, 0.2128800E+00, &
     & 0.1903900E+00, 0.1990400E+00, 0.2165100E+00, 0.1821019E+00, &
     & 0.1724300E+00, 0.1800379E+00, 0.1666500E+00, 0.1845500E+00, &
     & 0.2165000E+00, 0.1967400E+00, 0.1741500E+00, 0.1785400E+00, &
     & 0.2161600E+00, 0.2022002E+00, 0.2009985E+00, 0.2009985E+00 /
      data (ref_adm( 5,iz,21, 6),iz = 1,20) / &
     & 0.1932600E+00, 0.1932600E+00, 0.2006500E+00, 0.2012600E+00, &
     & 0.1979800E+00, 0.2115600E+00, 0.2438300E+00, 0.2157100E+00, &
     & 0.2366200E+00, 0.1799200E+00, 0.2313300E+00, 0.1550700E+00, &
     & 0.1745600E+00, 0.1811300E+00, 0.1804700E+00, 0.1907698E+00, &
     & 0.1957223E+00, 0.2020780E+00, 0.2008628E+00, 0.2008628E+00 /
      data (ref_adm( 5,iz,22, 6),iz = 1,20) / &
     & 0.2038000E+00, 0.2038000E+00, 0.1897000E+00, 0.1828300E+00, &
     & 0.2014600E+00, 0.1958000E+00, 0.2064500E+00, 0.2192500E+00, &
     & 0.1922200E+00, 0.2036500E+00, 0.2168900E+00, 0.1828200E+00, &
     & 0.1814200E+00, 0.1809100E+00, 0.2004600E+00, 0.1972000E+00, &
     & 0.2041800E+00, 0.2267990E+00, 0.2221924E+00, 0.2221924E+00 /
      data (ref_adm( 5,iz,23, 6),iz = 1,20) / &
     & 0.1940100E+00, 0.1940100E+00, 0.2035200E+00, 0.1838100E+00, &
     & 0.1813800E+00, 0.1892900E+00, 0.1939800E+00, 0.1935500E+00, &
     & 0.2127600E+00, 0.1976128E+00, 0.1868800E+00, 0.2041700E+00, &
     & 0.1662100E+00, 0.1944400E+00, 0.1951800E+00, 0.2044500E+00, &
     & 0.2003600E+00, 0.2267461E+00, 0.2217505E+00, 0.2217505E+00 /
      data (ref_adm( 5,iz,24, 6),iz = 1,20) / &
     & 0.2000800E+00, 0.2000800E+00, 0.2044800E+00, 0.1901000E+00, &
     & 0.2077900E+00, 0.2022400E+00, 0.1878400E+00, 0.2065300E+00, &
     & 0.2070900E+00, 0.2465800E+00, 0.1928200E+00, 0.1885800E+00, &
     & 0.1886600E+00, 0.2148500E+00, 0.1881800E+00, 0.1758000E+00, &
     & 0.1917500E+00, 0.2267367E+00, 0.2216561E+00, 0.2216561E+00 /
      data (ref_adm( 5,iz,25, 6),iz = 1,20) / &
     & 0.1895100E+00, 0.1895100E+00, 0.1794600E+00, 0.2078100E+00, &
     & 0.2038200E+00, 0.1939400E+00, 0.1917300E+00, 0.1784200E+00, &
     & 0.1913600E+00, 0.2312400E+00, 0.1948500E+00, 0.1781100E+00, &
     & 0.1833300E+00, 0.1908700E+00, 0.2013800E+00, 0.1999200E+00, &
     & 0.1946500E+00, 0.2271405E+00, 0.2218121E+00, 0.2218121E+00 /
      data (ref_adm( 5,iz,26, 6),iz = 1,20) / &
     & 0.2056200E+00, 0.2056200E+00, 0.1935500E+00, 0.1910200E+00, &
     & 0.2131500E+00, 0.2006457E+00, 0.2000700E+00, 0.1964800E+00, &
     & 0.1966600E+00, 0.2150100E+00, 0.2117500E+00, 0.1893100E+00, &
     & 0.1927300E+00, 0.1866400E+00, 0.1934400E+00, 0.2205900E+00, &
     & 0.2036800E+00, 0.1743000E+00, 0.2221343E+00, 0.2221343E+00 /
      data (ref_adm( 5,iz,27, 6),iz = 1,20) / &
     & 0.1947200E+00, 0.1947200E+00, 0.2018000E+00, 0.2196900E+00, &
     & 0.1932200E+00, 0.1960700E+00, 0.1877100E+00, 0.1929800E+00, &
     & 0.1914700E+00, 0.1906000E+00, 0.1990500E+00, 0.2026400E+00, &
     & 0.1891900E+00, 0.1841600E+00, 0.2151700E+00, 0.1989000E+00, &
     & 0.1938500E+00, 0.2261700E+00, 0.2227192E+00, 0.2227192E+00 /
      data (ref_adm( 5,iz,28, 6),iz = 1,20) / &
     & 0.1899000E+00, 0.1899000E+00, 0.1993000E+00, 0.1936500E+00, &
     & 0.1959900E+00, 0.1983700E+00, 0.2102000E+00, 0.2139700E+00, &
     & 0.2152800E+00, 0.2122900E+00, 0.2108100E+00, 0.2047400E+00, &
     & 0.1900800E+00, 0.2032500E+00, 0.1945500E+00, 0.2016800E+00, &
     & 0.1861400E+00, 0.1937500E+00, 0.2235555E+00, 0.2235555E+00 /
      data (ref_adm( 5,iz,29, 6),iz = 1,20) / &
     & 0.2009200E+00, 0.2009200E+00, 0.1978800E+00, 0.2056700E+00, &
     & 0.2179400E+00, 0.2298100E+00, 0.2328900E+00, 0.2408800E+00, &
     & 0.2420400E+00, 0.2039600E+00, 0.2086400E+00, 0.2048900E+00, &
     & 0.2115300E+00, 0.2047300E+00, 0.2026000E+00, 0.2089400E+00, &
     & 0.2169200E+00, 0.2305249E+00, 0.2244586E+00, 0.2244586E+00 /
      data (ref_adm( 5,iz,30, 6),iz = 1,20) / &
     & 0.2017400E+00, 0.2017400E+00, 0.2108100E+00, 0.2073500E+00, &
     & 0.2119200E+00, 0.2149400E+00, 0.2213700E+00, 0.2176900E+00, &
     & 0.2012800E+00, 0.2081700E+00, 0.2263500E+00, 0.2055600E+00, &
     & 0.2165500E+00, 0.2053600E+00, 0.2027100E+00, 0.2139400E+00, &
     & 0.2299427E+00, 0.2345600E+00, 0.2255058E+00, 0.2255058E+00 /
      data (ref_adm( 5,iz,31, 6),iz = 1,20) / &
     & 0.1967000E+00, 0.1967000E+00, 0.1962900E+00, 0.2215600E+00, &
     & 0.2233000E+00, 0.2249400E+00, 0.2194400E+00, 0.2161700E+00, &
     & 0.2181600E+00, 0.2270200E+00, 0.2182400E+00, 0.2146100E+00, &
     & 0.1987300E+00, 0.2105500E+00, 0.2148800E+00, 0.1970700E+00, &
     & 0.2158900E+00, 0.2330752E+00, 0.2265532E+00, 0.2265532E+00 /
      data (ref_adm( 5,iz,32, 6),iz = 1,20) / &
     & 0.2162900E+00, 0.2162900E+00, 0.1967100E+00, 0.2074000E+00, &
     & 0.2115000E+00, 0.2212300E+00, 0.2172500E+00, 0.2258500E+00, &
     & 0.2284400E+00, 0.2256200E+00, 0.2284000E+00, 0.2274300E+00, &
     & 0.2170500E+00, 0.2118100E+00, 0.2283000E+00, 0.2664700E+00, &
     & 0.2331820E+00, 0.2343861E+00, 0.2276973E+00, 0.2276973E+00 /
      data (ref_adm( 5,iz,33, 6),iz = 1,20) / &
     & 0.2000700E+00, 0.2000700E+00, 0.2126600E+00, 0.2171000E+00, &
     & 0.2156500E+00, 0.2322200E+00, 0.2137500E+00, 0.2135600E+00, &
     & 0.2236000E+00, 0.2398900E+00, 0.2349800E+00, 0.2296900E+00, &
     & 0.2272900E+00, 0.2243600E+00, 0.2234000E+00, 0.2320459E+00, &
     & 0.2346020E+00, 0.2356604E+00, 0.2288136E+00, 0.2288136E+00 /
      data (ref_adm( 5,iz,34, 6),iz = 1,20) / &
     & 0.1973600E+00, 0.1973600E+00, 0.2212600E+00, 0.2397800E+00, &
     & 0.2131500E+00, 0.2246800E+00, 0.2214100E+00, 0.2177000E+00, &
     & 0.2422900E+00, 0.2274700E+00, 0.2125100E+00, 0.2029500E+00, &
     & 0.2022900E+00, 0.2231900E+00, 0.2249000E+00, 0.2333463E+00, &
     & 0.2357681E+00, 0.2367061E+00, 0.2297459E+00, 0.2297459E+00 /
      data (ref_adm( 5,iz,35, 6),iz = 1,20) / &
     & 0.1941200E+00, 0.1941200E+00, 0.1991500E+00, 0.2235200E+00, &
     & 0.2293500E+00, 0.2206400E+00, 0.2496100E+00, 0.2323900E+00, &
     & 0.2385300E+00, 0.2109800E+00, 0.2266900E+00, 0.2224700E+00, &
     & 0.2251100E+00, 0.2367500E+00, 0.2320836E+00, 0.2344286E+00, &
     & 0.2367212E+00, 0.2376083E+00, 0.2305218E+00, 0.2305218E+00 /
      data (ref_adm( 5,iz,36, 6),iz = 1,20) / &
     & 0.1975200E+00, 0.1975200E+00, 0.1887300E+00, 0.1869500E+00, &
     & 0.2364800E+00, 0.2458000E+00, 0.2605100E+00, 0.2617900E+00, &
     & 0.2489800E+00, 0.2610100E+00, 0.2432300E+00, 0.2255000E+00, &
     & 0.2115600E+00, 0.2568400E+00, 0.2329177E+00, 0.2352035E+00, &
     & 0.2374313E+00, 0.2381815E+00, 0.2310981E+00, 0.2310981E+00 /
      data (ref_adm( 5,iz,37, 6),iz = 1,20) / &
     & 0.1997700E+00, 0.1997700E+00, 0.1997000E+00, 0.2091400E+00, &
     & 0.2181700E+00, 0.2425000E+00, 0.2410600E+00, 0.2729100E+00, &
     & 0.2542800E+00, 0.2288500E+00, 0.2380000E+00, 0.2085500E+00, &
     & 0.2281300E+00, 0.2317011E+00, 0.2334052E+00, 0.2356236E+00, &
     & 0.2378105E+00, 0.2384822E+00, 0.2314239E+00, 0.2314239E+00 /
      data (ref_adm( 5,iz,38, 6),iz = 1,20) / &
     & 0.1997700E+00, 0.1997700E+00, 0.1997000E+00, 0.2091400E+00, &
     & 0.2181700E+00, 0.2425000E+00, 0.2410600E+00, 0.2729100E+00, &
     & 0.2542800E+00, 0.2288500E+00, 0.2380000E+00, 0.2085500E+00, &
     & 0.2281300E+00, 0.2317011E+00, 0.2334052E+00, 0.2356236E+00, &
     & 0.2378105E+00, 0.2384822E+00, 0.2314239E+00, 0.2314239E+00 /
! Solar Zenith Angle 30.0 Albedo  0.2029386E+00
      data (ref_adm( 5,iz, 1, 7),iz = 1,20) / &
     & 0.1899400E+00, 0.1899400E+00, 0.2439800E+00, 0.1805700E+00, &
     & 0.2037400E+00, 0.1530500E+00, 0.1892100E+00, 0.5888900E+00, &
     & 0.1925100E+00, 0.1778000E+00, 0.2082400E+00, 0.2054200E+00, &
     & 0.1860100E+00, 0.1962700E+00, 0.1838900E+00, 0.2137400E+00, &
     & 0.2337700E+00, 0.2593800E+00, 0.2176094E+00, 0.2176094E+00 /
      data (ref_adm( 5,iz, 2, 7),iz = 1,20) / &
     & 0.1899400E+00, 0.1899400E+00, 0.2439800E+00, 0.1805700E+00, &
     & 0.2037400E+00, 0.1530500E+00, 0.1892100E+00, 0.5888900E+00, &
     & 0.1925100E+00, 0.1778000E+00, 0.2082400E+00, 0.2054200E+00, &
     & 0.1860100E+00, 0.1962700E+00, 0.1838900E+00, 0.2137400E+00, &
     & 0.2337700E+00, 0.2593800E+00, 0.2176094E+00, 0.2176094E+00 /
      data (ref_adm( 5,iz, 3, 7),iz = 1,20) / &
     & 0.1787800E+00, 0.1787800E+00, 0.1841200E+00, 0.1752500E+00, &
     & 0.1905300E+00, 0.1976200E+00, 0.1750700E+00, 0.1638100E+00, &
     & 0.1743400E+00, 0.1689300E+00, 0.1859100E+00, 0.1644300E+00, &
     & 0.1632600E+00, 0.1647800E+00, 0.1868400E+00, 0.2319900E+00, &
     & 0.2410500E+00, 0.2268500E+00, 0.2098100E+00, 0.2098100E+00 /
      data (ref_adm( 5,iz, 4, 7),iz = 1,20) / &
     & 0.1937400E+00, 0.1937400E+00, 0.1858100E+00, 0.1665300E+00, &
     & 0.1742100E+00, 0.1700000E+00, 0.1695800E+00, 0.1583800E+00, &
     & 0.1770900E+00, 0.1553700E+00, 0.1924300E+00, 0.2176200E+00, &
     & 0.1909400E+00, 0.1891700E+00, 0.1815200E+00, 0.2395200E+00, &
     & 0.1915900E+00, 0.2392354E+00, 0.2176094E+00, 0.2176094E+00 /
      data (ref_adm( 5,iz, 5, 7),iz = 1,20) / &
     & 0.1564700E+00, 0.1564700E+00, 0.1993300E+00, 0.1881300E+00, &
     & 0.1309800E+00, 0.1974400E+00, 0.2043600E+00, 0.1719800E+00, &
     & 0.1554100E+00, 0.1538600E+00, 0.1807200E+00, 0.1670000E+00, &
     & 0.2121800E+00, 0.2296900E+00, 0.2291900E+00, 0.2146400E+00, &
     & 0.2350641E+00, 0.2392354E+00, 0.2176093E+00, 0.2176093E+00 /
      data (ref_adm( 5,iz, 6, 7),iz = 1,20) / &
     & 0.1996800E+00, 0.1996800E+00, 0.1672200E+00, 0.1872900E+00, &
     & 0.1802800E+00, 0.1903400E+00, 0.1819600E+00, 0.2009800E+00, &
     & 0.1860100E+00, 0.1898800E+00, 0.1677000E+00, 0.1655500E+00, &
     & 0.1894500E+00, 0.1345300E+00, 0.2363400E+00, 0.2448000E+00, &
     & 0.2350641E+00, 0.2392354E+00, 0.2176094E+00, 0.2176094E+00 /
      data (ref_adm( 5,iz, 7, 7),iz = 1,20) / &
     & 0.1880000E+00, 0.1880000E+00, 0.1747900E+00, 0.1961000E+00, &
     & 0.1666200E+00, 0.1927600E+00, 0.1877400E+00, 0.1809300E+00, &
     & 0.1911600E+00, 0.1705900E+00, 0.1861200E+00, 0.1569200E+00, &
     & 0.1666300E+00, 0.1822800E+00, 0.1538300E+00, 0.2237136E+00, &
     & 0.3071200E+00, 0.2392354E+00, 0.2176093E+00, 0.2176093E+00 /
      data (ref_adm( 5,iz, 8, 7),iz = 1,20) / &
     & 0.1951900E+00, 0.1951900E+00, 0.1792100E+00, 0.1671800E+00, &
     & 0.1803800E+00, 0.1806800E+00, 0.1864500E+00, 0.1703900E+00, &
     & 0.1678400E+00, 0.2008700E+00, 0.1861100E+00, 0.1708500E+00, &
     & 0.1497300E+00, 0.2419200E+00, 0.1607800E+00, 0.2237135E+00, &
     & 0.2350641E+00, 0.2392354E+00, 0.2176094E+00, 0.2176094E+00 /
      data (ref_adm( 5,iz, 9, 7),iz = 1,20) / &
     & 0.1799800E+00, 0.1799800E+00, 0.1679600E+00, 0.1746600E+00, &
     & 0.1602100E+00, 0.1922400E+00, 0.1754400E+00, 0.1757000E+00, &
     & 0.1797900E+00, 0.1876900E+00, 0.1919600E+00, 0.2164700E+00, &
     & 0.2313200E+00, 0.2493000E+00, 0.2721800E+00, 0.2831400E+00, &
     & 0.2488400E+00, 0.2421800E+00, 0.2246600E+00, 0.2246600E+00 /
      data (ref_adm( 5,iz,10, 7),iz = 1,20) / &
     & 0.2098000E+00, 0.2098000E+00, 0.1906100E+00, 0.1864200E+00, &
     & 0.1822700E+00, 0.1968000E+00, 0.1498000E+00, 0.1493900E+00, &
     & 0.1662400E+00, 0.1612700E+00, 0.1674200E+00, 0.1757600E+00, &
     & 0.2183800E+00, 0.2070000E+00, 0.2120900E+00, 0.2155100E+00, &
     & 0.1825200E+00, 0.1994700E+00, 0.1962900E+00, 0.1962900E+00 /
      data (ref_adm( 5,iz,11, 7),iz = 1,20) / &
     & 0.1935300E+00, 0.1935300E+00, 0.1865000E+00, 0.1868400E+00, &
     & 0.1765000E+00, 0.1826500E+00, 0.1871400E+00, 0.1771200E+00, &
     & 0.1590300E+00, 0.1731500E+00, 0.1794700E+00, 0.1532000E+00, &
     & 0.1671300E+00, 0.1803500E+00, 0.1475400E+00, 0.2195000E+00, &
     & 0.2133800E+00, 0.2392354E+00, 0.2176093E+00, 0.2176093E+00 /
      data (ref_adm( 5,iz,12, 7),iz = 1,20) / &
     & 0.1857000E+00, 0.1857000E+00, 0.1890300E+00, 0.1890100E+00, &
     & 0.1843200E+00, 0.1745200E+00, 0.1863800E+00, 0.1815300E+00, &
     & 0.1975500E+00, 0.1888000E+00, 0.1771300E+00, 0.1868200E+00, &
     & 0.1990000E+00, 0.2039300E+00, 0.2102931E+00, 0.2237135E+00, &
     & 0.2350641E+00, 0.2392354E+00, 0.2176094E+00, 0.2176094E+00 /
      data (ref_adm( 5,iz,13, 7),iz = 1,20) / &
     & 0.1779900E+00, 0.1779900E+00, 0.1597700E+00, 0.1696300E+00, &
     & 0.1721300E+00, 0.1727100E+00, 0.1687100E+00, 0.1759500E+00, &
     & 0.1711400E+00, 0.1760900E+00, 0.1852500E+00, 0.1915100E+00, &
     & 0.1923600E+00, 0.1897100E+00, 0.1666800E+00, 0.1482500E+00, &
     & 0.1468200E+00, 0.2444800E+00, 0.2176093E+00, 0.2176093E+00 /
      data (ref_adm( 5,iz,14, 7),iz = 1,20) / &
     & 0.1887400E+00, 0.1887400E+00, 0.1864500E+00, 0.1842900E+00, &
     & 0.2108200E+00, 0.2516200E+00, 0.2053500E+00, 0.1636500E+00, &
     & 0.1663200E+00, 0.1707200E+00, 0.1669800E+00, 0.1706400E+00, &
     & 0.1697100E+00, 0.1965500E+00, 0.1402400E+00, 0.1518400E+00, &
     & 0.1461700E+00, 0.1433100E+00, 0.2176094E+00, 0.2176094E+00 /
      data (ref_adm( 5,iz,15, 7),iz = 1,20) / &
     & 0.1829100E+00, 0.1829100E+00, 0.1939200E+00, 0.1857200E+00, &
     & 0.2113600E+00, 0.2003600E+00, 0.1823300E+00, 0.1864700E+00, &
     & 0.1731900E+00, 0.1599700E+00, 0.1603400E+00, 0.1798600E+00, &
     & 0.1769900E+00, 0.1684300E+00, 0.1639300E+00, 0.1845700E+00, &
     & 0.1604000E+00, 0.1418500E+00, 0.2176093E+00, 0.2176093E+00 /
      data (ref_adm( 5,iz,16, 7),iz = 1,20) / &
     & 0.1735900E+00, 0.1735900E+00, 0.1810000E+00, 0.1893700E+00, &
     & 0.1632200E+00, 0.1890000E+00, 0.1875200E+00, 0.1682300E+00, &
     & 0.1725100E+00, 0.1692100E+00, 0.1560400E+00, 0.1834731E+00, &
     & 0.2157600E+00, 0.1741300E+00, 0.2102931E+00, 0.1723800E+00, &
     & 0.2160300E+00, 0.2392354E+00, 0.2176094E+00, 0.2176094E+00 /
      data (ref_adm( 5,iz,17, 7),iz = 1,20) / &
     & 0.1772300E+00, 0.1772300E+00, 0.1972400E+00, 0.2042900E+00, &
     & 0.1611800E+00, 0.2037700E+00, 0.1728600E+00, 0.1697600E+00, &
     & 0.1897700E+00, 0.1893300E+00, 0.1503900E+00, 0.1539400E+00, &
     & 0.2394500E+00, 0.1925600E+00, 0.2056000E+00, 0.1638200E+00, &
     & 0.1779000E+00, 0.1556600E+00, 0.2176093E+00, 0.2176093E+00 /
      data (ref_adm( 5,iz,18, 7),iz = 1,20) / &
     & 0.1974200E+00, 0.1974200E+00, 0.2133500E+00, 0.2080800E+00, &
     & 0.1714500E+00, 0.1828000E+00, 0.1708800E+00, 0.1816900E+00, &
     & 0.1750200E+00, 0.1962500E+00, 0.1761900E+00, 0.1627700E+00, &
     & 0.1820100E+00, 0.1888147E+00, 0.1886100E+00, 0.1970138E+00, &
     & 0.1797100E+00, 0.1703500E+00, 0.2090596E+00, 0.2090596E+00 /
      data (ref_adm( 5,iz,19, 7),iz = 1,20) / &
     & 0.1935400E+00, 0.1935400E+00, 0.1958600E+00, 0.1646500E+00, &
     & 0.2102900E+00, 0.2015800E+00, 0.2013700E+00, 0.1835200E+00, &
     & 0.1546400E+00, 0.1551300E+00, 0.2162400E+00, 0.1649000E+00, &
     & 0.1432600E+00, 0.1625300E+00, 0.1502500E+00, 0.1783600E+00, &
     & 0.2007000E+00, 0.1807100E+00, 0.2086434E+00, 0.2086434E+00 /
      data (ref_adm( 5,iz,20, 7),iz = 1,20) / &
     & 0.1910000E+00, 0.1910000E+00, 0.2130700E+00, 0.1935400E+00, &
     & 0.1905000E+00, 0.1920200E+00, 0.1817000E+00, 0.2156800E+00, &
     & 0.1627500E+00, 0.1696600E+00, 0.1965000E+00, 0.1788700E+00, &
     & 0.2037300E+00, 0.1887400E+00, 0.1957700E+00, 0.2029000E+00, &
     & 0.2025883E+00, 0.2078300E+00, 0.2083083E+00, 0.2083083E+00 /
      data (ref_adm( 5,iz,21, 7),iz = 1,20) / &
     & 0.1974600E+00, 0.1974600E+00, 0.1886700E+00, 0.1979400E+00, &
     & 0.1944400E+00, 0.1822900E+00, 0.1778000E+00, 0.1966600E+00, &
     & 0.2306800E+00, 0.1765100E+00, 0.2353300E+00, 0.1862900E+00, &
     & 0.1887600E+00, 0.1952600E+00, 0.1869100E+00, 0.1819200E+00, &
     & 0.2026663E+00, 0.2092402E+00, 0.2079218E+00, 0.2079218E+00 /
      data (ref_adm( 5,iz,22, 7),iz = 1,20) / &
     & 0.2095600E+00, 0.2095600E+00, 0.2258200E+00, 0.1908800E+00, &
     & 0.1819400E+00, 0.1912000E+00, 0.1873000E+00, 0.1802700E+00, &
     & 0.2052500E+00, 0.2085900E+00, 0.1800600E+00, 0.1666100E+00, &
     & 0.1985500E+00, 0.1745000E+00, 0.1850400E+00, 0.1876200E+00, &
     & 0.2448800E+00, 0.2404366E+00, 0.2366459E+00, 0.2366459E+00 /
      data (ref_adm( 5,iz,23, 7),iz = 1,20) / &
     & 0.1936100E+00, 0.1936100E+00, 0.2168500E+00, 0.2104800E+00, &
     & 0.1981500E+00, 0.2064300E+00, 0.2034300E+00, 0.1932800E+00, &
     & 0.1918600E+00, 0.2317500E+00, 0.1805300E+00, 0.2341300E+00, &
     & 0.2134800E+00, 0.2115500E+00, 0.2100200E+00, 0.2109400E+00, &
     & 0.2083700E+00, 0.1986700E+00, 0.2363362E+00, 0.2363362E+00 /
      data (ref_adm( 5,iz,24, 7),iz = 1,20) / &
     & 0.1890200E+00, 0.1890200E+00, 0.2241200E+00, 0.1887000E+00, &
     & 0.1918400E+00, 0.1966500E+00, 0.2499700E+00, 0.1714100E+00, &
     & 0.1889100E+00, 0.2055900E+00, 0.2099700E+00, 0.2375200E+00, &
     & 0.2111200E+00, 0.2238500E+00, 0.2192600E+00, 0.2155900E+00, &
     & 0.2672300E+00, 0.1757100E+00, 0.2364211E+00, 0.2364211E+00 /
      data (ref_adm( 5,iz,25, 7),iz = 1,20) / &
     & 0.1906200E+00, 0.1906200E+00, 0.1884300E+00, 0.1934600E+00, &
     & 0.1953700E+00, 0.1985800E+00, 0.2046800E+00, 0.2049176E+00, &
     & 0.2202700E+00, 0.1742100E+00, 0.1947000E+00, 0.2207900E+00, &
     & 0.2067700E+00, 0.2370000E+00, 0.2357500E+00, 0.2409000E+00, &
     & 0.3002400E+00, 0.2413617E+00, 0.2368015E+00, 0.2368015E+00 /
      data (ref_adm( 5,iz,26, 7),iz = 1,20) / &
     & 0.2057100E+00, 0.2057100E+00, 0.2019800E+00, 0.2467000E+00, &
     & 0.2013654E+00, 0.2005100E+00, 0.2341000E+00, 0.3536300E+00, &
     & 0.1967700E+00, 0.1970500E+00, 0.2118100E+00, 0.2170300E+00, &
     & 0.2208800E+00, 0.2022500E+00, 0.2179900E+00, 0.2039700E+00, &
     & 0.2339100E+00, 0.2713600E+00, 0.2376009E+00, 0.2376009E+00 /
      data (ref_adm( 5,iz,27, 7),iz = 1,20) / &
     & 0.1983400E+00, 0.1983400E+00, 0.2168500E+00, 0.1948900E+00, &
     & 0.2338900E+00, 0.1990900E+00, 0.2011200E+00, 0.2200200E+00, &
     & 0.2145900E+00, 0.2258600E+00, 0.2280400E+00, 0.2166600E+00, &
     & 0.2318300E+00, 0.1985800E+00, 0.1991900E+00, 0.1645800E+00, &
     & 0.2474100E+00, 0.2435556E+00, 0.2388150E+00, 0.2388150E+00 /
      data (ref_adm( 5,iz,28, 7),iz = 1,20) / &
     & 0.1905300E+00, 0.1905300E+00, 0.1831100E+00, 0.2100500E+00, &
     & 0.2006900E+00, 0.2082800E+00, 0.2173900E+00, 0.2239200E+00, &
     & 0.2279200E+00, 0.2291400E+00, 0.2148400E+00, 0.2690700E+00, &
     & 0.1841200E+00, 0.2011600E+00, 0.2150500E+00, 0.2035100E+00, &
     & 0.2470500E+00, 0.2096000E+00, 0.2402236E+00, 0.2402236E+00 /
      data (ref_adm( 5,iz,29, 7),iz = 1,20) / &
     & 0.1938300E+00, 0.1938300E+00, 0.2022400E+00, 0.2010900E+00, &
     & 0.2062600E+00, 0.2035900E+00, 0.2143100E+00, 0.2176100E+00, &
     & 0.2241400E+00, 0.2103000E+00, 0.2066000E+00, 0.2127600E+00, &
     & 0.2264200E+00, 0.2258900E+00, 0.2478600E+00, 0.2520400E+00, &
     & 0.2426500E+00, 0.2650500E+00, 0.2418125E+00, 0.2418125E+00 /
      data (ref_adm( 5,iz,30, 7),iz = 1,20) / &
     & 0.2112500E+00, 0.2112500E+00, 0.2013400E+00, 0.2166200E+00, &
     & 0.2155600E+00, 0.2166000E+00, 0.2240100E+00, 0.2136800E+00, &
     & 0.2129200E+00, 0.2114500E+00, 0.2148900E+00, 0.2166600E+00, &
     & 0.2324200E+00, 0.2086300E+00, 0.2077500E+00, 0.2488300E+00, &
     & 0.2251700E+00, 0.2010900E+00, 0.2437319E+00, 0.2437319E+00 /
      data (ref_adm( 5,iz,31, 7),iz = 1,20) / &
     & 0.1768000E+00, 0.1768000E+00, 0.2044700E+00, 0.1780400E+00, &
     & 0.2136600E+00, 0.2240100E+00, 0.2101700E+00, 0.2248700E+00, &
     & 0.2088200E+00, 0.2202000E+00, 0.2273500E+00, 0.2219600E+00, &
     & 0.2326100E+00, 0.2293700E+00, 0.2244700E+00, 0.2388000E+00, &
     & 0.2058000E+00, 0.1972400E+00, 0.2457091E+00, 0.2457091E+00 /
      data (ref_adm( 5,iz,32, 7),iz = 1,20) / &
     & 0.2020300E+00, 0.2020300E+00, 0.1740400E+00, 0.2284000E+00, &
     & 0.2213000E+00, 0.2157900E+00, 0.2256200E+00, 0.2192600E+00, &
     & 0.2270900E+00, 0.2278500E+00, 0.2212800E+00, 0.2274700E+00, &
     & 0.2311400E+00, 0.2369900E+00, 0.2058200E+00, 0.2274000E+00, &
     & 0.2191000E+00, 0.2536392E+00, 0.2478333E+00, 0.2478333E+00 /
      data (ref_adm( 5,iz,33, 7),iz = 1,20) / &
     & 0.2089900E+00, 0.2089900E+00, 0.2145100E+00, 0.2102000E+00, &
     & 0.2404000E+00, 0.2215400E+00, 0.2357800E+00, 0.2246400E+00, &
     & 0.2280900E+00, 0.2200500E+00, 0.2117300E+00, 0.2211700E+00, &
     & 0.2291500E+00, 0.2406300E+00, 0.2287200E+00, 0.2291000E+00, &
     & 0.2328200E+00, 0.2555377E+00, 0.2498333E+00, 0.2498333E+00 /
      data (ref_adm( 5,iz,34, 7),iz = 1,20) / &
     & 0.1918600E+00, 0.1918600E+00, 0.2249900E+00, 0.2038300E+00, &
     & 0.2180000E+00, 0.2248600E+00, 0.2479400E+00, 0.2450400E+00, &
     & 0.2309000E+00, 0.2352200E+00, 0.2224200E+00, 0.2340500E+00, &
     & 0.2302400E+00, 0.2350900E+00, 0.2374300E+00, 0.2792300E+00, &
     & 0.2552101E+00, 0.2571669E+00, 0.2514625E+00, 0.2514625E+00 /
      data (ref_adm( 5,iz,35, 7),iz = 1,20) / &
     & 0.2185400E+00, 0.2185400E+00, 0.2002600E+00, 0.2260700E+00, &
     & 0.2323400E+00, 0.2180300E+00, 0.2463400E+00, 0.2442900E+00, &
     & 0.2494300E+00, 0.2451300E+00, 0.2244900E+00, 0.2441100E+00, &
     & 0.2331600E+00, 0.2583900E+00, 0.2697100E+00, 0.2523700E+00, &
     & 0.2567255E+00, 0.2585063E+00, 0.2528410E+00, 0.2528410E+00 /
      data (ref_adm( 5,iz,36, 7),iz = 1,20) / &
     & 0.1885600E+00, 0.1885600E+00, 0.1952800E+00, 0.1888300E+00, &
     & 0.2207800E+00, 0.2204200E+00, 0.2383600E+00, 0.2435000E+00, &
     & 0.2639500E+00, 0.2322500E+00, 0.2501400E+00, 0.2356000E+00, &
     & 0.2219100E+00, 0.2476900E+00, 0.2536100E+00, 0.2546774E+00, &
     & 0.2577248E+00, 0.2594618E+00, 0.2537595E+00, 0.2537595E+00 /
      data (ref_adm( 5,iz,37, 7),iz = 1,20) / &
     & 0.1874800E+00, 0.1874800E+00, 0.1956100E+00, 0.1943700E+00, &
     & 0.2205600E+00, 0.2258300E+00, 0.2278200E+00, 0.2409900E+00, &
     & 0.2437700E+00, 0.2331300E+00, 0.2447800E+00, 0.2680000E+00, &
     & 0.2629900E+00, 0.2583000E+00, 0.2519829E+00, 0.2553458E+00, &
     & 0.2583138E+00, 0.2599344E+00, 0.2543214E+00, 0.2543214E+00 /
      data (ref_adm( 5,iz,38, 7),iz = 1,20) / &
     & 0.1874800E+00, 0.1874800E+00, 0.1956100E+00, 0.1943700E+00, &
     & 0.2205600E+00, 0.2258300E+00, 0.2278200E+00, 0.2409900E+00, &
     & 0.2437700E+00, 0.2331300E+00, 0.2447800E+00, 0.2680000E+00, &
     & 0.2629900E+00, 0.2583000E+00, 0.2519829E+00, 0.2553458E+00, &
     & 0.2583138E+00, 0.2599344E+00, 0.2543214E+00, 0.2543214E+00 /
! Solar Zenith Angle 35.0 Albedo  0.2161707E+00
      data (ref_adm( 5,iz, 1, 8),iz = 1,20) / &
     & 0.1875200E+00, 0.1875200E+00, 0.2090100E+00, 0.2085800E+00, &
     & 0.2195800E+00, 0.1831700E+00, 0.1814400E+00, 0.1768000E+00, &
     & 0.2373400E+00, 0.1718900E+00, 0.2022100E+00, 0.2004900E+00, &
     & 0.1887500E+00, 0.2303300E+00, 0.2512800E+00, 0.2443900E+00, &
     & 0.2223500E+00, 0.1780100E+00, 0.2330265E+00, 0.2330265E+00 /
      data (ref_adm( 5,iz, 2, 8),iz = 1,20) / &
     & 0.1875200E+00, 0.1875200E+00, 0.2090100E+00, 0.2085800E+00, &
     & 0.2195800E+00, 0.1831700E+00, 0.1814400E+00, 0.1768000E+00, &
     & 0.2373400E+00, 0.1718900E+00, 0.2022100E+00, 0.2004900E+00, &
     & 0.1887500E+00, 0.2303300E+00, 0.2512800E+00, 0.2443900E+00, &
     & 0.2223500E+00, 0.1780100E+00, 0.2330265E+00, 0.2330265E+00 /
      data (ref_adm( 5,iz, 3, 8),iz = 1,20) / &
     & 0.2552900E+00, 0.2552900E+00, 0.1823100E+00, 0.1788700E+00, &
     & 0.1738500E+00, 0.1774400E+00, 0.1728300E+00, 0.1999700E+00, &
     & 0.1728300E+00, 0.1893200E+00, 0.1935400E+00, 0.1993800E+00, &
     & 0.2280800E+00, 0.2152600E+00, 0.2157200E+00, 0.2676900E+00, &
     & 0.3145400E+00, 0.2675000E+00, 0.2096300E+00, 0.2096300E+00 /
      data (ref_adm( 5,iz, 4, 8),iz = 1,20) / &
     & 0.1834800E+00, 0.1834800E+00, 0.1754300E+00, 0.2003400E+00, &
     & 0.1709100E+00, 0.1677500E+00, 0.1871600E+00, 0.1844000E+00, &
     & 0.1847900E+00, 0.1781600E+00, 0.1688700E+00, 0.1994500E+00, &
     & 0.2200600E+00, 0.2200300E+00, 0.2114300E+00, 0.2576500E+00, &
     & 0.2541200E+00, 0.2536100E+00, 0.1940000E+00, 0.1940000E+00 /
      data (ref_adm( 5,iz, 5, 8),iz = 1,20) / &
     & 0.2081100E+00, 0.2081100E+00, 0.1785800E+00, 0.1820400E+00, &
     & 0.1968600E+00, 0.1914700E+00, 0.1861200E+00, 0.1852900E+00, &
     & 0.1991900E+00, 0.1762100E+00, 0.1945200E+00, 0.1712300E+00, &
     & 0.2028800E+00, 0.2104600E+00, 0.2316200E+00, 0.2579300E+00, &
     & 0.2544200E+00, 0.3057800E+00, 0.2330265E+00, 0.2330265E+00 /
      data (ref_adm( 5,iz, 6, 8),iz = 1,20) / &
     & 0.2054500E+00, 0.2054500E+00, 0.1875700E+00, 0.1839300E+00, &
     & 0.1921700E+00, 0.1939900E+00, 0.1897000E+00, 0.1848200E+00, &
     & 0.1731000E+00, 0.1969800E+00, 0.2114100E+00, 0.1970300E+00, &
     & 0.1751600E+00, 0.2280900E+00, 0.2170200E+00, 0.2189400E+00, &
     & 0.2517179E+00, 0.3325700E+00, 0.2330265E+00, 0.2330265E+00 /
      data (ref_adm( 5,iz, 7, 8),iz = 1,20) / &
     & 0.2111000E+00, 0.2111000E+00, 0.1795900E+00, 0.2000900E+00, &
     & 0.2004200E+00, 0.1769600E+00, 0.2108100E+00, 0.1848500E+00, &
     & 0.1686700E+00, 0.2168000E+00, 0.1899000E+00, 0.1937400E+00, &
     & 0.2047400E+00, 0.2090700E+00, 0.2037000E+00, 0.2739700E+00, &
     & 0.3339800E+00, 0.3037500E+00, 0.2330265E+00, 0.2330265E+00 /
      data (ref_adm( 5,iz, 8, 8),iz = 1,20) / &
     & 0.2012900E+00, 0.2012900E+00, 0.2071400E+00, 0.2055100E+00, &
     & 0.1710600E+00, 0.1808700E+00, 0.1771700E+00, 0.1934000E+00, &
     & 0.1940400E+00, 0.2021800E+00, 0.2116800E+00, 0.1941400E+00, &
     & 0.2054300E+00, 0.2011800E+00, 0.1872400E+00, 0.2968900E+00, &
     & 0.1847200E+00, 0.2332000E+00, 0.2125000E+00, 0.2125000E+00 /
      data (ref_adm( 5,iz, 9, 8),iz = 1,20) / &
     & 0.2004100E+00, 0.2004100E+00, 0.2058200E+00, 0.1992000E+00, &
     & 0.1931000E+00, 0.1875700E+00, 0.1889600E+00, 0.1906100E+00, &
     & 0.1720800E+00, 0.1688000E+00, 0.2110800E+00, 0.2119200E+00, &
     & 0.2234400E+00, 0.2075400E+00, 0.2357700E+00, 0.2379500E+00, &
     & 0.2212600E+00, 0.2396200E+00, 0.2092200E+00, 0.2092200E+00 /
      data (ref_adm( 5,iz,10, 8),iz = 1,20) / &
     & 0.2150700E+00, 0.2150700E+00, 0.1969700E+00, 0.2244300E+00, &
     & 0.2050500E+00, 0.1993000E+00, 0.1978100E+00, 0.1998700E+00, &
     & 0.2096700E+00, 0.2135700E+00, 0.2130800E+00, 0.2125700E+00, &
     & 0.2349100E+00, 0.2296700E+00, 0.2511000E+00, 0.2537200E+00, &
     & 0.2583300E+00, 0.2435900E+00, 0.2330265E+00, 0.2330265E+00 /
      data (ref_adm( 5,iz,11, 8),iz = 1,20) / &
     & 0.2027900E+00, 0.2027900E+00, 0.2013200E+00, 0.2021700E+00, &
     & 0.1766800E+00, 0.2031600E+00, 0.1874300E+00, 0.1775000E+00, &
     & 0.1846100E+00, 0.2198800E+00, 0.1887800E+00, 0.1725600E+00, &
     & 0.2071100E+00, 0.1693600E+00, 0.1625100E+00, 0.2368900E+00, &
     & 0.2517179E+00, 0.2561848E+00, 0.2330265E+00, 0.2330265E+00 /
      data (ref_adm( 5,iz,12, 8),iz = 1,20) / &
     & 0.2162400E+00, 0.2162400E+00, 0.2162900E+00, 0.2083600E+00, &
     & 0.2073300E+00, 0.2078500E+00, 0.2010800E+00, 0.1949200E+00, &
     & 0.1849600E+00, 0.1823300E+00, 0.1893300E+00, 0.1762400E+00, &
     & 0.2081100E+00, 0.1843900E+00, 0.2252400E+00, 0.2232300E+00, &
     & 0.2222200E+00, 0.2558300E+00, 0.2330265E+00, 0.2330265E+00 /
      data (ref_adm( 5,iz,13, 8),iz = 1,20) / &
     & 0.1995300E+00, 0.1995300E+00, 0.1797900E+00, 0.1748700E+00, &
     & 0.1765800E+00, 0.1872900E+00, 0.1825500E+00, 0.1966900E+00, &
     & 0.2027000E+00, 0.2063500E+00, 0.2057700E+00, 0.1945700E+00, &
     & 0.1919900E+00, 0.1821600E+00, 0.2211300E+00, 0.2578300E+00, &
     & 0.2078600E+00, 0.2475800E+00, 0.2330265E+00, 0.2330265E+00 /
      data (ref_adm( 5,iz,14, 8),iz = 1,20) / &
     & 0.1916900E+00, 0.1916900E+00, 0.1838800E+00, 0.1665900E+00, &
     & 0.1740600E+00, 0.1746600E+00, 0.1847100E+00, 0.1773500E+00, &
     & 0.1795400E+00, 0.1849900E+00, 0.1855800E+00, 0.1871700E+00, &
     & 0.2008200E+00, 0.2093100E+00, 0.1771100E+00, 0.1840600E+00, &
     & 0.2435100E+00, 0.2561848E+00, 0.2330265E+00, 0.2330265E+00 /
      data (ref_adm( 5,iz,15, 8),iz = 1,20) / &
     & 0.2122200E+00, 0.2122200E+00, 0.2066000E+00, 0.1871200E+00, &
     & 0.1855400E+00, 0.1973900E+00, 0.1953500E+00, 0.1941800E+00, &
     & 0.1706700E+00, 0.1747900E+00, 0.1868500E+00, 0.1801400E+00, &
     & 0.1823100E+00, 0.1780100E+00, 0.1342000E+00, 0.1928100E+00, &
     & 0.2517179E+00, 0.2561848E+00, 0.2330265E+00, 0.2330265E+00 /
      data (ref_adm( 5,iz,16, 8),iz = 1,20) / &
     & 0.1939100E+00, 0.1939100E+00, 0.1875500E+00, 0.1914000E+00, &
     & 0.2006900E+00, 0.1856900E+00, 0.1981300E+00, 0.1960000E+00, &
     & 0.1846700E+00, 0.1935400E+00, 0.1895700E+00, 0.1675700E+00, &
     & 0.1895800E+00, 0.1883200E+00, 0.1789500E+00, 0.2062700E+00, &
     & 0.2517179E+00, 0.2561848E+00, 0.2330265E+00, 0.2330265E+00 /
      data (ref_adm( 5,iz,17, 8),iz = 1,20) / &
     & 0.1803900E+00, 0.1803900E+00, 0.2169100E+00, 0.2017000E+00, &
     & 0.2158400E+00, 0.2036800E+00, 0.1997000E+00, 0.1815000E+00, &
     & 0.1826000E+00, 0.1947400E+00, 0.2137200E+00, 0.1857900E+00, &
     & 0.1919000E+00, 0.2104200E+00, 0.2135700E+00, 0.1916200E+00, &
     & 0.2517179E+00, 0.2561848E+00, 0.2330265E+00, 0.2330265E+00 /
      data (ref_adm( 5,iz,18, 8),iz = 1,20) / &
     & 0.1921300E+00, 0.1921300E+00, 0.2097000E+00, 0.2069200E+00, &
     & 0.2016300E+00, 0.2036700E+00, 0.2023800E+00, 0.1956700E+00, &
     & 0.1964700E+00, 0.1857800E+00, 0.2227600E+00, 0.1924100E+00, &
     & 0.1906800E+00, 0.2141200E+00, 0.1947800E+00, 0.2168300E+00, &
     & 0.2246884E+00, 0.2322591E+00, 0.2287444E+00, 0.2287444E+00 /
      data (ref_adm( 5,iz,19, 8),iz = 1,20) / &
     & 0.2105800E+00, 0.2105800E+00, 0.2091600E+00, 0.2009900E+00, &
     & 0.2075400E+00, 0.1921000E+00, 0.2107300E+00, 0.2270000E+00, &
     & 0.2053900E+00, 0.1742200E+00, 0.2166500E+00, 0.2200300E+00, &
     & 0.1667800E+00, 0.1985800E+00, 0.1828600E+00, 0.2236700E+00, &
     & 0.2473800E+00, 0.2595000E+00, 0.2274842E+00, 0.2274842E+00 /
      data (ref_adm( 5,iz,20, 8),iz = 1,20) / &
     & 0.2002500E+00, 0.2002500E+00, 0.2296200E+00, 0.1921300E+00, &
     & 0.1715400E+00, 0.1817100E+00, 0.2005700E+00, 0.2025600E+00, &
     & 0.2034700E+00, 0.1966200E+00, 0.1954300E+00, 0.2043300E+00, &
     & 0.1811300E+00, 0.2178700E+00, 0.1872200E+00, 0.1943700E+00, &
     & 0.2243280E+00, 0.2309154E+00, 0.2265910E+00, 0.2265910E+00 /
      data (ref_adm( 5,iz,21, 8),iz = 1,20) / &
     & 0.2014800E+00, 0.2014800E+00, 0.1711100E+00, 0.1897400E+00, &
     & 0.1923200E+00, 0.1866500E+00, 0.2267800E+00, 0.1977000E+00, &
     & 0.1801800E+00, 0.2116400E+00, 0.1953000E+00, 0.2006100E+00, &
     & 0.2117400E+00, 0.2098900E+00, 0.1912200E+00, 0.2214300E+00, &
     & 0.1832200E+00, 0.2304763E+00, 0.2258482E+00, 0.2258482E+00 /
      data (ref_adm( 5,iz,22, 8),iz = 1,20) / &
     & 0.2117100E+00, 0.2117100E+00, 0.1809300E+00, 0.1877900E+00, &
     & 0.2002400E+00, 0.2119200E+00, 0.2105300E+00, 0.2021800E+00, &
     & 0.2440000E+00, 0.2042200E+00, 0.1935200E+00, 0.2364300E+00, &
     & 0.2228800E+00, 0.2358000E+00, 0.2288200E+00, 0.2489200E+00, &
     & 0.2449809E+00, 0.2527328E+00, 0.2484644E+00, 0.2484644E+00 /
      data (ref_adm( 5,iz,23, 8),iz = 1,20) / &
     & 0.2146500E+00, 0.2146500E+00, 0.1938600E+00, 0.2186200E+00, &
     & 0.2151300E+00, 0.2317500E+00, 0.1923900E+00, 0.2073300E+00, &
     & 0.2395200E+00, 0.2355400E+00, 0.2191100E+00, 0.1945400E+00, &
     & 0.1980800E+00, 0.2244900E+00, 0.2079700E+00, 0.2257600E+00, &
     & 0.2457434E+00, 0.2526459E+00, 0.2481944E+00, 0.2481944E+00 /
      data (ref_adm( 5,iz,24, 8),iz = 1,20) / &
     & 0.2096200E+00, 0.2096200E+00, 0.2132800E+00, 0.2044500E+00, &
     & 0.2107500E+00, 0.2360900E+00, 0.2318500E+00, 0.2242900E+00, &
     & 0.1976900E+00, 0.2252000E+00, 0.2147600E+00, 0.2133900E+00, &
     & 0.2338700E+00, 0.2336500E+00, 0.2532800E+00, 0.2284100E+00, &
     & 0.2760300E+00, 0.2529816E+00, 0.2483716E+00, 0.2483716E+00 /
      data (ref_adm( 5,iz,25, 8),iz = 1,20) / &
     & 0.1911300E+00, 0.1911300E+00, 0.2154600E+00, 0.1942200E+00, &
     & 0.2009700E+00, 0.2516400E+00, 0.2038900E+00, 0.2482100E+00, &
     & 0.2460400E+00, 0.2148200E+00, 0.2236700E+00, 0.2280100E+00, &
     & 0.2341700E+00, 0.2230600E+00, 0.2224800E+00, 0.2250000E+00, &
     & 0.2245200E+00, 0.2538884E+00, 0.2488514E+00, 0.2488514E+00 /
      data (ref_adm( 5,iz,26, 8),iz = 1,20) / &
     & 0.1787100E+00, 0.1787100E+00, 0.1986500E+00, 0.1918200E+00, &
     & 0.2000600E+00, 0.2104300E+00, 0.1923800E+00, 0.2094900E+00, &
     & 0.2150600E+00, 0.2222000E+00, 0.2467800E+00, 0.2460100E+00, &
     & 0.2267800E+00, 0.2683200E+00, 0.2465700E+00, 0.2579600E+00, &
     & 0.2559900E+00, 0.2556100E+00, 0.2499441E+00, 0.2499441E+00 /
      data (ref_adm( 5,iz,27, 8),iz = 1,20) / &
     & 0.1953500E+00, 0.1953500E+00, 0.2005500E+00, 0.1962100E+00, &
     & 0.1979100E+00, 0.2019900E+00, 0.2100300E+00, 0.2222100E+00, &
     & 0.2107700E+00, 0.2172600E+00, 0.2293500E+00, 0.2181600E+00, &
     & 0.2447200E+00, 0.2474900E+00, 0.2701900E+00, 0.2774900E+00, &
     & 0.2529000E+00, 0.2649500E+00, 0.2242000E+00, 0.2242000E+00 /
      data (ref_adm( 5,iz,28, 8),iz = 1,20) / &
     & 0.1979800E+00, 0.1979800E+00, 0.2201200E+00, 0.2173900E+00, &
     & 0.2250900E+00, 0.2270600E+00, 0.2258500E+00, 0.2151800E+00, &
     & 0.2248000E+00, 0.2216400E+00, 0.2264800E+00, 0.2237700E+00, &
     & 0.2106100E+00, 0.2419300E+00, 0.2421200E+00, 0.2472400E+00, &
     & 0.2619900E+00, 0.2186000E+00, 0.1935700E+00, 0.1935700E+00 /
      data (ref_adm( 5,iz,29, 8),iz = 1,20) / &
     & 0.2106900E+00, 0.2106900E+00, 0.2028200E+00, 0.2274000E+00, &
     & 0.2077300E+00, 0.2171100E+00, 0.2268800E+00, 0.2385400E+00, &
     & 0.2366500E+00, 0.2354400E+00, 0.2200300E+00, 0.2294000E+00, &
     & 0.2297900E+00, 0.2378100E+00, 0.2591100E+00, 0.2548800E+00, &
     & 0.2534700E+00, 0.2618700E+00, 0.2228400E+00, 0.2228400E+00 /
      data (ref_adm( 5,iz,30, 8),iz = 1,20) / &
     & 0.2163600E+00, 0.2163600E+00, 0.2079800E+00, 0.2282000E+00, &
     & 0.1996900E+00, 0.2311500E+00, 0.2100900E+00, 0.1946500E+00, &
     & 0.2121700E+00, 0.2279900E+00, 0.2349000E+00, 0.2239200E+00, &
     & 0.2267400E+00, 0.2362400E+00, 0.2486400E+00, 0.2564300E+00, &
     & 0.2548600E+00, 0.2373000E+00, 0.2028000E+00, 0.2028000E+00 /
      data (ref_adm( 5,iz,31, 8),iz = 1,20) / &
     & 0.2075200E+00, 0.2075200E+00, 0.1940100E+00, 0.1951500E+00, &
     & 0.1936400E+00, 0.2140600E+00, 0.2345200E+00, 0.2155200E+00, &
     & 0.2145600E+00, 0.2212900E+00, 0.2388500E+00, 0.2206300E+00, &
     & 0.2588600E+00, 0.2394000E+00, 0.2694900E+00, 0.2722200E+00, &
     & 0.2565700E+00, 0.2645600E+00, 0.2105000E+00, 0.2105000E+00 /
      data (ref_adm( 5,iz,32, 8),iz = 1,20) / &
     & 0.1977400E+00, 0.1977400E+00, 0.2353700E+00, 0.2058900E+00, &
     & 0.2121500E+00, 0.2233800E+00, 0.2366700E+00, 0.2240800E+00, &
     & 0.2411700E+00, 0.2555800E+00, 0.2642400E+00, 0.2296600E+00, &
     & 0.2440700E+00, 0.2411000E+00, 0.2766300E+00, 0.3143500E+00, &
     & 0.2383500E+00, 0.2712300E+00, 0.2395400E+00, 0.2395400E+00 /
      data (ref_adm( 5,iz,33, 8),iz = 1,20) / &
     & 0.2058300E+00, 0.2058300E+00, 0.2079700E+00, 0.2158800E+00, &
     & 0.2407600E+00, 0.2554600E+00, 0.2515000E+00, 0.2253500E+00, &
     & 0.2338800E+00, 0.2551000E+00, 0.2423000E+00, 0.2360500E+00, &
     & 0.2269300E+00, 0.2396000E+00, 0.2706400E+00, 0.2710200E+00, &
     & 0.2314800E+00, 0.2459900E+00, 0.2654162E+00, 0.2654162E+00 /
      data (ref_adm( 5,iz,34, 8),iz = 1,20) / &
     & 0.1922300E+00, 0.1922300E+00, 0.1968700E+00, 0.2055200E+00, &
     & 0.2114700E+00, 0.2408500E+00, 0.2153400E+00, 0.2297200E+00, &
     & 0.2757200E+00, 0.2631900E+00, 0.2666900E+00, 0.2867900E+00, &
     & 0.2663000E+00, 0.2349800E+00, 0.2593300E+00, 0.2676268E+00, &
     & 0.2600000E+00, 0.2729796E+00, 0.2674371E+00, 0.2674371E+00 /
      data (ref_adm( 5,iz,35, 8),iz = 1,20) / &
     & 0.2025600E+00, 0.2025600E+00, 0.2054000E+00, 0.2263900E+00, &
     & 0.2305100E+00, 0.2194900E+00, 0.2394200E+00, 0.2745200E+00, &
     & 0.2692200E+00, 0.2793900E+00, 0.2596500E+00, 0.2448900E+00, &
     & 0.2518900E+00, 0.2835600E+00, 0.2444000E+00, 0.2672800E+00, &
     & 0.2463200E+00, 0.2745256E+00, 0.2691388E+00, 0.2691388E+00 /
      data (ref_adm( 5,iz,36, 8),iz = 1,20) / &
     & 0.2094800E+00, 0.2094800E+00, 0.2254700E+00, 0.2163200E+00, &
     & 0.1911200E+00, 0.2339700E+00, 0.2449300E+00, 0.2684700E+00, &
     & 0.2694400E+00, 0.2708700E+00, 0.2837400E+00, 0.2548900E+00, &
     & 0.2450200E+00, 0.2689500E+00, 0.2392900E+00, 0.2606000E+00, &
     & 0.2705800E+00, 0.2757454E+00, 0.2702444E+00, 0.2702444E+00 /
      data (ref_adm( 5,iz,37, 8),iz = 1,20) / &
     & 0.2023900E+00, 0.2023900E+00, 0.1867500E+00, 0.2012900E+00, &
     & 0.2144400E+00, 0.2263200E+00, 0.2742200E+00, 0.2706200E+00, &
     & 0.2621500E+00, 0.2930300E+00, 0.2909300E+00, 0.2661900E+00, &
     & 0.2557100E+00, 0.2550800E+00, 0.2609400E+00, 0.2718927E+00, &
     & 0.2748978E+00, 0.2763577E+00, 0.2709218E+00, 0.2709218E+00 /
      data (ref_adm( 5,iz,38, 8),iz = 1,20) / &
     & 0.2023900E+00, 0.2023900E+00, 0.1867500E+00, 0.2012900E+00, &
     & 0.2144400E+00, 0.2263200E+00, 0.2742200E+00, 0.2706200E+00, &
     & 0.2621500E+00, 0.2930300E+00, 0.2909300E+00, 0.2661900E+00, &
     & 0.2557100E+00, 0.2550800E+00, 0.2609400E+00, 0.2718927E+00, &
     & 0.2748978E+00, 0.2763577E+00, 0.2709218E+00, 0.2709218E+00 /
! Solar Zenith Angle 40.0 Albedo  0.2194339E+00
      data (ref_adm( 5,iz, 1, 9),iz = 1,20) / &
     & 0.1751100E+00, 0.1751100E+00, 0.1814100E+00, 0.2073400E+00, &
     & 0.2057600E+00, 0.1885400E+00, 0.1678200E+00, 0.1685400E+00, &
     & 0.2161900E+00, 0.2255700E+00, 0.2219200E+00, 0.2046400E+00, &
     & 0.2401700E+00, 0.1951000E+00, 0.2547100E+00, 0.2652200E+00, &
     & 0.2966000E+00, 0.2982500E+00, 0.2127200E+00, 0.2127200E+00 /
      data (ref_adm( 5,iz, 2, 9),iz = 1,20) / &
     & 0.1751100E+00, 0.1751100E+00, 0.1814100E+00, 0.2073400E+00, &
     & 0.2057600E+00, 0.1885400E+00, 0.1678200E+00, 0.1685400E+00, &
     & 0.2161900E+00, 0.2255700E+00, 0.2219200E+00, 0.2046400E+00, &
     & 0.2401700E+00, 0.1951000E+00, 0.2547100E+00, 0.2652200E+00, &
     & 0.2966000E+00, 0.2982500E+00, 0.2127200E+00, 0.2127200E+00 /
      data (ref_adm( 5,iz, 3, 9),iz = 1,20) / &
     & 0.1921000E+00, 0.1921000E+00, 0.1703900E+00, 0.1789800E+00, &
     & 0.1736700E+00, 0.1869500E+00, 0.1917300E+00, 0.1827200E+00, &
     & 0.2201800E+00, 0.2135600E+00, 0.1981300E+00, 0.1740700E+00, &
     & 0.2205900E+00, 0.2115800E+00, 0.2565200E+00, 0.2173900E+00, &
     & 0.2867700E+00, 0.3010200E+00, 0.2975700E+00, 0.2975700E+00 /
      data (ref_adm( 5,iz, 4, 9),iz = 1,20) / &
     & 0.2186300E+00, 0.2186300E+00, 0.1828200E+00, 0.1655400E+00, &
     & 0.1844400E+00, 0.1712200E+00, 0.1640900E+00, 0.1875700E+00, &
     & 0.1797500E+00, 0.1915900E+00, 0.1712000E+00, 0.2510700E+00, &
     & 0.2188600E+00, 0.2503200E+00, 0.2424800E+00, 0.2540700E+00, &
     & 0.2422500E+00, 0.3219600E+00, 0.2677383E+00, 0.2677383E+00 /
      data (ref_adm( 5,iz, 5, 9),iz = 1,20) / &
     & 0.2062100E+00, 0.2062100E+00, 0.1815500E+00, 0.1670700E+00, &
     & 0.1794900E+00, 0.1972100E+00, 0.1899100E+00, 0.1889200E+00, &
     & 0.2013200E+00, 0.1819000E+00, 0.1773400E+00, 0.1969600E+00, &
     & 0.1835000E+00, 0.2077600E+00, 0.2265100E+00, 0.2235400E+00, &
     & 0.2484400E+00, 0.3199700E+00, 0.2669531E+00, 0.2669531E+00 /
      data (ref_adm( 5,iz, 6, 9),iz = 1,20) / &
     & 0.1945900E+00, 0.1945900E+00, 0.1852800E+00, 0.1879700E+00, &
     & 0.1927400E+00, 0.1757100E+00, 0.1565000E+00, 0.1668600E+00, &
     & 0.1781100E+00, 0.1938700E+00, 0.1652700E+00, 0.1807600E+00, &
     & 0.1770300E+00, 0.1941500E+00, 0.2302400E+00, 0.2168500E+00, &
     & 0.3421400E+00, 0.2952293E+00, 0.2660488E+00, 0.2660488E+00 /
      data (ref_adm( 5,iz, 7, 9),iz = 1,20) / &
     & 0.1980000E+00, 0.1980000E+00, 0.1822400E+00, 0.1788500E+00, &
     & 0.1742800E+00, 0.1763700E+00, 0.1750400E+00, 0.1754600E+00, &
     & 0.1750700E+00, 0.2153100E+00, 0.1683000E+00, 0.2142600E+00, &
     & 0.2135500E+00, 0.2167400E+00, 0.2157900E+00, 0.1566400E+00, &
     & 0.3268100E+00, 0.3450800E+00, 0.2647508E+00, 0.2647508E+00 /
      data (ref_adm( 5,iz, 8, 9),iz = 1,20) / &
     & 0.1996700E+00, 0.1996700E+00, 0.1842100E+00, 0.1834600E+00, &
     & 0.1690500E+00, 0.1744900E+00, 0.1646700E+00, 0.1691400E+00, &
     & 0.1757100E+00, 0.1711600E+00, 0.1738700E+00, 0.1737400E+00, &
     & 0.1627800E+00, 0.1703600E+00, 0.1955300E+00, 0.2290400E+00, &
     & 0.3990700E+00, 0.2171300E+00, 0.3650400E+00, 0.3650400E+00 /
      data (ref_adm( 5,iz, 9, 9),iz = 1,20) / &
     & 0.1869100E+00, 0.1869100E+00, 0.1902900E+00, 0.1980400E+00, &
     & 0.1743500E+00, 0.2128400E+00, 0.1796500E+00, 0.1968400E+00, &
     & 0.1731800E+00, 0.1857200E+00, 0.1888800E+00, 0.2008400E+00, &
     & 0.1698100E+00, 0.1758600E+00, 0.2100300E+00, 0.2973200E+00, &
     & 0.3367100E+00, 0.3562800E+00, 0.3569600E+00, 0.3569600E+00 /
      data (ref_adm( 5,iz,10, 9),iz = 1,20) / &
     & 0.1881900E+00, 0.1881900E+00, 0.1822400E+00, 0.1763400E+00, &
     & 0.1938800E+00, 0.1800400E+00, 0.1808600E+00, 0.1834200E+00, &
     & 0.1888900E+00, 0.1784400E+00, 0.1888100E+00, 0.1970900E+00, &
     & 0.1907700E+00, 0.1874300E+00, 0.2304400E+00, 0.2414000E+00, &
     & 0.2773900E+00, 0.3011500E+00, 0.3142700E+00, 0.3142700E+00 /
      data (ref_adm( 5,iz,11, 9),iz = 1,20) / &
     & 0.1863000E+00, 0.1863000E+00, 0.1988100E+00, 0.1801500E+00, &
     & 0.2027100E+00, 0.1925100E+00, 0.1907200E+00, 0.1841100E+00, &
     & 0.2019500E+00, 0.1729200E+00, 0.1991700E+00, 0.1821700E+00, &
     & 0.1686800E+00, 0.1686000E+00, 0.2208100E+00, 0.2344900E+00, &
     & 0.2496600E+00, 0.2639600E+00, 0.2575467E+00, 0.2575467E+00 /
      data (ref_adm( 5,iz,12, 9),iz = 1,20) / &
     & 0.1871800E+00, 0.1871800E+00, 0.1941700E+00, 0.1890400E+00, &
     & 0.1988300E+00, 0.1948800E+00, 0.1772500E+00, 0.1776600E+00, &
     & 0.1885600E+00, 0.1693300E+00, 0.1896700E+00, 0.1927400E+00, &
     & 0.2018100E+00, 0.1899100E+00, 0.2560500E+00, 0.2717200E+00, &
     & 0.2906800E+00, 0.2536400E+00, 0.2554608E+00, 0.2554608E+00 /
      data (ref_adm( 5,iz,13, 9),iz = 1,20) / &
     & 0.2042300E+00, 0.2042300E+00, 0.1827000E+00, 0.1894600E+00, &
     & 0.1786400E+00, 0.1803500E+00, 0.1927900E+00, 0.1935400E+00, &
     & 0.2001100E+00, 0.1958000E+00, 0.1949000E+00, 0.1961900E+00, &
     & 0.2010800E+00, 0.1958700E+00, 0.2260400E+00, 0.2527200E+00, &
     & 0.2680800E+00, 0.2823200E+00, 0.2534622E+00, 0.2534622E+00 /
      data (ref_adm( 5,iz,14, 9),iz = 1,20) / &
     & 0.1830200E+00, 0.1830200E+00, 0.1748700E+00, 0.1805800E+00, &
     & 0.1781700E+00, 0.1775600E+00, 0.1796800E+00, 0.1726700E+00, &
     & 0.1666000E+00, 0.1855000E+00, 0.1886400E+00, 0.1973500E+00, &
     & 0.2012000E+00, 0.1986700E+00, 0.2291700E+00, 0.2509600E+00, &
     & 0.2535600E+00, 0.2605300E+00, 0.1992400E+00, 0.1992400E+00 /
      data (ref_adm( 5,iz,15, 9),iz = 1,20) / &
     & 0.1878600E+00, 0.1878600E+00, 0.1811000E+00, 0.1854900E+00, &
     & 0.1975100E+00, 0.1693800E+00, 0.1830500E+00, 0.1777200E+00, &
     & 0.1794300E+00, 0.1813500E+00, 0.1909000E+00, 0.1891000E+00, &
     & 0.1893500E+00, 0.1867300E+00, 0.2018600E+00, 0.2186500E+00, &
     & 0.2552800E+00, 0.2334200E+00, 0.2315400E+00, 0.2315400E+00 /
      data (ref_adm( 5,iz,16, 9),iz = 1,20) / &
     & 0.1972600E+00, 0.1972600E+00, 0.2048900E+00, 0.1726300E+00, &
     & 0.1924600E+00, 0.1873100E+00, 0.2039200E+00, 0.1990600E+00, &
     & 0.1641700E+00, 0.1770800E+00, 0.2057500E+00, 0.1806800E+00, &
     & 0.1946000E+00, 0.1958300E+00, 0.2275600E+00, 0.2456700E+00, &
     & 0.2382000E+00, 0.2534600E+00, 0.2465192E+00, 0.2465192E+00 /
      data (ref_adm( 5,iz,17, 9),iz = 1,20) / &
     & 0.1829700E+00, 0.1829700E+00, 0.1653300E+00, 0.1721700E+00, &
     & 0.1872700E+00, 0.1877300E+00, 0.1754100E+00, 0.1842800E+00, &
     & 0.1728300E+00, 0.1872900E+00, 0.1879400E+00, 0.1977000E+00, &
     & 0.1950600E+00, 0.2242000E+00, 0.2249700E+00, 0.2226800E+00, &
     & 0.2267400E+00, 0.2696742E+00, 0.2443728E+00, 0.2443728E+00 /
      data (ref_adm( 5,iz,18, 9),iz = 1,20) / &
     & 0.1831200E+00, 0.1831200E+00, 0.1759600E+00, 0.2033400E+00, &
     & 0.1819800E+00, 0.1704600E+00, 0.1801400E+00, 0.1671000E+00, &
     & 0.2064100E+00, 0.1905900E+00, 0.2229700E+00, 0.1929100E+00, &
     & 0.2117800E+00, 0.2187200E+00, 0.2251500E+00, 0.2249400E+00, &
     & 0.2154300E+00, 0.2518065E+00, 0.2514333E+00, 0.2514333E+00 /
      data (ref_adm( 5,iz,19, 9),iz = 1,20) / &
     & 0.1881100E+00, 0.1881100E+00, 0.1853600E+00, 0.1945200E+00, &
     & 0.1675000E+00, 0.1727200E+00, 0.1935700E+00, 0.1984500E+00, &
     & 0.1823000E+00, 0.1896600E+00, 0.2114300E+00, 0.1937100E+00, &
     & 0.2236100E+00, 0.2211000E+00, 0.2324100E+00, 0.2389500E+00, &
     & 0.2458400E+00, 0.2506326E+00, 0.2489887E+00, 0.2489887E+00 /
      data (ref_adm( 5,iz,20, 9),iz = 1,20) / &
     & 0.1936100E+00, 0.1936100E+00, 0.1634600E+00, 0.1685900E+00, &
     & 0.2010500E+00, 0.1977200E+00, 0.1943000E+00, 0.1891100E+00, &
     & 0.1930100E+00, 0.2088900E+00, 0.2180200E+00, 0.2012600E+00, &
     & 0.2003600E+00, 0.2100300E+00, 0.2193300E+00, 0.2378600E+00, &
     & 0.2427100E+00, 0.2423900E+00, 0.2474236E+00, 0.2474236E+00 /
      data (ref_adm( 5,iz,21, 9),iz = 1,20) / &
     & 0.1813800E+00, 0.1813800E+00, 0.1696700E+00, 0.1853000E+00, &
     & 0.1896600E+00, 0.1964100E+00, 0.1915600E+00, 0.1767600E+00, &
     & 0.2024000E+00, 0.2047600E+00, 0.2172900E+00, 0.2295100E+00, &
     & 0.2042900E+00, 0.1933000E+00, 0.2399300E+00, 0.2103400E+00, &
     & 0.2397743E+00, 0.2491893E+00, 0.2462973E+00, 0.2462973E+00 /
      data (ref_adm( 5,iz,22, 9),iz = 1,20) / &
     & 0.2012100E+00, 0.2012100E+00, 0.1983700E+00, 0.1811500E+00, &
     & 0.1919900E+00, 0.2019500E+00, 0.1800100E+00, 0.2085300E+00, &
     & 0.2157500E+00, 0.2025600E+00, 0.2056700E+00, 0.2309500E+00, &
     & 0.2209900E+00, 0.2189100E+00, 0.2182900E+00, 0.2405900E+00, &
     & 0.2588497E+00, 0.2694667E+00, 0.2673449E+00, 0.2673449E+00 /
      data (ref_adm( 5,iz,23, 9),iz = 1,20) / &
     & 0.1880200E+00, 0.1880200E+00, 0.1907100E+00, 0.1979800E+00, &
     & 0.1934300E+00, 0.1990900E+00, 0.2103800E+00, 0.1929700E+00, &
     & 0.2079700E+00, 0.2165900E+00, 0.2112300E+00, 0.2252400E+00, &
     & 0.2283800E+00, 0.2479800E+00, 0.2393500E+00, 0.2902000E+00, &
     & 0.2597937E+00, 0.2693892E+00, 0.2672668E+00, 0.2672668E+00 /
      data (ref_adm( 5,iz,24, 9),iz = 1,20) / &
     & 0.1860000E+00, 0.1860000E+00, 0.1881400E+00, 0.2039800E+00, &
     & 0.2127300E+00, 0.2099200E+00, 0.2000900E+00, 0.2133600E+00, &
     & 0.2119000E+00, 0.2090400E+00, 0.2295500E+00, 0.2516200E+00, &
     & 0.2341700E+00, 0.2457700E+00, 0.2384100E+00, 0.2653400E+00, &
     & 0.2611751E+00, 0.2702464E+00, 0.2677577E+00, 0.2677577E+00 /
      data (ref_adm( 5,iz,25, 9),iz = 1,20) / &
     & 0.1785100E+00, 0.1785100E+00, 0.1824600E+00, 0.1873200E+00, &
     & 0.1927200E+00, 0.2065900E+00, 0.2135000E+00, 0.2178300E+00, &
     & 0.2200200E+00, 0.2076400E+00, 0.2267000E+00, 0.2054100E+00, &
     & 0.2160200E+00, 0.2431200E+00, 0.2464300E+00, 0.2183500E+00, &
     & 0.2437400E+00, 0.2716273E+00, 0.2690855E+00, 0.2690855E+00 /
      data (ref_adm( 5,iz,26, 9),iz = 1,20) / &
     & 0.1808100E+00, 0.1808100E+00, 0.1882400E+00, 0.1945000E+00, &
     & 0.1918300E+00, 0.2060600E+00, 0.1987400E+00, 0.1956000E+00, &
     & 0.2054000E+00, 0.1955000E+00, 0.2088400E+00, 0.2180800E+00, &
     & 0.2400000E+00, 0.2511900E+00, 0.2383200E+00, 0.2432100E+00, &
     & 0.2414300E+00, 0.2862800E+00, 0.2711736E+00, 0.2711736E+00 /
      data (ref_adm( 5,iz,27, 9),iz = 1,20) / &
     & 0.1870300E+00, 0.1870300E+00, 0.2019800E+00, 0.2059900E+00, &
     & 0.2131500E+00, 0.2146000E+00, 0.2058900E+00, 0.2166900E+00, &
     & 0.2115800E+00, 0.2254000E+00, 0.2231000E+00, 0.2221200E+00, &
     & 0.2384100E+00, 0.2602300E+00, 0.2655100E+00, 0.2704100E+00, &
     & 0.2553500E+00, 0.2349500E+00, 0.2737011E+00, 0.2737011E+00 /
      data (ref_adm( 5,iz,28, 9),iz = 1,20) / &
     & 0.1992300E+00, 0.1992300E+00, 0.1945000E+00, 0.2027500E+00, &
     & 0.2109300E+00, 0.2258500E+00, 0.2256500E+00, 0.2408800E+00, &
     & 0.2474900E+00, 0.2500000E+00, 0.2432100E+00, 0.2308600E+00, &
     & 0.2359500E+00, 0.2463200E+00, 0.2571700E+00, 0.2363400E+00, &
     & 0.2768000E+00, 0.2481400E+00, 0.1845800E+00, 0.1845800E+00 /
      data (ref_adm( 5,iz,29, 9),iz = 1,20) / &
     & 0.1958800E+00, 0.1958800E+00, 0.2034700E+00, 0.1947600E+00, &
     & 0.2091700E+00, 0.2157300E+00, 0.2206800E+00, 0.2293200E+00, &
     & 0.2347000E+00, 0.2464900E+00, 0.2577100E+00, 0.2590200E+00, &
     & 0.2750000E+00, 0.2529300E+00, 0.2790200E+00, 0.2920100E+00, &
     & 0.2968700E+00, 0.2525600E+00, 0.2192400E+00, 0.2192400E+00 /
      data (ref_adm( 5,iz,30, 9),iz = 1,20) / &
     & 0.1907300E+00, 0.1907300E+00, 0.2085700E+00, 0.2164700E+00, &
     & 0.2040200E+00, 0.2017400E+00, 0.2215700E+00, 0.2214800E+00, &
     & 0.2224000E+00, 0.2312500E+00, 0.2380300E+00, 0.2541600E+00, &
     & 0.2583300E+00, 0.2650600E+00, 0.2719200E+00, 0.2577400E+00, &
     & 0.2967100E+00, 0.2894000E+00, 0.2331300E+00, 0.2331300E+00 /
      data (ref_adm( 5,iz,31, 9),iz = 1,20) / &
     & 0.1843300E+00, 0.1843300E+00, 0.1892000E+00, 0.2231800E+00, &
     & 0.2273900E+00, 0.2678000E+00, 0.2480700E+00, 0.2492300E+00, &
     & 0.2155900E+00, 0.2415700E+00, 0.2413500E+00, 0.2406800E+00, &
     & 0.2592800E+00, 0.2616600E+00, 0.2697100E+00, 0.2449200E+00, &
     & 0.2845800E+00, 0.2328100E+00, 0.2191300E+00, 0.2191300E+00 /
      data (ref_adm( 5,iz,32, 9),iz = 1,20) / &
     & 0.1871400E+00, 0.1871400E+00, 0.2051100E+00, 0.2020300E+00, &
     & 0.2080200E+00, 0.2126900E+00, 0.2211800E+00, 0.2413000E+00, &
     & 0.2441100E+00, 0.2530600E+00, 0.2704600E+00, 0.2724200E+00, &
     & 0.2437700E+00, 0.2716300E+00, 0.2912900E+00, 0.2374400E+00, &
     & 0.2437400E+00, 0.2618900E+00, 0.1990600E+00, 0.1990600E+00 /
      data (ref_adm( 5,iz,33, 9),iz = 1,20) / &
     & 0.1854800E+00, 0.1854800E+00, 0.1953100E+00, 0.2023600E+00, &
     & 0.2168600E+00, 0.2409200E+00, 0.2481500E+00, 0.2415900E+00, &
     & 0.2605500E+00, 0.2960100E+00, 0.2840900E+00, 0.2652700E+00, &
     & 0.2845400E+00, 0.2865400E+00, 0.2745900E+00, 0.2820700E+00, &
     & 0.2858900E+00, 0.2771000E+00, 0.2181600E+00, 0.2181600E+00 /
      data (ref_adm( 5,iz,34, 9),iz = 1,20) / &
     & 0.1961100E+00, 0.1961100E+00, 0.2119000E+00, 0.2242300E+00, &
     & 0.2129700E+00, 0.2303000E+00, 0.2433100E+00, 0.2574500E+00, &
     & 0.2659900E+00, 0.2887700E+00, 0.2858800E+00, 0.3010700E+00, &
     & 0.2768700E+00, 0.2905600E+00, 0.3043400E+00, 0.3105700E+00, &
     & 0.2703500E+00, 0.3014300E+00, 0.3021536E+00, 0.3021536E+00 /
      data (ref_adm( 5,iz,35, 9),iz = 1,20) / &
     & 0.2016300E+00, 0.2016300E+00, 0.2108800E+00, 0.2272000E+00, &
     & 0.2285400E+00, 0.2158800E+00, 0.2577000E+00, 0.2719200E+00, &
     & 0.2805200E+00, 0.2887100E+00, 0.3079200E+00, 0.3061000E+00, &
     & 0.2675300E+00, 0.3043200E+00, 0.2849600E+00, 0.2944600E+00, &
     & 0.3083500E+00, 0.3122300E+00, 0.3049495E+00, 0.3049495E+00 /
      data (ref_adm( 5,iz,36, 9),iz = 1,20) / &
     & 0.1875700E+00, 0.1875700E+00, 0.2027700E+00, 0.2253200E+00, &
     & 0.2035700E+00, 0.2250400E+00, 0.2407600E+00, 0.2694600E+00, &
     & 0.2835400E+00, 0.2977200E+00, 0.2524100E+00, 0.3057000E+00, &
     & 0.3019000E+00, 0.2728000E+00, 0.2705800E+00, 0.3160300E+00, &
     & 0.3051800E+00, 0.3087518E+00, 0.3068439E+00, 0.3068439E+00 /
      data (ref_adm( 5,iz,37, 9),iz = 1,20) / &
     & 0.1841000E+00, 0.1841000E+00, 0.1906900E+00, 0.1975600E+00, &
     & 0.2225400E+00, 0.2307800E+00, 0.2437400E+00, 0.2645500E+00, &
     & 0.2751500E+00, 0.3015100E+00, 0.3144600E+00, 0.3168600E+00, &
     & 0.3028500E+00, 0.2691900E+00, 0.2568100E+00, 0.2546200E+00, &
     & 0.3051176E+00, 0.3098606E+00, 0.3079215E+00, 0.3079215E+00 /
      data (ref_adm( 5,iz,38, 9),iz = 1,20) / &
     & 0.1841000E+00, 0.1841000E+00, 0.1906900E+00, 0.1975600E+00, &
     & 0.2225400E+00, 0.2307800E+00, 0.2437400E+00, 0.2645500E+00, &
     & 0.2751500E+00, 0.3015100E+00, 0.3144600E+00, 0.3168600E+00, &
     & 0.3028500E+00, 0.2691900E+00, 0.2568100E+00, 0.2546200E+00, &
     & 0.3051176E+00, 0.3098606E+00, 0.3079215E+00, 0.3079215E+00 /
! Solar Zenith Angle 45.0 Albedo  0.2249733E+00
      data (ref_adm( 5,iz, 1,10),iz = 1,20) / &
     & 0.1927500E+00, 0.1927500E+00, 0.1848600E+00, 0.1885400E+00, &
     & 0.1742900E+00, 0.1635700E+00, 0.2245400E+00, 0.2054000E+00, &
     & 0.1907600E+00, 0.2039100E+00, 0.2552900E+00, 0.2384000E+00, &
     & 0.2031400E+00, 0.2354100E+00, 0.2558300E+00, 0.2748600E+00, &
     & 0.3119300E+00, 0.3324700E+00, 0.4163800E+00, 0.4163800E+00 /
      data (ref_adm( 5,iz, 2,10),iz = 1,20) / &
     & 0.1927500E+00, 0.1927500E+00, 0.1848600E+00, 0.1885400E+00, &
     & 0.1742900E+00, 0.1635700E+00, 0.2245400E+00, 0.2054000E+00, &
     & 0.1907600E+00, 0.2039100E+00, 0.2552900E+00, 0.2384000E+00, &
     & 0.2031400E+00, 0.2354100E+00, 0.2558300E+00, 0.2748600E+00, &
     & 0.3119300E+00, 0.3324700E+00, 0.4163800E+00, 0.4163800E+00 /
      data (ref_adm( 5,iz, 3,10),iz = 1,20) / &
     & 0.1935000E+00, 0.1935000E+00, 0.1880800E+00, 0.1901700E+00, &
     & 0.1673800E+00, 0.2124400E+00, 0.2119900E+00, 0.2077300E+00, &
     & 0.2153000E+00, 0.2015600E+00, 0.3049100E+00, 0.2164100E+00, &
     & 0.2266800E+00, 0.2366500E+00, 0.2637800E+00, 0.3087900E+00, &
     & 0.3114000E+00, 0.3535800E+00, 0.3985400E+00, 0.3985400E+00 /
      data (ref_adm( 5,iz, 4,10),iz = 1,20) / &
     & 0.2097500E+00, 0.2097500E+00, 0.1900400E+00, 0.1878900E+00, &
     & 0.1857600E+00, 0.2043400E+00, 0.2132100E+00, 0.1864200E+00, &
     & 0.2049900E+00, 0.1940100E+00, 0.2763700E+00, 0.2118400E+00, &
     & 0.2136500E+00, 0.2498000E+00, 0.2851400E+00, 0.2648200E+00, &
     & 0.2954900E+00, 0.3570400E+00, 0.3559700E+00, 0.3559700E+00 /
      data (ref_adm( 5,iz, 5,10),iz = 1,20) / &
     & 0.2027000E+00, 0.2027000E+00, 0.2077300E+00, 0.1852900E+00, &
     & 0.1714500E+00, 0.1999900E+00, 0.1840800E+00, 0.1941200E+00, &
     & 0.1811300E+00, 0.2416200E+00, 0.2540800E+00, 0.2382200E+00, &
     & 0.2289000E+00, 0.2486000E+00, 0.2588200E+00, 0.2649500E+00, &
     & 0.3305300E+00, 0.3265100E+00, 0.3760200E+00, 0.3760200E+00 /
      data (ref_adm( 5,iz, 6,10),iz = 1,20) / &
     & 0.1731300E+00, 0.1731300E+00, 0.1993300E+00, 0.1994000E+00, &
     & 0.1871000E+00, 0.2083400E+00, 0.1895000E+00, 0.1791800E+00, &
     & 0.1835800E+00, 0.3672100E+00, 0.1846500E+00, 0.2479600E+00, &
     & 0.2439800E+00, 0.2822600E+00, 0.2411900E+00, 0.2866100E+00, &
     & 0.2744800E+00, 0.4042800E+00, 0.4376600E+00, 0.4376600E+00 /
      data (ref_adm( 5,iz, 7,10),iz = 1,20) / &
     & 0.1878200E+00, 0.1878200E+00, 0.1772300E+00, 0.1718500E+00, &
     & 0.1749000E+00, 0.1737800E+00, 0.1768500E+00, 0.1750100E+00, &
     & 0.1864900E+00, 0.1935700E+00, 0.1836400E+00, 0.1922000E+00, &
     & 0.2053100E+00, 0.2192400E+00, 0.2197400E+00, 0.2287200E+00, &
     & 0.2687300E+00, 0.2913400E+00, 0.2910200E+00, 0.2910200E+00 /
      data (ref_adm( 5,iz, 8,10),iz = 1,20) / &
     & 0.1939600E+00, 0.1939600E+00, 0.1690700E+00, 0.2088300E+00, &
     & 0.2036100E+00, 0.2105000E+00, 0.2046200E+00, 0.1913900E+00, &
     & 0.2322300E+00, 0.1902000E+00, 0.2064500E+00, 0.2076900E+00, &
     & 0.2215900E+00, 0.2172700E+00, 0.2521400E+00, 0.2545300E+00, &
     & 0.3130900E+00, 0.2595600E+00, 0.3686100E+00, 0.3686100E+00 /
      data (ref_adm( 5,iz, 9,10),iz = 1,20) / &
     & 0.1857700E+00, 0.1857700E+00, 0.2003400E+00, 0.1795300E+00, &
     & 0.1976200E+00, 0.1850900E+00, 0.1734600E+00, 0.1881000E+00, &
     & 0.1843700E+00, 0.1791300E+00, 0.1962200E+00, 0.2112500E+00, &
     & 0.1938700E+00, 0.2226000E+00, 0.2480200E+00, 0.2621100E+00, &
     & 0.2889000E+00, 0.3323900E+00, 0.3017465E+00, 0.3017465E+00 /
      data (ref_adm( 5,iz,10,10),iz = 1,20) / &
     & 0.2002200E+00, 0.2002200E+00, 0.1978400E+00, 0.1871200E+00, &
     & 0.1645200E+00, 0.1666500E+00, 0.1793700E+00, 0.1640700E+00, &
     & 0.1824500E+00, 0.1757300E+00, 0.1986100E+00, 0.2002100E+00, &
     & 0.2027900E+00, 0.2062500E+00, 0.2132400E+00, 0.2656500E+00, &
     & 0.2729900E+00, 0.3180900E+00, 0.2989066E+00, 0.2989066E+00 /
      data (ref_adm( 5,iz,11,10),iz = 1,20) / &
     & 0.1960500E+00, 0.1960500E+00, 0.2042400E+00, 0.1810800E+00, &
     & 0.1780500E+00, 0.1621700E+00, 0.1792700E+00, 0.1810000E+00, &
     & 0.1730100E+00, 0.1776500E+00, 0.1861100E+00, 0.2094200E+00, &
     & 0.1926800E+00, 0.2152600E+00, 0.2231300E+00, 0.2607000E+00, &
     & 0.2530900E+00, 0.2892800E+00, 0.2323200E+00, 0.2323200E+00 /
      data (ref_adm( 5,iz,12,10),iz = 1,20) / &
     & 0.1978100E+00, 0.1978100E+00, 0.1935200E+00, 0.1975000E+00, &
     & 0.1798700E+00, 0.1680900E+00, 0.1806700E+00, 0.1725400E+00, &
     & 0.1768200E+00, 0.1716600E+00, 0.1722100E+00, 0.2126500E+00, &
     & 0.1998200E+00, 0.2003500E+00, 0.2132100E+00, 0.2111900E+00, &
     & 0.2846000E+00, 0.3217600E+00, 0.2915382E+00, 0.2915382E+00 /
      data (ref_adm( 5,iz,13,10),iz = 1,20) / &
     & 0.1988900E+00, 0.1988900E+00, 0.2085700E+00, 0.1962900E+00, &
     & 0.1973100E+00, 0.1999800E+00, 0.1878500E+00, 0.1835200E+00, &
     & 0.1878100E+00, 0.1923800E+00, 0.1895400E+00, 0.2046800E+00, &
     & 0.2035400E+00, 0.1946500E+00, 0.2175700E+00, 0.2258800E+00, &
     & 0.2515100E+00, 0.2566700E+00, 0.2412600E+00, 0.2412600E+00 /
      data (ref_adm( 5,iz,14,10),iz = 1,20) / &
     & 0.1925000E+00, 0.1925000E+00, 0.1778300E+00, 0.1832600E+00, &
     & 0.1775500E+00, 0.1729500E+00, 0.1738800E+00, 0.1778000E+00, &
     & 0.2074600E+00, 0.1805500E+00, 0.1901400E+00, 0.1966700E+00, &
     & 0.1939200E+00, 0.2027400E+00, 0.1765000E+00, 0.2223000E+00, &
     & 0.2760800E+00, 0.2610700E+00, 0.2502200E+00, 0.2502200E+00 /
      data (ref_adm( 5,iz,15,10),iz = 1,20) / &
     & 0.1878800E+00, 0.1878800E+00, 0.1874500E+00, 0.1910500E+00, &
     & 0.1911500E+00, 0.1858100E+00, 0.1889700E+00, 0.1838000E+00, &
     & 0.1866300E+00, 0.1824900E+00, 0.1853700E+00, 0.1985900E+00, &
     & 0.1807200E+00, 0.2125400E+00, 0.2116400E+00, 0.2220100E+00, &
     & 0.2779000E+00, 0.2970200E+00, 0.2434400E+00, 0.2434400E+00 /
      data (ref_adm( 5,iz,16,10),iz = 1,20) / &
     & 0.1953000E+00, 0.1953000E+00, 0.1784400E+00, 0.1834300E+00, &
     & 0.2021800E+00, 0.2000300E+00, 0.1929500E+00, 0.1963300E+00, &
     & 0.1890200E+00, 0.2067900E+00, 0.1839800E+00, 0.2103800E+00, &
     & 0.1986700E+00, 0.2038000E+00, 0.2184900E+00, 0.2169500E+00, &
     & 0.2456500E+00, 0.2849500E+00, 0.2477000E+00, 0.2477000E+00 /
      data (ref_adm( 5,iz,17,10),iz = 1,20) / &
     & 0.2032700E+00, 0.2032700E+00, 0.2054200E+00, 0.1724400E+00, &
     & 0.2032500E+00, 0.1971100E+00, 0.2195200E+00, 0.2127300E+00, &
     & 0.2038000E+00, 0.1843300E+00, 0.1886500E+00, 0.2040600E+00, &
     & 0.1815100E+00, 0.2132400E+00, 0.2124500E+00, 0.2427100E+00, &
     & 0.2397900E+00, 0.2537100E+00, 0.2680529E+00, 0.2680529E+00 /
      data (ref_adm( 5,iz,18,10),iz = 1,20) / &
     & 0.1799000E+00, 0.1799000E+00, 0.1881200E+00, 0.2035600E+00, &
     & 0.1898600E+00, 0.1923700E+00, 0.1949000E+00, 0.1965200E+00, &
     & 0.2086000E+00, 0.2016800E+00, 0.1830500E+00, 0.2087700E+00, &
     & 0.2037100E+00, 0.2148000E+00, 0.2174200E+00, 0.2214900E+00, &
     & 0.2155100E+00, 0.2545010E+00, 0.2541237E+00, 0.2541237E+00 /
      data (ref_adm( 5,iz,19,10),iz = 1,20) / &
     & 0.1848300E+00, 0.1848300E+00, 0.1818900E+00, 0.1870500E+00, &
     & 0.1979300E+00, 0.1891200E+00, 0.1977400E+00, 0.1790800E+00, &
     & 0.2071000E+00, 0.2030900E+00, 0.2102400E+00, 0.1984800E+00, &
     & 0.1971600E+00, 0.2228100E+00, 0.2188700E+00, 0.2130000E+00, &
     & 0.2827000E+00, 0.2533143E+00, 0.2516529E+00, 0.2516529E+00 /
      data (ref_adm( 5,iz,20,10),iz = 1,20) / &
     & 0.1754800E+00, 0.1754800E+00, 0.1880000E+00, 0.1760800E+00, &
     & 0.1746600E+00, 0.1782600E+00, 0.1850400E+00, 0.1697400E+00, &
     & 0.1819800E+00, 0.2218900E+00, 0.2091400E+00, 0.2000100E+00, &
     & 0.2114600E+00, 0.2127600E+00, 0.2195600E+00, 0.2277200E+00, &
     & 0.2420738E+00, 0.2524789E+00, 0.2500712E+00, 0.2500712E+00 /
      data (ref_adm( 5,iz,21,10),iz = 1,20) / &
     & 0.1947500E+00, 0.1947500E+00, 0.1817500E+00, 0.1847700E+00, &
     & 0.1854300E+00, 0.1835300E+00, 0.1794100E+00, 0.1931900E+00, &
     & 0.2176200E+00, 0.2270300E+00, 0.1956600E+00, 0.2062400E+00, &
     & 0.2053300E+00, 0.2144700E+00, 0.2403200E+00, 0.2538600E+00, &
     & 0.2423399E+00, 0.2518557E+00, 0.2489329E+00, 0.2489329E+00 /
      data (ref_adm( 5,iz,22,10),iz = 1,20) / &
     & 0.1785800E+00, 0.1785800E+00, 0.1644700E+00, 0.1922900E+00, &
     & 0.1971400E+00, 0.1943300E+00, 0.2020000E+00, 0.2031200E+00, &
     & 0.1922200E+00, 0.2135300E+00, 0.2071000E+00, 0.2001400E+00, &
     & 0.2137800E+00, 0.2291200E+00, 0.2410300E+00, 0.2485200E+00, &
     & 0.2643536E+00, 0.2761056E+00, 0.2749154E+00, 0.2749154E+00 /
      data (ref_adm( 5,iz,23,10),iz = 1,20) / &
     & 0.1934400E+00, 0.1934400E+00, 0.1776200E+00, 0.1993100E+00, &
     & 0.2029000E+00, 0.2110300E+00, 0.2036200E+00, 0.2295500E+00, &
     & 0.2188600E+00, 0.2166400E+00, 0.2290400E+00, 0.2113500E+00, &
     & 0.2157200E+00, 0.2387900E+00, 0.2509100E+00, 0.2311600E+00, &
     & 0.2653869E+00, 0.2760923E+00, 0.2749072E+00, 0.2749072E+00 /
      data (ref_adm( 5,iz,24,10),iz = 1,20) / &
     & 0.1862300E+00, 0.1862300E+00, 0.1833700E+00, 0.1844200E+00, &
     & 0.1944900E+00, 0.1939000E+00, 0.1898600E+00, 0.2098000E+00, &
     & 0.2137000E+00, 0.2115700E+00, 0.2206600E+00, 0.2180500E+00, &
     & 0.2329300E+00, 0.2435800E+00, 0.2459600E+00, 0.2545400E+00, &
     & 0.1879400E+00, 0.2770640E+00, 0.2755083E+00, 0.2755083E+00 /
      data (ref_adm( 5,iz,25,10),iz = 1,20) / &
     & 0.1956700E+00, 0.1956700E+00, 0.1940900E+00, 0.2000500E+00, &
     & 0.2007800E+00, 0.2076800E+00, 0.2039400E+00, 0.2149600E+00, &
     & 0.2130300E+00, 0.2217800E+00, 0.2368800E+00, 0.2286400E+00, &
     & 0.2264800E+00, 0.2439700E+00, 0.2504200E+00, 0.2124600E+00, &
     & 0.2489600E+00, 0.2543000E+00, 0.2771627E+00, 0.2771627E+00 /
      data (ref_adm( 5,iz,26,10),iz = 1,20) / &
     & 0.1873100E+00, 0.1873100E+00, 0.1815500E+00, 0.1788400E+00, &
     & 0.1858400E+00, 0.1973800E+00, 0.2011100E+00, 0.2104400E+00, &
     & 0.2139200E+00, 0.2196800E+00, 0.2222300E+00, 0.2348300E+00, &
     & 0.2362400E+00, 0.2618900E+00, 0.2466100E+00, 0.2486600E+00, &
     & 0.2645900E+00, 0.2450900E+00, 0.2795444E+00, 0.2795444E+00 /
      data (ref_adm( 5,iz,27,10),iz = 1,20) / &
     & 0.2083200E+00, 0.2083200E+00, 0.2196300E+00, 0.2136400E+00, &
     & 0.2121500E+00, 0.2196200E+00, 0.2109600E+00, 0.2141800E+00, &
     & 0.2143700E+00, 0.2128100E+00, 0.2227000E+00, 0.2434500E+00, &
     & 0.2389200E+00, 0.2528300E+00, 0.2386900E+00, 0.2925800E+00, &
     & 0.2938300E+00, 0.2662200E+00, 0.2826489E+00, 0.2826489E+00 /
      data (ref_adm( 5,iz,28,10),iz = 1,20) / &
     & 0.2110500E+00, 0.2110500E+00, 0.1917600E+00, 0.1975200E+00, &
     & 0.1934400E+00, 0.2070100E+00, 0.2198600E+00, 0.2166800E+00, &
     & 0.2365700E+00, 0.2448600E+00, 0.2428700E+00, 0.2466200E+00, &
     & 0.2479400E+00, 0.2491900E+00, 0.2662100E+00, 0.3045800E+00, &
     & 0.2853800E+00, 0.2859600E+00, 0.2869844E+00, 0.2869844E+00 /
      data (ref_adm( 5,iz,29,10),iz = 1,20) / &
     & 0.2026700E+00, 0.2026700E+00, 0.1907500E+00, 0.1858500E+00, &
     & 0.1907200E+00, 0.1973800E+00, 0.2113600E+00, 0.2284500E+00, &
     & 0.2368100E+00, 0.2425400E+00, 0.2441600E+00, 0.2426600E+00, &
     & 0.2466300E+00, 0.2798100E+00, 0.3013900E+00, 0.3171800E+00, &
     & 0.3161500E+00, 0.3140900E+00, 0.2729200E+00, 0.2729200E+00 /
      data (ref_adm( 5,iz,30,10),iz = 1,20) / &
     & 0.2138700E+00, 0.2138700E+00, 0.1888100E+00, 0.1927700E+00, &
     & 0.2072700E+00, 0.2234200E+00, 0.2247700E+00, 0.2359700E+00, &
     & 0.2236800E+00, 0.2472500E+00, 0.2610700E+00, 0.2605200E+00, &
     & 0.2824100E+00, 0.2564000E+00, 0.2933000E+00, 0.2961700E+00, &
     & 0.2894600E+00, 0.2755900E+00, 0.2407500E+00, 0.2407500E+00 /
      data (ref_adm( 5,iz,31,10),iz = 1,20) / &
     & 0.1817700E+00, 0.1817700E+00, 0.1895700E+00, 0.2262700E+00, &
     & 0.2129100E+00, 0.2188700E+00, 0.2241400E+00, 0.2141700E+00, &
     & 0.2255000E+00, 0.2463600E+00, 0.2545000E+00, 0.2709500E+00, &
     & 0.2684800E+00, 0.2740600E+00, 0.2781000E+00, 0.3004700E+00, &
     & 0.3034000E+00, 0.2715800E+00, 0.2428500E+00, 0.2428500E+00 /
      data (ref_adm( 5,iz,32,10),iz = 1,20) / &
     & 0.1974000E+00, 0.1974000E+00, 0.1975000E+00, 0.2108200E+00, &
     & 0.2223300E+00, 0.2278100E+00, 0.2392900E+00, 0.2278500E+00, &
     & 0.2348800E+00, 0.2389800E+00, 0.2470700E+00, 0.2471100E+00, &
     & 0.2564900E+00, 0.2508300E+00, 0.2644500E+00, 0.2891500E+00, &
     & 0.3006900E+00, 0.2963200E+00, 0.2699000E+00, 0.2699000E+00 /
      data (ref_adm( 5,iz,33,10),iz = 1,20) / &
     & 0.1947700E+00, 0.1947700E+00, 0.2046200E+00, 0.2127900E+00, &
     & 0.2081900E+00, 0.2149600E+00, 0.2153500E+00, 0.2330100E+00, &
     & 0.2384900E+00, 0.2739400E+00, 0.2775100E+00, 0.2829300E+00, &
     & 0.2766300E+00, 0.2797700E+00, 0.3019500E+00, 0.2997800E+00, &
     & 0.2987800E+00, 0.2950500E+00, 0.2175900E+00, 0.2175900E+00 /
      data (ref_adm( 5,iz,34,10),iz = 1,20) / &
     & 0.1927200E+00, 0.1927200E+00, 0.1928700E+00, 0.2033600E+00, &
     & 0.2032900E+00, 0.2204200E+00, 0.2399700E+00, 0.2391600E+00, &
     & 0.2614300E+00, 0.2841600E+00, 0.2884900E+00, 0.2905900E+00, &
     & 0.2741000E+00, 0.2940800E+00, 0.3027700E+00, 0.3093800E+00, &
     & 0.3057900E+00, 0.3023000E+00, 0.3159407E+00, 0.3159407E+00 /
      data (ref_adm( 5,iz,35,10),iz = 1,20) / &
     & 0.1968500E+00, 0.1968500E+00, 0.1832700E+00, 0.2019100E+00, &
     & 0.2186300E+00, 0.2296300E+00, 0.2451400E+00, 0.2361700E+00, &
     & 0.2493300E+00, 0.2942100E+00, 0.3006000E+00, 0.2932200E+00, &
     & 0.2847300E+00, 0.2946600E+00, 0.3038300E+00, 0.3110500E+00, &
     & 0.2875200E+00, 0.3210800E+00, 0.2455900E+00, 0.2455900E+00 /
      data (ref_adm( 5,iz,36,10),iz = 1,20) / &
     & 0.1916000E+00, 0.1916000E+00, 0.1960900E+00, 0.2110700E+00, &
     & 0.2043800E+00, 0.2462400E+00, 0.2325400E+00, 0.2589000E+00, &
     & 0.2599600E+00, 0.2967500E+00, 0.2947900E+00, 0.2943600E+00, &
     & 0.3197400E+00, 0.3022500E+00, 0.3234400E+00, 0.3241600E+00, &
     & 0.3195600E+00, 0.3076800E+00, 0.3214268E+00, 0.3214268E+00 /
      data (ref_adm( 5,iz,37,10),iz = 1,20) / &
     & 0.1985000E+00, 0.1985000E+00, 0.2029100E+00, 0.2028000E+00, &
     & 0.2325100E+00, 0.2316600E+00, 0.2425200E+00, 0.2598200E+00, &
     & 0.2776800E+00, 0.2684200E+00, 0.3052100E+00, 0.3320600E+00, &
     & 0.3044000E+00, 0.3074500E+00, 0.3076200E+00, 0.3083600E+00, &
     & 0.3069700E+00, 0.3713800E+00, 0.3226824E+00, 0.3226824E+00 /
      data (ref_adm( 5,iz,38,10),iz = 1,20) / &
     & 0.1985000E+00, 0.1985000E+00, 0.2029100E+00, 0.2028000E+00, &
     & 0.2325100E+00, 0.2316600E+00, 0.2425200E+00, 0.2598200E+00, &
     & 0.2776800E+00, 0.2684200E+00, 0.3052100E+00, 0.3320600E+00, &
     & 0.3044000E+00, 0.3074500E+00, 0.3076200E+00, 0.3083600E+00, &
     & 0.3069700E+00, 0.3713800E+00, 0.3226824E+00, 0.3226824E+00 /
! Solar Zenith Angle 50.0 Albedo  0.2285125E+00
      data (ref_adm( 5,iz, 1,11),iz = 1,20) / &
     & 0.1923800E+00, 0.1923800E+00, 0.1866500E+00, 0.1783800E+00, &
     & 0.1902900E+00, 0.1704000E+00, 0.1901100E+00, 0.1915900E+00, &
     & 0.1674400E+00, 0.1845900E+00, 0.1895700E+00, 0.2758200E+00, &
     & 0.2361500E+00, 0.2598100E+00, 0.2657600E+00, 0.3120600E+00, &
     & 0.3254400E+00, 0.4460500E+00, 0.4868400E+00, 0.4868400E+00 /
      data (ref_adm( 5,iz, 2,11),iz = 1,20) / &
     & 0.1923800E+00, 0.1923800E+00, 0.1866500E+00, 0.1783800E+00, &
     & 0.1902900E+00, 0.1704000E+00, 0.1901100E+00, 0.1915900E+00, &
     & 0.1674400E+00, 0.1845900E+00, 0.1895700E+00, 0.2758200E+00, &
     & 0.2361500E+00, 0.2598100E+00, 0.2657600E+00, 0.3120600E+00, &
     & 0.3254400E+00, 0.4460500E+00, 0.4868400E+00, 0.4868400E+00 /
      data (ref_adm( 5,iz, 3,11),iz = 1,20) / &
     & 0.1775300E+00, 0.1775300E+00, 0.1915100E+00, 0.1843900E+00, &
     & 0.2030200E+00, 0.1719200E+00, 0.1842900E+00, 0.1736800E+00, &
     & 0.1766700E+00, 0.1744600E+00, 0.1873300E+00, 0.2110900E+00, &
     & 0.2346700E+00, 0.2469200E+00, 0.2775300E+00, 0.3024700E+00, &
     & 0.3454600E+00, 0.4124900E+00, 0.3848900E+00, 0.3848900E+00 /
      data (ref_adm( 5,iz, 4,11),iz = 1,20) / &
     & 0.1934600E+00, 0.1934600E+00, 0.1886700E+00, 0.1911600E+00, &
     & 0.1690400E+00, 0.1754000E+00, 0.1848900E+00, 0.1875100E+00, &
     & 0.1853800E+00, 0.1857300E+00, 0.2046800E+00, 0.2024800E+00, &
     & 0.2270600E+00, 0.2439600E+00, 0.2452900E+00, 0.3031100E+00, &
     & 0.3505300E+00, 0.3859300E+00, 0.3955200E+00, 0.3955200E+00 /
      data (ref_adm( 5,iz, 5,11),iz = 1,20) / &
     & 0.1857000E+00, 0.1857000E+00, 0.1822100E+00, 0.1827000E+00, &
     & 0.1787000E+00, 0.1687000E+00, 0.1763900E+00, 0.1756600E+00, &
     & 0.1746200E+00, 0.1832900E+00, 0.1970900E+00, 0.2148000E+00, &
     & 0.2259500E+00, 0.2371000E+00, 0.2635600E+00, 0.2897200E+00, &
     & 0.3868200E+00, 0.4062300E+00, 0.4460600E+00, 0.4460600E+00 /
      data (ref_adm( 5,iz, 6,11),iz = 1,20) / &
     & 0.1852700E+00, 0.1852700E+00, 0.1812300E+00, 0.1771500E+00, &
     & 0.1813400E+00, 0.1759700E+00, 0.1838400E+00, 0.1852300E+00, &
     & 0.1943300E+00, 0.1989500E+00, 0.1985500E+00, 0.2126700E+00, &
     & 0.2165700E+00, 0.2424700E+00, 0.2603800E+00, 0.3001900E+00, &
     & 0.3655900E+00, 0.4010500E+00, 0.3757400E+00, 0.3757400E+00 /
      data (ref_adm( 5,iz, 7,11),iz = 1,20) / &
     & 0.1807300E+00, 0.1807300E+00, 0.1791600E+00, 0.1772700E+00, &
     & 0.1766100E+00, 0.1651200E+00, 0.1805700E+00, 0.1880300E+00, &
     & 0.1907300E+00, 0.2014200E+00, 0.2090000E+00, 0.2145500E+00, &
     & 0.2136400E+00, 0.2101600E+00, 0.2328500E+00, 0.2754200E+00, &
     & 0.3545200E+00, 0.4019000E+00, 0.4124200E+00, 0.4124200E+00 /
      data (ref_adm( 5,iz, 8,11),iz = 1,20) / &
     & 0.1814900E+00, 0.1814900E+00, 0.1775500E+00, 0.1707000E+00, &
     & 0.1747200E+00, 0.1819200E+00, 0.1780000E+00, 0.1831300E+00, &
     & 0.1871600E+00, 0.1903300E+00, 0.1866600E+00, 0.1910900E+00, &
     & 0.1998900E+00, 0.2180700E+00, 0.2406100E+00, 0.2620300E+00, &
     & 0.3354500E+00, 0.3292700E+00, 0.3199500E+00, 0.3199500E+00 /
      data (ref_adm( 5,iz, 9,11),iz = 1,20) / &
     & 0.1896000E+00, 0.1896000E+00, 0.1797700E+00, 0.1782700E+00, &
     & 0.1753900E+00, 0.1868100E+00, 0.1778000E+00, 0.1855000E+00, &
     & 0.1856800E+00, 0.1824400E+00, 0.1947400E+00, 0.2066700E+00, &
     & 0.2072900E+00, 0.2227000E+00, 0.2280100E+00, 0.2401700E+00, &
     & 0.2765500E+00, 0.2705900E+00, 0.3807800E+00, 0.3807800E+00 /
      data (ref_adm( 5,iz,10,11),iz = 1,20) / &
     & 0.1743800E+00, 0.1743800E+00, 0.1814900E+00, 0.1802900E+00, &
     & 0.1853700E+00, 0.1772900E+00, 0.1815300E+00, 0.1688000E+00, &
     & 0.1770200E+00, 0.1930400E+00, 0.1939300E+00, 0.2138500E+00, &
     & 0.2072800E+00, 0.2295900E+00, 0.2334500E+00, 0.2735700E+00, &
     & 0.3194200E+00, 0.3279100E+00, 0.2854200E+00, 0.2854200E+00 /
      data (ref_adm( 5,iz,11,11),iz = 1,20) / &
     & 0.1719100E+00, 0.1719100E+00, 0.1790200E+00, 0.1742600E+00, &
     & 0.1816100E+00, 0.1910100E+00, 0.1789200E+00, 0.1678900E+00, &
     & 0.1751500E+00, 0.1926600E+00, 0.2040000E+00, 0.1910600E+00, &
     & 0.2154500E+00, 0.2106100E+00, 0.2272200E+00, 0.2886900E+00, &
     & 0.3404400E+00, 0.3015300E+00, 0.2845900E+00, 0.2845900E+00 /
      data (ref_adm( 5,iz,12,11),iz = 1,20) / &
     & 0.1804500E+00, 0.1804500E+00, 0.1814700E+00, 0.1714700E+00, &
     & 0.1857400E+00, 0.1843800E+00, 0.1894600E+00, 0.1786900E+00, &
     & 0.1872200E+00, 0.1918700E+00, 0.2008100E+00, 0.2027200E+00, &
     & 0.1938300E+00, 0.2068300E+00, 0.2331900E+00, 0.2790900E+00, &
     & 0.2969300E+00, 0.2667500E+00, 0.2630800E+00, 0.2630800E+00 /
      data (ref_adm( 5,iz,13,11),iz = 1,20) / &
     & 0.1892200E+00, 0.1892200E+00, 0.1828500E+00, 0.1821900E+00, &
     & 0.1752000E+00, 0.1756500E+00, 0.1816000E+00, 0.1844600E+00, &
     & 0.1908500E+00, 0.1887900E+00, 0.1928100E+00, 0.1910700E+00, &
     & 0.1915800E+00, 0.2077500E+00, 0.2273200E+00, 0.2571500E+00, &
     & 0.3010200E+00, 0.2948500E+00, 0.2267800E+00, 0.2267800E+00 /
      data (ref_adm( 5,iz,14,11),iz = 1,20) / &
     & 0.1734100E+00, 0.1734100E+00, 0.1708900E+00, 0.1634200E+00, &
     & 0.1599400E+00, 0.1617100E+00, 0.1623700E+00, 0.1646900E+00, &
     & 0.1783300E+00, 0.1787300E+00, 0.1831600E+00, 0.1844400E+00, &
     & 0.1961100E+00, 0.2001700E+00, 0.2275400E+00, 0.2479900E+00, &
     & 0.2562300E+00, 0.2685700E+00, 0.2293300E+00, 0.2293300E+00 /
      data (ref_adm( 5,iz,15,11),iz = 1,20) / &
     & 0.1897400E+00, 0.1897400E+00, 0.1915900E+00, 0.1861900E+00, &
     & 0.1843000E+00, 0.1869600E+00, 0.1835900E+00, 0.1875900E+00, &
     & 0.1842200E+00, 0.1887800E+00, 0.1887900E+00, 0.1911500E+00, &
     & 0.1827300E+00, 0.1885200E+00, 0.2069100E+00, 0.2124100E+00, &
     & 0.2697700E+00, 0.2766700E+00, 0.2859100E+00, 0.2859100E+00 /
      data (ref_adm( 5,iz,16,11),iz = 1,20) / &
     & 0.1892200E+00, 0.1892200E+00, 0.1744900E+00, 0.1817200E+00, &
     & 0.1908900E+00, 0.1891100E+00, 0.1744600E+00, 0.1748800E+00, &
     & 0.1778800E+00, 0.1782700E+00, 0.1964200E+00, 0.1998400E+00, &
     & 0.2118800E+00, 0.2108100E+00, 0.2294700E+00, 0.2119500E+00, &
     & 0.2781300E+00, 0.2856700E+00, 0.2018700E+00, 0.2018700E+00 /
      data (ref_adm( 5,iz,17,11),iz = 1,20) / &
     & 0.1894600E+00, 0.1894600E+00, 0.1899100E+00, 0.1798400E+00, &
     & 0.1844700E+00, 0.1899800E+00, 0.1922000E+00, 0.1979100E+00, &
     & 0.1978400E+00, 0.1980900E+00, 0.1821200E+00, 0.2005600E+00, &
     & 0.1949600E+00, 0.2021800E+00, 0.2392300E+00, 0.2312100E+00, &
     & 0.2215200E+00, 0.3231600E+00, 0.2670526E+00, 0.2670526E+00 /
      data (ref_adm( 5,iz,18,11),iz = 1,20) / &
     & 0.1914000E+00, 0.1914000E+00, 0.1798500E+00, 0.1830100E+00, &
     & 0.1954700E+00, 0.1949000E+00, 0.1961700E+00, 0.2004200E+00, &
     & 0.1871800E+00, 0.1903800E+00, 0.2061100E+00, 0.2082900E+00, &
     & 0.2148900E+00, 0.2117500E+00, 0.2183400E+00, 0.2281100E+00, &
     & 0.2416200E+00, 0.2644105E+00, 0.2660771E+00, 0.2660771E+00 /
      data (ref_adm( 5,iz,19,11),iz = 1,20) / &
     & 0.1881700E+00, 0.1881700E+00, 0.1988500E+00, 0.1879400E+00, &
     & 0.1825900E+00, 0.1964000E+00, 0.1908300E+00, 0.1770000E+00, &
     & 0.1936700E+00, 0.1923300E+00, 0.2062200E+00, 0.2228300E+00, &
     & 0.2129300E+00, 0.2064700E+00, 0.2118300E+00, 0.2188000E+00, &
     & 0.2315000E+00, 0.2628281E+00, 0.2628736E+00, 0.2628736E+00 /
      data (ref_adm( 5,iz,20,11),iz = 1,20) / &
     & 0.1833300E+00, 0.1833300E+00, 0.1790200E+00, 0.1922400E+00, &
     & 0.1884200E+00, 0.1815100E+00, 0.1817000E+00, 0.1918300E+00, &
     & 0.1931900E+00, 0.1905100E+00, 0.2010400E+00, 0.1872800E+00, &
     & 0.2167500E+00, 0.2147000E+00, 0.2167200E+00, 0.2353400E+00, &
     & 0.2493920E+00, 0.2618024E+00, 0.2609642E+00, 0.2609642E+00 /
      data (ref_adm( 5,iz,21,11),iz = 1,20) / &
     & 0.1911600E+00, 0.1911600E+00, 0.1881700E+00, 0.2055900E+00, &
     & 0.1890600E+00, 0.1866000E+00, 0.1927000E+00, 0.1978900E+00, &
     & 0.2002000E+00, 0.1980800E+00, 0.1919800E+00, 0.2040200E+00, &
     & 0.2279000E+00, 0.2186800E+00, 0.2222800E+00, 0.2655600E+00, &
     & 0.2496867E+00, 0.2610647E+00, 0.2596553E+00, 0.2596553E+00 /
      data (ref_adm( 5,iz,22,11),iz = 1,20) / &
     & 0.1843200E+00, 0.1843200E+00, 0.1806800E+00, 0.1809600E+00, &
     & 0.1960500E+00, 0.1948800E+00, 0.2008200E+00, 0.2163900E+00, &
     & 0.2045200E+00, 0.2183900E+00, 0.2021200E+00, 0.2116500E+00, &
     & 0.2334300E+00, 0.2150700E+00, 0.2307700E+00, 0.2754900E+00, &
     & 0.3068291E+00, 0.3029179E+00, 0.2748227E+00, 0.2748227E+00 /
      data (ref_adm( 5,iz,23,11),iz = 1,20) / &
     & 0.1809300E+00, 0.1809300E+00, 0.1935200E+00, 0.1888300E+00, &
     & 0.1730100E+00, 0.1942300E+00, 0.1905500E+00, 0.2008500E+00, &
     & 0.2164900E+00, 0.2244400E+00, 0.2265300E+00, 0.2347700E+00, &
     & 0.2410400E+00, 0.2323400E+00, 0.2380100E+00, 0.2568400E+00, &
     & 0.3012502E+00, 0.2964806E+00, 0.2723820E+00, 0.2723820E+00 /
      data (ref_adm( 5,iz,24,11),iz = 1,20) / &
     & 0.1828100E+00, 0.1828100E+00, 0.1706400E+00, 0.1944900E+00, &
     & 0.2016500E+00, 0.1988900E+00, 0.2230100E+00, 0.2141000E+00, &
     & 0.2171100E+00, 0.2320100E+00, 0.2370400E+00, 0.2374300E+00, &
     & 0.2473200E+00, 0.2462200E+00, 0.2627600E+00, 0.2775200E+00, &
     & 0.2670200E+00, 0.2915406E+00, 0.2703401E+00, 0.2703401E+00 /
      data (ref_adm( 5,iz,25,11),iz = 1,20) / &
     & 0.1912400E+00, 0.1912400E+00, 0.1916600E+00, 0.1996100E+00, &
     & 0.2019400E+00, 0.2068800E+00, 0.2120600E+00, 0.2204500E+00, &
     & 0.2292800E+00, 0.2335300E+00, 0.2384100E+00, 0.2462500E+00, &
     & 0.2384300E+00, 0.2445700E+00, 0.2616800E+00, 0.2756000E+00, &
     & 0.2706700E+00, 0.2914000E+00, 0.2689910E+00, 0.2689910E+00 /
      data (ref_adm( 5,iz,26,11),iz = 1,20) / &
     & 0.1831100E+00, 0.1831100E+00, 0.1852900E+00, 0.1806900E+00, &
     & 0.1952600E+00, 0.1899400E+00, 0.1898200E+00, 0.2018900E+00, &
     & 0.2102500E+00, 0.2188900E+00, 0.2298100E+00, 0.2373800E+00, &
     & 0.2474100E+00, 0.2554500E+00, 0.2694900E+00, 0.3001300E+00, &
     & 0.2902900E+00, 0.2765500E+00, 0.2685584E+00, 0.2685584E+00 /
      data (ref_adm( 5,iz,27,11),iz = 1,20) / &
     & 0.1826400E+00, 0.1826400E+00, 0.1929700E+00, 0.1988000E+00, &
     & 0.1998200E+00, 0.1987400E+00, 0.2148000E+00, 0.2183200E+00, &
     & 0.2357300E+00, 0.2330700E+00, 0.2239000E+00, 0.2287200E+00, &
     & 0.2477300E+00, 0.2512400E+00, 0.2684900E+00, 0.3088800E+00, &
     & 0.3042000E+00, 0.3009200E+00, 0.2500100E+00, 0.2500100E+00 /
      data (ref_adm( 5,iz,28,11),iz = 1,20) / &
     & 0.1887100E+00, 0.1887100E+00, 0.2019800E+00, 0.2163400E+00, &
     & 0.2034300E+00, 0.2148900E+00, 0.2166000E+00, 0.2197800E+00, &
     & 0.2384800E+00, 0.2457000E+00, 0.2620000E+00, 0.2605400E+00, &
     & 0.2704800E+00, 0.2625400E+00, 0.2836600E+00, 0.3014800E+00, &
     & 0.2989800E+00, 0.3065600E+00, 0.2593500E+00, 0.2593500E+00 /
      data (ref_adm( 5,iz,29,11),iz = 1,20) / &
     & 0.1919600E+00, 0.1919600E+00, 0.1982100E+00, 0.2114900E+00, &
     & 0.2174000E+00, 0.2104500E+00, 0.2268600E+00, 0.2213900E+00, &
     & 0.2331000E+00, 0.2513100E+00, 0.2627300E+00, 0.2674400E+00, &
     & 0.2747000E+00, 0.2704300E+00, 0.2949400E+00, 0.3119600E+00, &
     & 0.3173800E+00, 0.3278400E+00, 0.2845400E+00, 0.2845400E+00 /
      data (ref_adm( 5,iz,30,11),iz = 1,20) / &
     & 0.1908300E+00, 0.1908300E+00, 0.1910300E+00, 0.2065300E+00, &
     & 0.2043100E+00, 0.2263700E+00, 0.2219600E+00, 0.2386800E+00, &
     & 0.2454700E+00, 0.2569700E+00, 0.2590100E+00, 0.2750200E+00, &
     & 0.2889300E+00, 0.2917100E+00, 0.3092600E+00, 0.3184900E+00, &
     & 0.3359200E+00, 0.3243700E+00, 0.2625400E+00, 0.2625400E+00 /
      data (ref_adm( 5,iz,31,11),iz = 1,20) / &
     & 0.1941700E+00, 0.1941700E+00, 0.1900700E+00, 0.1891600E+00, &
     & 0.2075600E+00, 0.2102600E+00, 0.2303900E+00, 0.2267600E+00, &
     & 0.2366300E+00, 0.2467400E+00, 0.2573100E+00, 0.2717700E+00, &
     & 0.2773800E+00, 0.2779800E+00, 0.2920500E+00, 0.2971600E+00, &
     & 0.3173500E+00, 0.3147900E+00, 0.2503600E+00, 0.2503600E+00 /
      data (ref_adm( 5,iz,32,11),iz = 1,20) / &
     & 0.1801700E+00, 0.1801700E+00, 0.1941500E+00, 0.2184200E+00, &
     & 0.2146200E+00, 0.2329500E+00, 0.2345900E+00, 0.2304100E+00, &
     & 0.2489500E+00, 0.2597800E+00, 0.2790700E+00, 0.2877500E+00, &
     & 0.2897300E+00, 0.3056400E+00, 0.3088500E+00, 0.3285200E+00, &
     & 0.3360500E+00, 0.3022500E+00, 0.2720200E+00, 0.2720200E+00 /
      data (ref_adm( 5,iz,33,11),iz = 1,20) / &
     & 0.1925600E+00, 0.1925600E+00, 0.1985200E+00, 0.2024700E+00, &
     & 0.2189600E+00, 0.2334100E+00, 0.2552200E+00, 0.2589900E+00, &
     & 0.2677400E+00, 0.2766700E+00, 0.2762400E+00, 0.2983100E+00, &
     & 0.2989900E+00, 0.3070200E+00, 0.3122500E+00, 0.3126500E+00, &
     & 0.3307500E+00, 0.3256600E+00, 0.2655900E+00, 0.2655900E+00 /
      data (ref_adm( 5,iz,34,11),iz = 1,20) / &
     & 0.1785800E+00, 0.1785800E+00, 0.2001000E+00, 0.2077100E+00, &
     & 0.2309200E+00, 0.2584400E+00, 0.2278900E+00, 0.2644600E+00, &
     & 0.2691500E+00, 0.2832000E+00, 0.3012100E+00, 0.2973600E+00, &
     & 0.3238500E+00, 0.3244300E+00, 0.3129700E+00, 0.3277800E+00, &
     & 0.3522200E+00, 0.3425600E+00, 0.2807000E+00, 0.2807000E+00 /
      data (ref_adm( 5,iz,35,11),iz = 1,20) / &
     & 0.1891000E+00, 0.1891000E+00, 0.2020900E+00, 0.2152300E+00, &
     & 0.2320200E+00, 0.2230900E+00, 0.2412400E+00, 0.2593100E+00, &
     & 0.2703400E+00, 0.3042800E+00, 0.3223000E+00, 0.3194700E+00, &
     & 0.3064200E+00, 0.3254300E+00, 0.3198400E+00, 0.3309500E+00, &
     & 0.3362300E+00, 0.3254500E+00, 0.2737000E+00, 0.2737000E+00 /
      data (ref_adm( 5,iz,36,11),iz = 1,20) / &
     & 0.1918300E+00, 0.1918300E+00, 0.2142700E+00, 0.2325700E+00, &
     & 0.2226400E+00, 0.2182100E+00, 0.2323900E+00, 0.2514300E+00, &
     & 0.2617000E+00, 0.2924900E+00, 0.3268800E+00, 0.3202200E+00, &
     & 0.3435800E+00, 0.3429800E+00, 0.3394600E+00, 0.3486700E+00, &
     & 0.3321900E+00, 0.3470400E+00, 0.2468700E+00, 0.2468700E+00 /
      data (ref_adm( 5,iz,37,11),iz = 1,20) / &
     & 0.1886100E+00, 0.1886100E+00, 0.2052100E+00, 0.2115800E+00, &
     & 0.2293900E+00, 0.2333000E+00, 0.2320100E+00, 0.2414400E+00, &
     & 0.2718100E+00, 0.2849700E+00, 0.3161000E+00, 0.3333900E+00, &
     & 0.3452700E+00, 0.3579300E+00, 0.3383100E+00, 0.3521500E+00, &
     & 0.3511700E+00, 0.3691400E+00, 0.2866718E+00, 0.2866718E+00 /
      data (ref_adm( 5,iz,38,11),iz = 1,20) / &
     & 0.1886100E+00, 0.1886100E+00, 0.2052100E+00, 0.2115800E+00, &
     & 0.2293900E+00, 0.2333000E+00, 0.2320100E+00, 0.2414400E+00, &
     & 0.2718100E+00, 0.2849700E+00, 0.3161000E+00, 0.3333900E+00, &
     & 0.3452700E+00, 0.3579300E+00, 0.3383100E+00, 0.3521500E+00, &
     & 0.3511700E+00, 0.3691400E+00, 0.2866718E+00, 0.2866718E+00 /
! Solar Zenith Angle 55.0 Albedo  0.2387579E+00
      data (ref_adm( 5,iz, 1,12),iz = 1,20) / &
     & 0.1753300E+00, 0.1753300E+00, 0.1788300E+00, 0.1744900E+00, &
     & 0.1772400E+00, 0.1621700E+00, 0.1723300E+00, 0.1674500E+00, &
     & 0.1882800E+00, 0.2100400E+00, 0.2172300E+00, 0.2535900E+00, &
     & 0.2991400E+00, 0.3361600E+00, 0.3333300E+00, 0.3618900E+00, &
     & 0.4537200E+00, 0.5264700E+00, 0.4642700E+00, 0.4642700E+00 /
      data (ref_adm( 5,iz, 2,12),iz = 1,20) / &
     & 0.1753300E+00, 0.1753300E+00, 0.1788300E+00, 0.1744900E+00, &
     & 0.1772400E+00, 0.1621700E+00, 0.1723300E+00, 0.1674500E+00, &
     & 0.1882800E+00, 0.2100400E+00, 0.2172300E+00, 0.2535900E+00, &
     & 0.2991400E+00, 0.3361600E+00, 0.3333300E+00, 0.3618900E+00, &
     & 0.4537200E+00, 0.5264700E+00, 0.4642700E+00, 0.4642700E+00 /
      data (ref_adm( 5,iz, 3,12),iz = 1,20) / &
     & 0.1821200E+00, 0.1821200E+00, 0.1684000E+00, 0.1665100E+00, &
     & 0.1676100E+00, 0.1674800E+00, 0.1836600E+00, 0.1849400E+00, &
     & 0.1939000E+00, 0.2129200E+00, 0.2214100E+00, 0.2379300E+00, &
     & 0.2613800E+00, 0.2812400E+00, 0.3088200E+00, 0.3655800E+00, &
     & 0.4462700E+00, 0.5168900E+00, 0.5552800E+00, 0.5552800E+00 /
      data (ref_adm( 5,iz, 4,12),iz = 1,20) / &
     & 0.1694800E+00, 0.1694800E+00, 0.1800900E+00, 0.1760600E+00, &
     & 0.1751700E+00, 0.1720000E+00, 0.1815000E+00, 0.1976700E+00, &
     & 0.1901000E+00, 0.1921600E+00, 0.2182000E+00, 0.2246300E+00, &
     & 0.2586900E+00, 0.2744700E+00, 0.2992700E+00, 0.3548300E+00, &
     & 0.4242600E+00, 0.5037200E+00, 0.5627800E+00, 0.5627800E+00 /
      data (ref_adm( 5,iz, 5,12),iz = 1,20) / &
     & 0.1919300E+00, 0.1919300E+00, 0.1804800E+00, 0.1684300E+00, &
     & 0.1759300E+00, 0.1757500E+00, 0.1847400E+00, 0.1861300E+00, &
     & 0.1890400E+00, 0.1959800E+00, 0.2014600E+00, 0.2165800E+00, &
     & 0.2371400E+00, 0.2678000E+00, 0.2972800E+00, 0.3582900E+00, &
     & 0.4185100E+00, 0.4756000E+00, 0.5232900E+00, 0.5232900E+00 /
      data (ref_adm( 5,iz, 6,12),iz = 1,20) / &
     & 0.1905200E+00, 0.1905200E+00, 0.1894700E+00, 0.1838300E+00, &
     & 0.1869200E+00, 0.1855900E+00, 0.1932900E+00, 0.1957400E+00, &
     & 0.1970900E+00, 0.2009200E+00, 0.2041800E+00, 0.2186400E+00, &
     & 0.2441300E+00, 0.2744100E+00, 0.3068800E+00, 0.3606200E+00, &
     & 0.4344700E+00, 0.4605900E+00, 0.4550500E+00, 0.4550500E+00 /
      data (ref_adm( 5,iz, 7,12),iz = 1,20) / &
     & 0.1867000E+00, 0.1867000E+00, 0.1766700E+00, 0.1755300E+00, &
     & 0.1727200E+00, 0.1750600E+00, 0.1748300E+00, 0.1775800E+00, &
     & 0.1802200E+00, 0.1880200E+00, 0.1927100E+00, 0.2065300E+00, &
     & 0.2149400E+00, 0.2274100E+00, 0.2505600E+00, 0.3203000E+00, &
     & 0.3882500E+00, 0.4161200E+00, 0.4716300E+00, 0.4716300E+00 /
      data (ref_adm( 5,iz, 8,12),iz = 1,20) / &
     & 0.1929400E+00, 0.1929400E+00, 0.1889300E+00, 0.1960500E+00, &
     & 0.1992000E+00, 0.1955300E+00, 0.1896000E+00, 0.1858500E+00, &
     & 0.1822500E+00, 0.1968100E+00, 0.1962700E+00, 0.2203400E+00, &
     & 0.2179100E+00, 0.2399500E+00, 0.2585000E+00, 0.2992400E+00, &
     & 0.3611900E+00, 0.4070400E+00, 0.4367200E+00, 0.4367200E+00 /
      data (ref_adm( 5,iz, 9,12),iz = 1,20) / &
     & 0.1926100E+00, 0.1926100E+00, 0.1760600E+00, 0.1835600E+00, &
     & 0.1831400E+00, 0.1822100E+00, 0.1761300E+00, 0.1738700E+00, &
     & 0.1856000E+00, 0.1834900E+00, 0.1778900E+00, 0.2183100E+00, &
     & 0.2194300E+00, 0.2363200E+00, 0.2654900E+00, 0.3325000E+00, &
     & 0.3390400E+00, 0.3963600E+00, 0.4034100E+00, 0.4034100E+00 /
      data (ref_adm( 5,iz,10,12),iz = 1,20) / &
     & 0.1809400E+00, 0.1809400E+00, 0.1922800E+00, 0.1754800E+00, &
     & 0.1834600E+00, 0.1905900E+00, 0.1780900E+00, 0.1764500E+00, &
     & 0.1845700E+00, 0.1841300E+00, 0.1892800E+00, 0.2102000E+00, &
     & 0.2242600E+00, 0.2430600E+00, 0.2455400E+00, 0.2811200E+00, &
     & 0.3070900E+00, 0.3496200E+00, 0.3266400E+00, 0.3266400E+00 /
      data (ref_adm( 5,iz,11,12),iz = 1,20) / &
     & 0.1805800E+00, 0.1805800E+00, 0.1842600E+00, 0.1777900E+00, &
     & 0.1804800E+00, 0.1776000E+00, 0.1785200E+00, 0.1779900E+00, &
     & 0.1941300E+00, 0.1915000E+00, 0.1953500E+00, 0.2050800E+00, &
     & 0.2090800E+00, 0.2449500E+00, 0.2570300E+00, 0.2874700E+00, &
     & 0.3369800E+00, 0.3363300E+00, 0.2993900E+00, 0.2993900E+00 /
      data (ref_adm( 5,iz,12,12),iz = 1,20) / &
     & 0.1848900E+00, 0.1848900E+00, 0.1862400E+00, 0.1950900E+00, &
     & 0.1763000E+00, 0.1753200E+00, 0.1923600E+00, 0.1814200E+00, &
     & 0.1759200E+00, 0.1860200E+00, 0.1968100E+00, 0.2028800E+00, &
     & 0.2110500E+00, 0.2216800E+00, 0.2531800E+00, 0.2744200E+00, &
     & 0.3002600E+00, 0.3162700E+00, 0.3170900E+00, 0.3170900E+00 /
      data (ref_adm( 5,iz,13,12),iz = 1,20) / &
     & 0.1852500E+00, 0.1852500E+00, 0.1912300E+00, 0.1835100E+00, &
     & 0.1854600E+00, 0.1828600E+00, 0.1827600E+00, 0.1761800E+00, &
     & 0.1740900E+00, 0.1796100E+00, 0.2044700E+00, 0.2045200E+00, &
     & 0.2152900E+00, 0.2235600E+00, 0.2499900E+00, 0.2578000E+00, &
     & 0.2834400E+00, 0.3017500E+00, 0.2798800E+00, 0.2798800E+00 /
      data (ref_adm( 5,iz,14,12),iz = 1,20) / &
     & 0.1860500E+00, 0.1860500E+00, 0.1798900E+00, 0.1790700E+00, &
     & 0.1828200E+00, 0.1848900E+00, 0.1841400E+00, 0.1813500E+00, &
     & 0.1891200E+00, 0.1913600E+00, 0.1906300E+00, 0.2005400E+00, &
     & 0.2078100E+00, 0.2218300E+00, 0.2416000E+00, 0.2418100E+00, &
     & 0.2651200E+00, 0.2710400E+00, 0.2680200E+00, 0.2680200E+00 /
      data (ref_adm( 5,iz,15,12),iz = 1,20) / &
     & 0.1841600E+00, 0.1841600E+00, 0.1856900E+00, 0.1858500E+00, &
     & 0.1861800E+00, 0.1854300E+00, 0.1868000E+00, 0.1890600E+00, &
     & 0.1907700E+00, 0.1965600E+00, 0.1965900E+00, 0.2005800E+00, &
     & 0.2056300E+00, 0.2107500E+00, 0.2498100E+00, 0.2323100E+00, &
     & 0.2721300E+00, 0.2621400E+00, 0.3021800E+00, 0.3021800E+00 /
      data (ref_adm( 5,iz,16,12),iz = 1,20) / &
     & 0.1865700E+00, 0.1865700E+00, 0.1877500E+00, 0.1838000E+00, &
     & 0.1807200E+00, 0.1793400E+00, 0.1954500E+00, 0.1894900E+00, &
     & 0.1967200E+00, 0.1897100E+00, 0.1964500E+00, 0.2013300E+00, &
     & 0.2095000E+00, 0.2189900E+00, 0.2252300E+00, 0.2427800E+00, &
     & 0.2634600E+00, 0.3201500E+00, 0.3020739E+00, 0.3020739E+00 /
      data (ref_adm( 5,iz,17,12),iz = 1,20) / &
     & 0.1898200E+00, 0.1898200E+00, 0.1843300E+00, 0.1753900E+00, &
     & 0.1919600E+00, 0.1814100E+00, 0.1867400E+00, 0.1892000E+00, &
     & 0.1977500E+00, 0.1992100E+00, 0.2125400E+00, 0.2038000E+00, &
     & 0.2167200E+00, 0.2241100E+00, 0.2261400E+00, 0.2425200E+00, &
     & 0.2399200E+00, 0.3123000E+00, 0.2946279E+00, 0.2946279E+00 /
      data (ref_adm( 5,iz,18,12),iz = 1,20) / &
     & 0.1910800E+00, 0.1910800E+00, 0.1906200E+00, 0.1842200E+00, &
     & 0.1805400E+00, 0.1954500E+00, 0.1912400E+00, 0.2032000E+00, &
     & 0.2062400E+00, 0.2136600E+00, 0.2113900E+00, 0.2080000E+00, &
     & 0.2222700E+00, 0.2198800E+00, 0.2304900E+00, 0.2375800E+00, &
     & 0.2626600E+00, 0.2858362E+00, 0.2899697E+00, 0.2899697E+00 /
      data (ref_adm( 5,iz,19,12),iz = 1,20) / &
     & 0.1943200E+00, 0.1943200E+00, 0.1911700E+00, 0.1904000E+00, &
     & 0.1924900E+00, 0.1857700E+00, 0.2009200E+00, 0.2023700E+00, &
     & 0.1993800E+00, 0.2109300E+00, 0.2114200E+00, 0.2190600E+00, &
     & 0.2151500E+00, 0.2341400E+00, 0.2299800E+00, 0.2449400E+00, &
     & 0.2848900E+00, 0.2838034E+00, 0.2859055E+00, 0.2859055E+00 /
      data (ref_adm( 5,iz,20,12),iz = 1,20) / &
     & 0.1932400E+00, 0.1932400E+00, 0.1800500E+00, 0.1771700E+00, &
     & 0.1882300E+00, 0.1940200E+00, 0.1916100E+00, 0.2059500E+00, &
     & 0.2021700E+00, 0.2109500E+00, 0.2258700E+00, 0.2179900E+00, &
     & 0.2197900E+00, 0.2381500E+00, 0.2311800E+00, 0.2273500E+00, &
     & 0.2668593E+00, 0.2822877E+00, 0.2836587E+00, 0.2836587E+00 /
      data (ref_adm( 5,iz,21,12),iz = 1,20) / &
     & 0.1954200E+00, 0.1954200E+00, 0.1881900E+00, 0.1983000E+00, &
     & 0.1826700E+00, 0.2008100E+00, 0.1959100E+00, 0.2218500E+00, &
     & 0.2167400E+00, 0.2161800E+00, 0.2172900E+00, 0.2213000E+00, &
     & 0.2310700E+00, 0.2337500E+00, 0.2397200E+00, 0.2806300E+00, &
     & 0.2670605E+00, 0.2812936E+00, 0.2821211E+00, 0.2821211E+00 /
      data (ref_adm( 5,iz,22,12),iz = 1,20) / &
     & 0.1981400E+00, 0.1981400E+00, 0.1940100E+00, 0.2040800E+00, &
     & 0.1932700E+00, 0.2063200E+00, 0.2018800E+00, 0.2074600E+00, &
     & 0.2215200E+00, 0.2150300E+00, 0.2260900E+00, 0.2232500E+00, &
     & 0.2317600E+00, 0.2356600E+00, 0.2454000E+00, 0.2746500E+00, &
     & 0.3226062E+00, 0.3195058E+00, 0.2921752E+00, 0.2921752E+00 /
      data (ref_adm( 5,iz,23,12),iz = 1,20) / &
     & 0.1973400E+00, 0.1973400E+00, 0.1958400E+00, 0.2046700E+00, &
     & 0.2046400E+00, 0.2050100E+00, 0.2137500E+00, 0.2161000E+00, &
     & 0.2216600E+00, 0.2290800E+00, 0.2123000E+00, 0.2289600E+00, &
     & 0.2470300E+00, 0.2613100E+00, 0.2589400E+00, 0.2576000E+00, &
     & 0.3163366E+00, 0.3123648E+00, 0.2894334E+00, 0.2894334E+00 /
      data (ref_adm( 5,iz,24,12),iz = 1,20) / &
     & 0.1873800E+00, 0.1873800E+00, 0.1848900E+00, 0.1973000E+00, &
     & 0.1902400E+00, 0.1996900E+00, 0.2105100E+00, 0.2168100E+00, &
     & 0.2197500E+00, 0.2300900E+00, 0.2339000E+00, 0.2430600E+00, &
     & 0.2570500E+00, 0.2567900E+00, 0.2630400E+00, 0.2740900E+00, &
     & 0.2910800E+00, 0.3066195E+00, 0.2871551E+00, 0.2871551E+00 /
      data (ref_adm( 5,iz,25,12),iz = 1,20) / &
     & 0.1897300E+00, 0.1897300E+00, 0.1887700E+00, 0.1920700E+00, &
     & 0.1948100E+00, 0.2008500E+00, 0.2101700E+00, 0.2140800E+00, &
     & 0.2201900E+00, 0.2299300E+00, 0.2423900E+00, 0.2447000E+00, &
     & 0.2583400E+00, 0.2526000E+00, 0.2720200E+00, 0.2890900E+00, &
     & 0.2983700E+00, 0.3015194E+00, 0.2860626E+00, 0.2860626E+00 /
      data (ref_adm( 5,iz,26,12),iz = 1,20) / &
     & 0.1859900E+00, 0.1859900E+00, 0.1900800E+00, 0.1914800E+00, &
     & 0.1960400E+00, 0.1988600E+00, 0.2011300E+00, 0.2127800E+00, &
     & 0.2121000E+00, 0.2176600E+00, 0.2252900E+00, 0.2383400E+00, &
     & 0.2503200E+00, 0.2565800E+00, 0.2683900E+00, 0.3070100E+00, &
     & 0.3179300E+00, 0.3180300E+00, 0.2857671E+00, 0.2857671E+00 /
      data (ref_adm( 5,iz,27,12),iz = 1,20) / &
     & 0.1888500E+00, 0.1888500E+00, 0.1954700E+00, 0.1905800E+00, &
     & 0.2095200E+00, 0.2142900E+00, 0.2117800E+00, 0.2163700E+00, &
     & 0.2207100E+00, 0.2303700E+00, 0.2377300E+00, 0.2496900E+00, &
     & 0.2526800E+00, 0.2611300E+00, 0.2881900E+00, 0.3167100E+00, &
     & 0.3207700E+00, 0.3210100E+00, 0.2727600E+00, 0.2727600E+00 /
      data (ref_adm( 5,iz,28,12),iz = 1,20) / &
     & 0.1873500E+00, 0.1873500E+00, 0.1955600E+00, 0.1993000E+00, &
     & 0.2106700E+00, 0.2100200E+00, 0.2254500E+00, 0.2340900E+00, &
     & 0.2403200E+00, 0.2579700E+00, 0.2636700E+00, 0.2550900E+00, &
     & 0.2782200E+00, 0.2889100E+00, 0.3141700E+00, 0.3243600E+00, &
     & 0.3266900E+00, 0.3415000E+00, 0.2707000E+00, 0.2707000E+00 /
      data (ref_adm( 5,iz,29,12),iz = 1,20) / &
     & 0.1845500E+00, 0.1845500E+00, 0.1950700E+00, 0.2062500E+00, &
     & 0.2122800E+00, 0.2174500E+00, 0.2206600E+00, 0.2460400E+00, &
     & 0.2541000E+00, 0.2502600E+00, 0.2576500E+00, 0.2691100E+00, &
     & 0.2827100E+00, 0.3111100E+00, 0.3295200E+00, 0.3291800E+00, &
     & 0.3454700E+00, 0.3420600E+00, 0.2882200E+00, 0.2882200E+00 /
      data (ref_adm( 5,iz,30,12),iz = 1,20) / &
     & 0.1834400E+00, 0.1834400E+00, 0.2036600E+00, 0.2028500E+00, &
     & 0.2114400E+00, 0.2120700E+00, 0.2230800E+00, 0.2334000E+00, &
     & 0.2488400E+00, 0.2680900E+00, 0.2727400E+00, 0.2928000E+00, &
     & 0.2880800E+00, 0.3058300E+00, 0.3349100E+00, 0.3476600E+00, &
     & 0.3435800E+00, 0.3365100E+00, 0.2851700E+00, 0.2851700E+00 /
      data (ref_adm( 5,iz,31,12),iz = 1,20) / &
     & 0.1955300E+00, 0.1955300E+00, 0.2098400E+00, 0.2110500E+00, &
     & 0.2031200E+00, 0.2187200E+00, 0.2154000E+00, 0.2372800E+00, &
     & 0.2533800E+00, 0.2602800E+00, 0.2790400E+00, 0.2914800E+00, &
     & 0.3012800E+00, 0.3151900E+00, 0.3287600E+00, 0.3518000E+00, &
     & 0.3477400E+00, 0.3316000E+00, 0.2832300E+00, 0.2832300E+00 /
      data (ref_adm( 5,iz,32,12),iz = 1,20) / &
     & 0.1822600E+00, 0.1822600E+00, 0.1885400E+00, 0.1907500E+00, &
     & 0.2045900E+00, 0.2101600E+00, 0.2203800E+00, 0.2308300E+00, &
     & 0.2501300E+00, 0.2609900E+00, 0.2829900E+00, 0.2940500E+00, &
     & 0.3201700E+00, 0.3208900E+00, 0.3354400E+00, 0.3496800E+00, &
     & 0.3703100E+00, 0.3574600E+00, 0.3154900E+00, 0.3154900E+00 /
      data (ref_adm( 5,iz,33,12),iz = 1,20) / &
     & 0.1923900E+00, 0.1923900E+00, 0.1950600E+00, 0.1992700E+00, &
     & 0.2079900E+00, 0.2258100E+00, 0.2244000E+00, 0.2437100E+00, &
     & 0.2513100E+00, 0.2728400E+00, 0.2809500E+00, 0.3085600E+00, &
     & 0.3230500E+00, 0.3266100E+00, 0.3460700E+00, 0.3621000E+00, &
     & 0.3786100E+00, 0.3622100E+00, 0.3131300E+00, 0.3131300E+00 /
      data (ref_adm( 5,iz,34,12),iz = 1,20) / &
     & 0.1890100E+00, 0.1890100E+00, 0.1888000E+00, 0.1910800E+00, &
     & 0.2101000E+00, 0.2335300E+00, 0.2299000E+00, 0.2382900E+00, &
     & 0.2667600E+00, 0.2753800E+00, 0.3048600E+00, 0.3253500E+00, &
     & 0.3389000E+00, 0.3527500E+00, 0.3734500E+00, 0.3761200E+00, &
     & 0.3648900E+00, 0.3612200E+00, 0.3037600E+00, 0.3037600E+00 /
      data (ref_adm( 5,iz,35,12),iz = 1,20) / &
     & 0.1858400E+00, 0.1858400E+00, 0.2072600E+00, 0.1935100E+00, &
     & 0.1987400E+00, 0.2245300E+00, 0.2301900E+00, 0.2429800E+00, &
     & 0.2620000E+00, 0.2863200E+00, 0.3115900E+00, 0.3223000E+00, &
     & 0.3506100E+00, 0.3674900E+00, 0.3806900E+00, 0.3849600E+00, &
     & 0.3819500E+00, 0.3761400E+00, 0.3255700E+00, 0.3255700E+00 /
      data (ref_adm( 5,iz,36,12),iz = 1,20) / &
     & 0.1827400E+00, 0.1827400E+00, 0.1876600E+00, 0.2017900E+00, &
     & 0.2137400E+00, 0.2212200E+00, 0.2341800E+00, 0.2570100E+00, &
     & 0.2606700E+00, 0.2875100E+00, 0.2967600E+00, 0.3396300E+00, &
     & 0.3673500E+00, 0.3759300E+00, 0.3799500E+00, 0.3881000E+00, &
     & 0.3929000E+00, 0.3795100E+00, 0.3129900E+00, 0.3129900E+00 /
      data (ref_adm( 5,iz,37,12),iz = 1,20) / &
     & 0.1878600E+00, 0.1878600E+00, 0.1883200E+00, 0.1992300E+00, &
     & 0.2203000E+00, 0.2364600E+00, 0.2396400E+00, 0.2445700E+00, &
     & 0.2749500E+00, 0.2909200E+00, 0.3181300E+00, 0.3395800E+00, &
     & 0.3796700E+00, 0.3924400E+00, 0.3919000E+00, 0.3841300E+00, &
     & 0.4121200E+00, 0.3809600E+00, 0.3027600E+00, 0.3027600E+00 /
      data (ref_adm( 5,iz,38,12),iz = 1,20) / &
     & 0.1878600E+00, 0.1878600E+00, 0.1883200E+00, 0.1992300E+00, &
     & 0.2203000E+00, 0.2364600E+00, 0.2396400E+00, 0.2445700E+00, &
     & 0.2749500E+00, 0.2909200E+00, 0.3181300E+00, 0.3395800E+00, &
     & 0.3796700E+00, 0.3924400E+00, 0.3919000E+00, 0.3841300E+00, &
     & 0.4121200E+00, 0.3809600E+00, 0.3027600E+00, 0.3027600E+00 /
! Solar Zenith Angle 60.0 Albedo  0.2508530E+00
      data (ref_adm( 5,iz, 1,13),iz = 1,20) / &
     & 0.1797600E+00, 0.1797600E+00, 0.1873200E+00, 0.1780200E+00, &
     & 0.1952200E+00, 0.1821000E+00, 0.1811900E+00, 0.1914200E+00, &
     & 0.2255700E+00, 0.2268800E+00, 0.2529700E+00, 0.2843700E+00, &
     & 0.3535300E+00, 0.4337600E+00, 0.4554000E+00, 0.5308100E+00, &
     & 0.6121000E+00, 0.6986200E+00, 0.6150600E+00, 0.6150600E+00 /
      data (ref_adm( 5,iz, 2,13),iz = 1,20) / &
     & 0.1797600E+00, 0.1797600E+00, 0.1873200E+00, 0.1780200E+00, &
     & 0.1952200E+00, 0.1821000E+00, 0.1811900E+00, 0.1914200E+00, &
     & 0.2255700E+00, 0.2268800E+00, 0.2529700E+00, 0.2843700E+00, &
     & 0.3535300E+00, 0.4337600E+00, 0.4554000E+00, 0.5308100E+00, &
     & 0.6121000E+00, 0.6986200E+00, 0.6150600E+00, 0.6150600E+00 /
      data (ref_adm( 5,iz, 3,13),iz = 1,20) / &
     & 0.1898700E+00, 0.1898700E+00, 0.1759100E+00, 0.1753100E+00, &
     & 0.1750900E+00, 0.1831100E+00, 0.1851500E+00, 0.1924300E+00, &
     & 0.2075200E+00, 0.2393400E+00, 0.2496700E+00, 0.2847000E+00, &
     & 0.3160200E+00, 0.3641100E+00, 0.3695200E+00, 0.4956300E+00, &
     & 0.5545000E+00, 0.6542100E+00, 0.7676600E+00, 0.7676600E+00 /
      data (ref_adm( 5,iz, 4,13),iz = 1,20) / &
     & 0.1965000E+00, 0.1965000E+00, 0.1871100E+00, 0.1874200E+00, &
     & 0.1791500E+00, 0.1729700E+00, 0.1959000E+00, 0.2014000E+00, &
     & 0.2097100E+00, 0.2214400E+00, 0.2241000E+00, 0.2511900E+00, &
     & 0.2936900E+00, 0.3274100E+00, 0.4010800E+00, 0.4512500E+00, &
     & 0.5513200E+00, 0.6088500E+00, 0.6092200E+00, 0.6092200E+00 /
      data (ref_adm( 5,iz, 5,13),iz = 1,20) / &
     & 0.1867700E+00, 0.1867700E+00, 0.1820600E+00, 0.1846500E+00, &
     & 0.1865300E+00, 0.1934900E+00, 0.1818700E+00, 0.1848400E+00, &
     & 0.1959900E+00, 0.2185800E+00, 0.2272200E+00, 0.2581100E+00, &
     & 0.2895400E+00, 0.3275100E+00, 0.3868800E+00, 0.4517800E+00, &
     & 0.5007600E+00, 0.6074800E+00, 0.6172500E+00, 0.6172500E+00 /
      data (ref_adm( 5,iz, 6,13),iz = 1,20) / &
     & 0.1741400E+00, 0.1741400E+00, 0.1676300E+00, 0.1714900E+00, &
     & 0.1796800E+00, 0.1818800E+00, 0.1853200E+00, 0.2019200E+00, &
     & 0.2029400E+00, 0.2174400E+00, 0.2366000E+00, 0.2527600E+00, &
     & 0.2854100E+00, 0.3402100E+00, 0.3926500E+00, 0.4486000E+00, &
     & 0.5624300E+00, 0.5943000E+00, 0.6062400E+00, 0.6062400E+00 /
      data (ref_adm( 5,iz, 7,13),iz = 1,20) / &
     & 0.1922700E+00, 0.1922700E+00, 0.1775800E+00, 0.1822600E+00, &
     & 0.1763300E+00, 0.1797000E+00, 0.1929800E+00, 0.1814600E+00, &
     & 0.1989200E+00, 0.2131300E+00, 0.2172000E+00, 0.2341900E+00, &
     & 0.2636900E+00, 0.2914700E+00, 0.3522100E+00, 0.4116500E+00, &
     & 0.4785000E+00, 0.5178900E+00, 0.4718300E+00, 0.4718300E+00 /
      data (ref_adm( 5,iz, 8,13),iz = 1,20) / &
     & 0.1910800E+00, 0.1910800E+00, 0.1868400E+00, 0.1810500E+00, &
     & 0.1814800E+00, 0.1797500E+00, 0.1812700E+00, 0.1887300E+00, &
     & 0.1894300E+00, 0.2108500E+00, 0.2002200E+00, 0.2307200E+00, &
     & 0.2417900E+00, 0.2900500E+00, 0.3256000E+00, 0.3909000E+00, &
     & 0.4238400E+00, 0.5068500E+00, 0.4461500E+00, 0.4461500E+00 /
      data (ref_adm( 5,iz, 9,13),iz = 1,20) / &
     & 0.1850000E+00, 0.1850000E+00, 0.1779900E+00, 0.1823400E+00, &
     & 0.1769200E+00, 0.1809100E+00, 0.1838700E+00, 0.1820300E+00, &
     & 0.1884500E+00, 0.1884100E+00, 0.2104900E+00, 0.2242900E+00, &
     & 0.2537600E+00, 0.3030100E+00, 0.3244500E+00, 0.3761200E+00, &
     & 0.4160000E+00, 0.4553200E+00, 0.4956200E+00, 0.4956200E+00 /
      data (ref_adm( 5,iz,10,13),iz = 1,20) / &
     & 0.2010400E+00, 0.2010400E+00, 0.1886300E+00, 0.1812900E+00, &
     & 0.1822500E+00, 0.1882900E+00, 0.1772100E+00, 0.1861200E+00, &
     & 0.1934400E+00, 0.2101600E+00, 0.2115900E+00, 0.2185800E+00, &
     & 0.2444900E+00, 0.2783400E+00, 0.3100000E+00, 0.3586000E+00, &
     & 0.4048700E+00, 0.4331200E+00, 0.3977500E+00, 0.3977500E+00 /
      data (ref_adm( 5,iz,11,13),iz = 1,20) / &
     & 0.1972800E+00, 0.1972800E+00, 0.1750100E+00, 0.1964100E+00, &
     & 0.1795200E+00, 0.1672100E+00, 0.1830800E+00, 0.1865200E+00, &
     & 0.1922800E+00, 0.2048200E+00, 0.2158700E+00, 0.2231000E+00, &
     & 0.2388500E+00, 0.2596000E+00, 0.2931600E+00, 0.3405100E+00, &
     & 0.3848500E+00, 0.3925500E+00, 0.3505300E+00, 0.3505300E+00 /
      data (ref_adm( 5,iz,12,13),iz = 1,20) / &
     & 0.1765000E+00, 0.1765000E+00, 0.1771000E+00, 0.1850700E+00, &
     & 0.1909600E+00, 0.1783400E+00, 0.1771100E+00, 0.1881600E+00, &
     & 0.1986800E+00, 0.1932800E+00, 0.2114200E+00, 0.2168200E+00, &
     & 0.2354900E+00, 0.2470000E+00, 0.2706000E+00, 0.3154600E+00, &
     & 0.3654000E+00, 0.3738500E+00, 0.3434100E+00, 0.3434100E+00 /
      data (ref_adm( 5,iz,13,13),iz = 1,20) / &
     & 0.1733000E+00, 0.1733000E+00, 0.1789300E+00, 0.1827300E+00, &
     & 0.1706000E+00, 0.1868800E+00, 0.1807300E+00, 0.1843100E+00, &
     & 0.1919200E+00, 0.2091100E+00, 0.2058300E+00, 0.2164700E+00, &
     & 0.2344100E+00, 0.2361300E+00, 0.2542200E+00, 0.3089500E+00, &
     & 0.3289500E+00, 0.3450900E+00, 0.3012300E+00, 0.3012300E+00 /
      data (ref_adm( 5,iz,14,13),iz = 1,20) / &
     & 0.1865500E+00, 0.1865500E+00, 0.1865700E+00, 0.1871400E+00, &
     & 0.1885500E+00, 0.1906500E+00, 0.1911800E+00, 0.1912400E+00, &
     & 0.1967300E+00, 0.1972800E+00, 0.1996900E+00, 0.2075700E+00, &
     & 0.2246400E+00, 0.2332900E+00, 0.2619300E+00, 0.2933400E+00, &
     & 0.2980400E+00, 0.3162800E+00, 0.3036200E+00, 0.3036200E+00 /
      data (ref_adm( 5,iz,15,13),iz = 1,20) / &
     & 0.1868600E+00, 0.1868600E+00, 0.1728700E+00, 0.1728400E+00, &
     & 0.1723500E+00, 0.1724600E+00, 0.1751300E+00, 0.1796400E+00, &
     & 0.1860000E+00, 0.1907100E+00, 0.1993200E+00, 0.2130600E+00, &
     & 0.2293200E+00, 0.2375300E+00, 0.2530800E+00, 0.2838500E+00, &
     & 0.3044100E+00, 0.3025500E+00, 0.3489999E+00, 0.3489999E+00 /
      data (ref_adm( 5,iz,16,13),iz = 1,20) / &
     & 0.1736400E+00, 0.1736400E+00, 0.1860300E+00, 0.1944500E+00, &
     & 0.1959800E+00, 0.1907400E+00, 0.1951800E+00, 0.1826100E+00, &
     & 0.1782800E+00, 0.1836200E+00, 0.1919500E+00, 0.1965700E+00, &
     & 0.2047900E+00, 0.2201300E+00, 0.2538300E+00, 0.2566100E+00, &
     & 0.2980600E+00, 0.3300400E+00, 0.3380753E+00, 0.3380753E+00 /
      data (ref_adm( 5,iz,17,13),iz = 1,20) / &
     & 0.1864400E+00, 0.1864400E+00, 0.1843300E+00, 0.1975900E+00, &
     & 0.2046700E+00, 0.1824000E+00, 0.1942700E+00, 0.2001600E+00, &
     & 0.1902000E+00, 0.2046700E+00, 0.2098900E+00, 0.2100900E+00, &
     & 0.2292300E+00, 0.2361200E+00, 0.2419400E+00, 0.2599300E+00, &
     & 0.2395100E+00, 0.3573655E+00, 0.3282057E+00, 0.3282057E+00 /
      data (ref_adm( 5,iz,18,13),iz = 1,20) / &
     & 0.1918800E+00, 0.1918800E+00, 0.1886500E+00, 0.1856300E+00, &
     & 0.1855200E+00, 0.1762800E+00, 0.1969000E+00, 0.1985400E+00, &
     & 0.2002100E+00, 0.1925500E+00, 0.2069100E+00, 0.2156500E+00, &
     & 0.2253400E+00, 0.2349200E+00, 0.2544900E+00, 0.2622400E+00, &
     & 0.3076300E+00, 0.3012423E+00, 0.3087996E+00, 0.3087996E+00 /
      data (ref_adm( 5,iz,19,13),iz = 1,20) / &
     & 0.1796400E+00, 0.1796400E+00, 0.1782600E+00, 0.1850300E+00, &
     & 0.1911500E+00, 0.1871700E+00, 0.1801600E+00, 0.1956900E+00, &
     & 0.2092900E+00, 0.2080600E+00, 0.2141500E+00, 0.2192800E+00, &
     & 0.2251100E+00, 0.2452400E+00, 0.2420500E+00, 0.2438100E+00, &
     & 0.2784140E+00, 0.2984386E+00, 0.3038088E+00, 0.3038088E+00 /
      data (ref_adm( 5,iz,20,13),iz = 1,20) / &
     & 0.1757700E+00, 0.1757700E+00, 0.1884700E+00, 0.1887500E+00, &
     & 0.1927900E+00, 0.1893200E+00, 0.1812600E+00, 0.1963700E+00, &
     & 0.2106300E+00, 0.2110900E+00, 0.2145800E+00, 0.2194500E+00, &
     & 0.2375400E+00, 0.2373400E+00, 0.2527400E+00, 0.2813100E+00, &
     & 0.2777570E+00, 0.2966928E+00, 0.3009527E+00, 0.3009527E+00 /
      data (ref_adm( 5,iz,21,13),iz = 1,20) / &
     & 0.1870900E+00, 0.1870900E+00, 0.1809600E+00, 0.1843000E+00, &
     & 0.1843700E+00, 0.1977600E+00, 0.2070700E+00, 0.2058400E+00, &
     & 0.1996500E+00, 0.2111400E+00, 0.2195600E+00, 0.2266600E+00, &
     & 0.2359000E+00, 0.2343900E+00, 0.2546000E+00, 0.2625680E+00, &
     & 0.2779245E+00, 0.2954611E+00, 0.2991260E+00, 0.2991260E+00 /
      data (ref_adm( 5,iz,22,13),iz = 1,20) / &
     & 0.1873300E+00, 0.1873300E+00, 0.1902300E+00, 0.1883700E+00, &
     & 0.1897500E+00, 0.1987900E+00, 0.2022900E+00, 0.2011100E+00, &
     & 0.2121500E+00, 0.2125700E+00, 0.2240100E+00, 0.2289000E+00, &
     & 0.2457200E+00, 0.2473300E+00, 0.2629800E+00, 0.2719100E+00, &
     & 0.3132979E+00, 0.3364382E+00, 0.3448297E+00, 0.3448297E+00 /
      data (ref_adm( 5,iz,23,13),iz = 1,20) / &
     & 0.1795800E+00, 0.1795800E+00, 0.1881000E+00, 0.1942300E+00, &
     & 0.1931600E+00, 0.1897100E+00, 0.2033100E+00, 0.2023400E+00, &
     & 0.2064600E+00, 0.2240900E+00, 0.2236600E+00, 0.2362300E+00, &
     & 0.2378800E+00, 0.2393100E+00, 0.2594600E+00, 0.2917800E+00, &
     & 0.3145522E+00, 0.3363250E+00, 0.3452226E+00, 0.3452226E+00 /
      data (ref_adm( 5,iz,24,13),iz = 1,20) / &
     & 0.1800700E+00, 0.1800700E+00, 0.1673400E+00, 0.1743900E+00, &
     & 0.1779500E+00, 0.1804000E+00, 0.1856100E+00, 0.1981900E+00, &
     & 0.2035300E+00, 0.2189300E+00, 0.2305600E+00, 0.2363000E+00, &
     & 0.2496000E+00, 0.2580400E+00, 0.2644300E+00, 0.3070600E+00, &
     & 0.2974400E+00, 0.3380934E+00, 0.3473814E+00, 0.3473814E+00 /
      data (ref_adm( 5,iz,25,13),iz = 1,20) / &
     & 0.1761400E+00, 0.1761400E+00, 0.1893700E+00, 0.1975900E+00, &
     & 0.2022400E+00, 0.2024200E+00, 0.2077900E+00, 0.2135100E+00, &
     & 0.2165500E+00, 0.2200300E+00, 0.2309000E+00, 0.2400600E+00, &
     & 0.2511200E+00, 0.2650400E+00, 0.2795000E+00, 0.3167300E+00, &
     & 0.3222700E+00, 0.3407679E+00, 0.3510343E+00, 0.3510343E+00 /
      data (ref_adm( 5,iz,26,13),iz = 1,20) / &
     & 0.1915800E+00, 0.1915800E+00, 0.1948300E+00, 0.1984700E+00, &
     & 0.2016700E+00, 0.2079600E+00, 0.2155200E+00, 0.2211200E+00, &
     & 0.2292600E+00, 0.2405700E+00, 0.2507200E+00, 0.2589100E+00, &
     & 0.2679300E+00, 0.2758600E+00, 0.2855500E+00, 0.3131100E+00, &
     & 0.3507700E+00, 0.3306600E+00, 0.3566808E+00, 0.3566808E+00 /
      data (ref_adm( 5,iz,27,13),iz = 1,20) / &
     & 0.1890800E+00, 0.1890800E+00, 0.1884600E+00, 0.1962100E+00, &
     & 0.1928300E+00, 0.1950400E+00, 0.2141800E+00, 0.2261700E+00, &
     & 0.2259200E+00, 0.2438900E+00, 0.2447700E+00, 0.2611100E+00, &
     & 0.2694000E+00, 0.2887200E+00, 0.2983400E+00, 0.3090600E+00, &
     & 0.3568500E+00, 0.3436100E+00, 0.3645650E+00, 0.3645650E+00 /
      data (ref_adm( 5,iz,28,13),iz = 1,20) / &
     & 0.1841800E+00, 0.1841800E+00, 0.1919200E+00, 0.1811900E+00, &
     & 0.1901000E+00, 0.2067700E+00, 0.2237200E+00, 0.2310000E+00, &
     & 0.2416200E+00, 0.2433800E+00, 0.2570200E+00, 0.2629100E+00, &
     & 0.2810500E+00, 0.3010600E+00, 0.3200800E+00, 0.3242600E+00, &
     & 0.3399100E+00, 0.3515000E+00, 0.2743100E+00, 0.2743100E+00 /
      data (ref_adm( 5,iz,29,13),iz = 1,20) / &
     & 0.1863700E+00, 0.1863700E+00, 0.1776600E+00, 0.1870600E+00, &
     & 0.1951200E+00, 0.1978300E+00, 0.2259000E+00, 0.2282300E+00, &
     & 0.2458100E+00, 0.2481600E+00, 0.2679400E+00, 0.2819100E+00, &
     & 0.2933200E+00, 0.3260300E+00, 0.3276900E+00, 0.3559300E+00, &
     & 0.3719200E+00, 0.3548100E+00, 0.3110100E+00, 0.3110100E+00 /
      data (ref_adm( 5,iz,30,13),iz = 1,20) / &
     & 0.1879900E+00, 0.1879900E+00, 0.1909600E+00, 0.1994700E+00, &
     & 0.2056300E+00, 0.2077700E+00, 0.2305300E+00, 0.2400500E+00, &
     & 0.2426800E+00, 0.2535300E+00, 0.2691800E+00, 0.2856300E+00, &
     & 0.3018300E+00, 0.3265500E+00, 0.3432400E+00, 0.3584100E+00, &
     & 0.3851100E+00, 0.3909300E+00, 0.3138200E+00, 0.3138200E+00 /
      data (ref_adm( 5,iz,31,13),iz = 1,20) / &
     & 0.1883300E+00, 0.1883300E+00, 0.2157800E+00, 0.2167000E+00, &
     & 0.2051300E+00, 0.2218900E+00, 0.2194000E+00, 0.2357700E+00, &
     & 0.2492100E+00, 0.2688100E+00, 0.2797600E+00, 0.2994900E+00, &
     & 0.3052700E+00, 0.3362700E+00, 0.3600700E+00, 0.3752800E+00, &
     & 0.4006000E+00, 0.3853500E+00, 0.3405600E+00, 0.3405600E+00 /
      data (ref_adm( 5,iz,32,13),iz = 1,20) / &
     & 0.1948000E+00, 0.1948000E+00, 0.2067700E+00, 0.2124100E+00, &
     & 0.2125200E+00, 0.2195100E+00, 0.2342400E+00, 0.2438500E+00, &
     & 0.2631500E+00, 0.2726400E+00, 0.2849200E+00, 0.3052400E+00, &
     & 0.3244900E+00, 0.3588400E+00, 0.3719400E+00, 0.3710000E+00, &
     & 0.4000200E+00, 0.4011200E+00, 0.3453400E+00, 0.3453400E+00 /
      data (ref_adm( 5,iz,33,13),iz = 1,20) / &
     & 0.1836100E+00, 0.1836100E+00, 0.1859500E+00, 0.1850300E+00, &
     & 0.1952900E+00, 0.2063200E+00, 0.2142600E+00, 0.2375300E+00, &
     & 0.2513000E+00, 0.2670800E+00, 0.2863600E+00, 0.2935000E+00, &
     & 0.3085100E+00, 0.3397200E+00, 0.3509100E+00, 0.3778300E+00, &
     & 0.4088000E+00, 0.4129000E+00, 0.3436500E+00, 0.3436500E+00 /
      data (ref_adm( 5,iz,34,13),iz = 1,20) / &
     & 0.1866000E+00, 0.1866000E+00, 0.1829900E+00, 0.2018500E+00, &
     & 0.2064100E+00, 0.2071900E+00, 0.2250700E+00, 0.2387900E+00, &
     & 0.2507500E+00, 0.2852400E+00, 0.2945600E+00, 0.3058600E+00, &
     & 0.3496200E+00, 0.3641900E+00, 0.3923200E+00, 0.4162100E+00, &
     & 0.4210000E+00, 0.4139800E+00, 0.3539300E+00, 0.3539300E+00 /
      data (ref_adm( 5,iz,35,13),iz = 1,20) / &
     & 0.1839900E+00, 0.1839900E+00, 0.1855600E+00, 0.1921300E+00, &
     & 0.2054800E+00, 0.2084300E+00, 0.2295700E+00, 0.2356200E+00, &
     & 0.2437100E+00, 0.2768900E+00, 0.3050400E+00, 0.3205600E+00, &
     & 0.3531700E+00, 0.3737300E+00, 0.4074300E+00, 0.4233100E+00, &
     & 0.4302500E+00, 0.4204800E+00, 0.3684800E+00, 0.3684800E+00 /
      data (ref_adm( 5,iz,36,13),iz = 1,20) / &
     & 0.1886300E+00, 0.1886300E+00, 0.1896600E+00, 0.1851800E+00, &
     & 0.2116400E+00, 0.2215900E+00, 0.2188400E+00, 0.2372400E+00, &
     & 0.2512200E+00, 0.2625700E+00, 0.3048500E+00, 0.3246600E+00, &
     & 0.3727100E+00, 0.3937000E+00, 0.4117400E+00, 0.4213900E+00, &
     & 0.4337600E+00, 0.4129500E+00, 0.3562500E+00, 0.3562500E+00 /
      data (ref_adm( 5,iz,37,13),iz = 1,20) / &
     & 0.1833500E+00, 0.1833500E+00, 0.1905300E+00, 0.2001800E+00, &
     & 0.1983000E+00, 0.2184000E+00, 0.2353800E+00, 0.2459400E+00, &
     & 0.2651400E+00, 0.2710500E+00, 0.2866300E+00, 0.3218700E+00, &
     & 0.3772700E+00, 0.4111000E+00, 0.4340700E+00, 0.4235800E+00, &
     & 0.4319100E+00, 0.4363400E+00, 0.3684900E+00, 0.3684900E+00 /
      data (ref_adm( 5,iz,38,13),iz = 1,20) / &
     & 0.1833500E+00, 0.1833500E+00, 0.1905300E+00, 0.2001800E+00, &
     & 0.1983000E+00, 0.2184000E+00, 0.2353800E+00, 0.2459400E+00, &
     & 0.2651400E+00, 0.2710500E+00, 0.2866300E+00, 0.3218700E+00, &
     & 0.3772700E+00, 0.4111000E+00, 0.4340700E+00, 0.4235800E+00, &
     & 0.4319100E+00, 0.4363400E+00, 0.3684900E+00, 0.3684900E+00 /
! Solar Zenith Angle 65.0 Albedo  0.2584488E+00
      data (ref_adm( 5,iz, 1,14),iz = 1,20) / &
     & 0.1774600E+00, 0.1774600E+00, 0.1800100E+00, 0.1662000E+00, &
     & 0.1602100E+00, 0.1734500E+00, 0.1707500E+00, 0.1864200E+00, &
     & 0.2170200E+00, 0.2298100E+00, 0.2597100E+00, 0.3127800E+00, &
     & 0.4043300E+00, 0.5716700E+00, 0.6964400E+00, 0.7524300E+00, &
     & 0.8656200E+00, 0.7816700E+00, 0.7043176E+00, 0.7043176E+00 /
      data (ref_adm( 5,iz, 2,14),iz = 1,20) / &
     & 0.1774600E+00, 0.1774600E+00, 0.1800100E+00, 0.1662000E+00, &
     & 0.1602100E+00, 0.1734500E+00, 0.1707500E+00, 0.1864200E+00, &
     & 0.2170200E+00, 0.2298100E+00, 0.2597100E+00, 0.3127800E+00, &
     & 0.4043300E+00, 0.5716700E+00, 0.6964400E+00, 0.7524300E+00, &
     & 0.8656200E+00, 0.7816700E+00, 0.7043176E+00, 0.7043176E+00 /
      data (ref_adm( 5,iz, 3,14),iz = 1,20) / &
     & 0.1693700E+00, 0.1693700E+00, 0.1783000E+00, 0.1666500E+00, &
     & 0.1926600E+00, 0.1628300E+00, 0.1871300E+00, 0.1884000E+00, &
     & 0.2068500E+00, 0.2186100E+00, 0.2634900E+00, 0.3110100E+00, &
     & 0.3408500E+00, 0.3911300E+00, 0.5283400E+00, 0.6168800E+00, &
     & 0.7659100E+00, 0.6734400E+00, 0.1054796E-07, 0.1054796E-07 /
      data (ref_adm( 5,iz, 4,14),iz = 1,20) / &
     & 0.1644800E+00, 0.1644800E+00, 0.1746200E+00, 0.1752000E+00, &
     & 0.1717900E+00, 0.1795200E+00, 0.1809200E+00, 0.1899800E+00, &
     & 0.2100300E+00, 0.2097900E+00, 0.2514400E+00, 0.3056100E+00, &
     & 0.3392900E+00, 0.3986500E+00, 0.4614500E+00, 0.5464900E+00, &
     & 0.6566500E+00, 0.7435000E+00, 0.6422557E+00, 0.6422557E+00 /
      data (ref_adm( 5,iz, 5,14),iz = 1,20) / &
     & 0.1748800E+00, 0.1748800E+00, 0.1789700E+00, 0.1800800E+00, &
     & 0.1711800E+00, 0.1714300E+00, 0.1844400E+00, 0.2026000E+00, &
     & 0.2101000E+00, 0.2236600E+00, 0.2476100E+00, 0.2945100E+00, &
     & 0.3397200E+00, 0.3850300E+00, 0.4572900E+00, 0.5213500E+00, &
     & 0.6359000E+00, 0.7963000E+00, 0.5960233E+00, 0.5960233E+00 /
      data (ref_adm( 5,iz, 6,14),iz = 1,20) / &
     & 0.1732200E+00, 0.1732200E+00, 0.1652600E+00, 0.1768100E+00, &
     & 0.1665500E+00, 0.1754800E+00, 0.1751000E+00, 0.1871100E+00, &
     & 0.2042900E+00, 0.2306800E+00, 0.2456100E+00, 0.2893100E+00, &
     & 0.3351500E+00, 0.3903100E+00, 0.4597500E+00, 0.5379400E+00, &
     & 0.6437700E+00, 0.6972700E+00, 0.6072200E+00, 0.6072200E+00 /
      data (ref_adm( 5,iz, 7,14),iz = 1,20) / &
     & 0.1747900E+00, 0.1747900E+00, 0.1971800E+00, 0.1920200E+00, &
     & 0.1756900E+00, 0.1878400E+00, 0.1892900E+00, 0.2013300E+00, &
     & 0.2090300E+00, 0.2435500E+00, 0.2657500E+00, 0.2852300E+00, &
     & 0.2829900E+00, 0.3262600E+00, 0.4097000E+00, 0.4927200E+00, &
     & 0.5704000E+00, 0.5547400E+00, 0.4921300E+00, 0.4921300E+00 /
      data (ref_adm( 5,iz, 8,14),iz = 1,20) / &
     & 0.1737700E+00, 0.1737700E+00, 0.1791800E+00, 0.1670300E+00, &
     & 0.1721300E+00, 0.1615100E+00, 0.1833300E+00, 0.1734000E+00, &
     & 0.2067400E+00, 0.2242700E+00, 0.2298600E+00, 0.2733400E+00, &
     & 0.2761400E+00, 0.3101600E+00, 0.3793400E+00, 0.5033100E+00, &
     & 0.5707700E+00, 0.6062800E+00, 0.6031300E+00, 0.6031300E+00 /
      data (ref_adm( 5,iz, 9,14),iz = 1,20) / &
     & 0.1693600E+00, 0.1693600E+00, 0.1762500E+00, 0.1714000E+00, &
     & 0.1629700E+00, 0.1866500E+00, 0.1775200E+00, 0.1959600E+00, &
     & 0.1900400E+00, 0.2108800E+00, 0.2284900E+00, 0.2429300E+00, &
     & 0.2752700E+00, 0.3275700E+00, 0.3756800E+00, 0.4424400E+00, &
     & 0.5144700E+00, 0.5731400E+00, 0.4922500E+00, 0.4922500E+00 /
      data (ref_adm( 5,iz,10,14),iz = 1,20) / &
     & 0.1528900E+00, 0.1528900E+00, 0.1673600E+00, 0.1653500E+00, &
     & 0.1658100E+00, 0.1898200E+00, 0.1768600E+00, 0.1780300E+00, &
     & 0.1992400E+00, 0.2245000E+00, 0.2294500E+00, 0.2544700E+00, &
     & 0.2647800E+00, 0.3140100E+00, 0.3568400E+00, 0.4152800E+00, &
     & 0.5090600E+00, 0.5377600E+00, 0.4966500E+00, 0.4966500E+00 /
      data (ref_adm( 5,iz,11,14),iz = 1,20) / &
     & 0.1946000E+00, 0.1946000E+00, 0.1686100E+00, 0.1674400E+00, &
     & 0.1730900E+00, 0.1733900E+00, 0.1846600E+00, 0.1805200E+00, &
     & 0.2076500E+00, 0.2120100E+00, 0.2158900E+00, 0.2403100E+00, &
     & 0.2556400E+00, 0.2847100E+00, 0.3372300E+00, 0.3829700E+00, &
     & 0.4426100E+00, 0.4765400E+00, 0.4290300E+00, 0.4290300E+00 /
      data (ref_adm( 5,iz,12,14),iz = 1,20) / &
     & 0.1797700E+00, 0.1797700E+00, 0.1756700E+00, 0.1745600E+00, &
     & 0.1726800E+00, 0.1593900E+00, 0.1874100E+00, 0.1942100E+00, &
     & 0.1929100E+00, 0.2063600E+00, 0.2169000E+00, 0.2253300E+00, &
     & 0.2554600E+00, 0.2827300E+00, 0.3207200E+00, 0.3543700E+00, &
     & 0.4118200E+00, 0.4144700E+00, 0.4017300E+00, 0.4017300E+00 /
      data (ref_adm( 5,iz,13,14),iz = 1,20) / &
     & 0.1732800E+00, 0.1732800E+00, 0.1658500E+00, 0.1643300E+00, &
     & 0.1654200E+00, 0.1811200E+00, 0.1854300E+00, 0.1992300E+00, &
     & 0.1996300E+00, 0.2024800E+00, 0.2124000E+00, 0.2134100E+00, &
     & 0.2405100E+00, 0.2653100E+00, 0.3042500E+00, 0.3425400E+00, &
     & 0.3886100E+00, 0.4055200E+00, 0.3874300E+00, 0.3874300E+00 /
      data (ref_adm( 5,iz,14,14),iz = 1,20) / &
     & 0.1753900E+00, 0.1753900E+00, 0.1775200E+00, 0.1845500E+00, &
     & 0.1831900E+00, 0.1822200E+00, 0.1831000E+00, 0.1980600E+00, &
     & 0.2012600E+00, 0.2022200E+00, 0.2057000E+00, 0.2139700E+00, &
     & 0.2192300E+00, 0.2560800E+00, 0.2960100E+00, 0.3439500E+00, &
     & 0.3671200E+00, 0.3926500E+00, 0.3856286E+00, 0.3856286E+00 /
      data (ref_adm( 5,iz,15,14),iz = 1,20) / &
     & 0.1764800E+00, 0.1764800E+00, 0.1665600E+00, 0.1646700E+00, &
     & 0.1646300E+00, 0.1709100E+00, 0.1739700E+00, 0.1824500E+00, &
     & 0.1867200E+00, 0.1965400E+00, 0.2045700E+00, 0.2146600E+00, &
     & 0.2252400E+00, 0.2466400E+00, 0.2868700E+00, 0.3003300E+00, &
     & 0.3209100E+00, 0.4336900E+00, 0.3760409E+00, 0.3760409E+00 /
      data (ref_adm( 5,iz,16,14),iz = 1,20) / &
     & 0.1628100E+00, 0.1628100E+00, 0.1587700E+00, 0.1709900E+00, &
     & 0.1625100E+00, 0.1643200E+00, 0.1624800E+00, 0.1672000E+00, &
     & 0.1657700E+00, 0.1765400E+00, 0.1921900E+00, 0.2002200E+00, &
     & 0.2193600E+00, 0.2310200E+00, 0.2678400E+00, 0.2935400E+00, &
     & 0.3086500E+00, 0.3946193E+00, 0.3639360E+00, 0.3639360E+00 /
      data (ref_adm( 5,iz,17,14),iz = 1,20) / &
     & 0.1668300E+00, 0.1668300E+00, 0.1610400E+00, 0.1661500E+00, &
     & 0.1697800E+00, 0.1733300E+00, 0.1807700E+00, 0.1859500E+00, &
     & 0.1832100E+00, 0.1951400E+00, 0.2091300E+00, 0.2080900E+00, &
     & 0.2228100E+00, 0.2568300E+00, 0.2730500E+00, 0.2895100E+00, &
     & 0.3578600E+00, 0.3803618E+00, 0.3520000E+00, 0.3520000E+00 /
      data (ref_adm( 5,iz,18,14),iz = 1,20) / &
     & 0.1613000E+00, 0.1613000E+00, 0.1616800E+00, 0.1628800E+00, &
     & 0.1702600E+00, 0.1664700E+00, 0.1853400E+00, 0.1787800E+00, &
     & 0.1894200E+00, 0.1886400E+00, 0.2026800E+00, 0.2018600E+00, &
     & 0.2355600E+00, 0.2504500E+00, 0.2600700E+00, 0.2948100E+00, &
     & 0.3321400E+00, 0.4089498E+00, 0.4538531E+00, 0.4538531E+00 /
      data (ref_adm( 5,iz,19,14),iz = 1,20) / &
     & 0.1743700E+00, 0.1743700E+00, 0.1674300E+00, 0.1686700E+00, &
     & 0.1795800E+00, 0.1692000E+00, 0.1847400E+00, 0.1826000E+00, &
     & 0.2022400E+00, 0.1971900E+00, 0.1983400E+00, 0.2037900E+00, &
     & 0.2214500E+00, 0.2468800E+00, 0.2530100E+00, 0.2843400E+00, &
     & 0.3505322E+00, 0.4021046E+00, 0.4431283E+00, 0.4431283E+00 /
      data (ref_adm( 5,iz,20,14),iz = 1,20) / &
     & 0.1715200E+00, 0.1715200E+00, 0.1726600E+00, 0.1757900E+00, &
     & 0.1768600E+00, 0.1880300E+00, 0.1677100E+00, 0.1912000E+00, &
     & 0.1984100E+00, 0.1977300E+00, 0.2004000E+00, 0.2041000E+00, &
     & 0.2175500E+00, 0.2370200E+00, 0.2629600E+00, 0.3020000E+00, &
     & 0.3485925E+00, 0.3981638E+00, 0.4369969E+00, 0.4369969E+00 /
      data (ref_adm( 5,iz,21,14),iz = 1,20) / &
     & 0.1698900E+00, 0.1698900E+00, 0.1675300E+00, 0.1712800E+00, &
     & 0.1860600E+00, 0.1814100E+00, 0.1918300E+00, 0.1743700E+00, &
     & 0.2063900E+00, 0.1919300E+00, 0.1958800E+00, 0.2145500E+00, &
     & 0.2225100E+00, 0.2428400E+00, 0.2501200E+00, 0.3120132E+00, &
     & 0.3475686E+00, 0.3953390E+00, 0.4330729E+00, 0.4330729E+00 /
      data (ref_adm( 5,iz,22,14),iz = 1,20) / &
     & 0.1701700E+00, 0.1701700E+00, 0.1781300E+00, 0.1790700E+00, &
     & 0.1747900E+00, 0.1920500E+00, 0.2002600E+00, 0.1888900E+00, &
     & 0.2033500E+00, 0.1863000E+00, 0.2103700E+00, 0.2145100E+00, &
     & 0.2380800E+00, 0.2524300E+00, 0.2648600E+00, 0.3365800E+00, &
     & 0.3201413E+00, 0.3468380E+00, 0.3592713E+00, 0.3592713E+00 /
      data (ref_adm( 5,iz,23,14),iz = 1,20) / &
     & 0.1706900E+00, 0.1706900E+00, 0.1725900E+00, 0.1805400E+00, &
     & 0.1862800E+00, 0.1903700E+00, 0.1832200E+00, 0.2006300E+00, &
     & 0.1878300E+00, 0.1944500E+00, 0.2113600E+00, 0.2338500E+00, &
     & 0.2487800E+00, 0.2527500E+00, 0.2678800E+00, 0.2932100E+00, &
     & 0.3213719E+00, 0.3468070E+00, 0.3597431E+00, 0.3597431E+00 /
      data (ref_adm( 5,iz,24,14),iz = 1,20) / &
     & 0.1598100E+00, 0.1598100E+00, 0.1674300E+00, 0.1669700E+00, &
     & 0.1722300E+00, 0.1770700E+00, 0.1828300E+00, 0.1847600E+00, &
     & 0.1880500E+00, 0.1960800E+00, 0.2069100E+00, 0.2205900E+00, &
     & 0.2485000E+00, 0.2608300E+00, 0.2690100E+00, 0.2982100E+00, &
     & 0.3235926E+00, 0.3488225E+00, 0.3623133E+00, 0.3623133E+00 /
      data (ref_adm( 5,iz,25,14),iz = 1,20) / &
     & 0.1699500E+00, 0.1699500E+00, 0.1807600E+00, 0.1855000E+00, &
     & 0.1936500E+00, 0.1948700E+00, 0.1972800E+00, 0.2080600E+00, &
     & 0.2150500E+00, 0.2181400E+00, 0.2265300E+00, 0.2339900E+00, &
     & 0.2470200E+00, 0.2609200E+00, 0.2782300E+00, 0.2993700E+00, &
     & 0.3438400E+00, 0.3517951E+00, 0.3664723E+00, 0.3664723E+00 /
      data (ref_adm( 5,iz,26,14),iz = 1,20) / &
     & 0.1727800E+00, 0.1727800E+00, 0.1686100E+00, 0.1855100E+00, &
     & 0.1847000E+00, 0.1952800E+00, 0.2003300E+00, 0.2002000E+00, &
     & 0.2240300E+00, 0.2292300E+00, 0.2429700E+00, 0.2623500E+00, &
     & 0.2725100E+00, 0.2978400E+00, 0.3028900E+00, 0.3102500E+00, &
     & 0.3340300E+00, 0.3699800E+00, 0.3731849E+00, 0.3731849E+00 /
      data (ref_adm( 5,iz,27,14),iz = 1,20) / &
     & 0.1780100E+00, 0.1780100E+00, 0.1577000E+00, 0.1797300E+00, &
     & 0.1824100E+00, 0.1942100E+00, 0.1934800E+00, 0.1913900E+00, &
     & 0.2246800E+00, 0.2240800E+00, 0.2451600E+00, 0.2632600E+00, &
     & 0.2826500E+00, 0.2900200E+00, 0.3050600E+00, 0.3227800E+00, &
     & 0.3622800E+00, 0.3532400E+00, 0.3470900E+00, 0.3470900E+00 /
      data (ref_adm( 5,iz,28,14),iz = 1,20) / &
     & 0.1692000E+00, 0.1692000E+00, 0.1618300E+00, 0.1850300E+00, &
     & 0.1848400E+00, 0.1980600E+00, 0.1988500E+00, 0.2167500E+00, &
     & 0.2145100E+00, 0.2273900E+00, 0.2443200E+00, 0.2634700E+00, &
     & 0.2861900E+00, 0.3027500E+00, 0.3274200E+00, 0.3660300E+00, &
     & 0.3637000E+00, 0.3697500E+00, 0.3400000E+00, 0.3400000E+00 /
      data (ref_adm( 5,iz,29,14),iz = 1,20) / &
     & 0.2155000E+00, 0.2155000E+00, 0.1894000E+00, 0.1753400E+00, &
     & 0.1974500E+00, 0.2057300E+00, 0.2018800E+00, 0.2206900E+00, &
     & 0.2248900E+00, 0.2410100E+00, 0.2463400E+00, 0.2846000E+00, &
     & 0.3050200E+00, 0.3191600E+00, 0.3446600E+00, 0.3609900E+00, &
     & 0.3922900E+00, 0.3760600E+00, 0.3436900E+00, 0.3436900E+00 /
      data (ref_adm( 5,iz,30,14),iz = 1,20) / &
     & 0.1794200E+00, 0.1794200E+00, 0.1915900E+00, 0.2088900E+00, &
     & 0.1945400E+00, 0.1823300E+00, 0.2008600E+00, 0.2174900E+00, &
     & 0.2281900E+00, 0.2495400E+00, 0.2727900E+00, 0.2792900E+00, &
     & 0.3103700E+00, 0.3455300E+00, 0.3627800E+00, 0.3861100E+00, &
     & 0.4096900E+00, 0.4010000E+00, 0.3768600E+00, 0.3768600E+00 /
      data (ref_adm( 5,iz,31,14),iz = 1,20) / &
     & 0.1652600E+00, 0.1652600E+00, 0.1866700E+00, 0.2085800E+00, &
     & 0.2192900E+00, 0.2444600E+00, 0.2021400E+00, 0.2166400E+00, &
     & 0.2208900E+00, 0.2405800E+00, 0.2720800E+00, 0.2764800E+00, &
     & 0.3129100E+00, 0.3497000E+00, 0.3758800E+00, 0.4018600E+00, &
     & 0.4190200E+00, 0.4166900E+00, 0.3671900E+00, 0.3671900E+00 /
      data (ref_adm( 5,iz,32,14),iz = 1,20) / &
     & 0.1819200E+00, 0.1819200E+00, 0.1776300E+00, 0.1934800E+00, &
     & 0.2020700E+00, 0.2141400E+00, 0.2106700E+00, 0.2391800E+00, &
     & 0.2499600E+00, 0.2705500E+00, 0.2768200E+00, 0.3071200E+00, &
     & 0.3302300E+00, 0.3656700E+00, 0.3883500E+00, 0.4146600E+00, &
     & 0.4322100E+00, 0.4558900E+00, 0.3901800E+00, 0.3901800E+00 /
      data (ref_adm( 5,iz,33,14),iz = 1,20) / &
     & 0.1748800E+00, 0.1748800E+00, 0.1861500E+00, 0.1938800E+00, &
     & 0.1922700E+00, 0.2136500E+00, 0.2241700E+00, 0.2295800E+00, &
     & 0.2458800E+00, 0.2576200E+00, 0.2745000E+00, 0.2946900E+00, &
     & 0.3189500E+00, 0.3645200E+00, 0.3930300E+00, 0.4184200E+00, &
     & 0.4401800E+00, 0.4477500E+00, 0.3936400E+00, 0.3936400E+00 /
      data (ref_adm( 5,iz,34,14),iz = 1,20) / &
     & 0.1821400E+00, 0.1821400E+00, 0.1733400E+00, 0.1808700E+00, &
     & 0.1952300E+00, 0.2060200E+00, 0.2297300E+00, 0.2432600E+00, &
     & 0.2493300E+00, 0.2701300E+00, 0.2863500E+00, 0.3180400E+00, &
     & 0.3360900E+00, 0.3772700E+00, 0.4005900E+00, 0.4194400E+00, &
     & 0.4417000E+00, 0.4546500E+00, 0.3937200E+00, 0.3937200E+00 /
      data (ref_adm( 5,iz,35,14),iz = 1,20) / &
     & 0.1759100E+00, 0.1759100E+00, 0.1893800E+00, 0.1969100E+00, &
     & 0.2049000E+00, 0.2024600E+00, 0.2320900E+00, 0.2335100E+00, &
     & 0.2428500E+00, 0.2654200E+00, 0.2940500E+00, 0.3301600E+00, &
     & 0.3394300E+00, 0.3794800E+00, 0.4090600E+00, 0.4358400E+00, &
     & 0.4631300E+00, 0.4628000E+00, 0.3888900E+00, 0.3888900E+00 /
      data (ref_adm( 5,iz,36,14),iz = 1,20) / &
     & 0.1814000E+00, 0.1814000E+00, 0.1860700E+00, 0.1997600E+00, &
     & 0.1958700E+00, 0.1965800E+00, 0.2177100E+00, 0.2400300E+00, &
     & 0.2469200E+00, 0.2675300E+00, 0.2917700E+00, 0.3220800E+00, &
     & 0.3415600E+00, 0.3829200E+00, 0.4300500E+00, 0.4471200E+00, &
     & 0.4589900E+00, 0.4762400E+00, 0.4165200E+00, 0.4165200E+00 /
      data (ref_adm( 5,iz,37,14),iz = 1,20) / &
     & 0.1747900E+00, 0.1747900E+00, 0.1844300E+00, 0.1888100E+00, &
     & 0.1970200E+00, 0.2140700E+00, 0.2239000E+00, 0.2406300E+00, &
     & 0.2528500E+00, 0.2601400E+00, 0.2907500E+00, 0.3129600E+00, &
     & 0.3624100E+00, 0.3905200E+00, 0.4473000E+00, 0.4512000E+00, &
     & 0.4763600E+00, 0.4842000E+00, 0.3950700E+00, 0.3950700E+00 /
      data (ref_adm( 5,iz,38,14),iz = 1,20) / &
     & 0.1747900E+00, 0.1747900E+00, 0.1844300E+00, 0.1888100E+00, &
     & 0.1970200E+00, 0.2140700E+00, 0.2239000E+00, 0.2406300E+00, &
     & 0.2528500E+00, 0.2601400E+00, 0.2907500E+00, 0.3129600E+00, &
     & 0.3624100E+00, 0.3905200E+00, 0.4473000E+00, 0.4512000E+00, &
     & 0.4763600E+00, 0.4842000E+00, 0.3950700E+00, 0.3950700E+00 /
! Solar Zenith Angle 70.0 Albedo  0.2789065E+00
      data (ref_adm( 5,iz, 1,15),iz = 1,20) / &
     & 0.2018400E+00, 0.2018400E+00, 0.1815000E+00, 0.1763400E+00, &
     & 0.1857500E+00, 0.1934600E+00, 0.1784600E+00, 0.1991300E+00, &
     & 0.2238200E+00, 0.2625300E+00, 0.2772300E+00, 0.3547200E+00, &
     & 0.4656200E+00, 0.6091100E+00, 0.7030000E+00, 0.1393600E+01, &
     & 0.1555369E+01, 0.1797981E+01, 0.2013893E+01, 0.2013893E+01 /
      data (ref_adm( 5,iz, 2,15),iz = 1,20) / &
     & 0.2018400E+00, 0.2018400E+00, 0.1815000E+00, 0.1763400E+00, &
     & 0.1857500E+00, 0.1934600E+00, 0.1784600E+00, 0.1991300E+00, &
     & 0.2238200E+00, 0.2625300E+00, 0.2772300E+00, 0.3547200E+00, &
     & 0.4656200E+00, 0.6091100E+00, 0.7030000E+00, 0.1393600E+01, &
     & 0.1555369E+01, 0.1797981E+01, 0.2013893E+01, 0.2013893E+01 /
      data (ref_adm( 5,iz, 3,15),iz = 1,20) / &
     & 0.1728700E+00, 0.1728700E+00, 0.1694400E+00, 0.1742100E+00, &
     & 0.1807100E+00, 0.1754600E+00, 0.1665200E+00, 0.1824800E+00, &
     & 0.2153000E+00, 0.2548500E+00, 0.2776700E+00, 0.3462500E+00, &
     & 0.3868800E+00, 0.5496800E+00, 0.6097400E+00, 0.6225100E+00, &
     & 0.1521838E+01, 0.1928582E+01, 0.3080079E-07, 0.3080079E-07 /
      data (ref_adm( 5,iz, 4,15),iz = 1,20) / &
     & 0.1793900E+00, 0.1793900E+00, 0.1714600E+00, 0.1710000E+00, &
     & 0.1790200E+00, 0.1809200E+00, 0.1871800E+00, 0.2012700E+00, &
     & 0.2013600E+00, 0.2344900E+00, 0.2412100E+00, 0.3037300E+00, &
     & 0.4351300E+00, 0.4867600E+00, 0.5408700E+00, 0.6304300E+00, &
     & 0.1285153E+01, 0.2169166E+01, 0.2331053E+01, 0.2331053E+01 /
      data (ref_adm( 5,iz, 5,15),iz = 1,20) / &
     & 0.1725200E+00, 0.1725200E+00, 0.1624800E+00, 0.1739500E+00, &
     & 0.1834500E+00, 0.1938100E+00, 0.1981600E+00, 0.1901400E+00, &
     & 0.2088500E+00, 0.2139600E+00, 0.2472000E+00, 0.3245800E+00, &
     & 0.3736000E+00, 0.4862500E+00, 0.5117800E+00, 0.6904100E+00, &
     & 0.1007500E+01, 0.2131244E+01, 0.3212410E+01, 0.3212410E+01 /
      data (ref_adm( 5,iz, 6,15),iz = 1,20) / &
     & 0.1674300E+00, 0.1674300E+00, 0.1617300E+00, 0.1664600E+00, &
     & 0.1663300E+00, 0.1730100E+00, 0.1805300E+00, 0.2020400E+00, &
     & 0.2333100E+00, 0.2340800E+00, 0.2495100E+00, 0.3047300E+00, &
     & 0.3950000E+00, 0.4783400E+00, 0.5565400E+00, 0.6336300E+00, &
     & 0.5030500E+00, 0.8747300E+00, 0.2765759E+01, 0.2765759E+01 /
      data (ref_adm( 5,iz, 7,15),iz = 1,20) / &
     & 0.1754800E+00, 0.1754800E+00, 0.1636600E+00, 0.1633500E+00, &
     & 0.1633000E+00, 0.1751300E+00, 0.1794500E+00, 0.1792100E+00, &
     & 0.1941400E+00, 0.2349300E+00, 0.2475300E+00, 0.3083100E+00, &
     & 0.3817900E+00, 0.4551900E+00, 0.4776500E+00, 0.6629700E+00, &
     & 0.7958000E+00, 0.7704400E+00, 0.1745876E+01, 0.1745876E+01 /
      data (ref_adm( 5,iz, 8,15),iz = 1,20) / &
     & 0.1713800E+00, 0.1713800E+00, 0.1568100E+00, 0.1637200E+00, &
     & 0.1648400E+00, 0.1749600E+00, 0.1939500E+00, 0.2013800E+00, &
     & 0.1983700E+00, 0.2178900E+00, 0.2496300E+00, 0.2910300E+00, &
     & 0.3153400E+00, 0.3567400E+00, 0.4529400E+00, 0.5389900E+00, &
     & 0.7114100E+00, 0.6176900E+00, 0.1332827E+01, 0.1332827E+01 /
      data (ref_adm( 5,iz, 9,15),iz = 1,20) / &
     & 0.1591100E+00, 0.1591100E+00, 0.1825100E+00, 0.1746500E+00, &
     & 0.1683300E+00, 0.1631800E+00, 0.1678900E+00, 0.1798300E+00, &
     & 0.2019100E+00, 0.2060700E+00, 0.2505700E+00, 0.2628600E+00, &
     & 0.2657000E+00, 0.3839900E+00, 0.4119200E+00, 0.5610300E+00, &
     & 0.6306800E+00, 0.6045800E+00, 0.4764200E+00, 0.4764200E+00 /
      data (ref_adm( 5,iz,10,15),iz = 1,20) / &
     & 0.1781500E+00, 0.1781500E+00, 0.1966000E+00, 0.1853100E+00, &
     & 0.1747000E+00, 0.1582800E+00, 0.1782100E+00, 0.1812900E+00, &
     & 0.1939600E+00, 0.2132300E+00, 0.2509400E+00, 0.2552400E+00, &
     & 0.2847700E+00, 0.3208700E+00, 0.3833700E+00, 0.4318600E+00, &
     & 0.5753900E+00, 0.5952700E+00, 0.1043288E+01, 0.1043288E+01 /
      data (ref_adm( 5,iz,11,15),iz = 1,20) / &
     & 0.1577300E+00, 0.1577300E+00, 0.1706400E+00, 0.1608100E+00, &
     & 0.1707200E+00, 0.1706600E+00, 0.1772700E+00, 0.1766400E+00, &
     & 0.2004300E+00, 0.2271700E+00, 0.2440300E+00, 0.2411100E+00, &
     & 0.2798300E+00, 0.3239100E+00, 0.3623000E+00, 0.4085000E+00, &
     & 0.5156200E+00, 0.5424000E+00, 0.9657665E+00, 0.9657665E+00 /
      data (ref_adm( 5,iz,12,15),iz = 1,20) / &
     & 0.1634400E+00, 0.1634400E+00, 0.1546800E+00, 0.1787000E+00, &
     & 0.1648000E+00, 0.1961200E+00, 0.1794200E+00, 0.1646500E+00, &
     & 0.1879200E+00, 0.1750700E+00, 0.2385600E+00, 0.2373900E+00, &
     & 0.2847100E+00, 0.2890100E+00, 0.3446500E+00, 0.3993800E+00, &
     & 0.4360300E+00, 0.4683200E+00, 0.8830512E+00, 0.8830512E+00 /
      data (ref_adm( 5,iz,13,15),iz = 1,20) / &
     & 0.1668100E+00, 0.1668100E+00, 0.1769500E+00, 0.1534700E+00, &
     & 0.1688200E+00, 0.1576600E+00, 0.1824800E+00, 0.1775200E+00, &
     & 0.1964000E+00, 0.2066800E+00, 0.2265500E+00, 0.2461700E+00, &
     & 0.2727100E+00, 0.3011000E+00, 0.3241000E+00, 0.3350900E+00, &
     & 0.4220600E+00, 0.4557100E+00, 0.8301206E+00, 0.8301206E+00 /
      data (ref_adm( 5,iz,14,15),iz = 1,20) / &
     & 0.1668300E+00, 0.1668300E+00, 0.1763600E+00, 0.1736300E+00, &
     & 0.1720300E+00, 0.1809800E+00, 0.1776100E+00, 0.1829400E+00, &
     & 0.1844900E+00, 0.2174300E+00, 0.2167400E+00, 0.2252000E+00, &
     & 0.2278400E+00, 0.2760500E+00, 0.3036800E+00, 0.3326400E+00, &
     & 0.3931500E+00, 0.4446900E+00, 0.7937586E+00, 0.7937586E+00 /
      data (ref_adm( 5,iz,15,15),iz = 1,20) / &
     & 0.1715800E+00, 0.1715800E+00, 0.1729600E+00, 0.1654300E+00, &
     & 0.1723900E+00, 0.1734700E+00, 0.1788200E+00, 0.1825400E+00, &
     & 0.1941500E+00, 0.2037400E+00, 0.2188900E+00, 0.2280100E+00, &
     & 0.2466900E+00, 0.2714800E+00, 0.2889200E+00, 0.3290500E+00, &
     & 0.3288800E+00, 0.3865800E+00, 0.7653622E+00, 0.7653622E+00 /
      data (ref_adm( 5,iz,16,15),iz = 1,20) / &
     & 0.1598100E+00, 0.1598100E+00, 0.1499500E+00, 0.1490200E+00, &
     & 0.1510600E+00, 0.1529600E+00, 0.1743200E+00, 0.1676900E+00, &
     & 0.1769400E+00, 0.1858600E+00, 0.1998800E+00, 0.2101300E+00, &
     & 0.2274300E+00, 0.2426800E+00, 0.2858000E+00, 0.3204800E+00, &
     & 0.3376800E+00, 0.5791220E+00, 0.7400197E+00, 0.7400197E+00 /
      data (ref_adm( 5,iz,17,15),iz = 1,20) / &
     & 0.1643300E+00, 0.1643300E+00, 0.1608900E+00, 0.1622900E+00, &
     & 0.1447400E+00, 0.1566900E+00, 0.1804700E+00, 0.1912200E+00, &
     & 0.1980100E+00, 0.1950200E+00, 0.2098200E+00, 0.2239700E+00, &
     & 0.2422200E+00, 0.2523800E+00, 0.2702700E+00, 0.3105600E+00, &
     & 0.2989300E+00, 0.5605718E+00, 0.7111632E+00, 0.7111632E+00 /
      data (ref_adm( 5,iz,18,15),iz = 1,20) / &
     & 0.1690500E+00, 0.1690500E+00, 0.1803200E+00, 0.1548200E+00, &
     & 0.1923200E+00, 0.1772600E+00, 0.1784100E+00, 0.1872300E+00, &
     & 0.1761200E+00, 0.1997000E+00, 0.2137000E+00, 0.2307200E+00, &
     & 0.2354000E+00, 0.2480300E+00, 0.2658000E+00, 0.2909100E+00, &
     & 0.3718264E+00, 0.4340281E+00, 0.4894274E+00, 0.4894274E+00 /
      data (ref_adm( 5,iz,19,15),iz = 1,20) / &
     & 0.1684900E+00, 0.1684900E+00, 0.1748700E+00, 0.1667800E+00, &
     & 0.1612400E+00, 0.1720300E+00, 0.1837800E+00, 0.1829700E+00, &
     & 0.1790200E+00, 0.2056100E+00, 0.2214000E+00, 0.2231000E+00, &
     & 0.2444300E+00, 0.2610100E+00, 0.2739500E+00, 0.3041000E+00, &
     & 0.3673785E+00, 0.4261231E+00, 0.4773284E+00, 0.4773284E+00 /
      data (ref_adm( 5,iz,20,15),iz = 1,20) / &
     & 0.1706300E+00, 0.1706300E+00, 0.1733600E+00, 0.1564700E+00, &
     & 0.1704400E+00, 0.1779000E+00, 0.1804100E+00, 0.1743000E+00, &
     & 0.1912800E+00, 0.1974700E+00, 0.2080900E+00, 0.2168200E+00, &
     & 0.2470200E+00, 0.2480900E+00, 0.2707500E+00, 0.3241992E+00, &
     & 0.3649415E+00, 0.4215766E+00, 0.4703213E+00, 0.4703213E+00 /
      data (ref_adm( 5,iz,21,15),iz = 1,20) / &
     & 0.1630100E+00, 0.1630100E+00, 0.1765200E+00, 0.1752600E+00, &
     & 0.1856600E+00, 0.1755400E+00, 0.1882100E+00, 0.1866500E+00, &
     & 0.1920900E+00, 0.2131400E+00, 0.2247300E+00, 0.2331300E+00, &
     & 0.2379700E+00, 0.2581200E+00, 0.2789500E+00, 0.3239071E+00, &
     & 0.3635908E+00, 0.4183469E+00, 0.4659742E+00, 0.4659742E+00 /
      data (ref_adm( 5,iz,22,15),iz = 1,20) / &
     & 0.1696200E+00, 0.1696200E+00, 0.1797100E+00, 0.1836500E+00, &
     & 0.1694300E+00, 0.1751700E+00, 0.1724500E+00, 0.1946900E+00, &
     & 0.2014700E+00, 0.1977900E+00, 0.1930900E+00, 0.2279800E+00, &
     & 0.2543400E+00, 0.2599300E+00, 0.2768400E+00, 0.3240000E+00, &
     & 0.3450953E+00, 0.3807418E+00, 0.4041062E+00, 0.4041062E+00 /
      data (ref_adm( 5,iz,23,15),iz = 1,20) / &
     & 0.1685300E+00, 0.1685300E+00, 0.1763100E+00, 0.1839000E+00, &
     & 0.1657700E+00, 0.1929400E+00, 0.1862700E+00, 0.1851400E+00, &
     & 0.2070900E+00, 0.2042600E+00, 0.2139900E+00, 0.2386300E+00, &
     & 0.2570700E+00, 0.2680800E+00, 0.2814000E+00, 0.3132600E+00, &
     & 0.3461066E+00, 0.3804991E+00, 0.4047381E+00, 0.4047381E+00 /
      data (ref_adm( 5,iz,24,15),iz = 1,20) / &
     & 0.1566500E+00, 0.1566500E+00, 0.1630900E+00, 0.1674300E+00, &
     & 0.1698000E+00, 0.1755300E+00, 0.1789400E+00, 0.1901900E+00, &
     & 0.1927100E+00, 0.2043600E+00, 0.2157600E+00, 0.2269700E+00, &
     & 0.2407700E+00, 0.2631500E+00, 0.2959900E+00, 0.3084700E+00, &
     & 0.3484564E+00, 0.3826622E+00, 0.4082606E+00, 0.4082606E+00 /
      data (ref_adm( 5,iz,25,15),iz = 1,20) / &
     & 0.1745100E+00, 0.1745100E+00, 0.1834600E+00, 0.1871800E+00, &
     & 0.1834500E+00, 0.1965600E+00, 0.2040500E+00, 0.2097400E+00, &
     & 0.2130600E+00, 0.2267500E+00, 0.2358100E+00, 0.2492000E+00, &
     & 0.2638100E+00, 0.2815600E+00, 0.3007600E+00, 0.3311100E+00, &
     & 0.3751200E+00, 0.3862968E+00, 0.4135293E+00, 0.4135293E+00 /
      data (ref_adm( 5,iz,26,15),iz = 1,20) / &
     & 0.1687900E+00, 0.1687900E+00, 0.1717500E+00, 0.1644000E+00, &
     & 0.1907200E+00, 0.1879900E+00, 0.1833300E+00, 0.1975100E+00, &
     & 0.1972700E+00, 0.2185700E+00, 0.2369500E+00, 0.2495500E+00, &
     & 0.2714200E+00, 0.2955000E+00, 0.3136400E+00, 0.3480900E+00, &
     & 0.3634200E+00, 0.3929902E+00, 0.4226080E+00, 0.4226080E+00 /
      data (ref_adm( 5,iz,27,15),iz = 1,20) / &
     & 0.1763100E+00, 0.1763100E+00, 0.1734700E+00, 0.1560600E+00, &
     & 0.1764700E+00, 0.2244000E+00, 0.1809200E+00, 0.1859000E+00, &
     & 0.1971900E+00, 0.2332600E+00, 0.2345700E+00, 0.2559300E+00, &
     & 0.2777600E+00, 0.3039600E+00, 0.3261500E+00, 0.3650000E+00, &
     & 0.3876500E+00, 0.3699600E+00, 0.4346423E+00, 0.4346423E+00 /
      data (ref_adm( 5,iz,28,15),iz = 1,20) / &
     & 0.1701200E+00, 0.1701200E+00, 0.1836800E+00, 0.1679500E+00, &
     & 0.1837500E+00, 0.1955300E+00, 0.1930200E+00, 0.1944300E+00, &
     & 0.2056800E+00, 0.2296500E+00, 0.2364600E+00, 0.2515200E+00, &
     & 0.2823400E+00, 0.3218500E+00, 0.3417200E+00, 0.3514300E+00, &
     & 0.4118500E+00, 0.4398900E+00, 0.4507300E+00, 0.4507300E+00 /
      data (ref_adm( 5,iz,29,15),iz = 1,20) / &
     & 0.1571200E+00, 0.1571200E+00, 0.1763200E+00, 0.2278200E+00, &
     & 0.1804100E+00, 0.1971900E+00, 0.1999800E+00, 0.2087900E+00, &
     & 0.2123800E+00, 0.2475700E+00, 0.2596700E+00, 0.2649900E+00, &
     & 0.2944100E+00, 0.3254600E+00, 0.3670200E+00, 0.4102700E+00, &
     & 0.4240000E+00, 0.4452200E+00, 0.4057700E+00, 0.4057700E+00 /
      data (ref_adm( 5,iz,30,15),iz = 1,20) / &
     & 0.1620900E+00, 0.1620900E+00, 0.1905800E+00, 0.1923600E+00, &
     & 0.1770200E+00, 0.2011500E+00, 0.2183200E+00, 0.2007000E+00, &
     & 0.2258900E+00, 0.2635700E+00, 0.2637800E+00, 0.2796800E+00, &
     & 0.3199500E+00, 0.3341400E+00, 0.3797600E+00, 0.4226500E+00, &
     & 0.4454000E+00, 0.4726300E+00, 0.4298200E+00, 0.4298200E+00 /
      data (ref_adm( 5,iz,31,15),iz = 1,20) / &
     & 0.1754400E+00, 0.1754400E+00, 0.1833100E+00, 0.1906100E+00, &
     & 0.1776900E+00, 0.1938400E+00, 0.2127700E+00, 0.2330100E+00, &
     & 0.2361600E+00, 0.2616600E+00, 0.2859000E+00, 0.2928800E+00, &
     & 0.3182900E+00, 0.3601000E+00, 0.3851300E+00, 0.4494800E+00, &
     & 0.5070000E+00, 0.5273600E+00, 0.4868800E+00, 0.4868800E+00 /
      data (ref_adm( 5,iz,32,15),iz = 1,20) / &
     & 0.1803100E+00, 0.1803100E+00, 0.1836700E+00, 0.1908000E+00, &
     & 0.1913000E+00, 0.2084000E+00, 0.2152200E+00, 0.2417500E+00, &
     & 0.2393200E+00, 0.2729900E+00, 0.2595300E+00, 0.2920500E+00, &
     & 0.3132400E+00, 0.3554900E+00, 0.4005500E+00, 0.4580900E+00, &
     & 0.4859600E+00, 0.5345000E+00, 0.4262800E+00, 0.4262800E+00 /
      data (ref_adm( 5,iz,33,15),iz = 1,20) / &
     & 0.1708600E+00, 0.1708600E+00, 0.1586300E+00, 0.1768700E+00, &
     & 0.1832300E+00, 0.1914700E+00, 0.1931400E+00, 0.2124800E+00, &
     & 0.2383000E+00, 0.2582100E+00, 0.2783700E+00, 0.3038300E+00, &
     & 0.3312400E+00, 0.3499900E+00, 0.3970500E+00, 0.4421700E+00, &
     & 0.4930700E+00, 0.5137900E+00, 0.4551700E+00, 0.4551700E+00 /
      data (ref_adm( 5,iz,34,15),iz = 1,20) / &
     & 0.1652900E+00, 0.1652900E+00, 0.1696100E+00, 0.1975600E+00, &
     & 0.2071100E+00, 0.2035900E+00, 0.2276800E+00, 0.2273600E+00, &
     & 0.2420500E+00, 0.2707200E+00, 0.2965600E+00, 0.3105000E+00, &
     & 0.3455800E+00, 0.3882000E+00, 0.4272500E+00, 0.4681900E+00, &
     & 0.5160000E+00, 0.5329600E+00, 0.4283600E+00, 0.4283600E+00 /
      data (ref_adm( 5,iz,35,15),iz = 1,20) / &
     & 0.1837100E+00, 0.1837100E+00, 0.1927500E+00, 0.1980200E+00, &
     & 0.1951900E+00, 0.2089100E+00, 0.2207100E+00, 0.2334600E+00, &
     & 0.2507400E+00, 0.2632600E+00, 0.2752300E+00, 0.3141800E+00, &
     & 0.3532500E+00, 0.3849300E+00, 0.4278400E+00, 0.4880600E+00, &
     & 0.5112400E+00, 0.5017700E+00, 0.4329500E+00, 0.4329500E+00 /
      data (ref_adm( 5,iz,36,15),iz = 1,20) / &
     & 0.1734300E+00, 0.1734300E+00, 0.1826600E+00, 0.1743300E+00, &
     & 0.2028900E+00, 0.1918200E+00, 0.2182000E+00, 0.2463100E+00, &
     & 0.2620300E+00, 0.2813300E+00, 0.2759700E+00, 0.3358400E+00, &
     & 0.3454300E+00, 0.4025700E+00, 0.4493800E+00, 0.5065900E+00, &
     & 0.5288500E+00, 0.5450600E+00, 0.5011200E+00, 0.5011200E+00 /
      data (ref_adm( 5,iz,37,15),iz = 1,20) / &
     & 0.1843700E+00, 0.1843700E+00, 0.1915000E+00, 0.1861400E+00, &
     & 0.1938200E+00, 0.2169700E+00, 0.2256500E+00, 0.2296100E+00, &
     & 0.2513500E+00, 0.2689000E+00, 0.2967500E+00, 0.3246500E+00, &
     & 0.3613600E+00, 0.4068500E+00, 0.4644500E+00, 0.5286700E+00, &
     & 0.5457900E+00, 0.5768600E+00, 0.4616600E+00, 0.4616600E+00 /
      data (ref_adm( 5,iz,38,15),iz = 1,20) / &
     & 0.1843700E+00, 0.1843700E+00, 0.1915000E+00, 0.1861400E+00, &
     & 0.1938200E+00, 0.2169700E+00, 0.2256500E+00, 0.2296100E+00, &
     & 0.2513500E+00, 0.2689000E+00, 0.2967500E+00, 0.3246500E+00, &
     & 0.3613600E+00, 0.4068500E+00, 0.4644500E+00, 0.5286700E+00, &
     & 0.5457900E+00, 0.5768600E+00, 0.4616600E+00, 0.4616600E+00 /
! Solar Zenith Angle 75.0 Albedo  0.3082618E+00
      data (ref_adm( 5,iz, 1,16),iz = 1,20) / &
     & 0.2131500E+00, 0.2131500E+00, 0.1648200E+00, 0.1738000E+00, &
     & 0.2043900E+00, 0.1621700E+00, 0.2164600E+00, 0.1819400E+00, &
     & 0.2312400E+00, 0.3059700E+00, 0.3149600E+00, 0.4058100E+00, &
     & 0.3923000E+00, 0.5291152E+00, 0.8368470E+00, 0.1588557E+01, &
     & 0.1720357E+01, 0.1928792E+01, 0.4668379E+01, 0.4668379E+01 /
      data (ref_adm( 5,iz, 2,16),iz = 1,20) / &
     & 0.2131500E+00, 0.2131500E+00, 0.1648200E+00, 0.1738000E+00, &
     & 0.2043900E+00, 0.1621700E+00, 0.2164600E+00, 0.1819400E+00, &
     & 0.2312400E+00, 0.3059700E+00, 0.3149600E+00, 0.4058100E+00, &
     & 0.3923000E+00, 0.5291152E+00, 0.8368470E+00, 0.1588557E+01, &
     & 0.1720357E+01, 0.1928792E+01, 0.4668379E+01, 0.4668379E+01 /
      data (ref_adm( 5,iz, 3,16),iz = 1,20) / &
     & 0.1628400E+00, 0.1628400E+00, 0.1999500E+00, 0.1617500E+00, &
     & 0.1368900E+00, 0.1401200E+00, 0.2370900E+00, 0.2480200E+00, &
     & 0.2260200E+00, 0.2573200E+00, 0.3424900E+00, 0.4587600E+00, &
     & 0.5036300E+00, 0.5165539E+00, 0.7916707E+00, 0.1564421E+01, &
     & 0.1814282E+01, 0.1912736E+01, 0.5517461E-07, 0.5517461E-07 /
      data (ref_adm( 5,iz, 4,16),iz = 1,20) / &
     & 0.2120900E+00, 0.2120900E+00, 0.1818800E+00, 0.1658100E+00, &
     & 0.1742000E+00, 0.1812100E+00, 0.2050700E+00, 0.2193400E+00, &
     & 0.2393300E+00, 0.3141900E+00, 0.3881600E+00, 0.4193500E+00, &
     & 0.4001994E+00, 0.4934727E+00, 0.7129617E+00, 0.1343616E+01, &
     & 0.2054303E+01, 0.2216003E+01, 0.2956396E+01, 0.2956396E+01 /
      data (ref_adm( 5,iz, 5,16),iz = 1,20) / &
     & 0.1807100E+00, 0.1807100E+00, 0.1772200E+00, 0.1678800E+00, &
     & 0.1659500E+00, 0.1768700E+00, 0.1929100E+00, 0.2607700E+00, &
     & 0.2508500E+00, 0.2341600E+00, 0.2991900E+00, 0.3472200E+00, &
     & 0.5064400E+00, 0.4658860E+00, 0.6330853E+00, 0.1028280E+01, &
     & 0.1933045E+01, 0.3091603E+01, 0.3550137E+01, 0.3550137E+01 /
      data (ref_adm( 5,iz, 6,16),iz = 1,20) / &
     & 0.1642400E+00, 0.1642400E+00, 0.1853600E+00, 0.1377600E+00, &
     & 0.1582000E+00, 0.1979900E+00, 0.1850500E+00, 0.2120100E+00, &
     & 0.2063700E+00, 0.2382300E+00, 0.2979000E+00, 0.3616300E+00, &
     & 0.4304200E+00, 0.5942600E+00, 0.8117600E+00, 0.7064900E+00, &
     & 0.1317752E+01, 0.2705777E+01, 0.5048582E+01, 0.5048582E+01 /
      data (ref_adm( 5,iz, 7,16),iz = 1,20) / &
     & 0.1483000E+00, 0.1483000E+00, 0.1354200E+00, 0.1690100E+00, &
     & 0.1569200E+00, 0.1977700E+00, 0.2219300E+00, 0.1663500E+00, &
     & 0.2151800E+00, 0.2649800E+00, 0.2912600E+00, 0.3243700E+00, &
     & 0.3331200E+00, 0.4447900E+00, 0.6658700E+00, 0.7403000E+00, &
     & 0.9438800E+00, 0.1011300E+01, 0.3093740E+01, 0.3093740E+01 /
      data (ref_adm( 5,iz, 8,16),iz = 1,20) / &
     & 0.1580100E+00, 0.1580100E+00, 0.1545300E+00, 0.1380800E+00, &
     & 0.1532900E+00, 0.1640600E+00, 0.1745800E+00, 0.2350600E+00, &
     & 0.2109600E+00, 0.2463600E+00, 0.2711200E+00, 0.3630100E+00, &
     & 0.3900700E+00, 0.4543100E+00, 0.5277500E+00, 0.6153200E+00, &
     & 0.7650200E+00, 0.8877000E+00, 0.2165238E+01, 0.2165238E+01 /
      data (ref_adm( 5,iz, 9,16),iz = 1,20) / &
     & 0.1584400E+00, 0.1584400E+00, 0.1504200E+00, 0.1772100E+00, &
     & 0.1656300E+00, 0.1794124E+00, 0.1625600E+00, 0.1979500E+00, &
     & 0.2225200E+00, 0.2179100E+00, 0.2307700E+00, 0.3148600E+00, &
     & 0.3724800E+00, 0.4625400E+00, 0.4116900E+00, 0.6846000E+00, &
     & 0.8558300E+00, 0.9172900E+00, 0.1726560E+01, 0.1726560E+01 /
      data (ref_adm( 5,iz,10,16),iz = 1,20) / &
     & 0.1923500E+00, 0.1923500E+00, 0.1638100E+00, 0.1545200E+00, &
     & 0.1691400E+00, 0.1548800E+00, 0.1797600E+00, 0.2072500E+00, &
     & 0.1999300E+00, 0.2273900E+00, 0.2749000E+00, 0.2946800E+00, &
     & 0.3611200E+00, 0.3312800E+00, 0.4443900E+00, 0.6371500E+00, &
     & 0.6639000E+00, 0.9824271E+00, 0.1566640E+01, 0.1566640E+01 /
      data (ref_adm( 5,iz,11,16),iz = 1,20) / &
     & 0.2018000E+00, 0.2018000E+00, 0.1386100E+00, 0.2003500E+00, &
     & 0.1580800E+00, 0.1698200E+00, 0.1841100E+00, 0.1951100E+00, &
     & 0.2064200E+00, 0.2240900E+00, 0.2524700E+00, 0.2288000E+00, &
     & 0.2786000E+00, 0.3427300E+00, 0.4146700E+00, 0.5459600E+00, &
     & 0.6777000E+00, 0.5851300E+00, 0.1461634E+01, 0.1461634E+01 /
      data (ref_adm( 5,iz,12,16),iz = 1,20) / &
     & 0.1797300E+00, 0.1797300E+00, 0.1817600E+00, 0.1563400E+00, &
     & 0.1527100E+00, 0.1566600E+00, 0.1995100E+00, 0.1317200E+00, &
     & 0.1914700E+00, 0.2124200E+00, 0.2032800E+00, 0.2372300E+00, &
     & 0.2822900E+00, 0.3245200E+00, 0.3883600E+00, 0.5099200E+00, &
     & 0.5663400E+00, 0.5943700E+00, 0.1318016E+01, 0.1318016E+01 /
      data (ref_adm( 5,iz,13,16),iz = 1,20) / &
     & 0.1630300E+00, 0.1630300E+00, 0.1813500E+00, 0.1632700E+00, &
     & 0.1955400E+00, 0.1887700E+00, 0.1736900E+00, 0.1923200E+00, &
     & 0.1810400E+00, 0.2145500E+00, 0.2599000E+00, 0.2352100E+00, &
     & 0.2698400E+00, 0.2916800E+00, 0.3345100E+00, 0.4554900E+00, &
     & 0.5222400E+00, 0.5000400E+00, 0.1227278E+01, 0.1227278E+01 /
      data (ref_adm( 5,iz,14,16),iz = 1,20) / &
     & 0.1824600E+00, 0.1824600E+00, 0.1597300E+00, 0.1801600E+00, &
     & 0.1610900E+00, 0.1597100E+00, 0.1661900E+00, 0.1720500E+00, &
     & 0.1766500E+00, 0.2200200E+00, 0.1984700E+00, 0.2559100E+00, &
     & 0.2839100E+00, 0.2861200E+00, 0.3220900E+00, 0.4201400E+00, &
     & 0.4862300E+00, 0.7608805E+00, 0.1166725E+01, 0.1166725E+01 /
      data (ref_adm( 5,iz,15,16),iz = 1,20) / &
     & 0.1696500E+00, 0.1696500E+00, 0.1674600E+00, 0.1679600E+00, &
     & 0.1676700E+00, 0.1744000E+00, 0.1759000E+00, 0.1754800E+00, &
     & 0.1985900E+00, 0.2126700E+00, 0.2122900E+00, 0.2330000E+00, &
     & 0.2467600E+00, 0.2871800E+00, 0.3059900E+00, 0.3427900E+00, &
     & 0.4581500E+00, 0.7371680E+00, 0.1120446E+01, 0.1120446E+01 /
      data (ref_adm( 5,iz,16,16),iz = 1,20) / &
     & 0.1705000E+00, 0.1705000E+00, 0.1642600E+00, 0.1686600E+00, &
     & 0.1692900E+00, 0.1737800E+00, 0.1789000E+00, 0.1841200E+00, &
     & 0.1874400E+00, 0.2028800E+00, 0.2211400E+00, 0.2339800E+00, &
     & 0.2486200E+00, 0.2677500E+00, 0.2934200E+00, 0.3694600E+00, &
     & 0.5356964E+00, 0.7153040E+00, 0.1080426E+01, 0.1080426E+01 /
      data (ref_adm( 5,iz,17,16),iz = 1,20) / &
     & 0.1625600E+00, 0.1625600E+00, 0.1590900E+00, 0.1747000E+00, &
     & 0.2133000E+00, 0.1826300E+00, 0.1598900E+00, 0.2145200E+00, &
     & 0.2021900E+00, 0.2107600E+00, 0.2101900E+00, 0.2294300E+00, &
     & 0.2516500E+00, 0.2710200E+00, 0.3248900E+00, 0.3330800E+00, &
     & 0.5184427E+00, 0.6895363E+00, 0.1034554E+01, 0.1034554E+01 /
      data (ref_adm( 5,iz,18,16),iz = 1,20) / &
     & 0.1712500E+00, 0.1712500E+00, 0.1653800E+00, 0.1562000E+00, &
     & 0.1715300E+00, 0.1547500E+00, 0.1513500E+00, 0.1908300E+00, &
     & 0.2051900E+00, 0.2004500E+00, 0.1846200E+00, 0.2336200E+00, &
     & 0.2640600E+00, 0.2621600E+00, 0.3175300E+00, 0.3366000E+00, &
     & 0.3925098E+00, 0.4626164E+00, 0.5287584E+00, 0.5287584E+00 /
      data (ref_adm( 5,iz,19,16),iz = 1,20) / &
     & 0.1595700E+00, 0.1595700E+00, 0.1912600E+00, 0.1537300E+00, &
     & 0.1770500E+00, 0.1654100E+00, 0.1706200E+00, 0.1891200E+00, &
     & 0.1605900E+00, 0.1716000E+00, 0.2188300E+00, 0.2252200E+00, &
     & 0.2457800E+00, 0.2586900E+00, 0.2938200E+00, 0.3518300E+00, &
     & 0.3873169E+00, 0.4536045E+00, 0.5152065E+00, 0.5152065E+00 /
      data (ref_adm( 5,iz,20,16),iz = 1,20) / &
     & 0.1799300E+00, 0.1799300E+00, 0.1721200E+00, 0.1592000E+00, &
     & 0.1488800E+00, 0.1400900E+00, 0.2251300E+00, 0.1644000E+00, &
     & 0.2054200E+00, 0.1818300E+00, 0.1946100E+00, 0.1884900E+00, &
     & 0.2464900E+00, 0.2690700E+00, 0.2838100E+00, 0.3392622E+00, &
     & 0.3843724E+00, 0.4484249E+00, 0.5072805E+00, 0.5072805E+00 /
      data (ref_adm( 5,iz,21,16),iz = 1,20) / &
     & 0.1638700E+00, 0.1638700E+00, 0.1692800E+00, 0.1575100E+00, &
     & 0.1976100E+00, 0.1838700E+00, 0.1810400E+00, 0.1844700E+00, &
     & 0.2171700E+00, 0.1934100E+00, 0.2124500E+00, 0.2368600E+00, &
     & 0.2328300E+00, 0.2690400E+00, 0.2893100E+00, 0.3386088E+00, &
     & 0.3826912E+00, 0.4447703E+00, 0.5024794E+00, 0.5024794E+00 /
      data (ref_adm( 5,iz,22,16),iz = 1,20) / &
     & 0.1638500E+00, 0.1638500E+00, 0.1687100E+00, 0.1503900E+00, &
     & 0.1523200E+00, 0.1942046E+00, 0.1779100E+00, 0.2369300E+00, &
     & 0.2042000E+00, 0.2179300E+00, 0.2334600E+00, 0.2306700E+00, &
     & 0.2461000E+00, 0.2570900E+00, 0.3006000E+00, 0.3541753E+00, &
     & 0.3968278E+00, 0.4569574E+00, 0.5186465E+00, 0.5186465E+00 /
      data (ref_adm( 5,iz,23,16),iz = 1,20) / &
     & 0.1599700E+00, 0.1599700E+00, 0.1711100E+00, 0.1740800E+00, &
     & 0.1708200E+00, 0.1807900E+00, 0.1662700E+00, 0.1810700E+00, &
     & 0.1961800E+00, 0.2269400E+00, 0.2043000E+00, 0.2722400E+00, &
     & 0.2723500E+00, 0.2946800E+00, 0.3101900E+00, 0.3551521E+00, &
     & 0.3973366E+00, 0.4562045E+00, 0.5196866E+00, 0.5196866E+00 /
      data (ref_adm( 5,iz,24,16),iz = 1,20) / &
     & 0.1596000E+00, 0.1596000E+00, 0.1697600E+00, 0.1652300E+00, &
     & 0.1652400E+00, 0.1772600E+00, 0.1824700E+00, 0.1900200E+00, &
     & 0.1993700E+00, 0.2039200E+00, 0.2128400E+00, 0.2309400E+00, &
     & 0.2476400E+00, 0.2756200E+00, 0.3135900E+00, 0.4143400E+00, &
     & 0.3997365E+00, 0.4587239E+00, 0.5253693E+00, 0.5253693E+00 /
      data (ref_adm( 5,iz,25,16),iz = 1,20) / &
     & 0.1585200E+00, 0.1585200E+00, 0.1663100E+00, 0.1733700E+00, &
     & 0.1569500E+00, 0.1989800E+00, 0.1805900E+00, 0.1949800E+00, &
     & 0.2121400E+00, 0.2187400E+00, 0.2374000E+00, 0.2514600E+00, &
     & 0.2763700E+00, 0.3083800E+00, 0.3281700E+00, 0.3599300E+00, &
     & 0.3823000E+00, 0.4635250E+00, 0.5338622E+00, 0.5338622E+00 /
      data (ref_adm( 5,iz,26,16),iz = 1,20) / &
     & 0.1480100E+00, 0.1480100E+00, 0.1445100E+00, 0.1516900E+00, &
     & 0.1439000E+00, 0.2260500E+00, 0.1701000E+00, 0.1725600E+00, &
     & 0.2135500E+00, 0.2389500E+00, 0.2439200E+00, 0.2367700E+00, &
     & 0.2730700E+00, 0.3087700E+00, 0.3502100E+00, 0.3870500E+00, &
     & 0.3977300E+00, 0.4726359E+00, 0.5484586E+00, 0.5484586E+00 /
      data (ref_adm( 5,iz,27,16),iz = 1,20) / &
     & 0.1708600E+00, 0.1708600E+00, 0.1532200E+00, 0.1646500E+00, &
     & 0.1817000E+00, 0.1728300E+00, 0.2701900E+00, 0.1761500E+00, &
     & 0.2100300E+00, 0.1945300E+00, 0.2530900E+00, 0.2663000E+00, &
     & 0.2888800E+00, 0.3542900E+00, 0.3718400E+00, 0.3918500E+00, &
     & 0.4592500E+00, 0.4293400E+00, 0.5669590E+00, 0.5669590E+00 /
      data (ref_adm( 5,iz,28,16),iz = 1,20) / &
     & 0.1627700E+00, 0.1627700E+00, 0.1665300E+00, 0.1480000E+00, &
     & 0.1749100E+00, 0.2074600E+00, 0.3991500E+00, 0.2808400E+00, &
     & 0.1975400E+00, 0.2543800E+00, 0.2582600E+00, 0.2368600E+00, &
     & 0.2855700E+00, 0.3278200E+00, 0.4028900E+00, 0.4395600E+00, &
     & 0.4747700E+00, 0.5255600E+00, 0.5868251E+00, 0.5868251E+00 /
      data (ref_adm( 5,iz,29,16),iz = 1,20) / &
     & 0.1636700E+00, 0.1636700E+00, 0.1936300E+00, 0.1602800E+00, &
     & 0.1557100E+00, 0.1714400E+00, 0.1833100E+00, 0.2479100E+00, &
     & 0.1954400E+00, 0.2454600E+00, 0.2295700E+00, 0.2724500E+00, &
     & 0.2964400E+00, 0.3568900E+00, 0.4107800E+00, 0.4456200E+00, &
     & 0.4473500E+00, 0.5612200E+00, 0.5555500E+00, 0.5555500E+00 /
      data (ref_adm( 5,iz,30,16),iz = 1,20) / &
     & 0.1583400E+00, 0.1583400E+00, 0.1845000E+00, 0.1699000E+00, &
     & 0.1696200E+00, 0.2069700E+00, 0.1752500E+00, 0.2297600E+00, &
     & 0.2190700E+00, 0.2114900E+00, 0.2734400E+00, 0.2768000E+00, &
     & 0.3438900E+00, 0.3598600E+00, 0.4099300E+00, 0.4734300E+00, &
     & 0.4988700E+00, 0.5610800E+00, 0.5406900E+00, 0.5406900E+00 /
      data (ref_adm( 5,iz,31,16),iz = 1,20) / &
     & 0.1543100E+00, 0.1543100E+00, 0.1495900E+00, 0.1786100E+00, &
     & 0.1733300E+00, 0.1553900E+00, 0.2610600E+00, 0.1907600E+00, &
     & 0.3323300E+00, 0.2178600E+00, 0.2567500E+00, 0.2526900E+00, &
     & 0.3744200E+00, 0.3608600E+00, 0.4046200E+00, 0.4659000E+00, &
     & 0.4953900E+00, 0.5594400E+00, 0.6605561E+00, 0.6605561E+00 /
      data (ref_adm( 5,iz,32,16),iz = 1,20) / &
     & 0.1454900E+00, 0.1454900E+00, 0.1634800E+00, 0.2017000E+00, &
     & 0.1872100E+00, 0.2018700E+00, 0.2079300E+00, 0.2155500E+00, &
     & 0.2581300E+00, 0.2262700E+00, 0.2330900E+00, 0.2643000E+00, &
     & 0.3459900E+00, 0.3975900E+00, 0.4209800E+00, 0.4944600E+00, &
     & 0.5445300E+00, 0.6047300E+00, 0.5558100E+00, 0.5558100E+00 /
      data (ref_adm( 5,iz,33,16),iz = 1,20) / &
     & 0.1558800E+00, 0.1558800E+00, 0.1599000E+00, 0.1733400E+00, &
     & 0.1842400E+00, 0.1911000E+00, 0.2103800E+00, 0.2393700E+00, &
     & 0.2601200E+00, 0.2583800E+00, 0.2957700E+00, 0.3183700E+00, &
     & 0.3423300E+00, 0.4003600E+00, 0.4496300E+00, 0.5230100E+00, &
     & 0.5848200E+00, 0.5884200E+00, 0.7080806E+00, 0.7080806E+00 /
      data (ref_adm( 5,iz,34,16),iz = 1,20) / &
     & 0.1604100E+00, 0.1604100E+00, 0.1643700E+00, 0.1859700E+00, &
     & 0.1706900E+00, 0.1841900E+00, 0.2145400E+00, 0.2197800E+00, &
     & 0.2381100E+00, 0.2610500E+00, 0.2857100E+00, 0.2951800E+00, &
     & 0.3489500E+00, 0.3982700E+00, 0.4437200E+00, 0.5126600E+00, &
     & 0.5348200E+00, 0.6783400E+00, 0.7200835E+00, 0.7200835E+00 /
      data (ref_adm( 5,iz,35,16),iz = 1,20) / &
     & 0.1505400E+00, 0.1505400E+00, 0.1606200E+00, 0.1940600E+00, &
     & 0.1847600E+00, 0.2060300E+00, 0.2884600E+00, 0.2761900E+00, &
     & 0.2357800E+00, 0.2607000E+00, 0.2528200E+00, 0.3366900E+00, &
     & 0.3826600E+00, 0.4473000E+00, 0.4884800E+00, 0.5249100E+00, &
     & 0.6095500E+00, 0.6070600E+00, 0.7234231E+00, 0.7234231E+00 /
      data (ref_adm( 5,iz,36,16),iz = 1,20) / &
     & 0.1922100E+00, 0.1922100E+00, 0.1860800E+00, 0.2204500E+00, &
     & 0.2325200E+00, 0.2065900E+00, 0.2151400E+00, 0.2639600E+00, &
     & 0.2532000E+00, 0.2821200E+00, 0.2961400E+00, 0.3293100E+00, &
     & 0.3830000E+00, 0.4257400E+00, 0.5089600E+00, 0.5477700E+00, &
     & 0.6157000E+00, 0.6862500E+00, 0.7251421E+00, 0.7251421E+00 /
      data (ref_adm( 5,iz,37,16),iz = 1,20) / &
     & 0.1618600E+00, 0.1618600E+00, 0.1811300E+00, 0.2210800E+00, &
     & 0.2089900E+00, 0.1809900E+00, 0.2058200E+00, 0.2210300E+00, &
     & 0.2572600E+00, 0.2533800E+00, 0.2815700E+00, 0.3421100E+00, &
     & 0.3624600E+00, 0.4182400E+00, 0.4822800E+00, 0.5994500E+00, &
     & 0.6552800E+00, 0.6655000E+00, 0.5952900E+00, 0.5952900E+00 /
      data (ref_adm( 5,iz,38,16),iz = 1,20) / &
     & 0.1618600E+00, 0.1618600E+00, 0.1811300E+00, 0.2210800E+00, &
     & 0.2089900E+00, 0.1809900E+00, 0.2058200E+00, 0.2210300E+00, &
     & 0.2572600E+00, 0.2533800E+00, 0.2815700E+00, 0.3421100E+00, &
     & 0.3624600E+00, 0.4182400E+00, 0.4822800E+00, 0.5994500E+00, &
     & 0.6552800E+00, 0.6655000E+00, 0.5952900E+00, 0.5952900E+00 /
! Solar Zenith Angle 80.0 Albedo  0.3390859E+00
      data (ref_adm( 5,iz, 1,17),iz = 1,20) / &
     & 0.1639500E+00, 0.1639500E+00, 0.1757000E+00, 0.1693700E+00, &
     & 0.1395500E+00, 0.1768600E+00, 0.2122200E+00, 0.2222000E+00, &
     & 0.2273500E+00, 0.2995200E+00, 0.3823800E+00, 0.4247000E+00, &
     & 0.4547282E+00, 0.5804737E+00, 0.9180755E+00, 0.1742751E+01, &
     & 0.1887343E+01, 0.2116010E+01, 0.5121513E+01, 0.5121513E+01 /
      data (ref_adm( 5,iz, 2,17),iz = 1,20) / &
     & 0.1639500E+00, 0.1639500E+00, 0.1757000E+00, 0.1693700E+00, &
     & 0.1395500E+00, 0.1768600E+00, 0.2122200E+00, 0.2222000E+00, &
     & 0.2273500E+00, 0.2995200E+00, 0.3823800E+00, 0.4247000E+00, &
     & 0.4547282E+00, 0.5804737E+00, 0.9180755E+00, 0.1742751E+01, &
     & 0.1887343E+01, 0.2116010E+01, 0.5121513E+01, 0.5121513E+01 /
      data (ref_adm( 5,iz, 3,17),iz = 1,20) / &
     & 0.1635500E+00, 0.1635500E+00, 0.1565100E+00, 0.1640000E+00, &
     & 0.1622200E+00, 0.1754100E+00, 0.1953500E+00, 0.2432400E+00, &
     & 0.3206700E+00, 0.2942500E+00, 0.3507900E+00, 0.4209500E+00, &
     & 0.4491064E+00, 0.5666929E+00, 0.8685140E+00, 0.1716270E+01, &
     & 0.1990386E+01, 0.2098396E+01, 0.6053010E-07, 0.6053010E-07 /
      data (ref_adm( 5,iz, 4,17),iz = 1,20) / &
     & 0.1452300E+00, 0.1452300E+00, 0.1556200E+00, 0.1784300E+00, &
     & 0.1785000E+00, 0.1701400E+00, 0.2176000E+00, 0.2146100E+00, &
     & 0.1807200E+00, 0.2708700E+00, 0.3370900E+00, 0.4422900E+00, &
     & 0.4390446E+00, 0.5413714E+00, 0.7821646E+00, 0.1474034E+01, &
     & 0.2253703E+01, 0.2431099E+01, 0.3243360E+01, 0.3243360E+01 /
      data (ref_adm( 5,iz, 5,17),iz = 1,20) / &
     & 0.1526000E+00, 0.1526000E+00, 0.1762800E+00, 0.1633200E+00, &
     & 0.1876800E+00, 0.1666900E+00, 0.1894500E+00, 0.2714500E+00, &
     & 0.1961500E+00, 0.3436300E+00, 0.4477300E+00, 0.4145400E+00, &
     & 0.4283159E+00, 0.5111071E+00, 0.6945353E+00, 0.1128091E+01, &
     & 0.2120676E+01, 0.3391688E+01, 0.3894728E+01, 0.3894728E+01 /
      data (ref_adm( 5,iz, 6,17),iz = 1,20) / &
     & 0.1801400E+00, 0.1801400E+00, 0.2160500E+00, 0.1767500E+00, &
     & 0.1880100E+00, 0.2020900E+00, 0.2266700E+00, 0.2742000E+00, &
     & 0.3533300E+00, 0.4683800E+00, 0.2620700E+00, 0.4428900E+00, &
     & 0.5332300E+00, 0.1116200E+01, 0.6220886E+00, 0.9063534E+00, &
     & 0.1453800E+01, 0.1680100E+01, 0.5538620E+01, 0.5538620E+01 /
      data (ref_adm( 5,iz, 7,17),iz = 1,20) / &
     & 0.1814000E+00, 0.1814000E+00, 0.2006400E+00, 0.1350800E+00, &
     & 0.1850600E+00, 0.1630300E+00, 0.2115700E+00, 0.1969200E+00, &
     & 0.2314600E+00, 0.2448700E+00, 0.3603300E+00, 0.3903700E+00, &
     & 0.5818100E+00, 0.4668214E+00, 0.6416700E+00, 0.8228800E+00, &
     & 0.1085095E+01, 0.1843107E+01, 0.3394035E+01, 0.3394035E+01 /
      data (ref_adm( 5,iz, 8,17),iz = 1,20) / &
     & 0.1465500E+00, 0.1465500E+00, 0.1936900E+00, 0.1580000E+00, &
     & 0.1813500E+00, 0.1704700E+00, 0.2217500E+00, 0.1884100E+00, &
     & 0.2437300E+00, 0.2832600E+00, 0.3256500E+00, 0.4308100E+00, &
     & 0.4484600E+00, 0.5571100E+00, 0.7281000E+00, 0.8911500E+00, &
     & 0.9575600E+00, 0.1389014E+01, 0.2375405E+01, 0.2375405E+01 /
      data (ref_adm( 5,iz, 9,17),iz = 1,20) / &
     & 0.1694500E+00, 0.1694500E+00, 0.1432800E+00, 0.1668000E+00, &
     & 0.1951500E+00, 0.1759100E+00, 0.1893400E+00, 0.2095300E+00, &
     & 0.2674600E+00, 0.2865200E+00, 0.3333600E+00, 0.3270400E+00, &
     & 0.4400200E+00, 0.6566400E+00, 0.5923900E+00, 0.7937000E+00, &
     & 0.8109590E+00, 0.1154979E+01, 0.1894148E+01, 0.1894148E+01 /
      data (ref_adm( 5,iz,10,17),iz = 1,20) / &
     & 0.1755800E+00, 0.1755800E+00, 0.2064700E+00, 0.1795015E+00, &
     & 0.1743100E+00, 0.1722200E+00, 0.1907800E+00, 0.1744800E+00, &
     & 0.1880100E+00, 0.2175900E+00, 0.2645300E+00, 0.4696000E+00, &
     & 0.4100700E+00, 0.4995900E+00, 0.4864100E+00, 0.6157062E+00, &
     & 0.7776429E+00, 0.1011600E+01, 0.1718706E+01, 0.1718706E+01 /
      data (ref_adm( 5,iz,11,17),iz = 1,20) / &
     & 0.1842300E+00, 0.1842300E+00, 0.1377300E+00, 0.1497800E+00, &
     & 0.1339800E+00, 0.1822200E+00, 0.2365300E+00, 0.1884800E+00, &
     & 0.2399600E+00, 0.2001300E+00, 0.2409500E+00, 0.3505500E+00, &
     & 0.4310700E+00, 0.4549800E+00, 0.5442800E+00, 0.6509100E+00, &
     & 0.7201815E+00, 0.1006503E+01, 0.1603507E+01, 0.1603507E+01 /
      data (ref_adm( 5,iz,12,17),iz = 1,20) / &
     & 0.1558400E+00, 0.1558400E+00, 0.1719900E+00, 0.1504300E+00, &
     & 0.1846232E+00, 0.1763400E+00, 0.1943400E+00, 0.1745200E+00, &
     & 0.3401600E+00, 0.2877100E+00, 0.2742100E+00, 0.3335000E+00, &
     & 0.3299100E+00, 0.3321100E+00, 0.3918100E+00, 0.5954600E+00, &
     & 0.7751800E+00, 0.9219869E+00, 0.1445948E+01, 0.1445948E+01 /
      data (ref_adm( 5,iz,13,17),iz = 1,20) / &
     & 0.1735300E+00, 0.1735300E+00, 0.1690400E+00, 0.1774300E+00, &
     & 0.2027200E+00, 0.1636000E+00, 0.1798000E+00, 0.1883600E+00, &
     & 0.2000100E+00, 0.2207200E+00, 0.2128300E+00, 0.2815000E+00, &
     & 0.3002200E+00, 0.3366100E+00, 0.3800100E+00, 0.5062200E+00, &
     & 0.4952500E+00, 0.8687392E+00, 0.1346403E+01, 0.1346403E+01 /
      data (ref_adm( 5,iz,14,17),iz = 1,20) / &
     & 0.1605600E+00, 0.1605600E+00, 0.1752400E+00, 0.1946300E+00, &
     & 0.1890500E+00, 0.2442500E+00, 0.1982300E+00, 0.1898900E+00, &
     & 0.2514400E+00, 0.2096500E+00, 0.2697100E+00, 0.2945400E+00, &
     & 0.3077400E+00, 0.3143800E+00, 0.3176900E+00, 0.4368400E+00, &
     & 0.6217377E+00, 0.8347355E+00, 0.1279972E+01, 0.1279972E+01 /
      data (ref_adm( 5,iz,15,17),iz = 1,20) / &
     & 0.1720400E+00, 0.1720400E+00, 0.1671400E+00, 0.1656400E+00, &
     & 0.1916300E+00, 0.1725500E+00, 0.1962700E+00, 0.1943100E+00, &
     & 0.1942300E+00, 0.2070700E+00, 0.2300200E+00, 0.2420200E+00, &
     & 0.2648800E+00, 0.2747300E+00, 0.4113521E+00, 0.4949945E+00, &
     & 0.6047019E+00, 0.8087211E+00, 0.1229202E+01, 0.1229202E+01 /
      data (ref_adm( 5,iz,16,17),iz = 1,20) / &
     & 0.1970500E+00, 0.1970500E+00, 0.1570500E+00, 0.1628500E+00, &
     & 0.1613400E+00, 0.1757400E+00, 0.1710200E+00, 0.1759800E+00, &
     & 0.1925100E+00, 0.2080200E+00, 0.2138600E+00, 0.2327200E+00, &
     & 0.2568100E+00, 0.2851600E+00, 0.4943200E+00, 0.3815500E+00, &
     & 0.5876937E+00, 0.7847344E+00, 0.1185297E+01, 0.1185297E+01 /
      data (ref_adm( 5,iz,17,17),iz = 1,20) / &
     & 0.1840400E+00, 0.1840400E+00, 0.1506000E+00, 0.1882200E+00, &
     & 0.1606800E+00, 0.2137400E+00, 0.1718500E+00, 0.1855800E+00, &
     & 0.1892400E+00, 0.2078800E+00, 0.2324700E+00, 0.2126100E+00, &
     & 0.2536900E+00, 0.2353000E+00, 0.3030100E+00, 0.4670259E+00, &
     & 0.5687653E+00, 0.7564653E+00, 0.1134972E+01, 0.1134972E+01 /
      data (ref_adm( 5,iz,18,17),iz = 1,20) / &
     & 0.1756000E+00, 0.1756000E+00, 0.1386400E+00, 0.2116300E+00, &
     & 0.1377700E+00, 0.1980500E+00, 0.1729800E+00, 0.1894200E+00, &
     & 0.2046200E+00, 0.2028500E+00, 0.2221500E+00, 0.2383900E+00, &
     & 0.3087000E+00, 0.2950412E+00, 0.2752500E+00, 0.3761864E+00, &
     & 0.4328974E+00, 0.5182276E+00, 0.6081469E+00, 0.6081469E+00 /
      data (ref_adm( 5,iz,19,17),iz = 1,20) / &
     & 0.1623000E+00, 0.1623000E+00, 0.1582100E+00, 0.1513200E+00, &
     & 0.1641500E+00, 0.1806500E+00, 0.1848400E+00, 0.2315400E+00, &
     & 0.1940000E+00, 0.2165600E+00, 0.2233600E+00, 0.2204700E+00, &
     & 0.2272300E+00, 0.2471200E+00, 0.3482700E+00, 0.3719124E+00, &
     & 0.4263813E+00, 0.5073349E+00, 0.5919420E+00, 0.5919420E+00 /
      data (ref_adm( 5,iz,20,17),iz = 1,20) / &
     & 0.1641100E+00, 0.1641100E+00, 0.2077000E+00, 0.2262700E+00, &
     & 0.1734400E+00, 0.1765800E+00, 0.1672200E+00, 0.1952900E+00, &
     & 0.1798300E+00, 0.2085400E+00, 0.2332900E+00, 0.2729700E+00, &
     & 0.2668500E+00, 0.2767800E+00, 0.2583300E+00, 0.3693917E+00, &
     & 0.4226250E+00, 0.5009285E+00, 0.5823545E+00, 0.5823545E+00 /
      data (ref_adm( 5,iz,21,17),iz = 1,20) / &
     & 0.1439500E+00, 0.1439500E+00, 0.1594200E+00, 0.1890200E+00, &
     & 0.3142200E+00, 0.1740600E+00, 0.2476200E+00, 0.2538900E+00, &
     & 0.1761200E+00, 0.2293000E+00, 0.2246700E+00, 0.2539000E+00, &
     & 0.2161400E+00, 0.2652100E+00, 0.2641500E+00, 0.3681549E+00, &
     & 0.4203628E+00, 0.4963686E+00, 0.5766149E+00, 0.5766149E+00 /
      data (ref_adm( 5,iz,22,17),iz = 1,20) / &
     & 0.1525000E+00, 0.1525000E+00, 0.1460900E+00, 0.2021100E+00, &
     & 0.1553600E+00, 0.4177400E+00, 0.1902300E+00, 0.1843100E+00, &
     & 0.1836500E+00, 0.2334700E+00, 0.1974300E+00, 0.3002600E+00, &
     & 0.2725000E+00, 0.2936700E+00, 0.3139200E+00, 0.4260383E+00, &
     & 0.5027949E+00, 0.6279576E+00, 0.8210089E+00, 0.8210089E+00 /
      data (ref_adm( 5,iz,23,17),iz = 1,20) / &
     & 0.1645800E+00, 0.1645800E+00, 0.1747900E+00, 0.1602700E+00, &
     & 0.1804000E+00, 0.1778700E+00, 0.1930500E+00, 0.2004300E+00, &
     & 0.2098700E+00, 0.2087900E+00, 0.2245100E+00, 0.2389700E+00, &
     & 0.2563500E+00, 0.2958300E+00, 0.3281600E+00, 0.4271881E+00, &
     & 0.5033801E+00, 0.6272545E+00, 0.8233225E+00, 0.8233225E+00 /
      data (ref_adm( 5,iz,24,17),iz = 1,20) / &
     & 0.1610200E+00, 0.1610200E+00, 0.1799500E+00, 0.1711000E+00, &
     & 0.1763500E+00, 0.1840300E+00, 0.1999100E+00, 0.1973300E+00, &
     & 0.2253900E+00, 0.2206600E+00, 0.2404700E+00, 0.2384200E+00, &
     & 0.2531100E+00, 0.2770700E+00, 0.3231700E+00, 0.3689000E+00, &
     & 0.5077611E+00, 0.6315529E+00, 0.8335397E+00, 0.8335397E+00 /
      data (ref_adm( 5,iz,25,17),iz = 1,20) / &
     & 0.1831700E+00, 0.1831700E+00, 0.1836400E+00, 0.1594300E+00, &
     & 0.1781500E+00, 0.1745400E+00, 0.2343800E+00, 0.2038800E+00, &
     & 0.2123500E+00, 0.2583200E+00, 0.2374600E+00, 0.2554600E+00, &
     & 0.2611900E+00, 0.3011400E+00, 0.3395300E+00, 0.4368242E+00, &
     & 0.5146262E+00, 0.6393998E+00, 0.8497217E+00, 0.8497217E+00 /
      data (ref_adm( 5,iz,26,17),iz = 1,20) / &
     & 0.1872700E+00, 0.1872700E+00, 0.1886000E+00, 0.1697800E+00, &
     & 0.2087100E+00, 0.1680000E+00, 0.2190900E+00, 0.2915500E+00, &
     & 0.2205500E+00, 0.2200400E+00, 0.2280900E+00, 0.2373000E+00, &
     & 0.2680500E+00, 0.3314100E+00, 0.3306100E+00, 0.4124500E+00, &
     & 0.4762500E+00, 0.6542117E+00, 0.8773113E+00, 0.8773113E+00 /
      data (ref_adm( 5,iz,27,17),iz = 1,20) / &
     & 0.1828800E+00, 0.1828800E+00, 0.1750100E+00, 0.1661100E+00, &
     & 0.1549600E+00, 0.1755100E+00, 0.1734100E+00, 0.1971900E+00, &
     & 0.1703700E+00, 0.2127700E+00, 0.1814100E+00, 0.2571200E+00, &
     & 0.3065200E+00, 0.3096900E+00, 0.3721300E+00, 0.4556200E+00, &
     & 0.5891600E+00, 0.6834600E+00, 0.9113219E+00, 0.9113219E+00 /
      data (ref_adm( 5,iz,28,17),iz = 1,20) / &
     & 0.2435900E+00, 0.2435900E+00, 0.1519700E+00, 0.1642100E+00, &
     & 0.1712800E+00, 0.1804300E+00, 0.1954200E+00, 0.1683000E+00, &
     & 0.2868200E+00, 0.1942300E+00, 0.3782900E+00, 0.2568800E+00, &
     & 0.3949400E+00, 0.3504600E+00, 0.4100700E+00, 0.4677100E+00, &
     & 0.5106100E+00, 0.6947230E+00, 0.9482613E+00, 0.9482613E+00 /
      data (ref_adm( 5,iz,29,17),iz = 1,20) / &
     & 0.1904200E+00, 0.1904200E+00, 0.1323400E+00, 0.1786300E+00, &
     & 0.2033300E+00, 0.1664600E+00, 0.1869200E+00, 0.1948500E+00, &
     & 0.2057800E+00, 0.2444100E+00, 0.2579000E+00, 0.2997900E+00, &
     & 0.3169100E+00, 0.3171900E+00, 0.4229700E+00, 0.4827900E+00, &
     & 0.5728800E+00, 0.7199368E+00, 0.5547600E+00, 0.5547600E+00 /
      data (ref_adm( 5,iz,30,17),iz = 1,20) / &
     & 0.1398400E+00, 0.1398400E+00, 0.1705600E+00, 0.2097600E+00, &
     & 0.1519800E+00, 0.1815800E+00, 0.2258200E+00, 0.3025400E+00, &
     & 0.2157600E+00, 0.2576100E+00, 0.3148000E+00, 0.2625400E+00, &
     & 0.2855300E+00, 0.3660700E+00, 0.3895400E+00, 0.4857000E+00, &
     & 0.5764100E+00, 0.7494580E+00, 0.1038111E+01, 0.1038111E+01 /
      data (ref_adm( 5,iz,31,17),iz = 1,20) / &
     & 0.1466700E+00, 0.1466700E+00, 0.1714900E+00, 0.1637600E+00, &
     & 0.2023000E+00, 0.2094000E+00, 0.2039600E+00, 0.2179400E+00, &
     & 0.2495100E+00, 0.2522757E+00, 0.2502100E+00, 0.3380400E+00, &
     & 0.3397500E+00, 0.3991200E+00, 0.4413200E+00, 0.4770500E+00, &
     & 0.7036900E+00, 0.7770900E+00, 0.1086217E+01, 0.1086217E+01 /
      data (ref_adm( 5,iz,32,17),iz = 1,20) / &
     & 0.1546600E+00, 0.1546600E+00, 0.2574100E+00, 0.1687100E+00, &
     & 0.1748800E+00, 0.1958100E+00, 0.2065900E+00, 0.2529300E+00, &
     & 0.2822600E+00, 0.2559140E+00, 0.2588900E+00, 0.3172300E+00, &
     & 0.3121700E+00, 0.3711500E+00, 0.4419900E+00, 0.5211900E+00, &
     & 0.6403007E+00, 0.8092700E+00, 0.1132528E+01, 0.1132528E+01 /
      data (ref_adm( 5,iz,33,17),iz = 1,20) / &
     & 0.1891400E+00, 0.1891400E+00, 0.1553900E+00, 0.1798100E+00, &
     & 0.2335500E+00, 0.2186800E+00, 0.2332900E+00, 0.2743800E+00, &
     & 0.2779300E+00, 0.2341200E+00, 0.2757500E+00, 0.3816500E+00, &
     & 0.3056100E+00, 0.4033300E+00, 0.5311000E+00, 0.4935600E+00, &
     & 0.6512738E+00, 0.8244781E+00, 0.1167321E+01, 0.1167321E+01 /
      data (ref_adm( 5,iz,34,17),iz = 1,20) / &
     & 0.1681600E+00, 0.1681600E+00, 0.2029900E+00, 0.1825700E+00, &
     & 0.1889800E+00, 0.1978700E+00, 0.2273700E+00, 0.2664900E+00, &
     & 0.2819400E+00, 0.3022000E+00, 0.3425400E+00, 0.2985300E+00, &
     & 0.3557800E+00, 0.4350600E+00, 0.4917300E+00, 0.5830400E+00, &
     & 0.6935600E+00, 0.7746700E+00, 0.1172984E+01, 0.1172984E+01 /
      data (ref_adm( 5,iz,35,17),iz = 1,20) / &
     & 0.1769000E+00, 0.1769000E+00, 0.1410100E+00, 0.2007900E+00, &
     & 0.2002200E+00, 0.1949500E+00, 0.2128700E+00, 0.3460900E+00, &
     & 0.3192400E+00, 0.3633300E+00, 0.2516800E+00, 0.3672400E+00, &
     & 0.3892800E+00, 0.4215700E+00, 0.4972500E+00, 0.4865800E+00, &
     & 0.7177200E+00, 0.8275885E+00, 0.1176925E+01, 0.1176925E+01 /
      data (ref_adm( 5,iz,36,17),iz = 1,20) / &
     & 0.1435500E+00, 0.1435500E+00, 0.1574600E+00, 0.1939800E+00, &
     & 0.1862800E+00, 0.1852700E+00, 0.2051500E+00, 0.2083400E+00, &
     & 0.3507800E+00, 0.3092700E+00, 0.2920700E+00, 0.3699400E+00, &
     & 0.3789300E+00, 0.4534600E+00, 0.4761300E+00, 0.6178100E+00, &
     & 0.7314800E+00, 0.8414376E+00, 0.1189813E+01, 0.1189813E+01 /
      data (ref_adm( 5,iz,37,17),iz = 1,20) / &
     & 0.1566000E+00, 0.1566000E+00, 0.1657800E+00, 0.1610800E+00, &
     & 0.1680200E+00, 0.1989700E+00, 0.1923600E+00, 0.2089200E+00, &
     & 0.3544900E+00, 0.2963600E+00, 0.3216500E+00, 0.3416000E+00, &
     & 0.4300000E+00, 0.4387600E+00, 0.5027100E+00, 0.6245500E+00, &
     & 0.7130500E+00, 0.8777084E+00, 0.1201283E+01, 0.1201283E+01 /
      data (ref_adm( 5,iz,38,17),iz = 1,20) / &
     & 0.1566000E+00, 0.1566000E+00, 0.1657800E+00, 0.1610800E+00, &
     & 0.1680200E+00, 0.1989700E+00, 0.1923600E+00, 0.2089200E+00, &
     & 0.3544900E+00, 0.2963600E+00, 0.3216500E+00, 0.3416000E+00, &
     & 0.4300000E+00, 0.4387600E+00, 0.5027100E+00, 0.6245500E+00, &
     & 0.7130500E+00, 0.8777084E+00, 0.1201283E+01, 0.1201283E+01 /
! Solar Zenith Angle 85.0 Albedo  0.4801936E+00
      data (ref_adm( 5,iz, 1,18),iz = 1,20) / &
     & 0.2174100E+00, 0.2174100E+00, 0.2657756E+00, 0.1639400E+00, &
     & 0.1979400E+00, 0.2565200E+00, 0.2395800E+00, 0.3646631E+00, &
     & 0.3922366E+00, 0.3590000E+00, 0.4763748E+00, 0.6563300E+00, &
     & 0.7367264E+00, 0.8476845E+00, 0.1101016E+01, 0.1702900E+01, &
     & 0.3049648E+01, 0.5373877E+01, 0.2542043E+01, 0.2542043E+01 /
      data (ref_adm( 5,iz, 2,18),iz = 1,20) / &
     & 0.2174100E+00, 0.2174100E+00, 0.2657756E+00, 0.1639400E+00, &
     & 0.1979400E+00, 0.2565200E+00, 0.2395800E+00, 0.3646631E+00, &
     & 0.3922366E+00, 0.3590000E+00, 0.4763748E+00, 0.6563300E+00, &
     & 0.7367264E+00, 0.8476845E+00, 0.1101016E+01, 0.1702900E+01, &
     & 0.3049648E+01, 0.5373877E+01, 0.2542043E+01, 0.2542043E+01 /
      data (ref_adm( 5,iz, 3,18),iz = 1,20) / &
     & 0.1813500E+00, 0.1813500E+00, 0.2656288E+00, 0.2504300E+00, &
     & 0.2269000E+00, 0.2197500E+00, 0.3363957E+00, 0.3633541E+00, &
     & 0.2994900E+00, 0.4252673E+00, 0.4746193E+00, 0.5457100E+00, &
     & 0.7298099E+00, 0.8421081E+00, 0.1077062E+01, 0.1635864E+01, &
     & 0.2795957E+01, 0.5634855E+01, 0.4193477E-07, 0.4193477E-07 /
      data (ref_adm( 5,iz, 4,18),iz = 1,20) / &
     & 0.2501100E+00, 0.2501100E+00, 0.2654133E+00, 0.2098200E+00, &
     & 0.2922630E+00, 0.3126119E+00, 0.4463500E+00, 0.3464800E+00, &
     & 0.3900002E+00, 0.4237222E+00, 0.4711893E+00, 0.5761800E+00, &
     & 0.7130748E+00, 0.8332395E+00, 0.1030281E+01, 0.1498604E+01, &
     & 0.2361069E+01, 0.4970567E+01, 0.4083709E+01, 0.4083709E+01 /
      data (ref_adm( 5,iz, 5,18),iz = 1,20) / &
     & 0.2939500E+00, 0.2939500E+00, 0.2651669E+00, 0.1954500E+00, &
     & 0.2910559E+00, 0.3113347E+00, 0.3337229E+00, 0.2373900E+00, &
     & 0.3233800E+00, 0.3256100E+00, 0.4661489E+00, 0.7847400E+00, &
     & 0.6883838E+00, 0.8210764E+00, 0.9797562E+00, 0.1339521E+01, &
     & 0.1947849E+01, 0.3429467E+01, 0.4788674E+01, 0.4788674E+01 /
      data (ref_adm( 5,iz, 6,18),iz = 1,20) / &
     & 0.2233800E+00, 0.2233800E+00, 0.2647517E+00, 0.2763843E+00, &
     & 0.2448600E+00, 0.2310200E+00, 0.2509200E+00, 0.3583399E+00, &
     & 0.3405800E+00, 0.3777800E+00, 0.4637500E+00, 0.4772400E+00, &
     & 0.6556804E+00, 0.1230400E+01, 0.9430708E+00, 0.1195476E+01, &
     & 0.1626541E+01, 0.2437670E+01, 0.2984643E+01, 0.2984643E+01 /
      data (ref_adm( 5,iz, 7,18),iz = 1,20) / &
     & 0.1749800E+00, 0.1749800E+00, 0.2643168E+00, 0.2758225E+00, &
     & 0.1829800E+00, 0.3077081E+00, 0.3296425E+00, 0.3552026E+00, &
     & 0.2927900E+00, 0.4347200E+00, 0.3538000E+00, 0.5741000E+00, &
     & 0.6263129E+00, 0.1012500E+01, 0.1290000E+01, 0.1830000E+01, &
     & 0.2502500E+01, 0.2927000E+01, 0.2043703E+01, 0.2043703E+01 /
      data (ref_adm( 5,iz, 8,18),iz = 1,20) / &
     & 0.2539051E+00, 0.2539051E+00, 0.2639538E+00, 0.2744139E+00, &
     & 0.2876577E+00, 0.3050599E+00, 0.3510000E+00, 0.3504300E+00, &
     & 0.3802374E+00, 0.4102874E+00, 0.4469407E+00, 0.5026600E+00, &
     & 0.5971224E+00, 0.1176500E+01, 0.1293100E+01, 0.1775000E+01, &
     & 0.1896700E+01, 0.2229700E+01, 0.1453300E+01, 0.1453300E+01 /
      data (ref_adm( 5,iz, 9,18),iz = 1,20) / &
     & 0.2534836E+00, 0.2534836E+00, 0.2609200E+00, 0.2730943E+00, &
     & 0.2854680E+00, 0.3021276E+00, 0.1722300E+00, 0.2186700E+00, &
     & 0.3750321E+00, 0.3624900E+00, 0.4404007E+00, 0.4974900E+00, &
     & 0.5748571E+00, 0.8948800E+00, 0.1106500E+01, 0.1364100E+01, &
     & 0.2228200E+01, 0.3119400E+01, 0.1358815E+01, 0.1358815E+01 /
      data (ref_adm( 5,iz,10,18),iz = 1,20) / &
     & 0.2536614E+00, 0.2536614E+00, 0.2623034E+00, 0.2722394E+00, &
     & 0.2841734E+00, 0.1924800E+00, 0.2019200E+00, 0.3418337E+00, &
     & 0.3690244E+00, 0.4006522E+00, 0.4340856E+00, 0.4876598E+00, &
     & 0.5544201E+00, 0.6242832E+00, 0.1030400E+01, 0.1364000E+01, &
     & 0.1808600E+01, 0.2049900E+01, 0.1279933E+01, 0.1279933E+01 /
      data (ref_adm( 5,iz,11,18),iz = 1,20) / &
     & 0.2532076E+00, 0.2532076E+00, 0.2618237E+00, 0.2712152E+00, &
     & 0.1833200E+00, 0.1941000E+00, 0.3149849E+00, 0.3369469E+00, &
     & 0.3620807E+00, 0.3921131E+00, 0.4280710E+00, 0.4537000E+00, &
     & 0.5399234E+00, 0.5995497E+00, 0.8832900E+00, 0.1145900E+01, &
     & 0.1400600E+01, 0.1125462E+01, 0.1162214E+01, 0.1162214E+01 /
      data (ref_adm( 5,iz,12,18),iz = 1,20) / &
     & 0.2531202E+00, 0.2531202E+00, 0.2425700E+00, 0.2691915E+00, &
     & 0.2803900E+00, 0.2933061E+00, 0.3155000E+00, 0.3316927E+00, &
     & 0.3561461E+00, 0.3546800E+00, 0.2865600E+00, 0.4695491E+00, &
     & 0.5277292E+00, 0.6611600E+00, 0.8296700E+00, 0.9774400E+00, &
     & 0.1533600E+01, 0.1023409E+01, 0.1056833E+01, 0.1056833E+01 /
      data (ref_adm( 5,iz,13,18),iz = 1,20) / &
     & 0.2499500E+00, 0.2499500E+00, 0.2594449E+00, 0.2676915E+00, &
     & 0.2781707E+00, 0.2908289E+00, 0.3062192E+00, 0.3258010E+00, &
     & 0.2522600E+00, 0.3764080E+00, 0.4080079E+00, 0.3541500E+00, &
     & 0.4617400E+00, 0.6361000E+00, 0.6164400E+00, 0.9511900E+00, &
     & 0.1351600E+01, 0.9558709E+00, 0.9889685E+00, 0.9889685E+00 /
      data (ref_adm( 5,iz,14,18),iz = 1,20) / &
     & 0.2165000E+00, 0.2165000E+00, 0.2587096E+00, 0.2662807E+00, &
     & 0.2761718E+00, 0.3073500E+00, 0.3021441E+00, 0.3199725E+00, &
     & 0.3414459E+00, 0.3673937E+00, 0.3977598E+00, 0.4437668E+00, &
     & 0.5000120E+00, 0.5518453E+00, 0.6221703E+00, 0.9535600E+00, &
     & 0.8088697E+00, 0.9147087E+00, 0.9436013E+00, 0.9436013E+00 /
      data (ref_adm( 5,iz,15,18),iz = 1,20) / &
     & 0.2166400E+00, 0.2166400E+00, 0.2197400E+00, 0.2267500E+00, &
     & 0.2187000E+00, 0.2048300E+00, 0.2367600E+00, 0.2425200E+00, &
     & 0.2627400E+00, 0.2311900E+00, 0.2621900E+00, 0.2962700E+00, &
     & 0.3136700E+00, 0.3407000E+00, 0.6897900E+00, 0.8860000E+00, &
     & 0.7821245E+00, 0.8835344E+00, 0.9094681E+00, 0.9094681E+00 /
      data (ref_adm( 5,iz,16,18),iz = 1,20) / &
     & 0.2063700E+00, 0.2063700E+00, 0.2131800E+00, 0.2056700E+00, &
     & 0.2119500E+00, 0.2054300E+00, 0.2060800E+00, 0.2288000E+00, &
     & 0.2096700E+00, 0.2383200E+00, 0.2519300E+00, 0.2622200E+00, &
     & 0.2665900E+00, 0.3251300E+00, 0.5685400E+00, 0.6618178E+00, &
     & 0.7481819E+00, 0.8481756E+00, 0.8770064E+00, 0.8770064E+00 /
      data (ref_adm( 5,iz,17,18),iz = 1,20) / &
     & 0.2180900E+00, 0.2180900E+00, 0.2558141E+00, 0.2473600E+00, &
     & 0.2687404E+00, 0.2782447E+00, 0.2902696E+00, 0.3048940E+00, &
     & 0.3226037E+00, 0.3214500E+00, 0.2561000E+00, 0.4057300E+00, &
     & 0.4516222E+00, 0.4944665E+00, 0.5484800E+00, 0.6346756E+00, &
     & 0.7158474E+00, 0.8080081E+00, 0.8397498E+00, 0.8397498E+00 /
      data (ref_adm( 5,iz,18,18),iz = 1,20) / &
     & 0.2038546E+00, 0.2038546E+00, 0.2060753E+00, 0.2099618E+00, &
     & 0.2157473E+00, 0.2235511E+00, 0.2335985E+00, 0.2237700E+00, &
     & 0.2614061E+00, 0.2797792E+00, 0.3014277E+00, 0.3337106E+00, &
     & 0.3716065E+00, 0.4000900E+00, 0.4576884E+00, 0.5292263E+00, &
     & 0.6153066E+00, 0.7647801E+00, 0.1225856E+01, 0.1225856E+01 /
      data (ref_adm( 5,iz,19,18),iz = 1,20) / &
     & 0.2306900E+00, 0.2306900E+00, 0.2059022E+00, 0.2095731E+00, &
     & 0.2150592E+00, 0.2224452E+00, 0.2319375E+00, 0.2437659E+00, &
     & 0.2581393E+00, 0.2752810E+00, 0.2954847E+00, 0.3254727E+00, &
     & 0.3605665E+00, 0.3930809E+00, 0.4399429E+00, 0.5059845E+00, &
     & 0.5859824E+00, 0.7281061E+00, 0.1191036E+01, 0.1191036E+01 /
      data (ref_adm( 5,iz,20,18),iz = 1,20) / &
     & 0.2037774E+00, 0.2037774E+00, 0.2057661E+00, 0.2086200E+00, &
     & 0.1884800E+00, 0.2218353E+00, 0.2301200E+00, 0.2423780E+00, &
     & 0.2561970E+00, 0.2438400E+00, 0.2919303E+00, 0.3204792E+00, &
     & 0.3537869E+00, 0.3845860E+00, 0.4289666E+00, 0.4916756E+00, &
     & 0.5682245E+00, 0.7068566E+00, 0.1176908E+01, 0.1176908E+01 /
      data (ref_adm( 5,iz,21,18),iz = 1,20) / &
     & 0.2088000E+00, 0.2088000E+00, 0.2056861E+00, 0.2092519E+00, &
     & 0.2145081E+00, 0.2215781E+00, 0.2306335E+00, 0.2418398E+00, &
     & 0.2553889E+00, 0.2457500E+00, 0.2902835E+00, 0.3180468E+00, &
     & 0.3503498E+00, 0.4135400E+00, 0.4232132E+00, 0.4841906E+00, &
     & 0.5592743E+00, 0.6975524E+00, 0.1179621E+01, 0.1179621E+01 /
      data (ref_adm( 5,iz,22,18),iz = 1,20) / &
     & 0.2475700E+00, 0.2475700E+00, 0.2529856E+00, 0.2561347E+00, &
     & 0.2326300E+00, 0.2675340E+00, 0.2760362E+00, 0.2866035E+00, &
     & 0.2312300E+00, 0.3145632E+00, 0.3541000E+00, 0.3590184E+00, &
     & 0.3902672E+00, 0.4195722E+00, 0.4623885E+00, 0.5240633E+00, &
     & 0.6014619E+00, 0.7456909E+00, 0.1231477E+01, 0.1231477E+01 /
      data (ref_adm( 5,iz,23,18),iz = 1,20) / &
     & 0.2264200E+00, 0.2264200E+00, 0.2183600E+00, 0.2290500E+00, &
     & 0.2353900E+00, 0.2280600E+00, 0.2327400E+00, 0.2207300E+00, &
     & 0.2490900E+00, 0.2704100E+00, 0.2799500E+00, 0.3115500E+00, &
     & 0.3859200E+00, 0.4026600E+00, 0.3528400E+00, 0.5263289E+00, &
     & 0.6048828E+00, 0.7530064E+00, 0.1262101E+01, 0.1262101E+01 /
      data (ref_adm( 5,iz,24,18),iz = 1,20) / &
     & 0.2074500E+00, 0.2074500E+00, 0.2152500E+00, 0.2222900E+00, &
     & 0.2241300E+00, 0.2422700E+00, 0.2534800E+00, 0.2712700E+00, &
     & 0.2625000E+00, 0.2532500E+00, 0.3369600E+00, 0.3175800E+00, &
     & 0.3905900E+00, 0.4760000E+00, 0.4464600E+00, 0.5338512E+00, &
     & 0.6152559E+00, 0.7695661E+00, 0.1307667E+01, 0.1307667E+01 /
      data (ref_adm( 5,iz,25,18),iz = 1,20) / &
     & 0.1844600E+00, 0.1844600E+00, 0.2527041E+00, 0.3002200E+00, &
     & 0.2614447E+00, 0.2685207E+00, 0.2777321E+00, 0.2891531E+00, &
     & 0.3031395E+00, 0.2455000E+00, 0.3056000E+00, 0.3554000E+00, &
     & 0.4010428E+00, 0.3857600E+00, 0.4790625E+00, 0.5465639E+00, &
     & 0.6323608E+00, 0.7953857E+00, 0.1366009E+01, 0.1366009E+01 /
      data (ref_adm( 5,iz,26,18),iz = 1,20) / &
     & 0.2146900E+00, 0.2146900E+00, 0.2526712E+00, 0.2562388E+00, &
     & 0.2618268E+00, 0.2692975E+00, 0.2790394E+00, 0.2912135E+00, &
     & 0.3058096E+00, 0.3232917E+00, 0.3512400E+00, 0.3746683E+00, &
     & 0.4108384E+00, 0.4446981E+00, 0.3800200E+00, 0.5663261E+00, &
     & 0.6580825E+00, 0.8326299E+00, 0.1438454E+01, 0.1438454E+01 /
      data (ref_adm( 5,iz,27,18),iz = 1,20) / &
     & 0.2512123E+00, 0.2512123E+00, 0.2526825E+00, 0.3708800E+00, &
     & 0.3205800E+00, 0.2702526E+00, 0.3115000E+00, 0.2935121E+00, &
     & 0.3093054E+00, 0.3282501E+00, 0.3508630E+00, 0.3839665E+00, &
     & 0.4258800E+00, 0.4580595E+00, 0.5439700E+00, 0.6153000E+00, &
     & 0.6839161E+00, 0.8700956E+00, 0.1515952E+01, 0.1515952E+01 /
      data (ref_adm( 5,iz,28,18),iz = 1,20) / &
     & 0.2511825E+00, 0.2511825E+00, 0.2527332E+00, 0.2766600E+00, &
     & 0.2281000E+00, 0.2188000E+00, 0.2824394E+00, 0.2121300E+00, &
     & 0.3137043E+00, 0.3345725E+00, 0.4238700E+00, 0.3931595E+00, &
     & 0.4330152E+00, 0.4705523E+00, 0.4714000E+00, 0.6094812E+00, &
     & 0.7159362E+00, 0.9179718E+00, 0.1605118E+01, 0.1605118E+01 /
      data (ref_adm( 5,iz,29,18),iz = 1,20) / &
     & 0.2511945E+00, 0.2511945E+00, 0.2325700E+00, 0.2570433E+00, &
     & 0.1954400E+00, 0.2520500E+00, 0.2844205E+00, 0.2756400E+00, &
     & 0.3119100E+00, 0.2725900E+00, 0.3934500E+00, 0.4016273E+00, &
     & 0.4454739E+00, 0.4888687E+00, 0.5749400E+00, 0.7409400E+00, &
     & 0.7847878E+00, 0.1016928E+01, 0.1731499E+01, 0.1731499E+01 /
      data (ref_adm( 5,iz,30,18),iz = 1,20) / &
     & 0.2511777E+00, 0.2511777E+00, 0.2529526E+00, 0.3411300E+00, &
     & 0.2642895E+00, 0.3199100E+00, 0.2578000E+00, 0.2615400E+00, &
     & 0.3237294E+00, 0.3464313E+00, 0.3934600E+00, 0.4155400E+00, &
     & 0.4386200E+00, 0.5454700E+00, 0.6907700E+00, 0.7299500E+00, &
     & 0.1402000E+01, 0.1106310E+01, 0.1850860E+01, 0.1850860E+01 /
      data (ref_adm( 5,iz,31,18),iz = 1,20) / &
     & 0.2511525E+00, 0.2511525E+00, 0.2530266E+00, 0.2575955E+00, &
     & 0.2649836E+00, 0.2848900E+00, 0.2820000E+00, 0.2655800E+00, &
     & 0.3280713E+00, 0.3514673E+00, 0.3807538E+00, 0.4345706E+00, &
     & 0.5107516E+00, 0.5164000E+00, 0.6871500E+00, 0.7697700E+00, &
     & 0.1184800E+01, 0.1081111E+01, 0.1879877E+01, 0.1879877E+01 /
      data (ref_adm( 5,iz,32,18),iz = 1,20) / &
     & 0.2511386E+00, 0.2511386E+00, 0.2530937E+00, 0.2579069E+00, &
     & 0.2656913E+00, 0.2764552E+00, 0.2915031E+00, 0.2621000E+00, &
     & 0.3316537E+00, 0.3831900E+00, 0.3503000E+00, 0.4037300E+00, &
     & 0.5271008E+00, 0.5431400E+00, 0.7562700E+00, 0.8607500E+00, &
     & 0.1033200E+01, 0.1105000E+01, 0.1939336E+01, 0.1939336E+01 /
      data (ref_adm( 5,iz,33,18),iz = 1,20) / &
     & 0.2511398E+00, 0.2511398E+00, 0.2173600E+00, 0.2582202E+00, &
     & 0.2662833E+00, 0.2776694E+00, 0.2847500E+00, 0.2950300E+00, &
     & 0.2859700E+00, 0.3513200E+00, 0.3921600E+00, 0.4847000E+00, &
     & 0.5420400E+00, 0.6632200E+00, 0.9350600E+00, 0.1011300E+01, &
     & 0.1087700E+01, 0.1122652E+01, 0.1994383E+01, 0.1994383E+01 /
      data (ref_adm( 5,iz,34,18),iz = 1,20) / &
     & 0.2495900E+00, 0.2495900E+00, 0.2415900E+00, 0.2584644E+00, &
     & 0.2667977E+00, 0.3281900E+00, 0.2879100E+00, 0.3703200E+00, &
     & 0.2940300E+00, 0.2935300E+00, 0.3953300E+00, 0.4457800E+00, &
     & 0.4584600E+00, 0.5451100E+00, 0.6670000E+00, 0.8301100E+00, &
     & 0.1196000E+01, 0.1133599E+01, 0.2035980E+01, 0.2035980E+01 /
      data (ref_adm( 5,iz,35,18),iz = 1,20) / &
     & 0.2511160E+00, 0.2511160E+00, 0.2533687E+00, 0.2586613E+00, &
     & 0.2451900E+00, 0.2796950E+00, 0.2969804E+00, 0.2424700E+00, &
     & 0.3046100E+00, 0.3209300E+00, 0.4427254E+00, 0.4115000E+00, &
     & 0.5065000E+00, 0.7098700E+00, 0.7749900E+00, 0.9783200E+00, &
     & 0.1117700E+01, 0.1229400E+01, 0.2074259E+01, 0.2074259E+01 /
      data (ref_adm( 5,iz,36,18),iz = 1,20) / &
     & 0.2511448E+00, 0.2511448E+00, 0.2533622E+00, 0.1852500E+00, &
     & 0.2615500E+00, 0.2802841E+00, 0.2114700E+00, 0.2922100E+00, &
     & 0.4463900E+00, 0.3752300E+00, 0.4491200E+00, 0.4136800E+00, &
     & 0.5162500E+00, 0.7898800E+00, 0.7152500E+00, 0.8700900E+00, &
     & 0.1010800E+01, 0.1369200E+01, 0.2114191E+01, 0.2114191E+01 /
      data (ref_adm( 5,iz,37,18),iz = 1,20) / &
     & 0.2277000E+00, 0.2277000E+00, 0.2112700E+00, 0.2472900E+00, &
     & 0.2677244E+00, 0.2516100E+00, 0.2984739E+00, 0.3186250E+00, &
     & 0.3957400E+00, 0.4159000E+00, 0.4554300E+00, 0.4988200E+00, &
     & 0.6855400E+00, 0.5473600E+00, 0.7366700E+00, 0.8978800E+00, &
     & 0.9162500E+00, 0.1386300E+01, 0.2091400E+01, 0.2091400E+01 /
      data (ref_adm( 5,iz,38,18),iz = 1,20) / &
     & 0.2277000E+00, 0.2277000E+00, 0.2112700E+00, 0.2472900E+00, &
     & 0.2677244E+00, 0.2516100E+00, 0.2984739E+00, 0.3186250E+00, &
     & 0.3957400E+00, 0.4159000E+00, 0.4554300E+00, 0.4988200E+00, &
     & 0.6855400E+00, 0.5473600E+00, 0.7366700E+00, 0.8978800E+00, &
     & 0.9162500E+00, 0.1386300E+01, 0.2091400E+01, 0.2091400E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm( 6,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm( 6,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.5540442E+04
      data (ref_adm( 6,iz, 1, 3),iz = 1,20) / &
     & 0.1571048E+00, 0.1571048E+00, 0.1469698E+00, 0.1434753E+00, &
     & 0.1411165E+00, 0.1398590E+00, 0.1386060E+00, 0.1373034E+00, &
     & 0.1366538E+00, 0.1366132E+00, 0.1373811E+00, 0.1523600E+00, &
     & 0.1425990E+00, 0.1460395E+00, 0.1513346E+00, 0.1473100E+00, &
     & 0.1674513E+00, 0.1786301E+00, 0.1845802E+00, 0.1845802E+00 /
      data (ref_adm( 6,iz, 2, 3),iz = 1,20) / &
     & 0.1571048E+00, 0.1571048E+00, 0.1469698E+00, 0.1434753E+00, &
     & 0.1411165E+00, 0.1398590E+00, 0.1386060E+00, 0.1373034E+00, &
     & 0.1366538E+00, 0.1366132E+00, 0.1373811E+00, 0.1523600E+00, &
     & 0.1425990E+00, 0.1460395E+00, 0.1513346E+00, 0.1473100E+00, &
     & 0.1674513E+00, 0.1786301E+00, 0.1845802E+00, 0.1845802E+00 /
      data (ref_adm( 6,iz, 3, 3),iz = 1,20) / &
     & 0.1571048E+00, 0.1571048E+00, 0.1469698E+00, 0.1434753E+00, &
     & 0.1411165E+00, 0.1398590E+00, 0.1386060E+00, 0.1373034E+00, &
     & 0.1366538E+00, 0.1366132E+00, 0.1373811E+00, 0.1428600E+00, &
     & 0.1425990E+00, 0.1332800E+00, 0.2057100E+00, 0.1588730E+00, &
     & 0.1674513E+00, 0.1786301E+00, 0.2853850E-08, 0.2853850E-08 /
      data (ref_adm( 6,iz, 4, 3),iz = 1,20) / &
     & 0.1571048E+00, 0.1571048E+00, 0.1469698E+00, 0.1434753E+00, &
     & 0.1411165E+00, 0.1398590E+00, 0.1386060E+00, 0.1373034E+00, &
     & 0.1366538E+00, 0.1366132E+00, 0.1373811E+00, 0.1572900E+00, &
     & 0.1425990E+00, 0.1460395E+00, 0.1424500E+00, 0.1588730E+00, &
     & 0.1674513E+00, 0.1786301E+00, 0.1845802E+00, 0.1845802E+00 /
      data (ref_adm( 6,iz, 5, 3),iz = 1,20) / &
     & 0.1571048E+00, 0.1571048E+00, 0.1469698E+00, 0.1434753E+00, &
     & 0.1411165E+00, 0.1398590E+00, 0.1386060E+00, 0.1373034E+00, &
     & 0.1366538E+00, 0.1366132E+00, 0.1373811E+00, 0.1394621E+00, &
     & 0.1518700E+00, 0.1502000E+00, 0.1242100E+00, 0.1334900E+00, &
     & 0.1674513E+00, 0.1786301E+00, 0.1845802E+00, 0.1845802E+00 /
      data (ref_adm( 6,iz, 6, 3),iz = 1,20) / &
     & 0.1571048E+00, 0.1571048E+00, 0.1469698E+00, 0.1434753E+00, &
     & 0.1411165E+00, 0.1398590E+00, 0.1386060E+00, 0.1373034E+00, &
     & 0.1366538E+00, 0.1366132E+00, 0.1373811E+00, 0.1479100E+00, &
     & 0.1711900E+00, 0.1387300E+00, 0.1182500E+00, 0.1588730E+00, &
     & 0.1674513E+00, 0.1450600E+00, 0.1845802E+00, 0.1845802E+00 /
      data (ref_adm( 6,iz, 7, 3),iz = 1,20) / &
     & 0.1571048E+00, 0.1571048E+00, 0.1469698E+00, 0.1434753E+00, &
     & 0.1411165E+00, 0.1398590E+00, 0.1386060E+00, 0.1373034E+00, &
     & 0.1366538E+00, 0.1366132E+00, 0.1373811E+00, 0.1406700E+00, &
     & 0.1625100E+00, 0.1460395E+00, 0.1513346E+00, 0.1588730E+00, &
     & 0.1674513E+00, 0.1786301E+00, 0.1845802E+00, 0.1845802E+00 /
      data (ref_adm( 6,iz, 8, 3),iz = 1,20) / &
     & 0.1571048E+00, 0.1571048E+00, 0.1469698E+00, 0.1434753E+00, &
     & 0.1411165E+00, 0.1398590E+00, 0.1386060E+00, 0.1373034E+00, &
     & 0.1366538E+00, 0.1366132E+00, 0.1373811E+00, 0.1394621E+00, &
     & 0.1428200E+00, 0.1384700E+00, 0.1513346E+00, 0.1588730E+00, &
     & 0.1674513E+00, 0.1786301E+00, 0.1845802E+00, 0.1845802E+00 /
      data (ref_adm( 6,iz, 9, 3),iz = 1,20) / &
     & 0.1571048E+00, 0.1571048E+00, 0.1469698E+00, 0.1434753E+00, &
     & 0.1411165E+00, 0.1398590E+00, 0.1386060E+00, 0.1373034E+00, &
     & 0.1366538E+00, 0.1366132E+00, 0.1373811E+00, 0.1394621E+00, &
     & 0.1425990E+00, 0.1469200E+00, 0.1513346E+00, 0.1588730E+00, &
     & 0.1674513E+00, 0.1786301E+00, 0.1845802E+00, 0.1845802E+00 /
      data (ref_adm( 6,iz,10, 3),iz = 1,20) / &
     & 0.1571048E+00, 0.1571048E+00, 0.1469698E+00, 0.1434753E+00, &
     & 0.1411165E+00, 0.1398590E+00, 0.1386060E+00, 0.1373034E+00, &
     & 0.1366538E+00, 0.1366132E+00, 0.1373811E+00, 0.1394621E+00, &
     & 0.1425990E+00, 0.1460395E+00, 0.1513346E+00, 0.1588730E+00, &
     & 0.1674513E+00, 0.1786301E+00, 0.1845802E+00, 0.1845802E+00 /
      data (ref_adm( 6,iz,11, 3),iz = 1,20) / &
     & 0.1571048E+00, 0.1571048E+00, 0.1469698E+00, 0.1434753E+00, &
     & 0.1411165E+00, 0.1398590E+00, 0.1386060E+00, 0.1373034E+00, &
     & 0.1366538E+00, 0.1366132E+00, 0.1373811E+00, 0.1394621E+00, &
     & 0.1425990E+00, 0.1390100E+00, 0.1513346E+00, 0.1588730E+00, &
     & 0.1674513E+00, 0.1786301E+00, 0.1845802E+00, 0.1845802E+00 /
      data (ref_adm( 6,iz,12, 3),iz = 1,20) / &
     & 0.1571048E+00, 0.1571048E+00, 0.1469698E+00, 0.1434753E+00, &
     & 0.1411165E+00, 0.1398590E+00, 0.1386060E+00, 0.1373034E+00, &
     & 0.1366538E+00, 0.1366132E+00, 0.1373811E+00, 0.1394621E+00, &
     & 0.1425990E+00, 0.1460395E+00, 0.1513346E+00, 0.1588730E+00, &
     & 0.1674513E+00, 0.1786301E+00, 0.1845802E+00, 0.1845802E+00 /
      data (ref_adm( 6,iz,13, 3),iz = 1,20) / &
     & 0.1571048E+00, 0.1571048E+00, 0.1469698E+00, 0.1434753E+00, &
     & 0.1411165E+00, 0.1398590E+00, 0.1386060E+00, 0.1373034E+00, &
     & 0.1366538E+00, 0.1366132E+00, 0.1373811E+00, 0.1394621E+00, &
     & 0.1425990E+00, 0.1460395E+00, 0.1513346E+00, 0.1588730E+00, &
     & 0.1674513E+00, 0.1786301E+00, 0.1845802E+00, 0.1845802E+00 /
      data (ref_adm( 6,iz,14, 3),iz = 1,20) / &
     & 0.1571048E+00, 0.1571048E+00, 0.1469698E+00, 0.1434753E+00, &
     & 0.1411165E+00, 0.1398590E+00, 0.1386060E+00, 0.1373034E+00, &
     & 0.1366538E+00, 0.1366132E+00, 0.1373811E+00, 0.1394621E+00, &
     & 0.1425990E+00, 0.1460395E+00, 0.1513346E+00, 0.1588730E+00, &
     & 0.1674513E+00, 0.1786301E+00, 0.1845802E+00, 0.1845802E+00 /
      data (ref_adm( 6,iz,15, 3),iz = 1,20) / &
     & 0.1571048E+00, 0.1571048E+00, 0.1469698E+00, 0.1434753E+00, &
     & 0.1411165E+00, 0.1398590E+00, 0.1386060E+00, 0.1373034E+00, &
     & 0.1366538E+00, 0.1366132E+00, 0.1373811E+00, 0.1394621E+00, &
     & 0.1425990E+00, 0.1460395E+00, 0.1513346E+00, 0.1588730E+00, &
     & 0.1674513E+00, 0.1786301E+00, 0.1845802E+00, 0.1845802E+00 /
      data (ref_adm( 6,iz,16, 3),iz = 1,20) / &
     & 0.1571048E+00, 0.1571048E+00, 0.1469698E+00, 0.1434753E+00, &
     & 0.1411165E+00, 0.1398590E+00, 0.1386060E+00, 0.1373034E+00, &
     & 0.1366538E+00, 0.1366132E+00, 0.1373811E+00, 0.1394621E+00, &
     & 0.1425990E+00, 0.1460395E+00, 0.1513346E+00, 0.1588730E+00, &
     & 0.1674513E+00, 0.1786301E+00, 0.1845802E+00, 0.1845802E+00 /
      data (ref_adm( 6,iz,17, 3),iz = 1,20) / &
     & 0.1571048E+00, 0.1571048E+00, 0.1469698E+00, 0.1434753E+00, &
     & 0.1411165E+00, 0.1398590E+00, 0.1386060E+00, 0.1373034E+00, &
     & 0.1366538E+00, 0.1366132E+00, 0.1373811E+00, 0.1394621E+00, &
     & 0.1425990E+00, 0.1460395E+00, 0.1513346E+00, 0.1588730E+00, &
     & 0.1674513E+00, 0.1786301E+00, 0.1845802E+00, 0.1845802E+00 /
      data (ref_adm( 6,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     & 0.1522100E+00,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 6,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo  0.1486213E+00
      data (ref_adm( 6,iz, 1, 4),iz = 1,20) / &
     & 0.1691046E+00, 0.1691046E+00, 0.1581954E+00, 0.1544341E+00, &
     & 0.1518950E+00, 0.1514800E+00, 0.1652500E+00, 0.1604100E+00, &
     & 0.1633400E+00, 0.1470478E+00, 0.1825800E+00, 0.1973600E+00, &
     & 0.1288900E+00, 0.1217800E+00, 0.1284600E+00, 0.1710079E+00, &
     & 0.1802413E+00, 0.1922741E+00, 0.1986785E+00, 0.1986785E+00 /
      data (ref_adm( 6,iz, 2, 4),iz = 1,20) / &
     & 0.1691046E+00, 0.1691046E+00, 0.1581954E+00, 0.1544341E+00, &
     & 0.1518950E+00, 0.1514800E+00, 0.1652500E+00, 0.1604100E+00, &
     & 0.1633400E+00, 0.1470478E+00, 0.1825800E+00, 0.1973600E+00, &
     & 0.1288900E+00, 0.1217800E+00, 0.1284600E+00, 0.1710079E+00, &
     & 0.1802413E+00, 0.1922741E+00, 0.1986785E+00, 0.1986785E+00 /
      data (ref_adm( 6,iz, 3, 4),iz = 1,20) / &
     & 0.1691046E+00, 0.1691046E+00, 0.1581954E+00, 0.1774900E+00, &
     & 0.1518950E+00, 0.1892600E+00, 0.1646000E+00, 0.1884900E+00, &
     & 0.1748900E+00, 0.1733200E+00, 0.1716700E+00, 0.1610200E+00, &
     & 0.1213200E+00, 0.1331500E+00, 0.1263500E+00, 0.1710079E+00, &
     & 0.1802413E+00, 0.1922740E+00, 0.3071829E-08, 0.3071829E-08 /
      data (ref_adm( 6,iz, 4, 4),iz = 1,20) / &
     & 0.1691046E+00, 0.1691046E+00, 0.1323600E+00, 0.1543300E+00, &
     & 0.1599600E+00, 0.1885900E+00, 0.1491928E+00, 0.1868300E+00, &
     & 0.1708300E+00, 0.1515500E+00, 0.1505500E+00, 0.1642900E+00, &
     & 0.1412500E+00, 0.1351000E+00, 0.1370500E+00, 0.1710079E+00, &
     & 0.1802413E+00, 0.1922741E+00, 0.1986785E+00, 0.1986785E+00 /
      data (ref_adm( 6,iz, 5, 4),iz = 1,20) / &
     & 0.1691046E+00, 0.1691046E+00, 0.1581954E+00, 0.1544341E+00, &
     & 0.1518950E+00, 0.1505416E+00, 0.1650000E+00, 0.1620600E+00, &
     & 0.1427200E+00, 0.1508500E+00, 0.1421700E+00, 0.1501143E+00, &
     & 0.1328300E+00, 0.1412600E+00, 0.1396300E+00, 0.1318300E+00, &
     & 0.1802413E+00, 0.1922740E+00, 0.1986785E+00, 0.1986785E+00 /
      data (ref_adm( 6,iz, 6, 4),iz = 1,20) / &
     & 0.1691046E+00, 0.1691046E+00, 0.1581954E+00, 0.1682500E+00, &
     & 0.1713700E+00, 0.1941200E+00, 0.1740500E+00, 0.1419900E+00, &
     & 0.1602000E+00, 0.1613200E+00, 0.1464800E+00, 0.1345200E+00, &
     & 0.1321600E+00, 0.1295300E+00, 0.1359900E+00, 0.1710079E+00, &
     & 0.1802413E+00, 0.1922741E+00, 0.1986785E+00, 0.1986785E+00 /
      data (ref_adm( 6,iz, 7, 4),iz = 1,20) / &
     & 0.1691046E+00, 0.1691046E+00, 0.2124300E+00, 0.1498300E+00, &
     & 0.1697700E+00, 0.1878800E+00, 0.1703500E+00, 0.1559100E+00, &
     & 0.1477600E+00, 0.1478000E+00, 0.1452600E+00, 0.1343800E+00, &
     & 0.1361800E+00, 0.1298200E+00, 0.1383400E+00, 0.1320700E+00, &
     & 0.1802413E+00, 0.1922740E+00, 0.1986785E+00, 0.1986785E+00 /
      data (ref_adm( 6,iz, 8, 4),iz = 1,20) / &
     & 0.1691046E+00, 0.1691046E+00, 0.1581954E+00, 0.1544341E+00, &
     & 0.1653100E+00, 0.1643300E+00, 0.1665500E+00, 0.1644400E+00, &
     & 0.1443500E+00, 0.1697800E+00, 0.1550200E+00, 0.1455500E+00, &
     & 0.1362400E+00, 0.1303100E+00, 0.1321900E+00, 0.1710079E+00, &
     & 0.1802413E+00, 0.1412300E+00, 0.1986785E+00, 0.1986785E+00 /
      data (ref_adm( 6,iz, 9, 4),iz = 1,20) / &
     & 0.1691046E+00, 0.1691046E+00, 0.1581954E+00, 0.1544341E+00, &
     & 0.1518950E+00, 0.1679200E+00, 0.1732200E+00, 0.1846600E+00, &
     & 0.1764700E+00, 0.1391800E+00, 0.1520800E+00, 0.1542000E+00, &
     & 0.1284800E+00, 0.1285600E+00, 0.1628936E+00, 0.1266200E+00, &
     & 0.1624900E+00, 0.1922740E+00, 0.1986785E+00, 0.1986785E+00 /
      data (ref_adm( 6,iz,10, 4),iz = 1,20) / &
     & 0.1691046E+00, 0.1691046E+00, 0.1581954E+00, 0.1544341E+00, &
     & 0.1518950E+00, 0.1505416E+00, 0.1740500E+00, 0.1605100E+00, &
     & 0.1788300E+00, 0.1638900E+00, 0.1393500E+00, 0.1541600E+00, &
     & 0.1276100E+00, 0.1339800E+00, 0.1339000E+00, 0.1710079E+00, &
     & 0.1554000E+00, 0.1413400E+00, 0.1986785E+00, 0.1986785E+00 /
      data (ref_adm( 6,iz,11, 4),iz = 1,20) / &
     & 0.1691046E+00, 0.1691046E+00, 0.1581954E+00, 0.1544341E+00, &
     & 0.1518950E+00, 0.1505416E+00, 0.1491928E+00, 0.1614200E+00, &
     & 0.1618900E+00, 0.1591900E+00, 0.1445000E+00, 0.1400400E+00, &
     & 0.1495100E+00, 0.1324400E+00, 0.1288000E+00, 0.1710079E+00, &
     & 0.1802413E+00, 0.1349500E+00, 0.1986785E+00, 0.1986785E+00 /
      data (ref_adm( 6,iz,12, 4),iz = 1,20) / &
     & 0.1691046E+00, 0.1691046E+00, 0.2152300E+00, 0.1544341E+00, &
     & 0.1952700E+00, 0.1923800E+00, 0.1491928E+00, 0.1477908E+00, &
     & 0.1470915E+00, 0.1470478E+00, 0.1478744E+00, 0.1627000E+00, &
     & 0.1534908E+00, 0.1408300E+00, 0.1491400E+00, 0.1710079E+00, &
     & 0.1802413E+00, 0.1922741E+00, 0.1986785E+00, 0.1986785E+00 /
      data (ref_adm( 6,iz,13, 4),iz = 1,20) / &
     & 0.1691046E+00, 0.1691046E+00, 0.1581954E+00, 0.1544341E+00, &
     & 0.1518950E+00, 0.1505416E+00, 0.1433700E+00, 0.1477908E+00, &
     & 0.1470915E+00, 0.1470478E+00, 0.1612000E+00, 0.1729700E+00, &
     & 0.1388500E+00, 0.1572900E+00, 0.1353300E+00, 0.1710079E+00, &
     & 0.1802413E+00, 0.1922740E+00, 0.1986785E+00, 0.1986785E+00 /
      data (ref_adm( 6,iz,14, 4),iz = 1,20) / &
     & 0.1371500E+00, 0.1371500E+00, 0.1581954E+00, 0.1544341E+00, &
     & 0.1518950E+00, 0.1505416E+00, 0.1491928E+00, 0.1477908E+00, &
     & 0.1470915E+00, 0.1470478E+00, 0.1478744E+00, 0.1501143E+00, &
     & 0.1534908E+00, 0.1571942E+00, 0.1448400E+00, 0.1710079E+00, &
     & 0.1802413E+00, 0.1922741E+00, 0.1986785E+00, 0.1986785E+00 /
      data (ref_adm( 6,iz,15, 4),iz = 1,20) / &
     & 0.1691046E+00, 0.1691046E+00, 0.1581954E+00, 0.1544341E+00, &
     & 0.1518950E+00, 0.1505416E+00, 0.1491928E+00, 0.1477908E+00, &
     & 0.1470915E+00, 0.1470478E+00, 0.1478744E+00, 0.1422000E+00, &
     & 0.1494700E+00, 0.1571942E+00, 0.1265500E+00, 0.1710079E+00, &
     & 0.1802413E+00, 0.1922740E+00, 0.1986785E+00, 0.1986785E+00 /
      data (ref_adm( 6,iz,16, 4),iz = 1,20) / &
     & 0.1176700E+00, 0.1176700E+00, 0.1581954E+00, 0.1544341E+00, &
     & 0.1518950E+00, 0.1505416E+00, 0.1698000E+00, 0.1623300E+00, &
     & 0.1553100E+00, 0.1470478E+00, 0.1478744E+00, 0.1501143E+00, &
     & 0.1208400E+00, 0.1577800E+00, 0.1345100E+00, 0.1710079E+00, &
     & 0.1802413E+00, 0.1922741E+00, 0.1986785E+00, 0.1986785E+00 /
      data (ref_adm( 6,iz,17, 4),iz = 1,20) / &
     & 0.1691046E+00, 0.1691046E+00, 0.1581954E+00, 0.1544341E+00, &
     & 0.1518950E+00, 0.1505416E+00, 0.1521700E+00, 0.1770800E+00, &
     & 0.1470915E+00, 0.1470478E+00, 0.1381400E+00, 0.1437800E+00, &
     & 0.1497000E+00, 0.1437300E+00, 0.1577600E+00, 0.1710079E+00, &
     & 0.1802413E+00, 0.1922740E+00, 0.1986785E+00, 0.1986785E+00 /
      data (ref_adm( 6,iz,18, 4),iz = 1,20) / &
     & 0.1551527E+00, 0.1551527E+00, 0.1512842E+00, 0.1482452E+00, &
     & 0.1461724E+00, 0.1449175E+00, 0.1434721E+00, 0.1422487E+00, &
     & 0.1416220E+00, 0.1416969E+00, 0.2050300E+00, 0.1449242E+00, &
     & 0.1579500E+00, 0.1559100E+00, 0.1596400E+00, 0.1547600E+00, &
     & 0.1748444E+00, 0.1867331E+00, 0.1932470E+00, 0.1932470E+00 /
      data (ref_adm( 6,iz,19, 4),iz = 1,20) / &
     & 0.1553296E+00, 0.1553296E+00, 0.1516759E+00, 0.1486388E+00, &
     & 0.1465356E+00, 0.1453197E+00, 0.1439714E+00, 0.1427091E+00, &
     & 0.1420163E+00, 0.1421124E+00, 0.1673500E+00, 0.1452816E+00, &
     & 0.1471000E+00, 0.1599100E+00, 0.1462200E+00, 0.1658651E+00, &
     & 0.1581700E+00, 0.1867357E+00, 0.1930357E+00, 0.1930357E+00 /
      data (ref_adm( 6,iz,20, 4),iz = 1,20) / &
     & 0.1555187E+00, 0.1555187E+00, 0.1519990E+00, 0.1489696E+00, &
     & 0.1468511E+00, 0.1456456E+00, 0.1443907E+00, 0.1431408E+00, &
     & 0.1425222E+00, 0.1425421E+00, 0.1433798E+00, 0.1456205E+00, &
     & 0.1489408E+00, 0.1524923E+00, 0.1581340E+00, 0.1660233E+00, &
     & 0.1462300E+00, 0.1865833E+00, 0.1928644E+00, 0.1928644E+00 /
      data (ref_adm( 6,iz,21, 4),iz = 1,20) / &
     & 0.1556573E+00, 0.1556573E+00, 0.1523847E+00, 0.1493738E+00, &
     & 0.1471742E+00, 0.1460235E+00, 0.1448155E+00, 0.1435843E+00, &
     & 0.1429816E+00, 0.1429929E+00, 0.1437997E+00, 0.1460143E+00, &
     & 0.1492611E+00, 0.1528509E+00, 0.1583508E+00, 0.1661694E+00, &
     & 0.1750363E+00, 0.1363600E+00, 0.1927265E+00, 0.1927265E+00 /
      data (ref_adm( 6,iz,22, 4),iz = 1,20) / &
     & 0.1595339E+00, 0.1595339E+00, 0.1566790E+00, 0.1556901E+00, &
     & 0.1549084E+00, 0.1543738E+00, 0.1534315E+00, 0.1518261E+00, &
     & 0.1497641E+00, 0.1472950E+00, 0.1446096E+00, 0.1408812E+00, &
     & 0.1365296E+00, 0.1324317E+00, 0.1265470E+00, 0.1187974E+00, &
     & 0.1108024E+00, 0.1003417E+00, 0.8187108E-01, 0.8187108E-01 /
      data (ref_adm( 6,iz,23, 4),iz = 1,20) / &
     & 0.1595339E+00, 0.1595339E+00, 0.1566790E+00, 0.1556901E+00, &
     & 0.1549084E+00, 0.1543738E+00, 0.1534315E+00, 0.1518261E+00, &
     & 0.1497641E+00, 0.1472950E+00, 0.1446095E+00, 0.1408812E+00, &
     & 0.1365296E+00, 0.1324317E+00, 0.1265470E+00, 0.1187974E+00, &
     & 0.1108024E+00, 0.1003417E+00, 0.8187108E-01, 0.8187108E-01 /
      data (ref_adm( 6,iz,24, 4),iz = 1,20) / &
     & 0.1373800E+00, 0.1373800E+00, 0.1887600E+00, 0.1556901E+00, &
     & 0.1549084E+00, 0.1543738E+00, 0.1534315E+00, 0.1518261E+00, &
     & 0.1497641E+00, 0.1472950E+00, 0.1446096E+00, 0.1408812E+00, &
     & 0.1365296E+00, 0.1324317E+00, 0.1265470E+00, 0.1187974E+00, &
     & 0.1108024E+00, 0.1003417E+00, 0.8187108E-01, 0.8187108E-01 /
      data (ref_adm( 6,iz,25, 4),iz = 1,20) / &
     & 0.1621900E+00, 0.1621900E+00, 0.1566790E+00, 0.1556901E+00, &
     & 0.1549084E+00, 0.1543738E+00, 0.1534315E+00, 0.1518261E+00, &
     & 0.1497641E+00, 0.1472950E+00, 0.1446095E+00, 0.1408812E+00, &
     & 0.1365296E+00, 0.1324317E+00, 0.1265470E+00, 0.1187974E+00, &
     & 0.1108024E+00, 0.1003417E+00, 0.8187108E-01, 0.8187108E-01 /
      data (ref_adm( 6,iz,26, 4),iz = 1,20) / &
     & 0.1595339E+00, 0.1595339E+00, 0.1566790E+00, 0.1556901E+00, &
     & 0.1549084E+00, 0.1543738E+00, 0.1534315E+00, 0.1518261E+00, &
     & 0.1497641E+00, 0.1472950E+00, 0.1446096E+00, 0.1408812E+00, &
     & 0.1365296E+00, 0.1324317E+00, 0.1265470E+00, 0.1187974E+00, &
     & 0.1108024E+00, 0.1003417E+00, 0.8187108E-01, 0.8187108E-01 /
      data (ref_adm( 6,iz,27, 4),iz = 1,20) / &
     & 0.1595339E+00, 0.1595339E+00, 0.1566790E+00, 0.1556901E+00, &
     & 0.1549084E+00, 0.1543738E+00, 0.1534315E+00, 0.1518261E+00, &
     & 0.1497641E+00, 0.1472950E+00, 0.1446095E+00, 0.1408812E+00, &
     & 0.1365296E+00, 0.1324317E+00, 0.1265470E+00, 0.1187974E+00, &
     & 0.1108024E+00, 0.1003417E+00, 0.8187108E-01, 0.8187108E-01 /
      data (ref_adm( 6,iz,28, 4),iz = 1,20) / &
     & 0.1595339E+00, 0.1595339E+00, 0.1566790E+00, 0.1556901E+00, &
     & 0.1549084E+00, 0.1543738E+00, 0.1534315E+00, 0.1518261E+00, &
     & 0.1497641E+00, 0.1472950E+00, 0.1446096E+00, 0.1408812E+00, &
     & 0.1365296E+00, 0.1324317E+00, 0.1265470E+00, 0.1187974E+00, &
     & 0.1108024E+00, 0.1003417E+00, 0.8187108E-01, 0.8187108E-01 /
      data (ref_adm( 6,iz,29, 4),iz = 1,20) / &
     & 0.1595339E+00, 0.1595339E+00, 0.1566790E+00, 0.1556901E+00, &
     & 0.1549084E+00, 0.1543738E+00, 0.1534315E+00, 0.1518261E+00, &
     & 0.1497641E+00, 0.1472950E+00, 0.1446095E+00, 0.1408812E+00, &
     & 0.1365296E+00, 0.1324317E+00, 0.1265470E+00, 0.1187974E+00, &
     & 0.1108024E+00, 0.1003417E+00, 0.8187108E-01, 0.8187108E-01 /
      data (ref_adm( 6,iz,30, 4),iz = 1,20) / &
     & 0.1595339E+00, 0.1595339E+00, 0.1566790E+00, 0.1556901E+00, &
     & 0.1549084E+00, 0.1543738E+00, 0.1534315E+00, 0.1518261E+00, &
     & 0.1497641E+00, 0.1472950E+00, 0.1446096E+00, 0.1408812E+00, &
     & 0.1365296E+00, 0.1324317E+00, 0.1265470E+00, 0.1187974E+00, &
     & 0.1108024E+00, 0.1003417E+00, 0.8187108E-01, 0.8187108E-01 /
      data (ref_adm( 6,iz,31, 4),iz = 1,20) / &
     & 0.1595339E+00, 0.1595339E+00, 0.1566790E+00, 0.1556901E+00, &
     & 0.1549084E+00, 0.1543738E+00, 0.1534315E+00, 0.1518261E+00, &
     & 0.1497641E+00, 0.1472950E+00, 0.1446095E+00, 0.1408812E+00, &
     & 0.1365296E+00, 0.1324317E+00, 0.1265470E+00, 0.1187974E+00, &
     & 0.1108024E+00, 0.1003417E+00, 0.8187108E-01, 0.8187108E-01 /
      data (ref_adm( 6,iz,32, 4),iz = 1,20) / &
     & 0.1595339E+00, 0.1595339E+00, 0.1566790E+00, 0.1556901E+00, &
     & 0.1549084E+00, 0.1543738E+00, 0.1534315E+00, 0.1518261E+00, &
     & 0.1497641E+00, 0.1472950E+00, 0.1446096E+00, 0.1408812E+00, &
     & 0.1365296E+00, 0.1324317E+00, 0.1265470E+00, 0.1187974E+00, &
     & 0.1108024E+00, 0.1003417E+00, 0.8187108E-01, 0.8187108E-01 /
      data (ref_adm( 6,iz,33, 4),iz = 1,20) / &
     & 0.1595339E+00, 0.1595339E+00, 0.1566790E+00, 0.1556901E+00, &
     & 0.1549084E+00, 0.1543738E+00, 0.1534315E+00, 0.1518261E+00, &
     & 0.1497641E+00, 0.1472950E+00, 0.1446095E+00, 0.1408812E+00, &
     & 0.1365296E+00, 0.1324317E+00, 0.1265470E+00, 0.1187974E+00, &
     & 0.1108024E+00, 0.1003417E+00, 0.8187108E-01, 0.8187108E-01 /
      data (ref_adm( 6,iz,34, 4),iz = 1,20) / &
     & 0.1595339E+00, 0.1595339E+00, 0.1566790E+00, 0.1556901E+00, &
     & 0.1549084E+00, 0.1543738E+00, 0.1534315E+00, 0.1518261E+00, &
     & 0.1497641E+00, 0.1472950E+00, 0.1446096E+00, 0.1408812E+00, &
     & 0.1365296E+00, 0.1324317E+00, 0.1265470E+00, 0.1187974E+00, &
     & 0.1108024E+00, 0.1003417E+00, 0.8187108E-01, 0.8187108E-01 /
      data (ref_adm( 6,iz,35, 4),iz = 1,20) / &
     & 0.1595339E+00, 0.1595339E+00, 0.1566790E+00, 0.1556901E+00, &
     & 0.1549084E+00, 0.1543738E+00, 0.1534315E+00, 0.1518261E+00, &
     & 0.1497641E+00, 0.1472950E+00, 0.1446095E+00, 0.1408812E+00, &
     & 0.1365296E+00, 0.1324317E+00, 0.1265470E+00, 0.1187974E+00, &
     & 0.1108024E+00, 0.1003417E+00, 0.8187108E-01, 0.8187108E-01 /
      data (ref_adm( 6,iz,36, 4),iz = 1,20) / &
     & 0.1610100E+00, 0.1610100E+00, 0.1566790E+00, 0.1556901E+00, &
     & 0.1549084E+00, 0.1543738E+00, 0.1534315E+00, 0.1518261E+00, &
     & 0.1497641E+00, 0.1472950E+00, 0.1446096E+00, 0.1408812E+00, &
     & 0.1365296E+00, 0.1324317E+00, 0.1265470E+00, 0.1187974E+00, &
     & 0.1108024E+00, 0.1003417E+00, 0.8187108E-01, 0.8187108E-01 /
      data (ref_adm( 6,iz,37, 4),iz = 1,20) / &
     & 0.1448900E+00, 0.1448900E+00, 0.1566790E+00, 0.1556901E+00, &
     & 0.1549084E+00, 0.1543738E+00, 0.1534315E+00, 0.1518261E+00, &
     & 0.1497641E+00, 0.1472950E+00, 0.1446096E+00, 0.1408812E+00, &
     & 0.1365296E+00, 0.1324317E+00, 0.1265470E+00, 0.1187974E+00, &
     & 0.1108024E+00, 0.1003417E+00, 0.8187108E-01, 0.8187108E-01 /
      data (ref_adm( 6,iz,38, 4),iz = 1,20) / &
     & 0.1448900E+00, 0.1448900E+00, 0.1566790E+00, 0.1556901E+00, &
     & 0.1549084E+00, 0.1543738E+00, 0.1534315E+00, 0.1518261E+00, &
     & 0.1497641E+00, 0.1472950E+00, 0.1446096E+00, 0.1408812E+00, &
     & 0.1365296E+00, 0.1324317E+00, 0.1265470E+00, 0.1187974E+00, &
     & 0.1108024E+00, 0.1003417E+00, 0.8187108E-01, 0.8187108E-01 /
! Solar Zenith Angle 20.0 Albedo  0.1758325E+00
      data (ref_adm( 6,iz, 1, 5),iz = 1,20) / &
     & 0.1689900E+00, 0.1689900E+00, 0.1743300E+00, 0.1706200E+00, &
     & 0.1920500E+00, 0.1919900E+00, 0.1537000E+00, 0.1390000E+00, &
     & 0.1388100E+00, 0.1545200E+00, 0.1777200E+00, 0.1527530E+00, &
     & 0.1196100E+00, 0.1599573E+00, 0.1657570E+00, 0.1740139E+00, &
     & 0.1834095E+00, 0.1956539E+00, 0.2021708E+00, 0.2021708E+00 /
      data (ref_adm( 6,iz, 2, 5),iz = 1,20) / &
     & 0.1689900E+00, 0.1689900E+00, 0.1743300E+00, 0.1706200E+00, &
     & 0.1920500E+00, 0.1919900E+00, 0.1537000E+00, 0.1390000E+00, &
     & 0.1388100E+00, 0.1545200E+00, 0.1777200E+00, 0.1527530E+00, &
     & 0.1196100E+00, 0.1599573E+00, 0.1657570E+00, 0.1740139E+00, &
     & 0.1834095E+00, 0.1956539E+00, 0.2021708E+00, 0.2021708E+00 /
      data (ref_adm( 6,iz, 3, 5),iz = 1,20) / &
     & 0.1754200E+00, 0.1754200E+00, 0.1813300E+00, 0.1928500E+00, &
     & 0.1782600E+00, 0.1734300E+00, 0.1761500E+00, 0.1592000E+00, &
     & 0.1498100E+00, 0.1889600E+00, 0.1504737E+00, 0.1399300E+00, &
     & 0.1098000E+00, 0.1517000E+00, 0.1657570E+00, 0.1569000E+00, &
     & 0.1834095E+00, 0.1956538E+00, 0.3125826E-08, 0.3125826E-08 /
      data (ref_adm( 6,iz, 4, 5),iz = 1,20) / &
     & 0.1902200E+00, 0.1902200E+00, 0.1786000E+00, 0.1721000E+00, &
     & 0.1687100E+00, 0.1729000E+00, 0.1631100E+00, 0.1412000E+00, &
     & 0.1745400E+00, 0.1528800E+00, 0.1396500E+00, 0.1334400E+00, &
     & 0.1364100E+00, 0.1599573E+00, 0.1344900E+00, 0.1740139E+00, &
     & 0.1834095E+00, 0.1956539E+00, 0.2021708E+00, 0.2021708E+00 /
      data (ref_adm( 6,iz, 5, 5),iz = 1,20) / &
     & 0.1641200E+00, 0.1641200E+00, 0.1719400E+00, 0.1780100E+00, &
     & 0.1529400E+00, 0.1582900E+00, 0.1537600E+00, 0.1478600E+00, &
     & 0.1568700E+00, 0.1590200E+00, 0.1344600E+00, 0.1444200E+00, &
     & 0.1331600E+00, 0.1262700E+00, 0.1373800E+00, 0.1740139E+00, &
     & 0.1402100E+00, 0.1359700E+00, 0.2021709E+00, 0.2021709E+00 /
      data (ref_adm( 6,iz, 6, 5),iz = 1,20) / &
     & 0.1710000E+00, 0.1710000E+00, 0.1595700E+00, 0.1648600E+00, &
     & 0.1548100E+00, 0.1514000E+00, 0.1438300E+00, 0.1508000E+00, &
     & 0.1423100E+00, 0.1472400E+00, 0.1449200E+00, 0.1555600E+00, &
     & 0.1582400E+00, 0.1452700E+00, 0.1410900E+00, 0.1740139E+00, &
     & 0.1834095E+00, 0.1956539E+00, 0.2021708E+00, 0.2021708E+00 /
      data (ref_adm( 6,iz, 7, 5),iz = 1,20) / &
     & 0.1848800E+00, 0.1848800E+00, 0.1767900E+00, 0.1575400E+00, &
     & 0.1431900E+00, 0.1390000E+00, 0.1252000E+00, 0.1675800E+00, &
     & 0.1323500E+00, 0.1339700E+00, 0.1352600E+00, 0.1245500E+00, &
     & 0.1513100E+00, 0.1496700E+00, 0.1669000E+00, 0.1740139E+00, &
     & 0.1302200E+00, 0.1956538E+00, 0.2021709E+00, 0.2021709E+00 /
      data (ref_adm( 6,iz, 8, 5),iz = 1,20) / &
     & 0.1855700E+00, 0.1855700E+00, 0.1814200E+00, 0.1809900E+00, &
     & 0.1681200E+00, 0.1503500E+00, 0.1514700E+00, 0.1611400E+00, &
     & 0.1275100E+00, 0.1252200E+00, 0.1569600E+00, 0.1229000E+00, &
     & 0.1288100E+00, 0.1405500E+00, 0.1509500E+00, 0.1740139E+00, &
     & 0.1294000E+00, 0.1956539E+00, 0.2021708E+00, 0.2021708E+00 /
      data (ref_adm( 6,iz, 9, 5),iz = 1,20) / &
     & 0.1792200E+00, 0.1792200E+00, 0.1760700E+00, 0.1713200E+00, &
     & 0.1771800E+00, 0.1779900E+00, 0.1570000E+00, 0.1587400E+00, &
     & 0.1478900E+00, 0.1243500E+00, 0.1034000E+00, 0.1303100E+00, &
     & 0.1254000E+00, 0.1315900E+00, 0.1360500E+00, 0.1740139E+00, &
     & 0.1834095E+00, 0.1956538E+00, 0.2021709E+00, 0.2021709E+00 /
      data (ref_adm( 6,iz,10, 5),iz = 1,20) / &
     & 0.1753600E+00, 0.1753600E+00, 0.1746700E+00, 0.1783100E+00, &
     & 0.1667000E+00, 0.1627800E+00, 0.1530500E+00, 0.1605900E+00, &
     & 0.1567500E+00, 0.1416200E+00, 0.1442000E+00, 0.1425500E+00, &
     & 0.1529300E+00, 0.1289900E+00, 0.1657570E+00, 0.1329100E+00, &
     & 0.1562700E+00, 0.1956539E+00, 0.2021708E+00, 0.2021708E+00 /
      data (ref_adm( 6,iz,11, 5),iz = 1,20) / &
     & 0.1786800E+00, 0.1786800E+00, 0.1920600E+00, 0.2011200E+00, &
     & 0.1532500E+00, 0.1507600E+00, 0.1382600E+00, 0.1623900E+00, &
     & 0.1538700E+00, 0.1480100E+00, 0.1507500E+00, 0.1295700E+00, &
     & 0.1727900E+00, 0.1599573E+00, 0.1657570E+00, 0.1740139E+00, &
     & 0.1834095E+00, 0.1956538E+00, 0.2021709E+00, 0.2021709E+00 /
      data (ref_adm( 6,iz,12, 5),iz = 1,20) / &
     & 0.1933400E+00, 0.1933400E+00, 0.2037100E+00, 0.1757700E+00, &
     & 0.1573300E+00, 0.2029400E+00, 0.1877000E+00, 0.1575000E+00, &
     & 0.1524100E+00, 0.1484900E+00, 0.1384000E+00, 0.1490400E+00, &
     & 0.1541600E+00, 0.1653500E+00, 0.1215100E+00, 0.1740139E+00, &
     & 0.1834095E+00, 0.1573700E+00, 0.2021708E+00, 0.2021708E+00 /
      data (ref_adm( 6,iz,13, 5),iz = 1,20) / &
     & 0.1994300E+00, 0.1994300E+00, 0.1609763E+00, 0.1571487E+00, &
     & 0.1921100E+00, 0.1831000E+00, 0.1853000E+00, 0.1503886E+00, &
     & 0.1574800E+00, 0.1329900E+00, 0.1175900E+00, 0.1359700E+00, &
     & 0.1506500E+00, 0.1562900E+00, 0.1657570E+00, 0.1740139E+00, &
     & 0.1834095E+00, 0.1956538E+00, 0.2021709E+00, 0.2021709E+00 /
      data (ref_adm( 6,iz,14, 5),iz = 1,20) / &
     & 0.1706700E+00, 0.1706700E+00, 0.1792500E+00, 0.1775200E+00, &
     & 0.1915200E+00, 0.1267700E+00, 0.1563500E+00, 0.1503886E+00, &
     & 0.1496772E+00, 0.1378700E+00, 0.1494300E+00, 0.1527530E+00, &
     & 0.1282700E+00, 0.1533300E+00, 0.1657570E+00, 0.1560300E+00, &
     & 0.1834095E+00, 0.1956539E+00, 0.1234100E+00, 0.1234100E+00 /
      data (ref_adm( 6,iz,15, 5),iz = 1,20) / &
     & 0.2496800E+00, 0.2496800E+00, 0.2009200E+00, 0.1866200E+00, &
     & 0.1688100E+00, 0.1472900E+00, 0.1679400E+00, 0.1713900E+00, &
     & 0.1496772E+00, 0.1523200E+00, 0.1465700E+00, 0.1314100E+00, &
     & 0.1309300E+00, 0.1274500E+00, 0.1657570E+00, 0.1740139E+00, &
     & 0.1834095E+00, 0.1956538E+00, 0.2021709E+00, 0.2021709E+00 /
      data (ref_adm( 6,iz,16, 5),iz = 1,20) / &
     & 0.1889200E+00, 0.1889200E+00, 0.2114800E+00, 0.1780400E+00, &
     & 0.1771400E+00, 0.1287200E+00, 0.1421400E+00, 0.1553400E+00, &
     & 0.1321600E+00, 0.1343600E+00, 0.1427200E+00, 0.1483600E+00, &
     & 0.1437500E+00, 0.1546000E+00, 0.1657570E+00, 0.1740139E+00, &
     & 0.1834095E+00, 0.1956539E+00, 0.2021708E+00, 0.2021708E+00 /
      data (ref_adm( 6,iz,17, 5),iz = 1,20) / &
     & 0.1886400E+00, 0.1886400E+00, 0.1963000E+00, 0.1912500E+00, &
     & 0.1762800E+00, 0.1560800E+00, 0.1800700E+00, 0.1444900E+00, &
     & 0.2090300E+00, 0.1524200E+00, 0.1504737E+00, 0.1498800E+00, &
     & 0.1561889E+00, 0.1402800E+00, 0.1317200E+00, 0.1318900E+00, &
     & 0.1834095E+00, 0.1956538E+00, 0.2021709E+00, 0.2021709E+00 /
      data (ref_adm( 6,iz,18, 5),iz = 1,20) / &
     & 0.2026100E+00, 0.2026100E+00, 0.2014200E+00, 0.1625800E+00, &
     & 0.1868400E+00, 0.1797900E+00, 0.1856600E+00, 0.1527500E+00, &
     & 0.1400600E+00, 0.1524200E+00, 0.1795500E+00, 0.1276800E+00, &
     & 0.1666643E+00, 0.1323200E+00, 0.1348300E+00, 0.1856849E+00, &
     & 0.1717700E+00, 0.2087762E+00, 0.2157304E+00, 0.2157304E+00 /
      data (ref_adm( 6,iz,19, 5),iz = 1,20) / &
     & 0.1680700E+00, 0.1680700E+00, 0.1571700E+00, 0.1809100E+00, &
     & 0.1792900E+00, 0.1967500E+00, 0.2041400E+00, 0.1633400E+00, &
     & 0.1597159E+00, 0.1530800E+00, 0.1605658E+00, 0.1490500E+00, &
     & 0.1638800E+00, 0.1706855E+00, 0.1402500E+00, 0.1317400E+00, &
     & 0.1957108E+00, 0.2087762E+00, 0.2157304E+00, 0.2157304E+00 /
      data (ref_adm( 6,iz,20, 5),iz = 1,20) / &
     & 0.1872000E+00, 0.1872000E+00, 0.1717728E+00, 0.1907400E+00, &
     & 0.1686100E+00, 0.1634619E+00, 0.1839300E+00, 0.1993400E+00, &
     & 0.1760200E+00, 0.1702800E+00, 0.1785700E+00, 0.1388300E+00, &
     & 0.1490400E+00, 0.1536000E+00, 0.1269100E+00, 0.1328900E+00, &
     & 0.1957108E+00, 0.2087762E+00, 0.2157304E+00, 0.2157304E+00 /
      data (ref_adm( 6,iz,21, 5),iz = 1,20) / &
     & 0.1971900E+00, 0.1971900E+00, 0.1654700E+00, 0.1848500E+00, &
     & 0.1725900E+00, 0.1941400E+00, 0.1619975E+00, 0.1604751E+00, &
     & 0.1681600E+00, 0.1596683E+00, 0.1457900E+00, 0.1629981E+00, &
     & 0.1499500E+00, 0.1652700E+00, 0.1781400E+00, 0.1425300E+00, &
     & 0.1436300E+00, 0.2087762E+00, 0.2157304E+00, 0.2157304E+00 /
      data (ref_adm( 6,iz,22, 5),iz = 1,20) / &
     & 0.1836500E+00, 0.1836500E+00, 0.1902100E+00, 0.1780100E+00, &
     & 0.1981500E+00, 0.2060500E+00, 0.1848000E+00, 0.1846830E+00, &
     & 0.2124000E+00, 0.1850537E+00, 0.1230800E+00, 0.1723200E+00, &
     & 0.1899970E+00, 0.1556400E+00, 0.1447000E+00, 0.2013695E+00, &
     & 0.2070072E+00, 0.2141921E+00, 0.2131167E+00, 0.2131167E+00 /
      data (ref_adm( 6,iz,23, 5),iz = 1,20) / &
     & 0.1894300E+00, 0.1894300E+00, 0.2073900E+00, 0.1815000E+00, &
     & 0.1741300E+00, 0.2159000E+00, 0.1882900E+00, 0.1927800E+00, &
     & 0.2121300E+00, 0.1683600E+00, 0.1874291E+00, 0.1599900E+00, &
     & 0.1773400E+00, 0.2064600E+00, 0.1901000E+00, 0.2019726E+00, &
     & 0.2074068E+00, 0.2141370E+00, 0.2126659E+00, 0.2126659E+00 /
      data (ref_adm( 6,iz,24, 5),iz = 1,20) / &
     & 0.1844274E+00, 0.1844274E+00, 0.1769400E+00, 0.1818000E+00, &
     & 0.1969300E+00, 0.1610800E+00, 0.1850600E+00, 0.1820700E+00, &
     & 0.1880935E+00, 0.1883839E+00, 0.1890673E+00, 0.1513900E+00, &
     & 0.1927073E+00, 0.1948564E+00, 0.1980879E+00, 0.1668400E+00, &
     & 0.2079539E+00, 0.2141599E+00, 0.2124318E+00, 0.2124318E+00 /
      data (ref_adm( 6,iz,25, 5),iz = 1,20) / &
     & 0.1845474E+00, 0.1845474E+00, 0.1861132E+00, 0.1742600E+00, &
     & 0.2178400E+00, 0.1860700E+00, 0.1604900E+00, 0.1630700E+00, &
     & 0.1898330E+00, 0.1603600E+00, 0.1907424E+00, 0.1921701E+00, &
     & 0.1941711E+00, 0.1963016E+00, 0.1992646E+00, 0.1645100E+00, &
     & 0.1629200E+00, 0.2143368E+00, 0.2124733E+00, 0.2124733E+00 /
      data (ref_adm( 6,iz,26, 5),iz = 1,20) / &
     & 0.1939400E+00, 0.1939400E+00, 0.1899800E+00, 0.1972800E+00, &
     & 0.1953800E+00, 0.1799200E+00, 0.2160800E+00, 0.1915124E+00, &
     & 0.1916689E+00, 0.1920285E+00, 0.1999500E+00, 0.2139700E+00, &
     & 0.1956939E+00, 0.1977124E+00, 0.2006272E+00, 0.2046460E+00, &
     & 0.2093230E+00, 0.2146367E+00, 0.2125600E+00, 0.2125600E+00 /
      data (ref_adm( 6,iz,27, 5),iz = 1,20) / &
     & 0.2283700E+00, 0.2283700E+00, 0.2079900E+00, 0.2114100E+00, &
     & 0.1983300E+00, 0.1912272E+00, 0.1923395E+00, 0.2241300E+00, &
     & 0.1989000E+00, 0.2049500E+00, 0.1944354E+00, 0.1956163E+00, &
     & 0.1973185E+00, 0.1991706E+00, 0.2020242E+00, 0.2058289E+00, &
     & 0.2101269E+00, 0.2151299E+00, 0.2127843E+00, 0.2127843E+00 /
      data (ref_adm( 6,iz,28, 5),iz = 1,20) / &
     & 0.1848307E+00, 0.1848307E+00, 0.1963300E+00, 0.1774200E+00, &
     & 0.2134400E+00, 0.2150500E+00, 0.1916900E+00, 0.1946590E+00, &
     & 0.1953799E+00, 0.1957223E+00, 0.1962946E+00, 0.1973580E+00, &
     & 0.1989887E+00, 0.2007057E+00, 0.2034529E+00, 0.2070632E+00, &
     & 0.2111244E+00, 0.2157363E+00, 0.2131132E+00, 0.2131132E+00 /
      data (ref_adm( 6,iz,29, 5),iz = 1,20) / &
     & 0.2236700E+00, 0.2236700E+00, 0.1918900E+00, 0.1826900E+00, &
     & 0.1922495E+00, 0.1704400E+00, 0.1893200E+00, 0.1959958E+00, &
     & 0.1782700E+00, 0.1975743E+00, 0.1981231E+00, 0.2043800E+00, &
     & 0.2006358E+00, 0.2022738E+00, 0.2048259E+00, 0.2083420E+00, &
     & 0.2121145E+00, 0.2163623E+00, 0.2135799E+00, 0.2135799E+00 /
      data (ref_adm( 6,iz,30, 5),iz = 1,20) / &
     & 0.1714400E+00, 0.1714400E+00, 0.1584400E+00, 0.1786300E+00, &
     & 0.1935095E+00, 0.2064500E+00, 0.1961224E+00, 0.1939300E+00, &
     & 0.2384000E+00, 0.2298100E+00, 0.1998762E+00, 0.2008774E+00, &
     & 0.2022569E+00, 0.2038144E+00, 0.2062159E+00, 0.2096564E+00, &
     & 0.2131987E+00, 0.2170548E+00, 0.2141447E+00, 0.2141447E+00 /
      data (ref_adm( 6,iz,31, 5),iz = 1,20) / &
     & 0.1580000E+00, 0.1580000E+00, 0.1865400E+00, 0.1898000E+00, &
     & 0.1990300E+00, 0.1778400E+00, 0.1931100E+00, 0.1984875E+00, &
     & 0.1997298E+00, 0.2008960E+00, 0.2015574E+00, 0.2025073E+00, &
     & 0.2038117E+00, 0.2052837E+00, 0.2075287E+00, 0.2108687E+00, &
     & 0.2142861E+00, 0.2177354E+00, 0.2147212E+00, 0.2147212E+00 /
      data (ref_adm( 6,iz,32, 5),iz = 1,20) / &
     & 0.1784100E+00, 0.1784100E+00, 0.1974700E+00, 0.2019600E+00, &
     & 0.1863900E+00, 0.1834200E+00, 0.2118900E+00, 0.1997784E+00, &
     & 0.2008494E+00, 0.2021696E+00, 0.2030975E+00, 0.2040252E+00, &
     & 0.2052328E+00, 0.2065945E+00, 0.2087955E+00, 0.2119783E+00, &
     & 0.2153132E+00, 0.2184595E+00, 0.2153098E+00, 0.2153098E+00 /
      data (ref_adm( 6,iz,33, 5),iz = 1,20) / &
     & 0.1901600E+00, 0.1901600E+00, 0.1738700E+00, 0.1959300E+00, &
     & 0.2184100E+00, 0.2188200E+00, 0.2190900E+00, 0.2011214E+00, &
     & 0.2374500E+00, 0.2032582E+00, 0.2043911E+00, 0.2053694E+00, &
     & 0.2065855E+00, 0.2078586E+00, 0.2099221E+00, 0.2130203E+00, &
     & 0.2162523E+00, 0.2191905E+00, 0.2158612E+00, 0.2158612E+00 /
      data (ref_adm( 6,iz,34, 5),iz = 1,20) / &
     & 0.1818100E+00, 0.1818100E+00, 0.1661300E+00, 0.2003400E+00, &
     & 0.2007600E+00, 0.2101100E+00, 0.1936900E+00, 0.2270700E+00, &
     & 0.2029230E+00, 0.1996200E+00, 0.2083800E+00, 0.2065029E+00, &
     & 0.2076156E+00, 0.2088397E+00, 0.2108470E+00, 0.2138407E+00, &
     & 0.2170018E+00, 0.2197205E+00, 0.2163558E+00, 0.2163558E+00 /
      data (ref_adm( 6,iz,35, 5),iz = 1,20) / &
     & 0.1811900E+00, 0.1811900E+00, 0.1746300E+00, 0.1752600E+00, &
     & 0.2172900E+00, 0.2035861E+00, 0.1983600E+00, 0.1944800E+00, &
     & 0.2037957E+00, 0.2048559E+00, 0.1716100E+00, 0.2073908E+00, &
     & 0.2085059E+00, 0.2097105E+00, 0.2116290E+00, 0.2145142E+00, &
     & 0.2175795E+00, 0.2202460E+00, 0.2167551E+00, 0.2167551E+00 /
      data (ref_adm( 6,iz,36, 5),iz = 1,20) / &
     & 0.1931000E+00, 0.1931000E+00, 0.1900600E+00, 0.1954137E+00, &
     & 0.2282200E+00, 0.2178300E+00, 0.2009600E+00, 0.2045590E+00, &
     & 0.2044232E+00, 0.1612700E+00, 0.2067264E+00, 0.2080018E+00, &
     & 0.2090594E+00, 0.2102592E+00, 0.2121370E+00, 0.2150029E+00, &
     & 0.2180592E+00, 0.2206203E+00, 0.2170666E+00, 0.2170666E+00 /
      data (ref_adm( 6,iz,37, 5),iz = 1,20) / &
     & 0.2231900E+00, 0.2231900E+00, 0.1741000E+00, 0.1581200E+00, &
     & 0.2220500E+00, 0.2376600E+00, 0.2566600E+00, 0.2533500E+00, &
     & 0.2048087E+00, 0.2056123E+00, 0.2070289E+00, 0.2083318E+00, &
     & 0.2094114E+00, 0.2105827E+00, 0.2124400E+00, 0.2152941E+00, &
     & 0.2182684E+00, 0.2208036E+00, 0.2172210E+00, 0.2172210E+00 /
      data (ref_adm( 6,iz,38, 5),iz = 1,20) / &
     & 0.2231900E+00, 0.2231900E+00, 0.1741000E+00, 0.1581200E+00, &
     & 0.2220500E+00, 0.2376600E+00, 0.2566600E+00, 0.2533500E+00, &
     & 0.2048087E+00, 0.2056123E+00, 0.2070289E+00, 0.2083318E+00, &
     & 0.2094114E+00, 0.2105827E+00, 0.2124400E+00, 0.2152941E+00, &
     & 0.2182684E+00, 0.2208036E+00, 0.2172210E+00, 0.2172210E+00 /
! Solar Zenith Angle 25.0 Albedo  0.1747206E+00
      data (ref_adm( 6,iz, 1, 6),iz = 1,20) / &
     & 0.1461400E+00, 0.1461400E+00, 0.1575500E+00, 0.1657600E+00, &
     & 0.1472800E+00, 0.1489500E+00, 0.1723600E+00, 0.1719700E+00, &
     & 0.1609700E+00, 0.1226200E+00, 0.1104800E+00, 0.1342700E+00, &
     & 0.1516118E+00, 0.1324700E+00, 0.1608996E+00, 0.1689144E+00, &
     & 0.1604800E+00, 0.1899203E+00, 0.1504600E+00, 0.1504600E+00 /
      data (ref_adm( 6,iz, 2, 6),iz = 1,20) / &
     & 0.1461400E+00, 0.1461400E+00, 0.1575500E+00, 0.1657600E+00, &
     & 0.1472800E+00, 0.1489500E+00, 0.1723600E+00, 0.1719700E+00, &
     & 0.1609700E+00, 0.1226200E+00, 0.1104800E+00, 0.1342700E+00, &
     & 0.1516118E+00, 0.1324700E+00, 0.1608996E+00, 0.1689144E+00, &
     & 0.1604800E+00, 0.1899203E+00, 0.1504600E+00, 0.1504600E+00 /
      data (ref_adm( 6,iz, 3, 6),iz = 1,20) / &
     & 0.1440300E+00, 0.1440300E+00, 0.1684500E+00, 0.1900400E+00, &
     & 0.1779700E+00, 0.1459700E+00, 0.1534400E+00, 0.1782500E+00, &
     & 0.1458800E+00, 0.1070300E+00, 0.1460641E+00, 0.1254100E+00, &
     & 0.1516118E+00, 0.1552699E+00, 0.1608996E+00, 0.1689144E+00, &
     & 0.1780349E+00, 0.1899203E+00, 0.3034225E-08, 0.3034225E-08 /
      data (ref_adm( 6,iz, 4, 6),iz = 1,20) / &
     & 0.1797300E+00, 0.1797300E+00, 0.1834700E+00, 0.1737500E+00, &
     & 0.1689900E+00, 0.1943900E+00, 0.1884200E+00, 0.1779000E+00, &
     & 0.1198300E+00, 0.1452477E+00, 0.1221900E+00, 0.1482766E+00, &
     & 0.1170200E+00, 0.1552699E+00, 0.1574900E+00, 0.1740600E+00, &
     & 0.1780349E+00, 0.1303400E+00, 0.1962463E+00, 0.1962463E+00 /
      data (ref_adm( 6,iz, 5, 6),iz = 1,20) / &
     & 0.1715600E+00, 0.1715600E+00, 0.1777700E+00, 0.1677500E+00, &
     & 0.1476700E+00, 0.1581500E+00, 0.1632400E+00, 0.1346400E+00, &
     & 0.1356400E+00, 0.1299400E+00, 0.1472900E+00, 0.1482766E+00, &
     & 0.1516118E+00, 0.1552699E+00, 0.1608996E+00, 0.1212200E+00, &
     & 0.1467100E+00, 0.1899203E+00, 0.1962463E+00, 0.1962463E+00 /
      data (ref_adm( 6,iz, 6, 6),iz = 1,20) / &
     & 0.1644500E+00, 0.1644500E+00, 0.1822000E+00, 0.1605200E+00, &
     & 0.1558600E+00, 0.1500100E+00, 0.1586900E+00, 0.1616800E+00, &
     & 0.1452908E+00, 0.1291600E+00, 0.1460641E+00, 0.1403800E+00, &
     & 0.1554800E+00, 0.1552699E+00, 0.1335600E+00, 0.1689144E+00, &
     & 0.1780349E+00, 0.1899203E+00, 0.1962463E+00, 0.1962463E+00 /
      data (ref_adm( 6,iz, 7, 6),iz = 1,20) / &
     & 0.1625900E+00, 0.1625900E+00, 0.1474800E+00, 0.1475800E+00, &
     & 0.1407700E+00, 0.1468500E+00, 0.1518100E+00, 0.1528900E+00, &
     & 0.1401900E+00, 0.1242800E+00, 0.1451100E+00, 0.1133300E+00, &
     & 0.1407000E+00, 0.1261200E+00, 0.1608996E+00, 0.1520000E+00, &
     & 0.1780349E+00, 0.1452100E+00, 0.1962463E+00, 0.1962463E+00 /
      data (ref_adm( 6,iz, 8, 6),iz = 1,20) / &
     & 0.1529000E+00, 0.1529000E+00, 0.1778900E+00, 0.1323400E+00, &
     & 0.1541800E+00, 0.1644700E+00, 0.1391200E+00, 0.1458000E+00, &
     & 0.1343100E+00, 0.1192200E+00, 0.1483600E+00, 0.1482766E+00, &
     & 0.1516118E+00, 0.1552699E+00, 0.1323200E+00, 0.1472200E+00, &
     & 0.1467800E+00, 0.1899203E+00, 0.1962463E+00, 0.1962463E+00 /
      data (ref_adm( 6,iz, 9, 6),iz = 1,20) / &
     & 0.1508200E+00, 0.1508200E+00, 0.1813100E+00, 0.1873000E+00, &
     & 0.1697900E+00, 0.1727500E+00, 0.1297900E+00, 0.1491400E+00, &
     & 0.1309700E+00, 0.1232600E+00, 0.1273100E+00, 0.1297400E+00, &
     & 0.1623500E+00, 0.1552699E+00, 0.1608996E+00, 0.1689144E+00, &
     & 0.1639700E+00, 0.1899203E+00, 0.1962463E+00, 0.1962463E+00 /
      data (ref_adm( 6,iz,10, 6),iz = 1,20) / &
     & 0.1693200E+00, 0.1693200E+00, 0.1727700E+00, 0.1726100E+00, &
     & 0.1818100E+00, 0.1659200E+00, 0.1658500E+00, 0.1482500E+00, &
     & 0.1532200E+00, 0.1512300E+00, 0.1542200E+00, 0.1256700E+00, &
     & 0.1372200E+00, 0.1400200E+00, 0.1452300E+00, 0.1689144E+00, &
     & 0.1555600E+00, 0.1899203E+00, 0.1962463E+00, 0.1962463E+00 /
      data (ref_adm( 6,iz,11, 6),iz = 1,20) / &
     & 0.1716300E+00, 0.1716300E+00, 0.1703400E+00, 0.1537400E+00, &
     & 0.1599100E+00, 0.1535400E+00, 0.1534000E+00, 0.1453400E+00, &
     & 0.1503000E+00, 0.1575900E+00, 0.1683100E+00, 0.1538400E+00, &
     & 0.1480300E+00, 0.1592400E+00, 0.1464200E+00, 0.1569500E+00, &
     & 0.1780349E+00, 0.1899203E+00, 0.1962463E+00, 0.1962463E+00 /
      data (ref_adm( 6,iz,12, 6),iz = 1,20) / &
     & 0.1690200E+00, 0.1690200E+00, 0.1515700E+00, 0.1661600E+00, &
     & 0.1519700E+00, 0.1462400E+00, 0.1520300E+00, 0.1488500E+00, &
     & 0.1447100E+00, 0.1432600E+00, 0.1333500E+00, 0.1249400E+00, &
     & 0.1264700E+00, 0.1325400E+00, 0.1447200E+00, 0.1689144E+00, &
     & 0.1746700E+00, 0.1899203E+00, 0.1962463E+00, 0.1962463E+00 /
      data (ref_adm( 6,iz,13, 6),iz = 1,20) / &
     & 0.1616400E+00, 0.1616400E+00, 0.1613800E+00, 0.1476800E+00, &
     & 0.1684100E+00, 0.1471600E+00, 0.1487100E+00, 0.1489000E+00, &
     & 0.1538800E+00, 0.1542300E+00, 0.1421400E+00, 0.1464300E+00, &
     & 0.1559000E+00, 0.1337900E+00, 0.1608996E+00, 0.1689144E+00, &
     & 0.1780349E+00, 0.1565600E+00, 0.1962463E+00, 0.1962463E+00 /
      data (ref_adm( 6,iz,14, 6),iz = 1,20) / &
     & 0.1625600E+00, 0.1625600E+00, 0.2009100E+00, 0.1857800E+00, &
     & 0.1662200E+00, 0.1697300E+00, 0.1591400E+00, 0.1496700E+00, &
     & 0.1504400E+00, 0.1406200E+00, 0.1328700E+00, 0.1409200E+00, &
     & 0.1520400E+00, 0.1518300E+00, 0.1268000E+00, 0.1689144E+00, &
     & 0.1780349E+00, 0.1899203E+00, 0.1238900E+00, 0.1238900E+00 /
      data (ref_adm( 6,iz,15, 6),iz = 1,20) / &
     & 0.1909200E+00, 0.1909200E+00, 0.1673100E+00, 0.1650200E+00, &
     & 0.1917100E+00, 0.1751600E+00, 0.1821800E+00, 0.1689300E+00, &
     & 0.1452908E+00, 0.1476900E+00, 0.1432800E+00, 0.1321900E+00, &
     & 0.1516118E+00, 0.1466600E+00, 0.1608996E+00, 0.1422600E+00, &
     & 0.1780349E+00, 0.1899203E+00, 0.1962463E+00, 0.1962463E+00 /
      data (ref_adm( 6,iz,16, 6),iz = 1,20) / &
     & 0.1807700E+00, 0.1807700E+00, 0.1892200E+00, 0.1682900E+00, &
     & 0.1873000E+00, 0.1245300E+00, 0.1641100E+00, 0.1651700E+00, &
     & 0.1634700E+00, 0.1435700E+00, 0.1447000E+00, 0.1405600E+00, &
     & 0.1516118E+00, 0.1266200E+00, 0.1608996E+00, 0.1269700E+00, &
     & 0.1425600E+00, 0.1899203E+00, 0.1962463E+00, 0.1962463E+00 /
      data (ref_adm( 6,iz,17, 6),iz = 1,20) / &
     & 0.1635800E+00, 0.1635800E+00, 0.1834000E+00, 0.1756600E+00, &
     & 0.1717000E+00, 0.1855700E+00, 0.1507400E+00, 0.1367700E+00, &
     & 0.1740100E+00, 0.1553000E+00, 0.1499800E+00, 0.1588800E+00, &
     & 0.1449300E+00, 0.1741200E+00, 0.1381500E+00, 0.1482300E+00, &
     & 0.1780349E+00, 0.1899203E+00, 0.1962463E+00, 0.1962463E+00 /
      data (ref_adm( 6,iz,18, 6),iz = 1,20) / &
     & 0.1592900E+00, 0.1592900E+00, 0.1810900E+00, 0.1836900E+00, &
     & 0.1455900E+00, 0.1644916E+00, 0.1438400E+00, 0.1614860E+00, &
     & 0.1908100E+00, 0.1540500E+00, 0.1615773E+00, 0.1500100E+00, &
     & 0.1677143E+00, 0.1700000E+00, 0.1745900E+00, 0.1868545E+00, &
     & 0.1969436E+00, 0.2100914E+00, 0.2170893E+00, 0.2170893E+00 /
      data (ref_adm( 6,iz,19, 6),iz = 1,20) / &
     & 0.1836300E+00, 0.1836300E+00, 0.1932100E+00, 0.2223200E+00, &
     & 0.1563300E+00, 0.1495700E+00, 0.1630180E+00, 0.1367800E+00, &
     & 0.1753400E+00, 0.1674100E+00, 0.1615773E+00, 0.1640248E+00, &
     & 0.1768900E+00, 0.1450800E+00, 0.1570700E+00, 0.1528600E+00, &
     & 0.1969436E+00, 0.2100914E+00, 0.2170893E+00, 0.2170893E+00 /
      data (ref_adm( 6,iz,20, 6),iz = 1,20) / &
     & 0.1923100E+00, 0.1923100E+00, 0.1630700E+00, 0.1763100E+00, &
     & 0.1711100E+00, 0.1678200E+00, 0.1630180E+00, 0.1614860E+00, &
     & 0.1607219E+00, 0.1606742E+00, 0.1615773E+00, 0.1615100E+00, &
     & 0.1733300E+00, 0.1617600E+00, 0.1668700E+00, 0.1868545E+00, &
     & 0.1969436E+00, 0.2100914E+00, 0.2170893E+00, 0.2170893E+00 /
      data (ref_adm( 6,iz,21, 6),iz = 1,20) / &
     & 0.1917200E+00, 0.1917200E+00, 0.1665400E+00, 0.1864000E+00, &
     & 0.1669300E+00, 0.1675900E+00, 0.1865100E+00, 0.1968100E+00, &
     & 0.1607219E+00, 0.1806600E+00, 0.1721300E+00, 0.1457800E+00, &
     & 0.1629000E+00, 0.1623600E+00, 0.1674500E+00, 0.1927600E+00, &
     & 0.1969436E+00, 0.2100914E+00, 0.2170893E+00, 0.2170893E+00 /
      data (ref_adm( 6,iz,22, 6),iz = 1,20) / &
     & 0.1629800E+00, 0.1629800E+00, 0.1637300E+00, 0.1826600E+00, &
     & 0.1856200E+00, 0.1571700E+00, 0.1738400E+00, 0.1758200E+00, &
     & 0.1992300E+00, 0.1729600E+00, 0.1743200E+00, 0.2259400E+00, &
     & 0.1860700E+00, 0.1597500E+00, 0.1663800E+00, 0.2025721E+00, &
     & 0.1880000E+00, 0.2173265E+00, 0.2169185E+00, 0.2169185E+00 /
      data (ref_adm( 6,iz,23, 6),iz = 1,20) / &
     & 0.1789400E+00, 0.1789400E+00, 0.1650600E+00, 0.1692800E+00, &
     & 0.1552500E+00, 0.2047600E+00, 0.1978300E+00, 0.1760400E+00, &
     & 0.1744600E+00, 0.1717700E+00, 0.1862900E+00, 0.1870404E+00, &
     & 0.1543700E+00, 0.1931564E+00, 0.1594400E+00, 0.2034425E+00, &
     & 0.2097973E+00, 0.2173315E+00, 0.2165548E+00, 0.2165548E+00 /
      data (ref_adm( 6,iz,24, 6),iz = 1,20) / &
     & 0.1709600E+00, 0.1709600E+00, 0.1820100E+00, 0.1593200E+00, &
     & 0.1966300E+00, 0.1807300E+00, 0.1975500E+00, 0.1911400E+00, &
     & 0.1850300E+00, 0.2185100E+00, 0.1837400E+00, 0.1912300E+00, &
     & 0.1820700E+00, 0.1429200E+00, 0.1804700E+00, 0.2045339E+00, &
     & 0.2106231E+00, 0.2174270E+00, 0.2165250E+00, 0.2165250E+00 /
      data (ref_adm( 6,iz,25, 6),iz = 1,20) / &
     & 0.1952700E+00, 0.1952700E+00, 0.1701400E+00, 0.2116500E+00, &
     & 0.1796100E+00, 0.1947300E+00, 0.1763400E+00, 0.1636200E+00, &
     & 0.1668500E+00, 0.2096200E+00, 0.1857900E+00, 0.1565300E+00, &
     & 0.1565600E+00, 0.1693100E+00, 0.1521100E+00, 0.1817800E+00, &
     & 0.2115086E+00, 0.2180131E+00, 0.2167745E+00, 0.2167745E+00 /
      data (ref_adm( 6,iz,26, 6),iz = 1,20) / &
     & 0.1613600E+00, 0.1613600E+00, 0.1684200E+00, 0.1948300E+00, &
     & 0.1802500E+00, 0.1838913E+00, 0.1854672E+00, 0.1966500E+00, &
     & 0.1699400E+00, 0.1986000E+00, 0.1796100E+00, 0.1838500E+00, &
     & 0.1701700E+00, 0.1988568E+00, 0.2160700E+00, 0.2043200E+00, &
     & 0.2128279E+00, 0.2188364E+00, 0.2172490E+00, 0.2172490E+00 /
      data (ref_adm( 6,iz,27, 6),iz = 1,20) / &
     & 0.1793400E+00, 0.1793400E+00, 0.1765400E+00, 0.1718100E+00, &
     & 0.1657100E+00, 0.2046200E+00, 0.1596900E+00, 0.1375400E+00, &
     & 0.1774000E+00, 0.1866400E+00, 0.1789600E+00, 0.1808000E+00, &
     & 0.1786900E+00, 0.1692000E+00, 0.1607700E+00, 0.2036600E+00, &
     & 0.2063200E+00, 0.2197796E+00, 0.2181076E+00, 0.2181076E+00 /
      data (ref_adm( 6,iz,28, 6),iz = 1,20) / &
     & 0.1822500E+00, 0.1822500E+00, 0.1783400E+00, 0.1845600E+00, &
     & 0.1951700E+00, 0.1975700E+00, 0.1937000E+00, 0.2008800E+00, &
     & 0.1836900E+00, 0.1945200E+00, 0.1932800E+00, 0.1974000E+00, &
     & 0.2344700E+00, 0.1921400E+00, 0.1901500E+00, 0.2115255E+00, &
     & 0.2160764E+00, 0.2209057E+00, 0.2192110E+00, 0.2192110E+00 /
      data (ref_adm( 6,iz,29, 6),iz = 1,20) / &
     & 0.1799900E+00, 0.1799900E+00, 0.1786500E+00, 0.1872200E+00, &
     & 0.2016700E+00, 0.2146600E+00, 0.2175900E+00, 0.2304100E+00, &
     & 0.2409500E+00, 0.2178800E+00, 0.1875700E+00, 0.1879800E+00, &
     & 0.1787700E+00, 0.2050300E+00, 0.2090333E+00, 0.1732500E+00, &
     & 0.2179310E+00, 0.2223508E+00, 0.2203435E+00, 0.2203435E+00 /
      data (ref_adm( 6,iz,30, 6),iz = 1,20) / &
     & 0.1711200E+00, 0.1711200E+00, 0.1953600E+00, 0.1847400E+00, &
     & 0.1910900E+00, 0.1761600E+00, 0.1887900E+00, 0.1796500E+00, &
     & 0.1442900E+00, 0.1836000E+00, 0.2039500E+00, 0.2141300E+00, &
     & 0.2058288E+00, 0.2000800E+00, 0.1748400E+00, 0.1872900E+00, &
     & 0.2199958E+00, 0.2239372E+00, 0.2215776E+00, 0.2215776E+00 /
      data (ref_adm( 6,iz,31, 6),iz = 1,20) / &
     & 0.1665600E+00, 0.1665600E+00, 0.1892900E+00, 0.1770200E+00, &
     & 0.1933200E+00, 0.1993500E+00, 0.2046000E+00, 0.1953100E+00, &
     & 0.2271500E+00, 0.1986600E+00, 0.2005900E+00, 0.1881600E+00, &
     & 0.1787100E+00, 0.1791300E+00, 0.2134612E+00, 0.2175636E+00, &
     & 0.2207600E+00, 0.2255680E+00, 0.2228847E+00, 0.2228847E+00 /
      data (ref_adm( 6,iz,32, 6),iz = 1,20) / &
     & 0.1603200E+00, 0.1603200E+00, 0.1741300E+00, 0.1625500E+00, &
     & 0.1965300E+00, 0.1988600E+00, 0.2223700E+00, 0.2025000E+00, &
     & 0.2134800E+00, 0.1987800E+00, 0.2094900E+00, 0.2064900E+00, &
     & 0.2011900E+00, 0.2065500E+00, 0.2221800E+00, 0.2194591E+00, &
     & 0.2235860E+00, 0.2271891E+00, 0.2244483E+00, 0.2244483E+00 /
      data (ref_adm( 6,iz,33, 6),iz = 1,20) / &
     & 0.1906600E+00, 0.1906600E+00, 0.1745100E+00, 0.1863900E+00, &
     & 0.1954400E+00, 0.2001800E+00, 0.2191500E+00, 0.2073800E+00, &
     & 0.2165600E+00, 0.2291100E+00, 0.2023300E+00, 0.2257800E+00, &
     & 0.1976000E+00, 0.1864400E+00, 0.2173748E+00, 0.2212768E+00, &
     & 0.2251509E+00, 0.2287267E+00, 0.2259543E+00, 0.2259543E+00 /
      data (ref_adm( 6,iz,34, 6),iz = 1,20) / &
     & 0.1631400E+00, 0.1631400E+00, 0.1845300E+00, 0.2233500E+00, &
     & 0.2100600E+00, 0.1949100E+00, 0.2296800E+00, 0.2114900E+00, &
     & 0.2143200E+00, 0.2233300E+00, 0.1990000E+00, 0.1800900E+00, &
     & 0.1979200E+00, 0.2033800E+00, 0.2190349E+00, 0.2227434E+00, &
     & 0.2264755E+00, 0.2299917E+00, 0.2271613E+00, 0.2271613E+00 /
      data (ref_adm( 6,iz,35, 6),iz = 1,20) / &
     & 0.1932600E+00, 0.1932600E+00, 0.1831900E+00, 0.1927100E+00, &
     & 0.2095000E+00, 0.2012400E+00, 0.2373500E+00, 0.2270200E+00, &
     & 0.2292800E+00, 0.2220200E+00, 0.2570500E+00, 0.2212000E+00, &
     & 0.2199800E+00, 0.2543900E+00, 0.2203381E+00, 0.2239625E+00, &
     & 0.2276494E+00, 0.2310761E+00, 0.2281907E+00, 0.2281907E+00 /
      data (ref_adm( 6,iz,36, 6),iz = 1,20) / &
     & 0.1813300E+00, 0.1813300E+00, 0.1893700E+00, 0.2015100E+00, &
     & 0.2268900E+00, 0.2190700E+00, 0.2602200E+00, 0.2467800E+00, &
     & 0.2399100E+00, 0.2076500E+00, 0.2373000E+00, 0.2443900E+00, &
     & 0.2248700E+00, 0.2185093E+00, 0.2212502E+00, 0.2248221E+00, &
     & 0.2284306E+00, 0.2317478E+00, 0.2289026E+00, 0.2289026E+00 /
      data (ref_adm( 6,iz,37, 6),iz = 1,20) / &
     & 0.1609300E+00, 0.1609300E+00, 0.1642400E+00, 0.2074700E+00, &
     & 0.2081100E+00, 0.2025700E+00, 0.1820700E+00, 0.1789600E+00, &
     & 0.2287200E+00, 0.2414100E+00, 0.2311700E+00, 0.1929500E+00, &
     & 0.2164400E+00, 0.2190353E+00, 0.2217937E+00, 0.2252671E+00, &
     & 0.2288535E+00, 0.2320883E+00, 0.2293418E+00, 0.2293418E+00 /
      data (ref_adm( 6,iz,38, 6),iz = 1,20) / &
     & 0.1609300E+00, 0.1609300E+00, 0.1642400E+00, 0.2074700E+00, &
     & 0.2081100E+00, 0.2025700E+00, 0.1820700E+00, 0.1789600E+00, &
     & 0.2287200E+00, 0.2414100E+00, 0.2311700E+00, 0.1929500E+00, &
     & 0.2164400E+00, 0.2190353E+00, 0.2217937E+00, 0.2252671E+00, &
     & 0.2288535E+00, 0.2320883E+00, 0.2293418E+00, 0.2293418E+00 /
! Solar Zenith Angle 30.0 Albedo  0.1802219E+00
      data (ref_adm( 6,iz, 1, 7),iz = 1,20) / &
     & 0.1720100E+00, 0.1720100E+00, 0.2005200E+00, 0.1972900E+00, &
     & 0.1700500E+00, 0.1605716E+00, 0.1762100E+00, 0.1888700E+00, &
     & 0.1445800E+00, 0.1448100E+00, 0.1747000E+00, 0.1786500E+00, &
     & 0.1442400E+00, 0.1676674E+00, 0.1867300E+00, 0.1977700E+00, &
     & 0.1922501E+00, 0.1850400E+00, 0.2119157E+00, 0.2119157E+00 /
      data (ref_adm( 6,iz, 2, 7),iz = 1,20) / &
     & 0.1720100E+00, 0.1720100E+00, 0.2005200E+00, 0.1972900E+00, &
     & 0.1700500E+00, 0.1605716E+00, 0.1762100E+00, 0.1888700E+00, &
     & 0.1445800E+00, 0.1448100E+00, 0.1747000E+00, 0.1786500E+00, &
     & 0.1442400E+00, 0.1676674E+00, 0.1867300E+00, 0.1977700E+00, &
     & 0.1922501E+00, 0.1850400E+00, 0.2119157E+00, 0.2119157E+00 /
      data (ref_adm( 6,iz, 3, 7),iz = 1,20) / &
     & 0.1545100E+00, 0.1545100E+00, 0.1733800E+00, 0.1678000E+00, &
     & 0.1813500E+00, 0.1570100E+00, 0.2227400E+00, 0.1594900E+00, &
     & 0.1488700E+00, 0.1299100E+00, 0.1685000E+00, 0.2025700E+00, &
     & 0.1710500E+00, 0.1536300E+00, 0.1731300E+00, 0.1575500E+00, &
     & 0.1922501E+00, 0.2050845E+00, 0.3276493E-08, 0.3276493E-08 /
      data (ref_adm( 6,iz, 4, 7),iz = 1,20) / &
     & 0.1549800E+00, 0.1549800E+00, 0.1590100E+00, 0.1457000E+00, &
     & 0.1574600E+00, 0.1718200E+00, 0.1608000E+00, 0.1500200E+00, &
     & 0.1486500E+00, 0.1792300E+00, 0.1644700E+00, 0.1907200E+00, &
     & 0.1541900E+00, 0.1790400E+00, 0.1596400E+00, 0.1684200E+00, &
     & 0.1989300E+00, 0.2050845E+00, 0.2119157E+00, 0.2119157E+00 /
      data (ref_adm( 6,iz, 5, 7),iz = 1,20) / &
     & 0.1431200E+00, 0.1431200E+00, 0.1687354E+00, 0.1410900E+00, &
     & 0.1480800E+00, 0.1691200E+00, 0.1577000E+00, 0.1443700E+00, &
     & 0.1681000E+00, 0.1721500E+00, 0.1555900E+00, 0.1485300E+00, &
     & 0.1527800E+00, 0.1570200E+00, 0.1974300E+00, 0.1826400E+00, &
     & 0.1922501E+00, 0.2050845E+00, 0.2119158E+00, 0.2119158E+00 /
      data (ref_adm( 6,iz, 6, 7),iz = 1,20) / &
     & 0.1687400E+00, 0.1687400E+00, 0.1671000E+00, 0.1605600E+00, &
     & 0.1588400E+00, 0.1532300E+00, 0.1707500E+00, 0.1560900E+00, &
     & 0.1943600E+00, 0.1798100E+00, 0.1507800E+00, 0.1708500E+00, &
     & 0.1416200E+00, 0.1718300E+00, 0.1949100E+00, 0.1824014E+00, &
     & 0.1806500E+00, 0.2050845E+00, 0.2119157E+00, 0.2119157E+00 /
      data (ref_adm( 6,iz, 7, 7),iz = 1,20) / &
     & 0.1646900E+00, 0.1646900E+00, 0.1504400E+00, 0.1531400E+00, &
     & 0.1957700E+00, 0.1599300E+00, 0.1541200E+00, 0.1652400E+00, &
     & 0.1633500E+00, 0.1742600E+00, 0.1577267E+00, 0.1605200E+00, &
     & 0.1623300E+00, 0.1814400E+00, 0.1921300E+00, 0.1824014E+00, &
     & 0.1922501E+00, 0.2050845E+00, 0.2119158E+00, 0.2119158E+00 /
      data (ref_adm( 6,iz, 8, 7),iz = 1,20) / &
     & 0.1618700E+00, 0.1618700E+00, 0.1739100E+00, 0.1856900E+00, &
     & 0.1487800E+00, 0.1461700E+00, 0.1525900E+00, 0.1678200E+00, &
     & 0.1764200E+00, 0.1629200E+00, 0.1653600E+00, 0.1299800E+00, &
     & 0.1298000E+00, 0.1661200E+00, 0.1296400E+00, 0.2195400E+00, &
     & 0.1922501E+00, 0.2050845E+00, 0.2119157E+00, 0.2119157E+00 /
      data (ref_adm( 6,iz, 9, 7),iz = 1,20) / &
     & 0.1779700E+00, 0.1779700E+00, 0.1736200E+00, 0.1780300E+00, &
     & 0.1383800E+00, 0.1493500E+00, 0.1466300E+00, 0.1555500E+00, &
     & 0.1368900E+00, 0.1866000E+00, 0.1898900E+00, 0.1539200E+00, &
     & 0.1588200E+00, 0.1896300E+00, 0.1702400E+00, 0.1339300E+00, &
     & 0.1525900E+00, 0.2050845E+00, 0.2119158E+00, 0.2119158E+00 /
      data (ref_adm( 6,iz,10, 7),iz = 1,20) / &
     & 0.1708700E+00, 0.1708700E+00, 0.1657700E+00, 0.1630000E+00, &
     & 0.1608500E+00, 0.1929600E+00, 0.1735400E+00, 0.1564900E+00, &
     & 0.1417800E+00, 0.1346800E+00, 0.1807200E+00, 0.1608000E+00, &
     & 0.1741400E+00, 0.1986500E+00, 0.1944000E+00, 0.1824014E+00, &
     & 0.1922501E+00, 0.2050845E+00, 0.2119157E+00, 0.2119157E+00 /
      data (ref_adm( 6,iz,11, 7),iz = 1,20) / &
     & 0.1928000E+00, 0.1928000E+00, 0.1767000E+00, 0.1621500E+00, &
     & 0.1716500E+00, 0.1672500E+00, 0.1629100E+00, 0.1809400E+00, &
     & 0.1364700E+00, 0.1495400E+00, 0.1663000E+00, 0.1316300E+00, &
     & 0.1874300E+00, 0.1817800E+00, 0.1373700E+00, 0.1425600E+00, &
     & 0.1922501E+00, 0.2050845E+00, 0.2119158E+00, 0.2119158E+00 /
      data (ref_adm( 6,iz,12, 7),iz = 1,20) / &
     & 0.1678100E+00, 0.1678100E+00, 0.1646700E+00, 0.1609200E+00, &
     & 0.1686900E+00, 0.1600000E+00, 0.1681100E+00, 0.1830900E+00, &
     & 0.1823300E+00, 0.1775000E+00, 0.1482100E+00, 0.1502600E+00, &
     & 0.1803700E+00, 0.1564300E+00, 0.1803000E+00, 0.1824014E+00, &
     & 0.1922501E+00, 0.2050845E+00, 0.2119157E+00, 0.2119157E+00 /
      data (ref_adm( 6,iz,13, 7),iz = 1,20) / &
     & 0.1483300E+00, 0.1483300E+00, 0.1531500E+00, 0.1422200E+00, &
     & 0.1483200E+00, 0.1606200E+00, 0.1484200E+00, 0.1572200E+00, &
     & 0.1469800E+00, 0.1586600E+00, 0.1848800E+00, 0.1890400E+00, &
     & 0.1781500E+00, 0.1761600E+00, 0.1484500E+00, 0.1369900E+00, &
     & 0.1470500E+00, 0.1401400E+00, 0.2119158E+00, 0.2119158E+00 /
      data (ref_adm( 6,iz,14, 7),iz = 1,20) / &
     & 0.1563300E+00, 0.1563300E+00, 0.1773500E+00, 0.1880600E+00, &
     & 0.1997100E+00, 0.1812600E+00, 0.1651100E+00, 0.1574200E+00, &
     & 0.1332700E+00, 0.1472100E+00, 0.1510800E+00, 0.1562000E+00, &
     & 0.1745400E+00, 0.1764900E+00, 0.1737467E+00, 0.1824014E+00, &
     & 0.1922501E+00, 0.1326800E+00, 0.2119157E+00, 0.2119157E+00 /
      data (ref_adm( 6,iz,15, 7),iz = 1,20) / &
     & 0.1768900E+00, 0.1768900E+00, 0.1731300E+00, 0.1765800E+00, &
     & 0.1801800E+00, 0.1573000E+00, 0.1497100E+00, 0.1745500E+00, &
     & 0.1430800E+00, 0.1482900E+00, 0.1157900E+00, 0.1534800E+00, &
     & 0.1682100E+00, 0.1554200E+00, 0.1527100E+00, 0.1824014E+00, &
     & 0.1922501E+00, 0.2050845E+00, 0.2119158E+00, 0.2119158E+00 /
      data (ref_adm( 6,iz,16, 7),iz = 1,20) / &
     & 0.1923200E+00, 0.1923200E+00, 0.2063700E+00, 0.1812800E+00, &
     & 0.1666800E+00, 0.1643400E+00, 0.1492400E+00, 0.1474400E+00, &
     & 0.1711400E+00, 0.1652800E+00, 0.1522300E+00, 0.1315400E+00, &
     & 0.2076800E+00, 0.1729900E+00, 0.2155700E+00, 0.1824014E+00, &
     & 0.1478600E+00, 0.2050845E+00, 0.2119157E+00, 0.2119157E+00 /
      data (ref_adm( 6,iz,17, 7),iz = 1,20) / &
     & 0.1925900E+00, 0.1925900E+00, 0.1767600E+00, 0.1671600E+00, &
     & 0.2197000E+00, 0.1844600E+00, 0.1630300E+00, 0.1536500E+00, &
     & 0.1421700E+00, 0.1559800E+00, 0.1577267E+00, 0.1423900E+00, &
     & 0.1429700E+00, 0.1484000E+00, 0.1737467E+00, 0.1504900E+00, &
     & 0.1581200E+00, 0.2050845E+00, 0.2119158E+00, 0.2119158E+00 /
      data (ref_adm( 6,iz,18, 7),iz = 1,20) / &
     & 0.1748700E+00, 0.1748700E+00, 0.1869400E+00, 0.1711300E+00, &
     & 0.2127700E+00, 0.1904100E+00, 0.1583900E+00, 0.1675800E+00, &
     & 0.1504300E+00, 0.1420100E+00, 0.1804400E+00, 0.1845300E+00, &
     & 0.1180800E+00, 0.1845700E+00, 0.1450700E+00, 0.1524200E+00, &
     & 0.1973707E+00, 0.2105470E+00, 0.2175601E+00, 0.2175601E+00 /
      data (ref_adm( 6,iz,19, 7),iz = 1,20) / &
     & 0.1776000E+00, 0.1776000E+00, 0.1586400E+00, 0.1477300E+00, &
     & 0.1595900E+00, 0.1890700E+00, 0.1566700E+00, 0.1328000E+00, &
     & 0.1475900E+00, 0.1683200E+00, 0.1625500E+00, 0.1643806E+00, &
     & 0.2116200E+00, 0.1721333E+00, 0.1783743E+00, 0.1579400E+00, &
     & 0.1607100E+00, 0.2105470E+00, 0.2175601E+00, 0.2175601E+00 /
      data (ref_adm( 6,iz,20, 7),iz = 1,20) / &
     & 0.1697000E+00, 0.1697000E+00, 0.1704600E+00, 0.1575500E+00, &
     & 0.1609600E+00, 0.1472200E+00, 0.1429500E+00, 0.2314800E+00, &
     & 0.1533500E+00, 0.1582700E+00, 0.1652000E+00, 0.1369900E+00, &
     & 0.1736000E+00, 0.1721332E+00, 0.1513900E+00, 0.1872598E+00, &
     & 0.1973707E+00, 0.2105470E+00, 0.2175601E+00, 0.2175601E+00 /
      data (ref_adm( 6,iz,21, 7),iz = 1,20) / &
     & 0.1644200E+00, 0.1644200E+00, 0.1757800E+00, 0.1730000E+00, &
     & 0.1825400E+00, 0.1736800E+00, 0.1595900E+00, 0.1840800E+00, &
     & 0.1676300E+00, 0.1453700E+00, 0.1680100E+00, 0.1875600E+00, &
     & 0.1702400E+00, 0.1721333E+00, 0.1640100E+00, 0.1872598E+00, &
     & 0.1973707E+00, 0.2105470E+00, 0.2175601E+00, 0.2175601E+00 /
      data (ref_adm( 6,iz,22, 7),iz = 1,20) / &
     & 0.1635800E+00, 0.1635800E+00, 0.1821500E+00, 0.1806000E+00, &
     & 0.1947400E+00, 0.1442500E+00, 0.1720900E+00, 0.1604000E+00, &
     & 0.1668800E+00, 0.1830900E+00, 0.1644900E+00, 0.1678400E+00, &
     & 0.1424200E+00, 0.1658800E+00, 0.1890100E+00, 0.2301199E+00, &
     & 0.2400927E+00, 0.2446416E+00, 0.2268718E+00, 0.2268718E+00 /
      data (ref_adm( 6,iz,23, 7),iz = 1,20) / &
     & 0.1811200E+00, 0.1811200E+00, 0.1626100E+00, 0.1551700E+00, &
     & 0.1972300E+00, 0.1911000E+00, 0.1689300E+00, 0.1776900E+00, &
     & 0.1615000E+00, 0.1765200E+00, 0.1569800E+00, 0.1835800E+00, &
     & 0.1949400E+00, 0.1896100E+00, 0.1854500E+00, 0.2051900E+00, &
     & 0.2160900E+00, 0.2417620E+00, 0.2251806E+00, 0.2251806E+00 /
      data (ref_adm( 6,iz,24, 7),iz = 1,20) / &
     & 0.1670200E+00, 0.1670200E+00, 0.1713467E+00, 0.1498700E+00, &
     & 0.1785800E+00, 0.1746200E+00, 0.1642900E+00, 0.1704400E+00, &
     & 0.1705300E+00, 0.1831822E+00, 0.1402900E+00, 0.2128800E+00, &
     & 0.1987525E+00, 0.1925400E+00, 0.1833500E+00, 0.2020800E+00, &
     & 0.2045000E+00, 0.2385978E+00, 0.2239267E+00, 0.2239267E+00 /
      data (ref_adm( 6,iz,25, 7),iz = 1,20) / &
     & 0.1765700E+00, 0.1765700E+00, 0.1603000E+00, 0.1584600E+00, &
     & 0.1731100E+00, 0.1340900E+00, 0.1719500E+00, 0.1518500E+00, &
     & 0.1664000E+00, 0.1839800E+00, 0.1986600E+00, 0.1866900E+00, &
     & 0.1865900E+00, 0.2053200E+00, 0.2016000E+00, 0.2243431E+00, &
     & 0.2329003E+00, 0.1955400E+00, 0.2228705E+00, 0.2228705E+00 /
      data (ref_adm( 6,iz,26, 7),iz = 1,20) / &
     & 0.1660900E+00, 0.1660900E+00, 0.1784400E+00, 0.1560900E+00, &
     & 0.1447000E+00, 0.1782142E+00, 0.1552200E+00, 0.1995200E+00, &
     & 0.1743600E+00, 0.1723500E+00, 0.2020500E+00, 0.2176000E+00, &
     & 0.1958500E+00, 0.1899900E+00, 0.1994400E+00, 0.2053500E+00, &
     & 0.2310298E+00, 0.2423100E+00, 0.1367800E+00, 0.1367800E+00 /
      data (ref_adm( 6,iz,27, 7),iz = 1,20) / &
     & 0.1563300E+00, 0.1563300E+00, 0.1342800E+00, 0.1442500E+00, &
     & 0.1937400E+00, 0.1466900E+00, 0.1443800E+00, 0.1969300E+00, &
     & 0.2016000E+00, 0.1872200E+00, 0.1999600E+00, 0.1768500E+00, &
     & 0.1658100E+00, 0.1935700E+00, 0.2207200E+00, 0.2133500E+00, &
     & 0.2331600E+00, 0.2315935E+00, 0.2211017E+00, 0.2211017E+00 /
      data (ref_adm( 6,iz,28, 7),iz = 1,20) / &
     & 0.1809000E+00, 0.1809000E+00, 0.1694600E+00, 0.1755100E+00, &
     & 0.1773600E+00, 0.1602000E+00, 0.1925500E+00, 0.1821100E+00, &
     & 0.1591600E+00, 0.2335000E+00, 0.2169200E+00, 0.1575900E+00, &
     & 0.2090300E+00, 0.2114400E+00, 0.2293100E+00, 0.2452400E+00, &
     & 0.2191300E+00, 0.2297273E+00, 0.2207095E+00, 0.2207095E+00 /
      data (ref_adm( 6,iz,29, 7),iz = 1,20) / &
     & 0.1735100E+00, 0.1735100E+00, 0.1797000E+00, 0.1772800E+00, &
     & 0.1821000E+00, 0.1725300E+00, 0.1859900E+00, 0.1860300E+00, &
     & 0.1963600E+00, 0.1843700E+00, 0.1888800E+00, 0.1931200E+00, &
     & 0.2060673E+00, 0.2701400E+00, 0.1760700E+00, 0.1976400E+00, &
     & 0.2092100E+00, 0.2282446E+00, 0.2204489E+00, 0.2204489E+00 /
      data (ref_adm( 6,iz,30, 7),iz = 1,20) / &
     & 0.1698100E+00, 0.1698100E+00, 0.1766300E+00, 0.1548900E+00, &
     & 0.1988400E+00, 0.1786700E+00, 0.1990300E+00, 0.1859800E+00, &
     & 0.1953400E+00, 0.1963700E+00, 0.1957100E+00, 0.2017100E+00, &
     & 0.1759200E+00, 0.2123342E+00, 0.1857600E+00, 0.2375400E+00, &
     & 0.2230500E+00, 0.2271216E+00, 0.2205045E+00, 0.2205045E+00 /
      data (ref_adm( 6,iz,31, 7),iz = 1,20) / &
     & 0.1791600E+00, 0.1791600E+00, 0.1787400E+00, 0.1783000E+00, &
     & 0.1958000E+00, 0.1899800E+00, 0.1948100E+00, 0.1831500E+00, &
     & 0.1895700E+00, 0.1924000E+00, 0.1989000E+00, 0.2100300E+00, &
     & 0.2088400E+00, 0.1997800E+00, 0.2184364E+00, 0.2576900E+00, &
     & 0.2276872E+00, 0.2263860E+00, 0.2205020E+00, 0.2205020E+00 /
      data (ref_adm( 6,iz,32, 7),iz = 1,20) / &
     & 0.1683600E+00, 0.1683600E+00, 0.1645100E+00, 0.1701900E+00, &
     & 0.1483900E+00, 0.1794100E+00, 0.1990400E+00, 0.1902400E+00, &
     & 0.2003100E+00, 0.2141800E+00, 0.1995900E+00, 0.2144000E+00, &
     & 0.2147700E+00, 0.2094400E+00, 0.1837300E+00, 0.2053000E+00, &
     & 0.2352500E+00, 0.2259273E+00, 0.2205400E+00, 0.2205400E+00 /
      data (ref_adm( 6,iz,33, 7),iz = 1,20) / &
     & 0.1623700E+00, 0.1623700E+00, 0.1829900E+00, 0.1844600E+00, &
     & 0.1958200E+00, 0.1958200E+00, 0.2335800E+00, 0.2057900E+00, &
     & 0.1673800E+00, 0.2108800E+00, 0.2219800E+00, 0.2042800E+00, &
     & 0.2112200E+00, 0.2069500E+00, 0.2174700E+00, 0.2339000E+00, &
     & 0.2287146E+00, 0.2258428E+00, 0.2206939E+00, 0.2206939E+00 /
      data (ref_adm( 6,iz,34, 7),iz = 1,20) / &
     & 0.1933200E+00, 0.1933200E+00, 0.2038400E+00, 0.2138400E+00, &
     & 0.2030700E+00, 0.1774600E+00, 0.2506300E+00, 0.2456000E+00, &
     & 0.2081800E+00, 0.2243500E+00, 0.2225500E+00, 0.2045800E+00, &
     & 0.2065100E+00, 0.2090600E+00, 0.2220098E+00, 0.2072600E+00, &
     & 0.2289136E+00, 0.2257733E+00, 0.2209044E+00, 0.2209044E+00 /
      data (ref_adm( 6,iz,35, 7),iz = 1,20) / &
     & 0.1624600E+00, 0.1624600E+00, 0.1775400E+00, 0.1444300E+00, &
     & 0.2248900E+00, 0.2148400E+00, 0.2254900E+00, 0.2225300E+00, &
     & 0.1963100E+00, 0.2101400E+00, 0.2074000E+00, 0.2006800E+00, &
     & 0.2323500E+00, 0.2009700E+00, 0.2233700E+00, 0.2264008E+00, &
     & 0.2287778E+00, 0.2258713E+00, 0.2210771E+00, 0.2210771E+00 /
      data (ref_adm( 6,iz,36, 7),iz = 1,20) / &
     & 0.1704400E+00, 0.1704400E+00, 0.1624600E+00, 0.1724600E+00, &
     & 0.1777500E+00, 0.2117800E+00, 0.2041100E+00, 0.2044300E+00, &
     & 0.1893700E+00, 0.2331100E+00, 0.2281800E+00, 0.2321200E+00, &
     & 0.2146000E+00, 0.2824100E+00, 0.2355200E+00, 0.2268257E+00, &
     & 0.2291699E+00, 0.2259088E+00, 0.2213234E+00, 0.2213234E+00 /
      data (ref_adm( 6,iz,37, 7),iz = 1,20) / &
     & 0.1626100E+00, 0.1626100E+00, 0.2016400E+00, 0.1778900E+00, &
     & 0.1808900E+00, 0.2178700E+00, 0.2198000E+00, 0.2330400E+00, &
     & 0.2430100E+00, 0.2017700E+00, 0.2141600E+00, 0.2207600E+00, &
     & 0.2140400E+00, 0.2211041E+00, 0.2237223E+00, 0.2271424E+00, &
     & 0.2292866E+00, 0.2259294E+00, 0.2213859E+00, 0.2213859E+00 /
      data (ref_adm( 6,iz,38, 7),iz = 1,20) / &
     & 0.1626100E+00, 0.1626100E+00, 0.2016400E+00, 0.1778900E+00, &
     & 0.1808900E+00, 0.2178700E+00, 0.2198000E+00, 0.2330400E+00, &
     & 0.2430100E+00, 0.2017700E+00, 0.2141600E+00, 0.2207600E+00, &
     & 0.2140400E+00, 0.2211041E+00, 0.2237223E+00, 0.2271424E+00, &
     & 0.2292866E+00, 0.2259294E+00, 0.2213859E+00, 0.2213859E+00 /
! Solar Zenith Angle 35.0 Albedo  0.1874726E+00
      data (ref_adm( 6,iz, 1, 8),iz = 1,20) / &
     & 0.2107600E+00, 0.2107600E+00, 0.1756000E+00, 0.1623800E+00, &
     & 0.1855500E+00, 0.1822400E+00, 0.1636900E+00, 0.1701200E+00, &
     & 0.1522100E+00, 0.1485200E+00, 0.1665300E+00, 0.1649500E+00, &
     & 0.1231200E+00, 0.1273000E+00, 0.1776356E+00, 0.2475300E+00, &
     & 0.2208200E+00, 0.1640400E+00, 0.2166590E+00, 0.2166590E+00 /
      data (ref_adm( 6,iz, 2, 8),iz = 1,20) / &
     & 0.2107600E+00, 0.2107600E+00, 0.1756000E+00, 0.1623800E+00, &
     & 0.1855500E+00, 0.1822400E+00, 0.1636900E+00, 0.1701200E+00, &
     & 0.1522100E+00, 0.1485200E+00, 0.1665300E+00, 0.1649500E+00, &
     & 0.1231200E+00, 0.1273000E+00, 0.1776356E+00, 0.2475300E+00, &
     & 0.2208200E+00, 0.1640400E+00, 0.2166590E+00, 0.2166590E+00 /
      data (ref_adm( 6,iz, 3, 8),iz = 1,20) / &
     & 0.1965900E+00, 0.1965900E+00, 0.1798700E+00, 0.1798300E+00, &
     & 0.1676400E+00, 0.1720400E+00, 0.1802000E+00, 0.1664000E+00, &
     & 0.1435900E+00, 0.1692400E+00, 0.1755000E+00, 0.1818900E+00, &
     & 0.1482500E+00, 0.1378400E+00, 0.1454000E+00, 0.2107800E+00, &
     & 0.2309100E+00, 0.2229500E+00, 0.3349832E-08, 0.3349832E-08 /
      data (ref_adm( 6,iz, 4, 8),iz = 1,20) / &
     & 0.1822300E+00, 0.1822300E+00, 0.1662600E+00, 0.1675100E+00, &
     & 0.1842000E+00, 0.1497500E+00, 0.1577200E+00, 0.1607500E+00, &
     & 0.1482600E+00, 0.1796700E+00, 0.1571100E+00, 0.1525900E+00, &
     & 0.1774800E+00, 0.1558400E+00, 0.1443400E+00, 0.1864841E+00, &
     & 0.1712800E+00, 0.2096749E+00, 0.2166590E+00, 0.2166590E+00 /
      data (ref_adm( 6,iz, 5, 8),iz = 1,20) / &
     & 0.1673900E+00, 0.1673900E+00, 0.1718900E+00, 0.1695000E+00, &
     & 0.1715100E+00, 0.1706500E+00, 0.1569600E+00, 0.1698800E+00, &
     & 0.1586300E+00, 0.1646400E+00, 0.1557700E+00, 0.1625700E+00, &
     & 0.1632100E+00, 0.1728900E+00, 0.1840900E+00, 0.1864841E+00, &
     & 0.1965533E+00, 0.2096749E+00, 0.2166590E+00, 0.2166590E+00 /
      data (ref_adm( 6,iz, 6, 8),iz = 1,20) / &
     & 0.1716000E+00, 0.1716000E+00, 0.1638400E+00, 0.1714100E+00, &
     & 0.1666600E+00, 0.1785400E+00, 0.1569800E+00, 0.1652800E+00, &
     & 0.1857800E+00, 0.1605000E+00, 0.1732100E+00, 0.1771600E+00, &
     & 0.1849200E+00, 0.1759800E+00, 0.1346700E+00, 0.1864841E+00, &
     & 0.1965533E+00, 0.2096749E+00, 0.2166590E+00, 0.2166590E+00 /
      data (ref_adm( 6,iz, 7, 8),iz = 1,20) / &
     & 0.1848300E+00, 0.1848300E+00, 0.1955900E+00, 0.1726300E+00, &
     & 0.1520100E+00, 0.1586000E+00, 0.1669000E+00, 0.1591600E+00, &
     & 0.1763500E+00, 0.1629300E+00, 0.1700400E+00, 0.1594100E+00, &
     & 0.1765600E+00, 0.1936500E+00, 0.1561400E+00, 0.1864841E+00, &
     & 0.1965533E+00, 0.1536000E+00, 0.2166590E+00, 0.2166590E+00 /
      data (ref_adm( 6,iz, 8, 8),iz = 1,20) / &
     & 0.1731500E+00, 0.1731500E+00, 0.1428100E+00, 0.1522200E+00, &
     & 0.1512400E+00, 0.1466900E+00, 0.1542000E+00, 0.1622600E+00, &
     & 0.1645900E+00, 0.1727400E+00, 0.1700600E+00, 0.1419300E+00, &
     & 0.1632200E+00, 0.1759600E+00, 0.1821700E+00, 0.1472100E+00, &
     & 0.1695800E+00, 0.2096749E+00, 0.2166590E+00, 0.2166590E+00 /
      data (ref_adm( 6,iz, 9, 8),iz = 1,20) / &
     & 0.1697500E+00, 0.1697500E+00, 0.1560400E+00, 0.1358300E+00, &
     & 0.1664200E+00, 0.1554100E+00, 0.1698900E+00, 0.1717000E+00, &
     & 0.1760900E+00, 0.1676700E+00, 0.1772900E+00, 0.1389900E+00, &
     & 0.1867000E+00, 0.1824800E+00, 0.2026200E+00, 0.1864841E+00, &
     & 0.1894000E+00, 0.2096749E+00, 0.2166590E+00, 0.2166590E+00 /
      data (ref_adm( 6,iz,10, 8),iz = 1,20) / &
     & 0.1607900E+00, 0.1607900E+00, 0.1801400E+00, 0.1854800E+00, &
     & 0.1751300E+00, 0.1859400E+00, 0.2016700E+00, 0.2010000E+00, &
     & 0.1769700E+00, 0.1680800E+00, 0.1661000E+00, 0.1573400E+00, &
     & 0.1819100E+00, 0.1813900E+00, 0.1803900E+00, 0.2612200E+00, &
     & 0.1965533E+00, 0.1998000E+00, 0.2166590E+00, 0.2166590E+00 /
      data (ref_adm( 6,iz,11, 8),iz = 1,20) / &
     & 0.1699100E+00, 0.1699100E+00, 0.1787200E+00, 0.1744900E+00, &
     & 0.1598500E+00, 0.1614400E+00, 0.1848800E+00, 0.1713100E+00, &
     & 0.1795100E+00, 0.1787600E+00, 0.1609200E+00, 0.1536100E+00, &
     & 0.2141000E+00, 0.1896700E+00, 0.1312200E+00, 0.1468800E+00, &
     & 0.1589600E+00, 0.2096749E+00, 0.2166590E+00, 0.2166590E+00 /
      data (ref_adm( 6,iz,12, 8),iz = 1,20) / &
     & 0.2007500E+00, 0.2007500E+00, 0.1887100E+00, 0.1825100E+00, &
     & 0.1919000E+00, 0.1971700E+00, 0.1882600E+00, 0.1910300E+00, &
     & 0.1742300E+00, 0.1486600E+00, 0.1621000E+00, 0.1634700E+00, &
     & 0.1911200E+00, 0.1635500E+00, 0.1816400E+00, 0.1478400E+00, &
     & 0.1986900E+00, 0.2096749E+00, 0.2166590E+00, 0.2166590E+00 /
      data (ref_adm( 6,iz,13, 8),iz = 1,20) / &
     & 0.1786700E+00, 0.1786700E+00, 0.1685300E+00, 0.1580000E+00, &
     & 0.1568900E+00, 0.1617500E+00, 0.1615800E+00, 0.1704700E+00, &
     & 0.1800000E+00, 0.1912700E+00, 0.1803000E+00, 0.1683200E+00, &
     & 0.1764700E+00, 0.1580100E+00, 0.1774400E+00, 0.2022400E+00, &
     & 0.1965533E+00, 0.2096749E+00, 0.2166590E+00, 0.2166590E+00 /
      data (ref_adm( 6,iz,14, 8),iz = 1,20) / &
     & 0.1581400E+00, 0.1581400E+00, 0.1406900E+00, 0.1403800E+00, &
     & 0.1468700E+00, 0.1469500E+00, 0.1438800E+00, 0.1475000E+00, &
     & 0.1497900E+00, 0.1492400E+00, 0.1532600E+00, 0.1664700E+00, &
     & 0.1751300E+00, 0.1894900E+00, 0.1430900E+00, 0.1892900E+00, &
     & 0.1965533E+00, 0.2096749E+00, 0.2166590E+00, 0.2166590E+00 /
      data (ref_adm( 6,iz,15, 8),iz = 1,20) / &
     & 0.1798900E+00, 0.1798900E+00, 0.1738700E+00, 0.1562900E+00, &
     & 0.1537500E+00, 0.1544700E+00, 0.1773200E+00, 0.1632300E+00, &
     & 0.1294100E+00, 0.1367700E+00, 0.1450900E+00, 0.1539500E+00, &
     & 0.1475500E+00, 0.1643200E+00, 0.1489600E+00, 0.1756200E+00, &
     & 0.1965533E+00, 0.1941300E+00, 0.2166590E+00, 0.2166590E+00 /
      data (ref_adm( 6,iz,16, 8),iz = 1,20) / &
     & 0.1817300E+00, 0.1817300E+00, 0.1921300E+00, 0.1850300E+00, &
     & 0.1816300E+00, 0.1559400E+00, 0.1535700E+00, 0.1710700E+00, &
     & 0.1472100E+00, 0.1569200E+00, 0.1300600E+00, 0.1617100E+00, &
     & 0.1771600E+00, 0.1810800E+00, 0.1732500E+00, 0.1510400E+00, &
     & 0.1965533E+00, 0.2096749E+00, 0.2166590E+00, 0.2166590E+00 /
      data (ref_adm( 6,iz,17, 8),iz = 1,20) / &
     & 0.1708100E+00, 0.1708100E+00, 0.1930700E+00, 0.1926200E+00, &
     & 0.1782400E+00, 0.1845400E+00, 0.1562800E+00, 0.1543100E+00, &
     & 0.1684600E+00, 0.1523000E+00, 0.1282600E+00, 0.1513000E+00, &
     & 0.1780000E+00, 0.1732500E+00, 0.2096600E+00, 0.1864841E+00, &
     & 0.1965533E+00, 0.2096749E+00, 0.2166590E+00, 0.2166590E+00 /
      data (ref_adm( 6,iz,18, 8),iz = 1,20) / &
     & 0.1746400E+00, 0.1746400E+00, 0.1965900E+00, 0.1858500E+00, &
     & 0.1851000E+00, 0.1869900E+00, 0.1672700E+00, 0.1452100E+00, &
     & 0.1651000E+00, 0.1688200E+00, 0.1597400E+00, 0.1434700E+00, &
     & 0.1708500E+00, 0.1510500E+00, 0.1889300E+00, 0.2321900E+00, &
     & 0.1639600E+00, 0.1952497E+00, 0.1947758E+00, 0.1947758E+00 /
      data (ref_adm( 6,iz,19, 8),iz = 1,20) / &
     & 0.1556300E+00, 0.1556300E+00, 0.1668600E+00, 0.1660000E+00, &
     & 0.1656300E+00, 0.1760700E+00, 0.1535900E+00, 0.1623200E+00, &
     & 0.1855700E+00, 0.1594500E+00, 0.1666200E+00, 0.1486500E+00, &
     & 0.1783800E+00, 0.1981800E+00, 0.1731000E+00, 0.1825469E+00, &
     & 0.2436900E+00, 0.1639400E+00, 0.1941237E+00, 0.1941237E+00 /
      data (ref_adm( 6,iz,20, 8),iz = 1,20) / &
     & 0.1616900E+00, 0.1616900E+00, 0.1750700E+00, 0.1567900E+00, &
     & 0.1613400E+00, 0.1636100E+00, 0.1583800E+00, 0.1613900E+00, &
     & 0.1806600E+00, 0.1921500E+00, 0.1627400E+00, 0.1887300E+00, &
     & 0.1748600E+00, 0.2256300E+00, 0.2168100E+00, 0.1826922E+00, &
     & 0.1271400E+00, 0.1945378E+00, 0.1936253E+00, 0.1936253E+00 /
      data (ref_adm( 6,iz,21, 8),iz = 1,20) / &
     & 0.1605900E+00, 0.1605900E+00, 0.1702500E+00, 0.1799700E+00, &
     & 0.1585200E+00, 0.1403600E+00, 0.1743000E+00, 0.1743700E+00, &
     & 0.2053600E+00, 0.1640200E+00, 0.1779000E+00, 0.1741000E+00, &
     & 0.1611400E+00, 0.2109200E+00, 0.2189900E+00, 0.1957400E+00, &
     & 0.1879263E+00, 0.1865700E+00, 0.1931645E+00, 0.1931645E+00 /
      data (ref_adm( 6,iz,22, 8),iz = 1,20) / &
     & 0.1585200E+00, 0.1585200E+00, 0.1144700E+00, 0.1714100E+00, &
     & 0.1736700E+00, 0.1684900E+00, 0.1750400E+00, 0.1831600E+00, &
     & 0.1852000E+00, 0.1698800E+00, 0.1825600E+00, 0.2152600E+00, &
     & 0.1661800E+00, 0.2179300E+00, 0.2181400E+00, 0.2280600E+00, &
     & 0.2198433E+00, 0.2289061E+00, 0.2288857E+00, 0.2288857E+00 /
      data (ref_adm( 6,iz,23, 8),iz = 1,20) / &
     & 0.1548000E+00, 0.1548000E+00, 0.1583100E+00, 0.1752800E+00, &
     & 0.1590100E+00, 0.1848300E+00, 0.1544300E+00, 0.1530200E+00, &
     & 0.1821900E+00, 0.1754200E+00, 0.1927500E+00, 0.1885900E+00, &
     & 0.1575100E+00, 0.2131800E+00, 0.1858400E+00, 0.1784000E+00, &
     & 0.2205751E+00, 0.2289113E+00, 0.2285776E+00, 0.2285776E+00 /
      data (ref_adm( 6,iz,24, 8),iz = 1,20) / &
     & 0.1858000E+00, 0.1858000E+00, 0.1956100E+00, 0.1868900E+00, &
     & 0.1942200E+00, 0.1599800E+00, 0.1923100E+00, 0.1445100E+00, &
     & 0.1827900E+00, 0.1808100E+00, 0.2432800E+00, 0.1783500E+00, &
     & 0.1706000E+00, 0.1838100E+00, 0.2059500E+00, 0.2147531E+00, &
     & 0.2215281E+00, 0.2291622E+00, 0.2286594E+00, 0.2286594E+00 /
      data (ref_adm( 6,iz,25, 8),iz = 1,20) / &
     & 0.1991800E+00, 0.1991800E+00, 0.2132700E+00, 0.1821200E+00, &
     & 0.1707300E+00, 0.2086500E+00, 0.1944900E+00, 0.1768100E+00, &
     & 0.2222800E+00, 0.2321700E+00, 0.1964700E+00, 0.1819700E+00, &
     & 0.1918200E+00, 0.1950900E+00, 0.1858600E+00, 0.1640400E+00, &
     & 0.1831100E+00, 0.2202400E+00, 0.2290303E+00, 0.2290303E+00 /
      data (ref_adm( 6,iz,26, 8),iz = 1,20) / &
     & 0.1557500E+00, 0.1557500E+00, 0.1721900E+00, 0.1862700E+00, &
     & 0.1786700E+00, 0.1507200E+00, 0.1743000E+00, 0.1824300E+00, &
     & 0.2243900E+00, 0.1974600E+00, 0.1792300E+00, 0.1984400E+00, &
     & 0.2119400E+00, 0.1881200E+00, 0.1633700E+00, 0.1642800E+00, &
     & 0.2242775E+00, 0.2442300E+00, 0.2030900E+00, 0.2030900E+00 /
      data (ref_adm( 6,iz,27, 8),iz = 1,20) / &
     & 0.1672600E+00, 0.1672600E+00, 0.1680200E+00, 0.1735600E+00, &
     & 0.1848300E+00, 0.1739500E+00, 0.1818200E+00, 0.1853500E+00, &
     & 0.1895800E+00, 0.1811000E+00, 0.2000400E+00, 0.2162300E+00, &
     & 0.2535900E+00, 0.2113200E+00, 0.1894000E+00, 0.2147900E+00, &
     & 0.1724000E+00, 0.2321239E+00, 0.2309979E+00, 0.2309979E+00 /
      data (ref_adm( 6,iz,28, 8),iz = 1,20) / &
     & 0.1846800E+00, 0.1846800E+00, 0.2163100E+00, 0.2084400E+00, &
     & 0.2217200E+00, 0.2147900E+00, 0.2076300E+00, 0.1924800E+00, &
     & 0.1966200E+00, 0.1999400E+00, 0.2035500E+00, 0.2093900E+00, &
     & 0.2268700E+00, 0.2445600E+00, 0.2307600E+00, 0.2486800E+00, &
     & 0.2074200E+00, 0.2018300E+00, 0.2323758E+00, 0.2323758E+00 /
      data (ref_adm( 6,iz,29, 8),iz = 1,20) / &
     & 0.1973000E+00, 0.1973000E+00, 0.1976800E+00, 0.2075400E+00, &
     & 0.2135300E+00, 0.2058700E+00, 0.2148800E+00, 0.2346100E+00, &
     & 0.2326400E+00, 0.2300500E+00, 0.2040900E+00, 0.2046200E+00, &
     & 0.2074100E+00, 0.2413400E+00, 0.2459600E+00, 0.2514100E+00, &
     & 0.2207200E+00, 0.2109100E+00, 0.1726600E+00, 0.1726600E+00 /
      data (ref_adm( 6,iz,30, 8),iz = 1,20) / &
     & 0.1925000E+00, 0.1925000E+00, 0.1946000E+00, 0.1959300E+00, &
     & 0.1914100E+00, 0.1788100E+00, 0.1878200E+00, 0.1968300E+00, &
     & 0.2095900E+00, 0.2154500E+00, 0.2208400E+00, 0.2219700E+00, &
     & 0.2040900E+00, 0.2193500E+00, 0.2438600E+00, 0.2492900E+00, &
     & 0.2124100E+00, 0.2222200E+00, 0.2358101E+00, 0.2358101E+00 /
      data (ref_adm( 6,iz,31, 8),iz = 1,20) / &
     & 0.1719000E+00, 0.1719000E+00, 0.1691900E+00, 0.1631600E+00, &
     & 0.1771400E+00, 0.1588100E+00, 0.1775100E+00, 0.1871700E+00, &
     & 0.1937800E+00, 0.1634500E+00, 0.1946300E+00, 0.2078400E+00, &
     & 0.2198700E+00, 0.2152900E+00, 0.2414500E+00, 0.2708800E+00, &
     & 0.2734900E+00, 0.1833100E+00, 0.2377468E+00, 0.2377468E+00 /
      data (ref_adm( 6,iz,32, 8),iz = 1,20) / &
     & 0.1888500E+00, 0.1888500E+00, 0.1868300E+00, 0.2132700E+00, &
     & 0.2273000E+00, 0.2029800E+00, 0.1943700E+00, 0.2106100E+00, &
     & 0.2089600E+00, 0.2288200E+00, 0.2224800E+00, 0.2166100E+00, &
     & 0.2341400E+00, 0.2429300E+00, 0.2223200E+00, 0.2928300E+00, &
     & 0.2738500E+00, 0.2535200E+00, 0.2398297E+00, 0.2398297E+00 /
      data (ref_adm( 6,iz,33, 8),iz = 1,20) / &
     & 0.1919900E+00, 0.1919900E+00, 0.2404800E+00, 0.1974000E+00, &
     & 0.2022500E+00, 0.2193200E+00, 0.2245500E+00, 0.2161300E+00, &
     & 0.2034700E+00, 0.2424400E+00, 0.2405300E+00, 0.2001600E+00, &
     & 0.2255200E+00, 0.2218400E+00, 0.2288100E+00, 0.2348814E+00, &
     & 0.2290100E+00, 0.2437328E+00, 0.1602000E+00, 0.1602000E+00 /
      data (ref_adm( 6,iz,34, 8),iz = 1,20) / &
     & 0.1997100E+00, 0.1997100E+00, 0.2176400E+00, 0.1788300E+00, &
     & 0.1784400E+00, 0.1672800E+00, 0.1755200E+00, 0.2111000E+00, &
     & 0.2527000E+00, 0.1960700E+00, 0.1843900E+00, 0.2395600E+00, &
     & 0.2233600E+00, 0.2494600E+00, 0.2835000E+00, 0.2815600E+00, &
     & 0.2230500E+00, 0.2453107E+00, 0.2433912E+00, 0.2433912E+00 /
      data (ref_adm( 6,iz,35, 8),iz = 1,20) / &
     & 0.1894900E+00, 0.1894900E+00, 0.2159900E+00, 0.1705800E+00, &
     & 0.1927800E+00, 0.1701200E+00, 0.2184100E+00, 0.1844600E+00, &
     & 0.2634100E+00, 0.2209900E+00, 0.2071600E+00, 0.2270500E+00, &
     & 0.2205900E+00, 0.2443100E+00, 0.2976900E+00, 0.2175400E+00, &
     & 0.2426795E+00, 0.2466080E+00, 0.2447443E+00, 0.2447443E+00 /
      data (ref_adm( 6,iz,36, 8),iz = 1,20) / &
     & 0.1838200E+00, 0.1838200E+00, 0.1880200E+00, 0.1826600E+00, &
     & 0.1931500E+00, 0.2066100E+00, 0.2288100E+00, 0.2145200E+00, &
     & 0.2518100E+00, 0.2346700E+00, 0.3019000E+00, 0.2300800E+00, &
     & 0.2311900E+00, 0.2401300E+00, 0.2125100E+00, 0.2393408E+00, &
     & 0.2436282E+00, 0.2475306E+00, 0.2456461E+00, 0.2456461E+00 /
      data (ref_adm( 6,iz,37, 8),iz = 1,20) / &
     & 0.2031800E+00, 0.2031800E+00, 0.1894900E+00, 0.1749600E+00, &
     & 0.1784400E+00, 0.2378400E+00, 0.2349500E+00, 0.2444800E+00, &
     & 0.2689700E+00, 0.2472200E+00, 0.2500000E+00, 0.2187500E+00, &
     & 0.2280400E+00, 0.2301900E+00, 0.2373000E+00, 0.2399551E+00, &
     & 0.2441880E+00, 0.2479971E+00, 0.2461998E+00, 0.2461998E+00 /
      data (ref_adm( 6,iz,38, 8),iz = 1,20) / &
     & 0.2031800E+00, 0.2031800E+00, 0.1894900E+00, 0.1749600E+00, &
     & 0.1784400E+00, 0.2378400E+00, 0.2349500E+00, 0.2444800E+00, &
     & 0.2689700E+00, 0.2472200E+00, 0.2500000E+00, 0.2187500E+00, &
     & 0.2280400E+00, 0.2301900E+00, 0.2373000E+00, 0.2399551E+00, &
     & 0.2441880E+00, 0.2479971E+00, 0.2461998E+00, 0.2461998E+00 /
! Solar Zenith Angle 40.0 Albedo  0.1919456E+00
      data (ref_adm( 6,iz, 1, 9),iz = 1,20) / &
     & 0.1636100E+00, 0.1636100E+00, 0.1492200E+00, 0.1494700E+00, &
     & 0.1504600E+00, 0.1519100E+00, 0.1565800E+00, 0.1713100E+00, &
     & 0.1668200E+00, 0.1921400E+00, 0.1566900E+00, 0.1560800E+00, &
     & 0.2030500E+00, 0.1693200E+00, 0.2103400E+00, 0.2127100E+00, &
     & 0.2475800E+00, 0.2437800E+00, 0.3297987E+00, 0.3297987E+00 /
      data (ref_adm( 6,iz, 2, 9),iz = 1,20) / &
     & 0.1636100E+00, 0.1636100E+00, 0.1492200E+00, 0.1494700E+00, &
     & 0.1504600E+00, 0.1519100E+00, 0.1565800E+00, 0.1713100E+00, &
     & 0.1668200E+00, 0.1921400E+00, 0.1566900E+00, 0.1560800E+00, &
     & 0.2030500E+00, 0.1693200E+00, 0.2103400E+00, 0.2127100E+00, &
     & 0.2475800E+00, 0.2437800E+00, 0.3297987E+00, 0.3297987E+00 /
      data (ref_adm( 6,iz, 3, 9),iz = 1,20) / &
     & 0.1570200E+00, 0.1570200E+00, 0.1596000E+00, 0.1448300E+00, &
     & 0.1268900E+00, 0.1493600E+00, 0.1442500E+00, 0.1615400E+00, &
     & 0.1561200E+00, 0.1575600E+00, 0.1755400E+00, 0.1658300E+00, &
     & 0.1762900E+00, 0.1628700E+00, 0.2050100E+00, 0.2148700E+00, &
     & 0.2594300E+00, 0.2917090E+00, 0.5077204E-08, 0.5077204E-08 /
      data (ref_adm( 6,iz, 4, 9),iz = 1,20) / &
     & 0.1567200E+00, 0.1567200E+00, 0.1579200E+00, 0.1517700E+00, &
     & 0.1431700E+00, 0.1365200E+00, 0.1494300E+00, 0.1431300E+00, &
     & 0.1566200E+00, 0.1372600E+00, 0.1590900E+00, 0.1655300E+00, &
     & 0.1590900E+00, 0.1631200E+00, 0.1812500E+00, 0.2305500E+00, &
     & 0.2310700E+00, 0.1938000E+00, 0.3261515E+00, 0.3261515E+00 /
      data (ref_adm( 6,iz, 5, 9),iz = 1,20) / &
     & 0.1727100E+00, 0.1727100E+00, 0.1605400E+00, 0.1628500E+00, &
     & 0.1508000E+00, 0.1559000E+00, 0.1249700E+00, 0.1499500E+00, &
     & 0.1556700E+00, 0.1412600E+00, 0.1503000E+00, 0.1503500E+00, &
     & 0.1518100E+00, 0.1710900E+00, 0.1880800E+00, 0.2053900E+00, &
     & 0.2081500E+00, 0.2887110E+00, 0.3229332E+00, 0.3229332E+00 /
      data (ref_adm( 6,iz, 6, 9),iz = 1,20) / &
     & 0.1561700E+00, 0.1561700E+00, 0.1596800E+00, 0.1691000E+00, &
     & 0.1766300E+00, 0.1546100E+00, 0.1466200E+00, 0.1225100E+00, &
     & 0.1404400E+00, 0.1733900E+00, 0.1621700E+00, 0.1934100E+00, &
     & 0.1587000E+00, 0.1398700E+00, 0.1429800E+00, 0.2017400E+00, &
     & 0.2533160E+00, 0.2867214E+00, 0.3188553E+00, 0.3188553E+00 /
      data (ref_adm( 6,iz, 7, 9),iz = 1,20) / &
     & 0.1682100E+00, 0.1682100E+00, 0.1589900E+00, 0.1564900E+00, &
     & 0.1601900E+00, 0.1584400E+00, 0.1588100E+00, 0.1455500E+00, &
     & 0.1480800E+00, 0.1550200E+00, 0.1435000E+00, 0.1573800E+00, &
     & 0.1612400E+00, 0.1507900E+00, 0.1722400E+00, 0.1850100E+00, &
     & 0.1723400E+00, 0.2842823E+00, 0.3144388E+00, 0.3144388E+00 /
      data (ref_adm( 6,iz, 8, 9),iz = 1,20) / &
     & 0.1846400E+00, 0.1846400E+00, 0.1986900E+00, 0.1869000E+00, &
     & 0.1701100E+00, 0.1489700E+00, 0.1596900E+00, 0.1427700E+00, &
     & 0.1590200E+00, 0.1478800E+00, 0.1388500E+00, 0.1523400E+00, &
     & 0.1421000E+00, 0.1548600E+00, 0.1583800E+00, 0.1615700E+00, &
     & 0.2631100E+00, 0.3114500E+00, 0.1579400E+00, 0.1579400E+00 /
      data (ref_adm( 6,iz, 9, 9),iz = 1,20) / &
     & 0.1783800E+00, 0.1783800E+00, 0.1626000E+00, 0.1819500E+00, &
     & 0.1677300E+00, 0.1650200E+00, 0.1668800E+00, 0.1461700E+00, &
     & 0.1528100E+00, 0.1649800E+00, 0.1565000E+00, 0.1524800E+00, &
     & 0.1387500E+00, 0.1509200E+00, 0.1870700E+00, 0.2245291E+00, &
     & 0.1881300E+00, 0.2673100E+00, 0.3054064E+00, 0.3054064E+00 /
      data (ref_adm( 6,iz,10, 9),iz = 1,20) / &
     & 0.1703100E+00, 0.1703100E+00, 0.1512300E+00, 0.1430500E+00, &
     & 0.1558600E+00, 0.1500500E+00, 0.1341800E+00, 0.1673600E+00, &
     & 0.1523800E+00, 0.1702000E+00, 0.1624800E+00, 0.1462400E+00, &
     & 0.1522200E+00, 0.1636400E+00, 0.1896400E+00, 0.2020100E+00, &
     & 0.1905500E+00, 0.2170400E+00, 0.3010737E+00, 0.3010737E+00 /
      data (ref_adm( 6,iz,11, 9),iz = 1,20) / &
     & 0.1644300E+00, 0.1644300E+00, 0.1531600E+00, 0.1852100E+00, &
     & 0.1656500E+00, 0.1668700E+00, 0.1745300E+00, 0.1626300E+00, &
     & 0.1564100E+00, 0.1531300E+00, 0.1456600E+00, 0.1577400E+00, &
     & 0.1620200E+00, 0.1580500E+00, 0.1716900E+00, 0.1970700E+00, &
     & 0.2336200E+00, 0.2132000E+00, 0.2135400E+00, 0.2135400E+00 /
      data (ref_adm( 6,iz,12, 9),iz = 1,20) / &
     & 0.1651000E+00, 0.1651000E+00, 0.1698400E+00, 0.1657900E+00, &
     & 0.1724300E+00, 0.1693100E+00, 0.1634400E+00, 0.1511000E+00, &
     & 0.1579500E+00, 0.1631300E+00, 0.1631900E+00, 0.1604800E+00, &
     & 0.1482100E+00, 0.1870400E+00, 0.1618800E+00, 0.1605500E+00, &
     & 0.2403957E+00, 0.2028500E+00, 0.2926251E+00, 0.2926251E+00 /
      data (ref_adm( 6,iz,13, 9),iz = 1,20) / &
     & 0.1695600E+00, 0.1695600E+00, 0.1565500E+00, 0.1647200E+00, &
     & 0.1531400E+00, 0.1640700E+00, 0.1663800E+00, 0.1758900E+00, &
     & 0.1823000E+00, 0.1794700E+00, 0.1800500E+00, 0.1653900E+00, &
     & 0.1451200E+00, 0.1577500E+00, 0.1895700E+00, 0.1936300E+00, &
     & 0.2379900E+00, 0.1898700E+00, 0.2881635E+00, 0.2881635E+00 /
      data (ref_adm( 6,iz,14, 9),iz = 1,20) / &
     & 0.1540200E+00, 0.1540200E+00, 0.1510400E+00, 0.1493600E+00, &
     & 0.1492200E+00, 0.1486600E+00, 0.1579400E+00, 0.1512400E+00, &
     & 0.1568600E+00, 0.1588900E+00, 0.1755000E+00, 0.1855000E+00, &
     & 0.1691300E+00, 0.1734400E+00, 0.1984853E+00, 0.2014800E+00, &
     & 0.2356211E+00, 0.2214200E+00, 0.2829168E+00, 0.2829168E+00 /
      data (ref_adm( 6,iz,15, 9),iz = 1,20) / &
     & 0.1483900E+00, 0.1483900E+00, 0.1587400E+00, 0.1562700E+00, &
     & 0.1528100E+00, 0.1516100E+00, 0.1433700E+00, 0.1571400E+00, &
     & 0.1549900E+00, 0.1489300E+00, 0.1539400E+00, 0.1584400E+00, &
     & 0.1580900E+00, 0.1682000E+00, 0.1344500E+00, 0.2080800E+00, &
     & 0.2022600E+00, 0.2414000E+00, 0.2772783E+00, 0.2772783E+00 /
      data (ref_adm( 6,iz,16, 9),iz = 1,20) / &
     & 0.1559900E+00, 0.1559900E+00, 0.1501300E+00, 0.1546400E+00, &
     & 0.1735700E+00, 0.1783200E+00, 0.1730200E+00, 0.1318500E+00, &
     & 0.1938400E+00, 0.1671200E+00, 0.1739100E+00, 0.1772400E+00, &
     & 0.1642300E+00, 0.1707400E+00, 0.1636800E+00, 0.2063500E+00, &
     & 0.1981900E+00, 0.2558385E+00, 0.2724403E+00, 0.2724403E+00 /
      data (ref_adm( 6,iz,17, 9),iz = 1,20) / &
     & 0.1475700E+00, 0.1475700E+00, 0.1431600E+00, 0.1769800E+00, &
     & 0.1639800E+00, 0.1513900E+00, 0.1774000E+00, 0.1599900E+00, &
     & 0.1705300E+00, 0.1619300E+00, 0.1601100E+00, 0.1893300E+00, &
     & 0.1664900E+00, 0.1793500E+00, 0.1915600E+00, 0.1940500E+00, &
     & 0.2017700E+00, 0.2529421E+00, 0.2679292E+00, 0.2679292E+00 /
      data (ref_adm( 6,iz,18, 9),iz = 1,20) / &
     & 0.1575100E+00, 0.1575100E+00, 0.1415100E+00, 0.1647700E+00, &
     & 0.1404900E+00, 0.1402200E+00, 0.1628800E+00, 0.1559500E+00, &
     & 0.1827900E+00, 0.1981200E+00, 0.1771200E+00, 0.1816100E+00, &
     & 0.1767400E+00, 0.1679100E+00, 0.2006800E+00, 0.1714100E+00, &
     & 0.2278300E+00, 0.2734823E+00, 0.2895251E+00, 0.2895251E+00 /
      data (ref_adm( 6,iz,19, 9),iz = 1,20) / &
     & 0.1381400E+00, 0.1381400E+00, 0.1658300E+00, 0.1476900E+00, &
     & 0.1456200E+00, 0.1493600E+00, 0.1571500E+00, 0.1609100E+00, &
     & 0.1655200E+00, 0.1593900E+00, 0.1649400E+00, 0.1630700E+00, &
     & 0.1701800E+00, 0.1866300E+00, 0.2148700E+00, 0.2170200E+00, &
     & 0.2119600E+00, 0.2713935E+00, 0.2851505E+00, 0.2851505E+00 /
      data (ref_adm( 6,iz,20, 9),iz = 1,20) / &
     & 0.1430500E+00, 0.1430500E+00, 0.1482100E+00, 0.1305000E+00, &
     & 0.1573400E+00, 0.1482200E+00, 0.1626500E+00, 0.1735100E+00, &
     & 0.1744600E+00, 0.1864200E+00, 0.1929200E+00, 0.1827100E+00, &
     & 0.1629200E+00, 0.2410000E+00, 0.2180900E+00, 0.2270700E+00, &
     & 0.2224900E+00, 0.2698734E+00, 0.2827130E+00, 0.2827130E+00 /
      data (ref_adm( 6,iz,21, 9),iz = 1,20) / &
     & 0.1476700E+00, 0.1476700E+00, 0.1313700E+00, 0.1575500E+00, &
     & 0.1707400E+00, 0.1636200E+00, 0.1387700E+00, 0.1278700E+00, &
     & 0.1586800E+00, 0.1766700E+00, 0.2036100E+00, 0.1920600E+00, &
     & 0.2495300E+00, 0.1898700E+00, 0.2051300E+00, 0.2300790E+00, &
     & 0.2154400E+00, 0.2689184E+00, 0.2810141E+00, 0.2810141E+00 /
      data (ref_adm( 6,iz,22, 9),iz = 1,20) / &
     & 0.1491500E+00, 0.1491500E+00, 0.1551500E+00, 0.1571600E+00, &
     & 0.1759500E+00, 0.1605100E+00, 0.1535300E+00, 0.1684700E+00, &
     & 0.1677200E+00, 0.1881600E+00, 0.1770100E+00, 0.1770400E+00, &
     & 0.2051400E+00, 0.1972400E+00, 0.2056800E+00, 0.1698700E+00, &
     & 0.2401941E+00, 0.2535779E+00, 0.2569558E+00, 0.2569558E+00 /
      data (ref_adm( 6,iz,23, 9),iz = 1,20) / &
     & 0.1665900E+00, 0.1665900E+00, 0.1625200E+00, 0.1459500E+00, &
     & 0.1524100E+00, 0.1779500E+00, 0.1652500E+00, 0.1850400E+00, &
     & 0.1812200E+00, 0.1772900E+00, 0.1793900E+00, 0.2107800E+00, &
     & 0.1960000E+00, 0.2140300E+00, 0.2240500E+00, 0.2355900E+00, &
     & 0.2412297E+00, 0.2536665E+00, 0.2569747E+00, 0.2569747E+00 /
      data (ref_adm( 6,iz,24, 9),iz = 1,20) / &
     & 0.1614900E+00, 0.1614900E+00, 0.1533100E+00, 0.1894900E+00, &
     & 0.2019200E+00, 0.1605400E+00, 0.1712000E+00, 0.1874000E+00, &
     & 0.2216200E+00, 0.1790800E+00, 0.1960900E+00, 0.1862600E+00, &
     & 0.2038500E+00, 0.2301000E+00, 0.2432700E+00, 0.2154600E+00, &
     & 0.3190300E+00, 0.2546706E+00, 0.2575780E+00, 0.2575780E+00 /
      data (ref_adm( 6,iz,25, 9),iz = 1,20) / &
     & 0.1649900E+00, 0.1649900E+00, 0.1493400E+00, 0.1512800E+00, &
     & 0.1691600E+00, 0.1689600E+00, 0.1833600E+00, 0.1742800E+00, &
     & 0.2196100E+00, 0.2083500E+00, 0.2015100E+00, 0.2024100E+00, &
     & 0.2197400E+00, 0.2195600E+00, 0.2401800E+00, 0.2214200E+00, &
     & 0.1910800E+00, 0.2562487E+00, 0.2591831E+00, 0.2591831E+00 /
      data (ref_adm( 6,iz,26, 9),iz = 1,20) / &
     & 0.1582100E+00, 0.1582100E+00, 0.1617900E+00, 0.1606700E+00, &
     & 0.1617700E+00, 0.1656800E+00, 0.1808100E+00, 0.1768700E+00, &
     & 0.1763700E+00, 0.2033500E+00, 0.1820900E+00, 0.2180500E+00, &
     & 0.2244800E+00, 0.2269700E+00, 0.1873100E+00, 0.2160400E+00, &
     & 0.2127800E+00, 0.2585490E+00, 0.2614783E+00, 0.2614783E+00 /
      data (ref_adm( 6,iz,27, 9),iz = 1,20) / &
     & 0.1730200E+00, 0.1730200E+00, 0.1682600E+00, 0.1706400E+00, &
     & 0.1789000E+00, 0.1909100E+00, 0.1898300E+00, 0.1809100E+00, &
     & 0.1904000E+00, 0.1849300E+00, 0.1886400E+00, 0.2101400E+00, &
     & 0.2156200E+00, 0.2237500E+00, 0.2454300E+00, 0.2202700E+00, &
     & 0.2110300E+00, 0.2380800E+00, 0.2644558E+00, 0.2644558E+00 /
      data (ref_adm( 6,iz,28, 9),iz = 1,20) / &
     & 0.1701900E+00, 0.1701900E+00, 0.1778700E+00, 0.1682600E+00, &
     & 0.1820700E+00, 0.1984300E+00, 0.2150200E+00, 0.2197000E+00, &
     & 0.2166600E+00, 0.2193400E+00, 0.2108400E+00, 0.2145700E+00, &
     & 0.2173100E+00, 0.2254100E+00, 0.2418800E+00, 0.2353400E+00, &
     & 0.2254000E+00, 0.2068200E+00, 0.2686011E+00, 0.2686011E+00 /
      data (ref_adm( 6,iz,29, 9),iz = 1,20) / &
     & 0.1707900E+00, 0.1707900E+00, 0.1585300E+00, 0.1774900E+00, &
     & 0.1765400E+00, 0.1777700E+00, 0.1890400E+00, 0.1926400E+00, &
     & 0.2223600E+00, 0.2390900E+00, 0.2328800E+00, 0.2444500E+00, &
     & 0.2503800E+00, 0.2445400E+00, 0.2352700E+00, 0.2568200E+00, &
     & 0.2513400E+00, 0.2264500E+00, 0.2733760E+00, 0.2733760E+00 /
      data (ref_adm( 6,iz,30, 9),iz = 1,20) / &
     & 0.1721700E+00, 0.1721700E+00, 0.1536100E+00, 0.1846500E+00, &
     & 0.1923800E+00, 0.1876000E+00, 0.1796200E+00, 0.1943600E+00, &
     & 0.2216900E+00, 0.2364900E+00, 0.2308900E+00, 0.2360000E+00, &
     & 0.2334500E+00, 0.2530000E+00, 0.2669700E+00, 0.2162400E+00, &
     & 0.2673300E+00, 0.2326200E+00, 0.1975200E+00, 0.1975200E+00 /
      data (ref_adm( 6,iz,31, 9),iz = 1,20) / &
     & 0.1741900E+00, 0.1741900E+00, 0.1688700E+00, 0.1758400E+00, &
     & 0.1931300E+00, 0.2011900E+00, 0.1869900E+00, 0.2230900E+00, &
     & 0.1932500E+00, 0.2025800E+00, 0.2002300E+00, 0.2029200E+00, &
     & 0.2127100E+00, 0.2248200E+00, 0.2330900E+00, 0.2291600E+00, &
     & 0.2201200E+00, 0.2025900E+00, 0.1693700E+00, 0.1693700E+00 /
      data (ref_adm( 6,iz,32, 9),iz = 1,20) / &
     & 0.1811000E+00, 0.1811000E+00, 0.1860600E+00, 0.1909200E+00, &
     & 0.1842100E+00, 0.1946400E+00, 0.2102300E+00, 0.2131000E+00, &
     & 0.2252700E+00, 0.2232700E+00, 0.2447000E+00, 0.2524100E+00, &
     & 0.2717400E+00, 0.2657700E+00, 0.2575900E+00, 0.2003700E+00, &
     & 0.2322100E+00, 0.2368800E+00, 0.1865100E+00, 0.1865100E+00 /
      data (ref_adm( 6,iz,33, 9),iz = 1,20) / &
     & 0.1928400E+00, 0.1928400E+00, 0.2018100E+00, 0.1841400E+00, &
     & 0.1828000E+00, 0.2051000E+00, 0.2348200E+00, 0.2174700E+00, &
     & 0.2245600E+00, 0.2351800E+00, 0.2465700E+00, 0.2609800E+00, &
     & 0.2800900E+00, 0.2811300E+00, 0.2751400E+00, 0.2260500E+00, &
     & 0.2425900E+00, 0.2876147E+00, 0.2921750E+00, 0.2921750E+00 /
      data (ref_adm( 6,iz,34, 9),iz = 1,20) / &
     & 0.1729900E+00, 0.1729900E+00, 0.1619200E+00, 0.1751000E+00, &
     & 0.1961900E+00, 0.2071100E+00, 0.2181600E+00, 0.2167700E+00, &
     & 0.2308500E+00, 0.2593800E+00, 0.2477900E+00, 0.2661400E+00, &
     & 0.2913500E+00, 0.2694200E+00, 0.2795400E+00, 0.2656700E+00, &
     & 0.2752900E+00, 0.2912179E+00, 0.2962389E+00, 0.2962389E+00 /
      data (ref_adm( 6,iz,35, 9),iz = 1,20) / &
     & 0.1698500E+00, 0.1698500E+00, 0.1894700E+00, 0.1835400E+00, &
     & 0.1889200E+00, 0.1964300E+00, 0.2175400E+00, 0.2111600E+00, &
     & 0.2716800E+00, 0.2643500E+00, 0.2733700E+00, 0.2619400E+00, &
     & 0.2131000E+00, 0.2607500E+00, 0.2842600E+00, 0.3086100E+00, &
     & 0.3115100E+00, 0.2943714E+00, 0.2993775E+00, 0.2993775E+00 /
      data (ref_adm( 6,iz,36, 9),iz = 1,20) / &
     & 0.1650900E+00, 0.1650900E+00, 0.1878600E+00, 0.2043000E+00, &
     & 0.1781800E+00, 0.2150800E+00, 0.2241000E+00, 0.2491000E+00, &
     & 0.2728600E+00, 0.2577900E+00, 0.2861600E+00, 0.2683300E+00, &
     & 0.2635600E+00, 0.2306100E+00, 0.2362200E+00, 0.3000600E+00, &
     & 0.3150800E+00, 0.2966258E+00, 0.3014680E+00, 0.3014680E+00 /
      data (ref_adm( 6,iz,37, 9),iz = 1,20) / &
     & 0.1752200E+00, 0.1752200E+00, 0.1716700E+00, 0.1678100E+00, &
     & 0.1796900E+00, 0.2161900E+00, 0.2425700E+00, 0.2437800E+00, &
     & 0.2587400E+00, 0.2841600E+00, 0.3187800E+00, 0.2657300E+00, &
     & 0.2942400E+00, 0.2359500E+00, 0.2770900E+00, 0.3025600E+00, &
     & 0.2883106E+00, 0.2978757E+00, 0.3026627E+00, 0.3026627E+00 /
      data (ref_adm( 6,iz,38, 9),iz = 1,20) / &
     & 0.1752200E+00, 0.1752200E+00, 0.1716700E+00, 0.1678100E+00, &
     & 0.1796900E+00, 0.2161900E+00, 0.2425700E+00, 0.2437800E+00, &
     & 0.2587400E+00, 0.2841600E+00, 0.3187800E+00, 0.2657300E+00, &
     & 0.2942400E+00, 0.2359500E+00, 0.2770900E+00, 0.3025600E+00, &
     & 0.2883106E+00, 0.2978757E+00, 0.3026627E+00, 0.3026627E+00 /
! Solar Zenith Angle 45.0 Albedo  0.1929717E+00
      data (ref_adm( 6,iz, 1,10),iz = 1,20) / &
     & 0.1672900E+00, 0.1672900E+00, 0.1647800E+00, 0.1761900E+00, &
     & 0.1565800E+00, 0.1583900E+00, 0.1974500E+00, 0.2158400E+00, &
     & 0.1908300E+00, 0.1803900E+00, 0.2711000E+00, 0.2012800E+00, &
     & 0.1615000E+00, 0.2044000E+00, 0.2135100E+00, 0.2297600E+00, &
     & 0.2517000E+00, 0.2779800E+00, 0.3080200E+00, 0.3080200E+00 /
      data (ref_adm( 6,iz, 2,10),iz = 1,20) / &
     & 0.1672900E+00, 0.1672900E+00, 0.1647800E+00, 0.1761900E+00, &
     & 0.1565800E+00, 0.1583900E+00, 0.1974500E+00, 0.2158400E+00, &
     & 0.1908300E+00, 0.1803900E+00, 0.2711000E+00, 0.2012800E+00, &
     & 0.1615000E+00, 0.2044000E+00, 0.2135100E+00, 0.2297600E+00, &
     & 0.2517000E+00, 0.2779800E+00, 0.3080200E+00, 0.3080200E+00 /
      data (ref_adm( 6,iz, 3,10),iz = 1,20) / &
     & 0.1685900E+00, 0.1685900E+00, 0.1509600E+00, 0.1400900E+00, &
     & 0.1654100E+00, 0.1571900E+00, 0.2085900E+00, 0.1708700E+00, &
     & 0.2385000E+00, 0.1884600E+00, 0.1659400E+00, 0.1764700E+00, &
     & 0.1884300E+00, 0.1843800E+00, 0.2084900E+00, 0.2323700E+00, &
     & 0.2776200E+00, 0.2634700E+00, 0.3674883E-01, 0.3674883E-01 /
      data (ref_adm( 6,iz, 4,10),iz = 1,20) / &
     & 0.1441400E+00, 0.1441400E+00, 0.1514100E+00, 0.1429600E+00, &
     & 0.1559100E+00, 0.1699700E+00, 0.1643600E+00, 0.1608700E+00, &
     & 0.1649500E+00, 0.1998600E+00, 0.1581700E+00, 0.1808200E+00, &
     & 0.1683100E+00, 0.1905300E+00, 0.1927900E+00, 0.2129200E+00, &
     & 0.2177100E+00, 0.2673400E+00, 0.3568900E+00, 0.3568900E+00 /
      data (ref_adm( 6,iz, 5,10),iz = 1,20) / &
     & 0.1536900E+00, 0.1536900E+00, 0.1572700E+00, 0.1607300E+00, &
     & 0.1412000E+00, 0.1574200E+00, 0.1666800E+00, 0.1545200E+00, &
     & 0.1592100E+00, 0.1352600E+00, 0.1644800E+00, 0.1673900E+00, &
     & 0.1782300E+00, 0.1754300E+00, 0.1918200E+00, 0.2151000E+00, &
     & 0.2246100E+00, 0.2327400E+00, 0.2054800E+00, 0.2054800E+00 /
      data (ref_adm( 6,iz, 6,10),iz = 1,20) / &
     & 0.1645400E+00, 0.1645400E+00, 0.1486700E+00, 0.1454700E+00, &
     & 0.1486800E+00, 0.1486700E+00, 0.1327000E+00, 0.1450600E+00, &
     & 0.1402400E+00, 0.1478400E+00, 0.1662000E+00, 0.1472900E+00, &
     & 0.1836700E+00, 0.1799200E+00, 0.1780700E+00, 0.2149800E+00, &
     & 0.2551000E+00, 0.2196300E+00, 0.2212000E+00, 0.2212000E+00 /
      data (ref_adm( 6,iz, 7,10),iz = 1,20) / &
     & 0.1916300E+00, 0.1916300E+00, 0.1701500E+00, 0.1634000E+00, &
     & 0.1656600E+00, 0.1535300E+00, 0.1543500E+00, 0.1473600E+00, &
     & 0.1725600E+00, 0.1608600E+00, 0.1775700E+00, 0.1624200E+00, &
     & 0.1788900E+00, 0.1783900E+00, 0.1888100E+00, 0.2125200E+00, &
     & 0.2218800E+00, 0.2636400E+00, 0.2510700E+00, 0.2510700E+00 /
      data (ref_adm( 6,iz, 8,10),iz = 1,20) / &
     & 0.1704200E+00, 0.1704200E+00, 0.1747900E+00, 0.1671200E+00, &
     & 0.1692900E+00, 0.1622500E+00, 0.1626900E+00, 0.1626700E+00, &
     & 0.1727700E+00, 0.1704200E+00, 0.1655900E+00, 0.1822300E+00, &
     & 0.1815400E+00, 0.1656500E+00, 0.1837400E+00, 0.2286100E+00, &
     & 0.2933000E+00, 0.2367548E+00, 0.3122600E+00, 0.3122600E+00 /
      data (ref_adm( 6,iz, 9,10),iz = 1,20) / &
     & 0.1690900E+00, 0.1690900E+00, 0.1597900E+00, 0.1706500E+00, &
     & 0.1830500E+00, 0.1566600E+00, 0.1501300E+00, 0.1417800E+00, &
     & 0.1579800E+00, 0.1543100E+00, 0.1648600E+00, 0.1599000E+00, &
     & 0.1661200E+00, 0.1906600E+00, 0.1834400E+00, 0.2461900E+00, &
     & 0.2601700E+00, 0.2419800E+00, 0.2740100E+00, 0.2740100E+00 /
      data (ref_adm( 6,iz,10,10),iz = 1,20) / &
     & 0.1660800E+00, 0.1660800E+00, 0.1593300E+00, 0.1580600E+00, &
     & 0.1535300E+00, 0.1386900E+00, 0.1427700E+00, 0.1508700E+00, &
     & 0.1335000E+00, 0.1353200E+00, 0.1522300E+00, 0.1644000E+00, &
     & 0.1747700E+00, 0.1707300E+00, 0.1768400E+00, 0.1802300E+00, &
     & 0.1692000E+00, 0.2623300E+00, 0.2133700E+00, 0.2133700E+00 /
      data (ref_adm( 6,iz,11,10),iz = 1,20) / &
     & 0.1485800E+00, 0.1485800E+00, 0.1613400E+00, 0.1475800E+00, &
     & 0.1572100E+00, 0.1506500E+00, 0.1540000E+00, 0.1618600E+00, &
     & 0.1453800E+00, 0.1479300E+00, 0.1580700E+00, 0.1750200E+00, &
     & 0.1702200E+00, 0.1814800E+00, 0.1741000E+00, 0.1828000E+00, &
     & 0.1933800E+00, 0.1891200E+00, 0.1654500E+00, 0.1654500E+00 /
      data (ref_adm( 6,iz,12,10),iz = 1,20) / &
     & 0.1804200E+00, 0.1804200E+00, 0.1572600E+00, 0.1554400E+00, &
     & 0.1635400E+00, 0.1593000E+00, 0.1468900E+00, 0.1353900E+00, &
     & 0.1498100E+00, 0.1319100E+00, 0.1596400E+00, 0.1572800E+00, &
     & 0.1744000E+00, 0.1719600E+00, 0.1855300E+00, 0.1800800E+00, &
     & 0.2016200E+00, 0.2105200E+00, 0.1689000E+00, 0.1689000E+00 /
      data (ref_adm( 6,iz,13,10),iz = 1,20) / &
     & 0.1709900E+00, 0.1709900E+00, 0.1682000E+00, 0.1618700E+00, &
     & 0.1828600E+00, 0.1950600E+00, 0.1677200E+00, 0.1561200E+00, &
     & 0.1687300E+00, 0.1650900E+00, 0.1637200E+00, 0.1621500E+00, &
     & 0.1691400E+00, 0.1755400E+00, 0.1823600E+00, 0.1814600E+00, &
     & 0.2191900E+00, 0.2187300E+00, 0.1928500E+00, 0.1928500E+00 /
      data (ref_adm( 6,iz,14,10),iz = 1,20) / &
     & 0.1674400E+00, 0.1674400E+00, 0.1553100E+00, 0.1530600E+00, &
     & 0.1494900E+00, 0.1402300E+00, 0.1346400E+00, 0.1386600E+00, &
     & 0.1462400E+00, 0.1513000E+00, 0.1598100E+00, 0.1612500E+00, &
     & 0.1777400E+00, 0.1785700E+00, 0.1616100E+00, 0.1823000E+00, &
     & 0.2425200E+00, 0.2258600E+00, 0.2278801E+00, 0.2278801E+00 /
      data (ref_adm( 6,iz,15,10),iz = 1,20) / &
     & 0.1597900E+00, 0.1597900E+00, 0.1775700E+00, 0.1745100E+00, &
     & 0.1657700E+00, 0.1539100E+00, 0.1577200E+00, 0.1529600E+00, &
     & 0.1572600E+00, 0.1574000E+00, 0.1640200E+00, 0.1644900E+00, &
     & 0.1648800E+00, 0.1708400E+00, 0.2073000E+00, 0.1970400E+00, &
     & 0.2244900E+00, 0.2188500E+00, 0.2243555E+00, 0.2243555E+00 /
      data (ref_adm( 6,iz,16,10),iz = 1,20) / &
     & 0.1647700E+00, 0.1647700E+00, 0.1552200E+00, 0.1554600E+00, &
     & 0.1652800E+00, 0.1535500E+00, 0.1553400E+00, 0.1579300E+00, &
     & 0.1574400E+00, 0.1306200E+00, 0.1554700E+00, 0.1592700E+00, &
     & 0.1701100E+00, 0.1780900E+00, 0.1598900E+00, 0.1842800E+00, &
     & 0.1963600E+00, 0.2413400E+00, 0.2212867E+00, 0.2212867E+00 /
      data (ref_adm( 6,iz,17,10),iz = 1,20) / &
     & 0.1719300E+00, 0.1719300E+00, 0.1640100E+00, 0.1674100E+00, &
     & 0.1545400E+00, 0.1532700E+00, 0.1466000E+00, 0.1832300E+00, &
     & 0.1597100E+00, 0.1754800E+00, 0.1604500E+00, 0.1652900E+00, &
     & 0.1655900E+00, 0.1899700E+00, 0.1452400E+00, 0.1788300E+00, &
     & 0.2269900E+00, 0.2307900E+00, 0.2182789E+00, 0.2182789E+00 /
      data (ref_adm( 6,iz,18,10),iz = 1,20) / &
     & 0.1648900E+00, 0.1648900E+00, 0.1807300E+00, 0.1746900E+00, &
     & 0.1568200E+00, 0.1540600E+00, 0.1594600E+00, 0.1602800E+00, &
     & 0.1528700E+00, 0.1668800E+00, 0.1544700E+00, 0.1693700E+00, &
     & 0.1664300E+00, 0.1731500E+00, 0.1900300E+00, 0.1785200E+00, &
     & 0.1916300E+00, 0.2046800E+00, 0.2710986E+00, 0.2710986E+00 /
      data (ref_adm( 6,iz,19,10),iz = 1,20) / &
     & 0.1730000E+00, 0.1730000E+00, 0.1503400E+00, 0.1578900E+00, &
     & 0.1730700E+00, 0.1686500E+00, 0.1653400E+00, 0.1474800E+00, &
     & 0.1526000E+00, 0.1693200E+00, 0.1658300E+00, 0.1872000E+00, &
     & 0.1736100E+00, 0.1888100E+00, 0.1826300E+00, 0.1761400E+00, &
     & 0.2405800E+00, 0.2555335E+00, 0.2675546E+00, 0.2675546E+00 /
      data (ref_adm( 6,iz,20,10),iz = 1,20) / &
     & 0.1589800E+00, 0.1589800E+00, 0.1704200E+00, 0.1637400E+00, &
     & 0.1404800E+00, 0.1399800E+00, 0.1539600E+00, 0.1482400E+00, &
     & 0.1621100E+00, 0.1588700E+00, 0.1622300E+00, 0.1863700E+00, &
     & 0.1870600E+00, 0.1823300E+00, 0.1900100E+00, 0.2025000E+00, &
     & 0.2343644E+00, 0.2544952E+00, 0.2654287E+00, 0.2654287E+00 /
      data (ref_adm( 6,iz,21,10),iz = 1,20) / &
     & 0.1554600E+00, 0.1554600E+00, 0.1525500E+00, 0.1707400E+00, &
     & 0.1549800E+00, 0.1490100E+00, 0.1569900E+00, 0.1646900E+00, &
     & 0.1618500E+00, 0.1725100E+00, 0.1579000E+00, 0.1751100E+00, &
     & 0.1831400E+00, 0.1909900E+00, 0.2119000E+00, 0.1983900E+00, &
     & 0.2241200E+00, 0.2537811E+00, 0.2639509E+00, 0.2639509E+00 /
      data (ref_adm( 6,iz,22,10),iz = 1,20) / &
     & 0.1624100E+00, 0.1624100E+00, 0.1515000E+00, 0.1595000E+00, &
     & 0.1500300E+00, 0.1556100E+00, 0.1699000E+00, 0.1542700E+00, &
     & 0.1656900E+00, 0.1819500E+00, 0.1873100E+00, 0.1879400E+00, &
     & 0.1789100E+00, 0.2076100E+00, 0.2090800E+00, 0.2060700E+00, &
     & 0.2704924E+00, 0.2769677E+00, 0.2606679E+00, 0.2606679E+00 /
      data (ref_adm( 6,iz,23,10),iz = 1,20) / &
     & 0.1493400E+00, 0.1493400E+00, 0.1629300E+00, 0.1632100E+00, &
     & 0.1630900E+00, 0.1708900E+00, 0.1772100E+00, 0.1717300E+00, &
     & 0.1700800E+00, 0.1819600E+00, 0.1783300E+00, 0.1732100E+00, &
     & 0.1946700E+00, 0.2086500E+00, 0.2096800E+00, 0.2245300E+00, &
     & 0.2661457E+00, 0.2712437E+00, 0.2584626E+00, 0.2584626E+00 /
      data (ref_adm( 6,iz,24,10),iz = 1,20) / &
     & 0.1609700E+00, 0.1609700E+00, 0.1538500E+00, 0.1597800E+00, &
     & 0.1705600E+00, 0.1635400E+00, 0.1759800E+00, 0.1779000E+00, &
     & 0.1733800E+00, 0.1955700E+00, 0.1971800E+00, 0.2004300E+00, &
     & 0.2108200E+00, 0.2046800E+00, 0.2202300E+00, 0.2250400E+00, &
     & 0.1887500E+00, 0.2669777E+00, 0.2566611E+00, 0.2566611E+00 /
      data (ref_adm( 6,iz,25,10),iz = 1,20) / &
     & 0.1547400E+00, 0.1547400E+00, 0.1687400E+00, 0.1729600E+00, &
     & 0.1739300E+00, 0.1814300E+00, 0.1908400E+00, 0.1917500E+00, &
     & 0.1848200E+00, 0.1941100E+00, 0.1886900E+00, 0.2018100E+00, &
     & 0.2164500E+00, 0.2076200E+00, 0.2349100E+00, 0.2553600E+00, &
     & 0.2058200E+00, 0.1889400E+00, 0.2555588E+00, 0.2555588E+00 /
      data (ref_adm( 6,iz,26,10),iz = 1,20) / &
     & 0.1587900E+00, 0.1587900E+00, 0.1503100E+00, 0.1502400E+00, &
     & 0.1653400E+00, 0.1706200E+00, 0.1771400E+00, 0.1833000E+00, &
     & 0.1927000E+00, 0.1957400E+00, 0.2016700E+00, 0.2170200E+00, &
     & 0.2267100E+00, 0.2177700E+00, 0.2301200E+00, 0.2426300E+00, &
     & 0.2382600E+00, 0.2343600E+00, 0.2553750E+00, 0.2553750E+00 /
      data (ref_adm( 6,iz,27,10),iz = 1,20) / &
     & 0.1907300E+00, 0.1907300E+00, 0.1952500E+00, 0.1796000E+00, &
     & 0.1882800E+00, 0.1812900E+00, 0.1882600E+00, 0.1956600E+00, &
     & 0.1926900E+00, 0.1964700E+00, 0.1964700E+00, 0.2060800E+00, &
     & 0.2149300E+00, 0.2339400E+00, 0.2509600E+00, 0.2550800E+00, &
     & 0.2753800E+00, 0.2541200E+00, 0.1629900E+00, 0.1629900E+00 /
      data (ref_adm( 6,iz,28,10),iz = 1,20) / &
     & 0.1813700E+00, 0.1813700E+00, 0.1653200E+00, 0.1559500E+00, &
     & 0.1732000E+00, 0.1833600E+00, 0.1930000E+00, 0.2122100E+00, &
     & 0.2221400E+00, 0.2232400E+00, 0.2213000E+00, 0.2226100E+00, &
     & 0.2149100E+00, 0.2285700E+00, 0.2504800E+00, 0.2717000E+00, &
     & 0.2516000E+00, 0.2395300E+00, 0.2564547E+00, 0.2564547E+00 /
      data (ref_adm( 6,iz,29,10),iz = 1,20) / &
     & 0.1851100E+00, 0.1851100E+00, 0.1516500E+00, 0.1715200E+00, &
     & 0.1802500E+00, 0.1895800E+00, 0.2026000E+00, 0.2210400E+00, &
     & 0.2015300E+00, 0.2167800E+00, 0.2081400E+00, 0.2232300E+00, &
     & 0.2384600E+00, 0.2640000E+00, 0.2655900E+00, 0.2730400E+00, &
     & 0.2797100E+00, 0.2761400E+00, 0.2054800E+00, 0.2054800E+00 /
      data (ref_adm( 6,iz,30,10),iz = 1,20) / &
     & 0.1639800E+00, 0.1639800E+00, 0.1684400E+00, 0.1724000E+00, &
     & 0.1780500E+00, 0.1918000E+00, 0.1917200E+00, 0.1823800E+00, &
     & 0.1866900E+00, 0.2221200E+00, 0.2186200E+00, 0.2486500E+00, &
     & 0.2457000E+00, 0.2459200E+00, 0.2678600E+00, 0.2883600E+00, &
     & 0.2976300E+00, 0.2511400E+00, 0.2611725E+00, 0.2611725E+00 /
      data (ref_adm( 6,iz,31,10),iz = 1,20) / &
     & 0.1776900E+00, 0.1776900E+00, 0.2016400E+00, 0.1809200E+00, &
     & 0.1940200E+00, 0.1983000E+00, 0.2053300E+00, 0.2153600E+00, &
     & 0.2111200E+00, 0.2245900E+00, 0.2398700E+00, 0.2594000E+00, &
     & 0.2548400E+00, 0.2471400E+00, 0.2486200E+00, 0.2579200E+00, &
     & 0.2666600E+00, 0.2400300E+00, 0.2302200E+00, 0.2302200E+00 /
      data (ref_adm( 6,iz,32,10),iz = 1,20) / &
     & 0.1656800E+00, 0.1656800E+00, 0.1700200E+00, 0.1864100E+00, &
     & 0.1838000E+00, 0.1980100E+00, 0.2167600E+00, 0.2242200E+00, &
     & 0.2253800E+00, 0.2159700E+00, 0.2370600E+00, 0.2547600E+00, &
     & 0.2655800E+00, 0.2676100E+00, 0.2937600E+00, 0.2915700E+00, &
     & 0.2861300E+00, 0.2641600E+00, 0.2203200E+00, 0.2203200E+00 /
      data (ref_adm( 6,iz,33,10),iz = 1,20) / &
     & 0.1884000E+00, 0.1884000E+00, 0.1876300E+00, 0.1830300E+00, &
     & 0.1950400E+00, 0.1821600E+00, 0.1836300E+00, 0.2005200E+00, &
     & 0.2135700E+00, 0.2354100E+00, 0.2240100E+00, 0.2418100E+00, &
     & 0.2426700E+00, 0.2370000E+00, 0.2556900E+00, 0.2704500E+00, &
     & 0.2722400E+00, 0.2769600E+00, 0.2337000E+00, 0.2337000E+00 /
      data (ref_adm( 6,iz,34,10),iz = 1,20) / &
     & 0.1639100E+00, 0.1639100E+00, 0.1874000E+00, 0.1903300E+00, &
     & 0.2008800E+00, 0.2004100E+00, 0.1970900E+00, 0.1978100E+00, &
     & 0.2018400E+00, 0.2297400E+00, 0.2377100E+00, 0.2554000E+00, &
     & 0.2528100E+00, 0.2745400E+00, 0.2763200E+00, 0.2902100E+00, &
     & 0.2926900E+00, 0.2434000E+00, 0.2714619E+00, 0.2714619E+00 /
      data (ref_adm( 6,iz,35,10),iz = 1,20) / &
     & 0.1590200E+00, 0.1590200E+00, 0.1818900E+00, 0.1725200E+00, &
     & 0.1886400E+00, 0.1918000E+00, 0.2004500E+00, 0.2133800E+00, &
     & 0.2348900E+00, 0.2527200E+00, 0.2514900E+00, 0.2654000E+00, &
     & 0.2673300E+00, 0.2709500E+00, 0.2921300E+00, 0.2989600E+00, &
     & 0.2703400E+00, 0.2738300E+00, 0.2733470E+00, 0.2733470E+00 /
      data (ref_adm( 6,iz,36,10),iz = 1,20) / &
     & 0.1789700E+00, 0.1789700E+00, 0.1788700E+00, 0.1841000E+00, &
     & 0.1765600E+00, 0.2034600E+00, 0.2132300E+00, 0.2266600E+00, &
     & 0.2574400E+00, 0.2613700E+00, 0.2767000E+00, 0.2652400E+00, &
     & 0.2686300E+00, 0.2769900E+00, 0.2964500E+00, 0.2988100E+00, &
     & 0.2887400E+00, 0.2700191E+00, 0.2746843E+00, 0.2746843E+00 /
      data (ref_adm( 6,iz,37,10),iz = 1,20) / &
     & 0.1700600E+00, 0.1700600E+00, 0.1565600E+00, 0.1624900E+00, &
     & 0.1771700E+00, 0.1845200E+00, 0.2177500E+00, 0.2358800E+00, &
     & 0.2646900E+00, 0.2639100E+00, 0.2804000E+00, 0.2642600E+00, &
     & 0.2647800E+00, 0.2849800E+00, 0.2940300E+00, 0.2930400E+00, &
     & 0.2943700E+00, 0.2705567E+00, 0.2754287E+00, 0.2754287E+00 /
      data (ref_adm( 6,iz,38,10),iz = 1,20) / &
     & 0.1700600E+00, 0.1700600E+00, 0.1565600E+00, 0.1624900E+00, &
     & 0.1771700E+00, 0.1845200E+00, 0.2177500E+00, 0.2358800E+00, &
     & 0.2646900E+00, 0.2639100E+00, 0.2804000E+00, 0.2642600E+00, &
     & 0.2647800E+00, 0.2849800E+00, 0.2940300E+00, 0.2930400E+00, &
     & 0.2943700E+00, 0.2705567E+00, 0.2754287E+00, 0.2754287E+00 /
! Solar Zenith Angle 50.0 Albedo  0.2019321E+00
      data (ref_adm( 6,iz, 1,11),iz = 1,20) / &
     & 0.1602400E+00, 0.1602400E+00, 0.1676100E+00, 0.1561300E+00, &
     & 0.1395700E+00, 0.1477500E+00, 0.1645700E+00, 0.1656700E+00, &
     & 0.1677500E+00, 0.1514200E+00, 0.1855700E+00, 0.2174100E+00, &
     & 0.2388700E+00, 0.2020100E+00, 0.1913800E+00, 0.2319500E+00, &
     & 0.2451400E+00, 0.3091200E+00, 0.2893400E+00, 0.2893400E+00 /
      data (ref_adm( 6,iz, 2,11),iz = 1,20) / &
     & 0.1602400E+00, 0.1602400E+00, 0.1676100E+00, 0.1561300E+00, &
     & 0.1395700E+00, 0.1477500E+00, 0.1645700E+00, 0.1656700E+00, &
     & 0.1677500E+00, 0.1514200E+00, 0.1855700E+00, 0.2174100E+00, &
     & 0.2388700E+00, 0.2020100E+00, 0.1913800E+00, 0.2319500E+00, &
     & 0.2451400E+00, 0.3091200E+00, 0.2893400E+00, 0.2893400E+00 /
      data (ref_adm( 6,iz, 3,11),iz = 1,20) / &
     & 0.1586300E+00, 0.1586300E+00, 0.1628100E+00, 0.1523400E+00, &
     & 0.1543100E+00, 0.1623400E+00, 0.1601100E+00, 0.1492100E+00, &
     & 0.1566400E+00, 0.1641200E+00, 0.1741100E+00, 0.1667800E+00, &
     & 0.1779900E+00, 0.1907500E+00, 0.1996900E+00, 0.2260800E+00, &
     & 0.2473800E+00, 0.2970600E+00, 0.2951000E+00, 0.2951000E+00 /
      data (ref_adm( 6,iz, 4,11),iz = 1,20) / &
     & 0.1489700E+00, 0.1489700E+00, 0.1505900E+00, 0.1581200E+00, &
     & 0.1589800E+00, 0.1580300E+00, 0.1552500E+00, 0.1499300E+00, &
     & 0.1688800E+00, 0.1744700E+00, 0.1621300E+00, 0.1720100E+00, &
     & 0.1781600E+00, 0.1842900E+00, 0.1981100E+00, 0.2256000E+00, &
     & 0.2392300E+00, 0.2978500E+00, 0.3043200E+00, 0.3043200E+00 /
      data (ref_adm( 6,iz, 5,11),iz = 1,20) / &
     & 0.1653900E+00, 0.1653900E+00, 0.1553200E+00, 0.1391200E+00, &
     & 0.1568500E+00, 0.1580400E+00, 0.1469400E+00, 0.1426900E+00, &
     & 0.1471900E+00, 0.1670900E+00, 0.1691700E+00, 0.1661400E+00, &
     & 0.1826600E+00, 0.1894200E+00, 0.1860600E+00, 0.2135100E+00, &
     & 0.2489400E+00, 0.2707700E+00, 0.3268600E+00, 0.3268600E+00 /
      data (ref_adm( 6,iz, 6,11),iz = 1,20) / &
     & 0.1616900E+00, 0.1616900E+00, 0.1535800E+00, 0.1681000E+00, &
     & 0.1559100E+00, 0.1495100E+00, 0.1595700E+00, 0.1669100E+00, &
     & 0.1627000E+00, 0.1770200E+00, 0.1710300E+00, 0.1800900E+00, &
     & 0.1945100E+00, 0.1959500E+00, 0.2007100E+00, 0.2032700E+00, &
     & 0.2569000E+00, 0.2392800E+00, 0.2807500E+00, 0.2807500E+00 /
      data (ref_adm( 6,iz, 7,11),iz = 1,20) / &
     & 0.1682400E+00, 0.1682400E+00, 0.1675700E+00, 0.1595700E+00, &
     & 0.1606900E+00, 0.1554100E+00, 0.1617800E+00, 0.1518200E+00, &
     & 0.1546500E+00, 0.1637900E+00, 0.1605800E+00, 0.1707400E+00, &
     & 0.1661300E+00, 0.1764100E+00, 0.1859900E+00, 0.2007300E+00, &
     & 0.2209900E+00, 0.2413800E+00, 0.2485400E+00, 0.2485400E+00 /
      data (ref_adm( 6,iz, 8,11),iz = 1,20) / &
     & 0.1728900E+00, 0.1728900E+00, 0.1536500E+00, 0.1614300E+00, &
     & 0.1547400E+00, 0.1524600E+00, 0.1542700E+00, 0.1525400E+00, &
     & 0.1566300E+00, 0.1548100E+00, 0.1612200E+00, 0.1661200E+00, &
     & 0.1524000E+00, 0.1583900E+00, 0.1749200E+00, 0.1989800E+00, &
     & 0.2300500E+00, 0.2547900E+00, 0.3073600E+00, 0.3073600E+00 /
      data (ref_adm( 6,iz, 9,11),iz = 1,20) / &
     & 0.1795500E+00, 0.1795500E+00, 0.1666900E+00, 0.1639700E+00, &
     & 0.1779600E+00, 0.1627000E+00, 0.1609100E+00, 0.1604700E+00, &
     & 0.1570400E+00, 0.1566500E+00, 0.1590100E+00, 0.1675800E+00, &
     & 0.1622800E+00, 0.1803400E+00, 0.1919900E+00, 0.2020400E+00, &
     & 0.2410600E+00, 0.2502400E+00, 0.2682400E+00, 0.2682400E+00 /
      data (ref_adm( 6,iz,10,11),iz = 1,20) / &
     & 0.1597000E+00, 0.1597000E+00, 0.1629200E+00, 0.1678600E+00, &
     & 0.1633100E+00, 0.1612100E+00, 0.1599500E+00, 0.1492400E+00, &
     & 0.1419600E+00, 0.1606300E+00, 0.1576500E+00, 0.1700700E+00, &
     & 0.1756300E+00, 0.1679200E+00, 0.2017900E+00, 0.2329200E+00, &
     & 0.2344700E+00, 0.2329600E+00, 0.2192500E+00, 0.2192500E+00 /
      data (ref_adm( 6,iz,11,11),iz = 1,20) / &
     & 0.1598200E+00, 0.1598200E+00, 0.1763500E+00, 0.1710100E+00, &
     & 0.1529500E+00, 0.1667400E+00, 0.1558500E+00, 0.1578500E+00, &
     & 0.1542900E+00, 0.1525400E+00, 0.1685600E+00, 0.1669800E+00, &
     & 0.1679800E+00, 0.1735500E+00, 0.2053500E+00, 0.1962900E+00, &
     & 0.2514800E+00, 0.2356200E+00, 0.2328600E+00, 0.2328600E+00 /
      data (ref_adm( 6,iz,12,11),iz = 1,20) / &
     & 0.1629800E+00, 0.1629800E+00, 0.1677100E+00, 0.1639600E+00, &
     & 0.1611400E+00, 0.1508900E+00, 0.1511600E+00, 0.1534700E+00, &
     & 0.1535300E+00, 0.1559100E+00, 0.1638700E+00, 0.1715200E+00, &
     & 0.1659400E+00, 0.1701000E+00, 0.1943900E+00, 0.2141200E+00, &
     & 0.2274500E+00, 0.2385400E+00, 0.3062907E+00, 0.3062907E+00 /
      data (ref_adm( 6,iz,13,11),iz = 1,20) / &
     & 0.1705700E+00, 0.1705700E+00, 0.1634200E+00, 0.1661200E+00, &
     & 0.1590400E+00, 0.1540100E+00, 0.1579300E+00, 0.1571400E+00, &
     & 0.1609600E+00, 0.1565800E+00, 0.1653100E+00, 0.1736500E+00, &
     & 0.1613200E+00, 0.1748600E+00, 0.1882700E+00, 0.2103600E+00, &
     & 0.2124900E+00, 0.2210000E+00, 0.2008300E+00, 0.2008300E+00 /
      data (ref_adm( 6,iz,14,11),iz = 1,20) / &
     & 0.1568500E+00, 0.1568500E+00, 0.1432200E+00, 0.1463800E+00, &
     & 0.1371900E+00, 0.1391200E+00, 0.1446800E+00, 0.1445500E+00, &
     & 0.1527200E+00, 0.1564600E+00, 0.1580200E+00, 0.1659300E+00, &
     & 0.1746800E+00, 0.1825000E+00, 0.1959000E+00, 0.1935100E+00, &
     & 0.2097800E+00, 0.2363700E+00, 0.2959535E+00, 0.2959535E+00 /
      data (ref_adm( 6,iz,15,11),iz = 1,20) / &
     & 0.1677100E+00, 0.1677100E+00, 0.1758700E+00, 0.1717200E+00, &
     & 0.1667900E+00, 0.1631700E+00, 0.1608700E+00, 0.1602900E+00, &
     & 0.1626200E+00, 0.1671300E+00, 0.1662500E+00, 0.1680200E+00, &
     & 0.1607500E+00, 0.1618900E+00, 0.1960600E+00, 0.1930800E+00, &
     & 0.2169500E+00, 0.2155500E+00, 0.1907700E+00, 0.1907700E+00 /
      data (ref_adm( 6,iz,16,11),iz = 1,20) / &
     & 0.1711800E+00, 0.1711800E+00, 0.1600100E+00, 0.1750800E+00, &
     & 0.1542200E+00, 0.1603100E+00, 0.1536200E+00, 0.1519500E+00, &
     & 0.1621000E+00, 0.1684500E+00, 0.1629800E+00, 0.1784800E+00, &
     & 0.1818600E+00, 0.1839200E+00, 0.1828100E+00, 0.1911600E+00, &
     & 0.2384900E+00, 0.2177600E+00, 0.2840701E+00, 0.2840701E+00 /
      data (ref_adm( 6,iz,17,11),iz = 1,20) / &
     & 0.1706800E+00, 0.1706800E+00, 0.1717800E+00, 0.1639300E+00, &
     & 0.1512700E+00, 0.1513800E+00, 0.1610600E+00, 0.1701500E+00, &
     & 0.1787900E+00, 0.1711000E+00, 0.1811600E+00, 0.1872800E+00, &
     & 0.1825800E+00, 0.1861900E+00, 0.1906700E+00, 0.2161700E+00, &
     & 0.1953400E+00, 0.2629012E+00, 0.2790594E+00, 0.2790594E+00 /
      data (ref_adm( 6,iz,18,11),iz = 1,20) / &
     & 0.1739100E+00, 0.1739100E+00, 0.1655600E+00, 0.1572400E+00, &
     & 0.1649300E+00, 0.1708100E+00, 0.1668200E+00, 0.1619700E+00, &
     & 0.1662800E+00, 0.1664700E+00, 0.1851500E+00, 0.1864900E+00, &
     & 0.1928800E+00, 0.1820600E+00, 0.1851000E+00, 0.2094900E+00, &
     & 0.2043700E+00, 0.2373795E+00, 0.2158453E+00, 0.2158453E+00 /
      data (ref_adm( 6,iz,19,11),iz = 1,20) / &
     & 0.1671600E+00, 0.1671600E+00, 0.1671200E+00, 0.1673500E+00, &
     & 0.1782800E+00, 0.1735000E+00, 0.1587900E+00, 0.1683800E+00, &
     & 0.1670600E+00, 0.1660700E+00, 0.1880100E+00, 0.1916500E+00, &
     & 0.1918100E+00, 0.1848300E+00, 0.1933000E+00, 0.1915000E+00, &
     & 0.1955000E+00, 0.2369211E+00, 0.2154464E+00, 0.2154464E+00 /
      data (ref_adm( 6,iz,20,11),iz = 1,20) / &
     & 0.1564700E+00, 0.1564700E+00, 0.1626300E+00, 0.1586100E+00, &
     & 0.1691800E+00, 0.1517400E+00, 0.1676400E+00, 0.1764800E+00, &
     & 0.1718400E+00, 0.1731700E+00, 0.1769500E+00, 0.1894300E+00, &
     & 0.1949300E+00, 0.1856200E+00, 0.1980600E+00, 0.2390200E+00, &
     & 0.2318043E+00, 0.2359987E+00, 0.2150320E+00, 0.2150320E+00 /
      data (ref_adm( 6,iz,21,11),iz = 1,20) / &
     & 0.1755900E+00, 0.1755900E+00, 0.1664800E+00, 0.1623300E+00, &
     & 0.1707100E+00, 0.1610500E+00, 0.1784300E+00, 0.1790800E+00, &
     & 0.1769100E+00, 0.1836600E+00, 0.1881600E+00, 0.1882500E+00, &
     & 0.2021100E+00, 0.1882200E+00, 0.1994500E+00, 0.2406400E+00, &
     & 0.2313896E+00, 0.2352505E+00, 0.2147231E+00, 0.2147231E+00 /
      data (ref_adm( 6,iz,22,11),iz = 1,20) / &
     & 0.1767500E+00, 0.1767500E+00, 0.1668500E+00, 0.1661100E+00, &
     & 0.1664600E+00, 0.1733500E+00, 0.1829400E+00, 0.1851800E+00, &
     & 0.1926100E+00, 0.2033900E+00, 0.1855200E+00, 0.2021100E+00, &
     & 0.2132200E+00, 0.2094500E+00, 0.2012200E+00, 0.2242600E+00, &
     & 0.2645017E+00, 0.2801633E+00, 0.2827255E+00, 0.2827255E+00 /
      data (ref_adm( 6,iz,23,11),iz = 1,20) / &
     & 0.1706300E+00, 0.1706300E+00, 0.1760600E+00, 0.1733200E+00, &
     & 0.1784700E+00, 0.1636800E+00, 0.1727200E+00, 0.1855700E+00, &
     & 0.1880000E+00, 0.2063900E+00, 0.2086300E+00, 0.2051100E+00, &
     & 0.2069500E+00, 0.2172000E+00, 0.2223200E+00, 0.2212000E+00, &
     & 0.2327400E+00, 0.2801154E+00, 0.2828884E+00, 0.2828884E+00 /
      data (ref_adm( 6,iz,24,11),iz = 1,20) / &
     & 0.1675600E+00, 0.1675600E+00, 0.1869400E+00, 0.1788200E+00, &
     & 0.1833400E+00, 0.1774700E+00, 0.1723200E+00, 0.1877500E+00, &
     & 0.1986400E+00, 0.2130800E+00, 0.2217800E+00, 0.2082400E+00, &
     & 0.2096000E+00, 0.2109400E+00, 0.2296400E+00, 0.2340600E+00, &
     & 0.2584700E+00, 0.2814066E+00, 0.2839365E+00, 0.2839365E+00 /
      data (ref_adm( 6,iz,25,11),iz = 1,20) / &
     & 0.1754400E+00, 0.1754400E+00, 0.1759400E+00, 0.1752500E+00, &
     & 0.1837700E+00, 0.1894900E+00, 0.1901600E+00, 0.1954100E+00, &
     & 0.2036200E+00, 0.2157500E+00, 0.2263100E+00, 0.2147100E+00, &
     & 0.2151700E+00, 0.2183500E+00, 0.2361200E+00, 0.2401600E+00, &
     & 0.2590500E+00, 0.2831589E+00, 0.2862565E+00, 0.2862565E+00 /
      data (ref_adm( 6,iz,26,11),iz = 1,20) / &
     & 0.1652300E+00, 0.1652300E+00, 0.1574700E+00, 0.1558500E+00, &
     & 0.1626700E+00, 0.1669800E+00, 0.1697700E+00, 0.1738000E+00, &
     & 0.1821300E+00, 0.2008100E+00, 0.2084300E+00, 0.2204500E+00, &
     & 0.2256900E+00, 0.2365300E+00, 0.2405700E+00, 0.2606600E+00, &
     & 0.2455600E+00, 0.2359000E+00, 0.2893103E+00, 0.2893103E+00 /
      data (ref_adm( 6,iz,27,11),iz = 1,20) / &
     & 0.1699700E+00, 0.1699700E+00, 0.1833000E+00, 0.1859600E+00, &
     & 0.1848900E+00, 0.1865600E+00, 0.1984800E+00, 0.1998700E+00, &
     & 0.2044600E+00, 0.2110200E+00, 0.2160900E+00, 0.2193200E+00, &
     & 0.2216000E+00, 0.2350100E+00, 0.2503600E+00, 0.2567700E+00, &
     & 0.2686400E+00, 0.2638500E+00, 0.2236300E+00, 0.2236300E+00 /
      data (ref_adm( 6,iz,28,11),iz = 1,20) / &
     & 0.1716100E+00, 0.1716100E+00, 0.1714400E+00, 0.1875000E+00, &
     & 0.1807800E+00, 0.1779200E+00, 0.1922500E+00, 0.2125400E+00, &
     & 0.2194300E+00, 0.2238500E+00, 0.2363000E+00, 0.2374400E+00, &
     & 0.2437700E+00, 0.2430500E+00, 0.2554800E+00, 0.2715500E+00, &
     & 0.2844700E+00, 0.2779600E+00, 0.2527900E+00, 0.2527900E+00 /
      data (ref_adm( 6,iz,29,11),iz = 1,20) / &
     & 0.1625400E+00, 0.1625400E+00, 0.1756200E+00, 0.1738700E+00, &
     & 0.1977700E+00, 0.1971000E+00, 0.1921300E+00, 0.1955600E+00, &
     & 0.2313900E+00, 0.2384900E+00, 0.2425800E+00, 0.2513800E+00, &
     & 0.2596900E+00, 0.2587700E+00, 0.2616100E+00, 0.2772900E+00, &
     & 0.2781300E+00, 0.2700300E+00, 0.2195000E+00, 0.2195000E+00 /
      data (ref_adm( 6,iz,30,11),iz = 1,20) / &
     & 0.1609200E+00, 0.1609200E+00, 0.1664300E+00, 0.1659900E+00, &
     & 0.1917900E+00, 0.2024200E+00, 0.2066400E+00, 0.2168800E+00, &
     & 0.2181200E+00, 0.2372500E+00, 0.2567100E+00, 0.2634800E+00, &
     & 0.2729200E+00, 0.2679200E+00, 0.2809400E+00, 0.2935700E+00, &
     & 0.3019000E+00, 0.2649200E+00, 0.2482600E+00, 0.2482600E+00 /
      data (ref_adm( 6,iz,31,11),iz = 1,20) / &
     & 0.1776700E+00, 0.1776700E+00, 0.1857900E+00, 0.1872500E+00, &
     & 0.1854700E+00, 0.1922300E+00, 0.2072600E+00, 0.2221000E+00, &
     & 0.2268200E+00, 0.2581300E+00, 0.2686500E+00, 0.2807800E+00, &
     & 0.2809700E+00, 0.2745900E+00, 0.2827600E+00, 0.2902100E+00, &
     & 0.2939900E+00, 0.2909000E+00, 0.2743100E+00, 0.2743100E+00 /
      data (ref_adm( 6,iz,32,11),iz = 1,20) / &
     & 0.1750800E+00, 0.1750800E+00, 0.1824900E+00, 0.1944600E+00, &
     & 0.1945200E+00, 0.2016100E+00, 0.2157300E+00, 0.2262400E+00, &
     & 0.2398500E+00, 0.2566900E+00, 0.2753000E+00, 0.2774600E+00, &
     & 0.2901500E+00, 0.2899800E+00, 0.2960100E+00, 0.3000100E+00, &
     & 0.3114700E+00, 0.2923800E+00, 0.2400900E+00, 0.2400900E+00 /
      data (ref_adm( 6,iz,33,11),iz = 1,20) / &
     & 0.1751700E+00, 0.1751700E+00, 0.1819100E+00, 0.1932800E+00, &
     & 0.2058800E+00, 0.2104700E+00, 0.2209700E+00, 0.2261200E+00, &
     & 0.2496300E+00, 0.2483800E+00, 0.2732000E+00, 0.2860900E+00, &
     & 0.2901900E+00, 0.3089900E+00, 0.2892700E+00, 0.3079000E+00, &
     & 0.2806000E+00, 0.2871900E+00, 0.2801100E+00, 0.2801100E+00 /
      data (ref_adm( 6,iz,34,11),iz = 1,20) / &
     & 0.1612900E+00, 0.1612900E+00, 0.1877500E+00, 0.1880700E+00, &
     & 0.1921300E+00, 0.2012400E+00, 0.2146800E+00, 0.2285100E+00, &
     & 0.2354500E+00, 0.2630500E+00, 0.2853700E+00, 0.3063800E+00, &
     & 0.3032600E+00, 0.2952900E+00, 0.2969400E+00, 0.2998300E+00, &
     & 0.3045900E+00, 0.3158900E+00, 0.2817300E+00, 0.2817300E+00 /
      data (ref_adm( 6,iz,35,11),iz = 1,20) / &
     & 0.1726600E+00, 0.1726600E+00, 0.1757000E+00, 0.1941800E+00, &
     & 0.1987700E+00, 0.1945100E+00, 0.2096400E+00, 0.2308900E+00, &
     & 0.2271200E+00, 0.2736600E+00, 0.2721800E+00, 0.3034900E+00, &
     & 0.3192400E+00, 0.3003500E+00, 0.3087800E+00, 0.3297500E+00, &
     & 0.3250500E+00, 0.3106800E+00, 0.3421597E+00, 0.3421597E+00 /
      data (ref_adm( 6,iz,36,11),iz = 1,20) / &
     & 0.1633600E+00, 0.1633600E+00, 0.1895300E+00, 0.1742200E+00, &
     & 0.1892900E+00, 0.1872300E+00, 0.2112600E+00, 0.2050300E+00, &
     & 0.2375700E+00, 0.2748900E+00, 0.3047500E+00, 0.3003300E+00, &
     & 0.3317000E+00, 0.3203400E+00, 0.3200100E+00, 0.3277700E+00, &
     & 0.3416400E+00, 0.3282300E+00, 0.3453283E+00, 0.3453283E+00 /
      data (ref_adm( 6,iz,37,11),iz = 1,20) / &
     & 0.1833000E+00, 0.1833000E+00, 0.1696300E+00, 0.1811000E+00, &
     & 0.1944300E+00, 0.1931300E+00, 0.1974100E+00, 0.2200100E+00, &
     & 0.2349100E+00, 0.2690400E+00, 0.2982000E+00, 0.3227800E+00, &
     & 0.3446000E+00, 0.3282900E+00, 0.3271200E+00, 0.3324800E+00, &
     & 0.3377100E+00, 0.3292200E+00, 0.3470611E+00, 0.3470611E+00 /
      data (ref_adm( 6,iz,38,11),iz = 1,20) / &
     & 0.1833000E+00, 0.1833000E+00, 0.1696300E+00, 0.1811000E+00, &
     & 0.1944300E+00, 0.1931300E+00, 0.1974100E+00, 0.2200100E+00, &
     & 0.2349100E+00, 0.2690400E+00, 0.2982000E+00, 0.3227800E+00, &
     & 0.3446000E+00, 0.3282900E+00, 0.3271200E+00, 0.3324800E+00, &
     & 0.3377100E+00, 0.3292200E+00, 0.3470611E+00, 0.3470611E+00 /
! Solar Zenith Angle 55.0 Albedo  0.2149804E+00
      data (ref_adm( 6,iz, 1,12),iz = 1,20) / &
     & 0.1592000E+00, 0.1592000E+00, 0.1426800E+00, 0.1344200E+00, &
     & 0.1389900E+00, 0.1483900E+00, 0.1512000E+00, 0.1600400E+00, &
     & 0.1592900E+00, 0.1620900E+00, 0.1925100E+00, 0.2193000E+00, &
     & 0.2671800E+00, 0.2717100E+00, 0.2694700E+00, 0.2766200E+00, &
     & 0.3300100E+00, 0.3958000E+00, 0.3977300E+00, 0.3977300E+00 /
      data (ref_adm( 6,iz, 2,12),iz = 1,20) / &
     & 0.1592000E+00, 0.1592000E+00, 0.1426800E+00, 0.1344200E+00, &
     & 0.1389900E+00, 0.1483900E+00, 0.1512000E+00, 0.1600400E+00, &
     & 0.1592900E+00, 0.1620900E+00, 0.1925100E+00, 0.2193000E+00, &
     & 0.2671800E+00, 0.2717100E+00, 0.2694700E+00, 0.2766200E+00, &
     & 0.3300100E+00, 0.3958000E+00, 0.3977300E+00, 0.3977300E+00 /
      data (ref_adm( 6,iz, 3,12),iz = 1,20) / &
     & 0.1584700E+00, 0.1584700E+00, 0.1503300E+00, 0.1499300E+00, &
     & 0.1483000E+00, 0.1491400E+00, 0.1558100E+00, 0.1576400E+00, &
     & 0.1670500E+00, 0.1734500E+00, 0.1854100E+00, 0.1916200E+00, &
     & 0.2134300E+00, 0.2321500E+00, 0.2434800E+00, 0.2560900E+00, &
     & 0.3113700E+00, 0.3537000E+00, 0.3340300E+00, 0.3340300E+00 /
      data (ref_adm( 6,iz, 4,12),iz = 1,20) / &
     & 0.1652100E+00, 0.1652100E+00, 0.1538900E+00, 0.1504900E+00, &
     & 0.1529100E+00, 0.1615800E+00, 0.1565900E+00, 0.1469400E+00, &
     & 0.1703800E+00, 0.1730200E+00, 0.1787200E+00, 0.1914300E+00, &
     & 0.2014200E+00, 0.2206100E+00, 0.2387500E+00, 0.2652800E+00, &
     & 0.3064800E+00, 0.3625900E+00, 0.3518900E+00, 0.3518900E+00 /
      data (ref_adm( 6,iz, 5,12),iz = 1,20) / &
     & 0.1551800E+00, 0.1551800E+00, 0.1515200E+00, 0.1562100E+00, &
     & 0.1656400E+00, 0.1665400E+00, 0.1523300E+00, 0.1605900E+00, &
     & 0.1721700E+00, 0.1619300E+00, 0.1680600E+00, 0.1779000E+00, &
     & 0.1952000E+00, 0.2103200E+00, 0.2191200E+00, 0.2444900E+00, &
     & 0.3020100E+00, 0.3596200E+00, 0.3893700E+00, 0.3893700E+00 /
      data (ref_adm( 6,iz, 6,12),iz = 1,20) / &
     & 0.1656100E+00, 0.1656100E+00, 0.1713700E+00, 0.1622200E+00, &
     & 0.1598400E+00, 0.1571900E+00, 0.1587300E+00, 0.1665000E+00, &
     & 0.1728300E+00, 0.1648800E+00, 0.1722600E+00, 0.1847600E+00, &
     & 0.2010500E+00, 0.2134600E+00, 0.2141200E+00, 0.2618400E+00, &
     & 0.3110200E+00, 0.4087300E+00, 0.4119500E+00, 0.4119500E+00 /
      data (ref_adm( 6,iz, 7,12),iz = 1,20) / &
     & 0.1546700E+00, 0.1546700E+00, 0.1540000E+00, 0.1541600E+00, &
     & 0.1549700E+00, 0.1550800E+00, 0.1569200E+00, 0.1554000E+00, &
     & 0.1567900E+00, 0.1523100E+00, 0.1532900E+00, 0.1760500E+00, &
     & 0.1758200E+00, 0.1921200E+00, 0.2024100E+00, 0.2152500E+00, &
     & 0.2664800E+00, 0.3262500E+00, 0.3584400E+00, 0.3584400E+00 /
      data (ref_adm( 6,iz, 8,12),iz = 1,20) / &
     & 0.1771400E+00, 0.1771400E+00, 0.1740400E+00, 0.1641800E+00, &
     & 0.1606300E+00, 0.1716400E+00, 0.1637900E+00, 0.1622800E+00, &
     & 0.1657200E+00, 0.1664200E+00, 0.1700400E+00, 0.1850900E+00, &
     & 0.1924000E+00, 0.1934400E+00, 0.2111400E+00, 0.2284400E+00, &
     & 0.2750400E+00, 0.2981100E+00, 0.3638600E+00, 0.3638600E+00 /
      data (ref_adm( 6,iz, 9,12),iz = 1,20) / &
     & 0.1644600E+00, 0.1644600E+00, 0.1604900E+00, 0.1549000E+00, &
     & 0.1627300E+00, 0.1711600E+00, 0.1628900E+00, 0.1609100E+00, &
     & 0.1537400E+00, 0.1618300E+00, 0.1584600E+00, 0.1896300E+00, &
     & 0.1825900E+00, 0.1998400E+00, 0.2206400E+00, 0.2346900E+00, &
     & 0.2889500E+00, 0.3030900E+00, 0.3066200E+00, 0.3066200E+00 /
      data (ref_adm( 6,iz,10,12),iz = 1,20) / &
     & 0.1610600E+00, 0.1610600E+00, 0.1578100E+00, 0.1739500E+00, &
     & 0.1728000E+00, 0.1682900E+00, 0.1551200E+00, 0.1613600E+00, &
     & 0.1585400E+00, 0.1652400E+00, 0.1676500E+00, 0.1744400E+00, &
     & 0.1861800E+00, 0.1977700E+00, 0.2124900E+00, 0.2386200E+00, &
     & 0.2639200E+00, 0.2974000E+00, 0.2855800E+00, 0.2855800E+00 /
      data (ref_adm( 6,iz,11,12),iz = 1,20) / &
     & 0.1732000E+00, 0.1732000E+00, 0.1730800E+00, 0.1766300E+00, &
     & 0.1660400E+00, 0.1619100E+00, 0.1568300E+00, 0.1599800E+00, &
     & 0.1557900E+00, 0.1654200E+00, 0.1741600E+00, 0.1825700E+00, &
     & 0.1757500E+00, 0.1868900E+00, 0.1981300E+00, 0.2217100E+00, &
     & 0.2410300E+00, 0.2702200E+00, 0.3019200E+00, 0.3019200E+00 /
      data (ref_adm( 6,iz,12,12),iz = 1,20) / &
     & 0.1744500E+00, 0.1744500E+00, 0.1836800E+00, 0.1759000E+00, &
     & 0.1622100E+00, 0.1684100E+00, 0.1614700E+00, 0.1705100E+00, &
     & 0.1636000E+00, 0.1687300E+00, 0.1763100E+00, 0.1840200E+00, &
     & 0.1895000E+00, 0.1889300E+00, 0.1987100E+00, 0.2204600E+00, &
     & 0.2463300E+00, 0.2577500E+00, 0.2313900E+00, 0.2313900E+00 /
      data (ref_adm( 6,iz,13,12),iz = 1,20) / &
     & 0.1816500E+00, 0.1816500E+00, 0.1742300E+00, 0.1727900E+00, &
     & 0.1733600E+00, 0.1714200E+00, 0.1681700E+00, 0.1720000E+00, &
     & 0.1689400E+00, 0.1736700E+00, 0.1826100E+00, 0.1859900E+00, &
     & 0.1944700E+00, 0.1889800E+00, 0.1955000E+00, 0.2114300E+00, &
     & 0.2226300E+00, 0.2403200E+00, 0.2286200E+00, 0.2286200E+00 /
      data (ref_adm( 6,iz,14,12),iz = 1,20) / &
     & 0.1751900E+00, 0.1751900E+00, 0.1710200E+00, 0.1639700E+00, &
     & 0.1677900E+00, 0.1685900E+00, 0.1674100E+00, 0.1691500E+00, &
     & 0.1693700E+00, 0.1722900E+00, 0.1794000E+00, 0.1823600E+00, &
     & 0.1938300E+00, 0.1963000E+00, 0.2030800E+00, 0.2034200E+00, &
     & 0.2303500E+00, 0.2443400E+00, 0.3468732E+00, 0.3468732E+00 /
      data (ref_adm( 6,iz,15,12),iz = 1,20) / &
     & 0.1736300E+00, 0.1736300E+00, 0.1708200E+00, 0.1708100E+00, &
     & 0.1666400E+00, 0.1686600E+00, 0.1683000E+00, 0.1687400E+00, &
     & 0.1709300E+00, 0.1754200E+00, 0.1821600E+00, 0.1824500E+00, &
     & 0.1859100E+00, 0.1954500E+00, 0.2049800E+00, 0.2010300E+00, &
     & 0.2257600E+00, 0.2126200E+00, 0.3392428E+00, 0.3392428E+00 /
      data (ref_adm( 6,iz,16,12),iz = 1,20) / &
     & 0.1703600E+00, 0.1703600E+00, 0.1687100E+00, 0.1770700E+00, &
     & 0.1736000E+00, 0.1678200E+00, 0.1728200E+00, 0.1790100E+00, &
     & 0.1765100E+00, 0.1739300E+00, 0.1670000E+00, 0.1764500E+00, &
     & 0.1837300E+00, 0.1902600E+00, 0.2040400E+00, 0.2016100E+00, &
     & 0.2268800E+00, 0.2473500E+00, 0.3301505E+00, 0.3301505E+00 /
      data (ref_adm( 6,iz,17,12),iz = 1,20) / &
     & 0.1751800E+00, 0.1751800E+00, 0.1756300E+00, 0.1893000E+00, &
     & 0.1775200E+00, 0.1849400E+00, 0.1786700E+00, 0.1741800E+00, &
     & 0.1829800E+00, 0.1807500E+00, 0.1827700E+00, 0.1919000E+00, &
     & 0.1947300E+00, 0.1926400E+00, 0.1946200E+00, 0.2046100E+00, &
     & 0.2110400E+00, 0.2558900E+00, 0.3225442E+00, 0.3225442E+00 /
      data (ref_adm( 6,iz,18,12),iz = 1,20) / &
     & 0.1783600E+00, 0.1783600E+00, 0.1795400E+00, 0.1798400E+00, &
     & 0.1807600E+00, 0.1845100E+00, 0.1891700E+00, 0.1890700E+00, &
     & 0.1822800E+00, 0.1815800E+00, 0.1784500E+00, 0.1878200E+00, &
     & 0.1834500E+00, 0.1993800E+00, 0.1922400E+00, 0.2233400E+00, &
     & 0.2278600E+00, 0.2418586E+00, 0.2445585E+00, 0.2445585E+00 /
      data (ref_adm( 6,iz,19,12),iz = 1,20) / &
     & 0.1796800E+00, 0.1796800E+00, 0.1821500E+00, 0.1841300E+00, &
     & 0.1783200E+00, 0.1871800E+00, 0.1877900E+00, 0.1919400E+00, &
     & 0.1963500E+00, 0.1854200E+00, 0.1811600E+00, 0.1898200E+00, &
     & 0.2038600E+00, 0.2095400E+00, 0.1910000E+00, 0.2035800E+00, &
     & 0.2285120E+00, 0.2403935E+00, 0.2420837E+00, 0.2420837E+00 /
      data (ref_adm( 6,iz,20,12),iz = 1,20) / &
     & 0.1752200E+00, 0.1752200E+00, 0.1703300E+00, 0.1727800E+00, &
     & 0.1713700E+00, 0.1743000E+00, 0.1601800E+00, 0.1699500E+00, &
     & 0.1830400E+00, 0.1934100E+00, 0.1861200E+00, 0.2015200E+00, &
     & 0.2042800E+00, 0.2093800E+00, 0.2126500E+00, 0.2020400E+00, &
     & 0.2280909E+00, 0.2392975E+00, 0.2404784E+00, 0.2404784E+00 /
      data (ref_adm( 6,iz,21,12),iz = 1,20) / &
     & 0.1737500E+00, 0.1737500E+00, 0.1757600E+00, 0.1798800E+00, &
     & 0.1841600E+00, 0.1936600E+00, 0.1887200E+00, 0.1865200E+00, &
     & 0.1811800E+00, 0.1941900E+00, 0.1892200E+00, 0.1870300E+00, &
     & 0.1995300E+00, 0.2127100E+00, 0.2162900E+00, 0.2067100E+00, &
     & 0.2279660E+00, 0.2384281E+00, 0.2393071E+00, 0.2393071E+00 /
      data (ref_adm( 6,iz,22,12),iz = 1,20) / &
     & 0.1841700E+00, 0.1841700E+00, 0.1826300E+00, 0.1813400E+00, &
     & 0.1864200E+00, 0.1838000E+00, 0.1938900E+00, 0.1895400E+00, &
     & 0.1897300E+00, 0.2060500E+00, 0.2028700E+00, 0.2030400E+00, &
     & 0.2092200E+00, 0.2171600E+00, 0.2348600E+00, 0.2587300E+00, &
     & 0.3248868E+00, 0.3365387E+00, 0.3229259E+00, 0.3229259E+00 /
      data (ref_adm( 6,iz,23,12),iz = 1,20) / &
     & 0.1822700E+00, 0.1822700E+00, 0.1898100E+00, 0.1891100E+00, &
     & 0.1856000E+00, 0.1967500E+00, 0.2003200E+00, 0.1981800E+00, &
     & 0.1997500E+00, 0.2104900E+00, 0.2138300E+00, 0.2126500E+00, &
     & 0.2130800E+00, 0.2228100E+00, 0.2456000E+00, 0.2590900E+00, &
     & 0.3187059E+00, 0.3281427E+00, 0.3198985E+00, 0.3198985E+00 /
      data (ref_adm( 6,iz,24,12),iz = 1,20) / &
     & 0.1771200E+00, 0.1771200E+00, 0.1733700E+00, 0.1783800E+00, &
     & 0.1750700E+00, 0.1861700E+00, 0.1923800E+00, 0.1999300E+00, &
     & 0.2038400E+00, 0.2034500E+00, 0.2206300E+00, 0.2239500E+00, &
     & 0.2210600E+00, 0.2234100E+00, 0.2314800E+00, 0.2614800E+00, &
     & 0.3034500E+00, 0.3219623E+00, 0.3180355E+00, 0.3180355E+00 /
      data (ref_adm( 6,iz,25,12),iz = 1,20) / &
     & 0.1761600E+00, 0.1761600E+00, 0.1810300E+00, 0.1816800E+00, &
     & 0.1876900E+00, 0.1915300E+00, 0.1957400E+00, 0.1999700E+00, &
     & 0.2094900E+00, 0.2115000E+00, 0.2188500E+00, 0.2259200E+00, &
     & 0.2291600E+00, 0.2407900E+00, 0.2618300E+00, 0.2614400E+00, &
     & 0.2848800E+00, 0.2752600E+00, 0.3176367E+00, 0.3176367E+00 /
      data (ref_adm( 6,iz,26,12),iz = 1,20) / &
     & 0.1748100E+00, 0.1748100E+00, 0.1776500E+00, 0.1825700E+00, &
     & 0.1867500E+00, 0.1889900E+00, 0.1942600E+00, 0.1970100E+00, &
     & 0.2029200E+00, 0.2054100E+00, 0.2135300E+00, 0.2221400E+00, &
     & 0.2296400E+00, 0.2406000E+00, 0.2624800E+00, 0.2900600E+00, &
     & 0.2836700E+00, 0.2769600E+00, 0.3184892E+00, 0.3184892E+00 /
      data (ref_adm( 6,iz,27,12),iz = 1,20) / &
     & 0.1738100E+00, 0.1738100E+00, 0.1890400E+00, 0.1940800E+00, &
     & 0.1980300E+00, 0.2016400E+00, 0.2043300E+00, 0.2095600E+00, &
     & 0.2160900E+00, 0.2136800E+00, 0.2268700E+00, 0.2316800E+00, &
     & 0.2415800E+00, 0.2432800E+00, 0.2890300E+00, 0.3023800E+00, &
     & 0.2833300E+00, 0.2635400E+00, 0.2499700E+00, 0.2499700E+00 /
      data (ref_adm( 6,iz,28,12),iz = 1,20) / &
     & 0.1741000E+00, 0.1741000E+00, 0.1890900E+00, 0.1945600E+00, &
     & 0.1968900E+00, 0.2062900E+00, 0.2150700E+00, 0.2268900E+00, &
     & 0.2364200E+00, 0.2322900E+00, 0.2462100E+00, 0.2534200E+00, &
     & 0.2609300E+00, 0.2702800E+00, 0.3027200E+00, 0.3106500E+00, &
     & 0.3106400E+00, 0.2952400E+00, 0.2595300E+00, 0.2595300E+00 /
      data (ref_adm( 6,iz,29,12),iz = 1,20) / &
     & 0.1708000E+00, 0.1708000E+00, 0.1685400E+00, 0.1934200E+00, &
     & 0.2035900E+00, 0.2141200E+00, 0.2181600E+00, 0.2321300E+00, &
     & 0.2489000E+00, 0.2450100E+00, 0.2488000E+00, 0.2542200E+00, &
     & 0.2680900E+00, 0.2809300E+00, 0.2997900E+00, 0.3128300E+00, &
     & 0.3195800E+00, 0.3054400E+00, 0.2769400E+00, 0.2769400E+00 /
      data (ref_adm( 6,iz,30,12),iz = 1,20) / &
     & 0.1782300E+00, 0.1782300E+00, 0.1749500E+00, 0.1918900E+00, &
     & 0.2040700E+00, 0.2082400E+00, 0.2112300E+00, 0.2289800E+00, &
     & 0.2481800E+00, 0.2532000E+00, 0.2631300E+00, 0.2789100E+00, &
     & 0.2820800E+00, 0.2929100E+00, 0.3093000E+00, 0.3267000E+00, &
     & 0.3233000E+00, 0.3120800E+00, 0.2528400E+00, 0.2528400E+00 /
      data (ref_adm( 6,iz,31,12),iz = 1,20) / &
     & 0.1799500E+00, 0.1799500E+00, 0.1877000E+00, 0.1966400E+00, &
     & 0.2002700E+00, 0.2112800E+00, 0.2244600E+00, 0.2413800E+00, &
     & 0.2430400E+00, 0.2622500E+00, 0.2652300E+00, 0.2806600E+00, &
     & 0.2957100E+00, 0.3084500E+00, 0.3304200E+00, 0.3352800E+00, &
     & 0.3255500E+00, 0.3023800E+00, 0.2661300E+00, 0.2661300E+00 /
      data (ref_adm( 6,iz,32,12),iz = 1,20) / &
     & 0.1707400E+00, 0.1707400E+00, 0.1736900E+00, 0.1762700E+00, &
     & 0.1872300E+00, 0.1940300E+00, 0.2088500E+00, 0.2256100E+00, &
     & 0.2374800E+00, 0.2597600E+00, 0.2782700E+00, 0.2916200E+00, &
     & 0.3033500E+00, 0.3195200E+00, 0.3292400E+00, 0.3266800E+00, &
     & 0.3153800E+00, 0.3184700E+00, 0.2864900E+00, 0.2864900E+00 /
      data (ref_adm( 6,iz,33,12),iz = 1,20) / &
     & 0.1592800E+00, 0.1592800E+00, 0.1688400E+00, 0.1656600E+00, &
     & 0.1760300E+00, 0.1884500E+00, 0.1894500E+00, 0.2111500E+00, &
     & 0.2223000E+00, 0.2432400E+00, 0.2632900E+00, 0.2821900E+00, &
     & 0.3085200E+00, 0.3128900E+00, 0.3199900E+00, 0.3140800E+00, &
     & 0.3198200E+00, 0.3144500E+00, 0.2738300E+00, 0.2738300E+00 /
      data (ref_adm( 6,iz,34,12),iz = 1,20) / &
     & 0.1615200E+00, 0.1615200E+00, 0.1688400E+00, 0.1714600E+00, &
     & 0.1858900E+00, 0.1969600E+00, 0.2243900E+00, 0.2341400E+00, &
     & 0.2387400E+00, 0.2574400E+00, 0.2774300E+00, 0.3118700E+00, &
     & 0.3268300E+00, 0.3504600E+00, 0.3459900E+00, 0.3394700E+00, &
     & 0.3500100E+00, 0.3368700E+00, 0.2923200E+00, 0.2923200E+00 /
      data (ref_adm( 6,iz,35,12),iz = 1,20) / &
     & 0.1664200E+00, 0.1664200E+00, 0.1697400E+00, 0.1826800E+00, &
     & 0.1981300E+00, 0.2047800E+00, 0.2308900E+00, 0.2431700E+00, &
     & 0.2502800E+00, 0.2663900E+00, 0.2790900E+00, 0.3149100E+00, &
     & 0.3276000E+00, 0.3519300E+00, 0.3586700E+00, 0.3630400E+00, &
     & 0.3673200E+00, 0.3472200E+00, 0.3070600E+00, 0.3070600E+00 /
      data (ref_adm( 6,iz,36,12),iz = 1,20) / &
     & 0.1670500E+00, 0.1670500E+00, 0.1549000E+00, 0.1821400E+00, &
     & 0.2024600E+00, 0.2171700E+00, 0.2268400E+00, 0.2435900E+00, &
     & 0.2394600E+00, 0.2540400E+00, 0.2876300E+00, 0.3174700E+00, &
     & 0.3430700E+00, 0.3544200E+00, 0.3702700E+00, 0.3640400E+00, &
     & 0.3873100E+00, 0.3716000E+00, 0.2981600E+00, 0.2981600E+00 /
      data (ref_adm( 6,iz,37,12),iz = 1,20) / &
     & 0.1583100E+00, 0.1583100E+00, 0.1689900E+00, 0.1792000E+00, &
     & 0.1998700E+00, 0.2197800E+00, 0.2277100E+00, 0.2250400E+00, &
     & 0.2402000E+00, 0.2708000E+00, 0.2927200E+00, 0.3321300E+00, &
     & 0.3871200E+00, 0.3661200E+00, 0.3673700E+00, 0.3760500E+00, &
     & 0.3863200E+00, 0.3704800E+00, 0.3786162E+00, 0.3786162E+00 /
      data (ref_adm( 6,iz,38,12),iz = 1,20) / &
     & 0.1583100E+00, 0.1583100E+00, 0.1689900E+00, 0.1792000E+00, &
     & 0.1998700E+00, 0.2197800E+00, 0.2277100E+00, 0.2250400E+00, &
     & 0.2402000E+00, 0.2708000E+00, 0.2927200E+00, 0.3321300E+00, &
     & 0.3871200E+00, 0.3661200E+00, 0.3673700E+00, 0.3760500E+00, &
     & 0.3863200E+00, 0.3704800E+00, 0.3786162E+00, 0.3786162E+00 /
! Solar Zenith Angle 60.0 Albedo  0.2197800E+00
      data (ref_adm( 6,iz, 1,13),iz = 1,20) / &
     & 0.1608100E+00, 0.1608100E+00, 0.1681700E+00, 0.1592200E+00, &
     & 0.1644500E+00, 0.1670600E+00, 0.1778900E+00, 0.1684800E+00, &
     & 0.1705400E+00, 0.1759500E+00, 0.2080500E+00, 0.2224500E+00, &
     & 0.2689300E+00, 0.3658400E+00, 0.3765900E+00, 0.4089900E+00, &
     & 0.4804300E+00, 0.5239100E+00, 0.5478400E+00, 0.5478400E+00 /
      data (ref_adm( 6,iz, 2,13),iz = 1,20) / &
     & 0.1608100E+00, 0.1608100E+00, 0.1681700E+00, 0.1592200E+00, &
     & 0.1644500E+00, 0.1670600E+00, 0.1778900E+00, 0.1684800E+00, &
     & 0.1705400E+00, 0.1759500E+00, 0.2080500E+00, 0.2224500E+00, &
     & 0.2689300E+00, 0.3658400E+00, 0.3765900E+00, 0.4089900E+00, &
     & 0.4804300E+00, 0.5239100E+00, 0.5478400E+00, 0.5478400E+00 /
      data (ref_adm( 6,iz, 3,13),iz = 1,20) / &
     & 0.1710500E+00, 0.1710500E+00, 0.1584900E+00, 0.1645900E+00, &
     & 0.1602200E+00, 0.1559400E+00, 0.1536500E+00, 0.1698900E+00, &
     & 0.1637400E+00, 0.1868100E+00, 0.1950100E+00, 0.2300700E+00, &
     & 0.2344100E+00, 0.2713900E+00, 0.2942500E+00, 0.3701400E+00, &
     & 0.4325700E+00, 0.4532700E+00, 0.5877811E-01, 0.5877811E-01 /
      data (ref_adm( 6,iz, 4,13),iz = 1,20) / &
     & 0.1500200E+00, 0.1500200E+00, 0.1553800E+00, 0.1580300E+00, &
     & 0.1520300E+00, 0.1505600E+00, 0.1741700E+00, 0.1679400E+00, &
     & 0.1826600E+00, 0.1743800E+00, 0.1925400E+00, 0.2122300E+00, &
     & 0.2330000E+00, 0.2583200E+00, 0.3035700E+00, 0.3624700E+00, &
     & 0.4190100E+00, 0.4705500E+00, 0.4922900E+00, 0.4922900E+00 /
      data (ref_adm( 6,iz, 5,13),iz = 1,20) / &
     & 0.1663100E+00, 0.1663100E+00, 0.1587200E+00, 0.1552400E+00, &
     & 0.1575500E+00, 0.1512100E+00, 0.1633600E+00, 0.1808400E+00, &
     & 0.1804900E+00, 0.1816300E+00, 0.2011900E+00, 0.2003200E+00, &
     & 0.2261000E+00, 0.2728000E+00, 0.2893000E+00, 0.3366200E+00, &
     & 0.4058000E+00, 0.4368700E+00, 0.4419678E+00, 0.4419678E+00 /
      data (ref_adm( 6,iz, 6,13),iz = 1,20) / &
     & 0.1564500E+00, 0.1564500E+00, 0.1508200E+00, 0.1509300E+00, &
     & 0.1485300E+00, 0.1520700E+00, 0.1530200E+00, 0.1601300E+00, &
     & 0.1657000E+00, 0.1676300E+00, 0.1868600E+00, 0.1886900E+00, &
     & 0.2087200E+00, 0.2502400E+00, 0.2791600E+00, 0.3346000E+00, &
     & 0.4117600E+00, 0.4511500E+00, 0.4935500E+00, 0.4935500E+00 /
      data (ref_adm( 6,iz, 7,13),iz = 1,20) / &
     & 0.1640700E+00, 0.1640700E+00, 0.1640700E+00, 0.1668000E+00, &
     & 0.1568800E+00, 0.1543500E+00, 0.1574900E+00, 0.1558600E+00, &
     & 0.1684900E+00, 0.1760600E+00, 0.1773900E+00, 0.1955600E+00, &
     & 0.2292500E+00, 0.2326500E+00, 0.2714200E+00, 0.3257900E+00, &
     & 0.3883100E+00, 0.4010100E+00, 0.3707600E+00, 0.3707600E+00 /
      data (ref_adm( 6,iz, 8,13),iz = 1,20) / &
     & 0.1673200E+00, 0.1673200E+00, 0.1653300E+00, 0.1555500E+00, &
     & 0.1519700E+00, 0.1441700E+00, 0.1466800E+00, 0.1555500E+00, &
     & 0.1681200E+00, 0.1706400E+00, 0.1741800E+00, 0.1849800E+00, &
     & 0.2093400E+00, 0.2209500E+00, 0.2609500E+00, 0.2860300E+00, &
     & 0.3458700E+00, 0.4009300E+00, 0.4419600E+00, 0.4419600E+00 /
      data (ref_adm( 6,iz, 9,13),iz = 1,20) / &
     & 0.1625500E+00, 0.1625500E+00, 0.1617400E+00, 0.1531300E+00, &
     & 0.1535300E+00, 0.1477100E+00, 0.1460100E+00, 0.1683800E+00, &
     & 0.1544300E+00, 0.1732200E+00, 0.1777000E+00, 0.1850000E+00, &
     & 0.1960100E+00, 0.2242200E+00, 0.2455500E+00, 0.2870000E+00, &
     & 0.3224500E+00, 0.3959100E+00, 0.3792700E+00, 0.3792700E+00 /
      data (ref_adm( 6,iz,10,13),iz = 1,20) / &
     & 0.1691600E+00, 0.1691600E+00, 0.1585500E+00, 0.1506400E+00, &
     & 0.1331500E+00, 0.1551300E+00, 0.1482000E+00, 0.1539900E+00, &
     & 0.1582500E+00, 0.1727800E+00, 0.1764700E+00, 0.1867600E+00, &
     & 0.1943200E+00, 0.2227400E+00, 0.2394700E+00, 0.2896700E+00, &
     & 0.3133700E+00, 0.3403700E+00, 0.3308600E+00, 0.3308600E+00 /
      data (ref_adm( 6,iz,11,13),iz = 1,20) / &
     & 0.1586800E+00, 0.1586800E+00, 0.1463400E+00, 0.1479100E+00, &
     & 0.1580700E+00, 0.1527100E+00, 0.1434100E+00, 0.1567000E+00, &
     & 0.1587900E+00, 0.1736800E+00, 0.1834300E+00, 0.1946200E+00, &
     & 0.1914900E+00, 0.2176100E+00, 0.2383300E+00, 0.2885900E+00, &
     & 0.2894100E+00, 0.3319300E+00, 0.3079700E+00, 0.3079700E+00 /
      data (ref_adm( 6,iz,12,13),iz = 1,20) / &
     & 0.1567000E+00, 0.1567000E+00, 0.1489200E+00, 0.1532600E+00, &
     & 0.1474400E+00, 0.1568200E+00, 0.1537600E+00, 0.1601000E+00, &
     & 0.1748100E+00, 0.1719000E+00, 0.1790500E+00, 0.1867300E+00, &
     & 0.1872100E+00, 0.2062600E+00, 0.2376000E+00, 0.2751200E+00, &
     & 0.2786500E+00, 0.3007000E+00, 0.3006100E+00, 0.3006100E+00 /
      data (ref_adm( 6,iz,13,13),iz = 1,20) / &
     & 0.1666100E+00, 0.1666100E+00, 0.1534900E+00, 0.1498500E+00, &
     & 0.1530900E+00, 0.1581500E+00, 0.1429100E+00, 0.1642000E+00, &
     & 0.1677100E+00, 0.1722000E+00, 0.1795500E+00, 0.1940700E+00, &
     & 0.1876600E+00, 0.2037400E+00, 0.2074000E+00, 0.2599200E+00, &
     & 0.2771000E+00, 0.2794900E+00, 0.3348300E+00, 0.3348300E+00 /
      data (ref_adm( 6,iz,14,13),iz = 1,20) / &
     & 0.1727200E+00, 0.1727200E+00, 0.1758200E+00, 0.1741900E+00, &
     & 0.1728600E+00, 0.1747900E+00, 0.1676800E+00, 0.1727100E+00, &
     & 0.1739800E+00, 0.1712800E+00, 0.1752600E+00, 0.1842000E+00, &
     & 0.1929200E+00, 0.1993200E+00, 0.2133100E+00, 0.2429400E+00, &
     & 0.2846700E+00, 0.2699000E+00, 0.2790200E+00, 0.2790200E+00 /
      data (ref_adm( 6,iz,15,13),iz = 1,20) / &
     & 0.1616700E+00, 0.1616700E+00, 0.1506700E+00, 0.1491000E+00, &
     & 0.1452000E+00, 0.1485100E+00, 0.1491000E+00, 0.1527300E+00, &
     & 0.1594700E+00, 0.1619100E+00, 0.1695500E+00, 0.1828700E+00, &
     & 0.1978000E+00, 0.2046100E+00, 0.2193000E+00, 0.2267600E+00, &
     & 0.2654500E+00, 0.2967300E+00, 0.3163636E+00, 0.3163636E+00 /
      data (ref_adm( 6,iz,16,13),iz = 1,20) / &
     & 0.1518000E+00, 0.1518000E+00, 0.1546100E+00, 0.1668200E+00, &
     & 0.1801300E+00, 0.1642500E+00, 0.1573700E+00, 0.1535000E+00, &
     & 0.1549200E+00, 0.1512700E+00, 0.1605300E+00, 0.1670300E+00, &
     & 0.1767200E+00, 0.1894500E+00, 0.2204300E+00, 0.2349300E+00, &
     & 0.2792300E+00, 0.2647400E+00, 0.3076228E+00, 0.3076228E+00 /
      data (ref_adm( 6,iz,17,13),iz = 1,20) / &
     & 0.1637500E+00, 0.1637500E+00, 0.1705500E+00, 0.1800000E+00, &
     & 0.1852000E+00, 0.1694600E+00, 0.1803800E+00, 0.1736800E+00, &
     & 0.1647000E+00, 0.1648100E+00, 0.1810000E+00, 0.1929300E+00, &
     & 0.2060100E+00, 0.1991600E+00, 0.2128900E+00, 0.2376500E+00, &
     & 0.2466100E+00, 0.4018900E+00, 0.2996742E+00, 0.2996742E+00 /
      data (ref_adm( 6,iz,18,13),iz = 1,20) / &
     & 0.1684700E+00, 0.1684700E+00, 0.1703500E+00, 0.1678600E+00, &
     & 0.1776500E+00, 0.1749800E+00, 0.1817300E+00, 0.1687600E+00, &
     & 0.1690900E+00, 0.1671600E+00, 0.1817200E+00, 0.1894800E+00, &
     & 0.1977800E+00, 0.2084100E+00, 0.2211200E+00, 0.2263700E+00, &
     & 0.2508500E+00, 0.2569554E+00, 0.2332878E+00, 0.2332878E+00 /
      data (ref_adm( 6,iz,19,13),iz = 1,20) / &
     & 0.1653800E+00, 0.1653800E+00, 0.1623800E+00, 0.1618600E+00, &
     & 0.1688300E+00, 0.1691200E+00, 0.1742200E+00, 0.1704000E+00, &
     & 0.1761100E+00, 0.1792900E+00, 0.1827700E+00, 0.1875900E+00, &
     & 0.2010500E+00, 0.2229000E+00, 0.2370200E+00, 0.2546300E+00, &
     & 0.2888400E+00, 0.2544036E+00, 0.2316778E+00, 0.2316778E+00 /
      data (ref_adm( 6,iz,20,13),iz = 1,20) / &
     & 0.1745100E+00, 0.1745100E+00, 0.1635800E+00, 0.1701500E+00, &
     & 0.1643400E+00, 0.1833500E+00, 0.1700300E+00, 0.1674600E+00, &
     & 0.1854500E+00, 0.1817200E+00, 0.1854700E+00, 0.1971400E+00, &
     & 0.2013900E+00, 0.2211000E+00, 0.2391400E+00, 0.2191600E+00, &
     & 0.2473435E+00, 0.2518773E+00, 0.2302669E+00, 0.2302669E+00 /
      data (ref_adm( 6,iz,21,13),iz = 1,20) / &
     & 0.1695300E+00, 0.1695300E+00, 0.1709400E+00, 0.1765800E+00, &
     & 0.1695600E+00, 0.1760900E+00, 0.1753700E+00, 0.1855800E+00, &
     & 0.1871300E+00, 0.1882900E+00, 0.1790600E+00, 0.1980700E+00, &
     & 0.1977100E+00, 0.2164600E+00, 0.2237100E+00, 0.1962400E+00, &
     & 0.2450758E+00, 0.2493878E+00, 0.2289102E+00, 0.2289102E+00 /
      data (ref_adm( 6,iz,22,13),iz = 1,20) / &
     & 0.1732500E+00, 0.1732500E+00, 0.1770900E+00, 0.1719100E+00, &
     & 0.1681000E+00, 0.1714400E+00, 0.1855000E+00, 0.1868400E+00, &
     & 0.1905000E+00, 0.1972700E+00, 0.1930000E+00, 0.2007800E+00, &
     & 0.2146700E+00, 0.2421000E+00, 0.2467100E+00, 0.2550100E+00, &
     & 0.2859614E+00, 0.3062664E+00, 0.3125453E+00, 0.3125453E+00 /
      data (ref_adm( 6,iz,23,13),iz = 1,20) / &
     & 0.1628400E+00, 0.1628400E+00, 0.1648000E+00, 0.1691800E+00, &
     & 0.1758400E+00, 0.1800000E+00, 0.1898300E+00, 0.1953400E+00, &
     & 0.1932000E+00, 0.1923200E+00, 0.1992500E+00, 0.1970600E+00, &
     & 0.2126400E+00, 0.2395000E+00, 0.2532800E+00, 0.2667300E+00, &
     & 0.2872785E+00, 0.3061757E+00, 0.3129094E+00, 0.3129094E+00 /
      data (ref_adm( 6,iz,24,13),iz = 1,20) / &
     & 0.1576700E+00, 0.1576700E+00, 0.1477200E+00, 0.1509400E+00, &
     & 0.1553400E+00, 0.1591100E+00, 0.1645100E+00, 0.1756700E+00, &
     & 0.1832400E+00, 0.1962600E+00, 0.1964400E+00, 0.2028700E+00, &
     & 0.2263800E+00, 0.2365800E+00, 0.2619200E+00, 0.2628700E+00, &
     & 0.2601800E+00, 0.3077270E+00, 0.3146457E+00, 0.3146457E+00 /
      data (ref_adm( 6,iz,25,13),iz = 1,20) / &
     & 0.1556800E+00, 0.1556800E+00, 0.1752400E+00, 0.1817000E+00, &
     & 0.1795800E+00, 0.1886100E+00, 0.1925800E+00, 0.1910900E+00, &
     & 0.1917700E+00, 0.2007300E+00, 0.2059700E+00, 0.2128600E+00, &
     & 0.2258000E+00, 0.2408400E+00, 0.2547000E+00, 0.2781400E+00, &
     & 0.2980000E+00, 0.3101006E+00, 0.3177274E+00, 0.3177274E+00 /
      data (ref_adm( 6,iz,26,13),iz = 1,20) / &
     & 0.1748700E+00, 0.1748700E+00, 0.1762400E+00, 0.1849000E+00, &
     & 0.1828800E+00, 0.1938400E+00, 0.2003600E+00, 0.2092000E+00, &
     & 0.2162200E+00, 0.2220400E+00, 0.2303900E+00, 0.2399800E+00, &
     & 0.2584800E+00, 0.2719300E+00, 0.2790800E+00, 0.2943600E+00, &
     & 0.2930000E+00, 0.3415200E+00, 0.3221693E+00, 0.3221693E+00 /
      data (ref_adm( 6,iz,27,13),iz = 1,20) / &
     & 0.1678900E+00, 0.1678900E+00, 0.1599300E+00, 0.1663300E+00, &
     & 0.1693300E+00, 0.1928000E+00, 0.1946000E+00, 0.1962200E+00, &
     & 0.2139300E+00, 0.2160800E+00, 0.2280600E+00, 0.2323300E+00, &
     & 0.2568900E+00, 0.2767100E+00, 0.2818300E+00, 0.3150400E+00, &
     & 0.3062400E+00, 0.3335600E+00, 0.3286875E+00, 0.3286875E+00 /
      data (ref_adm( 6,iz,28,13),iz = 1,20) / &
     & 0.1659600E+00, 0.1659600E+00, 0.1753500E+00, 0.1789900E+00, &
     & 0.1806300E+00, 0.1999900E+00, 0.2049700E+00, 0.2002100E+00, &
     & 0.2132200E+00, 0.2292000E+00, 0.2466800E+00, 0.2418400E+00, &
     & 0.2651800E+00, 0.2910400E+00, 0.2862800E+00, 0.3156500E+00, &
     & 0.3173300E+00, 0.3276400E+00, 0.2810500E+00, 0.2810500E+00 /
      data (ref_adm( 6,iz,29,13),iz = 1,20) / &
     & 0.1714100E+00, 0.1714100E+00, 0.1692400E+00, 0.1755500E+00, &
     & 0.1699600E+00, 0.1911600E+00, 0.2049200E+00, 0.2128200E+00, &
     & 0.2171700E+00, 0.2322700E+00, 0.2412200E+00, 0.2505200E+00, &
     & 0.2802200E+00, 0.3007900E+00, 0.3020600E+00, 0.3144500E+00, &
     & 0.3339300E+00, 0.3491800E+00, 0.3015400E+00, 0.3015400E+00 /
      data (ref_adm( 6,iz,30,13),iz = 1,20) / &
     & 0.1606600E+00, 0.1606600E+00, 0.1638900E+00, 0.1655100E+00, &
     & 0.1848100E+00, 0.1885100E+00, 0.2108000E+00, 0.2140800E+00, &
     & 0.2134300E+00, 0.2339900E+00, 0.2452000E+00, 0.2600000E+00, &
     & 0.2807100E+00, 0.3022900E+00, 0.3157600E+00, 0.3373600E+00, &
     & 0.3495000E+00, 0.3425500E+00, 0.3167800E+00, 0.3167800E+00 /
      data (ref_adm( 6,iz,31,13),iz = 1,20) / &
     & 0.1626300E+00, 0.1626300E+00, 0.1732900E+00, 0.1788100E+00, &
     & 0.1884000E+00, 0.2063600E+00, 0.2133500E+00, 0.2185400E+00, &
     & 0.2264800E+00, 0.2437700E+00, 0.2609100E+00, 0.2670600E+00, &
     & 0.2878100E+00, 0.3153800E+00, 0.3279000E+00, 0.3449000E+00, &
     & 0.3689000E+00, 0.3503000E+00, 0.3101800E+00, 0.3101800E+00 /
      data (ref_adm( 6,iz,32,13),iz = 1,20) / &
     & 0.1725000E+00, 0.1725000E+00, 0.1729700E+00, 0.1766200E+00, &
     & 0.1875100E+00, 0.1916900E+00, 0.1999300E+00, 0.2202800E+00, &
     & 0.2295300E+00, 0.2389300E+00, 0.2601500E+00, 0.2772100E+00, &
     & 0.3056100E+00, 0.3287900E+00, 0.3419600E+00, 0.3666900E+00, &
     & 0.3705600E+00, 0.3646900E+00, 0.3145800E+00, 0.3145800E+00 /
      data (ref_adm( 6,iz,33,13),iz = 1,20) / &
     & 0.1581900E+00, 0.1581900E+00, 0.1642900E+00, 0.1742200E+00, &
     & 0.1779300E+00, 0.1817800E+00, 0.1938600E+00, 0.2081100E+00, &
     & 0.2290100E+00, 0.2391700E+00, 0.2555100E+00, 0.2737300E+00, &
     & 0.2922500E+00, 0.3103800E+00, 0.3421800E+00, 0.3633700E+00, &
     & 0.3793700E+00, 0.3746700E+00, 0.3261700E+00, 0.3261700E+00 /
      data (ref_adm( 6,iz,34,13),iz = 1,20) / &
     & 0.1667300E+00, 0.1667300E+00, 0.1794300E+00, 0.1709000E+00, &
     & 0.1708000E+00, 0.1860000E+00, 0.2047500E+00, 0.2247300E+00, &
     & 0.2450300E+00, 0.2621900E+00, 0.2623000E+00, 0.2803400E+00, &
     & 0.2998100E+00, 0.3454900E+00, 0.3753300E+00, 0.3882400E+00, &
     & 0.3963300E+00, 0.3928300E+00, 0.3362300E+00, 0.3362300E+00 /
      data (ref_adm( 6,iz,35,13),iz = 1,20) / &
     & 0.1710500E+00, 0.1710500E+00, 0.1656000E+00, 0.1720900E+00, &
     & 0.1795200E+00, 0.1903500E+00, 0.1986100E+00, 0.2246200E+00, &
     & 0.2371000E+00, 0.2586500E+00, 0.2691600E+00, 0.2966400E+00, &
     & 0.3244400E+00, 0.3546600E+00, 0.3822600E+00, 0.3877900E+00, &
     & 0.4029700E+00, 0.4013800E+00, 0.3470700E+00, 0.3470700E+00 /
      data (ref_adm( 6,iz,36,13),iz = 1,20) / &
     & 0.1752600E+00, 0.1752600E+00, 0.1758900E+00, 0.1684100E+00, &
     & 0.1881200E+00, 0.1980700E+00, 0.1977200E+00, 0.2194200E+00, &
     & 0.2202200E+00, 0.2487800E+00, 0.2770800E+00, 0.3090500E+00, &
     & 0.3541600E+00, 0.3745800E+00, 0.3775200E+00, 0.4018600E+00, &
     & 0.3962300E+00, 0.4105300E+00, 0.3490600E+00, 0.3490600E+00 /
      data (ref_adm( 6,iz,37,13),iz = 1,20) / &
     & 0.1654900E+00, 0.1654900E+00, 0.1604300E+00, 0.1740600E+00, &
     & 0.1745900E+00, 0.1919700E+00, 0.2079100E+00, 0.2058700E+00, &
     & 0.2236000E+00, 0.2666700E+00, 0.2918400E+00, 0.3123100E+00, &
     & 0.3493100E+00, 0.3982300E+00, 0.4016300E+00, 0.4052800E+00, &
     & 0.4084700E+00, 0.4032300E+00, 0.3324700E+00, 0.3324700E+00 /
      data (ref_adm( 6,iz,38,13),iz = 1,20) / &
     & 0.1654900E+00, 0.1654900E+00, 0.1604300E+00, 0.1740600E+00, &
     & 0.1745900E+00, 0.1919700E+00, 0.2079100E+00, 0.2058700E+00, &
     & 0.2236000E+00, 0.2666700E+00, 0.2918400E+00, 0.3123100E+00, &
     & 0.3493100E+00, 0.3982300E+00, 0.4016300E+00, 0.4052800E+00, &
     & 0.4084700E+00, 0.4032300E+00, 0.3324700E+00, 0.3324700E+00 /
! Solar Zenith Angle 65.0 Albedo  0.2215196E+00
      data (ref_adm( 6,iz, 1,14),iz = 1,20) / &
     & 0.1425900E+00, 0.1425900E+00, 0.1605000E+00, 0.1496300E+00, &
     & 0.1266600E+00, 0.1405300E+00, 0.1597500E+00, 0.1670600E+00, &
     & 0.1616700E+00, 0.1847300E+00, 0.1968000E+00, 0.2350300E+00, &
     & 0.2864700E+00, 0.3758600E+00, 0.5170600E+00, 0.5513600E+00, &
     & 0.5583100E+00, 0.5521500E+00, 0.1056773E+01, 0.1056773E+01 /
      data (ref_adm( 6,iz, 2,14),iz = 1,20) / &
     & 0.1425900E+00, 0.1425900E+00, 0.1605000E+00, 0.1496300E+00, &
     & 0.1266600E+00, 0.1405300E+00, 0.1597500E+00, 0.1670600E+00, &
     & 0.1616700E+00, 0.1847300E+00, 0.1968000E+00, 0.2350300E+00, &
     & 0.2864700E+00, 0.3758600E+00, 0.5170600E+00, 0.5513600E+00, &
     & 0.5583100E+00, 0.5521500E+00, 0.1056773E+01, 0.1056773E+01 /
      data (ref_adm( 6,iz, 3,14),iz = 1,20) / &
     & 0.1366800E+00, 0.1366800E+00, 0.1384400E+00, 0.1623500E+00, &
     & 0.1475500E+00, 0.1460600E+00, 0.1511800E+00, 0.1481800E+00, &
     & 0.1602400E+00, 0.1778100E+00, 0.2004800E+00, 0.2345000E+00, &
     & 0.2697200E+00, 0.3151900E+00, 0.3586000E+00, 0.4031600E+00, &
     & 0.4603800E+00, 0.4938900E+00, 0.1535279E-07, 0.1535279E-07 /
      data (ref_adm( 6,iz, 4,14),iz = 1,20) / &
     & 0.1515600E+00, 0.1515600E+00, 0.1410200E+00, 0.1466100E+00, &
     & 0.1590500E+00, 0.1612100E+00, 0.1437100E+00, 0.1459800E+00, &
     & 0.1589900E+00, 0.1752300E+00, 0.1854900E+00, 0.2306100E+00, &
     & 0.2665700E+00, 0.2926000E+00, 0.3303600E+00, 0.3938500E+00, &
     & 0.5013900E+00, 0.5667000E+00, 0.8798212E+00, 0.8798212E+00 /
      data (ref_adm( 6,iz, 5,14),iz = 1,20) / &
     & 0.1651800E+00, 0.1651800E+00, 0.1433000E+00, 0.1552100E+00, &
     & 0.1514500E+00, 0.1581300E+00, 0.1565800E+00, 0.1547300E+00, &
     & 0.1710800E+00, 0.1807500E+00, 0.1952400E+00, 0.2154500E+00, &
     & 0.2419500E+00, 0.3077100E+00, 0.3438500E+00, 0.3661600E+00, &
     & 0.4666500E+00, 0.4957700E+00, 0.7665427E+00, 0.7665427E+00 /
      data (ref_adm( 6,iz, 6,14),iz = 1,20) / &
     & 0.1367200E+00, 0.1367200E+00, 0.1448100E+00, 0.1404200E+00, &
     & 0.1365400E+00, 0.1436500E+00, 0.1447800E+00, 0.1539300E+00, &
     & 0.1638200E+00, 0.1725200E+00, 0.1937200E+00, 0.2167100E+00, &
     & 0.2506000E+00, 0.2901300E+00, 0.3342200E+00, 0.3818300E+00, &
     & 0.4606700E+00, 0.5355600E+00, 0.5945100E+00, 0.5945100E+00 /
      data (ref_adm( 6,iz, 7,14),iz = 1,20) / &
     & 0.1588400E+00, 0.1588400E+00, 0.1616700E+00, 0.1521200E+00, &
     & 0.1489600E+00, 0.1547100E+00, 0.1554900E+00, 0.1679300E+00, &
     & 0.1743100E+00, 0.1857900E+00, 0.1974400E+00, 0.2127500E+00, &
     & 0.2305800E+00, 0.2549900E+00, 0.2858800E+00, 0.3197900E+00, &
     & 0.3680000E+00, 0.4149200E+00, 0.3927700E+00, 0.3927700E+00 /
      data (ref_adm( 6,iz, 8,14),iz = 1,20) / &
     & 0.1558000E+00, 0.1558000E+00, 0.1529500E+00, 0.1503300E+00, &
     & 0.1572400E+00, 0.1377300E+00, 0.1496200E+00, 0.1530800E+00, &
     & 0.1826500E+00, 0.1670800E+00, 0.1837100E+00, 0.2001800E+00, &
     & 0.2176500E+00, 0.2383700E+00, 0.2600800E+00, 0.3085300E+00, &
     & 0.3860200E+00, 0.4363600E+00, 0.4465700E+00, 0.4465700E+00 /
      data (ref_adm( 6,iz, 9,14),iz = 1,20) / &
     & 0.1577700E+00, 0.1577700E+00, 0.1515100E+00, 0.1525200E+00, &
     & 0.1423700E+00, 0.1483800E+00, 0.1618600E+00, 0.1575600E+00, &
     & 0.1776500E+00, 0.1699500E+00, 0.1789900E+00, 0.1905200E+00, &
     & 0.2200400E+00, 0.2443300E+00, 0.2619500E+00, 0.3375400E+00, &
     & 0.4065400E+00, 0.4392000E+00, 0.3793600E+00, 0.3793600E+00 /
      data (ref_adm( 6,iz,10,14),iz = 1,20) / &
     & 0.1405500E+00, 0.1405500E+00, 0.1487800E+00, 0.1442100E+00, &
     & 0.1411600E+00, 0.1491600E+00, 0.1631700E+00, 0.1484100E+00, &
     & 0.1576800E+00, 0.1774200E+00, 0.1788800E+00, 0.2043500E+00, &
     & 0.2216100E+00, 0.2332800E+00, 0.2728600E+00, 0.3028000E+00, &
     & 0.3484200E+00, 0.4218600E+00, 0.3695300E+00, 0.3695300E+00 /
      data (ref_adm( 6,iz,11,14),iz = 1,20) / &
     & 0.1464600E+00, 0.1464600E+00, 0.1382200E+00, 0.1330900E+00, &
     & 0.1508400E+00, 0.1481900E+00, 0.1486200E+00, 0.1621600E+00, &
     & 0.1686200E+00, 0.1630800E+00, 0.1746400E+00, 0.1892900E+00, &
     & 0.2111500E+00, 0.2501200E+00, 0.2626800E+00, 0.3125000E+00, &
     & 0.3446700E+00, 0.3889400E+00, 0.3708600E+00, 0.3708600E+00 /
      data (ref_adm( 6,iz,12,14),iz = 1,20) / &
     & 0.1463200E+00, 0.1463200E+00, 0.1440800E+00, 0.1482200E+00, &
     & 0.1488900E+00, 0.1455400E+00, 0.1483600E+00, 0.1584400E+00, &
     & 0.1634600E+00, 0.1705500E+00, 0.1863600E+00, 0.1809900E+00, &
     & 0.1925000E+00, 0.2339800E+00, 0.2577700E+00, 0.2986800E+00, &
     & 0.3206000E+00, 0.3344700E+00, 0.3156900E+00, 0.3156900E+00 /
      data (ref_adm( 6,iz,13,14),iz = 1,20) / &
     & 0.1492900E+00, 0.1492900E+00, 0.1569100E+00, 0.1524200E+00, &
     & 0.1474100E+00, 0.1444800E+00, 0.1614300E+00, 0.1589500E+00, &
     & 0.1610400E+00, 0.1810800E+00, 0.1855900E+00, 0.1769700E+00, &
     & 0.1958300E+00, 0.2135600E+00, 0.2472300E+00, 0.3002800E+00, &
     & 0.3184900E+00, 0.3350400E+00, 0.3548600E+00, 0.3548600E+00 /
      data (ref_adm( 6,iz,14,14),iz = 1,20) / &
     & 0.1534700E+00, 0.1534700E+00, 0.1620100E+00, 0.1564800E+00, &
     & 0.1601200E+00, 0.1602400E+00, 0.1614400E+00, 0.1667800E+00, &
     & 0.1657800E+00, 0.1697500E+00, 0.1795700E+00, 0.1792600E+00, &
     & 0.1977300E+00, 0.2199000E+00, 0.2516500E+00, 0.2830800E+00, &
     & 0.3163300E+00, 0.3301000E+00, 0.4293172E+00, 0.4293172E+00 /
      data (ref_adm( 6,iz,15,14),iz = 1,20) / &
     & 0.1582500E+00, 0.1582500E+00, 0.1459100E+00, 0.1445900E+00, &
     & 0.1443000E+00, 0.1460000E+00, 0.1494000E+00, 0.1528200E+00, &
     & 0.1584400E+00, 0.1652800E+00, 0.1739700E+00, 0.1830200E+00, &
     & 0.1933800E+00, 0.2091400E+00, 0.2426100E+00, 0.2784300E+00, &
     & 0.2995900E+00, 0.3446400E+00, 0.4181004E+00, 0.4181004E+00 /
      data (ref_adm( 6,iz,16,14),iz = 1,20) / &
     & 0.1432900E+00, 0.1432900E+00, 0.1305600E+00, 0.1366400E+00, &
     & 0.1317400E+00, 0.1340000E+00, 0.1337900E+00, 0.1378100E+00, &
     & 0.1393400E+00, 0.1492900E+00, 0.1604300E+00, 0.1676900E+00, &
     & 0.1810500E+00, 0.2010600E+00, 0.2175200E+00, 0.2408700E+00, &
     & 0.2929600E+00, 0.3636338E+00, 0.4058135E+00, 0.4058135E+00 /
      data (ref_adm( 6,iz,17,14),iz = 1,20) / &
     & 0.1469700E+00, 0.1469700E+00, 0.1512800E+00, 0.1484100E+00, &
     & 0.1525100E+00, 0.1596500E+00, 0.1579100E+00, 0.1659100E+00, &
     & 0.1542900E+00, 0.1675700E+00, 0.1679700E+00, 0.1802400E+00, &
     & 0.2013200E+00, 0.2086900E+00, 0.2230000E+00, 0.2616000E+00, &
     & 0.3478800E+00, 0.3554029E+00, 0.3931438E+00, 0.3931438E+00 /
      data (ref_adm( 6,iz,18,14),iz = 1,20) / &
     & 0.1518700E+00, 0.1518700E+00, 0.1566600E+00, 0.1563200E+00, &
     & 0.1582500E+00, 0.1640000E+00, 0.1619600E+00, 0.1570400E+00, &
     & 0.1566900E+00, 0.1717500E+00, 0.1745900E+00, 0.1905200E+00, &
     & 0.1889100E+00, 0.2262800E+00, 0.2256900E+00, 0.2615200E+00, &
     & 0.2895020E+00, 0.3268837E+00, 0.3538130E+00, 0.3538130E+00 /
      data (ref_adm( 6,iz,19,14),iz = 1,20) / &
     & 0.1554300E+00, 0.1554300E+00, 0.1540300E+00, 0.1489700E+00, &
     & 0.1606900E+00, 0.1553000E+00, 0.1687800E+00, 0.1661000E+00, &
     & 0.1688000E+00, 0.1914300E+00, 0.1784100E+00, 0.2025500E+00, &
     & 0.1920100E+00, 0.2113300E+00, 0.2309300E+00, 0.2543700E+00, &
     & 0.2874269E+00, 0.3226263E+00, 0.3465334E+00, 0.3465334E+00 /
      data (ref_adm( 6,iz,20,14),iz = 1,20) / &
     & 0.1584300E+00, 0.1584300E+00, 0.1527200E+00, 0.1562700E+00, &
     & 0.1518600E+00, 0.1539800E+00, 0.1591200E+00, 0.1595000E+00, &
     & 0.1696400E+00, 0.1761600E+00, 0.1811000E+00, 0.1853400E+00, &
     & 0.2019400E+00, 0.2218800E+00, 0.2352400E+00, 0.2486100E+00, &
     & 0.2862457E+00, 0.3201219E+00, 0.3423168E+00, 0.3423168E+00 /
      data (ref_adm( 6,iz,21,14),iz = 1,20) / &
     & 0.1596400E+00, 0.1596400E+00, 0.1489600E+00, 0.1541700E+00, &
     & 0.1561400E+00, 0.1649800E+00, 0.1621900E+00, 0.1661400E+00, &
     & 0.1762400E+00, 0.1817700E+00, 0.1813100E+00, 0.1956400E+00, &
     & 0.2004600E+00, 0.2214300E+00, 0.2399200E+00, 0.2685000E+00, &
     & 0.2860859E+00, 0.3183311E+00, 0.3397178E+00, 0.3397178E+00 /
      data (ref_adm( 6,iz,22,14),iz = 1,20) / &
     & 0.1499100E+00, 0.1499100E+00, 0.1521400E+00, 0.1570500E+00, &
     & 0.1589000E+00, 0.1682100E+00, 0.1669000E+00, 0.1663100E+00, &
     & 0.1673100E+00, 0.1838700E+00, 0.1920200E+00, 0.2073500E+00, &
     & 0.1977100E+00, 0.2165600E+00, 0.2352300E+00, 0.2364400E+00, &
     & 0.2947377E+00, 0.3209259E+00, 0.3339048E+00, 0.3339048E+00 /
      data (ref_adm( 6,iz,23,14),iz = 1,20) / &
     & 0.1567800E+00, 0.1567800E+00, 0.1589800E+00, 0.1483500E+00, &
     & 0.1582200E+00, 0.1646800E+00, 0.1753900E+00, 0.1778700E+00, &
     & 0.1685400E+00, 0.1732100E+00, 0.1873500E+00, 0.2079200E+00, &
     & 0.2012800E+00, 0.2231500E+00, 0.2520500E+00, 0.2740900E+00, &
     & 0.2957966E+00, 0.3208080E+00, 0.3342885E+00, 0.3342885E+00 /
      data (ref_adm( 6,iz,24,14),iz = 1,20) / &
     & 0.1385200E+00, 0.1385200E+00, 0.1419600E+00, 0.1459800E+00, &
     & 0.1498000E+00, 0.1548100E+00, 0.1610700E+00, 0.1673900E+00, &
     & 0.1716600E+00, 0.1750600E+00, 0.1837500E+00, 0.2020000E+00, &
     & 0.2152900E+00, 0.2472300E+00, 0.2593800E+00, 0.2813700E+00, &
     & 0.3111400E+00, 0.3226083E+00, 0.3366365E+00, 0.3366365E+00 /
      data (ref_adm( 6,iz,25,14),iz = 1,20) / &
     & 0.1479000E+00, 0.1479000E+00, 0.1628600E+00, 0.1678200E+00, &
     & 0.1709100E+00, 0.1747600E+00, 0.1816000E+00, 0.1880700E+00, &
     & 0.1920200E+00, 0.1974400E+00, 0.2078900E+00, 0.2144200E+00, &
     & 0.2229800E+00, 0.2423700E+00, 0.2580000E+00, 0.2855500E+00, &
     & 0.3089600E+00, 0.3253011E+00, 0.3404703E+00, 0.3404703E+00 /
      data (ref_adm( 6,iz,26,14),iz = 1,20) / &
     & 0.1592200E+00, 0.1592200E+00, 0.1596300E+00, 0.1650100E+00, &
     & 0.1671400E+00, 0.1742900E+00, 0.1725000E+00, 0.1812100E+00, &
     & 0.2014300E+00, 0.2140900E+00, 0.2229900E+00, 0.2394300E+00, &
     & 0.2535600E+00, 0.2790700E+00, 0.2766500E+00, 0.3025200E+00, &
     & 0.3307700E+00, 0.3438300E+00, 0.3467008E+00, 0.3467008E+00 /
      data (ref_adm( 6,iz,27,14),iz = 1,20) / &
     & 0.1522200E+00, 0.1522200E+00, 0.1498400E+00, 0.1568200E+00, &
     & 0.1580900E+00, 0.1620500E+00, 0.1664800E+00, 0.1820200E+00, &
     & 0.1944100E+00, 0.2136400E+00, 0.2146200E+00, 0.2248200E+00, &
     & 0.2373600E+00, 0.2735400E+00, 0.2867300E+00, 0.3118600E+00, &
     & 0.3385500E+00, 0.3574100E+00, 0.3550964E+00, 0.3550964E+00 /
      data (ref_adm( 6,iz,28,14),iz = 1,20) / &
     & 0.1542800E+00, 0.1542800E+00, 0.1589500E+00, 0.1498500E+00, &
     & 0.1609500E+00, 0.1641000E+00, 0.1768000E+00, 0.1809300E+00, &
     & 0.2004600E+00, 0.2162400E+00, 0.2274000E+00, 0.2425600E+00, &
     & 0.2664100E+00, 0.2823400E+00, 0.3044600E+00, 0.3190600E+00, &
     & 0.3442200E+00, 0.3409900E+00, 0.3341000E+00, 0.3341000E+00 /
      data (ref_adm( 6,iz,29,14),iz = 1,20) / &
     & 0.1747900E+00, 0.1747900E+00, 0.1735400E+00, 0.1632700E+00, &
     & 0.1628800E+00, 0.1789900E+00, 0.1834700E+00, 0.1877800E+00, &
     & 0.1970500E+00, 0.2151700E+00, 0.2283600E+00, 0.2493100E+00, &
     & 0.2722700E+00, 0.2981600E+00, 0.3104100E+00, 0.3300900E+00, &
     & 0.3552300E+00, 0.3659000E+00, 0.3277800E+00, 0.3277800E+00 /
      data (ref_adm( 6,iz,30,14),iz = 1,20) / &
     & 0.1443500E+00, 0.1443500E+00, 0.1655600E+00, 0.1732700E+00, &
     & 0.1692000E+00, 0.1691700E+00, 0.1834400E+00, 0.1960800E+00, &
     & 0.2136700E+00, 0.2124900E+00, 0.2425800E+00, 0.2671300E+00, &
     & 0.2839600E+00, 0.3130900E+00, 0.3275300E+00, 0.3656300E+00, &
     & 0.3799000E+00, 0.3984700E+00, 0.3531000E+00, 0.3531000E+00 /
      data (ref_adm( 6,iz,31,14),iz = 1,20) / &
     & 0.1503900E+00, 0.1503900E+00, 0.1528200E+00, 0.1525600E+00, &
     & 0.1673000E+00, 0.1698900E+00, 0.1991900E+00, 0.1951700E+00, &
     & 0.2082600E+00, 0.2244100E+00, 0.2359300E+00, 0.2647500E+00, &
     & 0.2861600E+00, 0.3170100E+00, 0.3430100E+00, 0.3656200E+00, &
     & 0.3922100E+00, 0.4232300E+00, 0.3833000E+00, 0.3833000E+00 /
      data (ref_adm( 6,iz,32,14),iz = 1,20) / &
     & 0.1570700E+00, 0.1570700E+00, 0.1727500E+00, 0.1748800E+00, &
     & 0.1635100E+00, 0.1873500E+00, 0.1983100E+00, 0.2075900E+00, &
     & 0.2253400E+00, 0.2379900E+00, 0.2660900E+00, 0.2829200E+00, &
     & 0.2880900E+00, 0.3373700E+00, 0.3687800E+00, 0.3878400E+00, &
     & 0.4070900E+00, 0.4241700E+00, 0.3646900E+00, 0.3646900E+00 /
      data (ref_adm( 6,iz,33,14),iz = 1,20) / &
     & 0.1589700E+00, 0.1589700E+00, 0.1576000E+00, 0.1683300E+00, &
     & 0.1681700E+00, 0.1771600E+00, 0.1828800E+00, 0.1989200E+00, &
     & 0.2104900E+00, 0.2323000E+00, 0.2419800E+00, 0.2679400E+00, &
     & 0.2979100E+00, 0.3281700E+00, 0.3621600E+00, 0.3915200E+00, &
     & 0.4233300E+00, 0.4275000E+00, 0.3703900E+00, 0.3703900E+00 /
      data (ref_adm( 6,iz,34,14),iz = 1,20) / &
     & 0.1558200E+00, 0.1558200E+00, 0.1652200E+00, 0.1615200E+00, &
     & 0.1905500E+00, 0.1982300E+00, 0.2134800E+00, 0.2088300E+00, &
     & 0.2183400E+00, 0.2535000E+00, 0.2673800E+00, 0.2841400E+00, &
     & 0.3094500E+00, 0.3400700E+00, 0.3854200E+00, 0.3961700E+00, &
     & 0.4146800E+00, 0.4397400E+00, 0.4302416E+00, 0.4302416E+00 /
      data (ref_adm( 6,iz,35,14),iz = 1,20) / &
     & 0.1543600E+00, 0.1543600E+00, 0.1498900E+00, 0.1646000E+00, &
     & 0.1754000E+00, 0.1832300E+00, 0.1964600E+00, 0.2017200E+00, &
     & 0.2199600E+00, 0.2522500E+00, 0.2684400E+00, 0.2799400E+00, &
     & 0.3139700E+00, 0.3597500E+00, 0.3958200E+00, 0.4188000E+00, &
     & 0.4417200E+00, 0.4464900E+00, 0.3726200E+00, 0.3726200E+00 /
      data (ref_adm( 6,iz,36,14),iz = 1,20) / &
     & 0.1572600E+00, 0.1572600E+00, 0.1663900E+00, 0.1677900E+00, &
     & 0.1679000E+00, 0.1851400E+00, 0.1934900E+00, 0.2154700E+00, &
     & 0.2199700E+00, 0.2499400E+00, 0.2578700E+00, 0.2890900E+00, &
     & 0.3168000E+00, 0.3706600E+00, 0.4004700E+00, 0.4318700E+00, &
     & 0.4546200E+00, 0.4900500E+00, 0.3987000E+00, 0.3987000E+00 /
      data (ref_adm( 6,iz,37,14),iz = 1,20) / &
     & 0.1496800E+00, 0.1496800E+00, 0.1548100E+00, 0.1716200E+00, &
     & 0.1760100E+00, 0.1850600E+00, 0.2014000E+00, 0.2157200E+00, &
     & 0.2152900E+00, 0.2459800E+00, 0.2672400E+00, 0.2949900E+00, &
     & 0.3401900E+00, 0.3792200E+00, 0.4259100E+00, 0.4371600E+00, &
     & 0.4546800E+00, 0.4761900E+00, 0.4008000E+00, 0.4008000E+00 /
      data (ref_adm( 6,iz,38,14),iz = 1,20) / &
     & 0.1496800E+00, 0.1496800E+00, 0.1548100E+00, 0.1716200E+00, &
     & 0.1760100E+00, 0.1850600E+00, 0.2014000E+00, 0.2157200E+00, &
     & 0.2152900E+00, 0.2459800E+00, 0.2672400E+00, 0.2949900E+00, &
     & 0.3401900E+00, 0.3792200E+00, 0.4259100E+00, 0.4371600E+00, &
     & 0.4546800E+00, 0.4761900E+00, 0.4008000E+00, 0.4008000E+00 /
! Solar Zenith Angle 70.0 Albedo  0.2308344E+00
      data (ref_adm( 6,iz, 1,15),iz = 1,20) / &
     & 0.1421900E+00, 0.1421900E+00, 0.1478500E+00, 0.1445900E+00, &
     & 0.1418100E+00, 0.1396400E+00, 0.1417500E+00, 0.1437500E+00, &
     & 0.1564300E+00, 0.1905000E+00, 0.2034700E+00, 0.2377200E+00, &
     & 0.3565400E+00, 0.4664200E+00, 0.8143400E+00, 0.9935800E+00, &
     & 0.8799964E+00, 0.1702475E+01, 0.1338274E+01, 0.1338274E+01 /
      data (ref_adm( 6,iz, 2,15),iz = 1,20) / &
     & 0.1421900E+00, 0.1421900E+00, 0.1478500E+00, 0.1445900E+00, &
     & 0.1418100E+00, 0.1396400E+00, 0.1417500E+00, 0.1437500E+00, &
     & 0.1564300E+00, 0.1905000E+00, 0.2034700E+00, 0.2377200E+00, &
     & 0.3565400E+00, 0.4664200E+00, 0.8143400E+00, 0.9935800E+00, &
     & 0.8799964E+00, 0.1702475E+01, 0.1338274E+01, 0.1338274E+01 /
      data (ref_adm( 6,iz, 3,15),iz = 1,20) / &
     & 0.1595000E+00, 0.1595000E+00, 0.1591500E+00, 0.1467900E+00, &
     & 0.1437300E+00, 0.1468900E+00, 0.1455800E+00, 0.1450300E+00, &
     & 0.1533000E+00, 0.1945600E+00, 0.2157700E+00, 0.2458200E+00, &
     & 0.2656200E+00, 0.3376000E+00, 0.4459200E+00, 0.4491700E+00, &
     & 0.8234382E+00, 0.1799934E+01, 0.2175046E-07, 0.2175046E-07 /
      data (ref_adm( 6,iz, 4,15),iz = 1,20) / &
     & 0.1547300E+00, 0.1547300E+00, 0.1417700E+00, 0.1414200E+00, &
     & 0.1418200E+00, 0.1512200E+00, 0.1398100E+00, 0.1582000E+00, &
     & 0.1749600E+00, 0.1786200E+00, 0.2091000E+00, 0.2405000E+00, &
     & 0.2639700E+00, 0.3348600E+00, 0.4240300E+00, 0.5459100E+00, &
     & 0.7264854E+00, 0.1631129E+01, 0.2052624E+01, 0.2052624E+01 /
      data (ref_adm( 6,iz, 5,15),iz = 1,20) / &
     & 0.1544500E+00, 0.1544500E+00, 0.1378200E+00, 0.1460400E+00, &
     & 0.1542400E+00, 0.1522500E+00, 0.1612700E+00, 0.1738200E+00, &
     & 0.1839100E+00, 0.1819800E+00, 0.2147900E+00, 0.2394100E+00, &
     & 0.2640300E+00, 0.3285200E+00, 0.3736400E+00, 0.4098500E+00, &
     & 0.6342499E+00, 0.1184117E+01, 0.2488173E+01, 0.2488173E+01 /
      data (ref_adm( 6,iz, 6,15),iz = 1,20) / &
     & 0.1417400E+00, 0.1417400E+00, 0.1371300E+00, 0.1460400E+00, &
     & 0.1481900E+00, 0.1552500E+00, 0.1569800E+00, 0.1684000E+00, &
     & 0.1782800E+00, 0.1820400E+00, 0.1909700E+00, 0.2112900E+00, &
     & 0.2410900E+00, 0.3010400E+00, 0.3536200E+00, 0.4163100E+00, &
     & 0.5018500E+00, 0.4494800E+00, 0.1583011E+01, 0.1583011E+01 /
      data (ref_adm( 6,iz, 7,15),iz = 1,20) / &
     & 0.1452700E+00, 0.1452700E+00, 0.1439600E+00, 0.1398000E+00, &
     & 0.1349300E+00, 0.1395700E+00, 0.1534500E+00, 0.1533600E+00, &
     & 0.1678900E+00, 0.1676900E+00, 0.1939800E+00, 0.1963500E+00, &
     & 0.2356900E+00, 0.2728900E+00, 0.3259400E+00, 0.4344100E+00, &
     & 0.4784100E+00, 0.5583400E+00, 0.5255800E+00, 0.5255800E+00 /
      data (ref_adm( 6,iz, 8,15),iz = 1,20) / &
     & 0.1559800E+00, 0.1559800E+00, 0.1380000E+00, 0.1284700E+00, &
     & 0.1389000E+00, 0.1307000E+00, 0.1468700E+00, 0.1599900E+00, &
     & 0.1552700E+00, 0.1654500E+00, 0.1878200E+00, 0.1927600E+00, &
     & 0.2362600E+00, 0.2540000E+00, 0.3191600E+00, 0.3221300E+00, &
     & 0.4476600E+00, 0.4721900E+00, 0.8908918E+00, 0.8908918E+00 /
      data (ref_adm( 6,iz, 9,15),iz = 1,20) / &
     & 0.1530500E+00, 0.1530500E+00, 0.1547300E+00, 0.1400300E+00, &
     & 0.1423200E+00, 0.1206200E+00, 0.1322900E+00, 0.1417500E+00, &
     & 0.1578000E+00, 0.1660200E+00, 0.1868500E+00, 0.1969900E+00, &
     & 0.2262000E+00, 0.2703900E+00, 0.2996300E+00, 0.3462900E+00, &
     & 0.4289500E+00, 0.4854200E+00, 0.7697728E+00, 0.7697728E+00 /
      data (ref_adm( 6,iz,10,15),iz = 1,20) / &
     & 0.1495500E+00, 0.1495500E+00, 0.1416800E+00, 0.1552200E+00, &
     & 0.1344300E+00, 0.1331300E+00, 0.1335300E+00, 0.1387000E+00, &
     & 0.1543700E+00, 0.1639200E+00, 0.1724300E+00, 0.1905600E+00, &
     & 0.2074100E+00, 0.2650100E+00, 0.2794600E+00, 0.3372400E+00, &
     & 0.3697200E+00, 0.3880500E+00, 0.3053400E+00, 0.3053400E+00 /
      data (ref_adm( 6,iz,11,15),iz = 1,20) / &
     & 0.1344500E+00, 0.1344500E+00, 0.1367700E+00, 0.1400200E+00, &
     & 0.1385500E+00, 0.1340800E+00, 0.1404500E+00, 0.1438600E+00, &
     & 0.1659900E+00, 0.1604800E+00, 0.1729300E+00, 0.1883100E+00, &
     & 0.2044700E+00, 0.2373800E+00, 0.2566200E+00, 0.3258400E+00, &
     & 0.3194900E+00, 0.3978300E+00, 0.2957600E+00, 0.2957600E+00 /
      data (ref_adm( 6,iz,12,15),iz = 1,20) / &
     & 0.1393300E+00, 0.1393300E+00, 0.1419000E+00, 0.1426200E+00, &
     & 0.1473600E+00, 0.1425900E+00, 0.1514500E+00, 0.1485100E+00, &
     & 0.1607700E+00, 0.1659000E+00, 0.1699900E+00, 0.1951200E+00, &
     & 0.2096600E+00, 0.2524900E+00, 0.2654700E+00, 0.3075000E+00, &
     & 0.3397800E+00, 0.3660300E+00, 0.6207279E+00, 0.6207279E+00 /
      data (ref_adm( 6,iz,13,15),iz = 1,20) / &
     & 0.1374600E+00, 0.1374600E+00, 0.1289700E+00, 0.1320800E+00, &
     & 0.1311300E+00, 0.1519600E+00, 0.1401800E+00, 0.1584900E+00, &
     & 0.1556200E+00, 0.1505200E+00, 0.1682600E+00, 0.1818400E+00, &
     & 0.2114200E+00, 0.2334700E+00, 0.2803400E+00, 0.2798300E+00, &
     & 0.3344700E+00, 0.3561500E+00, 0.3455100E+00, 0.3455100E+00 /
      data (ref_adm( 6,iz,14,15),iz = 1,20) / &
     & 0.1416500E+00, 0.1416500E+00, 0.1521600E+00, 0.1322100E+00, &
     & 0.1438000E+00, 0.1477800E+00, 0.1413700E+00, 0.1586400E+00, &
     & 0.1588100E+00, 0.1643300E+00, 0.1736500E+00, 0.1799300E+00, &
     & 0.1976900E+00, 0.2283000E+00, 0.2463100E+00, 0.2786300E+00, &
     & 0.3119300E+00, 0.3377700E+00, 0.5624231E+00, 0.5624231E+00 /
      data (ref_adm( 6,iz,15,15),iz = 1,20) / &
     & 0.1493000E+00, 0.1493000E+00, 0.1454900E+00, 0.1441700E+00, &
     & 0.1437300E+00, 0.1489600E+00, 0.1550200E+00, 0.1525500E+00, &
     & 0.1629600E+00, 0.1756100E+00, 0.1819000E+00, 0.1936700E+00, &
     & 0.2035600E+00, 0.2251400E+00, 0.2522200E+00, 0.2775800E+00, &
     & 0.3022900E+00, 0.5098000E+00, 0.5436181E+00, 0.5436181E+00 /
      data (ref_adm( 6,iz,16,15),iz = 1,20) / &
     & 0.1356500E+00, 0.1356500E+00, 0.1272600E+00, 0.1235300E+00, &
     & 0.1226500E+00, 0.1274700E+00, 0.1310900E+00, 0.1416500E+00, &
     & 0.1534600E+00, 0.1548800E+00, 0.1626600E+00, 0.1746600E+00, &
     & 0.1902200E+00, 0.2071900E+00, 0.2396300E+00, 0.2774100E+00, &
     & 0.3132400E+00, 0.4328648E+00, 0.5259786E+00, 0.5259786E+00 /
      data (ref_adm( 6,iz,17,15),iz = 1,20) / &
     & 0.1483500E+00, 0.1483500E+00, 0.1342700E+00, 0.1250900E+00, &
     & 0.1430900E+00, 0.1416000E+00, 0.1396100E+00, 0.1619000E+00, &
     & 0.1505500E+00, 0.1591800E+00, 0.1766000E+00, 0.1865200E+00, &
     & 0.2060300E+00, 0.2219600E+00, 0.2307000E+00, 0.2660800E+00, &
     & 0.3221700E+00, 0.4196611E+00, 0.5064228E+00, 0.5064228E+00 /
      data (ref_adm( 6,iz,18,15),iz = 1,20) / &
     & 0.1515200E+00, 0.1515200E+00, 0.1384500E+00, 0.1376900E+00, &
     & 0.1324900E+00, 0.1377000E+00, 0.1494400E+00, 0.1550200E+00, &
     & 0.1573100E+00, 0.1691100E+00, 0.1743800E+00, 0.1891800E+00, &
     & 0.2150400E+00, 0.2281200E+00, 0.2445400E+00, 0.2557300E+00, &
     & 0.2932252E+00, 0.3330673E+00, 0.3625465E+00, 0.3625465E+00 /
      data (ref_adm( 6,iz,19,15),iz = 1,20) / &
     & 0.1369800E+00, 0.1369800E+00, 0.1468800E+00, 0.1245300E+00, &
     & 0.1537600E+00, 0.1400000E+00, 0.1469700E+00, 0.1452500E+00, &
     & 0.1507800E+00, 0.1820600E+00, 0.1811200E+00, 0.1921300E+00, &
     & 0.2041400E+00, 0.2264500E+00, 0.2489500E+00, 0.2635100E+00, &
     & 0.2908227E+00, 0.3282826E+00, 0.3547378E+00, 0.3547378E+00 /
      data (ref_adm( 6,iz,20,15),iz = 1,20) / &
     & 0.1301600E+00, 0.1301600E+00, 0.1461100E+00, 0.1362400E+00, &
     & 0.1416000E+00, 0.1339500E+00, 0.1435100E+00, 0.1600100E+00, &
     & 0.1544000E+00, 0.1790400E+00, 0.1800200E+00, 0.1943300E+00, &
     & 0.2149500E+00, 0.2195600E+00, 0.2408100E+00, 0.2620427E+00, &
     & 0.2894077E+00, 0.3255175E+00, 0.3502207E+00, 0.3502207E+00 /
      data (ref_adm( 6,iz,21,15),iz = 1,20) / &
     & 0.1592700E+00, 0.1592700E+00, 0.1510900E+00, 0.1468000E+00, &
     & 0.1389700E+00, 0.1616800E+00, 0.1540100E+00, 0.1562600E+00, &
     & 0.1600300E+00, 0.1679600E+00, 0.1838200E+00, 0.1981500E+00, &
     & 0.2181600E+00, 0.2281100E+00, 0.2426800E+00, 0.2624604E+00, &
     & 0.2890942E+00, 0.3235675E+00, 0.3474170E+00, 0.3474170E+00 /
      data (ref_adm( 6,iz,22,15),iz = 1,20) / &
     & 0.1416600E+00, 0.1416600E+00, 0.1623400E+00, 0.1462100E+00, &
     & 0.1382800E+00, 0.1542100E+00, 0.1545800E+00, 0.1577400E+00, &
     & 0.1752700E+00, 0.1780500E+00, 0.1842700E+00, 0.1978000E+00, &
     & 0.2189800E+00, 0.2417600E+00, 0.2505500E+00, 0.3101200E+00, &
     & 0.3124533E+00, 0.3464624E+00, 0.3693989E+00, 0.3693989E+00 /
      data (ref_adm( 6,iz,23,15),iz = 1,20) / &
     & 0.1414100E+00, 0.1414100E+00, 0.1538300E+00, 0.1544200E+00, &
     & 0.1525400E+00, 0.1665800E+00, 0.1690200E+00, 0.1622100E+00, &
     & 0.1757300E+00, 0.1798000E+00, 0.2014000E+00, 0.2094500E+00, &
     & 0.2296200E+00, 0.2524200E+00, 0.2612200E+00, 0.2890600E+00, &
     & 0.3133644E+00, 0.3462388E+00, 0.3699830E+00, 0.3699830E+00 /
      data (ref_adm( 6,iz,24,15),iz = 1,20) / &
     & 0.1330300E+00, 0.1330300E+00, 0.1389600E+00, 0.1454200E+00, &
     & 0.1471900E+00, 0.1517100E+00, 0.1575600E+00, 0.1637900E+00, &
     & 0.1675700E+00, 0.1819600E+00, 0.1939800E+00, 0.2026400E+00, &
     & 0.2139900E+00, 0.2365800E+00, 0.2774500E+00, 0.3081700E+00, &
     & 0.3155138E+00, 0.3482253E+00, 0.3732248E+00, 0.3732248E+00 /
      data (ref_adm( 6,iz,25,15),iz = 1,20) / &
     & 0.1469000E+00, 0.1469000E+00, 0.1577000E+00, 0.1606500E+00, &
     & 0.1661400E+00, 0.1698700E+00, 0.1760100E+00, 0.1825000E+00, &
     & 0.1913800E+00, 0.2055100E+00, 0.2157000E+00, 0.2262900E+00, &
     & 0.2350700E+00, 0.2576300E+00, 0.2722500E+00, 0.2862600E+00, &
     & 0.3141200E+00, 0.3515625E+00, 0.3780722E+00, 0.3780722E+00 /
      data (ref_adm( 6,iz,26,15),iz = 1,20) / &
     & 0.1477900E+00, 0.1477900E+00, 0.1431400E+00, 0.1377300E+00, &
     & 0.1452400E+00, 0.1516400E+00, 0.1599900E+00, 0.1607800E+00, &
     & 0.1738400E+00, 0.1836800E+00, 0.2054700E+00, 0.2257900E+00, &
     & 0.2476700E+00, 0.2647700E+00, 0.2954900E+00, 0.3174200E+00, &
     & 0.3199100E+00, 0.3588900E+00, 0.3864208E+00, 0.3864208E+00 /
      data (ref_adm( 6,iz,27,15),iz = 1,20) / &
     & 0.1479000E+00, 0.1479000E+00, 0.1270600E+00, 0.1411200E+00, &
     & 0.1530200E+00, 0.1530500E+00, 0.1626800E+00, 0.1801600E+00, &
     & 0.1816200E+00, 0.1831000E+00, 0.2145500E+00, 0.2264600E+00, &
     & 0.2556700E+00, 0.2742100E+00, 0.2762800E+00, 0.3295700E+00, &
     & 0.3473700E+00, 0.3999300E+00, 0.3974852E+00, 0.3974852E+00 /
      data (ref_adm( 6,iz,28,15),iz = 1,20) / &
     & 0.1448900E+00, 0.1448900E+00, 0.1372200E+00, 0.1387500E+00, &
     & 0.1479700E+00, 0.1503000E+00, 0.1732100E+00, 0.1799500E+00, &
     & 0.1855400E+00, 0.1921700E+00, 0.2160000E+00, 0.2276700E+00, &
     & 0.2632100E+00, 0.2768900E+00, 0.3001800E+00, 0.3324700E+00, &
     & 0.3614300E+00, 0.3751600E+00, 0.4096834E+00, 0.4096834E+00 /
      data (ref_adm( 6,iz,29,15),iz = 1,20) / &
     & 0.1375600E+00, 0.1375600E+00, 0.1474400E+00, 0.1540000E+00, &
     & 0.1533400E+00, 0.1674300E+00, 0.1644900E+00, 0.1757100E+00, &
     & 0.1931700E+00, 0.1999400E+00, 0.2319200E+00, 0.2361400E+00, &
     & 0.2649100E+00, 0.2938200E+00, 0.3117100E+00, 0.3358200E+00, &
     & 0.3906000E+00, 0.3906200E+00, 0.4230004E+00, 0.4230004E+00 /
      data (ref_adm( 6,iz,30,15),iz = 1,20) / &
     & 0.1442400E+00, 0.1442400E+00, 0.1461300E+00, 0.1518700E+00, &
     & 0.1603100E+00, 0.1599200E+00, 0.1713200E+00, 0.1914700E+00, &
     & 0.2168200E+00, 0.2156400E+00, 0.2259600E+00, 0.2636300E+00, &
     & 0.2822600E+00, 0.3081400E+00, 0.3327000E+00, 0.3759700E+00, &
     & 0.4164200E+00, 0.4747400E+00, 0.4375571E+00, 0.4375571E+00 /
      data (ref_adm( 6,iz,31,15),iz = 1,20) / &
     & 0.1497400E+00, 0.1497400E+00, 0.1578900E+00, 0.1515500E+00, &
     & 0.1617500E+00, 0.1823000E+00, 0.1955400E+00, 0.1995500E+00, &
     & 0.2009400E+00, 0.2198200E+00, 0.2264100E+00, 0.2544300E+00, &
     & 0.2858300E+00, 0.3127900E+00, 0.3620200E+00, 0.3951100E+00, &
     & 0.4359700E+00, 0.4368600E+00, 0.4526810E+00, 0.4526810E+00 /
      data (ref_adm( 6,iz,32,15),iz = 1,20) / &
     & 0.1408100E+00, 0.1408100E+00, 0.1592300E+00, 0.1584800E+00, &
     & 0.1726900E+00, 0.1873000E+00, 0.1952800E+00, 0.2001500E+00, &
     & 0.2071900E+00, 0.2265100E+00, 0.2504300E+00, 0.2731000E+00, &
     & 0.2869300E+00, 0.3158900E+00, 0.3578200E+00, 0.4030300E+00, &
     & 0.4309800E+00, 0.4815100E+00, 0.4677646E+00, 0.4677646E+00 /
      data (ref_adm( 6,iz,33,15),iz = 1,20) / &
     & 0.1439900E+00, 0.1439900E+00, 0.1611600E+00, 0.1613700E+00, &
     & 0.1613800E+00, 0.1813300E+00, 0.1916100E+00, 0.2027900E+00, &
     & 0.2162700E+00, 0.2260900E+00, 0.2591500E+00, 0.2829100E+00, &
     & 0.3124100E+00, 0.3534700E+00, 0.3923900E+00, 0.4355400E+00, &
     & 0.4715800E+00, 0.4760200E+00, 0.4539300E+00, 0.4539300E+00 /
      data (ref_adm( 6,iz,34,15),iz = 1,20) / &
     & 0.1499200E+00, 0.1499200E+00, 0.1553900E+00, 0.1626400E+00, &
     & 0.1821900E+00, 0.1917900E+00, 0.1959000E+00, 0.2044000E+00, &
     & 0.2353700E+00, 0.2412400E+00, 0.2619900E+00, 0.2935000E+00, &
     & 0.3057500E+00, 0.3516100E+00, 0.3963000E+00, 0.4228300E+00, &
     & 0.5088200E+00, 0.4750100E+00, 0.4559800E+00, 0.4559800E+00 /
      data (ref_adm( 6,iz,35,15),iz = 1,20) / &
     & 0.1472300E+00, 0.1472300E+00, 0.1492300E+00, 0.1526800E+00, &
     & 0.1665100E+00, 0.1757000E+00, 0.1969200E+00, 0.2180200E+00, &
     & 0.2332200E+00, 0.2493400E+00, 0.2593600E+00, 0.2870200E+00, &
     & 0.3111500E+00, 0.3645900E+00, 0.4178500E+00, 0.4624500E+00, &
     & 0.5041500E+00, 0.5052600E+00, 0.4735400E+00, 0.4735400E+00 /
      data (ref_adm( 6,iz,36,15),iz = 1,20) / &
     & 0.1524600E+00, 0.1524600E+00, 0.1610600E+00, 0.1652100E+00, &
     & 0.1720100E+00, 0.1888100E+00, 0.2077300E+00, 0.2242900E+00, &
     & 0.2388300E+00, 0.2449300E+00, 0.2748300E+00, 0.2930800E+00, &
     & 0.3176200E+00, 0.3617000E+00, 0.4434600E+00, 0.4839700E+00, &
     & 0.5203700E+00, 0.5499800E+00, 0.4585300E+00, 0.4585300E+00 /
      data (ref_adm( 6,iz,37,15),iz = 1,20) / &
     & 0.1603500E+00, 0.1603500E+00, 0.1599600E+00, 0.1657000E+00, &
     & 0.1808700E+00, 0.1973900E+00, 0.2125300E+00, 0.2197600E+00, &
     & 0.2315000E+00, 0.2377000E+00, 0.2693500E+00, 0.2970600E+00, &
     & 0.3339600E+00, 0.3708100E+00, 0.4670200E+00, 0.5132500E+00, &
     & 0.5232100E+00, 0.5405900E+00, 0.4779100E+00, 0.4779100E+00 /
      data (ref_adm( 6,iz,38,15),iz = 1,20) / &
     & 0.1603500E+00, 0.1603500E+00, 0.1599600E+00, 0.1657000E+00, &
     & 0.1808700E+00, 0.1973900E+00, 0.2125300E+00, 0.2197600E+00, &
     & 0.2315000E+00, 0.2377000E+00, 0.2693500E+00, 0.2970600E+00, &
     & 0.3339600E+00, 0.3708100E+00, 0.4670200E+00, 0.5132500E+00, &
     & 0.5232100E+00, 0.5405900E+00, 0.4779100E+00, 0.4779100E+00 /
! Solar Zenith Angle 75.0 Albedo  0.2344770E+00
      data (ref_adm( 6,iz, 1,16),iz = 1,20) / &
     & 0.1416400E+00, 0.1416400E+00, 0.1608200E+00, 0.1376100E+00, &
     & 0.1647200E+00, 0.1461500E+00, 0.1446500E+00, 0.1731400E+00, &
     & 0.1745900E+00, 0.2080500E+00, 0.2959200E+00, 0.2609200E+00, &
     & 0.3490400E+00, 0.3094746E+00, 0.3572900E+00, 0.4473371E+00, &
     & 0.6177053E+00, 0.1210730E+01, 0.2271928E+01, 0.2271928E+01 /
      data (ref_adm( 6,iz, 2,16),iz = 1,20) / &
     & 0.1416400E+00, 0.1416400E+00, 0.1608200E+00, 0.1376100E+00, &
     & 0.1647200E+00, 0.1461500E+00, 0.1446500E+00, 0.1731400E+00, &
     & 0.1745900E+00, 0.2080500E+00, 0.2959200E+00, 0.2609200E+00, &
     & 0.3490400E+00, 0.3094746E+00, 0.3572900E+00, 0.4473371E+00, &
     & 0.6177053E+00, 0.1210730E+01, 0.2271928E+01, 0.2271928E+01 /
      data (ref_adm( 6,iz, 3,16),iz = 1,20) / &
     & 0.1398200E+00, 0.1398200E+00, 0.1302700E+00, 0.1304900E+00, &
     & 0.1243700E+00, 0.1586900E+00, 0.1588900E+00, 0.1684500E+00, &
     & 0.1905300E+00, 0.2000100E+00, 0.2651300E+00, 0.3592100E+00, &
     & 0.3373800E+00, 0.3854100E+00, 0.3560821E+00, 0.4410026E+00, &
     & 0.6003231E+00, 0.1117367E+01, 0.3723181E-07, 0.3723181E-07 /
      data (ref_adm( 6,iz, 4,16),iz = 1,20) / &
     & 0.1542300E+00, 0.1542300E+00, 0.1304300E+00, 0.1286300E+00, &
     & 0.1283100E+00, 0.1517000E+00, 0.1589800E+00, 0.1678400E+00, &
     & 0.1841700E+00, 0.2254800E+00, 0.2737100E+00, 0.3151700E+00, &
     & 0.2700200E+00, 0.3936100E+00, 0.3533098E+00, 0.4300000E+00, &
     & 0.5682029E+00, 0.9671747E+00, 0.2018923E+01, 0.2018923E+01 /
      data (ref_adm( 6,iz, 5,16),iz = 1,20) / &
     & 0.1470600E+00, 0.1470600E+00, 0.1309300E+00, 0.1176700E+00, &
     & 0.1501200E+00, 0.1374700E+00, 0.1476100E+00, 0.1558000E+00, &
     & 0.1700000E+00, 0.2122800E+00, 0.2342900E+00, 0.2497900E+00, &
     & 0.3068000E+00, 0.2524200E+00, 0.3496139E+00, 0.4170074E+00, &
     & 0.5314479E+00, 0.8203818E+00, 0.1449286E+01, 0.1449286E+01 /
      data (ref_adm( 6,iz, 6,16),iz = 1,20) / &
     & 0.1343400E+00, 0.1343400E+00, 0.1214900E+00, 0.1256600E+00, &
     & 0.1180600E+00, 0.1249700E+00, 0.1487300E+00, 0.1580600E+00, &
     & 0.1790900E+00, 0.2139700E+00, 0.2301900E+00, 0.2587000E+00, &
     & 0.2910700E+00, 0.2749800E+00, 0.4905400E+00, 0.5120200E+00, &
     & 0.4973931E+00, 0.7108745E+00, 0.1093334E+01, 0.1093334E+01 /
      data (ref_adm( 6,iz, 7,16),iz = 1,20) / &
     & 0.1459800E+00, 0.1459800E+00, 0.1869500E+00, 0.1287100E+00, &
     & 0.1474500E+00, 0.1380900E+00, 0.1670700E+00, 0.1822200E+00, &
     & 0.1681700E+00, 0.1932500E+00, 0.2219200E+00, 0.2490200E+00, &
     & 0.2955600E+00, 0.2786000E+00, 0.3713000E+00, 0.4830700E+00, &
     & 0.5316100E+00, 0.8961400E+00, 0.8814040E+00, 0.8814040E+00 /
      data (ref_adm( 6,iz, 8,16),iz = 1,20) / &
     & 0.1224100E+00, 0.1224100E+00, 0.1638200E+00, 0.1347500E+00, &
     & 0.1480700E+00, 0.1344200E+00, 0.1291500E+00, 0.1478900E+00, &
     & 0.1798100E+00, 0.1853400E+00, 0.2146900E+00, 0.2631600E+00, &
     & 0.3119900E+00, 0.2905700E+00, 0.4150800E+00, 0.4381800E+00, &
     & 0.4025700E+00, 0.5796835E+00, 0.7543229E+00, 0.7543229E+00 /
      data (ref_adm( 6,iz, 9,16),iz = 1,20) / &
     & 0.1420200E+00, 0.1420200E+00, 0.1392100E+00, 0.1286200E+00, &
     & 0.1382600E+00, 0.1448600E+00, 0.1554700E+00, 0.1598700E+00, &
     & 0.1801100E+00, 0.1768900E+00, 0.2094300E+00, 0.2118900E+00, &
     & 0.2957400E+00, 0.2896800E+00, 0.2991200E+00, 0.4353500E+00, &
     & 0.4271600E+00, 0.5610822E+00, 0.6920871E+00, 0.6920871E+00 /
      data (ref_adm( 6,iz,10,16),iz = 1,20) / &
     & 0.1494800E+00, 0.1494800E+00, 0.1601800E+00, 0.1298200E+00, &
     & 0.1393900E+00, 0.1385700E+00, 0.1545600E+00, 0.1477200E+00, &
     & 0.1672200E+00, 0.1623600E+00, 0.1856500E+00, 0.1625300E+00, &
     & 0.2599400E+00, 0.2828900E+00, 0.3491600E+00, 0.4741300E+00, &
     & 0.4028200E+00, 0.4224400E+00, 0.3767800E+00, 0.3767800E+00 /
      data (ref_adm( 6,iz,11,16),iz = 1,20) / &
     & 0.1496400E+00, 0.1496400E+00, 0.1411900E+00, 0.1491300E+00, &
     & 0.1503400E+00, 0.1447400E+00, 0.1862000E+00, 0.1774800E+00, &
     & 0.1744900E+00, 0.1668400E+00, 0.1799100E+00, 0.2001800E+00, &
     & 0.2545100E+00, 0.2798900E+00, 0.3117500E+00, 0.3588900E+00, &
     & 0.4339200E+00, 0.4966512E+00, 0.6072649E+00, 0.6072649E+00 /
      data (ref_adm( 6,iz,12,16),iz = 1,20) / &
     & 0.1371200E+00, 0.1371200E+00, 0.1447500E+00, 0.1387600E+00, &
     & 0.1482000E+00, 0.1447400E+00, 0.1554300E+00, 0.1619900E+00, &
     & 0.1685800E+00, 0.1614400E+00, 0.1640700E+00, 0.2173500E+00, &
     & 0.2521100E+00, 0.2613100E+00, 0.3215600E+00, 0.4032100E+00, &
     & 0.4778200E+00, 0.4743742E+00, 0.5688629E+00, 0.5688629E+00 /
      data (ref_adm( 6,iz,13,16),iz = 1,20) / &
     & 0.1261900E+00, 0.1261900E+00, 0.1712900E+00, 0.1519700E+00, &
     & 0.1499300E+00, 0.1737200E+00, 0.1466800E+00, 0.1639800E+00, &
     & 0.1497200E+00, 0.1511400E+00, 0.1922800E+00, 0.2000400E+00, &
     & 0.2207700E+00, 0.2495400E+00, 0.2647500E+00, 0.3134100E+00, &
     & 0.3678800E+00, 0.4579954E+00, 0.5418868E+00, 0.5418868E+00 /
      data (ref_adm( 6,iz,14,16),iz = 1,20) / &
     & 0.1437500E+00, 0.1437500E+00, 0.1450800E+00, 0.1277800E+00, &
     & 0.1299600E+00, 0.1363200E+00, 0.1435000E+00, 0.1485000E+00, &
     & 0.1438100E+00, 0.1513500E+00, 0.1799300E+00, 0.1886500E+00, &
     & 0.2049500E+00, 0.2303000E+00, 0.2417700E+00, 0.2870400E+00, &
     & 0.4400800E+00, 0.4461787E+00, 0.5225924E+00, 0.5225924E+00 /
      data (ref_adm( 6,iz,15,16),iz = 1,20) / &
     & 0.1432900E+00, 0.1432900E+00, 0.1388900E+00, 0.1358800E+00, &
     & 0.1313300E+00, 0.1428200E+00, 0.1439100E+00, 0.1459100E+00, &
     & 0.1619600E+00, 0.1662800E+00, 0.1784600E+00, 0.1924400E+00, &
     & 0.2064300E+00, 0.2338100E+00, 0.2416500E+00, 0.2751400E+00, &
     & 0.3936000E+00, 0.4358143E+00, 0.5067704E+00, 0.5067704E+00 /
      data (ref_adm( 6,iz,16,16),iz = 1,20) / &
     & 0.1268300E+00, 0.1268300E+00, 0.1371500E+00, 0.1372100E+00, &
     & 0.1404200E+00, 0.1406300E+00, 0.1517900E+00, 0.1562900E+00, &
     & 0.1588500E+00, 0.1646100E+00, 0.1762900E+00, 0.1928900E+00, &
     & 0.2077900E+00, 0.2286000E+00, 0.2438200E+00, 0.2911500E+00, &
     & 0.3555135E+00, 0.4235825E+00, 0.4911546E+00, 0.4911546E+00 /
      data (ref_adm( 6,iz,17,16),iz = 1,20) / &
     & 0.1367100E+00, 0.1367100E+00, 0.1300900E+00, 0.1346200E+00, &
     & 0.1288100E+00, 0.1505200E+00, 0.1410900E+00, 0.1472800E+00, &
     & 0.1771300E+00, 0.1578400E+00, 0.1801800E+00, 0.1611700E+00, &
     & 0.1949500E+00, 0.2351000E+00, 0.2546200E+00, 0.3108400E+00, &
     & 0.3479796E+00, 0.4123137E+00, 0.4740093E+00, 0.4740093E+00 /
      data (ref_adm( 6,iz,18,16),iz = 1,20) / &
     & 0.1431600E+00, 0.1431600E+00, 0.1233100E+00, 0.1284900E+00, &
     & 0.1140600E+00, 0.1523100E+00, 0.1483900E+00, 0.1561500E+00, &
     & 0.1476500E+00, 0.1605600E+00, 0.1747900E+00, 0.1576700E+00, &
     & 0.1987200E+00, 0.2460500E+00, 0.2718300E+00, 0.3034200E+00, &
     & 0.2910566E+00, 0.3306039E+00, 0.3598652E+00, 0.3598652E+00 /
      data (ref_adm( 6,iz,19,16),iz = 1,20) / &
     & 0.1118900E+00, 0.1118900E+00, 0.1287200E+00, 0.1219800E+00, &
     & 0.1573300E+00, 0.1472300E+00, 0.1471100E+00, 0.1631100E+00, &
     & 0.1467500E+00, 0.1502300E+00, 0.1882500E+00, 0.1880000E+00, &
     & 0.2148900E+00, 0.2234500E+00, 0.2530700E+00, 0.3024800E+00, &
     & 0.2886718E+00, 0.3258545E+00, 0.3521144E+00, 0.3521144E+00 /
      data (ref_adm( 6,iz,20,16),iz = 1,20) / &
     & 0.1421400E+00, 0.1421400E+00, 0.1345600E+00, 0.1406100E+00, &
     & 0.1377700E+00, 0.1432500E+00, 0.1447700E+00, 0.1589300E+00, &
     & 0.1479800E+00, 0.1536800E+00, 0.1907500E+00, 0.2025300E+00, &
     & 0.1941500E+00, 0.2482000E+00, 0.2598500E+00, 0.2601046E+00, &
     & 0.2872672E+00, 0.3231100E+00, 0.3476304E+00, 0.3476304E+00 /
      data (ref_adm( 6,iz,21,16),iz = 1,20) / &
     & 0.1312500E+00, 0.1312500E+00, 0.1242300E+00, 0.1327100E+00, &
     & 0.1328900E+00, 0.1284900E+00, 0.1589000E+00, 0.1588200E+00, &
     & 0.1688700E+00, 0.1938900E+00, 0.1702000E+00, 0.2078300E+00, &
     & 0.2313900E+00, 0.2445400E+00, 0.2652500E+00, 0.2605193E+00, &
     & 0.2869561E+00, 0.3211744E+00, 0.3448475E+00, 0.3448475E+00 /
      data (ref_adm( 6,iz,22,16),iz = 1,20) / &
     & 0.1432700E+00, 0.1432700E+00, 0.1466500E+00, 0.1341300E+00, &
     & 0.1425800E+00, 0.1541100E+00, 0.1554400E+00, 0.1501600E+00, &
     & 0.1745500E+00, 0.1883100E+00, 0.1834400E+00, 0.2172700E+00, &
     & 0.2191100E+00, 0.2430300E+00, 0.2728700E+00, 0.3057713E+00, &
     & 0.3448747E+00, 0.3993641E+00, 0.4511424E+00, 0.4511424E+00 /
      data (ref_adm( 6,iz,23,16),iz = 1,20) / &
     & 0.1476200E+00, 0.1476200E+00, 0.1457600E+00, 0.1519500E+00, &
     & 0.1530400E+00, 0.1543300E+00, 0.1591500E+00, 0.1502000E+00, &
     & 0.1622000E+00, 0.1660400E+00, 0.1825100E+00, 0.2061200E+00, &
     & 0.2407700E+00, 0.2575600E+00, 0.2738500E+00, 0.2924000E+00, &
     & 0.3468096E+00, 0.3999272E+00, 0.4519572E+00, 0.4519572E+00 /
      data (ref_adm( 6,iz,24,16),iz = 1,20) / &
     & 0.1284200E+00, 0.1284200E+00, 0.1329600E+00, 0.1470900E+00, &
     & 0.1456900E+00, 0.1504000E+00, 0.1578100E+00, 0.1602600E+00, &
     & 0.1640600E+00, 0.1795100E+00, 0.1897300E+00, 0.1988900E+00, &
     & 0.2223200E+00, 0.2362200E+00, 0.2741500E+00, 0.3066500E+00, &
     & 0.3503346E+00, 0.4031277E+00, 0.4565588E+00, 0.4565588E+00 /
      data (ref_adm( 6,iz,25,16),iz = 1,20) / &
     & 0.1348100E+00, 0.1348100E+00, 0.1357400E+00, 0.1376300E+00, &
     & 0.1380900E+00, 0.1424400E+00, 0.1526900E+00, 0.1656600E+00, &
     & 0.1763100E+00, 0.1868800E+00, 0.2033700E+00, 0.2310300E+00, &
     & 0.2591000E+00, 0.2850300E+00, 0.3083600E+00, 0.3149700E+00, &
     & 0.3560361E+00, 0.4083765E+00, 0.4635348E+00, 0.4635348E+00 /
      data (ref_adm( 6,iz,26,16),iz = 1,20) / &
     & 0.1285200E+00, 0.1285200E+00, 0.1384200E+00, 0.1378000E+00, &
     & 0.1454300E+00, 0.1520300E+00, 0.1520800E+00, 0.1582300E+00, &
     & 0.1739100E+00, 0.1754400E+00, 0.1982300E+00, 0.2332300E+00, &
     & 0.2289500E+00, 0.2704300E+00, 0.2981800E+00, 0.3422000E+00, &
     & 0.4131200E+00, 0.4170544E+00, 0.4757357E+00, 0.4757357E+00 /
      data (ref_adm( 6,iz,27,16),iz = 1,20) / &
     & 0.1370700E+00, 0.1370700E+00, 0.1431700E+00, 0.1436300E+00, &
     & 0.1569700E+00, 0.1570600E+00, 0.1741800E+00, 0.1553700E+00, &
     & 0.1670300E+00, 0.1711400E+00, 0.2090000E+00, 0.2317000E+00, &
     & 0.2488000E+00, 0.2903800E+00, 0.3286300E+00, 0.3514400E+00, &
     & 0.4240200E+00, 0.4691700E+00, 0.4911667E+00, 0.4911667E+00 /
      data (ref_adm( 6,iz,28,16),iz = 1,20) / &
     & 0.1341800E+00, 0.1341800E+00, 0.1359900E+00, 0.1271700E+00, &
     & 0.1441100E+00, 0.1538700E+00, 0.1488800E+00, 0.1917100E+00, &
     & 0.1781800E+00, 0.2049100E+00, 0.2007600E+00, 0.2354000E+00, &
     & 0.2661500E+00, 0.3212100E+00, 0.3330200E+00, 0.3916500E+00, &
     & 0.4199000E+00, 0.4403791E+00, 0.5079497E+00, 0.5079497E+00 /
      data (ref_adm( 6,iz,29,16),iz = 1,20) / &
     & 0.1235900E+00, 0.1235900E+00, 0.1342700E+00, 0.1429800E+00, &
     & 0.1340900E+00, 0.1538100E+00, 0.1530400E+00, 0.2472400E+00, &
     & 0.1985500E+00, 0.2073200E+00, 0.2126300E+00, 0.2382800E+00, &
     & 0.2542100E+00, 0.2846000E+00, 0.3545600E+00, 0.3690600E+00, &
     & 0.4004400E+00, 0.4550378E+00, 0.5275138E+00, 0.5275138E+00 /
      data (ref_adm( 6,iz,30,16),iz = 1,20) / &
     & 0.1288100E+00, 0.1288100E+00, 0.1293300E+00, 0.1290000E+00, &
     & 0.1339600E+00, 0.1531900E+00, 0.1669200E+00, 0.1828000E+00, &
     & 0.1982300E+00, 0.1876900E+00, 0.2212700E+00, 0.2405000E+00, &
     & 0.2821500E+00, 0.3106500E+00, 0.3459600E+00, 0.4359500E+00, &
     & 0.4702000E+00, 0.4710067E+00, 0.5479084E+00, 0.5479084E+00 /
      data (ref_adm( 6,iz,31,16),iz = 1,20) / &
     & 0.1384000E+00, 0.1384000E+00, 0.1513000E+00, 0.1272400E+00, &
     & 0.1387400E+00, 0.1552900E+00, 0.1811900E+00, 0.1902900E+00, &
     & 0.2054400E+00, 0.2157900E+00, 0.2365000E+00, 0.2371200E+00, &
     & 0.2897900E+00, 0.3377600E+00, 0.3681900E+00, 0.4393600E+00, &
     & 0.4968300E+00, 0.5435100E+00, 0.5699556E+00, 0.5699556E+00 /
      data (ref_adm( 6,iz,32,16),iz = 1,20) / &
     & 0.1238600E+00, 0.1238600E+00, 0.1337800E+00, 0.1462900E+00, &
     & 0.1732800E+00, 0.1600400E+00, 0.1665300E+00, 0.1901200E+00, &
     & 0.2459500E+00, 0.2239300E+00, 0.2507200E+00, 0.2545200E+00, &
     & 0.2935800E+00, 0.3491700E+00, 0.3594500E+00, 0.3846900E+00, &
     & 0.4371332E+00, 0.5374600E+00, 0.4567600E+00, 0.4567600E+00 /
      data (ref_adm( 6,iz,33,16),iz = 1,20) / &
     & 0.1263100E+00, 0.1263100E+00, 0.1468400E+00, 0.1361900E+00, &
     & 0.1486100E+00, 0.1574100E+00, 0.1671200E+00, 0.1982500E+00, &
     & 0.2171500E+00, 0.2392200E+00, 0.2542000E+00, 0.2701200E+00, &
     & 0.3008500E+00, 0.3505500E+00, 0.3852200E+00, 0.4496000E+00, &
     & 0.5130700E+00, 0.5186971E+00, 0.6104794E+00, 0.6104794E+00 /
      data (ref_adm( 6,iz,34,16),iz = 1,20) / &
     & 0.1418800E+00, 0.1418800E+00, 0.1355700E+00, 0.1373500E+00, &
     & 0.1491900E+00, 0.1526400E+00, 0.1596500E+00, 0.1984400E+00, &
     & 0.1796200E+00, 0.2326700E+00, 0.2561800E+00, 0.2646900E+00, &
     & 0.3060600E+00, 0.3643400E+00, 0.3835000E+00, 0.5397800E+00, &
     & 0.5392300E+00, 0.5230482E+00, 0.6249567E+00, 0.6249567E+00 /
      data (ref_adm( 6,iz,35,16),iz = 1,20) / &
     & 0.1366400E+00, 0.1366400E+00, 0.1412200E+00, 0.1241700E+00, &
     & 0.1584400E+00, 0.1685700E+00, 0.1779200E+00, 0.1910300E+00, &
     & 0.2138700E+00, 0.2311500E+00, 0.2662900E+00, 0.2954700E+00, &
     & 0.3288400E+00, 0.3882400E+00, 0.4455100E+00, 0.4938500E+00, &
     & 0.5418800E+00, 0.5867700E+00, 0.6303735E+00, 0.6303735E+00 /
      data (ref_adm( 6,iz,36,16),iz = 1,20) / &
     & 0.1412700E+00, 0.1412700E+00, 0.1606800E+00, 0.1662500E+00, &
     & 0.1641600E+00, 0.1687800E+00, 0.1906100E+00, 0.1800400E+00, &
     & 0.2106800E+00, 0.2133900E+00, 0.2515000E+00, 0.2868300E+00, &
     & 0.3308100E+00, 0.3915100E+00, 0.4448800E+00, 0.5089100E+00, &
     & 0.5695600E+00, 0.6275000E+00, 0.6308196E+00, 0.6308196E+00 /
      data (ref_adm( 6,iz,37,16),iz = 1,20) / &
     & 0.1387500E+00, 0.1387500E+00, 0.1593400E+00, 0.1411700E+00, &
     & 0.1414700E+00, 0.1516100E+00, 0.1727700E+00, 0.1818900E+00, &
     & 0.2013100E+00, 0.2290900E+00, 0.2566100E+00, 0.2866900E+00, &
     & 0.3367700E+00, 0.3745800E+00, 0.4468600E+00, 0.5302600E+00, &
     & 0.5972200E+00, 0.6826300E+00, 0.5471600E+00, 0.5471600E+00 /
      data (ref_adm( 6,iz,38,16),iz = 1,20) / &
     & 0.1387500E+00, 0.1387500E+00, 0.1593400E+00, 0.1411700E+00, &
     & 0.1414700E+00, 0.1516100E+00, 0.1727700E+00, 0.1818900E+00, &
     & 0.2013100E+00, 0.2290900E+00, 0.2566100E+00, 0.2866900E+00, &
     & 0.3367700E+00, 0.3745800E+00, 0.4468600E+00, 0.5302600E+00, &
     & 0.5972200E+00, 0.6826300E+00, 0.5471600E+00, 0.5471600E+00 /
! Solar Zenith Angle 80.0 Albedo  0.2719812E+00
      data (ref_adm( 6,iz, 1,17),iz = 1,20) / &
     & 0.1521200E+00, 0.1521200E+00, 0.1560800E+00, 0.1557800E+00, &
     & 0.1680900E+00, 0.1645600E+00, 0.1617200E+00, 0.2176100E+00, &
     & 0.2350200E+00, 0.2599000E+00, 0.3008900E+00, 0.3124300E+00, &
     & 0.3377979E+00, 0.3789263E+00, 0.4623597E+00, 0.6517411E+00, &
     & 0.1091354E+01, 0.2111373E+01, 0.1659699E+01, 0.1659699E+01 /
      data (ref_adm( 6,iz, 2,17),iz = 1,20) / &
     & 0.1521200E+00, 0.1521200E+00, 0.1560800E+00, 0.1557800E+00, &
     & 0.1680900E+00, 0.1645600E+00, 0.1617200E+00, 0.2176100E+00, &
     & 0.2350200E+00, 0.2599000E+00, 0.3008900E+00, 0.3124300E+00, &
     & 0.3377979E+00, 0.3789263E+00, 0.4623597E+00, 0.6517411E+00, &
     & 0.1091354E+01, 0.2111373E+01, 0.1659699E+01, 0.1659699E+01 /
      data (ref_adm( 6,iz, 3,17),iz = 1,20) / &
     & 0.1564000E+00, 0.1564000E+00, 0.1319000E+00, 0.1491600E+00, &
     & 0.1427400E+00, 0.1541700E+00, 0.1999900E+00, 0.2178800E+00, &
     & 0.2153000E+00, 0.2378900E+00, 0.3584500E+00, 0.3538700E+00, &
     & 0.3361467E+00, 0.3775688E+00, 0.4567262E+00, 0.6350585E+00, &
     & 0.1021211E+01, 0.2232241E+01, 0.2697447E-07, 0.2697447E-07 /
      data (ref_adm( 6,iz, 4,17),iz = 1,20) / &
     & 0.1435000E+00, 0.1435000E+00, 0.1578700E+00, 0.1681400E+00, &
     & 0.1509400E+00, 0.2011300E+00, 0.1781400E+00, 0.1608500E+00, &
     & 0.1833200E+00, 0.3036800E+00, 0.2840000E+00, 0.3121700E+00, &
     & 0.3321889E+00, 0.3753302E+00, 0.4457120E+00, 0.6009387E+00, &
     & 0.9009715E+00, 0.2022892E+01, 0.2545621E+01, 0.2545621E+01 /
      data (ref_adm( 6,iz, 5,17),iz = 1,20) / &
     & 0.1572000E+00, 0.1572000E+00, 0.1586750E+00, 0.2061500E+00, &
     & 0.1729800E+00, 0.1491000E+00, 0.1921500E+00, 0.1631000E+00, &
     & 0.2096242E+00, 0.2259468E+00, 0.2164900E+00, 0.2950600E+00, &
     & 0.3263513E+00, 0.3721906E+00, 0.4336824E+00, 0.5612732E+00, &
     & 0.7865836E+00, 0.1468517E+01, 0.3085779E+01, 0.3085779E+01 /
      data (ref_adm( 6,iz, 6,17),iz = 1,20) / &
     & 0.1587900E+00, 0.1587900E+00, 0.1858600E+00, 0.1955000E+00, &
     & 0.1673000E+00, 0.1897200E+00, 0.1455100E+00, 0.1950243E+00, &
     & 0.2651400E+00, 0.2106900E+00, 0.2704400E+00, 0.2759143E+00, &
     & 0.3234600E+00, 0.2815300E+00, 0.4246987E+00, 0.5251203E+00, &
     & 0.6975847E+00, 0.1112996E+01, 0.1963217E+01, 0.1963217E+01 /
      data (ref_adm( 6,iz, 7,17),iz = 1,20) / &
     & 0.1523700E+00, 0.1523700E+00, 0.1481800E+00, 0.1624900E+00, &
     & 0.1576600E+00, 0.2880200E+00, 0.1980000E+00, 0.1939532E+00, &
     & 0.1598200E+00, 0.2206700E+00, 0.2416650E+00, 0.3922700E+00, &
     & 0.3715400E+00, 0.3684000E+00, 0.5846600E+00, 0.4995394E+00, &
     & 0.1074500E+01, 0.8229500E+00, 0.1375822E+01, 0.1375822E+01 /
      data (ref_adm( 6,iz, 8,17),iz = 1,20) / &
     & 0.1685500E+00, 0.1685500E+00, 0.1602900E+00, 0.1556000E+00, &
     & 0.1593100E+00, 0.1655100E+00, 0.1732400E+00, 0.2233400E+00, &
     & 0.2172800E+00, 0.3502100E+00, 0.2392672E+00, 0.3242000E+00, &
     & 0.3927800E+00, 0.4652300E+00, 0.5464900E+00, 0.7758000E+00, &
     & 0.9007000E+00, 0.7860032E+00, 0.1104865E+01, 0.1104865E+01 /
      data (ref_adm( 6,iz, 9,17),iz = 1,20) / &
     & 0.1058500E+00, 0.1058500E+00, 0.1535000E+00, 0.1711800E+00, &
     & 0.2273500E+00, 0.1598400E+00, 0.1394900E+00, 0.1521400E+00, &
     & 0.1925100E+00, 0.2321600E+00, 0.2338600E+00, 0.2734000E+00, &
     & 0.3123400E+00, 0.3312182E+00, 0.3849893E+00, 0.7480600E+00, &
     & 0.9347000E+00, 0.7250782E+00, 0.9546560E+00, 0.9546560E+00 /
      data (ref_adm( 6,iz,10,17),iz = 1,20) / &
     & 0.1676300E+00, 0.1676300E+00, 0.1805300E+00, 0.1599100E+00, &
     & 0.1686100E+00, 0.1439300E+00, 0.1583100E+00, 0.1649400E+00, &
     & 0.2071100E+00, 0.2171367E+00, 0.2895700E+00, 0.2557400E+00, &
     & 0.3906000E+00, 0.3233710E+00, 0.4282300E+00, 0.4340400E+00, &
     & 0.5389991E+00, 0.6982729E+00, 0.9068868E+00, 0.9068868E+00 /
      data (ref_adm( 6,iz,11,17),iz = 1,20) / &
     & 0.1510800E+00, 0.1510800E+00, 0.1506800E+00, 0.1352600E+00, &
     & 0.1508500E+00, 0.1453600E+00, 0.1688500E+00, 0.1998000E+00, &
     & 0.1979400E+00, 0.2143492E+00, 0.2577200E+00, 0.2392000E+00, &
     & 0.2867555E+00, 0.3159896E+00, 0.3609700E+00, 0.4984700E+00, &
     & 0.5091521E+00, 0.6467743E+00, 0.8347476E+00, 0.8347476E+00 /
      data (ref_adm( 6,iz,12,17),iz = 1,20) / &
     & 0.1331400E+00, 0.1331400E+00, 0.1383800E+00, 0.1526700E+00, &
     & 0.1500000E+00, 0.1702344E+00, 0.2137700E+00, 0.1638900E+00, &
     & 0.1724100E+00, 0.2325000E+00, 0.2274400E+00, 0.2479300E+00, &
     & 0.2623600E+00, 0.2120200E+00, 0.3069700E+00, 0.4127862E+00, &
     & 0.4880978E+00, 0.6100022E+00, 0.7698136E+00, 0.7698136E+00 /
      data (ref_adm( 6,iz,13,17),iz = 1,20) / &
     & 0.1359600E+00, 0.1359600E+00, 0.1538900E+00, 0.1607868E+00, &
     & 0.1512300E+00, 0.1462200E+00, 0.1667200E+00, 0.1666600E+00, &
     & 0.2357400E+00, 0.2171700E+00, 0.2075400E+00, 0.2390000E+00, &
     & 0.2259600E+00, 0.2798900E+00, 0.3804600E+00, 0.5163100E+00, &
     & 0.4726937E+00, 0.5842608E+00, 0.7272252E+00, 0.7272252E+00 /
      data (ref_adm( 6,iz,14,17),iz = 1,20) / &
     & 0.1511400E+00, 0.1511400E+00, 0.1452800E+00, 0.1496700E+00, &
     & 0.1536100E+00, 0.1530600E+00, 0.1759206E+00, 0.1431000E+00, &
     & 0.1944636E+00, 0.1732600E+00, 0.2308000E+00, 0.2227300E+00, &
     & 0.2220700E+00, 0.2773900E+00, 0.2661500E+00, 0.3933638E+00, &
     & 0.4609680E+00, 0.5667418E+00, 0.6975054E+00, 0.6975054E+00 /
      data (ref_adm( 6,iz,15,17),iz = 1,20) / &
     & 0.1387200E+00, 0.1387200E+00, 0.1502900E+00, 0.1520900E+00, &
     & 0.1507300E+00, 0.1630700E+00, 0.1587600E+00, 0.1522800E+00, &
     & 0.1663100E+00, 0.1944100E+00, 0.1948200E+00, 0.2082700E+00, &
     & 0.2221700E+00, 0.2601500E+00, 0.2418700E+00, 0.2603900E+00, &
     & 0.4502764E+00, 0.5523101E+00, 0.6741842E+00, 0.6741842E+00 /
      data (ref_adm( 6,iz,16,17),iz = 1,20) / &
     & 0.1447200E+00, 0.1447200E+00, 0.1457100E+00, 0.1425200E+00, &
     & 0.1429400E+00, 0.1536700E+00, 0.1551200E+00, 0.1622200E+00, &
     & 0.1656400E+00, 0.1839500E+00, 0.1923300E+00, 0.2031800E+00, &
     & 0.2295200E+00, 0.2509000E+00, 0.3230008E+00, 0.2728800E+00, &
     & 0.4381364E+00, 0.5368297E+00, 0.6523081E+00, 0.6523081E+00 /
      data (ref_adm( 6,iz,17,17),iz = 1,20) / &
     & 0.1393100E+00, 0.1393100E+00, 0.1308300E+00, 0.1358500E+00, &
     & 0.1500600E+00, 0.1632500E+00, 0.1834100E+00, 0.1614100E+00, &
     & 0.1940800E+00, 0.1785500E+00, 0.1773100E+00, 0.1859500E+00, &
     & 0.2000100E+00, 0.2514900E+00, 0.2726000E+00, 0.3670607E+00, &
     & 0.4273350E+00, 0.5204553E+00, 0.6280550E+00, 0.6280550E+00 /
      data (ref_adm( 6,iz,18,17),iz = 1,20) / &
     & 0.1449700E+00, 0.1449700E+00, 0.1428200E+00, 0.1561900E+00, &
     & 0.1304800E+00, 0.1593019E+00, 0.1586800E+00, 0.2061600E+00, &
     & 0.2000400E+00, 0.1898800E+00, 0.1912800E+00, 0.2001000E+00, &
     & 0.2047500E+00, 0.2310600E+00, 0.2673900E+00, 0.2972845E+00, &
     & 0.3338959E+00, 0.3854443E+00, 0.4277665E+00, 0.4277665E+00 /
      data (ref_adm( 6,iz,19,17),iz = 1,20) / &
     & 0.1290800E+00, 0.1290800E+00, 0.1622800E+00, 0.1360500E+00, &
     & 0.1443500E+00, 0.1722600E+00, 0.1499900E+00, 0.1993100E+00, &
     & 0.1429500E+00, 0.1802300E+00, 0.1572000E+00, 0.1828300E+00, &
     & 0.2110300E+00, 0.2422400E+00, 0.2637620E+00, 0.2951587E+00, &
     & 0.3303841E+00, 0.3789922E+00, 0.4176581E+00, 0.4176581E+00 /
      data (ref_adm( 6,iz,20,17),iz = 1,20) / &
     & 0.1455600E+00, 0.1455600E+00, 0.2253400E+00, 0.1550400E+00, &
     & 0.1555500E+00, 0.1490200E+00, 0.1611700E+00, 0.1446500E+00, &
     & 0.1627600E+00, 0.1803900E+00, 0.1673000E+00, 0.2257600E+00, &
     & 0.2283800E+00, 0.2273400E+00, 0.2634228E+00, 0.2940069E+00, &
     & 0.3285560E+00, 0.3752781E+00, 0.4118790E+00, 0.4118790E+00 /
      data (ref_adm( 6,iz,21,17),iz = 1,20) / &
     & 0.1382800E+00, 0.1382800E+00, 0.1843200E+00, 0.1587900E+00, &
     & 0.1563700E+00, 0.1763000E+00, 0.2207800E+00, 0.2048800E+00, &
     & 0.1830200E+00, 0.1691300E+00, 0.1893000E+00, 0.2119900E+00, &
     & 0.2371400E+00, 0.2511500E+00, 0.2732500E+00, 0.2940793E+00, &
     & 0.3275910E+00, 0.3726157E+00, 0.4081807E+00, 0.4081807E+00 /
      data (ref_adm( 6,iz,22,17),iz = 1,20) / &
     & 0.1343700E+00, 0.1343700E+00, 0.1537700E+00, 0.1218100E+00, &
     & 0.1608500E+00, 0.1379600E+00, 0.1772500E+00, 0.1602000E+00, &
     & 0.1697700E+00, 0.2128000E+00, 0.2371300E+00, 0.2546100E+00, &
     & 0.2538900E+00, 0.2673900E+00, 0.2925900E+00, 0.3663085E+00, &
     & 0.4271721E+00, 0.5225945E+00, 0.6557060E+00, 0.6557060E+00 /
      data (ref_adm( 6,iz,23,17),iz = 1,20) / &
     & 0.1535500E+00, 0.1535500E+00, 0.1426000E+00, 0.1478800E+00, &
     & 0.1564000E+00, 0.1713000E+00, 0.1810800E+00, 0.1798000E+00, &
     & 0.1873800E+00, 0.1907000E+00, 0.2117800E+00, 0.2323500E+00, &
     & 0.2452300E+00, 0.2808200E+00, 0.3173900E+00, 0.3678198E+00, &
     & 0.4282220E+00, 0.5223024E+00, 0.6573043E+00, 0.6573043E+00 /
      data (ref_adm( 6,iz,24,17),iz = 1,20) / &
     & 0.1413900E+00, 0.1413900E+00, 0.1430800E+00, 0.1428600E+00, &
     & 0.1532100E+00, 0.1572600E+00, 0.1607200E+00, 0.1812200E+00, &
     & 0.1812300E+00, 0.2061800E+00, 0.1932300E+00, 0.2162100E+00, &
     & 0.2260200E+00, 0.2497900E+00, 0.2846200E+00, 0.3413800E+00, &
     & 0.4320526E+00, 0.5261433E+00, 0.6652625E+00, 0.6652625E+00 /
      data (ref_adm( 6,iz,25,17),iz = 1,20) / &
     & 0.1408900E+00, 0.1408900E+00, 0.1608900E+00, 0.1475600E+00, &
     & 0.1439800E+00, 0.1901300E+00, 0.1738700E+00, 0.2213900E+00, &
     & 0.2090300E+00, 0.2829200E+00, 0.2121400E+00, 0.2393600E+00, &
     & 0.2248300E+00, 0.2771900E+00, 0.3081300E+00, 0.3767566E+00, &
     & 0.4382265E+00, 0.5327791E+00, 0.6775367E+00, 0.6775367E+00 /
      data (ref_adm( 6,iz,26,17),iz = 1,20) / &
     & 0.1501600E+00, 0.1501600E+00, 0.1590135E+00, 0.1763800E+00, &
     & 0.1746200E+00, 0.1503300E+00, 0.4255800E+00, 0.1761300E+00, &
     & 0.1810200E+00, 0.2150600E+00, 0.2189100E+00, 0.2598400E+00, &
     & 0.2372700E+00, 0.3064200E+00, 0.3223400E+00, 0.3636400E+00, &
     & 0.4032800E+00, 0.5449201E+00, 0.6985561E+00, 0.6985561E+00 /
      data (ref_adm( 6,iz,27,17),iz = 1,20) / &
     & 0.1756600E+00, 0.1756600E+00, 0.1362700E+00, 0.1470800E+00, &
     & 0.1607100E+00, 0.1531300E+00, 0.1525600E+00, 0.1630200E+00, &
     & 0.1738300E+00, 0.2242700E+00, 0.1975900E+00, 0.2271100E+00, &
     & 0.2447600E+00, 0.3167200E+00, 0.3277400E+00, 0.3948584E+00, &
     & 0.4599874E+00, 0.5602445E+00, 0.7248326E+00, 0.7248326E+00 /
      data (ref_adm( 6,iz,28,17),iz = 1,20) / &
     & 0.1281100E+00, 0.1281100E+00, 0.1503600E+00, 0.1563600E+00, &
     & 0.2048600E+00, 0.1719900E+00, 0.1429800E+00, 0.1878800E+00, &
     & 0.1667900E+00, 0.2536600E+00, 0.2211500E+00, 0.2056900E+00, &
     & 0.2510400E+00, 0.3500300E+00, 0.3836700E+00, 0.4280700E+00, &
     & 0.4724100E+00, 0.6377800E+00, 0.7531293E+00, 0.7531293E+00 /
      data (ref_adm( 6,iz,29,17),iz = 1,20) / &
     & 0.1440700E+00, 0.1440700E+00, 0.1360000E+00, 0.9520700E-01, &
     & 0.1419800E+00, 0.1810300E+00, 0.1738100E+00, 0.2975800E+00, &
     & 0.1918300E+00, 0.2082000E+00, 0.2049400E+00, 0.2580700E+00, &
     & 0.2727600E+00, 0.3381900E+00, 0.3584600E+00, 0.4625200E+00, &
     & 0.4898508E+00, 0.5985299E+00, 0.7862265E+00, 0.7862265E+00 /
      data (ref_adm( 6,iz,30,17),iz = 1,20) / &
     & 0.1709100E+00, 0.1709100E+00, 0.1475300E+00, 0.1426100E+00, &
     & 0.9795000E-01, 0.1447200E+00, 0.1888900E+00, 0.1947056E+00, &
     & 0.2112700E+00, 0.2073900E+00, 0.2658200E+00, 0.2405800E+00, &
     & 0.2657300E+00, 0.3285075E+00, 0.3718917E+00, 0.4452500E+00, &
     & 0.5077376E+00, 0.6222906E+00, 0.8218710E+00, 0.8218710E+00 /
      data (ref_adm( 6,iz,31,17),iz = 1,20) / &
     & 0.1918600E+00, 0.1918600E+00, 0.1370400E+00, 0.1558600E+00, &
     & 0.1283200E+00, 0.1427700E+00, 0.1778700E+00, 0.2160700E+00, &
     & 0.2661100E+00, 0.2335400E+00, 0.2206600E+00, 0.2547200E+00, &
     & 0.3069247E+00, 0.3300100E+00, 0.3943700E+00, 0.4335900E+00, &
     & 0.5260177E+00, 0.6466630E+00, 0.8590098E+00, 0.8590098E+00 /
      data (ref_adm( 6,iz,32,17),iz = 1,20) / &
     & 0.1368000E+00, 0.1368000E+00, 0.1246300E+00, 0.1729200E+00, &
     & 0.1674300E+00, 0.1749200E+00, 0.1727100E+00, 0.2079700E+00, &
     & 0.1862100E+00, 0.2517300E+00, 0.2429500E+00, 0.2818200E+00, &
     & 0.3056900E+00, 0.3280300E+00, 0.4317300E+00, 0.5298200E+00, &
     & 0.5435185E+00, 0.6707047E+00, 0.8943893E+00, 0.8943893E+00 /
      data (ref_adm( 6,iz,33,17),iz = 1,20) / &
     & 0.1507900E+00, 0.1507900E+00, 0.1766400E+00, 0.1565100E+00, &
     & 0.1674100E+00, 0.1764100E+00, 0.1719100E+00, 0.2369200E+00, &
     & 0.2134800E+00, 0.2328800E+00, 0.2543400E+00, 0.3125400E+00, &
     & 0.3130100E+00, 0.3553581E+00, 0.4031217E+00, 0.4706388E+00, &
     & 0.5526820E+00, 0.6844050E+00, 0.9235005E+00, 0.9235005E+00 /
      data (ref_adm( 6,iz,34,17),iz = 1,20) / &
     & 0.1696700E+00, 0.1696700E+00, 0.1428800E+00, 0.1848800E+00, &
     & 0.1751300E+00, 0.1811800E+00, 0.1970600E+00, 0.1884400E+00, &
     & 0.2028000E+00, 0.2563500E+00, 0.2671300E+00, 0.2861700E+00, &
     & 0.3278200E+00, 0.3902700E+00, 0.4470200E+00, 0.4722031E+00, &
     & 0.5536863E+00, 0.6843003E+00, 0.9308074E+00, 0.9308074E+00 /
      data (ref_adm( 6,iz,35,17),iz = 1,20) / &
     & 0.1370100E+00, 0.1370100E+00, 0.1667100E+00, 0.1565200E+00, &
     & 0.1628400E+00, 0.1538800E+00, 0.2177900E+00, 0.2239000E+00, &
     & 0.2440700E+00, 0.2537500E+00, 0.2905700E+00, 0.2908300E+00, &
     & 0.3739700E+00, 0.4010000E+00, 0.4845900E+00, 0.6010500E+00, &
     & 0.5587316E+00, 0.6873898E+00, 0.9330827E+00, 0.9330827E+00 /
      data (ref_adm( 6,iz,36,17),iz = 1,20) / &
     & 0.1777900E+00, 0.1777900E+00, 0.1491200E+00, 0.1503000E+00, &
     & 0.1749100E+00, 0.1876000E+00, 0.1691300E+00, 0.2144000E+00, &
     & 0.2245400E+00, 0.2716200E+00, 0.2974000E+00, 0.3058800E+00, &
     & 0.3534800E+00, 0.4466500E+00, 0.5181900E+00, 0.4822472E+00, &
     & 0.6661700E+00, 0.7214500E+00, 0.9403361E+00, 0.9403361E+00 /
      data (ref_adm( 6,iz,37,17),iz = 1,20) / &
     & 0.1869700E+00, 0.1869700E+00, 0.1780200E+00, 0.1674300E+00, &
     & 0.1756000E+00, 0.2292800E+00, 0.1691200E+00, 0.2093500E+00, &
     & 0.2737500E+00, 0.2583900E+00, 0.2903200E+00, 0.3607300E+00, &
     & 0.3685200E+00, 0.3988300E+00, 0.4717700E+00, 0.5742300E+00, &
     & 0.6382900E+00, 0.7174524E+00, 0.9472107E+00, 0.9472107E+00 /
      data (ref_adm( 6,iz,38,17),iz = 1,20) / &
     & 0.1869700E+00, 0.1869700E+00, 0.1780200E+00, 0.1674300E+00, &
     & 0.1756000E+00, 0.2292800E+00, 0.1691200E+00, 0.2093500E+00, &
     & 0.2737500E+00, 0.2583900E+00, 0.2903200E+00, 0.3607300E+00, &
     & 0.3685200E+00, 0.3988300E+00, 0.4717700E+00, 0.5742300E+00, &
     & 0.6382900E+00, 0.7174524E+00, 0.9472107E+00, 0.9472107E+00 /
! Solar Zenith Angle 85.0 Albedo  0.4892846E+00
      data (ref_adm( 6,iz, 1,18),iz = 1,20) / &
     & 0.2710968E+00, 0.2710968E+00, 0.2836562E+00, 0.2967759E+00, &
     & 0.3123199E+00, 0.3313319E+00, 0.3558402E+00, 0.3833471E+00, &
     & 0.4149936E+00, 0.4478260E+00, 0.4896791E+00, 0.5252300E+00, &
     & 0.6787606E+00, 0.8099431E+00, 0.9434041E+00, 0.1200005E+01, &
     & 0.1672205E+01, 0.2989236E+01, 0.3621905E+01, 0.3621905E+01 /
      data (ref_adm( 6,iz, 2,18),iz = 1,20) / &
     & 0.2710968E+00, 0.2710968E+00, 0.2836562E+00, 0.2967759E+00, &
     & 0.3123199E+00, 0.3313319E+00, 0.3558402E+00, 0.3833471E+00, &
     & 0.4149936E+00, 0.4478260E+00, 0.4896791E+00, 0.5252300E+00, &
     & 0.6787606E+00, 0.8099431E+00, 0.9434041E+00, 0.1200005E+01, &
     & 0.1672205E+01, 0.2989236E+01, 0.3621905E+01, 0.3621905E+01 /
      data (ref_adm( 6,iz, 3,18),iz = 1,20) / &
     & 0.2710150E+00, 0.2710150E+00, 0.2835476E+00, 0.2072800E+00, &
     & 0.3121311E+00, 0.3310573E+00, 0.3550460E+00, 0.3820938E+00, &
     & 0.4141264E+00, 0.4470642E+00, 0.4891682E+00, 0.6633000E+00, &
     & 0.6730314E+00, 0.8012843E+00, 0.9374076E+00, 0.1171062E+01, &
     & 0.1603030E+01, 0.2720218E+01, 0.5785766E-07, 0.5785766E-07 /
      data (ref_adm( 6,iz, 4,18),iz = 1,20) / &
     & 0.2709890E+00, 0.2709890E+00, 0.2834839E+00, 0.2962205E+00, &
     & 0.3115986E+00, 0.3304562E+00, 0.3544010E+00, 0.3813977E+00, &
     & 0.5509000E+00, 0.4458568E+00, 0.4855387E+00, 0.5575161E+00, &
     & 0.6630147E+00, 0.7815576E+00, 0.9236206E+00, 0.1120830E+01, &
     & 0.1475080E+01, 0.2285218E+01, 0.3083374E+01, 0.3083374E+01 /
      data (ref_adm( 6,iz, 5,18),iz = 1,20) / &
     & 0.2712073E+00, 0.2712073E+00, 0.2833066E+00, 0.2606600E+00, &
     & 0.2902400E+00, 0.3288229E+00, 0.3528887E+00, 0.3787494E+00, &
     & 0.2881400E+00, 0.3903600E+00, 0.5545400E+00, 0.7117700E+00, &
     & 0.6453521E+00, 0.7531804E+00, 0.9053641E+00, 0.1061515E+01, &
     & 0.1328678E+01, 0.1859236E+01, 0.2193308E+01, 0.2193308E+01 /
      data (ref_adm( 6,iz, 6,18),iz = 1,20) / &
     & 0.2920200E+00, 0.2920200E+00, 0.2825897E+00, 0.2952043E+00, &
     & 0.3098799E+00, 0.1988600E+00, 0.3501368E+00, 0.3765201E+00, &
     & 0.4074437E+00, 0.4406545E+00, 0.4639500E+00, 0.5025100E+00, &
     & 0.6272351E+00, 0.7214849E+00, 0.8707234E+00, 0.1018162E+01, &
     & 0.1193501E+01, 0.1538168E+01, 0.1633127E+01, 0.1633127E+01 /
      data (ref_adm( 6,iz, 7,18),iz = 1,20) / &
     & 0.2187100E+00, 0.2187100E+00, 0.2820242E+00, 0.2943755E+00, &
     & 0.3083588E+00, 0.3254781E+00, 0.3473691E+00, 0.3730094E+00, &
     & 0.4028293E+00, 0.4158200E+00, 0.4674600E+00, 0.5320103E+00, &
     & 0.6083595E+00, 0.6901744E+00, 0.1701500E+01, 0.1835600E+01, &
     & 0.2858600E+01, 0.1292142E+01, 0.1296280E+01, 0.1296280E+01 /
      data (ref_adm( 6,iz, 8,18),iz = 1,20) / &
     & 0.2708514E+00, 0.2708514E+00, 0.2817080E+00, 0.2931486E+00, &
     & 0.3071452E+00, 0.3237346E+00, 0.3167300E+00, 0.2581000E+00, &
     & 0.3981699E+00, 0.4320936E+00, 0.4681658E+00, 0.5223617E+00, &
     & 0.5920159E+00, 0.6617069E+00, 0.7700514E+00, 0.1959500E+01, &
     & 0.1517800E+01, 0.1152246E+01, 0.1091830E+01, 0.1091830E+01 /
      data (ref_adm( 6,iz, 9,18),iz = 1,20) / &
     & 0.2704460E+00, 0.2704460E+00, 0.2807760E+00, 0.2918470E+00, &
     & 0.1797500E+00, 0.2545600E+00, 0.3412088E+00, 0.2364900E+00, &
     & 0.3925771E+00, 0.4255137E+00, 0.4628309E+00, 0.5134887E+00, &
     & 0.5757283E+00, 0.6364202E+00, 0.1062300E+01, 0.1596000E+01, &
     & 0.9862504E+00, 0.1096140E+01, 0.9919381E+00, 0.9919381E+00 /
      data (ref_adm( 6,iz,10,18),iz = 1,20) / &
     & 0.2703432E+00, 0.2703432E+00, 0.2799366E+00, 0.2905065E+00, &
     & 0.3036229E+00, 0.3187639E+00, 0.3373219E+00, 0.3603638E+00, &
     & 0.4614200E+00, 0.4179094E+00, 0.4545034E+00, 0.5049122E+00, &
     & 0.5617147E+00, 0.6161494E+00, 0.6922495E+00, 0.1487300E+01, &
     & 0.8938668E+00, 0.1001261E+01, 0.9454938E+00, 0.9454938E+00 /
      data (ref_adm( 6,iz,11,18),iz = 1,20) / &
     & 0.2699118E+00, 0.2699118E+00, 0.2792492E+00, 0.2153200E+00, &
     & 0.3009821E+00, 0.3162977E+00, 0.3334308E+00, 0.3548287E+00, &
     & 0.3811824E+00, 0.3274200E+00, 0.4452027E+00, 0.4956083E+00, &
     & 0.5507624E+00, 0.9279400E+00, 0.1310500E+01, 0.1424600E+01, &
     & 0.8276107E+00, 0.9040008E+00, 0.8541504E+00, 0.8541504E+00 /
      data (ref_adm( 6,iz,12,18),iz = 1,20) / &
     & 0.2698216E+00, 0.2698216E+00, 0.2779041E+00, 0.2877721E+00, &
     & 0.2991187E+00, 0.3134107E+00, 0.3297447E+00, 0.3492764E+00, &
     & 0.2603300E+00, 0.4029004E+00, 0.4351036E+00, 0.4832053E+00, &
     & 0.5382763E+00, 0.5839087E+00, 0.6442623E+00, 0.2350000E+01, &
     & 0.7835508E+00, 0.8405170E+00, 0.7928282E+00, 0.7928282E+00 /
      data (ref_adm( 6,iz,13,18),iz = 1,20) / &
     & 0.1945100E+00, 0.1945100E+00, 0.2770655E+00, 0.2859964E+00, &
     & 0.2964040E+00, 0.3100559E+00, 0.3261774E+00, 0.3445195E+00, &
     & 0.3675606E+00, 0.3943998E+00, 0.4253812E+00, 0.4707621E+00, &
     & 0.5017200E+00, 0.5701293E+00, 0.6272296E+00, 0.6934866E+00, &
     & 0.7508996E+00, 0.7967148E+00, 0.7509753E+00, 0.7509753E+00 /
      data (ref_adm( 6,iz,14,18),iz = 1,20) / &
     & 0.2262700E+00, 0.2262700E+00, 0.2702500E+00, 0.2842951E+00, &
     & 0.2941983E+00, 0.3068960E+00, 0.3220395E+00, 0.3395247E+00, &
     & 0.3605843E+00, 0.2410200E+00, 0.2791900E+00, 0.4445100E+00, &
     & 0.5070873E+00, 0.5507364E+00, 0.6072303E+00, 0.6726191E+00, &
     & 0.7270671E+00, 0.7686864E+00, 0.7225139E+00, 0.7225139E+00 /
      data (ref_adm( 6,iz,15,18),iz = 1,20) / &
     & 0.2038100E+00, 0.2038100E+00, 0.2023900E+00, 0.1984800E+00, &
     & 0.1977300E+00, 0.2100500E+00, 0.2327700E+00, 0.2178700E+00, &
     & 0.2032200E+00, 0.2097500E+00, 0.2816700E+00, 0.2605700E+00, &
     & 0.2796100E+00, 0.3168600E+00, 0.5856646E+00, 0.6484341E+00, &
     & 0.7028326E+00, 0.7450230E+00, 0.6998143E+00, 0.6998143E+00 /
      data (ref_adm( 6,iz,16,18),iz = 1,20) / &
     & 0.1925000E+00, 0.1925000E+00, 0.1930100E+00, 0.2186500E+00, &
     & 0.2144800E+00, 0.1861700E+00, 0.2370900E+00, 0.1895000E+00, &
     & 0.1923500E+00, 0.3698910E+00, 0.2336700E+00, 0.2349600E+00, &
     & 0.4763527E+00, 0.3697900E+00, 0.5651420E+00, 0.6233367E+00, &
     & 0.6724486E+00, 0.7144470E+00, 0.6766001E+00, 0.6766001E+00 /
      data (ref_adm( 6,iz,17,18),iz = 1,20) / &
     & 0.2685628E+00, 0.2685628E+00, 0.2726166E+00, 0.2782699E+00, &
     & 0.2862170E+00, 0.2966628E+00, 0.3088287E+00, 0.3233906E+00, &
     & 0.3408619E+00, 0.3618834E+00, 0.3862500E+00, 0.4213354E+00, &
     & 0.4620372E+00, 0.4972236E+00, 0.5444112E+00, 0.5990484E+00, &
     & 0.6459988E+00, 0.6845394E+00, 0.6500050E+00, 0.6500050E+00 /
      data (ref_adm( 6,iz,18,18),iz = 1,20) / &
     & 0.2114970E+00, 0.2114970E+00, 0.2128320E+00, 0.2152154E+00, &
     & 0.2188328E+00, 0.2238145E+00, 0.2302199E+00, 0.2382726E+00, &
     & 0.2480010E+00, 0.2597155E+00, 0.2738174E+00, 0.2955925E+00, &
     & 0.3220776E+00, 0.3479560E+00, 0.3866611E+00, 0.4438867E+00, &
     & 0.5147508E+00, 0.6299657E+00, 0.7845756E+00, 0.7845756E+00 /
      data (ref_adm( 6,iz,19,18),iz = 1,20) / &
     & 0.2114535E+00, 0.2114535E+00, 0.2447100E+00, 0.2151602E+00, &
     & 0.2101100E+00, 0.2235988E+00, 0.2299287E+00, 0.2376636E+00, &
     & 0.2471941E+00, 0.2586414E+00, 0.2608100E+00, 0.2937712E+00, &
     & 0.3197009E+00, 0.3446141E+00, 0.3821850E+00, 0.4371241E+00, &
     & 0.5052485E+00, 0.6151605E+00, 0.7625902E+00, 0.7625902E+00 /
      data (ref_adm( 6,iz,20,18),iz = 1,20) / &
     & 0.2114884E+00, 0.2114884E+00, 0.3031300E+00, 0.2150976E+00, &
     & 0.2186926E+00, 0.2234913E+00, 0.2297292E+00, 0.2374726E+00, &
     & 0.2468396E+00, 0.2581858E+00, 0.2717750E+00, 0.2926032E+00, &
     & 0.3180389E+00, 0.3425443E+00, 0.3793569E+00, 0.4333287E+00, &
     & 0.4996235E+00, 0.6057104E+00, 0.7497099E+00, 0.7497099E+00 /
      data (ref_adm( 6,iz,21,18),iz = 1,20) / &
     & 0.2311900E+00, 0.2311900E+00, 0.2127388E+00, 0.2151224E+00, &
     & 0.2186320E+00, 0.2235447E+00, 0.2297746E+00, 0.2374208E+00, &
     & 0.2469018E+00, 0.2580820E+00, 0.2715136E+00, 0.2922317E+00, &
     & 0.3173130E+00, 0.3416107E+00, 0.3777948E+00, 0.4306957E+00, &
     & 0.4958461E+00, 0.5994120E+00, 0.7423546E+00, 0.7423546E+00 /
      data (ref_adm( 6,iz,22,18),iz = 1,20) / &
     & 0.2026600E+00, 0.2026600E+00, 0.3831002E+00, 0.3844642E+00, &
     & 0.3869645E+00, 0.3909872E+00, 0.3964602E+00, 0.4035107E+00, &
     & 0.4121382E+00, 0.4225103E+00, 0.4353620E+00, 0.4555889E+00, &
     & 0.4805492E+00, 0.5054519E+00, 0.5436745E+00, 0.6012896E+00, &
     & 0.6764867E+00, 0.8161665E+00, 0.1200895E+01, 0.1200895E+01 /
      data (ref_adm( 6,iz,23,18),iz = 1,20) / &
     & 0.2388400E+00, 0.2388400E+00, 0.2020000E+00, 0.2098600E+00, &
     & 0.2341200E+00, 0.2173300E+00, 0.2247700E+00, 0.2363000E+00, &
     & 0.2393400E+00, 0.2757200E+00, 0.2522500E+00, 0.2966100E+00, &
     & 0.3810600E+00, 0.4328000E+00, 0.5380800E+00, 0.5949144E+00, &
     & 0.6688069E+00, 0.8089665E+00, 0.1216035E+01, 0.1216035E+01 /
      data (ref_adm( 6,iz,24,18),iz = 1,20) / &
     & 0.3825264E+00, 0.3825264E+00, 0.2132300E+00, 0.2181200E+00, &
     & 0.2132300E+00, 0.2350000E+00, 0.2514100E+00, 0.2473400E+00, &
     & 0.2583100E+00, 0.2816800E+00, 0.2980400E+00, 0.3419100E+00, &
     & 0.3775100E+00, 0.3436500E+00, 0.3236000E+00, 0.5920160E+00, &
     & 0.6663880E+00, 0.8079875E+00, 0.1243228E+01, 0.1243228E+01 /
      data (ref_adm( 6,iz,25,18),iz = 1,20) / &
     & 0.2309100E+00, 0.2309100E+00, 0.3812252E+00, 0.3817646E+00, &
     & 0.3838933E+00, 0.3869268E+00, 0.3916422E+00, 0.3979350E+00, &
     & 0.4064368E+00, 0.4164763E+00, 0.3207700E+00, 0.4480983E+00, &
     & 0.4723021E+00, 0.4967128E+00, 0.5341364E+00, 0.5917967E+00, &
     & 0.6676878E+00, 0.8131620E+00, 0.1280071E+01, 0.1280071E+01 /
      data (ref_adm( 6,iz,26,18),iz = 1,20) / &
     & 0.3821956E+00, 0.3821956E+00, 0.3805982E+00, 0.3809926E+00, &
     & 0.3828704E+00, 0.3858375E+00, 0.3906077E+00, 0.3973887E+00, &
     & 0.4054545E+00, 0.4155813E+00, 0.4280265E+00, 0.4484997E+00, &
     & 0.4739063E+00, 0.4991570E+00, 0.5381400E+00, 0.5975965E+00, &
     & 0.6760676E+00, 0.8282694E+00, 0.1330832E+01, 0.1330832E+01 /
      data (ref_adm( 6,iz,27,18),iz = 1,20) / &
     & 0.3821072E+00, 0.3821072E+00, 0.1757600E+00, 0.3804690E+00, &
     & 0.3819025E+00, 0.3849166E+00, 0.3900788E+00, 0.3966190E+00, &
     & 0.4050471E+00, 0.4155518E+00, 0.4294638E+00, 0.4505470E+00, &
     & 0.4778534E+00, 0.5043588E+00, 0.5453614E+00, 0.5354300E+00, &
     & 0.6891676E+00, 0.8488035E+00, 0.1389405E+01, 0.1389405E+01 /
      data (ref_adm( 6,iz,28,18),iz = 1,20) / &
     & 0.3819479E+00, 0.3819479E+00, 0.3797204E+00, 0.3798862E+00, &
     & 0.3811680E+00, 0.2909500E+00, 0.3894866E+00, 0.3961229E+00, &
     & 0.4053549E+00, 0.4169727E+00, 0.4317753E+00, 0.4546633E+00, &
     & 0.4827068E+00, 0.5102792E+00, 0.5530155E+00, 0.6182290E+00, &
     & 0.7043039E+00, 0.8734258E+00, 0.1452244E+01, 0.1452244E+01 /
      data (ref_adm( 6,iz,29,18),iz = 1,20) / &
     & 0.3819179E+00, 0.3819179E+00, 0.3796265E+00, 0.3791871E+00, &
     & 0.2440600E+00, 0.3841047E+00, 0.2672700E+00, 0.3965079E+00, &
     & 0.2635400E+00, 0.4194676E+00, 0.4349362E+00, 0.3536100E+00, &
     & 0.4884630E+00, 0.5183948E+00, 0.7731800E+00, 0.6332445E+00, &
     & 0.7241932E+00, 0.9047521E+00, 0.1520647E+01, 0.1520647E+01 /
      data (ref_adm( 6,iz,30,18),iz = 1,20) / &
     & 0.3818009E+00, 0.3818009E+00, 0.3791519E+00, 0.1949200E+00, &
     & 0.3802261E+00, 0.3837206E+00, 0.3889805E+00, 0.3973382E+00, &
     & 0.4082496E+00, 0.2622300E+00, 0.4379842E+00, 0.3577900E+00, &
     & 0.4960890E+00, 0.6351000E+00, 0.5762339E+00, 0.6504102E+00, &
     & 0.7486681E+00, 0.9408147E+00, 0.1593356E+01, 0.1593356E+01 /
      data (ref_adm( 6,iz,31,18),iz = 1,20) / &
     & 0.3816635E+00, 0.3816635E+00, 0.3788480E+00, 0.2181600E+00, &
     & 0.3798474E+00, 0.3834200E+00, 0.3892431E+00, 0.3982492E+00, &
     & 0.4102308E+00, 0.4240967E+00, 0.4415607E+00, 0.4106800E+00, &
     & 0.5034417E+00, 0.5379094E+00, 0.6539200E+00, 0.6695675E+00, &
     & 0.7734554E+00, 0.9770706E+00, 0.1663363E+01, 0.1663363E+01 /
      data (ref_adm( 6,iz,32,18),iz = 1,20) / &
     & 0.3815854E+00, 0.3815854E+00, 0.1811400E+00, 0.3778935E+00, &
     & 0.3796839E+00, 0.3832028E+00, 0.3898279E+00, 0.3434300E+00, &
     & 0.4116849E+00, 0.4265886E+00, 0.4455832E+00, 0.4751705E+00, &
     & 0.5465900E+00, 0.5488353E+00, 0.6169800E+00, 0.1102400E+01, &
     & 0.7993771E+00, 0.1015198E+01, 0.1733259E+01, 0.1733259E+01 /
      data (ref_adm( 6,iz,33,18),iz = 1,20) / &
     & 0.3815448E+00, 0.3815448E+00, 0.3783208E+00, 0.3777713E+00, &
     & 0.3794463E+00, 0.3830835E+00, 0.2975100E+00, 0.3523000E+00, &
     & 0.4187400E+00, 0.4293588E+00, 0.4493777E+00, 0.6017200E+00, &
     & 0.6000500E+00, 0.1272600E+01, 0.1304500E+01, 0.1921200E+01, &
     & 0.8156108E+00, 0.1033940E+01, 0.1783885E+01, 0.1783885E+01 /
      data (ref_adm( 6,iz,34,18),iz = 1,20) / &
     & 0.3814339E+00, 0.3814339E+00, 0.3781557E+00, 0.2232200E+00, &
     & 0.2745000E+00, 0.3073700E+00, 0.3907705E+00, 0.3719500E+00, &
     & 0.5666900E+00, 0.4316776E+00, 0.4525605E+00, 0.5102800E+00, &
     & 0.5297300E+00, 0.1042300E+01, 0.1320400E+01, 0.7056727E+00, &
     & 0.8100346E+00, 0.1027025E+01, 0.1806371E+01, 0.1806371E+01 /
      data (ref_adm( 6,iz,35,18),iz = 1,20) / &
     & 0.1761600E+00, 0.1761600E+00, 0.3782415E+00, 0.3773214E+00, &
     & 0.3792385E+00, 0.3834824E+00, 0.3912748E+00, 0.4022447E+00, &
     & 0.4159129E+00, 0.4388400E+00, 0.4556933E+00, 0.5843600E+00, &
     & 0.5337642E+00, 0.8616700E+00, 0.1621900E+01, 0.7001079E+00, &
     & 0.1196100E+01, 0.1251200E+01, 0.1830001E+01, 0.1830001E+01 /
      data (ref_adm( 6,iz,36,18),iz = 1,20) / &
     & 0.3814884E+00, 0.3814884E+00, 0.3974700E+00, 0.2249800E+00, &
     & 0.2170600E+00, 0.3834198E+00, 0.3916502E+00, 0.4027802E+00, &
     & 0.3801200E+00, 0.5958600E+00, 0.4576755E+00, 0.5815200E+00, &
     & 0.5143000E+00, 0.1189800E+01, 0.1310600E+01, 0.1977500E+01, &
     & 0.1150600E+01, 0.1411000E+01, 0.1857752E+01, 0.1857752E+01 /
      data (ref_adm( 6,iz,37,18),iz = 1,20) / &
     & 0.3814372E+00, 0.3814372E+00, 0.3778812E+00, 0.3770645E+00, &
     & 0.3791919E+00, 0.3834690E+00, 0.3918683E+00, 0.4030680E+00, &
     & 0.4171336E+00, 0.4356104E+00, 0.4588674E+00, 0.5945700E+00, &
     & 0.5405622E+00, 0.9600000E+00, 0.6217796E+00, 0.7870500E+00, &
     & 0.1006400E+01, 0.1099768E+01, 0.1903726E+01, 0.1903726E+01 /
      data (ref_adm( 6,iz,38,18),iz = 1,20) / &
     & 0.3814372E+00, 0.3814372E+00, 0.3778812E+00, 0.3770645E+00, &
     & 0.3791919E+00, 0.3834690E+00, 0.3918683E+00, 0.4030680E+00, &
     & 0.4171336E+00, 0.4356104E+00, 0.4588674E+00, 0.5945700E+00, &
     & 0.5405622E+00, 0.9600000E+00, 0.6217796E+00, 0.7870500E+00, &
     & 0.1006400E+01, 0.1099768E+01, 0.1903726E+01, 0.1903726E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm( 7,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm( 7,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9976429E+04
      data (ref_adm( 7,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     & 0.1372400E+00,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.4448187E+04
      data (ref_adm( 7,iz, 1, 4),iz = 1,20) / &
     & 0.1823118E+00, 0.1823118E+00, 0.1790494E+00, 0.1779192E+00, &
     & 0.1770260E+00, 0.1764150E+00, 0.1753381E+00, 0.1735036E+00, &
     & 0.1711472E+00, 0.1683256E+00, 0.1652567E+00, 0.1609960E+00, &
     & 0.1560230E+00, 0.1513401E+00, 0.1446151E+00, 0.1357591E+00, &
     & 0.1266226E+00, 0.1146684E+00, 0.9356049E-01, 0.9356049E-01 /
      data (ref_adm( 7,iz, 2, 4),iz = 1,20) / &
     & 0.1823118E+00, 0.1823118E+00, 0.1790494E+00, 0.1779192E+00, &
     & 0.1770260E+00, 0.1764150E+00, 0.1753381E+00, 0.1735036E+00, &
     & 0.1711472E+00, 0.1683256E+00, 0.1652567E+00, 0.1609960E+00, &
     & 0.1560230E+00, 0.1513401E+00, 0.1446151E+00, 0.1357591E+00, &
     & 0.1266226E+00, 0.1146684E+00, 0.9356049E-01, 0.9356049E-01 /
      data (ref_adm( 7,iz, 3, 4),iz = 1,20) / &
     & 0.1823118E+00, 0.1823118E+00, 0.1790494E+00, 0.1779193E+00, &
     & 0.1770259E+00, 0.1764150E+00, 0.1753381E+00, 0.1735035E+00, &
     & 0.1711472E+00, 0.1683256E+00, 0.1652566E+00, 0.1609960E+00, &
     & 0.1560230E+00, 0.1513401E+00, 0.1446151E+00, 0.1357591E+00, &
     & 0.1266226E+00, 0.1146684E+00, 0.9356049E-01, 0.9356049E-01 /
      data (ref_adm( 7,iz, 4, 4),iz = 1,20) / &
     & 0.1823118E+00, 0.1823118E+00, 0.1790494E+00, 0.1779192E+00, &
     & 0.1770260E+00, 0.1931300E+00, 0.1753381E+00, 0.1735036E+00, &
     & 0.1475700E+00, 0.1683256E+00, 0.1652567E+00, 0.1609960E+00, &
     & 0.1560230E+00, 0.1513401E+00, 0.1446151E+00, 0.1357591E+00, &
     & 0.1266226E+00, 0.1146684E+00, 0.9356049E-01, 0.9356049E-01 /
      data (ref_adm( 7,iz, 5, 4),iz = 1,20) / &
     & 0.1823118E+00, 0.1823118E+00, 0.1790494E+00, 0.1779193E+00, &
     & 0.1770259E+00, 0.1764150E+00, 0.1753381E+00, 0.1832500E+00, &
     & 0.1711472E+00, 0.1683256E+00, 0.1652566E+00, 0.1609960E+00, &
     & 0.1560230E+00, 0.1513401E+00, 0.1446151E+00, 0.1357591E+00, &
     & 0.1266226E+00, 0.1146684E+00, 0.9356049E-01, 0.9356049E-01 /
      data (ref_adm( 7,iz, 6, 4),iz = 1,20) / &
     & 0.1823118E+00, 0.1823118E+00, 0.1790494E+00, 0.1779192E+00, &
     & 0.1770260E+00, 0.1764150E+00, 0.1753381E+00, 0.1735036E+00, &
     & 0.1711472E+00, 0.1683256E+00, 0.1652567E+00, 0.1609960E+00, &
     & 0.1560230E+00, 0.1513401E+00, 0.1446151E+00, 0.1357591E+00, &
     & 0.1266226E+00, 0.1146684E+00, 0.9356049E-01, 0.9356049E-01 /
      data (ref_adm( 7,iz, 7, 4),iz = 1,20) / &
     & 0.1823118E+00, 0.1823118E+00, 0.1790494E+00, 0.1779193E+00, &
     & 0.1770259E+00, 0.1764150E+00, 0.1753381E+00, 0.1735035E+00, &
     & 0.1711472E+00, 0.1612400E+00, 0.1652566E+00, 0.1609960E+00, &
     & 0.1560230E+00, 0.1513401E+00, 0.1446151E+00, 0.1357591E+00, &
     & 0.1266226E+00, 0.1146684E+00, 0.9356049E-01, 0.9356049E-01 /
      data (ref_adm( 7,iz, 8, 4),iz = 1,20) / &
     & 0.1823118E+00, 0.1823118E+00, 0.1790494E+00, 0.1779192E+00, &
     & 0.1770260E+00, 0.1764150E+00, 0.1753381E+00, 0.1735036E+00, &
     & 0.1711472E+00, 0.1759000E+00, 0.1652567E+00, 0.1609960E+00, &
     & 0.1560230E+00, 0.1513401E+00, 0.1446151E+00, 0.1357591E+00, &
     & 0.1266226E+00, 0.1146684E+00, 0.9356049E-01, 0.9356049E-01 /
      data (ref_adm( 7,iz, 9, 4),iz = 1,20) / &
     & 0.1823118E+00, 0.1823118E+00, 0.1790494E+00, 0.1779193E+00, &
     & 0.1770259E+00, 0.1764150E+00, 0.1753381E+00, 0.1735035E+00, &
     & 0.1711472E+00, 0.1683256E+00, 0.1652566E+00, 0.1609960E+00, &
     & 0.8953100E-01, 0.1513401E+00, 0.1446151E+00, 0.1357591E+00, &
     & 0.1266226E+00, 0.1146684E+00, 0.9356049E-01, 0.9356049E-01 /
      data (ref_adm( 7,iz,10, 4),iz = 1,20) / &
     & 0.1823118E+00, 0.1823118E+00, 0.1790494E+00, 0.1779192E+00, &
     & 0.1770260E+00, 0.1764150E+00, 0.1753381E+00, 0.1735036E+00, &
     & 0.1711472E+00, 0.1683256E+00, 0.1652567E+00, 0.1609960E+00, &
     & 0.1560230E+00, 0.1513401E+00, 0.1446151E+00, 0.1357591E+00, &
     & 0.1266226E+00, 0.1146684E+00, 0.9356049E-01, 0.9356049E-01 /
      data (ref_adm( 7,iz,11, 4),iz = 1,20) / &
     & 0.1823118E+00, 0.1823118E+00, 0.1790494E+00, 0.1779193E+00, &
     & 0.1770259E+00, 0.1764150E+00, 0.1753381E+00, 0.1735035E+00, &
     & 0.1711472E+00, 0.1683256E+00, 0.1652566E+00, 0.1609960E+00, &
     & 0.1560230E+00, 0.1513401E+00, 0.1446151E+00, 0.1357591E+00, &
     & 0.1266226E+00, 0.1146684E+00, 0.9356049E-01, 0.9356049E-01 /
      data (ref_adm( 7,iz,12, 4),iz = 1,20) / &
     & 0.1823118E+00, 0.1823118E+00, 0.1790494E+00, 0.1779192E+00, &
     & 0.1770260E+00, 0.1764150E+00, 0.1753381E+00, 0.1735036E+00, &
     & 0.1711472E+00, 0.1683256E+00, 0.1652567E+00, 0.1609960E+00, &
     & 0.1560230E+00, 0.1513401E+00, 0.1446151E+00, 0.1357591E+00, &
     & 0.1266226E+00, 0.1146684E+00, 0.9356049E-01, 0.9356049E-01 /
      data (ref_adm( 7,iz,13, 4),iz = 1,20) / &
     & 0.1823118E+00, 0.1823118E+00, 0.1790494E+00, 0.1779193E+00, &
     & 0.1770259E+00, 0.1764150E+00, 0.1974100E+00, 0.1735035E+00, &
     & 0.1711472E+00, 0.1683256E+00, 0.1652566E+00, 0.1609960E+00, &
     & 0.1560230E+00, 0.1513401E+00, 0.1446151E+00, 0.1357591E+00, &
     & 0.1266226E+00, 0.1146684E+00, 0.9356049E-01, 0.9356049E-01 /
      data (ref_adm( 7,iz,14, 4),iz = 1,20) / &
     & 0.1823118E+00, 0.1823118E+00, 0.1790494E+00, 0.1779192E+00, &
     & 0.1770260E+00, 0.1764150E+00, 0.1753381E+00, 0.1735036E+00, &
     & 0.1711472E+00, 0.1683256E+00, 0.1652567E+00, 0.1754200E+00, &
     & 0.1560230E+00, 0.1513401E+00, 0.1446151E+00, 0.1357591E+00, &
     & 0.1266226E+00, 0.1146684E+00, 0.9356049E-01, 0.9356049E-01 /
      data (ref_adm( 7,iz,15, 4),iz = 1,20) / &
     & 0.1823118E+00, 0.1823118E+00, 0.1790494E+00, 0.1779193E+00, &
     & 0.1770259E+00, 0.1764150E+00, 0.1753381E+00, 0.1735035E+00, &
     & 0.1711472E+00, 0.1683256E+00, 0.1652566E+00, 0.1609960E+00, &
     & 0.1560230E+00, 0.1513401E+00, 0.1446151E+00, 0.1357591E+00, &
     & 0.1266226E+00, 0.1146684E+00, 0.9356049E-01, 0.9356049E-01 /
      data (ref_adm( 7,iz,16, 4),iz = 1,20) / &
     & 0.1823118E+00, 0.1823118E+00, 0.1790494E+00, 0.1779192E+00, &
     & 0.1770260E+00, 0.1764150E+00, 0.1753381E+00, 0.1735036E+00, &
     & 0.1711472E+00, 0.1683256E+00, 0.1974200E+00, 0.1609960E+00, &
     & 0.1560230E+00, 0.1513401E+00, 0.1446151E+00, 0.1357591E+00, &
     & 0.1266226E+00, 0.1146684E+00, 0.9356049E-01, 0.9356049E-01 /
      data (ref_adm( 7,iz,17, 4),iz = 1,20) / &
     & 0.1823118E+00, 0.1823118E+00, 0.1790494E+00, 0.1779193E+00, &
     & 0.1770259E+00, 0.1764150E+00, 0.1753381E+00, 0.1735035E+00, &
     & 0.1711472E+00, 0.1683256E+00, 0.1652566E+00, 0.1609960E+00, &
     & 0.1560230E+00, 0.1513401E+00, 0.1446151E+00, 0.1357591E+00, &
     & 0.1266226E+00, 0.1146684E+00, 0.9356049E-01, 0.9356049E-01 /
      data (ref_adm( 7,iz,18, 4),iz = 1,20) / &
     & 0.2082201E+00, 0.2082201E+00, 0.2044940E+00, 0.2032032E+00, &
     & 0.2021830E+00, 0.2014852E+00, 0.2002553E+00, 0.1981600E+00, &
     & 0.1954688E+00, 0.1922462E+00, 0.1887412E+00, 0.1838751E+00, &
     & 0.1781954E+00, 0.1728470E+00, 0.1651663E+00, 0.1550518E+00, &
     & 0.1446168E+00, 0.1309638E+00, 0.1068563E+00, 0.1068563E+00 /
      data (ref_adm( 7,iz,19, 4),iz = 1,20) / &
     & 0.2082201E+00, 0.2082201E+00, 0.2044940E+00, 0.2032032E+00, &
     & 0.2021830E+00, 0.2014852E+00, 0.2002553E+00, 0.1981600E+00, &
     & 0.1954688E+00, 0.1922462E+00, 0.1887412E+00, 0.1838751E+00, &
     & 0.1781954E+00, 0.1728470E+00, 0.1651663E+00, 0.1550518E+00, &
     & 0.1446168E+00, 0.1309638E+00, 0.1068563E+00, 0.1068563E+00 /
      data (ref_adm( 7,iz,20, 4),iz = 1,20) / &
     & 0.2082201E+00, 0.2082201E+00, 0.2044940E+00, 0.2032032E+00, &
     & 0.2021830E+00, 0.2014852E+00, 0.2002553E+00, 0.1981600E+00, &
     & 0.1954688E+00, 0.1922462E+00, 0.1887412E+00, 0.1838751E+00, &
     & 0.1781954E+00, 0.1728470E+00, 0.1651663E+00, 0.1550518E+00, &
     & 0.1446168E+00, 0.1309638E+00, 0.1068563E+00, 0.1068563E+00 /
      data (ref_adm( 7,iz,21, 4),iz = 1,20) / &
     & 0.2082201E+00, 0.2082201E+00, 0.2044940E+00, 0.2032032E+00, &
     & 0.2021830E+00, 0.2014852E+00, 0.2002553E+00, 0.1981600E+00, &
     & 0.1954688E+00, 0.1922462E+00, 0.1887412E+00, 0.1838751E+00, &
     & 0.1781954E+00, 0.1728470E+00, 0.1651663E+00, 0.1550518E+00, &
     & 0.1446168E+00, 0.1309638E+00, 0.1068563E+00, 0.1068563E+00 /
      data (ref_adm( 7,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 7,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo  0.2009267E+00
      data (ref_adm( 7,iz, 1, 5),iz = 1,20) / &
     & 0.1624514E+00, 0.1624514E+00, 0.1657988E+00, 0.1946700E+00, &
     & 0.1616406E+00, 0.1589975E+00, 0.1454100E+00, 0.1587251E+00, &
     & 0.1615587E+00, 0.1652847E+00, 0.1713421E+00, 0.1822075E+00, &
     & 0.1957874E+00, 0.2083680E+00, 0.2240849E+00, 0.2421231E+00, &
     & 0.2572420E+00, 0.2657409E+00, 0.2389518E+00, 0.2389518E+00 /
      data (ref_adm( 7,iz, 2, 5),iz = 1,20) / &
     & 0.1624514E+00, 0.1624514E+00, 0.1657988E+00, 0.1946700E+00, &
     & 0.1616406E+00, 0.1589975E+00, 0.1454100E+00, 0.1587251E+00, &
     & 0.1615587E+00, 0.1652847E+00, 0.1713421E+00, 0.1822075E+00, &
     & 0.1957874E+00, 0.2083680E+00, 0.2240849E+00, 0.2421231E+00, &
     & 0.2572420E+00, 0.2657409E+00, 0.2389518E+00, 0.2389518E+00 /
      data (ref_adm( 7,iz, 3, 5),iz = 1,20) / &
     & 0.1624403E+00, 0.1624403E+00, 0.1960200E+00, 0.1941700E+00, &
     & 0.1616617E+00, 0.1887000E+00, 0.1344900E+00, 0.1743100E+00, &
     & 0.1615561E+00, 0.1653918E+00, 0.1712713E+00, 0.1825153E+00, &
     & 0.1957262E+00, 0.2080235E+00, 0.2242186E+00, 0.2421053E+00, &
     & 0.2566477E+00, 0.2651562E+00, 0.3684305E-08, 0.3684305E-08 /
      data (ref_adm( 7,iz, 4, 5),iz = 1,20) / &
     & 0.1540300E+00, 0.1540300E+00, 0.2036100E+00, 0.1622400E+00, &
     & 0.1629200E+00, 0.1689500E+00, 0.1582965E+00, 0.1589038E+00, &
     & 0.1615427E+00, 0.1654661E+00, 0.1713409E+00, 0.1821198E+00, &
     & 0.1955882E+00, 0.2081189E+00, 0.2238768E+00, 0.2418174E+00, &
     & 0.2564822E+00, 0.2647789E+00, 0.2383628E+00, 0.2383628E+00 /
      data (ref_adm( 7,iz, 5, 5),iz = 1,20) / &
     & 0.1625557E+00, 0.1625557E+00, 0.1888000E+00, 0.1655650E+00, &
     & 0.1485700E+00, 0.1598532E+00, 0.1429900E+00, 0.1589942E+00, &
     & 0.1616677E+00, 0.1653742E+00, 0.1712934E+00, 0.1821298E+00, &
     & 0.1953480E+00, 0.2075688E+00, 0.2236025E+00, 0.2416099E+00, &
     & 0.2556668E+00, 0.2640589E+00, 0.2377713E+00, 0.2377713E+00 /
      data (ref_adm( 7,iz, 6, 5),iz = 1,20) / &
     & 0.1626006E+00, 0.1626006E+00, 0.1984500E+00, 0.1658136E+00, &
     & 0.1398900E+00, 0.1276500E+00, 0.1587912E+00, 0.1322900E+00, &
     & 0.1272300E+00, 0.1655039E+00, 0.1712083E+00, 0.1820656E+00, &
     & 0.1948224E+00, 0.2075110E+00, 0.2228508E+00, 0.2408041E+00, &
     & 0.2551493E+00, 0.2629153E+00, 0.2370498E+00, 0.2370498E+00 /
      data (ref_adm( 7,iz, 7, 5),iz = 1,20) / &
     & 0.1625921E+00, 0.1625921E+00, 0.1654655E+00, 0.1279000E+00, &
     & 0.1629554E+00, 0.1349600E+00, 0.1593667E+00, 0.1597601E+00, &
     & 0.1617199E+00, 0.1656263E+00, 0.1714045E+00, 0.1818650E+00, &
     & 0.1945826E+00, 0.2069857E+00, 0.2221404E+00, 0.2399680E+00, &
     & 0.2540022E+00, 0.2618725E+00, 0.2360702E+00, 0.2360702E+00 /
      data (ref_adm( 7,iz, 8, 5),iz = 1,20) / &
     & 0.1625484E+00, 0.1625484E+00, 0.1655292E+00, 0.1899100E+00, &
     & 0.1634220E+00, 0.2051700E+00, 0.1740900E+00, 0.1600305E+00, &
     & 0.1618891E+00, 0.1658258E+00, 0.1711566E+00, 0.1814161E+00, &
     & 0.1943688E+00, 0.2061457E+00, 0.2217017E+00, 0.2393817E+00, &
     & 0.2530770E+00, 0.2606503E+00, 0.2349574E+00, 0.2349574E+00 /
      data (ref_adm( 7,iz, 9, 5),iz = 1,20) / &
     & 0.1758200E+00, 0.1758200E+00, 0.2195900E+00, 0.2745700E+00, &
     & 0.1637298E+00, 0.1615785E+00, 0.1709900E+00, 0.1603886E+00, &
     & 0.1621565E+00, 0.1660547E+00, 0.1711767E+00, 0.1015900E+00, &
     & 0.9753800E-01, 0.2054322E+00, 0.2208277E+00, 0.2384181E+00, &
     & 0.2520210E+00, 0.2590942E+00, 0.2337846E+00, 0.2337846E+00 /
      data (ref_adm( 7,iz,10, 5),iz = 1,20) / &
     & 0.1623924E+00, 0.1623924E+00, 0.1881300E+00, 0.1880800E+00, &
     & 0.1644019E+00, 0.2602400E+00, 0.1604932E+00, 0.1607254E+00, &
     & 0.1624352E+00, 0.1233300E+00, 0.1711474E+00, 0.1808811E+00, &
     & 0.1935008E+00, 0.2047136E+00, 0.1409600E+00, 0.2372417E+00, &
     & 0.2505488E+00, 0.2574054E+00, 0.2325099E+00, 0.2325099E+00 /
      data (ref_adm( 7,iz,11, 5),iz = 1,20) / &
     & 0.1623691E+00, 0.1623691E+00, 0.1652542E+00, 0.1673562E+00, &
     & 0.1431500E+00, 0.1628531E+00, 0.1613128E+00, 0.1613802E+00, &
     & 0.1627209E+00, 0.1665446E+00, 0.1294700E+00, 0.1806435E+00, &
     & 0.1930497E+00, 0.2038834E+00, 0.2190166E+00, 0.2360302E+00, &
     & 0.2496445E+00, 0.2552878E+00, 0.2309582E+00, 0.2309582E+00 /
      data (ref_adm( 7,iz,12, 5),iz = 1,20) / &
     & 0.1969900E+00, 0.1969900E+00, 0.1593300E+00, 0.1540800E+00, &
     & 0.1659924E+00, 0.1996300E+00, 0.1620489E+00, 0.1618186E+00, &
     & 0.1632397E+00, 0.1667624E+00, 0.1715531E+00, 0.1803946E+00, &
     & 0.1925296E+00, 0.2031178E+00, 0.2177831E+00, 0.2345282E+00, &
     & 0.2479747E+00, 0.2533886E+00, 0.2293819E+00, 0.2293819E+00 /
      data (ref_adm( 7,iz,13, 5),iz = 1,20) / &
     & 0.1622516E+00, 0.1622516E+00, 0.1645357E+00, 0.1674877E+00, &
     & 0.1870900E+00, 0.1645318E+00, 0.1628351E+00, 0.1624914E+00, &
     & 0.1637727E+00, 0.1591300E+00, 0.1715581E+00, 0.1121200E+00, &
     & 0.1122500E+00, 0.1374600E+00, 0.2167595E+00, 0.2330766E+00, &
     & 0.2464743E+00, 0.2515687E+00, 0.2278450E+00, 0.2278450E+00 /
      data (ref_adm( 7,iz,14, 5),iz = 1,20) / &
     & 0.1623065E+00, 0.1623065E+00, 0.1645621E+00, 0.1676254E+00, &
     & 0.1677091E+00, 0.1653680E+00, 0.1639524E+00, 0.1632406E+00, &
     & 0.1645496E+00, 0.1670951E+00, 0.1719096E+00, 0.1800721E+00, &
     & 0.1911855E+00, 0.2016844E+00, 0.2155027E+00, 0.2318693E+00, &
     & 0.2446272E+00, 0.2496433E+00, 0.2261295E+00, 0.2261295E+00 /
      data (ref_adm( 7,iz,15, 5),iz = 1,20) / &
     & 0.1622539E+00, 0.1622539E+00, 0.1641657E+00, 0.1675786E+00, &
     & 0.1683482E+00, 0.1665205E+00, 0.1648529E+00, 0.1856900E+00, &
     & 0.1949700E+00, 0.1676113E+00, 0.1724457E+00, 0.1800758E+00, &
     & 0.1904676E+00, 0.2010950E+00, 0.2144030E+00, 0.2303696E+00, &
     & 0.2430259E+00, 0.2478216E+00, 0.2243646E+00, 0.2243646E+00 /
      data (ref_adm( 7,iz,16, 5),iz = 1,20) / &
     & 0.1622119E+00, 0.1622119E+00, 0.1638210E+00, 0.1674282E+00, &
     & 0.1691817E+00, 0.1672528E+00, 0.1657578E+00, 0.1650593E+00, &
     & 0.1660706E+00, 0.1683459E+00, 0.1727971E+00, 0.1800658E+00, &
     & 0.1900494E+00, 0.2002216E+00, 0.2131650E+00, 0.2288256E+00, &
     & 0.2410187E+00, 0.2458171E+00, 0.2226594E+00, 0.2226594E+00 /
      data (ref_adm( 7,iz,17, 5),iz = 1,20) / &
     & 0.1623109E+00, 0.1623109E+00, 0.1635163E+00, 0.1670832E+00, &
     & 0.1693889E+00, 0.1685608E+00, 0.1670580E+00, 0.1662029E+00, &
     & 0.1666901E+00, 0.1688986E+00, 0.1733223E+00, 0.1802458E+00, &
     & 0.1897030E+00, 0.1992554E+00, 0.2120523E+00, 0.2272299E+00, &
     & 0.2391363E+00, 0.2439579E+00, 0.2210944E+00, 0.2210944E+00 /
      data (ref_adm( 7,iz,18, 5),iz = 1,20) / &
     & 0.2156763E+00, 0.2156763E+00, 0.2146782E+00, 0.2133572E+00, &
     & 0.2120023E+00, 0.2107828E+00, 0.2097334E+00, 0.2092412E+00, &
     & 0.2092519E+00, 0.2099557E+00, 0.2113280E+00, 0.2137839E+00, &
     & 0.2173814E+00, 0.2211593E+00, 0.2262604E+00, 0.2332374E+00, &
     & 0.2401913E+00, 0.2480433E+00, 0.2438556E+00, 0.2438556E+00 /
      data (ref_adm( 7,iz,19, 5),iz = 1,20) / &
     & 0.2157985E+00, 0.2157985E+00, 0.2152781E+00, 0.2144184E+00, &
     & 0.2132480E+00, 0.2122617E+00, 0.2113791E+00, 0.2108090E+00, &
     & 0.2108600E+00, 0.2113608E+00, 0.2126922E+00, 0.2150339E+00, &
     & 0.2182624E+00, 0.2217400E+00, 0.2267341E+00, 0.2332538E+00, &
     & 0.2399401E+00, 0.2472936E+00, 0.2423012E+00, 0.2423012E+00 /
      data (ref_adm( 7,iz,20, 5),iz = 1,20) / &
     & 0.2159430E+00, 0.2159430E+00, 0.2159174E+00, 0.2154979E+00, &
     & 0.2146867E+00, 0.2137932E+00, 0.2131120E+00, 0.2125610E+00, &
     & 0.2125724E+00, 0.2130694E+00, 0.2141791E+00, 0.2164549E+00, &
     & 0.2194041E+00, 0.2225215E+00, 0.2273425E+00, 0.2333795E+00, &
     & 0.2396849E+00, 0.2464118E+00, 0.2412580E+00, 0.2412580E+00 /
      data (ref_adm( 7,iz,21, 5),iz = 1,20) / &
     & 0.2160501E+00, 0.2160501E+00, 0.2164378E+00, 0.2165647E+00, &
     & 0.2161678E+00, 0.2154552E+00, 0.2149806E+00, 0.2145631E+00, &
     & 0.2144588E+00, 0.2148723E+00, 0.2158279E+00, 0.2180167E+00, &
     & 0.2207905E+00, 0.2236985E+00, 0.2280221E+00, 0.2337606E+00, &
     & 0.2397721E+00, 0.2459204E+00, 0.2403807E+00, 0.2403807E+00 /
      data (ref_adm( 7,iz,22, 5),iz = 1,20) / &
     & 0.2191403E+00, 0.2191403E+00, 0.1944620E+00, 0.1921414E+00, &
     & 0.1941911E+00, 0.2002929E+00, 0.2030329E+00, 0.2013175E+00, &
     & 0.2005328E+00, 0.2010082E+00, 0.2038347E+00, 0.2102432E+00, &
     & 0.2188477E+00, 0.2275938E+00, 0.2402905E+00, 0.2555179E+00, &
     & 0.2682375E+00, 0.2729033E+00, 0.2486209E+00, 0.2486209E+00 /
      data (ref_adm( 7,iz,23, 5),iz = 1,20) / &
     & 0.2194759E+00, 0.2194759E+00, 0.1947850E+00, 0.1923479E+00, &
     & 0.1939079E+00, 0.2001224E+00, 0.2025300E+00, 0.2016191E+00, &
     & 0.2008774E+00, 0.2011775E+00, 0.2039901E+00, 0.2101626E+00, &
     & 0.2188527E+00, 0.2275520E+00, 0.2400586E+00, 0.2551728E+00, &
     & 0.2677289E+00, 0.2723528E+00, 0.2484287E+00, 0.2484287E+00 /
      data (ref_adm( 7,iz,24, 5),iz = 1,20) / &
     & 0.2198543E+00, 0.2198543E+00, 0.1951543E+00, 0.1926307E+00, &
     & 0.1938347E+00, 0.1999434E+00, 0.2077500E+00, 0.2017286E+00, &
     & 0.2012966E+00, 0.2013836E+00, 0.2041827E+00, 0.2104036E+00, &
     & 0.2188650E+00, 0.2276331E+00, 0.2398980E+00, 0.2549816E+00, &
     & 0.2675295E+00, 0.2721231E+00, 0.2482168E+00, 0.2482168E+00 /
      data (ref_adm( 7,iz,25, 5),iz = 1,20) / &
     & 0.2202348E+00, 0.2202348E+00, 0.1952508E+00, 0.1927147E+00, &
     & 0.2831500E+00, 0.1999624E+00, 0.2035692E+00, 0.2021835E+00, &
     & 0.2014055E+00, 0.2016878E+00, 0.2043694E+00, 0.2104404E+00, &
     & 0.2190185E+00, 0.2273006E+00, 0.2398240E+00, 0.2548261E+00, &
     & 0.2670488E+00, 0.2716633E+00, 0.2480408E+00, 0.2480408E+00 /
      data (ref_adm( 7,iz,26, 5),iz = 1,20) / &
     & 0.2208048E+00, 0.2208048E+00, 0.1958434E+00, 0.1927931E+00, &
     & 0.1937016E+00, 0.1996632E+00, 0.2034996E+00, 0.2024235E+00, &
     & 0.2017857E+00, 0.2020459E+00, 0.2046105E+00, 0.2105473E+00, &
     & 0.2190272E+00, 0.2274363E+00, 0.2396263E+00, 0.2546393E+00, &
     & 0.2667532E+00, 0.2714007E+00, 0.2478465E+00, 0.2478465E+00 /
      data (ref_adm( 7,iz,27, 5),iz = 1,20) / &
     & 0.2129600E+00, 0.2129600E+00, 0.2141600E+00, 0.2260200E+00, &
     & 0.1938392E+00, 0.1997388E+00, 0.2037765E+00, 0.2223400E+00, &
     & 0.2020236E+00, 0.2022768E+00, 0.2047542E+00, 0.2105411E+00, &
     & 0.2191714E+00, 0.2274519E+00, 0.2393790E+00, 0.2542765E+00, &
     & 0.2664344E+00, 0.2710072E+00, 0.2477001E+00, 0.2477001E+00 /
      data (ref_adm( 7,iz,28, 5),iz = 1,20) / &
     & 0.2217059E+00, 0.2217059E+00, 0.2163300E+00, 0.1930091E+00, &
     & 0.2289100E+00, 0.1994510E+00, 0.2036954E+00, 0.2029531E+00, &
     & 0.2023341E+00, 0.2025200E+00, 0.2049008E+00, 0.2107788E+00, &
     & 0.2192253E+00, 0.2274300E+00, 0.2394250E+00, 0.2541585E+00, &
     & 0.2662129E+00, 0.2707782E+00, 0.2474981E+00, 0.2474981E+00 /
      data (ref_adm( 7,iz,29, 5),iz = 1,20) / &
     & 0.2225109E+00, 0.2225109E+00, 0.1978251E+00, 0.1934920E+00, &
     & 0.1941034E+00, 0.1993147E+00, 0.2036863E+00, 0.2032695E+00, &
     & 0.2025438E+00, 0.2026452E+00, 0.2050693E+00, 0.2108751E+00, &
     & 0.2192491E+00, 0.2273821E+00, 0.2392526E+00, 0.2540504E+00, &
     & 0.2659608E+00, 0.2704978E+00, 0.2473401E+00, 0.2473401E+00 /
      data (ref_adm( 7,iz,30, 5),iz = 1,20) / &
     & 0.2233027E+00, 0.2233027E+00, 0.1356700E+00, 0.1935539E+00, &
     & 0.1940922E+00, 0.1992170E+00, 0.2037655E+00, 0.2034778E+00, &
     & 0.2027983E+00, 0.2029673E+00, 0.2051653E+00, 0.2109273E+00, &
     & 0.2192735E+00, 0.2274610E+00, 0.2391569E+00, 0.2539263E+00, &
     & 0.2657743E+00, 0.2702664E+00, 0.2472124E+00, 0.2472124E+00 /
      data (ref_adm( 7,iz,31, 5),iz = 1,20) / &
     & 0.2237400E+00, 0.2237400E+00, 0.1992283E+00, 0.1935511E+00, &
     & 0.1632200E+00, 0.1991570E+00, 0.2037449E+00, 0.2036694E+00, &
     & 0.2029392E+00, 0.2030405E+00, 0.2053235E+00, 0.2110401E+00, &
     & 0.2193673E+00, 0.2273859E+00, 0.2391023E+00, 0.2537663E+00, &
     & 0.2654335E+00, 0.2700647E+00, 0.2470786E+00, 0.2470786E+00 /
      data (ref_adm( 7,iz,32, 5),iz = 1,20) / &
     & 0.2213500E+00, 0.2213500E+00, 0.2004845E+00, 0.1938818E+00, &
     & 0.1940709E+00, 0.1990128E+00, 0.2037140E+00, 0.2038912E+00, &
     & 0.2030793E+00, 0.2032785E+00, 0.2054338E+00, 0.2111343E+00, &
     & 0.2194337E+00, 0.2273310E+00, 0.2390630E+00, 0.2536193E+00, &
     & 0.2652753E+00, 0.2698240E+00, 0.2469695E+00, 0.2469695E+00 /
      data (ref_adm( 7,iz,33, 5),iz = 1,20) / &
     & 0.2257906E+00, 0.2257906E+00, 0.1732500E+00, 0.1939375E+00, &
     & 0.1715200E+00, 0.1990036E+00, 0.2035751E+00, 0.2040369E+00, &
     & 0.2030823E+00, 0.2035282E+00, 0.2055493E+00, 0.2111182E+00, &
     & 0.2194187E+00, 0.2274401E+00, 0.2390464E+00, 0.2534687E+00, &
     & 0.2652110E+00, 0.2697311E+00, 0.2468829E+00, 0.2468829E+00 /
      data (ref_adm( 7,iz,34, 5),iz = 1,20) / &
     & 0.1904600E+00, 0.1904600E+00, 0.2095300E+00, 0.1941679E+00, &
     & 0.1941297E+00, 0.1989012E+00, 0.3077900E+00, 0.2041724E+00, &
     & 0.2033352E+00, 0.2036481E+00, 0.2056888E+00, 0.2112960E+00, &
     & 0.2193841E+00, 0.2274859E+00, 0.2389875E+00, 0.2533344E+00, &
     & 0.2650572E+00, 0.2695629E+00, 0.2468241E+00, 0.2468241E+00 /
      data (ref_adm( 7,iz,35, 5),iz = 1,20) / &
     & 0.2282835E+00, 0.2282835E+00, 0.1427100E+00, 0.1648000E+00, &
     & 0.2448400E+00, 0.1987880E+00, 0.2037415E+00, 0.2042622E+00, &
     & 0.2035913E+00, 0.2037028E+00, 0.2058279E+00, 0.2113459E+00, &
     & 0.2194327E+00, 0.2274734E+00, 0.2388789E+00, 0.2532319E+00, &
     & 0.2649496E+00, 0.2694016E+00, 0.2467667E+00, 0.2467667E+00 /
      data (ref_adm( 7,iz,36, 5),iz = 1,20) / &
     & 0.2090500E+00, 0.2090500E+00, 0.2366200E+00, 0.1521700E+00, &
     & 0.1943106E+00, 0.1988461E+00, 0.2036236E+00, 0.2021200E+00, &
     & 0.2034695E+00, 0.2038292E+00, 0.2058016E+00, 0.2113271E+00, &
     & 0.2194754E+00, 0.2275311E+00, 0.2390036E+00, 0.2533817E+00, &
     & 0.2649398E+00, 0.2693149E+00, 0.2467326E+00, 0.2467326E+00 /
      data (ref_adm( 7,iz,37, 5),iz = 1,20) / &
     & 0.2028100E+00, 0.2028100E+00, 0.2053079E+00, 0.1482700E+00, &
     & 0.1942894E+00, 0.1987566E+00, 0.2037325E+00, 0.2041516E+00, &
     & 0.2035307E+00, 0.2038101E+00, 0.2058962E+00, 0.2111732E+00, &
     & 0.2194895E+00, 0.2276305E+00, 0.2389404E+00, 0.2533128E+00, &
     & 0.2650849E+00, 0.2694297E+00, 0.2467000E+00, 0.2467000E+00 /
      data (ref_adm( 7,iz,38, 5),iz = 1,20) / &
     & 0.2028100E+00, 0.2028100E+00, 0.2053079E+00, 0.1482700E+00, &
     & 0.1942894E+00, 0.1987566E+00, 0.2037325E+00, 0.2041516E+00, &
     & 0.2035307E+00, 0.2038101E+00, 0.2058962E+00, 0.2111732E+00, &
     & 0.2194895E+00, 0.2276305E+00, 0.2389404E+00, 0.2533128E+00, &
     & 0.2650849E+00, 0.2694297E+00, 0.2467000E+00, 0.2467000E+00 /
! Solar Zenith Angle 25.0 Albedo  0.1627348E+00
      data (ref_adm( 7,iz, 1, 6),iz = 1,20) / &
     & 0.1375400E+00, 0.1375400E+00, 0.1453679E+00, 0.1423397E+00, &
     & 0.1559900E+00, 0.1498600E+00, 0.1735000E+00, 0.1354324E+00, &
     & 0.1349100E+00, 0.1351720E+00, 0.1363192E+00, 0.1388060E+00, &
     & 0.1425976E+00, 0.1467069E+00, 0.1527793E+00, 0.1615001E+00, &
     & 0.1712415E+00, 0.1841837E+00, 0.1921593E+00, 0.1921593E+00 /
      data (ref_adm( 7,iz, 2, 6),iz = 1,20) / &
     & 0.1375400E+00, 0.1375400E+00, 0.1453679E+00, 0.1423397E+00, &
     & 0.1559900E+00, 0.1498600E+00, 0.1735000E+00, 0.1354324E+00, &
     & 0.1349100E+00, 0.1351720E+00, 0.1363192E+00, 0.1388060E+00, &
     & 0.1425976E+00, 0.1467069E+00, 0.1527793E+00, 0.1615001E+00, &
     & 0.1712415E+00, 0.1841837E+00, 0.1921593E+00, 0.1921593E+00 /
      data (ref_adm( 7,iz, 3, 6),iz = 1,20) / &
     & 0.1507679E+00, 0.1507679E+00, 0.1334700E+00, 0.1423622E+00, &
     & 0.1404676E+00, 0.1385549E+00, 0.1367119E+00, 0.1401600E+00, &
     & 0.1669900E+00, 0.1186000E+00, 0.1363502E+00, 0.1142500E+00, &
     & 0.1426158E+00, 0.1466770E+00, 0.1527869E+00, 0.1614736E+00, &
     & 0.1712294E+00, 0.1841415E+00, 0.2970181E-08, 0.2970181E-08 /
      data (ref_adm( 7,iz, 4, 6),iz = 1,20) / &
     & 0.1507815E+00, 0.1507815E+00, 0.1853400E+00, 0.1424157E+00, &
     & 0.1405186E+00, 0.1386305E+00, 0.1367532E+00, 0.1457600E+00, &
     & 0.1214100E+00, 0.1252200E+00, 0.1363886E+00, 0.1210500E+00, &
     & 0.1426664E+00, 0.1466759E+00, 0.1528627E+00, 0.1615198E+00, &
     & 0.1711763E+00, 0.1840073E+00, 0.1921118E+00, 0.1921118E+00 /
      data (ref_adm( 7,iz, 5, 6),iz = 1,20) / &
     & 0.1455900E+00, 0.1455900E+00, 0.1935800E+00, 0.1424975E+00, &
     & 0.1406017E+00, 0.1401100E+00, 0.1368780E+00, 0.1320900E+00, &
     & 0.1350890E+00, 0.1204400E+00, 0.1364802E+00, 0.1389626E+00, &
     & 0.1427324E+00, 0.1467872E+00, 0.1528678E+00, 0.1615114E+00, &
     & 0.1712436E+00, 0.1840678E+00, 0.1919978E+00, 0.1919978E+00 /
      data (ref_adm( 7,iz, 6, 6),iz = 1,20) / &
     & 0.1447300E+00, 0.1447300E+00, 0.1600600E+00, 0.1425963E+00, &
     & 0.1570800E+00, 0.1388262E+00, 0.1369904E+00, 0.1357813E+00, &
     & 0.1352202E+00, 0.1354877E+00, 0.1250400E+00, 0.1390920E+00, &
     & 0.1428269E+00, 0.1468298E+00, 0.1529424E+00, 0.1615130E+00, &
     & 0.1712107E+00, 0.1839911E+00, 0.1919084E+00, 0.1919084E+00 /
      data (ref_adm( 7,iz, 7, 6),iz = 1,20) / &
     & 0.1418500E+00, 0.1418500E+00, 0.1612600E+00, 0.1272800E+00, &
     & 0.1407866E+00, 0.1389790E+00, 0.1371478E+00, 0.1652100E+00, &
     & 0.1353854E+00, 0.1356382E+00, 0.1367215E+00, 0.1392347E+00, &
     & 0.1429154E+00, 0.1469098E+00, 0.1529883E+00, 0.1615961E+00, &
     & 0.1712025E+00, 0.1839617E+00, 0.1917777E+00, 0.1917777E+00 /
      data (ref_adm( 7,iz, 8, 6),iz = 1,20) / &
     & 0.1347200E+00, 0.1347200E+00, 0.1806900E+00, 0.1309200E+00, &
     & 0.1409009E+00, 0.1391580E+00, 0.1417400E+00, 0.1361075E+00, &
     & 0.1252000E+00, 0.1358200E+00, 0.1250400E+00, 0.1393647E+00, &
     & 0.1430285E+00, 0.1470239E+00, 0.1530394E+00, 0.1616320E+00, &
     & 0.1711864E+00, 0.1838931E+00, 0.1915481E+00, 0.1915481E+00 /
      data (ref_adm( 7,iz, 9, 6),iz = 1,20) / &
     & 0.1367600E+00, 0.1367600E+00, 0.1459928E+00, 0.1429727E+00, &
     & 0.1410716E+00, 0.1393780E+00, 0.1375561E+00, 0.1668300E+00, &
     & 0.1357842E+00, 0.1360098E+00, 0.1370489E+00, 0.1395306E+00, &
     & 0.1431892E+00, 0.1471400E+00, 0.1531461E+00, 0.1616627E+00, &
     & 0.1711737E+00, 0.1838060E+00, 0.1913958E+00, 0.1913958E+00 /
      data (ref_adm( 7,iz,10, 6),iz = 1,20) / &
     & 0.1568200E+00, 0.1568200E+00, 0.1512100E+00, 0.1389600E+00, &
     & 0.1670600E+00, 0.1473300E+00, 0.1481200E+00, 0.1365983E+00, &
     & 0.1360252E+00, 0.1362381E+00, 0.1372720E+00, 0.1465800E+00, &
     & 0.1433640E+00, 0.1472854E+00, 0.1244200E+00, 0.1617180E+00, &
     & 0.1711705E+00, 0.1837409E+00, 0.1911990E+00, 0.1911990E+00 /
      data (ref_adm( 7,iz,11, 6),iz = 1,20) / &
     & 0.1297200E+00, 0.1297200E+00, 0.1864600E+00, 0.1433423E+00, &
     & 0.1458500E+00, 0.1342100E+00, 0.1445900E+00, 0.1480100E+00, &
     & 0.1325400E+00, 0.1365211E+00, 0.1375146E+00, 0.1399677E+00, &
     & 0.1435400E+00, 0.1474492E+00, 0.1533856E+00, 0.1618047E+00, &
     & 0.1711779E+00, 0.1836720E+00, 0.1909803E+00, 0.1909803E+00 /
      data (ref_adm( 7,iz,12, 6),iz = 1,20) / &
     & 0.1626600E+00, 0.1626600E+00, 0.1466126E+00, 0.1275300E+00, &
     & 0.1416727E+00, 0.1135500E+00, 0.1188500E+00, 0.1143200E+00, &
     & 0.1471900E+00, 0.1280200E+00, 0.1480300E+00, 0.1402140E+00, &
     & 0.1437649E+00, 0.1476062E+00, 0.1535290E+00, 0.1618639E+00, &
     & 0.1711849E+00, 0.1836163E+00, 0.1907479E+00, 0.1907479E+00 /
      data (ref_adm( 7,iz,13, 6),iz = 1,20) / &
     & 0.1514042E+00, 0.1514042E+00, 0.1468292E+00, 0.1437851E+00, &
     & 0.1419188E+00, 0.1404187E+00, 0.1385300E+00, 0.1336200E+00, &
     & 0.1248000E+00, 0.1371009E+00, 0.1172600E+00, 0.1404887E+00, &
     & 0.1439951E+00, 0.1477317E+00, 0.1536986E+00, 0.1619513E+00, &
     & 0.1712025E+00, 0.1834912E+00, 0.1905126E+00, 0.1905126E+00 /
      data (ref_adm( 7,iz,14, 6),iz = 1,20) / &
     & 0.1515090E+00, 0.1515090E+00, 0.1470629E+00, 0.1440467E+00, &
     & 0.1433800E+00, 0.1457800E+00, 0.1390640E+00, 0.1078400E+00, &
     & 0.1372455E+00, 0.1371800E+00, 0.1383681E+00, 0.1407630E+00, &
     & 0.1442442E+00, 0.1480118E+00, 0.1538295E+00, 0.1620103E+00, &
     & 0.1712600E+00, 0.1834307E+00, 0.1903015E+00, 0.1903015E+00 /
      data (ref_adm( 7,iz,15, 6),iz = 1,20) / &
     & 0.1807100E+00, 0.1807100E+00, 0.1728700E+00, 0.1468200E+00, &
     & 0.1424263E+00, 0.1410729E+00, 0.1394695E+00, 0.1382532E+00, &
     & 0.1170000E+00, 0.1377935E+00, 0.1386718E+00, 0.1410503E+00, &
     & 0.1444849E+00, 0.9222300E-01, 0.1540033E+00, 0.1620814E+00, &
     & 0.1712314E+00, 0.1833113E+00, 0.1900768E+00, 0.1900768E+00 /
      data (ref_adm( 7,iz,16, 6),iz = 1,20) / &
     & 0.1586400E+00, 0.1586400E+00, 0.1468100E+00, 0.1492000E+00, &
     & 0.1427270E+00, 0.1413782E+00, 0.1398287E+00, 0.1450600E+00, &
     & 0.1089700E+00, 0.1381531E+00, 0.1390262E+00, 0.1413987E+00, &
     & 0.1447507E+00, 0.1484574E+00, 0.1542106E+00, 0.1622445E+00, &
     & 0.1713311E+00, 0.1832846E+00, 0.1898312E+00, 0.1898312E+00 /
      data (ref_adm( 7,iz,17, 6),iz = 1,20) / &
     & 0.1400100E+00, 0.1400100E+00, 0.1458500E+00, 0.1275500E+00, &
     & 0.1618600E+00, 0.1417696E+00, 0.1402697E+00, 0.1390630E+00, &
     & 0.1384035E+00, 0.1385235E+00, 0.1394200E+00, 0.1416989E+00, &
     & 0.1450600E+00, 0.1486838E+00, 0.1543965E+00, 0.1623627E+00, &
     & 0.1713187E+00, 0.1831561E+00, 0.1896315E+00, 0.1896315E+00 /
      data (ref_adm( 7,iz,18, 6),iz = 1,20) / &
     & 0.1388300E+00, 0.1388300E+00, 0.1546995E+00, 0.1521100E+00, &
     & 0.1503381E+00, 0.1490643E+00, 0.1475678E+00, 0.1464191E+00, &
     & 0.1458738E+00, 0.1460918E+00, 0.1470940E+00, 0.1496456E+00, &
     & 0.1532567E+00, 0.1571764E+00, 0.1632377E+00, 0.1717163E+00, &
     & 0.1813217E+00, 0.1938486E+00, 0.2007114E+00, 0.2007114E+00 /
      data (ref_adm( 7,iz,19, 6),iz = 1,20) / &
     & 0.1580596E+00, 0.1580596E+00, 0.2057400E+00, 0.1526047E+00, &
     & 0.1508252E+00, 0.1447900E+00, 0.1482650E+00, 0.1357700E+00, &
     & 0.1465163E+00, 0.1467071E+00, 0.1477102E+00, 0.1501941E+00, &
     & 0.1537425E+00, 0.1575822E+00, 0.1635803E+00, 0.1719237E+00, &
     & 0.1814096E+00, 0.1937826E+00, 0.2003891E+00, 0.2003891E+00 /
      data (ref_adm( 7,iz,20, 6),iz = 1,20) / &
     & 0.1557700E+00, 0.1557700E+00, 0.1459500E+00, 0.1530673E+00, &
     & 0.1492100E+00, 0.1501924E+00, 0.1489258E+00, 0.1477733E+00, &
     & 0.1472154E+00, 0.1473582E+00, 0.1483105E+00, 0.1507441E+00, &
     & 0.1542528E+00, 0.1580026E+00, 0.1639128E+00, 0.1721543E+00, &
     & 0.1814650E+00, 0.1936081E+00, 0.2001311E+00, 0.2001311E+00 /
      data (ref_adm( 7,iz,21, 6),iz = 1,20) / &
     & 0.1583990E+00, 0.1583990E+00, 0.1560820E+00, 0.1536165E+00, &
     & 0.1517772E+00, 0.1507656E+00, 0.1496111E+00, 0.1484503E+00, &
     & 0.1479291E+00, 0.1480456E+00, 0.1489586E+00, 0.1513248E+00, &
     & 0.1475800E+00, 0.1585016E+00, 0.1642537E+00, 0.1724141E+00, &
     & 0.1816288E+00, 0.1934837E+00, 0.1998620E+00, 0.1998620E+00 /
      data (ref_adm( 7,iz,22, 6),iz = 1,20) / &
     & 0.1744000E+00, 0.1744000E+00, 0.1655800E+00, 0.1740958E+00, &
     & 0.1741395E+00, 0.1738885E+00, 0.1492100E+00, 0.1727661E+00, &
     & 0.1724014E+00, 0.1723418E+00, 0.1727024E+00, 0.1737624E+00, &
     & 0.1754341E+00, 0.1771545E+00, 0.1799507E+00, 0.1840525E+00, &
     & 0.1885052E+00, 0.1941868E+00, 0.1922630E+00, 0.1922630E+00 /
      data (ref_adm( 7,iz,23, 6),iz = 1,20) / &
     & 0.1808200E+00, 0.1808200E+00, 0.1747600E+00, 0.1746810E+00, &
     & 0.1562000E+00, 0.1749389E+00, 0.2226000E+00, 0.2225900E+00, &
     & 0.1737767E+00, 0.1736573E+00, 0.1519900E+00, 0.1748852E+00, &
     & 0.1764878E+00, 0.1780764E+00, 0.1806603E+00, 0.1845069E+00, &
     & 0.1887495E+00, 0.1940625E+00, 0.1918852E+00, 0.1918852E+00 /
      data (ref_adm( 7,iz,24, 6),iz = 1,20) / &
     & 0.1737643E+00, 0.1737643E+00, 0.1747259E+00, 0.1628600E+00, &
     & 0.1045100E+00, 0.1464300E+00, 0.1061000E+00, 0.2108600E+00, &
     & 0.1752039E+00, 0.1750686E+00, 0.1752873E+00, 0.1761240E+00, &
     & 0.1775912E+00, 0.1790996E+00, 0.1814912E+00, 0.1850802E+00, &
     & 0.1891614E+00, 0.1940675E+00, 0.1915762E+00, 0.1915762E+00 /
      data (ref_adm( 7,iz,25, 6),iz = 1,20) / &
     & 0.1738626E+00, 0.1738626E+00, 0.1751439E+00, 0.1610800E+00, &
     & 0.1764672E+00, 0.1769130E+00, 0.1618700E+00, 0.1769494E+00, &
     & 0.1766321E+00, 0.1765141E+00, 0.1766384E+00, 0.1774121E+00, &
     & 0.1787157E+00, 0.1802086E+00, 0.1823730E+00, 0.1857761E+00, &
     & 0.1896845E+00, 0.1940987E+00, 0.1915699E+00, 0.1915699E+00 /
      data (ref_adm( 7,iz,26, 6),iz = 1,20) / &
     & 0.1204400E+00, 0.1204400E+00, 0.1755528E+00, 0.1765740E+00, &
     & 0.1772985E+00, 0.1778524E+00, 0.1783167E+00, 0.1452000E+00, &
     & 0.1781195E+00, 0.1780061E+00, 0.1780914E+00, 0.1787439E+00, &
     & 0.1799053E+00, 0.1813281E+00, 0.1834206E+00, 0.1864468E+00, &
     & 0.1901575E+00, 0.1942550E+00, 0.1915540E+00, 0.1915540E+00 /
      data (ref_adm( 7,iz,27, 6),iz = 1,20) / &
     & 0.1740503E+00, 0.1740503E+00, 0.1760241E+00, 0.1773573E+00, &
     & 0.1782054E+00, 0.1787708E+00, 0.1701500E+00, 0.1797592E+00, &
     & 0.1796173E+00, 0.1794620E+00, 0.1795442E+00, 0.1801208E+00, &
     & 0.1811332E+00, 0.1824269E+00, 0.1844634E+00, 0.1872805E+00, &
     & 0.1907045E+00, 0.1945326E+00, 0.1916708E+00, 0.1916708E+00 /
      data (ref_adm( 7,iz,28, 6),iz = 1,20) / &
     & 0.1741318E+00, 0.1741318E+00, 0.1764569E+00, 0.1781144E+00, &
     & 0.1791975E+00, 0.1798281E+00, 0.1804172E+00, 0.1809673E+00, &
     & 0.1811144E+00, 0.1809306E+00, 0.1810191E+00, 0.1814201E+00, &
     & 0.1823970E+00, 0.1835596E+00, 0.1855597E+00, 0.1882051E+00, &
     & 0.1913600E+00, 0.1949787E+00, 0.1917489E+00, 0.1917489E+00 /
      data (ref_adm( 7,iz,29, 6),iz = 1,20) / &
     & 0.1742149E+00, 0.1742149E+00, 0.1959900E+00, 0.1511300E+00, &
     & 0.1802656E+00, 0.1570300E+00, 0.1814342E+00, 0.1820683E+00, &
     & 0.1824865E+00, 0.1823916E+00, 0.1824397E+00, 0.1827442E+00, &
     & 0.1836600E+00, 0.1846929E+00, 0.1865614E+00, 0.1890933E+00, &
     & 0.1920539E+00, 0.1953675E+00, 0.1919798E+00, 0.1919798E+00 /
      data (ref_adm( 7,iz,30, 6),iz = 1,20) / &
     & 0.1438000E+00, 0.1438000E+00, 0.1883100E+00, 0.1871100E+00, &
     & 0.1472400E+00, 0.1581300E+00, 0.1704800E+00, 0.1790500E+00, &
     & 0.1836392E+00, 0.1709400E+00, 0.1837648E+00, 0.1841143E+00, &
     & 0.1848796E+00, 0.1858579E+00, 0.1876175E+00, 0.1900395E+00, &
     & 0.1927670E+00, 0.1958219E+00, 0.1922256E+00, 0.1922256E+00 /
      data (ref_adm( 7,iz,31, 6),iz = 1,20) / &
     & 0.1459500E+00, 0.1459500E+00, 0.2116600E+00, 0.1806738E+00, &
     & 0.1827173E+00, 0.1835421E+00, 0.1837096E+00, 0.1633600E+00, &
     & 0.2478100E+00, 0.1850864E+00, 0.1908800E+00, 0.1853621E+00, &
     & 0.1860040E+00, 0.1869710E+00, 0.1885390E+00, 0.1909389E+00, &
     & 0.1935244E+00, 0.1961882E+00, 0.1925611E+00, 0.1925611E+00 /
      data (ref_adm( 7,iz,32, 6),iz = 1,20) / &
     & 0.1744471E+00, 0.1744471E+00, 0.1781528E+00, 0.1814680E+00, &
     & 0.1047800E+00, 0.1849191E+00, 0.1849388E+00, 0.1850043E+00, &
     & 0.1463700E+00, 0.1861547E+00, 0.2266500E+00, 0.1864890E+00, &
     & 0.1870279E+00, 0.1879370E+00, 0.1893908E+00, 0.1917565E+00, &
     & 0.1941644E+00, 0.1966304E+00, 0.1929856E+00, 0.1929856E+00 /
      data (ref_adm( 7,iz,33, 6),iz = 1,20) / &
     & 0.1735700E+00, 0.1735700E+00, 0.1784697E+00, 0.1822827E+00, &
     & 0.1915200E+00, 0.1863258E+00, 0.2380700E+00, 0.1859098E+00, &
     & 0.1863434E+00, 0.1870629E+00, 0.1872688E+00, 0.1874972E+00, &
     & 0.1880220E+00, 0.1888476E+00, 0.1902228E+00, 0.1925291E+00, &
     & 0.1947882E+00, 0.1970823E+00, 0.1933414E+00, 0.1933414E+00 /
      data (ref_adm( 7,iz,34, 6),iz = 1,20) / &
     & 0.1685700E+00, 0.1685700E+00, 0.1788221E+00, 0.1830405E+00, &
     & 0.1883800E+00, 0.1878658E+00, 0.1873526E+00, 0.1973100E+00, &
     & 0.1870346E+00, 0.1877697E+00, 0.1646400E+00, 0.1883039E+00, &
     & 0.1887848E+00, 0.1895403E+00, 0.1908696E+00, 0.1931028E+00, &
     & 0.1952917E+00, 0.1973231E+00, 0.1936525E+00, 0.1936525E+00 /
      data (ref_adm( 7,iz,35, 6),iz = 1,20) / &
     & 0.2193000E+00, 0.2193000E+00, 0.1742500E+00, 0.1837190E+00, &
     & 0.2518300E+00, 0.2019000E+00, 0.1883812E+00, 0.2613600E+00, &
     & 0.1875334E+00, 0.1883359E+00, 0.1888018E+00, 0.1889739E+00, &
     & 0.1894164E+00, 0.1901252E+00, 0.1914438E+00, 0.1935717E+00, &
     & 0.1957285E+00, 0.1976525E+00, 0.1939144E+00, 0.1939144E+00 /
      data (ref_adm( 7,iz,36, 6),iz = 1,20) / &
     & 0.2318100E+00, 0.2318100E+00, 0.2067500E+00, 0.1694600E+00, &
     & 0.2411300E+00, 0.1914818E+00, 0.2643200E+00, 0.1881342E+00, &
     & 0.1879423E+00, 0.1886709E+00, 0.1892749E+00, 0.1894422E+00, &
     & 0.1898444E+00, 0.1905225E+00, 0.1918034E+00, 0.1939202E+00, &
     & 0.1960719E+00, 0.1979130E+00, 0.1940866E+00, 0.1940866E+00 /
      data (ref_adm( 7,iz,37, 6),iz = 1,20) / &
     & 0.1746484E+00, 0.1746484E+00, 0.1793087E+00, 0.1928700E+00, &
     & 0.1939109E+00, 0.1695000E+00, 0.2041100E+00, 0.1884536E+00, &
     & 0.1881791E+00, 0.1888670E+00, 0.1895182E+00, 0.1793700E+00, &
     & 0.1901213E+00, 0.1907802E+00, 0.1920432E+00, 0.1941358E+00, &
     & 0.1961797E+00, 0.1980146E+00, 0.1941789E+00, 0.1941789E+00 /
      data (ref_adm( 7,iz,38, 6),iz = 1,20) / &
     & 0.1746484E+00, 0.1746484E+00, 0.1793087E+00, 0.1928700E+00, &
     & 0.1939109E+00, 0.1695000E+00, 0.2041100E+00, 0.1884536E+00, &
     & 0.1881791E+00, 0.1888670E+00, 0.1895182E+00, 0.1793700E+00, &
     & 0.1901213E+00, 0.1907802E+00, 0.1920432E+00, 0.1941358E+00, &
     & 0.1961797E+00, 0.1980146E+00, 0.1941789E+00, 0.1941789E+00 /
! Solar Zenith Angle 30.0 Albedo  0.1578872E+00
      data (ref_adm( 7,iz, 1, 7),iz = 1,20) / &
     & 0.1529806E+00, 0.1529806E+00, 0.2028400E+00, 0.1449872E+00, &
     & 0.1427368E+00, 0.1404794E+00, 0.1386533E+00, 0.1374823E+00, &
     & 0.1371168E+00, 0.1328400E+00, 0.1234700E+00, 0.1417984E+00, &
     & 0.1461252E+00, 0.1506085E+00, 0.1573283E+00, 0.1668354E+00, &
     & 0.1774952E+00, 0.1918435E+00, 0.2015094E+00, 0.2015094E+00 /
      data (ref_adm( 7,iz, 2, 7),iz = 1,20) / &
     & 0.1529806E+00, 0.1529806E+00, 0.2028400E+00, 0.1449872E+00, &
     & 0.1427368E+00, 0.1404794E+00, 0.1386533E+00, 0.1374823E+00, &
     & 0.1371168E+00, 0.1328400E+00, 0.1234700E+00, 0.1417984E+00, &
     & 0.1461252E+00, 0.1506085E+00, 0.1573283E+00, 0.1668354E+00, &
     & 0.1774952E+00, 0.1918435E+00, 0.2015094E+00, 0.2015094E+00 /
      data (ref_adm( 7,iz, 3, 7),iz = 1,20) / &
     & 0.1420100E+00, 0.1420100E+00, 0.1478531E+00, 0.1450164E+00, &
     & 0.1116900E+00, 0.1405225E+00, 0.1243200E+00, 0.1393900E+00, &
     & 0.1294300E+00, 0.1376305E+00, 0.1357600E+00, 0.1418619E+00, &
     & 0.1461563E+00, 0.1505674E+00, 0.1573429E+00, 0.1668150E+00, &
     & 0.1774440E+00, 0.1917399E+00, 0.3114391E-08, 0.3114391E-08 /
      data (ref_adm( 7,iz, 4, 7),iz = 1,20) / &
     & 0.1530020E+00, 0.1530020E+00, 0.1856100E+00, 0.1822800E+00, &
     & 0.1428382E+00, 0.1188100E+00, 0.1387674E+00, 0.1376250E+00, &
     & 0.1348700E+00, 0.1377196E+00, 0.1390265E+00, 0.1419425E+00, &
     & 0.1462134E+00, 0.1506135E+00, 0.1574072E+00, 0.1668563E+00, &
     & 0.1774168E+00, 0.1916374E+00, 0.2013763E+00, 0.2013763E+00 /
      data (ref_adm( 7,iz, 5, 7),iz = 1,20) / &
     & 0.1440400E+00, 0.1440400E+00, 0.1479938E+00, 0.1950500E+00, &
     & 0.1335000E+00, 0.1378700E+00, 0.1436500E+00, 0.1298400E+00, &
     & 0.1373504E+00, 0.1378294E+00, 0.1984300E+00, 0.1420213E+00, &
     & 0.1462845E+00, 0.1507133E+00, 0.1574289E+00, 0.1668798E+00, &
     & 0.1774561E+00, 0.1916069E+00, 0.2011879E+00, 0.2011879E+00 /
      data (ref_adm( 7,iz, 6, 7),iz = 1,20) / &
     & 0.1531117E+00, 0.1531117E+00, 0.1481017E+00, 0.1452917E+00, &
     & 0.1361300E+00, 0.1493800E+00, 0.1403600E+00, 0.1379365E+00, &
     & 0.1375295E+00, 0.1379990E+00, 0.1334200E+00, 0.1421631E+00, &
     & 0.1463907E+00, 0.1507942E+00, 0.1574898E+00, 0.1668751E+00, &
     & 0.1774142E+00, 0.1914778E+00, 0.2010046E+00, 0.2010046E+00 /
      data (ref_adm( 7,iz, 7, 7),iz = 1,20) / &
     & 0.1531396E+00, 0.1531396E+00, 0.1419300E+00, 0.1454297E+00, &
     & 0.1487800E+00, 0.1313800E+00, 0.1392955E+00, 0.1381536E+00, &
     & 0.1377563E+00, 0.1381948E+00, 0.1394883E+00, 0.1230700E+00, &
     & 0.1465072E+00, 0.1508893E+00, 0.1575732E+00, 0.1669337E+00, &
     & 0.1773823E+00, 0.1913772E+00, 0.2007228E+00, 0.2007228E+00 /
      data (ref_adm( 7,iz, 8, 7),iz = 1,20) / &
     & 0.1532069E+00, 0.1532069E+00, 0.1334100E+00, 0.1456019E+00, &
     & 0.1310000E+00, 0.1413840E+00, 0.1395766E+00, 0.1384049E+00, &
     & 0.1380086E+00, 0.1384303E+00, 0.1397034E+00, 0.1425177E+00, &
     & 0.1466604E+00, 0.1510614E+00, 0.1576280E+00, 0.1669224E+00, &
     & 0.1773043E+00, 0.1911671E+00, 0.2004043E+00, 0.2004043E+00 /
      data (ref_adm( 7,iz, 9, 7),iz = 1,20) / &
     & 0.1533037E+00, 0.1533037E+00, 0.1977500E+00, 0.1592500E+00, &
     & 0.1437089E+00, 0.1416805E+00, 0.1398779E+00, 0.1387051E+00, &
     & 0.1220600E+00, 0.1387094E+00, 0.1399712E+00, 0.1427631E+00, &
     & 0.1468524E+00, 0.1512210E+00, 0.1577191E+00, 0.1236400E+00, &
     & 0.1772983E+00, 0.1909923E+00, 0.2000451E+00, 0.2000451E+00 /
      data (ref_adm( 7,iz,10, 7),iz = 1,20) / &
     & 0.1464500E+00, 0.1464500E+00, 0.1697500E+00, 0.1369500E+00, &
     & 0.1350600E+00, 0.1886800E+00, 0.1402508E+00, 0.1390629E+00, &
     & 0.1069100E+00, 0.1390151E+00, 0.1034000E+00, 0.1430386E+00, &
     & 0.1470806E+00, 0.1514030E+00, 0.1578464E+00, 0.1670099E+00, &
     & 0.1772451E+00, 0.1908604E+00, 0.1996437E+00, 0.1996437E+00 /
      data (ref_adm( 7,iz,11, 7),iz = 1,20) / &
     & 0.1159100E+00, 0.1159100E+00, 0.1906800E+00, 0.1646600E+00, &
     & 0.1442943E+00, 0.8487000E-01, 0.1418500E+00, 0.1394459E+00, &
     & 0.1389892E+00, 0.1062500E+00, 0.1405987E+00, 0.1433283E+00, &
     & 0.1473082E+00, 0.1515800E+00, 0.1580247E+00, 0.1671186E+00, &
     & 0.1772410E+00, 0.1907019E+00, 0.1992360E+00, 0.1992360E+00 /
      data (ref_adm( 7,iz,12, 7),iz = 1,20) / &
     & 0.1111300E+00, 0.1111300E+00, 0.1442500E+00, 0.1327900E+00, &
     & 0.1315200E+00, 0.1855000E+00, 0.1332900E+00, 0.1453500E+00, &
     & 0.2164700E+00, 0.1672600E+00, 0.1409824E+00, 0.2225100E+00, &
     & 0.1613800E+00, 0.1518213E+00, 0.1581741E+00, 0.1671618E+00, &
     & 0.1772074E+00, 0.1905378E+00, 0.1987711E+00, 0.1987711E+00 /
      data (ref_adm( 7,iz,13, 7),iz = 1,20) / &
     & 0.1211800E+00, 0.1211800E+00, 0.1231600E+00, 0.8950200E-01, &
     & 0.1007900E+00, 0.1290600E+00, 0.1236900E+00, 0.1410700E+00, &
     & 0.1311100E+00, 0.1560700E+00, 0.1516100E+00, 0.1733000E+00, &
     & 0.1326300E+00, 0.1613000E+00, 0.1583609E+00, 0.1672586E+00, &
     & 0.1771658E+00, 0.1903637E+00, 0.1983146E+00, 0.1983146E+00 /
      data (ref_adm( 7,iz,14, 7),iz = 1,20) / &
     & 0.1181000E+00, 0.1181000E+00, 0.1245100E+00, 0.1471785E+00, &
     & 0.1453625E+00, 0.9394100E-01, 0.1420121E+00, 0.1408411E+00, &
     & 0.8463900E-01, 0.1875500E+00, 0.1428200E+00, 0.1398000E+00, &
     & 0.1482568E+00, 0.1513800E+00, 0.1585847E+00, 0.1673516E+00, &
     & 0.1771932E+00, 0.1901878E+00, 0.1978631E+00, 0.1978631E+00 /
      data (ref_adm( 7,iz,15, 7),iz = 1,20) / &
     & 0.1222100E+00, 0.1222100E+00, 0.1517300E+00, 0.1475145E+00, &
     & 0.1457562E+00, 0.1442080E+00, 0.1417600E+00, 0.1941200E+00, &
     & 0.1408894E+00, 0.1411956E+00, 0.1422817E+00, 0.1448697E+00, &
     & 0.1486086E+00, 0.1280900E+00, 0.1588057E+00, 0.1674644E+00, &
     & 0.1771719E+00, 0.1900199E+00, 0.1974464E+00, 0.1974464E+00 /
      data (ref_adm( 7,iz,16, 7),iz = 1,20) / &
     & 0.1716900E+00, 0.1716900E+00, 0.2385600E+00, 0.1478964E+00, &
     & 0.1461791E+00, 0.1447024E+00, 0.1451900E+00, 0.1419753E+00, &
     & 0.1083200E+00, 0.1417349E+00, 0.1427745E+00, 0.1453466E+00, &
     & 0.1490006E+00, 0.1529819E+00, 0.1590866E+00, 0.1676373E+00, &
     & 0.1772244E+00, 0.1899005E+00, 0.1970184E+00, 0.1970184E+00 /
      data (ref_adm( 7,iz,17, 7),iz = 1,20) / &
     & 0.2307400E+00, 0.2307400E+00, 0.1651000E+00, 0.1483354E+00, &
     & 0.1465997E+00, 0.1761600E+00, 0.1318400E+00, 0.1425955E+00, &
     & 0.1420292E+00, 0.1422933E+00, 0.1433185E+00, 0.1164100E+00, &
     & 0.1494486E+00, 0.1533114E+00, 0.1593582E+00, 0.1677796E+00, &
     & 0.1772583E+00, 0.1897162E+00, 0.1966595E+00, 0.1966595E+00 /
      data (ref_adm( 7,iz,18, 7),iz = 1,20) / &
     & 0.9771800E-01, 0.9771800E-01, 0.1435501E+00, 0.9368900E-01, &
     & 0.1415908E+00, 0.1404930E+00, 0.1624000E+00, 0.1395252E+00, &
     & 0.1399169E+00, 0.1409390E+00, 0.1428428E+00, 0.1461677E+00, &
     & 0.1507870E+00, 0.1554901E+00, 0.1624244E+00, 0.1720374E+00, &
     & 0.1826415E+00, 0.1965077E+00, 0.2043386E+00, 0.2043386E+00 /
      data (ref_adm( 7,iz,19, 7),iz = 1,20) / &
     & 0.1444813E+00, 0.1444813E+00, 0.1440110E+00, 0.1434646E+00, &
     & 0.1490400E+00, 0.1459800E+00, 0.1411557E+00, 0.1380800E+00, &
     & 0.1413113E+00, 0.1423471E+00, 0.1441178E+00, 0.1474540E+00, &
     & 0.1518329E+00, 0.1563854E+00, 0.1631304E+00, 0.1724046E+00, &
     & 0.1827123E+00, 0.1960880E+00, 0.2033189E+00, 0.2033189E+00 /
      data (ref_adm( 7,iz,20, 7),iz = 1,20) / &
     & 0.1446003E+00, 0.1446003E+00, 0.1445196E+00, 0.1668200E+00, &
     & 0.1453900E+00, 0.1431671E+00, 0.1426297E+00, 0.1424770E+00, &
     & 0.1428110E+00, 0.1438536E+00, 0.1790100E+00, 0.1487800E+00, &
     & 0.1530245E+00, 0.1573790E+00, 0.1639487E+00, 0.1729525E+00, &
     & 0.1829166E+00, 0.1957494E+00, 0.2025458E+00, 0.2025458E+00 /
      data (ref_adm( 7,iz,21, 7),iz = 1,20) / &
     & 0.1432600E+00, 0.1432600E+00, 0.1450300E+00, 0.1450790E+00, &
     & 0.1449610E+00, 0.1445878E+00, 0.1441542E+00, 0.1441204E+00, &
     & 0.1444694E+00, 0.1454291E+00, 0.1470206E+00, 0.1501989E+00, &
     & 0.1543206E+00, 0.1585131E+00, 0.1648286E+00, 0.1735529E+00, &
     & 0.1832387E+00, 0.1955270E+00, 0.2019107E+00, 0.2019107E+00 /
      data (ref_adm( 7,iz,22, 7),iz = 1,20) / &
     & 0.1341278E+00, 0.1341278E+00, 0.1352805E+00, 0.1305200E+00, &
     & 0.1372079E+00, 0.1382363E+00, 0.1394439E+00, 0.9175800E-01, &
     & 0.1472300E+00, 0.1450756E+00, 0.1479461E+00, 0.1525448E+00, &
     & 0.1580246E+00, 0.1466900E+00, 0.1706791E+00, 0.1808191E+00, &
     & 0.1915676E+00, 0.2050607E+00, 0.2117127E+00, 0.2117127E+00 /
      data (ref_adm( 7,iz,23, 7),iz = 1,20) / &
     & 0.1194900E+00, 0.1194900E+00, 0.1534600E+00, 0.1551000E+00, &
     & 0.1386185E+00, 0.1400108E+00, 0.1414856E+00, 0.1431237E+00, &
     & 0.1450325E+00, 0.1775300E+00, 0.1503295E+00, 0.1548264E+00, &
     & 0.1602927E+00, 0.1555200E+00, 0.1724971E+00, 0.1822532E+00, &
     & 0.1926834E+00, 0.2053414E+00, 0.2114132E+00, 0.2114132E+00 /
      data (ref_adm( 7,iz,24, 7),iz = 1,20) / &
     & 0.1173800E+00, 0.1173800E+00, 0.1366217E+00, 0.1384077E+00, &
     & 0.1401296E+00, 0.1418351E+00, 0.1435841E+00, 0.1454599E+00, &
     & 0.1475326E+00, 0.1499609E+00, 0.1528783E+00, 0.1573378E+00, &
     & 0.1627245E+00, 0.1676871E+00, 0.1746480E+00, 0.1839691E+00, &
     & 0.1940121E+00, 0.2058615E+00, 0.2114940E+00, 0.2114940E+00 /
      data (ref_adm( 7,iz,25, 7),iz = 1,20) / &
     & 0.1346273E+00, 0.1346273E+00, 0.9960200E-01, 0.1394647E+00, &
     & 0.1399500E+00, 0.1437111E+00, 0.1457437E+00, 0.1478844E+00, &
     & 0.1501578E+00, 0.1526924E+00, 0.1555626E+00, 0.1600618E+00, &
     & 0.1652946E+00, 0.1702305E+00, 0.1770572E+00, 0.1859862E+00, &
     & 0.1954931E+00, 0.2068832E+00, 0.2118547E+00, 0.2118547E+00 /
      data (ref_adm( 7,iz,26, 7),iz = 1,20) / &
     & 0.1405300E+00, 0.1405300E+00, 0.1378948E+00, 0.1027400E+00, &
     & 0.1207500E+00, 0.1455651E+00, 0.1480182E+00, 0.1503724E+00, &
     & 0.1528482E+00, 0.1555361E+00, 0.1585025E+00, 0.1629300E+00, &
     & 0.1681337E+00, 0.1729008E+00, 0.1796758E+00, 0.1883442E+00, &
     & 0.1974657E+00, 0.2081238E+00, 0.2126150E+00, 0.2126150E+00 /
      data (ref_adm( 7,iz,27, 7),iz = 1,20) / &
     & 0.1349417E+00, 0.1349417E+00, 0.1218900E+00, 0.1338000E+00, &
     & 0.9523100E-01, 0.1383700E+00, 0.1098200E+00, 0.1529965E+00, &
     & 0.1556619E+00, 0.1595700E+00, 0.1615584E+00, 0.1659577E+00, &
     & 0.1592200E+00, 0.1757882E+00, 0.1823819E+00, 0.1909647E+00, &
     & 0.1996476E+00, 0.2095526E+00, 0.2137779E+00, 0.2137779E+00 /
      data (ref_adm( 7,iz,28, 7),iz = 1,20) / &
     & 0.1432900E+00, 0.1432900E+00, 0.1358700E+00, 0.1397400E+00, &
     & 0.2003600E+00, 0.1416800E+00, 0.1557600E+00, 0.1554518E+00, &
     & 0.1662100E+00, 0.1249000E+00, 0.1646736E+00, 0.1691274E+00, &
     & 0.1741614E+00, 0.1788261E+00, 0.1851984E+00, 0.1936515E+00, &
     & 0.2020858E+00, 0.2113539E+00, 0.2151261E+00, 0.2151261E+00 /
      data (ref_adm( 7,iz,29, 7),iz = 1,20) / &
     & 0.1137100E+00, 0.1137100E+00, 0.1477600E+00, 0.1432672E+00, &
     & 0.1539500E+00, 0.1477800E+00, 0.1483800E+00, 0.1400800E+00, &
     & 0.1391500E+00, 0.1465600E+00, 0.1678042E+00, 0.1723291E+00, &
     & 0.1773299E+00, 0.1818271E+00, 0.1881494E+00, 0.1963299E+00, &
     & 0.2046586E+00, 0.2134654E+00, 0.2166454E+00, 0.2166454E+00 /
      data (ref_adm( 7,iz,30, 7),iz = 1,20) / &
     & 0.1335500E+00, 0.1335500E+00, 0.2187800E+00, 0.1440481E+00, &
     & 0.1479944E+00, 0.1518945E+00, 0.1460700E+00, 0.1679700E+00, &
     & 0.1554500E+00, 0.1704800E+00, 0.1693300E+00, 0.1754688E+00, &
     & 0.1804977E+00, 0.1849159E+00, 0.1910720E+00, 0.1990795E+00, &
     & 0.2072760E+00, 0.2157013E+00, 0.2184863E+00, 0.2184863E+00 /
      data (ref_adm( 7,iz,31, 7),iz = 1,20) / &
     & 0.1656700E+00, 0.1656700E+00, 0.1404984E+00, 0.1556400E+00, &
     & 0.1652200E+00, 0.1533421E+00, 0.1402200E+00, 0.1615117E+00, &
     & 0.1745300E+00, 0.1695690E+00, 0.2353100E+00, 0.1820000E+00, &
     & 0.1835563E+00, 0.1879461E+00, 0.1939553E+00, 0.2017985E+00, &
     & 0.2097432E+00, 0.2179548E+00, 0.2203825E+00, 0.2203825E+00 /
      data (ref_adm( 7,iz,32, 7),iz = 1,20) / &
     & 0.1355363E+00, 0.1355363E+00, 0.1408832E+00, 0.1453634E+00, &
     & 0.1658000E+00, 0.1548582E+00, 0.1402500E+00, 0.1649900E+00, &
     & 0.1675790E+00, 0.1716093E+00, 0.1759722E+00, 0.1813341E+00, &
     & 0.1864126E+00, 0.1907866E+00, 0.1966703E+00, 0.2043106E+00, &
     & 0.2121072E+00, 0.2200556E+00, 0.2224297E+00, 0.2224297E+00 /
      data (ref_adm( 7,iz,33, 7),iz = 1,20) / &
     & 0.1314600E+00, 0.1314600E+00, 0.1411860E+00, 0.1459052E+00, &
     & 0.1747300E+00, 0.1563633E+00, 0.1616438E+00, 0.1661657E+00, &
     & 0.1840300E+00, 0.1736597E+00, 0.1779369E+00, 0.1836419E+00, &
     & 0.1890183E+00, 0.1933591E+00, 0.1991611E+00, 0.2066262E+00, &
     & 0.2142532E+00, 0.2219813E+00, 0.2243601E+00, 0.2243601E+00 /
      data (ref_adm( 7,iz,34, 7),iz = 1,20) / &
     & 0.1356748E+00, 0.1356748E+00, 0.1414544E+00, 0.1463610E+00, &
     & 0.1517668E+00, 0.1578383E+00, 0.1638285E+00, 0.1687556E+00, &
     & 0.1826000E+00, 0.1758769E+00, 0.1797062E+00, 0.1854591E+00, &
     & 0.1911649E+00, 0.1845800E+00, 0.2013100E+00, 0.2086146E+00, &
     & 0.2160761E+00, 0.2236241E+00, 0.2259325E+00, 0.2259325E+00 /
      data (ref_adm( 7,iz,35, 7),iz = 1,20) / &
     & 0.1357122E+00, 0.1357122E+00, 0.1410700E+00, 0.1467302E+00, &
     & 0.1524710E+00, 0.1591681E+00, 0.1660168E+00, 0.1714856E+00, &
     & 0.2068300E+00, 0.2191000E+00, 0.1896900E+00, 0.1868680E+00, &
     & 0.1928636E+00, 0.1661800E+00, 0.2029995E+00, 0.2102598E+00, &
     & 0.2175909E+00, 0.2249699E+00, 0.2272643E+00, 0.2272643E+00 /
      data (ref_adm( 7,iz,36, 7),iz = 1,20) / &
     & 0.1357645E+00, 0.1357645E+00, 0.1417861E+00, 0.1663400E+00, &
     & 0.1529983E+00, 0.1710300E+00, 0.1684624E+00, 0.1747409E+00, &
     & 0.2028300E+00, 0.1797011E+00, 0.1825996E+00, 0.1878774E+00, &
     & 0.1514900E+00, 0.1985005E+00, 0.2041550E+00, 0.2113807E+00, &
     & 0.2185954E+00, 0.2259224E+00, 0.2281529E+00, 0.2281529E+00 /
      data (ref_adm( 7,iz,37, 7),iz = 1,20) / &
     & 0.1375900E+00, 0.1375900E+00, 0.1372700E+00, 0.1222600E+00, &
     & 0.1532902E+00, 0.1608838E+00, 0.1711419E+00, 0.2168200E+00, &
     & 0.2294000E+00, 0.1808903E+00, 0.1833985E+00, 0.1884281E+00, &
     & 0.1945300E+00, 0.1991950E+00, 0.2048282E+00, 0.2120301E+00, &
     & 0.2191809E+00, 0.2264037E+00, 0.2286967E+00, 0.2286967E+00 /
      data (ref_adm( 7,iz,38, 7),iz = 1,20) / &
     & 0.1375900E+00, 0.1375900E+00, 0.1372700E+00, 0.1222600E+00, &
     & 0.1532902E+00, 0.1608838E+00, 0.1711419E+00, 0.2168200E+00, &
     & 0.2294000E+00, 0.1808903E+00, 0.1833985E+00, 0.1884281E+00, &
     & 0.1945300E+00, 0.1991950E+00, 0.2048282E+00, 0.2120301E+00, &
     & 0.2191809E+00, 0.2264037E+00, 0.2286967E+00, 0.2286967E+00 /
! Solar Zenith Angle 35.0 Albedo  0.1721369E+00
      data (ref_adm( 7,iz, 1, 8),iz = 1,20) / &
     & 0.1372997E+00, 0.1372997E+00, 0.9421700E-01, 0.1211200E+00, &
     & 0.1243200E+00, 0.9711900E-01, 0.1125600E+00, 0.1328500E+00, &
     & 0.1364045E+00, 0.1411657E+00, 0.1473375E+00, 0.1570807E+00, &
     & 0.1693215E+00, 0.1809350E+00, 0.1977262E+00, 0.2198901E+00, &
     & 0.2444133E+00, 0.2802545E+00, 0.3206242E+00, 0.3206242E+00 /
      data (ref_adm( 7,iz, 2, 8),iz = 1,20) / &
     & 0.1372997E+00, 0.1372997E+00, 0.9421700E-01, 0.1211200E+00, &
     & 0.1243200E+00, 0.9711900E-01, 0.1125600E+00, 0.1328500E+00, &
     & 0.1364045E+00, 0.1411657E+00, 0.1473375E+00, 0.1570807E+00, &
     & 0.1693215E+00, 0.1809350E+00, 0.1977262E+00, 0.2198901E+00, &
     & 0.2444133E+00, 0.2802545E+00, 0.3206242E+00, 0.3206242E+00 /
      data (ref_adm( 7,iz, 3, 8),iz = 1,20) / &
     & 0.1421700E+00, 0.1421700E+00, 0.1265900E+00, 0.1218500E+00, &
     & 0.1287900E+00, 0.1193500E+00, 0.1004900E+00, 0.1328782E+00, &
     & 0.1363860E+00, 0.1610000E+00, 0.1472862E+00, 0.1570503E+00, &
     & 0.2294100E+00, 0.1630100E+00, 0.1975378E+00, 0.2196883E+00, &
     & 0.2441441E+00, 0.2796525E+00, 0.4931851E-08, 0.4931851E-08 /
      data (ref_adm( 7,iz, 4, 8),iz = 1,20) / &
     & 0.1572500E+00, 0.1572500E+00, 0.1366600E+00, 0.1386800E+00, &
     & 0.1296982E+00, 0.1296073E+00, 0.1371600E+00, 0.1396500E+00, &
     & 0.1364464E+00, 0.1411798E+00, 0.1472602E+00, 0.1569166E+00, &
     & 0.1520600E+00, 0.1804476E+00, 0.1971494E+00, 0.2191653E+00, &
     & 0.2433017E+00, 0.2780281E+00, 0.3161328E+00, 0.3161328E+00 /
      data (ref_adm( 7,iz, 5, 8),iz = 1,20) / &
     & 0.1425600E+00, 0.1425600E+00, 0.1387000E+00, 0.1310996E+00, &
     & 0.1298460E+00, 0.1297372E+00, 0.1308250E+00, 0.1330585E+00, &
     & 0.1365299E+00, 0.1411934E+00, 0.1471778E+00, 0.1567310E+00, &
     & 0.1478700E+00, 0.1799247E+00, 0.1453800E+00, 0.2183062E+00, &
     & 0.2422747E+00, 0.2760847E+00, 0.3121157E+00, 0.3121157E+00 /
      data (ref_adm( 7,iz, 6, 8),iz = 1,20) / &
     & 0.1478200E+00, 0.1478200E+00, 0.1706100E+00, 0.1264600E+00, &
     & 0.1301348E+00, 0.1175000E+00, 0.1310738E+00, 0.2310700E+00, &
     & 0.1366410E+00, 0.1364800E+00, 0.1436300E+00, 0.1565153E+00, &
     & 0.1476100E+00, 0.1794041E+00, 0.1955671E+00, 0.2174007E+00, &
     & 0.2408303E+00, 0.2739282E+00, 0.3073787E+00, 0.3073787E+00 /
      data (ref_adm( 7,iz, 7, 8),iz = 1,20) / &
     & 0.1297300E+00, 0.1297300E+00, 0.1497000E+00, 0.1315723E+00, &
     & 0.1264800E+00, 0.1514900E+00, 0.1163700E+00, 0.1334943E+00, &
     & 0.1367894E+00, 0.1412338E+00, 0.1470603E+00, 0.1447600E+00, &
     & 0.1489500E+00, 0.1259300E+00, 0.1944297E+00, 0.2160411E+00, &
     & 0.2391792E+00, 0.2711957E+00, 0.3021222E+00, 0.3021222E+00 /
      data (ref_adm( 7,iz, 8, 8),iz = 1,20) / &
     & 0.1375653E+00, 0.1375653E+00, 0.1338949E+00, 0.1381200E+00, &
     & 0.1321100E+00, 0.1366500E+00, 0.1384400E+00, 0.1661000E+00, &
     & 0.1304800E+00, 0.1414042E+00, 0.1470604E+00, 0.1429500E+00, &
     & 0.1670936E+00, 0.1778909E+00, 0.1932858E+00, 0.2146115E+00, &
     & 0.2375766E+00, 0.2684026E+00, 0.2970669E+00, 0.2970669E+00 /
      data (ref_adm( 7,iz, 9, 8),iz = 1,20) / &
     & 0.1376351E+00, 0.1376351E+00, 0.1341747E+00, 0.1322794E+00, &
     & 0.1312681E+00, 0.1373200E+00, 0.1320800E+00, 0.1341408E+00, &
     & 0.1372500E+00, 0.1415582E+00, 0.1212900E+00, 0.1421100E+00, &
     & 0.1665961E+00, 0.1770139E+00, 0.1920353E+00, 0.2129057E+00, &
     & 0.2355591E+00, 0.2655983E+00, 0.2920819E+00, 0.2920819E+00 /
      data (ref_adm( 7,iz,10, 8),iz = 1,20) / &
     & 0.2410100E+00, 0.2410100E+00, 0.1344976E+00, 0.1327134E+00, &
     & 0.1311000E+00, 0.1139300E+00, 0.1905200E+00, 0.1274400E+00, &
     & 0.1646100E+00, 0.1418133E+00, 0.1471583E+00, 0.1423400E+00, &
     & 0.1661206E+00, 0.1761761E+00, 0.1908132E+00, 0.2108036E+00, &
     & 0.2333218E+00, 0.2629199E+00, 0.2872407E+00, 0.2872407E+00 /
      data (ref_adm( 7,iz,11, 8),iz = 1,20) / &
     & 0.1476000E+00, 0.1476000E+00, 0.1605800E+00, 0.1608100E+00, &
     & 0.1331600E+00, 0.1323277E+00, 0.1332014E+00, 0.2154300E+00, &
     & 0.8978600E-01, 0.1421326E+00, 0.1473215E+00, 0.1428300E+00, &
     & 0.1657675E+00, 0.1694700E+00, 0.1894879E+00, 0.2088404E+00, &
     & 0.2306566E+00, 0.2598680E+00, 0.2827137E+00, 0.2827137E+00 /
      data (ref_adm( 7,iz,12, 8),iz = 1,20) / &
     & 0.1424100E+00, 0.1424100E+00, 0.1406700E+00, 0.1447300E+00, &
     & 0.1867700E+00, 0.2471300E+00, 0.1932600E+00, 0.1960700E+00, &
     & 0.1736000E+00, 0.1264800E+00, 0.1372800E+00, 0.1383500E+00, &
     & 0.1209800E+00, 0.1144900E+00, 0.1882753E+00, 0.1489400E+00, &
     & 0.1623500E+00, 0.2567808E+00, 0.2784689E+00, 0.2784689E+00 /
      data (ref_adm( 7,iz,13, 8),iz = 1,20) / &
     & 0.1506200E+00, 0.1506200E+00, 0.1425000E+00, 0.1166900E+00, &
     & 0.1523700E+00, 0.1402400E+00, 0.1181200E+00, 0.1598700E+00, &
     & 0.1516700E+00, 0.1663200E+00, 0.1556200E+00, 0.1501400E+00, &
     & 0.1652827E+00, 0.1571900E+00, 0.1871123E+00, 0.2051443E+00, &
     & 0.2251819E+00, 0.1553900E+00, 0.2741434E+00, 0.2741434E+00 /
      data (ref_adm( 7,iz,14, 8),iz = 1,20) / &
     & 0.1386300E+00, 0.1386300E+00, 0.1279600E+00, 0.1164600E+00, &
     & 0.1296600E+00, 0.1242400E+00, 0.1312200E+00, 0.1328800E+00, &
     & 0.1183100E+00, 0.1277500E+00, 0.1481200E+00, 0.1376400E+00, &
     & 0.1955200E+00, 0.1557300E+00, 0.1864101E+00, 0.2035210E+00, &
     & 0.2227440E+00, 0.2489275E+00, 0.2690707E+00, 0.2690707E+00 /
      data (ref_adm( 7,iz,15, 8),iz = 1,20) / &
     & 0.1463000E+00, 0.1463000E+00, 0.1367009E+00, 0.1129100E+00, &
     & 0.1850500E+00, 0.1008600E+00, 0.8167400E-01, 0.1385126E+00, &
     & 0.1111800E+00, 0.1314900E+00, 0.1294200E+00, 0.1355900E+00, &
     & 0.1097700E+00, 0.1405400E+00, 0.1858402E+00, 0.2021373E+00, &
     & 0.2204141E+00, 0.2454367E+00, 0.2633136E+00, 0.2633136E+00 /
      data (ref_adm( 7,iz,16, 8),iz = 1,20) / &
     & 0.1423000E+00, 0.1423000E+00, 0.1372014E+00, 0.1713300E+00, &
     & 0.1283100E+00, 0.1429000E+00, 0.1456000E+00, 0.1255200E+00, &
     & 0.1140100E+00, 0.1457556E+00, 0.1521100E+00, 0.1527400E+00, &
     & 0.1658419E+00, 0.1512400E+00, 0.1626100E+00, 0.2012444E+00, &
     & 0.2184213E+00, 0.2420918E+00, 0.2582668E+00, 0.2582668E+00 /
      data (ref_adm( 7,iz,17, 8),iz = 1,20) / &
     & 0.1381200E+00, 0.1381200E+00, 0.1619900E+00, 0.1870200E+00, &
     & 0.1566900E+00, 0.1380896E+00, 0.1269300E+00, 0.1411508E+00, &
     & 0.1153900E+00, 0.1469935E+00, 0.1550200E+00, 0.1328800E+00, &
     & 0.1503800E+00, 0.1602000E+00, 0.1855475E+00, 0.2006934E+00, &
     & 0.2170490E+00, 0.2390208E+00, 0.2537112E+00, 0.2537112E+00 /
      data (ref_adm( 7,iz,18, 8),iz = 1,20) / &
     & 0.1476000E+00, 0.1476000E+00, 0.2084700E+00, 0.1559400E+00, &
     & 0.1173200E+00, 0.1198600E+00, 0.1370215E+00, 0.1330200E+00, &
     & 0.1274400E+00, 0.1396941E+00, 0.1419897E+00, 0.1438500E+00, &
     & 0.9731700E-01, 0.1562704E+00, 0.2109700E+00, 0.1741187E+00, &
     & 0.1853932E+00, 0.2001485E+00, 0.2087113E+00, 0.2087113E+00 /
      data (ref_adm( 7,iz,19, 8),iz = 1,20) / &
     & 0.1184800E+00, 0.1184800E+00, 0.7091100E-01, 0.1271300E+00, &
     & 0.1373800E+00, 0.1423100E+00, 0.1512900E+00, 0.1388420E+00, &
     & 0.1291500E+00, 0.1421300E+00, 0.1434721E+00, 0.1661800E+00, &
     & 0.1522236E+00, 0.1572195E+00, 0.1645313E+00, 0.1745338E+00, &
     & 0.1855006E+00, 0.1996950E+00, 0.2072772E+00, 0.2072772E+00 /
      data (ref_adm( 7,iz,20, 8),iz = 1,20) / &
     & 0.1409071E+00, 0.1409071E+00, 0.1409293E+00, 0.1273900E+00, &
     & 0.1392300E+00, 0.1401485E+00, 0.1270400E+00, 0.1405278E+00, &
     & 0.1264500E+00, 0.1429070E+00, 0.1403500E+00, 0.1764700E+00, &
     & 0.1666500E+00, 0.1583469E+00, 0.1654878E+00, 0.1750718E+00, &
     & 0.1856443E+00, 0.1991487E+00, 0.2063278E+00, 0.2063278E+00 /
      data (ref_adm( 7,iz,21, 8),iz = 1,20) / &
     & 0.1410448E+00, 0.1410448E+00, 0.9891600E-01, 0.1417533E+00, &
     & 0.1571100E+00, 0.1417034E+00, 0.1144900E+00, 0.1423827E+00, &
     & 0.1432598E+00, 0.1447132E+00, 0.1953400E+00, 0.1505217E+00, &
     & 0.1551588E+00, 0.1597573E+00, 0.1665354E+00, 0.1758301E+00, &
     & 0.1860825E+00, 0.1989569E+00, 0.2055326E+00, 0.2055326E+00 /
      data (ref_adm( 7,iz,22, 8),iz = 1,20) / &
     & 0.9290900E-01, 0.9290900E-01, 0.1085700E+00, 0.1966100E+00, &
     & 0.1313200E+00, 0.1886900E+00, 0.1794400E+00, 0.1200200E+00, &
     & 0.9209700E-01, 0.1608952E+00, 0.1408700E+00, 0.1732000E+00, &
     & 0.1817328E+00, 0.1895164E+00, 0.2006660E+00, 0.2152540E+00, &
     & 0.2305658E+00, 0.2496342E+00, 0.2599728E+00, 0.2599728E+00 /
      data (ref_adm( 7,iz,23, 8),iz = 1,20) / &
     & 0.1350300E+00, 0.1350300E+00, 0.1418198E+00, 0.1437787E+00, &
     & 0.1461312E+00, 0.1488066E+00, 0.1629500E+00, 0.9877200E-01, &
     & 0.1591883E+00, 0.1636008E+00, 0.1687599E+00, 0.1762140E+00, &
     & 0.1846576E+00, 0.1923136E+00, 0.2031741E+00, 0.2172604E+00, &
     & 0.2323017E+00, 0.2501802E+00, 0.2599907E+00, 0.2599907E+00 /
      data (ref_adm( 7,iz,24, 8),iz = 1,20) / &
     & 0.1400262E+00, 0.1400262E+00, 0.1424104E+00, 0.1621800E+00, &
     & 0.1807800E+00, 0.1506414E+00, 0.1018700E+00, 0.1578422E+00, &
     & 0.1620445E+00, 0.1560100E+00, 0.1719618E+00, 0.1794349E+00, &
     & 0.1880574E+00, 0.1957435E+00, 0.2062850E+00, 0.2200114E+00, &
     & 0.2345560E+00, 0.2516845E+00, 0.2606123E+00, 0.2606123E+00 /
      data (ref_adm( 7,iz,25, 8),iz = 1,20) / &
     & 0.1483700E+00, 0.1483700E+00, 0.2409300E+00, 0.1458841E+00, &
     & 0.1490594E+00, 0.2665000E+00, 0.1317000E+00, 0.1390500E+00, &
     & 0.1650552E+00, 0.1699447E+00, 0.1578100E+00, 0.1603400E+00, &
     & 0.1916740E+00, 0.1994541E+00, 0.2100002E+00, 0.2234302E+00, &
     & 0.2374643E+00, 0.2537919E+00, 0.2623063E+00, 0.2623063E+00 /
      data (ref_adm( 7,iz,26, 8),iz = 1,20) / &
     & 0.1044600E+00, 0.1044600E+00, 0.9776800E-01, 0.1734200E+00, &
     & 0.1506291E+00, 0.1264800E+00, 0.1055300E+00, 0.1692200E+00, &
     & 0.1637400E+00, 0.1735441E+00, 0.1792020E+00, 0.1549900E+00, &
     & 0.1832000E+00, 0.2035737E+00, 0.2140856E+00, 0.2275770E+00, &
     & 0.2412423E+00, 0.2566423E+00, 0.2647306E+00, 0.2647306E+00 /
      data (ref_adm( 7,iz,27, 8),iz = 1,20) / &
     & 0.1513800E+00, 0.1513800E+00, 0.1299000E+00, 0.1219400E+00, &
     & 0.1783500E+00, 0.1560000E+00, 0.1436200E+00, 0.1672100E+00, &
     & 0.1309700E+00, 0.1582200E+00, 0.1890100E+00, 0.1914289E+00, &
     & 0.2003480E+00, 0.2082213E+00, 0.2185597E+00, 0.2320983E+00, &
     & 0.2456777E+00, 0.2603393E+00, 0.2678740E+00, 0.2678740E+00 /
      data (ref_adm( 7,iz,28, 8),iz = 1,20) / &
     & 0.1466900E+00, 0.1466900E+00, 0.1982900E+00, 0.1600200E+00, &
     & 0.1475000E+00, 0.1666200E+00, 0.1485700E+00, 0.1819000E+00, &
     & 0.1783500E+00, 0.1518500E+00, 0.1561600E+00, 0.1733400E+00, &
     & 0.1882600E+00, 0.2131020E+00, 0.2236176E+00, 0.2369515E+00, &
     & 0.2504283E+00, 0.2648771E+00, 0.2722780E+00, 0.2722780E+00 /
      data (ref_adm( 7,iz,29, 8),iz = 1,20) / &
     & 0.1464700E+00, 0.1464700E+00, 0.2590400E+00, 0.1933300E+00, &
     & 0.1723800E+00, 0.1554700E+00, 0.1777000E+00, 0.2821300E+00, &
     & 0.2397100E+00, 0.2506500E+00, 0.1921231E+00, 0.1707100E+00, &
     & 0.1343000E+00, 0.2183257E+00, 0.2288184E+00, 0.2422332E+00, &
     & 0.2553794E+00, 0.2698192E+00, 0.2773604E+00, 0.2773604E+00 /
      data (ref_adm( 7,iz,30, 8),iz = 1,20) / &
     & 0.1545200E+00, 0.1545200E+00, 0.1472600E+00, 0.1586700E+00, &
     & 0.1837200E+00, 0.1451600E+00, 0.1068700E+00, 0.2285700E+00, &
     & 0.1823842E+00, 0.1931300E+00, 0.1665500E+00, 0.1728000E+00, &
     & 0.2155893E+00, 0.1845200E+00, 0.1711000E+00, 0.2474802E+00, &
     & 0.2607483E+00, 0.2745446E+00, 0.2827736E+00, 0.2827736E+00 /
      data (ref_adm( 7,iz,31, 8),iz = 1,20) / &
     & 0.1449600E+00, 0.1449600E+00, 0.1432400E+00, 0.1414500E+00, &
     & 0.1505700E+00, 0.1602400E+00, 0.1644300E+00, 0.1817200E+00, &
     & 0.1862500E+00, 0.1829500E+00, 0.1874200E+00, 0.1810700E+00, &
     & 0.1925900E+00, 0.1979500E+00, 0.2397770E+00, 0.2528899E+00, &
     & 0.2659943E+00, 0.2796696E+00, 0.2879154E+00, 0.2879154E+00 /
      data (ref_adm( 7,iz,32, 8),iz = 1,20) / &
     & 0.1376400E+00, 0.1376400E+00, 0.1427400E+00, 0.2062500E+00, &
     & 0.1588979E+00, 0.1659093E+00, 0.1729066E+00, 0.1800406E+00, &
     & 0.1746900E+00, 0.1822500E+00, 0.2033406E+00, 0.1729800E+00, &
     & 0.2252537E+00, 0.2340812E+00, 0.2449169E+00, 0.2582871E+00, &
     & 0.2711266E+00, 0.2847120E+00, 0.2927310E+00, 0.2927310E+00 /
      data (ref_adm( 7,iz,33, 8),iz = 1,20) / &
     & 0.1182300E+00, 0.1182300E+00, 0.1470638E+00, 0.1688600E+00, &
     & 0.1599045E+00, 0.2443900E+00, 0.2363700E+00, 0.1754300E+00, &
     & 0.1819600E+00, 0.1980229E+00, 0.2063444E+00, 0.1576400E+00, &
     & 0.2285798E+00, 0.2383168E+00, 0.2497512E+00, 0.2631122E+00, &
     & 0.2761387E+00, 0.2894859E+00, 0.2973999E+00, 0.2973999E+00 /
      data (ref_adm( 7,iz,34, 8),iz = 1,20) / &
     & 0.1088700E+00, 0.1088700E+00, 0.1444800E+00, 0.1624900E+00, &
     & 0.1634000E+00, 0.1681334E+00, 0.1670100E+00, 0.1836200E+00, &
     & 0.1911200E+00, 0.1672600E+00, 0.2099976E+00, 0.2202011E+00, &
     & 0.2312234E+00, 0.2412267E+00, 0.2536972E+00, 0.2673538E+00, &
     & 0.2804958E+00, 0.2934784E+00, 0.3017499E+00, 0.3017499E+00 /
      data (ref_adm( 7,iz,35, 8),iz = 1,20) / &
     & 0.1979900E+00, 0.1979900E+00, 0.1118000E+00, 0.1540014E+00, &
     & 0.1614143E+00, 0.1567500E+00, 0.1796900E+00, 0.1947400E+00, &
     & 0.1952160E+00, 0.1685900E+00, 0.2139967E+00, 0.2236603E+00, &
     & 0.2337685E+00, 0.2433960E+00, 0.2565151E+00, 0.2368800E+00, &
     & 0.2838401E+00, 0.2969595E+00, 0.3051087E+00, 0.3051087E+00 /
      data (ref_adm( 7,iz,36, 8),iz = 1,20) / &
     & 0.1297600E+00, 0.1297600E+00, 0.1701200E+00, 0.1751000E+00, &
     & 0.2100800E+00, 0.1681000E+00, 0.1855100E+00, 0.1867414E+00, &
     & 0.1975568E+00, 0.2091997E+00, 0.2184809E+00, 0.2268736E+00, &
     & 0.3154100E+00, 0.2449158E+00, 0.2581887E+00, 0.2732897E+00, &
     & 0.2862274E+00, 0.2994446E+00, 0.3073478E+00, 0.3073478E+00 /
      data (ref_adm( 7,iz,37, 8),iz = 1,20) / &
     & 0.1446400E+00, 0.1446400E+00, 0.1199500E+00, 0.1570900E+00, &
     & 0.1638600E+00, 0.1667700E+00, 0.1971500E+00, 0.2086100E+00, &
     & 0.1992615E+00, 0.2149582E+00, 0.2258659E+00, 0.2291590E+00, &
     & 0.2374658E+00, 0.2458642E+00, 0.2590537E+00, 0.2745780E+00, &
     & 0.2875450E+00, 0.3008143E+00, 0.3086178E+00, 0.3086178E+00 /
      data (ref_adm( 7,iz,38, 8),iz = 1,20) / &
     & 0.1446400E+00, 0.1446400E+00, 0.1199500E+00, 0.1570900E+00, &
     & 0.1638600E+00, 0.1667700E+00, 0.1971500E+00, 0.2086100E+00, &
     & 0.1992615E+00, 0.2149582E+00, 0.2258659E+00, 0.2291590E+00, &
     & 0.2374658E+00, 0.2458642E+00, 0.2590537E+00, 0.2745780E+00, &
     & 0.2875450E+00, 0.3008143E+00, 0.3086178E+00, 0.3086178E+00 /
! Solar Zenith Angle 40.0 Albedo  0.1772580E+00
      data (ref_adm( 7,iz, 1, 9),iz = 1,20) / &
     & 0.1586400E+00, 0.1586400E+00, 0.1455900E+00, 0.1287600E+00, &
     & 0.1390100E+00, 0.1444100E+00, 0.1209300E+00, 0.1435184E+00, &
     & 0.1509900E+00, 0.3769800E+00, 0.1435995E+00, 0.1457748E+00, &
     & 0.1490536E+00, 0.1704300E+00, 0.1629700E+00, 0.1660643E+00, &
     & 0.1750308E+00, 0.1867156E+00, 0.1929350E+00, 0.1929350E+00 /
      data (ref_adm( 7,iz, 2, 9),iz = 1,20) / &
     & 0.1586400E+00, 0.1586400E+00, 0.1455900E+00, 0.1287600E+00, &
     & 0.1390100E+00, 0.1444100E+00, 0.1209300E+00, 0.1435184E+00, &
     & 0.1509900E+00, 0.3769800E+00, 0.1435995E+00, 0.1457748E+00, &
     & 0.1490536E+00, 0.1704300E+00, 0.1629700E+00, 0.1660643E+00, &
     & 0.1750308E+00, 0.1867156E+00, 0.1929350E+00, 0.1929350E+00 /
      data (ref_adm( 7,iz, 3, 9),iz = 1,20) / &
     & 0.1280200E+00, 0.1280200E+00, 0.1175600E+00, 0.1499696E+00, &
     & 0.1143000E+00, 0.1411700E+00, 0.1493400E+00, 0.1440900E+00, &
     & 0.1699400E+00, 0.1826200E+00, 0.1646400E+00, 0.1749200E+00, &
     & 0.1861200E+00, 0.1613400E+00, 0.1581846E+00, 0.1660643E+00, &
     & 0.1750308E+00, 0.1867156E+00, 0.2983028E-08, 0.2983028E-08 /
      data (ref_adm( 7,iz, 4, 9),iz = 1,20) / &
     & 0.1169000E+00, 0.1169000E+00, 0.1536222E+00, 0.1640300E+00, &
     & 0.2048300E+00, 0.1461896E+00, 0.1688300E+00, 0.1598900E+00, &
     & 0.1415600E+00, 0.1675400E+00, 0.1781800E+00, 0.1689300E+00, &
     & 0.1490536E+00, 0.1366100E+00, 0.1581846E+00, 0.1660643E+00, &
     & 0.2146500E+00, 0.1867156E+00, 0.1929350E+00, 0.1929350E+00 /
      data (ref_adm( 7,iz, 5, 9),iz = 1,20) / &
     & 0.1223500E+00, 0.1223500E+00, 0.1271700E+00, 0.1596100E+00, &
     & 0.1624400E+00, 0.1745600E+00, 0.1432200E+00, 0.1488800E+00, &
     & 0.1212000E+00, 0.1427969E+00, 0.1435995E+00, 0.1191200E+00, &
     & 0.1359400E+00, 0.1526499E+00, 0.1581846E+00, 0.1660643E+00, &
     & 0.1750308E+00, 0.1867156E+00, 0.1929350E+00, 0.1929350E+00 /
      data (ref_adm( 7,iz, 6, 9),iz = 1,20) / &
     & 0.1642160E+00, 0.1642160E+00, 0.1836300E+00, 0.9656600E-01, &
     & 0.1606900E+00, 0.1686800E+00, 0.1813200E+00, 0.1376600E+00, &
     & 0.1428393E+00, 0.1307700E+00, 0.1910000E+00, 0.1457748E+00, &
     & 0.1498500E+00, 0.1346200E+00, 0.1297500E+00, 0.1660643E+00, &
     & 0.1750308E+00, 0.1867156E+00, 0.1929350E+00, 0.1929350E+00 /
      data (ref_adm( 7,iz, 7, 9),iz = 1,20) / &
     & 0.1416300E+00, 0.1416300E+00, 0.1917100E+00, 0.2208600E+00, &
     & 0.1892900E+00, 0.1696300E+00, 0.1889800E+00, 0.1435184E+00, &
     & 0.1365600E+00, 0.1427969E+00, 0.1406200E+00, 0.1237900E+00, &
     & 0.1490536E+00, 0.1526499E+00, 0.1499200E+00, 0.1660643E+00, &
     & 0.1750308E+00, 0.1867156E+00, 0.1929350E+00, 0.1929350E+00 /
      data (ref_adm( 7,iz, 8, 9),iz = 1,20) / &
     & 0.1245900E+00, 0.1245900E+00, 0.1369500E+00, 0.1590100E+00, &
     & 0.1602500E+00, 0.1319200E+00, 0.1435700E+00, 0.1311700E+00, &
     & 0.1343000E+00, 0.1238700E+00, 0.1435995E+00, 0.1457748E+00, &
     & 0.1490536E+00, 0.1306400E+00, 0.1581846E+00, 0.1660643E+00, &
     & 0.1750308E+00, 0.1867156E+00, 0.1929350E+00, 0.1929350E+00 /
      data (ref_adm( 7,iz, 9, 9),iz = 1,20) / &
     & 0.1685500E+00, 0.1685500E+00, 0.1333900E+00, 0.1599400E+00, &
     & 0.1538800E+00, 0.1461896E+00, 0.1192100E+00, 0.1043700E+00, &
     & 0.8402600E-01, 0.1068900E+00, 0.1435995E+00, 0.1457748E+00, &
     & 0.1281000E+00, 0.1423400E+00, 0.1329700E+00, 0.1660643E+00, &
     & 0.1750308E+00, 0.1867156E+00, 0.1929350E+00, 0.1929350E+00 /
      data (ref_adm( 7,iz,10, 9),iz = 1,20) / &
     & 0.2248700E+00, 0.2248700E+00, 0.1255700E+00, 0.1234000E+00, &
     & 0.1437500E+00, 0.1542900E+00, 0.1448798E+00, 0.9787800E-01, &
     & 0.1428393E+00, 0.1427969E+00, 0.1435995E+00, 0.1457748E+00, &
     & 0.1490536E+00, 0.1122700E+00, 0.1581846E+00, 0.1660643E+00, &
     & 0.1750308E+00, 0.1867156E+00, 0.1929350E+00, 0.1929350E+00 /
      data (ref_adm( 7,iz,11, 9),iz = 1,20) / &
     & 0.1454100E+00, 0.1454100E+00, 0.1222500E+00, 0.1499696E+00, &
     & 0.1158300E+00, 0.1257400E+00, 0.1448798E+00, 0.1435184E+00, &
     & 0.1601400E+00, 0.1347600E+00, 0.1435995E+00, 0.1301100E+00, &
     & 0.2154700E+00, 0.1526499E+00, 0.1581846E+00, 0.1660643E+00, &
     & 0.1750308E+00, 0.1867156E+00, 0.1929350E+00, 0.1929350E+00 /
      data (ref_adm( 7,iz,12, 9),iz = 1,20) / &
     & 0.1481700E+00, 0.1481700E+00, 0.1742400E+00, 0.1368700E+00, &
     & 0.1659600E+00, 0.1151200E+00, 0.1316700E+00, 0.1333900E+00, &
     & 0.2020600E+00, 0.2010700E+00, 0.1514000E+00, 0.1457748E+00, &
     & 0.1367200E+00, 0.1537100E+00, 0.1581846E+00, 0.1660643E+00, &
     & 0.1750308E+00, 0.1867156E+00, 0.1929350E+00, 0.1929350E+00 /
      data (ref_adm( 7,iz,13, 9),iz = 1,20) / &
     & 0.1540400E+00, 0.1540400E+00, 0.1563600E+00, 0.1681700E+00, &
     & 0.1547700E+00, 0.1505000E+00, 0.1732700E+00, 0.1645600E+00, &
     & 0.1776300E+00, 0.1711900E+00, 0.1521500E+00, 0.8618500E-01, &
     & 0.1527600E+00, 0.1422500E+00, 0.1581846E+00, 0.1660643E+00, &
     & 0.1750308E+00, 0.1867156E+00, 0.1929350E+00, 0.1929350E+00 /
      data (ref_adm( 7,iz,14, 9),iz = 1,20) / &
     & 0.1390300E+00, 0.1390300E+00, 0.1079600E+00, 0.1192700E+00, &
     & 0.1336100E+00, 0.1174900E+00, 0.1167800E+00, 0.1129800E+00, &
     & 0.1331500E+00, 0.1239000E+00, 0.1674400E+00, 0.1732200E+00, &
     & 0.1453300E+00, 0.1705800E+00, 0.1581846E+00, 0.1660643E+00, &
     & 0.1750308E+00, 0.1867156E+00, 0.1929350E+00, 0.1929350E+00 /
      data (ref_adm( 7,iz,15, 9),iz = 1,20) / &
     & 0.1319100E+00, 0.1319100E+00, 0.1355300E+00, 0.1508400E+00, &
     & 0.1475040E+00, 0.1296700E+00, 0.1211300E+00, 0.1541700E+00, &
     & 0.1093200E+00, 0.1380100E+00, 0.1371700E+00, 0.1399700E+00, &
     & 0.1496700E+00, 0.1391500E+00, 0.1581846E+00, 0.1660643E+00, &
     & 0.1750308E+00, 0.1867156E+00, 0.1929350E+00, 0.1929350E+00 /
      data (ref_adm( 7,iz,16, 9),iz = 1,20) / &
     & 0.1740300E+00, 0.1740300E+00, 0.1648400E+00, 0.1293400E+00, &
     & 0.1475040E+00, 0.1337400E+00, 0.1625800E+00, 0.1435184E+00, &
     & 0.1510300E+00, 0.1427969E+00, 0.1729200E+00, 0.1612800E+00, &
     & 0.1461900E+00, 0.1387600E+00, 0.1581846E+00, 0.1660643E+00, &
     & 0.1750308E+00, 0.1867156E+00, 0.1929350E+00, 0.1929350E+00 /
      data (ref_adm( 7,iz,17, 9),iz = 1,20) / &
     & 0.1107400E+00, 0.1107400E+00, 0.1417100E+00, 0.1499696E+00, &
     & 0.1317900E+00, 0.1243100E+00, 0.1448798E+00, 0.1441800E+00, &
     & 0.1556600E+00, 0.2229100E+00, 0.1435995E+00, 0.1457748E+00, &
     & 0.1411400E+00, 0.1476600E+00, 0.1581846E+00, 0.1660643E+00, &
     & 0.1750308E+00, 0.1867156E+00, 0.1929350E+00, 0.1929350E+00 /
      data (ref_adm( 7,iz,18, 9),iz = 1,20) / &
     & 0.1079900E+00, 0.1079900E+00, 0.1437000E+00, 0.1160800E+00, &
     & 0.1262200E+00, 0.1475100E+00, 0.1427900E+00, 0.1348900E+00, &
     & 0.2268300E+00, 0.2214200E+00, 0.1375300E+00, 0.1518032E+00, &
     & 0.1594604E+00, 0.1666449E+00, 0.1770145E+00, 0.1908759E+00, &
     & 0.2060260E+00, 0.2254695E+00, 0.2376598E+00, 0.2376598E+00 /
      data (ref_adm( 7,iz,19, 9),iz = 1,20) / &
     & 0.8365600E-01, 0.8365600E-01, 0.9771800E-01, 0.1072800E+00, &
     & 0.1331795E+00, 0.1602100E+00, 0.1354887E+00, 0.1241900E+00, &
     & 0.1399612E+00, 0.1522200E+00, 0.1258700E+00, 0.1531480E+00, &
     & 0.1606628E+00, 0.1676580E+00, 0.1775409E+00, 0.1909975E+00, &
     & 0.2054359E+00, 0.2240145E+00, 0.2345529E+00, 0.2345529E+00 /
      data (ref_adm( 7,iz,20, 9),iz = 1,20) / &
     & 0.1030400E+00, 0.1030400E+00, 0.1329584E+00, 0.1008900E+00, &
     & 0.9713400E-01, 0.1066100E+00, 0.1168800E+00, 0.7108300E-01, &
     & 0.1332900E+00, 0.1450456E+00, 0.1516400E+00, 0.1548847E+00, &
     & 0.1621738E+00, 0.1690287E+00, 0.1786115E+00, 0.1915257E+00, &
     & 0.2054566E+00, 0.2231043E+00, 0.2326893E+00, 0.2326893E+00 /
      data (ref_adm( 7,iz,21, 9),iz = 1,20) / &
     & 0.9735600E-01, 0.9735600E-01, 0.1435600E+00, 0.1497400E+00, &
     & 0.1875500E+00, 0.1371449E+00, 0.1390079E+00, 0.9844500E-01, &
     & 0.1375400E+00, 0.1471509E+00, 0.1511153E+00, 0.1569247E+00, &
     & 0.1640412E+00, 0.1705265E+00, 0.1491200E+00, 0.1923997E+00, &
     & 0.2058393E+00, 0.2224784E+00, 0.2313937E+00, 0.2313937E+00 /
      data (ref_adm( 7,iz,22, 9),iz = 1,20) / &
     & 0.1295500E+00, 0.1295500E+00, 0.1375900E+00, 0.1306000E+00, &
     & 0.1404900E+00, 0.1562000E+00, 0.1577700E+00, 0.1581200E+00, &
     & 0.1630177E+00, 0.1688990E+00, 0.1756481E+00, 0.2016200E+00, &
     & 0.1973245E+00, 0.2290900E+00, 0.2325800E+00, 0.2426396E+00, &
     & 0.2637434E+00, 0.2906266E+00, 0.3069990E+00, 0.3069990E+00 /
      data (ref_adm( 7,iz,23, 9),iz = 1,20) / &
     & 0.1206700E+00, 0.1206700E+00, 0.1524800E+00, 0.1088000E+00, &
     & 0.8983900E-01, 0.1691500E+00, 0.1553697E+00, 0.1601021E+00, &
     & 0.1654571E+00, 0.1716146E+00, 0.1785706E+00, 0.2434100E+00, &
     & 0.2002856E+00, 0.2343900E+00, 0.2255128E+00, 0.2449723E+00, &
     & 0.2659541E+00, 0.2912555E+00, 0.3073950E+00, 0.3073950E+00 /
      data (ref_adm( 7,iz,24, 9),iz = 1,20) / &
     & 0.1411171E+00, 0.1411171E+00, 0.1215400E+00, 0.1241600E+00, &
     & 0.1009200E+00, 0.1192300E+00, 0.1573319E+00, 0.1057100E+00, &
     & 0.1439000E+00, 0.1745116E+00, 0.1817729E+00, 0.1614800E+00, &
     & 0.2040668E+00, 0.2145095E+00, 0.2291345E+00, 0.2483323E+00, &
     & 0.2686281E+00, 0.2935235E+00, 0.3091837E+00, 0.3091837E+00 /
      data (ref_adm( 7,iz,25, 9),iz = 1,20) / &
     & 0.1318700E+00, 0.1318700E+00, 0.1438698E+00, 0.9369900E-01, &
     & 0.1503779E+00, 0.1391500E+00, 0.1594159E+00, 0.1648457E+00, &
     & 0.1723900E+00, 0.1569200E+00, 0.1852783E+00, 0.1960175E+00, &
     & 0.2081157E+00, 0.2189044E+00, 0.2336513E+00, 0.2187600E+00, &
     & 0.2727980E+00, 0.2966177E+00, 0.3123590E+00, 0.3123590E+00 /
      data (ref_adm( 7,iz,26, 9),iz = 1,20) / &
     & 0.1170300E+00, 0.1170300E+00, 0.1336500E+00, 0.1276000E+00, &
     & 0.1337800E+00, 0.1261000E+00, 0.1653400E+00, 0.1673100E+00, &
     & 0.2099100E+00, 0.1813513E+00, 0.1893089E+00, 0.2004574E+00, &
     & 0.1606400E+00, 0.2238037E+00, 0.2388080E+00, 0.2582072E+00, &
     & 0.2782438E+00, 0.3014495E+00, 0.3169128E+00, 0.3169128E+00 /
      data (ref_adm( 7,iz,27, 9),iz = 1,20) / &
     & 0.1457700E+00, 0.1457700E+00, 0.1660700E+00, 0.1746900E+00, &
     & 0.1539100E+00, 0.1454400E+00, 0.1680400E+00, 0.1689700E+00, &
     & 0.1602300E+00, 0.1667300E+00, 0.1355500E+00, 0.1921400E+00, &
     & 0.2181249E+00, 0.1855800E+00, 0.2445496E+00, 0.2640968E+00, &
     & 0.2844643E+00, 0.3076567E+00, 0.3236225E+00, 0.3236225E+00 /
      data (ref_adm( 7,iz,28, 9),iz = 1,20) / &
     & 0.1597000E+00, 0.1597000E+00, 0.1462500E+00, 0.1550400E+00, &
     & 0.1783600E+00, 0.1733800E+00, 0.1801900E+00, 0.1744000E+00, &
     & 0.1771500E+00, 0.1762000E+00, 0.2553800E+00, 0.1694800E+00, &
     & 0.1820600E+00, 0.2353935E+00, 0.2510150E+00, 0.2708780E+00, &
     & 0.2580100E+00, 0.3147349E+00, 0.3319540E+00, 0.3319540E+00 /
      data (ref_adm( 7,iz,29, 9),iz = 1,20) / &
     & 0.1469300E+00, 0.1469300E+00, 0.1456867E+00, 0.1714700E+00, &
     & 0.1359000E+00, 0.1707700E+00, 0.1829000E+00, 0.1959700E+00, &
     & 0.1991400E+00, 0.2416700E+00, 0.2901500E+00, 0.2027500E+00, &
     & 0.2764700E+00, 0.2421378E+00, 0.2580102E+00, 0.2781370E+00, &
     & 0.2988571E+00, 0.3221977E+00, 0.3406026E+00, 0.3406026E+00 /
      data (ref_adm( 7,iz,30, 9),iz = 1,20) / &
     & 0.1572200E+00, 0.1572200E+00, 0.1405100E+00, 0.1509358E+00, &
     & 0.1498300E+00, 0.1595000E+00, 0.1706500E+00, 0.1589600E+00, &
     & 0.1881218E+00, 0.1930400E+00, 0.2079452E+00, 0.2216809E+00, &
     & 0.2363551E+00, 0.2129800E+00, 0.2653821E+00, 0.2859952E+00, &
     & 0.3068374E+00, 0.3306885E+00, 0.3494876E+00, 0.3494876E+00 /
      data (ref_adm( 7,iz,31, 9),iz = 1,20) / &
     & 0.1443900E+00, 0.1443900E+00, 0.1571800E+00, 0.1662000E+00, &
     & 0.2242200E+00, 0.2071900E+00, 0.2052100E+00, 0.1752300E+00, &
     & 0.1754100E+00, 0.1780900E+00, 0.1796600E+00, 0.1893800E+00, &
     & 0.1941900E+00, 0.1965100E+00, 0.2727583E+00, 0.2940399E+00, &
     & 0.3154982E+00, 0.3392275E+00, 0.3592221E+00, 0.3592221E+00 /
      data (ref_adm( 7,iz,32, 9),iz = 1,20) / &
     & 0.1991700E+00, 0.1991700E+00, 0.1496600E+00, 0.1896600E+00, &
     & 0.2169300E+00, 0.1502100E+00, 0.1552000E+00, 0.2525100E+00, &
     & 0.1947161E+00, 0.1824000E+00, 0.2162516E+00, 0.2313598E+00, &
     & 0.2475918E+00, 0.2080400E+00, 0.2055100E+00, 0.2066100E+00, &
     & 0.3236215E+00, 0.3480471E+00, 0.3682282E+00, 0.3682282E+00 /
      data (ref_adm( 7,iz,33, 9),iz = 1,20) / &
     & 0.1500600E+00, 0.1500600E+00, 0.1727500E+00, 0.2083500E+00, &
     & 0.1936000E+00, 0.1708600E+00, 0.2224200E+00, 0.1854700E+00, &
     & 0.1971539E+00, 0.1671100E+00, 0.2189200E+00, 0.2343569E+00, &
     & 0.2510590E+00, 0.2213100E+00, 0.2849796E+00, 0.3087909E+00, &
     & 0.3312684E+00, 0.3563417E+00, 0.3770272E+00, 0.3770272E+00 /
      data (ref_adm( 7,iz,34, 9),iz = 1,20) / &
     & 0.1676300E+00, 0.1676300E+00, 0.1453000E+00, 0.9958900E-01, &
     & 0.1694300E+00, 0.1643600E+00, 0.1784051E+00, 0.2136500E+00, &
     & 0.1988725E+00, 0.1941400E+00, 0.2217207E+00, 0.2379494E+00, &
     & 0.2548804E+00, 0.2689589E+00, 0.2881707E+00, 0.3134501E+00, &
     & 0.3379523E+00, 0.3634426E+00, 0.3850024E+00, 0.3850024E+00 /
      data (ref_adm( 7,iz,35, 9),iz = 1,20) / &
     & 0.1408800E+00, 0.1408800E+00, 0.1824900E+00, 0.1465000E+00, &
     & 0.1537100E+00, 0.1956600E+00, 0.1756800E+00, 0.1685900E+00, &
     & 0.2001264E+00, 0.2182100E+00, 0.2248378E+00, 0.2423761E+00, &
     & 0.2594734E+00, 0.2732195E+00, 0.2912397E+00, 0.3161643E+00, &
     & 0.3424342E+00, 0.3693305E+00, 0.3913367E+00, 0.3913367E+00 /
      data (ref_adm( 7,iz,36, 9),iz = 1,20) / &
     & 0.1313600E+00, 0.1313600E+00, 0.1476691E+00, 0.2182900E+00, &
     & 0.1478300E+00, 0.1025800E+00, 0.1804428E+00, 0.2865200E+00, &
     & 0.2010777E+00, 0.2183000E+00, 0.2276801E+00, 0.2470950E+00, &
     & 0.2647003E+00, 0.2500800E+00, 0.2942897E+00, 0.3178161E+00, &
     & 0.3447040E+00, 0.3734492E+00, 0.3954969E+00, 0.3954969E+00 /
      data (ref_adm( 7,iz,37, 9),iz = 1,20) / &
     & 0.1692100E+00, 0.1692100E+00, 0.1527700E+00, 0.1340600E+00, &
     & 0.1656900E+00, 0.2460700E+00, 0.1808723E+00, 0.2737600E+00, &
     & 0.2082400E+00, 0.2101100E+00, 0.2296552E+00, 0.2549079E+00, &
     & 0.2721789E+00, 0.2805017E+00, 0.2963927E+00, 0.3190133E+00, &
     & 0.3456693E+00, 0.3755574E+00, 0.3977449E+00, 0.3977449E+00 /
      data (ref_adm( 7,iz,38, 9),iz = 1,20) / &
     & 0.1692100E+00, 0.1692100E+00, 0.1527700E+00, 0.1340600E+00, &
     & 0.1656900E+00, 0.2460700E+00, 0.1808723E+00, 0.2737600E+00, &
     & 0.2082400E+00, 0.2101100E+00, 0.2296552E+00, 0.2549079E+00, &
     & 0.2721789E+00, 0.2805017E+00, 0.2963927E+00, 0.3190133E+00, &
     & 0.3456693E+00, 0.3755574E+00, 0.3977449E+00, 0.3977449E+00 /
! Solar Zenith Angle 45.0 Albedo  0.1751592E+00
      data (ref_adm( 7,iz, 1,10),iz = 1,20) / &
     & 0.1417500E+00, 0.1417500E+00, 0.1710000E+00, 0.1626600E+00, &
     & 0.1876100E+00, 0.1779700E+00, 0.1479300E+00, 0.2154400E+00, &
     & 0.1950900E+00, 0.1888700E+00, 0.1367900E+00, 0.1928200E+00, &
     & 0.1291600E+00, 0.1443400E+00, 0.1915000E+00, 0.2352700E+00, &
     & 0.1753495E+00, 0.1870556E+00, 0.1932864E+00, 0.1932864E+00 /
      data (ref_adm( 7,iz, 2,10),iz = 1,20) / &
     & 0.1417500E+00, 0.1417500E+00, 0.1710000E+00, 0.1626600E+00, &
     & 0.1876100E+00, 0.1779700E+00, 0.1479300E+00, 0.2154400E+00, &
     & 0.1950900E+00, 0.1888700E+00, 0.1367900E+00, 0.1928200E+00, &
     & 0.1291600E+00, 0.1443400E+00, 0.1915000E+00, 0.2352700E+00, &
     & 0.1753495E+00, 0.1870556E+00, 0.1932864E+00, 0.1932864E+00 /
      data (ref_adm( 7,iz, 3,10),iz = 1,20) / &
     & 0.1256000E+00, 0.1256000E+00, 0.1357000E+00, 0.1622400E+00, &
     & 0.1574600E+00, 0.1538100E+00, 0.1258300E+00, 0.1724300E+00, &
     & 0.1055200E+00, 0.1465300E+00, 0.1158600E+00, 0.1538800E+00, &
     & 0.1368300E+00, 0.1433700E+00, 0.1755200E+00, 0.1820200E+00, &
     & 0.2714700E+00, 0.1870556E+00, 0.2988458E-08, 0.2988458E-08 /
      data (ref_adm( 7,iz, 4,10),iz = 1,20) / &
     & 0.1445900E+00, 0.1445900E+00, 0.1391800E+00, 0.1594800E+00, &
     & 0.1325000E+00, 0.1204500E+00, 0.1259100E+00, 0.2188300E+00, &
     & 0.2090000E+00, 0.1376300E+00, 0.1375800E+00, 0.2041200E+00, &
     & 0.1422500E+00, 0.1598400E+00, 0.1704300E+00, 0.1819600E+00, &
     & 0.1753495E+00, 0.1870556E+00, 0.1932864E+00, 0.1932864E+00 /
      data (ref_adm( 7,iz, 5,10),iz = 1,20) / &
     & 0.1144000E+00, 0.1144000E+00, 0.1185600E+00, 0.1214300E+00, &
     & 0.1800200E+00, 0.1374800E+00, 0.1875300E+00, 0.1282500E+00, &
     & 0.1412400E+00, 0.1530800E+00, 0.1438000E+00, 0.1887000E+00, &
     & 0.1784500E+00, 0.1558500E+00, 0.1660000E+00, 0.1823600E+00, &
     & 0.1753495E+00, 0.1870556E+00, 0.1932864E+00, 0.1932864E+00 /
      data (ref_adm( 7,iz, 6,10),iz = 1,20) / &
     & 0.1449100E+00, 0.1449100E+00, 0.1429100E+00, 0.1275300E+00, &
     & 0.9811400E-01, 0.1262600E+00, 0.1492400E+00, 0.2299500E+00, &
     & 0.1463600E+00, 0.1453300E+00, 0.1356100E+00, 0.1125200E+00, &
     & 0.1855700E+00, 0.1436000E+00, 0.1714000E+00, 0.2113100E+00, &
     & 0.1753495E+00, 0.1870556E+00, 0.1932864E+00, 0.1932864E+00 /
      data (ref_adm( 7,iz, 7,10),iz = 1,20) / &
     & 0.1650800E+00, 0.1650800E+00, 0.1689900E+00, 0.1178300E+00, &
     & 0.1042900E+00, 0.1133200E+00, 0.1502200E+00, 0.1485300E+00, &
     & 0.1388000E+00, 0.1288600E+00, 0.2079000E+00, 0.2105900E+00, &
     & 0.2007900E+00, 0.1761700E+00, 0.1822900E+00, 0.2152000E+00, &
     & 0.1753495E+00, 0.1870556E+00, 0.1932864E+00, 0.1932864E+00 /
      data (ref_adm( 7,iz, 8,10),iz = 1,20) / &
     & 0.1504900E+00, 0.1504900E+00, 0.1630800E+00, 0.1272500E+00, &
     & 0.1207400E+00, 0.1401800E+00, 0.1180200E+00, 0.1268800E+00, &
     & 0.1223700E+00, 0.1370700E+00, 0.1404800E+00, 0.2149900E+00, &
     & 0.1674900E+00, 0.1947300E+00, 0.1584725E+00, 0.2237200E+00, &
     & 0.2207600E+00, 0.1870556E+00, 0.1932864E+00, 0.1932864E+00 /
      data (ref_adm( 7,iz, 9,10),iz = 1,20) / &
     & 0.1329300E+00, 0.1329300E+00, 0.1124800E+00, 0.1047300E+00, &
     & 0.1144200E+00, 0.1155700E+00, 0.1138400E+00, 0.1280000E+00, &
     & 0.1365100E+00, 0.1300200E+00, 0.1641000E+00, 0.1440300E+00, &
     & 0.1466000E+00, 0.1437700E+00, 0.1389300E+00, 0.1663667E+00, &
     & 0.1753495E+00, 0.1870556E+00, 0.1932864E+00, 0.1932864E+00 /
      data (ref_adm( 7,iz,10,10),iz = 1,20) / &
     & 0.1286100E+00, 0.1286100E+00, 0.1378000E+00, 0.1225100E+00, &
     & 0.1252000E+00, 0.1060100E+00, 0.1097500E+00, 0.1233400E+00, &
     & 0.1238100E+00, 0.1258200E+00, 0.1514600E+00, 0.1574000E+00, &
     & 0.1876500E+00, 0.1719800E+00, 0.1484700E+00, 0.1663667E+00, &
     & 0.1753495E+00, 0.1870556E+00, 0.1932864E+00, 0.1932864E+00 /
      data (ref_adm( 7,iz,11,10),iz = 1,20) / &
     & 0.1338200E+00, 0.1338200E+00, 0.1162000E+00, 0.1260900E+00, &
     & 0.1253100E+00, 0.1202800E+00, 0.1292800E+00, 0.1218700E+00, &
     & 0.1137300E+00, 0.1430568E+00, 0.1438609E+00, 0.1549700E+00, &
     & 0.1323800E+00, 0.2033200E+00, 0.1578100E+00, 0.2026600E+00, &
     & 0.1753495E+00, 0.1870556E+00, 0.1932864E+00, 0.1932864E+00 /
      data (ref_adm( 7,iz,12,10),iz = 1,20) / &
     & 0.1341600E+00, 0.1341600E+00, 0.1533200E+00, 0.1305500E+00, &
     & 0.1309100E+00, 0.1160800E+00, 0.1192800E+00, 0.1244200E+00, &
     & 0.1241800E+00, 0.1430568E+00, 0.1422200E+00, 0.1445000E+00, &
     & 0.1367800E+00, 0.1529278E+00, 0.1467100E+00, 0.1663667E+00, &
     & 0.1753495E+00, 0.1954900E+00, 0.1932864E+00, 0.1932864E+00 /
      data (ref_adm( 7,iz,13,10),iz = 1,20) / &
     & 0.1514500E+00, 0.1514500E+00, 0.1518100E+00, 0.1439600E+00, &
     & 0.1447800E+00, 0.1499600E+00, 0.1383500E+00, 0.1307500E+00, &
     & 0.1411700E+00, 0.1607300E+00, 0.1461100E+00, 0.1418100E+00, &
     & 0.1563900E+00, 0.1620500E+00, 0.1192200E+00, 0.1565700E+00, &
     & 0.1753495E+00, 0.1870556E+00, 0.1932864E+00, 0.1932864E+00 /
      data (ref_adm( 7,iz,14,10),iz = 1,20) / &
     & 0.1524700E+00, 0.1524700E+00, 0.1223000E+00, 0.1445100E+00, &
     & 0.1195600E+00, 0.1157800E+00, 0.1190600E+00, 0.1222200E+00, &
     & 0.1242500E+00, 0.1440200E+00, 0.1667500E+00, 0.1478900E+00, &
     & 0.1572700E+00, 0.1936900E+00, 0.1884700E+00, 0.1626500E+00, &
     & 0.1753495E+00, 0.1870556E+00, 0.1932864E+00, 0.1932864E+00 /
      data (ref_adm( 7,iz,15,10),iz = 1,20) / &
     & 0.1431000E+00, 0.1431000E+00, 0.1624000E+00, 0.1599300E+00, &
     & 0.1278700E+00, 0.1358300E+00, 0.1219000E+00, 0.1151700E+00, &
     & 0.1320900E+00, 0.1482400E+00, 0.1494100E+00, 0.1378000E+00, &
     & 0.1340700E+00, 0.1535600E+00, 0.1584725E+00, 0.1663667E+00, &
     & 0.1753495E+00, 0.1870556E+00, 0.1932864E+00, 0.1932864E+00 /
      data (ref_adm( 7,iz,16,10),iz = 1,20) / &
     & 0.1603400E+00, 0.1603400E+00, 0.2721500E+00, 0.1438100E+00, &
     & 0.1757500E+00, 0.2258500E+00, 0.1205000E+00, 0.1349200E+00, &
     & 0.1420300E+00, 0.1391400E+00, 0.1252400E+00, 0.1675300E+00, &
     & 0.1551000E+00, 0.1518900E+00, 0.1584725E+00, 0.1663667E+00, &
     & 0.1753495E+00, 0.1870556E+00, 0.1932864E+00, 0.1932864E+00 /
      data (ref_adm( 7,iz,17,10),iz = 1,20) / &
     & 0.1629100E+00, 0.1629100E+00, 0.1700700E+00, 0.1965700E+00, &
     & 0.1284100E+00, 0.1255300E+00, 0.1172100E+00, 0.1278400E+00, &
     & 0.1496600E+00, 0.1484200E+00, 0.1303400E+00, 0.1460401E+00, &
     & 0.1493250E+00, 0.1529278E+00, 0.1584725E+00, 0.1663667E+00, &
     & 0.1753495E+00, 0.1870556E+00, 0.1932864E+00, 0.1932864E+00 /
      data (ref_adm( 7,iz,18,10),iz = 1,20) / &
     & 0.1518900E+00, 0.1518900E+00, 0.1227600E+00, 0.1418908E+00, &
     & 0.1265900E+00, 0.9460600E-01, 0.1526900E+00, 0.1164100E+00, &
     & 0.1498300E+00, 0.1297200E+00, 0.9572300E-01, 0.1482900E+00, &
     & 0.1571087E+00, 0.1627839E+00, 0.1708981E+00, 0.1693100E+00, &
     & 0.1943199E+00, 0.2101888E+00, 0.2195259E+00, 0.2195259E+00 /
      data (ref_adm( 7,iz,19,10),iz = 1,20) / &
     & 0.1624400E+00, 0.1624400E+00, 0.1726600E+00, 0.1314800E+00, &
     & 0.1304300E+00, 0.1263300E+00, 0.1214300E+00, 0.1366400E+00, &
     & 0.1325000E+00, 0.1298000E+00, 0.1282200E+00, 0.1183300E+00, &
     & 0.1377200E+00, 0.1638246E+00, 0.2025500E+00, 0.1825424E+00, &
     & 0.1943089E+00, 0.2095998E+00, 0.2178158E+00, 0.2178158E+00 /
      data (ref_adm( 7,iz,20,10),iz = 1,20) / &
     & 0.1322500E+00, 0.1322500E+00, 0.1460300E+00, 0.1279300E+00, &
     & 0.1361400E+00, 0.1459700E+00, 0.1427800E+00, 0.1409900E+00, &
     & 0.1320300E+00, 0.1265500E+00, 0.1607300E+00, 0.1878800E+00, &
     & 0.1996700E+00, 0.1745600E+00, 0.1727261E+00, 0.1831153E+00, &
     & 0.1945093E+00, 0.2090093E+00, 0.2166895E+00, 0.2166895E+00 /
      data (ref_adm( 7,iz,21,10),iz = 1,20) / &
     & 0.1598100E+00, 0.1598100E+00, 0.1746200E+00, 0.1480500E+00, &
     & 0.1293900E+00, 0.1361600E+00, 0.1398000E+00, 0.1863600E+00, &
     & 0.1196200E+00, 0.1063000E+00, 0.1335400E+00, 0.1389400E+00, &
     & 0.2095600E+00, 0.1748600E+00, 0.1739189E+00, 0.1839492E+00, &
     & 0.1949420E+00, 0.2087252E+00, 0.2158010E+00, 0.2158010E+00 /
      data (ref_adm( 7,iz,22,10),iz = 1,20) / &
     & 0.1444900E+00, 0.1444900E+00, 0.1487500E+00, 0.1483400E+00, &
     & 0.1413200E+00, 0.1269800E+00, 0.1367900E+00, 0.1390800E+00, &
     & 0.1878400E+00, 0.2005400E+00, 0.1276200E+00, 0.1540700E+00, &
     & 0.1811600E+00, 0.1607600E+00, 0.1501300E+00, 0.2268040E+00, &
     & 0.2438090E+00, 0.2650246E+00, 0.2767804E+00, 0.2767804E+00 /
      data (ref_adm( 7,iz,23,10),iz = 1,20) / &
     & 0.1499700E+00, 0.1499700E+00, 0.1477100E+00, 0.1523000E+00, &
     & 0.1388700E+00, 0.1489400E+00, 0.1357500E+00, 0.1571100E+00, &
     & 0.1814000E+00, 0.1407500E+00, 0.1562100E+00, 0.1481300E+00, &
     & 0.1880200E+00, 0.2013317E+00, 0.2132907E+00, 0.2289793E+00, &
     & 0.2456938E+00, 0.2656061E+00, 0.2768894E+00, 0.2768894E+00 /
      data (ref_adm( 7,iz,24,10),iz = 1,20) / &
     & 0.1244800E+00, 0.1244800E+00, 0.1285700E+00, 0.1508300E+00, &
     & 0.1371000E+00, 0.1464200E+00, 0.1464400E+00, 0.1419800E+00, &
     & 0.2067600E+00, 0.2001800E+00, 0.1590500E+00, 0.1453600E+00, &
     & 0.1964328E+00, 0.1650300E+00, 0.1559300E+00, 0.2319668E+00, &
     & 0.2481305E+00, 0.2673667E+00, 0.2777730E+00, 0.2777730E+00 /
      data (ref_adm( 7,iz,25,10),iz = 1,20) / &
     & 0.1397900E+00, 0.1397900E+00, 0.1233500E+00, 0.1257200E+00, &
     & 0.1554600E+00, 0.1419800E+00, 0.1463800E+00, 0.1502700E+00, &
     & 0.1272800E+00, 0.1702700E+00, 0.1820501E+00, 0.1727800E+00, &
     & 0.1522500E+00, 0.2020100E+00, 0.2587700E+00, 0.2357414E+00, &
     & 0.2514320E+00, 0.2696884E+00, 0.2798904E+00, 0.2798904E+00 /
      data (ref_adm( 7,iz,26,10),iz = 1,20) / &
     & 0.1225500E+00, 0.1225500E+00, 0.1318800E+00, 0.1357600E+00, &
     & 0.1419400E+00, 0.1370200E+00, 0.1607500E+00, 0.1623700E+00, &
     & 0.1652800E+00, 0.1674100E+00, 0.1601500E+00, 0.1720100E+00, &
     & 0.1737800E+00, 0.1696200E+00, 0.2251665E+00, 0.2403223E+00, &
     & 0.2084900E+00, 0.2730756E+00, 0.2827628E+00, 0.2827628E+00 /
      data (ref_adm( 7,iz,27,10),iz = 1,20) / &
     & 0.1633900E+00, 0.1633900E+00, 0.1651600E+00, 0.1756800E+00, &
     & 0.1788200E+00, 0.1847600E+00, 0.1629000E+00, 0.1956800E+00, &
     & 0.1940600E+00, 0.1973400E+00, 0.1675600E+00, 0.1741700E+00, &
     & 0.1962000E+00, 0.2235200E+00, 0.2309100E+00, 0.1924200E+00, &
     & 0.2116500E+00, 0.2775260E+00, 0.2868638E+00, 0.2868638E+00 /
      data (ref_adm( 7,iz,28,10),iz = 1,20) / &
     & 0.1577900E+00, 0.1577900E+00, 0.1130000E+00, 0.1417000E+00, &
     & 0.1505500E+00, 0.1583000E+00, 0.1744400E+00, 0.2005000E+00, &
     & 0.2209100E+00, 0.2101200E+00, 0.2312100E+00, 0.2224000E+00, &
     & 0.2069000E+00, 0.2259800E+00, 0.2350500E+00, 0.1890400E+00, &
     & 0.2660427E+00, 0.2828568E+00, 0.2922907E+00, 0.2922907E+00 /
      data (ref_adm( 7,iz,29,10),iz = 1,20) / &
     & 0.1578500E+00, 0.1578500E+00, 0.1689100E+00, 0.1277200E+00, &
     & 0.1305200E+00, 0.1750900E+00, 0.2927200E+00, 0.1354500E+00, &
     & 0.1895600E+00, 0.1939300E+00, 0.1882900E+00, 0.2183000E+00, &
     & 0.2257400E+00, 0.2303500E+00, 0.2389000E+00, 0.2228500E+00, &
     & 0.2717924E+00, 0.2883674E+00, 0.2984517E+00, 0.2984517E+00 /
      data (ref_adm( 7,iz,30,10),iz = 1,20) / &
     & 0.1707700E+00, 0.1707700E+00, 0.1405000E+00, 0.1374500E+00, &
     & 0.1665400E+00, 0.1453700E+00, 0.1238400E+00, 0.1798200E+00, &
     & 0.1882539E+00, 0.1164300E+00, 0.2370200E+00, 0.2629000E+00, &
     & 0.2345300E+00, 0.2285300E+00, 0.2241300E+00, 0.2626749E+00, &
     & 0.2779193E+00, 0.2941405E+00, 0.3046922E+00, 0.3046922E+00 /
      data (ref_adm( 7,iz,31,10),iz = 1,20) / &
     & 0.1349600E+00, 0.1349600E+00, 0.1449900E+00, 0.1900400E+00, &
     & 0.1733200E+00, 0.2556800E+00, 0.2105900E+00, 0.2226600E+00, &
     & 0.1816200E+00, 0.1996635E+00, 0.2347200E+00, 0.2742800E+00, &
     & 0.2542800E+00, 0.2904400E+00, 0.2294300E+00, 0.2315700E+00, &
     & 0.2862200E+00, 0.3002743E+00, 0.3107990E+00, 0.3107990E+00 /
      data (ref_adm( 7,iz,32,10),iz = 1,20) / &
     & 0.1629000E+00, 0.1629000E+00, 0.1889800E+00, 0.1446200E+00, &
     & 0.1889500E+00, 0.2293800E+00, 0.2022500E+00, 0.2287600E+00, &
     & 0.2338600E+00, 0.2524400E+00, 0.2732300E+00, 0.2235169E+00, &
     & 0.2417000E+00, 0.2466561E+00, 0.2273900E+00, 0.2369900E+00, &
     & 0.2442500E+00, 0.3061991E+00, 0.3169340E+00, 0.3169340E+00 /
      data (ref_adm( 7,iz,33,10),iz = 1,20) / &
     & 0.1818900E+00, 0.1818900E+00, 0.1526700E+00, 0.1672500E+00, &
     & 0.1439700E+00, 0.1197300E+00, 0.2487400E+00, 0.2151600E+00, &
     & 0.2140500E+00, 0.2704200E+00, 0.2694400E+00, 0.2087800E+00, &
     & 0.2397113E+00, 0.2508638E+00, 0.2202200E+00, 0.2382800E+00, &
     & 0.2353600E+00, 0.3119060E+00, 0.3226118E+00, 0.3226118E+00 /
      data (ref_adm( 7,iz,34,10),iz = 1,20) / &
     & 0.1679500E+00, 0.1679500E+00, 0.1584000E+00, 0.1456600E+00, &
     & 0.2580700E+00, 0.1610700E+00, 0.1834000E+00, 0.1596800E+00, &
     & 0.2141400E+00, 0.2571900E+00, 0.2181207E+00, 0.2511900E+00, &
     & 0.2860200E+00, 0.2538795E+00, 0.2685432E+00, 0.2853554E+00, &
     & 0.3008861E+00, 0.2103900E+00, 0.3276435E+00, 0.3276435E+00 /
      data (ref_adm( 7,iz,35,10),iz = 1,20) / &
     & 0.1504600E+00, 0.1504600E+00, 0.1685100E+00, 0.1574256E+00, &
     & 0.1467900E+00, 0.1491100E+00, 0.1900100E+00, 0.1802900E+00, &
     & 0.1794600E+00, 0.2323500E+00, 0.2497400E+00, 0.2311300E+00, &
     & 0.2661900E+00, 0.2857600E+00, 0.2206800E+00, 0.2904500E+00, &
     & 0.3049141E+00, 0.3209720E+00, 0.3318389E+00, 0.3318389E+00 /
      data (ref_adm( 7,iz,36,10),iz = 1,20) / &
     & 0.1544600E+00, 0.1544600E+00, 0.1296000E+00, 0.1550500E+00, &
     & 0.1402100E+00, 0.1524300E+00, 0.1981600E+00, 0.1821100E+00, &
     & 0.1922800E+00, 0.2312700E+00, 0.1852700E+00, 0.3262700E+00, &
     & 0.2559900E+00, 0.2586483E+00, 0.2534700E+00, 0.2767800E+00, &
     & 0.3076871E+00, 0.3238884E+00, 0.3346949E+00, 0.3346949E+00 /
      data (ref_adm( 7,iz,37,10),iz = 1,20) / &
     & 0.1496800E+00, 0.1496800E+00, 0.1212000E+00, 0.1387100E+00, &
     & 0.1664600E+00, 0.1741047E+00, 0.2563800E+00, 0.2510300E+00, &
     & 0.1938800E+00, 0.2321100E+00, 0.2579900E+00, 0.2431463E+00, &
     & 0.2651200E+00, 0.2528100E+00, 0.2725800E+00, 0.3002500E+00, &
     & 0.2850700E+00, 0.3255439E+00, 0.3362730E+00, 0.3362730E+00 /
      data (ref_adm( 7,iz,38,10),iz = 1,20) / &
     & 0.1496800E+00, 0.1496800E+00, 0.1212000E+00, 0.1387100E+00, &
     & 0.1664600E+00, 0.1741047E+00, 0.2563800E+00, 0.2510300E+00, &
     & 0.1938800E+00, 0.2321100E+00, 0.2579900E+00, 0.2431463E+00, &
     & 0.2651200E+00, 0.2528100E+00, 0.2725800E+00, 0.3002500E+00, &
     & 0.2850700E+00, 0.3255439E+00, 0.3362730E+00, 0.3362730E+00 /
! Solar Zenith Angle 50.0 Albedo  0.1722427E+00
      data (ref_adm( 7,iz, 1,11),iz = 1,20) / &
     & 0.1453900E+00, 0.1453900E+00, 0.1544400E+00, 0.1297100E+00, &
     & 0.1263100E+00, 0.1452900E+00, 0.1129600E+00, 0.1303000E+00, &
     & 0.1078400E+00, 0.8496300E-01, 0.1964900E+00, 0.1645300E+00, &
     & 0.1462623E+00, 0.1386800E+00, 0.1454400E+00, 0.1394600E+00, &
     & 0.1909200E+00, 0.2105093E+00, 0.2272302E+00, 0.2272302E+00 /
      data (ref_adm( 7,iz, 2,11),iz = 1,20) / &
     & 0.1453900E+00, 0.1453900E+00, 0.1544400E+00, 0.1297100E+00, &
     & 0.1263100E+00, 0.1452900E+00, 0.1129600E+00, 0.1303000E+00, &
     & 0.1078400E+00, 0.8496300E-01, 0.1964900E+00, 0.1645300E+00, &
     & 0.1462623E+00, 0.1386800E+00, 0.1454400E+00, 0.1394600E+00, &
     & 0.1909200E+00, 0.2105093E+00, 0.2272302E+00, 0.2272302E+00 /
      data (ref_adm( 7,iz, 3,11),iz = 1,20) / &
     & 0.1466300E+00, 0.1466300E+00, 0.1560600E+00, 0.1438600E+00, &
     & 0.1290200E+00, 0.1230400E+00, 0.1069600E+00, 0.1132900E+00, &
     & 0.1306400E+00, 0.1829200E+00, 0.1682900E+00, 0.1329200E+00, &
     & 0.1383200E+00, 0.1469500E+00, 0.1864600E+00, 0.1747695E+00, &
     & 0.1896067E+00, 0.2102853E+00, 0.3508578E-08, 0.3508578E-08 /
      data (ref_adm( 7,iz, 4,11),iz = 1,20) / &
     & 0.1352400E+00, 0.1352400E+00, 0.1144400E+00, 0.1323500E+00, &
     & 0.1281200E+00, 0.1202700E+00, 0.1066800E+00, 0.1383800E+00, &
     & 0.1308052E+00, 0.1507800E+00, 0.1117200E+00, 0.1621700E+00, &
     & 0.1407000E+00, 0.1532900E+00, 0.1836800E+00, 0.1747300E+00, &
     & 0.1894446E+00, 0.2099909E+00, 0.2266362E+00, 0.2266362E+00 /
      data (ref_adm( 7,iz, 5,11),iz = 1,20) / &
     & 0.1672200E+00, 0.1672200E+00, 0.1276500E+00, 0.1539500E+00, &
     & 0.1369400E+00, 0.1202200E+00, 0.1175600E+00, 0.1397200E+00, &
     & 0.1246100E+00, 0.1325700E+00, 0.1351100E+00, 0.1335300E+00, &
     & 0.1391300E+00, 0.2090500E+00, 0.1839900E+00, 0.1745392E+00, &
     & 0.1891261E+00, 0.2095539E+00, 0.2259571E+00, 0.2259571E+00 /
      data (ref_adm( 7,iz, 6,11),iz = 1,20) / &
     & 0.1307600E+00, 0.1307600E+00, 0.1360500E+00, 0.1515600E+00, &
     & 0.1375800E+00, 0.1415500E+00, 0.1232800E+00, 0.1170200E+00, &
     & 0.1220100E+00, 0.1195900E+00, 0.1227700E+00, 0.1321100E+00, &
     & 0.1594700E+00, 0.1567000E+00, 0.1785500E+00, 0.1743467E+00, &
     & 0.1926600E+00, 0.2088569E+00, 0.2251801E+00, 0.2251801E+00 /
      data (ref_adm( 7,iz, 7,11),iz = 1,20) / &
     & 0.1422700E+00, 0.1422700E+00, 0.1151900E+00, 0.1369000E+00, &
     & 0.1528900E+00, 0.1222100E+00, 0.1266300E+00, 0.1548900E+00, &
     & 0.1408100E+00, 0.1487400E+00, 0.1579500E+00, 0.1793600E+00, &
     & 0.1758500E+00, 0.1527000E+00, 0.1656800E+00, 0.1740797E+00, &
     & 0.1883177E+00, 0.2081120E+00, 0.2240448E+00, 0.2240448E+00 /
      data (ref_adm( 7,iz, 8,11),iz = 1,20) / &
     & 0.1363100E+00, 0.1363100E+00, 0.1788700E+00, 0.1191500E+00, &
     & 0.1280900E+00, 0.1292400E+00, 0.1033600E+00, 0.1143300E+00, &
     & 0.1130700E+00, 0.1043700E+00, 0.1044200E+00, 0.1143800E+00, &
     & 0.1177000E+00, 0.1441900E+00, 0.1686200E+00, 0.2085700E+00, &
     & 0.2590300E+00, 0.2895800E+00, 0.2227652E+00, 0.2227652E+00 /
      data (ref_adm( 7,iz, 9,11),iz = 1,20) / &
     & 0.1315500E+00, 0.1315500E+00, 0.1321700E+00, 0.1268400E+00, &
     & 0.1400900E+00, 0.1310100E+00, 0.1148600E+00, 0.1214200E+00, &
     & 0.1428300E+00, 0.1242000E+00, 0.1385200E+00, 0.1485600E+00, &
     & 0.1447100E+00, 0.1529007E+00, 0.1889900E+00, 0.2033800E+00, &
     & 0.2196400E+00, 0.2654100E+00, 0.2212071E+00, 0.2212071E+00 /
      data (ref_adm( 7,iz,10,11),iz = 1,20) / &
     & 0.1249400E+00, 0.1249400E+00, 0.1282200E+00, 0.1276800E+00, &
     & 0.1119200E+00, 0.1293400E+00, 0.1162900E+00, 0.1288900E+00, &
     & 0.9821100E-01, 0.1413000E+00, 0.1210800E+00, 0.1471000E+00, &
     & 0.1226200E+00, 0.1925200E+00, 0.2009300E+00, 0.1686800E+00, &
     & 0.2126500E+00, 0.2724400E+00, 0.2194059E+00, 0.2194059E+00 /
      data (ref_adm( 7,iz,11,11),iz = 1,20) / &
     & 0.1256400E+00, 0.1256400E+00, 0.1898100E+00, 0.1216900E+00, &
     & 0.1401700E+00, 0.1206900E+00, 0.1239300E+00, 0.1467100E+00, &
     & 0.1153000E+00, 0.1436900E+00, 0.1297200E+00, 0.1767800E+00, &
     & 0.1589000E+00, 0.1532718E+00, 0.2040300E+00, 0.1756900E+00, &
     & 0.1940600E+00, 0.2042954E+00, 0.2176085E+00, 0.2176085E+00 /
      data (ref_adm( 7,iz,12,11),iz = 1,20) / &
     & 0.1517300E+00, 0.1517300E+00, 0.1302500E+00, 0.1187700E+00, &
     & 0.1260400E+00, 0.1252600E+00, 0.1199200E+00, 0.1085600E+00, &
     & 0.1183800E+00, 0.1425900E+00, 0.1326100E+00, 0.1528500E+00, &
     & 0.1434500E+00, 0.1386200E+00, 0.1465100E+00, 0.1642700E+00, &
     & 0.1976200E+00, 0.1886500E+00, 0.2158680E+00, 0.2158680E+00 /
      data (ref_adm( 7,iz,13,11),iz = 1,20) / &
     & 0.1450300E+00, 0.1450300E+00, 0.1529400E+00, 0.1470600E+00, &
     & 0.1442600E+00, 0.1385500E+00, 0.1511100E+00, 0.1523600E+00, &
     & 0.1546600E+00, 0.1408000E+00, 0.1438400E+00, 0.1511900E+00, &
     & 0.1316500E+00, 0.1404000E+00, 0.1595200E+00, 0.1498900E+00, &
     & 0.2217100E+00, 0.2059800E+00, 0.2142566E+00, 0.2142566E+00 /
      data (ref_adm( 7,iz,14,11),iz = 1,20) / &
     & 0.1389800E+00, 0.1389800E+00, 0.1208500E+00, 0.1223600E+00, &
     & 0.1112900E+00, 0.1173200E+00, 0.1237600E+00, 0.1283600E+00, &
     & 0.1372200E+00, 0.1507500E+00, 0.1420300E+00, 0.1511200E+00, &
     & 0.1616600E+00, 0.1675700E+00, 0.1398800E+00, 0.1774000E+00, &
     & 0.1849687E+00, 0.2010383E+00, 0.2124896E+00, 0.2124896E+00 /
      data (ref_adm( 7,iz,15,11),iz = 1,20) / &
     & 0.1406900E+00, 0.1406900E+00, 0.1389700E+00, 0.1450800E+00, &
     & 0.1346800E+00, 0.1278500E+00, 0.1307000E+00, 0.1329000E+00, &
     & 0.1373200E+00, 0.1427900E+00, 0.1353900E+00, 0.1415500E+00, &
     & 0.1442800E+00, 0.1519100E+00, 0.1429900E+00, 0.1604900E+00, &
     & 0.1619100E+00, 0.2001160E+00, 0.2107999E+00, 0.2107999E+00 /
      data (ref_adm( 7,iz,16,11),iz = 1,20) / &
     & 0.1362400E+00, 0.1362400E+00, 0.1352500E+00, 0.1363200E+00, &
     & 0.1390500E+00, 0.1274400E+00, 0.1187400E+00, 0.1274500E+00, &
     & 0.1447600E+00, 0.1353500E+00, 0.1468200E+00, 0.1511200E+00, &
     & 0.1682200E+00, 0.1625800E+00, 0.1567500E+00, 0.1779700E+00, &
     & 0.2156300E+00, 0.1993420E+00, 0.2089776E+00, 0.2089776E+00 /
      data (ref_adm( 7,iz,17,11),iz = 1,20) / &
     & 0.1459000E+00, 0.1459000E+00, 0.1582700E+00, 0.1462000E+00, &
     & 0.1376500E+00, 0.1210400E+00, 0.1322500E+00, 0.1194300E+00, &
     & 0.1191600E+00, 0.1437900E+00, 0.1247700E+00, 0.1797400E+00, &
     & 0.1726600E+00, 0.1948100E+00, 0.1829700E+00, 0.1733043E+00, &
     & 0.1843147E+00, 0.1987656E+00, 0.2073963E+00, 0.2073963E+00 /
      data (ref_adm( 7,iz,18,11),iz = 1,20) / &
     & 0.1810500E+00, 0.1810500E+00, 0.1181900E+00, 0.1458300E+00, &
     & 0.1395900E+00, 0.1412700E+00, 0.1373200E+00, 0.1400300E+00, &
     & 0.1433500E+00, 0.1480400E+00, 0.1500500E+00, 0.1661900E+00, &
     & 0.1588600E+00, 0.2001200E+00, 0.1542900E+00, 0.1903269E+00, &
     & 0.2039573E+00, 0.2215662E+00, 0.2321295E+00, 0.2321295E+00 /
      data (ref_adm( 7,iz,19,11),iz = 1,20) / &
     & 0.1279400E+00, 0.1279400E+00, 0.1686500E+00, 0.1829300E+00, &
     & 0.1599600E+00, 0.1357600E+00, 0.1433000E+00, 0.1334200E+00, &
     & 0.1249200E+00, 0.2158800E+00, 0.1319200E+00, 0.1756300E+00, &
     & 0.1571000E+00, 0.1983200E+00, 0.2402500E+00, 0.2003700E+00, &
     & 0.2037704E+00, 0.2206375E+00, 0.2298863E+00, 0.2298863E+00 /
      data (ref_adm( 7,iz,20,11),iz = 1,20) / &
     & 0.1216800E+00, 0.1216800E+00, 0.1291600E+00, 0.1667800E+00, &
     & 0.1672900E+00, 0.1280500E+00, 0.1368100E+00, 0.1224100E+00, &
     & 0.1505700E+00, 0.1638700E+00, 0.1315100E+00, 0.2145200E+00, &
     & 0.1946100E+00, 0.2069200E+00, 0.1363600E+00, 0.1912904E+00, &
     & 0.2039377E+00, 0.2199375E+00, 0.2284289E+00, 0.2284289E+00 /
      data (ref_adm( 7,iz,21,11),iz = 1,20) / &
     & 0.1562900E+00, 0.1562900E+00, 0.1419000E+00, 0.1554400E+00, &
     & 0.1139500E+00, 0.1389900E+00, 0.1498400E+00, 0.1416200E+00, &
     & 0.1454900E+00, 0.1578200E+00, 0.1420900E+00, 0.1178300E+00, &
     & 0.1660800E+00, 0.1763400E+00, 0.1457100E+00, 0.1730800E+00, &
     & 0.2043296E+00, 0.2194737E+00, 0.2273525E+00, 0.2273525E+00 /
      data (ref_adm( 7,iz,22,11),iz = 1,20) / &
     & 0.1361300E+00, 0.1361300E+00, 0.1439100E+00, 0.1473900E+00, &
     & 0.1405900E+00, 0.1513000E+00, 0.1366100E+00, 0.1342600E+00, &
     & 0.1725000E+00, 0.1640500E+00, 0.1663600E+00, 0.1679300E+00, &
     & 0.1989900E+00, 0.1747400E+00, 0.1756600E+00, 0.2241210E+00, &
     & 0.2409247E+00, 0.2618894E+00, 0.2735061E+00, 0.2735061E+00 /
      data (ref_adm( 7,iz,23,11),iz = 1,20) / &
     & 0.1600500E+00, 0.1600500E+00, 0.1727800E+00, 0.1685000E+00, &
     & 0.1509600E+00, 0.1500400E+00, 0.1915300E+00, 0.1345300E+00, &
     & 0.1954900E+00, 0.1716100E+00, 0.1635200E+00, 0.1575200E+00, &
     & 0.1830500E+00, 0.1980000E+00, 0.1838100E+00, 0.1881200E+00, &
     & 0.2427874E+00, 0.2624639E+00, 0.2736140E+00, 0.2736140E+00 /
      data (ref_adm( 7,iz,24,11),iz = 1,20) / &
     & 0.1610000E+00, 0.1610000E+00, 0.1927400E+00, 0.1556900E+00, &
     & 0.1378200E+00, 0.1393900E+00, 0.1477100E+00, 0.1240700E+00, &
     & 0.1654000E+00, 0.1816500E+00, 0.1798100E+00, 0.1821600E+00, &
     & 0.2344900E+00, 0.1850900E+00, 0.2243600E+00, 0.2292227E+00, &
     & 0.2451951E+00, 0.2642039E+00, 0.2744869E+00, 0.2744869E+00 /
      data (ref_adm( 7,iz,25,11),iz = 1,20) / &
     & 0.1252200E+00, 0.1252200E+00, 0.1380000E+00, 0.1428200E+00, &
     & 0.1498600E+00, 0.1592200E+00, 0.1549900E+00, 0.1565200E+00, &
     & 0.1717400E+00, 0.1827500E+00, 0.1749800E+00, 0.1583500E+00, &
     & 0.1572900E+00, 0.1775100E+00, 0.1948000E+00, 0.1895500E+00, &
     & 0.2484576E+00, 0.2664981E+00, 0.2765792E+00, 0.2765792E+00 /
      data (ref_adm( 7,iz,26,11),iz = 1,20) / &
     & 0.1350600E+00, 0.1350600E+00, 0.1347000E+00, 0.1346200E+00, &
     & 0.1377700E+00, 0.1470500E+00, 0.1427500E+00, 0.1466200E+00, &
     & 0.1535400E+00, 0.1547300E+00, 0.1597300E+00, 0.1756300E+00, &
     & 0.2086000E+00, 0.2125900E+00, 0.2446000E+00, 0.2404100E+00, &
     & 0.1988000E+00, 0.2698452E+00, 0.2794178E+00, 0.2794178E+00 /
      data (ref_adm( 7,iz,27,11),iz = 1,20) / &
     & 0.1587600E+00, 0.1587600E+00, 0.1555300E+00, 0.1534700E+00, &
     & 0.1614900E+00, 0.1651200E+00, 0.1774200E+00, 0.1707700E+00, &
     & 0.1714900E+00, 0.1899600E+00, 0.1885400E+00, 0.2020700E+00, &
     & 0.1883600E+00, 0.1941100E+00, 0.2301100E+00, 0.2423814E+00, &
     & 0.2576225E+00, 0.2742430E+00, 0.2834702E+00, 0.2834702E+00 /
      data (ref_adm( 7,iz,28,11),iz = 1,20) / &
     & 0.1509800E+00, 0.1509800E+00, 0.1431800E+00, 0.1517300E+00, &
     & 0.1507200E+00, 0.1946100E+00, 0.1646100E+00, 0.1767900E+00, &
     & 0.1570200E+00, 0.2033500E+00, 0.1771600E+00, 0.2228100E+00, &
     & 0.2104200E+00, 0.2456600E+00, 0.2309500E+00, 0.2223700E+00, &
     & 0.2620500E+00, 0.2795107E+00, 0.2888331E+00, 0.2888331E+00 /
      data (ref_adm( 7,iz,29,11),iz = 1,20) / &
     & 0.1430100E+00, 0.1430100E+00, 0.1396600E+00, 0.1748200E+00, &
     & 0.1435700E+00, 0.1711200E+00, 0.1591000E+00, 0.2158300E+00, &
     & 0.1738100E+00, 0.2059800E+00, 0.2312400E+00, 0.2031600E+00, &
     & 0.2409600E+00, 0.2078500E+00, 0.2274500E+00, 0.2233600E+00, &
     & 0.2387300E+00, 0.2849560E+00, 0.2949210E+00, 0.2949210E+00 /
      data (ref_adm( 7,iz,30,11),iz = 1,20) / &
     & 0.1444700E+00, 0.1444700E+00, 0.1605300E+00, 0.1482400E+00, &
     & 0.1689500E+00, 0.1577800E+00, 0.1569200E+00, 0.2086200E+00, &
     & 0.1844800E+00, 0.2203400E+00, 0.2382300E+00, 0.2479700E+00, &
     & 0.2581800E+00, 0.2547400E+00, 0.2317400E+00, 0.2251900E+00, &
     & 0.2390000E+00, 0.2906608E+00, 0.3010879E+00, 0.3010879E+00 /
      data (ref_adm( 7,iz,31,11),iz = 1,20) / &
     & 0.1208000E+00, 0.1208000E+00, 0.1329800E+00, 0.1297700E+00, &
     & 0.1599600E+00, 0.1591400E+00, 0.1528000E+00, 0.1686800E+00, &
     & 0.2105300E+00, 0.2005100E+00, 0.2335700E+00, 0.2295600E+00, &
     & 0.2290300E+00, 0.2472300E+00, 0.2583700E+00, 0.2459700E+00, &
     & 0.2600200E+00, 0.2872700E+00, 0.3071223E+00, 0.3071223E+00 /
      data (ref_adm( 7,iz,32,11),iz = 1,20) / &
     & 0.1467600E+00, 0.1467600E+00, 0.1334200E+00, 0.1780100E+00, &
     & 0.1801500E+00, 0.1634100E+00, 0.1841700E+00, 0.1893100E+00, &
     & 0.2255000E+00, 0.1939500E+00, 0.2337000E+00, 0.2364300E+00, &
     & 0.2786900E+00, 0.2423000E+00, 0.2623800E+00, 0.2436400E+00, &
     & 0.2481600E+00, 0.3025769E+00, 0.3131849E+00, 0.3131849E+00 /
      data (ref_adm( 7,iz,33,11),iz = 1,20) / &
     & 0.1425500E+00, 0.1425500E+00, 0.1624600E+00, 0.1550400E+00, &
     & 0.1814100E+00, 0.1762400E+00, 0.1741700E+00, 0.1708700E+00, &
     & 0.1996700E+00, 0.1921600E+00, 0.1978900E+00, 0.2239239E+00, &
     & 0.2878600E+00, 0.2468800E+00, 0.2790100E+00, 0.2753000E+00, &
     & 0.2471100E+00, 0.3082165E+00, 0.3187954E+00, 0.3187954E+00 /
      data (ref_adm( 7,iz,34,11),iz = 1,20) / &
     & 0.1291700E+00, 0.1291700E+00, 0.1510900E+00, 0.1554800E+00, &
     & 0.1657100E+00, 0.1767800E+00, 0.1730100E+00, 0.1724700E+00, &
     & 0.1961108E+00, 0.2231900E+00, 0.2155403E+00, 0.2220500E+00, &
     & 0.2470100E+00, 0.2606200E+00, 0.2618800E+00, 0.2540000E+00, &
     & 0.2600200E+00, 0.3131283E+00, 0.3237674E+00, 0.3237674E+00 /
      data (ref_adm( 7,iz,35,11),iz = 1,20) / &
     & 0.1404100E+00, 0.1404100E+00, 0.1467800E+00, 0.1613500E+00, &
     & 0.1476900E+00, 0.1479200E+00, 0.1598800E+00, 0.2186200E+00, &
     & 0.1894700E+00, 0.2148100E+00, 0.2390900E+00, 0.2690100E+00, &
     & 0.2661700E+00, 0.2522400E+00, 0.2686300E+00, 0.2729200E+00, &
     & 0.3013069E+00, 0.3171750E+00, 0.3279134E+00, 0.3279134E+00 /
      data (ref_adm( 7,iz,36,11),iz = 1,20) / &
     & 0.1366100E+00, 0.1366100E+00, 0.1750900E+00, 0.1699000E+00, &
     & 0.1310200E+00, 0.1721400E+00, 0.1968600E+00, 0.1964800E+00, &
     & 0.1998900E+00, 0.2043200E+00, 0.2312700E+00, 0.2812300E+00, &
     & 0.2554200E+00, 0.2931800E+00, 0.2767200E+00, 0.2808100E+00, &
     & 0.3040473E+00, 0.3200568E+00, 0.3307355E+00, 0.3307355E+00 /
      data (ref_adm( 7,iz,37,11),iz = 1,20) / &
     & 0.1324200E+00, 0.1324200E+00, 0.1397600E+00, 0.1511200E+00, &
     & 0.1828400E+00, 0.1744900E+00, 0.1916000E+00, 0.2120700E+00, &
     & 0.2171500E+00, 0.2262700E+00, 0.2242500E+00, 0.2295900E+00, &
     & 0.2479672E+00, 0.2670700E+00, 0.2601100E+00, 0.2695900E+00, &
     & 0.3055476E+00, 0.2790300E+00, 0.3322950E+00, 0.3322950E+00 /
      data (ref_adm( 7,iz,38,11),iz = 1,20) / &
     & 0.1324200E+00, 0.1324200E+00, 0.1397600E+00, 0.1511200E+00, &
     & 0.1828400E+00, 0.1744900E+00, 0.1916000E+00, 0.2120700E+00, &
     & 0.2171500E+00, 0.2262700E+00, 0.2242500E+00, 0.2295900E+00, &
     & 0.2479672E+00, 0.2670700E+00, 0.2601100E+00, 0.2695900E+00, &
     & 0.3055476E+00, 0.2790300E+00, 0.3322950E+00, 0.3322950E+00 /
! Solar Zenith Angle 55.0 Albedo  0.1836732E+00
      data (ref_adm( 7,iz, 1,12),iz = 1,20) / &
     & 0.1378600E+00, 0.1378600E+00, 0.1460800E+00, 0.1360300E+00, &
     & 0.1607300E+00, 0.1368600E+00, 0.1520200E+00, 0.1334300E+00, &
     & 0.1199800E+00, 0.1336300E+00, 0.1634400E+00, 0.1627400E+00, &
     & 0.1750700E+00, 0.2070800E+00, 0.2247700E+00, 0.2599900E+00, &
     & 0.2502900E+00, 0.3091500E+00, 0.3685331E+00, 0.3685331E+00 /
      data (ref_adm( 7,iz, 2,12),iz = 1,20) / &
     & 0.1378600E+00, 0.1378600E+00, 0.1460800E+00, 0.1360300E+00, &
     & 0.1607300E+00, 0.1368600E+00, 0.1520200E+00, 0.1334300E+00, &
     & 0.1199800E+00, 0.1336300E+00, 0.1634400E+00, 0.1627400E+00, &
     & 0.1750700E+00, 0.2070800E+00, 0.2247700E+00, 0.2599900E+00, &
     & 0.2502900E+00, 0.3091500E+00, 0.3685331E+00, 0.3685331E+00 /
      data (ref_adm( 7,iz, 3,12),iz = 1,20) / &
     & 0.1369200E+00, 0.1369200E+00, 0.1567800E+00, 0.1318600E+00, &
     & 0.1091400E+00, 0.1261100E+00, 0.1434100E+00, 0.1350500E+00, &
     & 0.1458000E+00, 0.1465100E+00, 0.1375700E+00, 0.1373200E+00, &
     & 0.1649500E+00, 0.1869200E+00, 0.2016800E+00, 0.2235900E+00, &
     & 0.2647500E+00, 0.3162000E+00, 0.5656290E-08, 0.5656290E-08 /
      data (ref_adm( 7,iz, 4,12),iz = 1,20) / &
     & 0.1192100E+00, 0.1192100E+00, 0.1263300E+00, 0.1320400E+00, &
     & 0.1519100E+00, 0.1318200E+00, 0.1184900E+00, 0.1203400E+00, &
     & 0.1367900E+00, 0.1339500E+00, 0.1589100E+00, 0.1613600E+00, &
     & 0.1686500E+00, 0.1736400E+00, 0.2808900E+00, 0.2153000E+00, &
     & 0.2771600E+00, 0.3401800E+00, 0.3595294E+00, 0.3595294E+00 /
      data (ref_adm( 7,iz, 5,12),iz = 1,20) / &
     & 0.1312800E+00, 0.1312800E+00, 0.1313700E+00, 0.1051300E+00, &
     & 0.1070700E+00, 0.1055100E+00, 0.1237600E+00, 0.1342600E+00, &
     & 0.1543100E+00, 0.1603700E+00, 0.1528000E+00, 0.1565700E+00, &
     & 0.1853600E+00, 0.1749100E+00, 0.1898400E+00, 0.2070000E+00, &
     & 0.2874200E+00, 0.2995101E+00, 0.3512194E+00, 0.3512194E+00 /
      data (ref_adm( 7,iz, 6,12),iz = 1,20) / &
     & 0.1335900E+00, 0.1335900E+00, 0.1276000E+00, 0.1260900E+00, &
     & 0.1243500E+00, 0.1226500E+00, 0.1291400E+00, 0.1316400E+00, &
     & 0.1481500E+00, 0.1333200E+00, 0.1377300E+00, 0.1552000E+00, &
     & 0.1548700E+00, 0.1810800E+00, 0.1997500E+00, 0.2294000E+00, &
     & 0.1814500E+00, 0.2640000E+00, 0.3411611E+00, 0.3411611E+00 /
      data (ref_adm( 7,iz, 7,12),iz = 1,20) / &
     & 0.1411900E+00, 0.1411900E+00, 0.1370400E+00, 0.1276000E+00, &
     & 0.1364700E+00, 0.1336200E+00, 0.1388100E+00, 0.1489000E+00, &
     & 0.1665800E+00, 0.1531900E+00, 0.1536300E+00, 0.1974100E+00, &
     & 0.2514800E+00, 0.2444600E+00, 0.2463800E+00, 0.2410500E+00, &
     & 0.2362500E+00, 0.2537400E+00, 0.3314040E+00, 0.3314040E+00 /
      data (ref_adm( 7,iz, 8,12),iz = 1,20) / &
     & 0.1630300E+00, 0.1630300E+00, 0.1404500E+00, 0.1359200E+00, &
     & 0.1364700E+00, 0.1278600E+00, 0.1486100E+00, 0.1456000E+00, &
     & 0.1445200E+00, 0.1335700E+00, 0.1674500E+00, 0.1634100E+00, &
     & 0.1704400E+00, 0.1587500E+00, 0.1991800E+00, 0.2253200E+00, &
     & 0.2502556E+00, 0.2861298E+00, 0.3224976E+00, 0.3224976E+00 /
      data (ref_adm( 7,iz, 9,12),iz = 1,20) / &
     & 0.1505000E+00, 0.1505000E+00, 0.1311400E+00, 0.1483600E+00, &
     & 0.1248400E+00, 0.1352900E+00, 0.1352900E+00, 0.1464100E+00, &
     & 0.1381300E+00, 0.1410100E+00, 0.1382100E+00, 0.1458500E+00, &
     & 0.1518200E+00, 0.1587500E+00, 0.1659500E+00, 0.2974200E+00, &
     & 0.2932700E+00, 0.2820310E+00, 0.3142194E+00, 0.3142194E+00 /
      data (ref_adm( 7,iz,10,12),iz = 1,20) / &
     & 0.1317100E+00, 0.1317100E+00, 0.1309500E+00, 0.1372000E+00, &
     & 0.1145800E+00, 0.1424600E+00, 0.1141900E+00, 0.1216500E+00, &
     & 0.1201700E+00, 0.1294200E+00, 0.1298700E+00, 0.1333900E+00, &
     & 0.1392800E+00, 0.1559900E+00, 0.1614500E+00, 0.2448900E+00, &
     & 0.2189600E+00, 0.2515600E+00, 0.3071784E+00, 0.3071784E+00 /
      data (ref_adm( 7,iz,11,12),iz = 1,20) / &
     & 0.1338000E+00, 0.1338000E+00, 0.1685900E+00, 0.1225700E+00, &
     & 0.1249600E+00, 0.1408300E+00, 0.1221000E+00, 0.1105700E+00, &
     & 0.1178500E+00, 0.1442700E+00, 0.1443200E+00, 0.1439100E+00, &
     & 0.1481800E+00, 0.1294100E+00, 0.1691000E+00, 0.2128200E+00, &
     & 0.2346900E+00, 0.2783500E+00, 0.3007005E+00, 0.3007005E+00 /
      data (ref_adm( 7,iz,12,12),iz = 1,20) / &
     & 0.1402100E+00, 0.1402100E+00, 0.1330200E+00, 0.1342600E+00, &
     & 0.1434100E+00, 0.1406400E+00, 0.1054100E+00, 0.1240800E+00, &
     & 0.1249400E+00, 0.1276800E+00, 0.1699000E+00, 0.1273300E+00, &
     & 0.1574600E+00, 0.1467700E+00, 0.1677300E+00, 0.2322200E+00, &
     & 0.2851600E+00, 0.2704520E+00, 0.2950672E+00, 0.2950672E+00 /
      data (ref_adm( 7,iz,13,12),iz = 1,20) / &
     & 0.1619300E+00, 0.1619300E+00, 0.1504300E+00, 0.1430700E+00, &
     & 0.1432200E+00, 0.1531100E+00, 0.1429800E+00, 0.1549100E+00, &
     & 0.1315700E+00, 0.1538500E+00, 0.1206000E+00, 0.1405500E+00, &
     & 0.1419300E+00, 0.1415400E+00, 0.1517300E+00, 0.2442200E+00, &
     & 0.2357501E+00, 0.2665419E+00, 0.2897484E+00, 0.2897484E+00 /
      data (ref_adm( 7,iz,14,12),iz = 1,20) / &
     & 0.1454900E+00, 0.1454900E+00, 0.1434900E+00, 0.1344000E+00, &
     & 0.1371200E+00, 0.1382500E+00, 0.1389900E+00, 0.1392500E+00, &
     & 0.1438600E+00, 0.1454400E+00, 0.1498000E+00, 0.1459300E+00, &
     & 0.1551500E+00, 0.1679400E+00, 0.1877600E+00, 0.2174000E+00, &
     & 0.2838900E+00, 0.2618434E+00, 0.2843565E+00, 0.2843565E+00 /
      data (ref_adm( 7,iz,15,12),iz = 1,20) / &
     & 0.1365800E+00, 0.1365800E+00, 0.1336700E+00, 0.1309400E+00, &
     & 0.1350300E+00, 0.1304000E+00, 0.1322500E+00, 0.1334300E+00, &
     & 0.1352500E+00, 0.1390000E+00, 0.1403500E+00, 0.1490200E+00, &
     & 0.1605400E+00, 0.1762900E+00, 0.1848900E+00, 0.1719600E+00, &
     & 0.2295614E+00, 0.2701200E+00, 0.2780248E+00, 0.2780248E+00 /
      data (ref_adm( 7,iz,16,12),iz = 1,20) / &
     & 0.1348300E+00, 0.1348300E+00, 0.1242900E+00, 0.1270300E+00, &
     & 0.1280100E+00, 0.1294600E+00, 0.1351800E+00, 0.1466200E+00, &
     & 0.1391900E+00, 0.1371300E+00, 0.1395500E+00, 0.1439200E+00, &
     & 0.1550000E+00, 0.1668500E+00, 0.1975900E+00, 0.1990300E+00, &
     & 0.2269234E+00, 0.2531939E+00, 0.2715532E+00, 0.2715532E+00 /
      data (ref_adm( 7,iz,17,12),iz = 1,20) / &
     & 0.1391300E+00, 0.1391300E+00, 0.1324000E+00, 0.1184300E+00, &
     & 0.1367900E+00, 0.1679400E+00, 0.1521500E+00, 0.1611800E+00, &
     & 0.1370800E+00, 0.1597000E+00, 0.1408600E+00, 0.1412900E+00, &
     & 0.1668700E+00, 0.1768400E+00, 0.2243000E+00, 0.2067040E+00, &
     & 0.2249839E+00, 0.2493687E+00, 0.2659939E+00, 0.2659939E+00 /
      data (ref_adm( 7,iz,18,12),iz = 1,20) / &
     & 0.1415700E+00, 0.1415700E+00, 0.1328100E+00, 0.1421100E+00, &
     & 0.1231700E+00, 0.1255900E+00, 0.1505300E+00, 0.1288100E+00, &
     & 0.1187700E+00, 0.1569400E+00, 0.1416200E+00, 0.1445700E+00, &
     & 0.1684500E+00, 0.1782300E+00, 0.1859900E+00, 0.2035571E+00, &
     & 0.2202812E+00, 0.2419464E+00, 0.2556030E+00, 0.2556030E+00 /
      data (ref_adm( 7,iz,19,12),iz = 1,20) / &
     & 0.1323000E+00, 0.1323000E+00, 0.1390000E+00, 0.1353500E+00, &
     & 0.1437900E+00, 0.1239000E+00, 0.1311500E+00, 0.1267600E+00, &
     & 0.1447900E+00, 0.1453400E+00, 0.1584300E+00, 0.1554600E+00, &
     & 0.1521400E+00, 0.1822400E+00, 0.1695800E+00, 0.2035134E+00, &
     & 0.2195964E+00, 0.2402369E+00, 0.2519915E+00, 0.2519915E+00 /
      data (ref_adm( 7,iz,20,12),iz = 1,20) / &
     & 0.1285800E+00, 0.1285800E+00, 0.1424200E+00, 0.1280100E+00, &
     & 0.1296300E+00, 0.1451900E+00, 0.1416300E+00, 0.1383000E+00, &
     & 0.1402400E+00, 0.1584300E+00, 0.1528800E+00, 0.1559200E+00, &
     & 0.1566300E+00, 0.1978100E+00, 0.1894100E+00, 0.2040791E+00, &
     & 0.2194926E+00, 0.2390697E+00, 0.2499107E+00, 0.2499107E+00 /
      data (ref_adm( 7,iz,21,12),iz = 1,20) / &
     & 0.1288300E+00, 0.1288300E+00, 0.1541700E+00, 0.1312600E+00, &
     & 0.1184200E+00, 0.1471200E+00, 0.1331800E+00, 0.1314500E+00, &
     & 0.1484700E+00, 0.1721700E+00, 0.1374600E+00, 0.1561500E+00, &
     & 0.1532800E+00, 0.2239000E+00, 0.2035200E+00, 0.2049530E+00, &
     & 0.2198471E+00, 0.2383082E+00, 0.2484620E+00, 0.2484620E+00 /
      data (ref_adm( 7,iz,22,12),iz = 1,20) / &
     & 0.1207000E+00, 0.1207000E+00, 0.1332300E+00, 0.1306800E+00, &
     & 0.1176100E+00, 0.1590500E+00, 0.1460400E+00, 0.1341700E+00, &
     & 0.1248400E+00, 0.1446600E+00, 0.1865800E+00, 0.1659600E+00, &
     & 0.1829100E+00, 0.1787500E+00, 0.2034500E+00, 0.2005100E+00, &
     & 0.2728642E+00, 0.3025842E+00, 0.3220282E+00, 0.3220282E+00 /
      data (ref_adm( 7,iz,23,12),iz = 1,20) / &
     & 0.1296300E+00, 0.1296300E+00, 0.1319600E+00, 0.1453800E+00, &
     & 0.1361400E+00, 0.1496400E+00, 0.1650700E+00, 0.1567600E+00, &
     & 0.1449500E+00, 0.1881800E+00, 0.1900100E+00, 0.1935800E+00, &
     & 0.1895800E+00, 0.1919100E+00, 0.2264700E+00, 0.2011500E+00, &
     & 0.2750232E+00, 0.3032486E+00, 0.3224320E+00, 0.3224320E+00 /
      data (ref_adm( 7,iz,24,12),iz = 1,20) / &
     & 0.1486000E+00, 0.1486000E+00, 0.1503500E+00, 0.1378800E+00, &
     & 0.1427600E+00, 0.1777800E+00, 0.1549300E+00, 0.1531200E+00, &
     & 0.1656200E+00, 0.1613100E+00, 0.1716300E+00, 0.2114000E+00, &
     & 0.1719000E+00, 0.2015000E+00, 0.2025800E+00, 0.2591400E+00, &
     & 0.2779051E+00, 0.3056994E+00, 0.3245543E+00, 0.3245543E+00 /
      data (ref_adm( 7,iz,25,12),iz = 1,20) / &
     & 0.1363100E+00, 0.1363100E+00, 0.1371500E+00, 0.1392900E+00, &
     & 0.1478200E+00, 0.1494600E+00, 0.1549600E+00, 0.1592800E+00, &
     & 0.1661200E+00, 0.1639000E+00, 0.1724200E+00, 0.1938600E+00, &
     & 0.2013400E+00, 0.2031000E+00, 0.2231500E+00, 0.2436600E+00, &
     & 0.2922300E+00, 0.3090252E+00, 0.3281482E+00, 0.3281482E+00 /
      data (ref_adm( 7,iz,26,12),iz = 1,20) / &
     & 0.1445700E+00, 0.1445700E+00, 0.1485700E+00, 0.1582600E+00, &
     & 0.1519000E+00, 0.1599500E+00, 0.1733000E+00, 0.1706800E+00, &
     & 0.1749100E+00, 0.1693100E+00, 0.1821000E+00, 0.1891600E+00, &
     & 0.1961700E+00, 0.2120600E+00, 0.2316000E+00, 0.2545400E+00, &
     & 0.2217400E+00, 0.2823600E+00, 0.3336898E+00, 0.3336898E+00 /
      data (ref_adm( 7,iz,27,12),iz = 1,20) / &
     & 0.1430700E+00, 0.1430700E+00, 0.1562400E+00, 0.1548700E+00, &
     & 0.1644700E+00, 0.1744400E+00, 0.1852800E+00, 0.1838400E+00, &
     & 0.1968500E+00, 0.1988700E+00, 0.2016900E+00, 0.2159000E+00, &
     & 0.2395600E+00, 0.2334000E+00, 0.2364200E+00, 0.2418700E+00, &
     & 0.2321100E+00, 0.3213386E+00, 0.3414524E+00, 0.3414524E+00 /
      data (ref_adm( 7,iz,28,12),iz = 1,20) / &
     & 0.1368200E+00, 0.1368200E+00, 0.1559200E+00, 0.1610100E+00, &
     & 0.1641000E+00, 0.2048900E+00, 0.2182500E+00, 0.1749400E+00, &
     & 0.1880300E+00, 0.1767300E+00, 0.2005500E+00, 0.2133100E+00, &
     & 0.1953400E+00, 0.2511900E+00, 0.2660300E+00, 0.2424700E+00, &
     & 0.2758500E+00, 0.2831200E+00, 0.3509351E+00, 0.3509351E+00 /
      data (ref_adm( 7,iz,29,12),iz = 1,20) / &
     & 0.1438700E+00, 0.1438700E+00, 0.1330900E+00, 0.1754900E+00, &
     & 0.1744800E+00, 0.1686100E+00, 0.2007500E+00, 0.2022700E+00, &
     & 0.1830300E+00, 0.1932500E+00, 0.2121200E+00, 0.2137100E+00, &
     & 0.2165000E+00, 0.2260000E+00, 0.2704400E+00, 0.2945100E+00, &
     & 0.2971300E+00, 0.3375368E+00, 0.3605627E+00, 0.3605627E+00 /
      data (ref_adm( 7,iz,30,12),iz = 1,20) / &
     & 0.1543300E+00, 0.1543300E+00, 0.1622200E+00, 0.1500800E+00, &
     & 0.1710900E+00, 0.1960100E+00, 0.2006200E+00, 0.1814000E+00, &
     & 0.1905500E+00, 0.1832800E+00, 0.2004500E+00, 0.2556400E+00, &
     & 0.2774100E+00, 0.2456500E+00, 0.2588500E+00, 0.2963800E+00, &
     & 0.3299900E+00, 0.2898800E+00, 0.2566500E+00, 0.2566500E+00 /
      data (ref_adm( 7,iz,31,12),iz = 1,20) / &
     & 0.1460700E+00, 0.1460700E+00, 0.1534700E+00, 0.1668300E+00, &
     & 0.1764000E+00, 0.1987300E+00, 0.1883700E+00, 0.2235100E+00, &
     & 0.2354200E+00, 0.1897900E+00, 0.1996300E+00, 0.2191200E+00, &
     & 0.2371900E+00, 0.2719400E+00, 0.2701000E+00, 0.3082600E+00, &
     & 0.3340600E+00, 0.3040500E+00, 0.3820664E+00, 0.3820664E+00 /
      data (ref_adm( 7,iz,32,12),iz = 1,20) / &
     & 0.1441900E+00, 0.1441900E+00, 0.1399900E+00, 0.1583100E+00, &
     & 0.1536200E+00, 0.1706200E+00, 0.1733500E+00, 0.1919300E+00, &
     & 0.2154500E+00, 0.2123600E+00, 0.2196700E+00, 0.2364100E+00, &
     & 0.2736600E+00, 0.2489800E+00, 0.2914100E+00, 0.3054200E+00, &
     & 0.3142600E+00, 0.3209000E+00, 0.3927422E+00, 0.3927422E+00 /
      data (ref_adm( 7,iz,33,12),iz = 1,20) / &
     & 0.1327200E+00, 0.1327200E+00, 0.1272700E+00, 0.1276100E+00, &
     & 0.1408500E+00, 0.1520300E+00, 0.1779100E+00, 0.1890400E+00, &
     & 0.2096700E+00, 0.1974300E+00, 0.2144200E+00, 0.2310900E+00, &
     & 0.2635300E+00, 0.3111300E+00, 0.2879000E+00, 0.2817500E+00, &
     & 0.2734400E+00, 0.3757785E+00, 0.2498900E+00, 0.2498900E+00 /
      data (ref_adm( 7,iz,34,12),iz = 1,20) / &
     & 0.1288600E+00, 0.1288600E+00, 0.1060100E+00, 0.1629100E+00, &
     & 0.1577300E+00, 0.1837900E+00, 0.1930600E+00, 0.1796300E+00, &
     & 0.2314000E+00, 0.2370400E+00, 0.2445100E+00, 0.2363900E+00, &
     & 0.2742900E+00, 0.2827000E+00, 0.2931000E+00, 0.3114500E+00, &
     & 0.3142700E+00, 0.3838321E+00, 0.4117458E+00, 0.4117458E+00 /
      data (ref_adm( 7,iz,35,12),iz = 1,20) / &
     & 0.1304200E+00, 0.1304200E+00, 0.1345500E+00, 0.1512400E+00, &
     & 0.1567200E+00, 0.1695800E+00, 0.1937600E+00, 0.2009900E+00, &
     & 0.2199400E+00, 0.1929000E+00, 0.2309500E+00, 0.2335000E+00, &
     & 0.2800300E+00, 0.3131200E+00, 0.3313800E+00, 0.3437800E+00, &
     & 0.4107200E+00, 0.3839700E+00, 0.4189286E+00, 0.4189286E+00 /
      data (ref_adm( 7,iz,36,12),iz = 1,20) / &
     & 0.1562500E+00, 0.1562500E+00, 0.1483000E+00, 0.1367700E+00, &
     & 0.1687600E+00, 0.1723300E+00, 0.1936400E+00, 0.2039500E+00, &
     & 0.1929600E+00, 0.2591800E+00, 0.2191900E+00, 0.2721800E+00, &
     & 0.2809500E+00, 0.3130400E+00, 0.3194600E+00, 0.3389200E+00, &
     & 0.4210100E+00, 0.3456400E+00, 0.4238672E+00, 0.4238672E+00 /
      data (ref_adm( 7,iz,37,12),iz = 1,20) / &
     & 0.1563300E+00, 0.1563300E+00, 0.1528100E+00, 0.1859200E+00, &
     & 0.1786700E+00, 0.2111800E+00, 0.1867300E+00, 0.1844200E+00, &
     & 0.2146500E+00, 0.2095200E+00, 0.2663500E+00, 0.2433300E+00, &
     & 0.3276200E+00, 0.3413900E+00, 0.3221500E+00, 0.3204700E+00, &
     & 0.3963300E+00, 0.3145700E+00, 0.4267338E+00, 0.4267338E+00 /
      data (ref_adm( 7,iz,38,12),iz = 1,20) / &
     & 0.1563300E+00, 0.1563300E+00, 0.1528100E+00, 0.1859200E+00, &
     & 0.1786700E+00, 0.2111800E+00, 0.1867300E+00, 0.1844200E+00, &
     & 0.2146500E+00, 0.2095200E+00, 0.2663500E+00, 0.2433300E+00, &
     & 0.3276200E+00, 0.3413900E+00, 0.3221500E+00, 0.3204700E+00, &
     & 0.3963300E+00, 0.3145700E+00, 0.4267338E+00, 0.4267338E+00 /
! Solar Zenith Angle 60.0 Albedo  0.1905572E+00
      data (ref_adm( 7,iz, 1,13),iz = 1,20) / &
     & 0.1328000E+00, 0.1328000E+00, 0.1476000E+00, 0.1279200E+00, &
     & 0.1204900E+00, 0.1359000E+00, 0.1313000E+00, 0.1345700E+00, &
     & 0.1348100E+00, 0.1397400E+00, 0.1749500E+00, 0.1770700E+00, &
     & 0.2303800E+00, 0.4148300E+00, 0.3656200E+00, 0.2739200E+00, &
     & 0.3646400E+00, 0.3596600E+00, 0.4905642E+00, 0.4905642E+00 /
      data (ref_adm( 7,iz, 2,13),iz = 1,20) / &
     & 0.1328000E+00, 0.1328000E+00, 0.1476000E+00, 0.1279200E+00, &
     & 0.1204900E+00, 0.1359000E+00, 0.1313000E+00, 0.1345700E+00, &
     & 0.1348100E+00, 0.1397400E+00, 0.1749500E+00, 0.1770700E+00, &
     & 0.2303800E+00, 0.4148300E+00, 0.3656200E+00, 0.2739200E+00, &
     & 0.3646400E+00, 0.3596600E+00, 0.4905642E+00, 0.4905642E+00 /
      data (ref_adm( 7,iz, 3,13),iz = 1,20) / &
     & 0.1464100E+00, 0.1464100E+00, 0.1418700E+00, 0.1360500E+00, &
     & 0.1354400E+00, 0.1190100E+00, 0.1306200E+00, 0.1377100E+00, &
     & 0.1441600E+00, 0.1512200E+00, 0.1709900E+00, 0.1821800E+00, &
     & 0.1999300E+00, 0.2382200E+00, 0.2459700E+00, 0.3188800E+00, &
     & 0.2875700E+00, 0.3786400E+00, 0.7450835E-08, 0.7450835E-08 /
      data (ref_adm( 7,iz, 4,13),iz = 1,20) / &
     & 0.1261100E+00, 0.1261100E+00, 0.1588600E+00, 0.1600500E+00, &
     & 0.1263800E+00, 0.1347100E+00, 0.1316700E+00, 0.1310000E+00, &
     & 0.1566000E+00, 0.1618700E+00, 0.1634700E+00, 0.1671900E+00, &
     & 0.1801000E+00, 0.2081600E+00, 0.2320800E+00, 0.3412100E+00, &
     & 0.3379700E+00, 0.4867700E+00, 0.4658209E+00, 0.4658209E+00 /
      data (ref_adm( 7,iz, 5,13),iz = 1,20) / &
     & 0.1729700E+00, 0.1729700E+00, 0.1289400E+00, 0.1548100E+00, &
     & 0.1573800E+00, 0.1293600E+00, 0.1346900E+00, 0.1393500E+00, &
     & 0.1421300E+00, 0.1343200E+00, 0.1669800E+00, 0.1573600E+00, &
     & 0.1716100E+00, 0.1741300E+00, 0.2469400E+00, 0.2602000E+00, &
     & 0.3009200E+00, 0.3760896E+00, 0.4479747E+00, 0.4479747E+00 /
      data (ref_adm( 7,iz, 6,13),iz = 1,20) / &
     & 0.1366000E+00, 0.1366000E+00, 0.1310800E+00, 0.1416100E+00, &
     & 0.1389700E+00, 0.1382200E+00, 0.1269600E+00, 0.1423700E+00, &
     & 0.1488000E+00, 0.1441000E+00, 0.1504900E+00, 0.1689800E+00, &
     & 0.1682300E+00, 0.1782400E+00, 0.2077800E+00, 0.2587800E+00, &
     & 0.2984600E+00, 0.3261200E+00, 0.4344035E+00, 0.4344035E+00 /
      data (ref_adm( 7,iz, 7,13),iz = 1,20) / &
     & 0.1383600E+00, 0.1383600E+00, 0.1396900E+00, 0.1312400E+00, &
     & 0.1261000E+00, 0.1218800E+00, 0.1314900E+00, 0.1197200E+00, &
     & 0.1326200E+00, 0.1438300E+00, 0.1415400E+00, 0.1476000E+00, &
     & 0.1621200E+00, 0.1911500E+00, 0.2032900E+00, 0.2312500E+00, &
     & 0.2549800E+00, 0.2961900E+00, 0.2940200E+00, 0.2940200E+00 /
      data (ref_adm( 7,iz, 8,13),iz = 1,20) / &
     & 0.1486300E+00, 0.1486300E+00, 0.1354900E+00, 0.1351000E+00, &
     & 0.1361900E+00, 0.1441800E+00, 0.1313400E+00, 0.1229100E+00, &
     & 0.1277000E+00, 0.1482000E+00, 0.1422600E+00, 0.1507300E+00, &
     & 0.1753300E+00, 0.1857500E+00, 0.2415900E+00, 0.3017000E+00, &
     & 0.3326200E+00, 0.2946500E+00, 0.4117203E+00, 0.4117203E+00 /
      data (ref_adm( 7,iz, 9,13),iz = 1,20) / &
     & 0.1321200E+00, 0.1321200E+00, 0.1395500E+00, 0.1242500E+00, &
     & 0.1205900E+00, 0.1123700E+00, 0.1205600E+00, 0.1175400E+00, &
     & 0.1273800E+00, 0.1280000E+00, 0.1416400E+00, 0.1489200E+00, &
     & 0.1622900E+00, 0.1900900E+00, 0.1971600E+00, 0.2446400E+00, &
     & 0.3144800E+00, 0.3359000E+00, 0.3868400E+00, 0.3868400E+00 /
      data (ref_adm( 7,iz,10,13),iz = 1,20) / &
     & 0.1375500E+00, 0.1375500E+00, 0.1279500E+00, 0.1237200E+00, &
     & 0.1191200E+00, 0.1234600E+00, 0.1204700E+00, 0.1283500E+00, &
     & 0.1345900E+00, 0.1465600E+00, 0.1444300E+00, 0.1534600E+00, &
     & 0.1535500E+00, 0.1980000E+00, 0.2184100E+00, 0.2433500E+00, &
     & 0.2914600E+00, 0.2192800E+00, 0.3680060E+00, 0.3680060E+00 /
      data (ref_adm( 7,iz,11,13),iz = 1,20) / &
     & 0.1426600E+00, 0.1426600E+00, 0.1270400E+00, 0.1299100E+00, &
     & 0.1343400E+00, 0.1262100E+00, 0.1199600E+00, 0.1240400E+00, &
     & 0.1268800E+00, 0.1333800E+00, 0.1630000E+00, 0.1681800E+00, &
     & 0.1672400E+00, 0.1840500E+00, 0.2224900E+00, 0.2401700E+00, &
     & 0.2214300E+00, 0.2647400E+00, 0.3534191E+00, 0.3534191E+00 /
      data (ref_adm( 7,iz,12,13),iz = 1,20) / &
     & 0.1283100E+00, 0.1283100E+00, 0.1301000E+00, 0.1182200E+00, &
     & 0.1181500E+00, 0.1234200E+00, 0.1286000E+00, 0.1533700E+00, &
     & 0.1319300E+00, 0.1494100E+00, 0.1542700E+00, 0.1690600E+00, &
     & 0.1675300E+00, 0.1962200E+00, 0.1827100E+00, 0.1966800E+00, &
     & 0.2338000E+00, 0.3407000E+00, 0.3427519E+00, 0.3427519E+00 /
      data (ref_adm( 7,iz,13,13),iz = 1,20) / &
     & 0.1415900E+00, 0.1415900E+00, 0.1361700E+00, 0.1298000E+00, &
     & 0.1435800E+00, 0.1305900E+00, 0.1419100E+00, 0.1502800E+00, &
     & 0.1282500E+00, 0.1503100E+00, 0.1723800E+00, 0.1491500E+00, &
     & 0.1589600E+00, 0.1644700E+00, 0.1915700E+00, 0.2388500E+00, &
     & 0.2680200E+00, 0.2409400E+00, 0.3336487E+00, 0.3336487E+00 /
      data (ref_adm( 7,iz,14,13),iz = 1,20) / &
     & 0.1333500E+00, 0.1333500E+00, 0.1470000E+00, 0.1371600E+00, &
     & 0.1374200E+00, 0.1434000E+00, 0.1439600E+00, 0.1362100E+00, &
     & 0.1434400E+00, 0.1515400E+00, 0.1467500E+00, 0.1523700E+00, &
     & 0.1535500E+00, 0.1628300E+00, 0.1690100E+00, 0.1887300E+00, &
     & 0.3251900E+00, 0.2764900E+00, 0.3260294E+00, 0.3260294E+00 /
      data (ref_adm( 7,iz,15,13),iz = 1,20) / &
     & 0.1365000E+00, 0.1365000E+00, 0.1296400E+00, 0.1283100E+00, &
     & 0.1290500E+00, 0.1310000E+00, 0.1327700E+00, 0.1338600E+00, &
     & 0.1345900E+00, 0.1394300E+00, 0.1494800E+00, 0.1581900E+00, &
     & 0.1709100E+00, 0.1806900E+00, 0.1809700E+00, 0.2187100E+00, &
     & 0.2341500E+00, 0.2902381E+00, 0.3184643E+00, 0.3184643E+00 /
      data (ref_adm( 7,iz,16,13),iz = 1,20) / &
     & 0.1318700E+00, 0.1318700E+00, 0.1244000E+00, 0.1324900E+00, &
     & 0.1240700E+00, 0.1301500E+00, 0.1385000E+00, 0.1362300E+00, &
     & 0.1407400E+00, 0.1384400E+00, 0.1422900E+00, 0.1518300E+00, &
     & 0.1652100E+00, 0.1720000E+00, 0.1701100E+00, 0.2138300E+00, &
     & 0.2736900E+00, 0.2840366E+00, 0.3094537E+00, 0.3094537E+00 /
      data (ref_adm( 7,iz,17,13),iz = 1,20) / &
     & 0.1400200E+00, 0.1400200E+00, 0.1290600E+00, 0.1584700E+00, &
     & 0.1463800E+00, 0.1204600E+00, 0.1562300E+00, 0.1382000E+00, &
     & 0.1446000E+00, 0.1436500E+00, 0.1530500E+00, 0.1590100E+00, &
     & 0.1770300E+00, 0.1912400E+00, 0.1803900E+00, 0.2568000E+00, &
     & 0.2174200E+00, 0.2784738E+00, 0.3012289E+00, 0.3012289E+00 /
      data (ref_adm( 7,iz,18,13),iz = 1,20) / &
     & 0.1359400E+00, 0.1359400E+00, 0.1344500E+00, 0.1337200E+00, &
     & 0.1439100E+00, 0.1602600E+00, 0.1530100E+00, 0.1346500E+00, &
     & 0.1415800E+00, 0.1529700E+00, 0.1483200E+00, 0.1547600E+00, &
     & 0.1689600E+00, 0.1831700E+00, 0.2086600E+00, 0.2631700E+00, &
     & 0.2371091E+00, 0.2623976E+00, 0.2787209E+00, 0.2787209E+00 /
      data (ref_adm( 7,iz,19,13),iz = 1,20) / &
     & 0.1391600E+00, 0.1391600E+00, 0.1449400E+00, 0.1648800E+00, &
     & 0.1399600E+00, 0.1602300E+00, 0.1573800E+00, 0.1374900E+00, &
     & 0.1346400E+00, 0.1437600E+00, 0.1533800E+00, 0.1583900E+00, &
     & 0.1885600E+00, 0.2002900E+00, 0.2124900E+00, 0.2023100E+00, &
     & 0.2361343E+00, 0.2600783E+00, 0.2741882E+00, 0.2741882E+00 /
      data (ref_adm( 7,iz,20,13),iz = 1,20) / &
     & 0.1320600E+00, 0.1320600E+00, 0.1371700E+00, 0.1435800E+00, &
     & 0.1601200E+00, 0.1482100E+00, 0.1433900E+00, 0.1583300E+00, &
     & 0.1510800E+00, 0.1331100E+00, 0.1774700E+00, 0.1719000E+00, &
     & 0.1843900E+00, 0.2183200E+00, 0.2348500E+00, 0.2574800E+00, &
     & 0.2357505E+00, 0.2585529E+00, 0.2716128E+00, 0.2716128E+00 /
      data (ref_adm( 7,iz,21,13),iz = 1,20) / &
     & 0.1368800E+00, 0.1368800E+00, 0.1375200E+00, 0.1412800E+00, &
     & 0.1380000E+00, 0.1616300E+00, 0.1337900E+00, 0.1706000E+00, &
     & 0.1471400E+00, 0.1573300E+00, 0.1682200E+00, 0.1744500E+00, &
     & 0.1812700E+00, 0.2226500E+00, 0.2258600E+00, 0.2187039E+00, &
     & 0.2360536E+00, 0.2575526E+00, 0.2698831E+00, 0.2698831E+00 /
      data (ref_adm( 7,iz,22,13),iz = 1,20) / &
     & 0.1275200E+00, 0.1275200E+00, 0.1444100E+00, 0.1390900E+00, &
     & 0.1493600E+00, 0.1573800E+00, 0.1604900E+00, 0.1751300E+00, &
     & 0.1554800E+00, 0.1635900E+00, 0.1569100E+00, 0.1784200E+00, &
     & 0.1922400E+00, 0.2039100E+00, 0.2216100E+00, 0.2437100E+00, &
     & 0.2684477E+00, 0.2958106E+00, 0.3124749E+00, 0.3124749E+00 /
      data (ref_adm( 7,iz,23,13),iz = 1,20) / &
     & 0.1282600E+00, 0.1282600E+00, 0.1403400E+00, 0.1354500E+00, &
     & 0.1560100E+00, 0.1445500E+00, 0.1551000E+00, 0.1625000E+00, &
     & 0.1771800E+00, 0.1851000E+00, 0.1707400E+00, 0.1733700E+00, &
     & 0.1867200E+00, 0.1970600E+00, 0.2002500E+00, 0.2225100E+00, &
     & 0.2706977E+00, 0.2964505E+00, 0.3128780E+00, 0.3128780E+00 /
      data (ref_adm( 7,iz,24,13),iz = 1,20) / &
     & 0.1342200E+00, 0.1342200E+00, 0.1309400E+00, 0.1350900E+00, &
     & 0.1386200E+00, 0.1449000E+00, 0.1446000E+00, 0.1630900E+00, &
     & 0.1673400E+00, 0.1732100E+00, 0.1633500E+00, 0.1898600E+00, &
     & 0.2040400E+00, 0.1974300E+00, 0.2079200E+00, 0.2452700E+00, &
     & 0.2734195E+00, 0.2987589E+00, 0.3146985E+00, 0.3146985E+00 /
      data (ref_adm( 7,iz,25,13),iz = 1,20) / &
     & 0.1298400E+00, 0.1298400E+00, 0.1452200E+00, 0.1505300E+00, &
     & 0.1534600E+00, 0.1658000E+00, 0.1557400E+00, 0.1582500E+00, &
     & 0.1689000E+00, 0.1763900E+00, 0.1823900E+00, 0.1907900E+00, &
     & 0.1999000E+00, 0.2120600E+00, 0.2168500E+00, 0.2524400E+00, &
     & 0.2405600E+00, 0.3019083E+00, 0.3179303E+00, 0.3179303E+00 /
      data (ref_adm( 7,iz,26,13),iz = 1,20) / &
     & 0.1388900E+00, 0.1388900E+00, 0.1436300E+00, 0.1583100E+00, &
     & 0.1578900E+00, 0.1667600E+00, 0.1612400E+00, 0.1701600E+00, &
     & 0.1745900E+00, 0.1918000E+00, 0.1988400E+00, 0.2091400E+00, &
     & 0.2101500E+00, 0.2219400E+00, 0.2312000E+00, 0.2707100E+00, &
     & 0.2563600E+00, 0.3068264E+00, 0.3225654E+00, 0.3225654E+00 /
      data (ref_adm( 7,iz,27,13),iz = 1,20) / &
     & 0.1421200E+00, 0.1421200E+00, 0.1554100E+00, 0.1462600E+00, &
     & 0.1455500E+00, 0.1735600E+00, 0.1770500E+00, 0.1706900E+00, &
     & 0.1909300E+00, 0.2028100E+00, 0.2005600E+00, 0.2098400E+00, &
     & 0.2147000E+00, 0.2395800E+00, 0.2476400E+00, 0.3032100E+00, &
     & 0.2850000E+00, 0.3005800E+00, 0.3293946E+00, 0.3293946E+00 /
      data (ref_adm( 7,iz,28,13),iz = 1,20) / &
     & 0.1445400E+00, 0.1445400E+00, 0.1227600E+00, 0.1357300E+00, &
     & 0.1520100E+00, 0.1476700E+00, 0.1707500E+00, 0.1751300E+00, &
     & 0.1736000E+00, 0.1926000E+00, 0.2205300E+00, 0.2110500E+00, &
     & 0.2397400E+00, 0.2276900E+00, 0.2629000E+00, 0.3379400E+00, &
     & 0.2958400E+00, 0.3477500E+00, 0.3094000E+00, 0.3094000E+00 /
      data (ref_adm( 7,iz,29,13),iz = 1,20) / &
     & 0.1511800E+00, 0.1511800E+00, 0.1382700E+00, 0.1401700E+00, &
     & 0.1401500E+00, 0.1511200E+00, 0.1561100E+00, 0.1735600E+00, &
     & 0.1860400E+00, 0.2027300E+00, 0.2017500E+00, 0.2125200E+00, &
     & 0.2369600E+00, 0.2590400E+00, 0.2783100E+00, 0.3299100E+00, &
     & 0.3211200E+00, 0.3279445E+00, 0.3466777E+00, 0.3466777E+00 /
      data (ref_adm( 7,iz,30,13),iz = 1,20) / &
     & 0.1254900E+00, 0.1254900E+00, 0.1361700E+00, 0.1356600E+00, &
     & 0.1574900E+00, 0.1612300E+00, 0.1618900E+00, 0.1855700E+00, &
     & 0.1933900E+00, 0.1935500E+00, 0.2086100E+00, 0.2221400E+00, &
     & 0.2469100E+00, 0.2568000E+00, 0.2979700E+00, 0.2971700E+00, &
     & 0.3387500E+00, 0.3090600E+00, 0.3557213E+00, 0.3557213E+00 /
      data (ref_adm( 7,iz,31,13),iz = 1,20) / &
     & 0.1403300E+00, 0.1403300E+00, 0.1413800E+00, 0.1403100E+00, &
     & 0.1433700E+00, 0.1685000E+00, 0.1601000E+00, 0.1754500E+00, &
     & 0.1781400E+00, 0.1978500E+00, 0.2255400E+00, 0.2365600E+00, &
     & 0.2683700E+00, 0.2593400E+00, 0.2987300E+00, 0.3210600E+00, &
     & 0.3264300E+00, 0.3168700E+00, 0.3001300E+00, 0.3001300E+00 /
      data (ref_adm( 7,iz,32,13),iz = 1,20) / &
     & 0.1367400E+00, 0.1367400E+00, 0.1397400E+00, 0.1421600E+00, &
     & 0.1604800E+00, 0.1823000E+00, 0.1795200E+00, 0.1862300E+00, &
     & 0.1858400E+00, 0.2203900E+00, 0.2162700E+00, 0.2436000E+00, &
     & 0.2572800E+00, 0.2735200E+00, 0.2991700E+00, 0.3161000E+00, &
     & 0.3361800E+00, 0.3542551E+00, 0.3747961E+00, 0.3747961E+00 /
      data (ref_adm( 7,iz,33,13),iz = 1,20) / &
     & 0.1429500E+00, 0.1429500E+00, 0.1561700E+00, 0.1579000E+00, &
     & 0.1682200E+00, 0.1769900E+00, 0.1864600E+00, 0.1851800E+00, &
     & 0.2242100E+00, 0.2176800E+00, 0.2455400E+00, 0.2609800E+00, &
     & 0.2890000E+00, 0.3134100E+00, 0.3369100E+00, 0.3352800E+00, &
     & 0.3665200E+00, 0.3626977E+00, 0.2933000E+00, 0.2933000E+00 /
      data (ref_adm( 7,iz,34,13),iz = 1,20) / &
     & 0.1554000E+00, 0.1554000E+00, 0.1636400E+00, 0.1564500E+00, &
     & 0.1635400E+00, 0.1545100E+00, 0.1879600E+00, 0.2041600E+00, &
     & 0.1900000E+00, 0.2116600E+00, 0.2195100E+00, 0.2559700E+00, &
     & 0.2476300E+00, 0.3159300E+00, 0.3362800E+00, 0.3432200E+00, &
     & 0.3545200E+00, 0.3416100E+00, 0.3918696E+00, 0.3918696E+00 /
      data (ref_adm( 7,iz,35,13),iz = 1,20) / &
     & 0.1640300E+00, 0.1640300E+00, 0.1600300E+00, 0.1501500E+00, &
     & 0.1558900E+00, 0.1671900E+00, 0.1855600E+00, 0.2196900E+00, &
     & 0.1902300E+00, 0.2266800E+00, 0.2191100E+00, 0.2292300E+00, &
     & 0.3034000E+00, 0.3240700E+00, 0.3400400E+00, 0.3546100E+00, &
     & 0.3504700E+00, 0.3758400E+00, 0.3276200E+00, 0.3276200E+00 /
      data (ref_adm( 7,iz,36,13),iz = 1,20) / &
     & 0.1404100E+00, 0.1404100E+00, 0.1508800E+00, 0.1585100E+00, &
     & 0.1498600E+00, 0.1543400E+00, 0.1819200E+00, 0.1903300E+00, &
     & 0.2200700E+00, 0.2129200E+00, 0.2549000E+00, 0.2612600E+00, &
     & 0.3163700E+00, 0.3355200E+00, 0.3594600E+00, 0.3743000E+00, &
     & 0.3739800E+00, 0.3801101E+00, 0.3474900E+00, 0.3474900E+00 /
      data (ref_adm( 7,iz,37,13),iz = 1,20) / &
     & 0.1314100E+00, 0.1314100E+00, 0.1300400E+00, 0.1478600E+00, &
     & 0.1750300E+00, 0.1970700E+00, 0.1746500E+00, 0.2211200E+00, &
     & 0.2268900E+00, 0.2330300E+00, 0.2319200E+00, 0.2663100E+00, &
     & 0.3433000E+00, 0.3685200E+00, 0.3608400E+00, 0.3874300E+00, &
     & 0.3921000E+00, 0.3527000E+00, 0.4048392E+00, 0.4048392E+00 /
      data (ref_adm( 7,iz,38,13),iz = 1,20) / &
     & 0.1314100E+00, 0.1314100E+00, 0.1300400E+00, 0.1478600E+00, &
     & 0.1750300E+00, 0.1970700E+00, 0.1746500E+00, 0.2211200E+00, &
     & 0.2268900E+00, 0.2330300E+00, 0.2319200E+00, 0.2663100E+00, &
     & 0.3433000E+00, 0.3685200E+00, 0.3608400E+00, 0.3874300E+00, &
     & 0.3921000E+00, 0.3527000E+00, 0.4048392E+00, 0.4048392E+00 /
! Solar Zenith Angle 65.0 Albedo  0.1953871E+00
      data (ref_adm( 7,iz, 1,14),iz = 1,20) / &
     & 0.1250000E+00, 0.1250000E+00, 0.1140900E+00, 0.1218800E+00, &
     & 0.1203700E+00, 0.1181500E+00, 0.1229100E+00, 0.1285400E+00, &
     & 0.1403000E+00, 0.1515200E+00, 0.1957600E+00, 0.2208600E+00, &
     & 0.2796500E+00, 0.3484900E+00, 0.4997900E+00, 0.3539600E+00, &
     & 0.3880500E+00, 0.4267726E+00, 0.5904447E+00, 0.5904447E+00 /
      data (ref_adm( 7,iz, 2,14),iz = 1,20) / &
     & 0.1250000E+00, 0.1250000E+00, 0.1140900E+00, 0.1218800E+00, &
     & 0.1203700E+00, 0.1181500E+00, 0.1229100E+00, 0.1285400E+00, &
     & 0.1403000E+00, 0.1515200E+00, 0.1957600E+00, 0.2208600E+00, &
     & 0.2796500E+00, 0.3484900E+00, 0.4997900E+00, 0.3539600E+00, &
     & 0.3880500E+00, 0.4267726E+00, 0.5904447E+00, 0.5904447E+00 /
      data (ref_adm( 7,iz, 3,14),iz = 1,20) / &
     & 0.1304700E+00, 0.1304700E+00, 0.1146200E+00, 0.1166700E+00, &
     & 0.1216000E+00, 0.1205300E+00, 0.1173300E+00, 0.1261100E+00, &
     & 0.1395900E+00, 0.1599200E+00, 0.1667600E+00, 0.1985300E+00, &
     & 0.2336700E+00, 0.2532100E+00, 0.2604300E+00, 0.2590800E+00, &
     & 0.3604700E+00, 0.4215091E+00, 0.8884237E-08, 0.8884237E-08 /
      data (ref_adm( 7,iz, 4,14),iz = 1,20) / &
     & 0.1241200E+00, 0.1241200E+00, 0.1205000E+00, 0.1224600E+00, &
     & 0.1263100E+00, 0.1243300E+00, 0.1245500E+00, 0.1242000E+00, &
     & 0.1355800E+00, 0.1532900E+00, 0.1543800E+00, 0.1891800E+00, &
     & 0.2082800E+00, 0.2305600E+00, 0.2622400E+00, 0.3029100E+00, &
     & 0.3568000E+00, 0.4122087E+00, 0.5435687E+00, 0.5435687E+00 /
      data (ref_adm( 7,iz, 5,14),iz = 1,20) / &
     & 0.1328100E+00, 0.1328100E+00, 0.1337600E+00, 0.1273400E+00, &
     & 0.1330700E+00, 0.1327600E+00, 0.1251900E+00, 0.1332900E+00, &
     & 0.1474500E+00, 0.1531900E+00, 0.1623100E+00, 0.1819100E+00, &
     & 0.2116200E+00, 0.2229900E+00, 0.2535100E+00, 0.2823000E+00, &
     & 0.3682000E+00, 0.4027000E+00, 0.5085502E+00, 0.5085502E+00 /
      data (ref_adm( 7,iz, 6,14),iz = 1,20) / &
     & 0.1175300E+00, 0.1175300E+00, 0.1262600E+00, 0.1272600E+00, &
     & 0.1268300E+00, 0.1221900E+00, 0.1163100E+00, 0.1217500E+00, &
     & 0.1371600E+00, 0.1490000E+00, 0.1651400E+00, 0.1784500E+00, &
     & 0.1916700E+00, 0.2237600E+00, 0.2322700E+00, 0.2705200E+00, &
     & 0.3302600E+00, 0.3556200E+00, 0.4778296E+00, 0.4778296E+00 /
      data (ref_adm( 7,iz, 7,14),iz = 1,20) / &
     & 0.1422000E+00, 0.1422000E+00, 0.1374500E+00, 0.1328400E+00, &
     & 0.1395400E+00, 0.1299900E+00, 0.1296400E+00, 0.1365900E+00, &
     & 0.1436300E+00, 0.1443600E+00, 0.1560800E+00, 0.1737700E+00, &
     & 0.1692000E+00, 0.2156100E+00, 0.2490600E+00, 0.2500200E+00, &
     & 0.2819600E+00, 0.3374600E+00, 0.4576352E+00, 0.4576352E+00 /
      data (ref_adm( 7,iz, 8,14),iz = 1,20) / &
     & 0.1284500E+00, 0.1284500E+00, 0.1252700E+00, 0.1237400E+00, &
     & 0.1343400E+00, 0.1291400E+00, 0.1322700E+00, 0.1470200E+00, &
     & 0.1351600E+00, 0.1598800E+00, 0.1645500E+00, 0.1779200E+00, &
     & 0.1808100E+00, 0.2057500E+00, 0.2175200E+00, 0.2392000E+00, &
     & 0.2480400E+00, 0.3356400E+00, 0.4425522E+00, 0.4425522E+00 /
      data (ref_adm( 7,iz, 9,14),iz = 1,20) / &
     & 0.1343100E+00, 0.1343100E+00, 0.1312800E+00, 0.1192000E+00, &
     & 0.1280300E+00, 0.1320000E+00, 0.1354400E+00, 0.1375700E+00, &
     & 0.1622800E+00, 0.1418700E+00, 0.1427800E+00, 0.1600700E+00, &
     & 0.1805500E+00, 0.2138600E+00, 0.2162500E+00, 0.2478300E+00, &
     & 0.2966708E+00, 0.3757900E+00, 0.4199553E+00, 0.4199553E+00 /
      data (ref_adm( 7,iz,10,14),iz = 1,20) / &
     & 0.1359500E+00, 0.1359500E+00, 0.1259100E+00, 0.1329800E+00, &
     & 0.1334100E+00, 0.1250500E+00, 0.1300000E+00, 0.1310300E+00, &
     & 0.1396100E+00, 0.1519500E+00, 0.1535600E+00, 0.1493600E+00, &
     & 0.1926800E+00, 0.2082400E+00, 0.2457900E+00, 0.2570300E+00, &
     & 0.2899517E+00, 0.3407954E+00, 0.3946855E+00, 0.3946855E+00 /
      data (ref_adm( 7,iz,11,14),iz = 1,20) / &
     & 0.1435400E+00, 0.1435400E+00, 0.1204000E+00, 0.1174200E+00, &
     & 0.1427200E+00, 0.1336000E+00, 0.1306600E+00, 0.1276400E+00, &
     & 0.1339600E+00, 0.1380000E+00, 0.1476400E+00, 0.1741500E+00, &
     & 0.1767700E+00, 0.1976300E+00, 0.2379100E+00, 0.2682400E+00, &
     & 0.2845400E+00, 0.3306661E+00, 0.3759735E+00, 0.3759735E+00 /
      data (ref_adm( 7,iz,12,14),iz = 1,20) / &
     & 0.1403800E+00, 0.1403800E+00, 0.1349800E+00, 0.1187600E+00, &
     & 0.1259800E+00, 0.1268300E+00, 0.1264000E+00, 0.1252900E+00, &
     & 0.1281700E+00, 0.1421100E+00, 0.1583100E+00, 0.1594800E+00, &
     & 0.1735700E+00, 0.1926300E+00, 0.2174200E+00, 0.2818600E+00, &
     & 0.2502400E+00, 0.2607000E+00, 0.3625939E+00, 0.3625939E+00 /
      data (ref_adm( 7,iz,13,14),iz = 1,20) / &
     & 0.1340700E+00, 0.1340700E+00, 0.1319200E+00, 0.1401000E+00, &
     & 0.1286300E+00, 0.1384100E+00, 0.1432300E+00, 0.1447100E+00, &
     & 0.1543800E+00, 0.1569500E+00, 0.1526900E+00, 0.1455900E+00, &
     & 0.1872300E+00, 0.1976500E+00, 0.2000300E+00, 0.2909000E+00, &
     & 0.2667800E+00, 0.3010200E+00, 0.3518539E+00, 0.3518539E+00 /
      data (ref_adm( 7,iz,14,14),iz = 1,20) / &
     & 0.1359900E+00, 0.1359900E+00, 0.1374100E+00, 0.1409500E+00, &
     & 0.1397100E+00, 0.1399400E+00, 0.1439800E+00, 0.1409600E+00, &
     & 0.1402900E+00, 0.1567100E+00, 0.1575000E+00, 0.1692200E+00, &
     & 0.1782200E+00, 0.2023200E+00, 0.2317900E+00, 0.2051300E+00, &
     & 0.2551000E+00, 0.3009800E+00, 0.3431176E+00, 0.3431176E+00 /
      data (ref_adm( 7,iz,15,14),iz = 1,20) / &
     & 0.1385300E+00, 0.1385300E+00, 0.1287600E+00, 0.1262100E+00, &
     & 0.1258400E+00, 0.1286100E+00, 0.1298400E+00, 0.1340300E+00, &
     & 0.1412300E+00, 0.1406200E+00, 0.1506400E+00, 0.1669700E+00, &
     & 0.1743400E+00, 0.1837000E+00, 0.2234400E+00, 0.2183100E+00, &
     & 0.2524600E+00, 0.2777100E+00, 0.3348695E+00, 0.3348695E+00 /
      data (ref_adm( 7,iz,16,14),iz = 1,20) / &
     & 0.1292000E+00, 0.1292000E+00, 0.1203600E+00, 0.1189200E+00, &
     & 0.1276100E+00, 0.1245300E+00, 0.1250500E+00, 0.1298000E+00, &
     & 0.1295500E+00, 0.1375500E+00, 0.1455100E+00, 0.1521200E+00, &
     & 0.1620200E+00, 0.1802100E+00, 0.1950300E+00, 0.2344500E+00, &
     & 0.3218600E+00, 0.2964048E+00, 0.3252594E+00, 0.3252594E+00 /
      data (ref_adm( 7,iz,17,14),iz = 1,20) / &
     & 0.1259800E+00, 0.1259800E+00, 0.1204600E+00, 0.1213000E+00, &
     & 0.1220900E+00, 0.1268600E+00, 0.1297500E+00, 0.1397000E+00, &
     & 0.1463300E+00, 0.1450900E+00, 0.1534300E+00, 0.1599000E+00, &
     & 0.1691000E+00, 0.2003000E+00, 0.1960300E+00, 0.2118500E+00, &
     & 0.1598500E+00, 0.2903041E+00, 0.3160700E+00, 0.3160700E+00 /
      data (ref_adm( 7,iz,18,14),iz = 1,20) / &
     & 0.1275100E+00, 0.1275100E+00, 0.1265400E+00, 0.1166700E+00, &
     & 0.1283600E+00, 0.1417800E+00, 0.1466800E+00, 0.1578900E+00, &
     & 0.1304800E+00, 0.1375100E+00, 0.1533300E+00, 0.1627500E+00, &
     & 0.1859900E+00, 0.1736100E+00, 0.2200200E+00, 0.2074900E+00, &
     & 0.2378300E+00, 0.2508441E+00, 0.2655591E+00, 0.2655591E+00 /
      data (ref_adm( 7,iz,19,14),iz = 1,20) / &
     & 0.1326000E+00, 0.1326000E+00, 0.1184700E+00, 0.1276900E+00, &
     & 0.1352000E+00, 0.1374400E+00, 0.1445000E+00, 0.1573100E+00, &
     & 0.1415600E+00, 0.1506100E+00, 0.1482200E+00, 0.1647800E+00, &
     & 0.1708200E+00, 0.1876000E+00, 0.2139400E+00, 0.1773200E+00, &
     & 0.2268484E+00, 0.2489283E+00, 0.2615465E+00, 0.2615465E+00 /
      data (ref_adm( 7,iz,20,14),iz = 1,20) / &
     & 0.1289400E+00, 0.1289400E+00, 0.1399500E+00, 0.1308800E+00, &
     & 0.1407200E+00, 0.1321600E+00, 0.1563600E+00, 0.1398300E+00, &
     & 0.1476300E+00, 0.1431100E+00, 0.1529700E+00, 0.1656600E+00, &
     & 0.1765500E+00, 0.1966300E+00, 0.2129000E+00, 0.2048900E+00, &
     & 0.2266188E+00, 0.2475339E+00, 0.2593109E+00, 0.2593109E+00 /
      data (ref_adm( 7,iz,21,14),iz = 1,20) / &
     & 0.1351400E+00, 0.1351400E+00, 0.1444500E+00, 0.1430300E+00, &
     & 0.1465900E+00, 0.1433900E+00, 0.1359000E+00, 0.1499300E+00, &
     & 0.1519100E+00, 0.1541700E+00, 0.1562300E+00, 0.1581900E+00, &
     & 0.1738300E+00, 0.1748600E+00, 0.2146100E+00, 0.2110336E+00, &
     & 0.2269320E+00, 0.2466581E+00, 0.2577525E+00, 0.2577525E+00 /
      data (ref_adm( 7,iz,22,14),iz = 1,20) / &
     & 0.1229300E+00, 0.1229300E+00, 0.1333600E+00, 0.1342600E+00, &
     & 0.1420800E+00, 0.1304100E+00, 0.1473200E+00, 0.1463500E+00, &
     & 0.1434200E+00, 0.1558300E+00, 0.1638300E+00, 0.1831100E+00, &
     & 0.1987600E+00, 0.1961500E+00, 0.2093200E+00, 0.2699589E+00, &
     & 0.2999930E+00, 0.3399175E+00, 0.3719124E+00, 0.3719124E+00 /
      data (ref_adm( 7,iz,23,14),iz = 1,20) / &
     & 0.1228100E+00, 0.1228100E+00, 0.1324000E+00, 0.1348700E+00, &
     & 0.1424500E+00, 0.1474200E+00, 0.1522700E+00, 0.1463300E+00, &
     & 0.1565000E+00, 0.1685800E+00, 0.1674400E+00, 0.1897300E+00, &
     & 0.1909200E+00, 0.2064300E+00, 0.2046000E+00, 0.2264100E+00, &
     & 0.3020212E+00, 0.3405767E+00, 0.3725078E+00, 0.3725078E+00 /
      data (ref_adm( 7,iz,24,14),iz = 1,20) / &
     & 0.1257200E+00, 0.1257200E+00, 0.1288900E+00, 0.1323700E+00, &
     & 0.1377400E+00, 0.1414900E+00, 0.1470200E+00, 0.1518300E+00, &
     & 0.1550800E+00, 0.1671100E+00, 0.1741100E+00, 0.1810400E+00, &
     & 0.1983700E+00, 0.2084800E+00, 0.2108300E+00, 0.2690200E+00, &
     & 0.3053064E+00, 0.3434547E+00, 0.3758512E+00, 0.3758512E+00 /
      data (ref_adm( 7,iz,25,14),iz = 1,20) / &
     & 0.1332200E+00, 0.1332200E+00, 0.1459800E+00, 0.1475300E+00, &
     & 0.1546000E+00, 0.1530600E+00, 0.1667000E+00, 0.1650300E+00, &
     & 0.1687400E+00, 0.1783200E+00, 0.1906100E+00, 0.1954600E+00, &
     & 0.2091500E+00, 0.2305800E+00, 0.2362900E+00, 0.3012700E+00, &
     & 0.3102327E+00, 0.3476850E+00, 0.3808450E+00, 0.3808450E+00 /
      data (ref_adm( 7,iz,26,14),iz = 1,20) / &
     & 0.1471800E+00, 0.1471800E+00, 0.1330200E+00, 0.1451400E+00, &
     & 0.1513200E+00, 0.1632400E+00, 0.1600900E+00, 0.1655400E+00, &
     & 0.1709100E+00, 0.1875600E+00, 0.1955900E+00, 0.2124100E+00, &
     & 0.2278900E+00, 0.2455200E+00, 0.2605300E+00, 0.3116400E+00, &
     & 0.2889900E+00, 0.3546266E+00, 0.3894809E+00, 0.3894809E+00 /
      data (ref_adm( 7,iz,27,14),iz = 1,20) / &
     & 0.1264300E+00, 0.1264300E+00, 0.1228600E+00, 0.1397800E+00, &
     & 0.1416100E+00, 0.1533700E+00, 0.1670800E+00, 0.1590600E+00, &
     & 0.1627600E+00, 0.1737200E+00, 0.1945500E+00, 0.2102300E+00, &
     & 0.2302600E+00, 0.2334000E+00, 0.2733500E+00, 0.3061000E+00, &
     & 0.2969500E+00, 0.3439100E+00, 0.4009691E+00, 0.4009691E+00 /
      data (ref_adm( 7,iz,28,14),iz = 1,20) / &
     & 0.1290100E+00, 0.1290100E+00, 0.1356200E+00, 0.1402400E+00, &
     & 0.1409800E+00, 0.1490000E+00, 0.1579200E+00, 0.1773200E+00, &
     & 0.1879000E+00, 0.2030500E+00, 0.2006200E+00, 0.2212000E+00, &
     & 0.2304100E+00, 0.2458600E+00, 0.2928400E+00, 0.3284400E+00, &
     & 0.3413800E+00, 0.3685800E+00, 0.4136438E+00, 0.4136438E+00 /
      data (ref_adm( 7,iz,29,14),iz = 1,20) / &
     & 0.1326000E+00, 0.1326000E+00, 0.1456300E+00, 0.1384500E+00, &
     & 0.1474300E+00, 0.1590600E+00, 0.1727100E+00, 0.1774700E+00, &
     & 0.1867400E+00, 0.2038600E+00, 0.2089200E+00, 0.2270200E+00, &
     & 0.2576500E+00, 0.2415200E+00, 0.3014100E+00, 0.3326400E+00, &
     & 0.3461800E+00, 0.3867000E+00, 0.4274762E+00, 0.4274762E+00 /
      data (ref_adm( 7,iz,30,14),iz = 1,20) / &
     & 0.1350900E+00, 0.1350900E+00, 0.1453900E+00, 0.1432600E+00, &
     & 0.1460600E+00, 0.1542400E+00, 0.1606100E+00, 0.1792800E+00, &
     & 0.1772300E+00, 0.1955200E+00, 0.2064800E+00, 0.2454200E+00, &
     & 0.2668100E+00, 0.2921900E+00, 0.3027100E+00, 0.3744100E+00, &
     & 0.3738900E+00, 0.3972581E+00, 0.4426376E+00, 0.4426376E+00 /
      data (ref_adm( 7,iz,31,14),iz = 1,20) / &
     & 0.1406100E+00, 0.1406100E+00, 0.1354700E+00, 0.1406600E+00, &
     & 0.1496300E+00, 0.1637900E+00, 0.1643300E+00, 0.1836100E+00, &
     & 0.1834000E+00, 0.2028800E+00, 0.2039200E+00, 0.2292200E+00, &
     & 0.2597500E+00, 0.2894500E+00, 0.3148100E+00, 0.3437500E+00, &
     & 0.4283400E+00, 0.4105743E+00, 0.4583998E+00, 0.4583998E+00 /
      data (ref_adm( 7,iz,32,14),iz = 1,20) / &
     & 0.1355100E+00, 0.1355100E+00, 0.1459300E+00, 0.1494200E+00, &
     & 0.1646000E+00, 0.1721600E+00, 0.1820300E+00, 0.1891800E+00, &
     & 0.2015800E+00, 0.2146700E+00, 0.2391100E+00, 0.2500800E+00, &
     & 0.2697200E+00, 0.2963900E+00, 0.3226400E+00, 0.3820100E+00, &
     & 0.4269900E+00, 0.3659700E+00, 0.4741608E+00, 0.4741608E+00 /
      data (ref_adm( 7,iz,33,14),iz = 1,20) / &
     & 0.1326000E+00, 0.1326000E+00, 0.1379700E+00, 0.1443600E+00, &
     & 0.1481200E+00, 0.1543900E+00, 0.1648100E+00, 0.1746600E+00, &
     & 0.1836200E+00, 0.2069600E+00, 0.2329000E+00, 0.2433500E+00, &
     & 0.2698000E+00, 0.3126700E+00, 0.3510500E+00, 0.4062500E+00, &
     & 0.4241900E+00, 0.4358554E+00, 0.3743100E+00, 0.3743100E+00 /
      data (ref_adm( 7,iz,34,14),iz = 1,20) / &
     & 0.1303700E+00, 0.1303700E+00, 0.1457300E+00, 0.1449700E+00, &
     & 0.1604200E+00, 0.1589200E+00, 0.1801200E+00, 0.1789700E+00, &
     & 0.1891000E+00, 0.2234100E+00, 0.2555600E+00, 0.2501000E+00, &
     & 0.2766700E+00, 0.3046300E+00, 0.3573900E+00, 0.4285400E+00, &
     & 0.4014800E+00, 0.4438312E+00, 0.5010316E+00, 0.5010316E+00 /
      data (ref_adm( 7,iz,35,14),iz = 1,20) / &
     & 0.1324500E+00, 0.1324500E+00, 0.1447800E+00, 0.1464600E+00, &
     & 0.1532800E+00, 0.1710200E+00, 0.1625000E+00, 0.1831500E+00, &
     & 0.1958100E+00, 0.2149400E+00, 0.2469600E+00, 0.2614500E+00, &
     & 0.2906300E+00, 0.3171200E+00, 0.3721900E+00, 0.4147000E+00, &
     & 0.4229200E+00, 0.4467819E+00, 0.5106782E+00, 0.5106782E+00 /
      data (ref_adm( 7,iz,36,14),iz = 1,20) / &
     & 0.1280100E+00, 0.1280100E+00, 0.1325300E+00, 0.1291300E+00, &
     & 0.1398700E+00, 0.1530900E+00, 0.1671300E+00, 0.1927500E+00, &
     & 0.2140500E+00, 0.2248600E+00, 0.2551300E+00, 0.2813100E+00, &
     & 0.2964600E+00, 0.3427100E+00, 0.4002900E+00, 0.4287400E+00, &
     & 0.4605100E+00, 0.4474342E+00, 0.5149720E+00, 0.5149720E+00 /
      data (ref_adm( 7,iz,37,14),iz = 1,20) / &
     & 0.1254800E+00, 0.1254800E+00, 0.1222900E+00, 0.1272900E+00, &
     & 0.1369400E+00, 0.1536000E+00, 0.1719700E+00, 0.2013600E+00, &
     & 0.2199100E+00, 0.2295200E+00, 0.2494500E+00, 0.2703400E+00, &
     & 0.3265900E+00, 0.3909700E+00, 0.4146300E+00, 0.4023400E+00, &
     & 0.4233000E+00, 0.4774000E+00, 0.5165972E+00, 0.5165972E+00 /
      data (ref_adm( 7,iz,38,14),iz = 1,20) / &
     & 0.1254800E+00, 0.1254800E+00, 0.1222900E+00, 0.1272900E+00, &
     & 0.1369400E+00, 0.1536000E+00, 0.1719700E+00, 0.2013600E+00, &
     & 0.2199100E+00, 0.2295200E+00, 0.2494500E+00, 0.2703400E+00, &
     & 0.3265900E+00, 0.3909700E+00, 0.4146300E+00, 0.4023400E+00, &
     & 0.4233000E+00, 0.4774000E+00, 0.5165972E+00, 0.5165972E+00 /
! Solar Zenith Angle 70.0 Albedo  0.2077921E+00
      data (ref_adm( 7,iz, 1,15),iz = 1,20) / &
     & 0.1220800E+00, 0.1220800E+00, 0.1262100E+00, 0.1242000E+00, &
     & 0.1345900E+00, 0.1339300E+00, 0.1365400E+00, 0.1408700E+00, &
     & 0.1547400E+00, 0.1687300E+00, 0.1722600E+00, 0.2058800E+00, &
     & 0.3206800E+00, 0.6737000E+00, 0.1269700E+01, 0.3214100E+00, &
     & 0.4697833E+00, 0.8339760E+00, 0.1558477E+01, 0.1558477E+01 /
      data (ref_adm( 7,iz, 2,15),iz = 1,20) / &
     & 0.1220800E+00, 0.1220800E+00, 0.1262100E+00, 0.1242000E+00, &
     & 0.1345900E+00, 0.1339300E+00, 0.1365400E+00, 0.1408700E+00, &
     & 0.1547400E+00, 0.1687300E+00, 0.1722600E+00, 0.2058800E+00, &
     & 0.3206800E+00, 0.6737000E+00, 0.1269700E+01, 0.3214100E+00, &
     & 0.4697833E+00, 0.8339760E+00, 0.1558477E+01, 0.1558477E+01 /
      data (ref_adm( 7,iz, 3,15),iz = 1,20) / &
     & 0.1305000E+00, 0.1305000E+00, 0.1252900E+00, 0.1180400E+00, &
     & 0.1205300E+00, 0.1339900E+00, 0.1352100E+00, 0.1342000E+00, &
     & 0.1455900E+00, 0.1602800E+00, 0.1765500E+00, 0.2093000E+00, &
     & 0.3586200E+00, 0.2512096E+00, 0.2293900E+00, 0.3156300E+00, &
     & 0.4592909E+00, 0.7824625E+00, 0.2437120E-07, 0.2437120E-07 /
      data (ref_adm( 7,iz, 4,15),iz = 1,20) / &
     & 0.1283600E+00, 0.1283600E+00, 0.1238800E+00, 0.1200700E+00, &
     & 0.1192000E+00, 0.1308900E+00, 0.1372200E+00, 0.1421900E+00, &
     & 0.1390100E+00, 0.1555000E+00, 0.1916900E+00, 0.2124100E+00, &
     & 0.2385300E+00, 0.2931000E+00, 0.3525700E+00, 0.3355300E+00, &
     & 0.4400277E+00, 0.6975774E+00, 0.1332471E+01, 0.1332471E+01 /
      data (ref_adm( 7,iz, 5,15),iz = 1,20) / &
     & 0.1369500E+00, 0.1369500E+00, 0.1306400E+00, 0.1210700E+00, &
     & 0.1285600E+00, 0.1315800E+00, 0.1461800E+00, 0.1440900E+00, &
     & 0.1484700E+00, 0.1596200E+00, 0.1910000E+00, 0.1847300E+00, &
     & 0.2395000E+00, 0.2666300E+00, 0.2860700E+00, 0.2811100E+00, &
     & 0.4184564E+00, 0.6120712E+00, 0.1011863E+01, 0.1011863E+01 /
      data (ref_adm( 7,iz, 6,15),iz = 1,20) / &
     & 0.1396100E+00, 0.1396100E+00, 0.1342300E+00, 0.1371300E+00, &
     & 0.1294100E+00, 0.1407600E+00, 0.1303200E+00, 0.1421600E+00, &
     & 0.1529300E+00, 0.1625500E+00, 0.1959200E+00, 0.2125000E+00, &
     & 0.2355500E+00, 0.2511700E+00, 0.2931300E+00, 0.2954700E+00, &
     & 0.3991404E+00, 0.5447593E+00, 0.8026078E+00, 0.8026078E+00 /
      data (ref_adm( 7,iz, 7,15),iz = 1,20) / &
     & 0.1255200E+00, 0.1255200E+00, 0.1282700E+00, 0.1226300E+00, &
     & 0.1280300E+00, 0.1274000E+00, 0.1454800E+00, 0.1236600E+00, &
     & 0.1451400E+00, 0.1599900E+00, 0.1567400E+00, 0.2078400E+00, &
     & 0.2661100E+00, 0.2649300E+00, 0.2581800E+00, 0.2342800E+00, &
     & 0.4082200E+00, 0.4941431E+00, 0.6686963E+00, 0.6686963E+00 /
      data (ref_adm( 7,iz, 8,15),iz = 1,20) / &
     & 0.1237900E+00, 0.1237900E+00, 0.1220800E+00, 0.1268400E+00, &
     & 0.1127600E+00, 0.1194400E+00, 0.1137800E+00, 0.1297600E+00, &
     & 0.1435300E+00, 0.1637400E+00, 0.1619000E+00, 0.2001000E+00, &
     & 0.2216500E+00, 0.2706100E+00, 0.2378100E+00, 0.3142854E+00, &
     & 0.3515800E+00, 0.3660300E+00, 0.5891970E+00, 0.5891970E+00 /
      data (ref_adm( 7,iz, 9,15),iz = 1,20) / &
     & 0.1156900E+00, 0.1156900E+00, 0.1159200E+00, 0.1126600E+00, &
     & 0.1068500E+00, 0.1092500E+00, 0.1280400E+00, 0.1252600E+00, &
     & 0.1389200E+00, 0.1523900E+00, 0.1152600E+00, 0.1577700E+00, &
     & 0.2024500E+00, 0.2034800E+00, 0.2614100E+00, 0.2776900E+00, &
     & 0.3594832E+00, 0.4509753E+00, 0.5535450E+00, 0.5535450E+00 /
      data (ref_adm( 7,iz,10,15),iz = 1,20) / &
     & 0.1174300E+00, 0.1174300E+00, 0.1152100E+00, 0.1141700E+00, &
     & 0.1105800E+00, 0.1131500E+00, 0.1199400E+00, 0.1213000E+00, &
     & 0.1463200E+00, 0.1451100E+00, 0.1408700E+00, 0.1589600E+00, &
     & 0.1739800E+00, 0.2031700E+00, 0.2320700E+00, 0.2607000E+00, &
     & 0.2634600E+00, 0.4249602E+00, 0.5249444E+00, 0.5249444E+00 /
      data (ref_adm( 7,iz,11,15),iz = 1,20) / &
     & 0.1204600E+00, 0.1204600E+00, 0.1249300E+00, 0.1275500E+00, &
     & 0.1152600E+00, 0.1214100E+00, 0.1171600E+00, 0.1397100E+00, &
     & 0.1334000E+00, 0.1419000E+00, 0.1569300E+00, 0.1643500E+00, &
     & 0.1735000E+00, 0.1929100E+00, 0.2246500E+00, 0.2849600E+00, &
     & 0.3306485E+00, 0.4014396E+00, 0.4828070E+00, 0.4828070E+00 /
      data (ref_adm( 7,iz,12,15),iz = 1,20) / &
     & 0.1313600E+00, 0.1313600E+00, 0.1299200E+00, 0.1050800E+00, &
     & 0.1240200E+00, 0.1364500E+00, 0.1289800E+00, 0.1353000E+00, &
     & 0.1429600E+00, 0.1455300E+00, 0.1539700E+00, 0.1614700E+00, &
     & 0.1694500E+00, 0.1963500E+00, 0.2297600E+00, 0.2507500E+00, &
     & 0.3214195E+00, 0.3852611E+00, 0.4549396E+00, 0.4549396E+00 /
      data (ref_adm( 7,iz,13,15),iz = 1,20) / &
     & 0.1264700E+00, 0.1264700E+00, 0.1347600E+00, 0.1068100E+00, &
     & 0.1248800E+00, 0.1245000E+00, 0.1218500E+00, 0.1341100E+00, &
     & 0.1458800E+00, 0.1526500E+00, 0.1527200E+00, 0.1605600E+00, &
     & 0.1827900E+00, 0.2146000E+00, 0.1997300E+00, 0.2317100E+00, &
     & 0.3137918E+00, 0.3730713E+00, 0.4349996E+00, 0.4349996E+00 /
      data (ref_adm( 7,iz,14,15),iz = 1,20) / &
     & 0.1312400E+00, 0.1312400E+00, 0.1227900E+00, 0.1225700E+00, &
     & 0.1244000E+00, 0.1259600E+00, 0.1225800E+00, 0.1265900E+00, &
     & 0.1451400E+00, 0.1520200E+00, 0.1530500E+00, 0.1583200E+00, &
     & 0.1803400E+00, 0.1962300E+00, 0.1716400E+00, 0.2431600E+00, &
     & 0.3071978E+00, 0.3640154E+00, 0.4204087E+00, 0.4204087E+00 /
      data (ref_adm( 7,iz,15,15),iz = 1,20) / &
     & 0.1313300E+00, 0.1313300E+00, 0.1281200E+00, 0.1294400E+00, &
     & 0.1305500E+00, 0.1318200E+00, 0.1324800E+00, 0.1371900E+00, &
     & 0.1446600E+00, 0.1544900E+00, 0.1585800E+00, 0.1604000E+00, &
     & 0.1745300E+00, 0.1916300E+00, 0.2151700E+00, 0.2612300E+00, &
     & 0.2811800E+00, 0.3557592E+00, 0.4082496E+00, 0.4082496E+00 /
      data (ref_adm( 7,iz,16,15),iz = 1,20) / &
     & 0.1266400E+00, 0.1266400E+00, 0.1180900E+00, 0.1190400E+00, &
     & 0.1176800E+00, 0.1157300E+00, 0.1258800E+00, 0.1282700E+00, &
     & 0.1355800E+00, 0.1424100E+00, 0.1572600E+00, 0.1622500E+00, &
     & 0.1706000E+00, 0.1893000E+00, 0.2185200E+00, 0.2785600E+00, &
     & 0.2932593E+00, 0.3460028E+00, 0.3958806E+00, 0.3958806E+00 /
      data (ref_adm( 7,iz,17,15),iz = 1,20) / &
     & 0.1257400E+00, 0.1257400E+00, 0.1162200E+00, 0.1175200E+00, &
     & 0.1327800E+00, 0.1405200E+00, 0.1385100E+00, 0.1476400E+00, &
     & 0.1446800E+00, 0.1499800E+00, 0.1667600E+00, 0.1634600E+00, &
     & 0.1680600E+00, 0.1846200E+00, 0.2526000E+00, 0.2271100E+00, &
     & 0.2873505E+00, 0.3372684E+00, 0.3824930E+00, 0.3824930E+00 /
      data (ref_adm( 7,iz,18,15),iz = 1,20) / &
     & 0.1261000E+00, 0.1261000E+00, 0.1213600E+00, 0.1259300E+00, &
     & 0.1322900E+00, 0.1330200E+00, 0.1471100E+00, 0.1379700E+00, &
     & 0.1400000E+00, 0.1590500E+00, 0.1615500E+00, 0.1685900E+00, &
     & 0.1708100E+00, 0.1683100E+00, 0.2395600E+00, 0.2199510E+00, &
     & 0.2401673E+00, 0.2667999E+00, 0.2842692E+00, 0.2842692E+00 /
      data (ref_adm( 7,iz,19,15),iz = 1,20) / &
     & 0.1301600E+00, 0.1301600E+00, 0.1141700E+00, 0.1327000E+00, &
     & 0.1243300E+00, 0.1200200E+00, 0.1345500E+00, 0.1265500E+00, &
     & 0.1517900E+00, 0.1640600E+00, 0.1602500E+00, 0.1762200E+00, &
     & 0.1738900E+00, 0.1994200E+00, 0.2050200E+00, 0.2194883E+00, &
     & 0.2390077E+00, 0.2641464E+00, 0.2793461E+00, 0.2793461E+00 /
      data (ref_adm( 7,iz,20,15),iz = 1,20) / &
     & 0.1429000E+00, 0.1429000E+00, 0.1222600E+00, 0.1345500E+00, &
     & 0.1300500E+00, 0.1329400E+00, 0.1443300E+00, 0.1255000E+00, &
     & 0.1603100E+00, 0.1759200E+00, 0.1688600E+00, 0.1744900E+00, &
     & 0.1731100E+00, 0.2165600E+00, 0.2292800E+00, 0.2197452E+00, &
     & 0.2384829E+00, 0.2625332E+00, 0.2765059E+00, 0.2765059E+00 /
      data (ref_adm( 7,iz,21,15),iz = 1,20) / &
     & 0.1321200E+00, 0.1321200E+00, 0.1317100E+00, 0.1362100E+00, &
     & 0.1418100E+00, 0.1351600E+00, 0.1489200E+00, 0.1473700E+00, &
     & 0.1648500E+00, 0.1587700E+00, 0.1629400E+00, 0.1786900E+00, &
     & 0.1629600E+00, 0.2091600E+00, 0.2271800E+00, 0.2204536E+00, &
     & 0.2387680E+00, 0.2614373E+00, 0.2746535E+00, 0.2746535E+00 /
      data (ref_adm( 7,iz,22,15),iz = 1,20) / &
     & 0.1279300E+00, 0.1279300E+00, 0.1348300E+00, 0.1255400E+00, &
     & 0.1538400E+00, 0.1410800E+00, 0.1538500E+00, 0.1381500E+00, &
     & 0.1546200E+00, 0.1713300E+00, 0.1735200E+00, 0.1795300E+00, &
     & 0.1844700E+00, 0.2105700E+00, 0.2228600E+00, 0.2978544E+00, &
     & 0.3394448E+00, 0.3994735E+00, 0.4642488E+00, 0.4642488E+00 /
      data (ref_adm( 7,iz,23,15),iz = 1,20) / &
     & 0.1347200E+00, 0.1347200E+00, 0.1344700E+00, 0.1285700E+00, &
     & 0.1279500E+00, 0.1247100E+00, 0.1501800E+00, 0.1631200E+00, &
     & 0.1682600E+00, 0.1724100E+00, 0.1782300E+00, 0.2261400E+00, &
     & 0.2088000E+00, 0.2446200E+00, 0.2440100E+00, 0.2998498E+00, &
     & 0.3410541E+00, 0.3997602E+00, 0.4651168E+00, 0.4651168E+00 /
      data (ref_adm( 7,iz,24,15),iz = 1,20) / &
     & 0.1243300E+00, 0.1243300E+00, 0.1217200E+00, 0.1333100E+00, &
     & 0.1358900E+00, 0.1380400E+00, 0.1448200E+00, 0.1533400E+00, &
     & 0.1612000E+00, 0.1642000E+00, 0.1766400E+00, 0.1886300E+00, &
     & 0.2001900E+00, 0.2154500E+00, 0.2460900E+00, 0.2761000E+00, &
     & 0.3443501E+00, 0.4029526E+00, 0.4702440E+00, 0.4702440E+00 /
      data (ref_adm( 7,iz,25,15),iz = 1,20) / &
     & 0.1315700E+00, 0.1315700E+00, 0.1374100E+00, 0.1400400E+00, &
     & 0.1382300E+00, 0.1476400E+00, 0.1529800E+00, 0.1601800E+00, &
     & 0.1707900E+00, 0.1811400E+00, 0.1941000E+00, 0.2115500E+00, &
     & 0.2233300E+00, 0.2385800E+00, 0.2556400E+00, 0.2646300E+00, &
     & 0.3497555E+00, 0.4081606E+00, 0.4779153E+00, 0.4779153E+00 /
      data (ref_adm( 7,iz,26,15),iz = 1,20) / &
     & 0.1287400E+00, 0.1287400E+00, 0.1210500E+00, 0.1399800E+00, &
     & 0.1446700E+00, 0.1434000E+00, 0.1418000E+00, 0.1540200E+00, &
     & 0.1508700E+00, 0.1775300E+00, 0.1813200E+00, 0.2050900E+00, &
     & 0.2211700E+00, 0.2499500E+00, 0.2770600E+00, 0.2798100E+00, &
     & 0.3575750E+00, 0.4170716E+00, 0.4912210E+00, 0.4912210E+00 /
      data (ref_adm( 7,iz,27,15),iz = 1,20) / &
     & 0.1261200E+00, 0.1261200E+00, 0.1182700E+00, 0.1390600E+00, &
     & 0.1376000E+00, 0.1447900E+00, 0.1497500E+00, 0.1491900E+00, &
     & 0.1600700E+00, 0.1820100E+00, 0.1856600E+00, 0.1869400E+00, &
     & 0.2286400E+00, 0.2718400E+00, 0.3088100E+00, 0.2815300E+00, &
     & 0.3668730E+00, 0.4283774E+00, 0.5081402E+00, 0.5081402E+00 /
      data (ref_adm( 7,iz,28,15),iz = 1,20) / &
     & 0.1308000E+00, 0.1308000E+00, 0.1250200E+00, 0.1341400E+00, &
     & 0.1382700E+00, 0.1435600E+00, 0.1547400E+00, 0.1649900E+00, &
     & 0.1655200E+00, 0.1890400E+00, 0.2180400E+00, 0.2273700E+00, &
     & 0.2556400E+00, 0.2577000E+00, 0.2873200E+00, 0.3252300E+00, &
     & 0.3777098E+00, 0.4410703E+00, 0.5263016E+00, 0.5263016E+00 /
      data (ref_adm( 7,iz,29,15),iz = 1,20) / &
     & 0.1266400E+00, 0.1266400E+00, 0.1206900E+00, 0.1183000E+00, &
     & 0.1389900E+00, 0.1457900E+00, 0.1535600E+00, 0.1640800E+00, &
     & 0.1714000E+00, 0.1935300E+00, 0.2128700E+00, 0.2377700E+00, &
     & 0.2478900E+00, 0.2823500E+00, 0.3000000E+00, 0.3329400E+00, &
     & 0.3899398E+00, 0.4561286E+00, 0.5475670E+00, 0.5475670E+00 /
      data (ref_adm( 7,iz,30,15),iz = 1,20) / &
     & 0.1310500E+00, 0.1310500E+00, 0.1437300E+00, 0.1235400E+00, &
     & 0.1332700E+00, 0.1511600E+00, 0.1602400E+00, 0.1696900E+00, &
     & 0.1789100E+00, 0.2012700E+00, 0.2118200E+00, 0.2306500E+00, &
     & 0.2571600E+00, 0.2735300E+00, 0.3061100E+00, 0.3428500E+00, &
     & 0.4037208E+00, 0.4728763E+00, 0.5700040E+00, 0.5700040E+00 /
      data (ref_adm( 7,iz,31,15),iz = 1,20) / &
     & 0.1243300E+00, 0.1243300E+00, 0.1313100E+00, 0.1464200E+00, &
     & 0.1365400E+00, 0.1492200E+00, 0.1583100E+00, 0.1755600E+00, &
     & 0.1788000E+00, 0.2084500E+00, 0.2264200E+00, 0.2396000E+00, &
     & 0.2862100E+00, 0.2669500E+00, 0.3158500E+00, 0.3469200E+00, &
     & 0.4174103E+00, 0.4904378E+00, 0.5940106E+00, 0.5940106E+00 /
      data (ref_adm( 7,iz,32,15),iz = 1,20) / &
     & 0.1264700E+00, 0.1264700E+00, 0.1322000E+00, 0.1348800E+00, &
     & 0.1469500E+00, 0.1700300E+00, 0.1720200E+00, 0.1780500E+00, &
     & 0.1895700E+00, 0.2196100E+00, 0.2367500E+00, 0.2602300E+00, &
     & 0.2895900E+00, 0.2798700E+00, 0.3315100E+00, 0.3911000E+00, &
     & 0.4308926E+00, 0.5075993E+00, 0.6165265E+00, 0.6165265E+00 /
      data (ref_adm( 7,iz,33,15),iz = 1,20) / &
     & 0.1323500E+00, 0.1323500E+00, 0.1394500E+00, 0.1490500E+00, &
     & 0.1540900E+00, 0.1671100E+00, 0.1731500E+00, 0.1856700E+00, &
     & 0.2038400E+00, 0.2268100E+00, 0.2505300E+00, 0.2549100E+00, &
     & 0.2955300E+00, 0.3172700E+00, 0.3559200E+00, 0.4150600E+00, &
     & 0.4616700E+00, 0.5202950E+00, 0.6377608E+00, 0.6377608E+00 /
      data (ref_adm( 7,iz,34,15),iz = 1,20) / &
     & 0.1277000E+00, 0.1277000E+00, 0.1395200E+00, 0.1543400E+00, &
     & 0.1541400E+00, 0.1745400E+00, 0.1736900E+00, 0.2066000E+00, &
     & 0.2095700E+00, 0.2200300E+00, 0.2431200E+00, 0.2654600E+00, &
     & 0.3019300E+00, 0.3542900E+00, 0.3872200E+00, 0.4006900E+00, &
     & 0.4405534E+00, 0.5228741E+00, 0.6487433E+00, 0.6487433E+00 /
      data (ref_adm( 7,iz,35,15),iz = 1,20) / &
     & 0.1290800E+00, 0.1290800E+00, 0.1619300E+00, 0.1471700E+00, &
     & 0.1608900E+00, 0.1719200E+00, 0.1926100E+00, 0.2121500E+00, &
     & 0.2106500E+00, 0.2324500E+00, 0.2404700E+00, 0.2634600E+00, &
     & 0.2914600E+00, 0.3653200E+00, 0.4215700E+00, 0.4750500E+00, &
     & 0.5379200E+00, 0.5240204E+00, 0.6516476E+00, 0.6516476E+00 /
      data (ref_adm( 7,iz,36,15),iz = 1,20) / &
     & 0.1369100E+00, 0.1369100E+00, 0.1478400E+00, 0.1462300E+00, &
     & 0.1576600E+00, 0.1675000E+00, 0.1871300E+00, 0.2171200E+00, &
     & 0.2265900E+00, 0.2254300E+00, 0.2443100E+00, 0.2750300E+00, &
     & 0.2980200E+00, 0.3731200E+00, 0.4246400E+00, 0.4841000E+00, &
     & 0.5670900E+00, 0.5284232E+00, 0.6530783E+00, 0.6530783E+00 /
      data (ref_adm( 7,iz,37,15),iz = 1,20) / &
     & 0.1288000E+00, 0.1288000E+00, 0.1427300E+00, 0.1485100E+00, &
     & 0.1685800E+00, 0.1816600E+00, 0.1959000E+00, 0.2021200E+00, &
     & 0.2100300E+00, 0.2298700E+00, 0.2540300E+00, 0.2854200E+00, &
     & 0.2857900E+00, 0.3382300E+00, 0.4141600E+00, 0.5221300E+00, &
     & 0.5331500E+00, 0.5329728E+00, 0.6546438E+00, 0.6546438E+00 /
      data (ref_adm( 7,iz,38,15),iz = 1,20) / &
     & 0.1288000E+00, 0.1288000E+00, 0.1427300E+00, 0.1485100E+00, &
     & 0.1685800E+00, 0.1816600E+00, 0.1959000E+00, 0.2021200E+00, &
     & 0.2100300E+00, 0.2298700E+00, 0.2540300E+00, 0.2854200E+00, &
     & 0.2857900E+00, 0.3382300E+00, 0.4141600E+00, 0.5221300E+00, &
     & 0.5331500E+00, 0.5329728E+00, 0.6546438E+00, 0.6546438E+00 /
! Solar Zenith Angle 75.0 Albedo  0.2124839E+00
      data (ref_adm( 7,iz, 1,16),iz = 1,20) / &
     & 0.1211200E+00, 0.1211200E+00, 0.9652300E-01, 0.1074100E+00, &
     & 0.1547000E+00, 0.1521700E+00, 0.1686400E+00, 0.1831900E+00, &
     & 0.1955800E+00, 0.2209800E+00, 0.2538100E+00, 0.2049311E+00, &
     & 0.2302285E+00, 0.2564773E+00, 0.2989632E+00, 0.3528160E+00, &
     & 0.4369906E+00, 0.6647069E+00, 0.1233014E+01, 0.1233014E+01 /
      data (ref_adm( 7,iz, 2,16),iz = 1,20) / &
     & 0.1211200E+00, 0.1211200E+00, 0.9652300E-01, 0.1074100E+00, &
     & 0.1547000E+00, 0.1521700E+00, 0.1686400E+00, 0.1831900E+00, &
     & 0.1955800E+00, 0.2209800E+00, 0.2538100E+00, 0.2049311E+00, &
     & 0.2302285E+00, 0.2564773E+00, 0.2989632E+00, 0.3528160E+00, &
     & 0.4369906E+00, 0.6647069E+00, 0.1233014E+01, 0.1233014E+01 /
      data (ref_adm( 7,iz, 3,16),iz = 1,20) / &
     & 0.1877700E+00, 0.1877700E+00, 0.1309742E+00, 0.1320050E+00, &
     & 0.9638800E-01, 0.1683000E+00, 0.9917300E-01, 0.1627900E+00, &
     & 0.1345100E+00, 0.1494100E+00, 0.2316500E+00, 0.2046974E+00, &
     & 0.3639200E+00, 0.2555711E+00, 0.2975349E+00, 0.3515638E+00, &
     & 0.4307184E+00, 0.6417221E+00, 0.1762423E-07, 0.1762423E-07 /
      data (ref_adm( 7,iz, 4,16),iz = 1,20) / &
     & 0.2220600E+00, 0.2220600E+00, 0.1189800E+00, 0.1743900E+00, &
     & 0.1624000E+00, 0.1491100E+00, 0.1430900E+00, 0.1582900E+00, &
     & 0.1294600E+00, 0.1377700E+00, 0.1596200E+00, 0.2039121E+00, &
     & 0.3060800E+00, 0.2532252E+00, 0.2941065E+00, 0.3488136E+00, &
     & 0.4194068E+00, 0.6002914E+00, 0.9798214E+00, 0.9798214E+00 /
      data (ref_adm( 7,iz, 5,16),iz = 1,20) / &
     & 0.1296300E+00, 0.1296300E+00, 0.1501900E+00, 0.1547400E+00, &
     & 0.1343994E+00, 0.1269000E+00, 0.1662700E+00, 0.1331700E+00, &
     & 0.1598600E+00, 0.1464400E+00, 0.1511400E+00, 0.2028122E+00, &
     & 0.2266066E+00, 0.2506095E+00, 0.2893579E+00, 0.3454480E+00, &
     & 0.4075048E+00, 0.5541831E+00, 0.8256452E+00, 0.8256452E+00 /
      data (ref_adm( 7,iz, 6,16),iz = 1,20) / &
     & 0.9772500E-01, 0.9772500E-01, 0.1097500E+00, 0.1082400E+00, &
     & 0.1071200E+00, 0.1192100E+00, 0.1213200E+00, 0.1196600E+00, &
     & 0.1277400E+00, 0.1418800E+00, 0.1772000E+00, 0.1828800E+00, &
     & 0.2084100E+00, 0.2722600E+00, 0.3308800E+00, 0.3391518E+00, &
     & 0.3979583E+00, 0.5119998E+00, 0.7096084E+00, 0.7096084E+00 /
      data (ref_adm( 7,iz, 7,16),iz = 1,20) / &
     & 0.1194000E+00, 0.1194000E+00, 0.1120400E+00, 0.1321316E+00, &
     & 0.1144800E+00, 0.1157500E+00, 0.1226000E+00, 0.1510500E+00, &
     & 0.1681000E+00, 0.1902700E+00, 0.1870500E+00, 0.2462000E+00, &
     & 0.3093600E+00, 0.2438964E+00, 0.2769856E+00, 0.3285569E+00, &
     & 0.4282400E+00, 0.4815182E+00, 0.6199228E+00, 0.6199228E+00 /
      data (ref_adm( 7,iz, 8,16),iz = 1,20) / &
     & 0.1245100E+00, 0.1245100E+00, 0.1311890E+00, 0.1438700E+00, &
     & 0.1235800E+00, 0.1198300E+00, 0.1451400E+00, 0.1370200E+00, &
     & 0.1842700E+00, 0.1899800E+00, 0.2172700E+00, 0.2370500E+00, &
     & 0.2456900E+00, 0.2527700E+00, 0.2711536E+00, 0.3774800E+00, &
     & 0.4156900E+00, 0.4680178E+00, 0.5679100E+00, 0.5679100E+00 /
      data (ref_adm( 7,iz, 9,16),iz = 1,20) / &
     & 0.1291700E+00, 0.1291700E+00, 0.1262100E+00, 0.1368900E+00, &
     & 0.1542500E+00, 0.1094600E+00, 0.1206400E+00, 0.1483600E+00, &
     & 0.1700100E+00, 0.1772000E+00, 0.1857200E+00, 0.2257800E+00, &
     & 0.2537500E+00, 0.2275200E+00, 0.2660687E+00, 0.3082600E+00, &
     & 0.3611368E+00, 0.4505211E+00, 0.5496871E+00, 0.5496871E+00 /
      data (ref_adm( 7,iz,10,16),iz = 1,20) / &
     & 0.1365900E+00, 0.1365900E+00, 0.1454100E+00, 0.1351400E+00, &
     & 0.1388200E+00, 0.1274400E+00, 0.1387200E+00, 0.1741000E+00, &
     & 0.1441600E+00, 0.1417100E+00, 0.1768490E+00, 0.1760500E+00, &
     & 0.2379300E+00, 0.2457800E+00, 0.2610051E+00, 0.2849500E+00, &
     & 0.3641900E+00, 0.4235182E+00, 0.5137877E+00, 0.5137877E+00 /
      data (ref_adm( 7,iz,11,16),iz = 1,20) / &
     & 0.1041300E+00, 0.1041300E+00, 0.1302400E+00, 0.1349500E+00, &
     & 0.1279300E+00, 0.1444300E+00, 0.1658100E+00, 0.1732100E+00, &
     & 0.1509100E+00, 0.1359300E+00, 0.1752702E+00, 0.1919186E+00, &
     & 0.2019400E+00, 0.2764800E+00, 0.2693000E+00, 0.2768500E+00, &
     & 0.3373360E+00, 0.4037603E+00, 0.4759198E+00, 0.4759198E+00 /
      data (ref_adm( 7,iz,12,16),iz = 1,20) / &
     & 0.1289300E+00, 0.1289300E+00, 0.1228100E+00, 0.1065000E+00, &
     & 0.1417800E+00, 0.1531800E+00, 0.1734900E+00, 0.1488900E+00, &
     & 0.1783200E+00, 0.1841200E+00, 0.1566800E+00, 0.2254800E+00, &
     & 0.1645300E+00, 0.2399400E+00, 0.2565800E+00, 0.2901200E+00, &
     & 0.3290842E+00, 0.3896877E+00, 0.4517098E+00, 0.4517098E+00 /
      data (ref_adm( 7,iz,13,16),iz = 1,20) / &
     & 0.1409400E+00, 0.1409400E+00, 0.1288300E+00, 0.1290900E+00, &
     & 0.1405000E+00, 0.1548900E+00, 0.1268500E+00, 0.1199800E+00, &
     & 0.1694400E+00, 0.1585200E+00, 0.1558100E+00, 0.1634300E+00, &
     & 0.1780500E+00, 0.2328400E+00, 0.2177800E+00, 0.2535000E+00, &
     & 0.3221524E+00, 0.3786903E+00, 0.4338986E+00, 0.4338986E+00 /
      data (ref_adm( 7,iz,14,16),iz = 1,20) / &
     & 0.1143800E+00, 0.1143800E+00, 0.1261500E+00, 0.1383600E+00, &
     & 0.1223600E+00, 0.1305700E+00, 0.1222300E+00, 0.1262300E+00, &
     & 0.1483800E+00, 0.1545600E+00, 0.1610600E+00, 0.1821400E+00, &
     & 0.1776300E+00, 0.1875800E+00, 0.2201000E+00, 0.2774592E+00, &
     & 0.3156835E+00, 0.3701780E+00, 0.4204327E+00, 0.4204327E+00 /
      data (ref_adm( 7,iz,15,16),iz = 1,20) / &
     & 0.1327100E+00, 0.1327100E+00, 0.1270900E+00, 0.1305400E+00, &
     & 0.1242600E+00, 0.1303700E+00, 0.1329600E+00, 0.1391600E+00, &
     & 0.1453800E+00, 0.1490100E+00, 0.1691500E+00, 0.1754900E+00, &
     & 0.1939600E+00, 0.1964800E+00, 0.2396368E+00, 0.2715602E+00, &
     & 0.3087883E+00, 0.3620200E+00, 0.4089611E+00, 0.4089611E+00 /
      data (ref_adm( 7,iz,16,16),iz = 1,20) / &
     & 0.1210100E+00, 0.1210100E+00, 0.1214900E+00, 0.1227100E+00, &
     & 0.1407600E+00, 0.1355100E+00, 0.1328400E+00, 0.1382500E+00, &
     & 0.1492900E+00, 0.1581100E+00, 0.1606100E+00, 0.1642500E+00, &
     & 0.1877600E+00, 0.2090800E+00, 0.2361686E+00, 0.2668515E+00, &
     & 0.3020552E+00, 0.3523643E+00, 0.3968258E+00, 0.3968258E+00 /
      data (ref_adm( 7,iz,17,16),iz = 1,20) / &
     & 0.1204000E+00, 0.1204000E+00, 0.1397900E+00, 0.1394200E+00, &
     & 0.1382400E+00, 0.1349300E+00, 0.1636400E+00, 0.1481900E+00, &
     & 0.1449800E+00, 0.1702100E+00, 0.1459600E+00, 0.1702500E+00, &
     & 0.1976541E+00, 0.2193800E+00, 0.2332307E+00, 0.2437700E+00, &
     & 0.2963299E+00, 0.3440299E+00, 0.3839269E+00, 0.3839269E+00 /
      data (ref_adm( 7,iz,18,16),iz = 1,20) / &
     & 0.1237400E+00, 0.1237400E+00, 0.1370500E+00, 0.1216200E+00, &
     & 0.1480300E+00, 0.1256500E+00, 0.1438200E+00, 0.1310500E+00, &
     & 0.1459500E+00, 0.1556000E+00, 0.1630593E+00, 0.1755500E+00, &
     & 0.1658000E+00, 0.2348500E+00, 0.2388300E+00, 0.2296640E+00, &
     & 0.2517129E+00, 0.2810400E+00, 0.3009214E+00, 0.3009214E+00 /
      data (ref_adm( 7,iz,19,16),iz = 1,20) / &
     & 0.1184900E+00, 0.1184900E+00, 0.1220400E+00, 0.1315200E+00, &
     & 0.1318500E+00, 0.1365400E+00, 0.1368800E+00, 0.1623200E+00, &
     & 0.1629300E+00, 0.1615400E+00, 0.1893100E+00, 0.1560700E+00, &
     & 0.2020100E+00, 0.2158400E+00, 0.2232100E+00, 0.2289388E+00, &
     & 0.2503393E+00, 0.2780126E+00, 0.2953671E+00, 0.2953671E+00 /
      data (ref_adm( 7,iz,20,16),iz = 1,20) / &
     & 0.1170100E+00, 0.1170100E+00, 0.1278800E+00, 0.1360600E+00, &
     & 0.1389700E+00, 0.1246700E+00, 0.1352400E+00, 0.1566700E+00, &
     & 0.1526900E+00, 0.2549700E+00, 0.1658309E+00, 0.1637600E+00, &
     & 0.1846300E+00, 0.2265200E+00, 0.2095800E+00, 0.2290879E+00, &
     & 0.2496485E+00, 0.2761809E+00, 0.2921529E+00, 0.2921529E+00 /
      data (ref_adm( 7,iz,21,16),iz = 1,20) / &
     & 0.9974100E-01, 0.9974100E-01, 0.1303100E+00, 0.1253500E+00, &
     & 0.1317400E+00, 0.1335100E+00, 0.1441100E+00, 0.1507100E+00, &
     & 0.1324100E+00, 0.1686200E+00, 0.1770400E+00, 0.1940700E+00, &
     & 0.1610000E+00, 0.2433600E+00, 0.2520100E+00, 0.2297450E+00, &
     & 0.2497941E+00, 0.2748867E+00, 0.2901299E+00, 0.2901299E+00 /
      data (ref_adm( 7,iz,22,16),iz = 1,20) / &
     & 0.1274000E+00, 0.1274000E+00, 0.1401100E+00, 0.1233100E+00, &
     & 0.1385100E+00, 0.1390000E+00, 0.1361100E+00, 0.1599400E+00, &
     & 0.1531300E+00, 0.1740600E+00, 0.1603300E+00, 0.2007100E+00, &
     & 0.2199386E+00, 0.2372100E+00, 0.2483300E+00, 0.2925189E+00, &
     & 0.3299276E+00, 0.3820555E+00, 0.4315898E+00, 0.4315898E+00 /
      data (ref_adm( 7,iz,23,16),iz = 1,20) / &
     & 0.1418900E+00, 0.1418900E+00, 0.1391900E+00, 0.1429600E+00, &
     & 0.1438700E+00, 0.1528000E+00, 0.1415900E+00, 0.1463300E+00, &
     & 0.1689200E+00, 0.1683500E+00, 0.1923000E+00, 0.2125300E+00, &
     & 0.2556800E+00, 0.2373100E+00, 0.2485800E+00, 0.2947869E+00, &
     & 0.3317786E+00, 0.3825939E+00, 0.4323693E+00, 0.4323693E+00 /
      data (ref_adm( 7,iz,24,16),iz = 1,20) / &
     & 0.1253100E+00, 0.1253100E+00, 0.1248800E+00, 0.1288700E+00, &
     & 0.1369700E+00, 0.1417200E+00, 0.1380700E+00, 0.1437700E+00, &
     & 0.1516400E+00, 0.1666200E+00, 0.1774900E+00, 0.1949400E+00, &
     & 0.2063500E+00, 0.2268000E+00, 0.2521900E+00, 0.2980900E+00, &
     & 0.3351509E+00, 0.3856559E+00, 0.4367711E+00, 0.4367711E+00 /
      data (ref_adm( 7,iz,25,16),iz = 1,20) / &
     & 0.1278000E+00, 0.1278000E+00, 0.1354900E+00, 0.1315700E+00, &
     & 0.1270100E+00, 0.1365800E+00, 0.1473700E+00, 0.1581300E+00, &
     & 0.1676700E+00, 0.1741500E+00, 0.2083800E+00, 0.2163100E+00, &
     & 0.2518400E+00, 0.2679300E+00, 0.2908600E+00, 0.2670900E+00, &
     & 0.3406053E+00, 0.3906771E+00, 0.4434449E+00, 0.4434449E+00 /
      data (ref_adm( 7,iz,26,16),iz = 1,20) / &
     & 0.1230200E+00, 0.1230200E+00, 0.1393400E+00, 0.1296300E+00, &
     & 0.1583600E+00, 0.1694200E+00, 0.1473100E+00, 0.1502700E+00, &
     & 0.1720600E+00, 0.1775600E+00, 0.1905300E+00, 0.1890300E+00, &
     & 0.2156800E+00, 0.2826600E+00, 0.2778800E+00, 0.3102326E+00, &
     & 0.3481458E+00, 0.3989789E+00, 0.4551171E+00, 0.4551171E+00 /
      data (ref_adm( 7,iz,27,16),iz = 1,20) / &
     & 0.1220800E+00, 0.1220800E+00, 0.1177300E+00, 0.1244400E+00, &
     & 0.1394000E+00, 0.1439400E+00, 0.1654400E+00, 0.1678000E+00, &
     & 0.1734400E+00, 0.1819100E+00, 0.2057900E+00, 0.2142200E+00, &
     & 0.2690000E+00, 0.3148400E+00, 0.3253400E+00, 0.3624800E+00, &
     & 0.3570881E+00, 0.4096121E+00, 0.4698793E+00, 0.4698793E+00 /
      data (ref_adm( 7,iz,28,16),iz = 1,20) / &
     & 0.1252500E+00, 0.1252500E+00, 0.1271000E+00, 0.1335400E+00, &
     & 0.1516818E+00, 0.1241000E+00, 0.1499200E+00, 0.1437500E+00, &
     & 0.1606600E+00, 0.2199900E+00, 0.2115100E+00, 0.2271500E+00, &
     & 0.2345100E+00, 0.3264200E+00, 0.3130300E+00, 0.3568900E+00, &
     & 0.3674682E+00, 0.4212928E+00, 0.4859347E+00, 0.4859347E+00 /
      data (ref_adm( 7,iz,29,16),iz = 1,20) / &
     & 0.1217100E+00, 0.1217100E+00, 0.1235400E+00, 0.1235100E+00, &
     & 0.1503400E+00, 0.1569600E+00, 0.1341000E+00, 0.1762500E+00, &
     & 0.1662800E+00, 0.1971752E+00, 0.2036800E+00, 0.2220600E+00, &
     & 0.2593200E+00, 0.2843700E+00, 0.3340200E+00, 0.3647000E+00, &
     & 0.3792218E+00, 0.4353162E+00, 0.5046510E+00, 0.5046510E+00 /
      data (ref_adm( 7,iz,30,16),iz = 1,20) / &
     & 0.1427500E+00, 0.1427500E+00, 0.1445100E+00, 0.1303200E+00, &
     & 0.1498300E+00, 0.1596100E+00, 0.1550100E+00, 0.1649800E+00, &
     & 0.2215400E+00, 0.1863000E+00, 0.2223800E+00, 0.2340400E+00, &
     & 0.2484400E+00, 0.3048500E+00, 0.3391800E+00, 0.3485829E+00, &
     & 0.3921885E+00, 0.4505930E+00, 0.5241617E+00, 0.5241617E+00 /
      data (ref_adm( 7,iz,31,16),iz = 1,20) / &
     & 0.1372000E+00, 0.1372000E+00, 0.1462300E+00, 0.1429300E+00, &
     & 0.1482100E+00, 0.1676400E+00, 0.1674600E+00, 0.1822700E+00, &
     & 0.2112000E+00, 0.1805600E+00, 0.2196311E+00, 0.2465300E+00, &
     & 0.2780400E+00, 0.3292600E+00, 0.3376600E+00, 0.4354500E+00, &
     & 0.4052737E+00, 0.4668975E+00, 0.5452532E+00, 0.5452532E+00 /
      data (ref_adm( 7,iz,32,16),iz = 1,20) / &
     & 0.1300700E+00, 0.1300700E+00, 0.1387500E+00, 0.1501600E+00, &
     & 0.1516400E+00, 0.1663500E+00, 0.1822100E+00, 0.1790700E+00, &
     & 0.1898800E+00, 0.2204500E+00, 0.2520400E+00, 0.2733200E+00, &
     & 0.3127500E+00, 0.2954080E+00, 0.3562600E+00, 0.3890900E+00, &
     & 0.4181875E+00, 0.4826679E+00, 0.5650373E+00, 0.5650373E+00 /
      data (ref_adm( 7,iz,33,16),iz = 1,20) / &
     & 0.1082400E+00, 0.1082400E+00, 0.1252500E+00, 0.1429000E+00, &
     & 0.1492300E+00, 0.1465200E+00, 0.1534600E+00, 0.1754200E+00, &
     & 0.1848000E+00, 0.1954600E+00, 0.2280100E+00, 0.2787300E+00, &
     & 0.3123200E+00, 0.3540400E+00, 0.3780300E+00, 0.3760141E+00, &
     & 0.4263594E+00, 0.4962165E+00, 0.5840207E+00, 0.5840207E+00 /
      data (ref_adm( 7,iz,34,16),iz = 1,20) / &
     & 0.1222600E+00, 0.1222600E+00, 0.1410300E+00, 0.1386600E+00, &
     & 0.1527700E+00, 0.1603300E+00, 0.1862400E+00, 0.2062900E+00, &
     & 0.1966800E+00, 0.2344900E+00, 0.2508000E+00, 0.2741000E+00, &
     & 0.3422000E+00, 0.3532900E+00, 0.3778700E+00, 0.4596700E+00, &
     & 0.4986500E+00, 0.5003790E+00, 0.5978705E+00, 0.5978705E+00 /
      data (ref_adm( 7,iz,35,16),iz = 1,20) / &
     & 0.1286900E+00, 0.1286900E+00, 0.1328700E+00, 0.1534500E+00, &
     & 0.1349000E+00, 0.1720500E+00, 0.1907600E+00, 0.1936500E+00, &
     & 0.2296600E+00, 0.2356400E+00, 0.2413800E+00, 0.2792300E+00, &
     & 0.3470600E+00, 0.3641500E+00, 0.4042700E+00, 0.4593000E+00, &
     & 0.5043300E+00, 0.5009949E+00, 0.6030529E+00, 0.6030529E+00 /
      data (ref_adm( 7,iz,36,16),iz = 1,20) / &
     & 0.1435700E+00, 0.1435700E+00, 0.1396700E+00, 0.1290000E+00, &
     & 0.1682100E+00, 0.1722200E+00, 0.1742300E+00, 0.2084600E+00, &
     & 0.2218300E+00, 0.2408900E+00, 0.2333800E+00, 0.2856000E+00, &
     & 0.2837647E+00, 0.3729500E+00, 0.3974100E+00, 0.3904826E+00, &
     & 0.4382375E+00, 0.5033270E+00, 0.6034794E+00, 0.6034794E+00 /
      data (ref_adm( 7,iz,37,16),iz = 1,20) / &
     & 0.1213300E+00, 0.1213300E+00, 0.1528800E+00, 0.1516600E+00, &
     & 0.1320700E+00, 0.1523600E+00, 0.1955300E+00, 0.2000800E+00, &
     & 0.1867100E+00, 0.2283200E+00, 0.2469700E+00, 0.2972500E+00, &
     & 0.3198800E+00, 0.3406000E+00, 0.3794000E+00, 0.5399400E+00, &
     & 0.4428830E+00, 0.5061333E+00, 0.6036532E+00, 0.6036532E+00 /
      data (ref_adm( 7,iz,38,16),iz = 1,20) / &
     & 0.1213300E+00, 0.1213300E+00, 0.1528800E+00, 0.1516600E+00, &
     & 0.1320700E+00, 0.1523600E+00, 0.1955300E+00, 0.2000800E+00, &
     & 0.1867100E+00, 0.2283200E+00, 0.2469700E+00, 0.2972500E+00, &
     & 0.3198800E+00, 0.3406000E+00, 0.3794000E+00, 0.5399400E+00, &
     & 0.4428830E+00, 0.5061333E+00, 0.6036532E+00, 0.6036532E+00 /
! Solar Zenith Angle 80.0 Albedo  0.2329435E+00
      data (ref_adm( 7,iz, 1,17),iz = 1,20) / &
     & 0.1569300E+00, 0.1569300E+00, 0.1446811E+00, 0.1466695E+00, &
     & 0.1501000E+00, 0.1561400E+00, 0.1540700E+00, 0.1820700E+00, &
     & 0.1909300E+00, 0.1985307E+00, 0.2774500E+00, 0.3377400E+00, &
     & 0.2766677E+00, 0.3155599E+00, 0.3643161E+00, 0.4561336E+00, &
     & 0.6298520E+00, 0.1234537E+01, 0.2316605E+01, 0.2316605E+01 /
      data (ref_adm( 7,iz, 2,17),iz = 1,20) / &
     & 0.1569300E+00, 0.1569300E+00, 0.1446811E+00, 0.1466695E+00, &
     & 0.1501000E+00, 0.1561400E+00, 0.1540700E+00, 0.1820700E+00, &
     & 0.1909300E+00, 0.1985307E+00, 0.2774500E+00, 0.3377400E+00, &
     & 0.2766677E+00, 0.3155599E+00, 0.3643161E+00, 0.4561336E+00, &
     & 0.6298520E+00, 0.1234537E+01, 0.2316605E+01, 0.2316605E+01 /
      data (ref_adm( 7,iz, 3,17),iz = 1,20) / &
     & 0.1444606E+00, 0.1444606E+00, 0.1509900E+00, 0.1482200E+00, &
     & 0.1461900E+00, 0.1557998E+00, 0.1591100E+00, 0.1653500E+00, &
     & 0.1884800E+00, 0.1982934E+00, 0.2146158E+00, 0.3073200E+00, &
     & 0.2755416E+00, 0.3138518E+00, 0.3630841E+00, 0.4496745E+00, &
     & 0.6121279E+00, 0.1139338E+01, 0.3796392E-07, 0.3796392E-07 /
      data (ref_adm( 7,iz, 4,17),iz = 1,20) / &
     & 0.1444700E+00, 0.1444700E+00, 0.1412500E+00, 0.1357000E+00, &
     & 0.1413300E+00, 0.1746800E+00, 0.1633132E+00, 0.1503900E+00, &
     & 0.1844911E+00, 0.1978509E+00, 0.2137282E+00, 0.3053400E+00, &
     & 0.2735129E+00, 0.3099618E+00, 0.3602572E+00, 0.4384556E+00, &
     & 0.5793760E+00, 0.9861933E+00, 0.2058624E+01, 0.2058624E+01 /
      data (ref_adm( 7,iz, 5,17),iz = 1,20) / &
     & 0.1493700E+00, 0.1493700E+00, 0.1532900E+00, 0.1528800E+00, &
     & 0.1593300E+00, 0.1983500E+00, 0.1544000E+00, 0.1798400E+00, &
     & 0.1992400E+00, 0.2238900E+00, 0.2536500E+00, 0.2941000E+00, &
     & 0.2699912E+00, 0.3043530E+00, 0.3564888E+00, 0.4252076E+00, &
     & 0.5418982E+00, 0.8365140E+00, 0.1477784E+01, 0.1477784E+01 /
      data (ref_adm( 7,iz, 6,17),iz = 1,20) / &
     & 0.1412500E+00, 0.1412500E+00, 0.1447108E+00, 0.1466334E+00, &
     & 0.1749200E+00, 0.1605200E+00, 0.1624826E+00, 0.1716739E+00, &
     & 0.1830073E+00, 0.1961704E+00, 0.2115475E+00, 0.2355997E+00, &
     & 0.2662250E+00, 0.2980226E+00, 0.3493130E+00, 0.4154616E+00, &
     & 0.5071740E+00, 0.7248534E+00, 0.1114833E+01, 0.1114833E+01 /
      data (ref_adm( 7,iz, 7,17),iz = 1,20) / &
     & 0.1196600E+00, 0.1196600E+00, 0.1447245E+00, 0.1466167E+00, &
     & 0.1097200E+00, 0.1908500E+00, 0.1619602E+00, 0.1708875E+00, &
     & 0.1818716E+00, 0.1950990E+00, 0.2099821E+00, 0.2332863E+00, &
     & 0.3407300E+00, 0.2916219E+00, 0.3386926E+00, 0.4085447E+00, &
     & 0.4828017E+00, 0.6395899E+00, 0.8987358E+00, 0.8987358E+00 /
      data (ref_adm( 7,iz, 8,17),iz = 1,20) / &
     & 0.1468800E+00, 0.1468800E+00, 0.1524300E+00, 0.1688300E+00, &
     & 0.1540000E+00, 0.1547078E+00, 0.1681700E+00, 0.1521900E+00, &
     & 0.1806942E+00, 0.1935900E+00, 0.2083621E+00, 0.2307080E+00, &
     & 0.2583484E+00, 0.2855448E+00, 0.3282144E+00, 0.3946576E+00, &
     & 0.4719479E+00, 0.5910825E+00, 0.7691560E+00, 0.7691560E+00 /
      data (ref_adm( 7,iz, 9,17),iz = 1,20) / &
     & 0.1282800E+00, 0.1282800E+00, 0.1484800E+00, 0.1596800E+00, &
     & 0.1497688E+00, 0.1543700E+00, 0.1792000E+00, 0.1692661E+00, &
     & 0.1793688E+00, 0.1659400E+00, 0.2105600E+00, 0.2581300E+00, &
     & 0.2543508E+00, 0.2798513E+00, 0.3186633E+00, 0.3770360E+00, &
     & 0.4539339E+00, 0.5721153E+00, 0.7056962E+00, 0.7056962E+00 /
      data (ref_adm( 7,iz,10,17),iz = 1,20) / &
     & 0.1088900E+00, 0.1088900E+00, 0.1084300E+00, 0.1617200E+00, &
     & 0.1496346E+00, 0.1431400E+00, 0.1550900E+00, 0.1682529E+00, &
     & 0.1781618E+00, 0.1899768E+00, 0.2043301E+00, 0.2516600E+00, &
     & 0.2400400E+00, 0.2748110E+00, 0.3108674E+00, 0.3639008E+00, &
     & 0.3726400E+00, 0.5401747E+00, 0.6770937E+00, 0.6770937E+00 /
      data (ref_adm( 7,iz,11,17),iz = 1,20) / &
     & 0.1445839E+00, 0.1445839E+00, 0.1449167E+00, 0.1276500E+00, &
     & 0.1504100E+00, 0.1107600E+00, 0.1596913E+00, 0.1672623E+00, &
     & 0.1908500E+00, 0.2061500E+00, 0.2019184E+00, 0.2227371E+00, &
     & 0.2579900E+00, 0.2700824E+00, 0.3038470E+00, 0.3532233E+00, &
     & 0.4121073E+00, 0.5064172E+00, 0.6192058E+00, 0.6192058E+00 /
      data (ref_adm( 7,iz,12,17),iz = 1,20) / &
     & 0.1559800E+00, 0.1559800E+00, 0.1331200E+00, 0.1488700E+00, &
     & 0.1494427E+00, 0.1536867E+00, 0.1332800E+00, 0.1663666E+00, &
     & 0.1895300E+00, 0.2503900E+00, 0.1994892E+00, 0.2107200E+00, &
     & 0.2435190E+00, 0.2656862E+00, 0.2746100E+00, 0.3442061E+00, &
     & 0.3993848E+00, 0.4837024E+00, 0.5800491E+00, 0.5800491E+00 /
      data (ref_adm( 7,iz,13,17),iz = 1,20) / &
     & 0.1266200E+00, 0.1266200E+00, 0.1518400E+00, 0.1488000E+00, &
     & 0.1435300E+00, 0.1306000E+00, 0.1589113E+00, 0.1850900E+00, &
     & 0.1788000E+00, 0.1847805E+00, 0.2207800E+00, 0.1892600E+00, &
     & 0.2395441E+00, 0.2614980E+00, 0.2928592E+00, 0.3370355E+00, &
     & 0.3889869E+00, 0.4670013E+00, 0.5525426E+00, 0.5525426E+00 /
      data (ref_adm( 7,iz,14,17),iz = 1,20) / &
     & 0.1471600E+00, 0.1471600E+00, 0.1358600E+00, 0.1438300E+00, &
     & 0.1437300E+00, 0.1474300E+00, 0.1351300E+00, 0.1745200E+00, &
     & 0.1410400E+00, 0.1832169E+00, 0.1952506E+00, 0.1750300E+00, &
     & 0.2355011E+00, 0.2113400E+00, 0.2369200E+00, 0.3302698E+00, &
     & 0.3804972E+00, 0.4549524E+00, 0.5328686E+00, 0.5328686E+00 /
      data (ref_adm( 7,iz,15,17),iz = 1,20) / &
     & 0.1426800E+00, 0.1426800E+00, 0.1513400E+00, 0.1486900E+00, &
     & 0.1438600E+00, 0.1426400E+00, 0.1488900E+00, 0.1429900E+00, &
     & 0.1572000E+00, 0.1954700E+00, 0.1854900E+00, 0.2127300E+00, &
     & 0.2413500E+00, 0.2341300E+00, 0.2813546E+00, 0.3230203E+00, &
     & 0.3720060E+00, 0.4443843E+00, 0.5167355E+00, 0.5167355E+00 /
      data (ref_adm( 7,iz,16,17),iz = 1,20) / &
     & 0.1364000E+00, 0.1364000E+00, 0.1273900E+00, 0.1448400E+00, &
     & 0.1398300E+00, 0.1353600E+00, 0.1436600E+00, 0.1589400E+00, &
     & 0.1737300E+00, 0.1645100E+00, 0.1891200E+00, 0.1952200E+00, &
     & 0.2232400E+00, 0.2425900E+00, 0.2764437E+00, 0.3161816E+00, &
     & 0.3625045E+00, 0.4319117E+00, 0.5008126E+00, 0.5008126E+00 /
      data (ref_adm( 7,iz,17,17),iz = 1,20) / &
     & 0.1448383E+00, 0.1448383E+00, 0.1454905E+00, 0.1659000E+00, &
     & 0.1620900E+00, 0.1526500E+00, 0.1746100E+00, 0.1446700E+00, &
     & 0.1716598E+00, 0.1806133E+00, 0.1912770E+00, 0.1597600E+00, &
     & 0.2267977E+00, 0.2171900E+00, 0.2721601E+00, 0.3102851E+00, &
     & 0.3548225E+00, 0.4204215E+00, 0.4833304E+00, 0.4833304E+00 /
      data (ref_adm( 7,iz,18,17),iz = 1,20) / &
     & 0.1308500E+00, 0.1308500E+00, 0.1433659E+00, 0.1257300E+00, &
     & 0.1459526E+00, 0.1449300E+00, 0.1516951E+00, 0.1651000E+00, &
     & 0.1632100E+00, 0.1853100E+00, 0.1748978E+00, 0.1575800E+00, &
     & 0.1997407E+00, 0.1903500E+00, 0.2301625E+00, 0.2544324E+00, &
     & 0.2813099E+00, 0.3176338E+00, 0.3438010E+00, 0.3438010E+00 /
      data (ref_adm( 7,iz,19,17),iz = 1,20) / &
     & 0.1429100E+00, 0.1429100E+00, 0.1437811E+00, 0.1608100E+00, &
     & 0.1570000E+00, 0.1429400E+00, 0.1527653E+00, 0.1469300E+00, &
     & 0.1622347E+00, 0.1757400E+00, 0.1758652E+00, 0.1869639E+00, &
     & 0.2001565E+00, 0.2124237E+00, 0.2297393E+00, 0.2532287E+00, &
     & 0.2792936E+00, 0.3134968E+00, 0.3367274E+00, 0.3367274E+00 /
      data (ref_adm( 7,iz,20,17),iz = 1,20) / &
     & 0.1435500E+00, 0.1435500E+00, 0.1442497E+00, 0.1450500E+00, &
     & 0.1618300E+00, 0.1394800E+00, 0.1540388E+00, 0.1383500E+00, &
     & 0.1636129E+00, 0.1699136E+00, 0.1555100E+00, 0.1882723E+00, &
     & 0.2011600E+00, 0.2131283E+00, 0.2301204E+00, 0.2529992E+00, &
     & 0.2781457E+00, 0.3110635E+00, 0.3326302E+00, 0.3326302E+00 /
      data (ref_adm( 7,iz,21,17),iz = 1,20) / &
     & 0.1318500E+00, 0.1318500E+00, 0.1462900E+00, 0.1618800E+00, &
     & 0.1391100E+00, 0.1148600E+00, 0.1409900E+00, 0.1473900E+00, &
     & 0.1653476E+00, 0.1716507E+00, 0.1511200E+00, 0.1828000E+00, &
     & 0.1997500E+00, 0.2169600E+00, 0.2310646E+00, 0.2535168E+00, &
     & 0.2779905E+00, 0.3093230E+00, 0.3301047E+00, 0.3301047E+00 /
      data (ref_adm( 7,iz,22,17),iz = 1,20) / &
     & 0.1615500E+00, 0.1615500E+00, 0.1445227E+00, 0.1466268E+00, &
     & 0.1497824E+00, 0.1523300E+00, 0.1590400E+00, 0.1659731E+00, &
     & 0.1739075E+00, 0.1650500E+00, 0.2175200E+00, 0.2112500E+00, &
     & 0.2293200E+00, 0.2376900E+00, 0.2792072E+00, 0.3195924E+00, &
     & 0.3675362E+00, 0.4385356E+00, 0.5216327E+00, 0.5216327E+00 /
      data (ref_adm( 7,iz,23,17),iz = 1,20) / &
     & 0.1462500E+00, 0.1462500E+00, 0.1467500E+00, 0.1511800E+00, &
     & 0.1498900E+00, 0.1637700E+00, 0.1724100E+00, 0.1706900E+00, &
     & 0.1749041E+00, 0.1786300E+00, 0.1809000E+00, 0.2130268E+00, &
     & 0.2334361E+00, 0.2528195E+00, 0.2811143E+00, 0.3214356E+00, &
     & 0.3690015E+00, 0.4385950E+00, 0.5226344E+00, 0.5226344E+00 /
      data (ref_adm( 7,iz,24,17),iz = 1,20) / &
     & 0.1169000E+00, 0.1169000E+00, 0.1427800E+00, 0.1362200E+00, &
     & 0.1570600E+00, 0.1391200E+00, 0.1471700E+00, 0.1650600E+00, &
     & 0.1755900E+00, 0.1793700E+00, 0.1941000E+00, 0.2002500E+00, &
     & 0.2232500E+00, 0.2406700E+00, 0.2841961E+00, 0.3247458E+00, &
     & 0.3724077E+00, 0.4420913E+00, 0.5287471E+00, 0.5287471E+00 /
      data (ref_adm( 7,iz,25,17),iz = 1,20) / &
     & 0.1378500E+00, 0.1378500E+00, 0.1364900E+00, 0.1475184E+00, &
     & 0.1299300E+00, 0.1272000E+00, 0.1423100E+00, 0.1536200E+00, &
     & 0.1535600E+00, 0.1645500E+00, 0.2002480E+00, 0.2272400E+00, &
     & 0.1908800E+00, 0.2554800E+00, 0.3191000E+00, 0.3298879E+00, &
     & 0.3780671E+00, 0.4477695E+00, 0.5378090E+00, 0.5378090E+00 /
      data (ref_adm( 7,iz,26,17),iz = 1,20) / &
     & 0.1433600E+00, 0.1433600E+00, 0.1220800E+00, 0.1383100E+00, &
     & 0.1445600E+00, 0.1566891E+00, 0.1630667E+00, 0.1707720E+00, &
     & 0.1777900E+00, 0.1663300E+00, 0.2258000E+00, 0.2222377E+00, &
     & 0.2443615E+00, 0.2651568E+00, 0.2951595E+00, 0.3373837E+00, &
     & 0.3865908E+00, 0.4577650E+00, 0.5534323E+00, 0.5534323E+00 /
      data (ref_adm( 7,iz,27,17),iz = 1,20) / &
     & 0.1079700E+00, 0.1079700E+00, 0.1452437E+00, 0.1481538E+00, &
     & 0.1556300E+00, 0.1426400E+00, 0.1661900E+00, 0.1572000E+00, &
     & 0.1823872E+00, 0.1938177E+00, 0.2071348E+00, 0.2266146E+00, &
     & 0.2495803E+00, 0.2710636E+00, 0.3022532E+00, 0.3457471E+00, &
     & 0.3967501E+00, 0.4703495E+00, 0.5733767E+00, 0.5733767E+00 /
      data (ref_adm( 7,iz,28,17),iz = 1,20) / &
     & 0.1606700E+00, 0.1606700E+00, 0.1454391E+00, 0.1484166E+00, &
     & 0.1527325E+00, 0.1381200E+00, 0.1424400E+00, 0.1545200E+00, &
     & 0.1808200E+00, 0.1969355E+00, 0.2107230E+00, 0.2313956E+00, &
     & 0.2556035E+00, 0.2875900E+00, 0.3389500E+00, 0.3558994E+00, &
     & 0.4086316E+00, 0.4847265E+00, 0.5945826E+00, 0.5945826E+00 /
      data (ref_adm( 7,iz,29,17),iz = 1,20) / &
     & 0.1237500E+00, 0.1237500E+00, 0.1455647E+00, 0.1486918E+00, &
     & 0.1680800E+00, 0.1595885E+00, 0.1539900E+00, 0.1748000E+00, &
     & 0.1646400E+00, 0.1901500E+00, 0.2149309E+00, 0.2368058E+00, &
     & 0.2853500E+00, 0.2857471E+00, 0.3196487E+00, 0.3670935E+00, &
     & 0.4220020E+00, 0.5016224E+00, 0.6194930E+00, 0.6194930E+00 /
      data (ref_adm( 7,iz,30,17),iz = 1,20) / &
     & 0.1434900E+00, 0.1434900E+00, 0.1486800E+00, 0.1593700E+00, &
     & 0.1539983E+00, 0.1965100E+00, 0.1597500E+00, 0.1791500E+00, &
     & 0.1794700E+00, 0.2036560E+00, 0.2192581E+00, 0.2422564E+00, &
     & 0.2693769E+00, 0.2941799E+00, 0.3298985E+00, 0.3796838E+00, &
     & 0.4373367E+00, 0.5207232E+00, 0.6460048E+00, 0.6460048E+00 /
      data (ref_adm( 7,iz,31,17),iz = 1,20) / &
     & 0.1248500E+00, 0.1248500E+00, 0.1128400E+00, 0.1493355E+00, &
     & 0.1295000E+00, 0.1615334E+00, 0.1702923E+00, 0.1820000E+00, &
     & 0.1850100E+00, 0.2069420E+00, 0.2235741E+00, 0.2480963E+00, &
     & 0.2764956E+00, 0.3025624E+00, 0.3401933E+00, 0.3919897E+00, &
     & 0.4523724E+00, 0.5404762E+00, 0.6741624E+00, 0.6741624E+00 /
      data (ref_adm( 7,iz,32,17),iz = 1,20) / &
     & 0.1456300E+00, 0.1456300E+00, 0.1150400E+00, 0.1344400E+00, &
     & 0.1551097E+00, 0.1625403E+00, 0.1715258E+00, 0.1823395E+00, &
     & 0.1951744E+00, 0.2313200E+00, 0.2278952E+00, 0.2535633E+00, &
     & 0.2833804E+00, 0.3108207E+00, 0.3499935E+00, 0.4040311E+00, &
     & 0.4671540E+00, 0.5599363E+00, 0.7005692E+00, 0.7005692E+00 /
      data (ref_adm( 7,iz,33,17),iz = 1,20) / &
     & 0.1400500E+00, 0.1400500E+00, 0.1730800E+00, 0.1498791E+00, &
     & 0.1556635E+00, 0.1376900E+00, 0.1756000E+00, 0.1841055E+00, &
     & 0.2390600E+00, 0.2133929E+00, 0.2317568E+00, 0.2414200E+00, &
     & 0.2896566E+00, 0.3172877E+00, 0.3561423E+00, 0.4103104E+00, &
     & 0.4748759E+00, 0.5725158E+00, 0.7251596E+00, 0.7251596E+00 /
      data (ref_adm( 7,iz,34,17),iz = 1,20) / &
     & 0.1320400E+00, 0.1320400E+00, 0.1473300E+00, 0.1586600E+00, &
     & 0.1718800E+00, 0.1772600E+00, 0.2004800E+00, 0.2085500E+00, &
     & 0.2324400E+00, 0.2401600E+00, 0.2774600E+00, 0.3083700E+00, &
     & 0.3419800E+00, 0.3198303E+00, 0.3580463E+00, 0.4123146E+00, &
     & 0.4765718E+00, 0.5737099E+00, 0.7339855E+00, 0.7339855E+00 /
      data (ref_adm( 7,iz,35,17),iz = 1,20) / &
     & 0.1435116E+00, 0.1435116E+00, 0.1509900E+00, 0.1502736E+00, &
     & 0.1670700E+00, 0.1645851E+00, 0.1744340E+00, 0.1865732E+00, &
     & 0.2011613E+00, 0.2182099E+00, 0.2578400E+00, 0.2657070E+00, &
     & 0.2947822E+00, 0.3213109E+00, 0.3606764E+00, 0.5183100E+00, &
     & 0.4815440E+00, 0.5754321E+00, 0.7348526E+00, 0.7348526E+00 /
      data (ref_adm( 7,iz,36,17),iz = 1,20) / &
     & 0.1435511E+00, 0.1435511E+00, 0.1462512E+00, 0.1682300E+00, &
     & 0.1892600E+00, 0.1726900E+00, 0.1749571E+00, 0.2192300E+00, &
     & 0.2022553E+00, 0.2490600E+00, 0.2671200E+00, 0.3193800E+00, &
     & 0.2955666E+00, 0.3230411E+00, 0.3648229E+00, 0.4237467E+00, &
     & 0.4898243E+00, 0.5820789E+00, 0.7373322E+00, 0.7373322E+00 /
      data (ref_adm( 7,iz,37,17),iz = 1,20) / &
     & 0.1435436E+00, 0.1435436E+00, 0.1669500E+00, 0.1504704E+00, &
     & 0.1606400E+00, 0.1651002E+00, 0.1753611E+00, 0.1878358E+00, &
     & 0.2028788E+00, 0.2204148E+00, 0.2407281E+00, 0.2891900E+00, &
     & 0.2962435E+00, 0.3245046E+00, 0.3679951E+00, 0.4391295E+00, &
     & 0.5098231E+00, 0.5885653E+00, 0.7403285E+00, 0.7403285E+00 /
      data (ref_adm( 7,iz,38,17),iz = 1,20) / &
     & 0.1435436E+00, 0.1435436E+00, 0.1669500E+00, 0.1504704E+00, &
     & 0.1606400E+00, 0.1651002E+00, 0.1753611E+00, 0.1878358E+00, &
     & 0.2028788E+00, 0.2204148E+00, 0.2407281E+00, 0.2891900E+00, &
     & 0.2962435E+00, 0.3245046E+00, 0.3679951E+00, 0.4391295E+00, &
     & 0.5098231E+00, 0.5885653E+00, 0.7403285E+00, 0.7403285E+00 /
! Solar Zenith Angle 85.0 Albedo  0.3487329E+00
      data (ref_adm( 7,iz, 1,18),iz = 1,20) / &
     & 0.5547351E+00, 0.5547351E+00, 0.5448081E+00, 0.5413693E+00, &
     & 0.5386512E+00, 0.5367921E+00, 0.5335155E+00, 0.5279334E+00, &
     & 0.5207633E+00, 0.5121778E+00, 0.5028399E+00, 0.4898757E+00, &
     & 0.4747439E+00, 0.4604948E+00, 0.4400322E+00, 0.4130853E+00, &
     & 0.3852848E+00, 0.3489106E+00, 0.2846841E+00, 0.2846841E+00 /
      data (ref_adm( 7,iz, 2,18),iz = 1,20) / &
     & 0.5547351E+00, 0.5547351E+00, 0.5448081E+00, 0.5413693E+00, &
     & 0.5386512E+00, 0.5367921E+00, 0.5335155E+00, 0.5279334E+00, &
     & 0.5207633E+00, 0.5121778E+00, 0.5028399E+00, 0.4898757E+00, &
     & 0.4747439E+00, 0.4604948E+00, 0.4400322E+00, 0.4130853E+00, &
     & 0.3852848E+00, 0.3489106E+00, 0.2846841E+00, 0.2846841E+00 /
      data (ref_adm( 7,iz, 3,18),iz = 1,20) / &
     & 0.5547351E+00, 0.5547351E+00, 0.5448081E+00, 0.5413693E+00, &
     & 0.5386512E+00, 0.5367921E+00, 0.5335155E+00, 0.5279332E+00, &
     & 0.5207633E+00, 0.5121778E+00, 0.5028398E+00, 0.4898757E+00, &
     & 0.4747439E+00, 0.4604948E+00, 0.4400322E+00, 0.4130853E+00, &
     & 0.3852848E+00, 0.3489106E+00, 0.2846841E+00, 0.2846841E+00 /
      data (ref_adm( 7,iz, 4,18),iz = 1,20) / &
     & 0.5547351E+00, 0.5547351E+00, 0.5448081E+00, 0.5413693E+00, &
     & 0.5386512E+00, 0.5367921E+00, 0.5335155E+00, 0.5279334E+00, &
     & 0.5207633E+00, 0.5121778E+00, 0.5028399E+00, 0.4898757E+00, &
     & 0.4747439E+00, 0.4604948E+00, 0.4400322E+00, 0.4130853E+00, &
     & 0.3852848E+00, 0.3489106E+00, 0.2846841E+00, 0.2846841E+00 /
      data (ref_adm( 7,iz, 5,18),iz = 1,20) / &
     & 0.5547351E+00, 0.5547351E+00, 0.5448081E+00, 0.5413693E+00, &
     & 0.5386512E+00, 0.5367921E+00, 0.5335155E+00, 0.6642100E+00, &
     & 0.7290800E+00, 0.8753600E+00, 0.9726700E+00, 0.4898757E+00, &
     & 0.4747439E+00, 0.4604948E+00, 0.4400322E+00, 0.4130853E+00, &
     & 0.3852848E+00, 0.3489106E+00, 0.2846841E+00, 0.2846841E+00 /
      data (ref_adm( 7,iz, 6,18),iz = 1,20) / &
     & 0.5547351E+00, 0.5547351E+00, 0.5448081E+00, 0.5413693E+00, &
     & 0.5386512E+00, 0.5367921E+00, 0.5335155E+00, 0.5279334E+00, &
     & 0.5207633E+00, 0.5121778E+00, 0.5028399E+00, 0.4898757E+00, &
     & 0.4747439E+00, 0.4604948E+00, 0.4400322E+00, 0.4130853E+00, &
     & 0.3852848E+00, 0.3489106E+00, 0.2846841E+00, 0.2846841E+00 /
      data (ref_adm( 7,iz, 7,18),iz = 1,20) / &
     & 0.5547351E+00, 0.5547351E+00, 0.5448081E+00, 0.5413693E+00, &
     & 0.5386512E+00, 0.5367921E+00, 0.5335155E+00, 0.5279332E+00, &
     & 0.5207633E+00, 0.5121778E+00, 0.5028398E+00, 0.4898757E+00, &
     & 0.4747439E+00, 0.4604948E+00, 0.4400322E+00, 0.4130853E+00, &
     & 0.3852848E+00, 0.3489106E+00, 0.2846841E+00, 0.2846841E+00 /
      data (ref_adm( 7,iz, 8,18),iz = 1,20) / &
     & 0.5547351E+00, 0.5547351E+00, 0.5448081E+00, 0.5413693E+00, &
     & 0.5386512E+00, 0.5367921E+00, 0.5335155E+00, 0.5279334E+00, &
     & 0.5207633E+00, 0.5121778E+00, 0.5028399E+00, 0.4898757E+00, &
     & 0.4747439E+00, 0.4604948E+00, 0.4400322E+00, 0.4130853E+00, &
     & 0.3852848E+00, 0.3489106E+00, 0.2846841E+00, 0.2846841E+00 /
      data (ref_adm( 7,iz, 9,18),iz = 1,20) / &
     & 0.5547351E+00, 0.5547351E+00, 0.5448081E+00, 0.5413693E+00, &
     & 0.5386512E+00, 0.5367921E+00, 0.5335155E+00, 0.5279332E+00, &
     & 0.5207633E+00, 0.5121778E+00, 0.5028398E+00, 0.4898757E+00, &
     & 0.4747439E+00, 0.4604948E+00, 0.4400322E+00, 0.4130853E+00, &
     & 0.3852848E+00, 0.3489106E+00, 0.2846841E+00, 0.2846841E+00 /
      data (ref_adm( 7,iz,10,18),iz = 1,20) / &
     & 0.5547351E+00, 0.5547351E+00, 0.5448081E+00, 0.5413693E+00, &
     & 0.5386512E+00, 0.5367921E+00, 0.5335155E+00, 0.5279334E+00, &
     & 0.5207633E+00, 0.5121778E+00, 0.5028399E+00, 0.4898757E+00, &
     & 0.4747439E+00, 0.4604948E+00, 0.4400322E+00, 0.4130853E+00, &
     & 0.3852848E+00, 0.3489106E+00, 0.2846841E+00, 0.2846841E+00 /
      data (ref_adm( 7,iz,11,18),iz = 1,20) / &
     & 0.5547351E+00, 0.5547351E+00, 0.5448081E+00, 0.5413693E+00, &
     & 0.5386512E+00, 0.5367921E+00, 0.5335155E+00, 0.5279332E+00, &
     & 0.5207633E+00, 0.5121778E+00, 0.5028398E+00, 0.4898757E+00, &
     & 0.4747439E+00, 0.4604948E+00, 0.4400322E+00, 0.4130853E+00, &
     & 0.3852848E+00, 0.3489106E+00, 0.2846841E+00, 0.2846841E+00 /
      data (ref_adm( 7,iz,12,18),iz = 1,20) / &
     & 0.5547351E+00, 0.5547351E+00, 0.5448081E+00, 0.5413693E+00, &
     & 0.5386512E+00, 0.5367921E+00, 0.5335155E+00, 0.5279334E+00, &
     & 0.5207633E+00, 0.5121778E+00, 0.5028399E+00, 0.4898757E+00, &
     & 0.4747439E+00, 0.4604948E+00, 0.4400322E+00, 0.4130853E+00, &
     & 0.3852848E+00, 0.3489106E+00, 0.2846841E+00, 0.2846841E+00 /
      data (ref_adm( 7,iz,13,18),iz = 1,20) / &
     & 0.5547351E+00, 0.5547351E+00, 0.5448081E+00, 0.5413693E+00, &
     & 0.5386512E+00, 0.5367921E+00, 0.5335155E+00, 0.5279332E+00, &
     & 0.5207633E+00, 0.5121778E+00, 0.5028398E+00, 0.4898757E+00, &
     & 0.4747439E+00, 0.4604948E+00, 0.4400322E+00, 0.4130853E+00, &
     & 0.3852848E+00, 0.3489106E+00, 0.2846841E+00, 0.2846841E+00 /
      data (ref_adm( 7,iz,14,18),iz = 1,20) / &
     & 0.5547351E+00, 0.5547351E+00, 0.5448081E+00, 0.5413693E+00, &
     & 0.5386512E+00, 0.5367921E+00, 0.5335155E+00, 0.5279334E+00, &
     & 0.5207633E+00, 0.5121778E+00, 0.5028399E+00, 0.4898757E+00, &
     & 0.4747439E+00, 0.4604948E+00, 0.4400322E+00, 0.4130853E+00, &
     & 0.3852848E+00, 0.3489106E+00, 0.2846841E+00, 0.2846841E+00 /
      data (ref_adm( 7,iz,15,18),iz = 1,20) / &
     & 0.5547351E+00, 0.5547351E+00, 0.2068000E+00, 0.5413693E+00, &
     & 0.5386512E+00, 0.5367921E+00, 0.2353600E+00, 0.2056500E+00, &
     & 0.5207633E+00, 0.5121778E+00, 0.2454500E+00, 0.4898757E+00, &
     & 0.4747439E+00, 0.4604948E+00, 0.4400322E+00, 0.4130853E+00, &
     & 0.3852848E+00, 0.3489106E+00, 0.2846841E+00, 0.2846841E+00 /
      data (ref_adm( 7,iz,16,18),iz = 1,20) / &
     & 0.5547351E+00, 0.5547351E+00, 0.5448081E+00, 0.5413693E+00, &
     & 0.5386512E+00, 0.5367921E+00, 0.5335155E+00, 0.5279334E+00, &
     & 0.5207633E+00, 0.5121778E+00, 0.5028399E+00, 0.4898757E+00, &
     & 0.4747439E+00, 0.4604948E+00, 0.4400322E+00, 0.4130853E+00, &
     & 0.3852848E+00, 0.3489106E+00, 0.2846841E+00, 0.2846841E+00 /
      data (ref_adm( 7,iz,17,18),iz = 1,20) / &
     & 0.5547351E+00, 0.5547351E+00, 0.5448081E+00, 0.5413693E+00, &
     & 0.5386512E+00, 0.5367921E+00, 0.5335155E+00, 0.5279332E+00, &
     & 0.5207633E+00, 0.5121778E+00, 0.5028398E+00, 0.4898757E+00, &
     & 0.4747439E+00, 0.4604948E+00, 0.4400322E+00, 0.4130853E+00, &
     & 0.3852848E+00, 0.3489106E+00, 0.2846841E+00, 0.2846841E+00 /
      data (ref_adm( 7,iz,18,18),iz = 1,20) / &
     & 0.2057122E+00, 0.2057122E+00, 0.2068471E+00, 0.2089127E+00, &
     & 0.2121681E+00, 0.2166566E+00, 0.2223894E+00, 0.2295726E+00, &
     & 0.2383797E+00, 0.2488973E+00, 0.2615045E+00, 0.2807509E+00, &
     & 0.3039878E+00, 0.3266035E+00, 0.3598842E+00, 0.4079470E+00, &
     & 0.4660980E+00, 0.5558869E+00, 0.6564950E+00, 0.6564950E+00 /
      data (ref_adm( 7,iz,19,18),iz = 1,20) / &
     & 0.2056755E+00, 0.2056755E+00, 0.2068478E+00, 0.2089797E+00, &
     & 0.2122679E+00, 0.2166784E+00, 0.2223222E+00, 0.2292995E+00, &
     & 0.2379174E+00, 0.2482286E+00, 0.2605775E+00, 0.2795000E+00, &
     & 0.3023443E+00, 0.3241015E+00, 0.3564794E+00, 0.4027245E+00, &
     & 0.4585746E+00, 0.5437245E+00, 0.6390529E+00, 0.6390529E+00 /
      data (ref_adm( 7,iz,20,18),iz = 1,20) / &
     & 0.2057344E+00, 0.2057344E+00, 0.2069223E+00, 0.2090423E+00, &
     & 0.2123471E+00, 0.2167106E+00, 0.2224557E+00, 0.2294741E+00, &
     & 0.2379554E+00, 0.2481509E+00, 0.2603059E+00, 0.2788779E+00, &
     & 0.3012452E+00, 0.3226602E+00, 0.3542946E+00, 0.3998552E+00, &
     & 0.4541319E+00, 0.5364234E+00, 0.6287611E+00, 0.6287611E+00 /
      data (ref_adm( 7,iz,21,18),iz = 1,20) / &
     & 0.2057386E+00, 0.2057386E+00, 0.2069460E+00, 0.2092297E+00, &
     & 0.2124721E+00, 0.2169385E+00, 0.2226643E+00, 0.2295779E+00, &
     & 0.2382199E+00, 0.2483434E+00, 0.2604353E+00, 0.2789097E+00, &
     & 0.3010993E+00, 0.3222962E+00, 0.3534064E+00, 0.3979470E+00, &
     & 0.4512588E+00, 0.5311350E+00, 0.6228246E+00, 0.6228246E+00 /
      data (ref_adm( 7,iz,22,18),iz = 1,20) / &
     & 0.2483685E+00, 0.2483685E+00, 0.2439239E+00, 0.2423843E+00, &
     & 0.2411674E+00, 0.2403350E+00, 0.2388680E+00, 0.2363687E+00, &
     & 0.2331585E+00, 0.2293145E+00, 0.2251337E+00, 0.2193293E+00, &
     & 0.2125545E+00, 0.2061748E+00, 0.1970132E+00, 0.1849484E+00, &
     & 0.1725014E+00, 0.1562159E+00, 0.1274600E+00, 0.1274600E+00 /
      data (ref_adm( 7,iz,23,18),iz = 1,20) / &
     & 0.1959700E+00, 0.1959700E+00, 0.2439239E+00, 0.2423843E+00, &
     & 0.2411673E+00, 0.2403350E+00, 0.2388680E+00, 0.2363687E+00, &
     & 0.2331585E+00, 0.2293145E+00, 0.2251337E+00, 0.2193293E+00, &
     & 0.2125545E+00, 0.2061748E+00, 0.1970132E+00, 0.1849484E+00, &
     & 0.1725014E+00, 0.1562159E+00, 0.1274600E+00, 0.1274600E+00 /
      data (ref_adm( 7,iz,24,18),iz = 1,20) / &
     & 0.2483685E+00, 0.2483685E+00, 0.2439239E+00, 0.2423843E+00, &
     & 0.1961900E+00, 0.2403350E+00, 0.2388680E+00, 0.2363687E+00, &
     & 0.2331585E+00, 0.3204600E+00, 0.2251337E+00, 0.2193293E+00, &
     & 0.2125545E+00, 0.2061748E+00, 0.1970132E+00, 0.1849484E+00, &
     & 0.1725014E+00, 0.1562159E+00, 0.1274600E+00, 0.1274600E+00 /
      data (ref_adm( 7,iz,25,18),iz = 1,20) / &
     & 0.2483685E+00, 0.2483685E+00, 0.2439239E+00, 0.2423843E+00, &
     & 0.2411673E+00, 0.2403350E+00, 0.2388680E+00, 0.2363687E+00, &
     & 0.2331585E+00, 0.2293145E+00, 0.2251337E+00, 0.2193293E+00, &
     & 0.2125545E+00, 0.2061748E+00, 0.1970132E+00, 0.1849484E+00, &
     & 0.1725014E+00, 0.1562159E+00, 0.1274600E+00, 0.1274600E+00 /
      data (ref_adm( 7,iz,26,18),iz = 1,20) / &
     & 0.2483685E+00, 0.2483685E+00, 0.2439239E+00, 0.2423843E+00, &
     & 0.2411674E+00, 0.2403350E+00, 0.2388680E+00, 0.2363687E+00, &
     & 0.2331585E+00, 0.2293145E+00, 0.2251337E+00, 0.2193293E+00, &
     & 0.2125545E+00, 0.2061748E+00, 0.1970132E+00, 0.1849484E+00, &
     & 0.1725014E+00, 0.1562159E+00, 0.1274600E+00, 0.1274600E+00 /
      data (ref_adm( 7,iz,27,18),iz = 1,20) / &
     & 0.2483685E+00, 0.2483685E+00, 0.2439239E+00, 0.2423843E+00, &
     & 0.2411673E+00, 0.2403350E+00, 0.2388680E+00, 0.2363687E+00, &
     & 0.2331585E+00, 0.2293145E+00, 0.2251337E+00, 0.2193293E+00, &
     & 0.2125545E+00, 0.2061748E+00, 0.1970132E+00, 0.1849484E+00, &
     & 0.1725014E+00, 0.1562159E+00, 0.1274600E+00, 0.1274600E+00 /
      data (ref_adm( 7,iz,28,18),iz = 1,20) / &
     & 0.2483685E+00, 0.2483685E+00, 0.2439239E+00, 0.2423843E+00, &
     & 0.2411674E+00, 0.2403350E+00, 0.2388680E+00, 0.2363687E+00, &
     & 0.2331585E+00, 0.2293145E+00, 0.2251337E+00, 0.2193293E+00, &
     & 0.2125545E+00, 0.2061748E+00, 0.1970132E+00, 0.1849484E+00, &
     & 0.1725014E+00, 0.1562159E+00, 0.1274600E+00, 0.1274600E+00 /
      data (ref_adm( 7,iz,29,18),iz = 1,20) / &
     & 0.2483685E+00, 0.2483685E+00, 0.2439239E+00, 0.2423843E+00, &
     & 0.2411673E+00, 0.2403350E+00, 0.2388680E+00, 0.2363687E+00, &
     & 0.2331585E+00, 0.2293145E+00, 0.2251337E+00, 0.2193293E+00, &
     & 0.2125545E+00, 0.2061748E+00, 0.1970132E+00, 0.1849484E+00, &
     & 0.1725014E+00, 0.1562159E+00, 0.1274600E+00, 0.1274600E+00 /
      data (ref_adm( 7,iz,30,18),iz = 1,20) / &
     & 0.2483685E+00, 0.2483685E+00, 0.2439239E+00, 0.2423843E+00, &
     & 0.2411674E+00, 0.2403350E+00, 0.2388680E+00, 0.2363687E+00, &
     & 0.2331585E+00, 0.2293145E+00, 0.2251337E+00, 0.2193293E+00, &
     & 0.2125545E+00, 0.2061748E+00, 0.1970132E+00, 0.1849484E+00, &
     & 0.1725014E+00, 0.1562159E+00, 0.1274600E+00, 0.1274600E+00 /
      data (ref_adm( 7,iz,31,18),iz = 1,20) / &
     & 0.2483685E+00, 0.2483685E+00, 0.2439239E+00, 0.2423843E+00, &
     & 0.2411673E+00, 0.2403350E+00, 0.2388680E+00, 0.2363687E+00, &
     & 0.2331585E+00, 0.2293145E+00, 0.2251337E+00, 0.2193293E+00, &
     & 0.2125545E+00, 0.2061748E+00, 0.1970132E+00, 0.1849484E+00, &
     & 0.1725014E+00, 0.1562159E+00, 0.1274600E+00, 0.1274600E+00 /
      data (ref_adm( 7,iz,32,18),iz = 1,20) / &
     & 0.2483685E+00, 0.2483685E+00, 0.2439239E+00, 0.2423843E+00, &
     & 0.2411674E+00, 0.2403350E+00, 0.2388680E+00, 0.2363687E+00, &
     & 0.2331585E+00, 0.2293145E+00, 0.2251337E+00, 0.2193293E+00, &
     & 0.2125545E+00, 0.2061748E+00, 0.1970132E+00, 0.1849484E+00, &
     & 0.1725014E+00, 0.1562159E+00, 0.1274600E+00, 0.1274600E+00 /
      data (ref_adm( 7,iz,33,18),iz = 1,20) / &
     & 0.2483685E+00, 0.2483685E+00, 0.2439239E+00, 0.2423843E+00, &
     & 0.2411673E+00, 0.2403350E+00, 0.2388680E+00, 0.2363687E+00, &
     & 0.2331585E+00, 0.2293145E+00, 0.2251337E+00, 0.2193293E+00, &
     & 0.2125545E+00, 0.2061748E+00, 0.1970132E+00, 0.1849484E+00, &
     & 0.1725014E+00, 0.1562159E+00, 0.1274600E+00, 0.1274600E+00 /
      data (ref_adm( 7,iz,34,18),iz = 1,20) / &
     & 0.2483685E+00, 0.2483685E+00, 0.2439239E+00, 0.2423843E+00, &
     & 0.2411674E+00, 0.2403350E+00, 0.2388680E+00, 0.2363687E+00, &
     & 0.2331585E+00, 0.2293145E+00, 0.2251337E+00, 0.2193293E+00, &
     & 0.2125545E+00, 0.2061748E+00, 0.1970132E+00, 0.1849484E+00, &
     & 0.1725014E+00, 0.1562159E+00, 0.1274600E+00, 0.1274600E+00 /
      data (ref_adm( 7,iz,35,18),iz = 1,20) / &
     & 0.2483685E+00, 0.2483685E+00, 0.2439239E+00, 0.2423843E+00, &
     & 0.2411673E+00, 0.2403350E+00, 0.2388680E+00, 0.2363687E+00, &
     & 0.2331585E+00, 0.2293145E+00, 0.2251337E+00, 0.2193293E+00, &
     & 0.2125545E+00, 0.2061748E+00, 0.1970132E+00, 0.1849484E+00, &
     & 0.1725014E+00, 0.1562159E+00, 0.1274600E+00, 0.1274600E+00 /
      data (ref_adm( 7,iz,36,18),iz = 1,20) / &
     & 0.2483685E+00, 0.2483685E+00, 0.2439239E+00, 0.2423843E+00, &
     & 0.2411674E+00, 0.2403350E+00, 0.2388680E+00, 0.2363687E+00, &
     & 0.2331585E+00, 0.2293145E+00, 0.2251337E+00, 0.2193293E+00, &
     & 0.2125545E+00, 0.2061748E+00, 0.1970132E+00, 0.1849484E+00, &
     & 0.1725014E+00, 0.1562159E+00, 0.1274600E+00, 0.1274600E+00 /
      data (ref_adm( 7,iz,37,18),iz = 1,20) / &
     & 0.2483685E+00, 0.2483685E+00, 0.2439239E+00, 0.2423843E+00, &
     & 0.2411674E+00, 0.2403350E+00, 0.2388680E+00, 0.2363687E+00, &
     & 0.2331585E+00, 0.2293145E+00, 0.2251337E+00, 0.2193293E+00, &
     & 0.2125545E+00, 0.2061748E+00, 0.1970132E+00, 0.1849484E+00, &
     & 0.1725014E+00, 0.1562159E+00, 0.1274600E+00, 0.1274600E+00 /
      data (ref_adm( 7,iz,38,18),iz = 1,20) / &
     & 0.2483685E+00, 0.2483685E+00, 0.2439239E+00, 0.2423843E+00, &
     & 0.2411674E+00, 0.2403350E+00, 0.2388680E+00, 0.2363687E+00, &
     & 0.2331585E+00, 0.2293145E+00, 0.2251337E+00, 0.2193293E+00, &
     & 0.2125545E+00, 0.2061748E+00, 0.1970132E+00, 0.1849484E+00, &
     & 0.1725014E+00, 0.1562159E+00, 0.1274600E+00, 0.1274600E+00 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm( 8,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm( 8,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9962023E+04
      data (ref_adm( 8,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04, 0.3686700E+00,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04, 0.3869900E+00,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9975218E+04
      data (ref_adm( 8,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04, 0.4227000E+00,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.1102156E+04
      data (ref_adm( 8,iz, 1, 5),iz = 1,20) / &
     & 0.3981702E+00, 0.3981702E+00, 0.3910449E+00, 0.3885767E+00, &
     & 0.2870300E+00, 0.3852913E+00, 0.3829395E+00, 0.3789328E+00, &
     & 0.3737864E+00, 0.3676240E+00, 0.3609215E+00, 0.3516163E+00, &
     & 0.3407552E+00, 0.3305277E+00, 0.3158404E+00, 0.2964987E+00, &
     & 0.2765445E+00, 0.2504364E+00, 0.2043366E+00, 0.2043366E+00 /
      data (ref_adm( 8,iz, 2, 5),iz = 1,20) / &
     & 0.3981702E+00, 0.3981702E+00, 0.3910449E+00, 0.3885767E+00, &
     & 0.2870300E+00, 0.3852913E+00, 0.3829395E+00, 0.3789328E+00, &
     & 0.3737864E+00, 0.3676240E+00, 0.3609215E+00, 0.3516163E+00, &
     & 0.3407552E+00, 0.3305277E+00, 0.3158404E+00, 0.2964987E+00, &
     & 0.2765445E+00, 0.2504364E+00, 0.2043366E+00, 0.2043366E+00 /
      data (ref_adm( 8,iz, 3, 5),iz = 1,20) / &
     & 0.3981702E+00, 0.3981702E+00, 0.3910449E+00, 0.3885767E+00, &
     & 0.3866257E+00, 0.3852913E+00, 0.3829395E+00, 0.3789327E+00, &
     & 0.3737864E+00, 0.3676240E+00, 0.3609215E+00, 0.3516163E+00, &
     & 0.3407552E+00, 0.3305277E+00, 0.3158404E+00, 0.2964987E+00, &
     & 0.2765445E+00, 0.2504364E+00, 0.2043366E+00, 0.2043366E+00 /
      data (ref_adm( 8,iz, 4, 5),iz = 1,20) / &
     & 0.3981702E+00, 0.3981702E+00, 0.3910449E+00, 0.3885767E+00, &
     & 0.3866257E+00, 0.3852913E+00, 0.3829395E+00, 0.2290600E+00, &
     & 0.3737864E+00, 0.3676240E+00, 0.3609215E+00, 0.3516163E+00, &
     & 0.3407552E+00, 0.3305277E+00, 0.3158404E+00, 0.2964987E+00, &
     & 0.2765445E+00, 0.2504364E+00, 0.2043366E+00, 0.2043366E+00 /
      data (ref_adm( 8,iz, 5, 5),iz = 1,20) / &
     & 0.3981702E+00, 0.3981702E+00, 0.3910449E+00, 0.3885767E+00, &
     & 0.3866257E+00, 0.3852913E+00, 0.3829395E+00, 0.3789327E+00, &
     & 0.3737864E+00, 0.3676240E+00, 0.3609215E+00, 0.3516163E+00, &
     & 0.3407552E+00, 0.3305277E+00, 0.3158404E+00, 0.2964987E+00, &
     & 0.2765445E+00, 0.2504364E+00, 0.2043366E+00, 0.2043366E+00 /
      data (ref_adm( 8,iz, 6, 5),iz = 1,20) / &
     & 0.3981702E+00, 0.3981702E+00, 0.3910449E+00, 0.3885767E+00, &
     & 0.3866257E+00, 0.3852913E+00, 0.3829395E+00, 0.3789328E+00, &
     & 0.3737864E+00, 0.3676240E+00, 0.3609215E+00, 0.3516163E+00, &
     & 0.3407552E+00, 0.3305277E+00, 0.3158404E+00, 0.2964987E+00, &
     & 0.2765445E+00, 0.2504364E+00, 0.2043366E+00, 0.2043366E+00 /
      data (ref_adm( 8,iz, 7, 5),iz = 1,20) / &
     & 0.3981702E+00, 0.3981702E+00, 0.3981400E+00, 0.3885767E+00, &
     & 0.3866257E+00, 0.3852913E+00, 0.3829395E+00, 0.3789327E+00, &
     & 0.3737864E+00, 0.3676240E+00, 0.3609215E+00, 0.3516163E+00, &
     & 0.3407552E+00, 0.3305277E+00, 0.3158404E+00, 0.2964987E+00, &
     & 0.2765445E+00, 0.2504364E+00, 0.2043366E+00, 0.2043366E+00 /
      data (ref_adm( 8,iz, 8, 5),iz = 1,20) / &
     & 0.3981702E+00, 0.3981702E+00, 0.3857200E+00, 0.3885767E+00, &
     & 0.3866257E+00, 0.3852913E+00, 0.3829395E+00, 0.3789328E+00, &
     & 0.3737864E+00, 0.3676240E+00, 0.3609215E+00, 0.3516163E+00, &
     & 0.3407552E+00, 0.3305277E+00, 0.3158404E+00, 0.2964987E+00, &
     & 0.2765445E+00, 0.2504364E+00, 0.2043366E+00, 0.2043366E+00 /
      data (ref_adm( 8,iz, 9, 5),iz = 1,20) / &
     & 0.3981702E+00, 0.3981702E+00, 0.3910449E+00, 0.4801000E+00, &
     & 0.3866257E+00, 0.3852913E+00, 0.3829395E+00, 0.4595200E+00, &
     & 0.3737864E+00, 0.3676240E+00, 0.3609215E+00, 0.3516163E+00, &
     & 0.3407552E+00, 0.3305277E+00, 0.3158404E+00, 0.2964987E+00, &
     & 0.2765445E+00, 0.2504364E+00, 0.2043366E+00, 0.2043366E+00 /
      data (ref_adm( 8,iz,10, 5),iz = 1,20) / &
     & 0.3981702E+00, 0.3981702E+00, 0.3910449E+00, 0.3885767E+00, &
     & 0.3866257E+00, 0.2578300E+00, 0.3829395E+00, 0.3789328E+00, &
     & 0.3737864E+00, 0.3676240E+00, 0.3609215E+00, 0.3516163E+00, &
     & 0.3407552E+00, 0.3305277E+00, 0.3158404E+00, 0.2964987E+00, &
     & 0.2765445E+00, 0.2504364E+00, 0.2043366E+00, 0.2043366E+00 /
      data (ref_adm( 8,iz,11, 5),iz = 1,20) / &
     & 0.3981702E+00, 0.3981702E+00, 0.3910449E+00, 0.3885767E+00, &
     & 0.3866257E+00, 0.3852913E+00, 0.3829395E+00, 0.3789327E+00, &
     & 0.3737864E+00, 0.3676240E+00, 0.4061500E+00, 0.3516163E+00, &
     & 0.4493100E+00, 0.3305277E+00, 0.3158404E+00, 0.2964987E+00, &
     & 0.2765445E+00, 0.2504364E+00, 0.2043366E+00, 0.2043366E+00 /
      data (ref_adm( 8,iz,12, 5),iz = 1,20) / &
     & 0.3981702E+00, 0.3981702E+00, 0.3910449E+00, 0.3885767E+00, &
     & 0.3866257E+00, 0.3852913E+00, 0.3829395E+00, 0.3789328E+00, &
     & 0.3737864E+00, 0.3676240E+00, 0.3609215E+00, 0.3516163E+00, &
     & 0.3407552E+00, 0.3305277E+00, 0.3158404E+00, 0.2964987E+00, &
     & 0.2765445E+00, 0.2504364E+00, 0.2043366E+00, 0.2043366E+00 /
      data (ref_adm( 8,iz,13, 5),iz = 1,20) / &
     & 0.3981702E+00, 0.3981702E+00, 0.4251900E+00, 0.3885767E+00, &
     & 0.3866257E+00, 0.3852913E+00, 0.3829395E+00, 0.3789327E+00, &
     & 0.3737864E+00, 0.3676240E+00, 0.3609215E+00, 0.3516163E+00, &
     & 0.3407552E+00, 0.3305277E+00, 0.3158404E+00, 0.2964987E+00, &
     & 0.2765445E+00, 0.2504364E+00, 0.2043366E+00, 0.2043366E+00 /
      data (ref_adm( 8,iz,14, 5),iz = 1,20) / &
     & 0.3981702E+00, 0.3981702E+00, 0.3910449E+00, 0.3885767E+00, &
     & 0.3866257E+00, 0.3852913E+00, 0.3829395E+00, 0.3789328E+00, &
     & 0.3737864E+00, 0.3676240E+00, 0.3609215E+00, 0.3516163E+00, &
     & 0.3407552E+00, 0.3305277E+00, 0.3158404E+00, 0.2964987E+00, &
     & 0.2765445E+00, 0.2504364E+00, 0.2043366E+00, 0.2043366E+00 /
      data (ref_adm( 8,iz,15, 5),iz = 1,20) / &
     & 0.3981702E+00, 0.3981702E+00, 0.3910449E+00, 0.3885767E+00, &
     & 0.3866257E+00, 0.3852913E+00, 0.3829395E+00, 0.3789327E+00, &
     & 0.3737864E+00, 0.3676240E+00, 0.3609215E+00, 0.3516163E+00, &
     & 0.3407552E+00, 0.3305277E+00, 0.3158404E+00, 0.2964987E+00, &
     & 0.2765445E+00, 0.2504364E+00, 0.2043366E+00, 0.2043366E+00 /
      data (ref_adm( 8,iz,16, 5),iz = 1,20) / &
     & 0.3981702E+00, 0.3981702E+00, 0.3910449E+00, 0.3885767E+00, &
     & 0.3866257E+00, 0.3852913E+00, 0.3829395E+00, 0.3789328E+00, &
     & 0.3737864E+00, 0.3676240E+00, 0.3609215E+00, 0.3516163E+00, &
     & 0.3407552E+00, 0.3305277E+00, 0.3158404E+00, 0.2964987E+00, &
     & 0.2765445E+00, 0.2504364E+00, 0.2043366E+00, 0.2043366E+00 /
      data (ref_adm( 8,iz,17, 5),iz = 1,20) / &
     & 0.3981702E+00, 0.3981702E+00, 0.3910449E+00, 0.3885767E+00, &
     & 0.3866257E+00, 0.3852913E+00, 0.3829395E+00, 0.3789327E+00, &
     & 0.3737864E+00, 0.3676240E+00, 0.3609215E+00, 0.3516163E+00, &
     & 0.3407552E+00, 0.3305277E+00, 0.3158404E+00, 0.2964987E+00, &
     & 0.2765445E+00, 0.2504364E+00, 0.2043366E+00, 0.2043366E+00 /
      data (ref_adm( 8,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 8,iz,22, 5),iz = 1,20) / &
     & 0.2732858E+00, 0.2732858E+00, 0.2669605E+00, 0.2657762E+00, &
     & 0.2700249E+00, 0.2788084E+00, 0.2837137E+00, 0.2822306E+00, &
     & 0.2811790E+00, 0.2817587E+00, 0.2847519E+00, 0.2910291E+00, &
     & 0.2986276E+00, 0.3052478E+00, 0.3141911E+00, 0.3217445E+00, &
     & 0.3232729E+00, 0.3119728E+00, 0.2695158E+00, 0.2695158E+00 /
      data (ref_adm( 8,iz,23, 5),iz = 1,20) / &
     & 0.2741043E+00, 0.2741043E+00, 0.2676324E+00, 0.2661216E+00, &
     & 0.2690620E+00, 0.2781398E+00, 0.2837915E+00, 0.2827912E+00, &
     & 0.2818424E+00, 0.2819676E+00, 0.2849236E+00, 0.2906134E+00, &
     & 0.2984298E+00, 0.3049469E+00, 0.3134843E+00, 0.3208475E+00, &
     & 0.3221105E+00, 0.3108368E+00, 0.2691326E+00, 0.2691326E+00 /
      data (ref_adm( 8,iz,24, 5),iz = 1,20) / &
     & 0.2750368E+00, 0.2750368E+00, 0.2684237E+00, 0.2666688E+00, &
     & 0.2686569E+00, 0.2774491E+00, 0.2839586E+00, 0.2828539E+00, &
     & 0.2827013E+00, 0.2822755E+00, 0.2851894E+00, 0.2909958E+00, &
     & 0.2982523E+00, 0.3049402E+00, 0.3129431E+00, 0.3202825E+00, &
     & 0.3215895E+00, 0.3103229E+00, 0.2687174E+00, 0.2687174E+00 /
      data (ref_adm( 8,iz,25, 5),iz = 1,20) / &
     & 0.2759742E+00, 0.2759742E+00, 0.2866400E+00, 0.2666867E+00, &
     & 0.2687193E+00, 0.2772872E+00, 0.2844597E+00, 0.2838218E+00, &
     & 0.2827688E+00, 0.2828385E+00, 0.2854493E+00, 0.2908776E+00, &
     & 0.2984212E+00, 0.3039712E+00, 0.3126021E+00, 0.3198051E+00, &
     & 0.3204949E+00, 0.3093681E+00, 0.2683684E+00, 0.2683684E+00 /
      data (ref_adm( 8,iz,26, 5),iz = 1,20) / &
     & 0.2774158E+00, 0.2774158E+00, 0.3261600E+00, 0.2666910E+00, &
     & 0.2678894E+00, 0.2762913E+00, 0.2840673E+00, 0.2842381E+00, &
     & 0.2835401E+00, 0.2835439E+00, 0.2858503E+00, 0.2909426E+00, &
     & 0.2982462E+00, 0.3041053E+00, 0.3119924E+00, 0.3192602E+00, &
     & 0.3197817E+00, 0.3087961E+00, 0.2679873E+00, 0.2679873E+00 /
      data (ref_adm( 8,iz,27, 5),iz = 1,20) / &
     & 0.2783074E+00, 0.2783074E+00, 0.2703441E+00, 0.2670830E+00, &
     & 0.2680560E+00, 0.2762911E+00, 0.2845943E+00, 0.2851505E+00, &
     & 0.2839549E+00, 0.2839362E+00, 0.2860171E+00, 0.2907356E+00, &
     & 0.2984071E+00, 0.3039672E+00, 0.3112782E+00, 0.3183464E+00, &
     & 0.3190267E+00, 0.3079751E+00, 0.2676947E+00, 0.2676947E+00 /
      data (ref_adm( 8,iz,28, 5),iz = 1,20) / &
     & 0.2796539E+00, 0.2796539E+00, 0.2715268E+00, 0.2668648E+00, &
     & 0.2679903E+00, 0.2753427E+00, 0.2841904E+00, 0.2852296E+00, &
     & 0.2845699E+00, 0.2843702E+00, 0.2862001E+00, 0.2911425E+00, &
     & 0.2983643E+00, 0.3037522E+00, 0.3112340E+00, 0.3179705E+00, &
     & 0.3184844E+00, 0.3074755E+00, 0.2673030E+00, 0.2673030E+00 /
      data (ref_adm( 8,iz,29, 5),iz = 1,20) / &
     & 0.2817164E+00, 0.2817164E+00, 0.2745337E+00, 0.2679613E+00, &
     & 0.2683831E+00, 0.2748029E+00, 0.2839902E+00, 0.2858759E+00, &
     & 0.2849352E+00, 0.2845153E+00, 0.2864516E+00, 0.2912095E+00, &
     & 0.2982593E+00, 0.3034877E+00, 0.3107077E+00, 0.3176230E+00, &
     & 0.3178818E+00, 0.3068798E+00, 0.2669933E+00, 0.2669933E+00 /
      data (ref_adm( 8,iz,30, 5),iz = 1,20) / &
     & 0.2837469E+00, 0.2837469E+00, 0.2755147E+00, 0.2679462E+00, &
     & 0.2681847E+00, 0.2743809E+00, 0.2840361E+00, 0.2862567E+00, &
     & 0.2854310E+00, 0.2851780E+00, 0.2865352E+00, 0.2911856E+00, &
     & 0.2981704E+00, 0.3035341E+00, 0.3103689E+00, 0.3172520E+00, &
     & 0.3174219E+00, 0.3063844E+00, 0.2667421E+00, 0.2667421E+00 /
      data (ref_adm( 8,iz,31, 5),iz = 1,20) / &
     & 0.2859873E+00, 0.2859873E+00, 0.2778817E+00, 0.2677730E+00, &
     & 0.2681252E+00, 0.2740732E+00, 0.2838340E+00, 0.2866101E+00, &
     & 0.2856500E+00, 0.2852226E+00, 0.2867913E+00, 0.2913225E+00, &
     & 0.2982618E+00, 0.3032348E+00, 0.3101321E+00, 0.3168134E+00, &
     & 0.3166552E+00, 0.3059515E+00, 0.2664815E+00, 0.2664815E+00 /
      data (ref_adm( 8,iz,32, 5),iz = 1,20) / &
     & 0.2879612E+00, 0.2879612E+00, 0.2810449E+00, 0.2685021E+00, &
     & 0.2678349E+00, 0.2735592E+00, 0.2836237E+00, 0.2870617E+00, &
     & 0.2858859E+00, 0.2857026E+00, 0.2869429E+00, 0.2914345E+00, &
     & 0.2983060E+00, 0.3029966E+00, 0.3099444E+00, 0.3164136E+00, &
     & 0.3162706E+00, 0.3054505E+00, 0.2662681E+00, 0.2662681E+00 /
      data (ref_adm( 8,iz,33, 5),iz = 1,20) / &
     & 0.2901520E+00, 0.2901520E+00, 0.2839749E+00, 0.2685157E+00, &
     & 0.2677601E+00, 0.2734216E+00, 0.2831483E+00, 0.2873304E+00, &
     & 0.2857862E+00, 0.2862308E+00, 0.2871264E+00, 0.2912920E+00, &
     & 0.2981696E+00, 0.3031585E+00, 0.3098231E+00, 0.3160172E+00, &
     & 0.3160852E+00, 0.3052360E+00, 0.2660975E+00, 0.2660975E+00 /
      data (ref_adm( 8,iz,34, 5),iz = 1,20) / &
     & 0.2622900E+00, 0.2622900E+00, 0.2872630E+00, 0.2690188E+00, &
     & 0.2677734E+00, 0.2730599E+00, 0.2831660E+00, 0.2875939E+00, &
     & 0.2863498E+00, 0.2864480E+00, 0.2873900E+00, 0.2916456E+00, &
     & 0.2980049E+00, 0.3031909E+00, 0.3096256E+00, 0.3156734E+00, &
     & 0.3157268E+00, 0.3048865E+00, 0.2659785E+00, 0.2659785E+00 /
      data (ref_adm( 8,iz,35, 5),iz = 1,20) / &
     & 0.2711600E+00, 0.2711600E+00, 0.2714800E+00, 0.2692358E+00, &
     & 0.2680413E+00, 0.2726879E+00, 0.2720500E+00, 0.2877598E+00, &
     & 0.2869413E+00, 0.2865193E+00, 0.2876709E+00, 0.2917027E+00, &
     & 0.2980595E+00, 0.3031050E+00, 0.3093294E+00, 0.3154119E+00, &
     & 0.3154721E+00, 0.3045576E+00, 0.2658684E+00, 0.2658684E+00 /
      data (ref_adm( 8,iz,36, 5),iz = 1,20) / &
     & 0.3076300E+00, 0.3076300E+00, 0.2920480E+00, 0.2690152E+00, &
     & 0.2681242E+00, 0.2727917E+00, 0.2830686E+00, 0.2875440E+00, &
     & 0.2865814E+00, 0.2867971E+00, 0.2875609E+00, 0.2916135E+00, &
     & 0.2981192E+00, 0.3032018E+00, 0.3095765E+00, 0.3157058E+00, &
     & 0.3154343E+00, 0.3043749E+00, 0.2657995E+00, 0.2657995E+00 /
      data (ref_adm( 8,iz,37, 5),iz = 1,20) / &
     & 0.3044624E+00, 0.3044624E+00, 0.2933085E+00, 0.2691001E+00, &
     & 0.2680375E+00, 0.2725277E+00, 0.2833307E+00, 0.2874017E+00, &
     & 0.2867153E+00, 0.2867224E+00, 0.2877758E+00, 0.2912092E+00, &
     & 0.2981321E+00, 0.3034125E+00, 0.3094148E+00, 0.3155375E+00, &
     & 0.3157176E+00, 0.3045866E+00, 0.2657381E+00, 0.2657381E+00 /
      data (ref_adm( 8,iz,38, 5),iz = 1,20) / &
     & 0.3044624E+00, 0.3044624E+00, 0.2933085E+00, 0.2691001E+00, &
     & 0.2680375E+00, 0.2725277E+00, 0.2833307E+00, 0.2874017E+00, &
     & 0.2867153E+00, 0.2867224E+00, 0.2877758E+00, 0.2912092E+00, &
     & 0.2981321E+00, 0.3034125E+00, 0.3094148E+00, 0.3155375E+00, &
     & 0.3157176E+00, 0.3045866E+00, 0.2657381E+00, 0.2657381E+00 /
! Solar Zenith Angle 25.0 Albedo  0.4796869E+00
      data (ref_adm( 8,iz, 1, 6),iz = 1,20) / &
     & 0.4733086E+00, 0.4733086E+00, 0.4719324E+00, 0.4719739E+00, &
     & 0.4731608E+00, 0.4755933E+00, 0.4798000E+00, 0.4863015E+00, &
     & 0.4952441E+00, 0.4247000E+00, 0.5227000E+00, 0.5470700E+00, &
     & 0.5747600E+00, 0.6130200E+00, 0.5419108E+00, 0.4662300E+00, &
     & 0.5242703E+00, 0.4876751E+00, 0.4000430E+00, 0.4000430E+00 /
      data (ref_adm( 8,iz, 2, 6),iz = 1,20) / &
     & 0.4733086E+00, 0.4733086E+00, 0.4719324E+00, 0.4719739E+00, &
     & 0.4731608E+00, 0.4755933E+00, 0.4798000E+00, 0.4863015E+00, &
     & 0.4952441E+00, 0.4247000E+00, 0.5227000E+00, 0.5470700E+00, &
     & 0.5747600E+00, 0.6130200E+00, 0.5419108E+00, 0.4662300E+00, &
     & 0.5242703E+00, 0.4876751E+00, 0.4000430E+00, 0.4000430E+00 /
      data (ref_adm( 8,iz, 3, 6),iz = 1,20) / &
     & 0.4732798E+00, 0.4732798E+00, 0.4719444E+00, 0.4719879E+00, &
     & 0.4730814E+00, 0.4756535E+00, 0.4795754E+00, 0.4860643E+00, &
     & 0.4947814E+00, 0.4724800E+00, 0.5429500E+00, 0.5155900E+00, &
     & 0.5584300E+00, 0.5378653E+00, 0.5203600E+00, 0.5371311E+00, &
     & 0.5233386E+00, 0.4869373E+00, 0.2033642E+00, 0.2033642E+00 /
      data (ref_adm( 8,iz, 4, 6),iz = 1,20) / &
     & 0.4732667E+00, 0.4732667E+00, 0.4721136E+00, 0.4720480E+00, &
     & 0.4729695E+00, 0.4754134E+00, 0.4793595E+00, 0.4857804E+00, &
     & 0.4390400E+00, 0.5294500E+00, 0.5504900E+00, 0.5119000E+00, &
     & 0.4958100E+00, 0.4985400E+00, 0.5312100E+00, 0.5352653E+00, &
     & 0.5217885E+00, 0.4856806E+00, 0.3985301E+00, 0.3985301E+00 /
      data (ref_adm( 8,iz, 5, 6),iz = 1,20) / &
     & 0.4734632E+00, 0.4734632E+00, 0.4721393E+00, 0.4719396E+00, &
     & 0.4728513E+00, 0.4754925E+00, 0.4793125E+00, 0.4853965E+00, &
     & 0.5270000E+00, 0.5529700E+00, 0.5451600E+00, 0.4478900E+00, &
     & 0.5866500E+00, 0.5350792E+00, 0.4765900E+00, 0.4718100E+00, &
     & 0.5195858E+00, 0.4841963E+00, 0.3969278E+00, 0.3969278E+00 /
      data (ref_adm( 8,iz, 6, 6),iz = 1,20) / &
     & 0.4734411E+00, 0.4734411E+00, 0.4723384E+00, 0.4719322E+00, &
     & 0.4726810E+00, 0.4750974E+00, 0.4789100E+00, 0.5935800E+00, &
     & 0.5793100E+00, 0.5452400E+00, 0.5392200E+00, 0.4493700E+00, &
     & 0.5444700E+00, 0.5326121E+00, 0.4163600E+00, 0.5067000E+00, &
     & 0.5160378E+00, 0.4819789E+00, 0.3950494E+00, 0.3950494E+00 /
      data (ref_adm( 8,iz, 7, 6),iz = 1,20) / &
     & 0.4734719E+00, 0.4734719E+00, 0.4723100E+00, 0.4720979E+00, &
     & 0.4727809E+00, 0.4748764E+00, 0.4786251E+00, 0.6130800E+00, &
     & 0.5485900E+00, 0.5248700E+00, 0.4260900E+00, 0.4350900E+00, &
     & 0.5959800E+00, 0.5107600E+00, 0.5173000E+00, 0.5421400E+00, &
     & 0.5124162E+00, 0.4792159E+00, 0.3928544E+00, 0.3928544E+00 /
      data (ref_adm( 8,iz, 8, 6),iz = 1,20) / &
     & 0.4735660E+00, 0.4735660E+00, 0.4722573E+00, 0.4720207E+00, &
     & 0.4726464E+00, 0.4746651E+00, 0.6001800E+00, 0.5834100E+00, &
     & 0.4901422E+00, 0.4981838E+00, 0.4321100E+00, 0.4374000E+00, &
     & 0.5228906E+00, 0.5264496E+00, 0.5537500E+00, 0.5281500E+00, &
     & 0.5076717E+00, 0.4758275E+00, 0.3902171E+00, 0.3902171E+00 /
      data (ref_adm( 8,iz, 9, 6),iz = 1,20) / &
     & 0.4736086E+00, 0.4736086E+00, 0.4725198E+00, 0.4719879E+00, &
     & 0.4726216E+00, 0.4742500E+00, 0.5012000E+00, 0.5073200E+00, &
     & 0.4886528E+00, 0.4619600E+00, 0.4398700E+00, 0.4523600E+00, &
     & 0.5193519E+00, 0.5228543E+00, 0.5230449E+00, 0.5174875E+00, &
     & 0.5026891E+00, 0.4718248E+00, 0.3875311E+00, 0.3875311E+00 /
      data (ref_adm( 8,iz,10, 6),iz = 1,20) / &
     & 0.4736584E+00, 0.4736584E+00, 0.4724097E+00, 0.4880800E+00, &
     & 0.4725298E+00, 0.4738744E+00, 0.4865900E+00, 0.4603500E+00, &
     & 0.4873408E+00, 0.4759100E+00, 0.4625700E+00, 0.4747900E+00, &
     & 0.5159575E+00, 0.5186992E+00, 0.5181054E+00, 0.5118988E+00, &
     & 0.4972779E+00, 0.4667033E+00, 0.3844672E+00, 0.3844672E+00 /
      data (ref_adm( 8,iz,11, 6),iz = 1,20) / &
     & 0.4736098E+00, 0.4736098E+00, 0.4725438E+00, 0.4719224E+00, &
     & 0.4724689E+00, 0.4614900E+00, 0.5099000E+00, 0.5034900E+00, &
     & 0.4967000E+00, 0.5105800E+00, 0.5642200E+00, 0.4656500E+00, &
     & 0.5119792E+00, 0.5142542E+00, 0.5133288E+00, 0.5060037E+00, &
     & 0.4918458E+00, 0.4609874E+00, 0.3810845E+00, 0.3810845E+00 /
      data (ref_adm( 8,iz,12, 6),iz = 1,20) / &
     & 0.4737230E+00, 0.4737230E+00, 0.4726904E+00, 0.4720474E+00, &
     & 0.4723031E+00, 0.4733491E+00, 0.4298000E+00, 0.4795356E+00, &
     & 0.3799500E+00, 0.4975400E+00, 0.4715600E+00, 0.4682000E+00, &
     & 0.4092400E+00, 0.5097220E+00, 0.5083169E+00, 0.5001336E+00, &
     & 0.4855268E+00, 0.4553925E+00, 0.3769532E+00, 0.3769532E+00 /
      data (ref_adm( 8,iz,13, 6),iz = 1,20) / &
     & 0.4736336E+00, 0.4736336E+00, 0.4726759E+00, 0.4720573E+00, &
     & 0.4721759E+00, 0.4733388E+00, 0.4751654E+00, 0.4786463E+00, &
     & 0.4826347E+00, 0.4968500E+00, 0.5463300E+00, 0.3597900E+00, &
     & 0.5092100E+00, 0.4651600E+00, 0.5029975E+00, 0.4944338E+00, &
     & 0.4793091E+00, 0.4493176E+00, 0.3723758E+00, 0.3723758E+00 /
      data (ref_adm( 8,iz,14, 6),iz = 1,20) / &
     & 0.4736156E+00, 0.4736156E+00, 0.4728488E+00, 0.4722669E+00, &
     & 0.4719798E+00, 0.4729817E+00, 0.4745355E+00, 0.4775671E+00, &
     & 0.4810999E+00, 0.4942600E+00, 0.5419700E+00, 0.4953479E+00, &
     & 0.4989447E+00, 0.5002986E+00, 0.4976103E+00, 0.4887008E+00, &
     & 0.4728433E+00, 0.4429894E+00, 0.3676716E+00, 0.3676716E+00 /
      data (ref_adm( 8,iz,15, 6),iz = 1,20) / &
     & 0.4737056E+00, 0.4737056E+00, 0.4731488E+00, 0.4725714E+00, &
     & 0.4720227E+00, 0.4728603E+00, 0.4740835E+00, 0.4764978E+00, &
     & 0.4798442E+00, 0.4831271E+00, 0.5347200E+00, 0.4961300E+00, &
     & 0.4944091E+00, 0.4951828E+00, 0.4923527E+00, 0.4832392E+00, &
     & 0.4666716E+00, 0.4367488E+00, 0.3633470E+00, 0.3633470E+00 /
      data (ref_adm( 8,iz,16, 6),iz = 1,20) / &
     & 0.4739049E+00, 0.4739049E+00, 0.4730547E+00, 0.4728660E+00, &
     & 0.4723198E+00, 0.4725730E+00, 0.4736112E+00, 0.4755261E+00, &
     & 0.4784735E+00, 0.4811911E+00, 0.5315500E+00, 0.5430100E+00, &
     & 0.4903956E+00, 0.4902852E+00, 0.4870434E+00, 0.4774045E+00, &
     & 0.4609699E+00, 0.4305451E+00, 0.3592323E+00, 0.3592323E+00 /
      data (ref_adm( 8,iz,17, 6),iz = 1,20) / &
     & 0.4738834E+00, 0.4738834E+00, 0.4732674E+00, 0.4729372E+00, &
     & 0.4726173E+00, 0.4724574E+00, 0.4735813E+00, 0.4749027E+00, &
     & 0.4773960E+00, 0.4795652E+00, 0.5302200E+00, 0.5410800E+00, &
     & 0.4629100E+00, 0.4856292E+00, 0.4820115E+00, 0.4717821E+00, &
     & 0.4555051E+00, 0.4246600E+00, 0.3550424E+00, 0.3550424E+00 /
      data (ref_adm( 8,iz,18, 6),iz = 1,20) / &
     & 0.4244367E+00, 0.4244367E+00, 0.4254797E+00, 0.4275317E+00, &
     & 0.4308622E+00, 0.4354893E+00, 0.4389800E+00, 0.4488713E+00, &
     & 0.4574290E+00, 0.4669601E+00, 0.4774449E+00, 0.5220800E+00, &
     & 0.4546500E+00, 0.5130676E+00, 0.5212235E+00, 0.5245758E+00, &
     & 0.5195355E+00, 0.5008867E+00, 0.4527205E+00, 0.4527205E+00 /
      data (ref_adm( 8,iz,19, 6),iz = 1,20) / &
     & 0.4244731E+00, 0.4244731E+00, 0.4254306E+00, 0.4273771E+00, &
     & 0.4064100E+00, 0.4345209E+00, 0.4399143E+00, 0.4465438E+00, &
     & 0.4541963E+00, 0.4626531E+00, 0.4717247E+00, 0.4952500E+00, &
     & 0.4277000E+00, 0.5018355E+00, 0.5080374E+00, 0.5096900E+00, &
     & 0.5040202E+00, 0.4864010E+00, 0.4446661E+00, 0.4446661E+00 /
      data (ref_adm( 8,iz,20, 6),iz = 1,20) / &
     & 0.4245096E+00, 0.4245096E+00, 0.4255550E+00, 0.4274116E+00, &
     & 0.4302500E+00, 0.4340506E+00, 0.4389114E+00, 0.4448156E+00, &
     & 0.4516112E+00, 0.4592616E+00, 0.4673320E+00, 0.4774709E+00, &
     & 0.4730800E+00, 0.4930089E+00, 0.4977937E+00, 0.4981115E+00, &
     & 0.4920551E+00, 0.4759650E+00, 0.4402102E+00, 0.4402102E+00 /
      data (ref_adm( 8,iz,21, 6),iz = 1,20) / &
     & 0.4245561E+00, 0.4245561E+00, 0.4256908E+00, 0.4276353E+00, &
     & 0.4304110E+00, 0.4340634E+00, 0.4385684E+00, 0.4439308E+00, &
     & 0.4500815E+00, 0.4568596E+00, 0.4640180E+00, 0.4730134E+00, &
     & 0.4654000E+00, 0.4863224E+00, 0.4897814E+00, 0.4893551E+00, &
     & 0.4831519E+00, 0.4681922E+00, 0.4383126E+00, 0.4383126E+00 /
      data (ref_adm( 8,iz,22, 6),iz = 1,20) / &
     & 0.5297092E+00, 0.5297092E+00, 0.5202301E+00, 0.5169464E+00, &
     & 0.5143510E+00, 0.5125758E+00, 0.5094470E+00, 0.5041166E+00, &
     & 0.4972701E+00, 0.4890718E+00, 0.4801552E+00, 0.4677758E+00, &
     & 0.4533267E+00, 0.4397205E+00, 0.4201810E+00, 0.3944497E+00, &
     & 0.3679034E+00, 0.3331703E+00, 0.2718410E+00, 0.2718410E+00 /
      data (ref_adm( 8,iz,23, 6),iz = 1,20) / &
     & 0.5297092E+00, 0.5297092E+00, 0.5202301E+00, 0.5169465E+00, &
     & 0.5143510E+00, 0.5125758E+00, 0.5094470E+00, 0.5041165E+00, &
     & 0.4972701E+00, 0.4890718E+00, 0.4801551E+00, 0.4677758E+00, &
     & 0.4533267E+00, 0.4800600E+00, 0.4201810E+00, 0.3944497E+00, &
     & 0.3679034E+00, 0.3331703E+00, 0.2718410E+00, 0.2718410E+00 /
      data (ref_adm( 8,iz,24, 6),iz = 1,20) / &
     & 0.5297092E+00, 0.5297092E+00, 0.5202301E+00, 0.5169464E+00, &
     & 0.5143510E+00, 0.5125758E+00, 0.5094470E+00, 0.5041166E+00, &
     & 0.4972701E+00, 0.4890718E+00, 0.4801552E+00, 0.4677758E+00, &
     & 0.4888400E+00, 0.4928100E+00, 0.4606400E+00, 0.3944497E+00, &
     & 0.4273500E+00, 0.3331703E+00, 0.2718410E+00, 0.2718410E+00 /
      data (ref_adm( 8,iz,25, 6),iz = 1,20) / &
     & 0.5297092E+00, 0.5297092E+00, 0.5202301E+00, 0.3820200E+00, &
     & 0.5143510E+00, 0.5125758E+00, 0.5094470E+00, 0.5041165E+00, &
     & 0.4972701E+00, 0.4890718E+00, 0.4801551E+00, 0.4677758E+00, &
     & 0.4533267E+00, 0.5278200E+00, 0.5195200E+00, 0.3944497E+00, &
     & 0.4761500E+00, 0.3331703E+00, 0.2718410E+00, 0.2718410E+00 /
      data (ref_adm( 8,iz,26, 6),iz = 1,20) / &
     & 0.5297092E+00, 0.5297092E+00, 0.5202301E+00, 0.5169464E+00, &
     & 0.5143510E+00, 0.5125758E+00, 0.5094470E+00, 0.5041166E+00, &
     & 0.4972701E+00, 0.4890718E+00, 0.4801552E+00, 0.4677758E+00, &
     & 0.4533267E+00, 0.4397205E+00, 0.4201810E+00, 0.4775400E+00, &
     & 0.4633600E+00, 0.3331703E+00, 0.2718410E+00, 0.2718410E+00 /
      data (ref_adm( 8,iz,27, 6),iz = 1,20) / &
     & 0.5297092E+00, 0.5297092E+00, 0.5202301E+00, 0.5169465E+00, &
     & 0.5143510E+00, 0.5125758E+00, 0.5094470E+00, 0.5041165E+00, &
     & 0.4972701E+00, 0.4890718E+00, 0.4801551E+00, 0.4677758E+00, &
     & 0.4533267E+00, 0.4397205E+00, 0.4201810E+00, 0.3944497E+00, &
     & 0.3679034E+00, 0.3331703E+00, 0.2718410E+00, 0.2718410E+00 /
      data (ref_adm( 8,iz,28, 6),iz = 1,20) / &
     & 0.5297092E+00, 0.5297092E+00, 0.5202301E+00, 0.3545900E+00, &
     & 0.5143510E+00, 0.5125758E+00, 0.5094470E+00, 0.5041166E+00, &
     & 0.4972701E+00, 0.4890718E+00, 0.4801552E+00, 0.4677758E+00, &
     & 0.4533267E+00, 0.4397205E+00, 0.4201810E+00, 0.3944497E+00, &
     & 0.3679034E+00, 0.3331703E+00, 0.2718410E+00, 0.2718410E+00 /
      data (ref_adm( 8,iz,29, 6),iz = 1,20) / &
     & 0.5297092E+00, 0.5297092E+00, 0.5202301E+00, 0.5169465E+00, &
     & 0.5143510E+00, 0.5125758E+00, 0.5094470E+00, 0.5041165E+00, &
     & 0.4972701E+00, 0.4890718E+00, 0.4801551E+00, 0.4677758E+00, &
     & 0.4533267E+00, 0.4397205E+00, 0.4201810E+00, 0.3944497E+00, &
     & 0.3679034E+00, 0.3331703E+00, 0.2718410E+00, 0.2718410E+00 /
      data (ref_adm( 8,iz,30, 6),iz = 1,20) / &
     & 0.5297092E+00, 0.5297092E+00, 0.4213200E+00, 0.3236800E+00, &
     & 0.4766300E+00, 0.4603600E+00, 0.5094470E+00, 0.5041166E+00, &
     & 0.4972701E+00, 0.4890718E+00, 0.4801552E+00, 0.4677758E+00, &
     & 0.4533267E+00, 0.4397205E+00, 0.4478100E+00, 0.3944497E+00, &
     & 0.3679034E+00, 0.3331703E+00, 0.2718410E+00, 0.2718410E+00 /
      data (ref_adm( 8,iz,31, 6),iz = 1,20) / &
     & 0.5297092E+00, 0.5297092E+00, 0.5202301E+00, 0.5169465E+00, &
     & 0.5143510E+00, 0.5125758E+00, 0.5094470E+00, 0.5041165E+00, &
     & 0.4972701E+00, 0.4890718E+00, 0.4801551E+00, 0.4677758E+00, &
     & 0.4533267E+00, 0.4397205E+00, 0.4201810E+00, 0.3944497E+00, &
     & 0.3679034E+00, 0.3331703E+00, 0.2718410E+00, 0.2718410E+00 /
      data (ref_adm( 8,iz,32, 6),iz = 1,20) / &
     & 0.5297092E+00, 0.5297092E+00, 0.5202301E+00, 0.5169464E+00, &
     & 0.5143510E+00, 0.5125758E+00, 0.5094470E+00, 0.5041166E+00, &
     & 0.4972701E+00, 0.4890718E+00, 0.4801552E+00, 0.4677758E+00, &
     & 0.4533267E+00, 0.4397205E+00, 0.4201810E+00, 0.3944497E+00, &
     & 0.3679034E+00, 0.3331703E+00, 0.2718410E+00, 0.2718410E+00 /
      data (ref_adm( 8,iz,33, 6),iz = 1,20) / &
     & 0.5297092E+00, 0.5297092E+00, 0.5202301E+00, 0.5169465E+00, &
     & 0.5143510E+00, 0.5125758E+00, 0.5094470E+00, 0.5041165E+00, &
     & 0.4972701E+00, 0.4890718E+00, 0.4801551E+00, 0.4677758E+00, &
     & 0.4533267E+00, 0.4397205E+00, 0.4201810E+00, 0.3944497E+00, &
     & 0.3679034E+00, 0.3331703E+00, 0.2718410E+00, 0.2718410E+00 /
      data (ref_adm( 8,iz,34, 6),iz = 1,20) / &
     & 0.4638900E+00, 0.4638900E+00, 0.4694000E+00, 0.4134400E+00, &
     & 0.5143510E+00, 0.5125758E+00, 0.5094470E+00, 0.5041166E+00, &
     & 0.4972701E+00, 0.4890718E+00, 0.4801552E+00, 0.4307800E+00, &
     & 0.4533267E+00, 0.4397205E+00, 0.4201810E+00, 0.3944497E+00, &
     & 0.3679034E+00, 0.3331703E+00, 0.2718410E+00, 0.2718410E+00 /
      data (ref_adm( 8,iz,35, 6),iz = 1,20) / &
     & 0.5297092E+00, 0.5297092E+00, 0.5202301E+00, 0.5169465E+00, &
     & 0.5143510E+00, 0.5125758E+00, 0.5094470E+00, 0.5041165E+00, &
     & 0.4972701E+00, 0.4890718E+00, 0.4801551E+00, 0.4677758E+00, &
     & 0.4533267E+00, 0.4397205E+00, 0.4201810E+00, 0.3944497E+00, &
     & 0.3679034E+00, 0.3331703E+00, 0.2718410E+00, 0.2718410E+00 /
      data (ref_adm( 8,iz,36, 6),iz = 1,20) / &
     & 0.5297092E+00, 0.5297092E+00, 0.5202301E+00, 0.5169464E+00, &
     & 0.5143510E+00, 0.5125758E+00, 0.5094470E+00, 0.5041166E+00, &
     & 0.4972701E+00, 0.4890718E+00, 0.4801552E+00, 0.4677758E+00, &
     & 0.4533267E+00, 0.4397205E+00, 0.4201810E+00, 0.3944497E+00, &
     & 0.3679034E+00, 0.3331703E+00, 0.2718410E+00, 0.2718410E+00 /
      data (ref_adm( 8,iz,37, 6),iz = 1,20) / &
     & 0.5297092E+00, 0.5297092E+00, 0.5202301E+00, 0.5169464E+00, &
     & 0.5143510E+00, 0.5125758E+00, 0.5094470E+00, 0.5041166E+00, &
     & 0.4972701E+00, 0.4890718E+00, 0.4801552E+00, 0.4677758E+00, &
     & 0.4533267E+00, 0.4397205E+00, 0.4201810E+00, 0.3944497E+00, &
     & 0.3679034E+00, 0.3331703E+00, 0.2718410E+00, 0.2718410E+00 /
      data (ref_adm( 8,iz,38, 6),iz = 1,20) / &
     & 0.5297092E+00, 0.5297092E+00, 0.5202301E+00, 0.5169464E+00, &
     & 0.5143510E+00, 0.5125758E+00, 0.5094470E+00, 0.5041166E+00, &
     & 0.4972701E+00, 0.4890718E+00, 0.4801552E+00, 0.4677758E+00, &
     & 0.4533267E+00, 0.4397205E+00, 0.4201810E+00, 0.3944497E+00, &
     & 0.3679034E+00, 0.3331703E+00, 0.2718410E+00, 0.2718410E+00 /
! Solar Zenith Angle 30.0 Albedo  0.5163039E+00
      data (ref_adm( 8,iz, 1, 7),iz = 1,20) / &
     & 0.5076782E+00, 0.5076782E+00, 0.5051481E+00, 0.5039513E+00, &
     & 0.5038879E+00, 0.5046026E+00, 0.5062904E+00, 0.5084847E+00, &
     & 0.5113383E+00, 0.3873100E+00, 0.4188900E+00, 0.5272676E+00, &
     & 0.5365749E+00, 0.5442561E+00, 0.4122500E+00, 0.3606100E+00, &
     & 0.5690800E+00, 0.5365300E+00, 0.5496092E+00, 0.5496092E+00 /
      data (ref_adm( 8,iz, 2, 7),iz = 1,20) / &
     & 0.5076782E+00, 0.5076782E+00, 0.5051481E+00, 0.5039513E+00, &
     & 0.5038879E+00, 0.5046026E+00, 0.5062904E+00, 0.5084847E+00, &
     & 0.5113383E+00, 0.3873100E+00, 0.4188900E+00, 0.5272676E+00, &
     & 0.5365749E+00, 0.5442561E+00, 0.4122500E+00, 0.3606100E+00, &
     & 0.5690800E+00, 0.5365300E+00, 0.5496092E+00, 0.5496092E+00 /
      data (ref_adm( 8,iz, 3, 7),iz = 1,20) / &
     & 0.5076687E+00, 0.5076687E+00, 0.5051606E+00, 0.5039499E+00, &
     & 0.3186600E+00, 0.3282100E+00, 0.5061880E+00, 0.5863900E+00, &
     & 0.5410700E+00, 0.4245600E+00, 0.3583400E+00, 0.5270355E+00, &
     & 0.5307500E+00, 0.5441014E+00, 0.6385600E+00, 0.6628400E+00, &
     & 0.6478300E+00, 0.5073700E+00, 0.4164342E+00, 0.4164342E+00 /
      data (ref_adm( 8,iz, 4, 7),iz = 1,20) / &
     & 0.6895300E+00, 0.6895300E+00, 0.6191800E+00, 0.4520800E+00, &
     & 0.4285800E+00, 0.4171100E+00, 0.5888500E+00, 0.6047500E+00, &
     & 0.5135700E+00, 0.5816800E+00, 0.4346700E+00, 0.4292900E+00, &
     & 0.4176300E+00, 0.5430976E+00, 0.5518332E+00, 0.5631276E+00, &
     & 0.6534100E+00, 0.5951215E+00, 0.5430371E+00, 0.5430371E+00 /
      data (ref_adm( 8,iz, 5, 7),iz = 1,20) / &
     & 0.6858300E+00, 0.6858300E+00, 0.6080700E+00, 0.3544500E+00, &
     & 0.5039122E+00, 0.5046018E+00, 0.5060369E+00, 0.3551800E+00, &
     & 0.3553500E+00, 0.5140648E+00, 0.5185211E+00, 0.4789500E+00, &
     & 0.3299400E+00, 0.7083900E+00, 0.6990600E+00, 0.5607455E+00, &
     & 0.5723631E+00, 0.5861809E+00, 0.5372124E+00, 0.5372124E+00 /
      data (ref_adm( 8,iz, 6, 7),iz = 1,20) / &
     & 0.6261500E+00, 0.6261500E+00, 0.4819800E+00, 0.4004100E+00, &
     & 0.4869800E+00, 0.5044580E+00, 0.5345200E+00, 0.4784500E+00, &
     & 0.5103739E+00, 0.5135125E+00, 0.5176360E+00, 0.5440700E+00, &
     & 0.5857100E+00, 0.5403409E+00, 0.6136400E+00, 0.5576797E+00, &
     & 0.5671070E+00, 0.5753190E+00, 0.5268425E+00, 0.5268425E+00 /
      data (ref_adm( 8,iz, 7, 7),iz = 1,20) / &
     & 0.7027200E+00, 0.7027200E+00, 0.5135400E+00, 0.5344700E+00, &
     & 0.4852900E+00, 0.4000200E+00, 0.5743400E+00, 0.5514300E+00, &
     & 0.5100657E+00, 0.5130523E+00, 0.5168629E+00, 0.5233633E+00, &
     & 0.5959200E+00, 0.5383814E+00, 0.4829000E+00, 0.5546505E+00, &
     & 0.5612905E+00, 0.5642574E+00, 0.5130079E+00, 0.5130079E+00 /
      data (ref_adm( 8,iz, 8, 7),iz = 1,20) / &
     & 0.5353900E+00, 0.5353900E+00, 0.5195300E+00, 0.5083900E+00, &
     & 0.4945900E+00, 0.5043342E+00, 0.6364500E+00, 0.5070227E+00, &
     & 0.5094235E+00, 0.5122348E+00, 0.5158656E+00, 0.5219363E+00, &
     & 0.5293266E+00, 0.5359887E+00, 0.5396100E+00, 0.5512402E+00, &
     & 0.5559210E+00, 0.5544420E+00, 0.4992924E+00, 0.4992924E+00 /
      data (ref_adm( 8,iz, 9, 7),iz = 1,20) / &
     & 0.4756600E+00, 0.4756600E+00, 0.4763800E+00, 0.5540500E+00, &
     & 0.5039480E+00, 0.5041608E+00, 0.5051868E+00, 0.5067471E+00, &
     & 0.5089017E+00, 0.5115309E+00, 0.5148237E+00, 0.5202684E+00, &
     & 0.5271559E+00, 0.5331047E+00, 0.5410787E+00, 0.5477018E+00, &
     & 0.5507734E+00, 0.5457554E+00, 0.4873988E+00, 0.4873988E+00 /
      data (ref_adm( 8,iz,10, 7),iz = 1,20) / &
     & 0.5283400E+00, 0.5283400E+00, 0.5057769E+00, 0.4152400E+00, &
     & 0.5039250E+00, 0.5042669E+00, 0.5050424E+00, 0.5063866E+00, &
     & 0.5082699E+00, 0.5107610E+00, 0.5138126E+00, 0.5185986E+00, &
     & 0.5248938E+00, 0.5303105E+00, 0.5371838E+00, 0.5440573E+00, &
     & 0.5462318E+00, 0.5381708E+00, 0.4769545E+00, 0.4769545E+00 /
      data (ref_adm( 8,iz,11, 7),iz = 1,20) / &
     & 0.5950900E+00, 0.5950900E+00, 0.5110800E+00, 0.4755200E+00, &
     & 0.4040600E+00, 0.4244100E+00, 0.5462100E+00, 0.5451400E+00, &
     & 0.5683200E+00, 0.5099040E+00, 0.5126904E+00, 0.5416600E+00, &
     & 0.5223482E+00, 0.5272836E+00, 0.5334188E+00, 0.5370900E+00, &
     & 0.5413540E+00, 0.5314465E+00, 0.4677442E+00, 0.4677442E+00 /
      data (ref_adm( 8,iz,12, 7),iz = 1,20) / &
     & 0.6062500E+00, 0.6062500E+00, 0.5062261E+00, 0.5050870E+00, &
     & 0.6666600E+00, 0.6249000E+00, 0.4206500E+00, 0.4344400E+00, &
     & 0.5159200E+00, 0.4376300E+00, 0.3943400E+00, 0.5266600E+00, &
     & 0.5950500E+00, 0.5242518E+00, 0.5293776E+00, 0.6135500E+00, &
     & 0.5976300E+00, 0.5254219E+00, 0.4596148E+00, 0.4596148E+00 /
      data (ref_adm( 8,iz,13, 7),iz = 1,20) / &
     & 0.5081080E+00, 0.5081080E+00, 0.5063728E+00, 0.5052851E+00, &
     & 0.5046092E+00, 0.5042641E+00, 0.3024800E+00, 0.5053831E+00, &
     & 0.6312900E+00, 0.4929600E+00, 0.5428700E+00, 0.5442400E+00, &
     & 0.5865500E+00, 0.5203500E+00, 0.5252593E+00, 0.5289397E+00, &
     & 0.5299660E+00, 0.5192563E+00, 0.4522312E+00, 0.4522312E+00 /
      data (ref_adm( 8,iz,14, 7),iz = 1,20) / &
     & 0.6950400E+00, 0.6950400E+00, 0.5066279E+00, 0.5056971E+00, &
     & 0.5048873E+00, 0.5044404E+00, 0.5046212E+00, 0.5051982E+00, &
     & 0.5060959E+00, 0.5075126E+00, 0.5093793E+00, 0.5123242E+00, &
     & 0.5826000E+00, 0.5423900E+00, 0.5213505E+00, 0.5239241E+00, &
     & 0.5231026E+00, 0.5117548E+00, 0.4450196E+00, 0.4450196E+00 /
      data (ref_adm( 8,iz,15, 7),iz = 1,20) / &
     & 0.5082386E+00, 0.5082386E+00, 0.5069212E+00, 0.5060174E+00, &
     & 0.5053211E+00, 0.5047248E+00, 0.5046465E+00, 0.5050936E+00, &
     & 0.5057792E+00, 0.5069113E+00, 0.5083917E+00, 0.5108732E+00, &
     & 0.5137600E+00, 0.5157679E+00, 0.5177942E+00, 0.5188955E+00, &
     & 0.5167086E+00, 0.5034636E+00, 0.4372934E+00, 0.4372934E+00 /
      data (ref_adm( 8,iz,16, 7),iz = 1,20) / &
     & 0.5083609E+00, 0.5083609E+00, 0.5072734E+00, 0.5063582E+00, &
     & 0.5056981E+00, 0.5051771E+00, 0.5048705E+00, 0.5050464E+00, &
     & 0.5055595E+00, 0.5063486E+00, 0.5074750E+00, 0.5095636E+00, &
     & 0.5117919E+00, 0.5134613E+00, 0.5147435E+00, 0.5139085E+00, &
     & 0.5105396E+00, 0.4958496E+00, 0.4292249E+00, 0.4292249E+00 /
      data (ref_adm( 8,iz,17, 7),iz = 1,20) / &
     & 0.5084780E+00, 0.5084780E+00, 0.5076147E+00, 0.5069083E+00, &
     & 0.5062871E+00, 0.5057597E+00, 0.5053239E+00, 0.5052063E+00, &
     & 0.5054567E+00, 0.5060749E+00, 0.5069329E+00, 0.5083986E+00, &
     & 0.5101376E+00, 0.5113015E+00, 0.4601900E+00, 0.5101712E+00, &
     & 0.5047614E+00, 0.4884122E+00, 0.4224008E+00, 0.4224008E+00 /
      data (ref_adm( 8,iz,18, 7),iz = 1,20) / &
     & 0.6018112E+00, 0.6018112E+00, 0.5418508E+00, 0.5396013E+00, &
     & 0.5428427E+00, 0.5512197E+00, 0.5525576E+00, 0.5467671E+00, &
     & 0.5416682E+00, 0.5364520E+00, 0.5325818E+00, 0.5280716E+00, &
     & 0.5224321E+00, 0.5171331E+00, 0.5077484E+00, 0.4915818E+00, &
     & 0.4694957E+00, 0.4291112E+00, 0.3443289E+00, 0.3443289E+00 /
      data (ref_adm( 8,iz,19, 7),iz = 1,20) / &
     & 0.6018112E+00, 0.6018112E+00, 0.5418509E+00, 0.5396013E+00, &
     & 0.5428427E+00, 0.5512197E+00, 0.5525576E+00, 0.5467671E+00, &
     & 0.5416682E+00, 0.5364520E+00, 0.5325818E+00, 0.5280716E+00, &
     & 0.5224321E+00, 0.5171331E+00, 0.5077484E+00, 0.4915818E+00, &
     & 0.4694957E+00, 0.4291112E+00, 0.3443289E+00, 0.3443289E+00 /
      data (ref_adm( 8,iz,20, 7),iz = 1,20) / &
     & 0.6018112E+00, 0.6018112E+00, 0.5418508E+00, 0.5396013E+00, &
     & 0.5428427E+00, 0.5512197E+00, 0.5525576E+00, 0.5467671E+00, &
     & 0.5416682E+00, 0.5364520E+00, 0.5325818E+00, 0.5280716E+00, &
     & 0.5224321E+00, 0.5171331E+00, 0.5077484E+00, 0.4915818E+00, &
     & 0.4694957E+00, 0.4291112E+00, 0.3443289E+00, 0.3443289E+00 /
      data (ref_adm( 8,iz,21, 7),iz = 1,20) / &
     & 0.6821800E+00, 0.6821800E+00, 0.5418509E+00, 0.5396013E+00, &
     & 0.5428427E+00, 0.5512197E+00, 0.5525576E+00, 0.5467671E+00, &
     & 0.5416682E+00, 0.5364520E+00, 0.5325818E+00, 0.5280716E+00, &
     & 0.5224321E+00, 0.5171331E+00, 0.5077484E+00, 0.4915818E+00, &
     & 0.4694957E+00, 0.4291112E+00, 0.3443289E+00, 0.3443289E+00 /
      data (ref_adm( 8,iz,22, 7),iz = 1,20) / &
     & 0.5117700E+00, 0.5117700E+00, 0.5504814E+00, 0.4323200E+00, &
     & 0.5491637E+00, 0.5535781E+00, 0.5527766E+00, 0.5457247E+00, &
     & 0.5383368E+00, 0.5306534E+00, 0.5235161E+00, 0.5143159E+00, &
     & 0.5038646E+00, 0.4669600E+00, 0.4809840E+00, 0.3702100E+00, &
     & 0.4363018E+00, 0.3945345E+00, 0.3103204E+00, 0.3103204E+00 /
      data (ref_adm( 8,iz,23, 7),iz = 1,20) / &
     & 0.6787600E+00, 0.6787600E+00, 0.5507525E+00, 0.5480635E+00, &
     & 0.5487375E+00, 0.5532694E+00, 0.5527789E+00, 0.5459327E+00, &
     & 0.5385827E+00, 0.5307094E+00, 0.5235589E+00, 0.5141364E+00, &
     & 0.5037786E+00, 0.4943246E+00, 0.5215200E+00, 0.4301400E+00, &
     & 0.5679800E+00, 0.3941718E+00, 0.3102226E+00, 0.3102226E+00 /
      data (ref_adm( 8,iz,24, 7),iz = 1,20) / &
     & 0.5778756E+00, 0.5778756E+00, 0.5510591E+00, 0.5482683E+00, &
     & 0.3955000E+00, 0.5529506E+00, 0.5528351E+00, 0.5459300E+00, &
     & 0.5389070E+00, 0.5308115E+00, 0.5236413E+00, 0.5142624E+00, &
     & 0.5036952E+00, 0.4447500E+00, 0.5474200E+00, 0.5919900E+00, &
     & 0.4357243E+00, 0.3940178E+00, 0.3101258E+00, 0.3101258E+00 /
      data (ref_adm( 8,iz,25, 7),iz = 1,20) / &
     & 0.5782667E+00, 0.5782667E+00, 0.5510635E+00, 0.5482622E+00, &
     & 0.5485388E+00, 0.5528623E+00, 0.5530168E+00, 0.5463062E+00, &
     & 0.5389095E+00, 0.5310142E+00, 0.5237248E+00, 0.5141954E+00, &
     & 0.5037416E+00, 0.4939328E+00, 0.5235700E+00, 0.4603033E+00, &
     & 0.5594700E+00, 0.3937223E+00, 0.3100466E+00, 0.3100466E+00 /
      data (ref_adm( 8,iz,26, 7),iz = 1,20) / &
     & 0.5788646E+00, 0.5788646E+00, 0.5516256E+00, 0.5482395E+00, &
     & 0.5481759E+00, 0.5524236E+00, 0.5528340E+00, 0.5464532E+00, &
     & 0.5391977E+00, 0.5312747E+00, 0.5238666E+00, 0.5142065E+00, &
     & 0.5036543E+00, 0.4939692E+00, 0.5151800E+00, 0.4601107E+00, &
     & 0.4351198E+00, 0.3589100E+00, 0.3099567E+00, 0.3099567E+00 /
      data (ref_adm( 8,iz,27, 7),iz = 1,20) / &
     & 0.5792365E+00, 0.5792365E+00, 0.5517998E+00, 0.5483850E+00, &
     & 0.5482268E+00, 0.5524049E+00, 0.5530269E+00, 0.5468021E+00, &
     & 0.5393429E+00, 0.5314124E+00, 0.5239109E+00, 0.5141109E+00, &
     & 0.5037038E+00, 0.4939135E+00, 0.4798726E+00, 0.4597843E+00, &
     & 0.4348678E+00, 0.3932872E+00, 0.3852200E+00, 0.3852200E+00 /
      data (ref_adm( 8,iz,28, 7),iz = 1,20) / &
     & 0.5797824E+00, 0.5797824E+00, 0.5522813E+00, 0.5482697E+00, &
     & 0.5481726E+00, 0.5519851E+00, 0.5528396E+00, 0.5468205E+00, &
     & 0.5395705E+00, 0.5315716E+00, 0.5239663E+00, 0.5142519E+00, &
     & 0.5036768E+00, 0.4938293E+00, 0.5040100E+00, 0.4972900E+00, &
     & 0.4346785E+00, 0.3931381E+00, 0.3098010E+00, 0.3098010E+00 /
      data (ref_adm( 8,iz,29, 7),iz = 1,20) / &
     & 0.6690400E+00, 0.6690400E+00, 0.5837000E+00, 0.5554000E+00, &
     & 0.3929800E+00, 0.4049300E+00, 0.5527369E+00, 0.4788000E+00, &
     & 0.4226600E+00, 0.5316092E+00, 0.5240467E+00, 0.6572700E+00, &
     & 0.6164300E+00, 0.6309200E+00, 0.4796522E+00, 0.4595236E+00, &
     & 0.4344838E+00, 0.3929543E+00, 0.3097365E+00, 0.3097365E+00 /
      data (ref_adm( 8,iz,30, 7),iz = 1,20) / &
     & 0.4646100E+00, 0.4646100E+00, 0.3037000E+00, 0.3315200E+00, &
     & 0.5482161E+00, 0.5515391E+00, 0.5527388E+00, 0.4638300E+00, &
     & 0.5170600E+00, 0.5318576E+00, 0.5240653E+00, 0.6376300E+00, &
     & 0.6429000E+00, 0.6212300E+00, 0.4795317E+00, 0.5143000E+00, &
     & 0.4343314E+00, 0.3928005E+00, 0.3096815E+00, 0.3096815E+00 /
      data (ref_adm( 8,iz,31, 7),iz = 1,20) / &
     & 0.4709700E+00, 0.4709700E+00, 0.2436500E+00, 0.2015900E+00, &
     & 0.5481758E+00, 0.5513949E+00, 0.5526414E+00, 0.5473420E+00, &
     & 0.5399595E+00, 0.5318633E+00, 0.5241514E+00, 0.5142757E+00, &
     & 0.4783000E+00, 0.4678400E+00, 0.4794414E+00, 0.4592447E+00, &
     & 0.4340723E+00, 0.3926710E+00, 0.3096292E+00, 0.3096292E+00 /
      data (ref_adm( 8,iz,32, 7),iz = 1,20) / &
     & 0.5239300E+00, 0.5239300E+00, 0.5561942E+00, 0.5488876E+00, &
     & 0.5480367E+00, 0.5511575E+00, 0.5525393E+00, 0.5475159E+00, &
     & 0.5400394E+00, 0.5320433E+00, 0.5241973E+00, 0.5143130E+00, &
     & 0.5036154E+00, 0.4935133E+00, 0.4793650E+00, 0.4591017E+00, &
     & 0.4339502E+00, 0.3925265E+00, 0.3095869E+00, 0.3095869E+00 /
      data (ref_adm( 8,iz,33, 7),iz = 1,20) / &
     & 0.5841726E+00, 0.5841726E+00, 0.5633600E+00, 0.5358200E+00, &
     & 0.5479996E+00, 0.5510923E+00, 0.5523318E+00, 0.5476174E+00, &
     & 0.5399908E+00, 0.5322489E+00, 0.5242602E+00, 0.5142516E+00, &
     & 0.4908700E+00, 0.4935678E+00, 0.4793210E+00, 0.4589601E+00, &
     & 0.4338828E+00, 0.3924570E+00, 0.3095490E+00, 0.3095490E+00 /
      data (ref_adm( 8,iz,34, 7),iz = 1,20) / &
     & 0.4899600E+00, 0.4899600E+00, 0.5698300E+00, 0.6615700E+00, &
     & 0.5479949E+00, 0.5509313E+00, 0.5523308E+00, 0.5477164E+00, &
     & 0.5402086E+00, 0.5323253E+00, 0.5243551E+00, 0.5143840E+00, &
     & 0.5034817E+00, 0.4935783E+00, 0.4792435E+00, 0.4588413E+00, &
     & 0.4337594E+00, 0.3923443E+00, 0.3095216E+00, 0.3095216E+00 /
      data (ref_adm( 8,iz,35, 7),iz = 1,20) / &
     & 0.6552800E+00, 0.6552800E+00, 0.6104800E+00, 0.6345300E+00, &
     & 0.5481023E+00, 0.5507671E+00, 0.5524307E+00, 0.5477760E+00, &
     & 0.5404400E+00, 0.5323437E+00, 0.5244550E+00, 0.5144050E+00, &
     & 0.5035024E+00, 0.4935459E+00, 0.4791320E+00, 0.4587505E+00, &
     & 0.4336844E+00, 0.3922542E+00, 0.3095039E+00, 0.3095039E+00 /
      data (ref_adm( 8,iz,36, 7),iz = 1,20) / &
     & 0.6900300E+00, 0.6900300E+00, 0.6805200E+00, 0.6456500E+00, &
     & 0.5481288E+00, 0.5508088E+00, 0.5522711E+00, 0.5476832E+00, &
     & 0.5402860E+00, 0.5324525E+00, 0.5244120E+00, 0.5143695E+00, &
     & 0.5035210E+00, 0.4935767E+00, 0.4792215E+00, 0.4588486E+00, &
     & 0.4336728E+00, 0.3921876E+00, 0.3094885E+00, 0.3094885E+00 /
      data (ref_adm( 8,iz,37, 7),iz = 1,20) / &
     & 0.6979100E+00, 0.6979100E+00, 0.5613369E+00, 0.5490891E+00, &
     & 0.5480835E+00, 0.5506899E+00, 0.5523821E+00, 0.5476260E+00, &
     & 0.5403430E+00, 0.5324152E+00, 0.5244996E+00, 0.5142049E+00, &
     & 0.5035232E+00, 0.4936529E+00, 0.4791608E+00, 0.4587833E+00, &
     & 0.4337697E+00, 0.3922507E+00, 0.3094767E+00, 0.3094767E+00 /
      data (ref_adm( 8,iz,38, 7),iz = 1,20) / &
     & 0.6979100E+00, 0.6979100E+00, 0.5613369E+00, 0.5490891E+00, &
     & 0.5480835E+00, 0.5506899E+00, 0.5523821E+00, 0.5476260E+00, &
     & 0.5403430E+00, 0.5324152E+00, 0.5244996E+00, 0.5142049E+00, &
     & 0.5035232E+00, 0.4936529E+00, 0.4791608E+00, 0.4587833E+00, &
     & 0.4337697E+00, 0.3922507E+00, 0.3094767E+00, 0.3094767E+00 /
! Solar Zenith Angle 35.0 Albedo  0.5638764E+00
      data (ref_adm( 8,iz, 1, 8),iz = 1,20) / &
     & 0.5019600E+00, 0.5019600E+00, 0.4705300E+00, 0.4598200E+00, &
     & 0.5213063E+00, 0.5254467E+00, 0.3398700E+00, 0.4535900E+00, &
     & 0.5508264E+00, 0.6335100E+00, 0.4422500E+00, 0.5675400E+00, &
     & 0.5901200E+00, 0.6444100E+00, 0.6267600E+00, 0.6533100E+00, &
     & 0.5790100E+00, 0.5361100E+00, 0.4969257E+00, 0.4969257E+00 /
      data (ref_adm( 8,iz, 2, 8),iz = 1,20) / &
     & 0.5019600E+00, 0.5019600E+00, 0.4705300E+00, 0.4598200E+00, &
     & 0.5213063E+00, 0.5254467E+00, 0.3398700E+00, 0.4535900E+00, &
     & 0.5508264E+00, 0.6335100E+00, 0.4422500E+00, 0.5675400E+00, &
     & 0.5901200E+00, 0.6444100E+00, 0.6267600E+00, 0.6533100E+00, &
     & 0.5790100E+00, 0.5361100E+00, 0.4969257E+00, 0.4969257E+00 /
      data (ref_adm( 8,iz, 3, 8),iz = 1,20) / &
     & 0.5228003E+00, 0.5228003E+00, 0.5409000E+00, 0.5589700E+00, &
     & 0.5212660E+00, 0.5255795E+00, 0.5322451E+00, 0.4882500E+00, &
     & 0.5501880E+00, 0.4467300E+00, 0.4999600E+00, 0.5373900E+00, &
     & 0.6250500E+00, 0.6354300E+00, 0.6093900E+00, 0.6545000E+00, &
     & 0.6223200E+00, 0.5969973E+00, 0.3110772E+00, 0.3110772E+00 /
      data (ref_adm( 8,iz, 4, 8),iz = 1,20) / &
     & 0.4432900E+00, 0.4432900E+00, 0.6298700E+00, 0.4624500E+00, &
     & 0.4851700E+00, 0.5097900E+00, 0.5671400E+00, 0.5929300E+00, &
     & 0.5482400E+00, 0.4540000E+00, 0.5646500E+00, 0.5966400E+00, &
     & 0.6129900E+00, 0.6223958E+00, 0.5999500E+00, 0.6020300E+00, &
     & 0.5810400E+00, 0.5150600E+00, 0.4916714E+00, 0.4916714E+00 /
      data (ref_adm( 8,iz, 5, 8),iz = 1,20) / &
     & 0.6428500E+00, 0.6428500E+00, 0.6191800E+00, 0.5197663E+00, &
     & 0.4187900E+00, 0.5245638E+00, 0.5290500E+00, 0.4448900E+00, &
     & 0.5487856E+00, 0.5110000E+00, 0.5722978E+00, 0.5188800E+00, &
     & 0.5910600E+00, 0.6189600E+00, 0.6040700E+00, 0.5962200E+00, &
     & 0.6152600E+00, 0.5469900E+00, 0.4868859E+00, 0.4868859E+00 /
      data (ref_adm( 8,iz, 6, 8),iz = 1,20) / &
     & 0.6598500E+00, 0.6598500E+00, 0.4457600E+00, 0.5198197E+00, &
     & 0.5211569E+00, 0.4482000E+00, 0.4216300E+00, 0.4883200E+00, &
     & 0.3953200E+00, 0.5584724E+00, 0.5707746E+00, 0.5356000E+00, &
     & 0.5313700E+00, 0.6681800E+00, 0.6410900E+00, 0.6363700E+00, &
     & 0.6307800E+00, 0.5954100E+00, 0.4812719E+00, 0.4812719E+00 /
      data (ref_adm( 8,iz, 7, 8),iz = 1,20) / &
     & 0.6270600E+00, 0.6270600E+00, 0.5446300E+00, 0.5196255E+00, &
     & 0.3118700E+00, 0.4330000E+00, 0.4473500E+00, 0.6022900E+00, &
     & 0.5032800E+00, 0.5562717E+00, 0.5488500E+00, 0.5755800E+00, &
     & 0.5629500E+00, 0.6134775E+00, 0.5765100E+00, 0.6444900E+00, &
     & 0.6229800E+00, 0.6217400E+00, 0.4750291E+00, 0.4750291E+00 /
      data (ref_adm( 8,iz, 8, 8),iz = 1,20) / &
     & 0.5668200E+00, 0.5668200E+00, 0.5199508E+00, 0.5196502E+00, &
     & 0.4864400E+00, 0.5338600E+00, 0.5289900E+00, 0.5882900E+00, &
     & 0.5665000E+00, 0.5547639E+00, 0.5497000E+00, 0.5239500E+00, &
     & 0.5659900E+00, 0.5516800E+00, 0.6199473E+00, 0.6480100E+00, &
     & 0.6133919E+00, 0.5735993E+00, 0.4689177E+00, 0.4689177E+00 /
      data (ref_adm( 8,iz, 9, 8),iz = 1,20) / &
     & 0.5145000E+00, 0.5145000E+00, 0.4849600E+00, 0.4636500E+00, &
     & 0.5207120E+00, 0.5731500E+00, 0.5472500E+00, 0.6387800E+00, &
     & 0.5731700E+00, 0.5609200E+00, 0.4989400E+00, 0.4865100E+00, &
     & 0.5895000E+00, 0.5942400E+00, 0.6143104E+00, 0.6190737E+00, &
     & 0.6082134E+00, 0.5682260E+00, 0.4628080E+00, 0.4628080E+00 /
      data (ref_adm( 8,iz,10, 8),iz = 1,20) / &
     & 0.6757500E+00, 0.6757500E+00, 0.5202755E+00, 0.5921300E+00, &
     & 0.4548000E+00, 0.3929800E+00, 0.3355900E+00, 0.5735300E+00, &
     & 0.4907900E+00, 0.5396000E+00, 0.5046300E+00, 0.5431200E+00, &
     & 0.5728200E+00, 0.4661400E+00, 0.5156000E+00, 0.6544400E+00, &
     & 0.6359400E+00, 0.5633709E+00, 0.4568652E+00, 0.4568652E+00 /
      data (ref_adm( 8,iz,11, 8),iz = 1,20) / &
     & 0.5382400E+00, 0.5382400E+00, 0.4728800E+00, 0.4625900E+00, &
     & 0.4313100E+00, 0.5093200E+00, 0.5069000E+00, 0.6046600E+00, &
     & 0.4775400E+00, 0.5472474E+00, 0.5571036E+00, 0.5297500E+00, &
     & 0.5708200E+00, 0.5350900E+00, 0.6014485E+00, 0.6331900E+00, &
     & 0.6341900E+00, 0.5574938E+00, 0.4512096E+00, 0.4512096E+00 /
      data (ref_adm( 8,iz,12, 8),iz = 1,20) / &
     & 0.6027100E+00, 0.6027100E+00, 0.5215700E+00, 0.5703900E+00, &
     & 0.5610100E+00, 0.5640300E+00, 0.5383500E+00, 0.5812200E+00, &
     & 0.4980900E+00, 0.5186200E+00, 0.5999800E+00, 0.5572400E+00, &
     & 0.5787393E+00, 0.5187600E+00, 0.5942432E+00, 0.6295100E+00, &
     & 0.5880100E+00, 0.5511951E+00, 0.4458003E+00, 0.4458003E+00 /
      data (ref_adm( 8,iz,13, 8),iz = 1,20) / &
     & 0.6036400E+00, 0.6036400E+00, 0.5200400E+00, 0.5368500E+00, &
     & 0.4941300E+00, 0.5589500E+00, 0.5918500E+00, 0.6149800E+00, &
     & 0.5909000E+00, 0.5838300E+00, 0.5938700E+00, 0.5615000E+00, &
     & 0.4963000E+00, 0.4987900E+00, 0.6456800E+00, 0.6787800E+00, &
     & 0.5767937E+00, 0.5425536E+00, 0.4402014E+00, 0.4402014E+00 /
      data (ref_adm( 8,iz,14, 8),iz = 1,20) / &
     & 0.5918800E+00, 0.5918800E+00, 0.6444900E+00, 0.5203208E+00, &
     & 0.6051300E+00, 0.5714700E+00, 0.5626400E+00, 0.6341500E+00, &
     & 0.5173500E+00, 0.4900200E+00, 0.6026100E+00, 0.5538800E+00, &
     & 0.5771900E+00, 0.5367400E+00, 0.6847900E+00, 0.6091600E+00, &
     & 0.5679354E+00, 0.5331816E+00, 0.4335256E+00, 0.4335256E+00 /
      data (ref_adm( 8,iz,15, 8),iz = 1,20) / &
     & 0.5845800E+00, 0.5845800E+00, 0.5945400E+00, 0.6412200E+00, &
     & 0.5817900E+00, 0.6490400E+00, 0.5984000E+00, 0.6861400E+00, &
     & 0.5298129E+00, 0.5357804E+00, 0.5428834E+00, 0.5185600E+00, &
     & 0.5625638E+00, 0.5132000E+00, 0.5792700E+00, 0.6066000E+00, &
     & 0.5585418E+00, 0.5244891E+00, 0.4261722E+00, 0.4261722E+00 /
      data (ref_adm( 8,iz,16, 8),iz = 1,20) / &
     & 0.5413600E+00, 0.5413600E+00, 0.6531000E+00, 0.6307100E+00, &
     & 0.5727900E+00, 0.6045700E+00, 0.5981600E+00, 0.5721600E+00, &
     & 0.6434500E+00, 0.5331157E+00, 0.5395713E+00, 0.5234700E+00, &
     & 0.5351300E+00, 0.5624200E+00, 0.5298400E+00, 0.5629909E+00, &
     & 0.5492436E+00, 0.5153280E+00, 0.4196424E+00, 0.4196424E+00 /
      data (ref_adm( 8,iz,17, 8),iz = 1,20) / &
     & 0.5636500E+00, 0.5636500E+00, 0.5225268E+00, 0.4437000E+00, &
     & 0.5412500E+00, 0.5961500E+00, 0.5906000E+00, 0.5859900E+00, &
     & 0.6903700E+00, 0.4832200E+00, 0.5010700E+00, 0.5343200E+00, &
     & 0.5575700E+00, 0.5024200E+00, 0.5834500E+00, 0.5557683E+00, &
     & 0.5412070E+00, 0.5062451E+00, 0.4135607E+00, 0.4135607E+00 /
      data (ref_adm( 8,iz,18, 8),iz = 1,20) / &
     & 0.5853194E+00, 0.5853194E+00, 0.4641600E+00, 0.5381700E+00, &
     & 0.5375000E+00, 0.5408300E+00, 0.5923300E+00, 0.6546900E+00, &
     & 0.6567900E+00, 0.5756873E+00, 0.5719440E+00, 0.5675167E+00, &
     & 0.5844200E+00, 0.5141800E+00, 0.5491100E+00, 0.5278443E+00, &
     & 0.5028619E+00, 0.4581774E+00, 0.3649602E+00, 0.3649602E+00 /
      data (ref_adm( 8,iz,19, 8),iz = 1,20) / &
     & 0.5850629E+00, 0.5850629E+00, 0.4439800E+00, 0.5925100E+00, &
     & 0.5633900E+00, 0.4984000E+00, 0.5549100E+00, 0.6806800E+00, &
     & 0.6721400E+00, 0.6464000E+00, 0.6098800E+00, 0.5671262E+00, &
     & 0.5386300E+00, 0.5779600E+00, 0.5439699E+00, 0.5255114E+00, &
     & 0.5003667E+00, 0.4558259E+00, 0.3637945E+00, 0.3637945E+00 /
      data (ref_adm( 8,iz,20, 8),iz = 1,20) / &
     & 0.6520900E+00, 0.6520900E+00, 0.4607900E+00, 0.5756900E+00, &
     & 0.5505000E+00, 0.5513600E+00, 0.6197200E+00, 0.6660600E+00, &
     & 0.6867300E+00, 0.6575800E+00, 0.5814800E+00, 0.5668046E+00, &
     & 0.5017700E+00, 0.4834900E+00, 0.4942900E+00, 0.5229924E+00, &
     & 0.4979963E+00, 0.4536247E+00, 0.3627997E+00, 0.3627997E+00 /
      data (ref_adm( 8,iz,21, 8),iz = 1,20) / &
     & 0.5180500E+00, 0.5180500E+00, 0.3275400E+00, 0.5576000E+00, &
     & 0.6272100E+00, 0.5926900E+00, 0.6249000E+00, 0.5888407E+00, &
     & 0.6730300E+00, 0.6654400E+00, 0.6415400E+00, 0.5664089E+00, &
     & 0.5580400E+00, 0.5158200E+00, 0.4974700E+00, 0.5421800E+00, &
     & 0.4955094E+00, 0.4514083E+00, 0.3618150E+00, 0.3618150E+00 /
      data (ref_adm( 8,iz,22, 8),iz = 1,20) / &
     & 0.6073200E+00, 0.6073200E+00, 0.5228646E+00, 0.3730600E+00, &
     & 0.5672400E+00, 0.6332900E+00, 0.5970700E+00, 0.5643800E+00, &
     & 0.5493800E+00, 0.6502700E+00, 0.6548100E+00, 0.5566000E+00, &
     & 0.5623062E+00, 0.6571200E+00, 0.4504900E+00, 0.4703500E+00, &
     & 0.5518275E+00, 0.5249816E+00, 0.4642610E+00, 0.4642610E+00 /
      data (ref_adm( 8,iz,23, 8),iz = 1,20) / &
     & 0.5222222E+00, 0.5222222E+00, 0.5230105E+00, 0.5245538E+00, &
     & 0.5267745E+00, 0.6537400E+00, 0.6203600E+00, 0.5753200E+00, &
     & 0.5719800E+00, 0.6614200E+00, 0.6692400E+00, 0.6157100E+00, &
     & 0.5342900E+00, 0.5550300E+00, 0.5628759E+00, 0.5584989E+00, &
     & 0.5473548E+00, 0.5209452E+00, 0.4664221E+00, 0.4664221E+00 /
      data (ref_adm( 8,iz,24, 8),iz = 1,20) / &
     & 0.5531400E+00, 0.5531400E+00, 0.4756500E+00, 0.5248839E+00, &
     & 0.5272243E+00, 0.5301220E+00, 0.6773000E+00, 0.5997200E+00, &
     & 0.5891900E+00, 0.6303000E+00, 0.6526100E+00, 0.6012200E+00, &
     & 0.5568300E+00, 0.5175100E+00, 0.5818400E+00, 0.5521900E+00, &
     & 0.4187900E+00, 0.5197900E+00, 0.4709448E+00, 0.4709448E+00 /
      data (ref_adm( 8,iz,25, 8),iz = 1,20) / &
     & 0.3922500E+00, 0.3922500E+00, 0.5616800E+00, 0.5370700E+00, &
     & 0.5274790E+00, 0.5304143E+00, 0.5338781E+00, 0.6420000E+00, &
     & 0.6058600E+00, 0.6158300E+00, 0.5850800E+00, 0.6214400E+00, &
     & 0.6317000E+00, 0.5750200E+00, 0.5512700E+00, 0.5487300E+00, &
     & 0.4777200E+00, 0.5204124E+00, 0.4772350E+00, 0.4772350E+00 /
      data (ref_adm( 8,iz,26, 8),iz = 1,20) / &
     & 0.5659400E+00, 0.5659400E+00, 0.5527300E+00, 0.5253982E+00, &
     & 0.4283100E+00, 0.4644300E+00, 0.5348516E+00, 0.5397341E+00, &
     & 0.5790400E+00, 0.6057500E+00, 0.5327000E+00, 0.5857500E+00, &
     & 0.6138700E+00, 0.6211500E+00, 0.5239400E+00, 0.5031900E+00, &
     & 0.4580300E+00, 0.4408400E+00, 0.4861103E+00, 0.4861103E+00 /
      data (ref_adm( 8,iz,27, 8),iz = 1,20) / &
     & 0.5890100E+00, 0.5890100E+00, 0.5750500E+00, 0.5470500E+00, &
     & 0.5277739E+00, 0.5317051E+00, 0.5373600E+00, 0.5437337E+00, &
     & 0.4327800E+00, 0.6054100E+00, 0.5846100E+00, 0.5586300E+00, &
     & 0.5873800E+00, 0.4439600E+00, 0.5353700E+00, 0.5675900E+00, &
     & 0.4997000E+00, 0.4514800E+00, 0.4968814E+00, 0.4968814E+00 /
      data (ref_adm( 8,iz,28, 8),iz = 1,20) / &
     & 0.4889700E+00, 0.4889700E+00, 0.4618700E+00, 0.5255300E+00, &
     & 0.6157100E+00, 0.6518800E+00, 0.6178900E+00, 0.6222500E+00, &
     & 0.5618423E+00, 0.3557400E+00, 0.6126000E+00, 0.3734500E+00, &
     & 0.5688500E+00, 0.5770000E+00, 0.5398700E+00, 0.5061800E+00, &
     & 0.4240300E+00, 0.4632900E+00, 0.5087051E+00, 0.5087051E+00 /
      data (ref_adm( 8,iz,29, 8),iz = 1,20) / &
     & 0.5244200E+00, 0.5244200E+00, 0.5610900E+00, 0.5555400E+00, &
     & 0.4779300E+00, 0.4797100E+00, 0.4697900E+00, 0.5593800E+00, &
     & 0.5404200E+00, 0.5208700E+00, 0.4828300E+00, 0.6357400E+00, &
     & 0.5755700E+00, 0.6653700E+00, 0.6067960E+00, 0.5981111E+00, &
     & 0.5791076E+00, 0.4135300E+00, 0.5208963E+00, 0.5208963E+00 /
      data (ref_adm( 8,iz,30, 8),iz = 1,20) / &
     & 0.5322600E+00, 0.5322600E+00, 0.4482100E+00, 0.4521100E+00, &
     & 0.4416900E+00, 0.5060800E+00, 0.3845400E+00, 0.2955200E+00, &
     & 0.5386500E+00, 0.5380400E+00, 0.4172900E+00, 0.5398700E+00, &
     & 0.5708600E+00, 0.6566100E+00, 0.6050814E+00, 0.6077471E+00, &
     & 0.6016821E+00, 0.5726721E+00, 0.5358065E+00, 0.5358065E+00 /
      data (ref_adm( 8,iz,31, 8),iz = 1,20) / &
     & 0.5349100E+00, 0.5349100E+00, 0.5236952E+00, 0.3582100E+00, &
     & 0.3752300E+00, 0.5163800E+00, 0.5015200E+00, 0.5366700E+00, &
     & 0.5681550E+00, 0.4619000E+00, 0.5846862E+00, 0.5946301E+00, &
     & 0.6594300E+00, 0.5423200E+00, 0.5913000E+00, 0.6078347E+00, &
     & 0.6033487E+00, 0.5914320E+00, 0.5531627E+00, 0.5531627E+00 /
      data (ref_adm( 8,iz,32, 8),iz = 1,20) / &
     & 0.5543500E+00, 0.5543500E+00, 0.4677200E+00, 0.4100700E+00, &
     & 0.3189700E+00, 0.6838300E+00, 0.6233000E+00, 0.5948300E+00, &
     & 0.6680300E+00, 0.7024500E+00, 0.6732300E+00, 0.5933500E+00, &
     & 0.6399900E+00, 0.5795600E+00, 0.6166500E+00, 0.5026700E+00, &
     & 0.6082351E+00, 0.5931072E+00, 0.5672863E+00, 0.5672863E+00 /
      data (ref_adm( 8,iz,33, 8),iz = 1,20) / &
     & 0.4612300E+00, 0.4612300E+00, 0.4162700E+00, 0.4414800E+00, &
     & 0.5465700E+00, 0.6156600E+00, 0.6824900E+00, 0.6003600E+00, &
     & 0.6174600E+00, 0.6900200E+00, 0.6100800E+00, 0.6129900E+00, &
     & 0.6149700E+00, 0.5081700E+00, 0.4725500E+00, 0.6194662E+00, &
     & 0.6164679E+00, 0.5985739E+00, 0.5748613E+00, 0.5748613E+00 /
      data (ref_adm( 8,iz,34, 8),iz = 1,20) / &
     & 0.4434300E+00, 0.4434300E+00, 0.3063900E+00, 0.5746700E+00, &
     & 0.5659000E+00, 0.5853600E+00, 0.6246500E+00, 0.6474600E+00, &
     & 0.6432000E+00, 0.6493300E+00, 0.6600700E+00, 0.6596100E+00, &
     & 0.6383100E+00, 0.6022784E+00, 0.5980600E+00, 0.6158496E+00, &
     & 0.6185420E+00, 0.6063630E+00, 0.5815524E+00, 0.5815524E+00 /
      data (ref_adm( 8,iz,35, 8),iz = 1,20) / &
     & 0.5850200E+00, 0.5850200E+00, 0.4097000E+00, 0.5692900E+00, &
     & 0.6607200E+00, 0.5561236E+00, 0.5110200E+00, 0.6872400E+00, &
     & 0.6725300E+00, 0.6698100E+00, 0.6750900E+00, 0.5715600E+00, &
     & 0.4293200E+00, 0.4296000E+00, 0.6076473E+00, 0.6116382E+00, &
     & 0.6159711E+00, 0.6107817E+00, 0.5882775E+00, 0.5882775E+00 /
      data (ref_adm( 8,iz,36, 8),iz = 1,20) / &
     & 0.5459900E+00, 0.5459900E+00, 0.5505400E+00, 0.4931600E+00, &
     & 0.5378400E+00, 0.6156300E+00, 0.5845200E+00, 0.6619300E+00, &
     & 0.6860600E+00, 0.6815100E+00, 0.6761500E+00, 0.6570300E+00, &
     & 0.6048169E+00, 0.6104762E+00, 0.6112802E+00, 0.6111614E+00, &
     & 0.6128599E+00, 0.6115037E+00, 0.5931409E+00, 0.5931409E+00 /
      data (ref_adm( 8,iz,37, 8),iz = 1,20) / &
     & 0.5399900E+00, 0.5399900E+00, 0.4205100E+00, 0.4288400E+00, &
     & 0.4681400E+00, 0.7016500E+00, 0.6935200E+00, 0.6800200E+00, &
     & 0.6963700E+00, 0.6955700E+00, 0.6627700E+00, 0.5946901E+00, &
     & 0.6348293E+00, 0.6422190E+00, 0.6161158E+00, 0.6122919E+00, &
     & 0.6119114E+00, 0.6112829E+00, 0.5959421E+00, 0.5959421E+00 /
      data (ref_adm( 8,iz,38, 8),iz = 1,20) / &
     & 0.5399900E+00, 0.5399900E+00, 0.4205100E+00, 0.4288400E+00, &
     & 0.4681400E+00, 0.7016500E+00, 0.6935200E+00, 0.6800200E+00, &
     & 0.6963700E+00, 0.6955700E+00, 0.6627700E+00, 0.5946901E+00, &
     & 0.6348293E+00, 0.6422190E+00, 0.6161158E+00, 0.6122919E+00, &
     & 0.6119114E+00, 0.6112829E+00, 0.5959421E+00, 0.5959421E+00 /
! Solar Zenith Angle 40.0 Albedo  0.5284630E+00
      data (ref_adm( 8,iz, 1, 9),iz = 1,20) / &
     & 0.4839600E+00, 0.4839600E+00, 0.4932384E+00, 0.4279300E+00, &
     & 0.4811000E+00, 0.4904600E+00, 0.5369700E+00, 0.5993500E+00, &
     & 0.5876100E+00, 0.6052900E+00, 0.6369700E+00, 0.6127600E+00, &
     & 0.5935900E+00, 0.5851000E+00, 0.5835600E+00, 0.6245300E+00, &
     & 0.6302400E+00, 0.6157246E+00, 0.5338819E+00, 0.5338819E+00 /
      data (ref_adm( 8,iz, 2, 9),iz = 1,20) / &
     & 0.4839600E+00, 0.4839600E+00, 0.4932384E+00, 0.4279300E+00, &
     & 0.4811000E+00, 0.4904600E+00, 0.5369700E+00, 0.5993500E+00, &
     & 0.5876100E+00, 0.6052900E+00, 0.6369700E+00, 0.6127600E+00, &
     & 0.5935900E+00, 0.5851000E+00, 0.5835600E+00, 0.6245300E+00, &
     & 0.6302400E+00, 0.6157246E+00, 0.5338819E+00, 0.5338819E+00 /
      data (ref_adm( 8,iz, 3, 9),iz = 1,20) / &
     & 0.4936561E+00, 0.4936561E+00, 0.4960500E+00, 0.4947726E+00, &
     & 0.4418700E+00, 0.5385100E+00, 0.5460500E+00, 0.4929000E+00, &
     & 0.5776500E+00, 0.6323500E+00, 0.5318800E+00, 0.5371400E+00, &
     & 0.5695700E+00, 0.6138000E+00, 0.5797200E+00, 0.6236400E+00, &
     & 0.6218000E+00, 0.6123022E+00, 0.4112771E+00, 0.4112771E+00 /
      data (ref_adm( 8,iz, 4, 9),iz = 1,20) / &
     & 0.4936344E+00, 0.4936344E+00, 0.4705700E+00, 0.4948140E+00, &
     & 0.5476900E+00, 0.5279300E+00, 0.4335800E+00, 0.5018900E+00, &
     & 0.6499300E+00, 0.5964600E+00, 0.5271400E+00, 0.4484400E+00, &
     & 0.6306900E+00, 0.5589000E+00, 0.5865500E+00, 0.5852500E+00, &
     & 0.6744400E+00, 0.6056046E+00, 0.5274721E+00, 0.5274721E+00 /
      data (ref_adm( 8,iz, 5, 9),iz = 1,20) / &
     & 0.4937730E+00, 0.4937730E+00, 0.6000600E+00, 0.5809000E+00, &
     & 0.4167500E+00, 0.3624500E+00, 0.4406300E+00, 0.4374700E+00, &
     & 0.5583100E+00, 0.5723800E+00, 0.4575800E+00, 0.4247400E+00, &
     & 0.5632600E+00, 0.5549900E+00, 0.5886100E+00, 0.5652900E+00, &
     & 0.6515700E+00, 0.5958669E+00, 0.5218595E+00, 0.5218595E+00 /
      data (ref_adm( 8,iz, 6, 9),iz = 1,20) / &
     & 0.4907300E+00, 0.4907300E+00, 0.4826500E+00, 0.4404000E+00, &
     & 0.4039500E+00, 0.4013200E+00, 0.4632300E+00, 0.4507600E+00, &
     & 0.5740800E+00, 0.5489700E+00, 0.4751300E+00, 0.3196900E+00, &
     & 0.5751000E+00, 0.5813500E+00, 0.6249500E+00, 0.6475800E+00, &
     & 0.7104300E+00, 0.5840092E+00, 0.5117962E+00, 0.5117962E+00 /
      data (ref_adm( 8,iz, 7, 9),iz = 1,20) / &
     & 0.4526600E+00, 0.4526600E+00, 0.6125700E+00, 0.4943748E+00, &
     & 0.4975417E+00, 0.5838600E+00, 0.6294900E+00, 0.5140100E+00, &
     & 0.5435800E+00, 0.4508300E+00, 0.4438600E+00, 0.3629400E+00, &
     & 0.5707900E+00, 0.5585100E+00, 0.6264600E+00, 0.6744600E+00, &
     & 0.6596400E+00, 0.5626700E+00, 0.4982624E+00, 0.4982624E+00 /
      data (ref_adm( 8,iz, 8, 9),iz = 1,20) / &
     & 0.5449100E+00, 0.5449100E+00, 0.5215200E+00, 0.4893000E+00, &
     & 0.4684700E+00, 0.4808900E+00, 0.4518700E+00, 0.4549100E+00, &
     & 0.4870100E+00, 0.4355000E+00, 0.4823200E+00, 0.4858000E+00, &
     & 0.4854700E+00, 0.5840400E+00, 0.5806100E+00, 0.6020600E+00, &
     & 0.6502700E+00, 0.5609750E+00, 0.4848557E+00, 0.4848557E+00 /
      data (ref_adm( 8,iz, 9, 9),iz = 1,20) / &
     & 0.4966800E+00, 0.4966800E+00, 0.4466600E+00, 0.4941460E+00, &
     & 0.4967511E+00, 0.5008071E+00, 0.5495000E+00, 0.4270800E+00, &
     & 0.4531300E+00, 0.4290700E+00, 0.4276500E+00, 0.4681600E+00, &
     & 0.4906200E+00, 0.5541400E+00, 0.5486300E+00, 0.6052700E+00, &
     & 0.5738441E+00, 0.5512763E+00, 0.4732859E+00, 0.4732859E+00 /
      data (ref_adm( 8,iz,10, 9),iz = 1,20) / &
     & 0.4885900E+00, 0.4885900E+00, 0.5458400E+00, 0.5212800E+00, &
     & 0.5740500E+00, 0.3438600E+00, 0.5168000E+00, 0.4484800E+00, &
     & 0.4256600E+00, 0.4241700E+00, 0.4726400E+00, 0.5034300E+00, &
     & 0.5543000E+00, 0.5929000E+00, 0.5245200E+00, 0.5746421E+00, &
     & 0.5674959E+00, 0.5263300E+00, 0.4631712E+00, 0.4631712E+00 /
      data (ref_adm( 8,iz,11, 9),iz = 1,20) / &
     & 0.5856800E+00, 0.5856800E+00, 0.5721200E+00, 0.4268000E+00, &
     & 0.4891000E+00, 0.4876400E+00, 0.4539700E+00, 0.4099200E+00, &
     & 0.4784200E+00, 0.4152400E+00, 0.4745500E+00, 0.5170900E+00, &
     & 0.4676000E+00, 0.5841800E+00, 0.4410100E+00, 0.5677547E+00, &
     & 0.5607396E+00, 0.5351037E+00, 0.4542878E+00, 0.4542878E+00 /
      data (ref_adm( 8,iz,12, 9),iz = 1,20) / &
     & 0.4385600E+00, 0.4385600E+00, 0.5372500E+00, 0.5619100E+00, &
     & 0.5733000E+00, 0.5942700E+00, 0.5622900E+00, 0.5201400E+00, &
     & 0.5764100E+00, 0.4408300E+00, 0.5137600E+00, 0.4728300E+00, &
     & 0.5666800E+00, 0.5504600E+00, 0.5588900E+00, 0.6666800E+00, &
     & 0.5535898E+00, 0.5281821E+00, 0.4464613E+00, 0.4464613E+00 /
      data (ref_adm( 8,iz,13, 9),iz = 1,20) / &
     & 0.5016300E+00, 0.5016300E+00, 0.5091500E+00, 0.5121100E+00, &
     & 0.5624600E+00, 0.5164600E+00, 0.5200000E+00, 0.5485100E+00, &
     & 0.5625800E+00, 0.5595100E+00, 0.5768100E+00, 0.5698200E+00, &
     & 0.5477700E+00, 0.5671100E+00, 0.6728700E+00, 0.6707500E+00, &
     & 0.6615300E+00, 0.5210743E+00, 0.4393465E+00, 0.4393465E+00 /
      data (ref_adm( 8,iz,14, 9),iz = 1,20) / &
     & 0.5141500E+00, 0.5141500E+00, 0.4521900E+00, 0.5148000E+00, &
     & 0.5383200E+00, 0.4065900E+00, 0.4233000E+00, 0.4751600E+00, &
     & 0.4553300E+00, 0.4568400E+00, 0.4769900E+00, 0.4736500E+00, &
     & 0.5198400E+00, 0.5686400E+00, 0.6354600E+00, 0.5872300E+00, &
     & 0.6588700E+00, 0.5402700E+00, 0.4323491E+00, 0.4323491E+00 /
      data (ref_adm( 8,iz,15, 9),iz = 1,20) / &
     & 0.4565300E+00, 0.4565300E+00, 0.5556600E+00, 0.5883400E+00, &
     & 0.5766900E+00, 0.5541700E+00, 0.5424000E+00, 0.5085600E+00, &
     & 0.5307600E+00, 0.4176800E+00, 0.3783900E+00, 0.5080400E+00, &
     & 0.4317100E+00, 0.4620600E+00, 0.6699400E+00, 0.5966000E+00, &
     & 0.5898900E+00, 0.5345700E+00, 0.4247847E+00, 0.4247847E+00 /
      data (ref_adm( 8,iz,16, 9),iz = 1,20) / &
     & 0.4594700E+00, 0.4594700E+00, 0.5823000E+00, 0.5757300E+00, &
     & 0.6818200E+00, 0.6310700E+00, 0.5478900E+00, 0.5306000E+00, &
     & 0.6146100E+00, 0.4487200E+00, 0.3981600E+00, 0.4340500E+00, &
     & 0.4714700E+00, 0.5347900E+00, 0.5694100E+00, 0.5116400E+00, &
     & 0.5187604E+00, 0.5675400E+00, 0.4168054E+00, 0.4168054E+00 /
      data (ref_adm( 8,iz,17, 9),iz = 1,20) / &
     & 0.4851400E+00, 0.4851400E+00, 0.5030500E+00, 0.2905100E+00, &
     & 0.5410400E+00, 0.6374700E+00, 0.6257500E+00, 0.5521300E+00, &
     & 0.6444100E+00, 0.4580600E+00, 0.4334300E+00, 0.4620000E+00, &
     & 0.5188900E+00, 0.5028200E+00, 0.5911200E+00, 0.6186900E+00, &
     & 0.5105729E+00, 0.4856210E+00, 0.4099894E+00, 0.4099894E+00 /
      data (ref_adm( 8,iz,18, 9),iz = 1,20) / &
     & 0.4612600E+00, 0.4612600E+00, 0.5730300E+00, 0.5283000E+00, &
     & 0.3535200E+00, 0.4896500E+00, 0.5994900E+00, 0.6079500E+00, &
     & 0.4973400E+00, 0.4740700E+00, 0.4510800E+00, 0.3587800E+00, &
     & 0.5215000E+00, 0.4747900E+00, 0.5408200E+00, 0.4552600E+00, &
     & 0.5291350E+00, 0.5201072E+00, 0.4614937E+00, 0.4614937E+00 /
      data (ref_adm( 8,iz,19, 9),iz = 1,20) / &
     & 0.5078500E+00, 0.5078500E+00, 0.5907700E+00, 0.5699500E+00, &
     & 0.4725300E+00, 0.5478900E+00, 0.5796300E+00, 0.6595800E+00, &
     & 0.6285800E+00, 0.4590700E+00, 0.4401900E+00, 0.4354700E+00, &
     & 0.5638700E+00, 0.5939300E+00, 0.5184700E+00, 0.5193000E+00, &
     & 0.5244873E+00, 0.5132921E+00, 0.4549194E+00, 0.4549194E+00 /
      data (ref_adm( 8,iz,20, 9),iz = 1,20) / &
     & 0.3779600E+00, 0.3779600E+00, 0.4219900E+00, 0.5103800E+00, &
     & 0.5271000E+00, 0.5980600E+00, 0.5614100E+00, 0.5875900E+00, &
     & 0.6224700E+00, 0.3738800E+00, 0.4383100E+00, 0.4309000E+00, &
     & 0.4333200E+00, 0.5147800E+00, 0.5057600E+00, 0.5228640E+00, &
     & 0.5202669E+00, 0.5082730E+00, 0.4512795E+00, 0.4512795E+00 /
      data (ref_adm( 8,iz,21, 9),iz = 1,20) / &
     & 0.3409600E+00, 0.3409600E+00, 0.3435000E+00, 0.3216600E+00, &
     & 0.5130814E+00, 0.6064300E+00, 0.5750800E+00, 0.5275100E+00, &
     & 0.5635500E+00, 0.4779600E+00, 0.4608800E+00, 0.3775100E+00, &
     & 0.4490000E+00, 0.4528000E+00, 0.5453200E+00, 0.5870200E+00, &
     & 0.5169477E+00, 0.5036160E+00, 0.4492746E+00, 0.4492746E+00 /
      data (ref_adm( 8,iz,22, 9),iz = 1,20) / &
     & 0.5727800E+00, 0.5727800E+00, 0.5708500E+00, 0.6049100E+00, &
     & 0.5197400E+00, 0.4103700E+00, 0.5726000E+00, 0.4919900E+00, &
     & 0.5825400E+00, 0.6237300E+00, 0.6046700E+00, 0.4275500E+00, &
     & 0.5522200E+00, 0.4434100E+00, 0.5436000E+00, 0.5076600E+00, &
     & 0.6609296E+00, 0.6697490E+00, 0.6419322E+00, 0.6419322E+00 /
      data (ref_adm( 8,iz,23, 9),iz = 1,20) / &
     & 0.5740200E+00, 0.5740200E+00, 0.5453600E+00, 0.5854200E+00, &
     & 0.5897700E+00, 0.4698434E+00, 0.6117500E+00, 0.5969600E+00, &
     & 0.5674900E+00, 0.6158600E+00, 0.6223700E+00, 0.4631200E+00, &
     & 0.4548100E+00, 0.4662500E+00, 0.5707100E+00, 0.6293672E+00, &
     & 0.6458389E+00, 0.6539094E+00, 0.6380455E+00, 0.6380455E+00 /
      data (ref_adm( 8,iz,24, 9),iz = 1,20) / &
     & 0.5206800E+00, 0.5206800E+00, 0.5328400E+00, 0.4594169E+00, &
     & 0.4573100E+00, 0.4596700E+00, 0.4737245E+00, 0.5159600E+00, &
     & 0.5662200E+00, 0.6234900E+00, 0.6425400E+00, 0.5697100E+00, &
     & 0.4155700E+00, 0.4821800E+00, 0.6043400E+00, 0.5760000E+00, &
     & 0.4112500E+00, 0.6422048E+00, 0.6388023E+00, 0.6388023E+00 /
      data (ref_adm( 8,iz,25, 9),iz = 1,20) / &
     & 0.4726400E+00, 0.4726400E+00, 0.2852700E+00, 0.4807400E+00, &
     & 0.5006600E+00, 0.4652593E+00, 0.4716972E+00, 0.4798264E+00, &
     & 0.6198700E+00, 0.5224800E+00, 0.5972200E+00, 0.5964800E+00, &
     & 0.4349800E+00, 0.4636100E+00, 0.5641500E+00, 0.6111000E+00, &
     & 0.5305900E+00, 0.6339656E+00, 0.6424454E+00, 0.6424454E+00 /
      data (ref_adm( 8,iz,26, 9),iz = 1,20) / &
     & 0.4459700E+00, 0.4459700E+00, 0.3598200E+00, 0.3948300E+00, &
     & 0.4519200E+00, 0.4634400E+00, 0.4173000E+00, 0.4790719E+00, &
     & 0.3316600E+00, 0.5326300E+00, 0.6159900E+00, 0.5914100E+00, &
     & 0.5363300E+00, 0.4586200E+00, 0.5691400E+00, 0.4870800E+00, &
     & 0.4846700E+00, 0.6330471E+00, 0.6528651E+00, 0.6528651E+00 /
      data (ref_adm( 8,iz,27, 9),iz = 1,20) / &
     & 0.4699100E+00, 0.4699100E+00, 0.4873700E+00, 0.4460600E+00, &
     & 0.4697600E+00, 0.4530000E+00, 0.4727500E+00, 0.4852700E+00, &
     & 0.4944200E+00, 0.5399900E+00, 0.5677000E+00, 0.5663000E+00, &
     & 0.5553100E+00, 0.4873000E+00, 0.5755800E+00, 0.5046000E+00, &
     & 0.4620300E+00, 0.4487600E+00, 0.2949900E+00, 0.2949900E+00 /
      data (ref_adm( 8,iz,28, 9),iz = 1,20) / &
     & 0.4805800E+00, 0.4805800E+00, 0.5277700E+00, 0.5015000E+00, &
     & 0.5818300E+00, 0.5761500E+00, 0.6006100E+00, 0.5891000E+00, &
     & 0.5992600E+00, 0.5616700E+00, 0.6155400E+00, 0.5614600E+00, &
     & 0.5409800E+00, 0.5421800E+00, 0.5691000E+00, 0.5282800E+00, &
     & 0.5160700E+00, 0.4833200E+00, 0.3629100E+00, 0.3629100E+00 /
      data (ref_adm( 8,iz,29, 9),iz = 1,20) / &
     & 0.4838300E+00, 0.4838300E+00, 0.4541333E+00, 0.5192400E+00, &
     & 0.5308900E+00, 0.5883000E+00, 0.6046000E+00, 0.5151300E+00, &
     & 0.4633500E+00, 0.4742700E+00, 0.5977900E+00, 0.5243900E+00, &
     & 0.5429600E+00, 0.5242800E+00, 0.5308800E+00, 0.4729000E+00, &
     & 0.5524500E+00, 0.4435300E+00, 0.3852800E+00, 0.3852800E+00 /
      data (ref_adm( 8,iz,30, 9),iz = 1,20) / &
     & 0.4848900E+00, 0.4848900E+00, 0.4411600E+00, 0.3419400E+00, &
     & 0.3818900E+00, 0.5299800E+00, 0.4939400E+00, 0.5440000E+00, &
     & 0.5157800E+00, 0.5336300E+00, 0.5262400E+00, 0.5125000E+00, &
     & 0.4949900E+00, 0.5503700E+00, 0.4591700E+00, 0.4832800E+00, &
     & 0.4310800E+00, 0.6728867E+00, 0.3172100E+00, 0.3172100E+00 /
      data (ref_adm( 8,iz,31, 9),iz = 1,20) / &
     & 0.5026200E+00, 0.5026200E+00, 0.5072300E+00, 0.4808000E+00, &
     & 0.4489700E+00, 0.4666900E+00, 0.5940800E+00, 0.5973800E+00, &
     & 0.5945900E+00, 0.5674600E+00, 0.5276400E+00, 0.5048800E+00, &
     & 0.4129100E+00, 0.4436900E+00, 0.4598900E+00, 0.4524300E+00, &
     & 0.4652200E+00, 0.6930561E+00, 0.7499969E+00, 0.7499969E+00 /
      data (ref_adm( 8,iz,32, 9),iz = 1,20) / &
     & 0.5415500E+00, 0.5415500E+00, 0.4331300E+00, 0.2773600E+00, &
     & 0.5298200E+00, 0.5691700E+00, 0.5573300E+00, 0.6109200E+00, &
     & 0.6415300E+00, 0.6592200E+00, 0.6395800E+00, 0.5176500E+00, &
     & 0.5476700E+00, 0.5970600E+00, 0.5608000E+00, 0.5938400E+00, &
     & 0.5075000E+00, 0.7136043E+00, 0.7727434E+00, 0.7727434E+00 /
      data (ref_adm( 8,iz,33, 9),iz = 1,20) / &
     & 0.4445300E+00, 0.4445300E+00, 0.5487100E+00, 0.5772000E+00, &
     & 0.4559716E+00, 0.4787200E+00, 0.4667200E+00, 0.5657200E+00, &
     & 0.6162100E+00, 0.5903400E+00, 0.6327800E+00, 0.5651200E+00, &
     & 0.5523500E+00, 0.4803500E+00, 0.5428700E+00, 0.5586300E+00, &
     & 0.4452400E+00, 0.7293464E+00, 0.7950697E+00, 0.7950697E+00 /
      data (ref_adm( 8,iz,34, 9),iz = 1,20) / &
     & 0.5626000E+00, 0.5626000E+00, 0.4911800E+00, 0.5360100E+00, &
     & 0.5436700E+00, 0.4617681E+00, 0.4961200E+00, 0.5194600E+00, &
     & 0.6105700E+00, 0.6114800E+00, 0.6535300E+00, 0.6292400E+00, &
     & 0.6324000E+00, 0.4573200E+00, 0.5235500E+00, 0.5611000E+00, &
     & 0.5454700E+00, 0.7215820E+00, 0.8099581E+00, 0.8099581E+00 /
      data (ref_adm( 8,iz,35, 9),iz = 1,20) / &
     & 0.4586899E+00, 0.4586899E+00, 0.2282400E+00, 0.3017500E+00, &
     & 0.3578700E+00, 0.4366600E+00, 0.4581100E+00, 0.3703200E+00, &
     & 0.6183400E+00, 0.5837300E+00, 0.6449400E+00, 0.6464700E+00, &
     & 0.6206700E+00, 0.4950900E+00, 0.4651000E+00, 0.6443282E+00, &
     & 0.6691489E+00, 0.7073964E+00, 0.8133355E+00, 0.8133355E+00 /
      data (ref_adm( 8,iz,36, 9),iz = 1,20) / &
     & 0.5384000E+00, 0.5384000E+00, 0.5828100E+00, 0.2791600E+00, &
     & 0.5453100E+00, 0.4528500E+00, 0.5008800E+00, 0.5537900E+00, &
     & 0.5634300E+00, 0.6413100E+00, 0.6406000E+00, 0.6203400E+00, &
     & 0.6361900E+00, 0.5944791E+00, 0.6240482E+00, 0.6520265E+00, &
     & 0.6730918E+00, 0.7028072E+00, 0.8115075E+00, 0.8115075E+00 /
      data (ref_adm( 8,iz,37, 9),iz = 1,20) / &
     & 0.5108700E+00, 0.5108700E+00, 0.5212800E+00, 0.6464500E+00, &
     & 0.4557937E+00, 0.3676600E+00, 0.3345700E+00, 0.4070100E+00, &
     & 0.4985100E+00, 0.6061300E+00, 0.6302000E+00, 0.6417900E+00, &
     & 0.5884700E+00, 0.3923600E+00, 0.6643339E+00, 0.7086337E+00, &
     & 0.6801636E+00, 0.7042172E+00, 0.8106143E+00, 0.8106143E+00 /
      data (ref_adm( 8,iz,38, 9),iz = 1,20) / &
     & 0.5108700E+00, 0.5108700E+00, 0.5212800E+00, 0.6464500E+00, &
     & 0.4557937E+00, 0.3676600E+00, 0.3345700E+00, 0.4070100E+00, &
     & 0.4985100E+00, 0.6061300E+00, 0.6302000E+00, 0.6417900E+00, &
     & 0.5884700E+00, 0.3923600E+00, 0.6643339E+00, 0.7086337E+00, &
     & 0.6801636E+00, 0.7042172E+00, 0.8106143E+00, 0.8106143E+00 /
! Solar Zenith Angle 45.0 Albedo  0.5305926E+00
      data (ref_adm( 8,iz, 1,10),iz = 1,20) / &
     & 0.4824100E+00, 0.4824100E+00, 0.5020400E+00, 0.5761600E+00, &
     & 0.5733600E+00, 0.4929800E+00, 0.5475200E+00, 0.4791700E+00, &
     & 0.5191500E+00, 0.6054900E+00, 0.5651900E+00, 0.5597900E+00, &
     & 0.6413300E+00, 0.6857600E+00, 0.6964000E+00, 0.7142200E+00, &
     & 0.7333300E+00, 0.6987800E+00, 0.5447744E+00, 0.5447744E+00 /
      data (ref_adm( 8,iz, 2,10),iz = 1,20) / &
     & 0.4824100E+00, 0.4824100E+00, 0.5020400E+00, 0.5761600E+00, &
     & 0.5733600E+00, 0.4929800E+00, 0.5475200E+00, 0.4791700E+00, &
     & 0.5191500E+00, 0.6054900E+00, 0.5651900E+00, 0.5597900E+00, &
     & 0.6413300E+00, 0.6857600E+00, 0.6964000E+00, 0.7142200E+00, &
     & 0.7333300E+00, 0.6987800E+00, 0.5447744E+00, 0.5447744E+00 /
      data (ref_adm( 8,iz, 3,10),iz = 1,20) / &
     & 0.4735900E+00, 0.4735900E+00, 0.5230900E+00, 0.5687700E+00, &
     & 0.5705200E+00, 0.5401500E+00, 0.4874900E+00, 0.5323600E+00, &
     & 0.5518600E+00, 0.5884500E+00, 0.5593800E+00, 0.5699000E+00, &
     & 0.6194500E+00, 0.6286000E+00, 0.6679400E+00, 0.7017200E+00, &
     & 0.7041300E+00, 0.6847800E+00, 0.3874908E+00, 0.3874908E+00 /
      data (ref_adm( 8,iz, 4,10),iz = 1,20) / &
     & 0.5576900E+00, 0.5576900E+00, 0.5320800E+00, 0.5451300E+00, &
     & 0.4856300E+00, 0.5094700E+00, 0.5422200E+00, 0.5157600E+00, &
     & 0.5880600E+00, 0.5728100E+00, 0.5702400E+00, 0.5801800E+00, &
     & 0.5927400E+00, 0.6481300E+00, 0.6578300E+00, 0.6957200E+00, &
     & 0.7155600E+00, 0.5588000E+00, 0.5360703E+00, 0.5360703E+00 /
      data (ref_adm( 8,iz, 5,10),iz = 1,20) / &
     & 0.4963800E+00, 0.4963800E+00, 0.4909800E+00, 0.4785500E+00, &
     & 0.5115400E+00, 0.5327900E+00, 0.5769500E+00, 0.5705100E+00, &
     & 0.5510500E+00, 0.5495200E+00, 0.5719000E+00, 0.5837600E+00, &
     & 0.5917400E+00, 0.6338000E+00, 0.6296900E+00, 0.7139400E+00, &
     & 0.7410000E+00, 0.6534300E+00, 0.5278242E+00, 0.5278242E+00 /
      data (ref_adm( 8,iz, 6,10),iz = 1,20) / &
     & 0.4907300E+00, 0.4907300E+00, 0.5540000E+00, 0.4753300E+00, &
     & 0.5168600E+00, 0.5567500E+00, 0.5211700E+00, 0.5434000E+00, &
     & 0.5477100E+00, 0.5672600E+00, 0.5902800E+00, 0.5844700E+00, &
     & 0.6221100E+00, 0.6300000E+00, 0.6459000E+00, 0.6873000E+00, &
     & 0.7272300E+00, 0.5610900E+00, 0.5155542E+00, 0.5155542E+00 /
      data (ref_adm( 8,iz, 7,10),iz = 1,20) / &
     & 0.5171300E+00, 0.5171300E+00, 0.5219500E+00, 0.5181800E+00, &
     & 0.4985400E+00, 0.4676200E+00, 0.5081100E+00, 0.5267700E+00, &
     & 0.5298900E+00, 0.5636100E+00, 0.5736100E+00, 0.5774500E+00, &
     & 0.6074500E+00, 0.6160400E+00, 0.6237800E+00, 0.5745200E+00, &
     & 0.7717800E+00, 0.5639600E+00, 0.5008524E+00, 0.5008524E+00 /
      data (ref_adm( 8,iz, 8,10),iz = 1,20) / &
     & 0.5076600E+00, 0.5076600E+00, 0.5045100E+00, 0.4884200E+00, &
     & 0.4683000E+00, 0.4691600E+00, 0.4628400E+00, 0.4627700E+00, &
     & 0.5098800E+00, 0.5267500E+00, 0.5508400E+00, 0.5527200E+00, &
     & 0.5819300E+00, 0.5899500E+00, 0.6306300E+00, 0.6390600E+00, &
     & 0.6492200E+00, 0.5962439E+00, 0.4859475E+00, 0.4859475E+00 /
      data (ref_adm( 8,iz, 9,10),iz = 1,20) / &
     & 0.5110200E+00, 0.5110200E+00, 0.5205500E+00, 0.5116300E+00, &
     & 0.5070900E+00, 0.4937200E+00, 0.4839200E+00, 0.4654700E+00, &
     & 0.4438700E+00, 0.5161600E+00, 0.5294200E+00, 0.5372700E+00, &
     & 0.5597400E+00, 0.5775500E+00, 0.6043400E+00, 0.6106669E+00, &
     & 0.6951900E+00, 0.5049800E+00, 0.4720532E+00, 0.4720532E+00 /
      data (ref_adm( 8,iz,10,10),iz = 1,20) / &
     & 0.5314300E+00, 0.5314300E+00, 0.5233900E+00, 0.5059000E+00, &
     & 0.4818900E+00, 0.4798600E+00, 0.4933100E+00, 0.5119400E+00, &
     & 0.4760700E+00, 0.4916900E+00, 0.5043600E+00, 0.5924100E+00, &
     & 0.5790100E+00, 0.5873900E+00, 0.6198200E+00, 0.5640300E+00, &
     & 0.6247600E+00, 0.5297800E+00, 0.4591561E+00, 0.4591561E+00 /
      data (ref_adm( 8,iz,11,10),iz = 1,20) / &
     & 0.5049700E+00, 0.5049700E+00, 0.4811500E+00, 0.5243100E+00, &
     & 0.4988000E+00, 0.4809300E+00, 0.5126600E+00, 0.5256500E+00, &
     & 0.4897500E+00, 0.5073100E+00, 0.4911900E+00, 0.5079100E+00, &
     & 0.5807300E+00, 0.5426900E+00, 0.5974900E+00, 0.5866019E+00, &
     & 0.6610300E+00, 0.5736200E+00, 0.4473161E+00, 0.4473161E+00 /
      data (ref_adm( 8,iz,12,10),iz = 1,20) / &
     & 0.4809800E+00, 0.4809800E+00, 0.4601900E+00, 0.5138900E+00, &
     & 0.4824900E+00, 0.5143100E+00, 0.4942500E+00, 0.5657300E+00, &
     & 0.5241700E+00, 0.5247500E+00, 0.5233000E+00, 0.5203800E+00, &
     & 0.5217600E+00, 0.5667300E+00, 0.5790500E+00, 0.4538600E+00, &
     & 0.5670754E+00, 0.4377400E+00, 0.4366270E+00, 0.4366270E+00 /
      data (ref_adm( 8,iz,13,10),iz = 1,20) / &
     & 0.4960500E+00, 0.4960500E+00, 0.4961300E+00, 0.5124000E+00, &
     & 0.5068600E+00, 0.4812900E+00, 0.5020500E+00, 0.5370800E+00, &
     & 0.5586000E+00, 0.5451600E+00, 0.5617400E+00, 0.5563700E+00, &
     & 0.5236100E+00, 0.5517200E+00, 0.5437000E+00, 0.5676400E+00, &
     & 0.5536491E+00, 0.5214548E+00, 0.4269010E+00, 0.4269010E+00 /
      data (ref_adm( 8,iz,14,10),iz = 1,20) / &
     & 0.4824600E+00, 0.4824600E+00, 0.4938900E+00, 0.4804700E+00, &
     & 0.5013300E+00, 0.5261100E+00, 0.5214900E+00, 0.5251500E+00, &
     & 0.5226200E+00, 0.5147900E+00, 0.5203100E+00, 0.5323000E+00, &
     & 0.5417800E+00, 0.5344200E+00, 0.5218400E+00, 0.5479400E+00, &
     & 0.5144000E+00, 0.4475500E+00, 0.4179231E+00, 0.4179231E+00 /
      data (ref_adm( 8,iz,15,10),iz = 1,20) / &
     & 0.4724300E+00, 0.4724300E+00, 0.4499200E+00, 0.4202500E+00, &
     & 0.4566000E+00, 0.4661500E+00, 0.4719100E+00, 0.5618600E+00, &
     & 0.5049300E+00, 0.4908700E+00, 0.5327500E+00, 0.5399600E+00, &
     & 0.5349800E+00, 0.5391000E+00, 0.5446500E+00, 0.5318100E+00, &
     & 0.5975600E+00, 0.4961227E+00, 0.4092244E+00, 0.4092244E+00 /
      data (ref_adm( 8,iz,16,10),iz = 1,20) / &
     & 0.4605700E+00, 0.4605700E+00, 0.4881000E+00, 0.4761200E+00, &
     & 0.4614900E+00, 0.4231500E+00, 0.4924900E+00, 0.5338100E+00, &
     & 0.5372400E+00, 0.5061600E+00, 0.5268000E+00, 0.4880300E+00, &
     & 0.4928400E+00, 0.5049500E+00, 0.5499200E+00, 0.4552500E+00, &
     & 0.5529400E+00, 0.4850054E+00, 0.4010797E+00, 0.4010797E+00 /
      data (ref_adm( 8,iz,17,10),iz = 1,20) / &
     & 0.4952000E+00, 0.4952000E+00, 0.4886600E+00, 0.4763400E+00, &
     & 0.4455800E+00, 0.4789200E+00, 0.4561700E+00, 0.4872200E+00, &
     & 0.5205700E+00, 0.5293200E+00, 0.5412400E+00, 0.5323800E+00, &
     & 0.5451600E+00, 0.5105900E+00, 0.5848300E+00, 0.5207063E+00, &
     & 0.5266300E+00, 0.5161700E+00, 0.3942900E+00, 0.3942900E+00 /
      data (ref_adm( 8,iz,18,10),iz = 1,20) / &
     & 0.5082800E+00, 0.5082800E+00, 0.5136000E+00, 0.5117000E+00, &
     & 0.5132200E+00, 0.4673400E+00, 0.4927700E+00, 0.5038400E+00, &
     & 0.5180700E+00, 0.4938200E+00, 0.5306000E+00, 0.5209700E+00, &
     & 0.5162500E+00, 0.5892400E+00, 0.5548600E+00, 0.5212691E+00, &
     & 0.4985100E+00, 0.5325500E+00, 0.3941165E+00, 0.3941165E+00 /
      data (ref_adm( 8,iz,19,10),iz = 1,20) / &
     & 0.4583200E+00, 0.4583200E+00, 0.4625700E+00, 0.5385000E+00, &
     & 0.4789400E+00, 0.4443300E+00, 0.5092800E+00, 0.5323600E+00, &
     & 0.5505100E+00, 0.5641300E+00, 0.5449700E+00, 0.5348700E+00, &
     & 0.4945400E+00, 0.5003000E+00, 0.5112200E+00, 0.5565500E+00, &
     & 0.4969947E+00, 0.4628225E+00, 0.3895682E+00, 0.3895682E+00 /
      data (ref_adm( 8,iz,20,10),iz = 1,20) / &
     & 0.4281300E+00, 0.4281300E+00, 0.4237000E+00, 0.4509300E+00, &
     & 0.4621000E+00, 0.5071700E+00, 0.5132200E+00, 0.5450200E+00, &
     & 0.5858700E+00, 0.6195700E+00, 0.5780700E+00, 0.5437500E+00, &
     & 0.5280400E+00, 0.5256000E+00, 0.4781900E+00, 0.4359400E+00, &
     & 0.4684000E+00, 0.4565946E+00, 0.3869844E+00, 0.3869844E+00 /
      data (ref_adm( 8,iz,21,10),iz = 1,20) / &
     & 0.4531100E+00, 0.4531100E+00, 0.4695200E+00, 0.3750400E+00, &
     & 0.4390800E+00, 0.5256500E+00, 0.4978000E+00, 0.5505000E+00, &
     & 0.5671400E+00, 0.5269500E+00, 0.5440100E+00, 0.5351800E+00, &
     & 0.5286200E+00, 0.5302500E+00, 0.5141300E+00, 0.5216400E+00, &
     & 0.4843701E+00, 0.4513747E+00, 0.3856075E+00, 0.3856075E+00 /
      data (ref_adm( 8,iz,22,10),iz = 1,20) / &
     & 0.4948700E+00, 0.4948700E+00, 0.5112800E+00, 0.5479700E+00, &
     & 0.5412900E+00, 0.4912700E+00, 0.4886000E+00, 0.5089400E+00, &
     & 0.4832300E+00, 0.4835800E+00, 0.4711900E+00, 0.5029000E+00, &
     & 0.5356100E+00, 0.4497400E+00, 0.4959400E+00, 0.4932400E+00, &
     & 0.4939358E+00, 0.4600094E+00, 0.3849092E+00, 0.3849092E+00 /
      data (ref_adm( 8,iz,23,10),iz = 1,20) / &
     & 0.5148800E+00, 0.5148800E+00, 0.5438000E+00, 0.5357500E+00, &
     & 0.5147100E+00, 0.4011100E+00, 0.5021200E+00, 0.4451900E+00, &
     & 0.4313400E+00, 0.4493300E+00, 0.4698000E+00, 0.5497100E+00, &
     & 0.5490400E+00, 0.5048400E+00, 0.4674900E+00, 0.4382200E+00, &
     & 0.4883476E+00, 0.4540477E+00, 0.3830634E+00, 0.3830634E+00 /
      data (ref_adm( 8,iz,24,10),iz = 1,20) / &
     & 0.5474600E+00, 0.5474600E+00, 0.5036100E+00, 0.4630700E+00, &
     & 0.4667400E+00, 0.4867300E+00, 0.5758200E+00, 0.6417600E+00, &
     & 0.4989600E+00, 0.5028400E+00, 0.5161100E+00, 0.5885600E+00, &
     & 0.5279700E+00, 0.5128200E+00, 0.4793600E+00, 0.4542800E+00, &
     & 0.4812000E+00, 0.4491689E+00, 0.3816707E+00, 0.3816707E+00 /
      data (ref_adm( 8,iz,25,10),iz = 1,20) / &
     & 0.4594400E+00, 0.4594400E+00, 0.4082200E+00, 0.4543500E+00, &
     & 0.5228000E+00, 0.5613300E+00, 0.5103100E+00, 0.5405900E+00, &
     & 0.5271800E+00, 0.4903200E+00, 0.5108400E+00, 0.6069200E+00, &
     & 0.5098600E+00, 0.4994000E+00, 0.5075400E+00, 0.5284000E+00, &
     & 0.5325900E+00, 0.4450367E+00, 0.3808358E+00, 0.3808358E+00 /
      data (ref_adm( 8,iz,26,10),iz = 1,20) / &
     & 0.4577100E+00, 0.4577100E+00, 0.4677900E+00, 0.4670400E+00, &
     & 0.4721500E+00, 0.4822600E+00, 0.4992500E+00, 0.5160800E+00, &
     & 0.5920900E+00, 0.4826900E+00, 0.5013800E+00, 0.5477300E+00, &
     & 0.5312100E+00, 0.5311400E+00, 0.5094900E+00, 0.5157900E+00, &
     & 0.5177000E+00, 0.4713600E+00, 0.3808748E+00, 0.3808748E+00 /
      data (ref_adm( 8,iz,27,10),iz = 1,20) / &
     & 0.4682900E+00, 0.4682900E+00, 0.4665700E+00, 0.4671800E+00, &
     & 0.4965100E+00, 0.5024600E+00, 0.5116300E+00, 0.5106600E+00, &
     & 0.5047000E+00, 0.4905700E+00, 0.4953100E+00, 0.4882000E+00, &
     & 0.4339100E+00, 0.5245600E+00, 0.5541600E+00, 0.5323600E+00, &
     & 0.4961000E+00, 0.4631200E+00, 0.3918200E+00, 0.3918200E+00 /
      data (ref_adm( 8,iz,28,10),iz = 1,20) / &
     & 0.4856400E+00, 0.4856400E+00, 0.5152800E+00, 0.4804200E+00, &
     & 0.5239900E+00, 0.5509300E+00, 0.6202100E+00, 0.5830800E+00, &
     & 0.5820000E+00, 0.5860900E+00, 0.5883700E+00, 0.5698200E+00, &
     & 0.5378700E+00, 0.5213400E+00, 0.5263900E+00, 0.5373200E+00, &
     & 0.4901000E+00, 0.4546400E+00, 0.3671100E+00, 0.3671100E+00 /
      data (ref_adm( 8,iz,29,10),iz = 1,20) / &
     & 0.4895400E+00, 0.4895400E+00, 0.5731000E+00, 0.5648600E+00, &
     & 0.5123200E+00, 0.5229200E+00, 0.5358300E+00, 0.4591700E+00, &
     & 0.5911800E+00, 0.6044800E+00, 0.5837200E+00, 0.6028700E+00, &
     & 0.5157500E+00, 0.5537300E+00, 0.5320300E+00, 0.5194300E+00, &
     & 0.5305500E+00, 0.4859800E+00, 0.3866700E+00, 0.3866700E+00 /
      data (ref_adm( 8,iz,30,10),iz = 1,20) / &
     & 0.5054500E+00, 0.5054500E+00, 0.5048400E+00, 0.5671600E+00, &
     & 0.5414100E+00, 0.5428700E+00, 0.5264000E+00, 0.5421100E+00, &
     & 0.5012600E+00, 0.6175200E+00, 0.5711100E+00, 0.6036800E+00, &
     & 0.5732500E+00, 0.5578900E+00, 0.5427700E+00, 0.5759900E+00, &
     & 0.5493200E+00, 0.4991900E+00, 0.3866846E+00, 0.3866846E+00 /
      data (ref_adm( 8,iz,31,10),iz = 1,20) / &
     & 0.4800600E+00, 0.4800600E+00, 0.4508000E+00, 0.4660300E+00, &
     & 0.4962900E+00, 0.4996800E+00, 0.4925300E+00, 0.4954000E+00, &
     & 0.5049800E+00, 0.5376200E+00, 0.5158100E+00, 0.5300300E+00, &
     & 0.4977800E+00, 0.5249900E+00, 0.4891800E+00, 0.4675100E+00, &
     & 0.5216500E+00, 0.4812500E+00, 0.3894150E+00, 0.3894150E+00 /
      data (ref_adm( 8,iz,32,10),iz = 1,20) / &
     & 0.4764300E+00, 0.4764300E+00, 0.4700600E+00, 0.4888100E+00, &
     & 0.4920800E+00, 0.5332700E+00, 0.5546600E+00, 0.5217800E+00, &
     & 0.5298900E+00, 0.5296200E+00, 0.5641400E+00, 0.5781500E+00, &
     & 0.5413000E+00, 0.5409600E+00, 0.5057200E+00, 0.4866700E+00, &
     & 0.4941500E+00, 0.4660200E+00, 0.3751900E+00, 0.3751900E+00 /
      data (ref_adm( 8,iz,33,10),iz = 1,20) / &
     & 0.4973400E+00, 0.4973400E+00, 0.5195500E+00, 0.5044500E+00, &
     & 0.4837500E+00, 0.4500600E+00, 0.4565500E+00, 0.4607900E+00, &
     & 0.4953100E+00, 0.5476800E+00, 0.5992500E+00, 0.5767400E+00, &
     & 0.6412500E+00, 0.6240700E+00, 0.5561500E+00, 0.4739200E+00, &
     & 0.5354400E+00, 0.4428100E+00, 0.3945139E+00, 0.3945139E+00 /
      data (ref_adm( 8,iz,34,10),iz = 1,20) / &
     & 0.5174000E+00, 0.5174000E+00, 0.5548100E+00, 0.5700800E+00, &
     & 0.5834200E+00, 0.4854000E+00, 0.4937500E+00, 0.4889700E+00, &
     & 0.5021600E+00, 0.5394500E+00, 0.4941200E+00, 0.5725800E+00, &
     & 0.5796700E+00, 0.5241300E+00, 0.5678100E+00, 0.4972200E+00, &
     & 0.5517000E+00, 0.4746100E+00, 0.3358800E+00, 0.3358800E+00 /
      data (ref_adm( 8,iz,35,10),iz = 1,20) / &
     & 0.4905800E+00, 0.4905800E+00, 0.5298400E+00, 0.5838000E+00, &
     & 0.4932900E+00, 0.5018600E+00, 0.4924400E+00, 0.4645400E+00, &
     & 0.5588900E+00, 0.4172600E+00, 0.5213300E+00, 0.5834100E+00, &
     & 0.5864800E+00, 0.5688200E+00, 0.5534000E+00, 0.5264500E+00, &
     & 0.4841423E+00, 0.4452851E+00, 0.3983551E+00, 0.3983551E+00 /
      data (ref_adm( 8,iz,36,10),iz = 1,20) / &
     & 0.5008600E+00, 0.5008600E+00, 0.5087300E+00, 0.4845900E+00, &
     & 0.4943100E+00, 0.4794500E+00, 0.4919800E+00, 0.6332300E+00, &
     & 0.5932600E+00, 0.3820800E+00, 0.5333500E+00, 0.5312200E+00, &
     & 0.5409400E+00, 0.6232000E+00, 0.4864600E+00, 0.5090600E+00, &
     & 0.4377100E+00, 0.4463609E+00, 0.3995628E+00, 0.3995628E+00 /
      data (ref_adm( 8,iz,37,10),iz = 1,20) / &
     & 0.4996000E+00, 0.4996000E+00, 0.4913000E+00, 0.4658200E+00, &
     & 0.4741500E+00, 0.4131000E+00, 0.5330500E+00, 0.5595800E+00, &
     & 0.6285500E+00, 0.6441000E+00, 0.4456500E+00, 0.4578900E+00, &
     & 0.5376200E+00, 0.5767600E+00, 0.4973900E+00, 0.5048700E+00, &
     & 0.4864385E+00, 0.4468268E+00, 0.4002992E+00, 0.4002992E+00 /
      data (ref_adm( 8,iz,38,10),iz = 1,20) / &
     & 0.4996000E+00, 0.4996000E+00, 0.4913000E+00, 0.4658200E+00, &
     & 0.4741500E+00, 0.4131000E+00, 0.5330500E+00, 0.5595800E+00, &
     & 0.6285500E+00, 0.6441000E+00, 0.4456500E+00, 0.4578900E+00, &
     & 0.5376200E+00, 0.5767600E+00, 0.4973900E+00, 0.5048700E+00, &
     & 0.4864385E+00, 0.4468268E+00, 0.4002992E+00, 0.4002992E+00 /
! Solar Zenith Angle 50.0 Albedo  0.5568916E+00
      data (ref_adm( 8,iz, 1,11),iz = 1,20) / &
     & 0.5008000E+00, 0.5008000E+00, 0.5125200E+00, 0.5400800E+00, &
     & 0.5165200E+00, 0.5118100E+00, 0.5441500E+00, 0.5376600E+00, &
     & 0.5622700E+00, 0.6351800E+00, 0.6459200E+00, 0.6670800E+00, &
     & 0.6964300E+00, 0.7368300E+00, 0.7587800E+00, 0.7593800E+00, &
     & 0.8385300E+00, 0.8212100E+00, 0.7741894E+00, 0.7741894E+00 /
      data (ref_adm( 8,iz, 2,11),iz = 1,20) / &
     & 0.5008000E+00, 0.5008000E+00, 0.5125200E+00, 0.5400800E+00, &
     & 0.5165200E+00, 0.5118100E+00, 0.5441500E+00, 0.5376600E+00, &
     & 0.5622700E+00, 0.6351800E+00, 0.6459200E+00, 0.6670800E+00, &
     & 0.6964300E+00, 0.7368300E+00, 0.7587800E+00, 0.7593800E+00, &
     & 0.8385300E+00, 0.8212100E+00, 0.7741894E+00, 0.7741894E+00 /
      data (ref_adm( 8,iz, 3,11),iz = 1,20) / &
     & 0.4979300E+00, 0.4979300E+00, 0.5000800E+00, 0.4782200E+00, &
     & 0.5231400E+00, 0.5617500E+00, 0.5261100E+00, 0.5938900E+00, &
     & 0.5868200E+00, 0.6048500E+00, 0.5938400E+00, 0.6377600E+00, &
     & 0.6928300E+00, 0.7183800E+00, 0.7552400E+00, 0.7793900E+00, &
     & 0.8312000E+00, 0.8153900E+00, 0.6927200E+00, 0.6927200E+00 /
      data (ref_adm( 8,iz, 4,11),iz = 1,20) / &
     & 0.5034100E+00, 0.5034100E+00, 0.4842700E+00, 0.5002700E+00, &
     & 0.5394700E+00, 0.5564200E+00, 0.5771100E+00, 0.5564100E+00, &
     & 0.5774700E+00, 0.6098600E+00, 0.5831000E+00, 0.6565600E+00, &
     & 0.6693500E+00, 0.6898200E+00, 0.7500500E+00, 0.7529900E+00, &
     & 0.8279200E+00, 0.8200300E+00, 0.7304652E+00, 0.7304652E+00 /
      data (ref_adm( 8,iz, 5,11),iz = 1,20) / &
     & 0.4653500E+00, 0.4653500E+00, 0.4665700E+00, 0.4970100E+00, &
     & 0.5142000E+00, 0.5366200E+00, 0.5815100E+00, 0.5803400E+00, &
     & 0.5729100E+00, 0.5777100E+00, 0.5661900E+00, 0.6267500E+00, &
     & 0.6429100E+00, 0.6595100E+00, 0.7030000E+00, 0.7339200E+00, &
     & 0.7794800E+00, 0.7879400E+00, 0.6971822E+00, 0.6971822E+00 /
      data (ref_adm( 8,iz, 6,11),iz = 1,20) / &
     & 0.4848900E+00, 0.4848900E+00, 0.5245200E+00, 0.5197700E+00, &
     & 0.5098900E+00, 0.5496500E+00, 0.5607600E+00, 0.5782000E+00, &
     & 0.5715600E+00, 0.5764400E+00, 0.6252800E+00, 0.6383800E+00, &
     & 0.6437600E+00, 0.6299900E+00, 0.6604000E+00, 0.7327700E+00, &
     & 0.7603400E+00, 0.7616900E+00, 0.6681777E+00, 0.6681777E+00 /
      data (ref_adm( 8,iz, 7,11),iz = 1,20) / &
     & 0.4853800E+00, 0.4853800E+00, 0.5346600E+00, 0.5262800E+00, &
     & 0.5574700E+00, 0.5317300E+00, 0.5278800E+00, 0.5604100E+00, &
     & 0.5449400E+00, 0.5750200E+00, 0.5983200E+00, 0.6148200E+00, &
     & 0.6149100E+00, 0.6203400E+00, 0.6637100E+00, 0.6866400E+00, &
     & 0.7390700E+00, 0.6250800E+00, 0.6474517E+00, 0.6474517E+00 /
      data (ref_adm( 8,iz, 8,11),iz = 1,20) / &
     & 0.5167400E+00, 0.5167400E+00, 0.5004300E+00, 0.5082200E+00, &
     & 0.5269300E+00, 0.5382600E+00, 0.5224900E+00, 0.5448900E+00, &
     & 0.5399700E+00, 0.5650600E+00, 0.5705900E+00, 0.5984900E+00, &
     & 0.6169400E+00, 0.6464000E+00, 0.6617200E+00, 0.6978800E+00, &
     & 0.7069100E+00, 0.6701200E+00, 0.6291440E+00, 0.6291440E+00 /
      data (ref_adm( 8,iz, 9,11),iz = 1,20) / &
     & 0.5129100E+00, 0.5129100E+00, 0.5214700E+00, 0.5053300E+00, &
     & 0.4888600E+00, 0.5211700E+00, 0.5228400E+00, 0.5295400E+00, &
     & 0.5620700E+00, 0.5417300E+00, 0.5651900E+00, 0.6022300E+00, &
     & 0.5837500E+00, 0.6359900E+00, 0.6537000E+00, 0.7317500E+00, &
     & 0.7496200E+00, 0.6911544E+00, 0.6026262E+00, 0.6026262E+00 /
      data (ref_adm( 8,iz,10,11),iz = 1,20) / &
     & 0.5292400E+00, 0.5292400E+00, 0.5519100E+00, 0.5065700E+00, &
     & 0.4742200E+00, 0.4684100E+00, 0.5344000E+00, 0.5374100E+00, &
     & 0.5302500E+00, 0.5509000E+00, 0.5721700E+00, 0.5797000E+00, &
     & 0.5835400E+00, 0.6078300E+00, 0.6479900E+00, 0.7068000E+00, &
     & 0.6849900E+00, 0.5988600E+00, 0.5753360E+00, 0.5753360E+00 /
      data (ref_adm( 8,iz,11,11),iz = 1,20) / &
     & 0.5326900E+00, 0.5326900E+00, 0.5099000E+00, 0.4957400E+00, &
     & 0.4826100E+00, 0.5104100E+00, 0.5116800E+00, 0.5124000E+00, &
     & 0.5317300E+00, 0.5290400E+00, 0.5662800E+00, 0.5870000E+00, &
     & 0.5842200E+00, 0.5968300E+00, 0.6464600E+00, 0.6944700E+00, &
     & 0.6733500E+00, 0.5475200E+00, 0.5542401E+00, 0.5542401E+00 /
      data (ref_adm( 8,iz,12,11),iz = 1,20) / &
     & 0.5062400E+00, 0.5062400E+00, 0.4951500E+00, 0.4894900E+00, &
     & 0.5325600E+00, 0.5005200E+00, 0.4832200E+00, 0.4934100E+00, &
     & 0.5183000E+00, 0.5401700E+00, 0.5580900E+00, 0.5808600E+00, &
     & 0.5689500E+00, 0.5918800E+00, 0.6450500E+00, 0.6454100E+00, &
     & 0.6657000E+00, 0.5715400E+00, 0.5382344E+00, 0.5382344E+00 /
      data (ref_adm( 8,iz,13,11),iz = 1,20) / &
     & 0.5223900E+00, 0.5223900E+00, 0.5168600E+00, 0.5141500E+00, &
     & 0.5209900E+00, 0.5152100E+00, 0.5268200E+00, 0.5432800E+00, &
     & 0.5520800E+00, 0.5542000E+00, 0.5539400E+00, 0.5456200E+00, &
     & 0.5381600E+00, 0.6121000E+00, 0.6240700E+00, 0.5656200E+00, &
     & 0.6168400E+00, 0.5802800E+00, 0.5112200E+00, 0.5112200E+00 /
      data (ref_adm( 8,iz,14,11),iz = 1,20) / &
     & 0.5084100E+00, 0.5084100E+00, 0.5107700E+00, 0.5195700E+00, &
     & 0.5366300E+00, 0.5320300E+00, 0.5294300E+00, 0.5316500E+00, &
     & 0.5352300E+00, 0.5368500E+00, 0.5470200E+00, 0.5483300E+00, &
     & 0.5538100E+00, 0.5565800E+00, 0.6290000E+00, 0.5890000E+00, &
     & 0.6047600E+00, 0.5375500E+00, 0.5135970E+00, 0.5135970E+00 /
      data (ref_adm( 8,iz,15,11),iz = 1,20) / &
     & 0.5004100E+00, 0.5004100E+00, 0.5010800E+00, 0.4804500E+00, &
     & 0.4819700E+00, 0.4918300E+00, 0.4946300E+00, 0.5008700E+00, &
     & 0.5220000E+00, 0.5346000E+00, 0.5285900E+00, 0.5472000E+00, &
     & 0.5540600E+00, 0.5634900E+00, 0.6141000E+00, 0.6245100E+00, &
     & 0.6121000E+00, 0.5268400E+00, 0.5029829E+00, 0.5029829E+00 /
      data (ref_adm( 8,iz,16,11),iz = 1,20) / &
     & 0.5022300E+00, 0.5022300E+00, 0.4950100E+00, 0.4847700E+00, &
     & 0.5137200E+00, 0.5247000E+00, 0.5012100E+00, 0.5078400E+00, &
     & 0.5296000E+00, 0.5996900E+00, 0.5443300E+00, 0.5328700E+00, &
     & 0.5308300E+00, 0.5296900E+00, 0.6011300E+00, 0.5782600E+00, &
     & 0.5670800E+00, 0.5652900E+00, 0.4912888E+00, 0.4912888E+00 /
      data (ref_adm( 8,iz,17,11),iz = 1,20) / &
     & 0.4919000E+00, 0.4919000E+00, 0.4799300E+00, 0.4958000E+00, &
     & 0.5223800E+00, 0.5359900E+00, 0.5256300E+00, 0.4883600E+00, &
     & 0.5148600E+00, 0.5442300E+00, 0.5502900E+00, 0.5436300E+00, &
     & 0.5374600E+00, 0.5651400E+00, 0.5831600E+00, 0.5486200E+00, &
     & 0.5154100E+00, 0.5071800E+00, 0.4804633E+00, 0.4804633E+00 /
      data (ref_adm( 8,iz,18,11),iz = 1,20) / &
     & 0.5141000E+00, 0.5141000E+00, 0.5045300E+00, 0.4900200E+00, &
     & 0.5338400E+00, 0.5215200E+00, 0.5263200E+00, 0.5216700E+00, &
     & 0.5209000E+00, 0.5388600E+00, 0.5533900E+00, 0.5565000E+00, &
     & 0.5409700E+00, 0.5218200E+00, 0.5315700E+00, 0.5297800E+00, &
     & 0.5403900E+00, 0.5708900E+00, 0.4279737E+00, 0.4279737E+00 /
      data (ref_adm( 8,iz,19,11),iz = 1,20) / &
     & 0.5247000E+00, 0.5247000E+00, 0.5175500E+00, 0.5415400E+00, &
     & 0.5446900E+00, 0.5683900E+00, 0.5149100E+00, 0.5477300E+00, &
     & 0.5094700E+00, 0.5231500E+00, 0.5527600E+00, 0.5503400E+00, &
     & 0.5458200E+00, 0.5314400E+00, 0.5288600E+00, 0.5444500E+00, &
     & 0.4693100E+00, 0.4983149E+00, 0.4225042E+00, 0.4225042E+00 /
      data (ref_adm( 8,iz,20,11),iz = 1,20) / &
     & 0.5065500E+00, 0.5065500E+00, 0.5096800E+00, 0.5112800E+00, &
     & 0.5301400E+00, 0.5313800E+00, 0.5052600E+00, 0.4820800E+00, &
     & 0.5022400E+00, 0.5427800E+00, 0.5639200E+00, 0.5468700E+00, &
     & 0.5315800E+00, 0.5178900E+00, 0.5397400E+00, 0.5306900E+00, &
     & 0.5208208E+00, 0.4913208E+00, 0.4194514E+00, 0.4194514E+00 /
      data (ref_adm( 8,iz,21,11),iz = 1,20) / &
     & 0.5625900E+00, 0.5625900E+00, 0.5477200E+00, 0.5479400E+00, &
     & 0.5221900E+00, 0.5294700E+00, 0.5347800E+00, 0.5273500E+00, &
     & 0.4936900E+00, 0.5387300E+00, 0.5385800E+00, 0.5232700E+00, &
     & 0.5629100E+00, 0.5351800E+00, 0.5293900E+00, 0.5221700E+00, &
     & 0.5145479E+00, 0.4852960E+00, 0.4179396E+00, 0.4179396E+00 /
      data (ref_adm( 8,iz,22,11),iz = 1,20) / &
     & 0.5127000E+00, 0.5127000E+00, 0.5236500E+00, 0.5264400E+00, &
     & 0.5279500E+00, 0.5458000E+00, 0.5398300E+00, 0.5162400E+00, &
     & 0.5227700E+00, 0.5460600E+00, 0.5251600E+00, 0.5513600E+00, &
     & 0.5503100E+00, 0.5442400E+00, 0.5305700E+00, 0.4593200E+00, &
     & 0.5343289E+00, 0.5024968E+00, 0.4269024E+00, 0.4269024E+00 /
      data (ref_adm( 8,iz,23,11),iz = 1,20) / &
     & 0.5197300E+00, 0.5197300E+00, 0.5201800E+00, 0.5399700E+00, &
     & 0.5282700E+00, 0.5042300E+00, 0.5216300E+00, 0.5142700E+00, &
     & 0.5134600E+00, 0.5030000E+00, 0.5356300E+00, 0.5296400E+00, &
     & 0.5561200E+00, 0.5440700E+00, 0.5396300E+00, 0.5244900E+00, &
     & 0.5272388E+00, 0.4949369E+00, 0.4250287E+00, 0.4250287E+00 /
      data (ref_adm( 8,iz,24,11),iz = 1,20) / &
     & 0.5482400E+00, 0.5482400E+00, 0.5244500E+00, 0.5562700E+00, &
     & 0.5333100E+00, 0.5128500E+00, 0.5294400E+00, 0.5045900E+00, &
     & 0.4813400E+00, 0.5178100E+00, 0.5375700E+00, 0.5410100E+00, &
     & 0.5386800E+00, 0.5469300E+00, 0.5264200E+00, 0.4973600E+00, &
     & 0.5122600E+00, 0.4892232E+00, 0.4240070E+00, 0.4240070E+00 /
      data (ref_adm( 8,iz,25,11),iz = 1,20) / &
     & 0.5160600E+00, 0.5160600E+00, 0.4825800E+00, 0.4781700E+00, &
     & 0.4885300E+00, 0.5061100E+00, 0.4958100E+00, 0.5143100E+00, &
     & 0.5035600E+00, 0.5208000E+00, 0.5306800E+00, 0.5445900E+00, &
     & 0.5621100E+00, 0.5491400E+00, 0.5089500E+00, 0.4995400E+00, &
     & 0.4928700E+00, 0.4518200E+00, 0.4243467E+00, 0.4243467E+00 /
      data (ref_adm( 8,iz,26,11),iz = 1,20) / &
     & 0.4999200E+00, 0.4999200E+00, 0.5090300E+00, 0.5127100E+00, &
     & 0.5133400E+00, 0.5186100E+00, 0.5214200E+00, 0.5254000E+00, &
     & 0.5255800E+00, 0.5196200E+00, 0.5284700E+00, 0.5375700E+00, &
     & 0.5329700E+00, 0.5399100E+00, 0.5119600E+00, 0.5420400E+00, &
     & 0.5163800E+00, 0.4700400E+00, 0.4256208E+00, 0.4256208E+00 /
      data (ref_adm( 8,iz,27,11),iz = 1,20) / &
     & 0.5151000E+00, 0.5151000E+00, 0.5078000E+00, 0.5173100E+00, &
     & 0.5200100E+00, 0.5192400E+00, 0.5260000E+00, 0.5370900E+00, &
     & 0.5323100E+00, 0.5411900E+00, 0.5512300E+00, 0.5479000E+00, &
     & 0.5401800E+00, 0.5439600E+00, 0.5385000E+00, 0.5457500E+00, &
     & 0.5242000E+00, 0.4720500E+00, 0.4075000E+00, 0.4075000E+00 /
      data (ref_adm( 8,iz,28,11),iz = 1,20) / &
     & 0.5190100E+00, 0.5190100E+00, 0.5201000E+00, 0.5387500E+00, &
     & 0.5733700E+00, 0.5475600E+00, 0.5579400E+00, 0.5432700E+00, &
     & 0.5545200E+00, 0.5755600E+00, 0.5712200E+00, 0.5816800E+00, &
     & 0.5760200E+00, 0.5480000E+00, 0.5390700E+00, 0.5598500E+00, &
     & 0.5310600E+00, 0.4815300E+00, 0.4148500E+00, 0.4148500E+00 /
      data (ref_adm( 8,iz,29,11),iz = 1,20) / &
     & 0.5040200E+00, 0.5040200E+00, 0.5063400E+00, 0.5371100E+00, &
     & 0.5454100E+00, 0.5719500E+00, 0.5699900E+00, 0.5660900E+00, &
     & 0.5483600E+00, 0.5429600E+00, 0.5808000E+00, 0.5909500E+00, &
     & 0.5685600E+00, 0.5744300E+00, 0.5389300E+00, 0.5366900E+00, &
     & 0.5472300E+00, 0.4849900E+00, 0.3891300E+00, 0.3891300E+00 /
      data (ref_adm( 8,iz,30,11),iz = 1,20) / &
     & 0.5107300E+00, 0.5107300E+00, 0.4961400E+00, 0.5126600E+00, &
     & 0.5413600E+00, 0.5472500E+00, 0.5698100E+00, 0.5602700E+00, &
     & 0.5526100E+00, 0.5693000E+00, 0.5848100E+00, 0.5830400E+00, &
     & 0.5579800E+00, 0.5649500E+00, 0.5530500E+00, 0.5617900E+00, &
     & 0.5608000E+00, 0.5219400E+00, 0.4185900E+00, 0.4185900E+00 /
      data (ref_adm( 8,iz,31,11),iz = 1,20) / &
     & 0.5240300E+00, 0.5240300E+00, 0.5183300E+00, 0.5124100E+00, &
     & 0.5152200E+00, 0.5286500E+00, 0.5383300E+00, 0.5570700E+00, &
     & 0.5508300E+00, 0.5527600E+00, 0.5641300E+00, 0.5683900E+00, &
     & 0.5748500E+00, 0.5730500E+00, 0.5669600E+00, 0.5741100E+00, &
     & 0.5087000E+00, 0.4936300E+00, 0.4314900E+00, 0.4314900E+00 /
      data (ref_adm( 8,iz,32,11),iz = 1,20) / &
     & 0.5076800E+00, 0.5076800E+00, 0.5088600E+00, 0.5145100E+00, &
     & 0.5088400E+00, 0.5394000E+00, 0.5569200E+00, 0.5856400E+00, &
     & 0.5834900E+00, 0.5424400E+00, 0.5632400E+00, 0.5673200E+00, &
     & 0.5727800E+00, 0.5741100E+00, 0.5749700E+00, 0.5640300E+00, &
     & 0.5169900E+00, 0.4938400E+00, 0.3871900E+00, 0.3871900E+00 /
      data (ref_adm( 8,iz,33,11),iz = 1,20) / &
     & 0.4971400E+00, 0.4971400E+00, 0.4955600E+00, 0.5059000E+00, &
     & 0.5452500E+00, 0.5371100E+00, 0.5380800E+00, 0.5699400E+00, &
     & 0.5432100E+00, 0.5437700E+00, 0.5672500E+00, 0.5699000E+00, &
     & 0.5738500E+00, 0.5903000E+00, 0.5748600E+00, 0.5201500E+00, &
     & 0.5439000E+00, 0.5083600E+00, 0.4159900E+00, 0.4159900E+00 /
      data (ref_adm( 8,iz,34,11),iz = 1,20) / &
     & 0.4952700E+00, 0.4952700E+00, 0.5047500E+00, 0.5205200E+00, &
     & 0.5554500E+00, 0.5521900E+00, 0.5389000E+00, 0.5416800E+00, &
     & 0.5460800E+00, 0.5748400E+00, 0.5737300E+00, 0.5678400E+00, &
     & 0.5779900E+00, 0.5923600E+00, 0.5858200E+00, 0.5708400E+00, &
     & 0.5593600E+00, 0.5464600E+00, 0.4337500E+00, 0.4337500E+00 /
      data (ref_adm( 8,iz,35,11),iz = 1,20) / &
     & 0.4954200E+00, 0.4954200E+00, 0.5131900E+00, 0.5257100E+00, &
     & 0.5258700E+00, 0.5124800E+00, 0.5369900E+00, 0.5209300E+00, &
     & 0.5469000E+00, 0.5563300E+00, 0.5651300E+00, 0.6033500E+00, &
     & 0.5812100E+00, 0.5836600E+00, 0.5424500E+00, 0.5773600E+00, &
     & 0.5620700E+00, 0.4545400E+00, 0.4689855E+00, 0.4689855E+00 /
      data (ref_adm( 8,iz,36,11),iz = 1,20) / &
     & 0.5104000E+00, 0.5104000E+00, 0.5211200E+00, 0.4832400E+00, &
     & 0.5099800E+00, 0.5319700E+00, 0.4743000E+00, 0.5177600E+00, &
     & 0.5642300E+00, 0.5723500E+00, 0.5923700E+00, 0.5999700E+00, &
     & 0.5989000E+00, 0.5821600E+00, 0.5755400E+00, 0.5666900E+00, &
     & 0.5414000E+00, 0.5422000E+00, 0.4717222E+00, 0.4717222E+00 /
      data (ref_adm( 8,iz,37,11),iz = 1,20) / &
     & 0.5090500E+00, 0.5090500E+00, 0.4966100E+00, 0.5361400E+00, &
     & 0.4841100E+00, 0.4592000E+00, 0.4905400E+00, 0.4991300E+00, &
     & 0.5155300E+00, 0.5829800E+00, 0.5720900E+00, 0.5858700E+00, &
     & 0.5894300E+00, 0.5648900E+00, 0.5907300E+00, 0.5530200E+00, &
     & 0.5389000E+00, 0.4257200E+00, 0.4732960E+00, 0.4732960E+00 /
      data (ref_adm( 8,iz,38,11),iz = 1,20) / &
     & 0.5090500E+00, 0.5090500E+00, 0.4966100E+00, 0.5361400E+00, &
     & 0.4841100E+00, 0.4592000E+00, 0.4905400E+00, 0.4991300E+00, &
     & 0.5155300E+00, 0.5829800E+00, 0.5720900E+00, 0.5858700E+00, &
     & 0.5894300E+00, 0.5648900E+00, 0.5907300E+00, 0.5530200E+00, &
     & 0.5389000E+00, 0.4257200E+00, 0.4732960E+00, 0.4732960E+00 /
! Solar Zenith Angle 55.0 Albedo  0.5598391E+00
      data (ref_adm( 8,iz, 1,12),iz = 1,20) / &
     & 0.4696500E+00, 0.4696500E+00, 0.4694900E+00, 0.4498700E+00, &
     & 0.4511700E+00, 0.5010500E+00, 0.5221100E+00, 0.5729200E+00, &
     & 0.5985800E+00, 0.6115100E+00, 0.6553000E+00, 0.6990300E+00, &
     & 0.7720200E+00, 0.8126400E+00, 0.8417600E+00, 0.8758000E+00, &
     & 0.9262600E+00, 0.9451600E+00, 0.8385796E+00, 0.8385796E+00 /
      data (ref_adm( 8,iz, 2,12),iz = 1,20) / &
     & 0.4696500E+00, 0.4696500E+00, 0.4694900E+00, 0.4498700E+00, &
     & 0.4511700E+00, 0.5010500E+00, 0.5221100E+00, 0.5729200E+00, &
     & 0.5985800E+00, 0.6115100E+00, 0.6553000E+00, 0.6990300E+00, &
     & 0.7720200E+00, 0.8126400E+00, 0.8417600E+00, 0.8758000E+00, &
     & 0.9262600E+00, 0.9451600E+00, 0.8385796E+00, 0.8385796E+00 /
      data (ref_adm( 8,iz, 3,12),iz = 1,20) / &
     & 0.4733200E+00, 0.4733200E+00, 0.4733800E+00, 0.5146800E+00, &
     & 0.4965000E+00, 0.5030100E+00, 0.5232200E+00, 0.5544200E+00, &
     & 0.5658500E+00, 0.6063100E+00, 0.6510600E+00, 0.7013400E+00, &
     & 0.6835100E+00, 0.7560200E+00, 0.8354200E+00, 0.8753000E+00, &
     & 0.9296400E+00, 0.9987100E+00, 0.5516702E+00, 0.5516702E+00 /
      data (ref_adm( 8,iz, 4,12),iz = 1,20) / &
     & 0.4961000E+00, 0.4961000E+00, 0.4855200E+00, 0.4838500E+00, &
     & 0.5198600E+00, 0.5240200E+00, 0.5100400E+00, 0.5221300E+00, &
     & 0.5480100E+00, 0.6032400E+00, 0.6578600E+00, 0.6656300E+00, &
     & 0.6712400E+00, 0.7358100E+00, 0.8389100E+00, 0.8692400E+00, &
     & 0.9241200E+00, 0.9498100E+00, 0.7855642E+00, 0.7855642E+00 /
      data (ref_adm( 8,iz, 5,12),iz = 1,20) / &
     & 0.4518700E+00, 0.4518700E+00, 0.4857800E+00, 0.4654000E+00, &
     & 0.4855400E+00, 0.5191000E+00, 0.5048000E+00, 0.5116400E+00, &
     & 0.5409500E+00, 0.5612800E+00, 0.6469500E+00, 0.6534700E+00, &
     & 0.6733500E+00, 0.7171900E+00, 0.7866400E+00, 0.8106300E+00, &
     & 0.8547200E+00, 0.9300100E+00, 0.8450900E+00, 0.8450900E+00 /
      data (ref_adm( 8,iz, 6,12),iz = 1,20) / &
     & 0.4669700E+00, 0.4669700E+00, 0.4506300E+00, 0.4735600E+00, &
     & 0.4779700E+00, 0.4947500E+00, 0.5043800E+00, 0.5052300E+00, &
     & 0.5235600E+00, 0.5423800E+00, 0.5745300E+00, 0.6225200E+00, &
     & 0.6750700E+00, 0.7172800E+00, 0.7641700E+00, 0.8096400E+00, &
     & 0.9058200E+00, 0.8355100E+00, 0.7105436E+00, 0.7105436E+00 /
      data (ref_adm( 8,iz, 7,12),iz = 1,20) / &
     & 0.4907500E+00, 0.4907500E+00, 0.4804600E+00, 0.4620400E+00, &
     & 0.4815000E+00, 0.5002200E+00, 0.5135100E+00, 0.5377300E+00, &
     & 0.5195000E+00, 0.5566000E+00, 0.5661600E+00, 0.6190600E+00, &
     & 0.6770700E+00, 0.6969600E+00, 0.7406700E+00, 0.7689700E+00, &
     & 0.8138800E+00, 0.8068800E+00, 0.6860576E+00, 0.6860576E+00 /
      data (ref_adm( 8,iz, 8,12),iz = 1,20) / &
     & 0.4850900E+00, 0.4850900E+00, 0.4763100E+00, 0.4830500E+00, &
     & 0.4816700E+00, 0.5002100E+00, 0.5226200E+00, 0.5376100E+00, &
     & 0.5466000E+00, 0.5584100E+00, 0.5606300E+00, 0.5781000E+00, &
     & 0.6468300E+00, 0.6577400E+00, 0.6872900E+00, 0.7451900E+00, &
     & 0.7768500E+00, 0.7404900E+00, 0.6650470E+00, 0.6650470E+00 /
      data (ref_adm( 8,iz, 9,12),iz = 1,20) / &
     & 0.4922900E+00, 0.4922900E+00, 0.5121500E+00, 0.4801700E+00, &
     & 0.5134600E+00, 0.5340400E+00, 0.5479700E+00, 0.5558100E+00, &
     & 0.5712700E+00, 0.5927500E+00, 0.5577000E+00, 0.6062900E+00, &
     & 0.6454400E+00, 0.6508800E+00, 0.6898500E+00, 0.7364600E+00, &
     & 0.7320000E+00, 0.7190100E+00, 0.6343880E+00, 0.6343880E+00 /
      data (ref_adm( 8,iz,10,12),iz = 1,20) / &
     & 0.5139600E+00, 0.5139600E+00, 0.5075300E+00, 0.5041800E+00, &
     & 0.5190000E+00, 0.5117100E+00, 0.5316100E+00, 0.5413700E+00, &
     & 0.5315900E+00, 0.5695700E+00, 0.5611500E+00, 0.5892200E+00, &
     & 0.6083700E+00, 0.6451900E+00, 0.6910500E+00, 0.7187800E+00, &
     & 0.7386300E+00, 0.7224500E+00, 0.6024463E+00, 0.6024463E+00 /
      data (ref_adm( 8,iz,11,12),iz = 1,20) / &
     & 0.5207600E+00, 0.5207600E+00, 0.5240900E+00, 0.5376600E+00, &
     & 0.5271900E+00, 0.5063700E+00, 0.4941700E+00, 0.5292600E+00, &
     & 0.5487100E+00, 0.5381400E+00, 0.5400300E+00, 0.5786300E+00, &
     & 0.5887000E+00, 0.6306600E+00, 0.6749500E+00, 0.7137500E+00, &
     & 0.7043800E+00, 0.6679100E+00, 0.6103900E+00, 0.6103900E+00 /
      data (ref_adm( 8,iz,12,12),iz = 1,20) / &
     & 0.4951400E+00, 0.4951400E+00, 0.5096200E+00, 0.5274900E+00, &
     & 0.5178800E+00, 0.5217000E+00, 0.5158300E+00, 0.5413800E+00, &
     & 0.5296400E+00, 0.5452900E+00, 0.5533700E+00, 0.5610400E+00, &
     & 0.5750700E+00, 0.6210200E+00, 0.6626300E+00, 0.6980900E+00, &
     & 0.6886500E+00, 0.6425800E+00, 0.5387500E+00, 0.5387500E+00 /
      data (ref_adm( 8,iz,13,12),iz = 1,20) / &
     & 0.5010300E+00, 0.5010300E+00, 0.4839900E+00, 0.4716800E+00, &
     & 0.4753800E+00, 0.4770900E+00, 0.4857000E+00, 0.5075600E+00, &
     & 0.5265500E+00, 0.5413300E+00, 0.5667200E+00, 0.5786500E+00, &
     & 0.5974200E+00, 0.5951800E+00, 0.6492000E+00, 0.6801900E+00, &
     & 0.6651100E+00, 0.6239100E+00, 0.5238600E+00, 0.5238600E+00 /
      data (ref_adm( 8,iz,14,12),iz = 1,20) / &
     & 0.4935800E+00, 0.4935800E+00, 0.5022400E+00, 0.5024500E+00, &
     & 0.5093800E+00, 0.5125400E+00, 0.5158800E+00, 0.5219200E+00, &
     & 0.5333700E+00, 0.5360800E+00, 0.5508300E+00, 0.5667500E+00, &
     & 0.5832100E+00, 0.5931000E+00, 0.6241700E+00, 0.6261700E+00, &
     & 0.6256200E+00, 0.5975300E+00, 0.4691200E+00, 0.4691200E+00 /
      data (ref_adm( 8,iz,15,12),iz = 1,20) / &
     & 0.4917100E+00, 0.4917100E+00, 0.4662200E+00, 0.4742300E+00, &
     & 0.4966900E+00, 0.4981200E+00, 0.5244000E+00, 0.5309700E+00, &
     & 0.5377600E+00, 0.5420400E+00, 0.5504400E+00, 0.5595200E+00, &
     & 0.5707000E+00, 0.5708300E+00, 0.6055500E+00, 0.5960200E+00, &
     & 0.6008900E+00, 0.5914800E+00, 0.5209868E+00, 0.5209868E+00 /
      data (ref_adm( 8,iz,16,12),iz = 1,20) / &
     & 0.4852100E+00, 0.4852100E+00, 0.4755800E+00, 0.4930600E+00, &
     & 0.4934800E+00, 0.4983100E+00, 0.5183400E+00, 0.5071000E+00, &
     & 0.5178300E+00, 0.5216400E+00, 0.5038300E+00, 0.5563200E+00, &
     & 0.5477800E+00, 0.5555600E+00, 0.6087200E+00, 0.5836000E+00, &
     & 0.5850700E+00, 0.5568600E+00, 0.5076520E+00, 0.5076520E+00 /
      data (ref_adm( 8,iz,17,12),iz = 1,20) / &
     & 0.4876200E+00, 0.4876200E+00, 0.5006400E+00, 0.4988400E+00, &
     & 0.5047700E+00, 0.5367200E+00, 0.5111100E+00, 0.5262600E+00, &
     & 0.5352900E+00, 0.5456400E+00, 0.5209600E+00, 0.5542000E+00, &
     & 0.5723500E+00, 0.5806600E+00, 0.6017000E+00, 0.5695600E+00, &
     & 0.5716700E+00, 0.5853900E+00, 0.4950927E+00, 0.4950927E+00 /
      data (ref_adm( 8,iz,18,12),iz = 1,20) / &
     & 0.4935400E+00, 0.4935400E+00, 0.5309200E+00, 0.5273000E+00, &
     & 0.5247700E+00, 0.5163400E+00, 0.5155500E+00, 0.5067900E+00, &
     & 0.5259000E+00, 0.5388200E+00, 0.5211300E+00, 0.5378900E+00, &
     & 0.5551700E+00, 0.5693000E+00, 0.5768800E+00, 0.5861000E+00, &
     & 0.5756700E+00, 0.5381961E+00, 0.4506573E+00, 0.4506573E+00 /
      data (ref_adm( 8,iz,19,12),iz = 1,20) / &
     & 0.4951200E+00, 0.4951200E+00, 0.4996900E+00, 0.5219400E+00, &
     & 0.5413000E+00, 0.5372500E+00, 0.5254000E+00, 0.5223000E+00, &
     & 0.5338200E+00, 0.5551100E+00, 0.5431900E+00, 0.5383000E+00, &
     & 0.5458600E+00, 0.5583900E+00, 0.5525700E+00, 0.5827100E+00, &
     & 0.4930000E+00, 0.5283205E+00, 0.4438289E+00, 0.4438289E+00 /
      data (ref_adm( 8,iz,20,12),iz = 1,20) / &
     & 0.5010000E+00, 0.5010000E+00, 0.4952900E+00, 0.5003900E+00, &
     & 0.5027200E+00, 0.5453900E+00, 0.5230300E+00, 0.5351400E+00, &
     & 0.5199900E+00, 0.5266800E+00, 0.5601400E+00, 0.5448000E+00, &
     & 0.5589100E+00, 0.5595800E+00, 0.5572300E+00, 0.5860600E+00, &
     & 0.5459840E+00, 0.5196853E+00, 0.4394646E+00, 0.4394646E+00 /
      data (ref_adm( 8,iz,21,12),iz = 1,20) / &
     & 0.4933800E+00, 0.4933800E+00, 0.4744100E+00, 0.4879400E+00, &
     & 0.5076200E+00, 0.5009100E+00, 0.5006200E+00, 0.5071000E+00, &
     & 0.5147600E+00, 0.5230300E+00, 0.5372000E+00, 0.5309800E+00, &
     & 0.5503800E+00, 0.5486800E+00, 0.5533200E+00, 0.5372000E+00, &
     & 0.5374421E+00, 0.5111113E+00, 0.4363208E+00, 0.4363208E+00 /
      data (ref_adm( 8,iz,22,12),iz = 1,20) / &
     & 0.4865100E+00, 0.4865100E+00, 0.4984800E+00, 0.5045400E+00, &
     & 0.4875500E+00, 0.5116900E+00, 0.5109500E+00, 0.5303000E+00, &
     & 0.5325200E+00, 0.5393000E+00, 0.5548600E+00, 0.5411900E+00, &
     & 0.5173600E+00, 0.5527300E+00, 0.5405000E+00, 0.5045300E+00, &
     & 0.5079241E+00, 0.4786714E+00, 0.4184789E+00, 0.4184789E+00 /
      data (ref_adm( 8,iz,23,12),iz = 1,20) / &
     & 0.4839800E+00, 0.4839800E+00, 0.4709300E+00, 0.5014600E+00, &
     & 0.5044900E+00, 0.5374700E+00, 0.5409400E+00, 0.5552800E+00, &
     & 0.5325800E+00, 0.5523600E+00, 0.5488900E+00, 0.5381800E+00, &
     & 0.5322900E+00, 0.5295200E+00, 0.5407900E+00, 0.5367200E+00, &
     & 0.5268600E+00, 0.4755251E+00, 0.4200999E+00, 0.4200999E+00 /
      data (ref_adm( 8,iz,24,12),iz = 1,20) / &
     & 0.4956800E+00, 0.4956800E+00, 0.5064600E+00, 0.5077000E+00, &
     & 0.5008700E+00, 0.5001500E+00, 0.5094000E+00, 0.5248000E+00, &
     & 0.5464500E+00, 0.5366400E+00, 0.5404400E+00, 0.5369500E+00, &
     & 0.5154600E+00, 0.5290400E+00, 0.5336200E+00, 0.5404400E+00, &
     & 0.5013700E+00, 0.4746723E+00, 0.4233351E+00, 0.4233351E+00 /
      data (ref_adm( 8,iz,25,12),iz = 1,20) / &
     & 0.4646900E+00, 0.4646900E+00, 0.4741100E+00, 0.5056100E+00, &
     & 0.5014200E+00, 0.4980700E+00, 0.4937900E+00, 0.4905900E+00, &
     & 0.5133800E+00, 0.4876400E+00, 0.4934100E+00, 0.5064700E+00, &
     & 0.5062500E+00, 0.5235900E+00, 0.5278700E+00, 0.5296600E+00, &
     & 0.5244600E+00, 0.5380800E+00, 0.4280353E+00, 0.4280353E+00 /
      data (ref_adm( 8,iz,26,12),iz = 1,20) / &
     & 0.4954600E+00, 0.4954600E+00, 0.4937600E+00, 0.4963800E+00, &
     & 0.5084000E+00, 0.5130800E+00, 0.5146900E+00, 0.5224600E+00, &
     & 0.5301100E+00, 0.5391200E+00, 0.5379800E+00, 0.5415300E+00, &
     & 0.5416100E+00, 0.5302500E+00, 0.5398000E+00, 0.5434600E+00, &
     & 0.5500200E+00, 0.5082200E+00, 0.4342922E+00, 0.4342922E+00 /
      data (ref_adm( 8,iz,27,12),iz = 1,20) / &
     & 0.4945600E+00, 0.4945600E+00, 0.5001600E+00, 0.4909600E+00, &
     & 0.5196000E+00, 0.5382500E+00, 0.5447600E+00, 0.5581700E+00, &
     & 0.5545200E+00, 0.5535100E+00, 0.5408000E+00, 0.5419800E+00, &
     & 0.5466900E+00, 0.5431400E+00, 0.5457200E+00, 0.5383200E+00, &
     & 0.5420000E+00, 0.5024300E+00, 0.4085300E+00, 0.4085300E+00 /
      data (ref_adm( 8,iz,28,12),iz = 1,20) / &
     & 0.4943900E+00, 0.4943900E+00, 0.4822500E+00, 0.4881700E+00, &
     & 0.5003200E+00, 0.5185300E+00, 0.5317600E+00, 0.5339600E+00, &
     & 0.5222000E+00, 0.5287200E+00, 0.5415400E+00, 0.5589500E+00, &
     & 0.5620100E+00, 0.5807500E+00, 0.5847900E+00, 0.5444300E+00, &
     & 0.5231400E+00, 0.4915000E+00, 0.4591200E+00, 0.4591200E+00 /
      data (ref_adm( 8,iz,29,12),iz = 1,20) / &
     & 0.4991300E+00, 0.4991300E+00, 0.5044200E+00, 0.4945800E+00, &
     & 0.5199700E+00, 0.5114500E+00, 0.5194300E+00, 0.5396600E+00, &
     & 0.5351200E+00, 0.5450900E+00, 0.5606000E+00, 0.5451500E+00, &
     & 0.5789900E+00, 0.5808300E+00, 0.5838400E+00, 0.5910000E+00, &
     & 0.5633000E+00, 0.5305100E+00, 0.4140300E+00, 0.4140300E+00 /
      data (ref_adm( 8,iz,30,12),iz = 1,20) / &
     & 0.5121500E+00, 0.5121500E+00, 0.5302600E+00, 0.5509500E+00, &
     & 0.5394000E+00, 0.5443700E+00, 0.5465800E+00, 0.5254900E+00, &
     & 0.5304200E+00, 0.5291200E+00, 0.5686700E+00, 0.5814000E+00, &
     & 0.5875300E+00, 0.5867700E+00, 0.5826100E+00, 0.5848800E+00, &
     & 0.5424000E+00, 0.5523700E+00, 0.4305400E+00, 0.4305400E+00 /
      data (ref_adm( 8,iz,31,12),iz = 1,20) / &
     & 0.4840500E+00, 0.4840500E+00, 0.4952900E+00, 0.4978700E+00, &
     & 0.5001100E+00, 0.5003000E+00, 0.5075800E+00, 0.5187200E+00, &
     & 0.5170700E+00, 0.5251400E+00, 0.5563100E+00, 0.5794800E+00, &
     & 0.5848600E+00, 0.5809600E+00, 0.5821700E+00, 0.5698300E+00, &
     & 0.5205400E+00, 0.5309800E+00, 0.4569900E+00, 0.4569900E+00 /
      data (ref_adm( 8,iz,32,12),iz = 1,20) / &
     & 0.5058000E+00, 0.5058000E+00, 0.5020300E+00, 0.5075700E+00, &
     & 0.5227800E+00, 0.5196400E+00, 0.5292900E+00, 0.5198800E+00, &
     & 0.5423100E+00, 0.5601200E+00, 0.5656900E+00, 0.5731800E+00, &
     & 0.5774100E+00, 0.5685600E+00, 0.5761700E+00, 0.5657900E+00, &
     & 0.5209100E+00, 0.5587000E+00, 0.4938242E+00, 0.4938242E+00 /
      data (ref_adm( 8,iz,33,12),iz = 1,20) / &
     & 0.4910200E+00, 0.4910200E+00, 0.4900600E+00, 0.5040000E+00, &
     & 0.5142100E+00, 0.5154700E+00, 0.5109700E+00, 0.5026400E+00, &
     & 0.5218500E+00, 0.5294600E+00, 0.5559400E+00, 0.5677700E+00, &
     & 0.5407500E+00, 0.5737800E+00, 0.5786700E+00, 0.5606600E+00, &
     & 0.5540700E+00, 0.5342400E+00, 0.4270000E+00, 0.4270000E+00 /
      data (ref_adm( 8,iz,34,12),iz = 1,20) / &
     & 0.4911500E+00, 0.4911500E+00, 0.5125100E+00, 0.5105400E+00, &
     & 0.5130600E+00, 0.5327800E+00, 0.5473100E+00, 0.5297800E+00, &
     & 0.5274600E+00, 0.5507700E+00, 0.5752600E+00, 0.5621800E+00, &
     & 0.5486600E+00, 0.5633500E+00, 0.5695300E+00, 0.5642400E+00, &
     & 0.5674900E+00, 0.5297800E+00, 0.4227200E+00, 0.4227200E+00 /
      data (ref_adm( 8,iz,35,12),iz = 1,20) / &
     & 0.4885200E+00, 0.4885200E+00, 0.4982000E+00, 0.4976300E+00, &
     & 0.5007300E+00, 0.5228400E+00, 0.5483400E+00, 0.5506300E+00, &
     & 0.5111100E+00, 0.5576200E+00, 0.5663000E+00, 0.5636400E+00, &
     & 0.5728100E+00, 0.5648700E+00, 0.5854600E+00, 0.5671800E+00, &
     & 0.5617100E+00, 0.5520900E+00, 0.4558100E+00, 0.4558100E+00 /
      data (ref_adm( 8,iz,36,12),iz = 1,20) / &
     & 0.4869500E+00, 0.4869500E+00, 0.4475500E+00, 0.4541900E+00, &
     & 0.4817400E+00, 0.5266000E+00, 0.5272100E+00, 0.5318900E+00, &
     & 0.5380800E+00, 0.5423000E+00, 0.5569100E+00, 0.5819100E+00, &
     & 0.5764100E+00, 0.5807400E+00, 0.6009100E+00, 0.5885000E+00, &
     & 0.5641300E+00, 0.5460300E+00, 0.5202119E+00, 0.5202119E+00 /
      data (ref_adm( 8,iz,37,12),iz = 1,20) / &
     & 0.4667100E+00, 0.4667100E+00, 0.4514800E+00, 0.4706400E+00, &
     & 0.4960100E+00, 0.4821300E+00, 0.5019800E+00, 0.5205500E+00, &
     & 0.5469900E+00, 0.5505600E+00, 0.5522000E+00, 0.5822900E+00, &
     & 0.5717500E+00, 0.5619800E+00, 0.5774000E+00, 0.5866800E+00, &
     & 0.5820600E+00, 0.5481000E+00, 0.5217477E+00, 0.5217477E+00 /
      data (ref_adm( 8,iz,38,12),iz = 1,20) / &
     & 0.4667100E+00, 0.4667100E+00, 0.4514800E+00, 0.4706400E+00, &
     & 0.4960100E+00, 0.4821300E+00, 0.5019800E+00, 0.5205500E+00, &
     & 0.5469900E+00, 0.5505600E+00, 0.5522000E+00, 0.5822900E+00, &
     & 0.5717500E+00, 0.5619800E+00, 0.5774000E+00, 0.5866800E+00, &
     & 0.5820600E+00, 0.5481000E+00, 0.5217477E+00, 0.5217477E+00 /
! Solar Zenith Angle 60.0 Albedo  0.5733600E+00
      data (ref_adm( 8,iz, 1,13),iz = 1,20) / &
     & 0.4981400E+00, 0.4981400E+00, 0.4780400E+00, 0.4949600E+00, &
     & 0.5132000E+00, 0.5396200E+00, 0.5557300E+00, 0.5702800E+00, &
     & 0.5919700E+00, 0.6216500E+00, 0.6883700E+00, 0.7442900E+00, &
     & 0.7928700E+00, 0.8781100E+00, 0.9009400E+00, 0.9819900E+00, &
     & 0.1142900E+01, 0.1249400E+01, 0.1105500E+01, 0.1105500E+01 /
      data (ref_adm( 8,iz, 2,13),iz = 1,20) / &
     & 0.4981400E+00, 0.4981400E+00, 0.4780400E+00, 0.4949600E+00, &
     & 0.5132000E+00, 0.5396200E+00, 0.5557300E+00, 0.5702800E+00, &
     & 0.5919700E+00, 0.6216500E+00, 0.6883700E+00, 0.7442900E+00, &
     & 0.7928700E+00, 0.8781100E+00, 0.9009400E+00, 0.9819900E+00, &
     & 0.1142900E+01, 0.1249400E+01, 0.1105500E+01, 0.1105500E+01 /
      data (ref_adm( 8,iz, 3,13),iz = 1,20) / &
     & 0.5029500E+00, 0.5029500E+00, 0.4941800E+00, 0.4935900E+00, &
     & 0.5154700E+00, 0.5275800E+00, 0.5467900E+00, 0.5509600E+00, &
     & 0.5889600E+00, 0.6259900E+00, 0.6547700E+00, 0.7250800E+00, &
     & 0.7713500E+00, 0.8306400E+00, 0.8872500E+00, 0.9929000E+00, &
     & 0.1103700E+01, 0.1145800E+01, 0.1110400E+01, 0.1110400E+01 /
      data (ref_adm( 8,iz, 4,13),iz = 1,20) / &
     & 0.5105000E+00, 0.5105000E+00, 0.5057100E+00, 0.4953400E+00, &
     & 0.5100600E+00, 0.5293900E+00, 0.5376800E+00, 0.5622000E+00, &
     & 0.5959500E+00, 0.6224000E+00, 0.6343400E+00, 0.7002400E+00, &
     & 0.7529900E+00, 0.8262900E+00, 0.8752500E+00, 0.9732500E+00, &
     & 0.1057200E+01, 0.1101200E+01, 0.9339200E+00, 0.9339200E+00 /
      data (ref_adm( 8,iz, 5,13),iz = 1,20) / &
     & 0.5247100E+00, 0.5247100E+00, 0.5036300E+00, 0.5049000E+00, &
     & 0.5034900E+00, 0.5076300E+00, 0.5294000E+00, 0.5333600E+00, &
     & 0.5630100E+00, 0.6097900E+00, 0.6362100E+00, 0.6856300E+00, &
     & 0.7349400E+00, 0.7807500E+00, 0.8645500E+00, 0.9489700E+00, &
     & 0.1016100E+01, 0.1055000E+01, 0.8906000E+00, 0.8906000E+00 /
      data (ref_adm( 8,iz, 6,13),iz = 1,20) / &
     & 0.5092300E+00, 0.5092300E+00, 0.5110100E+00, 0.5160900E+00, &
     & 0.5136800E+00, 0.5251200E+00, 0.5151800E+00, 0.5376100E+00, &
     & 0.5711900E+00, 0.5824900E+00, 0.6190000E+00, 0.6864900E+00, &
     & 0.7254700E+00, 0.7707500E+00, 0.8334200E+00, 0.8932200E+00, &
     & 0.9348500E+00, 0.9306500E+00, 0.9076200E+00, 0.9076200E+00 /
      data (ref_adm( 8,iz, 7,13),iz = 1,20) / &
     & 0.5135700E+00, 0.5135700E+00, 0.5291400E+00, 0.5200800E+00, &
     & 0.5338600E+00, 0.5444000E+00, 0.5391100E+00, 0.5565400E+00, &
     & 0.5730700E+00, 0.5983400E+00, 0.6451500E+00, 0.6792900E+00, &
     & 0.7258000E+00, 0.7679900E+00, 0.8285800E+00, 0.9076600E+00, &
     & 0.9520500E+00, 0.9407900E+00, 0.8412200E+00, 0.8412200E+00 /
      data (ref_adm( 8,iz, 8,13),iz = 1,20) / &
     & 0.4903500E+00, 0.4903500E+00, 0.5019200E+00, 0.5062100E+00, &
     & 0.5033200E+00, 0.5074200E+00, 0.5321800E+00, 0.5553000E+00, &
     & 0.5680400E+00, 0.5812600E+00, 0.6195800E+00, 0.6426300E+00, &
     & 0.6932300E+00, 0.7403700E+00, 0.7765200E+00, 0.8206400E+00, &
     & 0.8556900E+00, 0.8904800E+00, 0.7392113E+00, 0.7392113E+00 /
      data (ref_adm( 8,iz, 9,13),iz = 1,20) / &
     & 0.4830500E+00, 0.4830500E+00, 0.4998400E+00, 0.5032100E+00, &
     & 0.5108500E+00, 0.5269200E+00, 0.5461300E+00, 0.5488500E+00, &
     & 0.5590400E+00, 0.5722700E+00, 0.6087100E+00, 0.6477500E+00, &
     & 0.6678300E+00, 0.7109800E+00, 0.7266000E+00, 0.8064100E+00, &
     & 0.8554800E+00, 0.8110800E+00, 0.6718900E+00, 0.6718900E+00 /
      data (ref_adm( 8,iz,10,13),iz = 1,20) / &
     & 0.4823000E+00, 0.4823000E+00, 0.4929100E+00, 0.5123200E+00, &
     & 0.5128800E+00, 0.5242800E+00, 0.5477100E+00, 0.5493000E+00, &
     & 0.5509100E+00, 0.5675000E+00, 0.5906900E+00, 0.6296100E+00, &
     & 0.6629200E+00, 0.6951600E+00, 0.7116900E+00, 0.7992900E+00, &
     & 0.8255500E+00, 0.7563100E+00, 0.6641100E+00, 0.6641100E+00 /
      data (ref_adm( 8,iz,11,13),iz = 1,20) / &
     & 0.4735800E+00, 0.4735800E+00, 0.4891600E+00, 0.5005600E+00, &
     & 0.5011600E+00, 0.5310800E+00, 0.5392500E+00, 0.5502100E+00, &
     & 0.5396100E+00, 0.5746600E+00, 0.5779100E+00, 0.6058100E+00, &
     & 0.6401700E+00, 0.6930200E+00, 0.6869400E+00, 0.7791100E+00, &
     & 0.7624100E+00, 0.7363200E+00, 0.6381807E+00, 0.6381807E+00 /
      data (ref_adm( 8,iz,12,13),iz = 1,20) / &
     & 0.4801300E+00, 0.4801300E+00, 0.4882900E+00, 0.4933700E+00, &
     & 0.5140800E+00, 0.5291100E+00, 0.5376900E+00, 0.5307900E+00, &
     & 0.5412900E+00, 0.5630200E+00, 0.5726700E+00, 0.5851000E+00, &
     & 0.6150400E+00, 0.6536100E+00, 0.6861500E+00, 0.7319500E+00, &
     & 0.7415700E+00, 0.6860100E+00, 0.6129522E+00, 0.6129522E+00 /
      data (ref_adm( 8,iz,13,13),iz = 1,20) / &
     & 0.4838600E+00, 0.4838600E+00, 0.4839200E+00, 0.5087600E+00, &
     & 0.5173500E+00, 0.5133400E+00, 0.5117600E+00, 0.5265200E+00, &
     & 0.5480800E+00, 0.5449200E+00, 0.5579300E+00, 0.5771100E+00, &
     & 0.6047300E+00, 0.6265100E+00, 0.6467800E+00, 0.6616300E+00, &
     & 0.6956000E+00, 0.6415200E+00, 0.5927377E+00, 0.5927377E+00 /
      data (ref_adm( 8,iz,14,13),iz = 1,20) / &
     & 0.4894900E+00, 0.4894900E+00, 0.4912900E+00, 0.4965600E+00, &
     & 0.5036500E+00, 0.5048400E+00, 0.5103000E+00, 0.5213000E+00, &
     & 0.5331400E+00, 0.5498000E+00, 0.5584100E+00, 0.5755700E+00, &
     & 0.5919500E+00, 0.6173600E+00, 0.6533600E+00, 0.6463700E+00, &
     & 0.6700000E+00, 0.5557800E+00, 0.5763766E+00, 0.5763766E+00 /
      data (ref_adm( 8,iz,15,13),iz = 1,20) / &
     & 0.4944800E+00, 0.4944800E+00, 0.5015500E+00, 0.5021200E+00, &
     & 0.5056100E+00, 0.5164000E+00, 0.5173700E+00, 0.5353700E+00, &
     & 0.5445900E+00, 0.5488700E+00, 0.5615100E+00, 0.5743800E+00, &
     & 0.5892300E+00, 0.6050400E+00, 0.6285300E+00, 0.6344900E+00, &
     & 0.6250300E+00, 0.5970500E+00, 0.5618651E+00, 0.5618651E+00 /
      data (ref_adm( 8,iz,16,13),iz = 1,20) / &
     & 0.4815100E+00, 0.4815100E+00, 0.4778000E+00, 0.4692200E+00, &
     & 0.4746300E+00, 0.4895100E+00, 0.4894300E+00, 0.5289300E+00, &
     & 0.5202600E+00, 0.5020700E+00, 0.5205300E+00, 0.5339200E+00, &
     & 0.5442700E+00, 0.5592000E+00, 0.6222500E+00, 0.6119300E+00, &
     & 0.5817900E+00, 0.5730700E+00, 0.5470579E+00, 0.5470579E+00 /
      data (ref_adm( 8,iz,17,13),iz = 1,20) / &
     & 0.4855100E+00, 0.4855100E+00, 0.4790400E+00, 0.4651600E+00, &
     & 0.4911900E+00, 0.5038900E+00, 0.4949100E+00, 0.5321900E+00, &
     & 0.5326800E+00, 0.5339900E+00, 0.5537700E+00, 0.5564700E+00, &
     & 0.5581200E+00, 0.5570500E+00, 0.5867800E+00, 0.6236100E+00, &
     & 0.6103800E+00, 0.6026648E+00, 0.5327011E+00, 0.5327011E+00 /
      data (ref_adm( 8,iz,18,13),iz = 1,20) / &
     & 0.4878400E+00, 0.4878400E+00, 0.4969600E+00, 0.4962200E+00, &
     & 0.4961700E+00, 0.5004500E+00, 0.5077200E+00, 0.5160200E+00, &
     & 0.5193200E+00, 0.5413400E+00, 0.5518500E+00, 0.5641900E+00, &
     & 0.5632900E+00, 0.5741700E+00, 0.5735400E+00, 0.5849100E+00, &
     & 0.5789700E+00, 0.5524706E+00, 0.4709798E+00, 0.4709798E+00 /
      data (ref_adm( 8,iz,19,13),iz = 1,20) / &
     & 0.4975900E+00, 0.4975900E+00, 0.4979800E+00, 0.4975500E+00, &
     & 0.4851400E+00, 0.4837000E+00, 0.5038400E+00, 0.5090600E+00, &
     & 0.5167600E+00, 0.5449300E+00, 0.5479000E+00, 0.5503600E+00, &
     & 0.5559000E+00, 0.5709800E+00, 0.5750600E+00, 0.6058700E+00, &
     & 0.5681524E+00, 0.5401605E+00, 0.4635384E+00, 0.4635384E+00 /
      data (ref_adm( 8,iz,20,13),iz = 1,20) / &
     & 0.4958500E+00, 0.4958500E+00, 0.4871700E+00, 0.4933700E+00, &
     & 0.4857400E+00, 0.4927200E+00, 0.5156000E+00, 0.5068900E+00, &
     & 0.5051900E+00, 0.5376800E+00, 0.5498100E+00, 0.5492600E+00, &
     & 0.5569000E+00, 0.5714000E+00, 0.5655200E+00, 0.5577400E+00, &
     & 0.5573195E+00, 0.5306523E+00, 0.4592486E+00, 0.4592486E+00 /
      data (ref_adm( 8,iz,21,13),iz = 1,20) / &
     & 0.4843300E+00, 0.4843300E+00, 0.4533300E+00, 0.4822200E+00, &
     & 0.5102000E+00, 0.4985700E+00, 0.5107200E+00, 0.5094300E+00, &
     & 0.5274200E+00, 0.5507400E+00, 0.5504100E+00, 0.5384900E+00, &
     & 0.5585600E+00, 0.5546300E+00, 0.5460200E+00, 0.5664600E+00, &
     & 0.5483534E+00, 0.5223417E+00, 0.4569496E+00, 0.4569496E+00 /
      data (ref_adm( 8,iz,22,13),iz = 1,20) / &
     & 0.4626300E+00, 0.4626300E+00, 0.4600000E+00, 0.4759900E+00, &
     & 0.4908800E+00, 0.4961900E+00, 0.5108300E+00, 0.5096500E+00, &
     & 0.5291000E+00, 0.5433800E+00, 0.5527100E+00, 0.5390600E+00, &
     & 0.5516900E+00, 0.5661600E+00, 0.5609500E+00, 0.5564400E+00, &
     & 0.5463473E+00, 0.5178355E+00, 0.4452664E+00, 0.4452664E+00 /
      data (ref_adm( 8,iz,23,13),iz = 1,20) / &
     & 0.4799000E+00, 0.4799000E+00, 0.4782700E+00, 0.4728600E+00, &
     & 0.4928700E+00, 0.5015900E+00, 0.5224500E+00, 0.5311200E+00, &
     & 0.5319200E+00, 0.5411900E+00, 0.5436500E+00, 0.5452500E+00, &
     & 0.5584600E+00, 0.5822500E+00, 0.5589700E+00, 0.5396900E+00, &
     & 0.5519200E+00, 0.5095483E+00, 0.4435401E+00, 0.4435401E+00 /
      data (ref_adm( 8,iz,24,13),iz = 1,20) / &
     & 0.4812000E+00, 0.4812000E+00, 0.4557200E+00, 0.4619400E+00, &
     & 0.4586700E+00, 0.4589300E+00, 0.4846100E+00, 0.4984100E+00, &
     & 0.5171000E+00, 0.5198400E+00, 0.5358000E+00, 0.5376100E+00, &
     & 0.5537500E+00, 0.5504300E+00, 0.5612300E+00, 0.5532200E+00, &
     & 0.5621600E+00, 0.5035276E+00, 0.4431457E+00, 0.4431457E+00 /
      data (ref_adm( 8,iz,25,13),iz = 1,20) / &
     & 0.4949400E+00, 0.4949400E+00, 0.5075200E+00, 0.5088000E+00, &
     & 0.5079800E+00, 0.5101600E+00, 0.5179300E+00, 0.5161100E+00, &
     & 0.5232600E+00, 0.5249700E+00, 0.5209700E+00, 0.5189100E+00, &
     & 0.5261300E+00, 0.5234400E+00, 0.5361000E+00, 0.5605900E+00, &
     & 0.5718400E+00, 0.5484900E+00, 0.4442243E+00, 0.4442243E+00 /
      data (ref_adm( 8,iz,26,13),iz = 1,20) / &
     & 0.4905600E+00, 0.4905600E+00, 0.4855100E+00, 0.4970700E+00, &
     & 0.5020100E+00, 0.5057500E+00, 0.5027900E+00, 0.5122100E+00, &
     & 0.5256800E+00, 0.5231800E+00, 0.5322600E+00, 0.5434100E+00, &
     & 0.5489600E+00, 0.5449500E+00, 0.5327100E+00, 0.5521600E+00, &
     & 0.5518100E+00, 0.5046400E+00, 0.4466583E+00, 0.4466583E+00 /
      data (ref_adm( 8,iz,27,13),iz = 1,20) / &
     & 0.4879500E+00, 0.4879500E+00, 0.4779400E+00, 0.4816000E+00, &
     & 0.4982300E+00, 0.5009100E+00, 0.5108800E+00, 0.5100600E+00, &
     & 0.5183900E+00, 0.5163700E+00, 0.5259600E+00, 0.5356500E+00, &
     & 0.5477200E+00, 0.5523400E+00, 0.5526500E+00, 0.5544700E+00, &
     & 0.5636600E+00, 0.5390700E+00, 0.4619700E+00, 0.4619700E+00 /
      data (ref_adm( 8,iz,28,13),iz = 1,20) / &
     & 0.4869500E+00, 0.4869500E+00, 0.4904000E+00, 0.4955000E+00, &
     & 0.4941600E+00, 0.5009700E+00, 0.5149500E+00, 0.5278100E+00, &
     & 0.5072900E+00, 0.4996900E+00, 0.5399900E+00, 0.5249500E+00, &
     & 0.5418100E+00, 0.5413500E+00, 0.5485800E+00, 0.5748100E+00, &
     & 0.5545600E+00, 0.5499300E+00, 0.4724200E+00, 0.4724200E+00 /
      data (ref_adm( 8,iz,29,13),iz = 1,20) / &
     & 0.4813800E+00, 0.4813800E+00, 0.4798100E+00, 0.4966900E+00, &
     & 0.5028900E+00, 0.5009400E+00, 0.5154500E+00, 0.5301300E+00, &
     & 0.5398600E+00, 0.5174900E+00, 0.5368900E+00, 0.5431200E+00, &
     & 0.5525500E+00, 0.5600100E+00, 0.5624700E+00, 0.5757700E+00, &
     & 0.5702800E+00, 0.5471900E+00, 0.4137300E+00, 0.4137300E+00 /
      data (ref_adm( 8,iz,30,13),iz = 1,20) / &
     & 0.4660900E+00, 0.4660900E+00, 0.4933700E+00, 0.5170300E+00, &
     & 0.4923200E+00, 0.5040900E+00, 0.4990300E+00, 0.5313000E+00, &
     & 0.5458200E+00, 0.5239200E+00, 0.5414300E+00, 0.5368400E+00, &
     & 0.5578200E+00, 0.5748200E+00, 0.5480600E+00, 0.5617900E+00, &
     & 0.5835300E+00, 0.5567600E+00, 0.4526100E+00, 0.4526100E+00 /
      data (ref_adm( 8,iz,31,13),iz = 1,20) / &
     & 0.4940700E+00, 0.4940700E+00, 0.4854900E+00, 0.4813100E+00, &
     & 0.4973700E+00, 0.4918100E+00, 0.5103100E+00, 0.5191500E+00, &
     & 0.5229000E+00, 0.5328000E+00, 0.5324800E+00, 0.5470200E+00, &
     & 0.5542000E+00, 0.5570400E+00, 0.5512700E+00, 0.5676200E+00, &
     & 0.5877700E+00, 0.5393000E+00, 0.4799256E+00, 0.4799256E+00 /
      data (ref_adm( 8,iz,32,13),iz = 1,20) / &
     & 0.5011900E+00, 0.5011900E+00, 0.5105000E+00, 0.5202600E+00, &
     & 0.5213800E+00, 0.5361000E+00, 0.5392400E+00, 0.5466900E+00, &
     & 0.5555300E+00, 0.5575500E+00, 0.5652600E+00, 0.5677600E+00, &
     & 0.5872600E+00, 0.5965200E+00, 0.5958000E+00, 0.5988500E+00, &
     & 0.6225500E+00, 0.5788500E+00, 0.4519900E+00, 0.4519900E+00 /
      data (ref_adm( 8,iz,33,13),iz = 1,20) / &
     & 0.4943300E+00, 0.4943300E+00, 0.4977600E+00, 0.4994600E+00, &
     & 0.5006300E+00, 0.5325100E+00, 0.5269900E+00, 0.5399700E+00, &
     & 0.5550500E+00, 0.5546600E+00, 0.5608400E+00, 0.5721200E+00, &
     & 0.5717400E+00, 0.5889400E+00, 0.5818700E+00, 0.5895100E+00, &
     & 0.5918900E+00, 0.5463400E+00, 0.4584000E+00, 0.4584000E+00 /
      data (ref_adm( 8,iz,34,13),iz = 1,20) / &
     & 0.5034200E+00, 0.5034200E+00, 0.5042600E+00, 0.4986000E+00, &
     & 0.5235800E+00, 0.5165100E+00, 0.5285500E+00, 0.5435500E+00, &
     & 0.5524600E+00, 0.5635000E+00, 0.5528700E+00, 0.5667000E+00, &
     & 0.5676100E+00, 0.5860700E+00, 0.5846100E+00, 0.6063900E+00, &
     & 0.5941600E+00, 0.5747800E+00, 0.5018016E+00, 0.5018016E+00 /
      data (ref_adm( 8,iz,35,13),iz = 1,20) / &
     & 0.5150900E+00, 0.5150900E+00, 0.5075400E+00, 0.4741900E+00, &
     & 0.4913200E+00, 0.5185700E+00, 0.5253600E+00, 0.5350800E+00, &
     & 0.5441600E+00, 0.5609000E+00, 0.5433500E+00, 0.5572900E+00, &
     & 0.5801000E+00, 0.5959900E+00, 0.6039200E+00, 0.5956700E+00, &
     & 0.5885800E+00, 0.5523500E+00, 0.4853300E+00, 0.4853300E+00 /
      data (ref_adm( 8,iz,36,13),iz = 1,20) / &
     & 0.5076400E+00, 0.5076400E+00, 0.5040400E+00, 0.5008800E+00, &
     & 0.4978000E+00, 0.5096000E+00, 0.5246800E+00, 0.5335200E+00, &
     & 0.5417100E+00, 0.5548300E+00, 0.5683100E+00, 0.5811100E+00, &
     & 0.5959200E+00, 0.6141100E+00, 0.6083300E+00, 0.6047600E+00, &
     & 0.5872800E+00, 0.5506600E+00, 0.4841100E+00, 0.4841100E+00 /
      data (ref_adm( 8,iz,37,13),iz = 1,20) / &
     & 0.5149400E+00, 0.5149400E+00, 0.5087300E+00, 0.4917400E+00, &
     & 0.4954400E+00, 0.5138000E+00, 0.5239200E+00, 0.5272700E+00, &
     & 0.5421900E+00, 0.5521200E+00, 0.5736300E+00, 0.5869900E+00, &
     & 0.6059400E+00, 0.6167100E+00, 0.6012100E+00, 0.6077100E+00, &
     & 0.5791000E+00, 0.5550800E+00, 0.4470400E+00, 0.4470400E+00 /
      data (ref_adm( 8,iz,38,13),iz = 1,20) / &
     & 0.5149400E+00, 0.5149400E+00, 0.5087300E+00, 0.4917400E+00, &
     & 0.4954400E+00, 0.5138000E+00, 0.5239200E+00, 0.5272700E+00, &
     & 0.5421900E+00, 0.5521200E+00, 0.5736300E+00, 0.5869900E+00, &
     & 0.6059400E+00, 0.6167100E+00, 0.6012100E+00, 0.6077100E+00, &
     & 0.5791000E+00, 0.5550800E+00, 0.4470400E+00, 0.4470400E+00 /
! Solar Zenith Angle 65.0 Albedo  0.5854078E+00
      data (ref_adm( 8,iz, 1,14),iz = 1,20) / &
     & 0.4873200E+00, 0.4873200E+00, 0.4920700E+00, 0.4976300E+00, &
     & 0.4990900E+00, 0.5204300E+00, 0.5401400E+00, 0.5616800E+00, &
     & 0.5989100E+00, 0.6336300E+00, 0.6812900E+00, 0.7509100E+00, &
     & 0.8297900E+00, 0.9632200E+00, 0.1092500E+01, 0.1270400E+01, &
     & 0.1398600E+01, 0.1453900E+01, 0.1172284E+01, 0.1172284E+01 /
      data (ref_adm( 8,iz, 2,14),iz = 1,20) / &
     & 0.4873200E+00, 0.4873200E+00, 0.4920700E+00, 0.4976300E+00, &
     & 0.4990900E+00, 0.5204300E+00, 0.5401400E+00, 0.5616800E+00, &
     & 0.5989100E+00, 0.6336300E+00, 0.6812900E+00, 0.7509100E+00, &
     & 0.8297900E+00, 0.9632200E+00, 0.1092500E+01, 0.1270400E+01, &
     & 0.1398600E+01, 0.1453900E+01, 0.1172284E+01, 0.1172284E+01 /
      data (ref_adm( 8,iz, 3,14),iz = 1,20) / &
     & 0.4937500E+00, 0.4937500E+00, 0.4886100E+00, 0.4902100E+00, &
     & 0.5045200E+00, 0.5196200E+00, 0.5279800E+00, 0.5613800E+00, &
     & 0.5817800E+00, 0.6325900E+00, 0.6835100E+00, 0.7476100E+00, &
     & 0.8214100E+00, 0.9139400E+00, 0.1056600E+01, 0.1187400E+01, &
     & 0.1299900E+01, 0.1299500E+01, 0.7882375E+00, 0.7882375E+00 /
      data (ref_adm( 8,iz, 4,14),iz = 1,20) / &
     & 0.4783900E+00, 0.4783900E+00, 0.4803500E+00, 0.4872400E+00, &
     & 0.4919300E+00, 0.5091600E+00, 0.5386100E+00, 0.5615900E+00, &
     & 0.5894100E+00, 0.6268800E+00, 0.6775100E+00, 0.7433100E+00, &
     & 0.8029500E+00, 0.8869700E+00, 0.1011700E+01, 0.1129100E+01, &
     & 0.1253200E+01, 0.1360300E+01, 0.1056266E+01, 0.1056266E+01 /
      data (ref_adm( 8,iz, 5,14),iz = 1,20) / &
     & 0.4795200E+00, 0.4795200E+00, 0.4928600E+00, 0.4937000E+00, &
     & 0.5012000E+00, 0.5149200E+00, 0.5299600E+00, 0.5502300E+00, &
     & 0.5800100E+00, 0.6297000E+00, 0.6806600E+00, 0.7138500E+00, &
     & 0.7803200E+00, 0.8735900E+00, 0.9678800E+00, 0.1104600E+01, &
     & 0.1184000E+01, 0.1243700E+01, 0.9747040E+00, 0.9747040E+00 /
      data (ref_adm( 8,iz, 6,14),iz = 1,20) / &
     & 0.4808800E+00, 0.4808800E+00, 0.4809000E+00, 0.4905500E+00, &
     & 0.4937000E+00, 0.5036900E+00, 0.5230700E+00, 0.5438700E+00, &
     & 0.5751700E+00, 0.6204600E+00, 0.6635600E+00, 0.6897200E+00, &
     & 0.7647700E+00, 0.8502700E+00, 0.9420100E+00, 0.1040000E+01, &
     & 0.1167300E+01, 0.1267100E+01, 0.1173300E+01, 0.1173300E+01 /
      data (ref_adm( 8,iz, 7,14),iz = 1,20) / &
     & 0.4988000E+00, 0.4988000E+00, 0.5115200E+00, 0.5201600E+00, &
     & 0.5210000E+00, 0.5369300E+00, 0.5618300E+00, 0.5890200E+00, &
     & 0.6099700E+00, 0.6369500E+00, 0.6728600E+00, 0.7025500E+00, &
     & 0.7676600E+00, 0.8303100E+00, 0.9099600E+00, 0.9984000E+00, &
     & 0.1123200E+01, 0.1175600E+01, 0.1030000E+01, 0.1030000E+01 /
      data (ref_adm( 8,iz, 8,14),iz = 1,20) / &
     & 0.4914000E+00, 0.4914000E+00, 0.4786900E+00, 0.4919700E+00, &
     & 0.5042400E+00, 0.5323000E+00, 0.5351900E+00, 0.5523400E+00, &
     & 0.5731300E+00, 0.6077700E+00, 0.6303700E+00, 0.6743800E+00, &
     & 0.7271300E+00, 0.7877300E+00, 0.8504100E+00, 0.9201500E+00, &
     & 0.1102300E+01, 0.1109800E+01, 0.7871923E+00, 0.7871923E+00 /
      data (ref_adm( 8,iz, 9,14),iz = 1,20) / &
     & 0.4867500E+00, 0.4867500E+00, 0.4887900E+00, 0.5112200E+00, &
     & 0.5160400E+00, 0.5117400E+00, 0.5351500E+00, 0.5579000E+00, &
     & 0.5784000E+00, 0.5981000E+00, 0.6235200E+00, 0.6609300E+00, &
     & 0.7176700E+00, 0.7682400E+00, 0.8160100E+00, 0.8812900E+00, &
     & 0.9651400E+00, 0.9849600E+00, 0.8095700E+00, 0.8095700E+00 /
      data (ref_adm( 8,iz,10,14),iz = 1,20) / &
     & 0.4830500E+00, 0.4830500E+00, 0.4915000E+00, 0.4942900E+00, &
     & 0.5143300E+00, 0.5092900E+00, 0.5165200E+00, 0.5533100E+00, &
     & 0.5837200E+00, 0.5947800E+00, 0.6208500E+00, 0.6456300E+00, &
     & 0.6863900E+00, 0.7157800E+00, 0.7614500E+00, 0.8442500E+00, &
     & 0.9170400E+00, 0.8822300E+00, 0.7830300E+00, 0.7830300E+00 /
      data (ref_adm( 8,iz,11,14),iz = 1,20) / &
     & 0.4903300E+00, 0.4903300E+00, 0.4785100E+00, 0.4857400E+00, &
     & 0.4962100E+00, 0.5020400E+00, 0.5308100E+00, 0.5474700E+00, &
     & 0.5629700E+00, 0.5793800E+00, 0.5995100E+00, 0.6390600E+00, &
     & 0.6664800E+00, 0.6930200E+00, 0.7387700E+00, 0.7954300E+00, &
     & 0.8364200E+00, 0.7850900E+00, 0.6963400E+00, 0.6963400E+00 /
      data (ref_adm( 8,iz,12,14),iz = 1,20) / &
     & 0.4935000E+00, 0.4935000E+00, 0.4905600E+00, 0.4769500E+00, &
     & 0.4967800E+00, 0.5124800E+00, 0.5307900E+00, 0.5373000E+00, &
     & 0.5385200E+00, 0.5548200E+00, 0.5712200E+00, 0.6227900E+00, &
     & 0.6378600E+00, 0.6794100E+00, 0.7169900E+00, 0.7761600E+00, &
     & 0.7646400E+00, 0.7600200E+00, 0.6664300E+00, 0.6664300E+00 /
      data (ref_adm( 8,iz,13,14),iz = 1,20) / &
     & 0.4985000E+00, 0.4985000E+00, 0.4857700E+00, 0.5121700E+00, &
     & 0.5267100E+00, 0.5207800E+00, 0.5348400E+00, 0.5280800E+00, &
     & 0.5433600E+00, 0.5493500E+00, 0.5597100E+00, 0.6015200E+00, &
     & 0.6379300E+00, 0.6463300E+00, 0.6828500E+00, 0.7120300E+00, &
     & 0.7258300E+00, 0.6982600E+00, 0.5869300E+00, 0.5869300E+00 /
      data (ref_adm( 8,iz,14,14),iz = 1,20) / &
     & 0.4952000E+00, 0.4952000E+00, 0.4962700E+00, 0.5026000E+00, &
     & 0.5089900E+00, 0.5149500E+00, 0.5248000E+00, 0.5336900E+00, &
     & 0.5430800E+00, 0.5507400E+00, 0.5695400E+00, 0.5919500E+00, &
     & 0.6179500E+00, 0.6390600E+00, 0.6456000E+00, 0.6787000E+00, &
     & 0.6903300E+00, 0.6520500E+00, 0.5741491E+00, 0.5741491E+00 /
      data (ref_adm( 8,iz,15,14),iz = 1,20) / &
     & 0.4944100E+00, 0.4944100E+00, 0.4795000E+00, 0.4775000E+00, &
     & 0.4871300E+00, 0.4973100E+00, 0.5121200E+00, 0.5218500E+00, &
     & 0.5343000E+00, 0.5520400E+00, 0.5691100E+00, 0.5876900E+00, &
     & 0.6054700E+00, 0.6270400E+00, 0.6377100E+00, 0.6688300E+00, &
     & 0.6832400E+00, 0.6591300E+00, 0.5544569E+00, 0.5544569E+00 /
      data (ref_adm( 8,iz,16,14),iz = 1,20) / &
     & 0.4594500E+00, 0.4594500E+00, 0.4435000E+00, 0.4778900E+00, &
     & 0.4735400E+00, 0.4725500E+00, 0.4741800E+00, 0.4860500E+00, &
     & 0.4875000E+00, 0.5022700E+00, 0.5167700E+00, 0.5286200E+00, &
     & 0.5438400E+00, 0.5733100E+00, 0.6262200E+00, 0.6553500E+00, &
     & 0.6614100E+00, 0.6960300E+00, 0.5367103E+00, 0.5367103E+00 /
      data (ref_adm( 8,iz,17,14),iz = 1,20) / &
     & 0.4795700E+00, 0.4795700E+00, 0.4765900E+00, 0.4792600E+00, &
     & 0.4883800E+00, 0.4922500E+00, 0.4940200E+00, 0.5159000E+00, &
     & 0.5186500E+00, 0.5224900E+00, 0.5480800E+00, 0.5526100E+00, &
     & 0.5744700E+00, 0.5845800E+00, 0.6160900E+00, 0.6392800E+00, &
     & 0.6299700E+00, 0.5827629E+00, 0.5209648E+00, 0.5209648E+00 /
      data (ref_adm( 8,iz,18,14),iz = 1,20) / &
     & 0.4703600E+00, 0.4703600E+00, 0.4794500E+00, 0.4860400E+00, &
     & 0.4916500E+00, 0.4885200E+00, 0.4885500E+00, 0.5079400E+00, &
     & 0.5287600E+00, 0.5435700E+00, 0.5445500E+00, 0.5537700E+00, &
     & 0.5614600E+00, 0.5745500E+00, 0.5917100E+00, 0.6067800E+00, &
     & 0.6144600E+00, 0.6280026E+00, 0.5703863E+00, 0.5703863E+00 /
      data (ref_adm( 8,iz,19,14),iz = 1,20) / &
     & 0.4803800E+00, 0.4803800E+00, 0.5006100E+00, 0.5035900E+00, &
     & 0.5037800E+00, 0.5262900E+00, 0.5192400E+00, 0.5164100E+00, &
     & 0.5135600E+00, 0.5258600E+00, 0.5369100E+00, 0.5528100E+00, &
     & 0.5735100E+00, 0.5644100E+00, 0.5853400E+00, 0.5898400E+00, &
     & 0.6154599E+00, 0.6126566E+00, 0.5576380E+00, 0.5576380E+00 /
      data (ref_adm( 8,iz,20,14),iz = 1,20) / &
     & 0.4950900E+00, 0.4950900E+00, 0.4863800E+00, 0.4885900E+00, &
     & 0.4905500E+00, 0.5068800E+00, 0.4985200E+00, 0.5042800E+00, &
     & 0.5173700E+00, 0.5201300E+00, 0.5282400E+00, 0.5518700E+00, &
     & 0.5758400E+00, 0.5710500E+00, 0.5833400E+00, 0.5604100E+00, &
     & 0.6045007E+00, 0.6006668E+00, 0.5495288E+00, 0.5495288E+00 /
      data (ref_adm( 8,iz,21,14),iz = 1,20) / &
     & 0.4961100E+00, 0.4961100E+00, 0.4796800E+00, 0.4873300E+00, &
     & 0.4929600E+00, 0.4972400E+00, 0.4888600E+00, 0.4885100E+00, &
     & 0.5053100E+00, 0.5161000E+00, 0.5269600E+00, 0.5468800E+00, &
     & 0.5548500E+00, 0.5719600E+00, 0.5767100E+00, 0.5752300E+00, &
     & 0.5934542E+00, 0.5889226E+00, 0.5435262E+00, 0.5435262E+00 /
      data (ref_adm( 8,iz,22,14),iz = 1,20) / &
     & 0.4859200E+00, 0.4859200E+00, 0.4862300E+00, 0.4859900E+00, &
     & 0.4944800E+00, 0.4964000E+00, 0.4891600E+00, 0.5011500E+00, &
     & 0.5111300E+00, 0.5151700E+00, 0.5343100E+00, 0.5328400E+00, &
     & 0.5437200E+00, 0.5672300E+00, 0.5659900E+00, 0.5697700E+00, &
     & 0.5242452E+00, 0.4993944E+00, 0.4486835E+00, 0.4486835E+00 /
      data (ref_adm( 8,iz,23,14),iz = 1,20) / &
     & 0.4937000E+00, 0.4937000E+00, 0.4867400E+00, 0.4919500E+00, &
     & 0.4981600E+00, 0.5098700E+00, 0.5104300E+00, 0.5248600E+00, &
     & 0.5132300E+00, 0.5206400E+00, 0.5394000E+00, 0.5438800E+00, &
     & 0.5510800E+00, 0.5642900E+00, 0.5706300E+00, 0.5717800E+00, &
     & 0.5212453E+00, 0.4966612E+00, 0.4512876E+00, 0.4512876E+00 /
      data (ref_adm( 8,iz,24,14),iz = 1,20) / &
     & 0.4397200E+00, 0.4397200E+00, 0.4424200E+00, 0.4424600E+00, &
     & 0.4505200E+00, 0.4492100E+00, 0.4552600E+00, 0.4576300E+00, &
     & 0.4711800E+00, 0.4852500E+00, 0.4981000E+00, 0.5136900E+00, &
     & 0.5355500E+00, 0.5603100E+00, 0.5607300E+00, 0.5861100E+00, &
     & 0.5867100E+00, 0.4968465E+00, 0.4561760E+00, 0.4561760E+00 /
      data (ref_adm( 8,iz,25,14),iz = 1,20) / &
     & 0.4819800E+00, 0.4819800E+00, 0.4883100E+00, 0.4947700E+00, &
     & 0.4997500E+00, 0.5083000E+00, 0.5099500E+00, 0.5150300E+00, &
     & 0.5209400E+00, 0.5227400E+00, 0.5332600E+00, 0.5400200E+00, &
     & 0.5377300E+00, 0.5431500E+00, 0.5595700E+00, 0.5822000E+00, &
     & 0.5868600E+00, 0.5900300E+00, 0.4628932E+00, 0.4628932E+00 /
      data (ref_adm( 8,iz,26,14),iz = 1,20) / &
     & 0.4942800E+00, 0.4942800E+00, 0.4912800E+00, 0.4932800E+00, &
     & 0.4981800E+00, 0.4992400E+00, 0.5035700E+00, 0.5137800E+00, &
     & 0.5161000E+00, 0.5167300E+00, 0.5296300E+00, 0.5422000E+00, &
     & 0.5452200E+00, 0.5567600E+00, 0.5630400E+00, 0.5919800E+00, &
     & 0.5891400E+00, 0.5667000E+00, 0.4720134E+00, 0.4720134E+00 /
      data (ref_adm( 8,iz,27,14),iz = 1,20) / &
     & 0.4875400E+00, 0.4875400E+00, 0.4898700E+00, 0.5051500E+00, &
     & 0.4962700E+00, 0.4948200E+00, 0.4872700E+00, 0.5156600E+00, &
     & 0.5243500E+00, 0.5332200E+00, 0.5268900E+00, 0.5412000E+00, &
     & 0.5468400E+00, 0.5579300E+00, 0.5733300E+00, 0.5962200E+00, &
     & 0.5919600E+00, 0.5780300E+00, 0.4987300E+00, 0.4987300E+00 /
      data (ref_adm( 8,iz,28,14),iz = 1,20) / &
     & 0.4851000E+00, 0.4851000E+00, 0.4924600E+00, 0.4906500E+00, &
     & 0.4905900E+00, 0.4987200E+00, 0.4977400E+00, 0.5118300E+00, &
     & 0.5185500E+00, 0.5361300E+00, 0.5519500E+00, 0.5643500E+00, &
     & 0.5589600E+00, 0.5812700E+00, 0.5863700E+00, 0.6073400E+00, &
     & 0.5949800E+00, 0.5875800E+00, 0.5120900E+00, 0.5120900E+00 /
      data (ref_adm( 8,iz,29,14),iz = 1,20) / &
     & 0.4949600E+00, 0.4949600E+00, 0.4848800E+00, 0.4987500E+00, &
     & 0.5098100E+00, 0.5093900E+00, 0.5087500E+00, 0.5090400E+00, &
     & 0.5138300E+00, 0.5287500E+00, 0.5469700E+00, 0.5620100E+00, &
     & 0.5636600E+00, 0.5881300E+00, 0.5990700E+00, 0.6193900E+00, &
     & 0.6128600E+00, 0.5850500E+00, 0.5000700E+00, 0.5000700E+00 /
      data (ref_adm( 8,iz,30,14),iz = 1,20) / &
     & 0.4859300E+00, 0.4859300E+00, 0.4947400E+00, 0.5027500E+00, &
     & 0.5043500E+00, 0.5010400E+00, 0.5042000E+00, 0.5172500E+00, &
     & 0.5201500E+00, 0.5315700E+00, 0.5532600E+00, 0.5618600E+00, &
     & 0.5729200E+00, 0.5723200E+00, 0.5957500E+00, 0.6134300E+00, &
     & 0.6185700E+00, 0.6073200E+00, 0.5165700E+00, 0.5165700E+00 /
      data (ref_adm( 8,iz,31,14),iz = 1,20) / &
     & 0.4819100E+00, 0.4819100E+00, 0.4709700E+00, 0.4863800E+00, &
     & 0.4869100E+00, 0.5057900E+00, 0.5027800E+00, 0.5161800E+00, &
     & 0.5209300E+00, 0.5340300E+00, 0.5480500E+00, 0.5686600E+00, &
     & 0.5637000E+00, 0.5679200E+00, 0.5960100E+00, 0.6302900E+00, &
     & 0.6354800E+00, 0.5924000E+00, 0.5202300E+00, 0.5202300E+00 /
      data (ref_adm( 8,iz,32,14),iz = 1,20) / &
     & 0.4888200E+00, 0.4888200E+00, 0.4967000E+00, 0.4985700E+00, &
     & 0.5028000E+00, 0.5146000E+00, 0.5339400E+00, 0.5318400E+00, &
     & 0.5459700E+00, 0.5481600E+00, 0.5547500E+00, 0.5698200E+00, &
     & 0.5771400E+00, 0.5942900E+00, 0.6068000E+00, 0.6426000E+00, &
     & 0.6732800E+00, 0.6216100E+00, 0.5165700E+00, 0.5165700E+00 /
      data (ref_adm( 8,iz,33,14),iz = 1,20) / &
     & 0.4809600E+00, 0.4809600E+00, 0.4706400E+00, 0.4776300E+00, &
     & 0.4850300E+00, 0.4890500E+00, 0.5117300E+00, 0.5160100E+00, &
     & 0.5144300E+00, 0.5118200E+00, 0.5277100E+00, 0.5525000E+00, &
     & 0.5701000E+00, 0.5834200E+00, 0.5799400E+00, 0.5899200E+00, &
     & 0.6207200E+00, 0.5857400E+00, 0.5024800E+00, 0.5024800E+00 /
      data (ref_adm( 8,iz,34,14),iz = 1,20) / &
     & 0.4907800E+00, 0.4907800E+00, 0.4829000E+00, 0.4807800E+00, &
     & 0.4913600E+00, 0.4966100E+00, 0.5202600E+00, 0.5321800E+00, &
     & 0.5324300E+00, 0.5312500E+00, 0.5396100E+00, 0.5691400E+00, &
     & 0.5997000E+00, 0.5950400E+00, 0.6005300E+00, 0.6235500E+00, &
     & 0.6529100E+00, 0.5801300E+00, 0.4874500E+00, 0.4874500E+00 /
      data (ref_adm( 8,iz,35,14),iz = 1,20) / &
     & 0.4789800E+00, 0.4789800E+00, 0.4775600E+00, 0.4790800E+00, &
     & 0.4799300E+00, 0.4897800E+00, 0.5084000E+00, 0.5320100E+00, &
     & 0.5331500E+00, 0.5426500E+00, 0.5522400E+00, 0.5588700E+00, &
     & 0.5980400E+00, 0.6119600E+00, 0.6192400E+00, 0.6314100E+00, &
     & 0.6358000E+00, 0.5936700E+00, 0.5156600E+00, 0.5156600E+00 /
      data (ref_adm( 8,iz,36,14),iz = 1,20) / &
     & 0.4825600E+00, 0.4825600E+00, 0.4717600E+00, 0.4886600E+00, &
     & 0.4772600E+00, 0.4881900E+00, 0.5090100E+00, 0.5204400E+00, &
     & 0.5275500E+00, 0.5430000E+00, 0.5536800E+00, 0.5700700E+00, &
     & 0.5903700E+00, 0.6094900E+00, 0.6144900E+00, 0.6351900E+00, &
     & 0.6397100E+00, 0.5977100E+00, 0.5244900E+00, 0.5244900E+00 /
      data (ref_adm( 8,iz,37,14),iz = 1,20) / &
     & 0.4787600E+00, 0.4787600E+00, 0.4837500E+00, 0.4846200E+00, &
     & 0.4893600E+00, 0.4939700E+00, 0.5032300E+00, 0.4986900E+00, &
     & 0.5211200E+00, 0.5456000E+00, 0.5618700E+00, 0.5610300E+00, &
     & 0.5890500E+00, 0.6341800E+00, 0.6257700E+00, 0.6253500E+00, &
     & 0.6461800E+00, 0.6031500E+00, 0.4897300E+00, 0.4897300E+00 /
      data (ref_adm( 8,iz,38,14),iz = 1,20) / &
     & 0.4787600E+00, 0.4787600E+00, 0.4837500E+00, 0.4846200E+00, &
     & 0.4893600E+00, 0.4939700E+00, 0.5032300E+00, 0.4986900E+00, &
     & 0.5211200E+00, 0.5456000E+00, 0.5618700E+00, 0.5610300E+00, &
     & 0.5890500E+00, 0.6341800E+00, 0.6257700E+00, 0.6253500E+00, &
     & 0.6461800E+00, 0.6031500E+00, 0.4897300E+00, 0.4897300E+00 /
! Solar Zenith Angle 70.0 Albedo  0.6015446E+00
      data (ref_adm( 8,iz, 1,15),iz = 1,20) / &
     & 0.4716100E+00, 0.4716100E+00, 0.4723200E+00, 0.4904700E+00, &
     & 0.5133600E+00, 0.5356300E+00, 0.5398600E+00, 0.5737800E+00, &
     & 0.6247700E+00, 0.6620500E+00, 0.7202000E+00, 0.8011000E+00, &
     & 0.9137100E+00, 0.1058700E+01, 0.1214700E+01, 0.1347000E+01, &
     & 0.1541492E+01, 0.1708673E+01, 0.1424967E+01, 0.1424967E+01 /
      data (ref_adm( 8,iz, 2,15),iz = 1,20) / &
     & 0.4716100E+00, 0.4716100E+00, 0.4723200E+00, 0.4904700E+00, &
     & 0.5133600E+00, 0.5356300E+00, 0.5398600E+00, 0.5737800E+00, &
     & 0.6247700E+00, 0.6620500E+00, 0.7202000E+00, 0.8011000E+00, &
     & 0.9137100E+00, 0.1058700E+01, 0.1214700E+01, 0.1347000E+01, &
     & 0.1541492E+01, 0.1708673E+01, 0.1424967E+01, 0.1424967E+01 /
      data (ref_adm( 8,iz, 3,15),iz = 1,20) / &
     & 0.4717100E+00, 0.4717100E+00, 0.4819300E+00, 0.4835000E+00, &
     & 0.5071600E+00, 0.5248800E+00, 0.5522500E+00, 0.5784100E+00, &
     & 0.6074900E+00, 0.6538600E+00, 0.7098900E+00, 0.7848600E+00, &
     & 0.8933600E+00, 0.1028600E+01, 0.1167700E+01, 0.1293900E+01, &
     & 0.1511667E+01, 0.1658892E+01, 0.9584814E+00, 0.9584814E+00 /
      data (ref_adm( 8,iz, 4,15),iz = 1,20) / &
     & 0.4777800E+00, 0.4777800E+00, 0.4662600E+00, 0.4863900E+00, &
     & 0.4989900E+00, 0.5249100E+00, 0.5589100E+00, 0.5761900E+00, &
     & 0.5908800E+00, 0.6372000E+00, 0.7034200E+00, 0.7799400E+00, &
     & 0.8622000E+00, 0.9965400E+00, 0.1116200E+01, 0.1276000E+01, &
     & 0.1362000E+01, 0.1563821E+01, 0.1248682E+01, 0.1248682E+01 /
      data (ref_adm( 8,iz, 5,15),iz = 1,20) / &
     & 0.4717400E+00, 0.4717400E+00, 0.4761100E+00, 0.4750700E+00, &
     & 0.4957300E+00, 0.5261400E+00, 0.5578900E+00, 0.5710300E+00, &
     & 0.5932200E+00, 0.6249000E+00, 0.6880400E+00, 0.7593400E+00, &
     & 0.8450000E+00, 0.9687400E+00, 0.1081700E+01, 0.1179600E+01, &
     & 0.1179300E+01, 0.1447072E+01, 0.1131470E+01, 0.1131470E+01 /
      data (ref_adm( 8,iz, 6,15),iz = 1,20) / &
     & 0.4510400E+00, 0.4510400E+00, 0.4597800E+00, 0.4717900E+00, &
     & 0.4880600E+00, 0.5065500E+00, 0.5314700E+00, 0.5583000E+00, &
     & 0.5959000E+00, 0.6258400E+00, 0.6695700E+00, 0.7385800E+00, &
     & 0.8241200E+00, 0.9419100E+00, 0.1018100E+01, 0.1136600E+01, &
     & 0.1364600E+01, 0.1618700E+01, 0.1342900E+01, 0.1342900E+01 /
      data (ref_adm( 8,iz, 7,15),iz = 1,20) / &
     & 0.4737200E+00, 0.4737200E+00, 0.4844100E+00, 0.4950600E+00, &
     & 0.5029300E+00, 0.5245300E+00, 0.5516400E+00, 0.5774400E+00, &
     & 0.6075100E+00, 0.6366500E+00, 0.6737900E+00, 0.7284200E+00, &
     & 0.8057700E+00, 0.9033900E+00, 0.9983400E+00, 0.1140600E+01, &
     & 0.1355100E+01, 0.1497700E+01, 0.1498900E+01, 0.1498900E+01 /
      data (ref_adm( 8,iz, 8,15),iz = 1,20) / &
     & 0.4589400E+00, 0.4589400E+00, 0.4594700E+00, 0.4789000E+00, &
     & 0.4932900E+00, 0.5089400E+00, 0.5313800E+00, 0.5673800E+00, &
     & 0.5847000E+00, 0.6217100E+00, 0.6612600E+00, 0.7017100E+00, &
     & 0.7706400E+00, 0.8458200E+00, 0.9420400E+00, 0.1062800E+01, &
     & 0.1268700E+01, 0.1262200E+01, 0.8731045E+00, 0.8731045E+00 /
      data (ref_adm( 8,iz, 9,15),iz = 1,20) / &
     & 0.4632600E+00, 0.4632600E+00, 0.4666800E+00, 0.4894700E+00, &
     & 0.4870800E+00, 0.5012600E+00, 0.5229500E+00, 0.5537500E+00, &
     & 0.5774800E+00, 0.5974300E+00, 0.6442800E+00, 0.6811200E+00, &
     & 0.7466100E+00, 0.8123900E+00, 0.8838000E+00, 0.1034700E+01, &
     & 0.1162900E+01, 0.1145800E+01, 0.1016300E+01, 0.1016300E+01 /
      data (ref_adm( 8,iz,10,15),iz = 1,20) / &
     & 0.4611300E+00, 0.4611300E+00, 0.4830800E+00, 0.4877400E+00, &
     & 0.4957800E+00, 0.5053000E+00, 0.5287800E+00, 0.5366500E+00, &
     & 0.5731400E+00, 0.5953400E+00, 0.6280600E+00, 0.6603400E+00, &
     & 0.7208600E+00, 0.7840200E+00, 0.8338300E+00, 0.9536100E+00, &
     & 0.1048300E+01, 0.1004100E+01, 0.8681000E+00, 0.8681000E+00 /
      data (ref_adm( 8,iz,11,15),iz = 1,20) / &
     & 0.4725600E+00, 0.4725600E+00, 0.4765700E+00, 0.4893700E+00, &
     & 0.4960500E+00, 0.5101800E+00, 0.5271200E+00, 0.5363500E+00, &
     & 0.5587700E+00, 0.5802900E+00, 0.6137000E+00, 0.6401000E+00, &
     & 0.6943500E+00, 0.7501400E+00, 0.8053000E+00, 0.9039100E+00, &
     & 0.9572200E+00, 0.9412000E+00, 0.8344100E+00, 0.8344100E+00 /
      data (ref_adm( 8,iz,12,15),iz = 1,20) / &
     & 0.4723900E+00, 0.4723900E+00, 0.4835300E+00, 0.4821500E+00, &
     & 0.4964700E+00, 0.5019400E+00, 0.5101700E+00, 0.5265100E+00, &
     & 0.5536700E+00, 0.5689900E+00, 0.6039600E+00, 0.6288000E+00, &
     & 0.6694400E+00, 0.7199100E+00, 0.7784100E+00, 0.8632000E+00, &
     & 0.9035600E+00, 0.8660200E+00, 0.7459900E+00, 0.7459900E+00 /
      data (ref_adm( 8,iz,13,15),iz = 1,20) / &
     & 0.4820200E+00, 0.4820200E+00, 0.4880100E+00, 0.4758900E+00, &
     & 0.4884800E+00, 0.4934700E+00, 0.5126600E+00, 0.5292800E+00, &
     & 0.5432600E+00, 0.5657300E+00, 0.5874600E+00, 0.6130400E+00, &
     & 0.6447600E+00, 0.6952700E+00, 0.7337800E+00, 0.7959000E+00, &
     & 0.8465400E+00, 0.7954800E+00, 0.6695900E+00, 0.6695900E+00 /
      data (ref_adm( 8,iz,14,15),iz = 1,20) / &
     & 0.4809900E+00, 0.4809900E+00, 0.4868800E+00, 0.4925100E+00, &
     & 0.5004500E+00, 0.5124500E+00, 0.5246000E+00, 0.5354600E+00, &
     & 0.5458500E+00, 0.5604200E+00, 0.5760200E+00, 0.5979300E+00, &
     & 0.6310900E+00, 0.6603200E+00, 0.6993500E+00, 0.7541900E+00, &
     & 0.7721700E+00, 0.7833500E+00, 0.6227091E+00, 0.6227091E+00 /
      data (ref_adm( 8,iz,15,15),iz = 1,20) / &
     & 0.4886800E+00, 0.4886800E+00, 0.4721800E+00, 0.4764500E+00, &
     & 0.4850800E+00, 0.4953000E+00, 0.5098900E+00, 0.5226100E+00, &
     & 0.5383700E+00, 0.5566700E+00, 0.5750100E+00, 0.5999400E+00, &
     & 0.6282800E+00, 0.6535900E+00, 0.6863100E+00, 0.7139600E+00, &
     & 0.7267100E+00, 0.6987700E+00, 0.5998520E+00, 0.5998520E+00 /
      data (ref_adm( 8,iz,16,15),iz = 1,20) / &
     & 0.4411000E+00, 0.4411000E+00, 0.4306500E+00, 0.4360400E+00, &
     & 0.4507600E+00, 0.4614500E+00, 0.4695700E+00, 0.4778600E+00, &
     & 0.4866400E+00, 0.5102500E+00, 0.5205700E+00, 0.5375600E+00, &
     & 0.5638400E+00, 0.5975000E+00, 0.6491500E+00, 0.6666400E+00, &
     & 0.7225900E+00, 0.7631400E+00, 0.5796252E+00, 0.5796252E+00 /
      data (ref_adm( 8,iz,17,15),iz = 1,20) / &
     & 0.4615600E+00, 0.4615600E+00, 0.4643100E+00, 0.4731500E+00, &
     & 0.4787200E+00, 0.4931300E+00, 0.4991000E+00, 0.5023500E+00, &
     & 0.5113700E+00, 0.5332400E+00, 0.5430000E+00, 0.5636400E+00, &
     & 0.5962800E+00, 0.6168900E+00, 0.6399200E+00, 0.6416100E+00, &
     & 0.6680400E+00, 0.6204637E+00, 0.5615113E+00, 0.5615113E+00 /
      data (ref_adm( 8,iz,18,15),iz = 1,20) / &
     & 0.4579400E+00, 0.4579400E+00, 0.4697900E+00, 0.4762600E+00, &
     & 0.4774800E+00, 0.4896600E+00, 0.5023200E+00, 0.5059700E+00, &
     & 0.5106100E+00, 0.5386100E+00, 0.5531800E+00, 0.5667700E+00, &
     & 0.5851600E+00, 0.5973400E+00, 0.6120900E+00, 0.6340900E+00, &
     & 0.6691085E+00, 0.6858318E+00, 0.6434159E+00, 0.6434159E+00 /
      data (ref_adm( 8,iz,19,15),iz = 1,20) / &
     & 0.4625300E+00, 0.4625300E+00, 0.4717000E+00, 0.4783700E+00, &
     & 0.4841200E+00, 0.4901800E+00, 0.5080100E+00, 0.5064000E+00, &
     & 0.5199600E+00, 0.5368700E+00, 0.5446700E+00, 0.5607400E+00, &
     & 0.5769700E+00, 0.5945500E+00, 0.6077100E+00, 0.6143000E+00, &
     & 0.6539537E+00, 0.6681681E+00, 0.6294985E+00, 0.6294985E+00 /
      data (ref_adm( 8,iz,20,15),iz = 1,20) / &
     & 0.4803200E+00, 0.4803200E+00, 0.4675200E+00, 0.4630900E+00, &
     & 0.4627200E+00, 0.4758000E+00, 0.4930700E+00, 0.5030300E+00, &
     & 0.5122000E+00, 0.5320100E+00, 0.5381900E+00, 0.5459300E+00, &
     & 0.5652000E+00, 0.5745300E+00, 0.5862500E+00, 0.6110500E+00, &
     & 0.6415411E+00, 0.6553649E+00, 0.6212525E+00, 0.6212525E+00 /
      data (ref_adm( 8,iz,21,15),iz = 1,20) / &
     & 0.4807700E+00, 0.4807700E+00, 0.4735200E+00, 0.4713100E+00, &
     & 0.4864300E+00, 0.4933500E+00, 0.4950800E+00, 0.5037300E+00, &
     & 0.5080200E+00, 0.5232700E+00, 0.5343100E+00, 0.5386800E+00, &
     & 0.5585900E+00, 0.5764900E+00, 0.5834200E+00, 0.5884900E+00, &
     & 0.6299186E+00, 0.6436870E+00, 0.6162806E+00, 0.6162806E+00 /
      data (ref_adm( 8,iz,22,15),iz = 1,20) / &
     & 0.4760100E+00, 0.4760100E+00, 0.4683500E+00, 0.4645900E+00, &
     & 0.4704900E+00, 0.4821800E+00, 0.4938400E+00, 0.5000800E+00, &
     & 0.5127700E+00, 0.5221600E+00, 0.5345700E+00, 0.5361700E+00, &
     & 0.5494700E+00, 0.5726800E+00, 0.5775700E+00, 0.6119600E+00, &
     & 0.5517644E+00, 0.5339130E+00, 0.4937115E+00, 0.4937115E+00 /
      data (ref_adm( 8,iz,23,15),iz = 1,20) / &
     & 0.4611200E+00, 0.4611200E+00, 0.4688500E+00, 0.4694100E+00, &
     & 0.4670600E+00, 0.4760100E+00, 0.4857300E+00, 0.4915800E+00, &
     & 0.4999500E+00, 0.5164400E+00, 0.5312000E+00, 0.5435600E+00, &
     & 0.5485600E+00, 0.5707000E+00, 0.5810700E+00, 0.6122400E+00, &
     & 0.5483778E+00, 0.5312294E+00, 0.4974649E+00, 0.4974649E+00 /
      data (ref_adm( 8,iz,24,15),iz = 1,20) / &
     & 0.4330200E+00, 0.4330200E+00, 0.4309900E+00, 0.4325700E+00, &
     & 0.4361100E+00, 0.4456500E+00, 0.4502000E+00, 0.4642100E+00, &
     & 0.4739500E+00, 0.4827100E+00, 0.4935100E+00, 0.5016000E+00, &
     & 0.5205000E+00, 0.5369700E+00, 0.5716500E+00, 0.6078500E+00, &
     & 0.6313700E+00, 0.5321093E+00, 0.5042585E+00, 0.5042585E+00 /
      data (ref_adm( 8,iz,25,15),iz = 1,20) / &
     & 0.4776000E+00, 0.4776000E+00, 0.4878100E+00, 0.4886800E+00, &
     & 0.4932800E+00, 0.4976900E+00, 0.5055400E+00, 0.5116700E+00, &
     & 0.5211800E+00, 0.5320800E+00, 0.5421700E+00, 0.5487100E+00, &
     & 0.5572400E+00, 0.5709000E+00, 0.5752800E+00, 0.6052900E+00, &
     & 0.6206400E+00, 0.6167600E+00, 0.5133761E+00, 0.5133761E+00 /
      data (ref_adm( 8,iz,26,15),iz = 1,20) / &
     & 0.4743000E+00, 0.4743000E+00, 0.4732000E+00, 0.4798000E+00, &
     & 0.4847300E+00, 0.4888300E+00, 0.4954400E+00, 0.5085400E+00, &
     & 0.5193300E+00, 0.5237300E+00, 0.5345100E+00, 0.5493100E+00, &
     & 0.5617600E+00, 0.5684000E+00, 0.5808900E+00, 0.6084400E+00, &
     & 0.6251100E+00, 0.6311900E+00, 0.5258411E+00, 0.5258411E+00 /
      data (ref_adm( 8,iz,27,15),iz = 1,20) / &
     & 0.4717900E+00, 0.4717900E+00, 0.4805300E+00, 0.4706000E+00, &
     & 0.4763800E+00, 0.4883300E+00, 0.4966000E+00, 0.4970600E+00, &
     & 0.5150800E+00, 0.5197700E+00, 0.5378000E+00, 0.5525000E+00, &
     & 0.5662500E+00, 0.5782800E+00, 0.5982100E+00, 0.6085300E+00, &
     & 0.6310300E+00, 0.6378100E+00, 0.5432000E+00, 0.5432000E+00 /
      data (ref_adm( 8,iz,28,15),iz = 1,20) / &
     & 0.4645700E+00, 0.4645700E+00, 0.4608100E+00, 0.4712600E+00, &
     & 0.4928700E+00, 0.5063200E+00, 0.5015600E+00, 0.5130900E+00, &
     & 0.5147000E+00, 0.5259700E+00, 0.5448600E+00, 0.5618700E+00, &
     & 0.5804100E+00, 0.5948400E+00, 0.6096800E+00, 0.6397000E+00, &
     & 0.6467800E+00, 0.6382700E+00, 0.5592400E+00, 0.5592400E+00 /
      data (ref_adm( 8,iz,29,15),iz = 1,20) / &
     & 0.4671200E+00, 0.4671200E+00, 0.4563100E+00, 0.4662300E+00, &
     & 0.4874100E+00, 0.4981100E+00, 0.5045200E+00, 0.5028600E+00, &
     & 0.5253500E+00, 0.5291500E+00, 0.5513400E+00, 0.5641000E+00, &
     & 0.5770800E+00, 0.6012900E+00, 0.6233200E+00, 0.6462700E+00, &
     & 0.6594500E+00, 0.6537000E+00, 0.5634900E+00, 0.5634900E+00 /
      data (ref_adm( 8,iz,30,15),iz = 1,20) / &
     & 0.4632400E+00, 0.4632400E+00, 0.4691300E+00, 0.4667700E+00, &
     & 0.4727100E+00, 0.4950700E+00, 0.5047600E+00, 0.5207300E+00, &
     & 0.5235500E+00, 0.5342400E+00, 0.5522800E+00, 0.5702200E+00, &
     & 0.5823200E+00, 0.6006600E+00, 0.6135400E+00, 0.6443600E+00, &
     & 0.6765300E+00, 0.6778000E+00, 0.5743500E+00, 0.5743500E+00 /
      data (ref_adm( 8,iz,31,15),iz = 1,20) / &
     & 0.4638700E+00, 0.4638700E+00, 0.4771700E+00, 0.4714900E+00, &
     & 0.4745200E+00, 0.4845200E+00, 0.5103200E+00, 0.5151900E+00, &
     & 0.5324000E+00, 0.5476100E+00, 0.5625100E+00, 0.5773200E+00, &
     & 0.5761600E+00, 0.5882700E+00, 0.6115800E+00, 0.6558600E+00, &
     & 0.6823400E+00, 0.6824700E+00, 0.5793000E+00, 0.5793000E+00 /
      data (ref_adm( 8,iz,32,15),iz = 1,20) / &
     & 0.4786500E+00, 0.4786500E+00, 0.4841900E+00, 0.4871300E+00, &
     & 0.4869900E+00, 0.4955500E+00, 0.5089100E+00, 0.5195500E+00, &
     & 0.5357400E+00, 0.5420300E+00, 0.5549500E+00, 0.5719100E+00, &
     & 0.5836400E+00, 0.5985400E+00, 0.6183000E+00, 0.6577500E+00, &
     & 0.6873300E+00, 0.7137000E+00, 0.6142100E+00, 0.6142100E+00 /
      data (ref_adm( 8,iz,33,15),iz = 1,20) / &
     & 0.4720200E+00, 0.4720200E+00, 0.4582000E+00, 0.4604000E+00, &
     & 0.4653900E+00, 0.4755200E+00, 0.4844800E+00, 0.5060700E+00, &
     & 0.5209900E+00, 0.5353100E+00, 0.5453600E+00, 0.5620100E+00, &
     & 0.5888300E+00, 0.6052000E+00, 0.6250400E+00, 0.6453800E+00, &
     & 0.6655100E+00, 0.6502000E+00, 0.5562200E+00, 0.5562200E+00 /
      data (ref_adm( 8,iz,34,15),iz = 1,20) / &
     & 0.4575200E+00, 0.4575200E+00, 0.4602800E+00, 0.4672700E+00, &
     & 0.4684400E+00, 0.4818000E+00, 0.5071700E+00, 0.5093000E+00, &
     & 0.5292400E+00, 0.5514600E+00, 0.5622600E+00, 0.5775800E+00, &
     & 0.6013700E+00, 0.6303400E+00, 0.6372500E+00, 0.6583500E+00, &
     & 0.6754500E+00, 0.6956600E+00, 0.5991000E+00, 0.5991000E+00 /
      data (ref_adm( 8,iz,35,15),iz = 1,20) / &
     & 0.4718700E+00, 0.4718700E+00, 0.4658200E+00, 0.4479000E+00, &
     & 0.4669800E+00, 0.4929500E+00, 0.4986200E+00, 0.5050900E+00, &
     & 0.5234200E+00, 0.5407700E+00, 0.5610600E+00, 0.5845500E+00, &
     & 0.6072000E+00, 0.6256500E+00, 0.6436300E+00, 0.6666800E+00, &
     & 0.7030700E+00, 0.7073800E+00, 0.5604900E+00, 0.5604900E+00 /
      data (ref_adm( 8,iz,36,15),iz = 1,20) / &
     & 0.4644300E+00, 0.4644300E+00, 0.4673300E+00, 0.4627200E+00, &
     & 0.4778000E+00, 0.4800600E+00, 0.4907400E+00, 0.5002900E+00, &
     & 0.5183700E+00, 0.5481700E+00, 0.5561500E+00, 0.5864700E+00, &
     & 0.5972100E+00, 0.6298200E+00, 0.6477700E+00, 0.6836800E+00, &
     & 0.7139400E+00, 0.6955600E+00, 0.5795700E+00, 0.5795700E+00 /
      data (ref_adm( 8,iz,37,15),iz = 1,20) / &
     & 0.4658800E+00, 0.4658800E+00, 0.4685800E+00, 0.4698600E+00, &
     & 0.4788200E+00, 0.4800400E+00, 0.4861800E+00, 0.4946700E+00, &
     & 0.5300700E+00, 0.5378500E+00, 0.5605600E+00, 0.5845800E+00, &
     & 0.6096200E+00, 0.6335500E+00, 0.6607200E+00, 0.6962900E+00, &
     & 0.7162100E+00, 0.6911800E+00, 0.5879000E+00, 0.5879000E+00 /
      data (ref_adm( 8,iz,38,15),iz = 1,20) / &
     & 0.4658800E+00, 0.4658800E+00, 0.4685800E+00, 0.4698600E+00, &
     & 0.4788200E+00, 0.4800400E+00, 0.4861800E+00, 0.4946700E+00, &
     & 0.5300700E+00, 0.5378500E+00, 0.5605600E+00, 0.5845800E+00, &
     & 0.6096200E+00, 0.6335500E+00, 0.6607200E+00, 0.6962900E+00, &
     & 0.7162100E+00, 0.6911800E+00, 0.5879000E+00, 0.5879000E+00 /
! Solar Zenith Angle 75.0 Albedo  0.6121694E+00
      data (ref_adm( 8,iz, 1,16),iz = 1,20) / &
     & 0.4608300E+00, 0.4608300E+00, 0.4511300E+00, 0.4668800E+00, &
     & 0.4852500E+00, 0.5087200E+00, 0.5481100E+00, 0.5814000E+00, &
     & 0.6122500E+00, 0.6711200E+00, 0.7576300E+00, 0.8549200E+00, &
     & 0.9374700E+00, 0.1010400E+01, 0.1299759E+01, 0.1551366E+01, &
     & 0.1828793E+01, 0.2196782E+01, 0.1909077E+01, 0.1909077E+01 /
      data (ref_adm( 8,iz, 2,16),iz = 1,20) / &
     & 0.4608300E+00, 0.4608300E+00, 0.4511300E+00, 0.4668800E+00, &
     & 0.4852500E+00, 0.5087200E+00, 0.5481100E+00, 0.5814000E+00, &
     & 0.6122500E+00, 0.6711200E+00, 0.7576300E+00, 0.8549200E+00, &
     & 0.9374700E+00, 0.1010400E+01, 0.1299759E+01, 0.1551366E+01, &
     & 0.1828793E+01, 0.2196782E+01, 0.1909077E+01, 0.1909077E+01 /
      data (ref_adm( 8,iz, 3,16),iz = 1,20) / &
     & 0.4477100E+00, 0.4477100E+00, 0.4536800E+00, 0.4677300E+00, &
     & 0.4878800E+00, 0.5197500E+00, 0.5385500E+00, 0.5767900E+00, &
     & 0.6167000E+00, 0.6759000E+00, 0.7437700E+00, 0.8434900E+00, &
     & 0.9331700E+00, 0.1061600E+01, 0.1284117E+01, 0.1524960E+01, &
     & 0.1783959E+01, 0.2101781E+01, 0.1372568E+01, 0.1372568E+01 /
      data (ref_adm( 8,iz, 4,16),iz = 1,20) / &
     & 0.4430400E+00, 0.4430400E+00, 0.4478700E+00, 0.4676200E+00, &
     & 0.4894800E+00, 0.5137100E+00, 0.5402700E+00, 0.5654700E+00, &
     & 0.6121200E+00, 0.6641500E+00, 0.7285500E+00, 0.8231500E+00, &
     & 0.9386000E+00, 0.1069600E+01, 0.1251120E+01, 0.1471528E+01, &
     & 0.1695342E+01, 0.1931382E+01, 0.1649194E+01, 0.1649194E+01 /
      data (ref_adm( 8,iz, 5,16),iz = 1,20) / &
     & 0.4546100E+00, 0.4546100E+00, 0.4702200E+00, 0.4694300E+00, &
     & 0.4971000E+00, 0.5173800E+00, 0.5331100E+00, 0.5638900E+00, &
     & 0.6007900E+00, 0.6538600E+00, 0.7187900E+00, 0.8085900E+00, &
     & 0.9129800E+00, 0.1004200E+01, 0.1206143E+01, 0.1401636E+01, &
     & 0.1584152E+01, 0.1739012E+01, 0.1408184E+01, 0.1408184E+01 /
      data (ref_adm( 8,iz, 6,16),iz = 1,20) / &
     & 0.4411300E+00, 0.4411300E+00, 0.4444000E+00, 0.4618900E+00, &
     & 0.4800300E+00, 0.4946400E+00, 0.5271800E+00, 0.5587400E+00, &
     & 0.5977300E+00, 0.6348400E+00, 0.7011400E+00, 0.7670500E+00, &
     & 0.8592800E+00, 0.1006500E+01, 0.1200100E+01, 0.1454100E+01, &
     & 0.1815900E+01, 0.2097600E+01, 0.1227626E+01, 0.1227626E+01 /
      data (ref_adm( 8,iz, 7,16),iz = 1,20) / &
     & 0.4588800E+00, 0.4588800E+00, 0.4648900E+00, 0.4752200E+00, &
     & 0.4880400E+00, 0.5058300E+00, 0.5261700E+00, 0.5596900E+00, &
     & 0.5875400E+00, 0.6237100E+00, 0.6769200E+00, 0.7499600E+00, &
     & 0.8530100E+00, 0.9888700E+00, 0.1163200E+01, 0.1366800E+01, &
     & 0.1633500E+01, 0.1813400E+01, 0.1662400E+01, 0.1662400E+01 /
      data (ref_adm( 8,iz, 8,16),iz = 1,20) / &
     & 0.4468500E+00, 0.4468500E+00, 0.4571300E+00, 0.4562300E+00, &
     & 0.4773400E+00, 0.5021700E+00, 0.5239900E+00, 0.5465600E+00, &
     & 0.5788400E+00, 0.6127100E+00, 0.6663900E+00, 0.7286800E+00, &
     & 0.8089500E+00, 0.9354100E+00, 0.1061700E+01, 0.1289900E+01, &
     & 0.1389100E+01, 0.1401400E+01, 0.1275800E+01, 0.1275800E+01 /
      data (ref_adm( 8,iz, 9,16),iz = 1,20) / &
     & 0.4653700E+00, 0.4653700E+00, 0.4625400E+00, 0.4626800E+00, &
     & 0.4775000E+00, 0.5002600E+00, 0.5165900E+00, 0.5442100E+00, &
     & 0.5689500E+00, 0.6064900E+00, 0.6462900E+00, 0.7108100E+00, &
     & 0.7806300E+00, 0.8654900E+00, 0.9765800E+00, 0.1137900E+01, &
     & 0.1309000E+01, 0.1363000E+01, 0.1247200E+01, 0.1247200E+01 /
      data (ref_adm( 8,iz,10,16),iz = 1,20) / &
     & 0.4592500E+00, 0.4592500E+00, 0.4611000E+00, 0.4782400E+00, &
     & 0.4810800E+00, 0.4789600E+00, 0.5041700E+00, 0.5270800E+00, &
     & 0.5609000E+00, 0.5897200E+00, 0.6296000E+00, 0.6893000E+00, &
     & 0.7515500E+00, 0.8104400E+00, 0.9090900E+00, 0.1052100E+01, &
     & 0.1185700E+01, 0.1192400E+01, 0.1111200E+01, 0.1111200E+01 /
      data (ref_adm( 8,iz,11,16),iz = 1,20) / &
     & 0.4627600E+00, 0.4627600E+00, 0.4609100E+00, 0.4693200E+00, &
     & 0.4805000E+00, 0.4925500E+00, 0.5045800E+00, 0.5217500E+00, &
     & 0.5507200E+00, 0.5764700E+00, 0.6184900E+00, 0.6611200E+00, &
     & 0.7184100E+00, 0.7740400E+00, 0.8507400E+00, 0.9930600E+00, &
     & 0.1091800E+01, 0.1055900E+01, 0.1059400E+01, 0.1059400E+01 /
      data (ref_adm( 8,iz,12,16),iz = 1,20) / &
     & 0.4561600E+00, 0.4561600E+00, 0.4478100E+00, 0.4597700E+00, &
     & 0.4709500E+00, 0.4884000E+00, 0.4968300E+00, 0.5200900E+00, &
     & 0.5431900E+00, 0.5712100E+00, 0.6004400E+00, 0.6414600E+00, &
     & 0.6953900E+00, 0.7435100E+00, 0.8071400E+00, 0.9313900E+00, &
     & 0.9976800E+00, 0.9714700E+00, 0.8918200E+00, 0.8918200E+00 /
      data (ref_adm( 8,iz,13,16),iz = 1,20) / &
     & 0.4465300E+00, 0.4465300E+00, 0.4405700E+00, 0.4554100E+00, &
     & 0.4663600E+00, 0.4817400E+00, 0.4899600E+00, 0.5115300E+00, &
     & 0.5401800E+00, 0.5612900E+00, 0.5837200E+00, 0.6210300E+00, &
     & 0.6659400E+00, 0.7122700E+00, 0.7688200E+00, 0.8761700E+00, &
     & 0.9462000E+00, 0.9280100E+00, 0.8263900E+00, 0.8263900E+00 /
      data (ref_adm( 8,iz,14,16),iz = 1,20) / &
     & 0.4607800E+00, 0.4607800E+00, 0.4688900E+00, 0.4781400E+00, &
     & 0.4881600E+00, 0.4987000E+00, 0.5067500E+00, 0.5238400E+00, &
     & 0.5366500E+00, 0.5574700E+00, 0.5807700E+00, 0.6075800E+00, &
     & 0.6421500E+00, 0.6829500E+00, 0.7335200E+00, 0.8188300E+00, &
     & 0.8836400E+00, 0.8618800E+00, 0.6840040E+00, 0.6840040E+00 /
      data (ref_adm( 8,iz,15,16),iz = 1,20) / &
     & 0.4594600E+00, 0.4594600E+00, 0.4528900E+00, 0.4592600E+00, &
     & 0.4638000E+00, 0.4718400E+00, 0.4828900E+00, 0.5008300E+00, &
     & 0.5180300E+00, 0.5383700E+00, 0.5673100E+00, 0.5982100E+00, &
     & 0.6333400E+00, 0.6754200E+00, 0.7049100E+00, 0.7766600E+00, &
     & 0.8433900E+00, 0.9146000E+00, 0.6569114E+00, 0.6569114E+00 /
      data (ref_adm( 8,iz,16,16),iz = 1,20) / &
     & 0.4317000E+00, 0.4317000E+00, 0.4231800E+00, 0.4314500E+00, &
     & 0.4329000E+00, 0.4484600E+00, 0.4625800E+00, 0.4783300E+00, &
     & 0.4906900E+00, 0.5089400E+00, 0.5288000E+00, 0.5514500E+00, &
     & 0.5806000E+00, 0.6253900E+00, 0.6874300E+00, 0.7543700E+00, &
     & 0.7816600E+00, 0.6934180E+00, 0.6333465E+00, 0.6333465E+00 /
      data (ref_adm( 8,iz,17,16),iz = 1,20) / &
     & 0.4410900E+00, 0.4410900E+00, 0.4463900E+00, 0.4563600E+00, &
     & 0.4523600E+00, 0.4665400E+00, 0.4752200E+00, 0.4926400E+00, &
     & 0.5141300E+00, 0.5311000E+00, 0.5544700E+00, 0.5725300E+00, &
     & 0.5975100E+00, 0.6365500E+00, 0.6732800E+00, 0.7102000E+00, &
     & 0.7967600E+00, 0.6619423E+00, 0.6121377E+00, 0.6121377E+00 /
      data (ref_adm( 8,iz,18,16),iz = 1,20) / &
     & 0.4428900E+00, 0.4428900E+00, 0.4575600E+00, 0.4552800E+00, &
     & 0.4506100E+00, 0.4553600E+00, 0.4691400E+00, 0.4898100E+00, &
     & 0.5056300E+00, 0.5048200E+00, 0.5365300E+00, 0.5602400E+00, &
     & 0.5887300E+00, 0.6160300E+00, 0.6391300E+00, 0.6894100E+00, &
     & 0.7252394E+00, 0.7556456E+00, 0.7445875E+00, 0.7445875E+00 /
      data (ref_adm( 8,iz,19,16),iz = 1,20) / &
     & 0.4497900E+00, 0.4497900E+00, 0.4551300E+00, 0.4513900E+00, &
     & 0.4439400E+00, 0.4563600E+00, 0.4597500E+00, 0.4789700E+00, &
     & 0.5085600E+00, 0.5109900E+00, 0.5308700E+00, 0.5544500E+00, &
     & 0.5762700E+00, 0.6049300E+00, 0.6249000E+00, 0.6563500E+00, &
     & 0.7014914E+00, 0.7297384E+00, 0.7273865E+00, 0.7273865E+00 /
      data (ref_adm( 8,iz,20,16),iz = 1,20) / &
     & 0.4605200E+00, 0.4605200E+00, 0.4591200E+00, 0.4518900E+00, &
     & 0.4582400E+00, 0.4623300E+00, 0.4644600E+00, 0.4798700E+00, &
     & 0.5005400E+00, 0.5021000E+00, 0.5178400E+00, 0.5469500E+00, &
     & 0.5590200E+00, 0.5901600E+00, 0.6211900E+00, 0.7039900E+00, &
     & 0.6836858E+00, 0.7115846E+00, 0.7179371E+00, 0.7179371E+00 /
      data (ref_adm( 8,iz,21,16),iz = 1,20) / &
     & 0.4479200E+00, 0.4479200E+00, 0.4612500E+00, 0.4594400E+00, &
     & 0.4562000E+00, 0.4676700E+00, 0.4596000E+00, 0.4797900E+00, &
     & 0.4931100E+00, 0.4989400E+00, 0.5097800E+00, 0.5373700E+00, &
     & 0.5574500E+00, 0.5795300E+00, 0.6144400E+00, 0.6445900E+00, &
     & 0.6688055E+00, 0.6970645E+00, 0.7140938E+00, 0.7140938E+00 /
      data (ref_adm( 8,iz,22,16),iz = 1,20) / &
     & 0.4469300E+00, 0.4469300E+00, 0.4571600E+00, 0.4610500E+00, &
     & 0.4518900E+00, 0.4513000E+00, 0.4652200E+00, 0.4791100E+00, &
     & 0.4870900E+00, 0.4996300E+00, 0.5169200E+00, 0.5405100E+00, &
     & 0.5553200E+00, 0.5883500E+00, 0.6065100E+00, 0.6389600E+00, &
     & 0.5966269E+00, 0.5988650E+00, 0.5905576E+00, 0.5905576E+00 /
      data (ref_adm( 8,iz,23,16),iz = 1,20) / &
     & 0.4380000E+00, 0.4380000E+00, 0.4468000E+00, 0.4486700E+00, &
     & 0.4627900E+00, 0.4568400E+00, 0.4668700E+00, 0.4741300E+00, &
     & 0.4890600E+00, 0.5006300E+00, 0.5162400E+00, 0.5429400E+00, &
     & 0.5618600E+00, 0.5826700E+00, 0.6050500E+00, 0.6319500E+00, &
     & 0.6634700E+00, 0.5956922E+00, 0.5963061E+00, 0.5963061E+00 /
      data (ref_adm( 8,iz,24,16),iz = 1,20) / &
     & 0.4264900E+00, 0.4264900E+00, 0.4294800E+00, 0.4310500E+00, &
     & 0.4389000E+00, 0.4459700E+00, 0.4497100E+00, 0.4599300E+00, &
     & 0.4670800E+00, 0.4805600E+00, 0.4955600E+00, 0.5099400E+00, &
     & 0.5329200E+00, 0.5593300E+00, 0.5845500E+00, 0.6292100E+00, &
     & 0.6569000E+00, 0.5971401E+00, 0.6065925E+00, 0.6065925E+00 /
      data (ref_adm( 8,iz,25,16),iz = 1,20) / &
     & 0.4496800E+00, 0.4496800E+00, 0.4583800E+00, 0.4636800E+00, &
     & 0.4664200E+00, 0.4764100E+00, 0.4834500E+00, 0.4933900E+00, &
     & 0.5016200E+00, 0.5089200E+00, 0.5245600E+00, 0.5407800E+00, &
     & 0.5622200E+00, 0.5920600E+00, 0.6022000E+00, 0.6326600E+00, &
     & 0.6637700E+00, 0.6009200E+00, 0.6204280E+00, 0.6204280E+00 /
      data (ref_adm( 8,iz,26,16),iz = 1,20) / &
     & 0.4533600E+00, 0.4533600E+00, 0.4420500E+00, 0.4362900E+00, &
     & 0.4458500E+00, 0.4539100E+00, 0.4721900E+00, 0.4702100E+00, &
     & 0.4885400E+00, 0.5000300E+00, 0.5075400E+00, 0.5315000E+00, &
     & 0.5554400E+00, 0.5799400E+00, 0.5913400E+00, 0.6408300E+00, &
     & 0.6623100E+00, 0.6898000E+00, 0.6393100E+00, 0.6393100E+00 /
      data (ref_adm( 8,iz,27,16),iz = 1,20) / &
     & 0.4481900E+00, 0.4481900E+00, 0.4455200E+00, 0.4459400E+00, &
     & 0.4483900E+00, 0.4649200E+00, 0.4767800E+00, 0.4814700E+00, &
     & 0.4930500E+00, 0.5030300E+00, 0.5179900E+00, 0.5398000E+00, &
     & 0.5562700E+00, 0.5931900E+00, 0.6133700E+00, 0.6592700E+00, &
     & 0.6868600E+00, 0.7032800E+00, 0.6629700E+00, 0.6629700E+00 /
      data (ref_adm( 8,iz,28,16),iz = 1,20) / &
     & 0.4425500E+00, 0.4425500E+00, 0.4457200E+00, 0.4440900E+00, &
     & 0.4462100E+00, 0.4562200E+00, 0.4716800E+00, 0.4928600E+00, &
     & 0.4884100E+00, 0.5026400E+00, 0.5203300E+00, 0.5355600E+00, &
     & 0.5587500E+00, 0.5993500E+00, 0.6238600E+00, 0.6692300E+00, &
     & 0.7050900E+00, 0.7130900E+00, 0.6471700E+00, 0.6471700E+00 /
      data (ref_adm( 8,iz,29,16),iz = 1,20) / &
     & 0.4519400E+00, 0.4519400E+00, 0.4463200E+00, 0.4466000E+00, &
     & 0.4536800E+00, 0.4586900E+00, 0.4721500E+00, 0.4776800E+00, &
     & 0.4900700E+00, 0.4991200E+00, 0.5191600E+00, 0.5424400E+00, &
     & 0.5572300E+00, 0.6147300E+00, 0.6360100E+00, 0.6823900E+00, &
     & 0.7071900E+00, 0.7278400E+00, 0.6573500E+00, 0.6573500E+00 /
      data (ref_adm( 8,iz,30,16),iz = 1,20) / &
     & 0.4462900E+00, 0.4462900E+00, 0.4352400E+00, 0.4407600E+00, &
     & 0.4531500E+00, 0.4566900E+00, 0.4703800E+00, 0.4792600E+00, &
     & 0.4913100E+00, 0.5022800E+00, 0.5315900E+00, 0.5504800E+00, &
     & 0.5764700E+00, 0.6153600E+00, 0.6429300E+00, 0.6986600E+00, &
     & 0.7282500E+00, 0.7513300E+00, 0.6562100E+00, 0.6562100E+00 /
      data (ref_adm( 8,iz,31,16),iz = 1,20) / &
     & 0.4447000E+00, 0.4447000E+00, 0.4359700E+00, 0.4384300E+00, &
     & 0.4478300E+00, 0.4497200E+00, 0.4635000E+00, 0.4800300E+00, &
     & 0.4943600E+00, 0.5072900E+00, 0.5365400E+00, 0.5741600E+00, &
     & 0.5930600E+00, 0.6231800E+00, 0.6562600E+00, 0.6963600E+00, &
     & 0.7402000E+00, 0.7803000E+00, 0.7168500E+00, 0.7168500E+00 /
      data (ref_adm( 8,iz,32,16),iz = 1,20) / &
     & 0.4370700E+00, 0.4370700E+00, 0.4505900E+00, 0.4552100E+00, &
     & 0.4507900E+00, 0.4538300E+00, 0.4643100E+00, 0.4809700E+00, &
     & 0.5040700E+00, 0.5213100E+00, 0.5417200E+00, 0.5750700E+00, &
     & 0.5931200E+00, 0.6283900E+00, 0.6573700E+00, 0.7045000E+00, &
     & 0.7648300E+00, 0.7923500E+00, 0.6886400E+00, 0.6886400E+00 /
      data (ref_adm( 8,iz,33,16),iz = 1,20) / &
     & 0.4518900E+00, 0.4518900E+00, 0.4472300E+00, 0.4407300E+00, &
     & 0.4453100E+00, 0.4577000E+00, 0.4725000E+00, 0.4836500E+00, &
     & 0.4976600E+00, 0.5209400E+00, 0.5337600E+00, 0.5588700E+00, &
     & 0.5964900E+00, 0.6275900E+00, 0.6626100E+00, 0.7095800E+00, &
     & 0.7565600E+00, 0.7695500E+00, 0.6728600E+00, 0.6728600E+00 /
      data (ref_adm( 8,iz,34,16),iz = 1,20) / &
     & 0.4397600E+00, 0.4397600E+00, 0.4447500E+00, 0.4479700E+00, &
     & 0.4506400E+00, 0.4535300E+00, 0.4707800E+00, 0.4965300E+00, &
     & 0.5041500E+00, 0.5175800E+00, 0.5326900E+00, 0.5536400E+00, &
     & 0.5913900E+00, 0.6345700E+00, 0.6770200E+00, 0.7043600E+00, &
     & 0.7601100E+00, 0.8258300E+00, 0.7321500E+00, 0.7321500E+00 /
      data (ref_adm( 8,iz,35,16),iz = 1,20) / &
     & 0.4512500E+00, 0.4512500E+00, 0.4507500E+00, 0.4516800E+00, &
     & 0.4514200E+00, 0.4620700E+00, 0.4658200E+00, 0.4920100E+00, &
     & 0.5117200E+00, 0.5198200E+00, 0.5346700E+00, 0.5586600E+00, &
     & 0.5941800E+00, 0.6315500E+00, 0.6705800E+00, 0.7168200E+00, &
     & 0.7673300E+00, 0.8413600E+00, 0.8106700E+00, 0.8106700E+00 /
      data (ref_adm( 8,iz,36,16),iz = 1,20) / &
     & 0.4490800E+00, 0.4490800E+00, 0.4480400E+00, 0.4498700E+00, &
     & 0.4562100E+00, 0.4609600E+00, 0.4723600E+00, 0.4960300E+00, &
     & 0.5153100E+00, 0.5246100E+00, 0.5488400E+00, 0.5568100E+00, &
     & 0.5907600E+00, 0.6459900E+00, 0.6784800E+00, 0.7351000E+00, &
     & 0.7780500E+00, 0.8271300E+00, 0.7057400E+00, 0.7057400E+00 /
      data (ref_adm( 8,iz,37,16),iz = 1,20) / &
     & 0.4434400E+00, 0.4434400E+00, 0.4339300E+00, 0.4424200E+00, &
     & 0.4586900E+00, 0.4780300E+00, 0.4892400E+00, 0.4969200E+00, &
     & 0.5107300E+00, 0.5270500E+00, 0.5430500E+00, 0.5622500E+00, &
     & 0.5921500E+00, 0.6358300E+00, 0.6703800E+00, 0.7281800E+00, &
     & 0.8005200E+00, 0.8275400E+00, 0.7597400E+00, 0.7597400E+00 /
      data (ref_adm( 8,iz,38,16),iz = 1,20) / &
     & 0.4434400E+00, 0.4434400E+00, 0.4339300E+00, 0.4424200E+00, &
     & 0.4586900E+00, 0.4780300E+00, 0.4892400E+00, 0.4969200E+00, &
     & 0.5107300E+00, 0.5270500E+00, 0.5430500E+00, 0.5622500E+00, &
     & 0.5921500E+00, 0.6358300E+00, 0.6703800E+00, 0.7281800E+00, &
     & 0.8005200E+00, 0.8275400E+00, 0.7597400E+00, 0.7597400E+00 /
! Solar Zenith Angle 80.0 Albedo  0.6438294E+00
      data (ref_adm( 8,iz, 1,17),iz = 1,20) / &
     & 0.4348700E+00, 0.4348700E+00, 0.4458700E+00, 0.4628200E+00, &
     & 0.4760400E+00, 0.5084500E+00, 0.5396200E+00, 0.5821200E+00, &
     & 0.6256000E+00, 0.6765500E+00, 0.7730500E+00, 0.8981600E+00, &
     & 0.1096659E+01, 0.1275658E+01, 0.1590101E+01, 0.2135419E+01, &
     & 0.2950030E+01, 0.4101072E+01, 0.2215540E+01, 0.2215540E+01 /
      data (ref_adm( 8,iz, 2,17),iz = 1,20) / &
     & 0.4348700E+00, 0.4348700E+00, 0.4458700E+00, 0.4628200E+00, &
     & 0.4760400E+00, 0.5084500E+00, 0.5396200E+00, 0.5821200E+00, &
     & 0.6256000E+00, 0.6765500E+00, 0.7730500E+00, 0.8981600E+00, &
     & 0.1096659E+01, 0.1275658E+01, 0.1590101E+01, 0.2135419E+01, &
     & 0.2950030E+01, 0.4101072E+01, 0.2215540E+01, 0.2215540E+01 /
      data (ref_adm( 8,iz, 3,17),iz = 1,20) / &
     & 0.4415200E+00, 0.4415200E+00, 0.4432800E+00, 0.4566100E+00, &
     & 0.4815600E+00, 0.4962500E+00, 0.5295200E+00, 0.5657200E+00, &
     & 0.6239600E+00, 0.6817500E+00, 0.7692200E+00, 0.8804300E+00, &
     & 0.1085539E+01, 0.1260707E+01, 0.1559862E+01, 0.2073560E+01, &
     & 0.2803695E+01, 0.4106898E+01, 0.1696658E+01, 0.1696658E+01 /
      data (ref_adm( 8,iz, 4,17),iz = 1,20) / &
     & 0.4456300E+00, 0.4456300E+00, 0.4501500E+00, 0.4681600E+00, &
     & 0.4754800E+00, 0.5107400E+00, 0.5285500E+00, 0.5615500E+00, &
     & 0.6132900E+00, 0.6736100E+00, 0.7642900E+00, 0.8691400E+00, &
     & 0.1061597E+01, 0.1230071E+01, 0.1498789E+01, 0.1949076E+01, &
     & 0.2537812E+01, 0.3667842E+01, 0.2758121E+01, 0.2758121E+01 /
      data (ref_adm( 8,iz, 5,17),iz = 1,20) / &
     & 0.4487800E+00, 0.4487800E+00, 0.4624500E+00, 0.4643900E+00, &
     & 0.4940400E+00, 0.5024800E+00, 0.5317600E+00, 0.5744100E+00, &
     & 0.6127900E+00, 0.6710300E+00, 0.7447800E+00, 0.8525700E+00, &
     & 0.1028290E+01, 0.1188199E+01, 0.1421566E+01, 0.1794592E+01, &
     & 0.2246409E+01, 0.2908740E+01, 0.2816742E+01, 0.2816742E+01 /
      data (ref_adm( 8,iz, 6,17),iz = 1,20) / &
     & 0.4421800E+00, 0.4421800E+00, 0.4446000E+00, 0.4622000E+00, &
     & 0.4696900E+00, 0.4950100E+00, 0.5173300E+00, 0.5552200E+00, &
     & 0.5931800E+00, 0.6419200E+00, 0.7239800E+00, 0.8267000E+00, &
     & 0.9768000E+00, 0.1177700E+01, 0.1409400E+01, 0.1779600E+01, &
     & 0.2205800E+01, 0.2476900E+01, 0.2067803E+01, 0.2067803E+01 /
      data (ref_adm( 8,iz, 7,17),iz = 1,20) / &
     & 0.4425500E+00, 0.4425500E+00, 0.4498700E+00, 0.4651700E+00, &
     & 0.4780500E+00, 0.4865200E+00, 0.5243300E+00, 0.5441900E+00, &
     & 0.5920300E+00, 0.6491000E+00, 0.7198200E+00, 0.7998400E+00, &
     & 0.9317800E+00, 0.1088100E+01, 0.1262400E+01, 0.1517100E+01, &
     & 0.1947300E+01, 0.2217100E+01, 0.2372300E+01, 0.2372300E+01 /
      data (ref_adm( 8,iz, 8,17),iz = 1,20) / &
     & 0.4461200E+00, 0.4461200E+00, 0.4512400E+00, 0.4660500E+00, &
     & 0.4648800E+00, 0.4949400E+00, 0.5153400E+00, 0.5502200E+00, &
     & 0.5851500E+00, 0.6259000E+00, 0.6904300E+00, 0.7550300E+00, &
     & 0.9067000E+00, 0.1063700E+01, 0.1212900E+01, 0.1422800E+01, &
     & 0.1777700E+01, 0.1970700E+01, 0.2066400E+01, 0.2066400E+01 /
      data (ref_adm( 8,iz, 9,17),iz = 1,20) / &
     & 0.4510900E+00, 0.4510900E+00, 0.4646000E+00, 0.4594400E+00, &
     & 0.4613900E+00, 0.4884500E+00, 0.5189800E+00, 0.5443400E+00, &
     & 0.5652700E+00, 0.6022900E+00, 0.6723900E+00, 0.7260200E+00, &
     & 0.8485000E+00, 0.9602300E+00, 0.1118900E+01, 0.1315200E+01, &
     & 0.1504300E+01, 0.1657100E+01, 0.1493800E+01, 0.1493800E+01 /
      data (ref_adm( 8,iz,10,17),iz = 1,20) / &
     & 0.4507700E+00, 0.4507700E+00, 0.4443200E+00, 0.4546500E+00, &
     & 0.4670100E+00, 0.4874000E+00, 0.5123300E+00, 0.5288800E+00, &
     & 0.5620600E+00, 0.5999000E+00, 0.6483500E+00, 0.7069200E+00, &
     & 0.8032600E+00, 0.8996900E+00, 0.1027000E+01, 0.1196600E+01, &
     & 0.1384100E+01, 0.1479600E+01, 0.1313700E+01, 0.1313700E+01 /
      data (ref_adm( 8,iz,11,17),iz = 1,20) / &
     & 0.4385900E+00, 0.4385900E+00, 0.4479200E+00, 0.4553600E+00, &
     & 0.4701400E+00, 0.4795000E+00, 0.4933100E+00, 0.5061400E+00, &
     & 0.5375300E+00, 0.5806700E+00, 0.6272600E+00, 0.6809400E+00, &
     & 0.7847700E+00, 0.8385500E+00, 0.9569500E+00, 0.1101600E+01, &
     & 0.1256500E+01, 0.1315200E+01, 0.1212200E+01, 0.1212200E+01 /
      data (ref_adm( 8,iz,12,17),iz = 1,20) / &
     & 0.4488000E+00, 0.4488000E+00, 0.4491300E+00, 0.4534000E+00, &
     & 0.4672000E+00, 0.4678700E+00, 0.4825200E+00, 0.5033200E+00, &
     & 0.5257900E+00, 0.5667300E+00, 0.6051400E+00, 0.6519200E+00, &
     & 0.7420900E+00, 0.7924500E+00, 0.8799000E+00, 0.1026700E+01, &
     & 0.1126700E+01, 0.1167000E+01, 0.1066800E+01, 0.1066800E+01 /
      data (ref_adm( 8,iz,13,17),iz = 1,20) / &
     & 0.4526800E+00, 0.4526800E+00, 0.4560600E+00, 0.4586600E+00, &
     & 0.4615800E+00, 0.4644800E+00, 0.4805700E+00, 0.4996300E+00, &
     & 0.5265300E+00, 0.5491400E+00, 0.5864000E+00, 0.6294900E+00, &
     & 0.6881800E+00, 0.7489100E+00, 0.8353000E+00, 0.9428100E+00, &
     & 0.1061900E+01, 0.1083400E+01, 0.1077600E+01, 0.1077600E+01 /
      data (ref_adm( 8,iz,14,17),iz = 1,20) / &
     & 0.4594500E+00, 0.4594500E+00, 0.4582800E+00, 0.4649200E+00, &
     & 0.4702300E+00, 0.4840300E+00, 0.4987900E+00, 0.5139400E+00, &
     & 0.5299400E+00, 0.5503100E+00, 0.5766900E+00, 0.6098300E+00, &
     & 0.6494500E+00, 0.6876000E+00, 0.7809400E+00, 0.8850900E+00, &
     & 0.9812500E+00, 0.1003400E+01, 0.8941292E+00, 0.8941292E+00 /
      data (ref_adm( 8,iz,15,17),iz = 1,20) / &
     & 0.4477100E+00, 0.4477100E+00, 0.4365000E+00, 0.4419000E+00, &
     & 0.4476400E+00, 0.4575200E+00, 0.4739400E+00, 0.4842200E+00, &
     & 0.4985300E+00, 0.5234400E+00, 0.5573000E+00, 0.5900900E+00, &
     & 0.6294000E+00, 0.6738800E+00, 0.7393500E+00, 0.8345600E+00, &
     & 0.9188800E+00, 0.9572300E+00, 0.8548580E+00, 0.8548580E+00 /
      data (ref_adm( 8,iz,16,17),iz = 1,20) / &
     & 0.4388800E+00, 0.4388800E+00, 0.4432800E+00, 0.4466700E+00, &
     & 0.4531900E+00, 0.4621800E+00, 0.4698600E+00, 0.4773500E+00, &
     & 0.4930600E+00, 0.5191200E+00, 0.5444300E+00, 0.5739000E+00, &
     & 0.6056400E+00, 0.6390100E+00, 0.6928000E+00, 0.7750300E+00, &
     & 0.8427800E+00, 0.8304375E+00, 0.8212295E+00, 0.8212295E+00 /
      data (ref_adm( 8,iz,17,17),iz = 1,20) / &
     & 0.4410600E+00, 0.4410600E+00, 0.4553600E+00, 0.4569200E+00, &
     & 0.4491100E+00, 0.4612300E+00, 0.4775200E+00, 0.4766800E+00, &
     & 0.4973600E+00, 0.5240600E+00, 0.5430400E+00, 0.5728600E+00, &
     & 0.5856700E+00, 0.6137500E+00, 0.6653800E+00, 0.7352800E+00, &
     & 0.7945600E+00, 0.7883008E+00, 0.7902740E+00, 0.7902740E+00 /
      data (ref_adm( 8,iz,18,17),iz = 1,20) / &
     & 0.4411200E+00, 0.4411200E+00, 0.4491200E+00, 0.4499900E+00, &
     & 0.4569500E+00, 0.4651900E+00, 0.4674400E+00, 0.4758200E+00, &
     & 0.4899700E+00, 0.5107100E+00, 0.5323700E+00, 0.5629000E+00, &
     & 0.5785900E+00, 0.6038100E+00, 0.6475900E+00, 0.7068100E+00, &
     & 0.7542933E+00, 0.8075373E+00, 0.8519226E+00, 0.8519226E+00 /
      data (ref_adm( 8,iz,19,17),iz = 1,20) / &
     & 0.4439500E+00, 0.4439500E+00, 0.4523100E+00, 0.4415100E+00, &
     & 0.4527400E+00, 0.4592100E+00, 0.4661700E+00, 0.4748400E+00, &
     & 0.4899900E+00, 0.5115800E+00, 0.5231500E+00, 0.5519600E+00, &
     & 0.5706200E+00, 0.5998600E+00, 0.6271800E+00, 0.6709600E+00, &
     & 0.7270023E+00, 0.7771729E+00, 0.8303564E+00, 0.8303564E+00 /
      data (ref_adm( 8,iz,20,17),iz = 1,20) / &
     & 0.4496200E+00, 0.4496200E+00, 0.4435700E+00, 0.4522900E+00, &
     & 0.4517800E+00, 0.4532700E+00, 0.4680300E+00, 0.4689100E+00, &
     & 0.4881600E+00, 0.5007800E+00, 0.5102000E+00, 0.5387700E+00, &
     & 0.5587200E+00, 0.5887600E+00, 0.6085200E+00, 0.6670446E+00, &
     & 0.7071940E+00, 0.7558872E+00, 0.8186206E+00, 0.8186206E+00 /
      data (ref_adm( 8,iz,21,17),iz = 1,20) / &
     & 0.4525000E+00, 0.4525000E+00, 0.4562400E+00, 0.4473000E+00, &
     & 0.4512600E+00, 0.4500200E+00, 0.4674900E+00, 0.4822600E+00, &
     & 0.4874800E+00, 0.5022500E+00, 0.5155000E+00, 0.5362300E+00, &
     & 0.5536300E+00, 0.5826600E+00, 0.6145300E+00, 0.6512400E+00, &
     & 0.6913536E+00, 0.7400273E+00, 0.8140860E+00, 0.8140860E+00 /
      data (ref_adm( 8,iz,22,17),iz = 1,20) / &
     & 0.4520300E+00, 0.4520300E+00, 0.4471200E+00, 0.4474400E+00, &
     & 0.4562000E+00, 0.4508000E+00, 0.4669900E+00, 0.4733300E+00, &
     & 0.4839600E+00, 0.4944200E+00, 0.5075300E+00, 0.5300000E+00, &
     & 0.5465300E+00, 0.5829200E+00, 0.6000300E+00, 0.6436800E+00, &
     & 0.6572934E+00, 0.6852255E+00, 0.7184395E+00, 0.7184395E+00 /
      data (ref_adm( 8,iz,23,17),iz = 1,20) / &
     & 0.4429300E+00, 0.4429300E+00, 0.4379500E+00, 0.4458800E+00, &
     & 0.4460100E+00, 0.4519800E+00, 0.4646900E+00, 0.4759200E+00, &
     & 0.4897900E+00, 0.4963200E+00, 0.5112200E+00, 0.5342100E+00, &
     & 0.5499000E+00, 0.5783200E+00, 0.6089000E+00, 0.6491100E+00, &
     & 0.6317300E+00, 0.6793209E+00, 0.7250210E+00, 0.7250210E+00 /
      data (ref_adm( 8,iz,24,17),iz = 1,20) / &
     & 0.4376700E+00, 0.4376700E+00, 0.4341600E+00, 0.4366600E+00, &
     & 0.4393700E+00, 0.4425300E+00, 0.4491100E+00, 0.4562700E+00, &
     & 0.4709000E+00, 0.4837400E+00, 0.4983000E+00, 0.5186100E+00, &
     & 0.5451000E+00, 0.5697300E+00, 0.5942900E+00, 0.6496600E+00, &
     & 0.6966600E+00, 0.6794674E+00, 0.7378695E+00, 0.7378695E+00 /
      data (ref_adm( 8,iz,25,17),iz = 1,20) / &
     & 0.4448900E+00, 0.4448900E+00, 0.4485300E+00, 0.4486700E+00, &
     & 0.4530600E+00, 0.4578600E+00, 0.4652100E+00, 0.4740800E+00, &
     & 0.4872500E+00, 0.4967000E+00, 0.5115000E+00, 0.5296900E+00, &
     & 0.5536700E+00, 0.5855300E+00, 0.6004800E+00, 0.6498300E+00, &
     & 0.7210200E+00, 0.7515700E+00, 0.7554803E+00, 0.7554803E+00 /
      data (ref_adm( 8,iz,26,17),iz = 1,20) / &
     & 0.4475600E+00, 0.4475600E+00, 0.4446500E+00, 0.4443500E+00, &
     & 0.4439300E+00, 0.4619700E+00, 0.4729800E+00, 0.4847500E+00, &
     & 0.4862900E+00, 0.4911700E+00, 0.5187700E+00, 0.5333900E+00, &
     & 0.5532600E+00, 0.5884600E+00, 0.6198700E+00, 0.6731800E+00, &
     & 0.7292900E+00, 0.7793200E+00, 0.7800318E+00, 0.7800318E+00 /
      data (ref_adm( 8,iz,27,17),iz = 1,20) / &
     & 0.4420300E+00, 0.4420300E+00, 0.4409300E+00, 0.4461300E+00, &
     & 0.4528500E+00, 0.4576200E+00, 0.4610400E+00, 0.4774000E+00, &
     & 0.4829700E+00, 0.4982400E+00, 0.5132700E+00, 0.5393500E+00, &
     & 0.5642000E+00, 0.5929500E+00, 0.6336200E+00, 0.6861200E+00, &
     & 0.7446600E+00, 0.8038200E+00, 0.7996100E+00, 0.7996100E+00 /
      data (ref_adm( 8,iz,28,17),iz = 1,20) / &
     & 0.4373000E+00, 0.4373000E+00, 0.4382800E+00, 0.4475800E+00, &
     & 0.4534800E+00, 0.4565100E+00, 0.4546600E+00, 0.4696200E+00, &
     & 0.4847300E+00, 0.5038400E+00, 0.5080700E+00, 0.5497400E+00, &
     & 0.5692200E+00, 0.6044200E+00, 0.6331600E+00, 0.7082600E+00, &
     & 0.7637600E+00, 0.8210500E+00, 0.7920500E+00, 0.7920500E+00 /
      data (ref_adm( 8,iz,29,17),iz = 1,20) / &
     & 0.4437000E+00, 0.4437000E+00, 0.4481500E+00, 0.4477300E+00, &
     & 0.4462500E+00, 0.4551000E+00, 0.4683800E+00, 0.4725300E+00, &
     & 0.4942800E+00, 0.5137200E+00, 0.5214000E+00, 0.5536800E+00, &
     & 0.5776900E+00, 0.6128100E+00, 0.6562300E+00, 0.7354800E+00, &
     & 0.7922800E+00, 0.8679000E+00, 0.8185300E+00, 0.8185300E+00 /
      data (ref_adm( 8,iz,30,17),iz = 1,20) / &
     & 0.4445100E+00, 0.4445100E+00, 0.4401100E+00, 0.4443900E+00, &
     & 0.4533500E+00, 0.4564000E+00, 0.4678900E+00, 0.4802100E+00, &
     & 0.4928500E+00, 0.5129300E+00, 0.5278800E+00, 0.5506000E+00, &
     & 0.5836200E+00, 0.6322400E+00, 0.6698700E+00, 0.7384600E+00, &
     & 0.8145500E+00, 0.8822000E+00, 0.9080400E+00, 0.9080400E+00 /
      data (ref_adm( 8,iz,31,17),iz = 1,20) / &
     & 0.4374200E+00, 0.4374200E+00, 0.4407300E+00, 0.4397500E+00, &
     & 0.4441500E+00, 0.4500600E+00, 0.4628900E+00, 0.4785400E+00, &
     & 0.4977800E+00, 0.5153200E+00, 0.5400200E+00, 0.5652400E+00, &
     & 0.6001800E+00, 0.6429400E+00, 0.6824600E+00, 0.7472800E+00, &
     & 0.8296300E+00, 0.9074700E+00, 0.8904600E+00, 0.8904600E+00 /
      data (ref_adm( 8,iz,32,17),iz = 1,20) / &
     & 0.4422600E+00, 0.4422600E+00, 0.4419900E+00, 0.4430000E+00, &
     & 0.4459500E+00, 0.4506000E+00, 0.4640700E+00, 0.4763900E+00, &
     & 0.4977100E+00, 0.5174600E+00, 0.5370500E+00, 0.5735700E+00, &
     & 0.6039000E+00, 0.6499600E+00, 0.6912900E+00, 0.7572800E+00, &
     & 0.8611500E+00, 0.9460700E+00, 0.9358000E+00, 0.9358000E+00 /
      data (ref_adm( 8,iz,33,17),iz = 1,20) / &
     & 0.4402200E+00, 0.4402200E+00, 0.4312700E+00, 0.4248400E+00, &
     & 0.4332700E+00, 0.4406800E+00, 0.4529600E+00, 0.4716500E+00, &
     & 0.4938600E+00, 0.5139800E+00, 0.5440000E+00, 0.5754400E+00, &
     & 0.6055300E+00, 0.6349400E+00, 0.6837800E+00, 0.7503900E+00, &
     & 0.8706600E+00, 0.1028500E+01, 0.9881400E+00, 0.9881400E+00 /
      data (ref_adm( 8,iz,34,17),iz = 1,20) / &
     & 0.4311900E+00, 0.4311900E+00, 0.4266700E+00, 0.4399500E+00, &
     & 0.4515900E+00, 0.4484900E+00, 0.4571600E+00, 0.4782200E+00, &
     & 0.4931000E+00, 0.5249200E+00, 0.5490300E+00, 0.5733400E+00, &
     & 0.6010800E+00, 0.6387300E+00, 0.6902400E+00, 0.7469800E+00, &
     & 0.8279600E+00, 0.9137400E+00, 0.9113500E+00, 0.9113500E+00 /
      data (ref_adm( 8,iz,35,17),iz = 1,20) / &
     & 0.4295100E+00, 0.4295100E+00, 0.4278200E+00, 0.4353800E+00, &
     & 0.4416200E+00, 0.4540400E+00, 0.4526000E+00, 0.4694000E+00, &
     & 0.4888300E+00, 0.5222700E+00, 0.5422000E+00, 0.5678000E+00, &
     & 0.5982500E+00, 0.6541100E+00, 0.7041200E+00, 0.7672900E+00, &
     & 0.8590900E+00, 0.9680100E+00, 0.9888600E+00, 0.9888600E+00 /
      data (ref_adm( 8,iz,36,17),iz = 1,20) / &
     & 0.4394300E+00, 0.4394300E+00, 0.4405800E+00, 0.4338600E+00, &
     & 0.4336600E+00, 0.4530700E+00, 0.4701600E+00, 0.4652400E+00, &
     & 0.4920300E+00, 0.5121800E+00, 0.5453500E+00, 0.5656700E+00, &
     & 0.6102500E+00, 0.6602400E+00, 0.7122600E+00, 0.7723100E+00, &
     & 0.8685100E+00, 0.9692300E+00, 0.8774600E+00, 0.8774600E+00 /
      data (ref_adm( 8,iz,37,17),iz = 1,20) / &
     & 0.4352700E+00, 0.4352700E+00, 0.4403900E+00, 0.4403800E+00, &
     & 0.4462100E+00, 0.4589800E+00, 0.4636800E+00, 0.4789000E+00, &
     & 0.4899500E+00, 0.5106500E+00, 0.5428000E+00, 0.5786800E+00, &
     & 0.6216000E+00, 0.6612100E+00, 0.7153200E+00, 0.7863100E+00, &
     & 0.8849900E+00, 0.9527200E+00, 0.8908600E+00, 0.8908600E+00 /
      data (ref_adm( 8,iz,38,17),iz = 1,20) / &
     & 0.4352700E+00, 0.4352700E+00, 0.4403900E+00, 0.4403800E+00, &
     & 0.4462100E+00, 0.4589800E+00, 0.4636800E+00, 0.4789000E+00, &
     & 0.4899500E+00, 0.5106500E+00, 0.5428000E+00, 0.5786800E+00, &
     & 0.6216000E+00, 0.6612100E+00, 0.7153200E+00, 0.7863100E+00, &
     & 0.8849900E+00, 0.9527200E+00, 0.8908600E+00, 0.8908600E+00 /
! Solar Zenith Angle 85.0 Albedo  0.7230143E+00
      data (ref_adm( 8,iz, 1,18),iz = 1,20) / &
     & 0.5121400E+00, 0.5121400E+00, 0.5212500E+00, 0.5168600E+00, &
     & 0.5199500E+00, 0.5429100E+00, 0.5861700E+00, 0.6241700E+00, &
     & 0.6830300E+00, 0.7455400E+00, 0.8259200E+00, 0.9639400E+00, &
     & 0.1148498E+01, 0.1316738E+01, 0.1624781E+01, 0.2186337E+01, &
     & 0.3079364E+01, 0.4386195E+01, 0.2141260E+01, 0.2141260E+01 /
      data (ref_adm( 8,iz, 2,18),iz = 1,20) / &
     & 0.5121400E+00, 0.5121400E+00, 0.5212500E+00, 0.5168600E+00, &
     & 0.5199500E+00, 0.5429100E+00, 0.5861700E+00, 0.6241700E+00, &
     & 0.6830300E+00, 0.7455400E+00, 0.8259200E+00, 0.9639400E+00, &
     & 0.1148498E+01, 0.1316738E+01, 0.1624781E+01, 0.2186337E+01, &
     & 0.3079364E+01, 0.4386195E+01, 0.2141260E+01, 0.2141260E+01 /
      data (ref_adm( 8,iz, 3,18),iz = 1,20) / &
     & 0.5172100E+00, 0.5172100E+00, 0.5130000E+00, 0.5127400E+00, &
     & 0.5242400E+00, 0.5503200E+00, 0.5722300E+00, 0.6263900E+00, &
     & 0.6520900E+00, 0.7347800E+00, 0.8161400E+00, 0.9433200E+00, &
     & 0.1138001E+01, 0.1302784E+01, 0.1594121E+01, 0.2120075E+01, &
     & 0.2910713E+01, 0.4430850E+01, 0.2229501E+01, 0.2229501E+01 /
      data (ref_adm( 8,iz, 4,18),iz = 1,20) / &
     & 0.4972300E+00, 0.4972300E+00, 0.5131400E+00, 0.5101000E+00, &
     & 0.5233500E+00, 0.5493600E+00, 0.5910000E+00, 0.6008400E+00, &
     & 0.6707200E+00, 0.7203200E+00, 0.8137100E+00, 0.9377600E+00, &
     & 0.1115124E+01, 0.1274772E+01, 0.1532726E+01, 0.1987134E+01, &
     & 0.2607865E+01, 0.3926542E+01, 0.2946221E+01, 0.2946221E+01 /
      data (ref_adm( 8,iz, 5,18),iz = 1,20) / &
     & 0.4925500E+00, 0.4925500E+00, 0.5164400E+00, 0.5256400E+00, &
     & 0.5458000E+00, 0.5739500E+00, 0.5842900E+00, 0.6146500E+00, &
     & 0.6587000E+00, 0.7130300E+00, 0.8134400E+00, 0.9171800E+00, &
     & 0.1083176E+01, 0.1236541E+01, 0.1456894E+01, 0.1824647E+01, &
     & 0.2286190E+01, 0.3019452E+01, 0.3093368E+01, 0.3093368E+01 /
      data (ref_adm( 8,iz, 6,18),iz = 1,20) / &
     & 0.4952800E+00, 0.4952800E+00, 0.4999500E+00, 0.5147800E+00, &
     & 0.5336900E+00, 0.5435200E+00, 0.5669200E+00, 0.6082100E+00, &
     & 0.6551200E+00, 0.7095100E+00, 0.7792100E+00, 0.8948600E+00, &
     & 0.1070900E+01, 0.1297700E+01, 0.1661300E+01, 0.2173200E+01, &
     & 0.2923400E+01, 0.3227500E+01, 0.2180192E+01, 0.2180192E+01 /
      data (ref_adm( 8,iz, 7,18),iz = 1,20) / &
     & 0.4919000E+00, 0.4919000E+00, 0.5047400E+00, 0.5208700E+00, &
     & 0.5240000E+00, 0.5475500E+00, 0.5682400E+00, 0.6101100E+00, &
     & 0.6474700E+00, 0.7013600E+00, 0.7728200E+00, 0.8549300E+00, &
     & 0.1031800E+01, 0.1291000E+01, 0.1578800E+01, 0.2019900E+01, &
     & 0.2715800E+01, 0.3165200E+01, 0.1693602E+01, 0.1693602E+01 /
      data (ref_adm( 8,iz, 8,18),iz = 1,20) / &
     & 0.4908100E+00, 0.4908100E+00, 0.4962400E+00, 0.5053200E+00, &
     & 0.5147800E+00, 0.5302100E+00, 0.5550200E+00, 0.5816300E+00, &
     & 0.6316700E+00, 0.6687800E+00, 0.7396100E+00, 0.8173500E+00, &
     & 0.9926600E+00, 0.1201200E+01, 0.1453900E+01, 0.1833800E+01, &
     & 0.2128700E+01, 0.2846200E+01, 0.3274700E+01, 0.3274700E+01 /
      data (ref_adm( 8,iz, 9,18),iz = 1,20) / &
     & 0.5000200E+00, 0.5000200E+00, 0.5106500E+00, 0.4987700E+00, &
     & 0.5148200E+00, 0.5176500E+00, 0.5389800E+00, 0.5627400E+00, &
     & 0.6209300E+00, 0.6423200E+00, 0.7213000E+00, 0.7933500E+00, &
     & 0.9265900E+00, 0.1106800E+01, 0.1351500E+01, 0.1597500E+01, &
     & 0.1858500E+01, 0.2067800E+01, 0.1295010E+01, 0.1295010E+01 /
      data (ref_adm( 8,iz,10,18),iz = 1,20) / &
     & 0.4896000E+00, 0.4896000E+00, 0.4981100E+00, 0.5100300E+00, &
     & 0.5133800E+00, 0.5254300E+00, 0.5394100E+00, 0.5757100E+00, &
     & 0.6116000E+00, 0.6405800E+00, 0.7080300E+00, 0.7584800E+00, &
     & 0.9121200E+00, 0.1028300E+01, 0.1165900E+01, 0.1407400E+01, &
     & 0.1709800E+01, 0.1937800E+01, 0.1227476E+01, 0.1227476E+01 /
      data (ref_adm( 8,iz,11,18),iz = 1,20) / &
     & 0.4978800E+00, 0.4978800E+00, 0.4763500E+00, 0.4833700E+00, &
     & 0.4998500E+00, 0.5082600E+00, 0.5355800E+00, 0.5691800E+00, &
     & 0.5935100E+00, 0.6357500E+00, 0.6868100E+00, 0.7091600E+00, &
     & 0.8697500E+00, 0.1005900E+01, 0.1087400E+01, 0.1267700E+01, &
     & 0.1512800E+01, 0.1659500E+01, 0.1137520E+01, 0.1137520E+01 /
      data (ref_adm( 8,iz,12,18),iz = 1,20) / &
     & 0.4847400E+00, 0.4847400E+00, 0.4716600E+00, 0.4730400E+00, &
     & 0.4836700E+00, 0.5035500E+00, 0.5299900E+00, 0.5699900E+00, &
     & 0.5867300E+00, 0.6171600E+00, 0.6458100E+00, 0.7012200E+00, &
     & 0.8188500E+00, 0.9332000E+00, 0.1072000E+01, 0.1204100E+01, &
     & 0.1400800E+01, 0.1602400E+01, 0.1061105E+01, 0.1061105E+01 /
      data (ref_adm( 8,iz,13,18),iz = 1,20) / &
     & 0.4895500E+00, 0.4895500E+00, 0.5039400E+00, 0.5052000E+00, &
     & 0.4879000E+00, 0.5278100E+00, 0.5292800E+00, 0.5486600E+00, &
     & 0.5870100E+00, 0.5984100E+00, 0.6294200E+00, 0.6657100E+00, &
     & 0.8023700E+00, 0.8865200E+00, 0.9903700E+00, 0.1098100E+01, &
     & 0.1260600E+01, 0.1499700E+01, 0.1004839E+01, 0.1004839E+01 /
      data (ref_adm( 8,iz,14,18),iz = 1,20) / &
     & 0.4902900E+00, 0.4902900E+00, 0.4899100E+00, 0.4948800E+00, &
     & 0.4960000E+00, 0.5065900E+00, 0.5189200E+00, 0.5308100E+00, &
     & 0.5510000E+00, 0.5716300E+00, 0.5923100E+00, 0.6243700E+00, &
     & 0.6647900E+00, 0.7158200E+00, 0.8771800E+00, 0.1012500E+01, &
     & 0.1202200E+01, 0.1624800E+01, 0.9616267E+00, 0.9616267E+00 /
      data (ref_adm( 8,iz,15,18),iz = 1,20) / &
     & 0.4887900E+00, 0.4887900E+00, 0.4874300E+00, 0.4894100E+00, &
     & 0.4953800E+00, 0.5088600E+00, 0.5113800E+00, 0.5309600E+00, &
     & 0.5503000E+00, 0.5683700E+00, 0.5868400E+00, 0.6128200E+00, &
     & 0.6478000E+00, 0.6855000E+00, 0.8475000E+00, 0.9831000E+00, &
     & 0.1127800E+01, 0.9541165E+00, 0.9261715E+00, 0.9261715E+00 /
      data (ref_adm( 8,iz,16,18),iz = 1,20) / &
     & 0.4853100E+00, 0.4853100E+00, 0.4844600E+00, 0.4807500E+00, &
     & 0.5011300E+00, 0.5086800E+00, 0.5171300E+00, 0.5301200E+00, &
     & 0.5423100E+00, 0.5652700E+00, 0.5884300E+00, 0.6184300E+00, &
     & 0.6527200E+00, 0.6923700E+00, 0.7944600E+00, 0.9008700E+00, &
     & 0.9760400E+00, 0.9110203E+00, 0.8945267E+00, 0.8945267E+00 /
      data (ref_adm( 8,iz,17,18),iz = 1,20) / &
     & 0.4798700E+00, 0.4798700E+00, 0.4796300E+00, 0.4858000E+00, &
     & 0.4868300E+00, 0.5030800E+00, 0.5217300E+00, 0.5271700E+00, &
     & 0.5345700E+00, 0.5483000E+00, 0.5694100E+00, 0.6006100E+00, &
     & 0.6691500E+00, 0.7332300E+00, 0.7630400E+00, 0.8419400E+00, &
     & 0.8293767E+00, 0.8699997E+00, 0.8635614E+00, 0.8635614E+00 /
      data (ref_adm( 8,iz,18,18),iz = 1,20) / &
     & 0.4753500E+00, 0.4753500E+00, 0.4809600E+00, 0.4893100E+00, &
     & 0.4937900E+00, 0.5084900E+00, 0.5291400E+00, 0.5326200E+00, &
     & 0.5444200E+00, 0.5602700E+00, 0.5720600E+00, 0.6112500E+00, &
     & 0.6483000E+00, 0.7180400E+00, 0.7645200E+00, 0.7756100E+00, &
     & 0.9403962E+00, 0.1137325E+01, 0.1583085E+01, 0.1583085E+01 /
      data (ref_adm( 8,iz,19,18),iz = 1,20) / &
     & 0.4826200E+00, 0.4826200E+00, 0.4888800E+00, 0.5028000E+00, &
     & 0.5072600E+00, 0.5003900E+00, 0.5031800E+00, 0.5132200E+00, &
     & 0.5169300E+00, 0.5429100E+00, 0.5559700E+00, 0.5936000E+00, &
     & 0.6311600E+00, 0.6967300E+00, 0.7612200E+00, 0.7949200E+00, &
     & 0.9100037E+00, 0.1097999E+01, 0.1540204E+01, 0.1540204E+01 /
      data (ref_adm( 8,iz,20,18),iz = 1,20) / &
     & 0.4803400E+00, 0.4803400E+00, 0.4751500E+00, 0.4869200E+00, &
     & 0.4832300E+00, 0.4812000E+00, 0.5001500E+00, 0.5143800E+00, &
     & 0.5258100E+00, 0.5372000E+00, 0.5395000E+00, 0.5786000E+00, &
     & 0.6290800E+00, 0.6870000E+00, 0.7191300E+00, 0.7888045E+00, &
     & 0.8884718E+00, 0.1069878E+01, 0.1517620E+01, 0.1517620E+01 /
      data (ref_adm( 8,iz,21,18),iz = 1,20) / &
     & 0.4833300E+00, 0.4833300E+00, 0.4811500E+00, 0.4857200E+00, &
     & 0.4886300E+00, 0.5035900E+00, 0.5019200E+00, 0.5094400E+00, &
     & 0.5320400E+00, 0.5438100E+00, 0.5570300E+00, 0.5663000E+00, &
     & 0.5999600E+00, 0.6446800E+00, 0.6647600E+00, 0.7733086E+00, &
     & 0.8701088E+00, 0.1048190E+01, 0.1508214E+01, 0.1508214E+01 /
      data (ref_adm( 8,iz,22,18),iz = 1,20) / &
     & 0.4818300E+00, 0.4818300E+00, 0.4779900E+00, 0.4782100E+00, &
     & 0.4953000E+00, 0.5052400E+00, 0.5146100E+00, 0.5143200E+00, &
     & 0.5207400E+00, 0.5368400E+00, 0.5718500E+00, 0.5721500E+00, &
     & 0.5892700E+00, 0.6388500E+00, 0.6518900E+00, 0.6840200E+00, &
     & 0.8321550E+00, 0.9565142E+00, 0.1253854E+01, 0.1253854E+01 /
      data (ref_adm( 8,iz,23,18),iz = 1,20) / &
     & 0.4932000E+00, 0.4932000E+00, 0.4862600E+00, 0.4957400E+00, &
     & 0.5076900E+00, 0.5097400E+00, 0.5277800E+00, 0.5234700E+00, &
     & 0.5347700E+00, 0.5618500E+00, 0.5841300E+00, 0.5906300E+00, &
     & 0.6077500E+00, 0.6504000E+00, 0.6737800E+00, 0.7164100E+00, &
     & 0.8210759E+00, 0.9462286E+00, 0.1267187E+01, 0.1267187E+01 /
      data (ref_adm( 8,iz,24,18),iz = 1,20) / &
     & 0.4906700E+00, 0.4906700E+00, 0.4906000E+00, 0.4954100E+00, &
     & 0.4994900E+00, 0.5005400E+00, 0.5097300E+00, 0.5209300E+00, &
     & 0.5344100E+00, 0.5542000E+00, 0.5672800E+00, 0.5840100E+00, &
     & 0.6141300E+00, 0.6626500E+00, 0.6823700E+00, 0.7147200E+00, &
     & 0.7895200E+00, 0.9431611E+00, 0.1292362E+01, 0.1292362E+01 /
      data (ref_adm( 8,iz,25,18),iz = 1,20) / &
     & 0.4848300E+00, 0.4848300E+00, 0.4792900E+00, 0.4828400E+00, &
     & 0.4891600E+00, 0.4900300E+00, 0.5005300E+00, 0.5131500E+00, &
     & 0.5277300E+00, 0.5403200E+00, 0.5609300E+00, 0.5798300E+00, &
     & 0.6134100E+00, 0.6675600E+00, 0.6858500E+00, 0.7316400E+00, &
     & 0.8113700E+00, 0.9463573E+00, 0.1326911E+01, 0.1326911E+01 /
      data (ref_adm( 8,iz,26,18),iz = 1,20) / &
     & 0.4792600E+00, 0.4792600E+00, 0.4655900E+00, 0.4836200E+00, &
     & 0.5070300E+00, 0.5131000E+00, 0.5117000E+00, 0.5179000E+00, &
     & 0.5288700E+00, 0.5392800E+00, 0.5796700E+00, 0.5987100E+00, &
     & 0.6390400E+00, 0.6705900E+00, 0.7044100E+00, 0.7453500E+00, &
     & 0.8342200E+00, 0.9469400E+00, 0.1375385E+01, 0.1375385E+01 /
      data (ref_adm( 8,iz,27,18),iz = 1,20) / &
     & 0.4828100E+00, 0.4828100E+00, 0.4726400E+00, 0.4801700E+00, &
     & 0.5125000E+00, 0.4998500E+00, 0.4971400E+00, 0.5179200E+00, &
     & 0.5204600E+00, 0.5476800E+00, 0.5743500E+00, 0.6094100E+00, &
     & 0.6362900E+00, 0.6888000E+00, 0.7170800E+00, 0.7899100E+00, &
     & 0.8645600E+00, 0.1010100E+01, 0.1431665E+01, 0.1431665E+01 /
      data (ref_adm( 8,iz,28,18),iz = 1,20) / &
     & 0.4845100E+00, 0.4845100E+00, 0.4966200E+00, 0.4840300E+00, &
     & 0.4805900E+00, 0.4919400E+00, 0.4977300E+00, 0.4997600E+00, &
     & 0.5320600E+00, 0.5583800E+00, 0.5864000E+00, 0.6211000E+00, &
     & 0.6490800E+00, 0.7075500E+00, 0.7441200E+00, 0.8087400E+00, &
     & 0.9089600E+00, 0.1055200E+01, 0.1157500E+01, 0.1157500E+01 /
      data (ref_adm( 8,iz,29,18),iz = 1,20) / &
     & 0.5044000E+00, 0.5044000E+00, 0.5009400E+00, 0.4916100E+00, &
     & 0.4869300E+00, 0.4880300E+00, 0.5010500E+00, 0.5255700E+00, &
     & 0.5410000E+00, 0.5515300E+00, 0.5865100E+00, 0.6293800E+00, &
     & 0.6677700E+00, 0.7104800E+00, 0.7524800E+00, 0.8905400E+00, &
     & 0.9882300E+00, 0.1213500E+01, 0.1558576E+01, 0.1558576E+01 /
      data (ref_adm( 8,iz,30,18),iz = 1,20) / &
     & 0.4927700E+00, 0.4927700E+00, 0.4851800E+00, 0.4925000E+00, &
     & 0.4900900E+00, 0.4834700E+00, 0.4935100E+00, 0.5158800E+00, &
     & 0.5436600E+00, 0.5500500E+00, 0.5910400E+00, 0.6275000E+00, &
     & 0.6716200E+00, 0.7428000E+00, 0.7849100E+00, 0.8788900E+00, &
     & 0.9448900E+00, 0.1344100E+01, 0.1487100E+01, 0.1487100E+01 /
      data (ref_adm( 8,iz,31,18),iz = 1,20) / &
     & 0.4959800E+00, 0.4959800E+00, 0.4874200E+00, 0.4777900E+00, &
     & 0.4914300E+00, 0.4907100E+00, 0.5022100E+00, 0.5313000E+00, &
     & 0.5459000E+00, 0.5413800E+00, 0.5691700E+00, 0.6192900E+00, &
     & 0.6566200E+00, 0.7412200E+00, 0.7984300E+00, 0.8802900E+00, &
     & 0.1023900E+01, 0.1118027E+01, 0.1697594E+01, 0.1697594E+01 /
      data (ref_adm( 8,iz,32,18),iz = 1,20) / &
     & 0.4870600E+00, 0.4870600E+00, 0.4862000E+00, 0.4937800E+00, &
     & 0.4958400E+00, 0.5138300E+00, 0.5221000E+00, 0.5364600E+00, &
     & 0.5540700E+00, 0.5596500E+00, 0.5769300E+00, 0.6272200E+00, &
     & 0.6919500E+00, 0.7524200E+00, 0.7926100E+00, 0.9058100E+00, &
     & 0.1049300E+01, 0.1214500E+01, 0.1765211E+01, 0.1765211E+01 /
      data (ref_adm( 8,iz,33,18),iz = 1,20) / &
     & 0.4858800E+00, 0.4858800E+00, 0.4910100E+00, 0.4939800E+00, &
     & 0.5046500E+00, 0.5161100E+00, 0.5223400E+00, 0.5373400E+00, &
     & 0.5610900E+00, 0.5816000E+00, 0.6113800E+00, 0.6558200E+00, &
     & 0.7170900E+00, 0.7514900E+00, 0.8212900E+00, 0.9350800E+00, &
     & 0.1047300E+01, 0.1211400E+01, 0.1841800E+01, 0.1841800E+01 /
      data (ref_adm( 8,iz,34,18),iz = 1,20) / &
     & 0.4918600E+00, 0.4918600E+00, 0.4881600E+00, 0.4978400E+00, &
     & 0.5140900E+00, 0.5227400E+00, 0.5379700E+00, 0.5514200E+00, &
     & 0.5552700E+00, 0.6024700E+00, 0.6266400E+00, 0.6422700E+00, &
     & 0.6942700E+00, 0.7465500E+00, 0.8520700E+00, 0.9487900E+00, &
     & 0.1114700E+01, 0.1294400E+01, 0.1837206E+01, 0.1837206E+01 /
      data (ref_adm( 8,iz,35,18),iz = 1,20) / &
     & 0.4933400E+00, 0.4933400E+00, 0.4973600E+00, 0.4756100E+00, &
     & 0.4995600E+00, 0.5243600E+00, 0.5288200E+00, 0.5238800E+00, &
     & 0.5425500E+00, 0.5961000E+00, 0.6260800E+00, 0.6510500E+00, &
     & 0.6992800E+00, 0.7606000E+00, 0.8425000E+00, 0.9003600E+00, &
     & 0.1102600E+01, 0.1243200E+01, 0.1858074E+01, 0.1858074E+01 /
      data (ref_adm( 8,iz,36,18),iz = 1,20) / &
     & 0.4965300E+00, 0.4965300E+00, 0.4889400E+00, 0.4911400E+00, &
     & 0.4878000E+00, 0.5111900E+00, 0.5210000E+00, 0.5304600E+00, &
     & 0.5508100E+00, 0.5895800E+00, 0.6337800E+00, 0.6624800E+00, &
     & 0.7078000E+00, 0.7718500E+00, 0.8261400E+00, 0.9255300E+00, &
     & 0.1096200E+01, 0.1246500E+01, 0.1883070E+01, 0.1883070E+01 /
      data (ref_adm( 8,iz,37,18),iz = 1,20) / &
     & 0.5047200E+00, 0.5047200E+00, 0.4991000E+00, 0.4882200E+00, &
     & 0.4993100E+00, 0.5004400E+00, 0.5084800E+00, 0.5294700E+00, &
     & 0.5448600E+00, 0.5733600E+00, 0.6033400E+00, 0.6684600E+00, &
     & 0.7060800E+00, 0.7531900E+00, 0.8209600E+00, 0.9126800E+00, &
     & 0.1079300E+01, 0.1245600E+01, 0.1627000E+01, 0.1627000E+01 /
      data (ref_adm( 8,iz,38,18),iz = 1,20) / &
     & 0.5047200E+00, 0.5047200E+00, 0.4991000E+00, 0.4882200E+00, &
     & 0.4993100E+00, 0.5004400E+00, 0.5084800E+00, 0.5294700E+00, &
     & 0.5448600E+00, 0.5733600E+00, 0.6033400E+00, 0.6684600E+00, &
     & 0.7060800E+00, 0.7531900E+00, 0.8209600E+00, 0.9126800E+00, &
     & 0.1079300E+01, 0.1245600E+01, 0.1627000E+01, 0.1627000E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm( 9,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm( 9,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.4448095E+04
      data (ref_adm( 9,iz, 1, 3),iz = 1,20) / &
     & 0.3772681E+00, 0.3772681E+00, 0.3725206E+00, 0.3732150E+00, &
     & 0.3758506E+00, 0.3770193E+00, 0.3768328E+00, 0.5378800E+00, &
     & 0.3721142E+00, 0.3559231E+00, 0.3511654E+00, 0.3456399E+00, &
     & 0.3377039E+00, 0.3313768E+00, 0.3216706E+00, 0.3073606E+00, &
     & 0.2899199E+00, 0.2637218E+00, 0.2234820E+00, 0.2234820E+00 /
      data (ref_adm( 9,iz, 2, 3),iz = 1,20) / &
     & 0.3772681E+00, 0.3772681E+00, 0.3725206E+00, 0.3732150E+00, &
     & 0.3758506E+00, 0.3770193E+00, 0.3768328E+00, 0.5378800E+00, &
     & 0.3721142E+00, 0.3559231E+00, 0.3511654E+00, 0.3456399E+00, &
     & 0.3377039E+00, 0.3313768E+00, 0.3216706E+00, 0.3073606E+00, &
     & 0.2899199E+00, 0.2637218E+00, 0.2234820E+00, 0.2234820E+00 /
      data (ref_adm( 9,iz, 3, 3),iz = 1,20) / &
     & 0.3772726E+00, 0.3772726E+00, 0.3725332E+00, 0.3732164E+00, &
     & 0.3758361E+00, 0.3770185E+00, 0.3768526E+00, 0.4373200E+00, &
     & 0.3723393E+00, 0.3559557E+00, 0.3511939E+00, 0.3456900E+00, &
     & 0.3377076E+00, 0.3312877E+00, 0.2964700E+00, 0.3072911E+00, &
     & 0.2898852E+00, 0.2636818E+00, 0.1010289E+00, 0.1010289E+00 /
      data (ref_adm( 9,iz, 4, 3),iz = 1,20) / &
     & 0.3772700E+00, 0.3772700E+00, 0.3725561E+00, 0.3732291E+00, &
     & 0.3758358E+00, 0.3770830E+00, 0.3767720E+00, 0.3879263E+00, &
     & 0.3726541E+00, 0.3877600E+00, 0.3511705E+00, 0.3458321E+00, &
     & 0.3377335E+00, 0.3311897E+00, 0.3216895E+00, 0.3072808E+00, &
     & 0.2897671E+00, 0.2635499E+00, 0.2234295E+00, 0.2234295E+00 /
      data (ref_adm( 9,iz, 5, 3),iz = 1,20) / &
     & 0.3773135E+00, 0.3773135E+00, 0.3725992E+00, 0.3732573E+00, &
     & 0.3758723E+00, 0.3770425E+00, 0.3768539E+00, 0.3876523E+00, &
     & 0.3732099E+00, 0.3169600E+00, 0.4120300E+00, 0.3457734E+00, &
     & 0.3377661E+00, 0.3312912E+00, 0.3216004E+00, 0.3071711E+00, &
     & 0.2897556E+00, 0.2635200E+00, 0.2233704E+00, 0.2233704E+00 /
      data (ref_adm( 9,iz, 6, 3),iz = 1,20) / &
     & 0.3774780E+00, 0.3774780E+00, 0.3726031E+00, 0.3732544E+00, &
     & 0.3758422E+00, 0.3770862E+00, 0.3768175E+00, 0.3874386E+00, &
     & 0.3739951E+00, 0.2955800E+00, 0.2485400E+00, 0.3553300E+00, &
     & 0.3378229E+00, 0.2792900E+00, 0.3215747E+00, 0.3070544E+00, &
     & 0.2896123E+00, 0.2633899E+00, 0.2232971E+00, 0.2232971E+00 /
      data (ref_adm( 9,iz, 7, 3),iz = 1,20) / &
     & 0.3774559E+00, 0.3774559E+00, 0.3727400E+00, 0.3733140E+00, &
     & 0.3757829E+00, 0.3771195E+00, 0.3768343E+00, 0.3871203E+00, &
     & 0.2551900E+00, 0.2465400E+00, 0.3513139E+00, 0.2469900E+00, &
     & 0.3378514E+00, 0.3442200E+00, 0.3214841E+00, 0.3070053E+00, &
     & 0.2894718E+00, 0.2632717E+00, 0.2232061E+00, 0.2232061E+00 /
      data (ref_adm( 9,iz, 8, 3),iz = 1,20) / &
     & 0.3775065E+00, 0.3775065E+00, 0.3727936E+00, 0.3732414E+00, &
     & 0.3756975E+00, 0.3771781E+00, 0.3768899E+00, 0.3865619E+00, &
     & 0.3760991E+00, 0.3572235E+00, 0.3513899E+00, 0.3460940E+00, &
     & 0.3379075E+00, 0.3311440E+00, 0.3213521E+00, 0.3068726E+00, &
     & 0.2893008E+00, 0.2631121E+00, 0.2230865E+00, 0.2230865E+00 /
      data (ref_adm( 9,iz, 9, 3),iz = 1,20) / &
     & 0.3776419E+00, 0.3776419E+00, 0.3728821E+00, 0.3732196E+00, &
     & 0.3756849E+00, 0.3772756E+00, 0.3768799E+00, 0.3860174E+00, &
     & 0.3774145E+00, 0.3576584E+00, 0.3514793E+00, 0.5241000E+00, &
     & 0.3283700E+00, 0.2941500E+00, 0.3212743E+00, 0.3067203E+00, &
     & 0.2891032E+00, 0.2629176E+00, 0.2229692E+00, 0.2229692E+00 /
      data (ref_adm( 9,iz,10, 3),iz = 1,20) / &
     & 0.3777417E+00, 0.3777417E+00, 0.3730863E+00, 0.3731984E+00, &
     & 0.3756682E+00, 0.3772943E+00, 0.3769753E+00, 0.3852640E+00, &
     & 0.3788987E+00, 0.3581716E+00, 0.4800600E+00, 0.5388600E+00, &
     & 0.3341400E+00, 0.3410000E+00, 0.2924300E+00, 0.3065570E+00, &
     & 0.2888981E+00, 0.2627300E+00, 0.2228424E+00, 0.2228424E+00 /
      data (ref_adm( 9,iz,11, 3),iz = 1,20) / &
     & 0.3778867E+00, 0.3778867E+00, 0.3731878E+00, 0.3732097E+00, &
     & 0.3756048E+00, 0.3773260E+00, 0.3769660E+00, 0.3843957E+00, &
     & 0.3803953E+00, 0.3588770E+00, 0.3517714E+00, 0.3465098E+00, &
     & 0.3382061E+00, 0.4205300E+00, 0.3184600E+00, 0.3063905E+00, &
     & 0.2886947E+00, 0.2625310E+00, 0.2227086E+00, 0.2227086E+00 /
      data (ref_adm( 9,iz,12, 3),iz = 1,20) / &
     & 0.3779205E+00, 0.3779205E+00, 0.3733404E+00, 0.3732138E+00, &
     & 0.3754871E+00, 0.3774028E+00, 0.3770044E+00, 0.3835094E+00, &
     & 0.3821646E+00, 0.3597240E+00, 0.3519237E+00, 0.3466894E+00, &
     & 0.3383864E+00, 0.2960700E+00, 0.3209911E+00, 0.3061858E+00, &
     & 0.2884690E+00, 0.2623279E+00, 0.2225653E+00, 0.2225653E+00 /
      data (ref_adm( 9,iz,13, 3),iz = 1,20) / &
     & 0.3780339E+00, 0.3780339E+00, 0.3734117E+00, 0.3730770E+00, &
     & 0.3754356E+00, 0.3773943E+00, 0.3770187E+00, 0.3823116E+00, &
     & 0.3838922E+00, 0.3607038E+00, 0.3521824E+00, 0.3468810E+00, &
     & 0.3385624E+00, 0.3309040E+00, 0.3209177E+00, 0.3060126E+00, &
     & 0.2882541E+00, 0.2620636E+00, 0.2224265E+00, 0.2224265E+00 /
      data (ref_adm( 9,iz,14, 3),iz = 1,20) / &
     & 0.3781652E+00, 0.3781652E+00, 0.3734746E+00, 0.3730924E+00, &
     & 0.3752950E+00, 0.3773606E+00, 0.3771580E+00, 0.3812091E+00, &
     & 0.3855864E+00, 0.3618383E+00, 0.3524067E+00, 0.3470245E+00, &
     & 0.2192100E+00, 0.3310544E+00, 0.3207744E+00, 0.3057977E+00, &
     & 0.2880712E+00, 0.2618601E+00, 0.2222978E+00, 0.2222978E+00 /
      data (ref_adm( 9,iz,15, 3),iz = 1,20) / &
     & 0.3784684E+00, 0.3784684E+00, 0.3736195E+00, 0.3730696E+00, &
     & 0.3751752E+00, 0.3774405E+00, 0.3773787E+00, 0.3803041E+00, &
     & 0.3870184E+00, 0.3632386E+00, 0.3526891E+00, 0.3471372E+00, &
     & 0.3389632E+00, 0.2352700E+00, 0.3206730E+00, 0.3055623E+00, &
     & 0.2877908E+00, 0.2616161E+00, 0.2221621E+00, 0.2221621E+00 /
      data (ref_adm( 9,iz,16, 3),iz = 1,20) / &
     & 0.3785793E+00, 0.3785793E+00, 0.3737527E+00, 0.3732077E+00, &
     & 0.3751092E+00, 0.3773622E+00, 0.3774495E+00, 0.3793847E+00, &
     & 0.3881175E+00, 0.3648042E+00, 0.3531440E+00, 0.3473870E+00, &
     & 0.2762000E+00, 0.3356200E+00, 0.3206278E+00, 0.3054337E+00, &
     & 0.2876325E+00, 0.2614235E+00, 0.2220398E+00, 0.2220398E+00 /
      data (ref_adm( 9,iz,17, 3),iz = 1,20) / &
     & 0.3788180E+00, 0.3788180E+00, 0.3737956E+00, 0.3733680E+00, &
     & 0.3750230E+00, 0.3774661E+00, 0.3776923E+00, 0.3787604E+00, &
     & 0.3888150E+00, 0.3665647E+00, 0.3536355E+00, 0.3474570E+00, &
     & 0.2617600E+00, 0.3380600E+00, 0.4883800E+00, 0.3052568E+00, &
     & 0.2873677E+00, 0.2611612E+00, 0.2219244E+00, 0.2219244E+00 /
      data (ref_adm( 9,iz,18, 3),iz = 1,20) / &
     & 0.1705234E+00, 0.1705234E+00, 0.1717532E+00, 0.1740117E+00, &
     & 0.1775627E+00, 0.1824548E+00, 0.1887077E+00, 0.1965368E+00, &
     & 0.2061291E+00, 0.2175874E+00, 0.2313098E+00, 0.2522360E+00, &
     & 0.2774704E+00, 0.3019671E+00, 0.3380054E+00, 0.3899751E+00, &
     & 0.4526812E+00, 0.5491048E+00, 0.6583757E+00, 0.6583757E+00 /
      data (ref_adm( 9,iz,19, 3),iz = 1,20) / &
     & 0.1704927E+00, 0.1704927E+00, 0.1717729E+00, 0.1741060E+00, &
     & 0.1776967E+00, 0.1825174E+00, 0.1886892E+00, 0.1963197E+00, &
     & 0.2057256E+00, 0.2169789E+00, 0.2304416E+00, 0.2510352E+00, &
     & 0.2758678E+00, 0.2995028E+00, 0.3346300E+00, 0.3847723E+00, &
     & 0.4451587E+00, 0.5368582E+00, 0.6402993E+00, 0.6402993E+00 /
      data (ref_adm( 9,iz,20, 3),iz = 1,20) / &
     & 0.1705555E+00, 0.1705555E+00, 0.1718665E+00, 0.1742003E+00, &
     & 0.1778174E+00, 0.1826019E+00, 0.1888804E+00, 0.1965582E+00, &
     & 0.2058357E+00, 0.2169805E+00, 0.2302550E+00, 0.2505043E+00, &
     & 0.2748658E+00, 0.2981584E+00, 0.3325373E+00, 0.3819811E+00, &
     & 0.4407737E+00, 0.5295356E+00, 0.6295141E+00, 0.6295141E+00 /
      data (ref_adm( 9,iz,21, 3),iz = 1,20) / &
     & 0.1705645E+00, 0.1705645E+00, 0.1719110E+00, 0.1744191E+00, &
     & 0.1779886E+00, 0.1828891E+00, 0.1891610E+00, 0.1967472E+00, &
     & 0.2061917E+00, 0.2172752E+00, 0.2304954E+00, 0.2506577E+00, &
     & 0.2748514E+00, 0.2979309E+00, 0.3317978E+00, 0.3802243E+00, &
     & 0.4380424E+00, 0.5242916E+00, 0.6231128E+00, 0.6231128E+00 /
      data (ref_adm( 9,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm( 9,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo  0.3673782E+00
      data (ref_adm( 9,iz, 1, 4),iz = 1,20) / &
     & 0.3719776E+00, 0.3719776E+00, 0.4785300E+00, 0.5183400E+00, &
     & 0.3964400E+00, 0.3727700E+00, 0.3193200E+00, 0.2968800E+00, &
     & 0.3518476E+00, 0.3494725E+00, 0.3477992E+00, 0.3465045E+00, &
     & 0.3454206E+00, 0.3443490E+00, 0.1898600E+00, 0.3734700E+00, &
     & 0.3711700E+00, 0.3165635E+00, 0.2778163E+00, 0.2778163E+00 /
      data (ref_adm( 9,iz, 2, 4),iz = 1,20) / &
     & 0.3719776E+00, 0.3719776E+00, 0.4785300E+00, 0.5183400E+00, &
     & 0.3964400E+00, 0.3727700E+00, 0.3193200E+00, 0.2968800E+00, &
     & 0.3518476E+00, 0.3494725E+00, 0.3477992E+00, 0.3465045E+00, &
     & 0.3454206E+00, 0.3443490E+00, 0.1898600E+00, 0.3734700E+00, &
     & 0.3711700E+00, 0.3165635E+00, 0.2778163E+00, 0.2778163E+00 /
      data (ref_adm( 9,iz, 3, 4),iz = 1,20) / &
     & 0.4952400E+00, 0.4952400E+00, 0.5596700E+00, 0.4063800E+00, &
     & 0.2961200E+00, 0.3489900E+00, 0.3588100E+00, 0.3542723E+00, &
     & 0.3046300E+00, 0.3495458E+00, 0.2301200E+00, 0.3466840E+00, &
     & 0.3453891E+00, 0.3306100E+00, 0.3416900E+00, 0.3365566E+00, &
     & 0.4100900E+00, 0.3162714E+00, 0.1562398E+00, 0.1562398E+00 /
      data (ref_adm( 9,iz, 4, 4),iz = 1,20) / &
     & 0.3404200E+00, 0.3404200E+00, 0.3649100E+00, 0.5198600E+00, &
     & 0.3718400E+00, 0.3399100E+00, 0.3574037E+00, 0.3741700E+00, &
     & 0.4571700E+00, 0.3496121E+00, 0.3478223E+00, 0.3464737E+00, &
     & 0.3262200E+00, 0.3475100E+00, 0.3415046E+00, 0.3364060E+00, &
     & 0.3936700E+00, 0.3160374E+00, 0.2773712E+00, 0.2773712E+00 /
      data (ref_adm( 9,iz, 5, 4),iz = 1,20) / &
     & 0.4319400E+00, 0.4319400E+00, 0.3630500E+00, 0.4206200E+00, &
     & 0.4176000E+00, 0.4162200E+00, 0.4944900E+00, 0.3663200E+00, &
     & 0.3841700E+00, 0.2930500E+00, 0.3478179E+00, 0.3464933E+00, &
     & 0.1734700E+00, 0.3320800E+00, 0.3413466E+00, 0.3362724E+00, &
     & 0.3287333E+00, 0.3156171E+00, 0.2769281E+00, 0.2769281E+00 /
      data (ref_adm( 9,iz, 6, 4),iz = 1,20) / &
     & 0.3064200E+00, 0.3064200E+00, 0.4095000E+00, 0.3692300E+00, &
     & 0.2946500E+00, 0.3337200E+00, 0.3351400E+00, 0.3318100E+00, &
     & 0.3016800E+00, 0.3265600E+00, 0.3478087E+00, 0.2874600E+00, &
     & 0.3053900E+00, 0.3438704E+00, 0.3170100E+00, 0.3358435E+00, &
     & 0.3284289E+00, 0.3016000E+00, 0.2763677E+00, 0.2763677E+00 /
      data (ref_adm( 9,iz, 7, 4),iz = 1,20) / &
     & 0.4299600E+00, 0.4299600E+00, 0.5605000E+00, 0.4134600E+00, &
     & 0.3792800E+00, 0.4727300E+00, 0.3630700E+00, 0.2997600E+00, &
     & 0.2831000E+00, 0.3509100E+00, 0.3041300E+00, 0.3463970E+00, &
     & 0.3447864E+00, 0.3435854E+00, 0.3712800E+00, 0.4240500E+00, &
     & 0.3278198E+00, 0.3143566E+00, 0.2756395E+00, 0.2756395E+00 /
      data (ref_adm( 9,iz, 8, 4),iz = 1,20) / &
     & 0.3105400E+00, 0.3105400E+00, 0.2826300E+00, 0.3468900E+00, &
     & 0.3484900E+00, 0.3584500E+00, 0.3574800E+00, 0.3775600E+00, &
     & 0.4079400E+00, 0.3967600E+00, 0.2931700E+00, 0.2931100E+00, &
     & 0.2735900E+00, 0.3431524E+00, 0.2806400E+00, 0.3350654E+00, &
     & 0.3273066E+00, 0.3136376E+00, 0.2748051E+00, 0.2748051E+00 /
      data (ref_adm( 9,iz, 9, 4),iz = 1,20) / &
     & 0.3720347E+00, 0.3720347E+00, 0.3722562E+00, 0.5443300E+00, &
     & 0.3373200E+00, 0.3629537E+00, 0.4181200E+00, 0.4158000E+00, &
     & 0.3983000E+00, 0.4142900E+00, 0.4021400E+00, 0.3312300E+00, &
     & 0.2187000E+00, 0.3427730E+00, 0.3398621E+00, 0.3345553E+00, &
     & 0.3267336E+00, 0.3127604E+00, 0.2739324E+00, 0.2739324E+00 /
      data (ref_adm( 9,iz,10, 4),iz = 1,20) / &
     & 0.3720641E+00, 0.3720641E+00, 0.3722552E+00, 0.3715443E+00, &
     & 0.3675390E+00, 0.3635109E+00, 0.4468100E+00, 0.3558788E+00, &
     & 0.5096300E+00, 0.3550700E+00, 0.3078800E+00, 0.3210000E+00, &
     & 0.2854300E+00, 0.3424188E+00, 0.3393941E+00, 0.3350300E+00, &
     & 0.3395900E+00, 0.3118131E+00, 0.2730006E+00, 0.2730006E+00 /
      data (ref_adm( 9,iz,11, 4),iz = 1,20) / &
     & 0.3720797E+00, 0.3720797E+00, 0.3723222E+00, 0.3718775E+00, &
     & 0.3682549E+00, 0.3640476E+00, 0.4301900E+00, 0.3564211E+00, &
     & 0.3531202E+00, 0.2352500E+00, 0.2686700E+00, 0.3168000E+00, &
     & 0.2934000E+00, 0.3011400E+00, 0.3389490E+00, 0.3364200E+00, &
     & 0.3343200E+00, 0.3106747E+00, 0.2719165E+00, 0.2719165E+00 /
      data (ref_adm( 9,iz,12, 4),iz = 1,20) / &
     & 0.3721190E+00, 0.3721190E+00, 0.3722511E+00, 0.3722340E+00, &
     & 0.3688844E+00, 0.3647952E+00, 0.3605863E+00, 0.3568348E+00, &
     & 0.5808500E+00, 0.5621000E+00, 0.4452200E+00, 0.3831800E+00, &
     & 0.3336600E+00, 0.3331800E+00, 0.3383434E+00, 0.3647300E+00, &
     & 0.3334700E+00, 0.3080000E+00, 0.2708231E+00, 0.2708231E+00 /
      data (ref_adm( 9,iz,13, 4),iz = 1,20) / &
     & 0.3402500E+00, 0.3402500E+00, 0.3428300E+00, 0.3722554E+00, &
     & 0.2772200E+00, 0.3253500E+00, 0.3316300E+00, 0.3574120E+00, &
     & 0.3540615E+00, 0.3513144E+00, 0.5434100E+00, 0.4249800E+00, &
     & 0.2988500E+00, 0.3211600E+00, 0.3153000E+00, 0.3318952E+00, &
     & 0.3259700E+00, 0.3086989E+00, 0.2697505E+00, 0.2697505E+00 /
      data (ref_adm( 9,iz,14, 4),iz = 1,20) / &
     & 0.3721373E+00, 0.3721373E+00, 0.3722087E+00, 0.3725171E+00, &
     & 0.3025800E+00, 0.3017300E+00, 0.3937000E+00, 0.3580608E+00, &
     & 0.3547282E+00, 0.3515372E+00, 0.3299400E+00, 0.2672900E+00, &
     & 0.2880200E+00, 0.3289500E+00, 0.3387600E+00, 0.3313463E+00, &
     & 0.3230875E+00, 0.3077365E+00, 0.2686115E+00, 0.2686115E+00 /
      data (ref_adm( 9,iz,15, 4),iz = 1,20) / &
     & 0.3721471E+00, 0.3721471E+00, 0.3720644E+00, 0.3726541E+00, &
     & 0.3709839E+00, 0.3671227E+00, 0.2661300E+00, 0.3587351E+00, &
     & 0.3553768E+00, 0.3520373E+00, 0.3495554E+00, 0.2730100E+00, &
     & 0.3389800E+00, 0.3455500E+00, 0.3748600E+00, 0.3306770E+00, &
     & 0.3223630E+00, 0.3068435E+00, 0.2674620E+00, 0.2674620E+00 /
      data (ref_adm( 9,iz,16, 4),iz = 1,20) / &
     & 0.3721584E+00, 0.3721584E+00, 0.3719839E+00, 0.3727376E+00, &
     & 0.3717414E+00, 0.3678032E+00, 0.3636990E+00, 0.3596031E+00, &
     & 0.3560750E+00, 0.3527102E+00, 0.3499723E+00, 0.1999800E+00, &
     & 0.3691800E+00, 0.2526800E+00, 0.2608000E+00, 0.3300349E+00, &
     & 0.3214810E+00, 0.3059223E+00, 0.2663843E+00, 0.2663843E+00 /
      data (ref_adm( 9,iz,17, 4),iz = 1,20) / &
     & 0.3722683E+00, 0.3722683E+00, 0.3719225E+00, 0.3726962E+00, &
     & 0.2705600E+00, 0.3688725E+00, 0.3647490E+00, 0.3605520E+00, &
     & 0.3566832E+00, 0.3532694E+00, 0.2981800E+00, 0.2302400E+00, &
     & 0.3043500E+00, 0.2748200E+00, 0.3060600E+00, 0.3293935E+00, &
     & 0.3206922E+00, 0.3051009E+00, 0.2654313E+00, 0.2654313E+00 /
      data (ref_adm( 9,iz,18, 4),iz = 1,20) / &
     & 0.3381900E+00, 0.3381900E+00, 0.2966304E+00, 0.2951891E+00, &
     & 0.2982926E+00, 0.3058034E+00, 0.3087732E+00, 0.3070710E+00, &
     & 0.2647800E+00, 0.3069256E+00, 0.3093669E+00, 0.3193800E+00, &
     & 0.3121900E+00, 0.3265406E+00, 0.3250700E+00, 0.3376941E+00, &
     & 0.3364958E+00, 0.3206865E+00, 0.2700538E+00, 0.2700538E+00 /
      data (ref_adm( 9,iz,19, 4),iz = 1,20) / &
     & 0.3410549E+00, 0.3410549E+00, 0.2966304E+00, 0.2951891E+00, &
     & 0.2982926E+00, 0.3058034E+00, 0.3087731E+00, 0.3070709E+00, &
     & 0.3065979E+00, 0.3069256E+00, 0.4632200E+00, 0.4221300E+00, &
     & 0.3173200E+00, 0.3265406E+00, 0.2926000E+00, 0.3376941E+00, &
     & 0.3364958E+00, 0.3206865E+00, 0.2700538E+00, 0.2700538E+00 /
      data (ref_adm( 9,iz,20, 4),iz = 1,20) / &
     & 0.3410549E+00, 0.3410549E+00, 0.2966304E+00, 0.2951891E+00, &
     & 0.2982926E+00, 0.3058034E+00, 0.3087732E+00, 0.3070710E+00, &
     & 0.3065979E+00, 0.3069256E+00, 0.3093669E+00, 0.3145049E+00, &
     & 0.3542900E+00, 0.3445600E+00, 0.3326800E+00, 0.3842000E+00, &
     & 0.3364958E+00, 0.3206865E+00, 0.2700538E+00, 0.2700538E+00 /
      data (ref_adm( 9,iz,21, 4),iz = 1,20) / &
     & 0.3410549E+00, 0.3410549E+00, 0.2966304E+00, 0.2951891E+00, &
     & 0.2982926E+00, 0.3058034E+00, 0.3087731E+00, 0.3070709E+00, &
     & 0.3065979E+00, 0.3069256E+00, 0.3093669E+00, 0.3012400E+00, &
     & 0.3643500E+00, 0.3265406E+00, 0.2948600E+00, 0.3895800E+00, &
     & 0.3364958E+00, 0.3287600E+00, 0.2700538E+00, 0.2700538E+00 /
      data (ref_adm( 9,iz,22, 4),iz = 1,20) / &
     & 0.4513306E+00, 0.4513306E+00, 0.4432540E+00, 0.4404562E+00, &
     & 0.4382448E+00, 0.4367323E+00, 0.4340665E+00, 0.4295248E+00, &
     & 0.4236913E+00, 0.4167061E+00, 0.4091088E+00, 0.3985612E+00, &
     & 0.2686400E+00, 0.3746571E+00, 0.3403100E+00, 0.3360848E+00, &
     & 0.3134665E+00, 0.2838725E+00, 0.2316180E+00, 0.2316180E+00 /
      data (ref_adm( 9,iz,23, 4),iz = 1,20) / &
     & 0.4513306E+00, 0.4513306E+00, 0.4432540E+00, 0.4404563E+00, &
     & 0.4382448E+00, 0.4367323E+00, 0.4340665E+00, 0.4295247E+00, &
     & 0.4236913E+00, 0.4167061E+00, 0.4091088E+00, 0.3985612E+00, &
     & 0.3862501E+00, 0.3746571E+00, 0.3561800E+00, 0.3619900E+00, &
     & 0.3134665E+00, 0.2838725E+00, 0.2316180E+00, 0.2316180E+00 /
      data (ref_adm( 9,iz,24, 4),iz = 1,20) / &
     & 0.4513306E+00, 0.4513306E+00, 0.4432540E+00, 0.4404562E+00, &
     & 0.4382448E+00, 0.4367323E+00, 0.4340665E+00, 0.4295248E+00, &
     & 0.4236913E+00, 0.4167061E+00, 0.4091088E+00, 0.3985612E+00, &
     & 0.3862501E+00, 0.3746571E+00, 0.3580087E+00, 0.4302900E+00, &
     & 0.3134665E+00, 0.2838725E+00, 0.2316180E+00, 0.2316180E+00 /
      data (ref_adm( 9,iz,25, 4),iz = 1,20) / &
     & 0.4513306E+00, 0.4513306E+00, 0.4432540E+00, 0.4404563E+00, &
     & 0.4382448E+00, 0.4367323E+00, 0.4340665E+00, 0.4295247E+00, &
     & 0.4236913E+00, 0.4167061E+00, 0.4091088E+00, 0.3985612E+00, &
     & 0.3862501E+00, 0.3746571E+00, 0.3580087E+00, 0.3360848E+00, &
     & 0.3134665E+00, 0.2838725E+00, 0.2316180E+00, 0.2316180E+00 /
      data (ref_adm( 9,iz,26, 4),iz = 1,20) / &
     & 0.4513306E+00, 0.4513306E+00, 0.4432540E+00, 0.4404562E+00, &
     & 0.4382448E+00, 0.4367323E+00, 0.4340665E+00, 0.4295248E+00, &
     & 0.4236913E+00, 0.4167061E+00, 0.4091088E+00, 0.3985612E+00, &
     & 0.3862501E+00, 0.3746571E+00, 0.3580087E+00, 0.3360848E+00, &
     & 0.3134665E+00, 0.2838725E+00, 0.2316180E+00, 0.2316180E+00 /
      data (ref_adm( 9,iz,27, 4),iz = 1,20) / &
     & 0.4513306E+00, 0.4513306E+00, 0.4432540E+00, 0.4404563E+00, &
     & 0.4382448E+00, 0.4367323E+00, 0.4340665E+00, 0.4295247E+00, &
     & 0.4236913E+00, 0.4167061E+00, 0.4091088E+00, 0.3985612E+00, &
     & 0.3862501E+00, 0.3746571E+00, 0.3580087E+00, 0.3360848E+00, &
     & 0.3134665E+00, 0.2838725E+00, 0.2316180E+00, 0.2316180E+00 /
      data (ref_adm( 9,iz,28, 4),iz = 1,20) / &
     & 0.4942000E+00, 0.4942000E+00, 0.4432540E+00, 0.4404562E+00, &
     & 0.4382448E+00, 0.4367323E+00, 0.4340665E+00, 0.4295248E+00, &
     & 0.4236913E+00, 0.4167061E+00, 0.4091088E+00, 0.3985612E+00, &
     & 0.3862501E+00, 0.3746571E+00, 0.3580087E+00, 0.3360848E+00, &
     & 0.3134665E+00, 0.2838725E+00, 0.2316180E+00, 0.2316180E+00 /
      data (ref_adm( 9,iz,29, 4),iz = 1,20) / &
     & 0.4513306E+00, 0.4513306E+00, 0.4432540E+00, 0.4404563E+00, &
     & 0.4382448E+00, 0.4367323E+00, 0.4340665E+00, 0.4295247E+00, &
     & 0.4236913E+00, 0.4167061E+00, 0.4091088E+00, 0.3985612E+00, &
     & 0.3862501E+00, 0.3746571E+00, 0.3580087E+00, 0.3360848E+00, &
     & 0.3134665E+00, 0.2838725E+00, 0.2316180E+00, 0.2316180E+00 /
      data (ref_adm( 9,iz,30, 4),iz = 1,20) / &
     & 0.5044500E+00, 0.5044500E+00, 0.4432540E+00, 0.4404562E+00, &
     & 0.4382448E+00, 0.4367323E+00, 0.4340665E+00, 0.4295248E+00, &
     & 0.4236913E+00, 0.4167061E+00, 0.4091088E+00, 0.3985612E+00, &
     & 0.3862501E+00, 0.3746571E+00, 0.3580087E+00, 0.3360848E+00, &
     & 0.3134665E+00, 0.2838725E+00, 0.2316180E+00, 0.2316180E+00 /
      data (ref_adm( 9,iz,31, 4),iz = 1,20) / &
     & 0.4513306E+00, 0.4513306E+00, 0.4432540E+00, 0.4404563E+00, &
     & 0.4382448E+00, 0.4367323E+00, 0.4340665E+00, 0.4295247E+00, &
     & 0.4236913E+00, 0.4167061E+00, 0.4091088E+00, 0.3985612E+00, &
     & 0.3862501E+00, 0.3746571E+00, 0.3580087E+00, 0.3360848E+00, &
     & 0.3134665E+00, 0.2838725E+00, 0.2316180E+00, 0.2316180E+00 /
      data (ref_adm( 9,iz,32, 4),iz = 1,20) / &
     & 0.4513306E+00, 0.4513306E+00, 0.4432540E+00, 0.4404562E+00, &
     & 0.4382448E+00, 0.4367323E+00, 0.4340665E+00, 0.4295248E+00, &
     & 0.4236913E+00, 0.4167061E+00, 0.4091088E+00, 0.3985612E+00, &
     & 0.3862501E+00, 0.3746571E+00, 0.3580087E+00, 0.3360848E+00, &
     & 0.3134665E+00, 0.2838725E+00, 0.2316180E+00, 0.2316180E+00 /
      data (ref_adm( 9,iz,33, 4),iz = 1,20) / &
     & 0.4513306E+00, 0.4513306E+00, 0.4432540E+00, 0.4404563E+00, &
     & 0.4382448E+00, 0.4367323E+00, 0.4340665E+00, 0.4295247E+00, &
     & 0.4236913E+00, 0.4167061E+00, 0.4091088E+00, 0.3985612E+00, &
     & 0.3862501E+00, 0.3746571E+00, 0.3580087E+00, 0.3360848E+00, &
     & 0.3134665E+00, 0.2838725E+00, 0.2316180E+00, 0.2316180E+00 /
      data (ref_adm( 9,iz,34, 4),iz = 1,20) / &
     & 0.4513306E+00, 0.4513306E+00, 0.2903000E+00, 0.4404562E+00, &
     & 0.4382448E+00, 0.4367323E+00, 0.4340665E+00, 0.4295248E+00, &
     & 0.4236913E+00, 0.4167061E+00, 0.4091088E+00, 0.3985612E+00, &
     & 0.3862501E+00, 0.3746571E+00, 0.3580087E+00, 0.3360848E+00, &
     & 0.3134665E+00, 0.2838725E+00, 0.2316180E+00, 0.2316180E+00 /
      data (ref_adm( 9,iz,35, 4),iz = 1,20) / &
     & 0.4513306E+00, 0.4513306E+00, 0.4432540E+00, 0.4404563E+00, &
     & 0.4382448E+00, 0.4367323E+00, 0.4340665E+00, 0.4295247E+00, &
     & 0.4236913E+00, 0.4167061E+00, 0.4091088E+00, 0.3985612E+00, &
     & 0.3862501E+00, 0.3746571E+00, 0.3580087E+00, 0.3360848E+00, &
     & 0.3134665E+00, 0.2838725E+00, 0.2316180E+00, 0.2316180E+00 /
      data (ref_adm( 9,iz,36, 4),iz = 1,20) / &
     & 0.4513306E+00, 0.4513306E+00, 0.4432540E+00, 0.4404562E+00, &
     & 0.4382448E+00, 0.4367323E+00, 0.4340665E+00, 0.4295248E+00, &
     & 0.4236913E+00, 0.4167061E+00, 0.4091088E+00, 0.3985612E+00, &
     & 0.3862501E+00, 0.3746571E+00, 0.3580087E+00, 0.3360848E+00, &
     & 0.3134665E+00, 0.2838725E+00, 0.2316180E+00, 0.2316180E+00 /
      data (ref_adm( 9,iz,37, 4),iz = 1,20) / &
     & 0.5118300E+00, 0.5118300E+00, 0.4432540E+00, 0.4404562E+00, &
     & 0.4382448E+00, 0.4367323E+00, 0.4340665E+00, 0.4295248E+00, &
     & 0.4236913E+00, 0.4167061E+00, 0.4091088E+00, 0.3985612E+00, &
     & 0.3862501E+00, 0.3746571E+00, 0.3580087E+00, 0.3360848E+00, &
     & 0.3134665E+00, 0.2838725E+00, 0.2316180E+00, 0.2316180E+00 /
      data (ref_adm( 9,iz,38, 4),iz = 1,20) / &
     & 0.5118300E+00, 0.5118300E+00, 0.4432540E+00, 0.4404562E+00, &
     & 0.4382448E+00, 0.4367323E+00, 0.4340665E+00, 0.4295248E+00, &
     & 0.4236913E+00, 0.4167061E+00, 0.4091088E+00, 0.3985612E+00, &
     & 0.3862501E+00, 0.3746571E+00, 0.3580087E+00, 0.3360848E+00, &
     & 0.3134665E+00, 0.2838725E+00, 0.2316180E+00, 0.2316180E+00 /
! Solar Zenith Angle 20.0 Albedo  0.3466959E+00
      data (ref_adm( 9,iz, 1, 5),iz = 1,20) / &
     & 0.3958868E+00, 0.3958868E+00, 0.3676555E+00, 0.3257400E+00, &
     & 0.3445800E+00, 0.2932700E+00, 0.4463200E+00, 0.3576811E+00, &
     & 0.3137600E+00, 0.3527400E+00, 0.3363100E+00, 0.3653200E+00, &
     & 0.3789100E+00, 0.3343485E+00, 0.3298603E+00, 0.2583700E+00, &
     & 0.3151720E+00, 0.3001945E+00, 0.2611193E+00, 0.2611193E+00 /
      data (ref_adm( 9,iz, 2, 5),iz = 1,20) / &
     & 0.3958868E+00, 0.3958868E+00, 0.3676555E+00, 0.3257400E+00, &
     & 0.3445800E+00, 0.2932700E+00, 0.4463200E+00, 0.3576811E+00, &
     & 0.3137600E+00, 0.3527400E+00, 0.3363100E+00, 0.3653200E+00, &
     & 0.3789100E+00, 0.3343485E+00, 0.3298603E+00, 0.2583700E+00, &
     & 0.3151720E+00, 0.3001945E+00, 0.2611193E+00, 0.2611193E+00 /
      data (ref_adm( 9,iz, 3, 5),iz = 1,20) / &
     & 0.4463300E+00, 0.4463300E+00, 0.4926300E+00, 0.3658500E+00, &
     & 0.3358600E+00, 0.3905100E+00, 0.4150300E+00, 0.3576811E+00, &
     & 0.2572300E+00, 0.2702600E+00, 0.2896000E+00, 0.3415887E+00, &
     & 0.3555300E+00, 0.3343485E+00, 0.2944700E+00, 0.2424600E+00, &
     & 0.3151720E+00, 0.3001945E+00, 0.1477522E+00, 0.1477522E+00 /
      data (ref_adm( 9,iz, 4, 5),iz = 1,20) / &
     & 0.5728800E+00, 0.5728800E+00, 0.3922800E+00, 0.3484700E+00, &
     & 0.4621900E+00, 0.3533600E+00, 0.3878200E+00, 0.3576811E+00, &
     & 0.3533944E+00, 0.2821000E+00, 0.3749600E+00, 0.3415887E+00, &
     & 0.4112200E+00, 0.3343485E+00, 0.3298603E+00, 0.4602400E+00, &
     & 0.3644200E+00, 0.3001945E+00, 0.2611193E+00, 0.2611193E+00 /
      data (ref_adm( 9,iz, 5, 5),iz = 1,20) / &
     & 0.4261500E+00, 0.4261500E+00, 0.4459700E+00, 0.4855400E+00, &
     & 0.4673700E+00, 0.2747700E+00, 0.3353900E+00, 0.2483600E+00, &
     & 0.2511000E+00, 0.2752400E+00, 0.2975400E+00, 0.3415887E+00, &
     & 0.3893500E+00, 0.3612400E+00, 0.3298603E+00, 0.5442200E+00, &
     & 0.3151720E+00, 0.3001945E+00, 0.2611193E+00, 0.2611193E+00 /
      data (ref_adm( 9,iz, 6, 5),iz = 1,20) / &
     & 0.4231500E+00, 0.4231500E+00, 0.3043500E+00, 0.2815700E+00, &
     & 0.3049900E+00, 0.3136000E+00, 0.2744500E+00, 0.3167000E+00, &
     & 0.3201700E+00, 0.3491383E+00, 0.3455862E+00, 0.3415887E+00, &
     & 0.3375174E+00, 0.2847900E+00, 0.3298603E+00, 0.5170200E+00, &
     & 0.3388800E+00, 0.3592800E+00, 0.2611193E+00, 0.2611193E+00 /
      data (ref_adm( 9,iz, 7, 5),iz = 1,20) / &
     & 0.3124600E+00, 0.3124600E+00, 0.3817200E+00, 0.2799500E+00, &
     & 0.2935400E+00, 0.3554400E+00, 0.3646600E+00, 0.3716400E+00, &
     & 0.4470600E+00, 0.3491383E+00, 0.3455862E+00, 0.3415887E+00, &
     & 0.3010200E+00, 0.3403400E+00, 0.3551600E+00, 0.3347300E+00, &
     & 0.3764700E+00, 0.3235200E+00, 0.2611193E+00, 0.2611193E+00 /
      data (ref_adm( 9,iz, 8, 5),iz = 1,20) / &
     & 0.4065300E+00, 0.4065300E+00, 0.4068000E+00, 0.3994300E+00, &
     & 0.3779700E+00, 0.3605000E+00, 0.3189200E+00, 0.2978300E+00, &
     & 0.2918300E+00, 0.3832700E+00, 0.2050600E+00, 0.3415887E+00, &
     & 0.2721200E+00, 0.2980900E+00, 0.3088500E+00, 0.3394900E+00, &
     & 0.3189900E+00, 0.2942500E+00, 0.2611193E+00, 0.2611193E+00 /
      data (ref_adm( 9,iz, 9, 5),iz = 1,20) / &
     & 0.3842000E+00, 0.3842000E+00, 0.3273200E+00, 0.3556500E+00, &
     & 0.3583400E+00, 0.3743900E+00, 0.3529600E+00, 0.3246900E+00, &
     & 0.3091100E+00, 0.3127100E+00, 0.2699400E+00, 0.4991200E+00, &
     & 0.3843700E+00, 0.2745100E+00, 0.3038400E+00, 0.3584700E+00, &
     & 0.3052000E+00, 0.3152400E+00, 0.2611193E+00, 0.2611193E+00 /
      data (ref_adm( 9,iz,10, 5),iz = 1,20) / &
     & 0.3718200E+00, 0.3718200E+00, 0.4129000E+00, 0.3873800E+00, &
     & 0.3655600E+00, 0.3762600E+00, 0.3471700E+00, 0.3144800E+00, &
     & 0.3395400E+00, 0.3980400E+00, 0.3162300E+00, 0.2928700E+00, &
     & 0.2775300E+00, 0.2655300E+00, 0.2422300E+00, 0.3232979E+00, &
     & 0.3151720E+00, 0.3001945E+00, 0.2611193E+00, 0.2611193E+00 /
      data (ref_adm( 9,iz,11, 5),iz = 1,20) / &
     & 0.4799500E+00, 0.4799500E+00, 0.3044700E+00, 0.2565100E+00, &
     & 0.3396400E+00, 0.3579600E+00, 0.4180600E+00, 0.3546500E+00, &
     & 0.3197300E+00, 0.3241600E+00, 0.3055900E+00, 0.2995500E+00, &
     & 0.2899800E+00, 0.2659500E+00, 0.2698200E+00, 0.2973800E+00, &
     & 0.3151720E+00, 0.3001945E+00, 0.2611193E+00, 0.2611193E+00 /
      data (ref_adm( 9,iz,12, 5),iz = 1,20) / &
     & 0.5532200E+00, 0.5532200E+00, 0.4719100E+00, 0.3641193E+00, &
     & 0.5079800E+00, 0.2591800E+00, 0.3802700E+00, 0.3627600E+00, &
     & 0.3513000E+00, 0.3104600E+00, 0.3048400E+00, 0.3129800E+00, &
     & 0.3111900E+00, 0.3194300E+00, 0.2651400E+00, 0.3232979E+00, &
     & 0.3151720E+00, 0.3001945E+00, 0.2611193E+00, 0.2611193E+00 /
      data (ref_adm( 9,iz,13, 5),iz = 1,20) / &
     & 0.3958868E+00, 0.3958868E+00, 0.3907300E+00, 0.5512400E+00, &
     & 0.3777700E+00, 0.3339200E+00, 0.3518000E+00, 0.3580500E+00, &
     & 0.2947400E+00, 0.3030200E+00, 0.3380000E+00, 0.3125200E+00, &
     & 0.3001300E+00, 0.2956400E+00, 0.2932600E+00, 0.3009000E+00, &
     & 0.3151720E+00, 0.3001945E+00, 0.2611193E+00, 0.2611193E+00 /
      data (ref_adm( 9,iz,14, 5),iz = 1,20) / &
     & 0.4060600E+00, 0.4060600E+00, 0.4710600E+00, 0.4098900E+00, &
     & 0.4558500E+00, 0.4511900E+00, 0.4271600E+00, 0.4153500E+00, &
     & 0.4056800E+00, 0.3663600E+00, 0.3843000E+00, 0.4037400E+00, &
     & 0.3973600E+00, 0.3833300E+00, 0.3724400E+00, 0.3577200E+00, &
     & 0.3393300E+00, 0.3275200E+00, 0.2611193E+00, 0.2611193E+00 /
      data (ref_adm( 9,iz,15, 5),iz = 1,20) / &
     & 0.4211500E+00, 0.4211500E+00, 0.3676554E+00, 0.4965600E+00, &
     & 0.4982600E+00, 0.4255800E+00, 0.3506400E+00, 0.2822000E+00, &
     & 0.2972200E+00, 0.2758000E+00, 0.3056100E+00, 0.3308900E+00, &
     & 0.3558400E+00, 0.3281400E+00, 0.3413700E+00, 0.3533700E+00, &
     & 0.3466100E+00, 0.3213000E+00, 0.2611193E+00, 0.2611193E+00 /
      data (ref_adm( 9,iz,16, 5),iz = 1,20) / &
     & 0.2857300E+00, 0.2857300E+00, 0.3676555E+00, 0.3314700E+00, &
     & 0.3328500E+00, 0.3985200E+00, 0.5056900E+00, 0.5195300E+00, &
     & 0.3533944E+00, 0.2961500E+00, 0.2670200E+00, 0.3415887E+00, &
     & 0.3375174E+00, 0.3509600E+00, 0.3610900E+00, 0.3232979E+00, &
     & 0.3151720E+00, 0.3001945E+00, 0.2611193E+00, 0.2611193E+00 /
      data (ref_adm( 9,iz,17, 5),iz = 1,20) / &
     & 0.2562200E+00, 0.2562200E+00, 0.1869500E+00, 0.3641193E+00, &
     & 0.3629816E+00, 0.5434700E+00, 0.4332700E+00, 0.3127000E+00, &
     & 0.3007900E+00, 0.2542400E+00, 0.2484400E+00, 0.2744400E+00, &
     & 0.3378000E+00, 0.3230800E+00, 0.3306000E+00, 0.3232979E+00, &
     & 0.3151720E+00, 0.3001945E+00, 0.2611193E+00, 0.2611193E+00 /
      data (ref_adm( 9,iz,18, 5),iz = 1,20) / &
     & 0.3991300E+00, 0.3991300E+00, 0.3727551E+00, 0.3713628E+00, &
     & 0.3453000E+00, 0.4655800E+00, 0.3672966E+00, 0.3543800E+00, &
     & 0.3036100E+00, 0.3559949E+00, 0.3258400E+00, 0.3340500E+00, &
     & 0.3408400E+00, 0.3726400E+00, 0.4295200E+00, 0.3272706E+00, &
     & 0.3199343E+00, 0.3074222E+00, 0.2681560E+00, 0.2681560E+00 /
      data (ref_adm( 9,iz,19, 5),iz = 1,20) / &
     & 0.3604500E+00, 0.3604500E+00, 0.3728622E+00, 0.3713862E+00, &
     & 0.3710014E+00, 0.3704193E+00, 0.3677640E+00, 0.3642465E+00, &
     & 0.3602617E+00, 0.3562388E+00, 0.3361400E+00, 0.4026900E+00, &
     & 0.3430589E+00, 0.3596200E+00, 0.3337497E+00, 0.3266898E+00, &
     & 0.3192852E+00, 0.3068007E+00, 0.2676939E+00, 0.2676939E+00 /
      data (ref_adm( 9,iz,20, 5),iz = 1,20) / &
     & 0.4037600E+00, 0.4037600E+00, 0.3730964E+00, 0.2936400E+00, &
     & 0.3708997E+00, 0.3705833E+00, 0.3682136E+00, 0.3646879E+00, &
     & 0.2694200E+00, 0.3479200E+00, 0.3655600E+00, 0.3480587E+00, &
     & 0.2396500E+00, 0.3008800E+00, 0.2544800E+00, 0.3261830E+00, &
     & 0.3187458E+00, 0.3060840E+00, 0.2672966E+00, 0.2672966E+00 /
      data (ref_adm( 9,iz,21, 5),iz = 1,20) / &
     & 0.3498600E+00, 0.3498600E+00, 0.3733078E+00, 0.3714995E+00, &
     & 0.3707424E+00, 0.3761400E+00, 0.3687352E+00, 0.3650848E+00, &
     & 0.3407400E+00, 0.3838100E+00, 0.3529727E+00, 0.3481406E+00, &
     & 0.2593000E+00, 0.2492500E+00, 0.3446100E+00, 0.4291100E+00, &
     & 0.3182906E+00, 0.3054057E+00, 0.2668553E+00, 0.2668553E+00 /
      data (ref_adm( 9,iz,22, 5),iz = 1,20) / &
     & 0.4419400E+00, 0.4419400E+00, 0.3785132E+00, 0.3748900E+00, &
     & 0.4191700E+00, 0.3747116E+00, 0.3728163E+00, 0.3376000E+00, &
     & 0.4076500E+00, 0.3589182E+00, 0.3550892E+00, 0.2643800E+00, &
     & 0.3462522E+00, 0.2995200E+00, 0.3180500E+00, 0.3759800E+00, &
     & 0.3220316E+00, 0.3062879E+00, 0.2660066E+00, 0.2660066E+00 /
      data (ref_adm( 9,iz,23, 5),iz = 1,20) / &
     & 0.2666900E+00, 0.2666900E+00, 0.4271700E+00, 0.3932200E+00, &
     & 0.2657600E+00, 0.5396700E+00, 0.3041800E+00, 0.3975100E+00, &
     & 0.3725200E+00, 0.3236200E+00, 0.3550892E+00, 0.2703100E+00, &
     & 0.2876200E+00, 0.3792000E+00, 0.3378245E+00, 0.2731400E+00, &
     & 0.2874000E+00, 0.3062879E+00, 0.2660066E+00, 0.2660066E+00 /
      data (ref_adm( 9,iz,24, 5),iz = 1,20) / &
     & 0.3671500E+00, 0.3671500E+00, 0.2382500E+00, 0.3748900E+00, &
     & 0.4243000E+00, 0.4191300E+00, 0.3865900E+00, 0.3996500E+00, &
     & 0.3249800E+00, 0.2927100E+00, 0.3550892E+00, 0.3507224E+00, &
     & 0.3462522E+00, 0.3215500E+00, 0.3025600E+00, 0.2990400E+00, &
     & 0.2713900E+00, 0.3220100E+00, 0.2660066E+00, 0.2660066E+00 /
      data (ref_adm( 9,iz,25, 5),iz = 1,20) / &
     & 0.3995000E+00, 0.3995000E+00, 0.3869400E+00, 0.4101000E+00, &
     & 0.4048600E+00, 0.4089200E+00, 0.4133700E+00, 0.3626100E+00, &
     & 0.3900400E+00, 0.3739100E+00, 0.3572800E+00, 0.3525100E+00, &
     & 0.3363600E+00, 0.3154400E+00, 0.3047000E+00, 0.3151000E+00, &
     & 0.3220316E+00, 0.3062879E+00, 0.2660066E+00, 0.2660066E+00 /
      data (ref_adm( 9,iz,26, 5),iz = 1,20) / &
     & 0.3804700E+00, 0.3804700E+00, 0.4858800E+00, 0.3748900E+00, &
     & 0.3946900E+00, 0.4891200E+00, 0.3060600E+00, 0.3679468E+00, &
     & 0.3634304E+00, 0.3459200E+00, 0.3855200E+00, 0.4261200E+00, &
     & 0.3462522E+00, 0.4570200E+00, 0.3378245E+00, 0.3144300E+00, &
     & 0.3220316E+00, 0.3062879E+00, 0.2660066E+00, 0.2660066E+00 /
      data (ref_adm( 9,iz,27, 5),iz = 1,20) / &
     & 0.3647800E+00, 0.3647800E+00, 0.3941400E+00, 0.3748900E+00, &
     & 0.4093200E+00, 0.3230400E+00, 0.3059500E+00, 0.3119800E+00, &
     & 0.3634304E+00, 0.4495900E+00, 0.3069500E+00, 0.3511800E+00, &
     & 0.3946900E+00, 0.3656400E+00, 0.3000300E+00, 0.3549100E+00, &
     & 0.3556000E+00, 0.3062879E+00, 0.2660066E+00, 0.2660066E+00 /
      data (ref_adm( 9,iz,28, 5),iz = 1,20) / &
     & 0.4071599E+00, 0.4071599E+00, 0.3785132E+00, 0.3929800E+00, &
     & 0.4622900E+00, 0.3739600E+00, 0.3728163E+00, 0.2912700E+00, &
     & 0.2679800E+00, 0.3589182E+00, 0.3550892E+00, 0.2734200E+00, &
     & 0.3159600E+00, 0.3210800E+00, 0.3666400E+00, 0.3307180E+00, &
     & 0.3220316E+00, 0.3062879E+00, 0.2660066E+00, 0.2660066E+00 /
      data (ref_adm( 9,iz,29, 5),iz = 1,20) / &
     & 0.3192800E+00, 0.3192800E+00, 0.4032400E+00, 0.3963600E+00, &
     & 0.3736740E+00, 0.2782000E+00, 0.3061500E+00, 0.3679468E+00, &
     & 0.3634304E+00, 0.3589182E+00, 0.3550892E+00, 0.2949500E+00, &
     & 0.3421500E+00, 0.3322600E+00, 0.3378245E+00, 0.3307180E+00, &
     & 0.3220316E+00, 0.3062879E+00, 0.2660066E+00, 0.2660066E+00 /
      data (ref_adm( 9,iz,30, 5),iz = 1,20) / &
     & 0.5487300E+00, 0.5487300E+00, 0.3382900E+00, 0.4642000E+00, &
     & 0.3127100E+00, 0.2999200E+00, 0.3098400E+00, 0.3679468E+00, &
     & 0.3634304E+00, 0.3589182E+00, 0.3550892E+00, 0.3808500E+00, &
     & 0.3512700E+00, 0.3427486E+00, 0.3378245E+00, 0.3307180E+00, &
     & 0.3220316E+00, 0.3062879E+00, 0.2660066E+00, 0.2660066E+00 /
      data (ref_adm( 9,iz,31, 5),iz = 1,20) / &
     & 0.3891900E+00, 0.3891900E+00, 0.4045400E+00, 0.3956200E+00, &
     & 0.2726600E+00, 0.2679300E+00, 0.4867900E+00, 0.3679468E+00, &
     & 0.3634304E+00, 0.3589182E+00, 0.3515300E+00, 0.3908100E+00, &
     & 0.3462523E+00, 0.3427486E+00, 0.3378245E+00, 0.3307180E+00, &
     & 0.3220316E+00, 0.3062879E+00, 0.2660066E+00, 0.2660066E+00 /
      data (ref_adm( 9,iz,32, 5),iz = 1,20) / &
     & 0.4149800E+00, 0.4149800E+00, 0.3793700E+00, 0.3955600E+00, &
     & 0.3588800E+00, 0.4134600E+00, 0.3757100E+00, 0.3135200E+00, &
     & 0.3634304E+00, 0.3589182E+00, 0.3591700E+00, 0.3507224E+00, &
     & 0.3462522E+00, 0.3427486E+00, 0.3378245E+00, 0.3307180E+00, &
     & 0.3220316E+00, 0.3062879E+00, 0.2660066E+00, 0.2660066E+00 /
      data (ref_adm( 9,iz,33, 5),iz = 1,20) / &
     & 0.4273200E+00, 0.4273200E+00, 0.4364000E+00, 0.4254000E+00, &
     & 0.4430300E+00, 0.4164700E+00, 0.3424800E+00, 0.3499800E+00, &
     & 0.3807000E+00, 0.3589182E+00, 0.3411300E+00, 0.3507223E+00, &
     & 0.3462523E+00, 0.3427486E+00, 0.3378245E+00, 0.3307180E+00, &
     & 0.3220316E+00, 0.3062879E+00, 0.2660066E+00, 0.2660066E+00 /
      data (ref_adm( 9,iz,34, 5),iz = 1,20) / &
     & 0.4033600E+00, 0.4033600E+00, 0.4998100E+00, 0.4637200E+00, &
     & 0.5487100E+00, 0.3060500E+00, 0.2894900E+00, 0.3730600E+00, &
     & 0.3753600E+00, 0.3651200E+00, 0.3503200E+00, 0.3507224E+00, &
     & 0.3462522E+00, 0.3427486E+00, 0.3378245E+00, 0.3307180E+00, &
     & 0.3220316E+00, 0.3062879E+00, 0.2660066E+00, 0.2660066E+00 /
      data (ref_adm( 9,iz,35, 5),iz = 1,20) / &
     & 0.4096900E+00, 0.4096900E+00, 0.4055200E+00, 0.4358300E+00, &
     & 0.4349000E+00, 0.5242100E+00, 0.4002700E+00, 0.2961000E+00, &
     & 0.3588200E+00, 0.3291900E+00, 0.2354500E+00, 0.3507223E+00, &
     & 0.3462523E+00, 0.3427486E+00, 0.3378245E+00, 0.3307180E+00, &
     & 0.3220316E+00, 0.3062879E+00, 0.2660066E+00, 0.2660066E+00 /
      data (ref_adm( 9,iz,36, 5),iz = 1,20) / &
     & 0.4175700E+00, 0.4175700E+00, 0.3935600E+00, 0.4459000E+00, &
     & 0.4019500E+00, 0.4323900E+00, 0.3517600E+00, 0.3679468E+00, &
     & 0.3901400E+00, 0.3871900E+00, 0.3550892E+00, 0.3507224E+00, &
     & 0.3462522E+00, 0.3427486E+00, 0.3378245E+00, 0.3307180E+00, &
     & 0.3220316E+00, 0.3062879E+00, 0.2660066E+00, 0.2660066E+00 /
      data (ref_adm( 9,iz,37, 5),iz = 1,20) / &
     & 0.3947300E+00, 0.3947300E+00, 0.3785132E+00, 0.3291500E+00, &
     & 0.3371400E+00, 0.3649700E+00, 0.3694200E+00, 0.3195200E+00, &
     & 0.3807900E+00, 0.3589182E+00, 0.3550892E+00, 0.3507224E+00, &
     & 0.3462522E+00, 0.3427486E+00, 0.3378245E+00, 0.3307180E+00, &
     & 0.3220316E+00, 0.3062879E+00, 0.2660066E+00, 0.2660066E+00 /
      data (ref_adm( 9,iz,38, 5),iz = 1,20) / &
     & 0.3947300E+00, 0.3947300E+00, 0.3785132E+00, 0.3291500E+00, &
     & 0.3371400E+00, 0.3649700E+00, 0.3694200E+00, 0.3195200E+00, &
     & 0.3807900E+00, 0.3589182E+00, 0.3550892E+00, 0.3507224E+00, &
     & 0.3462522E+00, 0.3427486E+00, 0.3378245E+00, 0.3307180E+00, &
     & 0.3220316E+00, 0.3062879E+00, 0.2660066E+00, 0.2660066E+00 /
! Solar Zenith Angle 25.0 Albedo  0.3848794E+00
      data (ref_adm( 9,iz, 1, 6),iz = 1,20) / &
     & 0.3720022E+00, 0.3720022E+00, 0.2969500E+00, 0.2861400E+00, &
     & 0.4472600E+00, 0.4167500E+00, 0.5359300E+00, 0.5049700E+00, &
     & 0.5608500E+00, 0.4240800E+00, 0.4086800E+00, 0.4694000E+00, &
     & 0.5007900E+00, 0.3847500E+00, 0.3914600E+00, 0.4414600E+00, &
     & 0.3533200E+00, 0.3583890E+00, 0.2983113E+00, 0.2983113E+00 /
      data (ref_adm( 9,iz, 2, 6),iz = 1,20) / &
     & 0.3720022E+00, 0.3720022E+00, 0.2969500E+00, 0.2861400E+00, &
     & 0.4472600E+00, 0.4167500E+00, 0.5359300E+00, 0.5049700E+00, &
     & 0.5608500E+00, 0.4240800E+00, 0.4086800E+00, 0.4694000E+00, &
     & 0.5007900E+00, 0.3847500E+00, 0.3914600E+00, 0.4414600E+00, &
     & 0.3533200E+00, 0.3583890E+00, 0.2983113E+00, 0.2983113E+00 /
      data (ref_adm( 9,iz, 3, 6),iz = 1,20) / &
     & 0.3300100E+00, 0.3300100E+00, 0.2552200E+00, 0.3545900E+00, &
     & 0.3130700E+00, 0.3839112E+00, 0.3150300E+00, 0.3517000E+00, &
     & 0.4141900E+00, 0.3809800E+00, 0.3958800E+00, 0.5097200E+00, &
     & 0.3352500E+00, 0.3841700E+00, 0.4173100E+00, 0.3361600E+00, &
     & 0.3823927E+00, 0.3582331E+00, 0.6502755E-01, 0.6502755E-01 /
      data (ref_adm( 9,iz, 4, 6),iz = 1,20) / &
     & 0.3591800E+00, 0.3591800E+00, 0.3680179E+00, 0.2023000E+00, &
     & 0.3804281E+00, 0.5276600E+00, 0.4233000E+00, 0.4199800E+00, &
     & 0.4158700E+00, 0.3758800E+00, 0.4686600E+00, 0.5043800E+00, &
     & 0.3049000E+00, 0.4338900E+00, 0.3836400E+00, 0.3344500E+00, &
     & 0.3820359E+00, 0.3727500E+00, 0.3268200E+00, 0.3268200E+00 /
      data (ref_adm( 9,iz, 5, 6),iz = 1,20) / &
     & 0.4066900E+00, 0.4066900E+00, 0.4138500E+00, 0.3740100E+00, &
     & 0.3475600E+00, 0.3679200E+00, 0.3733900E+00, 0.2995200E+00, &
     & 0.4734700E+00, 0.3319700E+00, 0.4610200E+00, 0.4453600E+00, &
     & 0.4026600E+00, 0.4280800E+00, 0.3986300E+00, 0.3734700E+00, &
     & 0.3676500E+00, 0.4066600E+00, 0.2980534E+00, 0.2980534E+00 /
      data (ref_adm( 9,iz, 6, 6),iz = 1,20) / &
     & 0.4217000E+00, 0.4217000E+00, 0.3721000E+00, 0.3482000E+00, &
     & 0.3176600E+00, 0.3181800E+00, 0.3488400E+00, 0.4283100E+00, &
     & 0.3860100E+00, 0.5514600E+00, 0.5125300E+00, 0.3281600E+00, &
     & 0.3403500E+00, 0.3687900E+00, 0.3830200E+00, 0.4147600E+00, &
     & 0.3715800E+00, 0.3698100E+00, 0.2978861E+00, 0.2978861E+00 /
      data (ref_adm( 9,iz, 7, 6),iz = 1,20) / &
     & 0.3699900E+00, 0.3699900E+00, 0.2197800E+00, 0.4692700E+00, &
     & 0.3456600E+00, 0.3009300E+00, 0.4059300E+00, 0.3862300E+00, &
     & 0.3758900E+00, 0.5042200E+00, 0.4812500E+00, 0.3630600E+00, &
     & 0.3369700E+00, 0.3374900E+00, 0.4183100E+00, 0.4127000E+00, &
     & 0.3770700E+00, 0.3572164E+00, 0.2976620E+00, 0.2976620E+00 /
      data (ref_adm( 9,iz, 8, 6),iz = 1,20) / &
     & 0.3491300E+00, 0.3491300E+00, 0.3086200E+00, 0.5588300E+00, &
     & 0.3051600E+00, 0.3544800E+00, 0.3401900E+00, 0.3770500E+00, &
     & 0.3341100E+00, 0.4856800E+00, 0.4101300E+00, 0.3577200E+00, &
     & 0.3888500E+00, 0.3858900E+00, 0.3340300E+00, 0.3919916E+00, &
     & 0.3347000E+00, 0.3442200E+00, 0.2761700E+00, 0.2761700E+00 /
      data (ref_adm( 9,iz, 9, 6),iz = 1,20) / &
     & 0.3211600E+00, 0.3211600E+00, 0.3085400E+00, 0.3832300E+00, &
     & 0.3093700E+00, 0.3845356E+00, 0.3119600E+00, 0.3436800E+00, &
     & 0.3497000E+00, 0.4464200E+00, 0.3978100E+00, 0.3784400E+00, &
     & 0.4154700E+00, 0.4214400E+00, 0.3817500E+00, 0.3914221E+00, &
     & 0.3802970E+00, 0.3562978E+00, 0.2970109E+00, 0.2970109E+00 /
      data (ref_adm( 9,iz,10, 6),iz = 1,20) / &
     & 0.3716900E+00, 0.3716900E+00, 0.3881500E+00, 0.4324900E+00, &
     & 0.3896100E+00, 0.3775500E+00, 0.3567200E+00, 0.3826140E+00, &
     & 0.3378000E+00, 0.3832451E+00, 0.4103700E+00, 0.4080800E+00, &
     & 0.4496300E+00, 0.4488000E+00, 0.3615500E+00, 0.4447600E+00, &
     & 0.3797225E+00, 0.3558353E+00, 0.2673200E+00, 0.2673200E+00 /
      data (ref_adm( 9,iz,11, 6),iz = 1,20) / &
     & 0.3812500E+00, 0.3812500E+00, 0.3640900E+00, 0.3803600E+00, &
     & 0.3737100E+00, 0.3482900E+00, 0.3775600E+00, 0.3544400E+00, &
     & 0.3775200E+00, 0.4233400E+00, 0.3849300E+00, 0.3828700E+00, &
     & 0.2557700E+00, 0.4061900E+00, 0.4107900E+00, 0.3903845E+00, &
     & 0.3791235E+00, 0.3553154E+00, 0.2962787E+00, 0.2962787E+00 /
      data (ref_adm( 9,iz,12, 6),iz = 1,20) / &
     & 0.3681400E+00, 0.3681400E+00, 0.4178100E+00, 0.3690300E+00, &
     & 0.3858900E+00, 0.3820800E+00, 0.3747200E+00, 0.3750500E+00, &
     & 0.3357600E+00, 0.3661900E+00, 0.3928600E+00, 0.3791800E+00, &
     & 0.3660800E+00, 0.4428300E+00, 0.3948306E+00, 0.3896771E+00, &
     & 0.3784545E+00, 0.3547749E+00, 0.2958546E+00, 0.2958546E+00 /
      data (ref_adm( 9,iz,13, 6),iz = 1,20) / &
     & 0.4191400E+00, 0.4191400E+00, 0.4176200E+00, 0.5185100E+00, &
     & 0.4034700E+00, 0.3091100E+00, 0.3339800E+00, 0.4874200E+00, &
     & 0.4732800E+00, 0.4102000E+00, 0.3997500E+00, 0.3428800E+00, &
     & 0.3570100E+00, 0.3685000E+00, 0.3943629E+00, 0.4820800E+00, &
     & 0.3777846E+00, 0.3540132E+00, 0.2954200E+00, 0.2954200E+00 /
      data (ref_adm( 9,iz,14, 6),iz = 1,20) / &
     & 0.4049200E+00, 0.4049200E+00, 0.3685087E+00, 0.3593400E+00, &
     & 0.4069900E+00, 0.4762700E+00, 0.3844683E+00, 0.3573500E+00, &
     & 0.3554100E+00, 0.2715300E+00, 0.2779200E+00, 0.3927200E+00, &
     & 0.3718700E+00, 0.3551000E+00, 0.3935546E+00, 0.4309000E+00, &
     & 0.3193000E+00, 0.3534103E+00, 0.2950384E+00, 0.2950384E+00 /
      data (ref_adm( 9,iz,15, 6),iz = 1,20) / &
     & 0.2911300E+00, 0.2911300E+00, 0.5552200E+00, 0.3694045E+00, &
     & 0.2313300E+00, 0.3697100E+00, 0.3850624E+00, 0.3839048E+00, &
     & 0.3837500E+00, 0.4689300E+00, 0.2866300E+00, 0.2935100E+00, &
     & 0.5024100E+00, 0.3515900E+00, 0.3227000E+00, 0.3705700E+00, &
     & 0.3761938E+00, 0.3007600E+00, 0.2945828E+00, 0.2945828E+00 /
      data (ref_adm( 9,iz,16, 6),iz = 1,20) / &
     & 0.3310100E+00, 0.3310100E+00, 0.4231900E+00, 0.3742500E+00, &
     & 0.3312800E+00, 0.3260400E+00, 0.2826000E+00, 0.2958800E+00, &
     & 0.4107100E+00, 0.5677000E+00, 0.4413800E+00, 0.2987900E+00, &
     & 0.3710600E+00, 0.3022700E+00, 0.2999400E+00, 0.3866996E+00, &
     & 0.3901100E+00, 0.3520204E+00, 0.2941366E+00, 0.2941366E+00 /
      data (ref_adm( 9,iz,17, 6),iz = 1,20) / &
     & 0.3735542E+00, 0.3735542E+00, 0.3614900E+00, 0.3077700E+00, &
     & 0.3760217E+00, 0.3844699E+00, 0.3814600E+00, 0.5013200E+00, &
     & 0.5041400E+00, 0.3544700E+00, 0.3982500E+00, 0.2976900E+00, &
     & 0.3909962E+00, 0.3703300E+00, 0.3613700E+00, 0.3790500E+00, &
     & 0.3746549E+00, 0.3511185E+00, 0.2936985E+00, 0.2936985E+00 /
      data (ref_adm( 9,iz,18, 6),iz = 1,20) / &
     & 0.3235500E+00, 0.3235500E+00, 0.3403700E+00, 0.2956800E+00, &
     & 0.4011588E+00, 0.3958579E+00, 0.3813947E+00, 0.4423100E+00, &
     & 0.4624800E+00, 0.4321000E+00, 0.3946900E+00, 0.3606500E+00, &
     & 0.3719600E+00, 0.3312600E+00, 0.2935700E+00, 0.3560061E+00, &
     & 0.3394600E+00, 0.3144104E+00, 0.2749895E+00, 0.2749895E+00 /
      data (ref_adm( 9,iz,19, 6),iz = 1,20) / &
     & 0.3122900E+00, 0.3122900E+00, 0.3001400E+00, 0.5523500E+00, &
     & 0.3861400E+00, 0.4818100E+00, 0.5213000E+00, 0.4940000E+00, &
     & 0.4345900E+00, 0.4074300E+00, 0.3957700E+00, 0.3257200E+00, &
     & 0.2851800E+00, 0.2819100E+00, 0.3148500E+00, 0.3193100E+00, &
     & 0.3373677E+00, 0.3145000E+00, 0.2733455E+00, 0.2733455E+00 /
      data (ref_adm( 9,iz,20, 6),iz = 1,20) / &
     & 0.3705500E+00, 0.3705500E+00, 0.3346500E+00, 0.3225300E+00, &
     & 0.4988700E+00, 0.5193900E+00, 0.5006200E+00, 0.3001500E+00, &
     & 0.3466800E+00, 0.3305100E+00, 0.3679300E+00, 0.3006700E+00, &
     & 0.3637300E+00, 0.2989700E+00, 0.3391900E+00, 0.3257400E+00, &
     & 0.3352496E+00, 0.3301500E+00, 0.2725011E+00, 0.2725011E+00 /
      data (ref_adm( 9,iz,21, 6),iz = 1,20) / &
     & 0.4318700E+00, 0.4318700E+00, 0.4413400E+00, 0.4112500E+00, &
     & 0.4925500E+00, 0.6201100E+00, 0.4548500E+00, 0.3467200E+00, &
     & 0.3088600E+00, 0.3395500E+00, 0.3264600E+00, 0.4929500E+00, &
     & 0.4645400E+00, 0.3049200E+00, 0.3033200E+00, 0.3280100E+00, &
     & 0.3442900E+00, 0.2917100E+00, 0.2722796E+00, 0.2722796E+00 /
      data (ref_adm( 9,iz,22, 6),iz = 1,20) / &
     & 0.3543200E+00, 0.3543200E+00, 0.4255100E+00, 0.4632300E+00, &
     & 0.4569200E+00, 0.5410400E+00, 0.4560000E+00, 0.4704600E+00, &
     & 0.3902093E+00, 0.3704400E+00, 0.3847118E+00, 0.3877300E+00, &
     & 0.3588300E+00, 0.4427200E+00, 0.3553400E+00, 0.3697500E+00, &
     & 0.2852600E+00, 0.3350349E+00, 0.2818931E+00, 0.2818931E+00 /
      data (ref_adm( 9,iz,23, 6),iz = 1,20) / &
     & 0.3646800E+00, 0.3646800E+00, 0.4074100E+00, 0.2995300E+00, &
     & 0.4763800E+00, 0.4093300E+00, 0.2728000E+00, 0.5951000E+00, &
     & 0.4338700E+00, 0.3564700E+00, 0.3847118E+00, 0.3509700E+00, &
     & 0.3344000E+00, 0.3469500E+00, 0.3401800E+00, 0.3526300E+00, &
     & 0.3299200E+00, 0.3350349E+00, 0.2818931E+00, 0.2818931E+00 /
      data (ref_adm( 9,iz,24, 6),iz = 1,20) / &
     & 0.5253100E+00, 0.5253100E+00, 0.3838800E+00, 0.3306400E+00, &
     & 0.3973100E+00, 0.4337300E+00, 0.3998700E+00, 0.3659400E+00, &
     & 0.4691400E+00, 0.3004300E+00, 0.5968100E+00, 0.4260900E+00, &
     & 0.3429500E+00, 0.3350400E+00, 0.3580000E+00, 0.3457300E+00, &
     & 0.3347000E+00, 0.3350349E+00, 0.2818931E+00, 0.2818931E+00 /
      data (ref_adm( 9,iz,25, 6),iz = 1,20) / &
     & 0.4486300E+00, 0.4486300E+00, 0.3286100E+00, 0.4506100E+00, &
     & 0.3540000E+00, 0.2970900E+00, 0.4039300E+00, 0.4256200E+00, &
     & 0.3632000E+00, 0.5400000E+00, 0.4306200E+00, 0.3893400E+00, &
     & 0.4384900E+00, 0.3679400E+00, 0.3850400E+00, 0.3480600E+00, &
     & 0.3317200E+00, 0.3350349E+00, 0.2818931E+00, 0.2818931E+00 /
      data (ref_adm( 9,iz,26, 6),iz = 1,20) / &
     & 0.5517000E+00, 0.5517000E+00, 0.6415100E+00, 0.4521100E+00, &
     & 0.3906000E+00, 0.4665200E+00, 0.4297100E+00, 0.4890400E+00, &
     & 0.4229900E+00, 0.3867632E+00, 0.4744500E+00, 0.2981500E+00, &
     & 0.4380700E+00, 0.4818900E+00, 0.3975200E+00, 0.3804100E+00, &
     & 0.3545500E+00, 0.3350349E+00, 0.2818931E+00, 0.2818931E+00 /
      data (ref_adm( 9,iz,27, 6),iz = 1,20) / &
     & 0.4801200E+00, 0.4801200E+00, 0.4669500E+00, 0.3387500E+00, &
     & 0.3656700E+00, 0.4393600E+00, 0.3773200E+00, 0.3574200E+00, &
     & 0.4275600E+00, 0.4309700E+00, 0.4241400E+00, 0.4053600E+00, &
     & 0.4239200E+00, 0.4144000E+00, 0.4577100E+00, 0.3582300E+00, &
     & 0.3089200E+00, 0.3345100E+00, 0.2818931E+00, 0.2818931E+00 /
      data (ref_adm( 9,iz,28, 6),iz = 1,20) / &
     & 0.3833900E+00, 0.3833900E+00, 0.4574600E+00, 0.3702200E+00, &
     & 0.3268500E+00, 0.4218000E+00, 0.3102900E+00, 0.3727700E+00, &
     & 0.3639600E+00, 0.4151400E+00, 0.3321400E+00, 0.4396600E+00, &
     & 0.3017800E+00, 0.3544300E+00, 0.3724100E+00, 0.3948400E+00, &
     & 0.3643800E+00, 0.2911900E+00, 0.2818931E+00, 0.2818931E+00 /
      data (ref_adm( 9,iz,29, 6),iz = 1,20) / &
     & 0.4609600E+00, 0.4609600E+00, 0.4009400E+00, 0.3428600E+00, &
     & 0.4164500E+00, 0.4183300E+00, 0.3887900E+00, 0.3124300E+00, &
     & 0.3458300E+00, 0.2794100E+00, 0.3948700E+00, 0.3020600E+00, &
     & 0.3353700E+00, 0.3658100E+00, 0.3785200E+00, 0.3663000E+00, &
     & 0.3743900E+00, 0.3023000E+00, 0.2818931E+00, 0.2818931E+00 /
      data (ref_adm( 9,iz,30, 6),iz = 1,20) / &
     & 0.4614500E+00, 0.4614500E+00, 0.4021800E+00, 0.3842800E+00, &
     & 0.3778300E+00, 0.3932200E+00, 0.3543000E+00, 0.3525100E+00, &
     & 0.3269900E+00, 0.2536200E+00, 0.2999400E+00, 0.3253800E+00, &
     & 0.3746200E+00, 0.3784800E+00, 0.3662400E+00, 0.3149200E+00, &
     & 0.3736100E+00, 0.3350349E+00, 0.2818931E+00, 0.2818931E+00 /
      data (ref_adm( 9,iz,31, 6),iz = 1,20) / &
     & 0.4375200E+00, 0.4375200E+00, 0.3675200E+00, 0.3985200E+00, &
     & 0.3274900E+00, 0.3785200E+00, 0.3937300E+00, 0.3616600E+00, &
     & 0.3768300E+00, 0.3881800E+00, 0.3307400E+00, 0.4121700E+00, &
     & 0.3575300E+00, 0.3292700E+00, 0.4016700E+00, 0.3395300E+00, &
     & 0.3575394E+00, 0.3350349E+00, 0.2818931E+00, 0.2818931E+00 /
      data (ref_adm( 9,iz,32, 6),iz = 1,20) / &
     & 0.4515600E+00, 0.4515600E+00, 0.3757700E+00, 0.4222000E+00, &
     & 0.3922200E+00, 0.3735000E+00, 0.3498400E+00, 0.3646400E+00, &
     & 0.3522300E+00, 0.3581000E+00, 0.3552900E+00, 0.3864300E+00, &
     & 0.3426200E+00, 0.3974600E+00, 0.3846000E+00, 0.3690250E+00, &
     & 0.3575394E+00, 0.3350349E+00, 0.2818931E+00, 0.2818931E+00 /
      data (ref_adm( 9,iz,33, 6),iz = 1,20) / &
     & 0.3989200E+00, 0.3989200E+00, 0.2664300E+00, 0.3859700E+00, &
     & 0.3097400E+00, 0.3400100E+00, 0.3457600E+00, 0.3265000E+00, &
     & 0.3824000E+00, 0.3832400E+00, 0.3727400E+00, 0.4112100E+00, &
     & 0.3758800E+00, 0.3424900E+00, 0.4045700E+00, 0.3690251E+00, &
     & 0.3575394E+00, 0.3350349E+00, 0.2818931E+00, 0.2818931E+00 /
      data (ref_adm( 9,iz,34, 6),iz = 1,20) / &
     & 0.4331900E+00, 0.4331900E+00, 0.3562500E+00, 0.3692400E+00, &
     & 0.3587400E+00, 0.3878400E+00, 0.3704400E+00, 0.3994000E+00, &
     & 0.4314300E+00, 0.4257900E+00, 0.4054100E+00, 0.3846700E+00, &
     & 0.3966500E+00, 0.3565800E+00, 0.3325000E+00, 0.3690250E+00, &
     & 0.3575394E+00, 0.3350349E+00, 0.2818931E+00, 0.2818931E+00 /
      data (ref_adm( 9,iz,35, 6),iz = 1,20) / &
     & 0.4445800E+00, 0.4445800E+00, 0.4572800E+00, 0.4568900E+00, &
     & 0.4103600E+00, 0.3454100E+00, 0.3740800E+00, 0.5007400E+00, &
     & 0.3960100E+00, 0.3712500E+00, 0.3847118E+00, 0.3413600E+00, &
     & 0.4021900E+00, 0.3817800E+00, 0.4238400E+00, 0.3690251E+00, &
     & 0.3575394E+00, 0.3350349E+00, 0.2818931E+00, 0.2818931E+00 /
      data (ref_adm( 9,iz,36, 6),iz = 1,20) / &
     & 0.4457700E+00, 0.4457700E+00, 0.3425700E+00, 0.5876000E+00, &
     & 0.4024500E+00, 0.3656200E+00, 0.3976437E+00, 0.3364800E+00, &
     & 0.4380900E+00, 0.3867632E+00, 0.3847118E+00, 0.4131600E+00, &
     & 0.4271400E+00, 0.4079400E+00, 0.3224000E+00, 0.3690250E+00, &
     & 0.3575394E+00, 0.3350349E+00, 0.2818931E+00, 0.2818931E+00 /
      data (ref_adm( 9,iz,37, 6),iz = 1,20) / &
     & 0.4910800E+00, 0.4910800E+00, 0.3418700E+00, 0.3910143E+00, &
     & 0.3399200E+00, 0.3778900E+00, 0.4165800E+00, 0.4744800E+00, &
     & 0.3902093E+00, 0.4585300E+00, 0.3847118E+00, 0.3832795E+00, &
     & 0.4219200E+00, 0.4275800E+00, 0.3766037E+00, 0.3690251E+00, &
     & 0.3575394E+00, 0.3350350E+00, 0.2818930E+00, 0.2818930E+00 /
      data (ref_adm( 9,iz,38, 6),iz = 1,20) / &
     & 0.4910800E+00, 0.4910800E+00, 0.3418700E+00, 0.3910143E+00, &
     & 0.3399200E+00, 0.3778900E+00, 0.4165800E+00, 0.4744800E+00, &
     & 0.3902093E+00, 0.4585300E+00, 0.3847118E+00, 0.3832795E+00, &
     & 0.4219200E+00, 0.4275800E+00, 0.3766037E+00, 0.3690251E+00, &
     & 0.3575394E+00, 0.3350350E+00, 0.2818930E+00, 0.2818930E+00 /
! Solar Zenith Angle 30.0 Albedo  0.3949857E+00
      data (ref_adm( 9,iz, 1, 7),iz = 1,20) / &
     & 0.3844017E+00, 0.3844017E+00, 0.4777500E+00, 0.4253100E+00, &
     & 0.4002900E+00, 0.4334700E+00, 0.4473200E+00, 0.3781500E+00, &
     & 0.5166300E+00, 0.3895100E+00, 0.3742200E+00, 0.3463000E+00, &
     & 0.3676100E+00, 0.4173600E+00, 0.4166100E+00, 0.4119900E+00, &
     & 0.4583600E+00, 0.4192000E+00, 0.4312465E+00, 0.4312465E+00 /
      data (ref_adm( 9,iz, 2, 7),iz = 1,20) / &
     & 0.3844017E+00, 0.3844017E+00, 0.4777500E+00, 0.4253100E+00, &
     & 0.4002900E+00, 0.4334700E+00, 0.4473200E+00, 0.3781500E+00, &
     & 0.5166300E+00, 0.3895100E+00, 0.3742200E+00, 0.3463000E+00, &
     & 0.3676100E+00, 0.4173600E+00, 0.4166100E+00, 0.4119900E+00, &
     & 0.4583600E+00, 0.4192000E+00, 0.4312465E+00, 0.4312465E+00 /
      data (ref_adm( 9,iz, 3, 7),iz = 1,20) / &
     & 0.4415100E+00, 0.4415100E+00, 0.4279400E+00, 0.3815300E+00, &
     & 0.3546500E+00, 0.3395100E+00, 0.3932300E+00, 0.3711600E+00, &
     & 0.3609400E+00, 0.4034200E+00, 0.3441400E+00, 0.3530200E+00, &
     & 0.3877100E+00, 0.4164200E+00, 0.4323700E+00, 0.4327800E+00, &
     & 0.4223100E+00, 0.3787800E+00, 0.3749700E+00, 0.3749700E+00 /
      data (ref_adm( 9,iz, 4, 7),iz = 1,20) / &
     & 0.3481800E+00, 0.3481800E+00, 0.3432700E+00, 0.3892200E+00, &
     & 0.3675200E+00, 0.3946700E+00, 0.3511900E+00, 0.3500800E+00, &
     & 0.3648800E+00, 0.3427900E+00, 0.3728000E+00, 0.3910100E+00, &
     & 0.4142700E+00, 0.4162600E+00, 0.3964300E+00, 0.4321800E+00, &
     & 0.4396900E+00, 0.4263000E+00, 0.4282600E+00, 0.4282600E+00 /
      data (ref_adm( 9,iz, 5, 7),iz = 1,20) / &
     & 0.3872600E+00, 0.3872600E+00, 0.4290400E+00, 0.4851300E+00, &
     & 0.3683500E+00, 0.3642400E+00, 0.4369400E+00, 0.4357900E+00, &
     & 0.3489100E+00, 0.3335800E+00, 0.3594100E+00, 0.4136000E+00, &
     & 0.4383500E+00, 0.3613800E+00, 0.3534700E+00, 0.4033400E+00, &
     & 0.4653900E+00, 0.4170800E+00, 0.2860600E+00, 0.2860600E+00 /
      data (ref_adm( 9,iz, 6, 7),iz = 1,20) / &
     & 0.4413600E+00, 0.4413600E+00, 0.3961900E+00, 0.4215600E+00, &
     & 0.3830400E+00, 0.3892500E+00, 0.4131600E+00, 0.4111000E+00, &
     & 0.3505300E+00, 0.3604500E+00, 0.3795500E+00, 0.4095800E+00, &
     & 0.4138700E+00, 0.3345000E+00, 0.3715400E+00, 0.4218000E+00, &
     & 0.4196600E+00, 0.4456100E+00, 0.4571400E+00, 0.4571400E+00 /
      data (ref_adm( 9,iz, 7, 7),iz = 1,20) / &
     & 0.4208500E+00, 0.4208500E+00, 0.4244400E+00, 0.4167600E+00, &
     & 0.4538700E+00, 0.4371000E+00, 0.4097400E+00, 0.3967600E+00, &
     & 0.3356500E+00, 0.3439100E+00, 0.3598400E+00, 0.3540000E+00, &
     & 0.4045700E+00, 0.3125900E+00, 0.3445900E+00, 0.4523400E+00, &
     & 0.4147100E+00, 0.3588900E+00, 0.4043629E+00, 0.4043629E+00 /
      data (ref_adm( 9,iz, 8, 7),iz = 1,20) / &
     & 0.4327000E+00, 0.4327000E+00, 0.4232400E+00, 0.3629900E+00, &
     & 0.3935000E+00, 0.4163700E+00, 0.3204600E+00, 0.3225400E+00, &
     & 0.3252300E+00, 0.4070000E+00, 0.3555500E+00, 0.4016300E+00, &
     & 0.4239500E+00, 0.4032800E+00, 0.3384500E+00, 0.4089200E+00, &
     & 0.4205200E+00, 0.4425300E+00, 0.3973291E+00, 0.3973291E+00 /
      data (ref_adm( 9,iz, 9, 7),iz = 1,20) / &
     & 0.4396700E+00, 0.4396700E+00, 0.4459100E+00, 0.4242700E+00, &
     & 0.3973400E+00, 0.4219500E+00, 0.4444500E+00, 0.4141300E+00, &
     & 0.3962800E+00, 0.4178400E+00, 0.3707400E+00, 0.3907600E+00, &
     & 0.3805300E+00, 0.3910200E+00, 0.4052400E+00, 0.4237100E+00, &
     & 0.4129000E+00, 0.3773900E+00, 0.3093700E+00, 0.3093700E+00 /
      data (ref_adm( 9,iz,10, 7),iz = 1,20) / &
     & 0.3976100E+00, 0.3976100E+00, 0.4067300E+00, 0.4137600E+00, &
     & 0.4074900E+00, 0.3812800E+00, 0.3978700E+00, 0.4221800E+00, &
     & 0.4188200E+00, 0.3367600E+00, 0.3407000E+00, 0.3988700E+00, &
     & 0.3021500E+00, 0.3142500E+00, 0.3591500E+00, 0.3496800E+00, &
     & 0.3749000E+00, 0.3431500E+00, 0.3843359E+00, 0.3843359E+00 /
      data (ref_adm( 9,iz,11, 7),iz = 1,20) / &
     & 0.3894600E+00, 0.3894600E+00, 0.3815200E+00, 0.3894200E+00, &
     & 0.3818600E+00, 0.3931500E+00, 0.3798600E+00, 0.3758000E+00, &
     & 0.3931800E+00, 0.3809100E+00, 0.3693700E+00, 0.3939200E+00, &
     & 0.4060200E+00, 0.3193600E+00, 0.3922600E+00, 0.4484400E+00, &
     & 0.4146414E+00, 0.4141133E+00, 0.3784845E+00, 0.3784845E+00 /
      data (ref_adm( 9,iz,12, 7),iz = 1,20) / &
     & 0.3881900E+00, 0.3881900E+00, 0.4150400E+00, 0.4004100E+00, &
     & 0.3843800E+00, 0.4044000E+00, 0.4017900E+00, 0.3785300E+00, &
     & 0.3850000E+00, 0.3778600E+00, 0.3707900E+00, 0.3952900E+00, &
     & 0.3581200E+00, 0.3055600E+00, 0.3544800E+00, 0.4497400E+00, &
     & 0.4107198E+00, 0.4102117E+00, 0.3731287E+00, 0.3731287E+00 /
      data (ref_adm( 9,iz,13, 7),iz = 1,20) / &
     & 0.4278200E+00, 0.4278200E+00, 0.5170500E+00, 0.4258800E+00, &
     & 0.3903400E+00, 0.4009100E+00, 0.4070100E+00, 0.3801400E+00, &
     & 0.4049200E+00, 0.4127900E+00, 0.3800200E+00, 0.3972600E+00, &
     & 0.3711100E+00, 0.3352400E+00, 0.3537100E+00, 0.3893800E+00, &
     & 0.4736000E+00, 0.4055914E+00, 0.3678949E+00, 0.3678949E+00 /
      data (ref_adm( 9,iz,14, 7),iz = 1,20) / &
     & 0.3797400E+00, 0.3797400E+00, 0.4034700E+00, 0.3966500E+00, &
     & 0.5059100E+00, 0.3532800E+00, 0.3994000E+00, 0.3511300E+00, &
     & 0.3841000E+00, 0.3831300E+00, 0.3854500E+00, 0.3645600E+00, &
     & 0.3625700E+00, 0.3818800E+00, 0.3790700E+00, 0.3701900E+00, &
     & 0.3081000E+00, 0.4002448E+00, 0.3623118E+00, 0.3623118E+00 /
      data (ref_adm( 9,iz,15, 7),iz = 1,20) / &
     & 0.3925000E+00, 0.3925000E+00, 0.3585200E+00, 0.4072800E+00, &
     & 0.3846200E+00, 0.3474000E+00, 0.3526100E+00, 0.3973700E+00, &
     & 0.3670800E+00, 0.4240000E+00, 0.3576400E+00, 0.3655200E+00, &
     & 0.3808900E+00, 0.3502300E+00, 0.3829100E+00, 0.3040300E+00, &
     & 0.2292400E+00, 0.3950964E+00, 0.3560787E+00, 0.3560787E+00 /
      data (ref_adm( 9,iz,16, 7),iz = 1,20) / &
     & 0.3640600E+00, 0.3640600E+00, 0.3085500E+00, 0.3830943E+00, &
     & 0.3847000E+00, 0.3289900E+00, 0.3410500E+00, 0.3896100E+00, &
     & 0.3285000E+00, 0.3969200E+00, 0.3863900E+00, 0.3185000E+00, &
     & 0.4780500E+00, 0.3392300E+00, 0.3839700E+00, 0.3764800E+00, &
     & 0.3959108E+00, 0.3903237E+00, 0.3502600E+00, 0.3502600E+00 /
      data (ref_adm( 9,iz,17, 7),iz = 1,20) / &
     & 0.3588200E+00, 0.3588200E+00, 0.4160900E+00, 0.6230600E+00, &
     & 0.5871600E+00, 0.2685300E+00, 0.3957400E+00, 0.3984000E+00, &
     & 0.3407600E+00, 0.3866600E+00, 0.4214300E+00, 0.3740600E+00, &
     & 0.4206500E+00, 0.3422100E+00, 0.3299000E+00, 0.3507600E+00, &
     & 0.4140700E+00, 0.3856571E+00, 0.3451619E+00, 0.3451619E+00 /
      data (ref_adm( 9,iz,18, 7),iz = 1,20) / &
     & 0.3992600E+00, 0.3992600E+00, 0.4121400E+00, 0.4249300E+00, &
     & 0.3193100E+00, 0.3735400E+00, 0.4015900E+00, 0.3035800E+00, &
     & 0.3174500E+00, 0.3537400E+00, 0.4389400E+00, 0.3415900E+00, &
     & 0.3606200E+00, 0.3645000E+00, 0.3138500E+00, 0.3527977E+00, &
     & 0.3365177E+00, 0.3101968E+00, 0.2705960E+00, 0.2705960E+00 /
      data (ref_adm( 9,iz,19, 7),iz = 1,20) / &
     & 0.3862600E+00, 0.3862600E+00, 0.4395900E+00, 0.4354800E+00, &
     & 0.4004300E+00, 0.4455500E+00, 0.4074200E+00, 0.3571400E+00, &
     & 0.3632000E+00, 0.3994200E+00, 0.3964100E+00, 0.3890300E+00, &
     & 0.3424400E+00, 0.3955800E+00, 0.3292200E+00, 0.3017300E+00, &
     & 0.3339036E+00, 0.3077609E+00, 0.2691759E+00, 0.2691759E+00 /
      data (ref_adm( 9,iz,20, 7),iz = 1,20) / &
     & 0.3570000E+00, 0.3570000E+00, 0.4406900E+00, 0.4700500E+00, &
     & 0.5394500E+00, 0.4341700E+00, 0.4471700E+00, 0.3652200E+00, &
     & 0.3946800E+00, 0.3992200E+00, 0.4045100E+00, 0.3657600E+00, &
     & 0.3421400E+00, 0.3186000E+00, 0.3571500E+00, 0.4180400E+00, &
     & 0.3542400E+00, 0.3059509E+00, 0.2684225E+00, 0.2684225E+00 /
      data (ref_adm( 9,iz,21, 7),iz = 1,20) / &
     & 0.3977100E+00, 0.3977100E+00, 0.3846500E+00, 0.3754400E+00, &
     & 0.3311600E+00, 0.4642600E+00, 0.4185900E+00, 0.4547300E+00, &
     & 0.3596600E+00, 0.4163200E+00, 0.3928100E+00, 0.3614000E+00, &
     & 0.3312900E+00, 0.3259700E+00, 0.3858000E+00, 0.3675300E+00, &
     & 0.3308987E+00, 0.3080600E+00, 0.2681851E+00, 0.2681851E+00 /
      data (ref_adm( 9,iz,22, 7),iz = 1,20) / &
     & 0.3921600E+00, 0.3921600E+00, 0.4550500E+00, 0.4034700E+00, &
     & 0.3815500E+00, 0.3688300E+00, 0.3674000E+00, 0.4333700E+00, &
     & 0.4055800E+00, 0.4602000E+00, 0.3587600E+00, 0.3487100E+00, &
     & 0.3146700E+00, 0.3476900E+00, 0.3696400E+00, 0.3799800E+00, &
     & 0.3206800E+00, 0.3703005E+00, 0.3074054E+00, 0.3074054E+00 /
      data (ref_adm( 9,iz,23, 7),iz = 1,20) / &
     & 0.3840100E+00, 0.3840100E+00, 0.4351200E+00, 0.4334700E+00, &
     & 0.4067100E+00, 0.4044700E+00, 0.4102500E+00, 0.4093800E+00, &
     & 0.3712000E+00, 0.4390100E+00, 0.4663700E+00, 0.3873300E+00, &
     & 0.3663900E+00, 0.3476100E+00, 0.3530700E+00, 0.3592900E+00, &
     & 0.3767800E+00, 0.3687656E+00, 0.3066965E+00, 0.3066965E+00 /
      data (ref_adm( 9,iz,24, 7),iz = 1,20) / &
     & 0.3704200E+00, 0.3704200E+00, 0.4220200E+00, 0.3985900E+00, &
     & 0.4263800E+00, 0.3683200E+00, 0.3456300E+00, 0.4018600E+00, &
     & 0.4345000E+00, 0.3981700E+00, 0.3423600E+00, 0.4203000E+00, &
     & 0.3727100E+00, 0.3313900E+00, 0.4012300E+00, 0.3700100E+00, &
     & 0.3860400E+00, 0.3671606E+00, 0.3058754E+00, 0.3058754E+00 /
      data (ref_adm( 9,iz,25, 7),iz = 1,20) / &
     & 0.4176100E+00, 0.4176100E+00, 0.3908300E+00, 0.3317200E+00, &
     & 0.3735600E+00, 0.4295200E+00, 0.3854600E+00, 0.4519500E+00, &
     & 0.4117000E+00, 0.4076800E+00, 0.4090000E+00, 0.4158200E+00, &
     & 0.3974200E+00, 0.3457100E+00, 0.3784600E+00, 0.3737300E+00, &
     & 0.3791200E+00, 0.2883500E+00, 0.3052097E+00, 0.3052097E+00 /
      data (ref_adm( 9,iz,26, 7),iz = 1,20) / &
     & 0.4281500E+00, 0.4281500E+00, 0.5170400E+00, 0.4426300E+00, &
     & 0.3847000E+00, 0.4812700E+00, 0.4756200E+00, 0.4242200E+00, &
     & 0.4262500E+00, 0.3878900E+00, 0.3907200E+00, 0.4519600E+00, &
     & 0.3935900E+00, 0.4116400E+00, 0.4140600E+00, 0.3491100E+00, &
     & 0.3497800E+00, 0.3296700E+00, 0.3045461E+00, 0.3045461E+00 /
      data (ref_adm( 9,iz,27, 7),iz = 1,20) / &
     & 0.4234800E+00, 0.4234800E+00, 0.4031100E+00, 0.4424900E+00, &
     & 0.4034200E+00, 0.4740200E+00, 0.4782000E+00, 0.4634000E+00, &
     & 0.4304700E+00, 0.3769200E+00, 0.4226400E+00, 0.4314300E+00, &
     & 0.4427000E+00, 0.4241700E+00, 0.4123200E+00, 0.3824200E+00, &
     & 0.3546200E+00, 0.2984100E+00, 0.3039814E+00, 0.3039814E+00 /
      data (ref_adm( 9,iz,28, 7),iz = 1,20) / &
     & 0.4199200E+00, 0.4199200E+00, 0.4396400E+00, 0.4037000E+00, &
     & 0.4361600E+00, 0.4184600E+00, 0.4331100E+00, 0.4596300E+00, &
     & 0.4342900E+00, 0.3851900E+00, 0.3658200E+00, 0.4591000E+00, &
     & 0.4179800E+00, 0.3881100E+00, 0.4011200E+00, 0.3662100E+00, &
     & 0.3716900E+00, 0.3650300E+00, 0.2434400E+00, 0.2434400E+00 /
      data (ref_adm( 9,iz,29, 7),iz = 1,20) / &
     & 0.3996400E+00, 0.3996400E+00, 0.4112500E+00, 0.4003800E+00, &
     & 0.3792800E+00, 0.3730100E+00, 0.4476600E+00, 0.4627100E+00, &
     & 0.4279100E+00, 0.4303300E+00, 0.4406800E+00, 0.4436600E+00, &
     & 0.4221900E+00, 0.4200900E+00, 0.3776900E+00, 0.3582000E+00, &
     & 0.3465100E+00, 0.3375600E+00, 0.2972800E+00, 0.2972800E+00 /
      data (ref_adm( 9,iz,30, 7),iz = 1,20) / &
     & 0.3992100E+00, 0.3992100E+00, 0.3871100E+00, 0.4424700E+00, &
     & 0.4559000E+00, 0.4260100E+00, 0.4022300E+00, 0.4074300E+00, &
     & 0.3992500E+00, 0.4312100E+00, 0.4064400E+00, 0.4396200E+00, &
     & 0.4431800E+00, 0.4181100E+00, 0.4319500E+00, 0.3966000E+00, &
     & 0.4061900E+00, 0.3758600E+00, 0.3025766E+00, 0.3025766E+00 /
      data (ref_adm( 9,iz,31, 7),iz = 1,20) / &
     & 0.3818400E+00, 0.3818400E+00, 0.3400100E+00, 0.4282900E+00, &
     & 0.4278300E+00, 0.4742100E+00, 0.4912600E+00, 0.4845700E+00, &
     & 0.4201800E+00, 0.4142200E+00, 0.3902100E+00, 0.3919200E+00, &
     & 0.3760600E+00, 0.3684300E+00, 0.3219700E+00, 0.3745300E+00, &
     & 0.3479000E+00, 0.3588979E+00, 0.3022770E+00, 0.3022770E+00 /
      data (ref_adm( 9,iz,32, 7),iz = 1,20) / &
     & 0.4558600E+00, 0.4558600E+00, 0.4082700E+00, 0.4451800E+00, &
     & 0.4940400E+00, 0.4707400E+00, 0.4293300E+00, 0.4972700E+00, &
     & 0.4514500E+00, 0.3800400E+00, 0.3537400E+00, 0.3886800E+00, &
     & 0.3532200E+00, 0.3710900E+00, 0.3581300E+00, 0.3983200E+00, &
     & 0.4472500E+00, 0.3582245E+00, 0.3019193E+00, 0.3019193E+00 /
      data (ref_adm( 9,iz,33, 7),iz = 1,20) / &
     & 0.4188200E+00, 0.4188200E+00, 0.4337800E+00, 0.4529400E+00, &
     & 0.4509200E+00, 0.4807800E+00, 0.4208400E+00, 0.3747000E+00, &
     & 0.4068300E+00, 0.3523000E+00, 0.4649300E+00, 0.4292700E+00, &
     & 0.3882200E+00, 0.3584300E+00, 0.3345000E+00, 0.3873600E+00, &
     & 0.3846467E+00, 0.3574594E+00, 0.3017728E+00, 0.3017728E+00 /
      data (ref_adm( 9,iz,34, 7),iz = 1,20) / &
     & 0.4154200E+00, 0.4154200E+00, 0.4318900E+00, 0.3797500E+00, &
     & 0.4395900E+00, 0.4041000E+00, 0.4079400E+00, 0.4453400E+00, &
     & 0.4477000E+00, 0.5649400E+00, 0.4864600E+00, 0.4162100E+00, &
     & 0.4061700E+00, 0.3898700E+00, 0.4491900E+00, 0.3978922E+00, &
     & 0.3839734E+00, 0.3568726E+00, 0.3015144E+00, 0.3015144E+00 /
      data (ref_adm( 9,iz,35, 7),iz = 1,20) / &
     & 0.4079900E+00, 0.4079900E+00, 0.4787100E+00, 0.4348200E+00, &
     & 0.3877400E+00, 0.3866300E+00, 0.4823000E+00, 0.4561700E+00, &
     & 0.4968900E+00, 0.4387000E+00, 0.3836300E+00, 0.4362700E+00, &
     & 0.3700100E+00, 0.3303400E+00, 0.3700900E+00, 0.3975709E+00, &
     & 0.3833721E+00, 0.3564587E+00, 0.3013834E+00, 0.3013834E+00 /
      data (ref_adm( 9,iz,36, 7),iz = 1,20) / &
     & 0.3603900E+00, 0.3603900E+00, 0.4743200E+00, 0.3937400E+00, &
     & 0.3730000E+00, 0.3548300E+00, 0.4635300E+00, 0.4505700E+00, &
     & 0.4282800E+00, 0.4238400E+00, 0.4448800E+00, 0.3292300E+00, &
     & 0.4854700E+00, 0.3968900E+00, 0.3269200E+00, 0.3973293E+00, &
     & 0.3831891E+00, 0.3562720E+00, 0.3013432E+00, 0.3013432E+00 /
      data (ref_adm( 9,iz,37, 7),iz = 1,20) / &
     & 0.3794900E+00, 0.3794900E+00, 0.4413600E+00, 0.3675500E+00, &
     & 0.3396300E+00, 0.3633300E+00, 0.3904300E+00, 0.4121300E+00, &
     & 0.4600900E+00, 0.4467500E+00, 0.4744400E+00, 0.5263000E+00, &
     & 0.4627900E+00, 0.4127789E+00, 0.4072433E+00, 0.3972930E+00, &
     & 0.3833162E+00, 0.3563104E+00, 0.3012640E+00, 0.3012640E+00 /
      data (ref_adm( 9,iz,38, 7),iz = 1,20) / &
     & 0.3794900E+00, 0.3794900E+00, 0.4413600E+00, 0.3675500E+00, &
     & 0.3396300E+00, 0.3633300E+00, 0.3904300E+00, 0.4121300E+00, &
     & 0.4600900E+00, 0.4467500E+00, 0.4744400E+00, 0.5263000E+00, &
     & 0.4627900E+00, 0.4127789E+00, 0.4072433E+00, 0.3972930E+00, &
     & 0.3833162E+00, 0.3563104E+00, 0.3012640E+00, 0.3012640E+00 /
! Solar Zenith Angle 35.0 Albedo  0.4220925E+00
      data (ref_adm( 9,iz, 1, 8),iz = 1,20) / &
     & 0.3942200E+00, 0.3942200E+00, 0.3907400E+00, 0.4149400E+00, &
     & 0.4172100E+00, 0.4030100E+00, 0.3777400E+00, 0.3738500E+00, &
     & 0.4640500E+00, 0.5603700E+00, 0.4732500E+00, 0.4118400E+00, &
     & 0.4587300E+00, 0.3849000E+00, 0.4493100E+00, 0.4581400E+00, &
     & 0.4731400E+00, 0.4595700E+00, 0.3920478E+00, 0.3920478E+00 /
      data (ref_adm( 9,iz, 2, 8),iz = 1,20) / &
     & 0.3942200E+00, 0.3942200E+00, 0.3907400E+00, 0.4149400E+00, &
     & 0.4172100E+00, 0.4030100E+00, 0.3777400E+00, 0.3738500E+00, &
     & 0.4640500E+00, 0.5603700E+00, 0.4732500E+00, 0.4118400E+00, &
     & 0.4587300E+00, 0.3849000E+00, 0.4493100E+00, 0.4581400E+00, &
     & 0.4731400E+00, 0.4595700E+00, 0.3920478E+00, 0.3920478E+00 /
      data (ref_adm( 9,iz, 3, 8),iz = 1,20) / &
     & 0.3995700E+00, 0.3995700E+00, 0.3914800E+00, 0.4293400E+00, &
     & 0.4260800E+00, 0.3961900E+00, 0.3802200E+00, 0.4015400E+00, &
     & 0.5081400E+00, 0.4781900E+00, 0.5164900E+00, 0.4176100E+00, &
     & 0.4106500E+00, 0.4403900E+00, 0.4706600E+00, 0.4578200E+00, &
     & 0.4983000E+00, 0.4338800E+00, 0.3514500E+00, 0.3514500E+00 /
      data (ref_adm( 9,iz, 4, 8),iz = 1,20) / &
     & 0.4436100E+00, 0.4436100E+00, 0.3686900E+00, 0.4013300E+00, &
     & 0.4111400E+00, 0.4239200E+00, 0.3947200E+00, 0.3949600E+00, &
     & 0.4608300E+00, 0.4569000E+00, 0.4485600E+00, 0.4030800E+00, &
     & 0.4307500E+00, 0.4291000E+00, 0.4327800E+00, 0.4991500E+00, &
     & 0.4956800E+00, 0.4641700E+00, 0.4256200E+00, 0.4256200E+00 /
      data (ref_adm( 9,iz, 5, 8),iz = 1,20) / &
     & 0.4602500E+00, 0.4602500E+00, 0.4490700E+00, 0.4281700E+00, &
     & 0.4127600E+00, 0.4126300E+00, 0.4442500E+00, 0.4396100E+00, &
     & 0.4188500E+00, 0.4412500E+00, 0.3937400E+00, 0.4032900E+00, &
     & 0.4301900E+00, 0.3962500E+00, 0.4331500E+00, 0.4515100E+00, &
     & 0.4955700E+00, 0.4727600E+00, 0.4559100E+00, 0.4559100E+00 /
      data (ref_adm( 9,iz, 6, 8),iz = 1,20) / &
     & 0.4205000E+00, 0.4205000E+00, 0.4353600E+00, 0.3922800E+00, &
     & 0.3828800E+00, 0.3934300E+00, 0.4379800E+00, 0.3939400E+00, &
     & 0.3785600E+00, 0.3886600E+00, 0.3776600E+00, 0.4097500E+00, &
     & 0.4326700E+00, 0.4486000E+00, 0.4334100E+00, 0.4683900E+00, &
     & 0.4617500E+00, 0.4725500E+00, 0.4778200E+00, 0.4778200E+00 /
      data (ref_adm( 9,iz, 7, 8),iz = 1,20) / &
     & 0.4127700E+00, 0.4127700E+00, 0.4632600E+00, 0.3922900E+00, &
     & 0.3771500E+00, 0.4018300E+00, 0.4727600E+00, 0.3900200E+00, &
     & 0.3911900E+00, 0.3800300E+00, 0.3933600E+00, 0.4098700E+00, &
     & 0.4047600E+00, 0.4168500E+00, 0.4782400E+00, 0.5190100E+00, &
     & 0.4850100E+00, 0.4510600E+00, 0.3777655E+00, 0.3777655E+00 /
      data (ref_adm( 9,iz, 8, 8),iz = 1,20) / &
     & 0.3821700E+00, 0.3821700E+00, 0.3517300E+00, 0.3614000E+00, &
     & 0.3923300E+00, 0.3660200E+00, 0.3400800E+00, 0.3651300E+00, &
     & 0.4046000E+00, 0.3968800E+00, 0.3878300E+00, 0.4247400E+00, &
     & 0.4516000E+00, 0.4387000E+00, 0.4145900E+00, 0.4757800E+00, &
     & 0.4669400E+00, 0.4187000E+00, 0.3298000E+00, 0.3298000E+00 /
      data (ref_adm( 9,iz, 9, 8),iz = 1,20) / &
     & 0.3736300E+00, 0.3736300E+00, 0.3778200E+00, 0.4177500E+00, &
     & 0.3990300E+00, 0.4016500E+00, 0.4106100E+00, 0.4016200E+00, &
     & 0.4084900E+00, 0.4648400E+00, 0.4102300E+00, 0.4578100E+00, &
     & 0.4876000E+00, 0.4663400E+00, 0.5100700E+00, 0.5307300E+00, &
     & 0.4728700E+00, 0.3884100E+00, 0.3239500E+00, 0.3239500E+00 /
      data (ref_adm( 9,iz,10, 8),iz = 1,20) / &
     & 0.3729000E+00, 0.3729000E+00, 0.4036800E+00, 0.4417600E+00, &
     & 0.3930600E+00, 0.3957200E+00, 0.3901200E+00, 0.3863800E+00, &
     & 0.3821400E+00, 0.3887400E+00, 0.4031500E+00, 0.4351700E+00, &
     & 0.4619000E+00, 0.4411400E+00, 0.4662500E+00, 0.5164600E+00, &
     & 0.4872700E+00, 0.4145100E+00, 0.3413800E+00, 0.3413800E+00 /
      data (ref_adm( 9,iz,11, 8),iz = 1,20) / &
     & 0.4124400E+00, 0.4124400E+00, 0.4031600E+00, 0.4345700E+00, &
     & 0.4079500E+00, 0.4009700E+00, 0.3974600E+00, 0.3762600E+00, &
     & 0.3523400E+00, 0.3872100E+00, 0.3797400E+00, 0.3838600E+00, &
     & 0.3942800E+00, 0.3800700E+00, 0.4519800E+00, 0.4394400E+00, &
     & 0.4160000E+00, 0.4019000E+00, 0.3603598E+00, 0.3603598E+00 /
      data (ref_adm( 9,iz,12, 8),iz = 1,20) / &
     & 0.4298300E+00, 0.4298300E+00, 0.4142900E+00, 0.4052200E+00, &
     & 0.4089600E+00, 0.4027600E+00, 0.3955100E+00, 0.3741600E+00, &
     & 0.3921600E+00, 0.4031600E+00, 0.3876300E+00, 0.3863400E+00, &
     & 0.4179600E+00, 0.3810200E+00, 0.4340200E+00, 0.4366100E+00, &
     & 0.4131900E+00, 0.3803600E+00, 0.3120700E+00, 0.3120700E+00 /
      data (ref_adm( 9,iz,13, 8),iz = 1,20) / &
     & 0.4197100E+00, 0.4197100E+00, 0.4347900E+00, 0.4011000E+00, &
     & 0.4286000E+00, 0.4267400E+00, 0.4288900E+00, 0.4172700E+00, &
     & 0.4155500E+00, 0.4315300E+00, 0.4184400E+00, 0.4265600E+00, &
     & 0.4246500E+00, 0.4054400E+00, 0.4365900E+00, 0.4726300E+00, &
     & 0.4158100E+00, 0.3249200E+00, 0.3515405E+00, 0.3515405E+00 /
      data (ref_adm( 9,iz,14, 8),iz = 1,20) / &
     & 0.4112800E+00, 0.4112800E+00, 0.4156000E+00, 0.3518400E+00, &
     & 0.4092700E+00, 0.4090100E+00, 0.3920500E+00, 0.4133500E+00, &
     & 0.3832700E+00, 0.3583500E+00, 0.3731200E+00, 0.3896400E+00, &
     & 0.3893900E+00, 0.4181700E+00, 0.4131000E+00, 0.3769400E+00, &
     & 0.3520200E+00, 0.3705500E+00, 0.3169700E+00, 0.3169700E+00 /
      data (ref_adm( 9,iz,15, 8),iz = 1,20) / &
     & 0.4198700E+00, 0.4198700E+00, 0.3934300E+00, 0.3860500E+00, &
     & 0.3677800E+00, 0.4037500E+00, 0.4368000E+00, 0.3749700E+00, &
     & 0.3694700E+00, 0.3469300E+00, 0.3767600E+00, 0.3654500E+00, &
     & 0.3723100E+00, 0.3763800E+00, 0.3878500E+00, 0.3806300E+00, &
     & 0.5003400E+00, 0.4188600E+00, 0.3409482E+00, 0.3409482E+00 /
      data (ref_adm( 9,iz,16, 8),iz = 1,20) / &
     & 0.4267100E+00, 0.4267100E+00, 0.4076200E+00, 0.4073100E+00, &
     & 0.4008900E+00, 0.3540100E+00, 0.3628000E+00, 0.3835100E+00, &
     & 0.4080600E+00, 0.3499200E+00, 0.3601000E+00, 0.4092700E+00, &
     & 0.3736700E+00, 0.3755000E+00, 0.4223600E+00, 0.3773800E+00, &
     & 0.4079900E+00, 0.3262000E+00, 0.3362657E+00, 0.3362657E+00 /
      data (ref_adm( 9,iz,17, 8),iz = 1,20) / &
     & 0.4409700E+00, 0.4409700E+00, 0.4017100E+00, 0.3940600E+00, &
     & 0.3904800E+00, 0.3834900E+00, 0.3866600E+00, 0.3954100E+00, &
     & 0.3755000E+00, 0.3790900E+00, 0.4118300E+00, 0.4065400E+00, &
     & 0.4063000E+00, 0.3973000E+00, 0.3318700E+00, 0.3745500E+00, &
     & 0.3968700E+00, 0.4199500E+00, 0.3318803E+00, 0.3318803E+00 /
      data (ref_adm( 9,iz,18, 8),iz = 1,20) / &
     & 0.4644900E+00, 0.4644900E+00, 0.3909700E+00, 0.3790900E+00, &
     & 0.4265400E+00, 0.4375900E+00, 0.4299200E+00, 0.3726300E+00, &
     & 0.3856000E+00, 0.3947000E+00, 0.3877300E+00, 0.4165800E+00, &
     & 0.4189600E+00, 0.4096800E+00, 0.3625500E+00, 0.4322600E+00, &
     & 0.3775500E+00, 0.3333000E+00, 0.3014253E+00, 0.3014253E+00 /
      data (ref_adm( 9,iz,19, 8),iz = 1,20) / &
     & 0.4618200E+00, 0.4618200E+00, 0.3981100E+00, 0.3899000E+00, &
     & 0.4317900E+00, 0.4835000E+00, 0.4084200E+00, 0.3822500E+00, &
     & 0.4404700E+00, 0.3811800E+00, 0.4101100E+00, 0.4058400E+00, &
     & 0.3730400E+00, 0.3773400E+00, 0.3868700E+00, 0.4221800E+00, &
     & 0.3718481E+00, 0.3450770E+00, 0.2993004E+00, 0.2993004E+00 /
      data (ref_adm( 9,iz,20, 8),iz = 1,20) / &
     & 0.4269800E+00, 0.4269800E+00, 0.4309600E+00, 0.4273200E+00, &
     & 0.4043200E+00, 0.4831200E+00, 0.4380700E+00, 0.3759200E+00, &
     & 0.4218300E+00, 0.3651000E+00, 0.3919100E+00, 0.4074600E+00, &
     & 0.3946300E+00, 0.3693300E+00, 0.3772600E+00, 0.3583100E+00, &
     & 0.3699403E+00, 0.3430489E+00, 0.2982656E+00, 0.2982656E+00 /
      data (ref_adm( 9,iz,21, 8),iz = 1,20) / &
     & 0.4138000E+00, 0.4138000E+00, 0.4286900E+00, 0.4704400E+00, &
     & 0.4600300E+00, 0.4416900E+00, 0.4529600E+00, 0.4409700E+00, &
     & 0.4001500E+00, 0.4191600E+00, 0.3934600E+00, 0.3860900E+00, &
     & 0.4070600E+00, 0.3492500E+00, 0.3806000E+00, 0.3285600E+00, &
     & 0.3689477E+00, 0.3419028E+00, 0.2980547E+00, 0.2980547E+00 /
      data (ref_adm( 9,iz,22, 8),iz = 1,20) / &
     & 0.4125200E+00, 0.4125200E+00, 0.4296300E+00, 0.4520900E+00, &
     & 0.4046600E+00, 0.4316000E+00, 0.4260100E+00, 0.4425100E+00, &
     & 0.4077200E+00, 0.4055900E+00, 0.4053400E+00, 0.3987400E+00, &
     & 0.4362200E+00, 0.3827200E+00, 0.3897000E+00, 0.3866300E+00, &
     & 0.3750599E+00, 0.3504274E+00, 0.3141735E+00, 0.3141735E+00 /
      data (ref_adm( 9,iz,23, 8),iz = 1,20) / &
     & 0.4196200E+00, 0.4196200E+00, 0.4537300E+00, 0.4142300E+00, &
     & 0.4295500E+00, 0.4217500E+00, 0.4594900E+00, 0.4346200E+00, &
     & 0.4635400E+00, 0.4298800E+00, 0.4017400E+00, 0.3799400E+00, &
     & 0.3762200E+00, 0.3708300E+00, 0.3980800E+00, 0.3739500E+00, &
     & 0.4023700E+00, 0.3497198E+00, 0.3155361E+00, 0.3155361E+00 /
      data (ref_adm( 9,iz,24, 8),iz = 1,20) / &
     & 0.4043000E+00, 0.4043000E+00, 0.4234000E+00, 0.4433300E+00, &
     & 0.4026200E+00, 0.3922500E+00, 0.4240200E+00, 0.4340400E+00, &
     & 0.4870800E+00, 0.4634700E+00, 0.4314000E+00, 0.3641800E+00, &
     & 0.4486700E+00, 0.4417500E+00, 0.4051500E+00, 0.4320400E+00, &
     & 0.4050900E+00, 0.3502591E+00, 0.3177746E+00, 0.3177746E+00 /
      data (ref_adm( 9,iz,25, 8),iz = 1,20) / &
     & 0.4392700E+00, 0.4392700E+00, 0.4592900E+00, 0.5250900E+00, &
     & 0.4917600E+00, 0.4330200E+00, 0.4394900E+00, 0.4401800E+00, &
     & 0.4638600E+00, 0.4674900E+00, 0.4166700E+00, 0.4151200E+00, &
     & 0.4177100E+00, 0.4022400E+00, 0.4218200E+00, 0.4266700E+00, &
     & 0.3899600E+00, 0.4025800E+00, 0.3208424E+00, 0.3208424E+00 /
      data (ref_adm( 9,iz,26, 8),iz = 1,20) / &
     & 0.4485300E+00, 0.4485300E+00, 0.4045700E+00, 0.4089400E+00, &
     & 0.4212500E+00, 0.4703100E+00, 0.4667800E+00, 0.4140500E+00, &
     & 0.4249600E+00, 0.4422600E+00, 0.4889000E+00, 0.4642900E+00, &
     & 0.4257200E+00, 0.4573900E+00, 0.3937900E+00, 0.3973700E+00, &
     & 0.3779900E+00, 0.3947800E+00, 0.3247179E+00, 0.3247179E+00 /
      data (ref_adm( 9,iz,27, 8),iz = 1,20) / &
     & 0.4118200E+00, 0.4118200E+00, 0.4059700E+00, 0.4114200E+00, &
     & 0.4365500E+00, 0.4167200E+00, 0.4411300E+00, 0.4533500E+00, &
     & 0.4280800E+00, 0.4240300E+00, 0.4538300E+00, 0.4675700E+00, &
     & 0.4685700E+00, 0.4709700E+00, 0.4236300E+00, 0.4051600E+00, &
     & 0.3793800E+00, 0.3755400E+00, 0.3221100E+00, 0.3221100E+00 /
      data (ref_adm( 9,iz,28, 8),iz = 1,20) / &
     & 0.4243300E+00, 0.4243300E+00, 0.4178300E+00, 0.4276900E+00, &
     & 0.4166200E+00, 0.4463200E+00, 0.4259400E+00, 0.4276600E+00, &
     & 0.4359100E+00, 0.4377500E+00, 0.4369500E+00, 0.4511400E+00, &
     & 0.4683400E+00, 0.4607700E+00, 0.4460200E+00, 0.4316500E+00, &
     & 0.3935500E+00, 0.4001500E+00, 0.3295600E+00, 0.3295600E+00 /
      data (ref_adm( 9,iz,29, 8),iz = 1,20) / &
     & 0.4101800E+00, 0.4101800E+00, 0.4333600E+00, 0.4193600E+00, &
     & 0.4337700E+00, 0.4117600E+00, 0.4164500E+00, 0.4293000E+00, &
     & 0.4479300E+00, 0.4656400E+00, 0.4529500E+00, 0.4361500E+00, &
     & 0.4201200E+00, 0.4586200E+00, 0.4482600E+00, 0.3999500E+00, &
     & 0.4029800E+00, 0.3554500E+00, 0.2963500E+00, 0.2963500E+00 /
      data (ref_adm( 9,iz,30, 8),iz = 1,20) / &
     & 0.4136900E+00, 0.4136900E+00, 0.4342100E+00, 0.4568500E+00, &
     & 0.4314300E+00, 0.4268500E+00, 0.4252500E+00, 0.4400800E+00, &
     & 0.4413300E+00, 0.4463800E+00, 0.4413900E+00, 0.4346000E+00, &
     & 0.4304200E+00, 0.4442200E+00, 0.4593800E+00, 0.4231600E+00, &
     & 0.4476200E+00, 0.3816100E+00, 0.3016700E+00, 0.3016700E+00 /
      data (ref_adm( 9,iz,31, 8),iz = 1,20) / &
     & 0.3894500E+00, 0.3894500E+00, 0.3962200E+00, 0.3838700E+00, &
     & 0.4021300E+00, 0.3897600E+00, 0.3933700E+00, 0.4105300E+00, &
     & 0.4322200E+00, 0.4278300E+00, 0.4309900E+00, 0.4406300E+00, &
     & 0.4293700E+00, 0.4147600E+00, 0.4156900E+00, 0.4118200E+00, &
     & 0.4025300E+00, 0.3722900E+00, 0.2466000E+00, 0.2466000E+00 /
      data (ref_adm( 9,iz,32, 8),iz = 1,20) / &
     & 0.4128200E+00, 0.4128200E+00, 0.3489000E+00, 0.3807400E+00, &
     & 0.4233600E+00, 0.4532000E+00, 0.4142300E+00, 0.4246700E+00, &
     & 0.4516900E+00, 0.4401200E+00, 0.4529600E+00, 0.4533100E+00, &
     & 0.4508400E+00, 0.4219500E+00, 0.4522000E+00, 0.4651300E+00, &
     & 0.3972800E+00, 0.3389100E+00, 0.3562919E+00, 0.3562919E+00 /
      data (ref_adm( 9,iz,33, 8),iz = 1,20) / &
     & 0.3978800E+00, 0.3978800E+00, 0.3827000E+00, 0.3975100E+00, &
     & 0.4465700E+00, 0.4326400E+00, 0.4688800E+00, 0.4298100E+00, &
     & 0.4488300E+00, 0.5021300E+00, 0.4629600E+00, 0.4510100E+00, &
     & 0.4017900E+00, 0.4525500E+00, 0.4532900E+00, 0.4301800E+00, &
     & 0.3775500E+00, 0.4141700E+00, 0.3612588E+00, 0.3612588E+00 /
      data (ref_adm( 9,iz,34, 8),iz = 1,20) / &
     & 0.4024900E+00, 0.4024900E+00, 0.3858300E+00, 0.4214500E+00, &
     & 0.4175000E+00, 0.4578200E+00, 0.4810600E+00, 0.4608500E+00, &
     & 0.4846900E+00, 0.5532400E+00, 0.5035000E+00, 0.4458000E+00, &
     & 0.4475800E+00, 0.4193300E+00, 0.4526600E+00, 0.4503000E+00, &
     & 0.3642900E+00, 0.4063943E+00, 0.3660533E+00, 0.3660533E+00 /
      data (ref_adm( 9,iz,35, 8),iz = 1,20) / &
     & 0.4339300E+00, 0.4339300E+00, 0.4679100E+00, 0.4300600E+00, &
     & 0.4430600E+00, 0.4714500E+00, 0.4397000E+00, 0.5067100E+00, &
     & 0.4547600E+00, 0.4922200E+00, 0.5264600E+00, 0.4551400E+00, &
     & 0.5183100E+00, 0.4002600E+00, 0.4209500E+00, 0.4546900E+00, &
     & 0.4827100E+00, 0.4132215E+00, 0.3703548E+00, 0.3703548E+00 /
      data (ref_adm( 9,iz,36, 8),iz = 1,20) / &
     & 0.4110900E+00, 0.4110900E+00, 0.4148100E+00, 0.4275300E+00, &
     & 0.4435700E+00, 0.4240100E+00, 0.4470600E+00, 0.4796100E+00, &
     & 0.4662200E+00, 0.4602800E+00, 0.5050600E+00, 0.5028200E+00, &
     & 0.4396700E+00, 0.4174500E+00, 0.4131900E+00, 0.4534600E+00, &
     & 0.4378958E+00, 0.4167141E+00, 0.3735601E+00, 0.3735601E+00 /
      data (ref_adm( 9,iz,37, 8),iz = 1,20) / &
     & 0.4176500E+00, 0.4176500E+00, 0.4107600E+00, 0.4016600E+00, &
     & 0.4497100E+00, 0.4524000E+00, 0.4622300E+00, 0.4791800E+00, &
     & 0.5028700E+00, 0.5422000E+00, 0.5212300E+00, 0.4790400E+00, &
     & 0.4493700E+00, 0.4686800E+00, 0.4457900E+00, 0.4293400E+00, &
     & 0.4373376E+00, 0.4183075E+00, 0.3754548E+00, 0.3754548E+00 /
      data (ref_adm( 9,iz,38, 8),iz = 1,20) / &
     & 0.4176500E+00, 0.4176500E+00, 0.4107600E+00, 0.4016600E+00, &
     & 0.4497100E+00, 0.4524000E+00, 0.4622300E+00, 0.4791800E+00, &
     & 0.5028700E+00, 0.5422000E+00, 0.5212300E+00, 0.4790400E+00, &
     & 0.4493700E+00, 0.4686800E+00, 0.4457900E+00, 0.4293400E+00, &
     & 0.4373376E+00, 0.4183075E+00, 0.3754548E+00, 0.3754548E+00 /
! Solar Zenith Angle 40.0 Albedo  0.4263895E+00
      data (ref_adm( 9,iz, 1, 9),iz = 1,20) / &
     & 0.3994500E+00, 0.3994500E+00, 0.4391900E+00, 0.4595200E+00, &
     & 0.4292300E+00, 0.4249500E+00, 0.4083000E+00, 0.4128700E+00, &
     & 0.4488100E+00, 0.4670700E+00, 0.4604800E+00, 0.5047500E+00, &
     & 0.4979500E+00, 0.4661700E+00, 0.5073800E+00, 0.4801600E+00, &
     & 0.5308400E+00, 0.5134500E+00, 0.4574775E+00, 0.4574775E+00 /
      data (ref_adm( 9,iz, 2, 9),iz = 1,20) / &
     & 0.3994500E+00, 0.3994500E+00, 0.4391900E+00, 0.4595200E+00, &
     & 0.4292300E+00, 0.4249500E+00, 0.4083000E+00, 0.4128700E+00, &
     & 0.4488100E+00, 0.4670700E+00, 0.4604800E+00, 0.5047500E+00, &
     & 0.4979500E+00, 0.4661700E+00, 0.5073800E+00, 0.4801600E+00, &
     & 0.5308400E+00, 0.5134500E+00, 0.4574775E+00, 0.4574775E+00 /
      data (ref_adm( 9,iz, 3, 9),iz = 1,20) / &
     & 0.4169700E+00, 0.4169700E+00, 0.4092600E+00, 0.4183300E+00, &
     & 0.4173700E+00, 0.4363200E+00, 0.3945300E+00, 0.4436000E+00, &
     & 0.4633300E+00, 0.4582800E+00, 0.4158200E+00, 0.4527700E+00, &
     & 0.4562300E+00, 0.4498800E+00, 0.4869100E+00, 0.4761300E+00, &
     & 0.4870500E+00, 0.4912300E+00, 0.4648700E+00, 0.4648700E+00 /
      data (ref_adm( 9,iz, 4, 9),iz = 1,20) / &
     & 0.4130800E+00, 0.4130800E+00, 0.4116600E+00, 0.4238400E+00, &
     & 0.4576700E+00, 0.4133700E+00, 0.4018400E+00, 0.4353800E+00, &
     & 0.4207500E+00, 0.4165300E+00, 0.4364700E+00, 0.4165700E+00, &
     & 0.4513800E+00, 0.4633900E+00, 0.4652100E+00, 0.5092700E+00, &
     & 0.4847500E+00, 0.4873600E+00, 0.4411600E+00, 0.4411600E+00 /
      data (ref_adm( 9,iz, 5, 9),iz = 1,20) / &
     & 0.3964100E+00, 0.3964100E+00, 0.4121800E+00, 0.3987100E+00, &
     & 0.4067000E+00, 0.4161500E+00, 0.4075900E+00, 0.4265900E+00, &
     & 0.3981700E+00, 0.4051800E+00, 0.4493300E+00, 0.4471100E+00, &
     & 0.4182200E+00, 0.4673600E+00, 0.4793400E+00, 0.4795900E+00, &
     & 0.5044600E+00, 0.4898900E+00, 0.4564200E+00, 0.4564200E+00 /
      data (ref_adm( 9,iz, 6, 9),iz = 1,20) / &
     & 0.4110400E+00, 0.4110400E+00, 0.4136100E+00, 0.4018500E+00, &
     & 0.3909600E+00, 0.4281700E+00, 0.4014200E+00, 0.4016000E+00, &
     & 0.3998900E+00, 0.4150200E+00, 0.4410400E+00, 0.4499300E+00, &
     & 0.4821600E+00, 0.5141500E+00, 0.4910100E+00, 0.4901800E+00, &
     & 0.5323400E+00, 0.4418300E+00, 0.3965600E+00, 0.3965600E+00 /
      data (ref_adm( 9,iz, 7, 9),iz = 1,20) / &
     & 0.3970100E+00, 0.3970100E+00, 0.3999000E+00, 0.3944400E+00, &
     & 0.4091800E+00, 0.4249800E+00, 0.4002800E+00, 0.4468400E+00, &
     & 0.4429200E+00, 0.4334600E+00, 0.4287600E+00, 0.4776700E+00, &
     & 0.4599000E+00, 0.4518800E+00, 0.4555000E+00, 0.5373300E+00, &
     & 0.4981700E+00, 0.4597800E+00, 0.3937400E+00, 0.3937400E+00 /
      data (ref_adm( 9,iz, 8, 9),iz = 1,20) / &
     & 0.4176700E+00, 0.4176700E+00, 0.4052000E+00, 0.4242200E+00, &
     & 0.4016800E+00, 0.3918800E+00, 0.4124500E+00, 0.3930700E+00, &
     & 0.3834100E+00, 0.4145500E+00, 0.4252500E+00, 0.4308800E+00, &
     & 0.4533600E+00, 0.4371700E+00, 0.4516400E+00, 0.5054900E+00, &
     & 0.5332000E+00, 0.4933900E+00, 0.4424000E+00, 0.4424000E+00 /
      data (ref_adm( 9,iz, 9, 9),iz = 1,20) / &
     & 0.4514200E+00, 0.4514200E+00, 0.4177000E+00, 0.3962100E+00, &
     & 0.4340200E+00, 0.3692900E+00, 0.3730600E+00, 0.3907500E+00, &
     & 0.4034300E+00, 0.4155100E+00, 0.4315200E+00, 0.4482600E+00, &
     & 0.4657400E+00, 0.4575000E+00, 0.4654800E+00, 0.4926000E+00, &
     & 0.4910100E+00, 0.4712700E+00, 0.4271900E+00, 0.4271900E+00 /
      data (ref_adm( 9,iz,10, 9),iz = 1,20) / &
     & 0.4206900E+00, 0.4206900E+00, 0.4264100E+00, 0.4285300E+00, &
     & 0.4070100E+00, 0.3843900E+00, 0.3955800E+00, 0.4359400E+00, &
     & 0.4106800E+00, 0.4512000E+00, 0.4586100E+00, 0.4566400E+00, &
     & 0.4513700E+00, 0.4771300E+00, 0.4801300E+00, 0.5051800E+00, &
     & 0.4935500E+00, 0.4571900E+00, 0.4049800E+00, 0.4049800E+00 /
      data (ref_adm( 9,iz,11, 9),iz = 1,20) / &
     & 0.4331500E+00, 0.4331500E+00, 0.3935100E+00, 0.3507400E+00, &
     & 0.3469000E+00, 0.3855700E+00, 0.3955300E+00, 0.3864300E+00, &
     & 0.3957000E+00, 0.4138000E+00, 0.4550000E+00, 0.4129100E+00, &
     & 0.4268900E+00, 0.4333800E+00, 0.4626200E+00, 0.4835100E+00, &
     & 0.4606600E+00, 0.4578900E+00, 0.4100400E+00, 0.4100400E+00 /
      data (ref_adm( 9,iz,12, 9),iz = 1,20) / &
     & 0.4312000E+00, 0.4312000E+00, 0.4092000E+00, 0.4075700E+00, &
     & 0.4095000E+00, 0.4193100E+00, 0.4052900E+00, 0.3940400E+00, &
     & 0.4299300E+00, 0.4175400E+00, 0.4417700E+00, 0.4295400E+00, &
     & 0.3796000E+00, 0.4088300E+00, 0.3889000E+00, 0.4204100E+00, &
     & 0.4640700E+00, 0.4129400E+00, 0.3657500E+00, 0.3657500E+00 /
      data (ref_adm( 9,iz,13, 9),iz = 1,20) / &
     & 0.4293800E+00, 0.4293800E+00, 0.4239500E+00, 0.4025700E+00, &
     & 0.4068200E+00, 0.4455000E+00, 0.4309200E+00, 0.4228500E+00, &
     & 0.4188900E+00, 0.4271600E+00, 0.4314100E+00, 0.4413100E+00, &
     & 0.4141800E+00, 0.3676000E+00, 0.4080200E+00, 0.4067900E+00, &
     & 0.4440300E+00, 0.4306900E+00, 0.3383300E+00, 0.3383300E+00 /
      data (ref_adm( 9,iz,14, 9),iz = 1,20) / &
     & 0.4068000E+00, 0.4068000E+00, 0.3825200E+00, 0.3747000E+00, &
     & 0.3769900E+00, 0.3928500E+00, 0.3718000E+00, 0.3673300E+00, &
     & 0.3684600E+00, 0.3828600E+00, 0.4105700E+00, 0.4111400E+00, &
     & 0.4187100E+00, 0.4279500E+00, 0.4066000E+00, 0.4461300E+00, &
     & 0.4510000E+00, 0.4055200E+00, 0.3368400E+00, 0.3368400E+00 /
      data (ref_adm( 9,iz,15, 9),iz = 1,20) / &
     & 0.4084600E+00, 0.4084600E+00, 0.4223400E+00, 0.3975500E+00, &
     & 0.3948100E+00, 0.3944300E+00, 0.3761200E+00, 0.3806200E+00, &
     & 0.3740100E+00, 0.3757400E+00, 0.3795900E+00, 0.3868900E+00, &
     & 0.3647300E+00, 0.3910000E+00, 0.4151100E+00, 0.4193200E+00, &
     & 0.4363600E+00, 0.3943600E+00, 0.3097200E+00, 0.3097200E+00 /
      data (ref_adm( 9,iz,16, 9),iz = 1,20) / &
     & 0.4138300E+00, 0.4138300E+00, 0.4051300E+00, 0.4077800E+00, &
     & 0.3789300E+00, 0.4367800E+00, 0.3936200E+00, 0.4050300E+00, &
     & 0.3870300E+00, 0.3783500E+00, 0.3887000E+00, 0.4171100E+00, &
     & 0.3589100E+00, 0.3727500E+00, 0.4147300E+00, 0.4036200E+00, &
     & 0.3812400E+00, 0.3765000E+00, 0.3613502E+00, 0.3613502E+00 /
      data (ref_adm( 9,iz,17, 9),iz = 1,20) / &
     & 0.4066800E+00, 0.4066800E+00, 0.3713800E+00, 0.3904400E+00, &
     & 0.4079500E+00, 0.3891400E+00, 0.3910600E+00, 0.4082700E+00, &
     & 0.4020800E+00, 0.3907300E+00, 0.3831900E+00, 0.4073100E+00, &
     & 0.3812600E+00, 0.3753000E+00, 0.3980100E+00, 0.4183600E+00, &
     & 0.3870000E+00, 0.3526200E+00, 0.3557536E+00, 0.3557536E+00 /
      data (ref_adm( 9,iz,18, 9),iz = 1,20) / &
     & 0.3874700E+00, 0.3874700E+00, 0.3972200E+00, 0.4327100E+00, &
     & 0.4117900E+00, 0.4128900E+00, 0.4074700E+00, 0.4043500E+00, &
     & 0.4210700E+00, 0.4718200E+00, 0.3772100E+00, 0.4381800E+00, &
     & 0.3822700E+00, 0.3906600E+00, 0.4035400E+00, 0.4126900E+00, &
     & 0.3628400E+00, 0.3561200E+00, 0.3009755E+00, 0.3009755E+00 /
      data (ref_adm( 9,iz,19, 9),iz = 1,20) / &
     & 0.3823000E+00, 0.3823000E+00, 0.4035200E+00, 0.4021700E+00, &
     & 0.4007600E+00, 0.4013700E+00, 0.3644300E+00, 0.4046600E+00, &
     & 0.4481700E+00, 0.4069900E+00, 0.4033600E+00, 0.4459500E+00, &
     & 0.4337200E+00, 0.3697400E+00, 0.3647500E+00, 0.3826600E+00, &
     & 0.3960200E+00, 0.3439080E+00, 0.2985713E+00, 0.2985713E+00 /
      data (ref_adm( 9,iz,20, 9),iz = 1,20) / &
     & 0.4019300E+00, 0.4019300E+00, 0.3574700E+00, 0.3780700E+00, &
     & 0.4174400E+00, 0.4149800E+00, 0.3687000E+00, 0.3874900E+00, &
     & 0.4146800E+00, 0.4039200E+00, 0.3929500E+00, 0.3989000E+00, &
     & 0.4320200E+00, 0.3840100E+00, 0.3788700E+00, 0.3992100E+00, &
     & 0.4221800E+00, 0.3407943E+00, 0.2972710E+00, 0.2972710E+00 /
      data (ref_adm( 9,iz,21, 9),iz = 1,20) / &
     & 0.3691700E+00, 0.3691700E+00, 0.3735200E+00, 0.3940800E+00, &
     & 0.3979600E+00, 0.4036000E+00, 0.3599700E+00, 0.3938200E+00, &
     & 0.3941400E+00, 0.4088600E+00, 0.3971800E+00, 0.4372600E+00, &
     & 0.4182300E+00, 0.3863200E+00, 0.3725500E+00, 0.3651000E+00, &
     & 0.4197600E+00, 0.3385256E+00, 0.2967828E+00, 0.2967828E+00 /
      data (ref_adm( 9,iz,22, 9),iz = 1,20) / &
     & 0.3805900E+00, 0.3805900E+00, 0.3663200E+00, 0.4125500E+00, &
     & 0.4274900E+00, 0.4296200E+00, 0.4116700E+00, 0.3823300E+00, &
     & 0.3921100E+00, 0.4709900E+00, 0.4520500E+00, 0.4542800E+00, &
     & 0.4328300E+00, 0.3409100E+00, 0.3764600E+00, 0.3816900E+00, &
     & 0.3927570E+00, 0.3697220E+00, 0.3150533E+00, 0.3150533E+00 /
      data (ref_adm( 9,iz,23, 9),iz = 1,20) / &
     & 0.4273600E+00, 0.4273600E+00, 0.3712200E+00, 0.4134100E+00, &
     & 0.4350800E+00, 0.4222400E+00, 0.4239000E+00, 0.3985200E+00, &
     & 0.3968500E+00, 0.4433400E+00, 0.4715100E+00, 0.4010500E+00, &
     & 0.4052800E+00, 0.4025700E+00, 0.4043100E+00, 0.3665700E+00, &
     & 0.2719100E+00, 0.3689586E+00, 0.3149146E+00, 0.3149146E+00 /
      data (ref_adm( 9,iz,24, 9),iz = 1,20) / &
     & 0.4364500E+00, 0.4364500E+00, 0.4139200E+00, 0.4201500E+00, &
     & 0.4437800E+00, 0.4359400E+00, 0.4287800E+00, 0.4175700E+00, &
     & 0.4356400E+00, 0.4428200E+00, 0.4460300E+00, 0.4034900E+00, &
     & 0.4310300E+00, 0.3989600E+00, 0.3762000E+00, 0.3750900E+00, &
     & 0.3935100E+00, 0.3684092E+00, 0.3151686E+00, 0.3151686E+00 /
      data (ref_adm( 9,iz,25, 9),iz = 1,20) / &
     & 0.4032700E+00, 0.4032700E+00, 0.3629500E+00, 0.3704300E+00, &
     & 0.4016700E+00, 0.4258400E+00, 0.4138300E+00, 0.4215600E+00, &
     & 0.4344600E+00, 0.4170200E+00, 0.4456300E+00, 0.4249300E+00, &
     & 0.4263500E+00, 0.3866400E+00, 0.3889900E+00, 0.3870300E+00, &
     & 0.3770900E+00, 0.3109200E+00, 0.3157349E+00, 0.3157349E+00 /
      data (ref_adm( 9,iz,26, 9),iz = 1,20) / &
     & 0.3994000E+00, 0.3994000E+00, 0.4073200E+00, 0.4070700E+00, &
     & 0.4286000E+00, 0.4070400E+00, 0.3983400E+00, 0.4111600E+00, &
     & 0.4069900E+00, 0.4038700E+00, 0.3915000E+00, 0.4380000E+00, &
     & 0.4172500E+00, 0.4180000E+00, 0.4224100E+00, 0.4166500E+00, &
     & 0.3983600E+00, 0.3586600E+00, 0.2577000E+00, 0.2577000E+00 /
      data (ref_adm( 9,iz,27, 9),iz = 1,20) / &
     & 0.4148400E+00, 0.4148400E+00, 0.4186100E+00, 0.4255700E+00, &
     & 0.4375600E+00, 0.4403500E+00, 0.4279600E+00, 0.4197700E+00, &
     & 0.4156900E+00, 0.4293300E+00, 0.4227200E+00, 0.4188200E+00, &
     & 0.4317900E+00, 0.4328000E+00, 0.4255900E+00, 0.4333000E+00, &
     & 0.3835600E+00, 0.3607800E+00, 0.3081600E+00, 0.3081600E+00 /
      data (ref_adm( 9,iz,28, 9),iz = 1,20) / &
     & 0.4249000E+00, 0.4249000E+00, 0.4410200E+00, 0.4421000E+00, &
     & 0.4466300E+00, 0.4584000E+00, 0.4460400E+00, 0.4423300E+00, &
     & 0.4341000E+00, 0.4514600E+00, 0.4621200E+00, 0.4402900E+00, &
     & 0.4461100E+00, 0.4436800E+00, 0.4517800E+00, 0.4204600E+00, &
     & 0.4025900E+00, 0.3845000E+00, 0.3212100E+00, 0.3212100E+00 /
      data (ref_adm( 9,iz,29, 9),iz = 1,20) / &
     & 0.4229900E+00, 0.4229900E+00, 0.4195500E+00, 0.4187100E+00, &
     & 0.4359600E+00, 0.4335700E+00, 0.4048400E+00, 0.4284800E+00, &
     & 0.4280400E+00, 0.4348300E+00, 0.4332100E+00, 0.4397900E+00, &
     & 0.4602100E+00, 0.4442600E+00, 0.4759500E+00, 0.4446400E+00, &
     & 0.4109900E+00, 0.3885600E+00, 0.3382200E+00, 0.3382200E+00 /
      data (ref_adm( 9,iz,30, 9),iz = 1,20) / &
     & 0.4345800E+00, 0.4345800E+00, 0.4114700E+00, 0.4226100E+00, &
     & 0.4220800E+00, 0.4379800E+00, 0.4616900E+00, 0.4600400E+00, &
     & 0.4795900E+00, 0.4597000E+00, 0.4712000E+00, 0.4752700E+00, &
     & 0.4609900E+00, 0.4336000E+00, 0.4727700E+00, 0.4474900E+00, &
     & 0.4290200E+00, 0.3983000E+00, 0.3164400E+00, 0.3164400E+00 /
      data (ref_adm( 9,iz,31, 9),iz = 1,20) / &
     & 0.3838300E+00, 0.3838300E+00, 0.3854600E+00, 0.3931700E+00, &
     & 0.4464200E+00, 0.4485600E+00, 0.4067700E+00, 0.4156300E+00, &
     & 0.4380700E+00, 0.4264900E+00, 0.4690700E+00, 0.4445600E+00, &
     & 0.4383900E+00, 0.4409700E+00, 0.4635500E+00, 0.4610700E+00, &
     & 0.4124000E+00, 0.4022500E+00, 0.3231000E+00, 0.3231000E+00 /
      data (ref_adm( 9,iz,32, 9),iz = 1,20) / &
     & 0.4091200E+00, 0.4091200E+00, 0.4080200E+00, 0.4098900E+00, &
     & 0.4214400E+00, 0.4252200E+00, 0.4135500E+00, 0.4461100E+00, &
     & 0.4312400E+00, 0.4159800E+00, 0.4310400E+00, 0.4452200E+00, &
     & 0.4250900E+00, 0.4559300E+00, 0.4308600E+00, 0.4636300E+00, &
     & 0.4569300E+00, 0.3766900E+00, 0.3059800E+00, 0.3059800E+00 /
      data (ref_adm( 9,iz,33, 9),iz = 1,20) / &
     & 0.4247400E+00, 0.4247400E+00, 0.4440100E+00, 0.4102400E+00, &
     & 0.4196400E+00, 0.4453200E+00, 0.4714100E+00, 0.4468200E+00, &
     & 0.4402700E+00, 0.4977500E+00, 0.4748500E+00, 0.5176600E+00, &
     & 0.4624300E+00, 0.4636800E+00, 0.4856600E+00, 0.4786900E+00, &
     & 0.4194900E+00, 0.3925500E+00, 0.3207900E+00, 0.3207900E+00 /
      data (ref_adm( 9,iz,34, 9),iz = 1,20) / &
     & 0.4226200E+00, 0.4226200E+00, 0.4193300E+00, 0.4276700E+00, &
     & 0.4467700E+00, 0.4462400E+00, 0.4451400E+00, 0.4438300E+00, &
     & 0.5070100E+00, 0.5057600E+00, 0.4706400E+00, 0.4810400E+00, &
     & 0.4369000E+00, 0.4321600E+00, 0.4488700E+00, 0.4465900E+00, &
     & 0.4336000E+00, 0.3862700E+00, 0.3051900E+00, 0.3051900E+00 /
      data (ref_adm( 9,iz,35, 9),iz = 1,20) / &
     & 0.4159700E+00, 0.4159700E+00, 0.4135100E+00, 0.4384900E+00, &
     & 0.4729400E+00, 0.4794300E+00, 0.4695200E+00, 0.4548400E+00, &
     & 0.4913100E+00, 0.5012000E+00, 0.4733100E+00, 0.4616500E+00, &
     & 0.4493800E+00, 0.4203100E+00, 0.4317900E+00, 0.4301500E+00, &
     & 0.4223400E+00, 0.3868400E+00, 0.3329224E+00, 0.3329224E+00 /
      data (ref_adm( 9,iz,36, 9),iz = 1,20) / &
     & 0.4128000E+00, 0.4128000E+00, 0.4531300E+00, 0.4636600E+00, &
     & 0.4313600E+00, 0.4573400E+00, 0.4904900E+00, 0.5001400E+00, &
     & 0.4780200E+00, 0.4363100E+00, 0.4760200E+00, 0.4445400E+00, &
     & 0.4287400E+00, 0.4491000E+00, 0.4232900E+00, 0.4558400E+00, &
     & 0.4410500E+00, 0.3924600E+00, 0.3338470E+00, 0.3338470E+00 /
      data (ref_adm( 9,iz,37, 9),iz = 1,20) / &
     & 0.4412900E+00, 0.4412900E+00, 0.4033600E+00, 0.4159000E+00, &
     & 0.4642500E+00, 0.4735000E+00, 0.4810000E+00, 0.4801200E+00, &
     & 0.4757700E+00, 0.4699700E+00, 0.4912600E+00, 0.4770600E+00, &
     & 0.4424500E+00, 0.4499600E+00, 0.4332800E+00, 0.4290900E+00, &
     & 0.4445400E+00, 0.3822663E+00, 0.3344111E+00, 0.3344111E+00 /
      data (ref_adm( 9,iz,38, 9),iz = 1,20) / &
     & 0.4412900E+00, 0.4412900E+00, 0.4033600E+00, 0.4159000E+00, &
     & 0.4642500E+00, 0.4735000E+00, 0.4810000E+00, 0.4801200E+00, &
     & 0.4757700E+00, 0.4699700E+00, 0.4912600E+00, 0.4770600E+00, &
     & 0.4424500E+00, 0.4499600E+00, 0.4332800E+00, 0.4290900E+00, &
     & 0.4445400E+00, 0.3822663E+00, 0.3344111E+00, 0.3344111E+00 /
! Solar Zenith Angle 45.0 Albedo  0.4281522E+00
      data (ref_adm( 9,iz, 1,10),iz = 1,20) / &
     & 0.3909500E+00, 0.3909500E+00, 0.3894000E+00, 0.3877800E+00, &
     & 0.3867500E+00, 0.3809400E+00, 0.3890500E+00, 0.4190200E+00, &
     & 0.4760400E+00, 0.4765200E+00, 0.4755600E+00, 0.4867300E+00, &
     & 0.5008500E+00, 0.5114500E+00, 0.5425600E+00, 0.5721700E+00, &
     & 0.6239800E+00, 0.5980700E+00, 0.4945200E+00, 0.4945200E+00 /
      data (ref_adm( 9,iz, 2,10),iz = 1,20) / &
     & 0.3909500E+00, 0.3909500E+00, 0.3894000E+00, 0.3877800E+00, &
     & 0.3867500E+00, 0.3809400E+00, 0.3890500E+00, 0.4190200E+00, &
     & 0.4760400E+00, 0.4765200E+00, 0.4755600E+00, 0.4867300E+00, &
     & 0.5008500E+00, 0.5114500E+00, 0.5425600E+00, 0.5721700E+00, &
     & 0.6239800E+00, 0.5980700E+00, 0.4945200E+00, 0.4945200E+00 /
      data (ref_adm( 9,iz, 3,10),iz = 1,20) / &
     & 0.3984000E+00, 0.3984000E+00, 0.4222700E+00, 0.4118900E+00, &
     & 0.3963300E+00, 0.4019300E+00, 0.3977600E+00, 0.4245100E+00, &
     & 0.4373800E+00, 0.4531400E+00, 0.4809600E+00, 0.4806900E+00, &
     & 0.5064800E+00, 0.5120300E+00, 0.5387900E+00, 0.5573200E+00, &
     & 0.6080600E+00, 0.5905000E+00, 0.5381600E+00, 0.5381600E+00 /
      data (ref_adm( 9,iz, 4,10),iz = 1,20) / &
     & 0.3993400E+00, 0.3993400E+00, 0.3918500E+00, 0.3793100E+00, &
     & 0.4082600E+00, 0.4060100E+00, 0.4182700E+00, 0.4024700E+00, &
     & 0.4268400E+00, 0.4198300E+00, 0.4783600E+00, 0.4649600E+00, &
     & 0.4802500E+00, 0.5089200E+00, 0.5221700E+00, 0.5661300E+00, &
     & 0.5900100E+00, 0.5982300E+00, 0.5255200E+00, 0.5255200E+00 /
      data (ref_adm( 9,iz, 5,10),iz = 1,20) / &
     & 0.4307100E+00, 0.4307100E+00, 0.4104300E+00, 0.4054700E+00, &
     & 0.4080000E+00, 0.4103700E+00, 0.4105400E+00, 0.4330400E+00, &
     & 0.4117300E+00, 0.4327300E+00, 0.4722400E+00, 0.4591800E+00, &
     & 0.4514500E+00, 0.5140400E+00, 0.5283600E+00, 0.5566500E+00, &
     & 0.5962000E+00, 0.5890300E+00, 0.5081300E+00, 0.5081300E+00 /
      data (ref_adm( 9,iz, 6,10),iz = 1,20) / &
     & 0.4425700E+00, 0.4425700E+00, 0.4213300E+00, 0.4044200E+00, &
     & 0.4069800E+00, 0.4021800E+00, 0.4164500E+00, 0.4214400E+00, &
     & 0.4224700E+00, 0.4140500E+00, 0.4477700E+00, 0.4624700E+00, &
     & 0.4792700E+00, 0.5017300E+00, 0.5194800E+00, 0.5274200E+00, &
     & 0.5732200E+00, 0.5494200E+00, 0.4861200E+00, 0.4861200E+00 /
      data (ref_adm( 9,iz, 7,10),iz = 1,20) / &
     & 0.3960900E+00, 0.3960900E+00, 0.3851900E+00, 0.3901200E+00, &
     & 0.3946800E+00, 0.3972600E+00, 0.4032200E+00, 0.4040800E+00, &
     & 0.4197200E+00, 0.4349000E+00, 0.4370400E+00, 0.4532400E+00, &
     & 0.4820300E+00, 0.4888000E+00, 0.5189900E+00, 0.5587700E+00, &
     & 0.6034700E+00, 0.5622500E+00, 0.4782600E+00, 0.4782600E+00 /
      data (ref_adm( 9,iz, 8,10),iz = 1,20) / &
     & 0.3990800E+00, 0.3990800E+00, 0.3959500E+00, 0.4000200E+00, &
     & 0.3931000E+00, 0.3940400E+00, 0.4104300E+00, 0.4071100E+00, &
     & 0.4340900E+00, 0.4522700E+00, 0.4532200E+00, 0.4819800E+00, &
     & 0.4730200E+00, 0.4813000E+00, 0.5103300E+00, 0.5436100E+00, &
     & 0.5650300E+00, 0.5327700E+00, 0.4945200E+00, 0.4945200E+00 /
      data (ref_adm( 9,iz, 9,10),iz = 1,20) / &
     & 0.4027800E+00, 0.4027800E+00, 0.4043100E+00, 0.4029600E+00, &
     & 0.3823900E+00, 0.3947200E+00, 0.3898500E+00, 0.3979700E+00, &
     & 0.4106400E+00, 0.4261900E+00, 0.4345100E+00, 0.4592100E+00, &
     & 0.4707800E+00, 0.4792000E+00, 0.4942000E+00, 0.5197700E+00, &
     & 0.5390600E+00, 0.5197300E+00, 0.4662300E+00, 0.4662300E+00 /
      data (ref_adm( 9,iz,10,10),iz = 1,20) / &
     & 0.4117000E+00, 0.4117000E+00, 0.3740100E+00, 0.3670200E+00, &
     & 0.3778900E+00, 0.3933100E+00, 0.3721000E+00, 0.3810700E+00, &
     & 0.4074100E+00, 0.4086200E+00, 0.4347100E+00, 0.4530900E+00, &
     & 0.4596800E+00, 0.4603500E+00, 0.4837100E+00, 0.4938400E+00, &
     & 0.5174800E+00, 0.4720200E+00, 0.4067300E+00, 0.4067300E+00 /
      data (ref_adm( 9,iz,11,10),iz = 1,20) / &
     & 0.3993600E+00, 0.3993600E+00, 0.3863900E+00, 0.3784500E+00, &
     & 0.3902100E+00, 0.3854800E+00, 0.3956800E+00, 0.3920700E+00, &
     & 0.3967800E+00, 0.3939400E+00, 0.4389700E+00, 0.4329800E+00, &
     & 0.4521600E+00, 0.4677800E+00, 0.4886700E+00, 0.4682700E+00, &
     & 0.5008000E+00, 0.4719500E+00, 0.3850300E+00, 0.3850300E+00 /
      data (ref_adm( 9,iz,12,10),iz = 1,20) / &
     & 0.4000600E+00, 0.4000600E+00, 0.4040500E+00, 0.3956700E+00, &
     & 0.3959700E+00, 0.3723600E+00, 0.3862600E+00, 0.4127800E+00, &
     & 0.4139500E+00, 0.4023600E+00, 0.4390000E+00, 0.4022600E+00, &
     & 0.4072700E+00, 0.4498700E+00, 0.4887200E+00, 0.4800100E+00, &
     & 0.4945200E+00, 0.4482300E+00, 0.3822100E+00, 0.3822100E+00 /
      data (ref_adm( 9,iz,13,10),iz = 1,20) / &
     & 0.4141900E+00, 0.4141900E+00, 0.4133400E+00, 0.4113100E+00, &
     & 0.4045800E+00, 0.4156800E+00, 0.4275200E+00, 0.4148700E+00, &
     & 0.4156300E+00, 0.4161900E+00, 0.4109300E+00, 0.4119800E+00, &
     & 0.3772200E+00, 0.4649100E+00, 0.4503700E+00, 0.4557300E+00, &
     & 0.4777000E+00, 0.4304600E+00, 0.3595100E+00, 0.3595100E+00 /
      data (ref_adm( 9,iz,14,10),iz = 1,20) / &
     & 0.4005300E+00, 0.4005300E+00, 0.3853700E+00, 0.3727000E+00, &
     & 0.3793700E+00, 0.3897200E+00, 0.3953300E+00, 0.3962700E+00, &
     & 0.4074300E+00, 0.4072700E+00, 0.4101000E+00, 0.4288200E+00, &
     & 0.4204200E+00, 0.4302300E+00, 0.4787900E+00, 0.4550400E+00, &
     & 0.4626100E+00, 0.4388100E+00, 0.3448900E+00, 0.3448900E+00 /
      data (ref_adm( 9,iz,15,10),iz = 1,20) / &
     & 0.3779400E+00, 0.3779400E+00, 0.3650100E+00, 0.3678600E+00, &
     & 0.3730800E+00, 0.3746900E+00, 0.3770500E+00, 0.3749200E+00, &
     & 0.3769400E+00, 0.3783800E+00, 0.3897400E+00, 0.3920000E+00, &
     & 0.4067700E+00, 0.4387300E+00, 0.4440300E+00, 0.4493400E+00, &
     & 0.4323100E+00, 0.3944700E+00, 0.2982000E+00, 0.2982000E+00 /
      data (ref_adm( 9,iz,16,10),iz = 1,20) / &
     & 0.3999200E+00, 0.3999200E+00, 0.4083000E+00, 0.4064500E+00, &
     & 0.3985000E+00, 0.3922700E+00, 0.4024600E+00, 0.3880900E+00, &
     & 0.3936500E+00, 0.3950300E+00, 0.3641600E+00, 0.3680100E+00, &
     & 0.3656500E+00, 0.3873500E+00, 0.3930800E+00, 0.4106700E+00, &
     & 0.4383000E+00, 0.3933200E+00, 0.3364300E+00, 0.3364300E+00 /
      data (ref_adm( 9,iz,17,10),iz = 1,20) / &
     & 0.3878400E+00, 0.3878400E+00, 0.4077700E+00, 0.3960000E+00, &
     & 0.3691000E+00, 0.3804700E+00, 0.4101900E+00, 0.4219300E+00, &
     & 0.3885300E+00, 0.3980500E+00, 0.3938100E+00, 0.3986000E+00, &
     & 0.4165200E+00, 0.4304900E+00, 0.3771600E+00, 0.3929300E+00, &
     & 0.4000100E+00, 0.3793600E+00, 0.3815314E+00, 0.3815314E+00 /
      data (ref_adm( 9,iz,18,10),iz = 1,20) / &
     & 0.3916000E+00, 0.3916000E+00, 0.3669800E+00, 0.3633200E+00, &
     & 0.3755100E+00, 0.4179900E+00, 0.4328900E+00, 0.3998300E+00, &
     & 0.3732800E+00, 0.3861300E+00, 0.3856500E+00, 0.3837800E+00, &
     & 0.3966300E+00, 0.4051300E+00, 0.3837800E+00, 0.4359900E+00, &
     & 0.3981000E+00, 0.4264800E+00, 0.3247443E+00, 0.3247443E+00 /
      data (ref_adm( 9,iz,19,10),iz = 1,20) / &
     & 0.3918200E+00, 0.3918200E+00, 0.3554600E+00, 0.3605300E+00, &
     & 0.3949600E+00, 0.3997200E+00, 0.4170500E+00, 0.3825300E+00, &
     & 0.3879900E+00, 0.3856800E+00, 0.4110300E+00, 0.3621500E+00, &
     & 0.3887100E+00, 0.4077200E+00, 0.4157600E+00, 0.4132500E+00, &
     & 0.4009300E+00, 0.4208400E+00, 0.3219917E+00, 0.3219917E+00 /
      data (ref_adm( 9,iz,20,10),iz = 1,20) / &
     & 0.3556700E+00, 0.3556700E+00, 0.3496300E+00, 0.3646500E+00, &
     & 0.3443500E+00, 0.3250000E+00, 0.3554700E+00, 0.3693800E+00, &
     & 0.3706400E+00, 0.3771300E+00, 0.3784900E+00, 0.3768200E+00, &
     & 0.3876100E+00, 0.3873600E+00, 0.4240200E+00, 0.4421200E+00, &
     & 0.4264400E+00, 0.3844032E+00, 0.3199068E+00, 0.3199068E+00 /
      data (ref_adm( 9,iz,21,10),iz = 1,20) / &
     & 0.3835200E+00, 0.3835200E+00, 0.4035500E+00, 0.3846500E+00, &
     & 0.3782300E+00, 0.3522100E+00, 0.3731200E+00, 0.3891300E+00, &
     & 0.3682200E+00, 0.3996600E+00, 0.3952000E+00, 0.3702900E+00, &
     & 0.3595300E+00, 0.3859400E+00, 0.4021700E+00, 0.3742500E+00, &
     & 0.4039931E+00, 0.3808581E+00, 0.3180715E+00, 0.3180715E+00 /
      data (ref_adm( 9,iz,22,10),iz = 1,20) / &
     & 0.3968400E+00, 0.3968400E+00, 0.3954300E+00, 0.3844700E+00, &
     & 0.3578000E+00, 0.3962500E+00, 0.4126300E+00, 0.3969700E+00, &
     & 0.4001400E+00, 0.3887100E+00, 0.3962600E+00, 0.4013400E+00, &
     & 0.4015400E+00, 0.4045800E+00, 0.3814600E+00, 0.4221600E+00, &
     & 0.3713123E+00, 0.3439715E+00, 0.3019540E+00, 0.3019540E+00 /
      data (ref_adm( 9,iz,23,10),iz = 1,20) / &
     & 0.3997800E+00, 0.3997800E+00, 0.3978800E+00, 0.3764500E+00, &
     & 0.3876800E+00, 0.3502800E+00, 0.3720000E+00, 0.3821700E+00, &
     & 0.4126300E+00, 0.3770800E+00, 0.4231100E+00, 0.4154400E+00, &
     & 0.3967700E+00, 0.4140000E+00, 0.4187200E+00, 0.4113700E+00, &
     & 0.4930200E+00, 0.3435266E+00, 0.3031256E+00, 0.3031256E+00 /
      data (ref_adm( 9,iz,24,10),iz = 1,20) / &
     & 0.4057400E+00, 0.4057400E+00, 0.4114200E+00, 0.3847800E+00, &
     & 0.4188400E+00, 0.3797100E+00, 0.4204100E+00, 0.4058800E+00, &
     & 0.3801000E+00, 0.4097800E+00, 0.4020100E+00, 0.4249400E+00, &
     & 0.4448500E+00, 0.4184100E+00, 0.3924400E+00, 0.4122900E+00, &
     & 0.4078300E+00, 0.3441238E+00, 0.3050068E+00, 0.3050068E+00 /
      data (ref_adm( 9,iz,25,10),iz = 1,20) / &
     & 0.3781300E+00, 0.3781300E+00, 0.3773700E+00, 0.3807600E+00, &
     & 0.3748700E+00, 0.3839500E+00, 0.3888800E+00, 0.3842300E+00, &
     & 0.4064800E+00, 0.4098800E+00, 0.4007800E+00, 0.4068900E+00, &
     & 0.4399700E+00, 0.4272500E+00, 0.4029800E+00, 0.4104200E+00, &
     & 0.4275700E+00, 0.4160100E+00, 0.3074892E+00, 0.3074892E+00 /
      data (ref_adm( 9,iz,26,10),iz = 1,20) / &
     & 0.3860800E+00, 0.3860800E+00, 0.3943500E+00, 0.3896000E+00, &
     & 0.4048000E+00, 0.3933700E+00, 0.4113100E+00, 0.4160900E+00, &
     & 0.4102800E+00, 0.4161400E+00, 0.4099200E+00, 0.4017400E+00, &
     & 0.4224500E+00, 0.4456600E+00, 0.4147300E+00, 0.4245400E+00, &
     & 0.4190100E+00, 0.4041500E+00, 0.3688500E+00, 0.3688500E+00 /
      data (ref_adm( 9,iz,27,10),iz = 1,20) / &
     & 0.4046600E+00, 0.4046600E+00, 0.4134400E+00, 0.4167000E+00, &
     & 0.4116500E+00, 0.4104600E+00, 0.4205600E+00, 0.4197600E+00, &
     & 0.4231000E+00, 0.4193200E+00, 0.4273400E+00, 0.4294900E+00, &
     & 0.4170500E+00, 0.4170900E+00, 0.4238900E+00, 0.4160400E+00, &
     & 0.4149800E+00, 0.4138800E+00, 0.3279600E+00, 0.3279600E+00 /
      data (ref_adm( 9,iz,28,10),iz = 1,20) / &
     & 0.4125100E+00, 0.4125100E+00, 0.4144000E+00, 0.4292500E+00, &
     & 0.4159600E+00, 0.4279900E+00, 0.4335400E+00, 0.4368200E+00, &
     & 0.4480000E+00, 0.4418200E+00, 0.4494900E+00, 0.4724500E+00, &
     & 0.4774500E+00, 0.4594900E+00, 0.4480400E+00, 0.4528300E+00, &
     & 0.4249500E+00, 0.4067600E+00, 0.3385500E+00, 0.3385500E+00 /
      data (ref_adm( 9,iz,29,10),iz = 1,20) / &
     & 0.4026900E+00, 0.4026900E+00, 0.4224600E+00, 0.4157000E+00, &
     & 0.4383200E+00, 0.4122400E+00, 0.4146500E+00, 0.4158400E+00, &
     & 0.4174700E+00, 0.4263600E+00, 0.4189700E+00, 0.4583600E+00, &
     & 0.4719200E+00, 0.4653100E+00, 0.4548800E+00, 0.4510700E+00, &
     & 0.4406500E+00, 0.4241500E+00, 0.3595500E+00, 0.3595500E+00 /
      data (ref_adm( 9,iz,30,10),iz = 1,20) / &
     & 0.4049400E+00, 0.4049400E+00, 0.3882000E+00, 0.4036300E+00, &
     & 0.4035900E+00, 0.4236100E+00, 0.4318100E+00, 0.4343700E+00, &
     & 0.4429600E+00, 0.4343900E+00, 0.4426300E+00, 0.4565000E+00, &
     & 0.4788100E+00, 0.4741700E+00, 0.4862800E+00, 0.4902800E+00, &
     & 0.4804000E+00, 0.4452700E+00, 0.3588700E+00, 0.3588700E+00 /
      data (ref_adm( 9,iz,31,10),iz = 1,20) / &
     & 0.4049100E+00, 0.4049100E+00, 0.4017300E+00, 0.3969900E+00, &
     & 0.4102400E+00, 0.4259800E+00, 0.4192200E+00, 0.4535800E+00, &
     & 0.4713600E+00, 0.4597100E+00, 0.4671900E+00, 0.4530300E+00, &
     & 0.4554800E+00, 0.4621400E+00, 0.4649600E+00, 0.4595700E+00, &
     & 0.4523100E+00, 0.4273900E+00, 0.3492000E+00, 0.3492000E+00 /
      data (ref_adm( 9,iz,32,10),iz = 1,20) / &
     & 0.3913700E+00, 0.3913700E+00, 0.4003300E+00, 0.4190800E+00, &
     & 0.4129500E+00, 0.4383100E+00, 0.4464900E+00, 0.4578900E+00, &
     & 0.4678300E+00, 0.4851900E+00, 0.4714400E+00, 0.4718800E+00, &
     & 0.4880300E+00, 0.4718700E+00, 0.4951200E+00, 0.4690800E+00, &
     & 0.4671900E+00, 0.4258200E+00, 0.3414600E+00, 0.3414600E+00 /
      data (ref_adm( 9,iz,33,10),iz = 1,20) / &
     & 0.4236900E+00, 0.4236900E+00, 0.4288800E+00, 0.4252000E+00, &
     & 0.4181600E+00, 0.4204800E+00, 0.4809300E+00, 0.4660000E+00, &
     & 0.4388000E+00, 0.4652300E+00, 0.4439800E+00, 0.4558800E+00, &
     & 0.4672900E+00, 0.4773500E+00, 0.4811500E+00, 0.4623000E+00, &
     & 0.4543600E+00, 0.4318800E+00, 0.3269200E+00, 0.3269200E+00 /
      data (ref_adm( 9,iz,34,10),iz = 1,20) / &
     & 0.4113400E+00, 0.4113400E+00, 0.4132300E+00, 0.4077700E+00, &
     & 0.4046600E+00, 0.4467100E+00, 0.4578100E+00, 0.4626300E+00, &
     & 0.4597100E+00, 0.4365400E+00, 0.4374900E+00, 0.4715400E+00, &
     & 0.4516100E+00, 0.4535400E+00, 0.4554800E+00, 0.4514900E+00, &
     & 0.4515500E+00, 0.4231600E+00, 0.3117800E+00, 0.3117800E+00 /
      data (ref_adm( 9,iz,35,10),iz = 1,20) / &
     & 0.4111500E+00, 0.4111500E+00, 0.4184100E+00, 0.4347000E+00, &
     & 0.4221300E+00, 0.4146900E+00, 0.4206500E+00, 0.4407600E+00, &
     & 0.4561100E+00, 0.4566000E+00, 0.4741100E+00, 0.4660000E+00, &
     & 0.4783200E+00, 0.4651000E+00, 0.4521300E+00, 0.4504200E+00, &
     & 0.4432500E+00, 0.4064600E+00, 0.2970000E+00, 0.2970000E+00 /
      data (ref_adm( 9,iz,36,10),iz = 1,20) / &
     & 0.4153300E+00, 0.4153300E+00, 0.4311000E+00, 0.4559900E+00, &
     & 0.4305600E+00, 0.4057500E+00, 0.4251600E+00, 0.4203200E+00, &
     & 0.4603800E+00, 0.4685100E+00, 0.4804200E+00, 0.4795400E+00, &
     & 0.4758400E+00, 0.4713100E+00, 0.4922900E+00, 0.4562300E+00, &
     & 0.4415800E+00, 0.4064800E+00, 0.3128800E+00, 0.3128800E+00 /
      data (ref_adm( 9,iz,37,10),iz = 1,20) / &
     & 0.4129600E+00, 0.4129600E+00, 0.4041400E+00, 0.4155300E+00, &
     & 0.4126600E+00, 0.4312800E+00, 0.4059100E+00, 0.4510700E+00, &
     & 0.4670600E+00, 0.4492300E+00, 0.4711400E+00, 0.4813200E+00, &
     & 0.4499900E+00, 0.4768900E+00, 0.4752200E+00, 0.4581000E+00, &
     & 0.4125400E+00, 0.3876500E+00, 0.3482364E+00, 0.3482364E+00 /
      data (ref_adm( 9,iz,38,10),iz = 1,20) / &
     & 0.4129600E+00, 0.4129600E+00, 0.4041400E+00, 0.4155300E+00, &
     & 0.4126600E+00, 0.4312800E+00, 0.4059100E+00, 0.4510700E+00, &
     & 0.4670600E+00, 0.4492300E+00, 0.4711400E+00, 0.4813200E+00, &
     & 0.4499900E+00, 0.4768900E+00, 0.4752200E+00, 0.4581000E+00, &
     & 0.4125400E+00, 0.3876500E+00, 0.3482364E+00, 0.3482364E+00 /
! Solar Zenith Angle 50.0 Albedo  0.4405928E+00
      data (ref_adm( 9,iz, 1,11),iz = 1,20) / &
     & 0.3913700E+00, 0.3913700E+00, 0.3995600E+00, 0.3875400E+00, &
     & 0.3843700E+00, 0.4123300E+00, 0.4081900E+00, 0.4208500E+00, &
     & 0.4543200E+00, 0.4526300E+00, 0.4936300E+00, 0.5427800E+00, &
     & 0.5654200E+00, 0.5586500E+00, 0.6090800E+00, 0.6528100E+00, &
     & 0.6841100E+00, 0.7028900E+00, 0.6326000E+00, 0.6326000E+00 /
      data (ref_adm( 9,iz, 2,11),iz = 1,20) / &
     & 0.3913700E+00, 0.3913700E+00, 0.3995600E+00, 0.3875400E+00, &
     & 0.3843700E+00, 0.4123300E+00, 0.4081900E+00, 0.4208500E+00, &
     & 0.4543200E+00, 0.4526300E+00, 0.4936300E+00, 0.5427800E+00, &
     & 0.5654200E+00, 0.5586500E+00, 0.6090800E+00, 0.6528100E+00, &
     & 0.6841100E+00, 0.7028900E+00, 0.6326000E+00, 0.6326000E+00 /
      data (ref_adm( 9,iz, 3,11),iz = 1,20) / &
     & 0.4008000E+00, 0.4008000E+00, 0.3875400E+00, 0.3904400E+00, &
     & 0.4131100E+00, 0.4088100E+00, 0.4131500E+00, 0.4296200E+00, &
     & 0.4468000E+00, 0.4584700E+00, 0.4862700E+00, 0.5017600E+00, &
     & 0.5419300E+00, 0.5720900E+00, 0.6044000E+00, 0.6495100E+00, &
     & 0.6837500E+00, 0.7010100E+00, 0.6502400E+00, 0.6502400E+00 /
      data (ref_adm( 9,iz, 4,11),iz = 1,20) / &
     & 0.3840100E+00, 0.3840100E+00, 0.3896400E+00, 0.3988300E+00, &
     & 0.4040100E+00, 0.4184000E+00, 0.4184600E+00, 0.4235500E+00, &
     & 0.4336800E+00, 0.4582500E+00, 0.4802700E+00, 0.4894800E+00, &
     & 0.5141600E+00, 0.5523400E+00, 0.5863500E+00, 0.6317800E+00, &
     & 0.6707200E+00, 0.6929900E+00, 0.6290600E+00, 0.6290600E+00 /
      data (ref_adm( 9,iz, 5,11),iz = 1,20) / &
     & 0.3904900E+00, 0.3904900E+00, 0.3936700E+00, 0.4046300E+00, &
     & 0.3923300E+00, 0.3908600E+00, 0.4109500E+00, 0.4221200E+00, &
     & 0.4540200E+00, 0.4713100E+00, 0.4558300E+00, 0.4833500E+00, &
     & 0.5096000E+00, 0.5419800E+00, 0.5568100E+00, 0.6138400E+00, &
     & 0.6602400E+00, 0.6499200E+00, 0.6112700E+00, 0.6112700E+00 /
      data (ref_adm( 9,iz, 6,11),iz = 1,20) / &
     & 0.3966900E+00, 0.3966900E+00, 0.4029200E+00, 0.3852000E+00, &
     & 0.3822400E+00, 0.3778600E+00, 0.3940600E+00, 0.4101400E+00, &
     & 0.4283300E+00, 0.4429000E+00, 0.4733200E+00, 0.4742900E+00, &
     & 0.4995900E+00, 0.5263800E+00, 0.5582000E+00, 0.6090800E+00, &
     & 0.6700800E+00, 0.6502700E+00, 0.5664900E+00, 0.5664900E+00 /
      data (ref_adm( 9,iz, 7,11),iz = 1,20) / &
     & 0.4033300E+00, 0.4033300E+00, 0.3961000E+00, 0.4027300E+00, &
     & 0.3855300E+00, 0.3913200E+00, 0.3952900E+00, 0.4181200E+00, &
     & 0.4344000E+00, 0.4394200E+00, 0.4576200E+00, 0.4990800E+00, &
     & 0.5120600E+00, 0.5558000E+00, 0.5851200E+00, 0.6332400E+00, &
     & 0.6683700E+00, 0.6349100E+00, 0.5521600E+00, 0.5521600E+00 /
      data (ref_adm( 9,iz, 8,11),iz = 1,20) / &
     & 0.3951300E+00, 0.3951300E+00, 0.4087900E+00, 0.4150400E+00, &
     & 0.4159400E+00, 0.4093000E+00, 0.4233900E+00, 0.4277000E+00, &
     & 0.4539700E+00, 0.4615600E+00, 0.4787400E+00, 0.5033100E+00, &
     & 0.5302800E+00, 0.5620700E+00, 0.5778700E+00, 0.6107300E+00, &
     & 0.6286100E+00, 0.6065400E+00, 0.5218800E+00, 0.5218800E+00 /
      data (ref_adm( 9,iz, 9,11),iz = 1,20) / &
     & 0.3918100E+00, 0.3918100E+00, 0.3862400E+00, 0.3858100E+00, &
     & 0.3900500E+00, 0.3932300E+00, 0.3922400E+00, 0.4234900E+00, &
     & 0.4083900E+00, 0.4062300E+00, 0.4278400E+00, 0.4598900E+00, &
     & 0.5001000E+00, 0.5221500E+00, 0.5345800E+00, 0.5723200E+00, &
     & 0.5560800E+00, 0.5517600E+00, 0.4811500E+00, 0.4811500E+00 /
      data (ref_adm( 9,iz,10,11),iz = 1,20) / &
     & 0.3873200E+00, 0.3873200E+00, 0.3899200E+00, 0.3849600E+00, &
     & 0.4052800E+00, 0.4031800E+00, 0.4030800E+00, 0.4022100E+00, &
     & 0.3912800E+00, 0.4139100E+00, 0.4226700E+00, 0.4603400E+00, &
     & 0.4796300E+00, 0.4946900E+00, 0.5178300E+00, 0.5391500E+00, &
     & 0.5362800E+00, 0.5315300E+00, 0.4452700E+00, 0.4452700E+00 /
      data (ref_adm( 9,iz,11,11),iz = 1,20) / &
     & 0.3851600E+00, 0.3851600E+00, 0.3955900E+00, 0.3861800E+00, &
     & 0.3947500E+00, 0.3994200E+00, 0.3973600E+00, 0.4116600E+00, &
     & 0.4014900E+00, 0.4082500E+00, 0.4129100E+00, 0.4451600E+00, &
     & 0.4782900E+00, 0.4660900E+00, 0.4842900E+00, 0.5317200E+00, &
     & 0.5409100E+00, 0.5286600E+00, 0.4153300E+00, 0.4153300E+00 /
      data (ref_adm( 9,iz,12,11),iz = 1,20) / &
     & 0.3926200E+00, 0.3926200E+00, 0.3849900E+00, 0.4023800E+00, &
     & 0.4038500E+00, 0.3811400E+00, 0.4011900E+00, 0.4091800E+00, &
     & 0.4088900E+00, 0.4090700E+00, 0.4132700E+00, 0.4360000E+00, &
     & 0.4569500E+00, 0.4597100E+00, 0.4953300E+00, 0.5399100E+00, &
     & 0.5249100E+00, 0.4932700E+00, 0.4290100E+00, 0.4290100E+00 /
      data (ref_adm( 9,iz,13,11),iz = 1,20) / &
     & 0.4106500E+00, 0.4106500E+00, 0.4064600E+00, 0.4098800E+00, &
     & 0.4076400E+00, 0.4114000E+00, 0.4070000E+00, 0.4073400E+00, &
     & 0.4026700E+00, 0.4074700E+00, 0.4184200E+00, 0.4306800E+00, &
     & 0.4518300E+00, 0.4472800E+00, 0.4877200E+00, 0.4966800E+00, &
     & 0.5144900E+00, 0.4887100E+00, 0.3930700E+00, 0.3930700E+00 /
      data (ref_adm( 9,iz,14,11),iz = 1,20) / &
     & 0.4091600E+00, 0.4091600E+00, 0.4040700E+00, 0.4007300E+00, &
     & 0.4034800E+00, 0.4007700E+00, 0.4063300E+00, 0.4109200E+00, &
     & 0.4099100E+00, 0.4138700E+00, 0.4198600E+00, 0.4322000E+00, &
     & 0.4343100E+00, 0.4430200E+00, 0.4645000E+00, 0.4680700E+00, &
     & 0.4823200E+00, 0.4449700E+00, 0.3853100E+00, 0.3853100E+00 /
      data (ref_adm( 9,iz,15,11),iz = 1,20) / &
     & 0.3827000E+00, 0.3827000E+00, 0.3815600E+00, 0.3747600E+00, &
     & 0.3782500E+00, 0.3733500E+00, 0.3728400E+00, 0.3760000E+00, &
     & 0.3846300E+00, 0.3920800E+00, 0.3953500E+00, 0.4083300E+00, &
     & 0.4157500E+00, 0.4263400E+00, 0.4661200E+00, 0.4717600E+00, &
     & 0.4549700E+00, 0.4428000E+00, 0.3898800E+00, 0.3898800E+00 /
      data (ref_adm( 9,iz,16,11),iz = 1,20) / &
     & 0.3950600E+00, 0.3950600E+00, 0.3871400E+00, 0.3921000E+00, &
     & 0.3907700E+00, 0.3740100E+00, 0.3771600E+00, 0.3816700E+00, &
     & 0.3733200E+00, 0.3662900E+00, 0.3692700E+00, 0.3926700E+00, &
     & 0.3914100E+00, 0.3828700E+00, 0.4451700E+00, 0.4525200E+00, &
     & 0.4462900E+00, 0.4194900E+00, 0.3191000E+00, 0.3191000E+00 /
      data (ref_adm( 9,iz,17,11),iz = 1,20) / &
     & 0.3954300E+00, 0.3954300E+00, 0.3901900E+00, 0.3862700E+00, &
     & 0.3849700E+00, 0.3911800E+00, 0.3908700E+00, 0.3803200E+00, &
     & 0.3933000E+00, 0.4134500E+00, 0.4048300E+00, 0.4162100E+00, &
     & 0.4211100E+00, 0.4131500E+00, 0.4224700E+00, 0.4314800E+00, &
     & 0.4394100E+00, 0.4343100E+00, 0.4130243E+00, 0.4130243E+00 /
      data (ref_adm( 9,iz,18,11),iz = 1,20) / &
     & 0.3962400E+00, 0.3962400E+00, 0.3935500E+00, 0.3928600E+00, &
     & 0.3812100E+00, 0.3760700E+00, 0.3999500E+00, 0.3979000E+00, &
     & 0.3993800E+00, 0.3946000E+00, 0.4124000E+00, 0.4319000E+00, &
     & 0.4164200E+00, 0.4077400E+00, 0.4226400E+00, 0.4294900E+00, &
     & 0.4750600E+00, 0.3996300E+00, 0.3707433E+00, 0.3707433E+00 /
      data (ref_adm( 9,iz,19,11),iz = 1,20) / &
     & 0.3985000E+00, 0.3985000E+00, 0.3938800E+00, 0.3942700E+00, &
     & 0.4015600E+00, 0.3860800E+00, 0.3917200E+00, 0.4004000E+00, &
     & 0.3972700E+00, 0.3848900E+00, 0.4004400E+00, 0.4217300E+00, &
     & 0.4228600E+00, 0.4092400E+00, 0.4023500E+00, 0.4267500E+00, &
     & 0.4204200E+00, 0.4129195E+00, 0.3660808E+00, 0.3660808E+00 /
      data (ref_adm( 9,iz,20,11),iz = 1,20) / &
     & 0.3992600E+00, 0.3992600E+00, 0.3955000E+00, 0.3811400E+00, &
     & 0.3872800E+00, 0.3879400E+00, 0.3910800E+00, 0.4026500E+00, &
     & 0.3986100E+00, 0.3918000E+00, 0.4111700E+00, 0.4221800E+00, &
     & 0.4097100E+00, 0.3920400E+00, 0.4006000E+00, 0.4088900E+00, &
     & 0.4177900E+00, 0.4087068E+00, 0.3633605E+00, 0.3633605E+00 /
      data (ref_adm( 9,iz,21,11),iz = 1,20) / &
     & 0.3951800E+00, 0.3951800E+00, 0.3978700E+00, 0.4110600E+00, &
     & 0.3898100E+00, 0.3864200E+00, 0.4007100E+00, 0.4041500E+00, &
     & 0.3999200E+00, 0.4088100E+00, 0.4121800E+00, 0.4154900E+00, &
     & 0.4219400E+00, 0.4103900E+00, 0.4179000E+00, 0.4447800E+00, &
     & 0.4165654E+00, 0.4049146E+00, 0.3615376E+00, 0.3615376E+00 /
      data (ref_adm( 9,iz,22,11),iz = 1,20) / &
     & 0.3980700E+00, 0.3980700E+00, 0.4078200E+00, 0.4101500E+00, &
     & 0.4151300E+00, 0.4069500E+00, 0.4004500E+00, 0.4183900E+00, &
     & 0.4104000E+00, 0.3962000E+00, 0.4028700E+00, 0.4119400E+00, &
     & 0.4082300E+00, 0.4165500E+00, 0.4090000E+00, 0.4404000E+00, &
     & 0.4528579E+00, 0.4292316E+00, 0.3687501E+00, 0.3687501E+00 /
      data (ref_adm( 9,iz,23,11),iz = 1,20) / &
     & 0.3964900E+00, 0.3964900E+00, 0.4038400E+00, 0.4155100E+00, &
     & 0.4300000E+00, 0.4325200E+00, 0.4116900E+00, 0.4095400E+00, &
     & 0.4182100E+00, 0.4039000E+00, 0.4090300E+00, 0.4171700E+00, &
     & 0.4013200E+00, 0.4161600E+00, 0.4065900E+00, 0.4139800E+00, &
     & 0.3716900E+00, 0.4226700E+00, 0.3664305E+00, 0.3664305E+00 /
      data (ref_adm( 9,iz,24,11),iz = 1,20) / &
     & 0.3879500E+00, 0.3879500E+00, 0.3937400E+00, 0.4000100E+00, &
     & 0.4099700E+00, 0.4197900E+00, 0.4102000E+00, 0.4239500E+00, &
     & 0.4204200E+00, 0.4222700E+00, 0.4098200E+00, 0.4010800E+00, &
     & 0.4142000E+00, 0.4280200E+00, 0.4340800E+00, 0.4249000E+00, &
     & 0.4129900E+00, 0.4175754E+00, 0.3646251E+00, 0.3646251E+00 /
      data (ref_adm( 9,iz,25,11),iz = 1,20) / &
     & 0.3826600E+00, 0.3826600E+00, 0.3883200E+00, 0.3797500E+00, &
     & 0.3859800E+00, 0.3965000E+00, 0.4021300E+00, 0.4061900E+00, &
     & 0.3994600E+00, 0.3945200E+00, 0.3844300E+00, 0.3990100E+00, &
     & 0.4136100E+00, 0.4264300E+00, 0.4337600E+00, 0.4295900E+00, &
     & 0.4158000E+00, 0.4967300E+00, 0.3638105E+00, 0.3638105E+00 /
      data (ref_adm( 9,iz,26,11),iz = 1,20) / &
     & 0.3927000E+00, 0.3927000E+00, 0.4007500E+00, 0.3986900E+00, &
     & 0.3988600E+00, 0.3958000E+00, 0.3962900E+00, 0.4017400E+00, &
     & 0.4088200E+00, 0.4103700E+00, 0.4171700E+00, 0.4216500E+00, &
     & 0.4239700E+00, 0.4063600E+00, 0.4244200E+00, 0.4363800E+00, &
     & 0.4207200E+00, 0.4178700E+00, 0.3563900E+00, 0.3563900E+00 /
      data (ref_adm( 9,iz,27,11),iz = 1,20) / &
     & 0.4064500E+00, 0.4064500E+00, 0.4098000E+00, 0.4164900E+00, &
     & 0.4237900E+00, 0.4242600E+00, 0.4326200E+00, 0.4331300E+00, &
     & 0.4429800E+00, 0.4428500E+00, 0.4388100E+00, 0.4356000E+00, &
     & 0.4349800E+00, 0.4347600E+00, 0.4502200E+00, 0.4426200E+00, &
     & 0.4254100E+00, 0.4189700E+00, 0.3433900E+00, 0.3433900E+00 /
      data (ref_adm( 9,iz,28,11),iz = 1,20) / &
     & 0.3999900E+00, 0.3999900E+00, 0.4155500E+00, 0.4179300E+00, &
     & 0.4135700E+00, 0.4220000E+00, 0.4373400E+00, 0.4382100E+00, &
     & 0.4456700E+00, 0.4592200E+00, 0.4448000E+00, 0.4544700E+00, &
     & 0.4623800E+00, 0.4582700E+00, 0.4549000E+00, 0.4516700E+00, &
     & 0.4416600E+00, 0.4142700E+00, 0.3441100E+00, 0.3441100E+00 /
      data (ref_adm( 9,iz,29,11),iz = 1,20) / &
     & 0.3969600E+00, 0.3969600E+00, 0.4126500E+00, 0.4037800E+00, &
     & 0.4049100E+00, 0.4277200E+00, 0.4399200E+00, 0.4413200E+00, &
     & 0.4445300E+00, 0.4699700E+00, 0.4642100E+00, 0.4548700E+00, &
     & 0.4749300E+00, 0.4641900E+00, 0.4654500E+00, 0.4744500E+00, &
     & 0.4537400E+00, 0.4262800E+00, 0.3423600E+00, 0.3423600E+00 /
      data (ref_adm( 9,iz,30,11),iz = 1,20) / &
     & 0.4025700E+00, 0.4025700E+00, 0.4036300E+00, 0.4042100E+00, &
     & 0.4184900E+00, 0.4192900E+00, 0.4373700E+00, 0.4374500E+00, &
     & 0.4409500E+00, 0.4745300E+00, 0.4789900E+00, 0.4704000E+00, &
     & 0.4800100E+00, 0.4838100E+00, 0.4778900E+00, 0.4780900E+00, &
     & 0.4757700E+00, 0.4370900E+00, 0.3555200E+00, 0.3555200E+00 /
      data (ref_adm( 9,iz,31,11),iz = 1,20) / &
     & 0.4051800E+00, 0.4051800E+00, 0.4081200E+00, 0.4137600E+00, &
     & 0.4233200E+00, 0.4286400E+00, 0.4439800E+00, 0.4444800E+00, &
     & 0.4518800E+00, 0.4667800E+00, 0.4795000E+00, 0.4744600E+00, &
     & 0.4898300E+00, 0.5053400E+00, 0.5033400E+00, 0.5061100E+00, &
     & 0.4973300E+00, 0.4675000E+00, 0.3781300E+00, 0.3781300E+00 /
      data (ref_adm( 9,iz,32,11),iz = 1,20) / &
     & 0.3853300E+00, 0.3853300E+00, 0.3813300E+00, 0.3914300E+00, &
     & 0.4156500E+00, 0.4200300E+00, 0.4165800E+00, 0.4292000E+00, &
     & 0.4393400E+00, 0.4552900E+00, 0.4518600E+00, 0.4601800E+00, &
     & 0.4690300E+00, 0.4908200E+00, 0.4963600E+00, 0.4975300E+00, &
     & 0.4954500E+00, 0.4683100E+00, 0.3736400E+00, 0.3736400E+00 /
      data (ref_adm( 9,iz,33,11),iz = 1,20) / &
     & 0.3942700E+00, 0.3942700E+00, 0.3848000E+00, 0.3899700E+00, &
     & 0.4098200E+00, 0.4089100E+00, 0.4201700E+00, 0.4279600E+00, &
     & 0.4254500E+00, 0.4428700E+00, 0.4539100E+00, 0.4367700E+00, &
     & 0.4521300E+00, 0.4823900E+00, 0.4832100E+00, 0.4830800E+00, &
     & 0.4833900E+00, 0.4571200E+00, 0.3772700E+00, 0.3772700E+00 /
      data (ref_adm( 9,iz,34,11),iz = 1,20) / &
     & 0.3892600E+00, 0.3892600E+00, 0.4005300E+00, 0.4162400E+00, &
     & 0.4207900E+00, 0.4221000E+00, 0.4312400E+00, 0.4278200E+00, &
     & 0.4506000E+00, 0.4559700E+00, 0.4716400E+00, 0.4672200E+00, &
     & 0.4809900E+00, 0.4870400E+00, 0.4883400E+00, 0.4918900E+00, &
     & 0.4853500E+00, 0.4624300E+00, 0.3650400E+00, 0.3650400E+00 /
      data (ref_adm( 9,iz,35,11),iz = 1,20) / &
     & 0.3923100E+00, 0.3923100E+00, 0.3900100E+00, 0.3908000E+00, &
     & 0.4118800E+00, 0.4172200E+00, 0.4195800E+00, 0.4301000E+00, &
     & 0.4418900E+00, 0.4571100E+00, 0.4715200E+00, 0.4855800E+00, &
     & 0.4910500E+00, 0.4818300E+00, 0.4917700E+00, 0.4973700E+00, &
     & 0.4852700E+00, 0.4560000E+00, 0.3520200E+00, 0.3520200E+00 /
      data (ref_adm( 9,iz,36,11),iz = 1,20) / &
     & 0.3885200E+00, 0.3885200E+00, 0.3834800E+00, 0.4177100E+00, &
     & 0.4151900E+00, 0.4177500E+00, 0.4301800E+00, 0.4332000E+00, &
     & 0.4355900E+00, 0.4729100E+00, 0.4677600E+00, 0.5045300E+00, &
     & 0.5118700E+00, 0.4892900E+00, 0.4895900E+00, 0.5054300E+00, &
     & 0.4699200E+00, 0.4405600E+00, 0.3440300E+00, 0.3440300E+00 /
      data (ref_adm( 9,iz,37,11),iz = 1,20) / &
     & 0.3944700E+00, 0.3944700E+00, 0.4045700E+00, 0.4145000E+00, &
     & 0.4119500E+00, 0.4068400E+00, 0.4212400E+00, 0.4183500E+00, &
     & 0.4415000E+00, 0.4612600E+00, 0.4871700E+00, 0.5003400E+00, &
     & 0.5154900E+00, 0.4962200E+00, 0.4846900E+00, 0.4936600E+00, &
     & 0.4837000E+00, 0.4212000E+00, 0.3921249E+00, 0.3921249E+00 /
      data (ref_adm( 9,iz,38,11),iz = 1,20) / &
     & 0.3944700E+00, 0.3944700E+00, 0.4045700E+00, 0.4145000E+00, &
     & 0.4119500E+00, 0.4068400E+00, 0.4212400E+00, 0.4183500E+00, &
     & 0.4415000E+00, 0.4612600E+00, 0.4871700E+00, 0.5003400E+00, &
     & 0.5154900E+00, 0.4962200E+00, 0.4846900E+00, 0.4936600E+00, &
     & 0.4837000E+00, 0.4212000E+00, 0.3921249E+00, 0.3921249E+00 /
! Solar Zenith Angle 55.0 Albedo  0.4511499E+00
      data (ref_adm( 9,iz, 1,12),iz = 1,20) / &
     & 0.3920100E+00, 0.3920100E+00, 0.3890700E+00, 0.3932400E+00, &
     & 0.4043600E+00, 0.3993600E+00, 0.4106000E+00, 0.4371900E+00, &
     & 0.4594000E+00, 0.4753500E+00, 0.5164400E+00, 0.5784000E+00, &
     & 0.6212900E+00, 0.6526500E+00, 0.6878900E+00, 0.7484300E+00, &
     & 0.8288900E+00, 0.8411600E+00, 0.7669500E+00, 0.7669500E+00 /
      data (ref_adm( 9,iz, 2,12),iz = 1,20) / &
     & 0.3920100E+00, 0.3920100E+00, 0.3890700E+00, 0.3932400E+00, &
     & 0.4043600E+00, 0.3993600E+00, 0.4106000E+00, 0.4371900E+00, &
     & 0.4594000E+00, 0.4753500E+00, 0.5164400E+00, 0.5784000E+00, &
     & 0.6212900E+00, 0.6526500E+00, 0.6878900E+00, 0.7484300E+00, &
     & 0.8288900E+00, 0.8411600E+00, 0.7669500E+00, 0.7669500E+00 /
      data (ref_adm( 9,iz, 3,12),iz = 1,20) / &
     & 0.3865700E+00, 0.3865700E+00, 0.3915600E+00, 0.3999500E+00, &
     & 0.3987600E+00, 0.3999700E+00, 0.4174900E+00, 0.4327200E+00, &
     & 0.4421500E+00, 0.4774200E+00, 0.5017900E+00, 0.5426900E+00, &
     & 0.5798600E+00, 0.6413500E+00, 0.6893200E+00, 0.7511700E+00, &
     & 0.8044000E+00, 0.8252400E+00, 0.7668900E+00, 0.7668900E+00 /
      data (ref_adm( 9,iz, 4,12),iz = 1,20) / &
     & 0.3948500E+00, 0.3948500E+00, 0.3902700E+00, 0.4017300E+00, &
     & 0.3983600E+00, 0.4219500E+00, 0.4249200E+00, 0.4260800E+00, &
     & 0.4415000E+00, 0.4664300E+00, 0.5074500E+00, 0.5218000E+00, &
     & 0.5743700E+00, 0.6278300E+00, 0.6759700E+00, 0.7306800E+00, &
     & 0.7813700E+00, 0.8210500E+00, 0.7251000E+00, 0.7251000E+00 /
      data (ref_adm( 9,iz, 5,12),iz = 1,20) / &
     & 0.3890700E+00, 0.3890700E+00, 0.3797700E+00, 0.3857700E+00, &
     & 0.3992100E+00, 0.4145100E+00, 0.4079700E+00, 0.4241100E+00, &
     & 0.4451700E+00, 0.4621000E+00, 0.5110500E+00, 0.5263400E+00, &
     & 0.5608600E+00, 0.6178900E+00, 0.6584100E+00, 0.7007300E+00, &
     & 0.7712500E+00, 0.7819500E+00, 0.7314300E+00, 0.7314300E+00 /
      data (ref_adm( 9,iz, 6,12),iz = 1,20) / &
     & 0.3874200E+00, 0.3874200E+00, 0.3830700E+00, 0.3901200E+00, &
     & 0.3967500E+00, 0.3991200E+00, 0.4117900E+00, 0.4222200E+00, &
     & 0.4455500E+00, 0.4722700E+00, 0.5015700E+00, 0.5237100E+00, &
     & 0.5690200E+00, 0.6176100E+00, 0.6532900E+00, 0.7029600E+00, &
     & 0.7634000E+00, 0.7764600E+00, 0.6809600E+00, 0.6809600E+00 /
      data (ref_adm( 9,iz, 7,12),iz = 1,20) / &
     & 0.3786300E+00, 0.3786300E+00, 0.3878200E+00, 0.3882200E+00, &
     & 0.3883800E+00, 0.3930800E+00, 0.4060500E+00, 0.4204200E+00, &
     & 0.4353900E+00, 0.4567400E+00, 0.4854800E+00, 0.4988300E+00, &
     & 0.5410800E+00, 0.5815700E+00, 0.6081300E+00, 0.6767000E+00, &
     & 0.7267400E+00, 0.7208600E+00, 0.6590500E+00, 0.6590500E+00 /
      data (ref_adm( 9,iz, 8,12),iz = 1,20) / &
     & 0.3953700E+00, 0.3953700E+00, 0.4011900E+00, 0.3975500E+00, &
     & 0.3970900E+00, 0.4107800E+00, 0.4173000E+00, 0.4268100E+00, &
     & 0.4464400E+00, 0.4583100E+00, 0.4786500E+00, 0.5134000E+00, &
     & 0.5417100E+00, 0.5725400E+00, 0.6031900E+00, 0.6589600E+00, &
     & 0.6894000E+00, 0.6724700E+00, 0.5964000E+00, 0.5964000E+00 /
      data (ref_adm( 9,iz, 9,12),iz = 1,20) / &
     & 0.3894100E+00, 0.3894100E+00, 0.3811300E+00, 0.3777200E+00, &
     & 0.3933100E+00, 0.3989700E+00, 0.4032800E+00, 0.4130300E+00, &
     & 0.4469100E+00, 0.4597500E+00, 0.4574500E+00, 0.4935200E+00, &
     & 0.5007800E+00, 0.5113700E+00, 0.5437800E+00, 0.6078700E+00, &
     & 0.6545600E+00, 0.6302900E+00, 0.5626300E+00, 0.5626300E+00 /
      data (ref_adm( 9,iz,10,12),iz = 1,20) / &
     & 0.3989500E+00, 0.3989500E+00, 0.3788500E+00, 0.3812400E+00, &
     & 0.3874500E+00, 0.3923400E+00, 0.4037500E+00, 0.4169000E+00, &
     & 0.4332000E+00, 0.4402300E+00, 0.4477400E+00, 0.4701200E+00, &
     & 0.4927600E+00, 0.4989500E+00, 0.5413500E+00, 0.5819500E+00, &
     & 0.6350300E+00, 0.6071600E+00, 0.5288700E+00, 0.5288700E+00 /
      data (ref_adm( 9,iz,11,12),iz = 1,20) / &
     & 0.3829300E+00, 0.3829300E+00, 0.3838600E+00, 0.3705200E+00, &
     & 0.3868000E+00, 0.3871600E+00, 0.3974600E+00, 0.4077800E+00, &
     & 0.4211200E+00, 0.4272800E+00, 0.4394500E+00, 0.4586000E+00, &
     & 0.4762900E+00, 0.4828800E+00, 0.5166800E+00, 0.5766000E+00, &
     & 0.6011800E+00, 0.5743100E+00, 0.5044500E+00, 0.5044500E+00 /
      data (ref_adm( 9,iz,12,12),iz = 1,20) / &
     & 0.3833400E+00, 0.3833400E+00, 0.3934600E+00, 0.3829600E+00, &
     & 0.3905100E+00, 0.3947400E+00, 0.4082700E+00, 0.4097100E+00, &
     & 0.4203400E+00, 0.4260500E+00, 0.4377000E+00, 0.4555700E+00, &
     & 0.4800400E+00, 0.4754100E+00, 0.5164900E+00, 0.5342800E+00, &
     & 0.5819500E+00, 0.5382300E+00, 0.4607600E+00, 0.4607600E+00 /
      data (ref_adm( 9,iz,13,12),iz = 1,20) / &
     & 0.3906700E+00, 0.3906700E+00, 0.3902300E+00, 0.3916000E+00, &
     & 0.3886300E+00, 0.3923000E+00, 0.4024900E+00, 0.4063500E+00, &
     & 0.4181900E+00, 0.4269900E+00, 0.4272600E+00, 0.4459700E+00, &
     & 0.4535700E+00, 0.4727000E+00, 0.4976600E+00, 0.5213800E+00, &
     & 0.5206400E+00, 0.4944600E+00, 0.4404900E+00, 0.4404900E+00 /
      data (ref_adm( 9,iz,14,12),iz = 1,20) / &
     & 0.4013300E+00, 0.4013300E+00, 0.4007600E+00, 0.4000700E+00, &
     & 0.4012600E+00, 0.4008000E+00, 0.4053000E+00, 0.4108500E+00, &
     & 0.4171900E+00, 0.4197900E+00, 0.4270500E+00, 0.4388000E+00, &
     & 0.4514000E+00, 0.4607200E+00, 0.5013500E+00, 0.5169800E+00, &
     & 0.5128500E+00, 0.4811100E+00, 0.4016200E+00, 0.4016200E+00 /
      data (ref_adm( 9,iz,15,12),iz = 1,20) / &
     & 0.3833100E+00, 0.3833100E+00, 0.3745600E+00, 0.3723600E+00, &
     & 0.3746300E+00, 0.3820100E+00, 0.3933700E+00, 0.3940500E+00, &
     & 0.4023300E+00, 0.4046700E+00, 0.4096100E+00, 0.4157200E+00, &
     & 0.4281000E+00, 0.4393600E+00, 0.4868200E+00, 0.4804000E+00, &
     & 0.4968600E+00, 0.4630000E+00, 0.4150500E+00, 0.4150500E+00 /
      data (ref_adm( 9,iz,16,12),iz = 1,20) / &
     & 0.3807700E+00, 0.3807700E+00, 0.3913900E+00, 0.3923000E+00, &
     & 0.3999500E+00, 0.3888700E+00, 0.3881800E+00, 0.3784000E+00, &
     & 0.3851300E+00, 0.3873500E+00, 0.4098300E+00, 0.4070900E+00, &
     & 0.4110900E+00, 0.4018200E+00, 0.4683400E+00, 0.4703500E+00, &
     & 0.4726500E+00, 0.4549900E+00, 0.4545181E+00, 0.4545181E+00 /
      data (ref_adm( 9,iz,17,12),iz = 1,20) / &
     & 0.3833700E+00, 0.3833700E+00, 0.3958000E+00, 0.3972500E+00, &
     & 0.3946300E+00, 0.4015700E+00, 0.3968300E+00, 0.3900000E+00, &
     & 0.3900300E+00, 0.3980100E+00, 0.4093700E+00, 0.4149600E+00, &
     & 0.4260900E+00, 0.4242100E+00, 0.4607000E+00, 0.4676900E+00, &
     & 0.4851800E+00, 0.4412100E+00, 0.4427627E+00, 0.4427627E+00 /
      data (ref_adm( 9,iz,18,12),iz = 1,20) / &
     & 0.3873200E+00, 0.3873200E+00, 0.3930500E+00, 0.3979000E+00, &
     & 0.4031900E+00, 0.4132700E+00, 0.4097200E+00, 0.3971100E+00, &
     & 0.3986000E+00, 0.4075900E+00, 0.4087800E+00, 0.4016400E+00, &
     & 0.4284100E+00, 0.4166900E+00, 0.4514300E+00, 0.4625000E+00, &
     & 0.4801000E+00, 0.4412777E+00, 0.3757494E+00, 0.3757494E+00 /
      data (ref_adm( 9,iz,19,12),iz = 1,20) / &
     & 0.3801400E+00, 0.3801400E+00, 0.3793600E+00, 0.3902600E+00, &
     & 0.4048000E+00, 0.4006400E+00, 0.4138300E+00, 0.4048700E+00, &
     & 0.4088500E+00, 0.4172300E+00, 0.4112700E+00, 0.4115200E+00, &
     & 0.4169700E+00, 0.4250500E+00, 0.4411800E+00, 0.4632100E+00, &
     & 0.4322400E+00, 0.4347936E+00, 0.3702146E+00, 0.3702146E+00 /
      data (ref_adm( 9,iz,20,12),iz = 1,20) / &
     & 0.3781900E+00, 0.3781900E+00, 0.3776900E+00, 0.3774300E+00, &
     & 0.3885200E+00, 0.3868100E+00, 0.3933000E+00, 0.3881500E+00, &
     & 0.3921500E+00, 0.4078200E+00, 0.4101100E+00, 0.4194200E+00, &
     & 0.4185500E+00, 0.4232600E+00, 0.4222900E+00, 0.4421700E+00, &
     & 0.3956000E+00, 0.4282993E+00, 0.3666067E+00, 0.3666067E+00 /
      data (ref_adm( 9,iz,21,12),iz = 1,20) / &
     & 0.3786200E+00, 0.3786200E+00, 0.3693200E+00, 0.3806100E+00, &
     & 0.3897100E+00, 0.3949100E+00, 0.4045700E+00, 0.4053800E+00, &
     & 0.4033100E+00, 0.4118000E+00, 0.4237000E+00, 0.4192400E+00, &
     & 0.4256000E+00, 0.4230200E+00, 0.4235800E+00, 0.4652700E+00, &
     & 0.4408024E+00, 0.4220496E+00, 0.3635889E+00, 0.3635889E+00 /
      data (ref_adm( 9,iz,22,12),iz = 1,20) / &
     & 0.3745500E+00, 0.3745500E+00, 0.3836100E+00, 0.3741000E+00, &
     & 0.3795600E+00, 0.3872200E+00, 0.3983000E+00, 0.4069600E+00, &
     & 0.4064700E+00, 0.4164600E+00, 0.4275800E+00, 0.4171500E+00, &
     & 0.4219700E+00, 0.4133200E+00, 0.4139600E+00, 0.4338700E+00, &
     & 0.4744501E+00, 0.4541839E+00, 0.3968042E+00, 0.3968042E+00 /
      data (ref_adm( 9,iz,23,12),iz = 1,20) / &
     & 0.3796300E+00, 0.3796300E+00, 0.3846400E+00, 0.3740200E+00, &
     & 0.3823300E+00, 0.3945300E+00, 0.3855900E+00, 0.4011100E+00, &
     & 0.4157000E+00, 0.3971600E+00, 0.4219700E+00, 0.4117800E+00, &
     & 0.4215700E+00, 0.4308400E+00, 0.4405400E+00, 0.4557300E+00, &
     & 0.4574400E+00, 0.4452125E+00, 0.3938937E+00, 0.3938937E+00 /
      data (ref_adm( 9,iz,24,12),iz = 1,20) / &
     & 0.3783600E+00, 0.3783600E+00, 0.3731300E+00, 0.3821000E+00, &
     & 0.3809800E+00, 0.3858500E+00, 0.3769900E+00, 0.3976100E+00, &
     & 0.4118200E+00, 0.4208900E+00, 0.4165600E+00, 0.4198800E+00, &
     & 0.4186100E+00, 0.4363300E+00, 0.4424100E+00, 0.4374600E+00, &
     & 0.4372100E+00, 0.4383877E+00, 0.3919233E+00, 0.3919233E+00 /
      data (ref_adm( 9,iz,25,12),iz = 1,20) / &
     & 0.3753000E+00, 0.3753000E+00, 0.3822500E+00, 0.3775900E+00, &
     & 0.3816500E+00, 0.3871100E+00, 0.3905800E+00, 0.3999400E+00, &
     & 0.4052700E+00, 0.4086000E+00, 0.4117700E+00, 0.4171100E+00, &
     & 0.4135300E+00, 0.4266300E+00, 0.4379400E+00, 0.4321500E+00, &
     & 0.4429300E+00, 0.3859000E+00, 0.3914644E+00, 0.3914644E+00 /
      data (ref_adm( 9,iz,26,12),iz = 1,20) / &
     & 0.3908400E+00, 0.3908400E+00, 0.4013100E+00, 0.4026700E+00, &
     & 0.4007500E+00, 0.4008800E+00, 0.4023800E+00, 0.3990900E+00, &
     & 0.3988600E+00, 0.4048300E+00, 0.4027900E+00, 0.4103300E+00, &
     & 0.4209000E+00, 0.4211400E+00, 0.4414700E+00, 0.4364100E+00, &
     & 0.4331600E+00, 0.4279300E+00, 0.3919204E+00, 0.3919204E+00 /
      data (ref_adm( 9,iz,27,12),iz = 1,20) / &
     & 0.3968800E+00, 0.3968800E+00, 0.3865100E+00, 0.3885600E+00, &
     & 0.3866900E+00, 0.3987000E+00, 0.4059400E+00, 0.4143700E+00, &
     & 0.4246000E+00, 0.4412300E+00, 0.4441100E+00, 0.4456100E+00, &
     & 0.4415600E+00, 0.4480600E+00, 0.4583700E+00, 0.4572600E+00, &
     & 0.4483300E+00, 0.4363600E+00, 0.3685000E+00, 0.3685000E+00 /
      data (ref_adm( 9,iz,28,12),iz = 1,20) / &
     & 0.3911000E+00, 0.3911000E+00, 0.3779300E+00, 0.3900100E+00, &
     & 0.3948000E+00, 0.3991900E+00, 0.4148200E+00, 0.4217600E+00, &
     & 0.4265800E+00, 0.4465300E+00, 0.4469900E+00, 0.4698300E+00, &
     & 0.4629000E+00, 0.4765800E+00, 0.4830000E+00, 0.4828000E+00, &
     & 0.4744800E+00, 0.4520200E+00, 0.3751000E+00, 0.3751000E+00 /
      data (ref_adm( 9,iz,29,12),iz = 1,20) / &
     & 0.3904400E+00, 0.3904400E+00, 0.3900700E+00, 0.3915800E+00, &
     & 0.3909900E+00, 0.4085600E+00, 0.4315500E+00, 0.4319100E+00, &
     & 0.4318100E+00, 0.4520300E+00, 0.4535200E+00, 0.4591200E+00, &
     & 0.4578300E+00, 0.4804300E+00, 0.5015900E+00, 0.5026300E+00, &
     & 0.4849700E+00, 0.4590000E+00, 0.3824900E+00, 0.3824900E+00 /
      data (ref_adm( 9,iz,30,12),iz = 1,20) / &
     & 0.3868100E+00, 0.3868100E+00, 0.3918600E+00, 0.3866100E+00, &
     & 0.4006400E+00, 0.4179000E+00, 0.4338600E+00, 0.4317500E+00, &
     & 0.4446800E+00, 0.4533100E+00, 0.4508200E+00, 0.4541000E+00, &
     & 0.4607900E+00, 0.4814600E+00, 0.5002400E+00, 0.5064500E+00, &
     & 0.5022900E+00, 0.4651600E+00, 0.3855000E+00, 0.3855000E+00 /
      data (ref_adm( 9,iz,31,12),iz = 1,20) / &
     & 0.3981700E+00, 0.3981700E+00, 0.4115800E+00, 0.4145900E+00, &
     & 0.4202900E+00, 0.4301400E+00, 0.4275700E+00, 0.4369600E+00, &
     & 0.4475400E+00, 0.4582400E+00, 0.4584800E+00, 0.4636900E+00, &
     & 0.4730700E+00, 0.4856800E+00, 0.5006900E+00, 0.5082600E+00, &
     & 0.5120700E+00, 0.4824200E+00, 0.3978100E+00, 0.3978100E+00 /
      data (ref_adm( 9,iz,32,12),iz = 1,20) / &
     & 0.3917300E+00, 0.3917300E+00, 0.3915300E+00, 0.4032500E+00, &
     & 0.4027800E+00, 0.4090600E+00, 0.4135300E+00, 0.4210800E+00, &
     & 0.4345400E+00, 0.4502000E+00, 0.4580900E+00, 0.4654700E+00, &
     & 0.4748300E+00, 0.4894200E+00, 0.4920700E+00, 0.5049200E+00, &
     & 0.5034700E+00, 0.4896500E+00, 0.4057200E+00, 0.4057200E+00 /
      data (ref_adm( 9,iz,33,12),iz = 1,20) / &
     & 0.3764200E+00, 0.3764200E+00, 0.3810000E+00, 0.3882000E+00, &
     & 0.4065700E+00, 0.4079000E+00, 0.4077700E+00, 0.4128900E+00, &
     & 0.4326500E+00, 0.4485400E+00, 0.4538000E+00, 0.4623700E+00, &
     & 0.4778400E+00, 0.4876600E+00, 0.4876300E+00, 0.5048200E+00, &
     & 0.5108800E+00, 0.4899000E+00, 0.3995300E+00, 0.3995300E+00 /
      data (ref_adm( 9,iz,34,12),iz = 1,20) / &
     & 0.3886000E+00, 0.3886000E+00, 0.3830300E+00, 0.4040200E+00, &
     & 0.4129500E+00, 0.4224800E+00, 0.4210100E+00, 0.4367500E+00, &
     & 0.4474000E+00, 0.4527700E+00, 0.4703200E+00, 0.4675400E+00, &
     & 0.4997100E+00, 0.4873300E+00, 0.5008700E+00, 0.5097000E+00, &
     & 0.5079200E+00, 0.4938400E+00, 0.3959400E+00, 0.3959400E+00 /
      data (ref_adm( 9,iz,35,12),iz = 1,20) / &
     & 0.3870600E+00, 0.3870600E+00, 0.3856400E+00, 0.4072400E+00, &
     & 0.4155800E+00, 0.4310900E+00, 0.4237700E+00, 0.4323300E+00, &
     & 0.4409700E+00, 0.4577800E+00, 0.4631900E+00, 0.4802200E+00, &
     & 0.4944100E+00, 0.4966500E+00, 0.5069700E+00, 0.5231500E+00, &
     & 0.5132900E+00, 0.4868500E+00, 0.3964600E+00, 0.3964600E+00 /
      data (ref_adm( 9,iz,36,12),iz = 1,20) / &
     & 0.3973400E+00, 0.3973400E+00, 0.4012600E+00, 0.3972900E+00, &
     & 0.4269200E+00, 0.4180000E+00, 0.4282300E+00, 0.4381400E+00, &
     & 0.4552100E+00, 0.4539100E+00, 0.4741600E+00, 0.4999300E+00, &
     & 0.5191200E+00, 0.5154000E+00, 0.5006500E+00, 0.5196200E+00, &
     & 0.5098500E+00, 0.4824000E+00, 0.4030700E+00, 0.4030700E+00 /
      data (ref_adm( 9,iz,37,12),iz = 1,20) / &
     & 0.3921600E+00, 0.3921600E+00, 0.4028400E+00, 0.4089100E+00, &
     & 0.4118900E+00, 0.4217700E+00, 0.4284400E+00, 0.4404100E+00, &
     & 0.4471100E+00, 0.4491700E+00, 0.4703900E+00, 0.5102600E+00, &
     & 0.5313600E+00, 0.5183600E+00, 0.5215000E+00, 0.5257600E+00, &
     & 0.5110600E+00, 0.4935600E+00, 0.4424213E+00, 0.4424213E+00 /
      data (ref_adm( 9,iz,38,12),iz = 1,20) / &
     & 0.3921600E+00, 0.3921600E+00, 0.4028400E+00, 0.4089100E+00, &
     & 0.4118900E+00, 0.4217700E+00, 0.4284400E+00, 0.4404100E+00, &
     & 0.4471100E+00, 0.4491700E+00, 0.4703900E+00, 0.5102600E+00, &
     & 0.5313600E+00, 0.5183600E+00, 0.5215000E+00, 0.5257600E+00, &
     & 0.5110600E+00, 0.4935600E+00, 0.4424213E+00, 0.4424213E+00 /
! Solar Zenith Angle 60.0 Albedo  0.4717036E+00
      data (ref_adm( 9,iz, 1,13),iz = 1,20) / &
     & 0.3963500E+00, 0.3963500E+00, 0.3969500E+00, 0.4023500E+00, &
     & 0.4079400E+00, 0.4160000E+00, 0.4296600E+00, 0.4456100E+00, &
     & 0.4663600E+00, 0.5026800E+00, 0.5475800E+00, 0.6031500E+00, &
     & 0.6713900E+00, 0.7881200E+00, 0.8244000E+00, 0.9113700E+00, &
     & 0.1012300E+01, 0.1056600E+01, 0.9480700E+00, 0.9480700E+00 /
      data (ref_adm( 9,iz, 2,13),iz = 1,20) / &
     & 0.3963500E+00, 0.3963500E+00, 0.3969500E+00, 0.4023500E+00, &
     & 0.4079400E+00, 0.4160000E+00, 0.4296600E+00, 0.4456100E+00, &
     & 0.4663600E+00, 0.5026800E+00, 0.5475800E+00, 0.6031500E+00, &
     & 0.6713900E+00, 0.7881200E+00, 0.8244000E+00, 0.9113700E+00, &
     & 0.1012300E+01, 0.1056600E+01, 0.9480700E+00, 0.9480700E+00 /
      data (ref_adm( 9,iz, 3,13),iz = 1,20) / &
     & 0.3902000E+00, 0.3902000E+00, 0.3972200E+00, 0.3992000E+00, &
     & 0.4025600E+00, 0.4190100E+00, 0.4298800E+00, 0.4421300E+00, &
     & 0.4715200E+00, 0.5099000E+00, 0.5424200E+00, 0.5913000E+00, &
     & 0.6408600E+00, 0.7251400E+00, 0.7998100E+00, 0.8784900E+00, &
     & 0.9839400E+00, 0.1056500E+01, 0.9242700E+00, 0.9242700E+00 /
      data (ref_adm( 9,iz, 4,13),iz = 1,20) / &
     & 0.3979600E+00, 0.3979600E+00, 0.4025300E+00, 0.4089600E+00, &
     & 0.4176600E+00, 0.4138400E+00, 0.4233200E+00, 0.4398800E+00, &
     & 0.4683300E+00, 0.4914600E+00, 0.5243500E+00, 0.5788900E+00, &
     & 0.6295500E+00, 0.7036900E+00, 0.7709400E+00, 0.8566900E+00, &
     & 0.9524100E+00, 0.1019900E+01, 0.8483300E+00, 0.8483300E+00 /
      data (ref_adm( 9,iz, 5,13),iz = 1,20) / &
     & 0.3985300E+00, 0.3985300E+00, 0.4008200E+00, 0.4033400E+00, &
     & 0.4140000E+00, 0.4227600E+00, 0.4297200E+00, 0.4482600E+00, &
     & 0.4732900E+00, 0.4904900E+00, 0.5326500E+00, 0.5808600E+00, &
     & 0.6189700E+00, 0.6738300E+00, 0.7416000E+00, 0.8231900E+00, &
     & 0.9246900E+00, 0.9921200E+00, 0.8748300E+00, 0.8748300E+00 /
      data (ref_adm( 9,iz, 6,13),iz = 1,20) / &
     & 0.3855200E+00, 0.3855200E+00, 0.3819200E+00, 0.3890100E+00, &
     & 0.4039200E+00, 0.4168700E+00, 0.4260100E+00, 0.4423000E+00, &
     & 0.4596000E+00, 0.4857700E+00, 0.5259000E+00, 0.5680700E+00, &
     & 0.6119500E+00, 0.6810200E+00, 0.7493400E+00, 0.8265600E+00, &
     & 0.9215300E+00, 0.9418800E+00, 0.8235600E+00, 0.8235600E+00 /
      data (ref_adm( 9,iz, 7,13),iz = 1,20) / &
     & 0.3939800E+00, 0.3939800E+00, 0.4059300E+00, 0.4055500E+00, &
     & 0.4106900E+00, 0.4234800E+00, 0.4382600E+00, 0.4550500E+00, &
     & 0.4628100E+00, 0.4836400E+00, 0.5187100E+00, 0.5485500E+00, &
     & 0.5949400E+00, 0.6639400E+00, 0.7068200E+00, 0.7822700E+00, &
     & 0.8620500E+00, 0.8549400E+00, 0.7784400E+00, 0.7784400E+00 /
      data (ref_adm( 9,iz, 8,13),iz = 1,20) / &
     & 0.3904500E+00, 0.3904500E+00, 0.3891000E+00, 0.3844200E+00, &
     & 0.4017200E+00, 0.4136400E+00, 0.4199700E+00, 0.4363800E+00, &
     & 0.4486000E+00, 0.4651000E+00, 0.4902200E+00, 0.5302000E+00, &
     & 0.5723500E+00, 0.6242000E+00, 0.6611400E+00, 0.7516300E+00, &
     & 0.7994800E+00, 0.7924000E+00, 0.6844300E+00, 0.6844300E+00 /
      data (ref_adm( 9,iz, 9,13),iz = 1,20) / &
     & 0.3925500E+00, 0.3925500E+00, 0.3789600E+00, 0.4002400E+00, &
     & 0.3922600E+00, 0.4032000E+00, 0.4066400E+00, 0.4158200E+00, &
     & 0.4354900E+00, 0.4601000E+00, 0.4750100E+00, 0.5127200E+00, &
     & 0.5500900E+00, 0.5996000E+00, 0.6259300E+00, 0.7086800E+00, &
     & 0.7667100E+00, 0.7485000E+00, 0.6232800E+00, 0.6232800E+00 /
      data (ref_adm( 9,iz,10,13),iz = 1,20) / &
     & 0.3936600E+00, 0.3936600E+00, 0.3924400E+00, 0.3972800E+00, &
     & 0.3904700E+00, 0.4036800E+00, 0.4110500E+00, 0.4104000E+00, &
     & 0.4263400E+00, 0.4525300E+00, 0.4709400E+00, 0.5107600E+00, &
     & 0.5331100E+00, 0.5675300E+00, 0.6034000E+00, 0.6670600E+00, &
     & 0.7186300E+00, 0.6876100E+00, 0.5985800E+00, 0.5985800E+00 /
      data (ref_adm( 9,iz,11,13),iz = 1,20) / &
     & 0.3936200E+00, 0.3936200E+00, 0.3817000E+00, 0.3916900E+00, &
     & 0.4013400E+00, 0.4019000E+00, 0.4036000E+00, 0.4142400E+00, &
     & 0.4159500E+00, 0.4465300E+00, 0.4613600E+00, 0.4938800E+00, &
     & 0.5074800E+00, 0.5429500E+00, 0.5795500E+00, 0.6316200E+00, &
     & 0.6598900E+00, 0.6363200E+00, 0.5483300E+00, 0.5483300E+00 /
      data (ref_adm( 9,iz,12,13),iz = 1,20) / &
     & 0.3874900E+00, 0.3874900E+00, 0.3901300E+00, 0.3924900E+00, &
     & 0.3977400E+00, 0.4018700E+00, 0.4029800E+00, 0.4088300E+00, &
     & 0.4360900E+00, 0.4387500E+00, 0.4570500E+00, 0.4834300E+00, &
     & 0.4985800E+00, 0.5310400E+00, 0.5571300E+00, 0.5957600E+00, &
     & 0.6279100E+00, 0.5940500E+00, 0.5135300E+00, 0.5135300E+00 /
      data (ref_adm( 9,iz,13,13),iz = 1,20) / &
     & 0.3912600E+00, 0.3912600E+00, 0.3813500E+00, 0.3873400E+00, &
     & 0.3871400E+00, 0.3880800E+00, 0.4050600E+00, 0.4154400E+00, &
     & 0.4244100E+00, 0.4317900E+00, 0.4418100E+00, 0.4667100E+00, &
     & 0.4886300E+00, 0.5114200E+00, 0.5441100E+00, 0.5640000E+00, &
     & 0.5943800E+00, 0.5577500E+00, 0.4670000E+00, 0.4670000E+00 /
      data (ref_adm( 9,iz,14,13),iz = 1,20) / &
     & 0.3984200E+00, 0.3984200E+00, 0.3994300E+00, 0.4009400E+00, &
     & 0.3997700E+00, 0.4057900E+00, 0.4113300E+00, 0.4169100E+00, &
     & 0.4207600E+00, 0.4328500E+00, 0.4408400E+00, 0.4572800E+00, &
     & 0.4817800E+00, 0.4924300E+00, 0.5170400E+00, 0.5316900E+00, &
     & 0.5572100E+00, 0.5356900E+00, 0.4317000E+00, 0.4317000E+00 /
      data (ref_adm( 9,iz,15,13),iz = 1,20) / &
     & 0.3972000E+00, 0.3972000E+00, 0.3860400E+00, 0.3829500E+00, &
     & 0.3855000E+00, 0.3918300E+00, 0.4027100E+00, 0.4115000E+00, &
     & 0.4222300E+00, 0.4324600E+00, 0.4409000E+00, 0.4560400E+00, &
     & 0.4652000E+00, 0.4762500E+00, 0.4954500E+00, 0.5100600E+00, &
     & 0.5027700E+00, 0.4808800E+00, 0.4666900E+00, 0.4666900E+00 /
      data (ref_adm( 9,iz,16,13),iz = 1,20) / &
     & 0.3827000E+00, 0.3827000E+00, 0.3885000E+00, 0.4021700E+00, &
     & 0.3950300E+00, 0.4013300E+00, 0.3934600E+00, 0.3879100E+00, &
     & 0.3882600E+00, 0.3924100E+00, 0.4026500E+00, 0.4146500E+00, &
     & 0.4139000E+00, 0.4302900E+00, 0.4872300E+00, 0.4968700E+00, &
     & 0.5015200E+00, 0.4636100E+00, 0.5023420E+00, 0.5023420E+00 /
      data (ref_adm( 9,iz,17,13),iz = 1,20) / &
     & 0.3951400E+00, 0.3951400E+00, 0.3963100E+00, 0.4008900E+00, &
     & 0.3918800E+00, 0.4063300E+00, 0.3965200E+00, 0.4143600E+00, &
     & 0.4124600E+00, 0.4227300E+00, 0.4277000E+00, 0.4355100E+00, &
     & 0.4336300E+00, 0.4459300E+00, 0.4574700E+00, 0.4825300E+00, &
     & 0.4987500E+00, 0.3844000E+00, 0.4875602E+00, 0.4875602E+00 /
      data (ref_adm( 9,iz,18,13),iz = 1,20) / &
     & 0.3816300E+00, 0.3816300E+00, 0.3888700E+00, 0.3941000E+00, &
     & 0.3873300E+00, 0.4012900E+00, 0.4063500E+00, 0.4165400E+00, &
     & 0.4133200E+00, 0.4183200E+00, 0.4281600E+00, 0.4293900E+00, &
     & 0.4394200E+00, 0.4344100E+00, 0.4459800E+00, 0.4596000E+00, &
     & 0.4849200E+00, 0.4663214E+00, 0.4209556E+00, 0.4209556E+00 /
      data (ref_adm( 9,iz,19,13),iz = 1,20) / &
     & 0.3876600E+00, 0.3876600E+00, 0.3898300E+00, 0.3889200E+00, &
     & 0.3944300E+00, 0.4021400E+00, 0.4099100E+00, 0.4020700E+00, &
     & 0.4220400E+00, 0.4184400E+00, 0.4245300E+00, 0.4294500E+00, &
     & 0.4269400E+00, 0.4411700E+00, 0.4383000E+00, 0.4538400E+00, &
     & 0.4648853E+00, 0.4591477E+00, 0.4142368E+00, 0.4142368E+00 /
      data (ref_adm( 9,iz,20,13),iz = 1,20) / &
     & 0.3877100E+00, 0.3877100E+00, 0.3923600E+00, 0.3899000E+00, &
     & 0.3900000E+00, 0.3940100E+00, 0.3947700E+00, 0.4054100E+00, &
     & 0.4119400E+00, 0.4118600E+00, 0.4277700E+00, 0.4202000E+00, &
     & 0.4342900E+00, 0.4390000E+00, 0.4476100E+00, 0.4375900E+00, &
     & 0.4590430E+00, 0.4534258E+00, 0.4102221E+00, 0.4102221E+00 /
      data (ref_adm( 9,iz,21,13),iz = 1,20) / &
     & 0.3869500E+00, 0.3869500E+00, 0.3883500E+00, 0.3813100E+00, &
     & 0.3830900E+00, 0.3938600E+00, 0.4055000E+00, 0.4091800E+00, &
     & 0.4141700E+00, 0.4235800E+00, 0.4288300E+00, 0.4334300E+00, &
     & 0.4426500E+00, 0.4386900E+00, 0.4512400E+00, 0.4413100E+00, &
     & 0.4541284E+00, 0.4480516E+00, 0.4076593E+00, 0.4076593E+00 /
      data (ref_adm( 9,iz,22,13),iz = 1,20) / &
     & 0.3908200E+00, 0.3908200E+00, 0.3925900E+00, 0.3865300E+00, &
     & 0.3869400E+00, 0.3960000E+00, 0.4087400E+00, 0.4131700E+00, &
     & 0.4130200E+00, 0.4209100E+00, 0.4198200E+00, 0.4279300E+00, &
     & 0.4411500E+00, 0.4337500E+00, 0.4466000E+00, 0.4678200E+00, &
     & 0.4346313E+00, 0.4147590E+00, 0.3810660E+00, 0.3810660E+00 /
      data (ref_adm( 9,iz,23,13),iz = 1,20) / &
     & 0.3875600E+00, 0.3875600E+00, 0.3811800E+00, 0.3831600E+00, &
     & 0.3749100E+00, 0.3856500E+00, 0.4036400E+00, 0.4029100E+00, &
     & 0.4113300E+00, 0.4243000E+00, 0.4266900E+00, 0.4422100E+00, &
     & 0.4369800E+00, 0.4419000E+00, 0.4511000E+00, 0.4587700E+00, &
     & 0.4289400E+00, 0.4140778E+00, 0.3841218E+00, 0.3841218E+00 /
      data (ref_adm( 9,iz,24,13),iz = 1,20) / &
     & 0.3654400E+00, 0.3654400E+00, 0.3620400E+00, 0.3629600E+00, &
     & 0.3720700E+00, 0.3809000E+00, 0.3834600E+00, 0.3898000E+00, &
     & 0.4021600E+00, 0.4154000E+00, 0.4338100E+00, 0.4412100E+00, &
     & 0.4418200E+00, 0.4411200E+00, 0.4510800E+00, 0.4578900E+00, &
     & 0.4667200E+00, 0.4159845E+00, 0.3891438E+00, 0.3891438E+00 /
      data (ref_adm( 9,iz,25,13),iz = 1,20) / &
     & 0.3880600E+00, 0.3880600E+00, 0.4083800E+00, 0.4073900E+00, &
     & 0.4100600E+00, 0.4058900E+00, 0.4074800E+00, 0.4064400E+00, &
     & 0.4105200E+00, 0.4149100E+00, 0.4229500E+00, 0.4283200E+00, &
     & 0.4323800E+00, 0.4410900E+00, 0.4640900E+00, 0.4605000E+00, &
     & 0.4672800E+00, 0.4689300E+00, 0.3958015E+00, 0.3958015E+00 /
      data (ref_adm( 9,iz,26,13),iz = 1,20) / &
     & 0.3999600E+00, 0.3999600E+00, 0.3982200E+00, 0.3969900E+00, &
     & 0.4023500E+00, 0.4026500E+00, 0.4085300E+00, 0.4101200E+00, &
     & 0.4133700E+00, 0.4194300E+00, 0.4239300E+00, 0.4306600E+00, &
     & 0.4389700E+00, 0.4420800E+00, 0.4592800E+00, 0.4692000E+00, &
     & 0.4841000E+00, 0.4699700E+00, 0.4044222E+00, 0.4044222E+00 /
      data (ref_adm( 9,iz,27,13),iz = 1,20) / &
     & 0.3987700E+00, 0.3987700E+00, 0.3815400E+00, 0.3892500E+00, &
     & 0.4008600E+00, 0.4115000E+00, 0.4211800E+00, 0.4107800E+00, &
     & 0.4058600E+00, 0.4198200E+00, 0.4422700E+00, 0.4533600E+00, &
     & 0.4574600E+00, 0.4620800E+00, 0.4727800E+00, 0.4739200E+00, &
     & 0.4713600E+00, 0.4750100E+00, 0.3930600E+00, 0.3930600E+00 /
      data (ref_adm( 9,iz,28,13),iz = 1,20) / &
     & 0.3996600E+00, 0.3996600E+00, 0.3862400E+00, 0.3836100E+00, &
     & 0.3906500E+00, 0.4061500E+00, 0.4248300E+00, 0.4324400E+00, &
     & 0.4246500E+00, 0.4307100E+00, 0.4529800E+00, 0.4645300E+00, &
     & 0.4767600E+00, 0.4873400E+00, 0.4948100E+00, 0.5009700E+00, &
     & 0.5026400E+00, 0.4840300E+00, 0.4107600E+00, 0.4107600E+00 /
      data (ref_adm( 9,iz,29,13),iz = 1,20) / &
     & 0.3925100E+00, 0.3925100E+00, 0.3817500E+00, 0.4009200E+00, &
     & 0.4046700E+00, 0.4065900E+00, 0.4246800E+00, 0.4334400E+00, &
     & 0.4440600E+00, 0.4367600E+00, 0.4699700E+00, 0.4775400E+00, &
     & 0.4916400E+00, 0.4970800E+00, 0.5139000E+00, 0.5234900E+00, &
     & 0.5194800E+00, 0.4939600E+00, 0.4175700E+00, 0.4175700E+00 /
      data (ref_adm( 9,iz,30,13),iz = 1,20) / &
     & 0.3864000E+00, 0.3864000E+00, 0.3981900E+00, 0.4022200E+00, &
     & 0.4097300E+00, 0.4115500E+00, 0.4145800E+00, 0.4422900E+00, &
     & 0.4507000E+00, 0.4448400E+00, 0.4643600E+00, 0.4730600E+00, &
     & 0.4901300E+00, 0.5021300E+00, 0.5215000E+00, 0.5326100E+00, &
     & 0.5297900E+00, 0.5095500E+00, 0.4249500E+00, 0.4249500E+00 /
      data (ref_adm( 9,iz,31,13),iz = 1,20) / &
     & 0.3929400E+00, 0.3929400E+00, 0.4087400E+00, 0.4087700E+00, &
     & 0.4062200E+00, 0.4161700E+00, 0.4290000E+00, 0.4413900E+00, &
     & 0.4552000E+00, 0.4543200E+00, 0.4647200E+00, 0.4774500E+00, &
     & 0.4890100E+00, 0.5121800E+00, 0.5246000E+00, 0.5339600E+00, &
     & 0.5431400E+00, 0.5266400E+00, 0.4351100E+00, 0.4351100E+00 /
      data (ref_adm( 9,iz,32,13),iz = 1,20) / &
     & 0.3921900E+00, 0.3921900E+00, 0.3995000E+00, 0.4112000E+00, &
     & 0.4184800E+00, 0.4228000E+00, 0.4388800E+00, 0.4462900E+00, &
     & 0.4613000E+00, 0.4680500E+00, 0.4765900E+00, 0.4944700E+00, &
     & 0.5051400E+00, 0.5183700E+00, 0.5303900E+00, 0.5516600E+00, &
     & 0.5550600E+00, 0.5373800E+00, 0.4431600E+00, 0.4431600E+00 /
      data (ref_adm( 9,iz,33,13),iz = 1,20) / &
     & 0.3951600E+00, 0.3951600E+00, 0.3933100E+00, 0.3973900E+00, &
     & 0.4024300E+00, 0.4145400E+00, 0.4270800E+00, 0.4376000E+00, &
     & 0.4462100E+00, 0.4581500E+00, 0.4645100E+00, 0.4825200E+00, &
     & 0.5017200E+00, 0.5153400E+00, 0.5296300E+00, 0.5426100E+00, &
     & 0.5460400E+00, 0.5280900E+00, 0.4398800E+00, 0.4398800E+00 /
      data (ref_adm( 9,iz,34,13),iz = 1,20) / &
     & 0.3953200E+00, 0.3953200E+00, 0.3999600E+00, 0.4060800E+00, &
     & 0.4250300E+00, 0.4315800E+00, 0.4330100E+00, 0.4434700E+00, &
     & 0.4487400E+00, 0.4735900E+00, 0.4758300E+00, 0.4848500E+00, &
     & 0.5011000E+00, 0.5171000E+00, 0.5320700E+00, 0.5483300E+00, &
     & 0.5540300E+00, 0.5271600E+00, 0.4343800E+00, 0.4343800E+00 /
      data (ref_adm( 9,iz,35,13),iz = 1,20) / &
     & 0.3970900E+00, 0.3970900E+00, 0.3887200E+00, 0.3938900E+00, &
     & 0.4101800E+00, 0.4298100E+00, 0.4338000E+00, 0.4326500E+00, &
     & 0.4452300E+00, 0.4626300E+00, 0.4833700E+00, 0.4947300E+00, &
     & 0.5177200E+00, 0.5314000E+00, 0.5442900E+00, 0.5444000E+00, &
     & 0.5510200E+00, 0.5226100E+00, 0.4332300E+00, 0.4332300E+00 /
      data (ref_adm( 9,iz,36,13),iz = 1,20) / &
     & 0.3957100E+00, 0.3957100E+00, 0.3973600E+00, 0.3989600E+00, &
     & 0.4127500E+00, 0.4316900E+00, 0.4380100E+00, 0.4440300E+00, &
     & 0.4553200E+00, 0.4626800E+00, 0.4757200E+00, 0.4946900E+00, &
     & 0.5311100E+00, 0.5547100E+00, 0.5466500E+00, 0.5412700E+00, &
     & 0.5546600E+00, 0.5254200E+00, 0.4292100E+00, 0.4292100E+00 /
      data (ref_adm( 9,iz,37,13),iz = 1,20) / &
     & 0.3979000E+00, 0.3979000E+00, 0.4063700E+00, 0.4102700E+00, &
     & 0.4091900E+00, 0.4204400E+00, 0.4351500E+00, 0.4511800E+00, &
     & 0.4543100E+00, 0.4581600E+00, 0.4695100E+00, 0.5010900E+00, &
     & 0.5358700E+00, 0.5683700E+00, 0.5567300E+00, 0.5454900E+00, &
     & 0.5530600E+00, 0.5322700E+00, 0.4404400E+00, 0.4404400E+00 /
      data (ref_adm( 9,iz,38,13),iz = 1,20) / &
     & 0.3979000E+00, 0.3979000E+00, 0.4063700E+00, 0.4102700E+00, &
     & 0.4091900E+00, 0.4204400E+00, 0.4351500E+00, 0.4511800E+00, &
     & 0.4543100E+00, 0.4581600E+00, 0.4695100E+00, 0.5010900E+00, &
     & 0.5358700E+00, 0.5683700E+00, 0.5567300E+00, 0.5454900E+00, &
     & 0.5530600E+00, 0.5322700E+00, 0.4404400E+00, 0.4404400E+00 /
! Solar Zenith Angle 65.0 Albedo  0.4903349E+00
      data (ref_adm( 9,iz, 1,14),iz = 1,20) / &
     & 0.3769700E+00, 0.3769700E+00, 0.3860600E+00, 0.3954100E+00, &
     & 0.4091600E+00, 0.4222900E+00, 0.4428600E+00, 0.4570600E+00, &
     & 0.4803900E+00, 0.5282900E+00, 0.5758900E+00, 0.6469600E+00, &
     & 0.7300300E+00, 0.8620900E+00, 0.1020400E+01, 0.1157800E+01, &
     & 0.1233400E+01, 0.1234100E+01, 0.9613155E+00, 0.9613155E+00 /
      data (ref_adm( 9,iz, 2,14),iz = 1,20) / &
     & 0.3769700E+00, 0.3769700E+00, 0.3860600E+00, 0.3954100E+00, &
     & 0.4091600E+00, 0.4222900E+00, 0.4428600E+00, 0.4570600E+00, &
     & 0.4803900E+00, 0.5282900E+00, 0.5758900E+00, 0.6469600E+00, &
     & 0.7300300E+00, 0.8620900E+00, 0.1020400E+01, 0.1157800E+01, &
     & 0.1233400E+01, 0.1234100E+01, 0.9613155E+00, 0.9613155E+00 /
      data (ref_adm( 9,iz, 3,14),iz = 1,20) / &
     & 0.3849000E+00, 0.3849000E+00, 0.3792700E+00, 0.3919500E+00, &
     & 0.4033900E+00, 0.4237600E+00, 0.4271900E+00, 0.4585300E+00, &
     & 0.4851500E+00, 0.5219400E+00, 0.5742400E+00, 0.6465200E+00, &
     & 0.7183500E+00, 0.8229300E+00, 0.9376600E+00, 0.1087600E+01, &
     & 0.1172900E+01, 0.1231800E+01, 0.3574188E+00, 0.3574188E+00 /
      data (ref_adm( 9,iz, 4,14),iz = 1,20) / &
     & 0.3807800E+00, 0.3807800E+00, 0.3850500E+00, 0.3848200E+00, &
     & 0.3976200E+00, 0.4155100E+00, 0.4302200E+00, 0.4626600E+00, &
     & 0.4823300E+00, 0.5141800E+00, 0.5767000E+00, 0.6330800E+00, &
     & 0.7043300E+00, 0.7927600E+00, 0.9001500E+00, 0.1039900E+01, &
     & 0.1145000E+01, 0.1162600E+01, 0.9041409E+00, 0.9041409E+00 /
      data (ref_adm( 9,iz, 5,14),iz = 1,20) / &
     & 0.3896100E+00, 0.3896100E+00, 0.3968000E+00, 0.4019100E+00, &
     & 0.4019900E+00, 0.4146800E+00, 0.4392300E+00, 0.4553000E+00, &
     & 0.4879400E+00, 0.5168800E+00, 0.5577000E+00, 0.6147200E+00, &
     & 0.6822500E+00, 0.7690700E+00, 0.8586800E+00, 0.9752000E+00, &
     & 0.1097900E+01, 0.1151600E+01, 0.8556536E+00, 0.8556536E+00 /
      data (ref_adm( 9,iz, 6,14),iz = 1,20) / &
     & 0.3770600E+00, 0.3770600E+00, 0.3819300E+00, 0.3921600E+00, &
     & 0.3956000E+00, 0.4133500E+00, 0.4288100E+00, 0.4510800E+00, &
     & 0.4764200E+00, 0.5128000E+00, 0.5562000E+00, 0.6129000E+00, &
     & 0.6825100E+00, 0.7749100E+00, 0.8600100E+00, 0.9692500E+00, &
     & 0.1116100E+01, 0.1172200E+01, 0.1035900E+01, 0.1035900E+01 /
      data (ref_adm( 9,iz, 7,14),iz = 1,20) / &
     & 0.4047800E+00, 0.4047800E+00, 0.4136800E+00, 0.4193000E+00, &
     & 0.4273600E+00, 0.4347400E+00, 0.4483900E+00, 0.4661900E+00, &
     & 0.4850800E+00, 0.5162100E+00, 0.5499300E+00, 0.5945100E+00, &
     & 0.6410000E+00, 0.7187900E+00, 0.7979200E+00, 0.9066800E+00, &
     & 0.1013900E+01, 0.1026100E+01, 0.9414700E+00, 0.9414700E+00 /
      data (ref_adm( 9,iz, 8,14),iz = 1,20) / &
     & 0.3937100E+00, 0.3937100E+00, 0.3975800E+00, 0.4002000E+00, &
     & 0.4034000E+00, 0.4043300E+00, 0.4171900E+00, 0.4492200E+00, &
     & 0.4735200E+00, 0.4932200E+00, 0.5293500E+00, 0.5663900E+00, &
     & 0.6214500E+00, 0.6802700E+00, 0.7360000E+00, 0.8481200E+00, &
     & 0.9592300E+00, 0.9485000E+00, 0.8351200E+00, 0.8351200E+00 /
      data (ref_adm( 9,iz, 9,14),iz = 1,20) / &
     & 0.3945900E+00, 0.3945900E+00, 0.3925500E+00, 0.3896400E+00, &
     & 0.4099400E+00, 0.4111600E+00, 0.4233400E+00, 0.4354300E+00, &
     & 0.4625800E+00, 0.4906400E+00, 0.5048000E+00, 0.5489900E+00, &
     & 0.6001200E+00, 0.6522100E+00, 0.6985800E+00, 0.8076500E+00, &
     & 0.8865600E+00, 0.8744600E+00, 0.7598700E+00, 0.7598700E+00 /
      data (ref_adm( 9,iz,10,14),iz = 1,20) / &
     & 0.3890800E+00, 0.3890800E+00, 0.3808100E+00, 0.3870400E+00, &
     & 0.3946500E+00, 0.4090000E+00, 0.4181100E+00, 0.4300100E+00, &
     & 0.4458100E+00, 0.4623300E+00, 0.4939700E+00, 0.5293600E+00, &
     & 0.5726400E+00, 0.6144300E+00, 0.6758700E+00, 0.7565000E+00, &
     & 0.8196600E+00, 0.8024100E+00, 0.6824100E+00, 0.6824100E+00 /
      data (ref_adm( 9,iz,11,14),iz = 1,20) / &
     & 0.3908800E+00, 0.3908800E+00, 0.3895000E+00, 0.3839000E+00, &
     & 0.3897600E+00, 0.3983600E+00, 0.4194700E+00, 0.4329600E+00, &
     & 0.4371100E+00, 0.4615800E+00, 0.4799100E+00, 0.5118500E+00, &
     & 0.5483000E+00, 0.5831600E+00, 0.6424100E+00, 0.7122700E+00, &
     & 0.7479100E+00, 0.7236400E+00, 0.6247900E+00, 0.6247900E+00 /
      data (ref_adm( 9,iz,12,14),iz = 1,20) / &
     & 0.3910800E+00, 0.3910800E+00, 0.3885700E+00, 0.4005400E+00, &
     & 0.3949800E+00, 0.3962800E+00, 0.4135200E+00, 0.4258000E+00, &
     & 0.4450800E+00, 0.4555900E+00, 0.4637100E+00, 0.4973400E+00, &
     & 0.5274400E+00, 0.5658300E+00, 0.6049900E+00, 0.6638800E+00, &
     & 0.6857600E+00, 0.6653400E+00, 0.5740600E+00, 0.5740600E+00 /
      data (ref_adm( 9,iz,13,14),iz = 1,20) / &
     & 0.3854200E+00, 0.3854200E+00, 0.3896100E+00, 0.3887300E+00, &
     & 0.3963500E+00, 0.4050900E+00, 0.4151900E+00, 0.4209200E+00, &
     & 0.4372400E+00, 0.4387900E+00, 0.4629700E+00, 0.4768300E+00, &
     & 0.5081400E+00, 0.5398500E+00, 0.5745100E+00, 0.6075100E+00, &
     & 0.6351600E+00, 0.6103700E+00, 0.5231700E+00, 0.5231700E+00 /
      data (ref_adm( 9,iz,14,14),iz = 1,20) / &
     & 0.3977200E+00, 0.3977200E+00, 0.4071500E+00, 0.4058200E+00, &
     & 0.4103200E+00, 0.4121500E+00, 0.4159700E+00, 0.4201900E+00, &
     & 0.4283600E+00, 0.4365100E+00, 0.4463800E+00, 0.4627500E+00, &
     & 0.4837400E+00, 0.4999900E+00, 0.5575200E+00, 0.5852900E+00, &
     & 0.6062500E+00, 0.5686300E+00, 0.5274200E+00, 0.5274200E+00 /
      data (ref_adm( 9,iz,15,14),iz = 1,20) / &
     & 0.4093700E+00, 0.4093700E+00, 0.3892900E+00, 0.3833300E+00, &
     & 0.3919100E+00, 0.3987200E+00, 0.4106400E+00, 0.4274400E+00, &
     & 0.4375800E+00, 0.4543800E+00, 0.4738000E+00, 0.4899600E+00, &
     & 0.5015800E+00, 0.5091000E+00, 0.5506500E+00, 0.5543400E+00, &
     & 0.5698100E+00, 0.5541300E+00, 0.4783745E+00, 0.4783745E+00 /
      data (ref_adm( 9,iz,16,14),iz = 1,20) / &
     & 0.3666800E+00, 0.3666800E+00, 0.3541200E+00, 0.3630600E+00, &
     & 0.3679700E+00, 0.3618800E+00, 0.3652200E+00, 0.3705800E+00, &
     & 0.3801200E+00, 0.3911100E+00, 0.4046600E+00, 0.4145100E+00, &
     & 0.4229700E+00, 0.4377100E+00, 0.5071000E+00, 0.5344800E+00, &
     & 0.5483600E+00, 0.5656900E+00, 0.4611540E+00, 0.4611540E+00 /
      data (ref_adm( 9,iz,17,14),iz = 1,20) / &
     & 0.3878000E+00, 0.3878000E+00, 0.3920000E+00, 0.3879000E+00, &
     & 0.4009100E+00, 0.4023500E+00, 0.4096700E+00, 0.4012600E+00, &
     & 0.4187000E+00, 0.4272700E+00, 0.4328700E+00, 0.4537200E+00, &
     & 0.4639800E+00, 0.4776500E+00, 0.4933500E+00, 0.5123800E+00, &
     & 0.5214100E+00, 0.4940669E+00, 0.4467686E+00, 0.4467686E+00 /
      data (ref_adm( 9,iz,18,14),iz = 1,20) / &
     & 0.3803100E+00, 0.3803100E+00, 0.3885600E+00, 0.3867700E+00, &
     & 0.3929000E+00, 0.4031300E+00, 0.4016500E+00, 0.4037800E+00, &
     & 0.4158500E+00, 0.4162200E+00, 0.4287000E+00, 0.4489600E+00, &
     & 0.4566800E+00, 0.4607000E+00, 0.4812200E+00, 0.5076500E+00, &
     & 0.5146400E+00, 0.5273298E+00, 0.4915216E+00, 0.4915216E+00 /
      data (ref_adm( 9,iz,19,14),iz = 1,20) / &
     & 0.3753700E+00, 0.3753700E+00, 0.3793900E+00, 0.3907400E+00, &
     & 0.3922700E+00, 0.3969000E+00, 0.3968400E+00, 0.4044100E+00, &
     & 0.4132900E+00, 0.4233200E+00, 0.4357800E+00, 0.4469500E+00, &
     & 0.4571000E+00, 0.4479200E+00, 0.4588700E+00, 0.4953700E+00, &
     & 0.5099574E+00, 0.5167833E+00, 0.4820306E+00, 0.4820306E+00 /
      data (ref_adm( 9,iz,20,14),iz = 1,20) / &
     & 0.3781300E+00, 0.3781300E+00, 0.3791100E+00, 0.3780500E+00, &
     & 0.3812700E+00, 0.3928600E+00, 0.4075000E+00, 0.4033700E+00, &
     & 0.4094300E+00, 0.4140800E+00, 0.4261700E+00, 0.4278400E+00, &
     & 0.4425500E+00, 0.4521600E+00, 0.4604800E+00, 0.4678200E+00, &
     & 0.5024726E+00, 0.5090472E+00, 0.4764554E+00, 0.4764554E+00 /
      data (ref_adm( 9,iz,21,14),iz = 1,20) / &
     & 0.3731500E+00, 0.3731500E+00, 0.3766800E+00, 0.3865500E+00, &
     & 0.3816800E+00, 0.3930900E+00, 0.3975000E+00, 0.4017500E+00, &
     & 0.4077500E+00, 0.4140500E+00, 0.4229100E+00, 0.4264400E+00, &
     & 0.4322500E+00, 0.4527800E+00, 0.4539000E+00, 0.4725900E+00, &
     & 0.4958295E+00, 0.5019503E+00, 0.4728934E+00, 0.4728934E+00 /
      data (ref_adm( 9,iz,22,14),iz = 1,20) / &
     & 0.3849400E+00, 0.3849400E+00, 0.3808300E+00, 0.3836300E+00, &
     & 0.3852200E+00, 0.3899500E+00, 0.3933000E+00, 0.4036700E+00, &
     & 0.4051500E+00, 0.4173600E+00, 0.4230800E+00, 0.4197300E+00, &
     & 0.4376700E+00, 0.4530300E+00, 0.4576700E+00, 0.4999700E+00, &
     & 0.4616593E+00, 0.4471665E+00, 0.4211656E+00, 0.4211656E+00 /
      data (ref_adm( 9,iz,23,14),iz = 1,20) / &
     & 0.3842100E+00, 0.3842100E+00, 0.3877700E+00, 0.3877700E+00, &
     & 0.3929900E+00, 0.3911600E+00, 0.3950500E+00, 0.4012700E+00, &
     & 0.4089500E+00, 0.4134700E+00, 0.4254800E+00, 0.4245100E+00, &
     & 0.4432800E+00, 0.4548900E+00, 0.4663500E+00, 0.4854700E+00, &
     & 0.5370800E+00, 0.4466125E+00, 0.4252431E+00, 0.4252431E+00 /
      data (ref_adm( 9,iz,24,14),iz = 1,20) / &
     & 0.3566800E+00, 0.3566800E+00, 0.3585100E+00, 0.3606100E+00, &
     & 0.3677000E+00, 0.3714400E+00, 0.3768800E+00, 0.3834200E+00, &
     & 0.3864500E+00, 0.3956800E+00, 0.4032000E+00, 0.4143500E+00, &
     & 0.4282300E+00, 0.4582900E+00, 0.4611400E+00, 0.4839400E+00, &
     & 0.4981600E+00, 0.4493532E+00, 0.4319645E+00, 0.4319645E+00 /
      data (ref_adm( 9,iz,25,14),iz = 1,20) / &
     & 0.3956200E+00, 0.3956200E+00, 0.4238400E+00, 0.4216800E+00, &
     & 0.4264300E+00, 0.4278300E+00, 0.4288600E+00, 0.4325400E+00, &
     & 0.4368700E+00, 0.4395200E+00, 0.4427200E+00, 0.4437800E+00, &
     & 0.4463100E+00, 0.4546700E+00, 0.4683300E+00, 0.4863800E+00, &
     & 0.5104900E+00, 0.4971700E+00, 0.4407985E+00, 0.4407985E+00 /
      data (ref_adm( 9,iz,26,14),iz = 1,20) / &
     & 0.3955200E+00, 0.3955200E+00, 0.3882300E+00, 0.3931900E+00, &
     & 0.3971200E+00, 0.3986200E+00, 0.4013500E+00, 0.4051600E+00, &
     & 0.4100900E+00, 0.4155600E+00, 0.4215300E+00, 0.4330600E+00, &
     & 0.4484800E+00, 0.4621200E+00, 0.4700100E+00, 0.5038200E+00, &
     & 0.5108500E+00, 0.5119400E+00, 0.4524255E+00, 0.4524255E+00 /
      data (ref_adm( 9,iz,27,14),iz = 1,20) / &
     & 0.3928400E+00, 0.3928400E+00, 0.3977800E+00, 0.3899100E+00, &
     & 0.3992000E+00, 0.4046600E+00, 0.4049700E+00, 0.4136600E+00, &
     & 0.4203400E+00, 0.4245800E+00, 0.4365900E+00, 0.4471300E+00, &
     & 0.4684300E+00, 0.4795000E+00, 0.4951300E+00, 0.5113800E+00, &
     & 0.5109500E+00, 0.5081200E+00, 0.4404600E+00, 0.4404600E+00 /
      data (ref_adm( 9,iz,28,14),iz = 1,20) / &
     & 0.3810400E+00, 0.3810400E+00, 0.4018100E+00, 0.4036700E+00, &
     & 0.4026100E+00, 0.4127500E+00, 0.4099000E+00, 0.4202200E+00, &
     & 0.4284500E+00, 0.4403300E+00, 0.4528600E+00, 0.4619700E+00, &
     & 0.4828900E+00, 0.4943700E+00, 0.5134100E+00, 0.5265200E+00, &
     & 0.5329500E+00, 0.5276700E+00, 0.4538800E+00, 0.4538800E+00 /
      data (ref_adm( 9,iz,29,14),iz = 1,20) / &
     & 0.3936000E+00, 0.3936000E+00, 0.3981100E+00, 0.3990200E+00, &
     & 0.4061700E+00, 0.3999100E+00, 0.4098900E+00, 0.4299600E+00, &
     & 0.4373200E+00, 0.4504400E+00, 0.4563400E+00, 0.4781600E+00, &
     & 0.4959400E+00, 0.5163300E+00, 0.5373300E+00, 0.5516600E+00, &
     & 0.5584400E+00, 0.5504800E+00, 0.4621600E+00, 0.4621600E+00 /
      data (ref_adm( 9,iz,30,14),iz = 1,20) / &
     & 0.3933600E+00, 0.3933600E+00, 0.3918400E+00, 0.3898000E+00, &
     & 0.4048900E+00, 0.4134600E+00, 0.4098700E+00, 0.4337700E+00, &
     & 0.4474600E+00, 0.4582200E+00, 0.4684700E+00, 0.4804000E+00, &
     & 0.4923700E+00, 0.5237600E+00, 0.5353800E+00, 0.5631200E+00, &
     & 0.5788100E+00, 0.5720000E+00, 0.4821100E+00, 0.4821100E+00 /
      data (ref_adm( 9,iz,31,14),iz = 1,20) / &
     & 0.3907900E+00, 0.3907900E+00, 0.3904300E+00, 0.3966400E+00, &
     & 0.4044500E+00, 0.4154200E+00, 0.4234200E+00, 0.4366900E+00, &
     & 0.4583700E+00, 0.4660900E+00, 0.4818400E+00, 0.4827700E+00, &
     & 0.4932800E+00, 0.5196100E+00, 0.5440300E+00, 0.5750100E+00, &
     & 0.5787000E+00, 0.5770500E+00, 0.4939200E+00, 0.4939200E+00 /
      data (ref_adm( 9,iz,32,14),iz = 1,20) / &
     & 0.3944700E+00, 0.3944700E+00, 0.4050400E+00, 0.4080300E+00, &
     & 0.4145200E+00, 0.4205000E+00, 0.4297500E+00, 0.4490700E+00, &
     & 0.4655900E+00, 0.4730000E+00, 0.4853300E+00, 0.4999400E+00, &
     & 0.5121400E+00, 0.5349800E+00, 0.5618100E+00, 0.5855900E+00, &
     & 0.5962100E+00, 0.5854600E+00, 0.4953800E+00, 0.4953800E+00 /
      data (ref_adm( 9,iz,33,14),iz = 1,20) / &
     & 0.3890100E+00, 0.3890100E+00, 0.3824200E+00, 0.3891200E+00, &
     & 0.3935200E+00, 0.4005600E+00, 0.4152500E+00, 0.4342200E+00, &
     & 0.4481100E+00, 0.4612700E+00, 0.4795200E+00, 0.4947200E+00, &
     & 0.5126500E+00, 0.5422200E+00, 0.5627600E+00, 0.5831000E+00, &
     & 0.5962800E+00, 0.5848300E+00, 0.4955000E+00, 0.4955000E+00 /
      data (ref_adm( 9,iz,34,14),iz = 1,20) / &
     & 0.3854700E+00, 0.3854700E+00, 0.3997200E+00, 0.3973600E+00, &
     & 0.4004300E+00, 0.4040500E+00, 0.4224500E+00, 0.4381400E+00, &
     & 0.4444300E+00, 0.4615700E+00, 0.4788400E+00, 0.4994500E+00, &
     & 0.5247800E+00, 0.5430700E+00, 0.5583700E+00, 0.5812500E+00, &
     & 0.6035000E+00, 0.5913900E+00, 0.4899600E+00, 0.4899600E+00 /
      data (ref_adm( 9,iz,35,14),iz = 1,20) / &
     & 0.3879700E+00, 0.3879700E+00, 0.3886400E+00, 0.3883100E+00, &
     & 0.4001100E+00, 0.4104600E+00, 0.4251700E+00, 0.4394800E+00, &
     & 0.4532200E+00, 0.4661900E+00, 0.4849800E+00, 0.5028800E+00, &
     & 0.5273400E+00, 0.5459100E+00, 0.5667100E+00, 0.5838400E+00, &
     & 0.6035600E+00, 0.5907400E+00, 0.4864000E+00, 0.4864000E+00 /
      data (ref_adm( 9,iz,36,14),iz = 1,20) / &
     & 0.3841600E+00, 0.3841600E+00, 0.3829500E+00, 0.3893200E+00, &
     & 0.3947200E+00, 0.4185800E+00, 0.4277000E+00, 0.4460400E+00, &
     & 0.4611900E+00, 0.4695300E+00, 0.4829600E+00, 0.4994400E+00, &
     & 0.5272500E+00, 0.5572100E+00, 0.5772900E+00, 0.5970100E+00, &
     & 0.6012200E+00, 0.5842700E+00, 0.4890900E+00, 0.4890900E+00 /
      data (ref_adm( 9,iz,37,14),iz = 1,20) / &
     & 0.3813400E+00, 0.3813400E+00, 0.3843000E+00, 0.3930600E+00, &
     & 0.4027000E+00, 0.4160400E+00, 0.4321500E+00, 0.4536000E+00, &
     & 0.4620000E+00, 0.4628600E+00, 0.4761700E+00, 0.4975100E+00, &
     & 0.5248700E+00, 0.5612300E+00, 0.6008900E+00, 0.6079900E+00, &
     & 0.6004100E+00, 0.5852700E+00, 0.4909900E+00, 0.4909900E+00 /
      data (ref_adm( 9,iz,38,14),iz = 1,20) / &
     & 0.3813400E+00, 0.3813400E+00, 0.3843000E+00, 0.3930600E+00, &
     & 0.4027000E+00, 0.4160400E+00, 0.4321500E+00, 0.4536000E+00, &
     & 0.4620000E+00, 0.4628600E+00, 0.4761700E+00, 0.4975100E+00, &
     & 0.5248700E+00, 0.5612300E+00, 0.6008900E+00, 0.6079900E+00, &
     & 0.6004100E+00, 0.5852700E+00, 0.4909900E+00, 0.4909900E+00 /
! Solar Zenith Angle 70.0 Albedo  0.5118225E+00
      data (ref_adm( 9,iz, 1,15),iz = 1,20) / &
     & 0.3923200E+00, 0.3923200E+00, 0.3958900E+00, 0.4007500E+00, &
     & 0.4132100E+00, 0.4320400E+00, 0.4532200E+00, 0.4839900E+00, &
     & 0.5220600E+00, 0.5582400E+00, 0.6171700E+00, 0.6999900E+00, &
     & 0.8109000E+00, 0.9512400E+00, 0.1123400E+01, 0.1267600E+01, &
     & 0.1317430E+01, 0.1446767E+01, 0.1156359E+01, 0.1156359E+01 /
      data (ref_adm( 9,iz, 2,15),iz = 1,20) / &
     & 0.3923200E+00, 0.3923200E+00, 0.3958900E+00, 0.4007500E+00, &
     & 0.4132100E+00, 0.4320400E+00, 0.4532200E+00, 0.4839900E+00, &
     & 0.5220600E+00, 0.5582400E+00, 0.6171700E+00, 0.6999900E+00, &
     & 0.8109000E+00, 0.9512400E+00, 0.1123400E+01, 0.1267600E+01, &
     & 0.1317430E+01, 0.1446767E+01, 0.1156359E+01, 0.1156359E+01 /
      data (ref_adm( 9,iz, 3,15),iz = 1,20) / &
     & 0.3879800E+00, 0.3879800E+00, 0.3943300E+00, 0.4051700E+00, &
     & 0.4182100E+00, 0.4338400E+00, 0.4502400E+00, 0.4824600E+00, &
     & 0.5068900E+00, 0.5503000E+00, 0.6147600E+00, 0.6875200E+00, &
     & 0.7972600E+00, 0.9331000E+00, 0.1065200E+01, 0.1176000E+01, &
     & 0.1113000E+01, 0.1411163E+01, 0.5525509E+00, 0.5525509E+00 /
      data (ref_adm( 9,iz, 4,15),iz = 1,20) / &
     & 0.3871400E+00, 0.3871400E+00, 0.3876900E+00, 0.4001800E+00, &
     & 0.4188300E+00, 0.4366500E+00, 0.4581100E+00, 0.4741600E+00, &
     & 0.5061800E+00, 0.5478500E+00, 0.6056800E+00, 0.6742100E+00, &
     & 0.7783200E+00, 0.9136300E+00, 0.1027500E+01, 0.1150100E+01, &
     & 0.1130200E+01, 0.1342361E+01, 0.1050653E+01, 0.1050653E+01 /
      data (ref_adm( 9,iz, 5,15),iz = 1,20) / &
     & 0.3980900E+00, 0.3980900E+00, 0.3996400E+00, 0.4005600E+00, &
     & 0.4142500E+00, 0.4312900E+00, 0.4502700E+00, 0.4754900E+00, &
     & 0.5029600E+00, 0.5467000E+00, 0.5949300E+00, 0.6713100E+00, &
     & 0.7523300E+00, 0.8550700E+00, 0.9617100E+00, 0.1103600E+01, &
     & 0.1146000E+01, 0.1256567E+01, 0.9732366E+00, 0.9732366E+00 /
      data (ref_adm( 9,iz, 6,15),iz = 1,20) / &
     & 0.3839900E+00, 0.3839900E+00, 0.3844200E+00, 0.3920100E+00, &
     & 0.3983400E+00, 0.4146700E+00, 0.4314100E+00, 0.4628200E+00, &
     & 0.5002600E+00, 0.5363300E+00, 0.5837500E+00, 0.6595600E+00, &
     & 0.7416700E+00, 0.8508100E+00, 0.9694400E+00, 0.1129200E+01, &
     & 0.1352400E+01, 0.1436600E+01, 0.1225300E+01, 0.1225300E+01 /
      data (ref_adm( 9,iz, 7,15),iz = 1,20) / &
     & 0.3987200E+00, 0.3987200E+00, 0.4079200E+00, 0.4193600E+00, &
     & 0.4185000E+00, 0.4304700E+00, 0.4479900E+00, 0.4696800E+00, &
     & 0.5008100E+00, 0.5342900E+00, 0.5822000E+00, 0.6439300E+00, &
     & 0.7183000E+00, 0.8040500E+00, 0.9093500E+00, 0.1051200E+01, &
     & 0.1228900E+01, 0.1276000E+01, 0.1128300E+01, 0.1128300E+01 /
      data (ref_adm( 9,iz, 8,15),iz = 1,20) / &
     & 0.3896000E+00, 0.3896000E+00, 0.3943500E+00, 0.4045600E+00, &
     & 0.4099200E+00, 0.4155500E+00, 0.4286400E+00, 0.4553400E+00, &
     & 0.4814300E+00, 0.5072800E+00, 0.5596500E+00, 0.6104500E+00, &
     & 0.6779500E+00, 0.7553300E+00, 0.8310500E+00, 0.9874500E+00, &
     & 0.1115900E+01, 0.1104600E+01, 0.1016300E+01, 0.1016300E+01 /
      data (ref_adm( 9,iz, 9,15),iz = 1,20) / &
     & 0.3875100E+00, 0.3875100E+00, 0.3888900E+00, 0.3923300E+00, &
     & 0.4000400E+00, 0.4117600E+00, 0.4224100E+00, 0.4526800E+00, &
     & 0.4676900E+00, 0.5041100E+00, 0.5459900E+00, 0.5835300E+00, &
     & 0.6399500E+00, 0.7106900E+00, 0.7733000E+00, 0.9211200E+00, &
     & 0.1031500E+01, 0.9939000E+00, 0.9204800E+00, 0.9204800E+00 /
      data (ref_adm( 9,iz,10,15),iz = 1,20) / &
     & 0.3885600E+00, 0.3885600E+00, 0.3886300E+00, 0.3920200E+00, &
     & 0.3966700E+00, 0.4126200E+00, 0.4246600E+00, 0.4421900E+00, &
     & 0.4598200E+00, 0.4870300E+00, 0.5307800E+00, 0.5624900E+00, &
     & 0.6140200E+00, 0.6707800E+00, 0.7361900E+00, 0.8487700E+00, &
     & 0.9370100E+00, 0.8892600E+00, 0.8094800E+00, 0.8094800E+00 /
      data (ref_adm( 9,iz,11,15),iz = 1,20) / &
     & 0.3855100E+00, 0.3855100E+00, 0.3865100E+00, 0.3893900E+00, &
     & 0.4041500E+00, 0.4162000E+00, 0.4256100E+00, 0.4404100E+00, &
     & 0.4524400E+00, 0.4845400E+00, 0.5184700E+00, 0.5477800E+00, &
     & 0.5874100E+00, 0.6356800E+00, 0.7016300E+00, 0.7828800E+00, &
     & 0.8483300E+00, 0.8122100E+00, 0.7185400E+00, 0.7185400E+00 /
      data (ref_adm( 9,iz,12,15),iz = 1,20) / &
     & 0.3897400E+00, 0.3897400E+00, 0.3902200E+00, 0.3997700E+00, &
     & 0.4023800E+00, 0.4103100E+00, 0.4197700E+00, 0.4355000E+00, &
     & 0.4532000E+00, 0.4718200E+00, 0.4956000E+00, 0.5307400E+00, &
     & 0.5613700E+00, 0.5903500E+00, 0.6473400E+00, 0.7312400E+00, &
     & 0.7834500E+00, 0.7503900E+00, 0.6571600E+00, 0.6571600E+00 /
      data (ref_adm( 9,iz,13,15),iz = 1,20) / &
     & 0.3882800E+00, 0.3882800E+00, 0.3925100E+00, 0.4014800E+00, &
     & 0.4031100E+00, 0.4036200E+00, 0.4095800E+00, 0.4272300E+00, &
     & 0.4430800E+00, 0.4577200E+00, 0.4874900E+00, 0.5037600E+00, &
     & 0.5257500E+00, 0.5544300E+00, 0.6182600E+00, 0.6829600E+00, &
     & 0.7303600E+00, 0.7122800E+00, 0.6421700E+00, 0.6421700E+00 /
      data (ref_adm( 9,iz,14,15),iz = 1,20) / &
     & 0.4007600E+00, 0.4007600E+00, 0.4126300E+00, 0.4153100E+00, &
     & 0.4193500E+00, 0.4228200E+00, 0.4262600E+00, 0.4370400E+00, &
     & 0.4476900E+00, 0.4512900E+00, 0.4679300E+00, 0.4815100E+00, &
     & 0.4924100E+00, 0.5128800E+00, 0.5855700E+00, 0.6361900E+00, &
     & 0.6782800E+00, 0.6668700E+00, 0.5426595E+00, 0.5426595E+00 /
      data (ref_adm( 9,iz,15,15),iz = 1,20) / &
     & 0.4152000E+00, 0.4152000E+00, 0.3961800E+00, 0.3945800E+00, &
     & 0.4006300E+00, 0.4065800E+00, 0.4155200E+00, 0.4296300E+00, &
     & 0.4406800E+00, 0.4579600E+00, 0.4835500E+00, 0.5055900E+00, &
     & 0.5267500E+00, 0.5415500E+00, 0.5633600E+00, 0.5845100E+00, &
     & 0.6380500E+00, 0.6203100E+00, 0.5211342E+00, 0.5211342E+00 /
      data (ref_adm( 9,iz,16,15),iz = 1,20) / &
     & 0.3717100E+00, 0.3717100E+00, 0.3663600E+00, 0.3652300E+00, &
     & 0.3677500E+00, 0.3756700E+00, 0.3811500E+00, 0.3850700E+00, &
     & 0.3979000E+00, 0.4061500E+00, 0.4191400E+00, 0.4305200E+00, &
     & 0.4398600E+00, 0.4605600E+00, 0.5384900E+00, 0.5572700E+00, &
     & 0.5936600E+00, 0.5660086E+00, 0.5024633E+00, 0.5024633E+00 /
      data (ref_adm( 9,iz,17,15),iz = 1,20) / &
     & 0.3844400E+00, 0.3844400E+00, 0.3925900E+00, 0.3980800E+00, &
     & 0.3985700E+00, 0.4097000E+00, 0.4092300E+00, 0.4151400E+00, &
     & 0.4175800E+00, 0.4304900E+00, 0.4476100E+00, 0.4557400E+00, &
     & 0.4789500E+00, 0.4932800E+00, 0.5252200E+00, 0.5370900E+00, &
     & 0.5356600E+00, 0.5415048E+00, 0.4864215E+00, 0.4864215E+00 /
      data (ref_adm( 9,iz,18,15),iz = 1,20) / &
     & 0.3820400E+00, 0.3820400E+00, 0.3980600E+00, 0.3943500E+00, &
     & 0.3932200E+00, 0.3956400E+00, 0.3986500E+00, 0.4134900E+00, &
     & 0.4298700E+00, 0.4346900E+00, 0.4381800E+00, 0.4469000E+00, &
     & 0.4682400E+00, 0.4879300E+00, 0.5067300E+00, 0.5204700E+00, &
     & 0.5415200E+00, 0.5323113E+00, 0.5164585E+00, 0.5164585E+00 /
      data (ref_adm( 9,iz,19,15),iz = 1,20) / &
     & 0.3828200E+00, 0.3828200E+00, 0.3949600E+00, 0.3943700E+00, &
     & 0.3959100E+00, 0.3947000E+00, 0.3904300E+00, 0.4095200E+00, &
     & 0.4269100E+00, 0.4259500E+00, 0.4310900E+00, 0.4434800E+00, &
     & 0.4614500E+00, 0.4715000E+00, 0.4940900E+00, 0.5117300E+00, &
     & 0.5145311E+00, 0.5166799E+00, 0.5060459E+00, 0.5060459E+00 /
      data (ref_adm( 9,iz,20,15),iz = 1,20) / &
     & 0.3894800E+00, 0.3894800E+00, 0.3959200E+00, 0.3986000E+00, &
     & 0.3992100E+00, 0.3961900E+00, 0.4014100E+00, 0.4025500E+00, &
     & 0.4146400E+00, 0.4284300E+00, 0.4372200E+00, 0.4398600E+00, &
     & 0.4536700E+00, 0.4674100E+00, 0.4829200E+00, 0.5104300E+00, &
     & 0.5047208E+00, 0.5067200E+00, 0.5009032E+00, 0.5009032E+00 /
      data (ref_adm( 9,iz,21,15),iz = 1,20) / &
     & 0.4029500E+00, 0.4029500E+00, 0.3998200E+00, 0.3898200E+00, &
     & 0.3948600E+00, 0.3918600E+00, 0.4018600E+00, 0.4134500E+00, &
     & 0.4217900E+00, 0.4247000E+00, 0.4359900E+00, 0.4378200E+00, &
     & 0.4567300E+00, 0.4636700E+00, 0.4783900E+00, 0.4805500E+00, &
     & 0.4983992E+00, 0.5005267E+00, 0.4996526E+00, 0.4996526E+00 /
      data (ref_adm( 9,iz,22,15),iz = 1,20) / &
     & 0.3927700E+00, 0.3927700E+00, 0.3910700E+00, 0.3852700E+00, &
     & 0.3897800E+00, 0.3960300E+00, 0.4029700E+00, 0.4101100E+00, &
     & 0.4138300E+00, 0.4240600E+00, 0.4351500E+00, 0.4446200E+00, &
     & 0.4552400E+00, 0.4693100E+00, 0.4820200E+00, 0.5022500E+00, &
     & 0.4974368E+00, 0.4903625E+00, 0.4763267E+00, 0.4763267E+00 /
      data (ref_adm( 9,iz,23,15),iz = 1,20) / &
     & 0.3767100E+00, 0.3767100E+00, 0.3832200E+00, 0.3833500E+00, &
     & 0.3926400E+00, 0.3968700E+00, 0.4069900E+00, 0.4126700E+00, &
     & 0.4169500E+00, 0.4262800E+00, 0.4312900E+00, 0.4452000E+00, &
     & 0.4572700E+00, 0.4704800E+00, 0.4845200E+00, 0.5087400E+00, &
     & 0.5361500E+00, 0.4896585E+00, 0.4815789E+00, 0.4815789E+00 /
      data (ref_adm( 9,iz,24,15),iz = 1,20) / &
     & 0.3686700E+00, 0.3686700E+00, 0.3658200E+00, 0.3655700E+00, &
     & 0.3674900E+00, 0.3734300E+00, 0.3805700E+00, 0.3895700E+00, &
     & 0.3947400E+00, 0.4016400E+00, 0.4115400E+00, 0.4219000E+00, &
     & 0.4346100E+00, 0.4446900E+00, 0.4806700E+00, 0.5117900E+00, &
     & 0.5167800E+00, 0.4929754E+00, 0.4903010E+00, 0.4903010E+00 /
      data (ref_adm( 9,iz,25,15),iz = 1,20) / &
     & 0.3990500E+00, 0.3990500E+00, 0.4160200E+00, 0.4180900E+00, &
     & 0.4197200E+00, 0.4202400E+00, 0.4260900E+00, 0.4292500E+00, &
     & 0.4388900E+00, 0.4495900E+00, 0.4635800E+00, 0.4763200E+00, &
     & 0.4866300E+00, 0.4859700E+00, 0.4962300E+00, 0.5181000E+00, &
     & 0.5556800E+00, 0.5558600E+00, 0.5017804E+00, 0.5017804E+00 /
      data (ref_adm( 9,iz,26,15),iz = 1,20) / &
     & 0.3988700E+00, 0.3988700E+00, 0.3931400E+00, 0.3943000E+00, &
     & 0.3959000E+00, 0.4057900E+00, 0.4054800E+00, 0.4082600E+00, &
     & 0.4082400E+00, 0.4126700E+00, 0.4235600E+00, 0.4345500E+00, &
     & 0.4524900E+00, 0.4744400E+00, 0.4906900E+00, 0.5314400E+00, &
     & 0.5547000E+00, 0.5681000E+00, 0.5170198E+00, 0.5170198E+00 /
      data (ref_adm( 9,iz,27,15),iz = 1,20) / &
     & 0.3905600E+00, 0.3905600E+00, 0.3951900E+00, 0.3939600E+00, &
     & 0.3961500E+00, 0.4014100E+00, 0.4101200E+00, 0.4115300E+00, &
     & 0.4222500E+00, 0.4291500E+00, 0.4409000E+00, 0.4649200E+00, &
     & 0.4834400E+00, 0.4962300E+00, 0.5194700E+00, 0.5433400E+00, &
     & 0.5592900E+00, 0.5723700E+00, 0.4902200E+00, 0.4902200E+00 /
      data (ref_adm( 9,iz,28,15),iz = 1,20) / &
     & 0.3831900E+00, 0.3831900E+00, 0.3950700E+00, 0.3967700E+00, &
     & 0.3978000E+00, 0.3965300E+00, 0.4044600E+00, 0.4080900E+00, &
     & 0.4191100E+00, 0.4433000E+00, 0.4595300E+00, 0.4708000E+00, &
     & 0.4854600E+00, 0.5119400E+00, 0.5354800E+00, 0.5576400E+00, &
     & 0.5791800E+00, 0.5820200E+00, 0.5241000E+00, 0.5241000E+00 /
      data (ref_adm( 9,iz,29,15),iz = 1,20) / &
     & 0.3899400E+00, 0.3899400E+00, 0.3886400E+00, 0.3935500E+00, &
     & 0.3900800E+00, 0.3937500E+00, 0.4058600E+00, 0.4156500E+00, &
     & 0.4266900E+00, 0.4469000E+00, 0.4675100E+00, 0.4875900E+00, &
     & 0.5044100E+00, 0.5328400E+00, 0.5528800E+00, 0.5916100E+00, &
     & 0.6081600E+00, 0.6120500E+00, 0.5316200E+00, 0.5316200E+00 /
      data (ref_adm( 9,iz,30,15),iz = 1,20) / &
     & 0.3908500E+00, 0.3908500E+00, 0.3876400E+00, 0.3874400E+00, &
     & 0.3936600E+00, 0.4030900E+00, 0.4115600E+00, 0.4222200E+00, &
     & 0.4327900E+00, 0.4543200E+00, 0.4791000E+00, 0.4994700E+00, &
     & 0.5165100E+00, 0.5460000E+00, 0.5642800E+00, 0.6021200E+00, &
     & 0.6206700E+00, 0.6302000E+00, 0.5480400E+00, 0.5480400E+00 /
      data (ref_adm( 9,iz,31,15),iz = 1,20) / &
     & 0.3881900E+00, 0.3881900E+00, 0.3872900E+00, 0.3831200E+00, &
     & 0.3897600E+00, 0.4043800E+00, 0.4221300E+00, 0.4358400E+00, &
     & 0.4546900E+00, 0.4642400E+00, 0.4852200E+00, 0.4981900E+00, &
     & 0.5238100E+00, 0.5555800E+00, 0.5705800E+00, 0.6051400E+00, &
     & 0.6327900E+00, 0.6424200E+00, 0.5600000E+00, 0.5600000E+00 /
      data (ref_adm( 9,iz,32,15),iz = 1,20) / &
     & 0.3921300E+00, 0.3921300E+00, 0.3942200E+00, 0.4005000E+00, &
     & 0.4073800E+00, 0.4158700E+00, 0.4282900E+00, 0.4449100E+00, &
     & 0.4638500E+00, 0.4777100E+00, 0.4874300E+00, 0.5062100E+00, &
     & 0.5339500E+00, 0.5593900E+00, 0.5838800E+00, 0.6185700E+00, &
     & 0.6436500E+00, 0.6549300E+00, 0.5655800E+00, 0.5655800E+00 /
      data (ref_adm( 9,iz,33,15),iz = 1,20) / &
     & 0.3874500E+00, 0.3874500E+00, 0.3800100E+00, 0.3879000E+00, &
     & 0.3966400E+00, 0.4024600E+00, 0.4154800E+00, 0.4311900E+00, &
     & 0.4517500E+00, 0.4711700E+00, 0.4806400E+00, 0.5001900E+00, &
     & 0.5287000E+00, 0.5618700E+00, 0.5912600E+00, 0.6276000E+00, &
     & 0.6534600E+00, 0.6556200E+00, 0.5662400E+00, 0.5662400E+00 /
      data (ref_adm( 9,iz,34,15),iz = 1,20) / &
     & 0.3830700E+00, 0.3830700E+00, 0.3898000E+00, 0.3904500E+00, &
     & 0.3933900E+00, 0.3989000E+00, 0.4153900E+00, 0.4307100E+00, &
     & 0.4510800E+00, 0.4676900E+00, 0.4862800E+00, 0.5046500E+00, &
     & 0.5334800E+00, 0.5605400E+00, 0.5907000E+00, 0.6215700E+00, &
     & 0.6569600E+00, 0.6625700E+00, 0.5689400E+00, 0.5689400E+00 /
      data (ref_adm( 9,iz,35,15),iz = 1,20) / &
     & 0.3893600E+00, 0.3893600E+00, 0.3853700E+00, 0.3911100E+00, &
     & 0.3904800E+00, 0.4061500E+00, 0.4207200E+00, 0.4412000E+00, &
     & 0.4550100E+00, 0.4691100E+00, 0.4873000E+00, 0.5071100E+00, &
     & 0.5359300E+00, 0.5686300E+00, 0.6035800E+00, 0.6388000E+00, &
     & 0.6669000E+00, 0.6659000E+00, 0.5669200E+00, 0.5669200E+00 /
      data (ref_adm( 9,iz,36,15),iz = 1,20) / &
     & 0.3816400E+00, 0.3816400E+00, 0.3885700E+00, 0.3891100E+00, &
     & 0.3976200E+00, 0.4027100E+00, 0.4243100E+00, 0.4451600E+00, &
     & 0.4565100E+00, 0.4686500E+00, 0.4865700E+00, 0.5141600E+00, &
     & 0.5414700E+00, 0.5811500E+00, 0.6169100E+00, 0.6535100E+00, &
     & 0.6805400E+00, 0.6708700E+00, 0.5687500E+00, 0.5687500E+00 /
      data (ref_adm( 9,iz,37,15),iz = 1,20) / &
     & 0.3887100E+00, 0.3887100E+00, 0.3879300E+00, 0.3950800E+00, &
     & 0.4000400E+00, 0.4109900E+00, 0.4160700E+00, 0.4406600E+00, &
     & 0.4601600E+00, 0.4731500E+00, 0.4887800E+00, 0.5096100E+00, &
     & 0.5420600E+00, 0.5846500E+00, 0.6341300E+00, 0.6789200E+00, &
     & 0.6937100E+00, 0.6789600E+00, 0.5683500E+00, 0.5683500E+00 /
      data (ref_adm( 9,iz,38,15),iz = 1,20) / &
     & 0.3887100E+00, 0.3887100E+00, 0.3879300E+00, 0.3950800E+00, &
     & 0.4000400E+00, 0.4109900E+00, 0.4160700E+00, 0.4406600E+00, &
     & 0.4601600E+00, 0.4731500E+00, 0.4887800E+00, 0.5096100E+00, &
     & 0.5420600E+00, 0.5846500E+00, 0.6341300E+00, 0.6789200E+00, &
     & 0.6937100E+00, 0.6789600E+00, 0.5683500E+00, 0.5683500E+00 /
! Solar Zenith Angle 75.0 Albedo  0.5404629E+00
      data (ref_adm( 9,iz, 1,16),iz = 1,20) / &
     & 0.3917600E+00, 0.3917600E+00, 0.3968100E+00, 0.4018300E+00, &
     & 0.4253700E+00, 0.4453300E+00, 0.4694300E+00, 0.5013000E+00, &
     & 0.5441100E+00, 0.5909200E+00, 0.6631900E+00, 0.7819400E+00, &
     & 0.9136400E+00, 0.1064100E+01, 0.1200961E+01, 0.1451124E+01, &
     & 0.1744696E+01, 0.2152730E+01, 0.1778388E+01, 0.1778388E+01 /
      data (ref_adm( 9,iz, 2,16),iz = 1,20) / &
     & 0.3917600E+00, 0.3917600E+00, 0.3968100E+00, 0.4018300E+00, &
     & 0.4253700E+00, 0.4453300E+00, 0.4694300E+00, 0.5013000E+00, &
     & 0.5441100E+00, 0.5909200E+00, 0.6631900E+00, 0.7819400E+00, &
     & 0.9136400E+00, 0.1064100E+01, 0.1200961E+01, 0.1451124E+01, &
     & 0.1744696E+01, 0.2152730E+01, 0.1778388E+01, 0.1778388E+01 /
      data (ref_adm( 9,iz, 3,16),iz = 1,20) / &
     & 0.3897600E+00, 0.3897600E+00, 0.3982000E+00, 0.4056400E+00, &
     & 0.4203300E+00, 0.4428500E+00, 0.4640500E+00, 0.4946600E+00, &
     & 0.5374100E+00, 0.5948400E+00, 0.6714600E+00, 0.7779000E+00, &
     & 0.8785000E+00, 0.9879600E+00, 0.1186735E+01, 0.1427621E+01, &
     & 0.1703854E+01, 0.2067271E+01, 0.7832335E+00, 0.7832335E+00 /
      data (ref_adm( 9,iz, 4,16),iz = 1,20) / &
     & 0.3900100E+00, 0.3900100E+00, 0.4017600E+00, 0.4054700E+00, &
     & 0.4177500E+00, 0.4333500E+00, 0.4547100E+00, 0.4916100E+00, &
     & 0.5313900E+00, 0.5881700E+00, 0.6560000E+00, 0.7632000E+00, &
     & 0.8564200E+00, 0.9469000E+00, 0.1156450E+01, 0.1379878E+01, &
     & 0.1622729E+01, 0.1911783E+01, 0.1565033E+01, 0.1565033E+01 /
      data (ref_adm( 9,iz, 5,16),iz = 1,20) / &
     & 0.3941400E+00, 0.3941400E+00, 0.3958600E+00, 0.4033500E+00, &
     & 0.4173700E+00, 0.4351400E+00, 0.4562800E+00, 0.4833300E+00, &
     & 0.5248600E+00, 0.5773800E+00, 0.6482200E+00, 0.7274100E+00, &
     & 0.8257000E+00, 0.9141700E+00, 0.1114666E+01, 0.1316680E+01, &
     & 0.1519974E+01, 0.1732454E+01, 0.1376428E+01, 0.1376428E+01 /
      data (ref_adm( 9,iz, 6,16),iz = 1,20) / &
     & 0.3869800E+00, 0.3869800E+00, 0.3946400E+00, 0.4016500E+00, &
     & 0.4135000E+00, 0.4260600E+00, 0.4465800E+00, 0.4808300E+00, &
     & 0.5170500E+00, 0.5623300E+00, 0.6273900E+00, 0.7150800E+00, &
     & 0.8201200E+00, 0.9673400E+00, 0.1160300E+01, 0.1408400E+01, &
     & 0.1691300E+01, 0.1794800E+01, 0.1563500E+01, 0.1563500E+01 /
      data (ref_adm( 9,iz, 7,16),iz = 1,20) / &
     & 0.4032400E+00, 0.4032400E+00, 0.4164500E+00, 0.4174100E+00, &
     & 0.4301700E+00, 0.4450900E+00, 0.4647700E+00, 0.4902100E+00, &
     & 0.5229600E+00, 0.5584100E+00, 0.6065100E+00, 0.6774900E+00, &
     & 0.7701700E+00, 0.8964500E+00, 0.1044000E+01, 0.1232100E+01, &
     & 0.1481300E+01, 0.1584900E+01, 0.1382800E+01, 0.1382800E+01 /
      data (ref_adm( 9,iz, 8,16),iz = 1,20) / &
     & 0.4014900E+00, 0.4014900E+00, 0.4054700E+00, 0.4136300E+00, &
     & 0.4209100E+00, 0.4353700E+00, 0.4518200E+00, 0.4787600E+00, &
     & 0.5052200E+00, 0.5395400E+00, 0.5931200E+00, 0.6594700E+00, &
     & 0.7388500E+00, 0.8537500E+00, 0.9973200E+00, 0.1141700E+01, &
     & 0.1343700E+01, 0.1363300E+01, 0.1243300E+01, 0.1243300E+01 /
      data (ref_adm( 9,iz, 9,16),iz = 1,20) / &
     & 0.4001600E+00, 0.4001600E+00, 0.4048300E+00, 0.4087900E+00, &
     & 0.4184700E+00, 0.4272300E+00, 0.4481900E+00, 0.4745100E+00, &
     & 0.5002000E+00, 0.5315700E+00, 0.5764900E+00, 0.6298600E+00, &
     & 0.6981700E+00, 0.7945000E+00, 0.8955800E+00, 0.1052600E+01, &
     & 0.1199800E+01, 0.1197900E+01, 0.1099600E+01, 0.1099600E+01 /
      data (ref_adm( 9,iz,10,16),iz = 1,20) / &
     & 0.3928300E+00, 0.3928300E+00, 0.3960600E+00, 0.4096800E+00, &
     & 0.4127700E+00, 0.4258400E+00, 0.4371000E+00, 0.4654200E+00, &
     & 0.4878100E+00, 0.5188400E+00, 0.5618400E+00, 0.6013300E+00, &
     & 0.6633700E+00, 0.7356400E+00, 0.8167800E+00, 0.9652300E+00, &
     & 0.1085300E+01, 0.1066200E+01, 0.9558400E+00, 0.9558400E+00 /
      data (ref_adm( 9,iz,11,16),iz = 1,20) / &
     & 0.3927200E+00, 0.3927200E+00, 0.3932500E+00, 0.4024700E+00, &
     & 0.4113200E+00, 0.4247200E+00, 0.4334500E+00, 0.4567300E+00, &
     & 0.4864700E+00, 0.5087100E+00, 0.5408900E+00, 0.5731400E+00, &
     & 0.6260100E+00, 0.6967600E+00, 0.7765100E+00, 0.8684200E+00, &
     & 0.9752800E+00, 0.9530700E+00, 0.8509000E+00, 0.8509000E+00 /
      data (ref_adm( 9,iz,12,16),iz = 1,20) / &
     & 0.3907600E+00, 0.3907600E+00, 0.3952700E+00, 0.4004200E+00, &
     & 0.4104100E+00, 0.4189400E+00, 0.4363600E+00, 0.4546300E+00, &
     & 0.4736000E+00, 0.4917500E+00, 0.5246100E+00, 0.5542800E+00, &
     & 0.5933500E+00, 0.6479900E+00, 0.7255600E+00, 0.8005500E+00, &
     & 0.8785400E+00, 0.8607600E+00, 0.7840300E+00, 0.7840300E+00 /
      data (ref_adm( 9,iz,13,16),iz = 1,20) / &
     & 0.3928600E+00, 0.3928600E+00, 0.3912200E+00, 0.3985900E+00, &
     & 0.4067700E+00, 0.4138100E+00, 0.4292700E+00, 0.4371200E+00, &
     & 0.4533600E+00, 0.4744800E+00, 0.4997800E+00, 0.5306400E+00, &
     & 0.5711200E+00, 0.6210800E+00, 0.6857600E+00, 0.7552600E+00, &
     & 0.8007200E+00, 0.7931900E+00, 0.7489400E+00, 0.7489400E+00 /
      data (ref_adm( 9,iz,14,16),iz = 1,20) / &
     & 0.4135500E+00, 0.4135500E+00, 0.4255500E+00, 0.4256200E+00, &
     & 0.4304000E+00, 0.4336400E+00, 0.4429200E+00, 0.4541000E+00, &
     & 0.4647900E+00, 0.4797900E+00, 0.4944700E+00, 0.5149800E+00, &
     & 0.5388000E+00, 0.5686500E+00, 0.6498100E+00, 0.7118700E+00, &
     & 0.7495100E+00, 0.7482100E+00, 0.6379966E+00, 0.6379966E+00 /
      data (ref_adm( 9,iz,15,16),iz = 1,20) / &
     & 0.3999300E+00, 0.3999300E+00, 0.3870800E+00, 0.3870000E+00, &
     & 0.3914900E+00, 0.3980300E+00, 0.4050100E+00, 0.4202800E+00, &
     & 0.4335400E+00, 0.4536400E+00, 0.4714700E+00, 0.4997400E+00, &
     & 0.5309900E+00, 0.5648600E+00, 0.6114800E+00, 0.6613500E+00, &
     & 0.7124600E+00, 0.7311200E+00, 0.6076022E+00, 0.6076022E+00 /
      data (ref_adm( 9,iz,16,16),iz = 1,20) / &
     & 0.3797300E+00, 0.3797300E+00, 0.3725700E+00, 0.3736200E+00, &
     & 0.3790300E+00, 0.3875000E+00, 0.3934600E+00, 0.4017600E+00, &
     & 0.4130000E+00, 0.4282600E+00, 0.4436900E+00, 0.4571800E+00, &
     & 0.4777400E+00, 0.5050100E+00, 0.5755100E+00, 0.6235100E+00, &
     & 0.6639200E+00, 0.6427665E+00, 0.5823883E+00, 0.5823883E+00 /
      data (ref_adm( 9,iz,17,16),iz = 1,20) / &
     & 0.3828800E+00, 0.3828800E+00, 0.3874600E+00, 0.3890700E+00, &
     & 0.3898000E+00, 0.3964900E+00, 0.4028000E+00, 0.4178400E+00, &
     & 0.4260200E+00, 0.4307400E+00, 0.4461500E+00, 0.4633900E+00, &
     & 0.4851200E+00, 0.5105700E+00, 0.5419500E+00, 0.5892100E+00, &
     & 0.6199300E+00, 0.6112041E+00, 0.5609756E+00, 0.5609756E+00 /
      data (ref_adm( 9,iz,18,16),iz = 1,20) / &
     & 0.3794800E+00, 0.3794800E+00, 0.3869400E+00, 0.3863600E+00, &
     & 0.3905300E+00, 0.3969800E+00, 0.4013100E+00, 0.4105600E+00, &
     & 0.4152700E+00, 0.4321400E+00, 0.4494700E+00, 0.4615700E+00, &
     & 0.4804600E+00, 0.4986900E+00, 0.5248900E+00, 0.5562200E+00, &
     & 0.5867707E+00, 0.5963573E+00, 0.5732375E+00, 0.5732375E+00 /
      data (ref_adm( 9,iz,19,16),iz = 1,20) / &
     & 0.3809800E+00, 0.3809800E+00, 0.3951300E+00, 0.3928300E+00, &
     & 0.3906000E+00, 0.3906500E+00, 0.3947800E+00, 0.4080900E+00, &
     & 0.4177500E+00, 0.4286400E+00, 0.4402600E+00, 0.4523900E+00, &
     & 0.4687000E+00, 0.4937100E+00, 0.5104500E+00, 0.5383600E+00, &
     & 0.5664111E+00, 0.5750435E+00, 0.5604016E+00, 0.5604016E+00 /
      data (ref_adm( 9,iz,20,16),iz = 1,20) / &
     & 0.3974300E+00, 0.3974300E+00, 0.3922300E+00, 0.3907400E+00, &
     & 0.3930900E+00, 0.3937200E+00, 0.3888000E+00, 0.4009300E+00, &
     & 0.4093700E+00, 0.4194800E+00, 0.4330600E+00, 0.4488500E+00, &
     & 0.4603400E+00, 0.4823200E+00, 0.5014000E+00, 0.3852000E+00, &
     & 0.5518152E+00, 0.5607443E+00, 0.5537354E+00, 0.5537354E+00 /
      data (ref_adm( 9,iz,21,16),iz = 1,20) / &
     & 0.3927200E+00, 0.3927200E+00, 0.3898100E+00, 0.3893200E+00, &
     & 0.3853800E+00, 0.3890500E+00, 0.3899800E+00, 0.4025600E+00, &
     & 0.4095100E+00, 0.4249000E+00, 0.4341500E+00, 0.4469100E+00, &
     & 0.4612100E+00, 0.4812600E+00, 0.5045000E+00, 0.5319900E+00, &
     & 0.5411047E+00, 0.5507084E+00, 0.5516179E+00, 0.5516179E+00 /
      data (ref_adm( 9,iz,22,16),iz = 1,20) / &
     & 0.3851600E+00, 0.3851600E+00, 0.3903500E+00, 0.3861200E+00, &
     & 0.3864300E+00, 0.3864200E+00, 0.3967200E+00, 0.4010800E+00, &
     & 0.4104000E+00, 0.4254700E+00, 0.4408200E+00, 0.4490400E+00, &
     & 0.4624500E+00, 0.4836800E+00, 0.5108000E+00, 0.5359900E+00, &
     & 0.5451717E+00, 0.5514100E+00, 0.5549115E+00, 0.5549115E+00 /
      data (ref_adm( 9,iz,23,16),iz = 1,20) / &
     & 0.3651100E+00, 0.3651100E+00, 0.3672000E+00, 0.3759500E+00, &
     & 0.3791800E+00, 0.3826600E+00, 0.3876500E+00, 0.3903200E+00, &
     & 0.4073000E+00, 0.4214800E+00, 0.4401500E+00, 0.4477400E+00, &
     & 0.4613500E+00, 0.4841300E+00, 0.5154200E+00, 0.5461600E+00, &
     & 0.5434400E+00, 0.5495553E+00, 0.5611836E+00, 0.5611836E+00 /
      data (ref_adm( 9,iz,24,16),iz = 1,20) / &
     & 0.3770700E+00, 0.3770700E+00, 0.3731400E+00, 0.3750900E+00, &
     & 0.3782600E+00, 0.3823500E+00, 0.3880000E+00, 0.3956400E+00, &
     & 0.4039500E+00, 0.4100600E+00, 0.4220100E+00, 0.4322200E+00, &
     & 0.4478000E+00, 0.4680500E+00, 0.4996500E+00, 0.5480600E+00, &
     & 0.5724900E+00, 0.5523725E+00, 0.5719383E+00, 0.5719383E+00 /
      data (ref_adm( 9,iz,25,16),iz = 1,20) / &
     & 0.3967700E+00, 0.3967700E+00, 0.4073900E+00, 0.4095000E+00, &
     & 0.4146000E+00, 0.4152000E+00, 0.4216700E+00, 0.4242100E+00, &
     & 0.4302400E+00, 0.4376300E+00, 0.4479500E+00, 0.4612100E+00, &
     & 0.4800000E+00, 0.5059800E+00, 0.5240500E+00, 0.5615100E+00, &
     & 0.6037600E+00, 0.5901900E+00, 0.5862808E+00, 0.5862808E+00 /
      data (ref_adm( 9,iz,26,16),iz = 1,20) / &
     & 0.3983100E+00, 0.3983100E+00, 0.3841600E+00, 0.3923600E+00, &
     & 0.3926500E+00, 0.4004900E+00, 0.4093000E+00, 0.4216300E+00, &
     & 0.4287600E+00, 0.4346100E+00, 0.4480900E+00, 0.4518800E+00, &
     & 0.4630300E+00, 0.4888500E+00, 0.5201700E+00, 0.5687200E+00, &
     & 0.5998700E+00, 0.6260500E+00, 0.6054960E+00, 0.6054960E+00 /
      data (ref_adm( 9,iz,27,16),iz = 1,20) / &
     & 0.3885000E+00, 0.3885000E+00, 0.3857500E+00, 0.3897200E+00, &
     & 0.4001400E+00, 0.4004200E+00, 0.4091900E+00, 0.4225400E+00, &
     & 0.4347200E+00, 0.4378100E+00, 0.4502400E+00, 0.4669900E+00, &
     & 0.4866900E+00, 0.5165100E+00, 0.5473400E+00, 0.5826400E+00, &
     & 0.6148800E+00, 0.6484400E+00, 0.5932600E+00, 0.5932600E+00 /
      data (ref_adm( 9,iz,28,16),iz = 1,20) / &
     & 0.3823000E+00, 0.3823000E+00, 0.3932500E+00, 0.3937900E+00, &
     & 0.4001100E+00, 0.4061200E+00, 0.4135400E+00, 0.4125200E+00, &
     & 0.4312700E+00, 0.4446100E+00, 0.4568200E+00, 0.4768500E+00, &
     & 0.4972500E+00, 0.5286100E+00, 0.5598000E+00, 0.6086000E+00, &
     & 0.6455400E+00, 0.6728600E+00, 0.6131700E+00, 0.6131700E+00 /
      data (ref_adm( 9,iz,29,16),iz = 1,20) / &
     & 0.3906700E+00, 0.3906700E+00, 0.3916900E+00, 0.4003400E+00, &
     & 0.4040600E+00, 0.4022300E+00, 0.4090800E+00, 0.4227000E+00, &
     & 0.4341200E+00, 0.4442400E+00, 0.4631900E+00, 0.4863700E+00, &
     & 0.5095000E+00, 0.5521100E+00, 0.5863600E+00, 0.6366300E+00, &
     & 0.6780200E+00, 0.7005200E+00, 0.6310900E+00, 0.6310900E+00 /
      data (ref_adm( 9,iz,30,16),iz = 1,20) / &
     & 0.3964800E+00, 0.3964800E+00, 0.3933100E+00, 0.3930500E+00, &
     & 0.3952200E+00, 0.4031400E+00, 0.4074600E+00, 0.4245900E+00, &
     & 0.4340800E+00, 0.4478700E+00, 0.4757100E+00, 0.5031000E+00, &
     & 0.5281200E+00, 0.5653900E+00, 0.5977000E+00, 0.6537100E+00, &
     & 0.7015200E+00, 0.7305000E+00, 0.6582300E+00, 0.6582300E+00 /
      data (ref_adm( 9,iz,31,16),iz = 1,20) / &
     & 0.3974600E+00, 0.3974600E+00, 0.3930800E+00, 0.3926300E+00, &
     & 0.3959400E+00, 0.4010600E+00, 0.4133500E+00, 0.4185600E+00, &
     & 0.4420900E+00, 0.4578500E+00, 0.4793700E+00, 0.5162300E+00, &
     & 0.5414300E+00, 0.5714600E+00, 0.6013500E+00, 0.6608200E+00, &
     & 0.7083800E+00, 0.7447600E+00, 0.6705000E+00, 0.6705000E+00 /
      data (ref_adm( 9,iz,32,16),iz = 1,20) / &
     & 0.3976600E+00, 0.3976600E+00, 0.4079100E+00, 0.4074700E+00, &
     & 0.4141600E+00, 0.4147300E+00, 0.4249500E+00, 0.4340000E+00, &
     & 0.4497100E+00, 0.4753200E+00, 0.5002900E+00, 0.5223800E+00, &
     & 0.5465900E+00, 0.5758400E+00, 0.6111200E+00, 0.6633500E+00, &
     & 0.7161000E+00, 0.7518300E+00, 0.6777600E+00, 0.6777600E+00 /
      data (ref_adm( 9,iz,33,16),iz = 1,20) / &
     & 0.3900800E+00, 0.3900800E+00, 0.3843400E+00, 0.3862600E+00, &
     & 0.3917600E+00, 0.4004000E+00, 0.4114900E+00, 0.4278500E+00, &
     & 0.4466900E+00, 0.4725300E+00, 0.4934500E+00, 0.5165800E+00, &
     & 0.5417500E+00, 0.5775200E+00, 0.6156100E+00, 0.6677800E+00, &
     & 0.7263200E+00, 0.7666300E+00, 0.6870700E+00, 0.6870700E+00 /
      data (ref_adm( 9,iz,34,16),iz = 1,20) / &
     & 0.3830700E+00, 0.3830700E+00, 0.3826100E+00, 0.3901300E+00, &
     & 0.3962900E+00, 0.4014900E+00, 0.4144900E+00, 0.4298100E+00, &
     & 0.4492400E+00, 0.4744100E+00, 0.4941600E+00, 0.5140700E+00, &
     & 0.5435000E+00, 0.5825200E+00, 0.6221200E+00, 0.6739500E+00, &
     & 0.7427200E+00, 0.7854800E+00, 0.6978900E+00, 0.6978900E+00 /
      data (ref_adm( 9,iz,35,16),iz = 1,20) / &
     & 0.3884700E+00, 0.3884700E+00, 0.3937900E+00, 0.3895900E+00, &
     & 0.3999200E+00, 0.4099900E+00, 0.4154700E+00, 0.4380600E+00, &
     & 0.4591800E+00, 0.4815600E+00, 0.4943000E+00, 0.5136100E+00, &
     & 0.5533300E+00, 0.5872000E+00, 0.6267200E+00, 0.6850600E+00, &
     & 0.7443800E+00, 0.7900200E+00, 0.6986600E+00, 0.6986600E+00 /
      data (ref_adm( 9,iz,36,16),iz = 1,20) / &
     & 0.3879200E+00, 0.3879200E+00, 0.3919000E+00, 0.3880300E+00, &
     & 0.3960700E+00, 0.4051100E+00, 0.4159400E+00, 0.4298500E+00, &
     & 0.4591000E+00, 0.4764900E+00, 0.4953400E+00, 0.5212000E+00, &
     & 0.5529400E+00, 0.5936000E+00, 0.6367700E+00, 0.7003500E+00, &
     & 0.7653400E+00, 0.7973100E+00, 0.7028900E+00, 0.7028900E+00 /
      data (ref_adm( 9,iz,37,16),iz = 1,20) / &
     & 0.3845500E+00, 0.3845500E+00, 0.3912100E+00, 0.3964000E+00, &
     & 0.3983000E+00, 0.4101000E+00, 0.4136100E+00, 0.4251900E+00, &
     & 0.4553900E+00, 0.4810700E+00, 0.4970600E+00, 0.5235400E+00, &
     & 0.5564600E+00, 0.5989700E+00, 0.6480500E+00, 0.7199700E+00, &
     & 0.7928000E+00, 0.8137900E+00, 0.7147000E+00, 0.7147000E+00 /
      data (ref_adm( 9,iz,38,16),iz = 1,20) / &
     & 0.3845500E+00, 0.3845500E+00, 0.3912100E+00, 0.3964000E+00, &
     & 0.3983000E+00, 0.4101000E+00, 0.4136100E+00, 0.4251900E+00, &
     & 0.4553900E+00, 0.4810700E+00, 0.4970600E+00, 0.5235400E+00, &
     & 0.5564600E+00, 0.5989700E+00, 0.6480500E+00, 0.7199700E+00, &
     & 0.7928000E+00, 0.8137900E+00, 0.7147000E+00, 0.7147000E+00 /
! Solar Zenith Angle 80.0 Albedo  0.5652873E+00
      data (ref_adm( 9,iz, 1,17),iz = 1,20) / &
     & 0.3820600E+00, 0.3820600E+00, 0.3871200E+00, 0.3986700E+00, &
     & 0.4225900E+00, 0.4450400E+00, 0.4649200E+00, 0.4993400E+00, &
     & 0.5472300E+00, 0.6147900E+00, 0.7015400E+00, 0.8215200E+00, &
     & 0.9886270E+00, 0.1157177E+01, 0.1415873E+01, 0.1829619E+01, &
     & 0.2403320E+01, 0.3227159E+01, 0.2315371E+01, 0.2315371E+01 /
      data (ref_adm( 9,iz, 2,17),iz = 1,20) / &
     & 0.3820600E+00, 0.3820600E+00, 0.3871200E+00, 0.3986700E+00, &
     & 0.4225900E+00, 0.4450400E+00, 0.4649200E+00, 0.4993400E+00, &
     & 0.5472300E+00, 0.6147900E+00, 0.7015400E+00, 0.8215200E+00, &
     & 0.9886270E+00, 0.1157177E+01, 0.1415873E+01, 0.1829619E+01, &
     & 0.2403320E+01, 0.3227159E+01, 0.2315371E+01, 0.2315371E+01 /
      data (ref_adm( 9,iz, 3,17),iz = 1,20) / &
     & 0.3810500E+00, 0.3810500E+00, 0.3927700E+00, 0.4007100E+00, &
     & 0.4110400E+00, 0.4387900E+00, 0.4663200E+00, 0.5000500E+00, &
     & 0.5474600E+00, 0.6067600E+00, 0.6927400E+00, 0.8084300E+00, &
     & 0.9783471E+00, 0.1143754E+01, 0.1393869E+01, 0.1787014E+01, &
     & 0.2313676E+01, 0.3152350E+01, 0.9121477E+00, 0.9121477E+00 /
      data (ref_adm( 9,iz, 4,17),iz = 1,20) / &
     & 0.3822200E+00, 0.3822200E+00, 0.3887400E+00, 0.3929900E+00, &
     & 0.4069300E+00, 0.4318300E+00, 0.4661400E+00, 0.5038100E+00, &
     & 0.5366800E+00, 0.5987400E+00, 0.6863000E+00, 0.7897800E+00, &
     & 0.9568864E+00, 0.1115269E+01, 0.1348429E+01, 0.1701188E+01, &
     & 0.2146157E+01, 0.2855828E+01, 0.2254221E+01, 0.2254221E+01 /
      data (ref_adm( 9,iz, 5,17),iz = 1,20) / &
     & 0.3778300E+00, 0.3778300E+00, 0.3828600E+00, 0.3932800E+00, &
     & 0.4074000E+00, 0.4263200E+00, 0.4636200E+00, 0.4916600E+00, &
     & 0.5347200E+00, 0.5913100E+00, 0.6725500E+00, 0.7522700E+00, &
     & 0.9260649E+00, 0.1075548E+01, 0.1288384E+01, 0.1591439E+01, &
     & 0.1951809E+01, 0.2429525E+01, 0.2069377E+01, 0.2069377E+01 /
      data (ref_adm( 9,iz, 6,17),iz = 1,20) / &
     & 0.3706800E+00, 0.3706800E+00, 0.3737800E+00, 0.3831400E+00, &
     & 0.3995700E+00, 0.4229000E+00, 0.4460500E+00, 0.4735500E+00, &
     & 0.5148200E+00, 0.5751300E+00, 0.6472600E+00, 0.7404200E+00, &
     & 0.8928600E+00, 0.1086100E+01, 0.1307000E+01, 0.1609600E+01, &
     & 0.1946200E+01, 0.2206400E+01, 0.1903600E+01, 0.1903600E+01 /
      data (ref_adm( 9,iz, 7,17),iz = 1,20) / &
     & 0.3810900E+00, 0.3810900E+00, 0.3909800E+00, 0.4044400E+00, &
     & 0.4201400E+00, 0.4337700E+00, 0.4587500E+00, 0.4883700E+00, &
     & 0.5245600E+00, 0.5752000E+00, 0.6381400E+00, 0.7214900E+00, &
     & 0.8504100E+00, 0.9964600E+00, 0.1174600E+01, 0.1422800E+01, &
     & 0.1779600E+01, 0.1939100E+01, 0.1683000E+01, 0.1683000E+01 /
      data (ref_adm( 9,iz, 8,17),iz = 1,20) / &
     & 0.3758300E+00, 0.3758300E+00, 0.3796200E+00, 0.3880500E+00, &
     & 0.3983200E+00, 0.4153300E+00, 0.4426800E+00, 0.4715300E+00, &
     & 0.5036700E+00, 0.5456700E+00, 0.6032800E+00, 0.6788300E+00, &
     & 0.8081900E+00, 0.9489000E+00, 0.1098600E+01, 0.1327100E+01, &
     & 0.1629800E+01, 0.1706500E+01, 0.1508700E+01, 0.1508700E+01 /
      data (ref_adm( 9,iz, 9,17),iz = 1,20) / &
     & 0.3747500E+00, 0.3747500E+00, 0.3859000E+00, 0.3883000E+00, &
     & 0.3985200E+00, 0.4076000E+00, 0.4337000E+00, 0.4609400E+00, &
     & 0.4907600E+00, 0.5304300E+00, 0.5821500E+00, 0.6438800E+00, &
     & 0.7530500E+00, 0.8773800E+00, 0.1005000E+01, 0.1198700E+01, &
     & 0.1420200E+01, 0.1487700E+01, 0.1309500E+01, 0.1309500E+01 /
      data (ref_adm( 9,iz,10,17),iz = 1,20) / &
     & 0.3729100E+00, 0.3729100E+00, 0.3732300E+00, 0.3883400E+00, &
     & 0.3982300E+00, 0.4115400E+00, 0.4279400E+00, 0.4547100E+00, &
     & 0.4790200E+00, 0.5195800E+00, 0.5675900E+00, 0.6193400E+00, &
     & 0.7218200E+00, 0.8202200E+00, 0.9391200E+00, 0.1094200E+01, &
     & 0.1266300E+01, 0.1302500E+01, 0.1155100E+01, 0.1155100E+01 /
      data (ref_adm( 9,iz,11,17),iz = 1,20) / &
     & 0.3769400E+00, 0.3769400E+00, 0.3783100E+00, 0.3774200E+00, &
     & 0.3936200E+00, 0.4111200E+00, 0.4274900E+00, 0.4411000E+00, &
     & 0.4728300E+00, 0.5069000E+00, 0.5510700E+00, 0.5887000E+00, &
     & 0.6718600E+00, 0.7632700E+00, 0.8676400E+00, 0.1002500E+01, &
     & 0.1123900E+01, 0.1147900E+01, 0.1056200E+01, 0.1056200E+01 /
      data (ref_adm( 9,iz,12,17),iz = 1,20) / &
     & 0.3717600E+00, 0.3717600E+00, 0.3771100E+00, 0.3834200E+00, &
     & 0.3956300E+00, 0.4091800E+00, 0.4217100E+00, 0.4442800E+00, &
     & 0.4727300E+00, 0.4911200E+00, 0.5279300E+00, 0.5644200E+00, &
     & 0.6381500E+00, 0.7141500E+00, 0.7963900E+00, 0.9121700E+00, &
     & 0.1016300E+01, 0.1027200E+01, 0.9690800E+00, 0.9690800E+00 /
      data (ref_adm( 9,iz,13,17),iz = 1,20) / &
     & 0.3701100E+00, 0.3701100E+00, 0.3821000E+00, 0.3811700E+00, &
     & 0.3936400E+00, 0.4020300E+00, 0.4186300E+00, 0.4370800E+00, &
     & 0.4566800E+00, 0.4824500E+00, 0.5062800E+00, 0.5417600E+00, &
     & 0.6014000E+00, 0.6736700E+00, 0.7272300E+00, 0.8209600E+00, &
     & 0.9325800E+00, 0.9553700E+00, 0.8692800E+00, 0.8692800E+00 /
      data (ref_adm( 9,iz,14,17),iz = 1,20) / &
     & 0.4089100E+00, 0.4089100E+00, 0.4189100E+00, 0.4197600E+00, &
     & 0.4268700E+00, 0.4384100E+00, 0.4476600E+00, 0.4574400E+00, &
     & 0.4709800E+00, 0.4910200E+00, 0.5068200E+00, 0.5364400E+00, &
     & 0.5668300E+00, 0.5992100E+00, 0.6694800E+00, 0.7575200E+00, &
     & 0.8433400E+00, 0.9232100E+00, 0.7632990E+00, 0.7632990E+00 /
      data (ref_adm( 9,iz,15,17),iz = 1,20) / &
     & 0.3710500E+00, 0.3710500E+00, 0.3531900E+00, 0.3590500E+00, &
     & 0.3647800E+00, 0.3750900E+00, 0.3838700E+00, 0.3953900E+00, &
     & 0.4085500E+00, 0.4258800E+00, 0.4498800E+00, 0.4730300E+00, &
     & 0.5058000E+00, 0.5427200E+00, 0.6368600E+00, 0.6976900E+00, &
     & 0.7738500E+00, 0.8629700E+00, 0.7220306E+00, 0.7220306E+00 /
      data (ref_adm( 9,iz,16,17),iz = 1,20) / &
     & 0.3729900E+00, 0.3729900E+00, 0.3823300E+00, 0.3887200E+00, &
     & 0.3967200E+00, 0.4020700E+00, 0.4093400E+00, 0.4171400E+00, &
     & 0.4305400E+00, 0.4471500E+00, 0.4635000E+00, 0.4834200E+00, &
     & 0.5077100E+00, 0.5300000E+00, 0.5980000E+00, 0.6639500E+00, &
     & 0.7168400E+00, 0.7207304E+00, 0.6884114E+00, 0.6884114E+00 /
      data (ref_adm( 9,iz,17,17),iz = 1,20) / &
     & 0.3742900E+00, 0.3742900E+00, 0.3774800E+00, 0.3772800E+00, &
     & 0.3898900E+00, 0.4008000E+00, 0.4087800E+00, 0.4170100E+00, &
     & 0.4311100E+00, 0.4382900E+00, 0.4587600E+00, 0.4744100E+00, &
     & 0.5053000E+00, 0.5263200E+00, 0.5730300E+00, 0.6172400E+00, &
     & 0.6979400E+00, 0.6807491E+00, 0.6600059E+00, 0.6600059E+00 /
      data (ref_adm( 9,iz,18,17),iz = 1,20) / &
     & 0.3687400E+00, 0.3687400E+00, 0.3798600E+00, 0.3802300E+00, &
     & 0.3832600E+00, 0.3899400E+00, 0.4018100E+00, 0.4104700E+00, &
     & 0.4195900E+00, 0.4359300E+00, 0.4507800E+00, 0.4656100E+00, &
     & 0.4874400E+00, 0.5128400E+00, 0.5427000E+00, 0.5934400E+00, &
     & 0.6561056E+00, 0.7191888E+00, 0.7915022E+00, 0.7915022E+00 /
      data (ref_adm( 9,iz,19,17),iz = 1,20) / &
     & 0.3709700E+00, 0.3709700E+00, 0.3795800E+00, 0.3807900E+00, &
     & 0.3888500E+00, 0.3908700E+00, 0.3908600E+00, 0.4072000E+00, &
     & 0.4148000E+00, 0.4252800E+00, 0.4396900E+00, 0.4581800E+00, &
     & 0.4762200E+00, 0.5019500E+00, 0.5327900E+00, 0.5960700E+00, &
     & 0.6319625E+00, 0.6915389E+00, 0.7715311E+00, 0.7715311E+00 /
      data (ref_adm( 9,iz,20,17),iz = 1,20) / &
     & 0.3717300E+00, 0.3717300E+00, 0.3707900E+00, 0.3810400E+00, &
     & 0.3844000E+00, 0.3891300E+00, 0.3932000E+00, 0.4035200E+00, &
     & 0.4146800E+00, 0.4208800E+00, 0.4378700E+00, 0.4552700E+00, &
     & 0.4722000E+00, 0.4914100E+00, 0.5144600E+00, 0.5733420E+00, &
     & 0.6153810E+00, 0.6731158E+00, 0.7613215E+00, 0.7613215E+00 /
      data (ref_adm( 9,iz,21,17),iz = 1,20) / &
     & 0.3669400E+00, 0.3669400E+00, 0.3759300E+00, 0.3821600E+00, &
     & 0.3870100E+00, 0.3948600E+00, 0.3972700E+00, 0.4004400E+00, &
     & 0.4187600E+00, 0.4299300E+00, 0.4346500E+00, 0.4528800E+00, &
     & 0.4701600E+00, 0.4873300E+00, 0.5133200E+00, 0.5896300E+00, &
     & 0.6033533E+00, 0.6606095E+00, 0.7584859E+00, 0.7584859E+00 /
      data (ref_adm( 9,iz,22,17),iz = 1,20) / &
     & 0.3646500E+00, 0.3646500E+00, 0.3771400E+00, 0.3770200E+00, &
     & 0.3870000E+00, 0.3893100E+00, 0.3925400E+00, 0.4037200E+00, &
     & 0.4183700E+00, 0.4252300E+00, 0.4351600E+00, 0.4527300E+00, &
     & 0.4736700E+00, 0.4895800E+00, 0.5123800E+00, 0.5647700E+00, &
     & 0.5912907E+00, 0.6216175E+00, 0.6738771E+00, 0.6738771E+00 /
      data (ref_adm( 9,iz,23,17),iz = 1,20) / &
     & 0.3390900E+00, 0.3390900E+00, 0.3469500E+00, 0.3469600E+00, &
     & 0.3523300E+00, 0.3697100E+00, 0.3686600E+00, 0.3835800E+00, &
     & 0.3880300E+00, 0.3994600E+00, 0.4127100E+00, 0.4338900E+00, &
     & 0.4536500E+00, 0.4760800E+00, 0.5180800E+00, 0.5626200E+00, &
     & 0.6450900E+00, 0.6197349E+00, 0.6828771E+00, 0.6828771E+00 /
      data (ref_adm( 9,iz,24,17),iz = 1,20) / &
     & 0.3767300E+00, 0.3767300E+00, 0.3688900E+00, 0.3679500E+00, &
     & 0.3718500E+00, 0.3770500E+00, 0.3827400E+00, 0.3872900E+00, &
     & 0.3968700E+00, 0.4100900E+00, 0.4221500E+00, 0.4387900E+00, &
     & 0.4584000E+00, 0.4774900E+00, 0.5058700E+00, 0.5666700E+00, &
     & 0.6350300E+00, 0.6240258E+00, 0.6981246E+00, 0.6981246E+00 /
      data (ref_adm( 9,iz,25,17),iz = 1,20) / &
     & 0.3766600E+00, 0.3766600E+00, 0.3896000E+00, 0.3977200E+00, &
     & 0.4021000E+00, 0.4061500E+00, 0.4107300E+00, 0.4186900E+00, &
     & 0.4287400E+00, 0.4380300E+00, 0.4493700E+00, 0.4625500E+00, &
     & 0.4826800E+00, 0.5024200E+00, 0.5244500E+00, 0.5799100E+00, &
     & 0.6369900E+00, 0.7098400E+00, 0.7184174E+00, 0.7184174E+00 /
      data (ref_adm( 9,iz,26,17),iz = 1,20) / &
     & 0.3849000E+00, 0.3849000E+00, 0.3806000E+00, 0.3834800E+00, &
     & 0.3867100E+00, 0.3934400E+00, 0.3984300E+00, 0.4104600E+00, &
     & 0.4178200E+00, 0.4308700E+00, 0.4437000E+00, 0.4632900E+00, &
     & 0.4903900E+00, 0.5132700E+00, 0.5461700E+00, 0.6055000E+00, &
     & 0.6614300E+00, 0.7351800E+00, 0.7452011E+00, 0.7452011E+00 /
      data (ref_adm( 9,iz,27,17),iz = 1,20) / &
     & 0.3752500E+00, 0.3752500E+00, 0.3803300E+00, 0.3835200E+00, &
     & 0.3868900E+00, 0.3953300E+00, 0.4031200E+00, 0.4067500E+00, &
     & 0.4196800E+00, 0.4335800E+00, 0.4547800E+00, 0.4720500E+00, &
     & 0.4988300E+00, 0.5236800E+00, 0.5637600E+00, 0.6220100E+00, &
     & 0.6800000E+00, 0.7454400E+00, 0.7495600E+00, 0.7495600E+00 /
      data (ref_adm( 9,iz,28,17),iz = 1,20) / &
     & 0.3641000E+00, 0.3641000E+00, 0.3766200E+00, 0.3757100E+00, &
     & 0.3851200E+00, 0.3952500E+00, 0.3989500E+00, 0.4109600E+00, &
     & 0.4212700E+00, 0.4397700E+00, 0.4605600E+00, 0.4778200E+00, &
     & 0.5068300E+00, 0.5341500E+00, 0.5738800E+00, 0.6414700E+00, &
     & 0.7066100E+00, 0.7776700E+00, 0.7614600E+00, 0.7614600E+00 /
      data (ref_adm( 9,iz,29,17),iz = 1,20) / &
     & 0.3775600E+00, 0.3775600E+00, 0.3749800E+00, 0.3768000E+00, &
     & 0.3762800E+00, 0.3925300E+00, 0.4039200E+00, 0.4126900E+00, &
     & 0.4271500E+00, 0.4433600E+00, 0.4615400E+00, 0.4869500E+00, &
     & 0.5231000E+00, 0.5545800E+00, 0.5965600E+00, 0.6736100E+00, &
     & 0.7424900E+00, 0.8212100E+00, 0.7908200E+00, 0.7908200E+00 /
      data (ref_adm( 9,iz,30,17),iz = 1,20) / &
     & 0.3760900E+00, 0.3760900E+00, 0.3695500E+00, 0.3771100E+00, &
     & 0.3825100E+00, 0.3901500E+00, 0.4019100E+00, 0.4147200E+00, &
     & 0.4296500E+00, 0.4494400E+00, 0.4680200E+00, 0.5011500E+00, &
     & 0.5299000E+00, 0.5700700E+00, 0.6188100E+00, 0.6932800E+00, &
     & 0.7675900E+00, 0.8513700E+00, 0.8312400E+00, 0.8312400E+00 /
      data (ref_adm( 9,iz,31,17),iz = 1,20) / &
     & 0.3720400E+00, 0.3720400E+00, 0.3730100E+00, 0.3752800E+00, &
     & 0.3786700E+00, 0.3881100E+00, 0.3999900E+00, 0.4160400E+00, &
     & 0.4356800E+00, 0.4569500E+00, 0.4797700E+00, 0.5127400E+00, &
     & 0.5493400E+00, 0.5914900E+00, 0.6282000E+00, 0.6926200E+00, &
     & 0.7765100E+00, 0.8679300E+00, 0.8451100E+00, 0.8451100E+00 /
      data (ref_adm( 9,iz,32,17),iz = 1,20) / &
     & 0.3817000E+00, 0.3817000E+00, 0.3881200E+00, 0.3907700E+00, &
     & 0.3966700E+00, 0.4042700E+00, 0.4132700E+00, 0.4263200E+00, &
     & 0.4452400E+00, 0.4692400E+00, 0.4971700E+00, 0.5227100E+00, &
     & 0.5553900E+00, 0.5890500E+00, 0.6346700E+00, 0.6973200E+00, &
     & 0.7855300E+00, 0.8813300E+00, 0.8599500E+00, 0.8599500E+00 /
      data (ref_adm( 9,iz,33,17),iz = 1,20) / &
     & 0.3644600E+00, 0.3644600E+00, 0.3642300E+00, 0.3726900E+00, &
     & 0.3803900E+00, 0.3849800E+00, 0.3990000E+00, 0.4140500E+00, &
     & 0.4309700E+00, 0.4585700E+00, 0.4871100E+00, 0.5188600E+00, &
     & 0.5491000E+00, 0.5878000E+00, 0.6386000E+00, 0.7058200E+00, &
     & 0.7997100E+00, 0.8978900E+00, 0.8709700E+00, 0.8709700E+00 /
      data (ref_adm( 9,iz,34,17),iz = 1,20) / &
     & 0.3718000E+00, 0.3718000E+00, 0.3775000E+00, 0.3798300E+00, &
     & 0.3856800E+00, 0.3906700E+00, 0.4039700E+00, 0.4233600E+00, &
     & 0.4422400E+00, 0.4705200E+00, 0.5003300E+00, 0.5308800E+00, &
     & 0.5600700E+00, 0.5997900E+00, 0.6514900E+00, 0.7207100E+00, &
     & 0.8141700E+00, 0.9138400E+00, 0.8923600E+00, 0.8923600E+00 /
      data (ref_adm( 9,iz,35,17),iz = 1,20) / &
     & 0.3800300E+00, 0.3800300E+00, 0.3806200E+00, 0.3745100E+00, &
     & 0.3872500E+00, 0.3971900E+00, 0.4048000E+00, 0.4195200E+00, &
     & 0.4403000E+00, 0.4734300E+00, 0.5026100E+00, 0.5208100E+00, &
     & 0.5576200E+00, 0.6024500E+00, 0.6530100E+00, 0.7260600E+00, &
     & 0.8147900E+00, 0.9262800E+00, 0.8991800E+00, 0.8991800E+00 /
      data (ref_adm( 9,iz,36,17),iz = 1,20) / &
     & 0.3785800E+00, 0.3785800E+00, 0.3743200E+00, 0.3773500E+00, &
     & 0.3852800E+00, 0.3931300E+00, 0.4054300E+00, 0.4220400E+00, &
     & 0.4454000E+00, 0.4732700E+00, 0.5003100E+00, 0.5240400E+00, &
     & 0.5620500E+00, 0.6134000E+00, 0.6645600E+00, 0.7381100E+00, &
     & 0.8343800E+00, 0.9492000E+00, 0.9063700E+00, 0.9063700E+00 /
      data (ref_adm( 9,iz,37,17),iz = 1,20) / &
     & 0.3784600E+00, 0.3784600E+00, 0.3767600E+00, 0.3800800E+00, &
     & 0.3873200E+00, 0.3933800E+00, 0.4053800E+00, 0.4253800E+00, &
     & 0.4420100E+00, 0.4739300E+00, 0.4962800E+00, 0.5285500E+00, &
     & 0.5634300E+00, 0.6106000E+00, 0.6655000E+00, 0.7435400E+00, &
     & 0.8548000E+00, 0.9789400E+00, 0.9439600E+00, 0.9439600E+00 /
      data (ref_adm( 9,iz,38,17),iz = 1,20) / &
     & 0.3784600E+00, 0.3784600E+00, 0.3767600E+00, 0.3800800E+00, &
     & 0.3873200E+00, 0.3933800E+00, 0.4053800E+00, 0.4253800E+00, &
     & 0.4420100E+00, 0.4739300E+00, 0.4962800E+00, 0.5285500E+00, &
     & 0.5634300E+00, 0.6106000E+00, 0.6655000E+00, 0.7435400E+00, &
     & 0.8548000E+00, 0.9789400E+00, 0.9439600E+00, 0.9439600E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6609448E+00
      data (ref_adm( 9,iz, 1,18),iz = 1,20) / &
     & 0.4399800E+00, 0.4399800E+00, 0.4457300E+00, 0.4544900E+00, &
     & 0.4699700E+00, 0.5019800E+00, 0.5249800E+00, 0.5585600E+00, &
     & 0.6076600E+00, 0.6795700E+00, 0.7909400E+00, 0.9199300E+00, &
     & 0.1113779E+01, 0.1295572E+01, 0.1614924E+01, 0.2168754E+01, &
     & 0.2996084E+01, 0.4165096E+01, 0.2250126E+01, 0.2250126E+01 /
      data (ref_adm( 9,iz, 2,18),iz = 1,20) / &
     & 0.4399800E+00, 0.4399800E+00, 0.4457300E+00, 0.4544900E+00, &
     & 0.4699700E+00, 0.5019800E+00, 0.5249800E+00, 0.5585600E+00, &
     & 0.6076600E+00, 0.6795700E+00, 0.7909400E+00, 0.9199300E+00, &
     & 0.1113779E+01, 0.1295572E+01, 0.1614924E+01, 0.2168754E+01, &
     & 0.2996084E+01, 0.4165096E+01, 0.2250126E+01, 0.2250126E+01 /
      data (ref_adm( 9,iz, 3,18),iz = 1,20) / &
     & 0.4364600E+00, 0.4364600E+00, 0.4511900E+00, 0.4630300E+00, &
     & 0.4761600E+00, 0.4950900E+00, 0.5175900E+00, 0.5615000E+00, &
     & 0.6097400E+00, 0.6900500E+00, 0.7700600E+00, 0.8982800E+00, &
     & 0.1102485E+01, 0.1280388E+01, 0.1584214E+01, 0.2105930E+01, &
     & 0.2847462E+01, 0.4171012E+01, 0.1723144E+01, 0.1723144E+01 /
      data (ref_adm( 9,iz, 4,18),iz = 1,20) / &
     & 0.4326200E+00, 0.4326200E+00, 0.4421200E+00, 0.4601100E+00, &
     & 0.4724800E+00, 0.4868600E+00, 0.5078400E+00, 0.5564700E+00, &
     & 0.6099300E+00, 0.6769000E+00, 0.7715800E+00, 0.8845900E+00, &
     & 0.1078170E+01, 0.1249274E+01, 0.1522187E+01, 0.1979503E+01, &
     & 0.2577427E+01, 0.3725100E+01, 0.2801178E+01, 0.2801178E+01 /
      data (ref_adm( 9,iz, 5,18),iz = 1,20) / &
     & 0.4301400E+00, 0.4301400E+00, 0.4453900E+00, 0.4588800E+00, &
     & 0.4720700E+00, 0.4874800E+00, 0.5160000E+00, 0.5478800E+00, &
     & 0.6134600E+00, 0.6639300E+00, 0.7607700E+00, 0.8695500E+00, &
     & 0.1044342E+01, 0.1206747E+01, 0.1443758E+01, 0.1822606E+01, &
     & 0.2281477E+01, 0.2954149E+01, 0.2860715E+01, 0.2860715E+01 /
      data (ref_adm( 9,iz, 6,18),iz = 1,20) / &
     & 0.4348600E+00, 0.4348600E+00, 0.4389900E+00, 0.4471800E+00, &
     & 0.4598600E+00, 0.4829000E+00, 0.5128300E+00, 0.5526000E+00, &
     & 0.5993000E+00, 0.6573300E+00, 0.7350300E+00, 0.8370500E+00, &
     & 0.9829600E+00, 0.1189500E+01, 0.1455800E+01, 0.1838800E+01, &
     & 0.2413500E+01, 0.3037600E+01, 0.2941000E+01, 0.2941000E+01 /
      data (ref_adm( 9,iz, 7,18),iz = 1,20) / &
     & 0.4410000E+00, 0.4410000E+00, 0.4500300E+00, 0.4572100E+00, &
     & 0.4700400E+00, 0.4889000E+00, 0.5121500E+00, 0.5509600E+00, &
     & 0.6007900E+00, 0.6532400E+00, 0.7188100E+00, 0.8105600E+00, &
     & 0.9835000E+00, 0.1174700E+01, 0.1424400E+01, 0.1800300E+01, &
     & 0.2240400E+01, 0.2743000E+01, 0.2469100E+01, 0.2469100E+01 /
      data (ref_adm( 9,iz, 8,18),iz = 1,20) / &
     & 0.4389200E+00, 0.4389200E+00, 0.4406100E+00, 0.4534500E+00, &
     & 0.4611400E+00, 0.4728100E+00, 0.5049700E+00, 0.5247600E+00, &
     & 0.5825800E+00, 0.6285300E+00, 0.6863300E+00, 0.7599100E+00, &
     & 0.9434600E+00, 0.1123300E+01, 0.1355300E+01, 0.1649900E+01, &
     & 0.2030300E+01, 0.2388700E+01, 0.2091100E+01, 0.2091100E+01 /
      data (ref_adm( 9,iz, 9,18),iz = 1,20) / &
     & 0.4362200E+00, 0.4362200E+00, 0.4464400E+00, 0.4529800E+00, &
     & 0.4592800E+00, 0.4775300E+00, 0.4923400E+00, 0.5311200E+00, &
     & 0.5582900E+00, 0.5974800E+00, 0.6548200E+00, 0.7262800E+00, &
     & 0.8916600E+00, 0.1037100E+01, 0.1237500E+01, 0.1478700E+01, &
     & 0.1806400E+01, 0.2034100E+01, 0.1878900E+01, 0.1878900E+01 /
      data (ref_adm( 9,iz,10,18),iz = 1,20) / &
     & 0.4392600E+00, 0.4392600E+00, 0.4412100E+00, 0.4433200E+00, &
     & 0.4584600E+00, 0.4734500E+00, 0.5008700E+00, 0.5215700E+00, &
     & 0.5448200E+00, 0.5769600E+00, 0.6269500E+00, 0.6920900E+00, &
     & 0.8256300E+00, 0.9529000E+00, 0.1107100E+01, 0.1328300E+01, &
     & 0.1586500E+01, 0.1791200E+01, 0.1731800E+01, 0.1731800E+01 /
      data (ref_adm( 9,iz,11,18),iz = 1,20) / &
     & 0.4310700E+00, 0.4310700E+00, 0.4326800E+00, 0.4417700E+00, &
     & 0.4538400E+00, 0.4691200E+00, 0.4900800E+00, 0.5090300E+00, &
     & 0.5371500E+00, 0.5618300E+00, 0.6021700E+00, 0.6583400E+00, &
     & 0.7837900E+00, 0.8942000E+00, 0.1007800E+01, 0.1188200E+01, &
     & 0.1444600E+01, 0.1595100E+01, 0.1579800E+01, 0.1579800E+01 /
      data (ref_adm( 9,iz,12,18),iz = 1,20) / &
     & 0.4309200E+00, 0.4309200E+00, 0.4336400E+00, 0.4410500E+00, &
     & 0.4492900E+00, 0.4742500E+00, 0.4817600E+00, 0.5006100E+00, &
     & 0.5246600E+00, 0.5446100E+00, 0.5960700E+00, 0.6346000E+00, &
     & 0.7578100E+00, 0.8261000E+00, 0.9431000E+00, 0.1087300E+01, &
     & 0.1285800E+01, 0.1453600E+01, 0.1291400E+01, 0.1291400E+01 /
      data (ref_adm( 9,iz,13,18),iz = 1,20) / &
     & 0.4318000E+00, 0.4318000E+00, 0.4371600E+00, 0.4458000E+00, &
     & 0.4534600E+00, 0.4550400E+00, 0.4635500E+00, 0.4883700E+00, &
     & 0.5157200E+00, 0.5359600E+00, 0.5671500E+00, 0.6033200E+00, &
     & 0.7144200E+00, 0.7897000E+00, 0.8730900E+00, 0.1008300E+01, &
     & 0.1160100E+01, 0.1329200E+01, 0.1193100E+01, 0.1193100E+01 /
      data (ref_adm( 9,iz,14,18),iz = 1,20) / &
     & 0.4479800E+00, 0.4479800E+00, 0.4547300E+00, 0.4580700E+00, &
     & 0.4608200E+00, 0.4674300E+00, 0.4728400E+00, 0.4804700E+00, &
     & 0.4964400E+00, 0.5107800E+00, 0.5326700E+00, 0.5597700E+00, &
     & 0.5959000E+00, 0.6428800E+00, 0.8307000E+00, 0.9422300E+00, &
     & 0.1094100E+01, 0.1250900E+01, 0.9080873E+00, 0.9080873E+00 /
      data (ref_adm( 9,iz,15,18),iz = 1,20) / &
     & 0.4275800E+00, 0.4275800E+00, 0.4204200E+00, 0.4244000E+00, &
     & 0.4321200E+00, 0.4370900E+00, 0.4428500E+00, 0.4519600E+00, &
     & 0.4661600E+00, 0.4777200E+00, 0.4932900E+00, 0.5141700E+00, &
     & 0.5389900E+00, 0.5710800E+00, 0.7814700E+00, 0.8886500E+00, &
     & 0.9915500E+00, 0.8909261E+00, 0.8682033E+00, 0.8682033E+00 /
      data (ref_adm( 9,iz,16,18),iz = 1,20) / &
     & 0.4349200E+00, 0.4349200E+00, 0.4424400E+00, 0.4432000E+00, &
     & 0.4493900E+00, 0.4545900E+00, 0.4576000E+00, 0.4721500E+00, &
     & 0.4873500E+00, 0.4970000E+00, 0.5154400E+00, 0.5397800E+00, &
     & 0.5641500E+00, 0.5899800E+00, 0.7369700E+00, 0.8443100E+00, &
     & 0.8861600E+00, 0.8434012E+00, 0.8340502E+00, 0.8340502E+00 /
      data (ref_adm( 9,iz,17,18),iz = 1,20) / &
     & 0.4298500E+00, 0.4298500E+00, 0.4342600E+00, 0.4411400E+00, &
     & 0.4467500E+00, 0.4524900E+00, 0.4606900E+00, 0.4724200E+00, &
     & 0.4851900E+00, 0.4881900E+00, 0.5103600E+00, 0.5332300E+00, &
     & 0.6016100E+00, 0.6524400E+00, 0.7183200E+00, 0.7661600E+00, &
     & 0.7622153E+00, 0.8006068E+00, 0.8026102E+00, 0.8026102E+00 /
      data (ref_adm( 9,iz,18,18),iz = 1,20) / &
     & 0.4276500E+00, 0.4276500E+00, 0.4302800E+00, 0.4353300E+00, &
     & 0.4436400E+00, 0.4452700E+00, 0.4608200E+00, 0.4613600E+00, &
     & 0.4724200E+00, 0.4867700E+00, 0.5021200E+00, 0.5231400E+00, &
     & 0.6006100E+00, 0.6445700E+00, 0.6873800E+00, 0.7098200E+00, &
     & 0.8166705E+00, 0.9468833E+00, 0.1215652E+01, 0.1215652E+01 /
      data (ref_adm( 9,iz,19,18),iz = 1,20) / &
     & 0.4403500E+00, 0.4403500E+00, 0.4403000E+00, 0.4378200E+00, &
     & 0.4413600E+00, 0.4457800E+00, 0.4571300E+00, 0.4558000E+00, &
     & 0.4632100E+00, 0.4787300E+00, 0.4925000E+00, 0.5164800E+00, &
     & 0.5872300E+00, 0.6225900E+00, 0.6683300E+00, 0.7046500E+00, &
     & 0.7874341E+00, 0.9113930E+00, 0.1183031E+01, 0.1183031E+01 /
      data (ref_adm( 9,iz,20,18),iz = 1,20) / &
     & 0.4415700E+00, 0.4415700E+00, 0.4312500E+00, 0.4419700E+00, &
     & 0.4408700E+00, 0.4515000E+00, 0.4535500E+00, 0.4556900E+00, &
     & 0.4599900E+00, 0.4810000E+00, 0.4817400E+00, 0.5079200E+00, &
     & 0.5602400E+00, 0.5851300E+00, 0.6161500E+00, 0.6944515E+00, &
     & 0.7669968E+00, 0.8867453E+00, 0.1166231E+01, 0.1166231E+01 /
      data (ref_adm( 9,iz,21,18),iz = 1,20) / &
     & 0.4356800E+00, 0.4356800E+00, 0.4270700E+00, 0.4322300E+00, &
     & 0.4443000E+00, 0.4440500E+00, 0.4458300E+00, 0.4460500E+00, &
     & 0.4608000E+00, 0.4719900E+00, 0.4817600E+00, 0.5114200E+00, &
     & 0.5453800E+00, 0.5671000E+00, 0.5883700E+00, 0.5811600E+00, &
     & 0.7508472E+00, 0.8691579E+00, 0.1160637E+01, 0.1160637E+01 /
      data (ref_adm( 9,iz,22,18),iz = 1,20) / &
     & 0.4287100E+00, 0.4287100E+00, 0.4271700E+00, 0.4250500E+00, &
     & 0.4368600E+00, 0.4349300E+00, 0.4425700E+00, 0.4453700E+00, &
     & 0.4651100E+00, 0.4776000E+00, 0.4842800E+00, 0.5089500E+00, &
     & 0.5426100E+00, 0.5567200E+00, 0.5795000E+00, 0.6073000E+00, &
     & 0.7450082E+00, 0.8183518E+00, 0.9376584E+00, 0.9376584E+00 /
      data (ref_adm( 9,iz,23,18),iz = 1,20) / &
     & 0.4028100E+00, 0.4028100E+00, 0.3968600E+00, 0.4230400E+00, &
     & 0.4341300E+00, 0.4435600E+00, 0.4536200E+00, 0.4644000E+00, &
     & 0.4757800E+00, 0.4807400E+00, 0.4857400E+00, 0.5002600E+00, &
     & 0.5289900E+00, 0.5483900E+00, 0.5792800E+00, 0.6235000E+00, &
     & 0.7345002E+00, 0.8090071E+00, 0.9461530E+00, 0.9461530E+00 /
      data (ref_adm( 9,iz,24,18),iz = 1,20) / &
     & 0.4405100E+00, 0.4405100E+00, 0.4303800E+00, 0.4299100E+00, &
     & 0.4301900E+00, 0.4360100E+00, 0.4431100E+00, 0.4509100E+00, &
     & 0.4661100E+00, 0.4796400E+00, 0.4976800E+00, 0.5216400E+00, &
     & 0.5517000E+00, 0.5883000E+00, 0.6076700E+00, 0.6406300E+00, &
     & 0.7050300E+00, 0.8062149E+00, 0.9629840E+00, 0.9629840E+00 /
      data (ref_adm( 9,iz,25,18),iz = 1,20) / &
     & 0.4359100E+00, 0.4359100E+00, 0.4363400E+00, 0.4390100E+00, &
     & 0.4416800E+00, 0.4468500E+00, 0.4587100E+00, 0.4646600E+00, &
     & 0.4775100E+00, 0.4922400E+00, 0.5078300E+00, 0.5328500E+00, &
     & 0.5655100E+00, 0.6005400E+00, 0.6222800E+00, 0.6754000E+00, &
     & 0.7416000E+00, 0.8773300E+00, 0.9863775E+00, 0.9863775E+00 /
      data (ref_adm( 9,iz,26,18),iz = 1,20) / &
     & 0.4394500E+00, 0.4394500E+00, 0.4392900E+00, 0.4340200E+00, &
     & 0.4409000E+00, 0.4433000E+00, 0.4513900E+00, 0.4652100E+00, &
     & 0.4771500E+00, 0.4899200E+00, 0.5071000E+00, 0.5361300E+00, &
     & 0.5719500E+00, 0.6116100E+00, 0.6442100E+00, 0.7093600E+00, &
     & 0.7921900E+00, 0.8942000E+00, 0.1019623E+01, 0.1019623E+01 /
      data (ref_adm( 9,iz,27,18),iz = 1,20) / &
     & 0.4312400E+00, 0.4312400E+00, 0.4243500E+00, 0.4345500E+00, &
     & 0.4430300E+00, 0.4542700E+00, 0.4616600E+00, 0.4681400E+00, &
     & 0.4892000E+00, 0.5004800E+00, 0.5100400E+00, 0.5319400E+00, &
     & 0.5832400E+00, 0.6266000E+00, 0.6629000E+00, 0.7427600E+00, &
     & 0.8418400E+00, 0.1001400E+01, 0.1109600E+01, 0.1109600E+01 /
      data (ref_adm( 9,iz,28,18),iz = 1,20) / &
     & 0.4195600E+00, 0.4195600E+00, 0.4244800E+00, 0.4318500E+00, &
     & 0.4393400E+00, 0.4382200E+00, 0.4629600E+00, 0.4721300E+00, &
     & 0.4842800E+00, 0.4995500E+00, 0.5138800E+00, 0.5486500E+00, &
     & 0.5959100E+00, 0.6452600E+00, 0.6958900E+00, 0.7788700E+00, &
     & 0.8941600E+00, 0.1073900E+01, 0.1216400E+01, 0.1216400E+01 /
      data (ref_adm( 9,iz,29,18),iz = 1,20) / &
     & 0.4338100E+00, 0.4338100E+00, 0.4232900E+00, 0.4213900E+00, &
     & 0.4333300E+00, 0.4405200E+00, 0.4484600E+00, 0.4669300E+00, &
     & 0.4878400E+00, 0.5076800E+00, 0.5347900E+00, 0.5630600E+00, &
     & 0.6138200E+00, 0.6616700E+00, 0.7190000E+00, 0.8186300E+00, &
     & 0.9431700E+00, 0.1149300E+01, 0.1231800E+01, 0.1231800E+01 /
      data (ref_adm( 9,iz,30,18),iz = 1,20) / &
     & 0.4322900E+00, 0.4322900E+00, 0.4176700E+00, 0.4291700E+00, &
     & 0.4405400E+00, 0.4378100E+00, 0.4456200E+00, 0.4636000E+00, &
     & 0.4924100E+00, 0.5103800E+00, 0.5348800E+00, 0.5669400E+00, &
     & 0.6315500E+00, 0.6842600E+00, 0.7434200E+00, 0.8615200E+00, &
     & 0.9866400E+00, 0.1179600E+01, 0.1366500E+01, 0.1366500E+01 /
      data (ref_adm( 9,iz,31,18),iz = 1,20) / &
     & 0.4334800E+00, 0.4334800E+00, 0.4240700E+00, 0.4288800E+00, &
     & 0.4393800E+00, 0.4334400E+00, 0.4572900E+00, 0.4765200E+00, &
     & 0.4905400E+00, 0.5158900E+00, 0.5379500E+00, 0.5837600E+00, &
     & 0.6301900E+00, 0.6993100E+00, 0.7635100E+00, 0.8575100E+00, &
     & 0.9929400E+00, 0.1213600E+01, 0.1423200E+01, 0.1423200E+01 /
      data (ref_adm( 9,iz,32,18),iz = 1,20) / &
     & 0.4402900E+00, 0.4402900E+00, 0.4412500E+00, 0.4449100E+00, &
     & 0.4470700E+00, 0.4530400E+00, 0.4675300E+00, 0.4818700E+00, &
     & 0.5093200E+00, 0.5385200E+00, 0.5638400E+00, 0.6005300E+00, &
     & 0.6501400E+00, 0.7077600E+00, 0.7721100E+00, 0.8612000E+00, &
     & 0.9985900E+00, 0.1212500E+01, 0.1425200E+01, 0.1425200E+01 /
      data (ref_adm( 9,iz,33,18),iz = 1,20) / &
     & 0.4242900E+00, 0.4242900E+00, 0.4202000E+00, 0.4223200E+00, &
     & 0.4387900E+00, 0.4457100E+00, 0.4577500E+00, 0.4753900E+00, &
     & 0.4975800E+00, 0.5316900E+00, 0.5605200E+00, 0.6022800E+00, &
     & 0.6544600E+00, 0.7183100E+00, 0.7825100E+00, 0.8874700E+00, &
     & 0.1050100E+01, 0.1277800E+01, 0.1491000E+01, 0.1491000E+01 /
      data (ref_adm( 9,iz,34,18),iz = 1,20) / &
     & 0.4321100E+00, 0.4321100E+00, 0.4345500E+00, 0.4412100E+00, &
     & 0.4494300E+00, 0.4568600E+00, 0.4642600E+00, 0.4844900E+00, &
     & 0.5094300E+00, 0.5385200E+00, 0.5675500E+00, 0.6092600E+00, &
     & 0.6589800E+00, 0.7197100E+00, 0.7849800E+00, 0.9044000E+00, &
     & 0.1039300E+01, 0.1260400E+01, 0.1460500E+01, 0.1460500E+01 /
      data (ref_adm( 9,iz,35,18),iz = 1,20) / &
     & 0.4327100E+00, 0.4327100E+00, 0.4333800E+00, 0.4335300E+00, &
     & 0.4452500E+00, 0.4486800E+00, 0.4667400E+00, 0.4822900E+00, &
     & 0.5040400E+00, 0.5409700E+00, 0.5765600E+00, 0.6120800E+00, &
     & 0.6578300E+00, 0.7172200E+00, 0.7907000E+00, 0.9039900E+00, &
     & 0.1055600E+01, 0.1283500E+01, 0.1457600E+01, 0.1457600E+01 /
      data (ref_adm( 9,iz,36,18),iz = 1,20) / &
     & 0.4398300E+00, 0.4398300E+00, 0.4304300E+00, 0.4355100E+00, &
     & 0.4385800E+00, 0.4507600E+00, 0.4672200E+00, 0.4841100E+00, &
     & 0.5038700E+00, 0.5418800E+00, 0.5768500E+00, 0.6121700E+00, &
     & 0.6575600E+00, 0.7225200E+00, 0.7973800E+00, 0.9088700E+00, &
     & 0.1068600E+01, 0.1300600E+01, 0.1510700E+01, 0.1510700E+01 /
      data (ref_adm( 9,iz,37,18),iz = 1,20) / &
     & 0.4327200E+00, 0.4327200E+00, 0.4399000E+00, 0.4402600E+00, &
     & 0.4455600E+00, 0.4544700E+00, 0.4650300E+00, 0.4815500E+00, &
     & 0.5060500E+00, 0.5295600E+00, 0.5740700E+00, 0.6207000E+00, &
     & 0.6657900E+00, 0.7184600E+00, 0.7932500E+00, 0.9161000E+00, &
     & 0.1075200E+01, 0.1315200E+01, 0.1575800E+01, 0.1575800E+01 /
      data (ref_adm( 9,iz,38,18),iz = 1,20) / &
     & 0.4327200E+00, 0.4327200E+00, 0.4399000E+00, 0.4402600E+00, &
     & 0.4455600E+00, 0.4544700E+00, 0.4650300E+00, 0.4815500E+00, &
     & 0.5060500E+00, 0.5295600E+00, 0.5740700E+00, 0.6207000E+00, &
     & 0.6657900E+00, 0.7184600E+00, 0.7932500E+00, 0.9161000E+00, &
     & 0.1075200E+01, 0.1315200E+01, 0.1575800E+01, 0.1575800E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(10,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(10,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.4448149E+04
      data (ref_adm(10,iz, 1, 3),iz = 1,20) / &
     & 0.2643334E+00, 0.2643334E+00, 0.2596032E+00, 0.2579646E+00, &
     & 0.2566694E+00, 0.2557836E+00, 0.2542223E+00, 0.2515623E+00, &
     & 0.2481458E+00, 0.2440547E+00, 0.2396051E+00, 0.2334277E+00, &
     & 0.2262174E+00, 0.2194276E+00, 0.2096771E+00, 0.1968368E+00, &
     & 0.1835897E+00, 0.1662573E+00, 0.1356530E+00, 0.1356530E+00 /
      data (ref_adm(10,iz, 2, 3),iz = 1,20) / &
     & 0.2643334E+00, 0.2643334E+00, 0.2596032E+00, 0.2579646E+00, &
     & 0.2566694E+00, 0.2557836E+00, 0.2542223E+00, 0.2515623E+00, &
     & 0.2481458E+00, 0.2440547E+00, 0.2396051E+00, 0.2334277E+00, &
     & 0.2262174E+00, 0.2194276E+00, 0.2096771E+00, 0.1968368E+00, &
     & 0.1835897E+00, 0.1662573E+00, 0.1356530E+00, 0.1356530E+00 /
      data (ref_adm(10,iz, 3, 3),iz = 1,20) / &
     & 0.2643334E+00, 0.2643334E+00, 0.2596032E+00, 0.2579646E+00, &
     & 0.2566693E+00, 0.2557836E+00, 0.2542223E+00, 0.2515623E+00, &
     & 0.2481458E+00, 0.2440547E+00, 0.2396051E+00, 0.2334277E+00, &
     & 0.2262174E+00, 0.2959800E+00, 0.2096771E+00, 0.1968368E+00, &
     & 0.1835897E+00, 0.1662573E+00, 0.1356530E+00, 0.1356530E+00 /
      data (ref_adm(10,iz, 4, 3),iz = 1,20) / &
     & 0.2643334E+00, 0.2643334E+00, 0.2596032E+00, 0.2579646E+00, &
     & 0.2566694E+00, 0.2557836E+00, 0.2542223E+00, 0.2515623E+00, &
     & 0.2481458E+00, 0.2440547E+00, 0.2396051E+00, 0.2334277E+00, &
     & 0.2262174E+00, 0.2194276E+00, 0.2096771E+00, 0.1968368E+00, &
     & 0.1835897E+00, 0.1662573E+00, 0.1356530E+00, 0.1356530E+00 /
      data (ref_adm(10,iz, 5, 3),iz = 1,20) / &
     & 0.2643334E+00, 0.2643334E+00, 0.2596032E+00, 0.2579646E+00, &
     & 0.2566693E+00, 0.2557836E+00, 0.2542223E+00, 0.2515623E+00, &
     & 0.2481458E+00, 0.2992500E+00, 0.2396051E+00, 0.2334277E+00, &
     & 0.2262174E+00, 0.2194276E+00, 0.2096771E+00, 0.1968368E+00, &
     & 0.1835897E+00, 0.1662573E+00, 0.1356530E+00, 0.1356530E+00 /
      data (ref_adm(10,iz, 6, 3),iz = 1,20) / &
     & 0.2643334E+00, 0.2643334E+00, 0.2596032E+00, 0.2579646E+00, &
     & 0.2566694E+00, 0.2557836E+00, 0.2542223E+00, 0.2515623E+00, &
     & 0.2481458E+00, 0.2646900E+00, 0.2143200E+00, 0.2334277E+00, &
     & 0.2262174E+00, 0.1866000E+00, 0.2096771E+00, 0.1968368E+00, &
     & 0.1835897E+00, 0.1662573E+00, 0.1356530E+00, 0.1356530E+00 /
      data (ref_adm(10,iz, 7, 3),iz = 1,20) / &
     & 0.2643334E+00, 0.2643334E+00, 0.2596032E+00, 0.2579646E+00, &
     & 0.2566693E+00, 0.2557836E+00, 0.2542223E+00, 0.2515623E+00, &
     & 0.2481458E+00, 0.2077900E+00, 0.2129900E+00, 0.2334277E+00, &
     & 0.2262174E+00, 0.1956600E+00, 0.2096771E+00, 0.1968368E+00, &
     & 0.1835897E+00, 0.1662573E+00, 0.1356530E+00, 0.1356530E+00 /
      data (ref_adm(10,iz, 8, 3),iz = 1,20) / &
     & 0.2643334E+00, 0.2643334E+00, 0.2596032E+00, 0.2579646E+00, &
     & 0.2566694E+00, 0.2557836E+00, 0.2542223E+00, 0.2515623E+00, &
     & 0.2481458E+00, 0.2440547E+00, 0.2396051E+00, 0.2334277E+00, &
     & 0.2262174E+00, 0.2194276E+00, 0.2096771E+00, 0.1968368E+00, &
     & 0.1835897E+00, 0.1662573E+00, 0.1356530E+00, 0.1356530E+00 /
      data (ref_adm(10,iz, 9, 3),iz = 1,20) / &
     & 0.2643334E+00, 0.2643334E+00, 0.2596032E+00, 0.2579646E+00, &
     & 0.2566693E+00, 0.2557836E+00, 0.2542223E+00, 0.2515623E+00, &
     & 0.2481458E+00, 0.2440547E+00, 0.2396051E+00, 0.1877000E+00, &
     & 0.2271700E+00, 0.2194276E+00, 0.2096771E+00, 0.1968368E+00, &
     & 0.1835897E+00, 0.1662573E+00, 0.1356530E+00, 0.1356530E+00 /
      data (ref_adm(10,iz,10, 3),iz = 1,20) / &
     & 0.2643334E+00, 0.2643334E+00, 0.2596032E+00, 0.2579646E+00, &
     & 0.2566694E+00, 0.2557836E+00, 0.2542223E+00, 0.2515623E+00, &
     & 0.2481458E+00, 0.2440547E+00, 0.2396051E+00, 0.2334277E+00, &
     & 0.2347900E+00, 0.2249100E+00, 0.2096771E+00, 0.1968368E+00, &
     & 0.1835897E+00, 0.1662573E+00, 0.1356530E+00, 0.1356530E+00 /
      data (ref_adm(10,iz,11, 3),iz = 1,20) / &
     & 0.2643334E+00, 0.2643334E+00, 0.2596032E+00, 0.2579646E+00, &
     & 0.2566693E+00, 0.2557836E+00, 0.2542223E+00, 0.2515623E+00, &
     & 0.2481458E+00, 0.2440547E+00, 0.2396051E+00, 0.2334277E+00, &
     & 0.2016800E+00, 0.2194276E+00, 0.2609900E+00, 0.1968368E+00, &
     & 0.1835897E+00, 0.1662573E+00, 0.1356530E+00, 0.1356530E+00 /
      data (ref_adm(10,iz,12, 3),iz = 1,20) / &
     & 0.2643334E+00, 0.2643334E+00, 0.2596032E+00, 0.2579646E+00, &
     & 0.2566694E+00, 0.2557836E+00, 0.2542223E+00, 0.2515623E+00, &
     & 0.2481458E+00, 0.2440547E+00, 0.2396051E+00, 0.2334277E+00, &
     & 0.2262174E+00, 0.1974300E+00, 0.2096771E+00, 0.1968368E+00, &
     & 0.1835897E+00, 0.1662573E+00, 0.1356530E+00, 0.1356530E+00 /
      data (ref_adm(10,iz,13, 3),iz = 1,20) / &
     & 0.2643334E+00, 0.2643334E+00, 0.2596032E+00, 0.2579646E+00, &
     & 0.2566693E+00, 0.2557836E+00, 0.2542223E+00, 0.2515623E+00, &
     & 0.2481458E+00, 0.2440547E+00, 0.2396051E+00, 0.2334277E+00, &
     & 0.1992700E+00, 0.1886200E+00, 0.2096771E+00, 0.1968368E+00, &
     & 0.1835897E+00, 0.2152100E+00, 0.1356530E+00, 0.1356530E+00 /
      data (ref_adm(10,iz,14, 3),iz = 1,20) / &
     & 0.2643334E+00, 0.2643334E+00, 0.2596032E+00, 0.2579646E+00, &
     & 0.2566694E+00, 0.2557836E+00, 0.2542223E+00, 0.2515623E+00, &
     & 0.2481458E+00, 0.2440547E+00, 0.2396051E+00, 0.2334277E+00, &
     & 0.1994400E+00, 0.1992100E+00, 0.2096771E+00, 0.1968368E+00, &
     & 0.1835897E+00, 0.1662573E+00, 0.1356530E+00, 0.1356530E+00 /
      data (ref_adm(10,iz,15, 3),iz = 1,20) / &
     & 0.2643334E+00, 0.2643334E+00, 0.2596032E+00, 0.2579646E+00, &
     & 0.2566693E+00, 0.2557836E+00, 0.2542223E+00, 0.2515623E+00, &
     & 0.2481458E+00, 0.2440547E+00, 0.2396051E+00, 0.2334277E+00, &
     & 0.2262174E+00, 0.2194276E+00, 0.2096771E+00, 0.1968368E+00, &
     & 0.1835897E+00, 0.1662573E+00, 0.1356530E+00, 0.1356530E+00 /
      data (ref_adm(10,iz,16, 3),iz = 1,20) / &
     & 0.2643334E+00, 0.2643334E+00, 0.2596032E+00, 0.2579646E+00, &
     & 0.2566694E+00, 0.2557836E+00, 0.2542223E+00, 0.2515623E+00, &
     & 0.2481458E+00, 0.2440547E+00, 0.2396051E+00, 0.2334277E+00, &
     & 0.2568400E+00, 0.2194276E+00, 0.2096771E+00, 0.1968368E+00, &
     & 0.1835897E+00, 0.1662573E+00, 0.1356530E+00, 0.1356530E+00 /
      data (ref_adm(10,iz,17, 3),iz = 1,20) / &
     & 0.2643334E+00, 0.2643334E+00, 0.2596032E+00, 0.2579646E+00, &
     & 0.2566693E+00, 0.2557836E+00, 0.2542223E+00, 0.2515623E+00, &
     & 0.2481458E+00, 0.2440547E+00, 0.2396051E+00, 0.2334277E+00, &
     & 0.2480600E+00, 0.2194276E+00, 0.2096771E+00, 0.1968368E+00, &
     & 0.1835897E+00, 0.1662573E+00, 0.1356530E+00, 0.1356530E+00 /
      data (ref_adm(10,iz,18, 3),iz = 1,20) / &
     & 0.2462374E+00, 0.2462374E+00, 0.2424937E+00, 0.2394225E+00, &
     & 0.2373250E+00, 0.2360236E+00, 0.2341922E+00, 0.2321179E+00, &
     & 0.2301560E+00, 0.2284851E+00, 0.2272994E+00, 0.2266137E+00, &
     & 0.2262510E+00, 0.2263104E+00, 0.2266492E+00, 0.2274487E+00, &
     & 0.2289742E+00, 0.2308867E+00, 0.2221528E+00, 0.2221528E+00 /
      data (ref_adm(10,iz,19, 3),iz = 1,20) / &
     & 0.2463849E+00, 0.2463849E+00, 0.2427991E+00, 0.2397079E+00, &
     & 0.2375669E+00, 0.2363054E+00, 0.2345820E+00, 0.2324616E+00, &
     & 0.2304264E+00, 0.2287847E+00, 0.2276056E+00, 0.2268424E+00, &
     & 0.2264311E+00, 0.2263693E+00, 0.2267571E+00, 0.2274799E+00, &
     & 0.2289669E+00, 0.2308133E+00, 0.2219400E+00, 0.2219400E+00 /
      data (ref_adm(10,iz,20, 3),iz = 1,20) / &
     & 0.2465449E+00, 0.2465449E+00, 0.2430202E+00, 0.2399164E+00, &
     & 0.2377489E+00, 0.2364958E+00, 0.2348774E+00, 0.2327703E+00, &
     & 0.2308243E+00, 0.2290996E+00, 0.2278759E+00, 0.2270482E+00, &
     & 0.2266145E+00, 0.2265000E+00, 0.2267961E+00, 0.2274945E+00, &
     & 0.2287994E+00, 0.2305800E+00, 0.2217564E+00, 0.2217564E+00 /
      data (ref_adm(10,iz,21, 3),iz = 1,20) / &
     & 0.2466449E+00, 0.2466449E+00, 0.2433084E+00, 0.2402062E+00, &
     & 0.2379380E+00, 0.2367448E+00, 0.2351783E+00, 0.2330927E+00, &
     & 0.2311689E+00, 0.2294382E+00, 0.2281817E+00, 0.2273156E+00, &
     & 0.2267874E+00, 0.2267090E+00, 0.2268527E+00, 0.2274962E+00, &
     & 0.2288102E+00, 0.2304153E+00, 0.2216147E+00, 0.2216147E+00 /
      data (ref_adm(10,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(10,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo  0.2563842E+00
      data (ref_adm(10,iz, 1, 4),iz = 1,20) / &
     & 0.2728989E+00, 0.2728989E+00, 0.2546870E+00, 0.2512293E+00, &
     & 0.2494102E+00, 0.2491439E+00, 0.2475014E+00, 0.2444430E+00, &
     & 0.2418462E+00, 0.2395286E+00, 0.2379038E+00, 0.2365887E+00, &
     & 0.2062600E+00, 0.2355022E+00, 0.1983800E+00, 0.3278600E+00, &
     & 0.2629700E+00, 0.2326695E+00, 0.2163648E+00, 0.2163648E+00 /
      data (ref_adm(10,iz, 2, 4),iz = 1,20) / &
     & 0.2728989E+00, 0.2728989E+00, 0.2546870E+00, 0.2512293E+00, &
     & 0.2494102E+00, 0.2491439E+00, 0.2475014E+00, 0.2444430E+00, &
     & 0.2418462E+00, 0.2395286E+00, 0.2379038E+00, 0.2365887E+00, &
     & 0.2062600E+00, 0.2355022E+00, 0.1983800E+00, 0.3278600E+00, &
     & 0.2629700E+00, 0.2326695E+00, 0.2163648E+00, 0.2163648E+00 /
      data (ref_adm(10,iz, 3, 4),iz = 1,20) / &
     & 0.2728989E+00, 0.2728989E+00, 0.3174100E+00, 0.2512293E+00, &
     & 0.2494102E+00, 0.2519500E+00, 0.2299900E+00, 0.2444430E+00, &
     & 0.2598500E+00, 0.1712400E+00, 0.2379038E+00, 0.2365887E+00, &
     & 0.2357218E+00, 0.2355023E+00, 0.1938800E+00, 0.2353964E+00, &
     & 0.2351087E+00, 0.2326695E+00, 0.7214096E-01, 0.7214096E-01 /
      data (ref_adm(10,iz, 4, 4),iz = 1,20) / &
     & 0.2728989E+00, 0.2728989E+00, 0.3331300E+00, 0.2512293E+00, &
     & 0.2494102E+00, 0.2491439E+00, 0.2475014E+00, 0.3984900E+00, &
     & 0.2418462E+00, 0.2254600E+00, 0.2379038E+00, 0.2365887E+00, &
     & 0.2357218E+00, 0.2355022E+00, 0.2354504E+00, 0.2353964E+00, &
     & 0.2351087E+00, 0.2326695E+00, 0.2163648E+00, 0.2163648E+00 /
      data (ref_adm(10,iz, 5, 4),iz = 1,20) / &
     & 0.2728989E+00, 0.2728989E+00, 0.2546870E+00, 0.2512293E+00, &
     & 0.2494102E+00, 0.2833800E+00, 0.2540000E+00, 0.2444430E+00, &
     & 0.4258100E+00, 0.1946500E+00, 0.2379038E+00, 0.2254200E+00, &
     & 0.2357218E+00, 0.2355023E+00, 0.2729400E+00, 0.2353964E+00, &
     & 0.2351087E+00, 0.2326695E+00, 0.2138100E+00, 0.2138100E+00 /
      data (ref_adm(10,iz, 6, 4),iz = 1,20) / &
     & 0.2588600E+00, 0.2588600E+00, 0.2546870E+00, 0.2312300E+00, &
     & 0.2339300E+00, 0.2301600E+00, 0.2338300E+00, 0.2569900E+00, &
     & 0.2858000E+00, 0.2395286E+00, 0.2417900E+00, 0.2327800E+00, &
     & 0.1818700E+00, 0.2203600E+00, 0.2085800E+00, 0.2353964E+00, &
     & 0.1775600E+00, 0.2326695E+00, 0.2163648E+00, 0.2163648E+00 /
      data (ref_adm(10,iz, 7, 4),iz = 1,20) / &
     & 0.2728989E+00, 0.2728989E+00, 0.2949900E+00, 0.2122000E+00, &
     & 0.2686400E+00, 0.2498700E+00, 0.2752000E+00, 0.2193200E+00, &
     & 0.2511300E+00, 0.2499600E+00, 0.2264900E+00, 0.2503400E+00, &
     & 0.2357218E+00, 0.2355023E+00, 0.2354504E+00, 0.2353964E+00, &
     & 0.2351087E+00, 0.2326695E+00, 0.2163648E+00, 0.2163648E+00 /
      data (ref_adm(10,iz, 8, 4),iz = 1,20) / &
     & 0.2728989E+00, 0.2728989E+00, 0.2546870E+00, 0.2512293E+00, &
     & 0.3025000E+00, 0.2404600E+00, 0.2453700E+00, 0.2803100E+00, &
     & 0.2178400E+00, 0.1689900E+00, 0.2318600E+00, 0.3090000E+00, &
     & 0.2007100E+00, 0.2355022E+00, 0.2354504E+00, 0.2353964E+00, &
     & 0.2351087E+00, 0.2326695E+00, 0.2163648E+00, 0.2163648E+00 /
      data (ref_adm(10,iz, 9, 4),iz = 1,20) / &
     & 0.2728989E+00, 0.2728989E+00, 0.2546870E+00, 0.3103900E+00, &
     & 0.2494102E+00, 0.2491439E+00, 0.3681600E+00, 0.2224800E+00, &
     & 0.2255600E+00, 0.2075400E+00, 0.1972400E+00, 0.1701700E+00, &
     & 0.2192500E+00, 0.1958700E+00, 0.1998600E+00, 0.2353964E+00, &
     & 0.2351087E+00, 0.2153900E+00, 0.2377000E+00, 0.2377000E+00 /
      data (ref_adm(10,iz,10, 4),iz = 1,20) / &
     & 0.2728989E+00, 0.2728989E+00, 0.2546870E+00, 0.2512293E+00, &
     & 0.3821700E+00, 0.2491439E+00, 0.2475014E+00, 0.2277100E+00, &
     & 0.2225800E+00, 0.2285400E+00, 0.2218500E+00, 0.2397800E+00, &
     & 0.2117900E+00, 0.2247400E+00, 0.2354504E+00, 0.2353964E+00, &
     & 0.2351087E+00, 0.2326695E+00, 0.2197000E+00, 0.2197000E+00 /
      data (ref_adm(10,iz,11, 4),iz = 1,20) / &
     & 0.2728989E+00, 0.2728989E+00, 0.2546870E+00, 0.2512293E+00, &
     & 0.2494102E+00, 0.2491439E+00, 0.2475014E+00, 0.2444430E+00, &
     & 0.2418462E+00, 0.1897400E+00, 0.2019200E+00, 0.2222800E+00, &
     & 0.2468600E+00, 0.2166600E+00, 0.2354504E+00, 0.2353964E+00, &
     & 0.2351087E+00, 0.2326695E+00, 0.2163648E+00, 0.2163648E+00 /
      data (ref_adm(10,iz,12, 4),iz = 1,20) / &
     & 0.2728989E+00, 0.2728989E+00, 0.3012500E+00, 0.2512293E+00, &
     & 0.2252900E+00, 0.2491439E+00, 0.2475014E+00, 0.2444430E+00, &
     & 0.2418462E+00, 0.2395286E+00, 0.2379038E+00, 0.2276900E+00, &
     & 0.2351200E+00, 0.2298300E+00, 0.2354504E+00, 0.2353964E+00, &
     & 0.2833000E+00, 0.2618600E+00, 0.2163648E+00, 0.2163648E+00 /
      data (ref_adm(10,iz,13, 4),iz = 1,20) / &
     & 0.2728989E+00, 0.2728989E+00, 0.2546870E+00, 0.2512293E+00, &
     & 0.2676900E+00, 0.2491439E+00, 0.2514100E+00, 0.2444430E+00, &
     & 0.2418462E+00, 0.2395286E+00, 0.2379038E+00, 0.1854900E+00, &
     & 0.2053600E+00, 0.2176200E+00, 0.2354504E+00, 0.2353964E+00, &
     & 0.2722100E+00, 0.2682900E+00, 0.2163648E+00, 0.2163648E+00 /
      data (ref_adm(10,iz,14, 4),iz = 1,20) / &
     & 0.2728989E+00, 0.2728989E+00, 0.2546870E+00, 0.2512293E+00, &
     & 0.2494102E+00, 0.3036000E+00, 0.2475014E+00, 0.2444430E+00, &
     & 0.2418462E+00, 0.2395286E+00, 0.2379038E+00, 0.2130700E+00, &
     & 0.2357218E+00, 0.1771400E+00, 0.1740500E+00, 0.2353964E+00, &
     & 0.2351087E+00, 0.2326695E+00, 0.2163648E+00, 0.2163648E+00 /
      data (ref_adm(10,iz,15, 4),iz = 1,20) / &
     & 0.2728989E+00, 0.2728989E+00, 0.2546870E+00, 0.2512293E+00, &
     & 0.2494102E+00, 0.2491439E+00, 0.2182700E+00, 0.2405600E+00, &
     & 0.2418462E+00, 0.2395286E+00, 0.2029200E+00, 0.2365887E+00, &
     & 0.2357218E+00, 0.1853800E+00, 0.2354504E+00, 0.2353964E+00, &
     & 0.2351087E+00, 0.2326695E+00, 0.2163648E+00, 0.2163648E+00 /
      data (ref_adm(10,iz,16, 4),iz = 1,20) / &
     & 0.2728989E+00, 0.2728989E+00, 0.2546870E+00, 0.2512293E+00, &
     & 0.2494102E+00, 0.2491439E+00, 0.2475014E+00, 0.2488400E+00, &
     & 0.2598300E+00, 0.2395286E+00, 0.2167700E+00, 0.2084000E+00, &
     & 0.2614800E+00, 0.2104200E+00, 0.2354504E+00, 0.2353964E+00, &
     & 0.2351087E+00, 0.2326695E+00, 0.2163648E+00, 0.2163648E+00 /
      data (ref_adm(10,iz,17, 4),iz = 1,20) / &
     & 0.2728989E+00, 0.2728989E+00, 0.2546870E+00, 0.2512293E+00, &
     & 0.2494102E+00, 0.2491439E+00, 0.2475014E+00, 0.2444430E+00, &
     & 0.2487600E+00, 0.2214000E+00, 0.2963600E+00, 0.2244500E+00, &
     & 0.2449100E+00, 0.2195500E+00, 0.2329700E+00, 0.2353964E+00, &
     & 0.2351087E+00, 0.2326695E+00, 0.2163648E+00, 0.2163648E+00 /
      data (ref_adm(10,iz,18, 4),iz = 1,20) / &
     & 0.2570960E+00, 0.2570960E+00, 0.2548538E+00, 0.2528068E+00, &
     & 0.2513488E+00, 0.2498661E+00, 0.2477429E+00, 0.2456223E+00, &
     & 0.2543600E+00, 0.2265900E+00, 0.2405080E+00, 0.2883800E+00, &
     & 0.2029700E+00, 0.2417900E+00, 0.2258800E+00, 0.2389555E+00, &
     & 0.2397769E+00, 0.2407925E+00, 0.2302396E+00, 0.2302396E+00 /
      data (ref_adm(10,iz,19, 4),iz = 1,20) / &
     & 0.2572236E+00, 0.2572236E+00, 0.2551859E+00, 0.2531761E+00, &
     & 0.2517038E+00, 0.2503635E+00, 0.2483738E+00, 0.2462532E+00, &
     & 0.2441895E+00, 0.2424037E+00, 0.2410421E+00, 0.2399694E+00, &
     & 0.2867000E+00, 0.2863800E+00, 0.2387458E+00, 0.2388809E+00, &
     & 0.2395839E+00, 0.2404933E+00, 0.2298107E+00, 0.2298107E+00 /
      data (ref_adm(10,iz,20, 4),iz = 1,20) / &
     & 0.2573283E+00, 0.2573283E+00, 0.2555854E+00, 0.2535338E+00, &
     & 0.2520730E+00, 0.2508676E+00, 0.2490113E+00, 0.2468935E+00, &
     & 0.2448026E+00, 0.2044600E+00, 0.2649900E+00, 0.2404280E+00, &
     & 0.2615700E+00, 0.3101300E+00, 0.2388614E+00, 0.2124700E+00, &
     & 0.1893100E+00, 0.1666100E+00, 0.2294615E+00, 0.2294615E+00 /
      data (ref_adm(10,iz,21, 4),iz = 1,20) / &
     & 0.2574608E+00, 0.2574608E+00, 0.2559892E+00, 0.2539921E+00, &
     & 0.2524326E+00, 0.2513629E+00, 0.2496946E+00, 0.2475289E+00, &
     & 0.2455011E+00, 0.2436504E+00, 0.2421670E+00, 0.2408872E+00, &
     & 0.2725600E+00, 0.2393586E+00, 0.2507200E+00, 0.2870400E+00, &
     & 0.1857100E+00, 0.1771800E+00, 0.2290631E+00, 0.2290631E+00 /
      data (ref_adm(10,iz,22, 4),iz = 1,20) / &
     & 0.2533280E+00, 0.2533280E+00, 0.2544338E+00, 0.2576991E+00, &
     & 0.2624418E+00, 0.2653478E+00, 0.2650922E+00, 0.2648544E+00, &
     & 0.2650671E+00, 0.2664347E+00, 0.2694531E+00, 0.2750424E+00, &
     & 0.2820841E+00, 0.2876914E+00, 0.2151700E+00, 0.3404600E+00, &
     & 0.3014047E+00, 0.2505500E+00, 0.2536791E+00, 0.2536791E+00 /
      data (ref_adm(10,iz,23, 4),iz = 1,20) / &
     & 0.2532483E+00, 0.2532483E+00, 0.2538628E+00, 0.2564018E+00, &
     & 0.2613419E+00, 0.2655667E+00, 0.2674095E+00, 0.2667047E+00, &
     & 0.2670739E+00, 0.2678522E+00, 0.2704296E+00, 0.2750985E+00, &
     & 0.2819147E+00, 0.2868711E+00, 0.2931964E+00, 0.2987700E+00, &
     & 0.2985480E+00, 0.2992700E+00, 0.2599800E+00, 0.2599800E+00 /
      data (ref_adm(10,iz,24, 4),iz = 1,20) / &
     & 0.2529669E+00, 0.2529669E+00, 0.2526146E+00, 0.2549545E+00, &
     & 0.2594735E+00, 0.2650903E+00, 0.2685933E+00, 0.2687548E+00, &
     & 0.2691703E+00, 0.2697399E+00, 0.2715998E+00, 0.2757365E+00, &
     & 0.2817837E+00, 0.2864285E+00, 0.2918475E+00, 0.2964865E+00, &
     & 0.2961489E+00, 0.2853617E+00, 0.2509882E+00, 0.2509882E+00 /
      data (ref_adm(10,iz,25, 4),iz = 1,20) / &
     & 0.2527646E+00, 0.2527646E+00, 0.2519818E+00, 0.2535314E+00, &
     & 0.2560200E+00, 0.2323800E+00, 0.2693720E+00, 0.2708788E+00, &
     & 0.2710319E+00, 0.2716999E+00, 0.2727826E+00, 0.2765468E+00, &
     & 0.2815990E+00, 0.2863818E+00, 0.2905982E+00, 0.2946472E+00, &
     & 0.2940364E+00, 0.2619700E+00, 0.2501568E+00, 0.2501568E+00 /
      data (ref_adm(10,iz,26, 4),iz = 1,20) / &
     & 0.2527687E+00, 0.2527687E+00, 0.2512526E+00, 0.2525249E+00, &
     & 0.2560714E+00, 0.3175200E+00, 0.2687108E+00, 0.2574100E+00, &
     & 0.2732120E+00, 0.2738971E+00, 0.2746673E+00, 0.2775692E+00, &
     & 0.2817595E+00, 0.2862535E+00, 0.2902781E+00, 0.2925118E+00, &
     & 0.2915723E+00, 0.2802266E+00, 0.2492127E+00, 0.2492127E+00 /
      data (ref_adm(10,iz,27, 4),iz = 1,20) / &
     & 0.2523807E+00, 0.2523807E+00, 0.2511500E+00, 0.2523581E+00, &
     & 0.2547959E+00, 0.2593530E+00, 0.2672841E+00, 0.2737411E+00, &
     & 0.2753940E+00, 0.2757485E+00, 0.2765332E+00, 0.2789422E+00, &
     & 0.2821932E+00, 0.2859646E+00, 0.2898801E+00, 0.2912377E+00, &
     & 0.2894171E+00, 0.2782184E+00, 0.2484630E+00, 0.2484630E+00 /
      data (ref_adm(10,iz,28, 4),iz = 1,20) / &
     & 0.2521360E+00, 0.2521360E+00, 0.2507701E+00, 0.2518347E+00, &
     & 0.2539881E+00, 0.2578818E+00, 0.2650599E+00, 0.2732528E+00, &
     & 0.2775788E+00, 0.2777885E+00, 0.2787094E+00, 0.2798235E+00, &
     & 0.2829839E+00, 0.2860040E+00, 0.2898944E+00, 0.2904781E+00, &
     & 0.2877801E+00, 0.2766894E+00, 0.2476582E+00, 0.2476582E+00 /
      data (ref_adm(10,iz,29, 4),iz = 1,20) / &
     & 0.2519676E+00, 0.2519676E+00, 0.2503040E+00, 0.2522566E+00, &
     & 0.2536553E+00, 0.2567344E+00, 0.2627191E+00, 0.2718250E+00, &
     & 0.2787983E+00, 0.2799692E+00, 0.2806619E+00, 0.2811426E+00, &
     & 0.2840030E+00, 0.2862370E+00, 0.2894601E+00, 0.2896842E+00, &
     & 0.2864338E+00, 0.2750169E+00, 0.2471502E+00, 0.2471502E+00 /
      data (ref_adm(10,iz,30, 4),iz = 1,20) / &
     & 0.2519164E+00, 0.2519164E+00, 0.2503566E+00, 0.2523428E+00, &
     & 0.2545692E+00, 0.2567425E+00, 0.2610266E+00, 0.2697070E+00, &
     & 0.2784036E+00, 0.2819545E+00, 0.2822540E+00, 0.2832547E+00, &
     & 0.2851050E+00, 0.2870806E+00, 0.2897137E+00, 0.2894860E+00, &
     & 0.2853767E+00, 0.2736960E+00, 0.2467107E+00, 0.2467107E+00 /
      data (ref_adm(10,iz,31, 4),iz = 1,20) / &
     & 0.2519842E+00, 0.2519842E+00, 0.2505917E+00, 0.2530867E+00, &
     & 0.2554294E+00, 0.2572292E+00, 0.2602898E+00, 0.2676692E+00, &
     & 0.2776538E+00, 0.2836452E+00, 0.2837240E+00, 0.2849275E+00, &
     & 0.2859966E+00, 0.2879976E+00, 0.2894997E+00, 0.2893561E+00, &
     & 0.2847794E+00, 0.2722856E+00, 0.2465019E+00, 0.2465019E+00 /
      data (ref_adm(10,iz,32, 4),iz = 1,20) / &
     & 0.2517720E+00, 0.2517720E+00, 0.2508514E+00, 0.2533052E+00, &
     & 0.2561007E+00, 0.2580522E+00, 0.2602390E+00, 0.2659803E+00, &
     & 0.2760392E+00, 0.2841162E+00, 0.2856271E+00, 0.2864183E+00, &
     & 0.2868578E+00, 0.2885631E+00, 0.2894551E+00, 0.2892703E+00, &
     & 0.2840454E+00, 0.2714060E+00, 0.2464716E+00, 0.2464716E+00 /
      data (ref_adm(10,iz,33, 4),iz = 1,20) / &
     & 0.2519140E+00, 0.2519140E+00, 0.2506703E+00, 0.2540957E+00, &
     & 0.2573701E+00, 0.2591223E+00, 0.2610744E+00, 0.2645867E+00, &
     & 0.2741739E+00, 0.2840969E+00, 0.2871554E+00, 0.2878017E+00, &
     & 0.2882813E+00, 0.2894550E+00, 0.2899156E+00, 0.2894731E+00, &
     & 0.2836704E+00, 0.2707920E+00, 0.2464098E+00, 0.2464098E+00 /
      data (ref_adm(10,iz,34, 4),iz = 1,20) / &
     & 0.2587900E+00, 0.2587900E+00, 0.2513518E+00, 0.2550296E+00, &
     & 0.2605688E+00, 0.2615582E+00, 0.2615256E+00, 0.2644587E+00, &
     & 0.2729634E+00, 0.2835798E+00, 0.2883576E+00, 0.2887097E+00, &
     & 0.2890052E+00, 0.2897690E+00, 0.2900384E+00, 0.2892706E+00, &
     & 0.2833019E+00, 0.2699161E+00, 0.2463847E+00, 0.2463847E+00 /
      data (ref_adm(10,iz,35, 4),iz = 1,20) / &
     & 0.2515431E+00, 0.2515431E+00, 0.2513689E+00, 0.2560841E+00, &
     & 0.2665360E+00, 0.2652397E+00, 0.2622297E+00, 0.2642538E+00, &
     & 0.2714052E+00, 0.2831377E+00, 0.2890293E+00, 0.2896589E+00, &
     & 0.2897795E+00, 0.2902679E+00, 0.2905141E+00, 0.2892015E+00, &
     & 0.2831884E+00, 0.2696108E+00, 0.2463835E+00, 0.2463835E+00 /
      data (ref_adm(10,iz,36, 4),iz = 1,20) / &
     & 0.2518194E+00, 0.2518194E+00, 0.2494800E+00, 0.2808100E+00, &
     & 0.3177400E+00, 0.2736579E+00, 0.2631230E+00, 0.2642880E+00, &
     & 0.2708752E+00, 0.2823749E+00, 0.2896689E+00, 0.2904010E+00, &
     & 0.2903021E+00, 0.2906176E+00, 0.2906665E+00, 0.2893265E+00, &
     & 0.2833479E+00, 0.2695698E+00, 0.2463855E+00, 0.2463855E+00 /
      data (ref_adm(10,iz,37, 4),iz = 1,20) / &
     & 0.2517763E+00, 0.2517763E+00, 0.2515614E+00, 0.2573722E+00, &
     & 0.2981210E+00, 0.2837736E+00, 0.2636853E+00, 0.2643300E+00, &
     & 0.2706439E+00, 0.2820272E+00, 0.2898582E+00, 0.2904493E+00, &
     & 0.2908816E+00, 0.2910770E+00, 0.2910075E+00, 0.2895337E+00, &
     & 0.2830574E+00, 0.2694031E+00, 0.2463617E+00, 0.2463617E+00 /
      data (ref_adm(10,iz,38, 4),iz = 1,20) / &
     & 0.2517763E+00, 0.2517763E+00, 0.2515614E+00, 0.2573722E+00, &
     & 0.2981210E+00, 0.2837736E+00, 0.2636853E+00, 0.2643300E+00, &
     & 0.2706439E+00, 0.2820272E+00, 0.2898582E+00, 0.2904493E+00, &
     & 0.2908816E+00, 0.2910770E+00, 0.2910075E+00, 0.2895337E+00, &
     & 0.2830574E+00, 0.2694031E+00, 0.2463617E+00, 0.2463617E+00 /
! Solar Zenith Angle 20.0 Albedo  0.2558447E+00
      data (ref_adm(10,iz, 1, 5),iz = 1,20) / &
     & 0.2858548E+00, 0.2858548E+00, 0.2667783E+00, 0.2631563E+00, &
     & 0.2335500E+00, 0.2640700E+00, 0.2741900E+00, 0.1950800E+00, &
     & 0.2442400E+00, 0.2478800E+00, 0.2376800E+00, 0.2478207E+00, &
     & 0.2469127E+00, 0.2513300E+00, 0.1814500E+00, 0.2169600E+00, &
     & 0.2970600E+00, 0.2437155E+00, 0.3291100E+00, 0.3291100E+00 /
      data (ref_adm(10,iz, 2, 5),iz = 1,20) / &
     & 0.2858548E+00, 0.2858548E+00, 0.2667783E+00, 0.2631563E+00, &
     & 0.2335500E+00, 0.2640700E+00, 0.2741900E+00, 0.1950800E+00, &
     & 0.2442400E+00, 0.2478800E+00, 0.2376800E+00, 0.2478207E+00, &
     & 0.2469127E+00, 0.2513300E+00, 0.1814500E+00, 0.2169600E+00, &
     & 0.2970600E+00, 0.2437155E+00, 0.3291100E+00, 0.3291100E+00 /
      data (ref_adm(10,iz, 3, 5),iz = 1,20) / &
     & 0.4292600E+00, 0.4292600E+00, 0.2667783E+00, 0.2631563E+00, &
     & 0.2553400E+00, 0.2894700E+00, 0.2592515E+00, 0.2560480E+00, &
     & 0.1877200E+00, 0.2508500E+00, 0.2580500E+00, 0.3028900E+00, &
     & 0.2004300E+00, 0.2124900E+00, 0.2260000E+00, 0.2326700E+00, &
     & 0.1917300E+00, 0.2437155E+00, 0.7556590E-01, 0.7556590E-01 /
      data (ref_adm(10,iz, 4, 5),iz = 1,20) / &
     & 0.2858548E+00, 0.2858548E+00, 0.2625400E+00, 0.4756400E+00, &
     & 0.2918600E+00, 0.2678900E+00, 0.2592515E+00, 0.2099100E+00, &
     & 0.2533280E+00, 0.2550800E+00, 0.2694300E+00, 0.2478207E+00, &
     & 0.1979200E+00, 0.2170500E+00, 0.2420200E+00, 0.2465719E+00, &
     & 0.2877000E+00, 0.2437155E+00, 0.2266367E+00, 0.2266367E+00 /
      data (ref_adm(10,iz, 5, 5),iz = 1,20) / &
     & 0.2052900E+00, 0.2052900E+00, 0.2707300E+00, 0.2631563E+00, &
     & 0.2296300E+00, 0.2974300E+00, 0.2288200E+00, 0.2248900E+00, &
     & 0.2217600E+00, 0.2347100E+00, 0.2491982E+00, 0.2384600E+00, &
     & 0.1908100E+00, 0.2119000E+00, 0.2113900E+00, 0.4539100E+00, &
     & 0.2462705E+00, 0.2232700E+00, 0.2266368E+00, 0.2266368E+00 /
      data (ref_adm(10,iz, 6, 5),iz = 1,20) / &
     & 0.2537500E+00, 0.2537500E+00, 0.2633300E+00, 0.2621900E+00, &
     & 0.2542400E+00, 0.2451000E+00, 0.2178500E+00, 0.2267900E+00, &
     & 0.2241100E+00, 0.2349700E+00, 0.2060200E+00, 0.2105500E+00, &
     & 0.3215100E+00, 0.2416800E+00, 0.2356900E+00, 0.4417700E+00, &
     & 0.3275500E+00, 0.3021400E+00, 0.2066600E+00, 0.2066600E+00 /
      data (ref_adm(10,iz, 7, 5),iz = 1,20) / &
     & 0.2710000E+00, 0.2710000E+00, 0.2475000E+00, 0.2576500E+00, &
     & 0.2111500E+00, 0.2523400E+00, 0.2070600E+00, 0.2608800E+00, &
     & 0.1957000E+00, 0.2456200E+00, 0.1858600E+00, 0.2199000E+00, &
     & 0.2999900E+00, 0.1949300E+00, 0.2235600E+00, 0.3637000E+00, &
     & 0.2743100E+00, 0.2437155E+00, 0.2266368E+00, 0.2266368E+00 /
      data (ref_adm(10,iz, 8, 5),iz = 1,20) / &
     & 0.2759200E+00, 0.2759200E+00, 0.2852100E+00, 0.2880300E+00, &
     & 0.2635800E+00, 0.2663300E+00, 0.1951400E+00, 0.2319500E+00, &
     & 0.2303500E+00, 0.2049400E+00, 0.2238200E+00, 0.2455300E+00, &
     & 0.3931900E+00, 0.2138600E+00, 0.2318900E+00, 0.2465719E+00, &
     & 0.2437200E+00, 0.2712600E+00, 0.2567200E+00, 0.2567200E+00 /
      data (ref_adm(10,iz, 9, 5),iz = 1,20) / &
     & 0.2617000E+00, 0.2617000E+00, 0.2691500E+00, 0.2637800E+00, &
     & 0.2844600E+00, 0.2581100E+00, 0.2645300E+00, 0.2723600E+00, &
     & 0.2374700E+00, 0.2326600E+00, 0.2306300E+00, 0.2539000E+00, &
     & 0.2930500E+00, 0.2349800E+00, 0.2536100E+00, 0.2218200E+00, &
     & 0.2462705E+00, 0.2437155E+00, 0.2266368E+00, 0.2266368E+00 /
      data (ref_adm(10,iz,10, 5),iz = 1,20) / &
     & 0.2597000E+00, 0.2597000E+00, 0.2724400E+00, 0.2765500E+00, &
     & 0.2398200E+00, 0.2553600E+00, 0.2512300E+00, 0.2614200E+00, &
     & 0.2523700E+00, 0.2335900E+00, 0.2416600E+00, 0.3567000E+00, &
     & 0.2620600E+00, 0.2019100E+00, 0.2210100E+00, 0.2542800E+00, &
     & 0.2430600E+00, 0.2255600E+00, 0.2266367E+00, 0.2266367E+00 /
      data (ref_adm(10,iz,11, 5),iz = 1,20) / &
     & 0.2730500E+00, 0.2730500E+00, 0.2667783E+00, 0.2631563E+00, &
     & 0.2376400E+00, 0.2694200E+00, 0.2614100E+00, 0.2653000E+00, &
     & 0.2497200E+00, 0.2420700E+00, 0.2403400E+00, 0.2609600E+00, &
     & 0.2668800E+00, 0.2206300E+00, 0.2428500E+00, 0.2663600E+00, &
     & 0.2391400E+00, 0.2437155E+00, 0.2266368E+00, 0.2266368E+00 /
      data (ref_adm(10,iz,12, 5),iz = 1,20) / &
     & 0.2563500E+00, 0.2563500E+00, 0.3164700E+00, 0.2631563E+00, &
     & 0.2269500E+00, 0.2609720E+00, 0.2592515E+00, 0.2377700E+00, &
     & 0.2750700E+00, 0.2763700E+00, 0.2582400E+00, 0.2288900E+00, &
     & 0.2401700E+00, 0.2386600E+00, 0.2745500E+00, 0.2465719E+00, &
     & 0.2697500E+00, 0.2359700E+00, 0.1949000E+00, 0.1949000E+00 /
      data (ref_adm(10,iz,13, 5),iz = 1,20) / &
     & 0.2502600E+00, 0.2502600E+00, 0.2684800E+00, 0.2742100E+00, &
     & 0.2734200E+00, 0.2601900E+00, 0.2568200E+00, 0.2346900E+00, &
     & 0.2359200E+00, 0.2310300E+00, 0.2399200E+00, 0.3395100E+00, &
     & 0.2225200E+00, 0.2190900E+00, 0.2578700E+00, 0.2773200E+00, &
     & 0.2712300E+00, 0.2590400E+00, 0.2266368E+00, 0.2266368E+00 /
      data (ref_adm(10,iz,14, 5),iz = 1,20) / &
     & 0.2858548E+00, 0.2858548E+00, 0.2667783E+00, 0.3287100E+00, &
     & 0.3388700E+00, 0.2609720E+00, 0.3456200E+00, 0.2560480E+00, &
     & 0.2533280E+00, 0.1948600E+00, 0.3516600E+00, 0.2738900E+00, &
     & 0.2762700E+00, 0.2783000E+00, 0.1742200E+00, 0.1718400E+00, &
     & 0.2216300E+00, 0.2352200E+00, 0.2266367E+00, 0.2266367E+00 /
      data (ref_adm(10,iz,15, 5),iz = 1,20) / &
     & 0.2999600E+00, 0.2999600E+00, 0.2972700E+00, 0.2934200E+00, &
     & 0.2753200E+00, 0.2700300E+00, 0.2263100E+00, 0.2388900E+00, &
     & 0.2533280E+00, 0.2339100E+00, 0.3007600E+00, 0.2543300E+00, &
     & 0.2112700E+00, 0.2495100E+00, 0.2360800E+00, 0.2465719E+00, &
     & 0.2462705E+00, 0.2437155E+00, 0.2266368E+00, 0.2266368E+00 /
      data (ref_adm(10,iz,16, 5),iz = 1,20) / &
     & 0.3079600E+00, 0.3079600E+00, 0.2667783E+00, 0.2520100E+00, &
     & 0.2674400E+00, 0.2510000E+00, 0.2326400E+00, 0.2374200E+00, &
     & 0.2533280E+00, 0.2696100E+00, 0.2538400E+00, 0.3071600E+00, &
     & 0.2331400E+00, 0.2273600E+00, 0.2631200E+00, 0.2465719E+00, &
     & 0.2462705E+00, 0.2437155E+00, 0.2266367E+00, 0.2266367E+00 /
      data (ref_adm(10,iz,17, 5),iz = 1,20) / &
     & 0.2858548E+00, 0.2858548E+00, 0.2423700E+00, 0.2586100E+00, &
     & 0.2730200E+00, 0.2609720E+00, 0.2318300E+00, 0.2234800E+00, &
     & 0.2100700E+00, 0.1953000E+00, 0.2271300E+00, 0.2356000E+00, &
     & 0.2477200E+00, 0.2051400E+00, 0.2645900E+00, 0.2465719E+00, &
     & 0.2462705E+00, 0.2437155E+00, 0.2266368E+00, 0.2266368E+00 /
      data (ref_adm(10,iz,18, 5),iz = 1,20) / &
     & 0.2477200E+00, 0.2477200E+00, 0.1890300E+00, 0.2916100E+00, &
     & 0.3098900E+00, 0.2447600E+00, 0.2540793E+00, 0.1909900E+00, &
     & 0.2916400E+00, 0.2372400E+00, 0.2293300E+00, 0.2058900E+00, &
     & 0.2325200E+00, 0.2137700E+00, 0.2362800E+00, 0.2474140E+00, &
     & 0.2481751E+00, 0.2468235E+00, 0.2307820E+00, 0.2307820E+00 /
      data (ref_adm(10,iz,19, 5),iz = 1,20) / &
     & 0.2548700E+00, 0.2548700E+00, 0.2690200E+00, 0.2580226E+00, &
     & 0.2566934E+00, 0.2670100E+00, 0.2546799E+00, 0.2780900E+00, &
     & 0.3090600E+00, 0.2230400E+00, 0.2418600E+00, 0.2455205E+00, &
     & 0.2210200E+00, 0.2355200E+00, 0.2173500E+00, 0.2421700E+00, &
     & 0.2283800E+00, 0.2467391E+00, 0.2305679E+00, 0.2305679E+00 /
      data (ref_adm(10,iz,20, 5),iz = 1,20) / &
     & 0.2529300E+00, 0.2529300E+00, 0.2611612E+00, 0.3137200E+00, &
     & 0.2567838E+00, 0.2566538E+00, 0.2550438E+00, 0.2521801E+00, &
     & 0.2514900E+00, 0.2705500E+00, 0.2370400E+00, 0.2463400E+00, &
     & 0.2272300E+00, 0.2247400E+00, 0.2084700E+00, 0.2519400E+00, &
     & 0.2120800E+00, 0.2464690E+00, 0.2303787E+00, 0.2303787E+00 /
      data (ref_adm(10,iz,21, 5),iz = 1,20) / &
     & 0.2492900E+00, 0.2492900E+00, 0.2615118E+00, 0.2585306E+00, &
     & 0.2568865E+00, 0.2186700E+00, 0.2554153E+00, 0.2271300E+00, &
     & 0.3557300E+00, 0.2481844E+00, 0.2429100E+00, 0.2373300E+00, &
     & 0.2772600E+00, 0.2365800E+00, 0.1989100E+00, 0.2248700E+00, &
     & 0.2479492E+00, 0.2462785E+00, 0.2302350E+00, 0.2302350E+00 /
      data (ref_adm(10,iz,22, 5),iz = 1,20) / &
     & 0.2297400E+00, 0.2297400E+00, 0.2561398E+00, 0.2343100E+00, &
     & 0.2580355E+00, 0.2628663E+00, 0.2661100E+00, 0.2571500E+00, &
     & 0.2597983E+00, 0.2676600E+00, 0.2519100E+00, 0.2529400E+00, &
     & 0.2011100E+00, 0.2697000E+00, 0.2222100E+00, 0.2238800E+00, &
     & 0.2789159E+00, 0.2722841E+00, 0.2376156E+00, 0.2376156E+00 /
      data (ref_adm(10,iz,23, 5),iz = 1,20) / &
     & 0.2323500E+00, 0.2323500E+00, 0.2387300E+00, 0.2558895E+00, &
     & 0.2576271E+00, 0.2622622E+00, 0.2649345E+00, 0.2351900E+00, &
     & 0.2824700E+00, 0.2679500E+00, 0.2616600E+00, 0.2303200E+00, &
     & 0.2153300E+00, 0.2784900E+00, 0.2537300E+00, 0.2369100E+00, &
     & 0.1828100E+00, 0.2710832E+00, 0.2370361E+00, 0.2370361E+00 /
      data (ref_adm(10,iz,24, 5),iz = 1,20) / &
     & 0.2887200E+00, 0.2887200E+00, 0.2852800E+00, 0.2878700E+00, &
     & 0.2783100E+00, 0.2633600E+00, 0.2483300E+00, 0.2630800E+00, &
     & 0.2660600E+00, 0.2390100E+00, 0.2150200E+00, 0.2151500E+00, &
     & 0.1938100E+00, 0.2783700E+00, 0.2588200E+00, 0.2412900E+00, &
     & 0.2271400E+00, 0.2698207E+00, 0.2363511E+00, 0.2363511E+00 /
      data (ref_adm(10,iz,25, 5),iz = 1,20) / &
     & 0.2572116E+00, 0.2572116E+00, 0.2310000E+00, 0.2330300E+00, &
     & 0.2740400E+00, 0.2646800E+00, 0.2319600E+00, 0.2769900E+00, &
     & 0.2533500E+00, 0.2860100E+00, 0.3177400E+00, 0.2909500E+00, &
     & 0.2763000E+00, 0.2645500E+00, 0.2760300E+00, 0.2694700E+00, &
     & 0.2538300E+00, 0.2328000E+00, 0.2358061E+00, 0.2358061E+00 /
      data (ref_adm(10,iz,26, 5),iz = 1,20) / &
     & 0.2508300E+00, 0.2508300E+00, 0.2436800E+00, 0.2580200E+00, &
     & 0.2718100E+00, 0.2497100E+00, 0.2515400E+00, 0.2573900E+00, &
     & 0.2591200E+00, 0.2553900E+00, 0.2212500E+00, 0.2297400E+00, &
     & 0.2297000E+00, 0.2192800E+00, 0.2230700E+00, 0.2260400E+00, &
     & 0.2193100E+00, 0.2190500E+00, 0.1860800E+00, 0.1860800E+00 /
      data (ref_adm(10,iz,27, 5),iz = 1,20) / &
     & 0.2718900E+00, 0.2718900E+00, 0.2656200E+00, 0.2567600E+00, &
     & 0.2399700E+00, 0.2265900E+00, 0.2977200E+00, 0.2775200E+00, &
     & 0.2608900E+00, 0.2577900E+00, 0.2614525E+00, 0.2618251E+00, &
     & 0.2640625E+00, 0.2345600E+00, 0.2778100E+00, 0.2554500E+00, &
     & 0.2736677E+00, 0.2172800E+00, 0.1937300E+00, 0.1937300E+00 /
      data (ref_adm(10,iz,28, 5),iz = 1,20) / &
     & 0.2970700E+00, 0.2970700E+00, 0.3122700E+00, 0.2553100E+00, &
     & 0.2318100E+00, 0.2786900E+00, 0.2765400E+00, 0.2674556E+00, &
     & 0.2848600E+00, 0.2636841E+00, 0.2534800E+00, 0.2611300E+00, &
     & 0.2500900E+00, 0.2044800E+00, 0.2590900E+00, 0.2592100E+00, &
     & 0.2729513E+00, 0.2657573E+00, 0.2343549E+00, 0.2343549E+00 /
      data (ref_adm(10,iz,29, 5),iz = 1,20) / &
     & 0.2578687E+00, 0.2578687E+00, 0.2600054E+00, 0.2602100E+00, &
     & 0.2575825E+00, 0.2329000E+00, 0.3008900E+00, 0.2679194E+00, &
     & 0.2661651E+00, 0.2644199E+00, 0.2626953E+00, 0.2563400E+00, &
     & 0.2327200E+00, 0.2680100E+00, 0.3093300E+00, 0.2714383E+00, &
     & 0.2721827E+00, 0.2647502E+00, 0.2339205E+00, 0.2339205E+00 /
      data (ref_adm(10,iz,30, 5),iz = 1,20) / &
     & 0.2579718E+00, 0.2579718E+00, 0.2614687E+00, 0.2595260E+00, &
     & 0.2656500E+00, 0.2925500E+00, 0.2636730E+00, 0.2681824E+00, &
     & 0.2290700E+00, 0.2652145E+00, 0.2558500E+00, 0.2793700E+00, &
     & 0.3193800E+00, 0.2415200E+00, 0.2685483E+00, 0.2711689E+00, &
     & 0.2717682E+00, 0.2642792E+00, 0.2336752E+00, 0.2336752E+00 /
      data (ref_adm(10,iz,31, 5),iz = 1,20) / &
     & 0.2981200E+00, 0.2981200E+00, 0.2610100E+00, 0.2943300E+00, &
     & 0.2954800E+00, 0.2753900E+00, 0.2429600E+00, 0.2425300E+00, &
     & 0.2462600E+00, 0.2658751E+00, 0.2725700E+00, 0.2635165E+00, &
     & 0.2645317E+00, 0.2664259E+00, 0.2683856E+00, 0.2707071E+00, &
     & 0.2713006E+00, 0.2634045E+00, 0.2334457E+00, 0.2334457E+00 /
      data (ref_adm(10,iz,32, 5),iz = 1,20) / &
     & 0.2949200E+00, 0.2949200E+00, 0.2527600E+00, 0.2799500E+00, &
     & 0.2533800E+00, 0.2718300E+00, 0.3126300E+00, 0.2827000E+00, &
     & 0.2416500E+00, 0.2665577E+00, 0.2647346E+00, 0.2638269E+00, &
     & 0.2647258E+00, 0.2664765E+00, 0.2684590E+00, 0.2704321E+00, &
     & 0.2707939E+00, 0.2628974E+00, 0.2331575E+00, 0.2331575E+00 /
      data (ref_adm(10,iz,33, 5),iz = 1,20) / &
     & 0.3156600E+00, 0.3156600E+00, 0.2760300E+00, 0.2981000E+00, &
     & 0.2808100E+00, 0.3020000E+00, 0.2992100E+00, 0.2849000E+00, &
     & 0.2708300E+00, 0.2889300E+00, 0.2651677E+00, 0.2642612E+00, &
     & 0.2647632E+00, 0.2668768E+00, 0.2683079E+00, 0.2698370E+00, &
     & 0.2703720E+00, 0.2622932E+00, 0.2330566E+00, 0.2330566E+00 /
      data (ref_adm(10,iz,34, 5),iz = 1,20) / &
     & 0.2828700E+00, 0.2828700E+00, 0.3247400E+00, 0.3122600E+00, &
     & 0.2751400E+00, 0.2818300E+00, 0.2643600E+00, 0.2763800E+00, &
     & 0.2643000E+00, 0.3288300E+00, 0.3107100E+00, 0.2647274E+00, &
     & 0.2650543E+00, 0.2668282E+00, 0.2683961E+00, 0.2699258E+00, &
     & 0.2698869E+00, 0.2618302E+00, 0.2328466E+00, 0.2328466E+00 /
      data (ref_adm(10,iz,35, 5),iz = 1,20) / &
     & 0.2659400E+00, 0.2659400E+00, 0.2855000E+00, 0.2991000E+00, &
     & 0.2604687E+00, 0.2239300E+00, 0.2584800E+00, 0.2788000E+00, &
     & 0.2749100E+00, 0.2586000E+00, 0.2496000E+00, 0.2648681E+00, &
     & 0.2652383E+00, 0.2668146E+00, 0.2683076E+00, 0.2697526E+00, &
     & 0.2694466E+00, 0.2615080E+00, 0.2327500E+00, 0.2327500E+00 /
      data (ref_adm(10,iz,36, 5),iz = 1,20) / &
     & 0.2841900E+00, 0.2841900E+00, 0.3509000E+00, 0.3244200E+00, &
     & 0.2751900E+00, 0.2902700E+00, 0.3133100E+00, 0.3049900E+00, &
     & 0.2700559E+00, 0.2681049E+00, 0.2755300E+00, 0.2650540E+00, &
     & 0.2653405E+00, 0.2668593E+00, 0.2683297E+00, 0.2696119E+00, &
     & 0.2693364E+00, 0.2613761E+00, 0.2327270E+00, 0.2327270E+00 /
      data (ref_adm(10,iz,37, 5),iz = 1,20) / &
     & 0.2356800E+00, 0.2356800E+00, 0.2945943E+00, 0.3285200E+00, &
     & 0.3081800E+00, 0.2903700E+00, 0.3256300E+00, 0.3045600E+00, &
     & 0.2445300E+00, 0.2683226E+00, 0.2663685E+00, 0.2649617E+00, &
     & 0.2653687E+00, 0.2671257E+00, 0.2683259E+00, 0.2696057E+00, &
     & 0.2694647E+00, 0.2614316E+00, 0.2326616E+00, 0.2326616E+00 /
      data (ref_adm(10,iz,38, 5),iz = 1,20) / &
     & 0.2356800E+00, 0.2356800E+00, 0.2945943E+00, 0.3285200E+00, &
     & 0.3081800E+00, 0.2903700E+00, 0.3256300E+00, 0.3045600E+00, &
     & 0.2445300E+00, 0.2683226E+00, 0.2663685E+00, 0.2649617E+00, &
     & 0.2653687E+00, 0.2671257E+00, 0.2683259E+00, 0.2696057E+00, &
     & 0.2694647E+00, 0.2614316E+00, 0.2326616E+00, 0.2326616E+00 /
! Solar Zenith Angle 25.0 Albedo  0.2655555E+00
      data (ref_adm(10,iz, 1, 6),iz = 1,20) / &
     & 0.2859600E+00, 0.2859600E+00, 0.2425800E+00, 0.2352200E+00, &
     & 0.2721800E+00, 0.2795200E+00, 0.1591500E+00, 0.2148300E+00, &
     & 0.2144100E+00, 0.2371576E+00, 0.2392963E+00, 0.2396800E+00, &
     & 0.2387200E+00, 0.2938600E+00, 0.2705700E+00, 0.2236600E+00, &
     & 0.2556300E+00, 0.2490900E+00, 0.1906400E+00, 0.1906400E+00 /
      data (ref_adm(10,iz, 2, 6),iz = 1,20) / &
     & 0.2859600E+00, 0.2859600E+00, 0.2425800E+00, 0.2352200E+00, &
     & 0.2721800E+00, 0.2795200E+00, 0.1591500E+00, 0.2148300E+00, &
     & 0.2144100E+00, 0.2371576E+00, 0.2392963E+00, 0.2396800E+00, &
     & 0.2387200E+00, 0.2938600E+00, 0.2705700E+00, 0.2236600E+00, &
     & 0.2556300E+00, 0.2490900E+00, 0.1906400E+00, 0.1906400E+00 /
      data (ref_adm(10,iz, 3, 6),iz = 1,20) / &
     & 0.2498900E+00, 0.2498900E+00, 0.2221200E+00, 0.2630100E+00, &
     & 0.2345700E+00, 0.2242700E+00, 0.2267300E+00, 0.2370200E+00, &
     & 0.2107800E+00, 0.2330400E+00, 0.2356500E+00, 0.2439481E+00, &
     & 0.2139400E+00, 0.2324700E+00, 0.3239000E+00, 0.3334700E+00, &
     & 0.2498600E+00, 0.2587800E+00, 0.3968884E-01, 0.3968884E-01 /
      data (ref_adm(10,iz, 4, 6),iz = 1,20) / &
     & 0.2597848E+00, 0.2597848E+00, 0.2159500E+00, 0.2222000E+00, &
     & 0.2791800E+00, 0.2156600E+00, 0.2411412E+00, 0.2032700E+00, &
     & 0.2260400E+00, 0.1978600E+00, 0.2392803E+00, 0.2440904E+00, &
     & 0.2726100E+00, 0.2577758E+00, 0.3257200E+00, 0.2611700E+00, &
     & 0.2916000E+00, 0.2508900E+00, 0.2347100E+00, 0.2347100E+00 /
      data (ref_adm(10,iz, 5, 6),iz = 1,20) / &
     & 0.3362200E+00, 0.3362200E+00, 0.2056300E+00, 0.1915100E+00, &
     & 0.1990200E+00, 0.2418621E+00, 0.1968800E+00, 0.1613200E+00, &
     & 0.3324000E+00, 0.1935500E+00, 0.2393379E+00, 0.2402900E+00, &
     & 0.2718300E+00, 0.2414200E+00, 0.2940500E+00, 0.2790900E+00, &
     & 0.2769400E+00, 0.2840903E+00, 0.2507213E+00, 0.2507213E+00 /
      data (ref_adm(10,iz, 6, 6),iz = 1,20) / &
     & 0.3594500E+00, 0.3594500E+00, 0.2295900E+00, 0.2352078E+00, &
     & 0.2485400E+00, 0.2221100E+00, 0.2413345E+00, 0.2388776E+00, &
     & 0.2374065E+00, 0.2467000E+00, 0.2393629E+00, 0.2779000E+00, &
     & 0.2615900E+00, 0.2610200E+00, 0.3399000E+00, 0.2882500E+00, &
     & 0.3388400E+00, 0.2839159E+00, 0.2887200E+00, 0.2887200E+00 /
      data (ref_adm(10,iz, 7, 6),iz = 1,20) / &
     & 0.2443900E+00, 0.2443900E+00, 0.2530300E+00, 0.2412700E+00, &
     & 0.2343400E+00, 0.2734600E+00, 0.1664000E+00, 0.2094900E+00, &
     & 0.2228600E+00, 0.2297400E+00, 0.2393788E+00, 0.2735100E+00, &
     & 0.2293800E+00, 0.2272900E+00, 0.2867200E+00, 0.3112800E+00, &
     & 0.3335400E+00, 0.3499100E+00, 0.2505266E+00, 0.2505266E+00 /
      data (ref_adm(10,iz, 8, 6),iz = 1,20) / &
     & 0.2587900E+00, 0.2587900E+00, 0.2469100E+00, 0.2726500E+00, &
     & 0.2749900E+00, 0.2889000E+00, 0.2553000E+00, 0.2261900E+00, &
     & 0.2372500E+00, 0.2410200E+00, 0.2393902E+00, 0.1987500E+00, &
     & 0.2738600E+00, 0.2084800E+00, 0.1998100E+00, 0.3078400E+00, &
     & 0.2963800E+00, 0.2836085E+00, 0.2503342E+00, 0.2503342E+00 /
      data (ref_adm(10,iz, 9, 6),iz = 1,20) / &
     & 0.2610900E+00, 0.2610900E+00, 0.2884800E+00, 0.2455800E+00, &
     & 0.2845200E+00, 0.2830900E+00, 0.2732800E+00, 0.3191800E+00, &
     & 0.2843300E+00, 0.2011500E+00, 0.2083700E+00, 0.2061600E+00, &
     & 0.2040700E+00, 0.3638200E+00, 0.2664100E+00, 0.2436700E+00, &
     & 0.3276300E+00, 0.2590400E+00, 0.2501962E+00, 0.2501962E+00 /
      data (ref_adm(10,iz,10, 6),iz = 1,20) / &
     & 0.2692100E+00, 0.2692100E+00, 0.2815100E+00, 0.2711400E+00, &
     & 0.2541200E+00, 0.2546200E+00, 0.2165500E+00, 0.2209900E+00, &
     & 0.1928200E+00, 0.1801500E+00, 0.1961300E+00, 0.2001000E+00, &
     & 0.2189500E+00, 0.2398500E+00, 0.2364100E+00, 0.2773643E+00, &
     & 0.2848357E+00, 0.2831703E+00, 0.2500231E+00, 0.2500231E+00 /
      data (ref_adm(10,iz,11, 6),iz = 1,20) / &
     & 0.2699700E+00, 0.2699700E+00, 0.2805000E+00, 0.2517000E+00, &
     & 0.2709000E+00, 0.2514600E+00, 0.2369200E+00, 0.2382000E+00, &
     & 0.2192100E+00, 0.2313500E+00, 0.2173500E+00, 0.2194700E+00, &
     & 0.2170800E+00, 0.2544500E+00, 0.2729600E+00, 0.2737900E+00, &
     & 0.3150200E+00, 0.2398100E+00, 0.2498288E+00, 0.2498288E+00 /
      data (ref_adm(10,iz,12, 6),iz = 1,20) / &
     & 0.2699500E+00, 0.2699500E+00, 0.3295900E+00, 0.2534300E+00, &
     & 0.2603700E+00, 0.2934300E+00, 0.2941600E+00, 0.2821900E+00, &
     & 0.2629600E+00, 0.2439700E+00, 0.2541400E+00, 0.2423000E+00, &
     & 0.2467300E+00, 0.2076500E+00, 0.2050600E+00, 0.2476700E+00, &
     & 0.2998400E+00, 0.2247100E+00, 0.2496151E+00, 0.2496151E+00 /
      data (ref_adm(10,iz,13, 6),iz = 1,20) / &
     & 0.2190300E+00, 0.2190300E+00, 0.2545100E+00, 0.2666400E+00, &
     & 0.2322400E+00, 0.2097500E+00, 0.2042400E+00, 0.3272200E+00, &
     & 0.2859900E+00, 0.2542600E+00, 0.2253200E+00, 0.2540400E+00, &
     & 0.2464000E+00, 0.2295800E+00, 0.1938100E+00, 0.1803400E+00, &
     & 0.2705800E+00, 0.2823392E+00, 0.2493966E+00, 0.2493966E+00 /
      data (ref_adm(10,iz,14, 6),iz = 1,20) / &
     & 0.2419000E+00, 0.2419000E+00, 0.3039700E+00, 0.2115100E+00, &
     & 0.2319700E+00, 0.2413400E+00, 0.2324500E+00, 0.2444300E+00, &
     & 0.2568200E+00, 0.1939200E+00, 0.2609800E+00, 0.2503400E+00, &
     & 0.2438300E+00, 0.2293000E+00, 0.2200200E+00, 0.2107400E+00, &
     & 0.2490600E+00, 0.2520800E+00, 0.2492075E+00, 0.2492075E+00 /
      data (ref_adm(10,iz,15, 6),iz = 1,20) / &
     & 0.2553300E+00, 0.2553300E+00, 0.2575700E+00, 0.2873800E+00, &
     & 0.2429200E+00, 0.2350500E+00, 0.2532900E+00, 0.2670800E+00, &
     & 0.3120500E+00, 0.3194000E+00, 0.2568000E+00, 0.2621000E+00, &
     & 0.2591600E+00, 0.2755600E+00, 0.2501300E+00, 0.2239700E+00, &
     & 0.2267200E+00, 0.2325800E+00, 0.2489794E+00, 0.2489794E+00 /
      data (ref_adm(10,iz,16, 6),iz = 1,20) / &
     & 0.2590900E+00, 0.2590900E+00, 0.2707500E+00, 0.2963100E+00, &
     & 0.2807300E+00, 0.2725600E+00, 0.2753300E+00, 0.2404700E+00, &
     & 0.2941900E+00, 0.2385605E+00, 0.2631100E+00, 0.2415700E+00, &
     & 0.2300400E+00, 0.2396800E+00, 0.2539500E+00, 0.1820100E+00, &
     & 0.2116000E+00, 0.2497400E+00, 0.2487560E+00, 0.2487560E+00 /
      data (ref_adm(10,iz,17, 6),iz = 1,20) / &
     & 0.2714300E+00, 0.2714300E+00, 0.2872700E+00, 0.2801800E+00, &
     & 0.2387400E+00, 0.2429896E+00, 0.2434435E+00, 0.2409305E+00, &
     & 0.2391411E+00, 0.2508800E+00, 0.2407100E+00, 0.2560500E+00, &
     & 0.2199500E+00, 0.2102600E+00, 0.2205200E+00, 0.2472800E+00, &
     & 0.2084200E+00, 0.2371500E+00, 0.2485381E+00, 0.2485381E+00 /
      data (ref_adm(10,iz,18, 6),iz = 1,20) / &
     & 0.2784800E+00, 0.2784800E+00, 0.3416700E+00, 0.2878500E+00, &
     & 0.2693200E+00, 0.2122400E+00, 0.2671147E+00, 0.2205500E+00, &
     & 0.2318100E+00, 0.2205900E+00, 0.2492600E+00, 0.2790600E+00, &
     & 0.2174300E+00, 0.2472600E+00, 0.2037500E+00, 0.2336400E+00, &
     & 0.2246600E+00, 0.2574608E+00, 0.2398867E+00, 0.2398867E+00 /
      data (ref_adm(10,iz,19, 6),iz = 1,20) / &
     & 0.2968200E+00, 0.2968200E+00, 0.2586800E+00, 0.2925100E+00, &
     & 0.2719626E+00, 0.2708147E+00, 0.2961900E+00, 0.2206400E+00, &
     & 0.2386800E+00, 0.2337800E+00, 0.2562300E+00, 0.2733200E+00, &
     & 0.2509800E+00, 0.2280300E+00, 0.2589178E+00, 0.2630600E+00, &
     & 0.2592373E+00, 0.2569851E+00, 0.2393074E+00, 0.2393074E+00 /
      data (ref_adm(10,iz,20, 6),iz = 1,20) / &
     & 0.2535700E+00, 0.2535700E+00, 0.2364900E+00, 0.3125500E+00, &
     & 0.3113600E+00, 0.2715825E+00, 0.2351700E+00, 0.2217700E+00, &
     & 0.2762100E+00, 0.2525000E+00, 0.2761300E+00, 0.2558200E+00, &
     & 0.2542700E+00, 0.2614900E+00, 0.2507300E+00, 0.2770500E+00, &
     & 0.2447500E+00, 0.2565304E+00, 0.2388505E+00, 0.2388505E+00 /
      data (ref_adm(10,iz,21, 6),iz = 1,20) / &
     & 0.2400200E+00, 0.2400200E+00, 0.3053900E+00, 0.2933800E+00, &
     & 0.2851500E+00, 0.2723018E+00, 0.3013800E+00, 0.2558200E+00, &
     & 0.2407400E+00, 0.2561600E+00, 0.2123300E+00, 0.2602183E+00, &
     & 0.2779100E+00, 0.2587900E+00, 0.2840400E+00, 0.2612800E+00, &
     & 0.3312700E+00, 0.2726100E+00, 0.2383892E+00, 0.2383892E+00 /
      data (ref_adm(10,iz,22, 6),iz = 1,20) / &
     & 0.2998600E+00, 0.2998600E+00, 0.3461800E+00, 0.3513000E+00, &
     & 0.2832300E+00, 0.2305300E+00, 0.2712700E+00, 0.2540600E+00, &
     & 0.2629800E+00, 0.2647700E+00, 0.3226800E+00, 0.2756053E+00, &
     & 0.3056000E+00, 0.2412200E+00, 0.2393100E+00, 0.2433700E+00, &
     & 0.2576000E+00, 0.2116900E+00, 0.2552565E+00, 0.2552565E+00 /
      data (ref_adm(10,iz,23, 6),iz = 1,20) / &
     & 0.2977300E+00, 0.2977300E+00, 0.3072000E+00, 0.2437000E+00, &
     & 0.3449300E+00, 0.2936300E+00, 0.2636300E+00, 0.2706200E+00, &
     & 0.2834300E+00, 0.2540500E+00, 0.2394300E+00, 0.3371400E+00, &
     & 0.3166000E+00, 0.3000100E+00, 0.2646800E+00, 0.2449400E+00, &
     & 0.2413300E+00, 0.2763678E+00, 0.2547578E+00, 0.2547578E+00 /
      data (ref_adm(10,iz,24, 6),iz = 1,20) / &
     & 0.2052100E+00, 0.2052100E+00, 0.2985300E+00, 0.2532100E+00, &
     & 0.2756400E+00, 0.2957600E+00, 0.2975500E+00, 0.2694600E+00, &
     & 0.4891600E+00, 0.3571700E+00, 0.3980900E+00, 0.2783117E+00, &
     & 0.2743600E+00, 0.2486100E+00, 0.2706200E+00, 0.2453100E+00, &
     & 0.2701000E+00, 0.2757308E+00, 0.2546227E+00, 0.2546227E+00 /
      data (ref_adm(10,iz,25, 6),iz = 1,20) / &
     & 0.3533700E+00, 0.3533700E+00, 0.2828200E+00, 0.2310400E+00, &
     & 0.2913200E+00, 0.3261800E+00, 0.3679200E+00, 0.3008600E+00, &
     & 0.3083300E+00, 0.3200000E+00, 0.2595400E+00, 0.2520900E+00, &
     & 0.3338700E+00, 0.2325700E+00, 0.2546100E+00, 0.2355200E+00, &
     & 0.2754200E+00, 0.2386000E+00, 0.2547453E+00, 0.2547453E+00 /
      data (ref_adm(10,iz,26, 6),iz = 1,20) / &
     & 0.2978700E+00, 0.2978700E+00, 0.2722700E+00, 0.2565400E+00, &
     & 0.2838200E+00, 0.3095500E+00, 0.2842298E+00, 0.2911200E+00, &
     & 0.2852600E+00, 0.2931000E+00, 0.3247900E+00, 0.3130900E+00, &
     & 0.2333800E+00, 0.2194200E+00, 0.2489200E+00, 0.2477900E+00, &
     & 0.3106400E+00, 0.2756225E+00, 0.2550516E+00, 0.2550516E+00 /
      data (ref_adm(10,iz,27, 6),iz = 1,20) / &
     & 0.3216300E+00, 0.3216300E+00, 0.3388900E+00, 0.2721200E+00, &
     & 0.2807300E+00, 0.2875100E+00, 0.3003000E+00, 0.3034300E+00, &
     & 0.2773500E+00, 0.3318000E+00, 0.3354100E+00, 0.3111300E+00, &
     & 0.2836595E+00, 0.2394200E+00, 0.2712800E+00, 0.2765800E+00, &
     & 0.2677500E+00, 0.2758950E+00, 0.2556353E+00, 0.2556353E+00 /
      data (ref_adm(10,iz,28, 6),iz = 1,20) / &
     & 0.3017700E+00, 0.3017700E+00, 0.2650500E+00, 0.2504500E+00, &
     & 0.2507800E+00, 0.2580400E+00, 0.3098100E+00, 0.2473400E+00, &
     & 0.2846600E+00, 0.3017200E+00, 0.2700500E+00, 0.2648300E+00, &
     & 0.3309900E+00, 0.2805300E+00, 0.2904000E+00, 0.3110100E+00, &
     & 0.3017800E+00, 0.2837900E+00, 0.2564803E+00, 0.2564803E+00 /
      data (ref_adm(10,iz,29, 6),iz = 1,20) / &
     & 0.4026800E+00, 0.4026800E+00, 0.3009600E+00, 0.2880200E+00, &
     & 0.2912800E+00, 0.2844199E+00, 0.2861434E+00, 0.2589100E+00, &
     & 0.2575100E+00, 0.2654100E+00, 0.2525400E+00, 0.3526500E+00, &
     & 0.2694000E+00, 0.2828800E+00, 0.2680200E+00, 0.2426900E+00, &
     & 0.2919700E+00, 0.2299900E+00, 0.2573918E+00, 0.2573918E+00 /
      data (ref_adm(10,iz,30, 6),iz = 1,20) / &
     & 0.2773000E+00, 0.2773000E+00, 0.2811800E+00, 0.2702200E+00, &
     & 0.2951200E+00, 0.2912900E+00, 0.3266300E+00, 0.2564100E+00, &
     & 0.2978400E+00, 0.2316300E+00, 0.2833900E+00, 0.2823100E+00, &
     & 0.2856300E+00, 0.2963600E+00, 0.2673700E+00, 0.2465100E+00, &
     & 0.2801400E+00, 0.2780143E+00, 0.2584614E+00, 0.2584614E+00 /
      data (ref_adm(10,iz,31, 6),iz = 1,20) / &
     & 0.2967800E+00, 0.2967800E+00, 0.3023100E+00, 0.2911700E+00, &
     & 0.2979300E+00, 0.2901900E+00, 0.2965000E+00, 0.2826100E+00, &
     & 0.2903400E+00, 0.2728200E+00, 0.2707500E+00, 0.2562700E+00, &
     & 0.2951900E+00, 0.2767700E+00, 0.2536400E+00, 0.2570100E+00, &
     & 0.2742700E+00, 0.2790656E+00, 0.2595361E+00, 0.2595361E+00 /
      data (ref_adm(10,iz,32, 6),iz = 1,20) / &
     & 0.2677900E+00, 0.2677900E+00, 0.2531200E+00, 0.2641700E+00, &
     & 0.2921500E+00, 0.2694500E+00, 0.2784400E+00, 0.3096200E+00, &
     & 0.2895500E+00, 0.2879700E+00, 0.2828500E+00, 0.2346500E+00, &
     & 0.2819700E+00, 0.2279200E+00, 0.2917395E+00, 0.2897360E+00, &
     & 0.2870966E+00, 0.2801811E+00, 0.2607100E+00, 0.2607100E+00 /
      data (ref_adm(10,iz,33, 6),iz = 1,20) / &
     & 0.2634600E+00, 0.2634600E+00, 0.2288400E+00, 0.2609900E+00, &
     & 0.2639600E+00, 0.2864100E+00, 0.2644100E+00, 0.2705700E+00, &
     & 0.2977900E+00, 0.2956800E+00, 0.2833300E+00, 0.2802300E+00, &
     & 0.2948900E+00, 0.2669700E+00, 0.2935700E+00, 0.2911774E+00, &
     & 0.2883112E+00, 0.2813088E+00, 0.2618525E+00, 0.2618525E+00 /
      data (ref_adm(10,iz,34, 6),iz = 1,20) / &
     & 0.2467100E+00, 0.2467100E+00, 0.2974400E+00, 0.2512400E+00, &
     & 0.3242200E+00, 0.2839200E+00, 0.2641700E+00, 0.2720300E+00, &
     & 0.2961900E+00, 0.3063900E+00, 0.2930500E+00, 0.3079900E+00, &
     & 0.2927500E+00, 0.2716800E+00, 0.2863000E+00, 0.2923196E+00, &
     & 0.2893084E+00, 0.2822323E+00, 0.2628094E+00, 0.2628094E+00 /
      data (ref_adm(10,iz,35, 6),iz = 1,20) / &
     & 0.2875200E+00, 0.2875200E+00, 0.4040300E+00, 0.3225500E+00, &
     & 0.3305800E+00, 0.2679100E+00, 0.2802200E+00, 0.2579600E+00, &
     & 0.2920100E+00, 0.3203600E+00, 0.2707200E+00, 0.2574100E+00, &
     & 0.3548400E+00, 0.2725700E+00, 0.3000800E+00, 0.2932957E+00, &
     & 0.2901352E+00, 0.2830512E+00, 0.2636101E+00, 0.2636101E+00 /
      data (ref_adm(10,iz,36, 6),iz = 1,20) / &
     & 0.2661200E+00, 0.2661200E+00, 0.2413000E+00, 0.2817100E+00, &
     & 0.3113400E+00, 0.2913000E+00, 0.3597000E+00, 0.3111300E+00, &
     & 0.3106100E+00, 0.3895800E+00, 0.2977240E+00, 0.2995900E+00, &
     & 0.3110000E+00, 0.2933000E+00, 0.3340700E+00, 0.2940240E+00, &
     & 0.2907895E+00, 0.2835595E+00, 0.2642022E+00, 0.2642022E+00 /
      data (ref_adm(10,iz,37, 6),iz = 1,20) / &
     & 0.2538000E+00, 0.2538000E+00, 0.2426300E+00, 0.2331100E+00, &
     & 0.2755200E+00, 0.3285600E+00, 0.3303700E+00, 0.3164500E+00, &
     & 0.2470400E+00, 0.3375800E+00, 0.3241500E+00, 0.2851200E+00, &
     & 0.3194500E+00, 0.2983000E+00, 0.2971655E+00, 0.2944120E+00, &
     & 0.2911464E+00, 0.2838310E+00, 0.2645369E+00, 0.2645369E+00 /
      data (ref_adm(10,iz,38, 6),iz = 1,20) / &
     & 0.2538000E+00, 0.2538000E+00, 0.2426300E+00, 0.2331100E+00, &
     & 0.2755200E+00, 0.3285600E+00, 0.3303700E+00, 0.3164500E+00, &
     & 0.2470400E+00, 0.3375800E+00, 0.3241500E+00, 0.2851200E+00, &
     & 0.3194500E+00, 0.2983000E+00, 0.2971655E+00, 0.2944120E+00, &
     & 0.2911464E+00, 0.2838310E+00, 0.2645369E+00, 0.2645369E+00 /
! Solar Zenith Angle 30.0 Albedo  0.2912359E+00
      data (ref_adm(10,iz, 1, 7),iz = 1,20) / &
     & 0.2502100E+00, 0.2502100E+00, 0.3006900E+00, 0.2858100E+00, &
     & 0.2819200E+00, 0.2158400E+00, 0.3215900E+00, 0.3082100E+00, &
     & 0.2808800E+00, 0.2560300E+00, 0.1954900E+00, 0.2650700E+00, &
     & 0.2891900E+00, 0.2724400E+00, 0.2525600E+00, 0.2755500E+00, &
     & 0.3128100E+00, 0.3151233E+00, 0.2717835E+00, 0.2717835E+00 /
      data (ref_adm(10,iz, 2, 7),iz = 1,20) / &
     & 0.2502100E+00, 0.2502100E+00, 0.3006900E+00, 0.2858100E+00, &
     & 0.2819200E+00, 0.2158400E+00, 0.3215900E+00, 0.3082100E+00, &
     & 0.2808800E+00, 0.2560300E+00, 0.1954900E+00, 0.2650700E+00, &
     & 0.2891900E+00, 0.2724400E+00, 0.2525600E+00, 0.2755500E+00, &
     & 0.3128100E+00, 0.3151233E+00, 0.2717835E+00, 0.2717835E+00 /
      data (ref_adm(10,iz, 3, 7),iz = 1,20) / &
     & 0.3079200E+00, 0.3079200E+00, 0.2475700E+00, 0.2654600E+00, &
     & 0.2656000E+00, 0.2716600E+00, 0.2806500E+00, 0.2735400E+00, &
     & 0.2816300E+00, 0.2665800E+00, 0.2547900E+00, 0.2698100E+00, &
     & 0.2682600E+00, 0.3216200E+00, 0.3107100E+00, 0.3141700E+00, &
     & 0.3437800E+00, 0.3408100E+00, 0.4179582E-08, 0.4179582E-08 /
      data (ref_adm(10,iz, 4, 7),iz = 1,20) / &
     & 0.2920600E+00, 0.2920600E+00, 0.2787100E+00, 0.3344800E+00, &
     & 0.2773300E+00, 0.3024200E+00, 0.2905700E+00, 0.3527700E+00, &
     & 0.2147900E+00, 0.2836300E+00, 0.2765400E+00, 0.2628400E+00, &
     & 0.2816600E+00, 0.3120400E+00, 0.3034800E+00, 0.3380700E+00, &
     & 0.3181700E+00, 0.3374900E+00, 0.2915100E+00, 0.2915100E+00 /
      data (ref_adm(10,iz, 5, 7),iz = 1,20) / &
     & 0.2817900E+00, 0.2817900E+00, 0.3033900E+00, 0.2486500E+00, &
     & 0.2705300E+00, 0.2373200E+00, 0.2649400E+00, 0.2763200E+00, &
     & 0.2736700E+00, 0.2619500E+00, 0.2711300E+00, 0.2607900E+00, &
     & 0.2897800E+00, 0.2614400E+00, 0.3091000E+00, 0.3220300E+00, &
     & 0.3455000E+00, 0.3483700E+00, 0.3431100E+00, 0.3431100E+00 /
      data (ref_adm(10,iz, 6, 7),iz = 1,20) / &
     & 0.3445300E+00, 0.3445300E+00, 0.3418000E+00, 0.2536700E+00, &
     & 0.2799200E+00, 0.2982900E+00, 0.2688900E+00, 0.2293400E+00, &
     & 0.2485900E+00, 0.2822400E+00, 0.3043200E+00, 0.2884800E+00, &
     & 0.2831200E+00, 0.2963500E+00, 0.3097200E+00, 0.3075000E+00, &
     & 0.3672600E+00, 0.3351400E+00, 0.3382200E+00, 0.3382200E+00 /
      data (ref_adm(10,iz, 7, 7),iz = 1,20) / &
     & 0.2238600E+00, 0.2238600E+00, 0.2219500E+00, 0.3400000E+00, &
     & 0.2838200E+00, 0.2841600E+00, 0.2818700E+00, 0.2695900E+00, &
     & 0.2450500E+00, 0.2822200E+00, 0.2551400E+00, 0.2566400E+00, &
     & 0.2861400E+00, 0.3245600E+00, 0.2705800E+00, 0.3296200E+00, &
     & 0.3919500E+00, 0.3716400E+00, 0.2699361E+00, 0.2699361E+00 /
      data (ref_adm(10,iz, 8, 7),iz = 1,20) / &
     & 0.3150000E+00, 0.3150000E+00, 0.3053700E+00, 0.3105200E+00, &
     & 0.2427200E+00, 0.2493800E+00, 0.2756900E+00, 0.2960100E+00, &
     & 0.2802500E+00, 0.3104500E+00, 0.2589900E+00, 0.2684500E+00, &
     & 0.2309400E+00, 0.2896700E+00, 0.3090200E+00, 0.3614600E+00, &
     & 0.3871200E+00, 0.3885800E+00, 0.2693059E+00, 0.2693059E+00 /
      data (ref_adm(10,iz, 9, 7),iz = 1,20) / &
     & 0.3557200E+00, 0.3557200E+00, 0.2666500E+00, 0.3359900E+00, &
     & 0.2741500E+00, 0.2439400E+00, 0.2406700E+00, 0.2611000E+00, &
     & 0.2675700E+00, 0.2970200E+00, 0.2333400E+00, 0.2532400E+00, &
     & 0.3187200E+00, 0.3049200E+00, 0.2721900E+00, 0.2830100E+00, &
     & 0.3619900E+00, 0.3268900E+00, 0.2617000E+00, 0.2617000E+00 /
      data (ref_adm(10,iz,10, 7),iz = 1,20) / &
     & 0.2967200E+00, 0.2967200E+00, 0.2812300E+00, 0.3002300E+00, &
     & 0.2871300E+00, 0.2828000E+00, 0.2671600E+00, 0.2516100E+00, &
     & 0.2647500E+00, 0.2698000E+00, 0.2355700E+00, 0.2487800E+00, &
     & 0.2463400E+00, 0.2715100E+00, 0.2884300E+00, 0.3320800E+00, &
     & 0.3485100E+00, 0.3320500E+00, 0.3059700E+00, 0.3059700E+00 /
      data (ref_adm(10,iz,11, 7),iz = 1,20) / &
     & 0.2973900E+00, 0.2973900E+00, 0.2921900E+00, 0.2934400E+00, &
     & 0.2829400E+00, 0.2844100E+00, 0.2892600E+00, 0.2821600E+00, &
     & 0.2693500E+00, 0.2804900E+00, 0.2465900E+00, 0.2632400E+00, &
     & 0.3131800E+00, 0.2873400E+00, 0.3339900E+00, 0.3532700E+00, &
     & 0.3273900E+00, 0.3124000E+00, 0.2999400E+00, 0.2999400E+00 /
      data (ref_adm(10,iz,12, 7),iz = 1,20) / &
     & 0.2812200E+00, 0.2812200E+00, 0.2874300E+00, 0.2879600E+00, &
     & 0.2712800E+00, 0.2907200E+00, 0.2658100E+00, 0.2772400E+00, &
     & 0.2765500E+00, 0.2708700E+00, 0.2649800E+00, 0.2782900E+00, &
     & 0.2746000E+00, 0.2392800E+00, 0.2838800E+00, 0.2603300E+00, &
     & 0.2515100E+00, 0.3074295E+00, 0.2654430E+00, 0.2654430E+00 /
      data (ref_adm(10,iz,13, 7),iz = 1,20) / &
     & 0.2758200E+00, 0.2758200E+00, 0.3372000E+00, 0.3152300E+00, &
     & 0.2874700E+00, 0.2747700E+00, 0.2781500E+00, 0.2699100E+00, &
     & 0.2812400E+00, 0.2756900E+00, 0.2407500E+00, 0.2326000E+00, &
     & 0.2411200E+00, 0.2654000E+00, 0.2897700E+00, 0.2354900E+00, &
     & 0.2278200E+00, 0.3062998E+00, 0.2643611E+00, 0.2643611E+00 /
      data (ref_adm(10,iz,14, 7),iz = 1,20) / &
     & 0.2748600E+00, 0.2748600E+00, 0.2923300E+00, 0.3166200E+00, &
     & 0.3081000E+00, 0.2487500E+00, 0.2838400E+00, 0.2751200E+00, &
     & 0.3101700E+00, 0.2679800E+00, 0.2718800E+00, 0.2511300E+00, &
     & 0.2572300E+00, 0.2670800E+00, 0.3161300E+00, 0.2753100E+00, &
     & 0.2639200E+00, 0.2707100E+00, 0.2632076E+00, 0.2632076E+00 /
      data (ref_adm(10,iz,15, 7),iz = 1,20) / &
     & 0.2751700E+00, 0.2751700E+00, 0.2718800E+00, 0.2747700E+00, &
     & 0.2754700E+00, 0.2571500E+00, 0.2692000E+00, 0.2872400E+00, &
     & 0.2739400E+00, 0.2559200E+00, 0.2847900E+00, 0.2611900E+00, &
     & 0.2657500E+00, 0.2720200E+00, 0.2538300E+00, 0.2692000E+00, &
     & 0.2747500E+00, 0.3035780E+00, 0.2621694E+00, 0.2621694E+00 /
      data (ref_adm(10,iz,16, 7),iz = 1,20) / &
     & 0.2498300E+00, 0.2498300E+00, 0.2426900E+00, 0.2780500E+00, &
     & 0.2490900E+00, 0.2460700E+00, 0.2543500E+00, 0.2466500E+00, &
     & 0.2694000E+00, 0.2609300E+00, 0.3087500E+00, 0.2428200E+00, &
     & 0.2669800E+00, 0.2520800E+00, 0.2928700E+00, 0.3184200E+00, &
     & 0.2393700E+00, 0.3022076E+00, 0.2611035E+00, 0.2611035E+00 /
      data (ref_adm(10,iz,17, 7),iz = 1,20) / &
     & 0.2729300E+00, 0.2729300E+00, 0.2369000E+00, 0.2495200E+00, &
     & 0.2536500E+00, 0.2863300E+00, 0.2485700E+00, 0.2093800E+00, &
     & 0.2608500E+00, 0.3281600E+00, 0.3047100E+00, 0.2336600E+00, &
     & 0.2762800E+00, 0.2550600E+00, 0.2860700E+00, 0.3025053E+00, &
     & 0.2126800E+00, 0.2420300E+00, 0.2601467E+00, 0.2601467E+00 /
      data (ref_adm(10,iz,18, 7),iz = 1,20) / &
     & 0.2305600E+00, 0.2305600E+00, 0.3171400E+00, 0.2405100E+00, &
     & 0.2369500E+00, 0.2574200E+00, 0.2625800E+00, 0.2602600E+00, &
     & 0.2721900E+00, 0.2644400E+00, 0.2987500E+00, 0.2804700E+00, &
     & 0.2675400E+00, 0.2980800E+00, 0.2442600E+00, 0.2771018E+00, &
     & 0.2532500E+00, 0.2437300E+00, 0.2491062E+00, 0.2491062E+00 /
      data (ref_adm(10,iz,19, 7),iz = 1,20) / &
     & 0.2970000E+00, 0.2970000E+00, 0.3325200E+00, 0.3179300E+00, &
     & 0.2981900E+00, 0.3044100E+00, 0.2912300E+00, 0.2826000E+00, &
     & 0.2943900E+00, 0.2718400E+00, 0.3047200E+00, 0.3129900E+00, &
     & 0.2666100E+00, 0.3159900E+00, 0.2589700E+00, 0.2483900E+00, &
     & 0.2762168E+00, 0.2720089E+00, 0.1766200E+00, 0.1766200E+00 /
      data (ref_adm(10,iz,20, 7),iz = 1,20) / &
     & 0.2931700E+00, 0.2931700E+00, 0.2876667E+00, 0.2639000E+00, &
     & 0.2670100E+00, 0.3057100E+00, 0.2604000E+00, 0.3065500E+00, &
     & 0.3143100E+00, 0.3115600E+00, 0.2859900E+00, 0.3194800E+00, &
     & 0.2690100E+00, 0.2842400E+00, 0.2560100E+00, 0.3092000E+00, &
     & 0.2757289E+00, 0.1871100E+00, 0.2477385E+00, 0.2477385E+00 /
      data (ref_adm(10,iz,21, 7),iz = 1,20) / &
     & 0.3120700E+00, 0.3120700E+00, 0.3149500E+00, 0.2540100E+00, &
     & 0.2706900E+00, 0.2723900E+00, 0.2730400E+00, 0.3221700E+00, &
     & 0.3477900E+00, 0.2799200E+00, 0.3276000E+00, 0.2990400E+00, &
     & 0.2675300E+00, 0.2801400E+00, 0.2432600E+00, 0.2528200E+00, &
     & 0.2752286E+00, 0.2307100E+00, 0.2471755E+00, 0.2471755E+00 /
      data (ref_adm(10,iz,22, 7),iz = 1,20) / &
     & 0.2657100E+00, 0.2657100E+00, 0.2971300E+00, 0.3360400E+00, &
     & 0.3220000E+00, 0.3187300E+00, 0.2459400E+00, 0.2712300E+00, &
     & 0.3305900E+00, 0.3375000E+00, 0.3539100E+00, 0.2859500E+00, &
     & 0.2573300E+00, 0.2429600E+00, 0.2559100E+00, 0.2508300E+00, &
     & 0.3071387E+00, 0.2973599E+00, 0.2577921E+00, 0.2577921E+00 /
      data (ref_adm(10,iz,23, 7),iz = 1,20) / &
     & 0.2908600E+00, 0.2908600E+00, 0.2995800E+00, 0.3929300E+00, &
     & 0.3094700E+00, 0.2977800E+00, 0.3154100E+00, 0.2883100E+00, &
     & 0.2878200E+00, 0.3807800E+00, 0.2983561E+00, 0.2781800E+00, &
     & 0.2590400E+00, 0.2512700E+00, 0.2425600E+00, 0.2742400E+00, &
     & 0.3212200E+00, 0.2960447E+00, 0.2571419E+00, 0.2571419E+00 /
      data (ref_adm(10,iz,24, 7),iz = 1,20) / &
     & 0.2923500E+00, 0.2923500E+00, 0.3137600E+00, 0.2934900E+00, &
     & 0.2838200E+00, 0.2939500E+00, 0.3324500E+00, 0.3605900E+00, &
     & 0.2708100E+00, 0.2721300E+00, 0.3745900E+00, 0.3059800E+00, &
     & 0.3041600E+00, 0.2821500E+00, 0.2597400E+00, 0.2977000E+00, &
     & 0.2999000E+00, 0.2946551E+00, 0.2563730E+00, 0.2563730E+00 /
      data (ref_adm(10,iz,25, 7),iz = 1,20) / &
     & 0.2332300E+00, 0.2332300E+00, 0.2352100E+00, 0.2905600E+00, &
     & 0.2707000E+00, 0.3242000E+00, 0.2798600E+00, 0.2985300E+00, &
     & 0.3068400E+00, 0.2873700E+00, 0.3096700E+00, 0.3519800E+00, &
     & 0.3292800E+00, 0.2709600E+00, 0.3015500E+00, 0.2898900E+00, &
     & 0.2791400E+00, 0.2748800E+00, 0.2557564E+00, 0.2557564E+00 /
      data (ref_adm(10,iz,26, 7),iz = 1,20) / &
     & 0.2838900E+00, 0.2838900E+00, 0.2614800E+00, 0.2847600E+00, &
     & 0.3942800E+00, 0.2961500E+00, 0.3261300E+00, 0.3815400E+00, &
     & 0.3213500E+00, 0.2720600E+00, 0.3400000E+00, 0.3339900E+00, &
     & 0.3380600E+00, 0.2970500E+00, 0.2955100E+00, 0.2976400E+00, &
     & 0.2629600E+00, 0.2651500E+00, 0.2551391E+00, 0.2551391E+00 /
      data (ref_adm(10,iz,27, 7),iz = 1,20) / &
     & 0.2549400E+00, 0.2549400E+00, 0.2806500E+00, 0.3586100E+00, &
     & 0.3116400E+00, 0.3485800E+00, 0.3586400E+00, 0.3475400E+00, &
     & 0.3223900E+00, 0.3151600E+00, 0.3587300E+00, 0.3343800E+00, &
     & 0.3372200E+00, 0.3003900E+00, 0.3038100E+00, 0.3068200E+00, &
     & 0.2745900E+00, 0.2644600E+00, 0.2546141E+00, 0.2546141E+00 /
      data (ref_adm(10,iz,28, 7),iz = 1,20) / &
     & 0.2997300E+00, 0.2997300E+00, 0.3136500E+00, 0.2969100E+00, &
     & 0.2871800E+00, 0.2748100E+00, 0.3129400E+00, 0.3406500E+00, &
     & 0.3137100E+00, 0.2896700E+00, 0.3182300E+00, 0.3544300E+00, &
     & 0.3076700E+00, 0.2818400E+00, 0.3104300E+00, 0.3086700E+00, &
     & 0.3014800E+00, 0.2649500E+00, 0.2540992E+00, 0.2540992E+00 /
      data (ref_adm(10,iz,29, 7),iz = 1,20) / &
     & 0.2906700E+00, 0.2906700E+00, 0.2953100E+00, 0.3138000E+00, &
     & 0.2791800E+00, 0.2725900E+00, 0.3022500E+00, 0.3361700E+00, &
     & 0.3239900E+00, 0.3093500E+00, 0.3184800E+00, 0.3040100E+00, &
     & 0.2891200E+00, 0.3258300E+00, 0.3198200E+00, 0.2794800E+00, &
     & 0.2957200E+00, 0.2626000E+00, 0.2365300E+00, 0.2365300E+00 /
      data (ref_adm(10,iz,30, 7),iz = 1,20) / &
     & 0.2935800E+00, 0.2935800E+00, 0.2979800E+00, 0.3086300E+00, &
     & 0.2990100E+00, 0.2701700E+00, 0.2947300E+00, 0.3101700E+00, &
     & 0.2854000E+00, 0.3043100E+00, 0.2843200E+00, 0.2695300E+00, &
     & 0.3081000E+00, 0.2779400E+00, 0.3204800E+00, 0.2939300E+00, &
     & 0.3283100E+00, 0.3052000E+00, 0.2364800E+00, 0.2364800E+00 /
      data (ref_adm(10,iz,31, 7),iz = 1,20) / &
     & 0.3021200E+00, 0.3021200E+00, 0.2641900E+00, 0.2921200E+00, &
     & 0.2960400E+00, 0.3365500E+00, 0.3965400E+00, 0.2374800E+00, &
     & 0.2782400E+00, 0.2859000E+00, 0.2917900E+00, 0.3050000E+00, &
     & 0.2954500E+00, 0.2969600E+00, 0.2667400E+00, 0.2876700E+00, &
     & 0.2841900E+00, 0.2465600E+00, 0.2530352E+00, 0.2530352E+00 /
      data (ref_adm(10,iz,32, 7),iz = 1,20) / &
     & 0.2599100E+00, 0.2599100E+00, 0.2292400E+00, 0.3697600E+00, &
     & 0.2739800E+00, 0.2686300E+00, 0.3663300E+00, 0.4289700E+00, &
     & 0.3282100E+00, 0.3277900E+00, 0.3101200E+00, 0.2981600E+00, &
     & 0.2968300E+00, 0.2924500E+00, 0.2984000E+00, 0.2881100E+00, &
     & 0.3134500E+00, 0.2870104E+00, 0.2527021E+00, 0.2527021E+00 /
      data (ref_adm(10,iz,33, 7),iz = 1,20) / &
     & 0.2856700E+00, 0.2856700E+00, 0.2781900E+00, 0.3335200E+00, &
     & 0.3246700E+00, 0.3447500E+00, 0.3115600E+00, 0.3185400E+00, &
     & 0.3082700E+00, 0.2870900E+00, 0.2980500E+00, 0.2816300E+00, &
     & 0.3051000E+00, 0.2915500E+00, 0.3069400E+00, 0.2963400E+00, &
     & 0.2975298E+00, 0.2863415E+00, 0.2525757E+00, 0.2525757E+00 /
      data (ref_adm(10,iz,34, 7),iz = 1,20) / &
     & 0.2982000E+00, 0.2982000E+00, 0.2912100E+00, 0.2839500E+00, &
     & 0.2896200E+00, 0.3377500E+00, 0.3281400E+00, 0.3458800E+00, &
     & 0.3461900E+00, 0.3884000E+00, 0.2843700E+00, 0.3641500E+00, &
     & 0.2885700E+00, 0.2934800E+00, 0.2961600E+00, 0.3093000E+00, &
     & 0.2969918E+00, 0.2858298E+00, 0.2523306E+00, 0.2523306E+00 /
      data (ref_adm(10,iz,35, 7),iz = 1,20) / &
     & 0.2576200E+00, 0.2576200E+00, 0.2694300E+00, 0.2747400E+00, &
     & 0.3093600E+00, 0.3161000E+00, 0.3047100E+00, 0.3350700E+00, &
     & 0.3937900E+00, 0.2900700E+00, 0.2891700E+00, 0.2873600E+00, &
     & 0.3184900E+00, 0.3024600E+00, 0.2894300E+00, 0.2991594E+00, &
     & 0.2965025E+00, 0.2854733E+00, 0.2522132E+00, 0.2522132E+00 /
      data (ref_adm(10,iz,36, 7),iz = 1,20) / &
     & 0.3176700E+00, 0.3176700E+00, 0.3476800E+00, 0.2545300E+00, &
     & 0.2755600E+00, 0.2949300E+00, 0.3527100E+00, 0.2835600E+00, &
     & 0.2877600E+00, 0.3356100E+00, 0.2816600E+00, 0.3016500E+00, &
     & 0.2879600E+00, 0.3197600E+00, 0.2922800E+00, 0.2989983E+00, &
     & 0.2963753E+00, 0.2853232E+00, 0.2521796E+00, 0.2521796E+00 /
      data (ref_adm(10,iz,37, 7),iz = 1,20) / &
     & 0.3225700E+00, 0.3225700E+00, 0.4939900E+00, 0.3575500E+00, &
     & 0.3701400E+00, 0.2838100E+00, 0.3327000E+00, 0.3364400E+00, &
     & 0.3506900E+00, 0.3224400E+00, 0.3162600E+00, 0.3192700E+00, &
     & 0.3321700E+00, 0.2949900E+00, 0.2648700E+00, 0.2989953E+00, &
     & 0.2965105E+00, 0.2853771E+00, 0.2521045E+00, 0.2521045E+00 /
      data (ref_adm(10,iz,38, 7),iz = 1,20) / &
     & 0.3225700E+00, 0.3225700E+00, 0.4939900E+00, 0.3575500E+00, &
     & 0.3701400E+00, 0.2838100E+00, 0.3327000E+00, 0.3364400E+00, &
     & 0.3506900E+00, 0.3224400E+00, 0.3162600E+00, 0.3192700E+00, &
     & 0.3321700E+00, 0.2949900E+00, 0.2648700E+00, 0.2989953E+00, &
     & 0.2965105E+00, 0.2853771E+00, 0.2521045E+00, 0.2521045E+00 /
! Solar Zenith Angle 35.0 Albedo  0.3100125E+00
      data (ref_adm(10,iz, 1, 8),iz = 1,20) / &
     & 0.3449800E+00, 0.3449800E+00, 0.3508100E+00, 0.3110000E+00, &
     & 0.3962500E+00, 0.3278100E+00, 0.2927400E+00, 0.2823300E+00, &
     & 0.2994400E+00, 0.3103700E+00, 0.3122800E+00, 0.3102700E+00, &
     & 0.2968600E+00, 0.2867500E+00, 0.2784200E+00, 0.3329000E+00, &
     & 0.3820700E+00, 0.3784900E+00, 0.2608900E+00, 0.2608900E+00 /
      data (ref_adm(10,iz, 2, 8),iz = 1,20) / &
     & 0.3449800E+00, 0.3449800E+00, 0.3508100E+00, 0.3110000E+00, &
     & 0.3962500E+00, 0.3278100E+00, 0.2927400E+00, 0.2823300E+00, &
     & 0.2994400E+00, 0.3103700E+00, 0.3122800E+00, 0.3102700E+00, &
     & 0.2968600E+00, 0.2867500E+00, 0.2784200E+00, 0.3329000E+00, &
     & 0.3820700E+00, 0.3784900E+00, 0.2608900E+00, 0.2608900E+00 /
      data (ref_adm(10,iz, 3, 8),iz = 1,20) / &
     & 0.3676800E+00, 0.3676800E+00, 0.3585900E+00, 0.3051100E+00, &
     & 0.2880300E+00, 0.3033700E+00, 0.3082700E+00, 0.2739000E+00, &
     & 0.2613900E+00, 0.2685300E+00, 0.2846300E+00, 0.3043200E+00, &
     & 0.2985700E+00, 0.2864800E+00, 0.3358500E+00, 0.3396700E+00, &
     & 0.3459200E+00, 0.3110000E+00, 0.1285876E+00, 0.1285876E+00 /
      data (ref_adm(10,iz, 4, 8),iz = 1,20) / &
     & 0.3114300E+00, 0.3114300E+00, 0.2724500E+00, 0.2979700E+00, &
     & 0.2818100E+00, 0.2750400E+00, 0.2915900E+00, 0.2697300E+00, &
     & 0.2625400E+00, 0.2399600E+00, 0.2672500E+00, 0.3135000E+00, &
     & 0.2765600E+00, 0.2680100E+00, 0.3342600E+00, 0.3105500E+00, &
     & 0.3611400E+00, 0.3674000E+00, 0.3574500E+00, 0.3574500E+00 /
      data (ref_adm(10,iz, 5, 8),iz = 1,20) / &
     & 0.3152000E+00, 0.3152000E+00, 0.3058300E+00, 0.2509600E+00, &
     & 0.2812500E+00, 0.2864700E+00, 0.2550000E+00, 0.2890000E+00, &
     & 0.2619700E+00, 0.2813900E+00, 0.2817600E+00, 0.2711000E+00, &
     & 0.3013800E+00, 0.3055600E+00, 0.3594800E+00, 0.3639500E+00, &
     & 0.3900500E+00, 0.3651800E+00, 0.4024300E+00, 0.4024300E+00 /
      data (ref_adm(10,iz, 6, 8),iz = 1,20) / &
     & 0.2930100E+00, 0.2930100E+00, 0.2674900E+00, 0.2926600E+00, &
     & 0.2942600E+00, 0.2752200E+00, 0.3086200E+00, 0.2742000E+00, &
     & 0.2322300E+00, 0.2320500E+00, 0.2767100E+00, 0.2857600E+00, &
     & 0.2919000E+00, 0.2810300E+00, 0.3440200E+00, 0.3583900E+00, &
     & 0.3989200E+00, 0.3988300E+00, 0.3479800E+00, 0.3479800E+00 /
      data (ref_adm(10,iz, 7, 8),iz = 1,20) / &
     & 0.3083900E+00, 0.3083900E+00, 0.3230500E+00, 0.2866600E+00, &
     & 0.2846400E+00, 0.2787800E+00, 0.2772900E+00, 0.2767600E+00, &
     & 0.2933200E+00, 0.2796900E+00, 0.2622300E+00, 0.2919600E+00, &
     & 0.2837700E+00, 0.2865700E+00, 0.2942700E+00, 0.3129100E+00, &
     & 0.3759200E+00, 0.4111500E+00, 0.3398800E+00, 0.3398800E+00 /
      data (ref_adm(10,iz, 8, 8),iz = 1,20) / &
     & 0.3130700E+00, 0.3130700E+00, 0.2806600E+00, 0.3023600E+00, &
     & 0.2888300E+00, 0.2819000E+00, 0.2409500E+00, 0.2591800E+00, &
     & 0.2412200E+00, 0.2924600E+00, 0.2973200E+00, 0.3057200E+00, &
     & 0.2890200E+00, 0.2928200E+00, 0.3192800E+00, 0.3335900E+00, &
     & 0.3748300E+00, 0.3593600E+00, 0.3073300E+00, 0.3073300E+00 /
      data (ref_adm(10,iz, 9, 8),iz = 1,20) / &
     & 0.2908000E+00, 0.2908000E+00, 0.2672800E+00, 0.2938000E+00, &
     & 0.2941000E+00, 0.2744200E+00, 0.2810300E+00, 0.2942100E+00, &
     & 0.3321100E+00, 0.2975900E+00, 0.3297100E+00, 0.2749500E+00, &
     & 0.3296000E+00, 0.2661600E+00, 0.2989300E+00, 0.3325500E+00, &
     & 0.3456700E+00, 0.3306900E+00, 0.2730700E+00, 0.2730700E+00 /
      data (ref_adm(10,iz,10, 8),iz = 1,20) / &
     & 0.2911900E+00, 0.2911900E+00, 0.2914300E+00, 0.2949200E+00, &
     & 0.2946300E+00, 0.2825500E+00, 0.3159900E+00, 0.3201300E+00, &
     & 0.3034800E+00, 0.2938700E+00, 0.3030500E+00, 0.2841600E+00, &
     & 0.2972400E+00, 0.2988300E+00, 0.3351300E+00, 0.3388600E+00, &
     & 0.3611000E+00, 0.3652800E+00, 0.3470900E+00, 0.3470900E+00 /
      data (ref_adm(10,iz,11, 8),iz = 1,20) / &
     & 0.3008900E+00, 0.3008900E+00, 0.3065800E+00, 0.3141000E+00, &
     & 0.3104800E+00, 0.3088900E+00, 0.2943600E+00, 0.3169400E+00, &
     & 0.2823700E+00, 0.2986500E+00, 0.2850700E+00, 0.3011200E+00, &
     & 0.2946300E+00, 0.2967700E+00, 0.2842700E+00, 0.2994200E+00, &
     & 0.3201000E+00, 0.3184600E+00, 0.2964100E+00, 0.2964100E+00 /
      data (ref_adm(10,iz,12, 8),iz = 1,20) / &
     & 0.2899900E+00, 0.2899900E+00, 0.2845300E+00, 0.3026200E+00, &
     & 0.2968700E+00, 0.2728800E+00, 0.2691600E+00, 0.2797000E+00, &
     & 0.2896700E+00, 0.2855900E+00, 0.2853200E+00, 0.2863800E+00, &
     & 0.2684700E+00, 0.2697400E+00, 0.3428400E+00, 0.3166900E+00, &
     & 0.3659700E+00, 0.3164000E+00, 0.2520000E+00, 0.2520000E+00 /
      data (ref_adm(10,iz,13, 8),iz = 1,20) / &
     & 0.3066500E+00, 0.3066500E+00, 0.3138500E+00, 0.2973300E+00, &
     & 0.2767900E+00, 0.3001600E+00, 0.2811600E+00, 0.2757100E+00, &
     & 0.2786100E+00, 0.2862800E+00, 0.2837700E+00, 0.2907500E+00, &
     & 0.2767900E+00, 0.2775700E+00, 0.3193900E+00, 0.3455100E+00, &
     & 0.3062200E+00, 0.2881400E+00, 0.2733700E+00, 0.2733700E+00 /
      data (ref_adm(10,iz,14, 8),iz = 1,20) / &
     & 0.2963000E+00, 0.2963000E+00, 0.2755100E+00, 0.2633800E+00, &
     & 0.2711500E+00, 0.2798100E+00, 0.2736200E+00, 0.2808800E+00, &
     & 0.2841000E+00, 0.2914100E+00, 0.2689500E+00, 0.2714300E+00, &
     & 0.2827300E+00, 0.2796100E+00, 0.3060500E+00, 0.2950200E+00, &
     & 0.2984500E+00, 0.2964000E+00, 0.2417300E+00, 0.2417300E+00 /
      data (ref_adm(10,iz,15, 8),iz = 1,20) / &
     & 0.2959100E+00, 0.2959100E+00, 0.3496100E+00, 0.2820100E+00, &
     & 0.2645600E+00, 0.2647700E+00, 0.2773300E+00, 0.2519400E+00, &
     & 0.2603200E+00, 0.2488500E+00, 0.2685700E+00, 0.2771800E+00, &
     & 0.2741200E+00, 0.2662400E+00, 0.3004900E+00, 0.2892800E+00, &
     & 0.3112100E+00, 0.3007378E+00, 0.2756370E+00, 0.2756370E+00 /
      data (ref_adm(10,iz,16, 8),iz = 1,20) / &
     & 0.3180800E+00, 0.3180800E+00, 0.3247300E+00, 0.3022500E+00, &
     & 0.2885800E+00, 0.2879500E+00, 0.2826100E+00, 0.2835900E+00, &
     & 0.2688100E+00, 0.2681800E+00, 0.3214900E+00, 0.3173100E+00, &
     & 0.2422100E+00, 0.2579300E+00, 0.2891500E+00, 0.3465600E+00, &
     & 0.2652900E+00, 0.2982800E+00, 0.2487300E+00, 0.2487300E+00 /
      data (ref_adm(10,iz,17, 8),iz = 1,20) / &
     & 0.3144800E+00, 0.3144800E+00, 0.3212800E+00, 0.3047700E+00, &
     & 0.2593600E+00, 0.2872700E+00, 0.2425300E+00, 0.2632900E+00, &
     & 0.2934200E+00, 0.2820000E+00, 0.2877700E+00, 0.2949200E+00, &
     & 0.2714900E+00, 0.2501300E+00, 0.2831600E+00, 0.3165400E+00, &
     & 0.3279300E+00, 0.2922400E+00, 0.2702504E+00, 0.2702504E+00 /
      data (ref_adm(10,iz,18, 8),iz = 1,20) / &
     & 0.3291300E+00, 0.3291300E+00, 0.3032900E+00, 0.2940000E+00, &
     & 0.3011500E+00, 0.2857100E+00, 0.2533700E+00, 0.2678400E+00, &
     & 0.2866800E+00, 0.3173500E+00, 0.3078600E+00, 0.2981100E+00, &
     & 0.2799900E+00, 0.2874000E+00, 0.3038700E+00, 0.3149700E+00, &
     & 0.2974400E+00, 0.2662500E+00, 0.2668703E+00, 0.2668703E+00 /
      data (ref_adm(10,iz,19, 8),iz = 1,20) / &
     & 0.2814100E+00, 0.2814100E+00, 0.2814000E+00, 0.2984100E+00, &
     & 0.2895100E+00, 0.3015100E+00, 0.2994200E+00, 0.2812000E+00, &
     & 0.2871200E+00, 0.3104400E+00, 0.2921500E+00, 0.3014900E+00, &
     & 0.3107400E+00, 0.2845500E+00, 0.3142700E+00, 0.2853900E+00, &
     & 0.2962063E+00, 0.2422500E+00, 0.2172200E+00, 0.2172200E+00 /
      data (ref_adm(10,iz,20, 8),iz = 1,20) / &
     & 0.3239900E+00, 0.3239900E+00, 0.2822600E+00, 0.2952900E+00, &
     & 0.2864400E+00, 0.3211700E+00, 0.2880800E+00, 0.3218500E+00, &
     & 0.2724000E+00, 0.3225500E+00, 0.3210400E+00, 0.3276100E+00, &
     & 0.3152500E+00, 0.2894900E+00, 0.2992600E+00, 0.2611800E+00, &
     & 0.2772200E+00, 0.2898871E+00, 0.2643436E+00, 0.2643436E+00 /
      data (ref_adm(10,iz,21, 8),iz = 1,20) / &
     & 0.3128000E+00, 0.3128000E+00, 0.3204800E+00, 0.3136200E+00, &
     & 0.3328900E+00, 0.2802100E+00, 0.2881900E+00, 0.2936700E+00, &
     & 0.3520600E+00, 0.3356300E+00, 0.3418100E+00, 0.2801900E+00, &
     & 0.2930000E+00, 0.2834800E+00, 0.2967200E+00, 0.2960971E+00, &
     & 0.2947291E+00, 0.2889465E+00, 0.2634873E+00, 0.2634873E+00 /
      data (ref_adm(10,iz,22, 8),iz = 1,20) / &
     & 0.3244600E+00, 0.3244600E+00, 0.2792400E+00, 0.3063300E+00, &
     & 0.2943200E+00, 0.3377700E+00, 0.3108300E+00, 0.3048000E+00, &
     & 0.3525400E+00, 0.3484400E+00, 0.3408200E+00, 0.3048800E+00, &
     & 0.3156700E+00, 0.2622200E+00, 0.2758000E+00, 0.2462500E+00, &
     & 0.2817100E+00, 0.3088040E+00, 0.2632514E+00, 0.2632514E+00 /
      data (ref_adm(10,iz,23, 8),iz = 1,20) / &
     & 0.3325200E+00, 0.3325200E+00, 0.2505600E+00, 0.3097500E+00, &
     & 0.3091800E+00, 0.2754900E+00, 0.2849600E+00, 0.2999500E+00, &
     & 0.3258900E+00, 0.3654900E+00, 0.2945700E+00, 0.2924100E+00, &
     & 0.3014200E+00, 0.2715900E+00, 0.2999700E+00, 0.3014400E+00, &
     & 0.3409600E+00, 0.3068610E+00, 0.2622238E+00, 0.2622238E+00 /
      data (ref_adm(10,iz,24, 8),iz = 1,20) / &
     & 0.3264300E+00, 0.3264300E+00, 0.3052200E+00, 0.3257900E+00, &
     & 0.3291700E+00, 0.3481800E+00, 0.2924300E+00, 0.3863900E+00, &
     & 0.3552300E+00, 0.3377700E+00, 0.2968500E+00, 0.3065000E+00, &
     & 0.3274900E+00, 0.3034800E+00, 0.3151800E+00, 0.3008600E+00, &
     & 0.3029200E+00, 0.3377900E+00, 0.2612954E+00, 0.2612954E+00 /
      data (ref_adm(10,iz,25, 8),iz = 1,20) / &
     & 0.3110100E+00, 0.3110100E+00, 0.3518400E+00, 0.3106100E+00, &
     & 0.2911600E+00, 0.3292800E+00, 0.3770800E+00, 0.3220800E+00, &
     & 0.3518800E+00, 0.2972900E+00, 0.3324500E+00, 0.3022500E+00, &
     & 0.2973300E+00, 0.3180600E+00, 0.3333700E+00, 0.3014800E+00, &
     & 0.3088000E+00, 0.2780400E+00, 0.2605707E+00, 0.2605707E+00 /
      data (ref_adm(10,iz,26, 8),iz = 1,20) / &
     & 0.2885700E+00, 0.2885700E+00, 0.2628000E+00, 0.2981400E+00, &
     & 0.3313000E+00, 0.3670900E+00, 0.3650200E+00, 0.3524300E+00, &
     & 0.2837400E+00, 0.3394400E+00, 0.2932200E+00, 0.3458400E+00, &
     & 0.2826000E+00, 0.3596300E+00, 0.3205700E+00, 0.2992100E+00, &
     & 0.2949400E+00, 0.2803800E+00, 0.2805100E+00, 0.2805100E+00 /
      data (ref_adm(10,iz,27, 8),iz = 1,20) / &
     & 0.2982500E+00, 0.2982500E+00, 0.3043300E+00, 0.3094400E+00, &
     & 0.3187500E+00, 0.3239200E+00, 0.3298400E+00, 0.3185100E+00, &
     & 0.2989700E+00, 0.3153500E+00, 0.3169900E+00, 0.3595100E+00, &
     & 0.2958900E+00, 0.3373800E+00, 0.3215500E+00, 0.3095100E+00, &
     & 0.2996200E+00, 0.2850600E+00, 0.2595400E+00, 0.2595400E+00 /
      data (ref_adm(10,iz,28, 8),iz = 1,20) / &
     & 0.3007400E+00, 0.3007400E+00, 0.3083700E+00, 0.3056600E+00, &
     & 0.3067500E+00, 0.3231700E+00, 0.3153200E+00, 0.3316000E+00, &
     & 0.3268200E+00, 0.3209300E+00, 0.3236700E+00, 0.3297100E+00, &
     & 0.3172800E+00, 0.3941300E+00, 0.3638100E+00, 0.3236000E+00, &
     & 0.3158100E+00, 0.2961100E+00, 0.2676600E+00, 0.2676600E+00 /
      data (ref_adm(10,iz,29, 8),iz = 1,20) / &
     & 0.3015000E+00, 0.3015000E+00, 0.2972600E+00, 0.3123700E+00, &
     & 0.3116600E+00, 0.3197400E+00, 0.3181300E+00, 0.3521100E+00, &
     & 0.3389400E+00, 0.3315300E+00, 0.3326300E+00, 0.3346800E+00, &
     & 0.3360000E+00, 0.3339300E+00, 0.3393200E+00, 0.3391600E+00, &
     & 0.3397400E+00, 0.3276100E+00, 0.2579500E+00, 0.2579500E+00 /
      data (ref_adm(10,iz,30, 8),iz = 1,20) / &
     & 0.3094300E+00, 0.3094300E+00, 0.2727300E+00, 0.2736100E+00, &
     & 0.3057100E+00, 0.3311200E+00, 0.2789600E+00, 0.3087800E+00, &
     & 0.3327600E+00, 0.3144700E+00, 0.3312000E+00, 0.3306700E+00, &
     & 0.3204300E+00, 0.3528600E+00, 0.3527900E+00, 0.3255200E+00, &
     & 0.3076300E+00, 0.3269000E+00, 0.2845900E+00, 0.2845900E+00 /
      data (ref_adm(10,iz,31, 8),iz = 1,20) / &
     & 0.2884400E+00, 0.2884400E+00, 0.3014300E+00, 0.3026400E+00, &
     & 0.2705300E+00, 0.2839400E+00, 0.3124000E+00, 0.3423700E+00, &
     & 0.3291100E+00, 0.3559200E+00, 0.3217100E+00, 0.3158200E+00, &
     & 0.3298000E+00, 0.3109800E+00, 0.3339300E+00, 0.3060000E+00, &
     & 0.3297800E+00, 0.3257500E+00, 0.2680700E+00, 0.2680700E+00 /
      data (ref_adm(10,iz,32, 8),iz = 1,20) / &
     & 0.3315800E+00, 0.3315800E+00, 0.2766000E+00, 0.2950100E+00, &
     & 0.3326700E+00, 0.3343000E+00, 0.3351100E+00, 0.3829700E+00, &
     & 0.3786700E+00, 0.3654400E+00, 0.3785700E+00, 0.3230500E+00, &
     & 0.3300800E+00, 0.3249700E+00, 0.3472600E+00, 0.3410500E+00, &
     & 0.3179500E+00, 0.3130700E+00, 0.2520800E+00, 0.2520800E+00 /
      data (ref_adm(10,iz,33, 8),iz = 1,20) / &
     & 0.3184100E+00, 0.3184100E+00, 0.3154300E+00, 0.2893800E+00, &
     & 0.3179700E+00, 0.3636500E+00, 0.3782300E+00, 0.3505300E+00, &
     & 0.3275100E+00, 0.3500900E+00, 0.3472500E+00, 0.3655600E+00, &
     & 0.3384800E+00, 0.3274400E+00, 0.3386500E+00, 0.3186500E+00, &
     & 0.3031000E+00, 0.3512800E+00, 0.2572675E+00, 0.2572675E+00 /
      data (ref_adm(10,iz,34, 8),iz = 1,20) / &
     & 0.2994200E+00, 0.2994200E+00, 0.2705200E+00, 0.3076200E+00, &
     & 0.2618700E+00, 0.3918100E+00, 0.3691200E+00, 0.3475600E+00, &
     & 0.3583200E+00, 0.3517200E+00, 0.3886400E+00, 0.3756000E+00, &
     & 0.3507900E+00, 0.3540400E+00, 0.3209600E+00, 0.3315200E+00, &
     & 0.3474900E+00, 0.2938530E+00, 0.2571017E+00, 0.2571017E+00 /
      data (ref_adm(10,iz,35, 8),iz = 1,20) / &
     & 0.3478800E+00, 0.3478800E+00, 0.3223400E+00, 0.3388400E+00, &
     & 0.3546500E+00, 0.3845700E+00, 0.3041100E+00, 0.4605500E+00, &
     & 0.3575300E+00, 0.3942300E+00, 0.3805900E+00, 0.3345300E+00, &
     & 0.3600100E+00, 0.3469100E+00, 0.3180700E+00, 0.3181200E+00, &
     & 0.3319600E+00, 0.2934116E+00, 0.2570528E+00, 0.2570528E+00 /
      data (ref_adm(10,iz,36, 8),iz = 1,20) / &
     & 0.3502300E+00, 0.3502300E+00, 0.3611000E+00, 0.4001700E+00, &
     & 0.3450500E+00, 0.3366500E+00, 0.3251800E+00, 0.3570900E+00, &
     & 0.3992800E+00, 0.3622600E+00, 0.3800200E+00, 0.3585300E+00, &
     & 0.3520800E+00, 0.3257000E+00, 0.3299000E+00, 0.3679700E+00, &
     & 0.3085774E+00, 0.2931653E+00, 0.2569439E+00, 0.2569439E+00 /
      data (ref_adm(10,iz,37, 8),iz = 1,20) / &
     & 0.3106900E+00, 0.3106900E+00, 0.3060400E+00, 0.3626100E+00, &
     & 0.3591200E+00, 0.3630600E+00, 0.3268600E+00, 0.3749600E+00, &
     & 0.3907500E+00, 0.4038100E+00, 0.3464000E+00, 0.3283300E+00, &
     & 0.3242700E+00, 0.3267200E+00, 0.3523800E+00, 0.3167666E+00, &
     & 0.3086529E+00, 0.2930431E+00, 0.2568727E+00, 0.2568727E+00 /
      data (ref_adm(10,iz,38, 8),iz = 1,20) / &
     & 0.3106900E+00, 0.3106900E+00, 0.3060400E+00, 0.3626100E+00, &
     & 0.3591200E+00, 0.3630600E+00, 0.3268600E+00, 0.3749600E+00, &
     & 0.3907500E+00, 0.4038100E+00, 0.3464000E+00, 0.3283300E+00, &
     & 0.3242700E+00, 0.3267200E+00, 0.3523800E+00, 0.3167666E+00, &
     & 0.3086529E+00, 0.2930431E+00, 0.2568727E+00, 0.2568727E+00 /
! Solar Zenith Angle 40.0 Albedo  0.3076361E+00
      data (ref_adm(10,iz, 1, 9),iz = 1,20) / &
     & 0.3092500E+00, 0.3092500E+00, 0.2622900E+00, 0.2894800E+00, &
     & 0.2791500E+00, 0.2818800E+00, 0.2937400E+00, 0.2838100E+00, &
     & 0.3425900E+00, 0.3019100E+00, 0.2891900E+00, 0.3102000E+00, &
     & 0.3304100E+00, 0.3633400E+00, 0.3646500E+00, 0.3877200E+00, &
     & 0.3698400E+00, 0.3709700E+00, 0.3964900E+00, 0.3964900E+00 /
      data (ref_adm(10,iz, 2, 9),iz = 1,20) / &
     & 0.3092500E+00, 0.3092500E+00, 0.2622900E+00, 0.2894800E+00, &
     & 0.2791500E+00, 0.2818800E+00, 0.2937400E+00, 0.2838100E+00, &
     & 0.3425900E+00, 0.3019100E+00, 0.2891900E+00, 0.3102000E+00, &
     & 0.3304100E+00, 0.3633400E+00, 0.3646500E+00, 0.3877200E+00, &
     & 0.3698400E+00, 0.3709700E+00, 0.3964900E+00, 0.3964900E+00 /
      data (ref_adm(10,iz, 3, 9),iz = 1,20) / &
     & 0.2731400E+00, 0.2731400E+00, 0.2812300E+00, 0.2713300E+00, &
     & 0.3272800E+00, 0.2986700E+00, 0.2798900E+00, 0.3064800E+00, &
     & 0.2952900E+00, 0.3537200E+00, 0.3197400E+00, 0.3113700E+00, &
     & 0.3405200E+00, 0.3075500E+00, 0.3270700E+00, 0.3549500E+00, &
     & 0.3671500E+00, 0.3904200E+00, 0.3752500E+00, 0.3752500E+00 /
      data (ref_adm(10,iz, 4, 9),iz = 1,20) / &
     & 0.2695500E+00, 0.2695500E+00, 0.2798800E+00, 0.2980600E+00, &
     & 0.2979600E+00, 0.2890900E+00, 0.2987000E+00, 0.2933500E+00, &
     & 0.2960600E+00, 0.3152700E+00, 0.2900000E+00, 0.2620100E+00, &
     & 0.3438700E+00, 0.3248700E+00, 0.3371800E+00, 0.3443800E+00, &
     & 0.3915700E+00, 0.3929400E+00, 0.4095600E+00, 0.4095600E+00 /
      data (ref_adm(10,iz, 5, 9),iz = 1,20) / &
     & 0.2660900E+00, 0.2660900E+00, 0.3098000E+00, 0.2734700E+00, &
     & 0.2803500E+00, 0.2917500E+00, 0.2921600E+00, 0.2558800E+00, &
     & 0.2900800E+00, 0.3137100E+00, 0.3287700E+00, 0.2928500E+00, &
     & 0.3239100E+00, 0.3398000E+00, 0.3359100E+00, 0.3442500E+00, &
     & 0.3658700E+00, 0.3904400E+00, 0.3916900E+00, 0.3916900E+00 /
      data (ref_adm(10,iz, 6, 9),iz = 1,20) / &
     & 0.2916400E+00, 0.2916400E+00, 0.2915000E+00, 0.2744400E+00, &
     & 0.2813200E+00, 0.2717500E+00, 0.2631200E+00, 0.2844700E+00, &
     & 0.2656000E+00, 0.2907000E+00, 0.2820200E+00, 0.2837100E+00, &
     & 0.2909700E+00, 0.3138400E+00, 0.3134400E+00, 0.3350000E+00, &
     & 0.3550000E+00, 0.3722000E+00, 0.3895300E+00, 0.3895300E+00 /
      data (ref_adm(10,iz, 7, 9),iz = 1,20) / &
     & 0.2931600E+00, 0.2931600E+00, 0.2818600E+00, 0.2741100E+00, &
     & 0.2710500E+00, 0.2827000E+00, 0.2633500E+00, 0.2891400E+00, &
     & 0.2962200E+00, 0.2816400E+00, 0.3036800E+00, 0.3111100E+00, &
     & 0.3184700E+00, 0.3204000E+00, 0.3388300E+00, 0.3569100E+00, &
     & 0.3751500E+00, 0.3840800E+00, 0.3745500E+00, 0.3745500E+00 /
      data (ref_adm(10,iz, 8, 9),iz = 1,20) / &
     & 0.2719300E+00, 0.2719300E+00, 0.2813800E+00, 0.2702000E+00, &
     & 0.2848500E+00, 0.2843000E+00, 0.2815200E+00, 0.2651800E+00, &
     & 0.2700800E+00, 0.2689200E+00, 0.2805700E+00, 0.2855500E+00, &
     & 0.2908900E+00, 0.2737400E+00, 0.3105600E+00, 0.3751400E+00, &
     & 0.3823700E+00, 0.3194900E+00, 0.3559100E+00, 0.3559100E+00 /
      data (ref_adm(10,iz, 9, 9),iz = 1,20) / &
     & 0.2913900E+00, 0.2913900E+00, 0.2691100E+00, 0.2790000E+00, &
     & 0.2751000E+00, 0.2810300E+00, 0.2845200E+00, 0.2946300E+00, &
     & 0.2956100E+00, 0.2789700E+00, 0.2815100E+00, 0.2837300E+00, &
     & 0.3192900E+00, 0.3175800E+00, 0.3308200E+00, 0.3518800E+00, &
     & 0.3961500E+00, 0.3965800E+00, 0.3600900E+00, 0.3600900E+00 /
      data (ref_adm(10,iz,10, 9),iz = 1,20) / &
     & 0.2706400E+00, 0.2706400E+00, 0.2764700E+00, 0.2536700E+00, &
     & 0.2544600E+00, 0.2518000E+00, 0.2570300E+00, 0.3036600E+00, &
     & 0.2724700E+00, 0.2655400E+00, 0.2813500E+00, 0.2813000E+00, &
     & 0.3267200E+00, 0.3122100E+00, 0.3834500E+00, 0.3434100E+00, &
     & 0.3710000E+00, 0.3591700E+00, 0.3228100E+00, 0.3228100E+00 /
      data (ref_adm(10,iz,11, 9),iz = 1,20) / &
     & 0.2871600E+00, 0.2871600E+00, 0.2894100E+00, 0.2670900E+00, &
     & 0.2731500E+00, 0.2756100E+00, 0.3000000E+00, 0.2703800E+00, &
     & 0.2785500E+00, 0.2550400E+00, 0.2824400E+00, 0.2756100E+00, &
     & 0.3068200E+00, 0.3164600E+00, 0.3497900E+00, 0.3492900E+00, &
     & 0.4240100E+00, 0.3327900E+00, 0.3613500E+00, 0.3613500E+00 /
      data (ref_adm(10,iz,12, 9),iz = 1,20) / &
     & 0.2741700E+00, 0.2741700E+00, 0.2903400E+00, 0.2903900E+00, &
     & 0.2798000E+00, 0.2815300E+00, 0.2774600E+00, 0.2826100E+00, &
     & 0.2753600E+00, 0.2714800E+00, 0.2703000E+00, 0.2924000E+00, &
     & 0.2985700E+00, 0.2856700E+00, 0.3105700E+00, 0.3463400E+00, &
     & 0.3616600E+00, 0.3198400E+00, 0.3319000E+00, 0.3319000E+00 /
      data (ref_adm(10,iz,13, 9),iz = 1,20) / &
     & 0.2693300E+00, 0.2693300E+00, 0.2580900E+00, 0.2572500E+00, &
     & 0.2513200E+00, 0.2636500E+00, 0.2639900E+00, 0.2685500E+00, &
     & 0.2712700E+00, 0.2838800E+00, 0.2806500E+00, 0.2984000E+00, &
     & 0.2597500E+00, 0.2798400E+00, 0.3062800E+00, 0.3677200E+00, &
     & 0.3168600E+00, 0.3109800E+00, 0.3087000E+00, 0.3087000E+00 /
      data (ref_adm(10,iz,14, 9),iz = 1,20) / &
     & 0.2800000E+00, 0.2800000E+00, 0.2802200E+00, 0.2857700E+00, &
     & 0.2884800E+00, 0.2848200E+00, 0.2885700E+00, 0.2777700E+00, &
     & 0.2730500E+00, 0.2640700E+00, 0.2660000E+00, 0.2869100E+00, &
     & 0.2886500E+00, 0.2840500E+00, 0.2971200E+00, 0.3115600E+00, &
     & 0.3190400E+00, 0.3082400E+00, 0.3078200E+00, 0.3078200E+00 /
      data (ref_adm(10,iz,15, 9),iz = 1,20) / &
     & 0.2713300E+00, 0.2713300E+00, 0.2630600E+00, 0.2824800E+00, &
     & 0.2484200E+00, 0.2652200E+00, 0.2582100E+00, 0.2653000E+00, &
     & 0.2692100E+00, 0.2639000E+00, 0.2751000E+00, 0.2711800E+00, &
     & 0.2626700E+00, 0.2682600E+00, 0.2990500E+00, 0.2806900E+00, &
     & 0.2844200E+00, 0.2877900E+00, 0.2662400E+00, 0.2662400E+00 /
      data (ref_adm(10,iz,16, 9),iz = 1,20) / &
     & 0.2815100E+00, 0.2815100E+00, 0.2708300E+00, 0.2673900E+00, &
     & 0.2903200E+00, 0.2797100E+00, 0.2639400E+00, 0.2770300E+00, &
     & 0.2681600E+00, 0.2634800E+00, 0.2662900E+00, 0.2633200E+00, &
     & 0.2653200E+00, 0.2766200E+00, 0.2991200E+00, 0.2963700E+00, &
     & 0.3014000E+00, 0.2734900E+00, 0.2805900E+00, 0.2805900E+00 /
      data (ref_adm(10,iz,17, 9),iz = 1,20) / &
     & 0.2768000E+00, 0.2768000E+00, 0.2600100E+00, 0.2803300E+00, &
     & 0.2782000E+00, 0.2883800E+00, 0.2749600E+00, 0.2697900E+00, &
     & 0.3031800E+00, 0.2879200E+00, 0.2610000E+00, 0.2650500E+00, &
     & 0.2677800E+00, 0.2928200E+00, 0.3162700E+00, 0.2953100E+00, &
     & 0.3279600E+00, 0.3021900E+00, 0.2664400E+00, 0.2664400E+00 /
      data (ref_adm(10,iz,18, 9),iz = 1,20) / &
     & 0.2714200E+00, 0.2714200E+00, 0.2657100E+00, 0.2642100E+00, &
     & 0.2710000E+00, 0.2498300E+00, 0.2542300E+00, 0.2634600E+00, &
     & 0.2587400E+00, 0.2792300E+00, 0.2686800E+00, 0.2715500E+00, &
     & 0.2792100E+00, 0.2772100E+00, 0.2638100E+00, 0.3026100E+00, &
     & 0.3097500E+00, 0.3158600E+00, 0.2772928E+00, 0.2772928E+00 /
      data (ref_adm(10,iz,19, 9),iz = 1,20) / &
     & 0.2957100E+00, 0.2957100E+00, 0.2572500E+00, 0.2825500E+00, &
     & 0.2956100E+00, 0.2610400E+00, 0.2603200E+00, 0.2562200E+00, &
     & 0.2687900E+00, 0.2662500E+00, 0.2827000E+00, 0.3201900E+00, &
     & 0.2624700E+00, 0.2722800E+00, 0.2564400E+00, 0.2857000E+00, &
     & 0.3373300E+00, 0.2976161E+00, 0.2749670E+00, 0.2749670E+00 /
      data (ref_adm(10,iz,20, 9),iz = 1,20) / &
     & 0.2960000E+00, 0.2960000E+00, 0.2651600E+00, 0.2731000E+00, &
     & 0.2784900E+00, 0.2594900E+00, 0.2949600E+00, 0.2588700E+00, &
     & 0.2600800E+00, 0.2713400E+00, 0.2867500E+00, 0.2856300E+00, &
     & 0.3234600E+00, 0.2814700E+00, 0.2879000E+00, 0.2755300E+00, &
     & 0.3160900E+00, 0.2781400E+00, 0.2734124E+00, 0.2734124E+00 /
      data (ref_adm(10,iz,21, 9),iz = 1,20) / &
     & 0.2842000E+00, 0.2842000E+00, 0.2771500E+00, 0.2656200E+00, &
     & 0.2506500E+00, 0.2708600E+00, 0.3003900E+00, 0.2865000E+00, &
     & 0.2486000E+00, 0.2749900E+00, 0.2783100E+00, 0.2912400E+00, &
     & 0.2913700E+00, 0.2945600E+00, 0.3009600E+00, 0.2996800E+00, &
     & 0.2959868E+00, 0.2941847E+00, 0.2722302E+00, 0.2722302E+00 /
      data (ref_adm(10,iz,22, 9),iz = 1,20) / &
     & 0.2870700E+00, 0.2870700E+00, 0.2739100E+00, 0.2872100E+00, &
     & 0.2985500E+00, 0.2879500E+00, 0.2535500E+00, 0.2951700E+00, &
     & 0.2647800E+00, 0.2860600E+00, 0.3110500E+00, 0.3094800E+00, &
     & 0.2934500E+00, 0.3167200E+00, 0.2955100E+00, 0.2835900E+00, &
     & 0.3170790E+00, 0.3130891E+00, 0.2886633E+00, 0.2886633E+00 /
      data (ref_adm(10,iz,23, 9),iz = 1,20) / &
     & 0.2955100E+00, 0.2955100E+00, 0.2777000E+00, 0.3216700E+00, &
     & 0.3491500E+00, 0.2877000E+00, 0.2995000E+00, 0.3014600E+00, &
     & 0.2652600E+00, 0.3068400E+00, 0.3041300E+00, 0.2968400E+00, &
     & 0.2730800E+00, 0.2681700E+00, 0.2868100E+00, 0.3423700E+00, &
     & 0.3442200E+00, 0.3120033E+00, 0.2884683E+00, 0.2884683E+00 /
      data (ref_adm(10,iz,24, 9),iz = 1,20) / &
     & 0.2709100E+00, 0.2709100E+00, 0.2951700E+00, 0.3000600E+00, &
     & 0.3142900E+00, 0.3300500E+00, 0.3015900E+00, 0.3287700E+00, &
     & 0.2938600E+00, 0.3199100E+00, 0.3296000E+00, 0.3041300E+00, &
     & 0.2866200E+00, 0.3202300E+00, 0.3062500E+00, 0.2751700E+00, &
     & 0.3220400E+00, 0.3118730E+00, 0.2888020E+00, 0.2888020E+00 /
      data (ref_adm(10,iz,25, 9),iz = 1,20) / &
     & 0.2824700E+00, 0.2824700E+00, 0.2528100E+00, 0.2655000E+00, &
     & 0.2547400E+00, 0.2886400E+00, 0.3220500E+00, 0.3074500E+00, &
     & 0.2888900E+00, 0.3065600E+00, 0.3155100E+00, 0.2821300E+00, &
     & 0.3267600E+00, 0.2827000E+00, 0.2992000E+00, 0.2873700E+00, &
     & 0.3295400E+00, 0.3034800E+00, 0.2897497E+00, 0.2897497E+00 /
      data (ref_adm(10,iz,26, 9),iz = 1,20) / &
     & 0.2805500E+00, 0.2805500E+00, 0.2912800E+00, 0.2916500E+00, &
     & 0.2940600E+00, 0.2933000E+00, 0.3036600E+00, 0.3023200E+00, &
     & 0.2901800E+00, 0.2752400E+00, 0.2872800E+00, 0.3051300E+00, &
     & 0.3139900E+00, 0.3235500E+00, 0.2845000E+00, 0.3014800E+00, &
     & 0.3084700E+00, 0.3293500E+00, 0.3463300E+00, 0.3463300E+00 /
      data (ref_adm(10,iz,27, 9),iz = 1,20) / &
     & 0.2921900E+00, 0.2921900E+00, 0.2895800E+00, 0.2822100E+00, &
     & 0.2965700E+00, 0.3017900E+00, 0.3102800E+00, 0.3194500E+00, &
     & 0.3094800E+00, 0.3229300E+00, 0.3184300E+00, 0.3140700E+00, &
     & 0.2959400E+00, 0.3089500E+00, 0.3163700E+00, 0.3374000E+00, &
     & 0.3237800E+00, 0.2949300E+00, 0.2849400E+00, 0.2849400E+00 /
      data (ref_adm(10,iz,28, 9),iz = 1,20) / &
     & 0.2955700E+00, 0.2955700E+00, 0.3125000E+00, 0.3080300E+00, &
     & 0.3102300E+00, 0.3138600E+00, 0.3255400E+00, 0.3144200E+00, &
     & 0.3203800E+00, 0.3445100E+00, 0.3297800E+00, 0.3334000E+00, &
     & 0.3416400E+00, 0.3388200E+00, 0.3362000E+00, 0.3521300E+00, &
     & 0.3347800E+00, 0.3221900E+00, 0.2529100E+00, 0.2529100E+00 /
      data (ref_adm(10,iz,29, 9),iz = 1,20) / &
     & 0.2878000E+00, 0.2878000E+00, 0.2895200E+00, 0.2816900E+00, &
     & 0.3102200E+00, 0.3208300E+00, 0.3129900E+00, 0.3114400E+00, &
     & 0.3197100E+00, 0.3503500E+00, 0.3415900E+00, 0.3371800E+00, &
     & 0.3402700E+00, 0.3449300E+00, 0.3446600E+00, 0.3493300E+00, &
     & 0.3581000E+00, 0.3307100E+00, 0.2830200E+00, 0.2830200E+00 /
      data (ref_adm(10,iz,30, 9),iz = 1,20) / &
     & 0.2820200E+00, 0.2820200E+00, 0.3036500E+00, 0.3004600E+00, &
     & 0.2955600E+00, 0.3159200E+00, 0.3217800E+00, 0.3484200E+00, &
     & 0.3403200E+00, 0.3344400E+00, 0.3519700E+00, 0.3557400E+00, &
     & 0.3495700E+00, 0.3562400E+00, 0.3499000E+00, 0.3451400E+00, &
     & 0.3502700E+00, 0.3523200E+00, 0.2928800E+00, 0.2928800E+00 /
      data (ref_adm(10,iz,31, 9),iz = 1,20) / &
     & 0.2918800E+00, 0.2918800E+00, 0.3026400E+00, 0.3167500E+00, &
     & 0.3292600E+00, 0.3099000E+00, 0.3261300E+00, 0.3442400E+00, &
     & 0.3312700E+00, 0.3104100E+00, 0.3530200E+00, 0.3325100E+00, &
     & 0.3288500E+00, 0.3412300E+00, 0.3420500E+00, 0.3577800E+00, &
     & 0.3296500E+00, 0.3383700E+00, 0.2839100E+00, 0.2839100E+00 /
      data (ref_adm(10,iz,32, 9),iz = 1,20) / &
     & 0.3004400E+00, 0.3004400E+00, 0.2991100E+00, 0.3140500E+00, &
     & 0.3178900E+00, 0.2948400E+00, 0.3181800E+00, 0.3583100E+00, &
     & 0.3255100E+00, 0.3552100E+00, 0.3376300E+00, 0.3284400E+00, &
     & 0.3296800E+00, 0.3512200E+00, 0.3296700E+00, 0.3586300E+00, &
     & 0.3632700E+00, 0.3339600E+00, 0.2639200E+00, 0.2639200E+00 /
      data (ref_adm(10,iz,33, 9),iz = 1,20) / &
     & 0.3038300E+00, 0.3038300E+00, 0.2903900E+00, 0.2756400E+00, &
     & 0.3005300E+00, 0.3521800E+00, 0.3338800E+00, 0.3354400E+00, &
     & 0.3489300E+00, 0.3417400E+00, 0.3589800E+00, 0.3127500E+00, &
     & 0.3418300E+00, 0.3779000E+00, 0.3595900E+00, 0.3677000E+00, &
     & 0.3730700E+00, 0.3323800E+00, 0.3135770E+00, 0.3135770E+00 /
      data (ref_adm(10,iz,34, 9),iz = 1,20) / &
     & 0.2958600E+00, 0.2958600E+00, 0.2831000E+00, 0.2819600E+00, &
     & 0.3254800E+00, 0.3377000E+00, 0.3327200E+00, 0.3439700E+00, &
     & 0.3369300E+00, 0.3450800E+00, 0.3795700E+00, 0.3677200E+00, &
     & 0.3716100E+00, 0.3761500E+00, 0.3615600E+00, 0.3731000E+00, &
     & 0.3666300E+00, 0.3543700E+00, 0.3162105E+00, 0.3162105E+00 /
      data (ref_adm(10,iz,35, 9),iz = 1,20) / &
     & 0.2835900E+00, 0.2835900E+00, 0.2997900E+00, 0.3141800E+00, &
     & 0.3296800E+00, 0.3162900E+00, 0.3568200E+00, 0.3582900E+00, &
     & 0.3556300E+00, 0.3638000E+00, 0.3567600E+00, 0.3800800E+00, &
     & 0.3594100E+00, 0.3506500E+00, 0.3612100E+00, 0.3513000E+00, &
     & 0.3635600E+00, 0.3268100E+00, 0.3184399E+00, 0.3184399E+00 /
      data (ref_adm(10,iz,36, 9),iz = 1,20) / &
     & 0.2895600E+00, 0.2895600E+00, 0.2972800E+00, 0.3202300E+00, &
     & 0.3371400E+00, 0.3508800E+00, 0.3858900E+00, 0.3699500E+00, &
     & 0.3584300E+00, 0.3745800E+00, 0.3892300E+00, 0.4000200E+00, &
     & 0.3637600E+00, 0.3521900E+00, 0.3725100E+00, 0.3755500E+00, &
     & 0.3459300E+00, 0.3386724E+00, 0.3199885E+00, 0.3199885E+00 /
      data (ref_adm(10,iz,37, 9),iz = 1,20) / &
     & 0.3018000E+00, 0.3018000E+00, 0.2953900E+00, 0.3037500E+00, &
     & 0.3228800E+00, 0.3248800E+00, 0.3269800E+00, 0.3605500E+00, &
     & 0.3838500E+00, 0.3861400E+00, 0.4056500E+00, 0.3926400E+00, &
     & 0.3690900E+00, 0.3632800E+00, 0.3839700E+00, 0.3529000E+00, &
     & 0.3488754E+00, 0.3394744E+00, 0.3208711E+00, 0.3208711E+00 /
      data (ref_adm(10,iz,38, 9),iz = 1,20) / &
     & 0.3018000E+00, 0.3018000E+00, 0.2953900E+00, 0.3037500E+00, &
     & 0.3228800E+00, 0.3248800E+00, 0.3269800E+00, 0.3605500E+00, &
     & 0.3838500E+00, 0.3861400E+00, 0.4056500E+00, 0.3926400E+00, &
     & 0.3690900E+00, 0.3632800E+00, 0.3839700E+00, 0.3529000E+00, &
     & 0.3488754E+00, 0.3394744E+00, 0.3208711E+00, 0.3208711E+00 /
! Solar Zenith Angle 45.0 Albedo  0.3034367E+00
      data (ref_adm(10,iz, 1,10),iz = 1,20) / &
     & 0.2639700E+00, 0.2639700E+00, 0.2746000E+00, 0.2752100E+00, &
     & 0.2701600E+00, 0.2737900E+00, 0.2596600E+00, 0.2448300E+00, &
     & 0.2645900E+00, 0.2910900E+00, 0.3594200E+00, 0.3348200E+00, &
     & 0.3338600E+00, 0.3533500E+00, 0.3727600E+00, 0.4114500E+00, &
     & 0.4544600E+00, 0.4642300E+00, 0.4283700E+00, 0.4283700E+00 /
      data (ref_adm(10,iz, 2,10),iz = 1,20) / &
     & 0.2639700E+00, 0.2639700E+00, 0.2746000E+00, 0.2752100E+00, &
     & 0.2701600E+00, 0.2737900E+00, 0.2596600E+00, 0.2448300E+00, &
     & 0.2645900E+00, 0.2910900E+00, 0.3594200E+00, 0.3348200E+00, &
     & 0.3338600E+00, 0.3533500E+00, 0.3727600E+00, 0.4114500E+00, &
     & 0.4544600E+00, 0.4642300E+00, 0.4283700E+00, 0.4283700E+00 /
      data (ref_adm(10,iz, 3,10),iz = 1,20) / &
     & 0.2888400E+00, 0.2888400E+00, 0.2830900E+00, 0.2943900E+00, &
     & 0.2771400E+00, 0.2738600E+00, 0.2621200E+00, 0.2578500E+00, &
     & 0.2690500E+00, 0.2753300E+00, 0.3016400E+00, 0.3010900E+00, &
     & 0.3080500E+00, 0.3516100E+00, 0.3582300E+00, 0.4041400E+00, &
     & 0.4278200E+00, 0.4723900E+00, 0.4194600E+00, 0.4194600E+00 /
      data (ref_adm(10,iz, 4,10),iz = 1,20) / &
     & 0.2850200E+00, 0.2850200E+00, 0.2815900E+00, 0.2560100E+00, &
     & 0.2693900E+00, 0.2533200E+00, 0.2583400E+00, 0.2575300E+00, &
     & 0.2853400E+00, 0.2968600E+00, 0.2853200E+00, 0.2871200E+00, &
     & 0.3276600E+00, 0.3506000E+00, 0.3814600E+00, 0.3993400E+00, &
     & 0.4303100E+00, 0.4621700E+00, 0.4274800E+00, 0.4274800E+00 /
      data (ref_adm(10,iz, 5,10),iz = 1,20) / &
     & 0.2705100E+00, 0.2705100E+00, 0.2804000E+00, 0.2808300E+00, &
     & 0.2713700E+00, 0.2574600E+00, 0.2450100E+00, 0.2506900E+00, &
     & 0.2712800E+00, 0.2978500E+00, 0.2899100E+00, 0.2967400E+00, &
     & 0.3188100E+00, 0.3712300E+00, 0.3596000E+00, 0.4106500E+00, &
     & 0.4134200E+00, 0.4447600E+00, 0.4285700E+00, 0.4285700E+00 /
      data (ref_adm(10,iz, 6,10),iz = 1,20) / &
     & 0.2680200E+00, 0.2680200E+00, 0.2680500E+00, 0.2783200E+00, &
     & 0.2521000E+00, 0.2675700E+00, 0.2616100E+00, 0.2692200E+00, &
     & 0.2898400E+00, 0.2928700E+00, 0.2960900E+00, 0.3362300E+00, &
     & 0.3075500E+00, 0.3887100E+00, 0.3786900E+00, 0.4028400E+00, &
     & 0.4429300E+00, 0.4623400E+00, 0.3980900E+00, 0.3980900E+00 /
      data (ref_adm(10,iz, 7,10),iz = 1,20) / &
     & 0.2697300E+00, 0.2697300E+00, 0.2666600E+00, 0.2649200E+00, &
     & 0.2790400E+00, 0.2803600E+00, 0.2892500E+00, 0.2902900E+00, &
     & 0.2780200E+00, 0.2684900E+00, 0.2903200E+00, 0.3234600E+00, &
     & 0.3421700E+00, 0.3403500E+00, 0.3566700E+00, 0.3941900E+00, &
     & 0.4286800E+00, 0.4551400E+00, 0.4117800E+00, 0.4117800E+00 /
      data (ref_adm(10,iz, 8,10),iz = 1,20) / &
     & 0.2446000E+00, 0.2446000E+00, 0.2743300E+00, 0.2577000E+00, &
     & 0.2597400E+00, 0.2594700E+00, 0.2580800E+00, 0.2670100E+00, &
     & 0.2803600E+00, 0.2884700E+00, 0.2939800E+00, 0.3218500E+00, &
     & 0.3405800E+00, 0.3459200E+00, 0.3520500E+00, 0.3993300E+00, &
     & 0.4357100E+00, 0.4458400E+00, 0.4603000E+00, 0.4603000E+00 /
      data (ref_adm(10,iz, 9,10),iz = 1,20) / &
     & 0.2740100E+00, 0.2740100E+00, 0.2666400E+00, 0.2771400E+00, &
     & 0.2742400E+00, 0.2803200E+00, 0.2744800E+00, 0.2753200E+00, &
     & 0.2883800E+00, 0.2928300E+00, 0.2980300E+00, 0.3166400E+00, &
     & 0.3158700E+00, 0.3560700E+00, 0.3455900E+00, 0.3838400E+00, &
     & 0.4312800E+00, 0.4217000E+00, 0.3916600E+00, 0.3916600E+00 /
      data (ref_adm(10,iz,10,10),iz = 1,20) / &
     & 0.2952200E+00, 0.2952200E+00, 0.2780100E+00, 0.2741600E+00, &
     & 0.2661300E+00, 0.2536000E+00, 0.2631600E+00, 0.2734300E+00, &
     & 0.2642000E+00, 0.2551800E+00, 0.3001300E+00, 0.2854100E+00, &
     & 0.2903300E+00, 0.3137900E+00, 0.3397100E+00, 0.3548800E+00, &
     & 0.3925500E+00, 0.3846100E+00, 0.4069400E+00, 0.4069400E+00 /
      data (ref_adm(10,iz,11,10),iz = 1,20) / &
     & 0.2792200E+00, 0.2792200E+00, 0.2569000E+00, 0.2612100E+00, &
     & 0.2537600E+00, 0.2605800E+00, 0.2592700E+00, 0.2665200E+00, &
     & 0.2305600E+00, 0.2736400E+00, 0.3202300E+00, 0.2689500E+00, &
     & 0.2700500E+00, 0.2902800E+00, 0.3170700E+00, 0.3276300E+00, &
     & 0.3747000E+00, 0.3840500E+00, 0.3167800E+00, 0.3167800E+00 /
      data (ref_adm(10,iz,12,10),iz = 1,20) / &
     & 0.2685400E+00, 0.2685400E+00, 0.2761900E+00, 0.2748300E+00, &
     & 0.2629800E+00, 0.2720800E+00, 0.2660300E+00, 0.2619800E+00, &
     & 0.2811400E+00, 0.2782700E+00, 0.2955400E+00, 0.2666500E+00, &
     & 0.2737900E+00, 0.2878000E+00, 0.2974600E+00, 0.3178800E+00, &
     & 0.3573900E+00, 0.3463700E+00, 0.3097300E+00, 0.3097300E+00 /
      data (ref_adm(10,iz,13,10),iz = 1,20) / &
     & 0.2756900E+00, 0.2756900E+00, 0.2839700E+00, 0.2746800E+00, &
     & 0.2717300E+00, 0.2633500E+00, 0.2723100E+00, 0.2623400E+00, &
     & 0.2682900E+00, 0.2801800E+00, 0.2883400E+00, 0.2775100E+00, &
     & 0.2597000E+00, 0.2890800E+00, 0.2976100E+00, 0.3203000E+00, &
     & 0.3396400E+00, 0.3579500E+00, 0.3277200E+00, 0.3277200E+00 /
      data (ref_adm(10,iz,14,10),iz = 1,20) / &
     & 0.2715400E+00, 0.2715400E+00, 0.2590200E+00, 0.2677500E+00, &
     & 0.2584100E+00, 0.2466200E+00, 0.2419600E+00, 0.2604100E+00, &
     & 0.2656300E+00, 0.2772700E+00, 0.2767100E+00, 0.2875500E+00, &
     & 0.2925100E+00, 0.2960300E+00, 0.2856900E+00, 0.3087300E+00, &
     & 0.3236700E+00, 0.3357200E+00, 0.2924500E+00, 0.2924500E+00 /
      data (ref_adm(10,iz,15,10),iz = 1,20) / &
     & 0.2631400E+00, 0.2631400E+00, 0.2617600E+00, 0.2591600E+00, &
     & 0.2612800E+00, 0.2652800E+00, 0.2631000E+00, 0.2637600E+00, &
     & 0.2722200E+00, 0.2624300E+00, 0.2649800E+00, 0.2653800E+00, &
     & 0.2596200E+00, 0.2874300E+00, 0.3106900E+00, 0.3222200E+00, &
     & 0.3248700E+00, 0.3107100E+00, 0.2390100E+00, 0.2390100E+00 /
      data (ref_adm(10,iz,16,10),iz = 1,20) / &
     & 0.2628700E+00, 0.2628700E+00, 0.2727900E+00, 0.2377200E+00, &
     & 0.2555200E+00, 0.2603400E+00, 0.2603800E+00, 0.2639700E+00, &
     & 0.2716600E+00, 0.2608000E+00, 0.2381700E+00, 0.2719700E+00, &
     & 0.2760000E+00, 0.2718200E+00, 0.3038600E+00, 0.3173300E+00, &
     & 0.3303200E+00, 0.3193400E+00, 0.2192000E+00, 0.2192000E+00 /
      data (ref_adm(10,iz,17,10),iz = 1,20) / &
     & 0.2685000E+00, 0.2685000E+00, 0.2604100E+00, 0.2549800E+00, &
     & 0.2551000E+00, 0.2639900E+00, 0.2545400E+00, 0.2572000E+00, &
     & 0.2530400E+00, 0.2640700E+00, 0.2553600E+00, 0.2833800E+00, &
     & 0.2777300E+00, 0.2851200E+00, 0.3042700E+00, 0.3180500E+00, &
     & 0.3312000E+00, 0.3616200E+00, 0.3071007E+00, 0.3071007E+00 /
      data (ref_adm(10,iz,18,10),iz = 1,20) / &
     & 0.2720800E+00, 0.2720800E+00, 0.2635400E+00, 0.2498800E+00, &
     & 0.2802300E+00, 0.2543400E+00, 0.2520800E+00, 0.2527700E+00, &
     & 0.2586700E+00, 0.2600000E+00, 0.2526600E+00, 0.2863800E+00, &
     & 0.2817200E+00, 0.2842900E+00, 0.2745800E+00, 0.2907000E+00, &
     & 0.3228000E+00, 0.3156400E+00, 0.2734075E+00, 0.2734075E+00 /
      data (ref_adm(10,iz,19,10),iz = 1,20) / &
     & 0.2623100E+00, 0.2623100E+00, 0.2406700E+00, 0.2689700E+00, &
     & 0.2497200E+00, 0.2561900E+00, 0.2673100E+00, 0.2554200E+00, &
     & 0.2558500E+00, 0.2757800E+00, 0.2572600E+00, 0.2742800E+00, &
     & 0.2672700E+00, 0.2814100E+00, 0.2924000E+00, 0.3012200E+00, &
     & 0.3346400E+00, 0.3095167E+00, 0.2709751E+00, 0.2709751E+00 /
      data (ref_adm(10,iz,20,10),iz = 1,20) / &
     & 0.2401000E+00, 0.2401000E+00, 0.2406000E+00, 0.2427700E+00, &
     & 0.2433500E+00, 0.2506500E+00, 0.2434100E+00, 0.2440100E+00, &
     & 0.2585000E+00, 0.2637900E+00, 0.2576600E+00, 0.2713900E+00, &
     & 0.2824800E+00, 0.2625400E+00, 0.2949700E+00, 0.2954500E+00, &
     & 0.3282500E+00, 0.3055583E+00, 0.2690639E+00, 0.2690639E+00 /
      data (ref_adm(10,iz,21,10),iz = 1,20) / &
     & 0.2444400E+00, 0.2444400E+00, 0.2706700E+00, 0.2593200E+00, &
     & 0.2780000E+00, 0.2555900E+00, 0.2839100E+00, 0.2698700E+00, &
     & 0.2773800E+00, 0.2601000E+00, 0.2539900E+00, 0.2481200E+00, &
     & 0.2914700E+00, 0.2817100E+00, 0.2876900E+00, 0.3335100E+00, &
     & 0.3068939E+00, 0.3022249E+00, 0.2672516E+00, 0.2672516E+00 /
      data (ref_adm(10,iz,22,10),iz = 1,20) / &
     & 0.2563000E+00, 0.2563000E+00, 0.2625800E+00, 0.2560600E+00, &
     & 0.2705300E+00, 0.2585300E+00, 0.2647100E+00, 0.2543200E+00, &
     & 0.2592600E+00, 0.2763500E+00, 0.2955000E+00, 0.2691500E+00, &
     & 0.2998800E+00, 0.2955800E+00, 0.2738500E+00, 0.2833600E+00, &
     & 0.3578824E+00, 0.3466462E+00, 0.3062645E+00, 0.3062645E+00 /
      data (ref_adm(10,iz,23,10),iz = 1,20) / &
     & 0.2697200E+00, 0.2697200E+00, 0.2751400E+00, 0.2839500E+00, &
     & 0.2692900E+00, 0.2691700E+00, 0.2807800E+00, 0.2555800E+00, &
     & 0.2755000E+00, 0.2825700E+00, 0.2933900E+00, 0.2868600E+00, &
     & 0.2906300E+00, 0.2945400E+00, 0.2987100E+00, 0.3052700E+00, &
     & 0.3521196E+00, 0.3401704E+00, 0.3037286E+00, 0.3037286E+00 /
      data (ref_adm(10,iz,24,10),iz = 1,20) / &
     & 0.2676100E+00, 0.2676100E+00, 0.2842000E+00, 0.2945800E+00, &
     & 0.3061500E+00, 0.2841500E+00, 0.2661400E+00, 0.2863800E+00, &
     & 0.2788800E+00, 0.2764400E+00, 0.2906000E+00, 0.3183800E+00, &
     & 0.3191900E+00, 0.3118000E+00, 0.3144700E+00, 0.3018100E+00, &
     & 0.3221300E+00, 0.3347864E+00, 0.3015751E+00, 0.3015751E+00 /
      data (ref_adm(10,iz,25,10),iz = 1,20) / &
     & 0.2588100E+00, 0.2588100E+00, 0.2635500E+00, 0.2723600E+00, &
     & 0.2761400E+00, 0.2837300E+00, 0.2778000E+00, 0.2777000E+00, &
     & 0.2740200E+00, 0.2844400E+00, 0.3151900E+00, 0.3000200E+00, &
     & 0.2927000E+00, 0.3186600E+00, 0.3084900E+00, 0.3051000E+00, &
     & 0.3258000E+00, 0.3414100E+00, 0.2999553E+00, 0.2999553E+00 /
      data (ref_adm(10,iz,26,10),iz = 1,20) / &
     & 0.2692500E+00, 0.2692500E+00, 0.2745900E+00, 0.2972100E+00, &
     & 0.2862900E+00, 0.2917100E+00, 0.2850000E+00, 0.2931000E+00, &
     & 0.2918000E+00, 0.2917500E+00, 0.3019700E+00, 0.2978600E+00, &
     & 0.3078200E+00, 0.3329400E+00, 0.3232900E+00, 0.3207700E+00, &
     & 0.3283400E+00, 0.3290700E+00, 0.3684900E+00, 0.3684900E+00 /
      data (ref_adm(10,iz,27,10),iz = 1,20) / &
     & 0.2691000E+00, 0.2691000E+00, 0.2745700E+00, 0.2829100E+00, &
     & 0.2866800E+00, 0.2797900E+00, 0.2870000E+00, 0.2867900E+00, &
     & 0.2950500E+00, 0.2895700E+00, 0.3131700E+00, 0.3173200E+00, &
     & 0.3190500E+00, 0.3377100E+00, 0.3451700E+00, 0.3373400E+00, &
     & 0.3313000E+00, 0.3484500E+00, 0.2986100E+00, 0.2986100E+00 /
      data (ref_adm(10,iz,28,10),iz = 1,20) / &
     & 0.2742800E+00, 0.2742800E+00, 0.2759000E+00, 0.2819100E+00, &
     & 0.2954300E+00, 0.3069200E+00, 0.2995300E+00, 0.3017400E+00, &
     & 0.3202400E+00, 0.3241900E+00, 0.3213600E+00, 0.3279900E+00, &
     & 0.3298000E+00, 0.3301200E+00, 0.3275900E+00, 0.3560700E+00, &
     & 0.3610800E+00, 0.3395500E+00, 0.2926200E+00, 0.2926200E+00 /
      data (ref_adm(10,iz,29,10),iz = 1,20) / &
     & 0.2745400E+00, 0.2745400E+00, 0.2827000E+00, 0.2886600E+00, &
     & 0.2774800E+00, 0.2890900E+00, 0.2926700E+00, 0.3036000E+00, &
     & 0.3202400E+00, 0.3228800E+00, 0.3217800E+00, 0.3392200E+00, &
     & 0.3483700E+00, 0.3524000E+00, 0.3603500E+00, 0.3658100E+00, &
     & 0.3598300E+00, 0.3482100E+00, 0.2938000E+00, 0.2938000E+00 /
      data (ref_adm(10,iz,30,10),iz = 1,20) / &
     & 0.2833300E+00, 0.2833300E+00, 0.2865100E+00, 0.2900000E+00, &
     & 0.2866900E+00, 0.3016400E+00, 0.2848600E+00, 0.2949300E+00, &
     & 0.3189100E+00, 0.3183800E+00, 0.3191500E+00, 0.3231200E+00, &
     & 0.3305800E+00, 0.3515900E+00, 0.3605900E+00, 0.3762600E+00, &
     & 0.3719300E+00, 0.3361500E+00, 0.2764600E+00, 0.2764600E+00 /
      data (ref_adm(10,iz,31,10),iz = 1,20) / &
     & 0.2492900E+00, 0.2492900E+00, 0.2824500E+00, 0.2777600E+00, &
     & 0.2949400E+00, 0.3018400E+00, 0.3003900E+00, 0.3011500E+00, &
     & 0.3146600E+00, 0.3142000E+00, 0.3137100E+00, 0.3370800E+00, &
     & 0.3346600E+00, 0.3583600E+00, 0.3698700E+00, 0.3850800E+00, &
     & 0.3666500E+00, 0.3552100E+00, 0.2828900E+00, 0.2828900E+00 /
      data (ref_adm(10,iz,32,10),iz = 1,20) / &
     & 0.2718100E+00, 0.2718100E+00, 0.2895000E+00, 0.3145000E+00, &
     & 0.3141400E+00, 0.3132100E+00, 0.3186900E+00, 0.3144400E+00, &
     & 0.3226100E+00, 0.3416600E+00, 0.3404000E+00, 0.3406100E+00, &
     & 0.3519100E+00, 0.3579200E+00, 0.3608500E+00, 0.3639100E+00, &
     & 0.3564700E+00, 0.3505200E+00, 0.2927500E+00, 0.2927500E+00 /
      data (ref_adm(10,iz,33,10),iz = 1,20) / &
     & 0.2762600E+00, 0.2762600E+00, 0.2864800E+00, 0.3205400E+00, &
     & 0.3221200E+00, 0.3183500E+00, 0.3287300E+00, 0.3113100E+00, &
     & 0.3237500E+00, 0.3494000E+00, 0.3420700E+00, 0.3677700E+00, &
     & 0.3623800E+00, 0.3586900E+00, 0.3814600E+00, 0.3743900E+00, &
     & 0.3652400E+00, 0.3445500E+00, 0.2825400E+00, 0.2825400E+00 /
      data (ref_adm(10,iz,34,10),iz = 1,20) / &
     & 0.2715700E+00, 0.2715700E+00, 0.3086000E+00, 0.3303900E+00, &
     & 0.3182900E+00, 0.3053000E+00, 0.3060400E+00, 0.3070000E+00, &
     & 0.3383900E+00, 0.3376600E+00, 0.3489000E+00, 0.3628400E+00, &
     & 0.3686300E+00, 0.3771200E+00, 0.3714300E+00, 0.3974600E+00, &
     & 0.3804400E+00, 0.3508500E+00, 0.2700700E+00, 0.2700700E+00 /
      data (ref_adm(10,iz,35,10),iz = 1,20) / &
     & 0.2730100E+00, 0.2730100E+00, 0.2867000E+00, 0.3050000E+00, &
     & 0.2954700E+00, 0.2933500E+00, 0.3111700E+00, 0.3349400E+00, &
     & 0.3412400E+00, 0.3443500E+00, 0.3643200E+00, 0.3775800E+00, &
     & 0.3764100E+00, 0.3733400E+00, 0.3619600E+00, 0.3763100E+00, &
     & 0.3673000E+00, 0.3653300E+00, 0.2813300E+00, 0.2813300E+00 /
      data (ref_adm(10,iz,36,10),iz = 1,20) / &
     & 0.2740900E+00, 0.2740900E+00, 0.2671800E+00, 0.2675000E+00, &
     & 0.2800500E+00, 0.2888000E+00, 0.3161000E+00, 0.3206900E+00, &
     & 0.3479700E+00, 0.3325400E+00, 0.3610900E+00, 0.3809800E+00, &
     & 0.3783800E+00, 0.3709500E+00, 0.3644700E+00, 0.3687100E+00, &
     & 0.3898600E+00, 0.3258500E+00, 0.3135098E+00, 0.3135098E+00 /
      data (ref_adm(10,iz,37,10),iz = 1,20) / &
     & 0.2736000E+00, 0.2736000E+00, 0.2685500E+00, 0.2846400E+00, &
     & 0.2950400E+00, 0.3080200E+00, 0.3259800E+00, 0.3270300E+00, &
     & 0.3434000E+00, 0.3524000E+00, 0.3717900E+00, 0.3791000E+00, &
     & 0.3696000E+00, 0.3683500E+00, 0.3836000E+00, 0.3798400E+00, &
     & 0.3709900E+00, 0.3283013E+00, 0.3141611E+00, 0.3141611E+00 /
      data (ref_adm(10,iz,38,10),iz = 1,20) / &
     & 0.2736000E+00, 0.2736000E+00, 0.2685500E+00, 0.2846400E+00, &
     & 0.2950400E+00, 0.3080200E+00, 0.3259800E+00, 0.3270300E+00, &
     & 0.3434000E+00, 0.3524000E+00, 0.3717900E+00, 0.3791000E+00, &
     & 0.3696000E+00, 0.3683500E+00, 0.3836000E+00, 0.3798400E+00, &
     & 0.3709900E+00, 0.3283013E+00, 0.3141611E+00, 0.3141611E+00 /
! Solar Zenith Angle 50.0 Albedo  0.3041773E+00
      data (ref_adm(10,iz, 1,11),iz = 1,20) / &
     & 0.2674000E+00, 0.2674000E+00, 0.2592200E+00, 0.2658900E+00, &
     & 0.2541300E+00, 0.2471900E+00, 0.2524600E+00, 0.2621400E+00, &
     & 0.2731100E+00, 0.2962200E+00, 0.3518400E+00, 0.3766700E+00, &
     & 0.3622600E+00, 0.3742300E+00, 0.3905800E+00, 0.4506600E+00, &
     & 0.4699300E+00, 0.5057300E+00, 0.4926700E+00, 0.4926700E+00 /
      data (ref_adm(10,iz, 2,11),iz = 1,20) / &
     & 0.2674000E+00, 0.2674000E+00, 0.2592200E+00, 0.2658900E+00, &
     & 0.2541300E+00, 0.2471900E+00, 0.2524600E+00, 0.2621400E+00, &
     & 0.2731100E+00, 0.2962200E+00, 0.3518400E+00, 0.3766700E+00, &
     & 0.3622600E+00, 0.3742300E+00, 0.3905800E+00, 0.4506600E+00, &
     & 0.4699300E+00, 0.5057300E+00, 0.4926700E+00, 0.4926700E+00 /
      data (ref_adm(10,iz, 3,11),iz = 1,20) / &
     & 0.2661700E+00, 0.2661700E+00, 0.2627200E+00, 0.2707900E+00, &
     & 0.2529900E+00, 0.2489600E+00, 0.2590300E+00, 0.2627200E+00, &
     & 0.2687600E+00, 0.3004500E+00, 0.3111500E+00, 0.3050900E+00, &
     & 0.3502100E+00, 0.3894200E+00, 0.3965700E+00, 0.4209300E+00, &
     & 0.4622300E+00, 0.5130500E+00, 0.4948000E+00, 0.4948000E+00 /
      data (ref_adm(10,iz, 4,11),iz = 1,20) / &
     & 0.2506000E+00, 0.2506000E+00, 0.2689600E+00, 0.2701400E+00, &
     & 0.2506800E+00, 0.2623400E+00, 0.2478800E+00, 0.2728100E+00, &
     & 0.2677800E+00, 0.2880900E+00, 0.2924200E+00, 0.3128800E+00, &
     & 0.3496000E+00, 0.3564300E+00, 0.3826400E+00, 0.4411000E+00, &
     & 0.4613000E+00, 0.5051700E+00, 0.4872900E+00, 0.4872900E+00 /
      data (ref_adm(10,iz, 5,11),iz = 1,20) / &
     & 0.2546300E+00, 0.2546300E+00, 0.2497000E+00, 0.2645800E+00, &
     & 0.2559600E+00, 0.2607400E+00, 0.2525100E+00, 0.2606000E+00, &
     & 0.2902800E+00, 0.2884400E+00, 0.2990400E+00, 0.2779000E+00, &
     & 0.3051500E+00, 0.3516700E+00, 0.3640600E+00, 0.4097800E+00, &
     & 0.4742800E+00, 0.4899400E+00, 0.4587000E+00, 0.4587000E+00 /
      data (ref_adm(10,iz, 6,11),iz = 1,20) / &
     & 0.2643600E+00, 0.2643600E+00, 0.2734600E+00, 0.2520100E+00, &
     & 0.2520600E+00, 0.2439500E+00, 0.2497700E+00, 0.2661800E+00, &
     & 0.2734500E+00, 0.2969100E+00, 0.2931500E+00, 0.2879800E+00, &
     & 0.2969700E+00, 0.3562900E+00, 0.3796400E+00, 0.4102700E+00, &
     & 0.4651600E+00, 0.4844700E+00, 0.4542700E+00, 0.4542700E+00 /
      data (ref_adm(10,iz, 7,11),iz = 1,20) / &
     & 0.2649400E+00, 0.2649400E+00, 0.2566800E+00, 0.2472900E+00, &
     & 0.2458000E+00, 0.2458000E+00, 0.2536100E+00, 0.2502400E+00, &
     & 0.2618000E+00, 0.2578800E+00, 0.2685400E+00, 0.2739500E+00, &
     & 0.2977400E+00, 0.3084600E+00, 0.3496700E+00, 0.3803700E+00, &
     & 0.4187000E+00, 0.4405500E+00, 0.3760700E+00, 0.3760700E+00 /
      data (ref_adm(10,iz, 8,11),iz = 1,20) / &
     & 0.2551600E+00, 0.2551600E+00, 0.2474100E+00, 0.2536300E+00, &
     & 0.2718500E+00, 0.2596800E+00, 0.2663800E+00, 0.2754800E+00, &
     & 0.2713500E+00, 0.2840400E+00, 0.2852800E+00, 0.3077000E+00, &
     & 0.3320200E+00, 0.3331000E+00, 0.3592500E+00, 0.4002500E+00, &
     & 0.4409200E+00, 0.4551200E+00, 0.4293900E+00, 0.4293900E+00 /
      data (ref_adm(10,iz, 9,11),iz = 1,20) / &
     & 0.2638200E+00, 0.2638200E+00, 0.2600900E+00, 0.2541800E+00, &
     & 0.2524300E+00, 0.2574800E+00, 0.2642000E+00, 0.2585600E+00, &
     & 0.2609300E+00, 0.2907200E+00, 0.2728800E+00, 0.3048700E+00, &
     & 0.3199500E+00, 0.3220100E+00, 0.3398600E+00, 0.4206700E+00, &
     & 0.4166700E+00, 0.4343100E+00, 0.4050900E+00, 0.4050900E+00 /
      data (ref_adm(10,iz,10,11),iz = 1,20) / &
     & 0.2749100E+00, 0.2749100E+00, 0.2590700E+00, 0.2496400E+00, &
     & 0.2495900E+00, 0.2503800E+00, 0.2491100E+00, 0.2547700E+00, &
     & 0.2632200E+00, 0.2840200E+00, 0.2856700E+00, 0.2978900E+00, &
     & 0.3273400E+00, 0.3442500E+00, 0.3408200E+00, 0.4004900E+00, &
     & 0.4052300E+00, 0.4023000E+00, 0.3641800E+00, 0.3641800E+00 /
      data (ref_adm(10,iz,11,11),iz = 1,20) / &
     & 0.2557200E+00, 0.2557200E+00, 0.2515700E+00, 0.2484600E+00, &
     & 0.2537400E+00, 0.2499000E+00, 0.2696200E+00, 0.2575600E+00, &
     & 0.2511100E+00, 0.2656700E+00, 0.2820800E+00, 0.2896600E+00, &
     & 0.2979300E+00, 0.3197800E+00, 0.3220500E+00, 0.3585400E+00, &
     & 0.3889000E+00, 0.3811800E+00, 0.3460100E+00, 0.3460100E+00 /
      data (ref_adm(10,iz,12,11),iz = 1,20) / &
     & 0.2471600E+00, 0.2471600E+00, 0.2516700E+00, 0.2675600E+00, &
     & 0.2623300E+00, 0.2786800E+00, 0.2705700E+00, 0.2610000E+00, &
     & 0.2615100E+00, 0.2699300E+00, 0.2811600E+00, 0.2830200E+00, &
     & 0.2931200E+00, 0.2946300E+00, 0.3328600E+00, 0.3504300E+00, &
     & 0.3800700E+00, 0.3797600E+00, 0.3435500E+00, 0.3435500E+00 /
      data (ref_adm(10,iz,13,11),iz = 1,20) / &
     & 0.2637800E+00, 0.2637800E+00, 0.2657100E+00, 0.2584200E+00, &
     & 0.2645300E+00, 0.2631500E+00, 0.2612200E+00, 0.2570900E+00, &
     & 0.2698500E+00, 0.2706500E+00, 0.2749100E+00, 0.2634400E+00, &
     & 0.2859100E+00, 0.3160000E+00, 0.3361700E+00, 0.3499000E+00, &
     & 0.3655000E+00, 0.3526800E+00, 0.3368200E+00, 0.3368200E+00 /
      data (ref_adm(10,iz,14,11),iz = 1,20) / &
     & 0.2546500E+00, 0.2546500E+00, 0.2411600E+00, 0.2442000E+00, &
     & 0.2418200E+00, 0.2426000E+00, 0.2492200E+00, 0.2514400E+00, &
     & 0.2577600E+00, 0.2580300E+00, 0.2635300E+00, 0.2761100E+00, &
     & 0.2815800E+00, 0.2969000E+00, 0.3311500E+00, 0.3544400E+00, &
     & 0.3536300E+00, 0.3439200E+00, 0.3407800E+00, 0.3407800E+00 /
      data (ref_adm(10,iz,15,11),iz = 1,20) / &
     & 0.2598900E+00, 0.2598900E+00, 0.2567300E+00, 0.2610800E+00, &
     & 0.2590000E+00, 0.2595100E+00, 0.2542100E+00, 0.2583400E+00, &
     & 0.2621000E+00, 0.2649900E+00, 0.2644700E+00, 0.2661000E+00, &
     & 0.2648500E+00, 0.2725200E+00, 0.3126800E+00, 0.3090500E+00, &
     & 0.3533600E+00, 0.3186800E+00, 0.3154200E+00, 0.3154200E+00 /
      data (ref_adm(10,iz,16,11),iz = 1,20) / &
     & 0.2621800E+00, 0.2621800E+00, 0.2512400E+00, 0.2620400E+00, &
     & 0.2743700E+00, 0.2643000E+00, 0.2425100E+00, 0.2825000E+00, &
     & 0.2552100E+00, 0.2455400E+00, 0.2497700E+00, 0.2721700E+00, &
     & 0.2762600E+00, 0.2777100E+00, 0.2923700E+00, 0.3231800E+00, &
     & 0.3305200E+00, 0.3276800E+00, 0.3011500E+00, 0.3011500E+00 /
      data (ref_adm(10,iz,17,11),iz = 1,20) / &
     & 0.2533300E+00, 0.2533300E+00, 0.2540700E+00, 0.2697500E+00, &
     & 0.2567800E+00, 0.2708000E+00, 0.2577800E+00, 0.2704000E+00, &
     & 0.2729900E+00, 0.2753200E+00, 0.2671300E+00, 0.2682500E+00, &
     & 0.2694200E+00, 0.2644100E+00, 0.3012700E+00, 0.3027800E+00, &
     & 0.3090900E+00, 0.2949500E+00, 0.2423000E+00, 0.2423000E+00 /
      data (ref_adm(10,iz,18,11),iz = 1,20) / &
     & 0.2643500E+00, 0.2643500E+00, 0.2661300E+00, 0.2604100E+00, &
     & 0.2674300E+00, 0.2649800E+00, 0.2586800E+00, 0.2650500E+00, &
     & 0.2789400E+00, 0.2872200E+00, 0.2657700E+00, 0.2765500E+00, &
     & 0.2834000E+00, 0.2717500E+00, 0.2895600E+00, 0.3003600E+00, &
     & 0.3066800E+00, 0.3180600E+00, 0.3145357E+00, 0.3145357E+00 /
      data (ref_adm(10,iz,19,11),iz = 1,20) / &
     & 0.2570800E+00, 0.2570800E+00, 0.2611000E+00, 0.2649500E+00, &
     & 0.2647600E+00, 0.2615100E+00, 0.2666200E+00, 0.2686500E+00, &
     & 0.2681000E+00, 0.2740400E+00, 0.2735100E+00, 0.2668400E+00, &
     & 0.2774400E+00, 0.2737600E+00, 0.2812200E+00, 0.3112600E+00, &
     & 0.3615500E+00, 0.3239926E+00, 0.3103068E+00, 0.3103068E+00 /
      data (ref_adm(10,iz,20,11),iz = 1,20) / &
     & 0.2555900E+00, 0.2555900E+00, 0.2624400E+00, 0.2500300E+00, &
     & 0.2720800E+00, 0.2688800E+00, 0.2673800E+00, 0.2841100E+00, &
     & 0.2775200E+00, 0.2678000E+00, 0.2783600E+00, 0.2638900E+00, &
     & 0.2908500E+00, 0.2877800E+00, 0.2861700E+00, 0.3054000E+00, &
     & 0.3277400E+00, 0.3214373E+00, 0.3079014E+00, 0.3079014E+00 /
      data (ref_adm(10,iz,21,11),iz = 1,20) / &
     & 0.2652500E+00, 0.2652500E+00, 0.2622200E+00, 0.2593700E+00, &
     & 0.2791900E+00, 0.2630900E+00, 0.2501400E+00, 0.2680200E+00, &
     & 0.2613400E+00, 0.2864600E+00, 0.2806000E+00, 0.2728000E+00, &
     & 0.2859500E+00, 0.2779600E+00, 0.2910800E+00, 0.3393800E+00, &
     & 0.3139699E+00, 0.3193824E+00, 0.3062017E+00, 0.3062017E+00 /
      data (ref_adm(10,iz,22,11),iz = 1,20) / &
     & 0.2548700E+00, 0.2548700E+00, 0.2585000E+00, 0.2592000E+00, &
     & 0.2666300E+00, 0.2559700E+00, 0.2737300E+00, 0.2661000E+00, &
     & 0.2850700E+00, 0.2828300E+00, 0.2852500E+00, 0.2888100E+00, &
     & 0.2767500E+00, 0.3026600E+00, 0.2964000E+00, 0.3264800E+00, &
     & 0.3705343E+00, 0.3627868E+00, 0.3264738E+00, 0.3264738E+00 /
      data (ref_adm(10,iz,23,11),iz = 1,20) / &
     & 0.2624500E+00, 0.2624500E+00, 0.2755800E+00, 0.2764700E+00, &
     & 0.2741500E+00, 0.2842900E+00, 0.2816100E+00, 0.2785000E+00, &
     & 0.2841400E+00, 0.2913000E+00, 0.2754600E+00, 0.2989900E+00, &
     & 0.2983100E+00, 0.3042000E+00, 0.3108000E+00, 0.3279400E+00, &
     & 0.4563100E+00, 0.3553751E+00, 0.3237922E+00, 0.3237922E+00 /
      data (ref_adm(10,iz,24,11),iz = 1,20) / &
     & 0.2645200E+00, 0.2645200E+00, 0.2607800E+00, 0.2536500E+00, &
     & 0.2635200E+00, 0.2665500E+00, 0.2723400E+00, 0.2782200E+00, &
     & 0.2756900E+00, 0.2931600E+00, 0.2837900E+00, 0.3072700E+00, &
     & 0.3075200E+00, 0.3095100E+00, 0.3285100E+00, 0.3276900E+00, &
     & 0.3358600E+00, 0.3494509E+00, 0.3216338E+00, 0.3216338E+00 /
      data (ref_adm(10,iz,25,11),iz = 1,20) / &
     & 0.2597800E+00, 0.2597800E+00, 0.2659300E+00, 0.2641500E+00, &
     & 0.2677800E+00, 0.2748600E+00, 0.2809000E+00, 0.2841700E+00, &
     & 0.2872500E+00, 0.2914200E+00, 0.2814300E+00, 0.3049200E+00, &
     & 0.3097900E+00, 0.3015300E+00, 0.3255100E+00, 0.3212400E+00, &
     & 0.3195800E+00, 0.3529900E+00, 0.3207284E+00, 0.3207284E+00 /
      data (ref_adm(10,iz,26,11),iz = 1,20) / &
     & 0.2527500E+00, 0.2527500E+00, 0.2527300E+00, 0.2568900E+00, &
     & 0.2591900E+00, 0.2673400E+00, 0.2717800E+00, 0.2764200E+00, &
     & 0.2879100E+00, 0.2976000E+00, 0.2959500E+00, 0.3059400E+00, &
     & 0.3104700E+00, 0.3059000E+00, 0.3390000E+00, 0.3397200E+00, &
     & 0.3282600E+00, 0.3263300E+00, 0.3263100E+00, 0.3263100E+00 /
      data (ref_adm(10,iz,27,11),iz = 1,20) / &
     & 0.2609900E+00, 0.2609900E+00, 0.2686700E+00, 0.2787300E+00, &
     & 0.2836800E+00, 0.2899300E+00, 0.3004600E+00, 0.3067500E+00, &
     & 0.3174400E+00, 0.3056800E+00, 0.3048900E+00, 0.3153200E+00, &
     & 0.3191100E+00, 0.3249800E+00, 0.3417600E+00, 0.3542100E+00, &
     & 0.3513600E+00, 0.3490700E+00, 0.3125400E+00, 0.3125400E+00 /
      data (ref_adm(10,iz,28,11),iz = 1,20) / &
     & 0.2612900E+00, 0.2612900E+00, 0.2793200E+00, 0.2506100E+00, &
     & 0.2607400E+00, 0.2989300E+00, 0.2918800E+00, 0.3005100E+00, &
     & 0.3176600E+00, 0.3188000E+00, 0.3311400E+00, 0.3363900E+00, &
     & 0.3408300E+00, 0.3520900E+00, 0.3417600E+00, 0.3585100E+00, &
     & 0.3608900E+00, 0.3580400E+00, 0.3223400E+00, 0.3223400E+00 /
      data (ref_adm(10,iz,29,11),iz = 1,20) / &
     & 0.2673600E+00, 0.2673600E+00, 0.2738800E+00, 0.2851700E+00, &
     & 0.2778700E+00, 0.2763100E+00, 0.2885000E+00, 0.3032600E+00, &
     & 0.3188500E+00, 0.3405900E+00, 0.3251600E+00, 0.3416200E+00, &
     & 0.3455700E+00, 0.3547700E+00, 0.3458200E+00, 0.3743600E+00, &
     & 0.3713800E+00, 0.3547000E+00, 0.3293400E+00, 0.3293400E+00 /
      data (ref_adm(10,iz,30,11),iz = 1,20) / &
     & 0.2643400E+00, 0.2643400E+00, 0.2681200E+00, 0.2814300E+00, &
     & 0.2832200E+00, 0.2922600E+00, 0.2884700E+00, 0.2855800E+00, &
     & 0.3061100E+00, 0.3270400E+00, 0.3294400E+00, 0.3445200E+00, &
     & 0.3396100E+00, 0.3433100E+00, 0.3682600E+00, 0.3971200E+00, &
     & 0.3847500E+00, 0.3621100E+00, 0.3035100E+00, 0.3035100E+00 /
      data (ref_adm(10,iz,31,11),iz = 1,20) / &
     & 0.2626700E+00, 0.2626700E+00, 0.2753300E+00, 0.2743800E+00, &
     & 0.2803800E+00, 0.2936400E+00, 0.2816700E+00, 0.2900800E+00, &
     & 0.2965900E+00, 0.3152200E+00, 0.3235500E+00, 0.3301100E+00, &
     & 0.3520400E+00, 0.3626800E+00, 0.3541900E+00, 0.3723100E+00, &
     & 0.3809200E+00, 0.3671800E+00, 0.2939300E+00, 0.2939300E+00 /
      data (ref_adm(10,iz,32,11),iz = 1,20) / &
     & 0.2601800E+00, 0.2601800E+00, 0.2702400E+00, 0.2705000E+00, &
     & 0.2853800E+00, 0.2852700E+00, 0.2945900E+00, 0.2928800E+00, &
     & 0.2994500E+00, 0.3190100E+00, 0.3355400E+00, 0.3477400E+00, &
     & 0.3579200E+00, 0.3609700E+00, 0.3661800E+00, 0.3869600E+00, &
     & 0.3846800E+00, 0.3792600E+00, 0.3065400E+00, 0.3065400E+00 /
      data (ref_adm(10,iz,33,11),iz = 1,20) / &
     & 0.2679000E+00, 0.2679000E+00, 0.2690500E+00, 0.2845800E+00, &
     & 0.2835300E+00, 0.2777800E+00, 0.2890800E+00, 0.2972800E+00, &
     & 0.3128700E+00, 0.3218800E+00, 0.3361100E+00, 0.3520200E+00, &
     & 0.3696100E+00, 0.3678700E+00, 0.3794800E+00, 0.3831600E+00, &
     & 0.3823600E+00, 0.3718000E+00, 0.3062400E+00, 0.3062400E+00 /
      data (ref_adm(10,iz,34,11),iz = 1,20) / &
     & 0.2607600E+00, 0.2607600E+00, 0.2729300E+00, 0.2754000E+00, &
     & 0.3070100E+00, 0.2906400E+00, 0.2999500E+00, 0.3304100E+00, &
     & 0.3361000E+00, 0.3296400E+00, 0.3635000E+00, 0.3581700E+00, &
     & 0.3665600E+00, 0.3807900E+00, 0.3797200E+00, 0.4084400E+00, &
     & 0.3807000E+00, 0.3728600E+00, 0.3111500E+00, 0.3111500E+00 /
      data (ref_adm(10,iz,35,11),iz = 1,20) / &
     & 0.2575300E+00, 0.2575300E+00, 0.2663500E+00, 0.2825700E+00, &
     & 0.2743600E+00, 0.2931500E+00, 0.3031000E+00, 0.3280700E+00, &
     & 0.3202000E+00, 0.3407600E+00, 0.3582000E+00, 0.3727700E+00, &
     & 0.3827100E+00, 0.3832600E+00, 0.3849400E+00, 0.3949800E+00, &
     & 0.3950800E+00, 0.3704900E+00, 0.2886900E+00, 0.2886900E+00 /
      data (ref_adm(10,iz,36,11),iz = 1,20) / &
     & 0.2574400E+00, 0.2574400E+00, 0.2691200E+00, 0.2850400E+00, &
     & 0.2848400E+00, 0.2786700E+00, 0.3084900E+00, 0.3171600E+00, &
     & 0.3266000E+00, 0.3350300E+00, 0.3664300E+00, 0.3918100E+00, &
     & 0.3844700E+00, 0.3876000E+00, 0.3945900E+00, 0.3885500E+00, &
     & 0.3897500E+00, 0.3824200E+00, 0.3149700E+00, 0.3149700E+00 /
      data (ref_adm(10,iz,37,11),iz = 1,20) / &
     & 0.2590600E+00, 0.2590600E+00, 0.2498200E+00, 0.2864000E+00, &
     & 0.2992100E+00, 0.3016100E+00, 0.2857000E+00, 0.3014500E+00, &
     & 0.3368800E+00, 0.3430700E+00, 0.3768800E+00, 0.4152300E+00, &
     & 0.4138200E+00, 0.3993100E+00, 0.3899500E+00, 0.4006600E+00, &
     & 0.3790500E+00, 0.4013700E+00, 0.3538763E+00, 0.3538763E+00 /
      data (ref_adm(10,iz,38,11),iz = 1,20) / &
     & 0.2590600E+00, 0.2590600E+00, 0.2498200E+00, 0.2864000E+00, &
     & 0.2992100E+00, 0.3016100E+00, 0.2857000E+00, 0.3014500E+00, &
     & 0.3368800E+00, 0.3430700E+00, 0.3768800E+00, 0.4152300E+00, &
     & 0.4138200E+00, 0.3993100E+00, 0.3899500E+00, 0.4006600E+00, &
     & 0.3790500E+00, 0.4013700E+00, 0.3538763E+00, 0.3538763E+00 /
! Solar Zenith Angle 55.0 Albedo  0.3137549E+00
      data (ref_adm(10,iz, 1,12),iz = 1,20) / &
     & 0.2520500E+00, 0.2520500E+00, 0.2688100E+00, 0.2554200E+00, &
     & 0.2586200E+00, 0.2532600E+00, 0.2605900E+00, 0.2678800E+00, &
     & 0.2817200E+00, 0.3039200E+00, 0.3271300E+00, 0.3549600E+00, &
     & 0.4197100E+00, 0.4188800E+00, 0.4683600E+00, 0.5159600E+00, &
     & 0.5955000E+00, 0.6338200E+00, 0.6812700E+00, 0.6812700E+00 /
      data (ref_adm(10,iz, 2,12),iz = 1,20) / &
     & 0.2520500E+00, 0.2520500E+00, 0.2688100E+00, 0.2554200E+00, &
     & 0.2586200E+00, 0.2532600E+00, 0.2605900E+00, 0.2678800E+00, &
     & 0.2817200E+00, 0.3039200E+00, 0.3271300E+00, 0.3549600E+00, &
     & 0.4197100E+00, 0.4188800E+00, 0.4683600E+00, 0.5159600E+00, &
     & 0.5955000E+00, 0.6338200E+00, 0.6812700E+00, 0.6812700E+00 /
      data (ref_adm(10,iz, 3,12),iz = 1,20) / &
     & 0.2570700E+00, 0.2570700E+00, 0.2529900E+00, 0.2558600E+00, &
     & 0.2622800E+00, 0.2572100E+00, 0.2629900E+00, 0.2716100E+00, &
     & 0.2884600E+00, 0.2924600E+00, 0.3221300E+00, 0.3646800E+00, &
     & 0.3742500E+00, 0.3987000E+00, 0.4403000E+00, 0.5076300E+00, &
     & 0.5669800E+00, 0.6458600E+00, 0.6214300E+00, 0.6214300E+00 /
      data (ref_adm(10,iz, 4,12),iz = 1,20) / &
     & 0.2491100E+00, 0.2491100E+00, 0.2503900E+00, 0.2477300E+00, &
     & 0.2493200E+00, 0.2558800E+00, 0.2549000E+00, 0.2674800E+00, &
     & 0.2794900E+00, 0.2837700E+00, 0.3092000E+00, 0.3208600E+00, &
     & 0.3644200E+00, 0.3886000E+00, 0.4390900E+00, 0.5003500E+00, &
     & 0.5781200E+00, 0.6520500E+00, 0.6086700E+00, 0.6086700E+00 /
      data (ref_adm(10,iz, 5,12),iz = 1,20) / &
     & 0.2478400E+00, 0.2478400E+00, 0.2546700E+00, 0.2532300E+00, &
     & 0.2417800E+00, 0.2478700E+00, 0.2626600E+00, 0.2727100E+00, &
     & 0.2644900E+00, 0.2826600E+00, 0.3020700E+00, 0.3181500E+00, &
     & 0.3460000E+00, 0.3926900E+00, 0.4266700E+00, 0.4689300E+00, &
     & 0.5617400E+00, 0.6246000E+00, 0.5727500E+00, 0.5727500E+00 /
      data (ref_adm(10,iz, 6,12),iz = 1,20) / &
     & 0.2717100E+00, 0.2717100E+00, 0.2595200E+00, 0.2529500E+00, &
     & 0.2511300E+00, 0.2537500E+00, 0.2686100E+00, 0.2716400E+00, &
     & 0.2804600E+00, 0.2900500E+00, 0.3034600E+00, 0.3357400E+00, &
     & 0.3575200E+00, 0.3914200E+00, 0.4418300E+00, 0.4960600E+00, &
     & 0.5654400E+00, 0.5890600E+00, 0.5257600E+00, 0.5257600E+00 /
      data (ref_adm(10,iz, 7,12),iz = 1,20) / &
     & 0.2567800E+00, 0.2567800E+00, 0.2566700E+00, 0.2582000E+00, &
     & 0.2562400E+00, 0.2578000E+00, 0.2498300E+00, 0.2640400E+00, &
     & 0.2766600E+00, 0.2804400E+00, 0.2990400E+00, 0.3186800E+00, &
     & 0.3435200E+00, 0.3923800E+00, 0.4176600E+00, 0.4557200E+00, &
     & 0.5102400E+00, 0.5557900E+00, 0.5063000E+00, 0.5063000E+00 /
      data (ref_adm(10,iz, 8,12),iz = 1,20) / &
     & 0.2584500E+00, 0.2584500E+00, 0.2703800E+00, 0.2518900E+00, &
     & 0.2567400E+00, 0.2672700E+00, 0.2658300E+00, 0.2712800E+00, &
     & 0.2788900E+00, 0.2841100E+00, 0.2997900E+00, 0.3091500E+00, &
     & 0.3300500E+00, 0.3511100E+00, 0.3773400E+00, 0.4285900E+00, &
     & 0.4874500E+00, 0.5116700E+00, 0.4797700E+00, 0.4797700E+00 /
      data (ref_adm(10,iz, 9,12),iz = 1,20) / &
     & 0.2524900E+00, 0.2524900E+00, 0.2561700E+00, 0.2544500E+00, &
     & 0.2471900E+00, 0.2499300E+00, 0.2561700E+00, 0.2630100E+00, &
     & 0.2605600E+00, 0.2705700E+00, 0.2869600E+00, 0.3000000E+00, &
     & 0.3113000E+00, 0.3327600E+00, 0.3711800E+00, 0.4236200E+00, &
     & 0.4809900E+00, 0.4939400E+00, 0.4349300E+00, 0.4349300E+00 /
      data (ref_adm(10,iz,10,12),iz = 1,20) / &
     & 0.2601900E+00, 0.2601900E+00, 0.2651600E+00, 0.2500200E+00, &
     & 0.2469300E+00, 0.2506600E+00, 0.2543000E+00, 0.2570900E+00, &
     & 0.2624500E+00, 0.2693000E+00, 0.2805600E+00, 0.2767900E+00, &
     & 0.3144500E+00, 0.3345000E+00, 0.3677200E+00, 0.4146200E+00, &
     & 0.4474600E+00, 0.4431600E+00, 0.4257300E+00, 0.4257300E+00 /
      data (ref_adm(10,iz,11,12),iz = 1,20) / &
     & 0.2506500E+00, 0.2506500E+00, 0.2581800E+00, 0.2518800E+00, &
     & 0.2477400E+00, 0.2551400E+00, 0.2423400E+00, 0.2707400E+00, &
     & 0.2521900E+00, 0.2703100E+00, 0.2792400E+00, 0.2867900E+00, &
     & 0.3168600E+00, 0.3192300E+00, 0.3575200E+00, 0.3731300E+00, &
     & 0.4140700E+00, 0.4134800E+00, 0.3790300E+00, 0.3790300E+00 /
      data (ref_adm(10,iz,12,12),iz = 1,20) / &
     & 0.2599400E+00, 0.2599400E+00, 0.2567200E+00, 0.2582800E+00, &
     & 0.2492000E+00, 0.2528600E+00, 0.2581300E+00, 0.2539400E+00, &
     & 0.2487700E+00, 0.2678300E+00, 0.2757400E+00, 0.2895300E+00, &
     & 0.2922700E+00, 0.3156200E+00, 0.3378400E+00, 0.3684700E+00, &
     & 0.3852400E+00, 0.3953300E+00, 0.3653400E+00, 0.3653400E+00 /
      data (ref_adm(10,iz,13,12),iz = 1,20) / &
     & 0.2536300E+00, 0.2536300E+00, 0.2584400E+00, 0.2527600E+00, &
     & 0.2600600E+00, 0.2547600E+00, 0.2621100E+00, 0.2640300E+00, &
     & 0.2675700E+00, 0.2734500E+00, 0.2734500E+00, 0.2761400E+00, &
     & 0.3111500E+00, 0.3272500E+00, 0.3329400E+00, 0.3471500E+00, &
     & 0.3781000E+00, 0.3711200E+00, 0.3316700E+00, 0.3316700E+00 /
      data (ref_adm(10,iz,14,12),iz = 1,20) / &
     & 0.2583100E+00, 0.2583100E+00, 0.2535500E+00, 0.2490200E+00, &
     & 0.2564100E+00, 0.2559400E+00, 0.2558100E+00, 0.2560500E+00, &
     & 0.2631700E+00, 0.2633400E+00, 0.2716800E+00, 0.2845100E+00, &
     & 0.2887900E+00, 0.3059300E+00, 0.3287700E+00, 0.3405600E+00, &
     & 0.3458900E+00, 0.3521800E+00, 0.3196000E+00, 0.3196000E+00 /
      data (ref_adm(10,iz,15,12),iz = 1,20) / &
     & 0.2533800E+00, 0.2533800E+00, 0.2536600E+00, 0.2506000E+00, &
     & 0.2542100E+00, 0.2560700E+00, 0.2571200E+00, 0.2593600E+00, &
     & 0.2650600E+00, 0.2649600E+00, 0.2660300E+00, 0.2758000E+00, &
     & 0.2920000E+00, 0.2927700E+00, 0.3063100E+00, 0.3203700E+00, &
     & 0.3451600E+00, 0.3495700E+00, 0.3379700E+00, 0.3379700E+00 /
      data (ref_adm(10,iz,16,12),iz = 1,20) / &
     & 0.2572000E+00, 0.2572000E+00, 0.2498400E+00, 0.2541100E+00, &
     & 0.2630000E+00, 0.2606200E+00, 0.2615300E+00, 0.2603200E+00, &
     & 0.2664200E+00, 0.2632800E+00, 0.2650800E+00, 0.2694400E+00, &
     & 0.2843500E+00, 0.2897700E+00, 0.3180300E+00, 0.3187200E+00, &
     & 0.3217100E+00, 0.3352600E+00, 0.3448099E+00, 0.3448099E+00 /
      data (ref_adm(10,iz,17,12),iz = 1,20) / &
     & 0.2498900E+00, 0.2498900E+00, 0.2533400E+00, 0.2576100E+00, &
     & 0.2473600E+00, 0.2597900E+00, 0.2665500E+00, 0.2742500E+00, &
     & 0.2745700E+00, 0.2775700E+00, 0.2690700E+00, 0.2907300E+00, &
     & 0.2983500E+00, 0.2947700E+00, 0.3192400E+00, 0.3166500E+00, &
     & 0.3419100E+00, 0.3219500E+00, 0.3363624E+00, 0.3363624E+00 /
      data (ref_adm(10,iz,18,12),iz = 1,20) / &
     & 0.2594100E+00, 0.2594100E+00, 0.2662000E+00, 0.2660400E+00, &
     & 0.2551700E+00, 0.2715900E+00, 0.2832700E+00, 0.2647300E+00, &
     & 0.2603800E+00, 0.2694900E+00, 0.2777300E+00, 0.2813700E+00, &
     & 0.2847000E+00, 0.2968200E+00, 0.3095300E+00, 0.3228100E+00, &
     & 0.3601000E+00, 0.3690100E+00, 0.3377181E+00, 0.3377181E+00 /
      data (ref_adm(10,iz,19,12),iz = 1,20) / &
     & 0.2635800E+00, 0.2635800E+00, 0.2591500E+00, 0.2652200E+00, &
     & 0.2600000E+00, 0.2566200E+00, 0.2656600E+00, 0.2687000E+00, &
     & 0.2699300E+00, 0.2681200E+00, 0.2746200E+00, 0.2779800E+00, &
     & 0.2948700E+00, 0.2922200E+00, 0.2912800E+00, 0.3099900E+00, &
     & 0.3572400E+00, 0.3432005E+00, 0.3325306E+00, 0.3325306E+00 /
      data (ref_adm(10,iz,20,12),iz = 1,20) / &
     & 0.2618900E+00, 0.2618900E+00, 0.2595500E+00, 0.2582700E+00, &
     & 0.2482300E+00, 0.2530700E+00, 0.2565500E+00, 0.2642000E+00, &
     & 0.2662200E+00, 0.2592600E+00, 0.2718100E+00, 0.2767900E+00, &
     & 0.2926500E+00, 0.3070300E+00, 0.3036700E+00, 0.3293500E+00, &
     & 0.3304324E+00, 0.3403624E+00, 0.3295079E+00, 0.3295079E+00 /
      data (ref_adm(10,iz,21,12),iz = 1,20) / &
     & 0.2490000E+00, 0.2490000E+00, 0.2533300E+00, 0.2376100E+00, &
     & 0.2620100E+00, 0.2536400E+00, 0.2785100E+00, 0.2844200E+00, &
     & 0.2824400E+00, 0.2719400E+00, 0.2853100E+00, 0.2860300E+00, &
     & 0.2938300E+00, 0.3120400E+00, 0.3100400E+00, 0.3074100E+00, &
     & 0.3291555E+00, 0.3380020E+00, 0.3275376E+00, 0.3275376E+00 /
      data (ref_adm(10,iz,22,12),iz = 1,20) / &
     & 0.2595500E+00, 0.2595500E+00, 0.2603500E+00, 0.2618200E+00, &
     & 0.2688400E+00, 0.2747700E+00, 0.2677200E+00, 0.2903200E+00, &
     & 0.2723400E+00, 0.2791700E+00, 0.2842000E+00, 0.2913700E+00, &
     & 0.3020200E+00, 0.3151900E+00, 0.3103900E+00, 0.3467700E+00, &
     & 0.3889426E+00, 0.3829915E+00, 0.3473941E+00, 0.3473941E+00 /
      data (ref_adm(10,iz,23,12),iz = 1,20) / &
     & 0.2562900E+00, 0.2562900E+00, 0.2592200E+00, 0.2606800E+00, &
     & 0.2580500E+00, 0.2648700E+00, 0.2595800E+00, 0.2778700E+00, &
     & 0.2847000E+00, 0.2929000E+00, 0.2878700E+00, 0.2929200E+00, &
     & 0.2991900E+00, 0.3164800E+00, 0.3235600E+00, 0.3577500E+00, &
     & 0.3559000E+00, 0.3743494E+00, 0.3444213E+00, 0.3444213E+00 /
      data (ref_adm(10,iz,24,12),iz = 1,20) / &
     & 0.2476500E+00, 0.2476500E+00, 0.2446500E+00, 0.2594100E+00, &
     & 0.2555400E+00, 0.2575200E+00, 0.2658600E+00, 0.2659500E+00, &
     & 0.2951900E+00, 0.3097600E+00, 0.3029200E+00, 0.3040800E+00, &
     & 0.3135400E+00, 0.3191100E+00, 0.3221900E+00, 0.3301200E+00, &
     & 0.3596600E+00, 0.3678135E+00, 0.3423515E+00, 0.3423515E+00 /
      data (ref_adm(10,iz,25,12),iz = 1,20) / &
     & 0.2583400E+00, 0.2583400E+00, 0.2563400E+00, 0.2561400E+00, &
     & 0.2610500E+00, 0.2656100E+00, 0.2682400E+00, 0.2767800E+00, &
     & 0.2801500E+00, 0.2911400E+00, 0.2986400E+00, 0.3087300E+00, &
     & 0.3149700E+00, 0.3242000E+00, 0.3301800E+00, 0.3434100E+00, &
     & 0.3633000E+00, 0.3299700E+00, 0.3417809E+00, 0.3417809E+00 /
      data (ref_adm(10,iz,26,12),iz = 1,20) / &
     & 0.2534500E+00, 0.2534500E+00, 0.2617100E+00, 0.2679400E+00, &
     & 0.2665500E+00, 0.2706900E+00, 0.2697500E+00, 0.2817600E+00, &
     & 0.2821400E+00, 0.2909900E+00, 0.2918100E+00, 0.2976700E+00, &
     & 0.3058700E+00, 0.3161700E+00, 0.3266300E+00, 0.3266700E+00, &
     & 0.3549700E+00, 0.3500300E+00, 0.3420843E+00, 0.3420843E+00 /
      data (ref_adm(10,iz,27,12),iz = 1,20) / &
     & 0.2559600E+00, 0.2559600E+00, 0.2714900E+00, 0.2630400E+00, &
     & 0.2725300E+00, 0.2715300E+00, 0.2806900E+00, 0.2974900E+00, &
     & 0.2968900E+00, 0.3113500E+00, 0.3129700E+00, 0.3203600E+00, &
     & 0.3293300E+00, 0.3273400E+00, 0.3375400E+00, 0.3567200E+00, &
     & 0.3622900E+00, 0.3572300E+00, 0.3207700E+00, 0.3207700E+00 /
      data (ref_adm(10,iz,28,12),iz = 1,20) / &
     & 0.2559700E+00, 0.2559700E+00, 0.2526100E+00, 0.2656000E+00, &
     & 0.2712500E+00, 0.2831600E+00, 0.2751200E+00, 0.2919900E+00, &
     & 0.3127100E+00, 0.3207100E+00, 0.3219400E+00, 0.3386200E+00, &
     & 0.3529000E+00, 0.3501300E+00, 0.3694000E+00, 0.3769200E+00, &
     & 0.3740100E+00, 0.3763100E+00, 0.3178600E+00, 0.3178600E+00 /
      data (ref_adm(10,iz,29,12),iz = 1,20) / &
     & 0.2549600E+00, 0.2549600E+00, 0.2649200E+00, 0.2648500E+00, &
     & 0.2825300E+00, 0.2945800E+00, 0.2976900E+00, 0.2945900E+00, &
     & 0.2963700E+00, 0.3175700E+00, 0.3230900E+00, 0.3189900E+00, &
     & 0.3511400E+00, 0.3565900E+00, 0.3800700E+00, 0.3913000E+00, &
     & 0.3925100E+00, 0.3801300E+00, 0.3276100E+00, 0.3276100E+00 /
      data (ref_adm(10,iz,30,12),iz = 1,20) / &
     & 0.2581700E+00, 0.2581700E+00, 0.2598500E+00, 0.2671400E+00, &
     & 0.2823500E+00, 0.2837700E+00, 0.2874300E+00, 0.3048000E+00, &
     & 0.3027300E+00, 0.3215600E+00, 0.3303300E+00, 0.3403400E+00, &
     & 0.3515800E+00, 0.3719000E+00, 0.3840600E+00, 0.3948100E+00, &
     & 0.4043500E+00, 0.3905800E+00, 0.3386500E+00, 0.3386500E+00 /
      data (ref_adm(10,iz,31,12),iz = 1,20) / &
     & 0.2762300E+00, 0.2762300E+00, 0.2813900E+00, 0.2886600E+00, &
     & 0.2784100E+00, 0.2974700E+00, 0.3053800E+00, 0.3136800E+00, &
     & 0.3312600E+00, 0.3444800E+00, 0.3516500E+00, 0.3466400E+00, &
     & 0.3646400E+00, 0.3835900E+00, 0.4000800E+00, 0.4134800E+00, &
     & 0.4139600E+00, 0.4043700E+00, 0.3426400E+00, 0.3426400E+00 /
      data (ref_adm(10,iz,32,12),iz = 1,20) / &
     & 0.2629200E+00, 0.2629200E+00, 0.2612300E+00, 0.2654600E+00, &
     & 0.2873700E+00, 0.2940200E+00, 0.2998900E+00, 0.3131500E+00, &
     & 0.3209100E+00, 0.3344000E+00, 0.3537500E+00, 0.3648000E+00, &
     & 0.3851700E+00, 0.3825200E+00, 0.3934900E+00, 0.4111700E+00, &
     & 0.4119200E+00, 0.4044400E+00, 0.3500600E+00, 0.3500600E+00 /
      data (ref_adm(10,iz,33,12),iz = 1,20) / &
     & 0.2605000E+00, 0.2605000E+00, 0.2682700E+00, 0.2772700E+00, &
     & 0.2926200E+00, 0.2936900E+00, 0.3063900E+00, 0.3181300E+00, &
     & 0.3247300E+00, 0.3359300E+00, 0.3547800E+00, 0.3745300E+00, &
     & 0.3891100E+00, 0.3971600E+00, 0.4127700E+00, 0.4314600E+00, &
     & 0.4424000E+00, 0.4198400E+00, 0.3484000E+00, 0.3484000E+00 /
      data (ref_adm(10,iz,34,12),iz = 1,20) / &
     & 0.2513300E+00, 0.2513300E+00, 0.2641800E+00, 0.2868600E+00, &
     & 0.2927700E+00, 0.2986700E+00, 0.3018300E+00, 0.3137500E+00, &
     & 0.3248100E+00, 0.3499000E+00, 0.3614200E+00, 0.3666400E+00, &
     & 0.3866600E+00, 0.4045700E+00, 0.4223200E+00, 0.4171200E+00, &
     & 0.4184900E+00, 0.4160100E+00, 0.3489600E+00, 0.3489600E+00 /
      data (ref_adm(10,iz,35,12),iz = 1,20) / &
     & 0.2588900E+00, 0.2588900E+00, 0.2633100E+00, 0.2708600E+00, &
     & 0.2873000E+00, 0.3018000E+00, 0.3098300E+00, 0.3115100E+00, &
     & 0.3183000E+00, 0.3433200E+00, 0.3602100E+00, 0.3791800E+00, &
     & 0.4039400E+00, 0.4166100E+00, 0.4283200E+00, 0.4343600E+00, &
     & 0.4288300E+00, 0.4113500E+00, 0.3492100E+00, 0.3492100E+00 /
      data (ref_adm(10,iz,36,12),iz = 1,20) / &
     & 0.2574200E+00, 0.2574200E+00, 0.2611900E+00, 0.2805500E+00, &
     & 0.3022100E+00, 0.3039700E+00, 0.3020500E+00, 0.3127100E+00, &
     & 0.3283800E+00, 0.3430100E+00, 0.3629800E+00, 0.3911600E+00, &
     & 0.4173600E+00, 0.4295900E+00, 0.4241400E+00, 0.4333200E+00, &
     & 0.4383100E+00, 0.4221100E+00, 0.3673700E+00, 0.3673700E+00 /
      data (ref_adm(10,iz,37,12),iz = 1,20) / &
     & 0.2617900E+00, 0.2617900E+00, 0.2667200E+00, 0.2754300E+00, &
     & 0.2972400E+00, 0.3063100E+00, 0.3093200E+00, 0.3254300E+00, &
     & 0.3293000E+00, 0.3364500E+00, 0.3703100E+00, 0.4062200E+00, &
     & 0.4474700E+00, 0.4385900E+00, 0.4357600E+00, 0.4459600E+00, &
     & 0.4375000E+00, 0.4386500E+00, 0.3812800E+00, 0.3812800E+00 /
      data (ref_adm(10,iz,38,12),iz = 1,20) / &
     & 0.2617900E+00, 0.2617900E+00, 0.2667200E+00, 0.2754300E+00, &
     & 0.2972400E+00, 0.3063100E+00, 0.3093200E+00, 0.3254300E+00, &
     & 0.3293000E+00, 0.3364500E+00, 0.3703100E+00, 0.4062200E+00, &
     & 0.4474700E+00, 0.4385900E+00, 0.4357600E+00, 0.4459600E+00, &
     & 0.4375000E+00, 0.4386500E+00, 0.3812800E+00, 0.3812800E+00 /
! Solar Zenith Angle 60.0 Albedo  0.3288309E+00
      data (ref_adm(10,iz, 1,13),iz = 1,20) / &
     & 0.2513000E+00, 0.2513000E+00, 0.2622400E+00, 0.2562500E+00, &
     & 0.2499500E+00, 0.2512600E+00, 0.2717300E+00, 0.2896500E+00, &
     & 0.3124100E+00, 0.3325300E+00, 0.3484800E+00, 0.3989400E+00, &
     & 0.4562800E+00, 0.5397800E+00, 0.5876200E+00, 0.6742200E+00, &
     & 0.7762000E+00, 0.8647200E+00, 0.7674000E+00, 0.7674000E+00 /
      data (ref_adm(10,iz, 2,13),iz = 1,20) / &
     & 0.2513000E+00, 0.2513000E+00, 0.2622400E+00, 0.2562500E+00, &
     & 0.2499500E+00, 0.2512600E+00, 0.2717300E+00, 0.2896500E+00, &
     & 0.3124100E+00, 0.3325300E+00, 0.3484800E+00, 0.3989400E+00, &
     & 0.4562800E+00, 0.5397800E+00, 0.5876200E+00, 0.6742200E+00, &
     & 0.7762000E+00, 0.8647200E+00, 0.7674000E+00, 0.7674000E+00 /
      data (ref_adm(10,iz, 3,13),iz = 1,20) / &
     & 0.2508400E+00, 0.2508400E+00, 0.2506700E+00, 0.2575900E+00, &
     & 0.2557500E+00, 0.2742000E+00, 0.2751300E+00, 0.2846700E+00, &
     & 0.3036800E+00, 0.3236300E+00, 0.3391500E+00, 0.3983900E+00, &
     & 0.4275500E+00, 0.4857100E+00, 0.5486800E+00, 0.6302700E+00, &
     & 0.7249700E+00, 0.8343400E+00, 0.7921500E+00, 0.7921500E+00 /
      data (ref_adm(10,iz, 4,13),iz = 1,20) / &
     & 0.2527800E+00, 0.2527800E+00, 0.2464600E+00, 0.2638200E+00, &
     & 0.2620400E+00, 0.2775800E+00, 0.2679000E+00, 0.2840300E+00, &
     & 0.2961300E+00, 0.3192900E+00, 0.3301300E+00, 0.3725600E+00, &
     & 0.4282400E+00, 0.4790800E+00, 0.5321800E+00, 0.5952700E+00, &
     & 0.7124300E+00, 0.8073700E+00, 0.7523800E+00, 0.7523800E+00 /
      data (ref_adm(10,iz, 5,13),iz = 1,20) / &
     & 0.2671800E+00, 0.2671800E+00, 0.2543400E+00, 0.2634900E+00, &
     & 0.2549900E+00, 0.2664000E+00, 0.2721000E+00, 0.2775200E+00, &
     & 0.2898900E+00, 0.3146500E+00, 0.3354000E+00, 0.3603100E+00, &
     & 0.4109700E+00, 0.4579100E+00, 0.4949900E+00, 0.5936200E+00, &
     & 0.7031400E+00, 0.7744200E+00, 0.7063700E+00, 0.7063700E+00 /
      data (ref_adm(10,iz, 6,13),iz = 1,20) / &
     & 0.2492200E+00, 0.2492200E+00, 0.2479500E+00, 0.2474800E+00, &
     & 0.2474100E+00, 0.2560600E+00, 0.2724200E+00, 0.2814500E+00, &
     & 0.2913900E+00, 0.3109700E+00, 0.3344300E+00, 0.3723200E+00, &
     & 0.4156700E+00, 0.4765600E+00, 0.5343100E+00, 0.6097400E+00, &
     & 0.7049100E+00, 0.7500600E+00, 0.6829700E+00, 0.6829700E+00 /
      data (ref_adm(10,iz, 7,13),iz = 1,20) / &
     & 0.2494000E+00, 0.2494000E+00, 0.2565900E+00, 0.2514900E+00, &
     & 0.2543000E+00, 0.2617900E+00, 0.2853500E+00, 0.2881500E+00, &
     & 0.2979600E+00, 0.3068300E+00, 0.3175700E+00, 0.3442500E+00, &
     & 0.3696200E+00, 0.4343300E+00, 0.4699600E+00, 0.5417200E+00, &
     & 0.6336600E+00, 0.6927500E+00, 0.6545300E+00, 0.6545300E+00 /
      data (ref_adm(10,iz, 8,13),iz = 1,20) / &
     & 0.2472100E+00, 0.2472100E+00, 0.2507300E+00, 0.2609400E+00, &
     & 0.2658300E+00, 0.2607600E+00, 0.2688900E+00, 0.2870000E+00, &
     & 0.2965900E+00, 0.3061900E+00, 0.3220200E+00, 0.3511900E+00, &
     & 0.3675500E+00, 0.3992400E+00, 0.4429400E+00, 0.5100200E+00, &
     & 0.5828900E+00, 0.6246000E+00, 0.5848400E+00, 0.5848400E+00 /
      data (ref_adm(10,iz, 9,13),iz = 1,20) / &
     & 0.2554900E+00, 0.2554900E+00, 0.2404800E+00, 0.2494000E+00, &
     & 0.2405300E+00, 0.2552100E+00, 0.2599000E+00, 0.2855100E+00, &
     & 0.2792600E+00, 0.3001900E+00, 0.3094400E+00, 0.3204100E+00, &
     & 0.3584200E+00, 0.3965400E+00, 0.4338600E+00, 0.4986700E+00, &
     & 0.5559500E+00, 0.5932800E+00, 0.5426100E+00, 0.5426100E+00 /
      data (ref_adm(10,iz,10,13),iz = 1,20) / &
     & 0.2553900E+00, 0.2553900E+00, 0.2512400E+00, 0.2414500E+00, &
     & 0.2404800E+00, 0.2451600E+00, 0.2613100E+00, 0.2567500E+00, &
     & 0.2697200E+00, 0.2938100E+00, 0.2978500E+00, 0.3120100E+00, &
     & 0.3313700E+00, 0.3812500E+00, 0.3964900E+00, 0.4378000E+00, &
     & 0.5021500E+00, 0.5524800E+00, 0.4967200E+00, 0.4967200E+00 /
      data (ref_adm(10,iz,11,13),iz = 1,20) / &
     & 0.2562800E+00, 0.2562800E+00, 0.2377500E+00, 0.2522900E+00, &
     & 0.2532300E+00, 0.2437000E+00, 0.2521200E+00, 0.2611800E+00, &
     & 0.2724200E+00, 0.2989700E+00, 0.2988800E+00, 0.3070700E+00, &
     & 0.3194100E+00, 0.3629700E+00, 0.3865300E+00, 0.4254100E+00, &
     & 0.4906100E+00, 0.4967700E+00, 0.4344300E+00, 0.4344300E+00 /
      data (ref_adm(10,iz,12,13),iz = 1,20) / &
     & 0.2499600E+00, 0.2499600E+00, 0.2431700E+00, 0.2444900E+00, &
     & 0.2504700E+00, 0.2446000E+00, 0.2583400E+00, 0.2646300E+00, &
     & 0.2692800E+00, 0.2852800E+00, 0.2950800E+00, 0.3043800E+00, &
     & 0.3245800E+00, 0.3637000E+00, 0.3649600E+00, 0.4033400E+00, &
     & 0.4630500E+00, 0.4636200E+00, 0.4030100E+00, 0.4030100E+00 /
      data (ref_adm(10,iz,13,13),iz = 1,20) / &
     & 0.2442800E+00, 0.2442800E+00, 0.2507600E+00, 0.2474000E+00, &
     & 0.2484500E+00, 0.2425300E+00, 0.2580500E+00, 0.2637100E+00, &
     & 0.2820600E+00, 0.2766100E+00, 0.2875500E+00, 0.2959100E+00, &
     & 0.3235800E+00, 0.3650400E+00, 0.3575300E+00, 0.3862000E+00, &
     & 0.4172500E+00, 0.4192800E+00, 0.3797600E+00, 0.3797600E+00 /
      data (ref_adm(10,iz,14,13),iz = 1,20) / &
     & 0.2639600E+00, 0.2639600E+00, 0.2554300E+00, 0.2578700E+00, &
     & 0.2629300E+00, 0.2584900E+00, 0.2671200E+00, 0.2685800E+00, &
     & 0.2728300E+00, 0.2757400E+00, 0.2861500E+00, 0.2974700E+00, &
     & 0.3148900E+00, 0.3354700E+00, 0.3592500E+00, 0.3981700E+00, &
     & 0.3997300E+00, 0.3846700E+00, 0.3588400E+00, 0.3588400E+00 /
      data (ref_adm(10,iz,15,13),iz = 1,20) / &
     & 0.2487000E+00, 0.2487000E+00, 0.2416400E+00, 0.2429300E+00, &
     & 0.2462600E+00, 0.2475300E+00, 0.2519000E+00, 0.2553700E+00, &
     & 0.2617400E+00, 0.2703800E+00, 0.2808000E+00, 0.2969100E+00, &
     & 0.3152700E+00, 0.3325800E+00, 0.3447600E+00, 0.3659800E+00, &
     & 0.3754600E+00, 0.3689400E+00, 0.3434100E+00, 0.3434100E+00 /
      data (ref_adm(10,iz,16,13),iz = 1,20) / &
     & 0.2483700E+00, 0.2483700E+00, 0.2460200E+00, 0.2489900E+00, &
     & 0.2531800E+00, 0.2498400E+00, 0.2541500E+00, 0.2506500E+00, &
     & 0.2477000E+00, 0.2569600E+00, 0.2673700E+00, 0.2712000E+00, &
     & 0.2830000E+00, 0.3002300E+00, 0.3391200E+00, 0.3461900E+00, &
     & 0.3486000E+00, 0.3616700E+00, 0.3894850E+00, 0.3894850E+00 /
      data (ref_adm(10,iz,17,13),iz = 1,20) / &
     & 0.2511300E+00, 0.2511300E+00, 0.2543500E+00, 0.2528100E+00, &
     & 0.2620000E+00, 0.2552200E+00, 0.2693200E+00, 0.2638700E+00, &
     & 0.2698000E+00, 0.2772100E+00, 0.2772900E+00, 0.2856300E+00, &
     & 0.3001100E+00, 0.3256900E+00, 0.3224600E+00, 0.3478800E+00, &
     & 0.3530700E+00, 0.4244119E+00, 0.3779751E+00, 0.3779751E+00 /
      data (ref_adm(10,iz,18,13),iz = 1,20) / &
     & 0.2548600E+00, 0.2548600E+00, 0.2561800E+00, 0.2621400E+00, &
     & 0.2619900E+00, 0.2639600E+00, 0.2756200E+00, 0.2731300E+00, &
     & 0.2680200E+00, 0.2647000E+00, 0.2717800E+00, 0.2868900E+00, &
     & 0.2991000E+00, 0.3067400E+00, 0.3257900E+00, 0.3289000E+00, &
     & 0.3625000E+00, 0.3721831E+00, 0.3670087E+00, 0.3670087E+00 /
      data (ref_adm(10,iz,19,13),iz = 1,20) / &
     & 0.2454200E+00, 0.2454200E+00, 0.2649900E+00, 0.2546200E+00, &
     & 0.2577600E+00, 0.2549200E+00, 0.2559700E+00, 0.2586600E+00, &
     & 0.2692600E+00, 0.2709800E+00, 0.2838600E+00, 0.2888100E+00, &
     & 0.2994300E+00, 0.2966100E+00, 0.3227200E+00, 0.3215500E+00, &
     & 0.3221500E+00, 0.3673391E+00, 0.3605843E+00, 0.3605843E+00 /
      data (ref_adm(10,iz,20,13),iz = 1,20) / &
     & 0.2512100E+00, 0.2512100E+00, 0.2459500E+00, 0.2676100E+00, &
     & 0.2707300E+00, 0.2580000E+00, 0.2656500E+00, 0.2709500E+00, &
     & 0.2733600E+00, 0.2737000E+00, 0.2813400E+00, 0.2805100E+00, &
     & 0.2974700E+00, 0.3011400E+00, 0.3209800E+00, 0.3301300E+00, &
     & 0.3491804E+00, 0.3639144E+00, 0.3568407E+00, 0.3568407E+00 /
      data (ref_adm(10,iz,21,13),iz = 1,20) / &
     & 0.2383200E+00, 0.2383200E+00, 0.2490400E+00, 0.2560800E+00, &
     & 0.2680800E+00, 0.2652700E+00, 0.2603900E+00, 0.2701900E+00, &
     & 0.2719100E+00, 0.2808700E+00, 0.2920900E+00, 0.2933700E+00, &
     & 0.3006600E+00, 0.3057900E+00, 0.3296800E+00, 0.3362000E+00, &
     & 0.3473578E+00, 0.3609934E+00, 0.3545464E+00, 0.3545464E+00 /
      data (ref_adm(10,iz,22,13),iz = 1,20) / &
     & 0.2584900E+00, 0.2584900E+00, 0.2534400E+00, 0.2559700E+00, &
     & 0.2566200E+00, 0.2616700E+00, 0.2625900E+00, 0.2697100E+00, &
     & 0.2736300E+00, 0.2875800E+00, 0.2909000E+00, 0.3015100E+00, &
     & 0.3112600E+00, 0.3108500E+00, 0.3279300E+00, 0.3423700E+00, &
     & 0.4123378E+00, 0.4102514E+00, 0.3770713E+00, 0.3770713E+00 /
      data (ref_adm(10,iz,23,13),iz = 1,20) / &
     & 0.2513500E+00, 0.2513500E+00, 0.2515300E+00, 0.2602000E+00, &
     & 0.2693200E+00, 0.2709800E+00, 0.2676200E+00, 0.2757600E+00, &
     & 0.2760500E+00, 0.2868200E+00, 0.2969600E+00, 0.3048400E+00, &
     & 0.3099200E+00, 0.3223400E+00, 0.3259200E+00, 0.3569000E+00, &
     & 0.4039910E+00, 0.4001272E+00, 0.3737307E+00, 0.3737307E+00 /
      data (ref_adm(10,iz,24,13),iz = 1,20) / &
     & 0.2358800E+00, 0.2358800E+00, 0.2400100E+00, 0.2485200E+00, &
     & 0.2516500E+00, 0.2540700E+00, 0.2565300E+00, 0.2626600E+00, &
     & 0.2714700E+00, 0.2860900E+00, 0.3058100E+00, 0.3148500E+00, &
     & 0.3116200E+00, 0.3182200E+00, 0.3413500E+00, 0.3465900E+00, &
     & 0.3956700E+00, 0.3924771E+00, 0.3718995E+00, 0.3718995E+00 /
      data (ref_adm(10,iz,25,13),iz = 1,20) / &
     & 0.2448900E+00, 0.2448900E+00, 0.2582500E+00, 0.2628000E+00, &
     & 0.2661400E+00, 0.2710100E+00, 0.2706200E+00, 0.2766500E+00, &
     & 0.2795800E+00, 0.2871600E+00, 0.2922500E+00, 0.3026300E+00, &
     & 0.3114100E+00, 0.3284800E+00, 0.3488300E+00, 0.3654000E+00, &
     & 0.3937200E+00, 0.3336200E+00, 0.3715424E+00, 0.3715424E+00 /
      data (ref_adm(10,iz,26,13),iz = 1,20) / &
     & 0.2565100E+00, 0.2565100E+00, 0.2628000E+00, 0.2615100E+00, &
     & 0.2693300E+00, 0.2777100E+00, 0.2776200E+00, 0.2876200E+00, &
     & 0.2935100E+00, 0.3047100E+00, 0.3113500E+00, 0.3202900E+00, &
     & 0.3242200E+00, 0.3377400E+00, 0.3361200E+00, 0.3733100E+00, &
     & 0.3804200E+00, 0.4013000E+00, 0.3729008E+00, 0.3729008E+00 /
      data (ref_adm(10,iz,27,13),iz = 1,20) / &
     & 0.2552400E+00, 0.2552400E+00, 0.2443600E+00, 0.2550100E+00, &
     & 0.2572800E+00, 0.2685600E+00, 0.2830800E+00, 0.2909900E+00, &
     & 0.2975600E+00, 0.3070300E+00, 0.3165100E+00, 0.3251000E+00, &
     & 0.3405500E+00, 0.3527200E+00, 0.3566300E+00, 0.3738600E+00, &
     & 0.3925700E+00, 0.4089300E+00, 0.3533500E+00, 0.3533500E+00 /
      data (ref_adm(10,iz,28,13),iz = 1,20) / &
     & 0.2472500E+00, 0.2472500E+00, 0.2404400E+00, 0.2516900E+00, &
     & 0.2577100E+00, 0.2692600E+00, 0.2725500E+00, 0.2910200E+00, &
     & 0.2968400E+00, 0.3126300E+00, 0.3318300E+00, 0.3352000E+00, &
     & 0.3573400E+00, 0.3705900E+00, 0.3894300E+00, 0.3999600E+00, &
     & 0.4099500E+00, 0.4029000E+00, 0.3475900E+00, 0.3475900E+00 /
      data (ref_adm(10,iz,29,13),iz = 1,20) / &
     & 0.2533100E+00, 0.2533100E+00, 0.2520700E+00, 0.2535200E+00, &
     & 0.2530100E+00, 0.2714000E+00, 0.2858000E+00, 0.2953900E+00, &
     & 0.3065500E+00, 0.3323300E+00, 0.3400700E+00, 0.3375300E+00, &
     & 0.3632000E+00, 0.3810600E+00, 0.3965400E+00, 0.4199800E+00, &
     & 0.4221700E+00, 0.4248500E+00, 0.3647000E+00, 0.3647000E+00 /
      data (ref_adm(10,iz,30,13),iz = 1,20) / &
     & 0.2528100E+00, 0.2528100E+00, 0.2500900E+00, 0.2523600E+00, &
     & 0.2626800E+00, 0.2682000E+00, 0.2838800E+00, 0.3009800E+00, &
     & 0.3156400E+00, 0.3339700E+00, 0.3384700E+00, 0.3506800E+00, &
     & 0.3766900E+00, 0.3945400E+00, 0.4090500E+00, 0.4340900E+00, &
     & 0.4381900E+00, 0.4372200E+00, 0.3667400E+00, 0.3667400E+00 /
      data (ref_adm(10,iz,31,13),iz = 1,20) / &
     & 0.2567100E+00, 0.2567100E+00, 0.2628200E+00, 0.2586600E+00, &
     & 0.2771000E+00, 0.2738600E+00, 0.2948400E+00, 0.3047200E+00, &
     & 0.3127700E+00, 0.3286100E+00, 0.3381500E+00, 0.3646400E+00, &
     & 0.3787200E+00, 0.4011700E+00, 0.4247700E+00, 0.4428500E+00, &
     & 0.4538300E+00, 0.4488500E+00, 0.3745900E+00, 0.3745900E+00 /
      data (ref_adm(10,iz,32,13),iz = 1,20) / &
     & 0.2522600E+00, 0.2522600E+00, 0.2567100E+00, 0.2725500E+00, &
     & 0.2753800E+00, 0.2872400E+00, 0.3020100E+00, 0.3071700E+00, &
     & 0.3192300E+00, 0.3284700E+00, 0.3444800E+00, 0.3713200E+00, &
     & 0.3889200E+00, 0.4080200E+00, 0.4209100E+00, 0.4413200E+00, &
     & 0.4554800E+00, 0.4432500E+00, 0.3838900E+00, 0.3838900E+00 /
      data (ref_adm(10,iz,33,13),iz = 1,20) / &
     & 0.2566800E+00, 0.2566800E+00, 0.2651800E+00, 0.2683700E+00, &
     & 0.2754800E+00, 0.2911000E+00, 0.3080200E+00, 0.3150900E+00, &
     & 0.3233900E+00, 0.3417700E+00, 0.3518700E+00, 0.3750500E+00, &
     & 0.3873000E+00, 0.4171800E+00, 0.4419800E+00, 0.4660500E+00, &
     & 0.4697600E+00, 0.4611400E+00, 0.3916500E+00, 0.3916500E+00 /
      data (ref_adm(10,iz,34,13),iz = 1,20) / &
     & 0.2531300E+00, 0.2531300E+00, 0.2546800E+00, 0.2720600E+00, &
     & 0.2759300E+00, 0.3020200E+00, 0.2922500E+00, 0.3113500E+00, &
     & 0.3223100E+00, 0.3450000E+00, 0.3668000E+00, 0.3804000E+00, &
     & 0.4040500E+00, 0.4303400E+00, 0.4436000E+00, 0.4650600E+00, &
     & 0.4736800E+00, 0.4677300E+00, 0.3949600E+00, 0.3949600E+00 /
      data (ref_adm(10,iz,35,13),iz = 1,20) / &
     & 0.2496900E+00, 0.2496900E+00, 0.2554200E+00, 0.2599200E+00, &
     & 0.2756100E+00, 0.3028700E+00, 0.3039700E+00, 0.3036800E+00, &
     & 0.3198100E+00, 0.3448100E+00, 0.3600800E+00, 0.3880400E+00, &
     & 0.4107300E+00, 0.4353600E+00, 0.4571100E+00, 0.4712600E+00, &
     & 0.4804200E+00, 0.4743300E+00, 0.3878400E+00, 0.3878400E+00 /
      data (ref_adm(10,iz,36,13),iz = 1,20) / &
     & 0.2642600E+00, 0.2642600E+00, 0.2626800E+00, 0.2704900E+00, &
     & 0.2774900E+00, 0.2897000E+00, 0.3132300E+00, 0.3052200E+00, &
     & 0.3195600E+00, 0.3484500E+00, 0.3632800E+00, 0.3915600E+00, &
     & 0.4350900E+00, 0.4499600E+00, 0.4571300E+00, 0.4683300E+00, &
     & 0.4788400E+00, 0.4790900E+00, 0.3750000E+00, 0.3750000E+00 /
      data (ref_adm(10,iz,37,13),iz = 1,20) / &
     & 0.2651000E+00, 0.2651000E+00, 0.2724000E+00, 0.2755100E+00, &
     & 0.2873900E+00, 0.2952200E+00, 0.3072400E+00, 0.3191700E+00, &
     & 0.3290500E+00, 0.3321200E+00, 0.3658000E+00, 0.3934600E+00, &
     & 0.4269600E+00, 0.4642900E+00, 0.4630700E+00, 0.4804900E+00, &
     & 0.4914300E+00, 0.4820900E+00, 0.3938600E+00, 0.3938600E+00 /
      data (ref_adm(10,iz,38,13),iz = 1,20) / &
     & 0.2651000E+00, 0.2651000E+00, 0.2724000E+00, 0.2755100E+00, &
     & 0.2873900E+00, 0.2952200E+00, 0.3072400E+00, 0.3191700E+00, &
     & 0.3290500E+00, 0.3321200E+00, 0.3658000E+00, 0.3934600E+00, &
     & 0.4269600E+00, 0.4642900E+00, 0.4630700E+00, 0.4804900E+00, &
     & 0.4914300E+00, 0.4820900E+00, 0.3938600E+00, 0.3938600E+00 /
! Solar Zenith Angle 65.0 Albedo  0.3379882E+00
      data (ref_adm(10,iz, 1,14),iz = 1,20) / &
     & 0.2413600E+00, 0.2413600E+00, 0.2493200E+00, 0.2437200E+00, &
     & 0.2481000E+00, 0.2585900E+00, 0.2617000E+00, 0.2809700E+00, &
     & 0.3100100E+00, 0.3336300E+00, 0.3685700E+00, 0.4459000E+00, &
     & 0.4930500E+00, 0.6358200E+00, 0.7957900E+00, 0.9115800E+00, &
     & 0.9863800E+00, 0.1079500E+01, 0.1322591E+01, 0.1322591E+01 /
      data (ref_adm(10,iz, 2,14),iz = 1,20) / &
     & 0.2413600E+00, 0.2413600E+00, 0.2493200E+00, 0.2437200E+00, &
     & 0.2481000E+00, 0.2585900E+00, 0.2617000E+00, 0.2809700E+00, &
     & 0.3100100E+00, 0.3336300E+00, 0.3685700E+00, 0.4459000E+00, &
     & 0.4930500E+00, 0.6358200E+00, 0.7957900E+00, 0.9115800E+00, &
     & 0.9863800E+00, 0.1079500E+01, 0.1322591E+01, 0.1322591E+01 /
      data (ref_adm(10,iz, 3,14),iz = 1,20) / &
     & 0.2438300E+00, 0.2438300E+00, 0.2390100E+00, 0.2277900E+00, &
     & 0.2457000E+00, 0.2592400E+00, 0.2671400E+00, 0.2725300E+00, &
     & 0.3060600E+00, 0.3319500E+00, 0.3636000E+00, 0.4217600E+00, &
     & 0.4732100E+00, 0.5705100E+00, 0.6707300E+00, 0.7835300E+00, &
     & 0.9192800E+00, 0.1013900E+01, 0.1022978E+00, 0.1022978E+00 /
      data (ref_adm(10,iz, 4,14),iz = 1,20) / &
     & 0.2465800E+00, 0.2465800E+00, 0.2387000E+00, 0.2436800E+00, &
     & 0.2437200E+00, 0.2664200E+00, 0.2745700E+00, 0.2707200E+00, &
     & 0.2993100E+00, 0.3371900E+00, 0.3394800E+00, 0.3842800E+00, &
     & 0.4558400E+00, 0.5344100E+00, 0.6210200E+00, 0.7471400E+00, &
     & 0.8816900E+00, 0.9397100E+00, 0.1092750E+01, 0.1092750E+01 /
      data (ref_adm(10,iz, 5,14),iz = 1,20) / &
     & 0.2492100E+00, 0.2492100E+00, 0.2439200E+00, 0.2366700E+00, &
     & 0.2613400E+00, 0.2588500E+00, 0.2667300E+00, 0.2826900E+00, &
     & 0.2952200E+00, 0.3301500E+00, 0.3589400E+00, 0.3840500E+00, &
     & 0.4533200E+00, 0.5251700E+00, 0.5980200E+00, 0.6994500E+00, &
     & 0.8563200E+00, 0.9633000E+00, 0.9451783E+00, 0.9451783E+00 /
      data (ref_adm(10,iz, 6,14),iz = 1,20) / &
     & 0.2340500E+00, 0.2340500E+00, 0.2356600E+00, 0.2374100E+00, &
     & 0.2406400E+00, 0.2452800E+00, 0.2617900E+00, 0.2758000E+00, &
     & 0.3063500E+00, 0.3215400E+00, 0.3557700E+00, 0.4050300E+00, &
     & 0.4534000E+00, 0.5250200E+00, 0.6157800E+00, 0.7113600E+00, &
     & 0.8331100E+00, 0.9297300E+00, 0.8628400E+00, 0.8628400E+00 /
      data (ref_adm(10,iz, 7,14),iz = 1,20) / &
     & 0.2532600E+00, 0.2532600E+00, 0.2568800E+00, 0.2487700E+00, &
     & 0.2567300E+00, 0.2504600E+00, 0.2632900E+00, 0.2921900E+00, &
     & 0.3021800E+00, 0.3146800E+00, 0.3417300E+00, 0.3825400E+00, &
     & 0.4103300E+00, 0.4736100E+00, 0.5436900E+00, 0.6209700E+00, &
     & 0.7178100E+00, 0.8056800E+00, 0.7475500E+00, 0.7475500E+00 /
      data (ref_adm(10,iz, 8,14),iz = 1,20) / &
     & 0.2393900E+00, 0.2393900E+00, 0.2443000E+00, 0.2356500E+00, &
     & 0.2501100E+00, 0.2522500E+00, 0.2438600E+00, 0.2705900E+00, &
     & 0.2821100E+00, 0.3120300E+00, 0.3252100E+00, 0.3565900E+00, &
     & 0.3943800E+00, 0.4390700E+00, 0.5070800E+00, 0.6042900E+00, &
     & 0.7254600E+00, 0.7557200E+00, 0.6544100E+00, 0.6544100E+00 /
      data (ref_adm(10,iz, 9,14),iz = 1,20) / &
     & 0.2418300E+00, 0.2418300E+00, 0.2373900E+00, 0.2394900E+00, &
     & 0.2460300E+00, 0.2501700E+00, 0.2654900E+00, 0.2695500E+00, &
     & 0.2905600E+00, 0.3045700E+00, 0.3114300E+00, 0.3410300E+00, &
     & 0.3698300E+00, 0.4287100E+00, 0.4878200E+00, 0.6031100E+00, &
     & 0.6723700E+00, 0.6874600E+00, 0.5933200E+00, 0.5933200E+00 /
      data (ref_adm(10,iz,10,14),iz = 1,20) / &
     & 0.2404700E+00, 0.2404700E+00, 0.2416800E+00, 0.2443400E+00, &
     & 0.2455800E+00, 0.2667600E+00, 0.2694300E+00, 0.2696000E+00, &
     & 0.2873000E+00, 0.2867400E+00, 0.3005100E+00, 0.3276700E+00, &
     & 0.3674200E+00, 0.4169800E+00, 0.4704600E+00, 0.5436400E+00, &
     & 0.6123500E+00, 0.6341800E+00, 0.5785300E+00, 0.5785300E+00 /
      data (ref_adm(10,iz,11,14),iz = 1,20) / &
     & 0.2446100E+00, 0.2446100E+00, 0.2314600E+00, 0.2426900E+00, &
     & 0.2441900E+00, 0.2646800E+00, 0.2621300E+00, 0.2690900E+00, &
     & 0.2803800E+00, 0.2850300E+00, 0.2964000E+00, 0.3115000E+00, &
     & 0.3448300E+00, 0.4017300E+00, 0.4253200E+00, 0.4934400E+00, &
     & 0.5563300E+00, 0.5882000E+00, 0.5427000E+00, 0.5427000E+00 /
      data (ref_adm(10,iz,12,14),iz = 1,20) / &
     & 0.2458600E+00, 0.2458600E+00, 0.2357600E+00, 0.2502300E+00, &
     & 0.2410100E+00, 0.2433200E+00, 0.2553400E+00, 0.2641400E+00, &
     & 0.2683000E+00, 0.2847700E+00, 0.2958500E+00, 0.3285500E+00, &
     & 0.3445500E+00, 0.3776500E+00, 0.4140600E+00, 0.4649900E+00, &
     & 0.5182000E+00, 0.5232900E+00, 0.4547000E+00, 0.4547000E+00 /
      data (ref_adm(10,iz,13,14),iz = 1,20) / &
     & 0.2340000E+00, 0.2340000E+00, 0.2319300E+00, 0.2413600E+00, &
     & 0.2478700E+00, 0.2493200E+00, 0.2503300E+00, 0.2633100E+00, &
     & 0.2712700E+00, 0.2792100E+00, 0.2863900E+00, 0.3103100E+00, &
     & 0.3395400E+00, 0.3589900E+00, 0.4017000E+00, 0.4554200E+00, &
     & 0.4706300E+00, 0.4942100E+00, 0.4375200E+00, 0.4375200E+00 /
      data (ref_adm(10,iz,14,14),iz = 1,20) / &
     & 0.2574600E+00, 0.2574600E+00, 0.2496700E+00, 0.2561700E+00, &
     & 0.2528700E+00, 0.2605800E+00, 0.2698600E+00, 0.2676200E+00, &
     & 0.2783100E+00, 0.2856800E+00, 0.2929100E+00, 0.3066800E+00, &
     & 0.3201600E+00, 0.3432900E+00, 0.3826700E+00, 0.4267700E+00, &
     & 0.4645800E+00, 0.4606900E+00, 0.4130500E+00, 0.4130500E+00 /
      data (ref_adm(10,iz,15,14),iz = 1,20) / &
     & 0.2461700E+00, 0.2461700E+00, 0.2353600E+00, 0.2328100E+00, &
     & 0.2336500E+00, 0.2407000E+00, 0.2449500E+00, 0.2516800E+00, &
     & 0.2608800E+00, 0.2700900E+00, 0.2885900E+00, 0.3038300E+00, &
     & 0.3220100E+00, 0.3488400E+00, 0.3573600E+00, 0.3950300E+00, &
     & 0.4355600E+00, 0.4377200E+00, 0.4901115E+00, 0.4901115E+00 /
      data (ref_adm(10,iz,16,14),iz = 1,20) / &
     & 0.2326000E+00, 0.2326000E+00, 0.2230300E+00, 0.2336200E+00, &
     & 0.2294500E+00, 0.2300400E+00, 0.2309100E+00, 0.2363700E+00, &
     & 0.2414000E+00, 0.2535600E+00, 0.2592500E+00, 0.2723500E+00, &
     & 0.2860700E+00, 0.3045800E+00, 0.3510000E+00, 0.3948900E+00, &
     & 0.4166600E+00, 0.4261400E+00, 0.4745337E+00, 0.4745337E+00 /
      data (ref_adm(10,iz,17,14),iz = 1,20) / &
     & 0.2342700E+00, 0.2342700E+00, 0.2282700E+00, 0.2332500E+00, &
     & 0.2316000E+00, 0.2397200E+00, 0.2559500E+00, 0.2584200E+00, &
     & 0.2676200E+00, 0.2633600E+00, 0.2793100E+00, 0.2913500E+00, &
     & 0.2948400E+00, 0.3345500E+00, 0.3450800E+00, 0.3649300E+00, &
     & 0.3641900E+00, 0.4928046E+00, 0.4579985E+00, 0.4579985E+00 /
      data (ref_adm(10,iz,18,14),iz = 1,20) / &
     & 0.2396600E+00, 0.2396600E+00, 0.2400300E+00, 0.2346300E+00, &
     & 0.2307300E+00, 0.2372300E+00, 0.2370000E+00, 0.2585300E+00, &
     & 0.2632100E+00, 0.2528600E+00, 0.2739400E+00, 0.2857800E+00, &
     & 0.2923900E+00, 0.3231400E+00, 0.3526600E+00, 0.3609200E+00, &
     & 0.3870800E+00, 0.4251553E+00, 0.4342625E+00, 0.4342625E+00 /
      data (ref_adm(10,iz,19,14),iz = 1,20) / &
     & 0.2381000E+00, 0.2381000E+00, 0.2336000E+00, 0.2400100E+00, &
     & 0.2314200E+00, 0.2412800E+00, 0.2382900E+00, 0.2623600E+00, &
     & 0.2633700E+00, 0.2559400E+00, 0.2770300E+00, 0.2794500E+00, &
     & 0.3013400E+00, 0.3142100E+00, 0.3444100E+00, 0.3709800E+00, &
     & 0.3880271E+00, 0.4177200E+00, 0.4251419E+00, 0.4251419E+00 /
      data (ref_adm(10,iz,20,14),iz = 1,20) / &
     & 0.2409200E+00, 0.2409200E+00, 0.2312500E+00, 0.2462600E+00, &
     & 0.2437200E+00, 0.2434800E+00, 0.2464700E+00, 0.2636900E+00, &
     & 0.2676400E+00, 0.2661500E+00, 0.2769500E+00, 0.2856400E+00, &
     & 0.3009300E+00, 0.3217900E+00, 0.3346300E+00, 0.3698500E+00, &
     & 0.3842466E+00, 0.4128500E+00, 0.4198944E+00, 0.4198944E+00 /
      data (ref_adm(10,iz,21,14),iz = 1,20) / &
     & 0.2373300E+00, 0.2373300E+00, 0.2429000E+00, 0.2431000E+00, &
     & 0.2357300E+00, 0.2426100E+00, 0.2499500E+00, 0.2650300E+00, &
     & 0.2684400E+00, 0.2763300E+00, 0.2786800E+00, 0.2820800E+00, &
     & 0.2938800E+00, 0.3152600E+00, 0.3388300E+00, 0.3791000E+00, &
     & 0.3814167E+00, 0.4088250E+00, 0.4166189E+00, 0.4166189E+00 /
      data (ref_adm(10,iz,22,14),iz = 1,20) / &
     & 0.2414600E+00, 0.2414600E+00, 0.2481800E+00, 0.2565200E+00, &
     & 0.2492700E+00, 0.2490500E+00, 0.2564400E+00, 0.2661400E+00, &
     & 0.2735800E+00, 0.2763600E+00, 0.2830900E+00, 0.2976600E+00, &
     & 0.2946600E+00, 0.3146900E+00, 0.3391300E+00, 0.3421300E+00, &
     & 0.4229402E+00, 0.4234062E+00, 0.3930376E+00, 0.3930376E+00 /
      data (ref_adm(10,iz,23,14),iz = 1,20) / &
     & 0.2483300E+00, 0.2483300E+00, 0.2387800E+00, 0.2392100E+00, &
     & 0.2542700E+00, 0.2529600E+00, 0.2493500E+00, 0.2661300E+00, &
     & 0.2684100E+00, 0.2778200E+00, 0.2909100E+00, 0.3009700E+00, &
     & 0.3115000E+00, 0.3231200E+00, 0.3376900E+00, 0.3584300E+00, &
     & 0.4135897E+00, 0.4125465E+00, 0.3893478E+00, 0.3893478E+00 /
      data (ref_adm(10,iz,24,14),iz = 1,20) / &
     & 0.2279200E+00, 0.2279200E+00, 0.2331500E+00, 0.2350500E+00, &
     & 0.2373700E+00, 0.2424800E+00, 0.2469500E+00, 0.2529800E+00, &
     & 0.2590500E+00, 0.2662600E+00, 0.2751100E+00, 0.2879100E+00, &
     & 0.3017200E+00, 0.3349500E+00, 0.3368500E+00, 0.3624900E+00, &
     & 0.3954300E+00, 0.4044616E+00, 0.3875876E+00, 0.3875876E+00 /
      data (ref_adm(10,iz,25,14),iz = 1,20) / &
     & 0.2395500E+00, 0.2395500E+00, 0.2537300E+00, 0.2601900E+00, &
     & 0.2635000E+00, 0.2707200E+00, 0.2727100E+00, 0.2792100E+00, &
     & 0.2864100E+00, 0.2915800E+00, 0.2956400E+00, 0.3025400E+00, &
     & 0.3144300E+00, 0.3304400E+00, 0.3522800E+00, 0.3629100E+00, &
     & 0.4173300E+00, 0.3973953E+00, 0.3873661E+00, 0.3873661E+00 /
      data (ref_adm(10,iz,26,14),iz = 1,20) / &
     & 0.2525200E+00, 0.2525200E+00, 0.2521100E+00, 0.2550600E+00, &
     & 0.2648300E+00, 0.2702500E+00, 0.2788500E+00, 0.2838100E+00, &
     & 0.2932000E+00, 0.3020600E+00, 0.3115800E+00, 0.3236300E+00, &
     & 0.3434000E+00, 0.3650100E+00, 0.3727300E+00, 0.3808200E+00, &
     & 0.3988600E+00, 0.4107800E+00, 0.3895991E+00, 0.3895991E+00 /
      data (ref_adm(10,iz,27,14),iz = 1,20) / &
     & 0.2478000E+00, 0.2478000E+00, 0.2507800E+00, 0.2505400E+00, &
     & 0.2421900E+00, 0.2592300E+00, 0.2670500E+00, 0.2737200E+00, &
     & 0.2928400E+00, 0.2967300E+00, 0.3013400E+00, 0.3229500E+00, &
     & 0.3515200E+00, 0.3622100E+00, 0.3724200E+00, 0.3916200E+00, &
     & 0.4140100E+00, 0.4316500E+00, 0.3577300E+00, 0.3577300E+00 /
      data (ref_adm(10,iz,28,14),iz = 1,20) / &
     & 0.2391100E+00, 0.2391100E+00, 0.2554700E+00, 0.2615100E+00, &
     & 0.2560700E+00, 0.2647800E+00, 0.2736500E+00, 0.2898000E+00, &
     & 0.2912500E+00, 0.3018800E+00, 0.3137100E+00, 0.3340700E+00, &
     & 0.3602100E+00, 0.3795000E+00, 0.3882000E+00, 0.4071300E+00, &
     & 0.4301500E+00, 0.4282700E+00, 0.3847200E+00, 0.3847200E+00 /
      data (ref_adm(10,iz,29,14),iz = 1,20) / &
     & 0.2550500E+00, 0.2550500E+00, 0.2574900E+00, 0.2656500E+00, &
     & 0.2723300E+00, 0.2627800E+00, 0.2757000E+00, 0.2744600E+00, &
     & 0.2973200E+00, 0.3194900E+00, 0.3273300E+00, 0.3434600E+00, &
     & 0.3745600E+00, 0.3885900E+00, 0.4155900E+00, 0.4431900E+00, &
     & 0.4611200E+00, 0.4545300E+00, 0.3986200E+00, 0.3986200E+00 /
      data (ref_adm(10,iz,30,14),iz = 1,20) / &
     & 0.2440500E+00, 0.2440500E+00, 0.2448800E+00, 0.2463100E+00, &
     & 0.2525900E+00, 0.2685900E+00, 0.2840400E+00, 0.2842300E+00, &
     & 0.2957100E+00, 0.3188600E+00, 0.3395000E+00, 0.3589000E+00, &
     & 0.3658500E+00, 0.4064200E+00, 0.4286700E+00, 0.4628700E+00, &
     & 0.4778500E+00, 0.4808200E+00, 0.4280700E+00, 0.4280700E+00 /
      data (ref_adm(10,iz,31,14),iz = 1,20) / &
     & 0.2371300E+00, 0.2371300E+00, 0.2447900E+00, 0.2567800E+00, &
     & 0.2511500E+00, 0.2773300E+00, 0.2870500E+00, 0.2949500E+00, &
     & 0.3011700E+00, 0.3246100E+00, 0.3330300E+00, 0.3611600E+00, &
     & 0.3832000E+00, 0.4129200E+00, 0.4415700E+00, 0.4688300E+00, &
     & 0.4872700E+00, 0.5002900E+00, 0.4401700E+00, 0.4401700E+00 /
      data (ref_adm(10,iz,32,14),iz = 1,20) / &
     & 0.2515600E+00, 0.2515600E+00, 0.2644700E+00, 0.2515300E+00, &
     & 0.2673200E+00, 0.2745100E+00, 0.2819500E+00, 0.2983300E+00, &
     & 0.3087800E+00, 0.3225400E+00, 0.3497000E+00, 0.3664700E+00, &
     & 0.3853400E+00, 0.4131300E+00, 0.4424600E+00, 0.4685400E+00, &
     & 0.4998800E+00, 0.5183200E+00, 0.4486700E+00, 0.4486700E+00 /
      data (ref_adm(10,iz,33,14),iz = 1,20) / &
     & 0.2455900E+00, 0.2455900E+00, 0.2468800E+00, 0.2489100E+00, &
     & 0.2573800E+00, 0.2674000E+00, 0.2792700E+00, 0.2940400E+00, &
     & 0.3067700E+00, 0.3234300E+00, 0.3422800E+00, 0.3629500E+00, &
     & 0.3890500E+00, 0.4185600E+00, 0.4429100E+00, 0.4679100E+00, &
     & 0.4933500E+00, 0.5059000E+00, 0.4382200E+00, 0.4382200E+00 /
      data (ref_adm(10,iz,34,14),iz = 1,20) / &
     & 0.2431300E+00, 0.2431300E+00, 0.2591200E+00, 0.2593600E+00, &
     & 0.2645600E+00, 0.2794900E+00, 0.2860700E+00, 0.3063100E+00, &
     & 0.3236800E+00, 0.3391300E+00, 0.3517100E+00, 0.3765300E+00, &
     & 0.4059500E+00, 0.4407900E+00, 0.4550000E+00, 0.4944900E+00, &
     & 0.5218100E+00, 0.5226900E+00, 0.4448700E+00, 0.4448700E+00 /
      data (ref_adm(10,iz,35,14),iz = 1,20) / &
     & 0.2529500E+00, 0.2529500E+00, 0.2592000E+00, 0.2515100E+00, &
     & 0.2562600E+00, 0.2789500E+00, 0.3006700E+00, 0.3118300E+00, &
     & 0.3162800E+00, 0.3272600E+00, 0.3545000E+00, 0.3798900E+00, &
     & 0.4152800E+00, 0.4434900E+00, 0.4681300E+00, 0.4996900E+00, &
     & 0.5168600E+00, 0.5195700E+00, 0.4545000E+00, 0.4545000E+00 /
      data (ref_adm(10,iz,36,14),iz = 1,20) / &
     & 0.2481800E+00, 0.2481800E+00, 0.2474300E+00, 0.2504000E+00, &
     & 0.2630100E+00, 0.2782100E+00, 0.3029900E+00, 0.3110700E+00, &
     & 0.3302400E+00, 0.3472800E+00, 0.3690100E+00, 0.3931400E+00, &
     & 0.4216000E+00, 0.4644100E+00, 0.4871500E+00, 0.5138000E+00, &
     & 0.5247800E+00, 0.5224300E+00, 0.4396300E+00, 0.4396300E+00 /
      data (ref_adm(10,iz,37,14),iz = 1,20) / &
     & 0.2527500E+00, 0.2527500E+00, 0.2509100E+00, 0.2583200E+00, &
     & 0.2639600E+00, 0.2704900E+00, 0.2874900E+00, 0.3208900E+00, &
     & 0.3396500E+00, 0.3517200E+00, 0.3623600E+00, 0.3883500E+00, &
     & 0.4126000E+00, 0.4733000E+00, 0.5055100E+00, 0.5212100E+00, &
     & 0.5299500E+00, 0.5300700E+00, 0.4541400E+00, 0.4541400E+00 /
      data (ref_adm(10,iz,38,14),iz = 1,20) / &
     & 0.2527500E+00, 0.2527500E+00, 0.2509100E+00, 0.2583200E+00, &
     & 0.2639600E+00, 0.2704900E+00, 0.2874900E+00, 0.3208900E+00, &
     & 0.3396500E+00, 0.3517200E+00, 0.3623600E+00, 0.3883500E+00, &
     & 0.4126000E+00, 0.4733000E+00, 0.5055100E+00, 0.5212100E+00, &
     & 0.5299500E+00, 0.5300700E+00, 0.4541400E+00, 0.4541400E+00 /
! Solar Zenith Angle 70.0 Albedo  0.3520407E+00
      data (ref_adm(10,iz, 1,15),iz = 1,20) / &
     & 0.2344500E+00, 0.2344500E+00, 0.2406700E+00, 0.2420300E+00, &
     & 0.2552900E+00, 0.2549100E+00, 0.2669900E+00, 0.2804500E+00, &
     & 0.3147200E+00, 0.3443200E+00, 0.3772500E+00, 0.4647200E+00, &
     & 0.5336000E+00, 0.6758000E+00, 0.8465900E+00, 0.1112700E+01, &
     & 0.1219504E+01, 0.2080547E+01, 0.2600642E+01, 0.2600642E+01 /
      data (ref_adm(10,iz, 2,15),iz = 1,20) / &
     & 0.2344500E+00, 0.2344500E+00, 0.2406700E+00, 0.2420300E+00, &
     & 0.2552900E+00, 0.2549100E+00, 0.2669900E+00, 0.2804500E+00, &
     & 0.3147200E+00, 0.3443200E+00, 0.3772500E+00, 0.4647200E+00, &
     & 0.5336000E+00, 0.6758000E+00, 0.8465900E+00, 0.1112700E+01, &
     & 0.1219504E+01, 0.2080547E+01, 0.2600642E+01, 0.2600642E+01 /
      data (ref_adm(10,iz, 3,15),iz = 1,20) / &
     & 0.2429100E+00, 0.2429100E+00, 0.2438600E+00, 0.2466500E+00, &
     & 0.2417600E+00, 0.2504300E+00, 0.2602700E+00, 0.2840500E+00, &
     & 0.3045500E+00, 0.3360600E+00, 0.3841000E+00, 0.4279200E+00, &
     & 0.5248300E+00, 0.6503300E+00, 0.7461000E+00, 0.8345200E+00, &
     & 0.1175865E+01, 0.1921411E+01, 0.4002479E-07, 0.4002479E-07 /
      data (ref_adm(10,iz, 4,15),iz = 1,20) / &
     & 0.2297900E+00, 0.2297900E+00, 0.2353100E+00, 0.2414300E+00, &
     & 0.2461900E+00, 0.2605200E+00, 0.2534700E+00, 0.2845700E+00, &
     & 0.3109600E+00, 0.3458400E+00, 0.3665300E+00, 0.4157700E+00, &
     & 0.4841800E+00, 0.5923500E+00, 0.6785400E+00, 0.7867800E+00, &
     & 0.1049200E+01, 0.1657928E+01, 0.2153841E+01, 0.2153841E+01 /
      data (ref_adm(10,iz, 5,15),iz = 1,20) / &
     & 0.2381600E+00, 0.2381600E+00, 0.2421200E+00, 0.2405000E+00, &
     & 0.2553400E+00, 0.2591400E+00, 0.2702600E+00, 0.2865100E+00, &
     & 0.3042100E+00, 0.3318200E+00, 0.3685900E+00, 0.4271000E+00, &
     & 0.4748700E+00, 0.5436900E+00, 0.6347500E+00, 0.7799000E+00, &
     & 0.1153700E+01, 0.1391845E+01, 0.1613377E+01, 0.1613377E+01 /
      data (ref_adm(10,iz, 6,15),iz = 1,20) / &
     & 0.2327400E+00, 0.2327400E+00, 0.2356400E+00, 0.2364400E+00, &
     & 0.2395400E+00, 0.2489100E+00, 0.2610500E+00, 0.2860300E+00, &
     & 0.3056100E+00, 0.3425300E+00, 0.3766200E+00, 0.4350300E+00, &
     & 0.4923500E+00, 0.5772300E+00, 0.6674500E+00, 0.8349200E+00, &
     & 0.1037900E+01, 0.1161800E+01, 0.1119500E+01, 0.1119500E+01 /
      data (ref_adm(10,iz, 7,15),iz = 1,20) / &
     & 0.2360400E+00, 0.2360400E+00, 0.2435000E+00, 0.2379100E+00, &
     & 0.2436500E+00, 0.2526400E+00, 0.2555900E+00, 0.2805800E+00, &
     & 0.2946600E+00, 0.3222500E+00, 0.3414800E+00, 0.3926600E+00, &
     & 0.4422400E+00, 0.5148500E+00, 0.6191000E+00, 0.7467000E+00, &
     & 0.9107000E+00, 0.1000600E+01, 0.9946100E+00, 0.9946100E+00 /
      data (ref_adm(10,iz, 8,15),iz = 1,20) / &
     & 0.2372200E+00, 0.2372200E+00, 0.2309800E+00, 0.2362700E+00, &
     & 0.2364600E+00, 0.2458200E+00, 0.2563000E+00, 0.2685300E+00, &
     & 0.2850400E+00, 0.3095200E+00, 0.3367200E+00, 0.3886500E+00, &
     & 0.4287200E+00, 0.4939400E+00, 0.5566300E+00, 0.7120100E+00, &
     & 0.8351800E+00, 0.8533300E+00, 0.8612700E+00, 0.8612700E+00 /
      data (ref_adm(10,iz, 9,15),iz = 1,20) / &
     & 0.2339100E+00, 0.2339100E+00, 0.2335100E+00, 0.2422400E+00, &
     & 0.2351000E+00, 0.2328100E+00, 0.2498800E+00, 0.2588800E+00, &
     & 0.2861900E+00, 0.3083300E+00, 0.3323500E+00, 0.3833600E+00, &
     & 0.3985100E+00, 0.4747300E+00, 0.5221500E+00, 0.6534200E+00, &
     & 0.7793100E+00, 0.7629500E+00, 0.6462800E+00, 0.6462800E+00 /
      data (ref_adm(10,iz,10,15),iz = 1,20) / &
     & 0.2333400E+00, 0.2333400E+00, 0.2297700E+00, 0.2331400E+00, &
     & 0.2339200E+00, 0.2413200E+00, 0.2470200E+00, 0.2640700E+00, &
     & 0.2627500E+00, 0.2931200E+00, 0.3187300E+00, 0.3634700E+00, &
     & 0.4033200E+00, 0.4409800E+00, 0.4922200E+00, 0.6060900E+00, &
     & 0.7079800E+00, 0.6916400E+00, 0.5680800E+00, 0.5680800E+00 /
      data (ref_adm(10,iz,11,15),iz = 1,20) / &
     & 0.2321300E+00, 0.2321300E+00, 0.2313300E+00, 0.2194900E+00, &
     & 0.2438600E+00, 0.2401800E+00, 0.2476200E+00, 0.2516000E+00, &
     & 0.2838100E+00, 0.2826600E+00, 0.3056600E+00, 0.3264900E+00, &
     & 0.3676600E+00, 0.4306800E+00, 0.4589300E+00, 0.5521700E+00, &
     & 0.6225100E+00, 0.6294500E+00, 0.5322900E+00, 0.5322900E+00 /
      data (ref_adm(10,iz,12,15),iz = 1,20) / &
     & 0.2398200E+00, 0.2398200E+00, 0.2356600E+00, 0.2347800E+00, &
     & 0.2329500E+00, 0.2465500E+00, 0.2496400E+00, 0.2644300E+00, &
     & 0.2681900E+00, 0.2781000E+00, 0.3050500E+00, 0.3160200E+00, &
     & 0.3470100E+00, 0.4024200E+00, 0.4284800E+00, 0.5143500E+00, &
     & 0.5783000E+00, 0.5588700E+00, 0.4916900E+00, 0.4916900E+00 /
      data (ref_adm(10,iz,13,15),iz = 1,20) / &
     & 0.2314300E+00, 0.2314300E+00, 0.2295500E+00, 0.2284700E+00, &
     & 0.2443700E+00, 0.2342500E+00, 0.2573600E+00, 0.2557200E+00, &
     & 0.2622100E+00, 0.2820900E+00, 0.3025800E+00, 0.3086100E+00, &
     & 0.3370600E+00, 0.3740300E+00, 0.4106100E+00, 0.4647800E+00, &
     & 0.5339900E+00, 0.5417800E+00, 0.5014500E+00, 0.5014500E+00 /
      data (ref_adm(10,iz,14,15),iz = 1,20) / &
     & 0.2404300E+00, 0.2404300E+00, 0.2521500E+00, 0.2520100E+00, &
     & 0.2529200E+00, 0.2499300E+00, 0.2619600E+00, 0.2721200E+00, &
     & 0.2752500E+00, 0.2853400E+00, 0.2976400E+00, 0.3095600E+00, &
     & 0.3331300E+00, 0.3587400E+00, 0.3820000E+00, 0.4261600E+00, &
     & 0.4932700E+00, 0.5212300E+00, 0.6060030E+00, 0.6060030E+00 /
      data (ref_adm(10,iz,15,15),iz = 1,20) / &
     & 0.2356100E+00, 0.2356100E+00, 0.2356400E+00, 0.2348200E+00, &
     & 0.2331500E+00, 0.2400900E+00, 0.2439600E+00, 0.2518400E+00, &
     & 0.2586000E+00, 0.2761600E+00, 0.2882900E+00, 0.3069800E+00, &
     & 0.3269300E+00, 0.3503100E+00, 0.3709400E+00, 0.4211700E+00, &
     & 0.4664800E+00, 0.5191100E+00, 0.5875663E+00, 0.5875663E+00 /
      data (ref_adm(10,iz,16,15),iz = 1,20) / &
     & 0.2290300E+00, 0.2290300E+00, 0.2217200E+00, 0.2258500E+00, &
     & 0.2298300E+00, 0.2402100E+00, 0.2448600E+00, 0.2414300E+00, &
     & 0.2485100E+00, 0.2534800E+00, 0.2660800E+00, 0.2757100E+00, &
     & 0.2962100E+00, 0.3161100E+00, 0.3611200E+00, 0.3988700E+00, &
     & 0.4345500E+00, 0.5897177E+00, 0.5679945E+00, 0.5679945E+00 /
      data (ref_adm(10,iz,17,15),iz = 1,20) / &
     & 0.2301800E+00, 0.2301800E+00, 0.2350000E+00, 0.2388900E+00, &
     & 0.2301600E+00, 0.2418100E+00, 0.2489600E+00, 0.2590200E+00, &
     & 0.2624000E+00, 0.2720100E+00, 0.2846100E+00, 0.3043000E+00, &
     & 0.3164500E+00, 0.3301900E+00, 0.3571200E+00, 0.3871600E+00, &
     & 0.4129000E+00, 0.5656580E+00, 0.5459011E+00, 0.5459011E+00 /
      data (ref_adm(10,iz,18,15),iz = 1,20) / &
     & 0.2337400E+00, 0.2337400E+00, 0.2285800E+00, 0.2317300E+00, &
     & 0.2292200E+00, 0.2374300E+00, 0.2430300E+00, 0.2547500E+00, &
     & 0.2537500E+00, 0.2673000E+00, 0.2795600E+00, 0.3093000E+00, &
     & 0.3141400E+00, 0.3173900E+00, 0.3607900E+00, 0.3881400E+00, &
     & 0.4228936E+00, 0.4711858E+00, 0.4993269E+00, 0.4993269E+00 /
      data (ref_adm(10,iz,19,15),iz = 1,20) / &
     & 0.2349400E+00, 0.2349400E+00, 0.2280500E+00, 0.2445500E+00, &
     & 0.2287500E+00, 0.2472300E+00, 0.2375800E+00, 0.2439300E+00, &
     & 0.2571300E+00, 0.2683100E+00, 0.2717700E+00, 0.2806800E+00, &
     & 0.3063400E+00, 0.3255500E+00, 0.3607200E+00, 0.3836400E+00, &
     & 0.4166511E+00, 0.4618019E+00, 0.4877413E+00, 0.4877413E+00 /
      data (ref_adm(10,iz,20,15),iz = 1,20) / &
     & 0.2385000E+00, 0.2385000E+00, 0.2379000E+00, 0.2369200E+00, &
     & 0.2421900E+00, 0.2523500E+00, 0.2567900E+00, 0.2560900E+00, &
     & 0.2665200E+00, 0.2702900E+00, 0.2853400E+00, 0.2920000E+00, &
     & 0.3095200E+00, 0.3255900E+00, 0.3464200E+00, 0.4035700E+00, &
     & 0.4124137E+00, 0.4558676E+00, 0.4810686E+00, 0.4810686E+00 /
      data (ref_adm(10,iz,21,15),iz = 1,20) / &
     & 0.2423700E+00, 0.2423700E+00, 0.2321500E+00, 0.2378700E+00, &
     & 0.2486200E+00, 0.2403200E+00, 0.2462100E+00, 0.2601300E+00, &
     & 0.2516700E+00, 0.2757500E+00, 0.2770700E+00, 0.2905300E+00, &
     & 0.3085500E+00, 0.3218500E+00, 0.3460000E+00, 0.4356500E+00, &
     & 0.4090908E+00, 0.4510990E+00, 0.4770170E+00, 0.4770170E+00 /
      data (ref_adm(10,iz,22,15),iz = 1,20) / &
     & 0.2317000E+00, 0.2317000E+00, 0.2406800E+00, 0.2408700E+00, &
     & 0.2445700E+00, 0.2370400E+00, 0.2475100E+00, 0.2724300E+00, &
     & 0.2620800E+00, 0.2818100E+00, 0.2882500E+00, 0.2973200E+00, &
     & 0.3055700E+00, 0.3340600E+00, 0.3404700E+00, 0.3913300E+00, &
     & 0.4064133E+00, 0.4311019E+00, 0.4356866E+00, 0.4356866E+00 /
      data (ref_adm(10,iz,23,15),iz = 1,20) / &
     & 0.2382100E+00, 0.2382100E+00, 0.2388000E+00, 0.2373100E+00, &
     & 0.2439600E+00, 0.2426300E+00, 0.2423700E+00, 0.2608400E+00, &
     & 0.2763200E+00, 0.2754100E+00, 0.2838300E+00, 0.2853100E+00, &
     & 0.3181100E+00, 0.3366900E+00, 0.3505700E+00, 0.3638300E+00, &
     & 0.4052211E+00, 0.4289991E+00, 0.4363473E+00, 0.4363473E+00 /
      data (ref_adm(10,iz,24,15),iz = 1,20) / &
     & 0.2251100E+00, 0.2251100E+00, 0.2275500E+00, 0.2305200E+00, &
     & 0.2346900E+00, 0.2392200E+00, 0.2489000E+00, 0.2533800E+00, &
     & 0.2608300E+00, 0.2709100E+00, 0.2783300E+00, 0.2909800E+00, &
     & 0.3064500E+00, 0.3286300E+00, 0.3538600E+00, 0.3837500E+00, &
     & 0.3923400E+00, 0.4294946E+00, 0.4399601E+00, 0.4399601E+00 /
      data (ref_adm(10,iz,25,15),iz = 1,20) / &
     & 0.2361100E+00, 0.2361100E+00, 0.2425000E+00, 0.2469800E+00, &
     & 0.2534100E+00, 0.2628400E+00, 0.2686000E+00, 0.2750700E+00, &
     & 0.2858800E+00, 0.2968500E+00, 0.3069300E+00, 0.3197300E+00, &
     & 0.3340200E+00, 0.3531700E+00, 0.3678900E+00, 0.4067700E+00, &
     & 0.4313200E+00, 0.4315914E+00, 0.4453781E+00, 0.4453781E+00 /
      data (ref_adm(10,iz,26,15),iz = 1,20) / &
     & 0.2445900E+00, 0.2445900E+00, 0.2396300E+00, 0.2303600E+00, &
     & 0.2512000E+00, 0.2566600E+00, 0.2636000E+00, 0.2805400E+00, &
     & 0.2932600E+00, 0.2941500E+00, 0.3143100E+00, 0.3316600E+00, &
     & 0.3537100E+00, 0.3748900E+00, 0.3776600E+00, 0.4040500E+00, &
     & 0.4408900E+00, 0.4808500E+00, 0.4546437E+00, 0.4546437E+00 /
      data (ref_adm(10,iz,27,15),iz = 1,20) / &
     & 0.2380100E+00, 0.2380100E+00, 0.2368500E+00, 0.2286800E+00, &
     & 0.2423900E+00, 0.2610700E+00, 0.2631600E+00, 0.2880200E+00, &
     & 0.2834900E+00, 0.2974000E+00, 0.3155200E+00, 0.3158700E+00, &
     & 0.3462600E+00, 0.3677100E+00, 0.3962400E+00, 0.4135200E+00, &
     & 0.4538400E+00, 0.4877200E+00, 0.3881400E+00, 0.3881400E+00 /
      data (ref_adm(10,iz,28,15),iz = 1,20) / &
     & 0.2386900E+00, 0.2386900E+00, 0.2437600E+00, 0.2445800E+00, &
     & 0.2484900E+00, 0.2590200E+00, 0.2728800E+00, 0.2789400E+00, &
     & 0.2911900E+00, 0.3072400E+00, 0.3184300E+00, 0.3366200E+00, &
     & 0.3478100E+00, 0.3745700E+00, 0.4112500E+00, 0.4432900E+00, &
     & 0.4722700E+00, 0.4922800E+00, 0.4611500E+00, 0.4611500E+00 /
      data (ref_adm(10,iz,29,15),iz = 1,20) / &
     & 0.2403300E+00, 0.2403300E+00, 0.2356800E+00, 0.2431500E+00, &
     & 0.2477900E+00, 0.2600100E+00, 0.2761400E+00, 0.2786900E+00, &
     & 0.2940300E+00, 0.3141100E+00, 0.3320300E+00, 0.3486400E+00, &
     & 0.3733600E+00, 0.4013200E+00, 0.4354400E+00, 0.4676800E+00, &
     & 0.5043000E+00, 0.5144300E+00, 0.4549500E+00, 0.4549500E+00 /
      data (ref_adm(10,iz,30,15),iz = 1,20) / &
     & 0.2314100E+00, 0.2314100E+00, 0.2333200E+00, 0.2486800E+00, &
     & 0.2503500E+00, 0.2648200E+00, 0.2757200E+00, 0.2872600E+00, &
     & 0.3053700E+00, 0.3221200E+00, 0.3439000E+00, 0.3746900E+00, &
     & 0.3930100E+00, 0.4157800E+00, 0.4339100E+00, 0.4778700E+00, &
     & 0.5211500E+00, 0.5397700E+00, 0.4836200E+00, 0.4836200E+00 /
      data (ref_adm(10,iz,31,15),iz = 1,20) / &
     & 0.2276600E+00, 0.2276600E+00, 0.2369000E+00, 0.2510900E+00, &
     & 0.2578900E+00, 0.2559800E+00, 0.2853400E+00, 0.2894400E+00, &
     & 0.3009800E+00, 0.3295500E+00, 0.3494500E+00, 0.3726300E+00, &
     & 0.3970400E+00, 0.4212000E+00, 0.4489600E+00, 0.4889500E+00, &
     & 0.5314900E+00, 0.5637200E+00, 0.5038000E+00, 0.5038000E+00 /
      data (ref_adm(10,iz,32,15),iz = 1,20) / &
     & 0.2407500E+00, 0.2407500E+00, 0.2473500E+00, 0.2520000E+00, &
     & 0.2623900E+00, 0.2650400E+00, 0.2768300E+00, 0.2951900E+00, &
     & 0.3129300E+00, 0.3318200E+00, 0.3560400E+00, 0.3637300E+00, &
     & 0.3960100E+00, 0.4345500E+00, 0.4652900E+00, 0.5037900E+00, &
     & 0.5520900E+00, 0.5794600E+00, 0.5144300E+00, 0.5144300E+00 /
      data (ref_adm(10,iz,33,15),iz = 1,20) / &
     & 0.2361800E+00, 0.2361800E+00, 0.2323100E+00, 0.2392200E+00, &
     & 0.2476400E+00, 0.2595800E+00, 0.2733900E+00, 0.2977700E+00, &
     & 0.3107700E+00, 0.3288300E+00, 0.3478700E+00, 0.3681000E+00, &
     & 0.3967000E+00, 0.4334000E+00, 0.4706100E+00, 0.5133800E+00, &
     & 0.5618800E+00, 0.5796000E+00, 0.5071300E+00, 0.5071300E+00 /
      data (ref_adm(10,iz,34,15),iz = 1,20) / &
     & 0.2342800E+00, 0.2342800E+00, 0.2395300E+00, 0.2502200E+00, &
     & 0.2528300E+00, 0.2650300E+00, 0.2915700E+00, 0.2986300E+00, &
     & 0.3278600E+00, 0.3377000E+00, 0.3597900E+00, 0.3805800E+00, &
     & 0.4211600E+00, 0.4568200E+00, 0.4856900E+00, 0.5287800E+00, &
     & 0.5678100E+00, 0.5862800E+00, 0.5133200E+00, 0.5133200E+00 /
      data (ref_adm(10,iz,35,15),iz = 1,20) / &
     & 0.2492100E+00, 0.2492100E+00, 0.2416000E+00, 0.2465500E+00, &
     & 0.2474900E+00, 0.2771800E+00, 0.2751300E+00, 0.3001300E+00, &
     & 0.3107800E+00, 0.3400400E+00, 0.3585900E+00, 0.3926500E+00, &
     & 0.4244500E+00, 0.4633800E+00, 0.5036400E+00, 0.5491500E+00, &
     & 0.5854600E+00, 0.6067400E+00, 0.5180800E+00, 0.5180800E+00 /
      data (ref_adm(10,iz,36,15),iz = 1,20) / &
     & 0.2402700E+00, 0.2402700E+00, 0.2304900E+00, 0.2531400E+00, &
     & 0.2651200E+00, 0.2671300E+00, 0.2849800E+00, 0.2979600E+00, &
     & 0.3227900E+00, 0.3499700E+00, 0.3724400E+00, 0.3941800E+00, &
     & 0.4423300E+00, 0.4744700E+00, 0.5220100E+00, 0.5695600E+00, &
     & 0.5997100E+00, 0.6064200E+00, 0.5267900E+00, 0.5267900E+00 /
      data (ref_adm(10,iz,37,15),iz = 1,20) / &
     & 0.2390900E+00, 0.2390900E+00, 0.2385300E+00, 0.2477800E+00, &
     & 0.2564900E+00, 0.2650000E+00, 0.2771500E+00, 0.2972800E+00, &
     & 0.3274900E+00, 0.3420300E+00, 0.3608300E+00, 0.3927600E+00, &
     & 0.4308200E+00, 0.4808800E+00, 0.5278900E+00, 0.5889000E+00, &
     & 0.6131700E+00, 0.6141300E+00, 0.5232900E+00, 0.5232900E+00 /
      data (ref_adm(10,iz,38,15),iz = 1,20) / &
     & 0.2390900E+00, 0.2390900E+00, 0.2385300E+00, 0.2477800E+00, &
     & 0.2564900E+00, 0.2650000E+00, 0.2771500E+00, 0.2972800E+00, &
     & 0.3274900E+00, 0.3420300E+00, 0.3608300E+00, 0.3927600E+00, &
     & 0.4308200E+00, 0.4808800E+00, 0.5278900E+00, 0.5889000E+00, &
     & 0.6131700E+00, 0.6141300E+00, 0.5232900E+00, 0.5232900E+00 /
! Solar Zenith Angle 75.0 Albedo  0.3906203E+00
      data (ref_adm(10,iz, 1,16),iz = 1,20) / &
     & 0.2640400E+00, 0.2640400E+00, 0.2500000E+00, 0.2605900E+00, &
     & 0.2546200E+00, 0.2550200E+00, 0.2775700E+00, 0.3189500E+00, &
     & 0.3352000E+00, 0.3808900E+00, 0.4507200E+00, 0.5182100E+00, &
     & 0.6345500E+00, 0.7072600E+00, 0.9020653E+00, 0.1509645E+01, &
     & 0.2691432E+01, 0.2189150E+01, 0.2529647E+01, 0.2529647E+01 /
      data (ref_adm(10,iz, 2,16),iz = 1,20) / &
     & 0.2640400E+00, 0.2640400E+00, 0.2500000E+00, 0.2605900E+00, &
     & 0.2546200E+00, 0.2550200E+00, 0.2775700E+00, 0.3189500E+00, &
     & 0.3352000E+00, 0.3808900E+00, 0.4507200E+00, 0.5182100E+00, &
     & 0.6345500E+00, 0.7072600E+00, 0.9020653E+00, 0.1509645E+01, &
     & 0.2691432E+01, 0.2189150E+01, 0.2529647E+01, 0.2529647E+01 /
      data (ref_adm(10,iz, 3,16),iz = 1,20) / &
     & 0.2556500E+00, 0.2556500E+00, 0.2499300E+00, 0.2403100E+00, &
     & 0.2569700E+00, 0.2447100E+00, 0.2705100E+00, 0.3024800E+00, &
     & 0.3417100E+00, 0.3868100E+00, 0.4638100E+00, 0.5505400E+00, &
     & 0.6040900E+00, 0.7147600E+00, 0.8758779E+00, 0.1416192E+01, &
     & 0.2658012E+01, 0.2304950E+01, 0.7441444E+00, 0.7441444E+00 /
      data (ref_adm(10,iz, 4,16),iz = 1,20) / &
     & 0.2582800E+00, 0.2582800E+00, 0.2513200E+00, 0.2360300E+00, &
     & 0.2412900E+00, 0.2725500E+00, 0.2896700E+00, 0.3121500E+00, &
     & 0.3240700E+00, 0.3952500E+00, 0.4333100E+00, 0.4937800E+00, &
     & 0.5767800E+00, 0.5833900E+00, 0.8275524E+00, 0.1253297E+01, &
     & 0.2214269E+01, 0.2958898E+01, 0.2307312E+01, 0.2307312E+01 /
      data (ref_adm(10,iz, 5,16),iz = 1,20) / &
     & 0.2398400E+00, 0.2398400E+00, 0.2451400E+00, 0.2553400E+00, &
     & 0.2556000E+00, 0.2699300E+00, 0.2868500E+00, 0.3158100E+00, &
     & 0.3510000E+00, 0.3699700E+00, 0.4112600E+00, 0.4923700E+00, &
     & 0.5191700E+00, 0.6258000E+00, 0.7681175E+00, 0.1087814E+01, &
     & 0.1676781E+01, 0.3328075E+01, 0.3483764E+01, 0.3483764E+01 /
      data (ref_adm(10,iz, 6,16),iz = 1,20) / &
     & 0.2311500E+00, 0.2311500E+00, 0.2293600E+00, 0.2329100E+00, &
     & 0.2430000E+00, 0.2655800E+00, 0.2684500E+00, 0.3041900E+00, &
     & 0.3413800E+00, 0.3742000E+00, 0.4134900E+00, 0.4996300E+00, &
     & 0.5743300E+00, 0.7128600E+00, 0.9080500E+00, 0.1124100E+01, &
     & 0.1376900E+01, 0.1584900E+01, 0.3561031E+01, 0.3561031E+01 /
      data (ref_adm(10,iz, 7,16),iz = 1,20) / &
     & 0.2439600E+00, 0.2439600E+00, 0.2332300E+00, 0.2430200E+00, &
     & 0.2528600E+00, 0.2816000E+00, 0.2852400E+00, 0.3150500E+00, &
     & 0.3162200E+00, 0.3351100E+00, 0.3811500E+00, 0.4554600E+00, &
     & 0.5275000E+00, 0.6660600E+00, 0.7822200E+00, 0.9664500E+00, &
     & 0.1161800E+01, 0.1315000E+01, 0.1338000E+01, 0.1338000E+01 /
      data (ref_adm(10,iz, 8,16),iz = 1,20) / &
     & 0.2336400E+00, 0.2336400E+00, 0.2488900E+00, 0.2368300E+00, &
     & 0.2674100E+00, 0.2576800E+00, 0.2961200E+00, 0.3061300E+00, &
     & 0.3072800E+00, 0.3348200E+00, 0.3726000E+00, 0.4035700E+00, &
     & 0.4854000E+00, 0.5836400E+00, 0.7374000E+00, 0.8541400E+00, &
     & 0.1060800E+01, 0.1116300E+01, 0.1012600E+01, 0.1012600E+01 /
      data (ref_adm(10,iz, 9,16),iz = 1,20) / &
     & 0.2551400E+00, 0.2551400E+00, 0.2444100E+00, 0.2534900E+00, &
     & 0.2307300E+00, 0.2623600E+00, 0.2791400E+00, 0.2821700E+00, &
     & 0.2838200E+00, 0.3305200E+00, 0.3737900E+00, 0.3932400E+00, &
     & 0.4594800E+00, 0.5481800E+00, 0.6527700E+00, 0.8290600E+00, &
     & 0.9176300E+00, 0.9481800E+00, 0.8803700E+00, 0.8803700E+00 /
      data (ref_adm(10,iz,10,16),iz = 1,20) / &
     & 0.2523300E+00, 0.2523300E+00, 0.2239900E+00, 0.2162800E+00, &
     & 0.2322400E+00, 0.2587700E+00, 0.2684200E+00, 0.2898600E+00, &
     & 0.2819200E+00, 0.3068100E+00, 0.3670800E+00, 0.3785000E+00, &
     & 0.4580500E+00, 0.5078100E+00, 0.5983500E+00, 0.7553600E+00, &
     & 0.8125200E+00, 0.8466300E+00, 0.8027300E+00, 0.8027300E+00 /
      data (ref_adm(10,iz,11,16),iz = 1,20) / &
     & 0.2373000E+00, 0.2373000E+00, 0.2572900E+00, 0.2489600E+00, &
     & 0.2481800E+00, 0.2494700E+00, 0.2634000E+00, 0.2693400E+00, &
     & 0.2935200E+00, 0.3074500E+00, 0.3290300E+00, 0.3758500E+00, &
     & 0.4251800E+00, 0.4776500E+00, 0.5598300E+00, 0.6381300E+00, &
     & 0.7374000E+00, 0.7628500E+00, 0.6069100E+00, 0.6069100E+00 /
      data (ref_adm(10,iz,12,16),iz = 1,20) / &
     & 0.2391900E+00, 0.2391900E+00, 0.2451700E+00, 0.2338300E+00, &
     & 0.2434200E+00, 0.2417700E+00, 0.2502200E+00, 0.2753100E+00, &
     & 0.2763600E+00, 0.3030100E+00, 0.3153300E+00, 0.3822200E+00, &
     & 0.4110600E+00, 0.4634500E+00, 0.5261200E+00, 0.5972700E+00, &
     & 0.6501500E+00, 0.6802700E+00, 0.1085294E+01, 0.1085294E+01 /
      data (ref_adm(10,iz,13,16),iz = 1,20) / &
     & 0.2348000E+00, 0.2348000E+00, 0.2352700E+00, 0.2332100E+00, &
     & 0.2367800E+00, 0.2288000E+00, 0.2287600E+00, 0.2830300E+00, &
     & 0.2678700E+00, 0.2938900E+00, 0.3003900E+00, 0.3680700E+00, &
     & 0.3890300E+00, 0.4348900E+00, 0.4467300E+00, 0.5606200E+00, &
     & 0.6175200E+00, 0.6265600E+00, 0.1017471E+01, 0.1017471E+01 /
      data (ref_adm(10,iz,14,16),iz = 1,20) / &
     & 0.2425300E+00, 0.2425300E+00, 0.2487000E+00, 0.2626600E+00, &
     & 0.2585500E+00, 0.2582300E+00, 0.2508100E+00, 0.2585400E+00, &
     & 0.2836200E+00, 0.2786900E+00, 0.3120900E+00, 0.3498200E+00, &
     & 0.3675300E+00, 0.4089200E+00, 0.4373700E+00, 0.5070400E+00, &
     & 0.5561900E+00, 0.6050400E+00, 0.9698587E+00, 0.9698587E+00 /
      data (ref_adm(10,iz,15,16),iz = 1,20) / &
     & 0.2374900E+00, 0.2374900E+00, 0.2394300E+00, 0.2397300E+00, &
     & 0.2420900E+00, 0.2487100E+00, 0.2511300E+00, 0.2626200E+00, &
     & 0.2695800E+00, 0.2837000E+00, 0.3016800E+00, 0.3225800E+00, &
     & 0.3478100E+00, 0.3816600E+00, 0.4206700E+00, 0.4902400E+00, &
     & 0.5174300E+00, 0.3990400E+00, 0.9322009E+00, 0.9322009E+00 /
      data (ref_adm(10,iz,16,16),iz = 1,20) / &
     & 0.2437400E+00, 0.2437400E+00, 0.2297600E+00, 0.2347200E+00, &
     & 0.2360400E+00, 0.2418300E+00, 0.2408200E+00, 0.2482400E+00, &
     & 0.2554300E+00, 0.2668000E+00, 0.2779600E+00, 0.2960700E+00, &
     & 0.3187100E+00, 0.3444300E+00, 0.4047800E+00, 0.4572500E+00, &
     & 0.5066400E+00, 0.7185678E+00, 0.8999099E+00, 0.8999099E+00 /
      data (ref_adm(10,iz,17,16),iz = 1,20) / &
     & 0.2377700E+00, 0.2377700E+00, 0.2369100E+00, 0.2373100E+00, &
     & 0.2408400E+00, 0.2462400E+00, 0.2304000E+00, 0.2451100E+00, &
     & 0.2611600E+00, 0.2841100E+00, 0.2969600E+00, 0.3161900E+00, &
     & 0.3269500E+00, 0.3496700E+00, 0.3874500E+00, 0.4323000E+00, &
     & 0.5212600E+00, 0.6910865E+00, 0.8641565E+00, 0.8641565E+00 /
      data (ref_adm(10,iz,18,16),iz = 1,20) / &
     & 0.2416000E+00, 0.2416000E+00, 0.2258900E+00, 0.2459200E+00, &
     & 0.2586100E+00, 0.2524100E+00, 0.2394900E+00, 0.2638900E+00, &
     & 0.2649000E+00, 0.2891600E+00, 0.3039200E+00, 0.3142800E+00, &
     & 0.3296100E+00, 0.3604900E+00, 0.3785700E+00, 0.4049600E+00, &
     & 0.4621316E+00, 0.5170938E+00, 0.5528136E+00, 0.5528136E+00 /
      data (ref_adm(10,iz,19,16),iz = 1,20) / &
     & 0.2442200E+00, 0.2442200E+00, 0.2368700E+00, 0.2413000E+00, &
     & 0.2427700E+00, 0.2530800E+00, 0.2385700E+00, 0.2550000E+00, &
     & 0.2669400E+00, 0.2812700E+00, 0.3055800E+00, 0.3379000E+00, &
     & 0.3207500E+00, 0.3427000E+00, 0.3857200E+00, 0.4330600E+00, &
     & 0.4541691E+00, 0.5057262E+00, 0.5393121E+00, 0.5393121E+00 /
      data (ref_adm(10,iz,20,16),iz = 1,20) / &
     & 0.2469400E+00, 0.2469400E+00, 0.2670600E+00, 0.2502700E+00, &
     & 0.2371300E+00, 0.2415000E+00, 0.2531400E+00, 0.2557200E+00, &
     & 0.2717000E+00, 0.2816600E+00, 0.3021000E+00, 0.3130600E+00, &
     & 0.3105200E+00, 0.3394700E+00, 0.3694900E+00, 0.4105298E+00, &
     & 0.4485702E+00, 0.4984406E+00, 0.5313861E+00, 0.5313861E+00 /
      data (ref_adm(10,iz,21,16),iz = 1,20) / &
     & 0.2357400E+00, 0.2357400E+00, 0.2509500E+00, 0.2665700E+00, &
     & 0.2595800E+00, 0.2507100E+00, 0.2403500E+00, 0.2751800E+00, &
     & 0.2671900E+00, 0.2837800E+00, 0.2976100E+00, 0.3129900E+00, &
     & 0.3097100E+00, 0.3440300E+00, 0.3737200E+00, 0.4070731E+00, &
     & 0.4440857E+00, 0.4925487E+00, 0.5265928E+00, 0.5265928E+00 /
      data (ref_adm(10,iz,22,16),iz = 1,20) / &
     & 0.2433800E+00, 0.2433800E+00, 0.2378200E+00, 0.2421000E+00, &
     & 0.2554700E+00, 0.2662600E+00, 0.2583800E+00, 0.2602800E+00, &
     & 0.2785800E+00, 0.2873900E+00, 0.3050400E+00, 0.3053900E+00, &
     & 0.3123500E+00, 0.3619900E+00, 0.3683100E+00, 0.4347800E+00, &
     & 0.4067858E+00, 0.4178982E+00, 0.4514327E+00, 0.4514327E+00 /
      data (ref_adm(10,iz,23,16),iz = 1,20) / &
     & 0.2189700E+00, 0.2189700E+00, 0.2212700E+00, 0.2301600E+00, &
     & 0.2398800E+00, 0.2455200E+00, 0.2423600E+00, 0.2500000E+00, &
     & 0.2700300E+00, 0.2849100E+00, 0.2981500E+00, 0.3070400E+00, &
     & 0.3283900E+00, 0.3570700E+00, 0.3762600E+00, 0.4190200E+00, &
     & 0.4080075E+00, 0.4205832E+00, 0.4594665E+00, 0.4594665E+00 /
      data (ref_adm(10,iz,24,16),iz = 1,20) / &
     & 0.2346100E+00, 0.2346100E+00, 0.2341300E+00, 0.2436300E+00, &
     & 0.2528200E+00, 0.2541200E+00, 0.2573000E+00, 0.2679900E+00, &
     & 0.2765200E+00, 0.2856400E+00, 0.2955700E+00, 0.3128700E+00, &
     & 0.3308900E+00, 0.3506300E+00, 0.3732900E+00, 0.4208100E+00, &
     & 0.5274700E+00, 0.4280826E+00, 0.4717467E+00, 0.4717467E+00 /
      data (ref_adm(10,iz,25,16),iz = 1,20) / &
     & 0.2433600E+00, 0.2433600E+00, 0.2479600E+00, 0.2495900E+00, &
     & 0.2579200E+00, 0.2662200E+00, 0.2713900E+00, 0.2758400E+00, &
     & 0.2859100E+00, 0.3009100E+00, 0.3139000E+00, 0.3287300E+00, &
     & 0.3486000E+00, 0.3789500E+00, 0.3920000E+00, 0.4415600E+00, &
     & 0.5053400E+00, 0.4408269E+00, 0.4877104E+00, 0.4877104E+00 /
      data (ref_adm(10,iz,26,16),iz = 1,20) / &
     & 0.2409000E+00, 0.2409000E+00, 0.2580000E+00, 0.2618100E+00, &
     & 0.2624700E+00, 0.2610700E+00, 0.2749800E+00, 0.2791300E+00, &
     & 0.2858700E+00, 0.2898100E+00, 0.3180200E+00, 0.3272500E+00, &
     & 0.3491800E+00, 0.3960400E+00, 0.4093600E+00, 0.4526900E+00, &
     & 0.4893100E+00, 0.5630900E+00, 0.5079003E+00, 0.5079003E+00 /
      data (ref_adm(10,iz,27,16),iz = 1,20) / &
     & 0.2446200E+00, 0.2446200E+00, 0.2640200E+00, 0.2337100E+00, &
     & 0.2430300E+00, 0.2438600E+00, 0.2579100E+00, 0.2811800E+00, &
     & 0.2878100E+00, 0.2928900E+00, 0.3045500E+00, 0.3284100E+00, &
     & 0.3615500E+00, 0.4005600E+00, 0.4199900E+00, 0.4571000E+00, &
     & 0.5140600E+00, 0.5765100E+00, 0.5294142E+00, 0.5294142E+00 /
      data (ref_adm(10,iz,28,16),iz = 1,20) / &
     & 0.2438400E+00, 0.2438400E+00, 0.2522100E+00, 0.2384100E+00, &
     & 0.2566600E+00, 0.2437700E+00, 0.2676100E+00, 0.2999200E+00, &
     & 0.3086500E+00, 0.2961500E+00, 0.3209200E+00, 0.3456300E+00, &
     & 0.3665300E+00, 0.3924000E+00, 0.4272700E+00, 0.4844200E+00, &
     & 0.5391300E+00, 0.5808200E+00, 0.5496600E+00, 0.5496600E+00 /
      data (ref_adm(10,iz,29,16),iz = 1,20) / &
     & 0.2503600E+00, 0.2503600E+00, 0.2373600E+00, 0.2335400E+00, &
     & 0.2536600E+00, 0.2718600E+00, 0.2634800E+00, 0.2801700E+00, &
     & 0.3161600E+00, 0.3139300E+00, 0.3564400E+00, 0.3509000E+00, &
     & 0.3852200E+00, 0.4265700E+00, 0.4501000E+00, 0.5157800E+00, &
     & 0.5578600E+00, 0.5893100E+00, 0.5537600E+00, 0.5537600E+00 /
      data (ref_adm(10,iz,30,16),iz = 1,20) / &
     & 0.2400100E+00, 0.2400100E+00, 0.2217500E+00, 0.2515500E+00, &
     & 0.2412000E+00, 0.2723800E+00, 0.2730000E+00, 0.2843000E+00, &
     & 0.3235200E+00, 0.3335400E+00, 0.3441500E+00, 0.3792300E+00, &
     & 0.4025900E+00, 0.4389800E+00, 0.4720600E+00, 0.5467700E+00, &
     & 0.5858800E+00, 0.6374400E+00, 0.5590500E+00, 0.5590500E+00 /
      data (ref_adm(10,iz,31,16),iz = 1,20) / &
     & 0.2423200E+00, 0.2423200E+00, 0.2476200E+00, 0.2381400E+00, &
     & 0.2469900E+00, 0.2771500E+00, 0.2820900E+00, 0.2899700E+00, &
     & 0.3183300E+00, 0.3281400E+00, 0.3546500E+00, 0.3936300E+00, &
     & 0.4176100E+00, 0.4561200E+00, 0.4892300E+00, 0.5462000E+00, &
     & 0.6077900E+00, 0.6551500E+00, 0.5878100E+00, 0.5878100E+00 /
      data (ref_adm(10,iz,32,16),iz = 1,20) / &
     & 0.2441500E+00, 0.2441500E+00, 0.2312400E+00, 0.2333700E+00, &
     & 0.2546100E+00, 0.2655800E+00, 0.2702700E+00, 0.2968900E+00, &
     & 0.3105500E+00, 0.3384700E+00, 0.3655700E+00, 0.3994400E+00, &
     & 0.4344200E+00, 0.4643400E+00, 0.4972100E+00, 0.5684900E+00, &
     & 0.6324200E+00, 0.6717900E+00, 0.6207200E+00, 0.6207200E+00 /
      data (ref_adm(10,iz,33,16),iz = 1,20) / &
     & 0.2397500E+00, 0.2397500E+00, 0.2258400E+00, 0.2484800E+00, &
     & 0.2574200E+00, 0.2689600E+00, 0.2869500E+00, 0.2980300E+00, &
     & 0.3181200E+00, 0.3496700E+00, 0.3700600E+00, 0.3873500E+00, &
     & 0.4291300E+00, 0.4689000E+00, 0.5112100E+00, 0.5723100E+00, &
     & 0.6433800E+00, 0.6854500E+00, 0.6229900E+00, 0.6229900E+00 /
      data (ref_adm(10,iz,34,16),iz = 1,20) / &
     & 0.2476000E+00, 0.2476000E+00, 0.2403100E+00, 0.2366900E+00, &
     & 0.2623400E+00, 0.2824000E+00, 0.3057200E+00, 0.3043000E+00, &
     & 0.3430700E+00, 0.3626200E+00, 0.3808900E+00, 0.3920900E+00, &
     & 0.4292000E+00, 0.4668000E+00, 0.5203400E+00, 0.5738700E+00, &
     & 0.6657300E+00, 0.6922100E+00, 0.6335400E+00, 0.6335400E+00 /
      data (ref_adm(10,iz,35,16),iz = 1,20) / &
     & 0.2516800E+00, 0.2516800E+00, 0.2462700E+00, 0.2480900E+00, &
     & 0.2493900E+00, 0.2909600E+00, 0.3061900E+00, 0.3162600E+00, &
     & 0.3236400E+00, 0.3578100E+00, 0.3735500E+00, 0.4077200E+00, &
     & 0.4467000E+00, 0.4918000E+00, 0.5357300E+00, 0.5912700E+00, &
     & 0.6616900E+00, 0.7320000E+00, 0.6278400E+00, 0.6278400E+00 /
      data (ref_adm(10,iz,36,16),iz = 1,20) / &
     & 0.2415500E+00, 0.2415500E+00, 0.2471700E+00, 0.2650100E+00, &
     & 0.2725400E+00, 0.2752500E+00, 0.2834200E+00, 0.3136600E+00, &
     & 0.3453700E+00, 0.3538200E+00, 0.3692000E+00, 0.4121800E+00, &
     & 0.4513800E+00, 0.4981400E+00, 0.5364900E+00, 0.6106000E+00, &
     & 0.7021900E+00, 0.7314900E+00, 0.6382300E+00, 0.6382300E+00 /
      data (ref_adm(10,iz,37,16),iz = 1,20) / &
     & 0.2501300E+00, 0.2501300E+00, 0.2642800E+00, 0.2692800E+00, &
     & 0.2523000E+00, 0.2623100E+00, 0.2796300E+00, 0.3036700E+00, &
     & 0.3293600E+00, 0.3724800E+00, 0.3806300E+00, 0.4171600E+00, &
     & 0.4488500E+00, 0.5118800E+00, 0.5531900E+00, 0.6432200E+00, &
     & 0.7300500E+00, 0.7352700E+00, 0.6503200E+00, 0.6503200E+00 /
      data (ref_adm(10,iz,38,16),iz = 1,20) / &
     & 0.2501300E+00, 0.2501300E+00, 0.2642800E+00, 0.2692800E+00, &
     & 0.2523000E+00, 0.2623100E+00, 0.2796300E+00, 0.3036700E+00, &
     & 0.3293600E+00, 0.3724800E+00, 0.3806300E+00, 0.4171600E+00, &
     & 0.4488500E+00, 0.5118800E+00, 0.5531900E+00, 0.6432200E+00, &
     & 0.7300500E+00, 0.7352700E+00, 0.6503200E+00, 0.6503200E+00 /
! Solar Zenith Angle 80.0 Albedo  0.4238908E+00
      data (ref_adm(10,iz, 1,17),iz = 1,20) / &
     & 0.2280400E+00, 0.2280400E+00, 0.2374300E+00, 0.2388600E+00, &
     & 0.2386400E+00, 0.2737900E+00, 0.2979900E+00, 0.3240800E+00, &
     & 0.3705600E+00, 0.4327900E+00, 0.4987900E+00, 0.5984800E+00, &
     & 0.6635262E+00, 0.8049697E+00, 0.1144064E+01, 0.2044615E+01, &
     & 0.3860463E+01, 0.3823294E+01, 0.2711315E+01, 0.2711315E+01 /
      data (ref_adm(10,iz, 2,17),iz = 1,20) / &
     & 0.2280400E+00, 0.2280400E+00, 0.2374300E+00, 0.2388600E+00, &
     & 0.2386400E+00, 0.2737900E+00, 0.2979900E+00, 0.3240800E+00, &
     & 0.3705600E+00, 0.4327900E+00, 0.4987900E+00, 0.5984800E+00, &
     & 0.6635262E+00, 0.8049697E+00, 0.1144064E+01, 0.2044615E+01, &
     & 0.3860463E+01, 0.3823294E+01, 0.2711315E+01, 0.2711315E+01 /
      data (ref_adm(10,iz, 3,17),iz = 1,20) / &
     & 0.2349900E+00, 0.2349900E+00, 0.2343100E+00, 0.2407600E+00, &
     & 0.2462100E+00, 0.2554300E+00, 0.2767100E+00, 0.3167700E+00, &
     & 0.3906500E+00, 0.4220800E+00, 0.4759300E+00, 0.6169500E+00, &
     & 0.6580441E+00, 0.7925135E+00, 0.1105501E+01, 0.1904668E+01, &
     & 0.3745295E+01, 0.4116200E+01, 0.4177445E-07, 0.4177445E-07 /
      data (ref_adm(10,iz, 4,17),iz = 1,20) / &
     & 0.2146200E+00, 0.2146200E+00, 0.2471100E+00, 0.2386900E+00, &
     & 0.2668200E+00, 0.2741300E+00, 0.3095400E+00, 0.3445100E+00, &
     & 0.3465400E+00, 0.4000000E+00, 0.4467300E+00, 0.5756200E+00, &
     & 0.6470048E+00, 0.7697654E+00, 0.1035145E+01, 0.1655891E+01, &
     & 0.3053937E+01, 0.4632594E+01, 0.3230650E+01, 0.3230650E+01 /
      data (ref_adm(10,iz, 5,17),iz = 1,20) / &
     & 0.2340900E+00, 0.2340900E+00, 0.2453400E+00, 0.2685200E+00, &
     & 0.2736600E+00, 0.2701400E+00, 0.3017700E+00, 0.3433600E+00, &
     & 0.3777600E+00, 0.4066700E+00, 0.4882800E+00, 0.5772200E+00, &
     & 0.6323041E+00, 0.7441941E+00, 0.9522389E+00, 0.1402393E+01, &
     & 0.2249263E+01, 0.4427951E+01, 0.4447676E+01, 0.4447676E+01 /
      data (ref_adm(10,iz, 6,17),iz = 1,20) / &
     & 0.2409500E+00, 0.2409500E+00, 0.2615700E+00, 0.2700900E+00, &
     & 0.2830200E+00, 0.2830200E+00, 0.3211200E+00, 0.3401800E+00, &
     & 0.3709700E+00, 0.4202900E+00, 0.4748600E+00, 0.5675400E+00, &
     & 0.6944200E+00, 0.8444900E+00, 0.9815500E+00, 0.1212100E+01, &
     & 0.1597700E+01, 0.1877000E+01, 0.3750714E+01, 0.3750714E+01 /
      data (ref_adm(10,iz, 7,17),iz = 1,20) / &
     & 0.2501300E+00, 0.2501300E+00, 0.2361900E+00, 0.2466500E+00, &
     & 0.2426600E+00, 0.2578000E+00, 0.2673000E+00, 0.3113300E+00, &
     & 0.3304300E+00, 0.3580200E+00, 0.4014200E+00, 0.4798100E+00, &
     & 0.7002000E+00, 0.7775500E+00, 0.8798100E+00, 0.1149300E+01, &
     & 0.1518300E+01, 0.1689600E+01, 0.1432400E+01, 0.1432400E+01 /
      data (ref_adm(10,iz, 8,17),iz = 1,20) / &
     & 0.2483600E+00, 0.2483600E+00, 0.2331600E+00, 0.2188200E+00, &
     & 0.2491100E+00, 0.2860200E+00, 0.2820800E+00, 0.3066000E+00, &
     & 0.3555400E+00, 0.3629700E+00, 0.4479000E+00, 0.4732700E+00, &
     & 0.6323100E+00, 0.7628900E+00, 0.9179100E+00, 0.1069800E+01, &
     & 0.1294800E+01, 0.1510000E+01, 0.1195300E+01, 0.1195300E+01 /
      data (ref_adm(10,iz, 9,17),iz = 1,20) / &
     & 0.2479900E+00, 0.2479900E+00, 0.2043800E+00, 0.2364400E+00, &
     & 0.2480200E+00, 0.2808700E+00, 0.2703100E+00, 0.3215700E+00, &
     & 0.3259700E+00, 0.3559100E+00, 0.4174500E+00, 0.4199800E+00, &
     & 0.5728100E+00, 0.6862800E+00, 0.8029400E+00, 0.9365500E+00, &
     & 0.1165400E+01, 0.1262800E+01, 0.1132900E+01, 0.1132900E+01 /
      data (ref_adm(10,iz,10,17),iz = 1,20) / &
     & 0.2508700E+00, 0.2508700E+00, 0.2459200E+00, 0.2436400E+00, &
     & 0.2591800E+00, 0.2491400E+00, 0.2668700E+00, 0.2922900E+00, &
     & 0.3158000E+00, 0.3482700E+00, 0.3840100E+00, 0.3977300E+00, &
     & 0.5440900E+00, 0.6323800E+00, 0.7237700E+00, 0.8634800E+00, &
     & 0.9493700E+00, 0.1054800E+01, 0.1042600E+01, 0.1042600E+01 /
      data (ref_adm(10,iz,11,17),iz = 1,20) / &
     & 0.2491700E+00, 0.2491700E+00, 0.2638300E+00, 0.2515600E+00, &
     & 0.2394400E+00, 0.2844800E+00, 0.2965500E+00, 0.2990200E+00, &
     & 0.3306800E+00, 0.3430300E+00, 0.3537800E+00, 0.4100200E+00, &
     & 0.4888700E+00, 0.5685800E+00, 0.6584200E+00, 0.7642100E+00, &
     & 0.9267700E+00, 0.9233500E+00, 0.9034100E+00, 0.9034100E+00 /
      data (ref_adm(10,iz,12,17),iz = 1,20) / &
     & 0.2408000E+00, 0.2408000E+00, 0.2259800E+00, 0.2184100E+00, &
     & 0.2745800E+00, 0.2370700E+00, 0.2583400E+00, 0.2681500E+00, &
     & 0.2977000E+00, 0.3386700E+00, 0.3462600E+00, 0.3848900E+00, &
     & 0.4487700E+00, 0.4914000E+00, 0.5306600E+00, 0.6416400E+00, &
     & 0.7840300E+00, 0.8089100E+00, 0.9970100E+00, 0.9970100E+00 /
      data (ref_adm(10,iz,13,17),iz = 1,20) / &
     & 0.2187800E+00, 0.2187800E+00, 0.2285700E+00, 0.2241300E+00, &
     & 0.2695600E+00, 0.2538800E+00, 0.2755300E+00, 0.3092700E+00, &
     & 0.3064100E+00, 0.3386700E+00, 0.3478600E+00, 0.3768600E+00, &
     & 0.3890600E+00, 0.4258900E+00, 0.5289200E+00, 0.5909800E+00, &
     & 0.7396900E+00, 0.7458000E+00, 0.9960625E+00, 0.9960625E+00 /
      data (ref_adm(10,iz,14,17),iz = 1,20) / &
     & 0.2198100E+00, 0.2198100E+00, 0.2439100E+00, 0.2598100E+00, &
     & 0.2790900E+00, 0.2713600E+00, 0.2858900E+00, 0.2926000E+00, &
     & 0.3123000E+00, 0.3317700E+00, 0.3369900E+00, 0.3697300E+00, &
     & 0.3982100E+00, 0.4007600E+00, 0.5003600E+00, 0.5672100E+00, &
     & 0.7115700E+00, 0.8333800E+00, 0.9468905E+00, 0.9468905E+00 /
      data (ref_adm(10,iz,15,17),iz = 1,20) / &
     & 0.2224700E+00, 0.2224700E+00, 0.2444900E+00, 0.2448700E+00, &
     & 0.2451000E+00, 0.2573000E+00, 0.2542800E+00, 0.2698100E+00, &
     & 0.2827100E+00, 0.2856400E+00, 0.3069100E+00, 0.3307900E+00, &
     & 0.3485100E+00, 0.3709400E+00, 0.4528000E+00, 0.5047800E+00, &
     & 0.6780500E+00, 0.8319980E+00, 0.9099305E+00, 0.9099305E+00 /
      data (ref_adm(10,iz,16,17),iz = 1,20) / &
     & 0.2545100E+00, 0.2545100E+00, 0.2255700E+00, 0.2291700E+00, &
     & 0.2344500E+00, 0.2401800E+00, 0.2376200E+00, 0.2456500E+00, &
     & 0.2581900E+00, 0.2676600E+00, 0.2768300E+00, 0.3027300E+00, &
     & 0.3257600E+00, 0.3504200E+00, 0.3961800E+00, 0.4797400E+00, &
     & 0.6194800E+00, 0.7991194E+00, 0.8770110E+00, 0.8770110E+00 /
      data (ref_adm(10,iz,17,17),iz = 1,20) / &
     & 0.2405400E+00, 0.2405400E+00, 0.2663300E+00, 0.2492200E+00, &
     & 0.2488600E+00, 0.2579600E+00, 0.2651600E+00, 0.2638000E+00, &
     & 0.2630000E+00, 0.2805600E+00, 0.2961600E+00, 0.3081500E+00, &
     & 0.3421600E+00, 0.3606900E+00, 0.3903900E+00, 0.4464800E+00, &
     & 0.6552486E+00, 0.7603704E+00, 0.8380944E+00, 0.8380944E+00 /
      data (ref_adm(10,iz,18,17),iz = 1,20) / &
     & 0.2437000E+00, 0.2437000E+00, 0.2507700E+00, 0.2562400E+00, &
     & 0.2328100E+00, 0.2916800E+00, 0.2663600E+00, 0.2463100E+00, &
     & 0.2535700E+00, 0.2703900E+00, 0.2809000E+00, 0.2858400E+00, &
     & 0.3238900E+00, 0.3436700E+00, 0.3926000E+00, 0.4179300E+00, &
     & 0.5449970E+00, 0.6534016E+00, 0.7923691E+00, 0.7923691E+00 /
      data (ref_adm(10,iz,19,17),iz = 1,20) / &
     & 0.2294800E+00, 0.2294800E+00, 0.2702100E+00, 0.2423500E+00, &
     & 0.2543100E+00, 0.2496800E+00, 0.2562000E+00, 0.2398500E+00, &
     & 0.2559400E+00, 0.2791100E+00, 0.2896400E+00, 0.2969500E+00, &
     & 0.3256400E+00, 0.3481500E+00, 0.3885500E+00, 0.3888000E+00, &
     & 0.5318976E+00, 0.6356794E+00, 0.7701839E+00, 0.7701839E+00 /
      data (ref_adm(10,iz,20,17),iz = 1,20) / &
     & 0.2319300E+00, 0.2319300E+00, 0.2521000E+00, 0.2416100E+00, &
     & 0.2573400E+00, 0.2483800E+00, 0.2502300E+00, 0.2436700E+00, &
     & 0.2786200E+00, 0.2735200E+00, 0.2864600E+00, 0.3006100E+00, &
     & 0.3154300E+00, 0.3359100E+00, 0.3698900E+00, 0.4589476E+00, &
     & 0.5231269E+00, 0.6236888E+00, 0.7570772E+00, 0.7570772E+00 /
      data (ref_adm(10,iz,21,17),iz = 1,20) / &
     & 0.2324700E+00, 0.2324700E+00, 0.2528300E+00, 0.2298000E+00, &
     & 0.2593900E+00, 0.2746900E+00, 0.2540600E+00, 0.2815900E+00, &
     & 0.3210800E+00, 0.2981100E+00, 0.2775400E+00, 0.3031000E+00, &
     & 0.3258000E+00, 0.3433900E+00, 0.3684100E+00, 0.4535246E+00, &
     & 0.5165049E+00, 0.6150679E+00, 0.7495500E+00, 0.7495500E+00 /
      data (ref_adm(10,iz,22,17),iz = 1,20) / &
     & 0.2265800E+00, 0.2265800E+00, 0.2379300E+00, 0.2497800E+00, &
     & 0.2623600E+00, 0.2532000E+00, 0.2859600E+00, 0.2823400E+00, &
     & 0.2920600E+00, 0.2867100E+00, 0.2791700E+00, 0.3090200E+00, &
     & 0.3252300E+00, 0.3381600E+00, 0.3735200E+00, 0.4730700E+00, &
     & 0.4473643E+00, 0.4784020E+00, 0.5579461E+00, 0.5579461E+00 /
      data (ref_adm(10,iz,23,17),iz = 1,20) / &
     & 0.2060900E+00, 0.2060900E+00, 0.2175000E+00, 0.2237600E+00, &
     & 0.2134100E+00, 0.2198900E+00, 0.2288500E+00, 0.2475400E+00, &
     & 0.2384900E+00, 0.2518000E+00, 0.2691900E+00, 0.2918100E+00, &
     & 0.3047200E+00, 0.3455100E+00, 0.3722100E+00, 0.4221600E+00, &
     & 0.4490096E+00, 0.4820891E+00, 0.5692314E+00, 0.5692314E+00 /
      data (ref_adm(10,iz,24,17),iz = 1,20) / &
     & 0.2362100E+00, 0.2362100E+00, 0.2471100E+00, 0.2393200E+00, &
     & 0.2475900E+00, 0.2512300E+00, 0.2589000E+00, 0.2631000E+00, &
     & 0.2780500E+00, 0.2881000E+00, 0.3073600E+00, 0.3234200E+00, &
     & 0.3372400E+00, 0.3652700E+00, 0.3944600E+00, 0.4335900E+00, &
     & 0.4564077E+00, 0.4918795E+00, 0.5864079E+00, 0.5864079E+00 /
      data (ref_adm(10,iz,25,17),iz = 1,20) / &
     & 0.2583900E+00, 0.2583900E+00, 0.2602800E+00, 0.2760300E+00, &
     & 0.2757400E+00, 0.2829500E+00, 0.2836200E+00, 0.2752100E+00, &
     & 0.2927900E+00, 0.3003800E+00, 0.3341400E+00, 0.3430200E+00, &
     & 0.3413400E+00, 0.3843300E+00, 0.4090400E+00, 0.4356000E+00, &
     & 0.5032800E+00, 0.5082698E+00, 0.6087630E+00, 0.6087630E+00 /
      data (ref_adm(10,iz,26,17),iz = 1,20) / &
     & 0.2587100E+00, 0.2587100E+00, 0.2684800E+00, 0.2533200E+00, &
     & 0.2534200E+00, 0.2401700E+00, 0.2576500E+00, 0.2554500E+00, &
     & 0.2925900E+00, 0.2903200E+00, 0.3061900E+00, 0.3347400E+00, &
     & 0.3387200E+00, 0.3937300E+00, 0.4284500E+00, 0.4736200E+00, &
     & 0.5273400E+00, 0.5502700E+00, 0.6367291E+00, 0.6367291E+00 /
      data (ref_adm(10,iz,27,17),iz = 1,20) / &
     & 0.2607900E+00, 0.2607900E+00, 0.2513600E+00, 0.2332100E+00, &
     & 0.2588000E+00, 0.2691900E+00, 0.2705600E+00, 0.2749400E+00, &
     & 0.2862300E+00, 0.2922400E+00, 0.3391300E+00, 0.3430300E+00, &
     & 0.3670200E+00, 0.3921800E+00, 0.4280700E+00, 0.4913700E+00, &
     & 0.5547600E+00, 0.6136400E+00, 0.6662040E+00, 0.6662040E+00 /
      data (ref_adm(10,iz,28,17),iz = 1,20) / &
     & 0.2427600E+00, 0.2427600E+00, 0.2394100E+00, 0.2211400E+00, &
     & 0.2714800E+00, 0.2621400E+00, 0.2605700E+00, 0.2693500E+00, &
     & 0.2859600E+00, 0.3098500E+00, 0.3229800E+00, 0.3713500E+00, &
     & 0.4133400E+00, 0.3978800E+00, 0.4648100E+00, 0.4852100E+00, &
     & 0.5386000E+00, 0.6714900E+00, 0.6846200E+00, 0.6846200E+00 /
      data (ref_adm(10,iz,29,17),iz = 1,20) / &
     & 0.2355800E+00, 0.2355800E+00, 0.2157900E+00, 0.2382600E+00, &
     & 0.2251600E+00, 0.2453700E+00, 0.2492100E+00, 0.2953100E+00, &
     & 0.2940100E+00, 0.3365700E+00, 0.3407000E+00, 0.3670900E+00, &
     & 0.3987100E+00, 0.4217300E+00, 0.4495400E+00, 0.5372500E+00, &
     & 0.6329800E+00, 0.7332600E+00, 0.7170500E+00, 0.7170500E+00 /
      data (ref_adm(10,iz,30,17),iz = 1,20) / &
     & 0.2597000E+00, 0.2597000E+00, 0.2649800E+00, 0.2376300E+00, &
     & 0.2283800E+00, 0.2432700E+00, 0.2863600E+00, 0.2784100E+00, &
     & 0.3018200E+00, 0.3257200E+00, 0.3402700E+00, 0.3729400E+00, &
     & 0.4071000E+00, 0.4280100E+00, 0.4928600E+00, 0.5753600E+00, &
     & 0.6533200E+00, 0.7408100E+00, 0.7218500E+00, 0.7218500E+00 /
      data (ref_adm(10,iz,31,17),iz = 1,20) / &
     & 0.2523400E+00, 0.2523400E+00, 0.2487000E+00, 0.2762300E+00, &
     & 0.2518200E+00, 0.2537800E+00, 0.2705000E+00, 0.2975700E+00, &
     & 0.3220100E+00, 0.3258600E+00, 0.3646900E+00, 0.3703200E+00, &
     & 0.4188600E+00, 0.4491000E+00, 0.4989300E+00, 0.5765700E+00, &
     & 0.6727500E+00, 0.7778400E+00, 0.7499600E+00, 0.7499600E+00 /
      data (ref_adm(10,iz,32,17),iz = 1,20) / &
     & 0.2422300E+00, 0.2422300E+00, 0.2211500E+00, 0.2578000E+00, &
     & 0.2640600E+00, 0.2393500E+00, 0.2537400E+00, 0.2828700E+00, &
     & 0.3097600E+00, 0.3540400E+00, 0.3699400E+00, 0.3820200E+00, &
     & 0.4276200E+00, 0.4929700E+00, 0.5223600E+00, 0.6107600E+00, &
     & 0.7384900E+00, 0.8240900E+00, 0.7980400E+00, 0.7980400E+00 /
      data (ref_adm(10,iz,33,17),iz = 1,20) / &
     & 0.2673400E+00, 0.2673400E+00, 0.2590200E+00, 0.2682200E+00, &
     & 0.2570500E+00, 0.2733900E+00, 0.2888300E+00, 0.3036900E+00, &
     & 0.3199700E+00, 0.3441800E+00, 0.3692600E+00, 0.4000100E+00, &
     & 0.4458500E+00, 0.5056600E+00, 0.5695500E+00, 0.6489500E+00, &
     & 0.7457100E+00, 0.8436800E+00, 0.8017700E+00, 0.8017700E+00 /
      data (ref_adm(10,iz,34,17),iz = 1,20) / &
     & 0.2554900E+00, 0.2554900E+00, 0.2476400E+00, 0.2492500E+00, &
     & 0.2533900E+00, 0.2536300E+00, 0.2747300E+00, 0.2982400E+00, &
     & 0.3084800E+00, 0.3504900E+00, 0.3824500E+00, 0.4009300E+00, &
     & 0.4328500E+00, 0.4793800E+00, 0.5421600E+00, 0.6133400E+00, &
     & 0.7069800E+00, 0.8230600E+00, 0.8388800E+00, 0.8388800E+00 /
      data (ref_adm(10,iz,35,17),iz = 1,20) / &
     & 0.2553600E+00, 0.2553600E+00, 0.2305200E+00, 0.2569700E+00, &
     & 0.2363900E+00, 0.2539800E+00, 0.2652300E+00, 0.2802500E+00, &
     & 0.2795000E+00, 0.3492300E+00, 0.3903700E+00, 0.4193600E+00, &
     & 0.4712800E+00, 0.4941900E+00, 0.5656100E+00, 0.6469100E+00, &
     & 0.7440400E+00, 0.8910500E+00, 0.8398400E+00, 0.8398400E+00 /
      data (ref_adm(10,iz,36,17),iz = 1,20) / &
     & 0.2207100E+00, 0.2207100E+00, 0.2249200E+00, 0.2400300E+00, &
     & 0.2476500E+00, 0.2482600E+00, 0.2571300E+00, 0.2908300E+00, &
     & 0.3064900E+00, 0.3310900E+00, 0.3509000E+00, 0.4031800E+00, &
     & 0.4433800E+00, 0.5257200E+00, 0.5636200E+00, 0.6533800E+00, &
     & 0.7587700E+00, 0.8969000E+00, 0.8709900E+00, 0.8709900E+00 /
      data (ref_adm(10,iz,37,17),iz = 1,20) / &
     & 0.2232200E+00, 0.2232200E+00, 0.2301600E+00, 0.2510900E+00, &
     & 0.2472000E+00, 0.2515400E+00, 0.2734400E+00, 0.3036200E+00, &
     & 0.3176600E+00, 0.3477400E+00, 0.3499600E+00, 0.4137500E+00, &
     & 0.4519200E+00, 0.5061800E+00, 0.5732500E+00, 0.6547600E+00, &
     & 0.7886800E+00, 0.9190900E+00, 0.8955600E+00, 0.8955600E+00 /
      data (ref_adm(10,iz,38,17),iz = 1,20) / &
     & 0.2232200E+00, 0.2232200E+00, 0.2301600E+00, 0.2510900E+00, &
     & 0.2472000E+00, 0.2515400E+00, 0.2734400E+00, 0.3036200E+00, &
     & 0.3176600E+00, 0.3477400E+00, 0.3499600E+00, 0.4137500E+00, &
     & 0.4519200E+00, 0.5061800E+00, 0.5732500E+00, 0.6547600E+00, &
     & 0.7886800E+00, 0.9190900E+00, 0.8955600E+00, 0.8955600E+00 /
! Solar Zenith Angle 85.0 Albedo  0.4933781E+00
      data (ref_adm(10,iz, 1,18),iz = 1,20) / &
     & 0.2471100E+00, 0.2471100E+00, 0.2368100E+00, 0.2400400E+00, &
     & 0.2721400E+00, 0.3277400E+00, 0.3616000E+00, 0.3918300E+00, &
     & 0.4418200E+00, 0.4744200E+00, 0.5983400E+00, 0.8245300E+00, &
     & 0.9804863E+00, 0.1175512E+01, 0.1467439E+01, 0.1872903E+01, &
     & 0.2300573E+01, 0.2716216E+01, 0.1977890E+01, 0.1977890E+01 /
      data (ref_adm(10,iz, 2,18),iz = 1,20) / &
     & 0.2471100E+00, 0.2471100E+00, 0.2368100E+00, 0.2400400E+00, &
     & 0.2721400E+00, 0.3277400E+00, 0.3616000E+00, 0.3918300E+00, &
     & 0.4418200E+00, 0.4744200E+00, 0.5983400E+00, 0.8245300E+00, &
     & 0.9804863E+00, 0.1175512E+01, 0.1467439E+01, 0.1872903E+01, &
     & 0.2300573E+01, 0.2716216E+01, 0.1977890E+01, 0.1977890E+01 /
      data (ref_adm(10,iz, 3,18),iz = 1,20) / &
     & 0.2372200E+00, 0.2372200E+00, 0.2669800E+00, 0.2990800E+00, &
     & 0.3132000E+00, 0.2936600E+00, 0.3100900E+00, 0.3982900E+00, &
     & 0.4441400E+00, 0.5104200E+00, 0.6634200E+00, 0.6979600E+00, &
     & 0.9689626E+00, 0.1159774E+01, 0.1443450E+01, 0.1835624E+01, &
     & 0.2246253E+01, 0.2636966E+01, 0.2960933E-07, 0.2960933E-07 /
      data (ref_adm(10,iz, 4,18),iz = 1,20) / &
     & 0.2513400E+00, 0.2513400E+00, 0.2442500E+00, 0.3003200E+00, &
     & 0.3669700E+00, 0.3386900E+00, 0.3263500E+00, 0.4246100E+00, &
     & 0.3771900E+00, 0.4278000E+00, 0.5166800E+00, 0.7621500E+00, &
     & 0.9450458E+00, 0.1126126E+01, 0.1393442E+01, 0.1758643E+01, &
     & 0.2133168E+01, 0.2475702E+01, 0.1797186E+01, 0.1797186E+01 /
      data (ref_adm(10,iz, 5,18),iz = 1,20) / &
     & 0.2445500E+00, 0.2445500E+00, 0.2845200E+00, 0.2503300E+00, &
     & 0.2837900E+00, 0.2880800E+00, 0.3059000E+00, 0.2827700E+00, &
     & 0.3747200E+00, 0.4547500E+00, 0.4950300E+00, 0.7386700E+00, &
     & 0.9106916E+00, 0.1079134E+01, 0.1324515E+01, 0.1654101E+01, &
     & 0.1984412E+01, 0.2268191E+01, 0.1648412E+01, 0.1648412E+01 /
      data (ref_adm(10,iz, 6,18),iz = 1,20) / &
     & 0.2610300E+00, 0.2610300E+00, 0.2787500E+00, 0.2868200E+00, &
     & 0.3194300E+00, 0.3178200E+00, 0.2857500E+00, 0.3954300E+00, &
     & 0.3761600E+00, 0.4885300E+00, 0.5281300E+00, 0.6621600E+00, &
     & 0.6837800E+00, 0.1021265E+01, 0.1240670E+01, 0.1529292E+01, &
     & 0.1809703E+01, 0.2034658E+01, 0.1489158E+01, 0.1489158E+01 /
      data (ref_adm(10,iz, 7,18),iz = 1,20) / &
     & 0.2341100E+00, 0.2341100E+00, 0.2098100E+00, 0.2628500E+00, &
     & 0.2894300E+00, 0.2728800E+00, 0.3304700E+00, 0.3439100E+00, &
     & 0.4367000E+00, 0.3938200E+00, 0.5219300E+00, 0.5788600E+00, &
     & 0.6876600E+00, 0.8560500E+00, 0.1295000E+01, 0.1752100E+01, &
     & 0.2102500E+01, 0.2297300E+01, 0.2818700E+01, 0.2818700E+01 /
      data (ref_adm(10,iz, 8,18),iz = 1,20) / &
     & 0.2299500E+00, 0.2299500E+00, 0.2600900E+00, 0.2632400E+00, &
     & 0.2702000E+00, 0.2719100E+00, 0.3025200E+00, 0.3826800E+00, &
     & 0.3855300E+00, 0.4623400E+00, 0.5712200E+00, 0.4989300E+00, &
     & 0.8035000E+00, 0.8923000E+00, 0.1180000E+01, 0.1377500E+01, &
     & 0.1829600E+01, 0.2363700E+01, 0.2187600E+01, 0.2187600E+01 /
      data (ref_adm(10,iz, 9,18),iz = 1,20) / &
     & 0.2779100E+00, 0.2779100E+00, 0.2653100E+00, 0.2257800E+00, &
     & 0.2581300E+00, 0.2997900E+00, 0.2583300E+00, 0.3489700E+00, &
     & 0.4146400E+00, 0.4029300E+00, 0.4291600E+00, 0.4747700E+00, &
     & 0.6112200E+00, 0.8988100E+00, 0.9619100E+00, 0.1375200E+01, &
     & 0.1609300E+01, 0.1976100E+01, 0.1679900E+01, 0.1679900E+01 /
      data (ref_adm(10,iz,10,18),iz = 1,20) / &
     & 0.2440000E+00, 0.2440000E+00, 0.2536800E+00, 0.2857200E+00, &
     & 0.2805400E+00, 0.2827600E+00, 0.2898600E+00, 0.3253400E+00, &
     & 0.3535200E+00, 0.4423600E+00, 0.5141500E+00, 0.4849800E+00, &
     & 0.6698043E+00, 0.8775300E+00, 0.8269600E+00, 0.1105200E+01, &
     & 0.1450300E+01, 0.1830600E+01, 0.1503400E+01, 0.1503400E+01 /
      data (ref_adm(10,iz,11,18),iz = 1,20) / &
     & 0.2386000E+00, 0.2386000E+00, 0.2594000E+00, 0.2623700E+00, &
     & 0.3063600E+00, 0.2434100E+00, 0.3437100E+00, 0.3648000E+00, &
     & 0.3530500E+00, 0.4292400E+00, 0.4653600E+00, 0.4783000E+00, &
     & 0.5086400E+00, 0.8395400E+00, 0.7703300E+00, 0.9539900E+00, &
     & 0.1247700E+01, 0.1498800E+01, 0.1368400E+01, 0.1368400E+01 /
      data (ref_adm(10,iz,12,18),iz = 1,20) / &
     & 0.3200900E+00, 0.3200900E+00, 0.3136200E+00, 0.2728200E+00, &
     & 0.2702900E+00, 0.2511200E+00, 0.3215900E+00, 0.3344100E+00, &
     & 0.3290400E+00, 0.3361200E+00, 0.4043200E+00, 0.3817700E+00, &
     & 0.4908600E+00, 0.6440600E+00, 0.7714900E+00, 0.8640000E+00, &
     & 0.1124000E+01, 0.1328400E+01, 0.7838121E+00, 0.7838121E+00 /
      data (ref_adm(10,iz,13,18),iz = 1,20) / &
     & 0.2290700E+00, 0.2290700E+00, 0.2753900E+00, 0.3281500E+00, &
     & 0.2943900E+00, 0.3243000E+00, 0.2914100E+00, 0.2749900E+00, &
     & 0.3469900E+00, 0.3472300E+00, 0.3498800E+00, 0.4270100E+00, &
     & 0.4535400E+00, 0.6371600E+00, 0.7836300E+00, 0.8193600E+00, &
     & 0.1005100E+01, 0.8180200E+00, 0.7165380E+00, 0.7165380E+00 /
      data (ref_adm(10,iz,14,18),iz = 1,20) / &
     & 0.2528300E+00, 0.2528300E+00, 0.2323300E+00, 0.3100100E+00, &
     & 0.3659600E+00, 0.3705000E+00, 0.3093600E+00, 0.3203600E+00, &
     & 0.3474900E+00, 0.3348700E+00, 0.3513500E+00, 0.3969800E+00, &
     & 0.4673900E+00, 0.5582600E+00, 0.6362900E+00, 0.7290000E+00, &
     & 0.9961700E+00, 0.7313286E+00, 0.6616958E+00, 0.6616958E+00 /
      data (ref_adm(10,iz,15,18),iz = 1,20) / &
     & 0.2595900E+00, 0.2595900E+00, 0.2616000E+00, 0.2669300E+00, &
     & 0.2621200E+00, 0.2658500E+00, 0.2957800E+00, 0.3084300E+00, &
     & 0.3173000E+00, 0.3303400E+00, 0.3422500E+00, 0.3674500E+00, &
     & 0.3615000E+00, 0.3906100E+00, 0.5080500E+00, 0.6608500E+00, &
     & 0.6471413E+00, 0.6603345E+00, 0.6164348E+00, 0.6164348E+00 /
      data (ref_adm(10,iz,16,18),iz = 1,20) / &
     & 0.3108200E+00, 0.3108200E+00, 0.2836000E+00, 0.2647500E+00, &
     & 0.2670700E+00, 0.2720300E+00, 0.2573500E+00, 0.3012200E+00, &
     & 0.2931600E+00, 0.3036600E+00, 0.3291000E+00, 0.3558200E+00, &
     & 0.3601300E+00, 0.3685200E+00, 0.5527400E+00, 0.6636600E+00, &
     & 0.5944919E+00, 0.6050551E+00, 0.5810826E+00, 0.5810826E+00 /
      data (ref_adm(10,iz,17,18),iz = 1,20) / &
     & 0.2946300E+00, 0.2946300E+00, 0.2833700E+00, 0.2383200E+00, &
     & 0.2205200E+00, 0.2759500E+00, 0.3224000E+00, 0.3517600E+00, &
     & 0.2660900E+00, 0.3123200E+00, 0.3425200E+00, 0.3119300E+00, &
     & 0.3860800E+00, 0.4135500E+00, 0.5398400E+00, 0.5292885E+00, &
     & 0.5522105E+00, 0.5614386E+00, 0.5534862E+00, 0.5534862E+00 /
      data (ref_adm(10,iz,18,18),iz = 1,20) / &
     & 0.2720500E+00, 0.2720500E+00, 0.2219700E+00, 0.2743100E+00, &
     & 0.2411000E+00, 0.2926500E+00, 0.2560100E+00, 0.2778000E+00, &
     & 0.3121800E+00, 0.2908500E+00, 0.3189200E+00, 0.3400300E+00, &
     & 0.3230400E+00, 0.4487000E+00, 0.5272300E+00, 0.5599395E+00, &
     & 0.6477543E+00, 0.8064395E+00, 0.1279709E+01, 0.1279709E+01 /
      data (ref_adm(10,iz,19,18),iz = 1,20) / &
     & 0.2599700E+00, 0.2599700E+00, 0.2595100E+00, 0.2992800E+00, &
     & 0.2325600E+00, 0.2466500E+00, 0.2765500E+00, 0.2580100E+00, &
     & 0.2718200E+00, 0.3261300E+00, 0.3228800E+00, 0.3871300E+00, &
     & 0.3893200E+00, 0.4303000E+00, 0.4241900E+00, 0.5385154E+00, &
     & 0.6204750E+00, 0.7715551E+00, 0.1244406E+01, 0.1244406E+01 /
      data (ref_adm(10,iz,20,18),iz = 1,20) / &
     & 0.2840300E+00, 0.2840300E+00, 0.2741200E+00, 0.2777900E+00, &
     & 0.2419600E+00, 0.2408800E+00, 0.2394300E+00, 0.2852100E+00, &
     & 0.3066800E+00, 0.2784300E+00, 0.3135100E+00, 0.4341200E+00, &
     & 0.4172000E+00, 0.4178500E+00, 0.4767800E+00, 0.5253267E+00, &
     & 0.6039443E+00, 0.7510508E+00, 0.1229608E+01, 0.1229608E+01 /
      data (ref_adm(10,iz,21,18),iz = 1,20) / &
     & 0.2570400E+00, 0.2570400E+00, 0.2348900E+00, 0.2668500E+00, &
     & 0.2698900E+00, 0.2344700E+00, 0.2912600E+00, 0.2677100E+00, &
     & 0.2691300E+00, 0.3083600E+00, 0.2976300E+00, 0.4354100E+00, &
     & 0.4343200E+00, 0.3819300E+00, 0.4526200E+00, 0.5180214E+00, &
     & 0.5951201E+00, 0.7413549E+00, 0.1230986E+01, 0.1230986E+01 /
      data (ref_adm(10,iz,22,18),iz = 1,20) / &
     & 0.2156700E+00, 0.2156700E+00, 0.2830678E+00, 0.2390000E+00, &
     & 0.2347900E+00, 0.2291900E+00, 0.2747300E+00, 0.3258400E+00, &
     & 0.3112600E+00, 0.2910200E+00, 0.3245200E+00, 0.4332400E+00, &
     & 0.4347000E+00, 0.3973200E+00, 0.3880400E+00, 0.5239764E+00, &
     & 0.5716386E+00, 0.6426934E+00, 0.8182922E+00, 0.8182922E+00 /
      data (ref_adm(10,iz,23,18),iz = 1,20) / &
     & 0.2427300E+00, 0.2427300E+00, 0.2340400E+00, 0.2375400E+00, &
     & 0.2331200E+00, 0.2301300E+00, 0.2479500E+00, 0.2494300E+00, &
     & 0.2540800E+00, 0.2765500E+00, 0.2961800E+00, 0.3191100E+00, &
     & 0.3460700E+00, 0.3947100E+00, 0.4181200E+00, 0.4328900E+00, &
     & 0.5716967E+00, 0.6454772E+00, 0.8345171E+00, 0.8345171E+00 /
      data (ref_adm(10,iz,24,18),iz = 1,20) / &
     & 0.2748300E+00, 0.2748300E+00, 0.2904700E+00, 0.2782400E+00, &
     & 0.2784900E+00, 0.2788600E+00, 0.2965400E+00, 0.3022300E+00, &
     & 0.3138400E+00, 0.3299400E+00, 0.3515600E+00, 0.3749600E+00, &
     & 0.4028900E+00, 0.4446200E+00, 0.4950400E+00, 0.5183100E+00, &
     & 0.5784996E+00, 0.6559661E+00, 0.8597324E+00, 0.8597324E+00 /
      data (ref_adm(10,iz,25,18),iz = 1,20) / &
     & 0.2911800E+00, 0.2911800E+00, 0.3344900E+00, 0.2989900E+00, &
     & 0.2670200E+00, 0.2857700E+00, 0.3561300E+00, 0.3552000E+00, &
     & 0.3394200E+00, 0.3920200E+00, 0.4088100E+00, 0.4120600E+00, &
     & 0.3951000E+00, 0.4542200E+00, 0.4776100E+00, 0.5636100E+00, &
     & 0.5921970E+00, 0.6743287E+00, 0.8926734E+00, 0.8926734E+00 /
      data (ref_adm(10,iz,26,18),iz = 1,20) / &
     & 0.2869700E+00, 0.2869700E+00, 0.3478400E+00, 0.3208700E+00, &
     & 0.2985400E+00, 0.3074000E+00, 0.3750600E+00, 0.3281100E+00, &
     & 0.3630900E+00, 0.3368300E+00, 0.3509700E+00, 0.4265200E+00, &
     & 0.4577400E+00, 0.4604500E+00, 0.4819300E+00, 0.5516700E+00, &
     & 0.7104200E+00, 0.7023415E+00, 0.9344288E+00, 0.9344288E+00 /
      data (ref_adm(10,iz,27,18),iz = 1,20) / &
     & 0.2967900E+00, 0.2967900E+00, 0.3436800E+00, 0.3046900E+00, &
     & 0.2922300E+00, 0.2936500E+00, 0.2738500E+00, 0.3416600E+00, &
     & 0.3364900E+00, 0.3443900E+00, 0.4026400E+00, 0.4370800E+00, &
     & 0.4561600E+00, 0.5123800E+00, 0.5885700E+00, 0.5982000E+00, &
     & 0.7434800E+00, 0.7295732E+00, 0.9790436E+00, 0.9790436E+00 /
      data (ref_adm(10,iz,28,18),iz = 1,20) / &
     & 0.2752200E+00, 0.2752200E+00, 0.2653900E+00, 0.2886000E+00, &
     & 0.2855200E+00, 0.2598800E+00, 0.2740600E+00, 0.3115100E+00, &
     & 0.3402200E+00, 0.3077600E+00, 0.3952700E+00, 0.4004800E+00, &
     & 0.4959800E+00, 0.5229700E+00, 0.5532600E+00, 0.6849400E+00, &
     & 0.9347400E+00, 0.1112800E+01, 0.1359400E+01, 0.1359400E+01 /
      data (ref_adm(10,iz,29,18),iz = 1,20) / &
     & 0.2573400E+00, 0.2573400E+00, 0.2808000E+00, 0.2840700E+00, &
     & 0.3394100E+00, 0.2687400E+00, 0.2483700E+00, 0.2730300E+00, &
     & 0.3670500E+00, 0.3266600E+00, 0.3638300E+00, 0.3940600E+00, &
     & 0.4316100E+00, 0.5133900E+00, 0.6022400E+00, 0.8136600E+00, &
     & 0.9453800E+00, 0.1191600E+01, 0.1328400E+01, 0.1328400E+01 /
      data (ref_adm(10,iz,30,18),iz = 1,20) / &
     & 0.2434300E+00, 0.2434300E+00, 0.2571200E+00, 0.2634000E+00, &
     & 0.2756600E+00, 0.2684800E+00, 0.3128900E+00, 0.3386100E+00, &
     & 0.3990100E+00, 0.3524000E+00, 0.3566600E+00, 0.4611500E+00, &
     & 0.4899400E+00, 0.5696900E+00, 0.6369900E+00, 0.8830200E+00, &
     & 0.9943500E+00, 0.1236600E+01, 0.1182428E+01, 0.1182428E+01 /
      data (ref_adm(10,iz,31,18),iz = 1,20) / &
     & 0.2745400E+00, 0.2745400E+00, 0.2621100E+00, 0.2638300E+00, &
     & 0.2770000E+00, 0.3259300E+00, 0.2854400E+00, 0.3145400E+00, &
     & 0.3437000E+00, 0.3832200E+00, 0.3923400E+00, 0.4223800E+00, &
     & 0.4940200E+00, 0.5306300E+00, 0.6266000E+00, 0.8037200E+00, &
     & 0.1029700E+01, 0.1341300E+01, 0.1480600E+01, 0.1480600E+01 /
      data (ref_adm(10,iz,32,18),iz = 1,20) / &
     & 0.2349900E+00, 0.2349900E+00, 0.2801200E+00, 0.2823300E+00, &
     & 0.2991000E+00, 0.2951200E+00, 0.2813700E+00, 0.2731100E+00, &
     & 0.3046300E+00, 0.5066600E+00, 0.4478300E+00, 0.4699600E+00, &
     & 0.4692600E+00, 0.5249600E+00, 0.6319300E+00, 0.7856400E+00, &
     & 0.1004800E+01, 0.1133200E+01, 0.1275400E+01, 0.1275400E+01 /
      data (ref_adm(10,iz,33,18),iz = 1,20) / &
     & 0.2520500E+00, 0.2520500E+00, 0.2481800E+00, 0.2288600E+00, &
     & 0.2579400E+00, 0.3134900E+00, 0.2969400E+00, 0.3012500E+00, &
     & 0.3337800E+00, 0.3973600E+00, 0.4063000E+00, 0.4521500E+00, &
     & 0.5401600E+00, 0.5965800E+00, 0.6665800E+00, 0.8423400E+00, &
     & 0.1084600E+01, 0.1587200E+01, 0.1635300E+01, 0.1635300E+01 /
      data (ref_adm(10,iz,34,18),iz = 1,20) / &
     & 0.2426500E+00, 0.2426500E+00, 0.2714800E+00, 0.2717000E+00, &
     & 0.2670200E+00, 0.3581600E+00, 0.3382800E+00, 0.3548500E+00, &
     & 0.3522900E+00, 0.3618400E+00, 0.4393200E+00, 0.5245900E+00, &
     & 0.5515200E+00, 0.6349400E+00, 0.6865800E+00, 0.8138700E+00, &
     & 0.1013300E+01, 0.1389600E+01, 0.1421400E+01, 0.1421400E+01 /
      data (ref_adm(10,iz,35,18),iz = 1,20) / &
     & 0.2485900E+00, 0.2485900E+00, 0.2435900E+00, 0.2584600E+00, &
     & 0.2777700E+00, 0.2905500E+00, 0.3000500E+00, 0.3278200E+00, &
     & 0.3379300E+00, 0.3630000E+00, 0.4085200E+00, 0.4786100E+00, &
     & 0.5295500E+00, 0.6694400E+00, 0.7084400E+00, 0.8049000E+00, &
     & 0.1001100E+01, 0.1271300E+01, 0.1292200E+01, 0.1292200E+01 /
      data (ref_adm(10,iz,36,18),iz = 1,20) / &
     & 0.2303700E+00, 0.2303700E+00, 0.2282600E+00, 0.2675600E+00, &
     & 0.3031500E+00, 0.2827600E+00, 0.2885300E+00, 0.3181600E+00, &
     & 0.3942500E+00, 0.3612700E+00, 0.4265200E+00, 0.5159300E+00, &
     & 0.4949600E+00, 0.6143600E+00, 0.6452600E+00, 0.7990800E+00, &
     & 0.1014500E+01, 0.1302500E+01, 0.1355100E+01, 0.1355100E+01 /
      data (ref_adm(10,iz,37,18),iz = 1,20) / &
     & 0.2948500E+00, 0.2948500E+00, 0.2616200E+00, 0.2610700E+00, &
     & 0.2627400E+00, 0.2697100E+00, 0.2875500E+00, 0.3491100E+00, &
     & 0.3814000E+00, 0.4653700E+00, 0.4248400E+00, 0.4608400E+00, &
     & 0.5384900E+00, 0.5692300E+00, 0.7142000E+00, 0.8108800E+00, &
     & 0.9799500E+00, 0.1307800E+01, 0.1433600E+01, 0.1433600E+01 /
      data (ref_adm(10,iz,38,18),iz = 1,20) / &
     & 0.2948500E+00, 0.2948500E+00, 0.2616200E+00, 0.2610700E+00, &
     & 0.2627400E+00, 0.2697100E+00, 0.2875500E+00, 0.3491100E+00, &
     & 0.3814000E+00, 0.4653700E+00, 0.4248400E+00, 0.4608400E+00, &
     & 0.5384900E+00, 0.5692300E+00, 0.7142000E+00, 0.8108800E+00, &
     & 0.9799500E+00, 0.1307800E+01, 0.1433600E+01, 0.1433600E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(11,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(11,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.5550637E+04
      data (ref_adm(11,iz, 1, 3),iz = 1,20) / &
     & 0.2121277E+00, 0.2121277E+00, 0.2083317E+00, 0.2070167E+00, &
     & 0.2059773E+00, 0.2052664E+00, 0.2040135E+00, 0.2018789E+00, &
     & 0.1991371E+00, 0.1958540E+00, 0.1922832E+00, 0.1873258E+00, &
     & 0.1815395E+00, 0.1760908E+00, 0.1682660E+00, 0.1579616E+00, &
     & 0.1473309E+00, 0.1334216E+00, 0.1088617E+00, 0.1088617E+00 /
      data (ref_adm(11,iz, 2, 3),iz = 1,20) / &
     & 0.2121277E+00, 0.2121277E+00, 0.2083317E+00, 0.2070167E+00, &
     & 0.2059773E+00, 0.2052664E+00, 0.2040135E+00, 0.2018789E+00, &
     & 0.1991371E+00, 0.1958540E+00, 0.1922832E+00, 0.1873258E+00, &
     & 0.1815395E+00, 0.1760908E+00, 0.1682660E+00, 0.1579616E+00, &
     & 0.1473309E+00, 0.1334216E+00, 0.1088617E+00, 0.1088617E+00 /
      data (ref_adm(11,iz, 3, 3),iz = 1,20) / &
     & 0.2121277E+00, 0.2121277E+00, 0.2083317E+00, 0.2070167E+00, &
     & 0.2059773E+00, 0.2052664E+00, 0.2040135E+00, 0.2018789E+00, &
     & 0.1991371E+00, 0.1958540E+00, 0.1922832E+00, 0.1873258E+00, &
     & 0.1815395E+00, 0.1760908E+00, 0.1682660E+00, 0.1579616E+00, &
     & 0.1473309E+00, 0.1334216E+00, 0.1088617E+00, 0.1088617E+00 /
      data (ref_adm(11,iz, 4, 3),iz = 1,20) / &
     & 0.2121277E+00, 0.2121277E+00, 0.2083317E+00, 0.2070167E+00, &
     & 0.2059773E+00, 0.2052664E+00, 0.2040135E+00, 0.2018789E+00, &
     & 0.1991371E+00, 0.1958540E+00, 0.1922832E+00, 0.1873258E+00, &
     & 0.1815395E+00, 0.1760908E+00, 0.1682660E+00, 0.1579616E+00, &
     & 0.1473309E+00, 0.1334216E+00, 0.1088617E+00, 0.1088617E+00 /
      data (ref_adm(11,iz, 5, 3),iz = 1,20) / &
     & 0.2121277E+00, 0.2121277E+00, 0.2083317E+00, 0.2070167E+00, &
     & 0.2059773E+00, 0.2052664E+00, 0.2040135E+00, 0.2018789E+00, &
     & 0.1991371E+00, 0.1958540E+00, 0.1922832E+00, 0.1873258E+00, &
     & 0.1815395E+00, 0.1760908E+00, 0.1682660E+00, 0.1579616E+00, &
     & 0.1473309E+00, 0.1334216E+00, 0.1088617E+00, 0.1088617E+00 /
      data (ref_adm(11,iz, 6, 3),iz = 1,20) / &
     & 0.2121277E+00, 0.2121277E+00, 0.2083317E+00, 0.2070167E+00, &
     & 0.2059773E+00, 0.2052664E+00, 0.2040135E+00, 0.2018789E+00, &
     & 0.1991371E+00, 0.1958540E+00, 0.1922832E+00, 0.1873258E+00, &
     & 0.1815395E+00, 0.1760908E+00, 0.1682660E+00, 0.1579616E+00, &
     & 0.1473309E+00, 0.1334216E+00, 0.1088617E+00, 0.1088617E+00 /
      data (ref_adm(11,iz, 7, 3),iz = 1,20) / &
     & 0.2121277E+00, 0.2121277E+00, 0.2083317E+00, 0.2070167E+00, &
     & 0.2059773E+00, 0.2052664E+00, 0.2040135E+00, 0.2018789E+00, &
     & 0.1991371E+00, 0.2166500E+00, 0.1922832E+00, 0.1873258E+00, &
     & 0.1815395E+00, 0.1760908E+00, 0.1682660E+00, 0.1579616E+00, &
     & 0.1473309E+00, 0.1334216E+00, 0.1088617E+00, 0.1088617E+00 /
      data (ref_adm(11,iz, 8, 3),iz = 1,20) / &
     & 0.2121277E+00, 0.2121277E+00, 0.2083317E+00, 0.2070167E+00, &
     & 0.2059773E+00, 0.2052664E+00, 0.2040135E+00, 0.2018789E+00, &
     & 0.1991371E+00, 0.1958540E+00, 0.1922832E+00, 0.1873258E+00, &
     & 0.1815395E+00, 0.1760908E+00, 0.1682660E+00, 0.1579616E+00, &
     & 0.1473309E+00, 0.1334216E+00, 0.1088617E+00, 0.1088617E+00 /
      data (ref_adm(11,iz, 9, 3),iz = 1,20) / &
     & 0.2121277E+00, 0.2121277E+00, 0.2083317E+00, 0.2070167E+00, &
     & 0.2059773E+00, 0.2052664E+00, 0.2040135E+00, 0.2018789E+00, &
     & 0.1991371E+00, 0.1958540E+00, 0.1922832E+00, 0.1873258E+00, &
     & 0.1815395E+00, 0.1760908E+00, 0.1682660E+00, 0.1579616E+00, &
     & 0.1473309E+00, 0.1334216E+00, 0.1088617E+00, 0.1088617E+00 /
      data (ref_adm(11,iz,10, 3),iz = 1,20) / &
     & 0.2121277E+00, 0.2121277E+00, 0.2083317E+00, 0.2070167E+00, &
     & 0.2059773E+00, 0.2052664E+00, 0.2040135E+00, 0.2018789E+00, &
     & 0.1991371E+00, 0.1958540E+00, 0.1922832E+00, 0.1873258E+00, &
     & 0.1696000E+00, 0.1760908E+00, 0.1682660E+00, 0.1579616E+00, &
     & 0.1473309E+00, 0.1334216E+00, 0.1088617E+00, 0.1088617E+00 /
      data (ref_adm(11,iz,11, 3),iz = 1,20) / &
     & 0.2121277E+00, 0.2121277E+00, 0.2083317E+00, 0.2070167E+00, &
     & 0.2059773E+00, 0.2052664E+00, 0.2040135E+00, 0.2018789E+00, &
     & 0.1991371E+00, 0.1958540E+00, 0.1922832E+00, 0.1873258E+00, &
     & 0.1690800E+00, 0.1760908E+00, 0.1682660E+00, 0.1579616E+00, &
     & 0.1473309E+00, 0.1334216E+00, 0.1088617E+00, 0.1088617E+00 /
      data (ref_adm(11,iz,12, 3),iz = 1,20) / &
     & 0.2121277E+00, 0.2121277E+00, 0.2083317E+00, 0.2070167E+00, &
     & 0.2059773E+00, 0.2052664E+00, 0.2040135E+00, 0.2018789E+00, &
     & 0.1991371E+00, 0.1958540E+00, 0.1922832E+00, 0.1873258E+00, &
     & 0.1815395E+00, 0.1810600E+00, 0.1682660E+00, 0.1579616E+00, &
     & 0.1473309E+00, 0.1334216E+00, 0.1088617E+00, 0.1088617E+00 /
      data (ref_adm(11,iz,13, 3),iz = 1,20) / &
     & 0.2121277E+00, 0.2121277E+00, 0.2083317E+00, 0.2070167E+00, &
     & 0.2059773E+00, 0.2052664E+00, 0.2040135E+00, 0.2018789E+00, &
     & 0.1991371E+00, 0.1958540E+00, 0.1922832E+00, 0.1873258E+00, &
     & 0.1815395E+00, 0.1760908E+00, 0.1682660E+00, 0.1579616E+00, &
     & 0.1473309E+00, 0.1334216E+00, 0.1088617E+00, 0.1088617E+00 /
      data (ref_adm(11,iz,14, 3),iz = 1,20) / &
     & 0.2121277E+00, 0.2121277E+00, 0.2083317E+00, 0.2070167E+00, &
     & 0.2059773E+00, 0.2052664E+00, 0.2040135E+00, 0.2018789E+00, &
     & 0.1991371E+00, 0.1958540E+00, 0.1922832E+00, 0.1873258E+00, &
     & 0.1815395E+00, 0.1760908E+00, 0.1682660E+00, 0.1579616E+00, &
     & 0.1473309E+00, 0.1334216E+00, 0.1088617E+00, 0.1088617E+00 /
      data (ref_adm(11,iz,15, 3),iz = 1,20) / &
     & 0.2121277E+00, 0.2121277E+00, 0.2083317E+00, 0.2070167E+00, &
     & 0.2059773E+00, 0.2052664E+00, 0.2040135E+00, 0.2018789E+00, &
     & 0.1991371E+00, 0.1958540E+00, 0.1922832E+00, 0.1873258E+00, &
     & 0.1815395E+00, 0.1760908E+00, 0.1682660E+00, 0.1579616E+00, &
     & 0.1473309E+00, 0.1334216E+00, 0.1088617E+00, 0.1088617E+00 /
      data (ref_adm(11,iz,16, 3),iz = 1,20) / &
     & 0.2121277E+00, 0.2121277E+00, 0.2083317E+00, 0.2070167E+00, &
     & 0.2059773E+00, 0.2052664E+00, 0.2040135E+00, 0.2018789E+00, &
     & 0.1991371E+00, 0.1958540E+00, 0.1922832E+00, 0.1873258E+00, &
     & 0.1815395E+00, 0.1760908E+00, 0.1682660E+00, 0.1579616E+00, &
     & 0.1473309E+00, 0.1334216E+00, 0.1088617E+00, 0.1088617E+00 /
      data (ref_adm(11,iz,17, 3),iz = 1,20) / &
     & 0.2121277E+00, 0.2121277E+00, 0.2083317E+00, 0.2070167E+00, &
     & 0.2059773E+00, 0.2052664E+00, 0.2040135E+00, 0.2018789E+00, &
     & 0.1991371E+00, 0.1958540E+00, 0.1922832E+00, 0.1873258E+00, &
     & 0.1815395E+00, 0.1760908E+00, 0.1682660E+00, 0.1579616E+00, &
     & 0.1473309E+00, 0.1334216E+00, 0.1088617E+00, 0.1088617E+00 /
      data (ref_adm(11,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(11,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo  0.2107563E+00
      data (ref_adm(11,iz, 1, 4),iz = 1,20) / &
     & 0.1959443E+00, 0.1959443E+00, 0.1917048E+00, 0.1893711E+00, &
     & 0.1869069E+00, 0.1843764E+00, 0.1825539E+00, 0.1811897E+00, &
     & 0.1804086E+00, 0.1653700E+00, 0.1807080E+00, 0.1823801E+00, &
     & 0.1853903E+00, 0.1884011E+00, 0.1967700E+00, 0.2305100E+00, &
     & 0.2380300E+00, 0.2163177E+00, 0.2188329E+00, 0.2188329E+00 /
      data (ref_adm(11,iz, 2, 4),iz = 1,20) / &
     & 0.1959443E+00, 0.1959443E+00, 0.1917048E+00, 0.1893711E+00, &
     & 0.1869069E+00, 0.1843764E+00, 0.1825539E+00, 0.1811897E+00, &
     & 0.1804086E+00, 0.1653700E+00, 0.1807080E+00, 0.1823801E+00, &
     & 0.1853903E+00, 0.1884011E+00, 0.1967700E+00, 0.2305100E+00, &
     & 0.2380300E+00, 0.2163177E+00, 0.2188329E+00, 0.2188329E+00 /
      data (ref_adm(11,iz, 3, 4),iz = 1,20) / &
     & 0.1959490E+00, 0.1959490E+00, 0.1917339E+00, 0.1894010E+00, &
     & 0.1869353E+00, 0.1869500E+00, 0.1787000E+00, 0.1812597E+00, &
     & 0.1804550E+00, 0.1802795E+00, 0.1826100E+00, 0.1584200E+00, &
     & 0.1854237E+00, 0.1883340E+00, 0.1477300E+00, 0.1992491E+00, &
     & 0.2062200E+00, 0.2161449E+00, 0.3418389E-01, 0.3418389E-01 /
      data (ref_adm(11,iz, 4, 4),iz = 1,20) / &
     & 0.1959602E+00, 0.1959602E+00, 0.1917950E+00, 0.1894692E+00, &
     & 0.1870200E+00, 0.1845489E+00, 0.1826753E+00, 0.1812986E+00, &
     & 0.1805042E+00, 0.1803571E+00, 0.1807828E+00, 0.1825035E+00, &
     & 0.1854612E+00, 0.1616200E+00, 0.2179300E+00, 0.1992577E+00, &
     & 0.1502600E+00, 0.2160603E+00, 0.2186110E+00, 0.2186110E+00 /
      data (ref_adm(11,iz, 5, 4),iz = 1,20) / &
     & 0.1960078E+00, 0.1960078E+00, 0.2578400E+00, 0.1895510E+00, &
     & 0.1871253E+00, 0.1847104E+00, 0.1828222E+00, 0.1814301E+00, &
     & 0.1806209E+00, 0.2331600E+00, 0.1881100E+00, 0.2020000E+00, &
     & 0.1448300E+00, 0.1687800E+00, 0.2019300E+00, 0.1992749E+00, &
     & 0.1515700E+00, 0.1540000E+00, 0.1775900E+00, 0.1775900E+00 /
      data (ref_adm(11,iz, 6, 4),iz = 1,20) / &
     & 0.1960524E+00, 0.1960524E+00, 0.1919978E+00, 0.1896572E+00, &
     & 0.1873113E+00, 0.1935100E+00, 0.1830175E+00, 0.1816341E+00, &
     & 0.1577400E+00, 0.2225700E+00, 0.2367600E+00, 0.2546600E+00, &
     & 0.1453900E+00, 0.1735900E+00, 0.1901700E+00, 0.1626400E+00, &
     & 0.1573100E+00, 0.2030900E+00, 0.2180729E+00, 0.2180729E+00 /
      data (ref_adm(11,iz, 7, 4),iz = 1,20) / &
     & 0.1960692E+00, 0.1960692E+00, 0.2795000E+00, 0.2186800E+00, &
     & 0.2325400E+00, 0.1710500E+00, 0.2032900E+00, 0.1941700E+00, &
     & 0.2189200E+00, 0.1914900E+00, 0.2378900E+00, 0.2321400E+00, &
     & 0.1706100E+00, 0.1680100E+00, 0.1930271E+00, 0.1991726E+00, &
     & 0.1647600E+00, 0.2154833E+00, 0.2176400E+00, 0.2176400E+00 /
      data (ref_adm(11,iz, 8, 4),iz = 1,20) / &
     & 0.1961379E+00, 0.1961379E+00, 0.1922062E+00, 0.2375900E+00, &
     & 0.1877844E+00, 0.2357300E+00, 0.1693600E+00, 0.1932400E+00, &
     & 0.1812683E+00, 0.1498800E+00, 0.1869300E+00, 0.1944600E+00, &
     & 0.1528700E+00, 0.1611400E+00, 0.1735600E+00, 0.1990294E+00, &
     & 0.2059030E+00, 0.2150823E+00, 0.2172351E+00, 0.2172351E+00 /
      data (ref_adm(11,iz, 9, 4),iz = 1,20) / &
     & 0.1962336E+00, 0.1962336E+00, 0.1923619E+00, 0.1901374E+00, &
     & 0.1880366E+00, 0.1857094E+00, 0.1821000E+00, 0.1727800E+00, &
     & 0.1831600E+00, 0.1797000E+00, 0.1691200E+00, 0.1595700E+00, &
     & 0.1736600E+00, 0.1727400E+00, 0.1929765E+00, 0.1989499E+00, &
     & 0.2058272E+00, 0.2147676E+00, 0.2166705E+00, 0.2166705E+00 /
      data (ref_adm(11,iz,10, 4),iz = 1,20) / &
     & 0.1963087E+00, 0.1963087E+00, 0.1925470E+00, 0.1903720E+00, &
     & 0.1883847E+00, 0.1860825E+00, 0.1842543E+00, 0.1996800E+00, &
     & 0.1948300E+00, 0.2426900E+00, 0.1772600E+00, 0.1821100E+00, &
     & 0.1696600E+00, 0.1928600E+00, 0.1930117E+00, 0.1989245E+00, &
     & 0.2056323E+00, 0.2145085E+00, 0.1908600E+00, 0.1908600E+00 /
      data (ref_adm(11,iz,11, 4),iz = 1,20) / &
     & 0.2145600E+00, 0.2145600E+00, 0.1927565E+00, 0.1906147E+00, &
     & 0.1886834E+00, 0.1864602E+00, 0.1846286E+00, 0.1831844E+00, &
     & 0.1822640E+00, 0.1819355E+00, 0.1684900E+00, 0.1890500E+00, &
     & 0.2227100E+00, 0.1904700E+00, 0.1931262E+00, 0.1989462E+00, &
     & 0.2055210E+00, 0.2141972E+00, 0.1576300E+00, 0.1576300E+00 /
      data (ref_adm(11,iz,12, 4),iz = 1,20) / &
     & 0.1964915E+00, 0.1964915E+00, 0.2878300E+00, 0.1908789E+00, &
     & 0.1890681E+00, 0.1869491E+00, 0.1851173E+00, 0.1836262E+00, &
     & 0.1827288E+00, 0.1823239E+00, 0.1789400E+00, 0.1761600E+00, &
     & 0.1676400E+00, 0.1675700E+00, 0.1931513E+00, 0.1988508E+00, &
     & 0.2053422E+00, 0.2138557E+00, 0.2147831E+00, 0.2147831E+00 /
      data (ref_adm(11,iz,13, 4),iz = 1,20) / &
     & 0.1965961E+00, 0.1965961E+00, 0.1932316E+00, 0.2022900E+00, &
     & 0.1894611E+00, 0.1874539E+00, 0.2616300E+00, 0.1841425E+00, &
     & 0.1831695E+00, 0.1827815E+00, 0.1273900E+00, 0.1689000E+00, &
     & 0.2035700E+00, 0.1760300E+00, 0.1505000E+00, 0.1988299E+00, &
     & 0.2051288E+00, 0.2135641E+00, 0.2141124E+00, 0.2141124E+00 /
      data (ref_adm(11,iz,14, 4),iz = 1,20) / &
     & 0.1966986E+00, 0.1966986E+00, 0.1935490E+00, 0.1915099E+00, &
     & 0.1898815E+00, 0.1879762E+00, 0.1861458E+00, 0.1846562E+00, &
     & 0.1836851E+00, 0.1832681E+00, 0.1835867E+00, 0.1752200E+00, &
     & 0.1870645E+00, 0.1480200E+00, 0.1631500E+00, 0.1988237E+00, &
     & 0.2050111E+00, 0.2131979E+00, 0.2134248E+00, 0.2134248E+00 /
      data (ref_adm(11,iz,15, 4),iz = 1,20) / &
     & 0.1967963E+00, 0.1967963E+00, 0.1938483E+00, 0.1918327E+00, &
     & 0.1903091E+00, 0.1885651E+00, 0.1866966E+00, 0.2054300E+00, &
     & 0.1842335E+00, 0.1477300E+00, 0.1809800E+00, 0.1696000E+00, &
     & 0.1873874E+00, 0.1898266E+00, 0.1482900E+00, 0.1988402E+00, &
     & 0.2048795E+00, 0.2129083E+00, 0.2128198E+00, 0.2128198E+00 /
      data (ref_adm(11,iz,16, 4),iz = 1,20) / &
     & 0.1969386E+00, 0.1969386E+00, 0.1942091E+00, 0.1921497E+00, &
     & 0.1907474E+00, 0.1891388E+00, 0.1873471E+00, 0.2317800E+00, &
     & 0.2087900E+00, 0.1619500E+00, 0.1947100E+00, 0.1739300E+00, &
     & 0.1978400E+00, 0.1792200E+00, 0.1508500E+00, 0.1988780E+00, &
     & 0.2047613E+00, 0.2126176E+00, 0.2122156E+00, 0.2122156E+00 /
      data (ref_adm(11,iz,17, 4),iz = 1,20) / &
     & 0.1970547E+00, 0.1970547E+00, 0.1945813E+00, 0.1925716E+00, &
     & 0.1911813E+00, 0.1897686E+00, 0.1879956E+00, 0.1865743E+00, &
     & 0.2220500E+00, 0.1991100E+00, 0.2001400E+00, 0.2051300E+00, &
     & 0.1889600E+00, 0.1455300E+00, 0.1598600E+00, 0.1988954E+00, &
     & 0.2047215E+00, 0.2123017E+00, 0.2116990E+00, 0.2116990E+00 /
      data (ref_adm(11,iz,18, 4),iz = 1,20) / &
     & 0.1989289E+00, 0.1989289E+00, 0.1951525E+00, 0.1921214E+00, &
     & 0.1900526E+00, 0.1887845E+00, 0.1871598E+00, 0.1855257E+00, &
     & 0.1842444E+00, 0.2030600E+00, 0.1762900E+00, 0.1841397E+00, &
     & 0.1856359E+00, 0.1672900E+00, 0.1626200E+00, 0.1669000E+00, &
     & 0.2002118E+00, 0.2070794E+00, 0.2060103E+00, 0.2060103E+00 /
      data (ref_adm(11,iz,19, 4),iz = 1,20) / &
     & 0.1990899E+00, 0.1990899E+00, 0.1954985E+00, 0.1924585E+00, &
     & 0.1903531E+00, 0.1891242E+00, 0.1876012E+00, 0.1859248E+00, &
     & 0.1814200E+00, 0.2045700E+00, 0.1929100E+00, 0.2142500E+00, &
     & 0.1858863E+00, 0.1677500E+00, 0.2066400E+00, 0.1835500E+00, &
     & 0.2002618E+00, 0.2070444E+00, 0.2058000E+00, 0.2058000E+00 /
      data (ref_adm(11,iz,20, 4),iz = 1,20) / &
     & 0.1992632E+00, 0.1992632E+00, 0.1957686E+00, 0.1927262E+00, &
     & 0.1906001E+00, 0.1893806E+00, 0.1879560E+00, 0.1862924E+00, &
     & 0.1850229E+00, 0.2311300E+00, 0.1898200E+00, 0.1847012E+00, &
     & 0.1861412E+00, 0.1878540E+00, 0.2125200E+00, 0.1950863E+00, &
     & 0.1654400E+00, 0.2068532E+00, 0.2056239E+00, 0.2056239E+00 /
      data (ref_adm(11,iz,21, 4),iz = 1,20) / &
     & 0.1993816E+00, 0.1993816E+00, 0.1961031E+00, 0.1930707E+00, &
     & 0.1908546E+00, 0.1896918E+00, 0.1883162E+00, 0.1866726E+00, &
     & 0.1854220E+00, 0.1845728E+00, 0.1843540E+00, 0.1850296E+00, &
     & 0.1863862E+00, 0.1881359E+00, 0.2050100E+00, 0.2241400E+00, &
     & 0.1830700E+00, 0.1536100E+00, 0.2054852E+00, 0.2054852E+00 /
      data (ref_adm(11,iz,22, 4),iz = 1,20) / &
     & 0.2695493E+00, 0.2695493E+00, 0.2647257E+00, 0.2630548E+00, &
     & 0.2617341E+00, 0.2608308E+00, 0.2592386E+00, 0.2565262E+00, &
     & 0.2530423E+00, 0.2488705E+00, 0.2443331E+00, 0.2380337E+00, &
     & 0.2306811E+00, 0.2237574E+00, 0.2138145E+00, 0.2007208E+00, &
     & 0.1872124E+00, 0.1695379E+00, 0.1383298E+00, 0.1383298E+00 /
      data (ref_adm(11,iz,23, 4),iz = 1,20) / &
     & 0.2695493E+00, 0.2695493E+00, 0.2647257E+00, 0.2630548E+00, &
     & 0.2617341E+00, 0.2608308E+00, 0.2592386E+00, 0.2565262E+00, &
     & 0.2530423E+00, 0.2488705E+00, 0.2443331E+00, 0.2380337E+00, &
     & 0.2306811E+00, 0.2237574E+00, 0.2138145E+00, 0.2007208E+00, &
     & 0.1872124E+00, 0.1695379E+00, 0.1383298E+00, 0.1383298E+00 /
      data (ref_adm(11,iz,24, 4),iz = 1,20) / &
     & 0.2695493E+00, 0.2695493E+00, 0.2647257E+00, 0.2630548E+00, &
     & 0.2617341E+00, 0.2276300E+00, 0.2592386E+00, 0.2565262E+00, &
     & 0.2530423E+00, 0.2488705E+00, 0.2443331E+00, 0.2380337E+00, &
     & 0.2306811E+00, 0.2237574E+00, 0.2138145E+00, 0.2007208E+00, &
     & 0.1872124E+00, 0.1695379E+00, 0.1383298E+00, 0.1383298E+00 /
      data (ref_adm(11,iz,25, 4),iz = 1,20) / &
     & 0.2695493E+00, 0.2695493E+00, 0.2647257E+00, 0.2630548E+00, &
     & 0.2617341E+00, 0.2156700E+00, 0.2592386E+00, 0.2565262E+00, &
     & 0.2530423E+00, 0.2488705E+00, 0.2443331E+00, 0.2380337E+00, &
     & 0.2306811E+00, 0.2237574E+00, 0.2138145E+00, 0.2007208E+00, &
     & 0.1872124E+00, 0.2460400E+00, 0.1383298E+00, 0.1383298E+00 /
      data (ref_adm(11,iz,26, 4),iz = 1,20) / &
     & 0.2695493E+00, 0.2695493E+00, 0.2647257E+00, 0.2630548E+00, &
     & 0.2617341E+00, 0.2608308E+00, 0.2592386E+00, 0.2178400E+00, &
     & 0.2530423E+00, 0.2488705E+00, 0.2443331E+00, 0.2380337E+00, &
     & 0.2306811E+00, 0.2237574E+00, 0.2138145E+00, 0.2007208E+00, &
     & 0.1872124E+00, 0.1695379E+00, 0.1383298E+00, 0.1383298E+00 /
      data (ref_adm(11,iz,27, 4),iz = 1,20) / &
     & 0.2695493E+00, 0.2695493E+00, 0.2647257E+00, 0.2630548E+00, &
     & 0.2617341E+00, 0.2608308E+00, 0.2592386E+00, 0.2565262E+00, &
     & 0.2530423E+00, 0.2488705E+00, 0.2443331E+00, 0.2380337E+00, &
     & 0.2306811E+00, 0.2237574E+00, 0.2138145E+00, 0.2007208E+00, &
     & 0.1872124E+00, 0.1695379E+00, 0.1383298E+00, 0.1383298E+00 /
      data (ref_adm(11,iz,28, 4),iz = 1,20) / &
     & 0.2695493E+00, 0.2695493E+00, 0.2647257E+00, 0.2630548E+00, &
     & 0.2617341E+00, 0.2608308E+00, 0.2592386E+00, 0.2565262E+00, &
     & 0.2530423E+00, 0.2488705E+00, 0.2443331E+00, 0.2380337E+00, &
     & 0.2306811E+00, 0.2237574E+00, 0.2138145E+00, 0.2007208E+00, &
     & 0.1872124E+00, 0.1695379E+00, 0.1383298E+00, 0.1383298E+00 /
      data (ref_adm(11,iz,29, 4),iz = 1,20) / &
     & 0.2695493E+00, 0.2695493E+00, 0.2647257E+00, 0.2630548E+00, &
     & 0.2617341E+00, 0.2608308E+00, 0.2592386E+00, 0.2565262E+00, &
     & 0.2530423E+00, 0.2488705E+00, 0.2443331E+00, 0.2380337E+00, &
     & 0.2306811E+00, 0.2237574E+00, 0.2138145E+00, 0.2007208E+00, &
     & 0.1872124E+00, 0.1695379E+00, 0.1383298E+00, 0.1383298E+00 /
      data (ref_adm(11,iz,30, 4),iz = 1,20) / &
     & 0.2695493E+00, 0.2695493E+00, 0.2647257E+00, 0.2630548E+00, &
     & 0.2617341E+00, 0.2608308E+00, 0.2592386E+00, 0.2565262E+00, &
     & 0.2530423E+00, 0.2488705E+00, 0.2443331E+00, 0.2380337E+00, &
     & 0.2306811E+00, 0.2237574E+00, 0.2138145E+00, 0.2007208E+00, &
     & 0.1872124E+00, 0.1695379E+00, 0.1383298E+00, 0.1383298E+00 /
      data (ref_adm(11,iz,31, 4),iz = 1,20) / &
     & 0.2695493E+00, 0.2695493E+00, 0.2647257E+00, 0.2630548E+00, &
     & 0.2617341E+00, 0.2608308E+00, 0.2592386E+00, 0.2565262E+00, &
     & 0.2530423E+00, 0.2488705E+00, 0.2443331E+00, 0.2380337E+00, &
     & 0.2306811E+00, 0.2237574E+00, 0.2138145E+00, 0.2007208E+00, &
     & 0.1872124E+00, 0.1695379E+00, 0.1383298E+00, 0.1383298E+00 /
      data (ref_adm(11,iz,32, 4),iz = 1,20) / &
     & 0.2695493E+00, 0.2695493E+00, 0.2647257E+00, 0.2630548E+00, &
     & 0.2617341E+00, 0.2608308E+00, 0.2592386E+00, 0.2565262E+00, &
     & 0.2530423E+00, 0.2488705E+00, 0.2443331E+00, 0.2380337E+00, &
     & 0.2306811E+00, 0.2237574E+00, 0.2138145E+00, 0.2007208E+00, &
     & 0.1872124E+00, 0.1695379E+00, 0.1383298E+00, 0.1383298E+00 /
      data (ref_adm(11,iz,33, 4),iz = 1,20) / &
     & 0.2695493E+00, 0.2695493E+00, 0.2647257E+00, 0.2630548E+00, &
     & 0.2617341E+00, 0.2608308E+00, 0.2592386E+00, 0.2565262E+00, &
     & 0.2530423E+00, 0.2488705E+00, 0.2443331E+00, 0.2380337E+00, &
     & 0.2306811E+00, 0.2237574E+00, 0.2138145E+00, 0.2007208E+00, &
     & 0.1872124E+00, 0.1695379E+00, 0.1383298E+00, 0.1383298E+00 /
      data (ref_adm(11,iz,34, 4),iz = 1,20) / &
     & 0.2695493E+00, 0.2695493E+00, 0.2647257E+00, 0.2630548E+00, &
     & 0.2617341E+00, 0.2608308E+00, 0.2592386E+00, 0.2565262E+00, &
     & 0.2530423E+00, 0.2488705E+00, 0.2443331E+00, 0.2380337E+00, &
     & 0.2306811E+00, 0.2237574E+00, 0.2138145E+00, 0.2007208E+00, &
     & 0.1872124E+00, 0.1695379E+00, 0.1383298E+00, 0.1383298E+00 /
      data (ref_adm(11,iz,35, 4),iz = 1,20) / &
     & 0.2695493E+00, 0.2695493E+00, 0.2647257E+00, 0.2630548E+00, &
     & 0.2617341E+00, 0.2608308E+00, 0.2592386E+00, 0.2565262E+00, &
     & 0.2530423E+00, 0.2488705E+00, 0.2443331E+00, 0.2380337E+00, &
     & 0.2306811E+00, 0.2237574E+00, 0.2138145E+00, 0.2007208E+00, &
     & 0.1872124E+00, 0.1695379E+00, 0.1383298E+00, 0.1383298E+00 /
      data (ref_adm(11,iz,36, 4),iz = 1,20) / &
     & 0.2695493E+00, 0.2695493E+00, 0.2647257E+00, 0.2630548E+00, &
     & 0.2617341E+00, 0.2608308E+00, 0.2592386E+00, 0.2565262E+00, &
     & 0.2530423E+00, 0.2488705E+00, 0.2443331E+00, 0.2380337E+00, &
     & 0.2306811E+00, 0.2237574E+00, 0.2138145E+00, 0.2007208E+00, &
     & 0.1872124E+00, 0.1695379E+00, 0.1383298E+00, 0.1383298E+00 /
      data (ref_adm(11,iz,37, 4),iz = 1,20) / &
     & 0.2695493E+00, 0.2695493E+00, 0.2647257E+00, 0.2630548E+00, &
     & 0.2617341E+00, 0.2608308E+00, 0.2592386E+00, 0.2565262E+00, &
     & 0.2530423E+00, 0.2488705E+00, 0.2443331E+00, 0.2380337E+00, &
     & 0.2306811E+00, 0.2237574E+00, 0.2138145E+00, 0.2007208E+00, &
     & 0.1872124E+00, 0.1695379E+00, 0.1383298E+00, 0.1383298E+00 /
      data (ref_adm(11,iz,38, 4),iz = 1,20) / &
     & 0.2695493E+00, 0.2695493E+00, 0.2647257E+00, 0.2630548E+00, &
     & 0.2617341E+00, 0.2608308E+00, 0.2592386E+00, 0.2565262E+00, &
     & 0.2530423E+00, 0.2488705E+00, 0.2443331E+00, 0.2380337E+00, &
     & 0.2306811E+00, 0.2237574E+00, 0.2138145E+00, 0.2007208E+00, &
     & 0.1872124E+00, 0.1695379E+00, 0.1383298E+00, 0.1383298E+00 /
! Solar Zenith Angle 20.0 Albedo  0.2105688E+00
      data (ref_adm(11,iz, 1, 5),iz = 1,20) / &
     & 0.2180672E+00, 0.2180672E+00, 0.1965500E+00, 0.1853700E+00, &
     & 0.1708200E+00, 0.1976200E+00, 0.3069900E+00, 0.2215900E+00, &
     & 0.1944900E+00, 0.1737000E+00, 0.1625400E+00, 0.1489400E+00, &
     & 0.1543500E+00, 0.1545100E+00, 0.1733500E+00, 0.2293600E+00, &
     & 0.2621400E+00, 0.2139468E+00, 0.2107601E+00, 0.2107601E+00 /
      data (ref_adm(11,iz, 2, 5),iz = 1,20) / &
     & 0.2180672E+00, 0.2180672E+00, 0.1965500E+00, 0.1853700E+00, &
     & 0.1708200E+00, 0.1976200E+00, 0.3069900E+00, 0.2215900E+00, &
     & 0.1944900E+00, 0.1737000E+00, 0.1625400E+00, 0.1489400E+00, &
     & 0.1543500E+00, 0.1545100E+00, 0.1733500E+00, 0.2293600E+00, &
     & 0.2621400E+00, 0.2139468E+00, 0.2107601E+00, 0.2107601E+00 /
      data (ref_adm(11,iz, 3, 5),iz = 1,20) / &
     & 0.2180672E+00, 0.2180672E+00, 0.2064805E+00, 0.1957900E+00, &
     & 0.2197900E+00, 0.2979500E+00, 0.2370100E+00, 0.2411900E+00, &
     & 0.1938677E+00, 0.1927546E+00, 0.1923464E+00, 0.1514600E+00, &
     & 0.1414200E+00, 0.1689800E+00, 0.2015000E+00, 0.1690700E+00, &
     & 0.1965800E+00, 0.2163500E+00, 0.3556410E-01, 0.3556410E-01 /
      data (ref_adm(11,iz, 4, 5),iz = 1,20) / &
     & 0.1950900E+00, 0.1950900E+00, 0.1854700E+00, 0.2027459E+00, &
     & 0.2203700E+00, 0.2233600E+00, 0.2573100E+00, 0.2135800E+00, &
     & 0.2026500E+00, 0.2099100E+00, 0.1850900E+00, 0.1668400E+00, &
     & 0.1549300E+00, 0.1761600E+00, 0.2549300E+00, 0.1815900E+00, &
     & 0.1850000E+00, 0.2204200E+00, 0.2107601E+00, 0.2107601E+00 /
      data (ref_adm(11,iz, 5, 5),iz = 1,20) / &
     & 0.2218000E+00, 0.2218000E+00, 0.1768300E+00, 0.2091600E+00, &
     & 0.2519100E+00, 0.2287900E+00, 0.2404000E+00, 0.2106600E+00, &
     & 0.2420000E+00, 0.2456000E+00, 0.1659300E+00, 0.1799000E+00, &
     & 0.1721900E+00, 0.1841300E+00, 0.1861100E+00, 0.1509400E+00, &
     & 0.3110000E+00, 0.2176500E+00, 0.2107602E+00, 0.2107602E+00 /
      data (ref_adm(11,iz, 6, 5),iz = 1,20) / &
     & 0.2362200E+00, 0.2362200E+00, 0.2536400E+00, 0.2251800E+00, &
     & 0.2238400E+00, 0.2057500E+00, 0.2206900E+00, 0.1955600E+00, &
     & 0.1781300E+00, 0.2470600E+00, 0.1508600E+00, 0.1551700E+00, &
     & 0.1876500E+00, 0.1629200E+00, 0.2111700E+00, 0.3109400E+00, &
     & 0.2070900E+00, 0.1882400E+00, 0.2107601E+00, 0.2107601E+00 /
      data (ref_adm(11,iz, 7, 5),iz = 1,20) / &
     & 0.2532000E+00, 0.2532000E+00, 0.2311600E+00, 0.1831700E+00, &
     & 0.1915900E+00, 0.2021100E+00, 0.1462300E+00, 0.1730300E+00, &
     & 0.1653600E+00, 0.2148100E+00, 0.1634900E+00, 0.1620800E+00, &
     & 0.2195300E+00, 0.1892300E+00, 0.1705900E+00, 0.2025651E+00, &
     & 0.2187100E+00, 0.1951500E+00, 0.2107602E+00, 0.2107602E+00 /
      data (ref_adm(11,iz, 8, 5),iz = 1,20) / &
     & 0.2016400E+00, 0.2016400E+00, 0.2356000E+00, 0.2401500E+00, &
     & 0.1935800E+00, 0.2044500E+00, 0.1877200E+00, 0.1990800E+00, &
     & 0.1999000E+00, 0.1531300E+00, 0.1785500E+00, 0.1613600E+00, &
     & 0.2184800E+00, 0.2834000E+00, 0.1865900E+00, 0.2140300E+00, &
     & 0.2092400E+00, 0.2124800E+00, 0.1900400E+00, 0.1900400E+00 /
      data (ref_adm(11,iz, 9, 5),iz = 1,20) / &
     & 0.2002300E+00, 0.2002300E+00, 0.2174800E+00, 0.2165000E+00, &
     & 0.2218000E+00, 0.2121400E+00, 0.2033100E+00, 0.2443700E+00, &
     & 0.1844100E+00, 0.1754700E+00, 0.1605200E+00, 0.1723700E+00, &
     & 0.1654800E+00, 0.1542800E+00, 0.1706700E+00, 0.2138900E+00, &
     & 0.2076307E+00, 0.2226600E+00, 0.2107602E+00, 0.2107602E+00 /
      data (ref_adm(11,iz,10, 5),iz = 1,20) / &
     & 0.2200300E+00, 0.2200300E+00, 0.2548300E+00, 0.2293300E+00, &
     & 0.2235900E+00, 0.2375300E+00, 0.2012300E+00, 0.2081300E+00, &
     & 0.1877700E+00, 0.1881700E+00, 0.1972400E+00, 0.1950500E+00, &
     & 0.2005100E+00, 0.1710400E+00, 0.1752200E+00, 0.2005400E+00, &
     & 0.1788100E+00, 0.1926400E+00, 0.2107601E+00, 0.2107601E+00 /
      data (ref_adm(11,iz,11, 5),iz = 1,20) / &
     & 0.2349400E+00, 0.2349400E+00, 0.2064805E+00, 0.2027459E+00, &
     & 0.2062000E+00, 0.1989418E+00, 0.2287400E+00, 0.1954900E+00, &
     & 0.1878600E+00, 0.1789800E+00, 0.1744500E+00, 0.1741000E+00, &
     & 0.2108300E+00, 0.1744300E+00, 0.1983865E+00, 0.2025651E+00, &
     & 0.2135200E+00, 0.2139468E+00, 0.2107602E+00, 0.2107602E+00 /
      data (ref_adm(11,iz,12, 5),iz = 1,20) / &
     & 0.2777500E+00, 0.2777500E+00, 0.2805900E+00, 0.2027459E+00, &
     & 0.1952700E+00, 0.1989418E+00, 0.1973772E+00, 0.1941500E+00, &
     & 0.2060900E+00, 0.2118100E+00, 0.1806500E+00, 0.1725000E+00, &
     & 0.1830400E+00, 0.1646400E+00, 0.1983865E+00, 0.2025651E+00, &
     & 0.2076307E+00, 0.1931800E+00, 0.1931000E+00, 0.1931000E+00 /
      data (ref_adm(11,iz,13, 5),iz = 1,20) / &
     & 0.2674900E+00, 0.2674900E+00, 0.2083100E+00, 0.2020700E+00, &
     & 0.1959700E+00, 0.1817700E+00, 0.1946700E+00, 0.1881500E+00, &
     & 0.1837900E+00, 0.1797700E+00, 0.1669200E+00, 0.2191200E+00, &
     & 0.1826800E+00, 0.1732100E+00, 0.2089300E+00, 0.2153000E+00, &
     & 0.2263900E+00, 0.2139468E+00, 0.2107602E+00, 0.2107602E+00 /
      data (ref_adm(11,iz,14, 5),iz = 1,20) / &
     & 0.2126700E+00, 0.2126700E+00, 0.1668900E+00, 0.2027459E+00, &
     & 0.2614900E+00, 0.1734400E+00, 0.2032900E+00, 0.1953970E+00, &
     & 0.1938677E+00, 0.1636700E+00, 0.2003700E+00, 0.1948600E+00, &
     & 0.1946700E+00, 0.2081100E+00, 0.1607700E+00, 0.2025651E+00, &
     & 0.1653400E+00, 0.2139468E+00, 0.2107601E+00, 0.2107601E+00 /
      data (ref_adm(11,iz,15, 5),iz = 1,20) / &
     & 0.2568200E+00, 0.2568200E+00, 0.2259100E+00, 0.1978000E+00, &
     & 0.1900600E+00, 0.1735400E+00, 0.1737900E+00, 0.1884400E+00, &
     & 0.1938677E+00, 0.1995800E+00, 0.1812300E+00, 0.2027500E+00, &
     & 0.1898900E+00, 0.1456900E+00, 0.1983865E+00, 0.2025651E+00, &
     & 0.2076307E+00, 0.2139468E+00, 0.2107602E+00, 0.2107602E+00 /
      data (ref_adm(11,iz,16, 5),iz = 1,20) / &
     & 0.2201100E+00, 0.2201100E+00, 0.2357400E+00, 0.2205500E+00, &
     & 0.1709600E+00, 0.1606400E+00, 0.1629000E+00, 0.1784300E+00, &
     & 0.1938677E+00, 0.1740400E+00, 0.2333600E+00, 0.2342800E+00, &
     & 0.1928200E+00, 0.1798500E+00, 0.1418300E+00, 0.2025651E+00, &
     & 0.2076307E+00, 0.2139468E+00, 0.2107601E+00, 0.2107601E+00 /
      data (ref_adm(11,iz,17, 5),iz = 1,20) / &
     & 0.2185600E+00, 0.2185600E+00, 0.2181300E+00, 0.2131000E+00, &
     & 0.2051500E+00, 0.2142500E+00, 0.1776900E+00, 0.1485600E+00, &
     & 0.1859800E+00, 0.1605700E+00, 0.2029600E+00, 0.1874000E+00, &
     & 0.2200000E+00, 0.1670800E+00, 0.1665400E+00, 0.2025651E+00, &
     & 0.2076307E+00, 0.2139468E+00, 0.2107602E+00, 0.2107602E+00 /
      data (ref_adm(11,iz,18, 5),iz = 1,20) / &
     & 0.2328000E+00, 0.2328000E+00, 0.2237800E+00, 0.2567400E+00, &
     & 0.2573700E+00, 0.2260100E+00, 0.1871800E+00, 0.1652200E+00, &
     & 0.2708200E+00, 0.2147900E+00, 0.2133200E+00, 0.1758200E+00, &
     & 0.2456900E+00, 0.1901700E+00, 0.1311100E+00, 0.2079537E+00, &
     & 0.2126856E+00, 0.2176746E+00, 0.2124243E+00, 0.2124243E+00 /
      data (ref_adm(11,iz,19, 5),iz = 1,20) / &
     & 0.1821800E+00, 0.1821800E+00, 0.1995900E+00, 0.2059942E+00, &
     & 0.2042714E+00, 0.2681000E+00, 0.2209200E+00, 0.1791600E+00, &
     & 0.1773000E+00, 0.1853500E+00, 0.1955800E+00, 0.1873700E+00, &
     & 0.1752700E+00, 0.2359300E+00, 0.2038842E+00, 0.2216400E+00, &
     & 0.2379400E+00, 0.2176309E+00, 0.2122099E+00, 0.2122099E+00 /
      data (ref_adm(11,iz,20, 5),iz = 1,20) / &
     & 0.2108100E+00, 0.2108100E+00, 0.2092478E+00, 0.2062371E+00, &
     & 0.2044713E+00, 0.2037918E+00, 0.2023238E+00, 0.2002049E+00, &
     & 0.2117600E+00, 0.2062400E+00, 0.1979400E+00, 0.1898000E+00, &
     & 0.1714300E+00, 0.1754000E+00, 0.1989900E+00, 0.1987100E+00, &
     & 0.2244800E+00, 0.2051200E+00, 0.2120276E+00, 0.2120276E+00 /
      data (ref_adm(11,iz,21, 5),iz = 1,20) / &
     & 0.1818500E+00, 0.1818500E+00, 0.2096147E+00, 0.1758000E+00, &
     & 0.1828400E+00, 0.2037500E+00, 0.2063100E+00, 0.2006342E+00, &
     & 0.1990707E+00, 0.2237500E+00, 0.1934300E+00, 0.2227700E+00, &
     & 0.1848300E+00, 0.1812100E+00, 0.1755700E+00, 0.1939100E+00, &
     & 0.2016300E+00, 0.2172713E+00, 0.2118850E+00, 0.2118850E+00 /
      data (ref_adm(11,iz,22, 5),iz = 1,20) / &
     & 0.2152323E+00, 0.2152323E+00, 0.2071400E+00, 0.1906000E+00, &
     & 0.2163624E+00, 0.1861100E+00, 0.2162585E+00, 0.2887700E+00, &
     & 0.2161479E+00, 0.2163279E+00, 0.2277300E+00, 0.1718500E+00, &
     & 0.1881500E+00, 0.1909200E+00, 0.1993800E+00, 0.1710200E+00, &
     & 0.1812100E+00, 0.2300174E+00, 0.2227794E+00, 0.2227794E+00 /
      data (ref_adm(11,iz,23, 5),iz = 1,20) / &
     & 0.2180800E+00, 0.2180800E+00, 0.2295000E+00, 0.2731100E+00, &
     & 0.2173454E+00, 0.2176074E+00, 0.2176622E+00, 0.2176705E+00, &
     & 0.2176711E+00, 0.2559600E+00, 0.2223500E+00, 0.1898400E+00, &
     & 0.1864100E+00, 0.2010300E+00, 0.2004300E+00, 0.2262100E+00, &
     & 0.2085900E+00, 0.1571400E+00, 0.2223642E+00, 0.2223642E+00 /
      data (ref_adm(11,iz,24, 5),iz = 1,20) / &
     & 0.2389700E+00, 0.2389700E+00, 0.2579600E+00, 0.1903100E+00, &
     & 0.2376100E+00, 0.2188938E+00, 0.2086600E+00, 0.2109600E+00, &
     & 0.2193089E+00, 0.2426600E+00, 0.2153700E+00, 0.1922900E+00, &
     & 0.1872300E+00, 0.2628100E+00, 0.2151000E+00, 0.1907700E+00, &
     & 0.1885900E+00, 0.2296578E+00, 0.2222856E+00, 0.2222856E+00 /
      data (ref_adm(11,iz,25, 5),iz = 1,20) / &
     & 0.2719300E+00, 0.2719300E+00, 0.2172200E+00, 0.2091800E+00, &
     & 0.2207100E+00, 0.2630000E+00, 0.2230700E+00, 0.2208552E+00, &
     & 0.2628300E+00, 0.2182600E+00, 0.2212656E+00, 0.2218410E+00, &
     & 0.1865900E+00, 0.2382500E+00, 0.2173300E+00, 0.2285200E+00, &
     & 0.1810500E+00, 0.2028000E+00, 0.1818800E+00, 0.1818800E+00 /
      data (ref_adm(11,iz,26, 5),iz = 1,20) / &
     & 0.2228800E+00, 0.2228800E+00, 0.2021300E+00, 0.2281000E+00, &
     & 0.2469900E+00, 0.2212942E+00, 0.2221425E+00, 0.2235500E+00, &
     & 0.2275600E+00, 0.2187200E+00, 0.2146900E+00, 0.2142300E+00, &
     & 0.2085600E+00, 0.2034100E+00, 0.1999400E+00, 0.2165700E+00, &
     & 0.2152200E+00, 0.2302818E+00, 0.2227744E+00, 0.2227744E+00 /
      data (ref_adm(11,iz,27, 5),iz = 1,20) / &
     & 0.2157437E+00, 0.2157437E+00, 0.2178352E+00, 0.2141100E+00, &
     & 0.2297200E+00, 0.2223094E+00, 0.2234553E+00, 0.2502900E+00, &
     & 0.2101300E+00, 0.2248194E+00, 0.2250331E+00, 0.2253383E+00, &
     & 0.1838500E+00, 0.1990000E+00, 0.1835700E+00, 0.2212900E+00, &
     & 0.2450500E+00, 0.2308658E+00, 0.2233524E+00, 0.2233524E+00 /
      data (ref_adm(11,iz,28, 5),iz = 1,20) / &
     & 0.2158169E+00, 0.2158169E+00, 0.4129100E+00, 0.2339400E+00, &
     & 0.2030200E+00, 0.2232615E+00, 0.2340300E+00, 0.2353400E+00, &
     & 0.2103000E+00, 0.2267328E+00, 0.2269736E+00, 0.2007600E+00, &
     & 0.2468500E+00, 0.2082600E+00, 0.2130300E+00, 0.2396200E+00, &
     & 0.2309431E+00, 0.2315709E+00, 0.2241696E+00, 0.2241696E+00 /
      data (ref_adm(11,iz,29, 5),iz = 1,20) / &
     & 0.2159163E+00, 0.2159163E+00, 0.2462700E+00, 0.2389800E+00, &
     & 0.2225212E+00, 0.2253500E+00, 0.2479000E+00, 0.2344100E+00, &
     & 0.2280400E+00, 0.2286737E+00, 0.2275900E+00, 0.2142400E+00, &
     & 0.2294412E+00, 0.2006900E+00, 0.2146200E+00, 0.2313803E+00, &
     & 0.2321940E+00, 0.2324983E+00, 0.2250521E+00, 0.2250521E+00 /
      data (ref_adm(11,iz,30, 5),iz = 1,20) / &
     & 0.2159726E+00, 0.2159726E+00, 0.2187442E+00, 0.2210848E+00, &
     & 0.2190400E+00, 0.2561900E+00, 0.2447200E+00, 0.2269700E+00, &
     & 0.2095300E+00, 0.2304008E+00, 0.2308894E+00, 0.2189200E+00, &
     & 0.2313190E+00, 0.2315347E+00, 0.2319600E+00, 0.2328732E+00, &
     & 0.2336583E+00, 0.2335444E+00, 0.2260717E+00, 0.2260717E+00 /
      data (ref_adm(11,iz,31, 5),iz = 1,20) / &
     & 0.2358800E+00, 0.2358800E+00, 0.2306400E+00, 0.2258300E+00, &
     & 0.2354900E+00, 0.2264957E+00, 0.2280207E+00, 0.2100000E+00, &
     & 0.2247400E+00, 0.2260100E+00, 0.2330600E+00, 0.2329887E+00, &
     & 0.2331600E+00, 0.2332737E+00, 0.2336149E+00, 0.2343285E+00, &
     & 0.2350321E+00, 0.2346661E+00, 0.2270937E+00, 0.2270937E+00 /
      data (ref_adm(11,iz,32, 5),iz = 1,20) / &
     & 0.2408800E+00, 0.2408800E+00, 0.1974400E+00, 0.2168500E+00, &
     & 0.2100800E+00, 0.2247300E+00, 0.2295147E+00, 0.2321200E+00, &
     & 0.2287200E+00, 0.2458700E+00, 0.2342181E+00, 0.2347643E+00, &
     & 0.2348491E+00, 0.2349125E+00, 0.2351714E+00, 0.2357003E+00, &
     & 0.2363496E+00, 0.2358062E+00, 0.2282045E+00, 0.2282045E+00 /
      data (ref_adm(11,iz,33, 5),iz = 1,20) / &
     & 0.2053200E+00, 0.2053200E+00, 0.2385900E+00, 0.2358600E+00, &
     & 0.2273300E+00, 0.2658700E+00, 0.2570200E+00, 0.2604100E+00, &
     & 0.2371000E+00, 0.2400300E+00, 0.2354078E+00, 0.2362779E+00, &
     & 0.2364155E+00, 0.2364409E+00, 0.2365595E+00, 0.2370220E+00, &
     & 0.2375458E+00, 0.2369253E+00, 0.2292860E+00, 0.2292860E+00 /
      data (ref_adm(11,iz,34, 5),iz = 1,20) / &
     & 0.2120600E+00, 0.2120600E+00, 0.1909700E+00, 0.2214400E+00, &
     & 0.2488600E+00, 0.2516900E+00, 0.2478200E+00, 0.2302700E+00, &
     & 0.2378000E+00, 0.2303900E+00, 0.2534000E+00, 0.2375240E+00, &
     & 0.2376922E+00, 0.2376949E+00, 0.2377771E+00, 0.2380937E+00, &
     & 0.2385339E+00, 0.2378491E+00, 0.2301905E+00, 0.2301905E+00 /
      data (ref_adm(11,iz,35, 5),iz = 1,20) / &
     & 0.2083700E+00, 0.2083700E+00, 0.2197729E+00, 0.2233961E+00, &
     & 0.2277770E+00, 0.2321782E+00, 0.2348012E+00, 0.2512400E+00, &
     & 0.2683100E+00, 0.2358951E+00, 0.2125100E+00, 0.2384400E+00, &
     & 0.2388101E+00, 0.2387417E+00, 0.2387504E+00, 0.2389874E+00, &
     & 0.2393446E+00, 0.2386518E+00, 0.2309431E+00, 0.2309431E+00 /
      data (ref_adm(11,iz,36, 5),iz = 1,20) / &
     & 0.2162460E+00, 0.2162460E+00, 0.2198751E+00, 0.2236485E+00, &
     & 0.2284113E+00, 0.2430500E+00, 0.2913500E+00, 0.2583700E+00, &
     & 0.2364715E+00, 0.2365724E+00, 0.2375736E+00, 0.2390492E+00, &
     & 0.2394999E+00, 0.2394269E+00, 0.2394194E+00, 0.2396272E+00, &
     & 0.2399494E+00, 0.2391623E+00, 0.2315010E+00, 0.2315010E+00 /
      data (ref_adm(11,iz,37, 5),iz = 1,20) / &
     & 0.2162534E+00, 0.2162534E+00, 0.2199298E+00, 0.2238011E+00, &
     & 0.2287872E+00, 0.2363516E+00, 0.2433900E+00, 0.2801900E+00, &
     & 0.2371529E+00, 0.2370428E+00, 0.2379104E+00, 0.2393758E+00, &
     & 0.2398953E+00, 0.2398164E+00, 0.2398087E+00, 0.2399732E+00, &
     & 0.2402716E+00, 0.2394326E+00, 0.2318167E+00, 0.2318167E+00 /
      data (ref_adm(11,iz,38, 5),iz = 1,20) / &
     & 0.2162534E+00, 0.2162534E+00, 0.2199298E+00, 0.2238011E+00, &
     & 0.2287872E+00, 0.2363516E+00, 0.2433900E+00, 0.2801900E+00, &
     & 0.2371529E+00, 0.2370428E+00, 0.2379104E+00, 0.2393758E+00, &
     & 0.2398953E+00, 0.2398164E+00, 0.2398087E+00, 0.2399732E+00, &
     & 0.2402716E+00, 0.2394326E+00, 0.2318167E+00, 0.2318167E+00 /
! Solar Zenith Angle 25.0 Albedo  0.2126119E+00
      data (ref_adm(11,iz, 1, 6),iz = 1,20) / &
     & 0.2110725E+00, 0.2110725E+00, 0.2003700E+00, 0.2022700E+00, &
     & 0.1690900E+00, 0.2181200E+00, 0.1607600E+00, 0.2040400E+00, &
     & 0.1902580E+00, 0.1894667E+00, 0.1369500E+00, 0.1354900E+00, &
     & 0.1551700E+00, 0.1914400E+00, 0.1647000E+00, 0.2496300E+00, &
     & 0.2200700E+00, 0.2290000E+00, 0.2157608E+00, 0.2157608E+00 /
      data (ref_adm(11,iz, 2, 6),iz = 1,20) / &
     & 0.2110725E+00, 0.2110725E+00, 0.2003700E+00, 0.2022700E+00, &
     & 0.1690900E+00, 0.2181200E+00, 0.1607600E+00, 0.2040400E+00, &
     & 0.1902580E+00, 0.1894667E+00, 0.1369500E+00, 0.1354900E+00, &
     & 0.1551700E+00, 0.1914400E+00, 0.1647000E+00, 0.2496300E+00, &
     & 0.2200700E+00, 0.2290000E+00, 0.2157608E+00, 0.2157608E+00 /
      data (ref_adm(11,iz, 3, 6),iz = 1,20) / &
     & 0.2370900E+00, 0.2370900E+00, 0.2044500E+00, 0.2277400E+00, &
     & 0.2209500E+00, 0.2096500E+00, 0.2155800E+00, 0.1793700E+00, &
     & 0.1902824E+00, 0.1499000E+00, 0.1573700E+00, 0.1483600E+00, &
     & 0.1448200E+00, 0.1526500E+00, 0.1467400E+00, 0.2182900E+00, &
     & 0.2308100E+00, 0.2173285E+00, 0.3469583E-01, 0.3469583E-01 /
      data (ref_adm(11,iz, 4, 6),iz = 1,20) / &
     & 0.2371200E+00, 0.2371200E+00, 0.2456600E+00, 0.2075000E+00, &
     & 0.2420400E+00, 0.1804000E+00, 0.1837000E+00, 0.1688500E+00, &
     & 0.1860800E+00, 0.1752900E+00, 0.1894842E+00, 0.1904576E+00, &
     & 0.1379300E+00, 0.1816700E+00, 0.1873700E+00, 0.1929500E+00, &
     & 0.1784000E+00, 0.2172492E+00, 0.2157344E+00, 0.2157344E+00 /
      data (ref_adm(11,iz, 5, 6),iz = 1,20) / &
     & 0.2298900E+00, 0.2298900E+00, 0.2369000E+00, 0.2590800E+00, &
     & 0.1618100E+00, 0.1953516E+00, 0.1728800E+00, 0.1610800E+00, &
     & 0.1903378E+00, 0.1895473E+00, 0.1299200E+00, 0.1351200E+00, &
     & 0.2343200E+00, 0.1964500E+00, 0.1937300E+00, 0.2210100E+00, &
     & 0.2432500E+00, 0.2299400E+00, 0.2156749E+00, 0.2156749E+00 /
      data (ref_adm(11,iz, 6, 6),iz = 1,20) / &
     & 0.2577800E+00, 0.2577800E+00, 0.2694800E+00, 0.1694200E+00, &
     & 0.1937300E+00, 0.1883600E+00, 0.1467800E+00, 0.1621100E+00, &
     & 0.1717800E+00, 0.1229000E+00, 0.3481100E+00, 0.2459400E+00, &
     & 0.2062400E+00, 0.1884300E+00, 0.2064100E+00, 0.2128300E+00, &
     & 0.2095151E+00, 0.2172292E+00, 0.2156267E+00, 0.2156267E+00 /
      data (ref_adm(11,iz, 7, 6),iz = 1,20) / &
     & 0.2058500E+00, 0.2058500E+00, 0.1876300E+00, 0.1937200E+00, &
     & 0.1836300E+00, 0.1860900E+00, 0.1821400E+00, 0.1633300E+00, &
     & 0.1715100E+00, 0.2219100E+00, 0.1896299E+00, 0.2365100E+00, &
     & 0.1891900E+00, 0.2025900E+00, 0.1870100E+00, 0.2423900E+00, &
     & 0.2139800E+00, 0.1561800E+00, 0.2155569E+00, 0.2155569E+00 /
      data (ref_adm(11,iz, 8, 6),iz = 1,20) / &
     & 0.2153400E+00, 0.2153400E+00, 0.2483800E+00, 0.2197300E+00, &
     & 0.1874900E+00, 0.2120600E+00, 0.1802200E+00, 0.1847100E+00, &
     & 0.1997800E+00, 0.1830900E+00, 0.1896960E+00, 0.2246100E+00, &
     & 0.1854400E+00, 0.1831100E+00, 0.1875900E+00, 0.1950300E+00, &
     & 0.2095700E+00, 0.2401800E+00, 0.2154358E+00, 0.2154358E+00 /
      data (ref_adm(11,iz, 9, 6),iz = 1,20) / &
     & 0.2127700E+00, 0.2127700E+00, 0.2277500E+00, 0.2272600E+00, &
     & 0.1911000E+00, 0.2194100E+00, 0.2017100E+00, 0.1507700E+00, &
     & 0.1608200E+00, 0.1885400E+00, 0.1449000E+00, 0.1928700E+00, &
     & 0.1865200E+00, 0.1846700E+00, 0.2122400E+00, 0.2379400E+00, &
     & 0.2057200E+00, 0.2076400E+00, 0.2153533E+00, 0.2153533E+00 /
      data (ref_adm(11,iz,10, 6),iz = 1,20) / &
     & 0.2149900E+00, 0.2149900E+00, 0.2245400E+00, 0.2123200E+00, &
     & 0.2132800E+00, 0.2148400E+00, 0.1927400E+00, 0.1921270E+00, &
     & 0.1484300E+00, 0.1531400E+00, 0.1536700E+00, 0.1937300E+00, &
     & 0.1747800E+00, 0.1637800E+00, 0.2028100E+00, 0.2481800E+00, &
     & 0.2739700E+00, 0.2170483E+00, 0.2152484E+00, 0.2152484E+00 /
      data (ref_adm(11,iz,11, 6),iz = 1,20) / &
     & 0.2282700E+00, 0.2282700E+00, 0.2320800E+00, 0.2098200E+00, &
     & 0.2005100E+00, 0.2078200E+00, 0.1845300E+00, 0.1939900E+00, &
     & 0.1764600E+00, 0.1807700E+00, 0.1661400E+00, 0.1821000E+00, &
     & 0.1777000E+00, 0.1733600E+00, 0.1713400E+00, 0.1856000E+00, &
     & 0.1962500E+00, 0.1914100E+00, 0.1822100E+00, 0.1822100E+00 /
      data (ref_adm(11,iz,12, 6),iz = 1,20) / &
     & 0.2026500E+00, 0.2026500E+00, 0.1982300E+00, 0.1995953E+00, &
     & 0.1933600E+00, 0.1950300E+00, 0.2347700E+00, 0.2157300E+00, &
     & 0.1922300E+00, 0.1710100E+00, 0.1714700E+00, 0.1913700E+00, &
     & 0.2049900E+00, 0.2307000E+00, 0.1617900E+00, 0.1605100E+00, &
     & 0.1793600E+00, 0.1869500E+00, 0.1751400E+00, 0.1751400E+00 /
      data (ref_adm(11,iz,13, 6),iz = 1,20) / &
     & 0.2012500E+00, 0.2012500E+00, 0.2065700E+00, 0.2003100E+00, &
     & 0.1858300E+00, 0.1706800E+00, 0.1934500E+00, 0.2216800E+00, &
     & 0.1850400E+00, 0.2117100E+00, 0.1710600E+00, 0.1886700E+00, &
     & 0.1990100E+00, 0.1996900E+00, 0.1984391E+00, 0.1732000E+00, &
     & 0.1610400E+00, 0.2168626E+00, 0.2148816E+00, 0.2148816E+00 /
      data (ref_adm(11,iz,14, 6),iz = 1,20) / &
     & 0.2299300E+00, 0.2299300E+00, 0.2578300E+00, 0.2437500E+00, &
     & 0.1976214E+00, 0.2535500E+00, 0.1945282E+00, 0.1901500E+00, &
     & 0.1444600E+00, 0.2139200E+00, 0.1838100E+00, 0.1981000E+00, &
     & 0.1972500E+00, 0.1567900E+00, 0.1723200E+00, 0.2034609E+00, &
     & 0.2150600E+00, 0.1782700E+00, 0.2147686E+00, 0.2147686E+00 /
      data (ref_adm(11,iz,15, 6),iz = 1,20) / &
     & 0.2388700E+00, 0.2388700E+00, 0.3281900E+00, 0.2680700E+00, &
     & 0.1977284E+00, 0.1964313E+00, 0.1956900E+00, 0.1928918E+00, &
     & 0.1914874E+00, 0.2502300E+00, 0.1904819E+00, 0.2028600E+00, &
     & 0.2197100E+00, 0.1583400E+00, 0.2252900E+00, 0.1885700E+00, &
     & 0.1926700E+00, 0.2016400E+00, 0.2146472E+00, 0.2146472E+00 /
      data (ref_adm(11,iz,16, 6),iz = 1,20) / &
     & 0.2402000E+00, 0.2402000E+00, 0.2190400E+00, 0.2565100E+00, &
     & 0.2445600E+00, 0.2328900E+00, 0.2985600E+00, 0.1984000E+00, &
     & 0.2008800E+00, 0.1803700E+00, 0.1590100E+00, 0.2119700E+00, &
     & 0.1800500E+00, 0.1217700E+00, 0.1985976E+00, 0.2006700E+00, &
     & 0.1902400E+00, 0.2110700E+00, 0.2145168E+00, 0.2145168E+00 /
      data (ref_adm(11,iz,17, 6),iz = 1,20) / &
     & 0.2183100E+00, 0.2183100E+00, 0.2020400E+00, 0.2596200E+00, &
     & 0.2067600E+00, 0.1967404E+00, 0.1950943E+00, 0.1932686E+00, &
     & 0.1918507E+00, 0.1774600E+00, 0.1701000E+00, 0.1935900E+00, &
     & 0.1932764E+00, 0.1954100E+00, 0.2150300E+00, 0.2007500E+00, &
     & 0.1988100E+00, 0.1914600E+00, 0.2144082E+00, 0.2144082E+00 /
      data (ref_adm(11,iz,18, 6),iz = 1,20) / &
     & 0.2883300E+00, 0.2883300E+00, 0.2188700E+00, 0.2120300E+00, &
     & 0.1485200E+00, 0.1672000E+00, 0.2094921E+00, 0.2070900E+00, &
     & 0.2081700E+00, 0.2241400E+00, 0.1914900E+00, 0.1861100E+00, &
     & 0.1734600E+00, 0.1780600E+00, 0.1903200E+00, 0.2129486E+00, &
     & 0.1880300E+00, 0.2216506E+00, 0.2155827E+00, 0.2155827E+00 /
      data (ref_adm(11,iz,19, 6),iz = 1,20) / &
     & 0.2457700E+00, 0.2457700E+00, 0.2178823E+00, 0.1707200E+00, &
     & 0.1872200E+00, 0.2110761E+00, 0.1977200E+00, 0.2044200E+00, &
     & 0.2200800E+00, 0.2461900E+00, 0.1738400E+00, 0.2036988E+00, &
     & 0.2200900E+00, 0.1757300E+00, 0.1807200E+00, 0.2129486E+00, &
     & 0.2259600E+00, 0.2216505E+00, 0.2155827E+00, 0.2155827E+00 /
      data (ref_adm(11,iz,20, 6),iz = 1,20) / &
     & 0.1770400E+00, 0.1770400E+00, 0.1953100E+00, 0.1745400E+00, &
     & 0.2118935E+00, 0.1766300E+00, 0.1756100E+00, 0.2095900E+00, &
     & 0.2630200E+00, 0.2042000E+00, 0.2510600E+00, 0.1501100E+00, &
     & 0.2048005E+00, 0.2064299E+00, 0.1729600E+00, 0.1811000E+00, &
     & 0.2168200E+00, 0.2308600E+00, 0.2155827E+00, 0.2155827E+00 /
      data (ref_adm(11,iz,21, 6),iz = 1,20) / &
     & 0.2212500E+00, 0.2212500E+00, 0.2503900E+00, 0.2141402E+00, &
     & 0.2496500E+00, 0.2110761E+00, 0.2094921E+00, 0.2442100E+00, &
     & 0.2052778E+00, 0.2379200E+00, 0.2033948E+00, 0.2036988E+00, &
     & 0.2048005E+00, 0.2050300E+00, 0.2078200E+00, 0.2316200E+00, &
     & 0.2057800E+00, 0.2138900E+00, 0.2155827E+00, 0.2155827E+00 /
      data (ref_adm(11,iz,22, 6),iz = 1,20) / &
     & 0.1988500E+00, 0.1988500E+00, 0.2063500E+00, 0.1797900E+00, &
     & 0.2392600E+00, 0.1984500E+00, 0.1879700E+00, 0.2449400E+00, &
     & 0.2398300E+00, 0.2427100E+00, 0.2204243E+00, 0.2589200E+00, &
     & 0.2261430E+00, 0.2288606E+00, 0.2089800E+00, 0.2304700E+00, &
     & 0.2211500E+00, 0.2192500E+00, 0.2424631E+00, 0.2424631E+00 /
      data (ref_adm(11,iz,23, 6),iz = 1,20) / &
     & 0.2306900E+00, 0.2306900E+00, 0.2354200E+00, 0.2039200E+00, &
     & 0.2174300E+00, 0.2049800E+00, 0.2326700E+00, 0.2334800E+00, &
     & 0.2383800E+00, 0.2202187E+00, 0.2451800E+00, 0.2246317E+00, &
     & 0.2275642E+00, 0.1888500E+00, 0.2170300E+00, 0.2172300E+00, &
     & 0.2162900E+00, 0.2476008E+00, 0.2422886E+00, 0.2422886E+00 /
      data (ref_adm(11,iz,24, 6),iz = 1,20) / &
     & 0.3180700E+00, 0.3180700E+00, 0.2208500E+00, 0.2352400E+00, &
     & 0.2170700E+00, 0.2242200E+00, 0.2050900E+00, 0.2126500E+00, &
     & 0.2188500E+00, 0.2183500E+00, 0.1960500E+00, 0.1833400E+00, &
     & 0.1908700E+00, 0.1967400E+00, 0.2152300E+00, 0.1650500E+00, &
     & 0.2060100E+00, 0.2478532E+00, 0.2425752E+00, 0.2425752E+00 /
      data (ref_adm(11,iz,25, 6),iz = 1,20) / &
     & 0.2089600E+00, 0.2089600E+00, 0.2175700E+00, 0.2282100E+00, &
     & 0.2746800E+00, 0.2175176E+00, 0.2893100E+00, 0.2208477E+00, &
     & 0.2118400E+00, 0.2271900E+00, 0.2780300E+00, 0.2176600E+00, &
     & 0.2279800E+00, 0.2086600E+00, 0.1917600E+00, 0.2033300E+00, &
     & 0.1897400E+00, 0.2044400E+00, 0.2432910E+00, 0.2432910E+00 /
      data (ref_adm(11,iz,26, 6),iz = 1,20) / &
     & 0.2126200E+00, 0.2126200E+00, 0.2087000E+00, 0.2148492E+00, &
     & 0.2169407E+00, 0.1902900E+00, 0.1796100E+00, 0.2396800E+00, &
     & 0.1877200E+00, 0.2182600E+00, 0.2061300E+00, 0.2006400E+00, &
     & 0.1832000E+00, 0.2003300E+00, 0.2241500E+00, 0.2288000E+00, &
     & 0.2344500E+00, 0.2029700E+00, 0.2446518E+00, 0.2446518E+00 /
      data (ref_adm(11,iz,27, 6),iz = 1,20) / &
     & 0.2639800E+00, 0.2639800E+00, 0.2457000E+00, 0.2156680E+00, &
     & 0.2161000E+00, 0.2057900E+00, 0.1948500E+00, 0.2282700E+00, &
     & 0.2326500E+00, 0.2674800E+00, 0.2308988E+00, 0.2015400E+00, &
     & 0.1798300E+00, 0.2046200E+00, 0.2383000E+00, 0.2182600E+00, &
     & 0.2247600E+00, 0.2510884E+00, 0.2462851E+00, 0.2462851E+00 /
      data (ref_adm(11,iz,28, 6),iz = 1,20) / &
     & 0.1843100E+00, 0.1843100E+00, 0.1930500E+00, 0.1878200E+00, &
     & 0.2050700E+00, 0.2097500E+00, 0.2302900E+00, 0.2274800E+00, &
     & 0.2445500E+00, 0.2479600E+00, 0.1818000E+00, 0.1973100E+00, &
     & 0.2091600E+00, 0.2074900E+00, 0.2248400E+00, 0.2803700E+00, &
     & 0.2222300E+00, 0.2030700E+00, 0.1735300E+00, 0.1735300E+00 /
      data (ref_adm(11,iz,29, 6),iz = 1,20) / &
     & 0.2195300E+00, 0.2195300E+00, 0.2321300E+00, 0.2631800E+00, &
     & 0.2377200E+00, 0.2671000E+00, 0.2258851E+00, 0.1806500E+00, &
     & 0.1896500E+00, 0.2365500E+00, 0.2589000E+00, 0.2241800E+00, &
     & 0.2391000E+00, 0.2187500E+00, 0.2293300E+00, 0.2437800E+00, &
     & 0.2177300E+00, 0.2562100E+00, 0.2509205E+00, 0.2509205E+00 /
      data (ref_adm(11,iz,30, 6),iz = 1,20) / &
     & 0.2272700E+00, 0.2272700E+00, 0.2221500E+00, 0.2230400E+00, &
     & 0.2279400E+00, 0.2357900E+00, 0.2402000E+00, 0.2222000E+00, &
     & 0.2492400E+00, 0.2240500E+00, 0.2577700E+00, 0.2254400E+00, &
     & 0.2246300E+00, 0.2301900E+00, 0.2351900E+00, 0.2578700E+00, &
     & 0.2338500E+00, 0.2584027E+00, 0.2538772E+00, 0.2538772E+00 /
      data (ref_adm(11,iz,31, 6),iz = 1,20) / &
     & 0.2303000E+00, 0.2303000E+00, 0.2262600E+00, 0.2436500E+00, &
     & 0.2308900E+00, 0.2246600E+00, 0.2364200E+00, 0.2231400E+00, &
     & 0.2224700E+00, 0.2434200E+00, 0.2296000E+00, 0.2267800E+00, &
     & 0.2132000E+00, 0.2143100E+00, 0.2112300E+00, 0.2555765E+00, &
     & 0.2397000E+00, 0.2610388E+00, 0.2569171E+00, 0.2569171E+00 /
      data (ref_adm(11,iz,32, 6),iz = 1,20) / &
     & 0.2299600E+00, 0.2299600E+00, 0.2287700E+00, 0.2518500E+00, &
     & 0.2332100E+00, 0.2107100E+00, 0.2273000E+00, 0.2235600E+00, &
     & 0.2568700E+00, 0.2624200E+00, 0.2531600E+00, 0.2391900E+00, &
     & 0.2422800E+00, 0.2287400E+00, 0.2275600E+00, 0.2583370E+00, &
     & 0.2613363E+00, 0.2635382E+00, 0.2598305E+00, 0.2598305E+00 /
      data (ref_adm(11,iz,33, 6),iz = 1,20) / &
     & 0.2190200E+00, 0.2190200E+00, 0.2257000E+00, 0.2699000E+00, &
     & 0.2523300E+00, 0.2267700E+00, 0.2235300E+00, 0.2505700E+00, &
     & 0.2391800E+00, 0.2441300E+00, 0.2683300E+00, 0.2468700E+00, &
     & 0.2538900E+00, 0.2365200E+00, 0.2507000E+00, 0.2609437E+00, &
     & 0.2638156E+00, 0.2659372E+00, 0.2624438E+00, 0.2624438E+00 /
      data (ref_adm(11,iz,34, 6),iz = 1,20) / &
     & 0.2321600E+00, 0.2321600E+00, 0.2884600E+00, 0.2485000E+00, &
     & 0.3088300E+00, 0.2659900E+00, 0.2594600E+00, 0.2166700E+00, &
     & 0.2439400E+00, 0.2657500E+00, 0.2353000E+00, 0.2381200E+00, &
     & 0.1981300E+00, 0.1980500E+00, 0.2602171E+00, 0.2632115E+00, &
     & 0.2660299E+00, 0.2680557E+00, 0.2646350E+00, 0.2646350E+00 /
      data (ref_adm(11,iz,35, 6),iz = 1,20) / &
     & 0.2155600E+00, 0.2155600E+00, 0.2388200E+00, 0.2547200E+00, &
     & 0.3129100E+00, 0.2490000E+00, 0.2317600E+00, 0.2447800E+00, &
     & 0.2547900E+00, 0.2459629E+00, 0.2626100E+00, 0.2408600E+00, &
     & 0.2764200E+00, 0.2590377E+00, 0.2620416E+00, 0.2650574E+00, &
     & 0.2678497E+00, 0.2697607E+00, 0.2664815E+00, 0.2664815E+00 /
      data (ref_adm(11,iz,36, 6),iz = 1,20) / &
     & 0.2188600E+00, 0.2188600E+00, 0.2238600E+00, 0.2391700E+00, &
     & 0.2336800E+00, 0.2559800E+00, 0.2339897E+00, 0.2593900E+00, &
     & 0.2784000E+00, 0.3161800E+00, 0.2972800E+00, 0.2924100E+00, &
     & 0.2458500E+00, 0.2600115E+00, 0.2632986E+00, 0.2663463E+00, &
     & 0.2690869E+00, 0.2709889E+00, 0.2677281E+00, 0.2677281E+00 /
      data (ref_adm(11,iz,37, 6),iz = 1,20) / &
     & 0.1966300E+00, 0.1966300E+00, 0.2186600E+00, 0.2411800E+00, &
     & 0.2284600E+00, 0.2580500E+00, 0.2894600E+00, 0.2720400E+00, &
     & 0.2665700E+00, 0.2730600E+00, 0.2919800E+00, 0.2635800E+00, &
     & 0.2574600E+00, 0.2605890E+00, 0.2639601E+00, 0.2670815E+00, &
     & 0.2698534E+00, 0.2716262E+00, 0.2684589E+00, 0.2684589E+00 /
      data (ref_adm(11,iz,38, 6),iz = 1,20) / &
     & 0.1966300E+00, 0.1966300E+00, 0.2186600E+00, 0.2411800E+00, &
     & 0.2284600E+00, 0.2580500E+00, 0.2894600E+00, 0.2720400E+00, &
     & 0.2665700E+00, 0.2730600E+00, 0.2919800E+00, 0.2635800E+00, &
     & 0.2574600E+00, 0.2605890E+00, 0.2639601E+00, 0.2670815E+00, &
     & 0.2698534E+00, 0.2716262E+00, 0.2684589E+00, 0.2684589E+00 /
! Solar Zenith Angle 30.0 Albedo  0.2223684E+00
      data (ref_adm(11,iz, 1, 7),iz = 1,20) / &
     & 0.2353300E+00, 0.2353300E+00, 0.2317600E+00, 0.2745600E+00, &
     & 0.1906000E+00, 0.1562800E+00, 0.2192400E+00, 0.2120600E+00, &
     & 0.2279100E+00, 0.2103700E+00, 0.1985500E+00, 0.2037100E+00, &
     & 0.1894700E+00, 0.1529400E+00, 0.2246700E+00, 0.2263300E+00, &
     & 0.2387900E+00, 0.2579300E+00, 0.2162100E+00, 0.2162100E+00 /
      data (ref_adm(11,iz, 2, 7),iz = 1,20) / &
     & 0.2353300E+00, 0.2353300E+00, 0.2317600E+00, 0.2745600E+00, &
     & 0.1906000E+00, 0.1562800E+00, 0.2192400E+00, 0.2120600E+00, &
     & 0.2279100E+00, 0.2103700E+00, 0.1985500E+00, 0.2037100E+00, &
     & 0.1894700E+00, 0.1529400E+00, 0.2246700E+00, 0.2263300E+00, &
     & 0.2387900E+00, 0.2579300E+00, 0.2162100E+00, 0.2162100E+00 /
      data (ref_adm(11,iz, 3, 7),iz = 1,20) / &
     & 0.2610700E+00, 0.2610700E+00, 0.2319300E+00, 0.2025200E+00, &
     & 0.1879900E+00, 0.2171000E+00, 0.2808300E+00, 0.2037400E+00, &
     & 0.2301300E+00, 0.2109700E+00, 0.2033800E+00, 0.2128700E+00, &
     & 0.2077500E+00, 0.1644500E+00, 0.2144500E+00, 0.2401100E+00, &
     & 0.2270100E+00, 0.2379800E+00, 0.4007624E-01, 0.4007624E-01 /
      data (ref_adm(11,iz, 4, 7),iz = 1,20) / &
     & 0.2573200E+00, 0.2573200E+00, 0.2185163E+00, 0.1624700E+00, &
     & 0.1862100E+00, 0.2069700E+00, 0.1980800E+00, 0.1657900E+00, &
     & 0.2019000E+00, 0.2155400E+00, 0.1924300E+00, 0.2002400E+00, &
     & 0.2312200E+00, 0.1819000E+00, 0.1905400E+00, 0.2216900E+00, &
     & 0.2125200E+00, 0.2586100E+00, 0.2162100E+00, 0.2162100E+00 /
      data (ref_adm(11,iz, 5, 7),iz = 1,20) / &
     & 0.1995000E+00, 0.1995000E+00, 0.2254200E+00, 0.1787100E+00, &
     & 0.2159600E+00, 0.2164400E+00, 0.2291700E+00, 0.1796000E+00, &
     & 0.1926800E+00, 0.1956500E+00, 0.2187100E+00, 0.1956300E+00, &
     & 0.1670400E+00, 0.2086200E+00, 0.2101300E+00, 0.2458200E+00, &
     & 0.2133000E+00, 0.3011500E+00, 0.2102200E+00, 0.2102200E+00 /
      data (ref_adm(11,iz, 6, 7),iz = 1,20) / &
     & 0.2513600E+00, 0.2513600E+00, 0.2185163E+00, 0.1915300E+00, &
     & 0.1984500E+00, 0.1923700E+00, 0.2101017E+00, 0.2116700E+00, &
     & 0.1789300E+00, 0.1891300E+00, 0.2064200E+00, 0.2106500E+00, &
     & 0.1979500E+00, 0.2070306E+00, 0.2037100E+00, 0.2315700E+00, &
     & 0.2775500E+00, 0.2865600E+00, 0.2162100E+00, 0.2162100E+00 /
      data (ref_adm(11,iz, 7, 7),iz = 1,20) / &
     & 0.2032700E+00, 0.2032700E+00, 0.1754000E+00, 0.1950900E+00, &
     & 0.2000300E+00, 0.1928300E+00, 0.2034200E+00, 0.2020400E+00, &
     & 0.1999800E+00, 0.2224900E+00, 0.2027800E+00, 0.1968300E+00, &
     & 0.2173700E+00, 0.2525500E+00, 0.2082900E+00, 0.2513400E+00, &
     & 0.2706900E+00, 0.3017800E+00, 0.2831800E+00, 0.2831800E+00 /
      data (ref_adm(11,iz, 8, 7),iz = 1,20) / &
     & 0.1714900E+00, 0.1714900E+00, 0.2349800E+00, 0.2540600E+00, &
     & 0.1918500E+00, 0.1898600E+00, 0.1936900E+00, 0.1837800E+00, &
     & 0.1714800E+00, 0.2272400E+00, 0.2168400E+00, 0.1941700E+00, &
     & 0.1702500E+00, 0.3095300E+00, 0.2251000E+00, 0.2187600E+00, &
     & 0.2801600E+00, 0.2965300E+00, 0.2753300E+00, 0.2753300E+00 /
      data (ref_adm(11,iz, 9, 7),iz = 1,20) / &
     & 0.2333600E+00, 0.2333600E+00, 0.1841700E+00, 0.1888000E+00, &
     & 0.1863400E+00, 0.1868200E+00, 0.1925100E+00, 0.1975700E+00, &
     & 0.1874800E+00, 0.2036600E+00, 0.2286000E+00, 0.2153400E+00, &
     & 0.2293700E+00, 0.2780600E+00, 0.2164400E+00, 0.2271600E+00, &
     & 0.2583000E+00, 0.2194000E+00, 0.2162101E+00, 0.2162101E+00 /
      data (ref_adm(11,iz,10, 7),iz = 1,20) / &
     & 0.2089300E+00, 0.2089300E+00, 0.2166100E+00, 0.2120000E+00, &
     & 0.1919900E+00, 0.2194700E+00, 0.1696200E+00, 0.1849200E+00, &
     & 0.1752600E+00, 0.2357800E+00, 0.2031500E+00, 0.2180500E+00, &
     & 0.2038700E+00, 0.1835700E+00, 0.2024600E+00, 0.2176100E+00, &
     & 0.2482300E+00, 0.2468000E+00, 0.2015500E+00, 0.2015500E+00 /
      data (ref_adm(11,iz,11, 7),iz = 1,20) / &
     & 0.2020800E+00, 0.2020800E+00, 0.2191600E+00, 0.2240700E+00, &
     & 0.2110700E+00, 0.1967600E+00, 0.2006100E+00, 0.1968000E+00, &
     & 0.1661200E+00, 0.1962600E+00, 0.1983000E+00, 0.2008700E+00, &
     & 0.2006100E+00, 0.2126600E+00, 0.2759600E+00, 0.2790500E+00, &
     & 0.2764700E+00, 0.2891500E+00, 0.2896800E+00, 0.2896800E+00 /
      data (ref_adm(11,iz,12, 7),iz = 1,20) / &
     & 0.2197700E+00, 0.2197700E+00, 0.2045400E+00, 0.2134100E+00, &
     & 0.2184600E+00, 0.2331200E+00, 0.2023300E+00, 0.1988900E+00, &
     & 0.1953200E+00, 0.2016700E+00, 0.1999800E+00, 0.1954400E+00, &
     & 0.1950100E+00, 0.1532000E+00, 0.2212600E+00, 0.2388500E+00, &
     & 0.2290500E+00, 0.2222955E+00, 0.2162100E+00, 0.2162100E+00 /
      data (ref_adm(11,iz,13, 7),iz = 1,20) / &
     & 0.2080400E+00, 0.2080400E+00, 0.2182300E+00, 0.2347100E+00, &
     & 0.2550000E+00, 0.2206000E+00, 0.2098100E+00, 0.2021300E+00, &
     & 0.2004600E+00, 0.1992500E+00, 0.2056200E+00, 0.1898200E+00, &
     & 0.1811300E+00, 0.2176700E+00, 0.2034300E+00, 0.2340000E+00, &
     & 0.2178443E+00, 0.2222955E+00, 0.2162101E+00, 0.2162101E+00 /
      data (ref_adm(11,iz,14, 7),iz = 1,20) / &
     & 0.2133000E+00, 0.2133000E+00, 0.2158800E+00, 0.2619500E+00, &
     & 0.2414200E+00, 0.2200800E+00, 0.1932700E+00, 0.1858300E+00, &
     & 0.2029700E+00, 0.2076800E+00, 0.1954200E+00, 0.2003500E+00, &
     & 0.1854700E+00, 0.2071600E+00, 0.2097162E+00, 0.2028400E+00, &
     & 0.1885800E+00, 0.1725500E+00, 0.2162100E+00, 0.2162100E+00 /
      data (ref_adm(11,iz,15, 7),iz = 1,20) / &
     & 0.2126000E+00, 0.2126000E+00, 0.2037400E+00, 0.1669200E+00, &
     & 0.2753100E+00, 0.1990500E+00, 0.1972800E+00, 0.2145500E+00, &
     & 0.1811800E+00, 0.1837200E+00, 0.1602200E+00, 0.2179100E+00, &
     & 0.2032900E+00, 0.2111200E+00, 0.1974800E+00, 0.2460200E+00, &
     & 0.1649700E+00, 0.2222955E+00, 0.2162101E+00, 0.2162101E+00 /
      data (ref_adm(11,iz,16, 7),iz = 1,20) / &
     & 0.1812500E+00, 0.1812500E+00, 0.1968000E+00, 0.2064300E+00, &
     & 0.2773700E+00, 0.2002400E+00, 0.2067800E+00, 0.1815800E+00, &
     & 0.2149900E+00, 0.1821100E+00, 0.1880800E+00, 0.2281100E+00, &
     & 0.2001500E+00, 0.1986500E+00, 0.2093000E+00, 0.1997400E+00, &
     & 0.2005300E+00, 0.1931500E+00, 0.2162100E+00, 0.2162100E+00 /
      data (ref_adm(11,iz,17, 7),iz = 1,20) / &
     & 0.2395100E+00, 0.2395100E+00, 0.2043100E+00, 0.2011100E+00, &
     & 0.2014100E+00, 0.2225600E+00, 0.1921600E+00, 0.2013600E+00, &
     & 0.2144700E+00, 0.1900200E+00, 0.2002900E+00, 0.1937200E+00, &
     & 0.2067700E+00, 0.1815600E+00, 0.1778800E+00, 0.1714800E+00, &
     & 0.2114800E+00, 0.2097800E+00, 0.2162101E+00, 0.2162101E+00 /
      data (ref_adm(11,iz,18, 7),iz = 1,20) / &
     & 0.2086900E+00, 0.2086900E+00, 0.3183800E+00, 0.1903300E+00, &
     & 0.2502400E+00, 0.2453900E+00, 0.1998900E+00, 0.2743700E+00, &
     & 0.1736800E+00, 0.2330400E+00, 0.1845000E+00, 0.2179900E+00, &
     & 0.1762900E+00, 0.2006700E+00, 0.1919700E+00, 0.1912200E+00, &
     & 0.1812700E+00, 0.2001200E+00, 0.2205346E+00, 0.2205346E+00 /
      data (ref_adm(11,iz,19, 7),iz = 1,20) / &
     & 0.2106600E+00, 0.2106600E+00, 0.2177919E+00, 0.2187200E+00, &
     & 0.2166200E+00, 0.2129600E+00, 0.2732200E+00, 0.1931800E+00, &
     & 0.1608300E+00, 0.1648600E+00, 0.1892600E+00, 0.1997500E+00, &
     & 0.1871200E+00, 0.1912600E+00, 0.1684300E+00, 0.2067400E+00, &
     & 0.2088600E+00, 0.2049100E+00, 0.2006000E+00, 0.2006000E+00 /
      data (ref_adm(11,iz,20, 7),iz = 1,20) / &
     & 0.2448100E+00, 0.2448100E+00, 0.2349500E+00, 0.2259400E+00, &
     & 0.2324900E+00, 0.2177500E+00, 0.2279800E+00, 0.2322900E+00, &
     & 0.3098800E+00, 0.2011100E+00, 0.1712900E+00, 0.1959400E+00, &
     & 0.2136900E+00, 0.1827400E+00, 0.1968400E+00, 0.2035600E+00, &
     & 0.2213099E+00, 0.2259341E+00, 0.2199377E+00, 0.2199377E+00 /
      data (ref_adm(11,iz,21, 7),iz = 1,20) / &
     & 0.2176000E+00, 0.2176000E+00, 0.1981400E+00, 0.1995400E+00, &
     & 0.2352600E+00, 0.2026400E+00, 0.2103900E+00, 0.2519100E+00, &
     & 0.2417900E+00, 0.1995100E+00, 0.1881500E+00, 0.1915700E+00, &
     & 0.2107800E+00, 0.1864300E+00, 0.2049200E+00, 0.2323100E+00, &
     & 0.2213724E+00, 0.2257248E+00, 0.2196615E+00, 0.2196615E+00 /
      data (ref_adm(11,iz,22, 7),iz = 1,20) / &
     & 0.2209400E+00, 0.2209400E+00, 0.2006000E+00, 0.2025500E+00, &
     & 0.2307700E+00, 0.2701000E+00, 0.2676500E+00, 0.1797200E+00, &
     & 0.2623600E+00, 0.1878600E+00, 0.2108000E+00, 0.1976200E+00, &
     & 0.1997000E+00, 0.1940300E+00, 0.2193700E+00, 0.2120300E+00, &
     & 0.2354584E+00, 0.2382486E+00, 0.2303469E+00, 0.2303469E+00 /
      data (ref_adm(11,iz,23, 7),iz = 1,20) / &
     & 0.1882800E+00, 0.1882800E+00, 0.1929700E+00, 0.2220200E+00, &
     & 0.2212400E+00, 0.2638400E+00, 0.1982600E+00, 0.2192600E+00, &
     & 0.1991300E+00, 0.2859600E+00, 0.3186800E+00, 0.1983800E+00, &
     & 0.2224200E+00, 0.2166600E+00, 0.2081200E+00, 0.2329700E+00, &
     & 0.2523700E+00, 0.1784200E+00, 0.2298545E+00, 0.2298545E+00 /
      data (ref_adm(11,iz,24, 7),iz = 1,20) / &
     & 0.2013200E+00, 0.2013200E+00, 0.2352700E+00, 0.2346300E+00, &
     & 0.2412800E+00, 0.2313000E+00, 0.2489500E+00, 0.2152800E+00, &
     & 0.1780100E+00, 0.2155400E+00, 0.2300558E+00, 0.2603900E+00, &
     & 0.2151600E+00, 0.2210000E+00, 0.2023600E+00, 0.2273000E+00, &
     & 0.1734900E+00, 0.2378982E+00, 0.2297213E+00, 0.2297213E+00 /
      data (ref_adm(11,iz,25, 7),iz = 1,20) / &
     & 0.2287800E+00, 0.2287800E+00, 0.2361300E+00, 0.2640000E+00, &
     & 0.2261700E+00, 0.2432800E+00, 0.2509700E+00, 0.2349300E+00, &
     & 0.1905100E+00, 0.3648200E+00, 0.2595400E+00, 0.2098000E+00, &
     & 0.2253200E+00, 0.2365900E+00, 0.2355100E+00, 0.2319200E+00, &
     & 0.1934300E+00, 0.1557200E+00, 0.2298054E+00, 0.2298054E+00 /
      data (ref_adm(11,iz,26, 7),iz = 1,20) / &
     & 0.2358600E+00, 0.2358600E+00, 0.2320100E+00, 0.2020100E+00, &
     & 0.2321240E+00, 0.2295700E+00, 0.2395700E+00, 0.2564300E+00, &
     & 0.3066200E+00, 0.2213700E+00, 0.2527400E+00, 0.2214500E+00, &
     & 0.2428800E+00, 0.2366900E+00, 0.2416200E+00, 0.2557400E+00, &
     & 0.2187400E+00, 0.2232300E+00, 0.2299944E+00, 0.2299944E+00 /
      data (ref_adm(11,iz,27, 7),iz = 1,20) / &
     & 0.2233600E+00, 0.2233600E+00, 0.2310300E+00, 0.2403100E+00, &
     & 0.2999200E+00, 0.3048000E+00, 0.2339800E+00, 0.2410800E+00, &
     & 0.2595600E+00, 0.2540100E+00, 0.2431300E+00, 0.2364200E+00, &
     & 0.2448400E+00, 0.2287600E+00, 0.2324700E+00, 0.2846500E+00, &
     & 0.2410400E+00, 0.2336600E+00, 0.1849300E+00, 0.1849300E+00 /
      data (ref_adm(11,iz,28, 7),iz = 1,20) / &
     & 0.2137700E+00, 0.2137700E+00, 0.2249000E+00, 0.2288000E+00, &
     & 0.2179500E+00, 0.2359000E+00, 0.2476700E+00, 0.2263000E+00, &
     & 0.2530900E+00, 0.2217100E+00, 0.2304800E+00, 0.2379100E+00, &
     & 0.2533900E+00, 0.2411400E+00, 0.2543300E+00, 0.2525600E+00, &
     & 0.2289100E+00, 0.2167700E+00, 0.1737400E+00, 0.1737400E+00 /
      data (ref_adm(11,iz,29, 7),iz = 1,20) / &
     & 0.2080700E+00, 0.2080700E+00, 0.2249100E+00, 0.2192200E+00, &
     & 0.2162800E+00, 0.2243200E+00, 0.2289000E+00, 0.2540100E+00, &
     & 0.2552500E+00, 0.2282400E+00, 0.2476600E+00, 0.2494900E+00, &
     & 0.2704500E+00, 0.2244700E+00, 0.2263600E+00, 0.2415100E+00, &
     & 0.2578700E+00, 0.2504400E+00, 0.2009600E+00, 0.2009600E+00 /
      data (ref_adm(11,iz,30, 7),iz = 1,20) / &
     & 0.2099100E+00, 0.2099100E+00, 0.1967000E+00, 0.2112200E+00, &
     & 0.2295300E+00, 0.2040000E+00, 0.2206500E+00, 0.2365300E+00, &
     & 0.2335700E+00, 0.2415700E+00, 0.2380500E+00, 0.2358100E+00, &
     & 0.2367100E+00, 0.2285800E+00, 0.2395200E+00, 0.2684300E+00, &
     & 0.2676100E+00, 0.2484600E+00, 0.2013900E+00, 0.2013900E+00 /
      data (ref_adm(11,iz,31, 7),iz = 1,20) / &
     & 0.2288100E+00, 0.2288100E+00, 0.2702200E+00, 0.2203800E+00, &
     & 0.2437400E+00, 0.2853800E+00, 0.2124200E+00, 0.2296100E+00, &
     & 0.2119600E+00, 0.2277600E+00, 0.2383300E+00, 0.2392800E+00, &
     & 0.2431600E+00, 0.2490400E+00, 0.2357800E+00, 0.2432500E+00, &
     & 0.2346000E+00, 0.2303200E+00, 0.2332105E+00, 0.2332105E+00 /
      data (ref_adm(11,iz,32, 7),iz = 1,20) / &
     & 0.2048200E+00, 0.2048200E+00, 0.2130600E+00, 0.2741300E+00, &
     & 0.2440100E+00, 0.2318800E+00, 0.2188000E+00, 0.2530400E+00, &
     & 0.2380100E+00, 0.2158500E+00, 0.2498300E+00, 0.2395300E+00, &
     & 0.2448500E+00, 0.2414000E+00, 0.2338600E+00, 0.2334200E+00, &
     & 0.2361800E+00, 0.2156000E+00, 0.2339254E+00, 0.2339254E+00 /
      data (ref_adm(11,iz,33, 7),iz = 1,20) / &
     & 0.2136100E+00, 0.2136100E+00, 0.2830000E+00, 0.2150200E+00, &
     & 0.3131700E+00, 0.2880300E+00, 0.2539800E+00, 0.2481400E+00, &
     & 0.2526300E+00, 0.2363500E+00, 0.2875000E+00, 0.2310100E+00, &
     & 0.2447400E+00, 0.2498200E+00, 0.2473300E+00, 0.2556600E+00, &
     & 0.2512900E+00, 0.2431838E+00, 0.2346410E+00, 0.2346410E+00 /
      data (ref_adm(11,iz,34, 7),iz = 1,20) / &
     & 0.2338700E+00, 0.2338700E+00, 0.2623200E+00, 0.2164800E+00, &
     & 0.2419000E+00, 0.2320400E+00, 0.2924900E+00, 0.2709000E+00, &
     & 0.2427000E+00, 0.2545500E+00, 0.2231900E+00, 0.2275500E+00, &
     & 0.2349800E+00, 0.2181500E+00, 0.2639900E+00, 0.2782800E+00, &
     & 0.2452429E+00, 0.2439033E+00, 0.2352926E+00, 0.2352926E+00 /
      data (ref_adm(11,iz,35, 7),iz = 1,20) / &
     & 0.2119400E+00, 0.2119400E+00, 0.2264400E+00, 0.2214600E+00, &
     & 0.2247800E+00, 0.2742000E+00, 0.2543700E+00, 0.2728400E+00, &
     & 0.2568900E+00, 0.2620600E+00, 0.2342200E+00, 0.2330000E+00, &
     & 0.2551100E+00, 0.2441100E+00, 0.2715500E+00, 0.2297300E+00, &
     & 0.2458288E+00, 0.2445339E+00, 0.2358074E+00, 0.2358074E+00 /
      data (ref_adm(11,iz,36, 7),iz = 1,20) / &
     & 0.1941700E+00, 0.1941700E+00, 0.2377400E+00, 0.1953600E+00, &
     & 0.2049700E+00, 0.2473900E+00, 0.2722600E+00, 0.2724900E+00, &
     & 0.2666200E+00, 0.2572800E+00, 0.2612700E+00, 0.2405300E+00, &
     & 0.2425500E+00, 0.2838100E+00, 0.2435200E+00, 0.2462781E+00, &
     & 0.2463568E+00, 0.2449575E+00, 0.2362438E+00, 0.2362438E+00 /
      data (ref_adm(11,iz,37, 7),iz = 1,20) / &
     & 0.2168500E+00, 0.2168500E+00, 0.2676900E+00, 0.2753500E+00, &
     & 0.2423417E+00, 0.2611200E+00, 0.2826900E+00, 0.2421700E+00, &
     & 0.2869800E+00, 0.2775000E+00, 0.2694500E+00, 0.2598200E+00, &
     & 0.2685900E+00, 0.2359100E+00, 0.2359800E+00, 0.2465900E+00, &
     & 0.2466285E+00, 0.2451942E+00, 0.2364531E+00, 0.2364531E+00 /
      data (ref_adm(11,iz,38, 7),iz = 1,20) / &
     & 0.2168500E+00, 0.2168500E+00, 0.2676900E+00, 0.2753500E+00, &
     & 0.2423417E+00, 0.2611200E+00, 0.2826900E+00, 0.2421700E+00, &
     & 0.2869800E+00, 0.2775000E+00, 0.2694500E+00, 0.2598200E+00, &
     & 0.2685900E+00, 0.2359100E+00, 0.2359800E+00, 0.2465900E+00, &
     & 0.2466285E+00, 0.2451942E+00, 0.2364531E+00, 0.2364531E+00 /
! Solar Zenith Angle 35.0 Albedo  0.2384066E+00
      data (ref_adm(11,iz, 1, 8),iz = 1,20) / &
     & 0.2579900E+00, 0.2579900E+00, 0.2746200E+00, 0.2744400E+00, &
     & 0.3050800E+00, 0.2521400E+00, 0.2224900E+00, 0.1745600E+00, &
     & 0.1924300E+00, 0.1898000E+00, 0.1892700E+00, 0.2128900E+00, &
     & 0.1987300E+00, 0.2193400E+00, 0.2329100E+00, 0.2940500E+00, &
     & 0.2941700E+00, 0.2953200E+00, 0.2569324E+00, 0.2569324E+00 /
      data (ref_adm(11,iz, 2, 8),iz = 1,20) / &
     & 0.2579900E+00, 0.2579900E+00, 0.2746200E+00, 0.2744400E+00, &
     & 0.3050800E+00, 0.2521400E+00, 0.2224900E+00, 0.1745600E+00, &
     & 0.1924300E+00, 0.1898000E+00, 0.1892700E+00, 0.2128900E+00, &
     & 0.1987300E+00, 0.2193400E+00, 0.2329100E+00, 0.2940500E+00, &
     & 0.2941700E+00, 0.2953200E+00, 0.2569324E+00, 0.2569324E+00 /
      data (ref_adm(11,iz, 3, 8),iz = 1,20) / &
     & 0.2450500E+00, 0.2450500E+00, 0.2084100E+00, 0.2535500E+00, &
     & 0.2280000E+00, 0.2184400E+00, 0.2021800E+00, 0.1836600E+00, &
     & 0.1810400E+00, 0.1842700E+00, 0.1893500E+00, 0.2249800E+00, &
     & 0.2219000E+00, 0.2064100E+00, 0.2133600E+00, 0.2720300E+00, &
     & 0.2571300E+00, 0.2612600E+00, 0.2306700E+00, 0.2306700E+00 /
      data (ref_adm(11,iz, 4, 8),iz = 1,20) / &
     & 0.2501600E+00, 0.2501600E+00, 0.2223300E+00, 0.2137500E+00, &
     & 0.2075300E+00, 0.2225600E+00, 0.2037400E+00, 0.2034900E+00, &
     & 0.1876100E+00, 0.1913100E+00, 0.2081500E+00, 0.2033700E+00, &
     & 0.2176200E+00, 0.2039500E+00, 0.2370400E+00, 0.2698500E+00, &
     & 0.2619700E+00, 0.2865000E+00, 0.2773900E+00, 0.2773900E+00 /
      data (ref_adm(11,iz, 5, 8),iz = 1,20) / &
     & 0.2222400E+00, 0.2222400E+00, 0.2230300E+00, 0.2164400E+00, &
     & 0.2087500E+00, 0.1956400E+00, 0.1983200E+00, 0.2087300E+00, &
     & 0.2212600E+00, 0.1906900E+00, 0.1906400E+00, 0.2030500E+00, &
     & 0.1965200E+00, 0.2448400E+00, 0.2547900E+00, 0.3008100E+00, &
     & 0.3185700E+00, 0.2479200E+00, 0.2802200E+00, 0.2802200E+00 /
      data (ref_adm(11,iz, 6, 8),iz = 1,20) / &
     & 0.2143800E+00, 0.2143800E+00, 0.2273100E+00, 0.2153400E+00, &
     & 0.2091200E+00, 0.2212000E+00, 0.1998000E+00, 0.1984600E+00, &
     & 0.2332100E+00, 0.1953500E+00, 0.2197800E+00, 0.2212500E+00, &
     & 0.1758400E+00, 0.2216600E+00, 0.2182500E+00, 0.2655700E+00, &
     & 0.2648400E+00, 0.2608100E+00, 0.3393500E+00, 0.3393500E+00 /
      data (ref_adm(11,iz, 7, 8),iz = 1,20) / &
     & 0.2166400E+00, 0.2166400E+00, 0.2183400E+00, 0.2237800E+00, &
     & 0.2435900E+00, 0.1971300E+00, 0.1903600E+00, 0.1981700E+00, &
     & 0.2109000E+00, 0.2181100E+00, 0.1865400E+00, 0.1838800E+00, &
     & 0.1864800E+00, 0.2162000E+00, 0.2373700E+00, 0.2464100E+00, &
     & 0.2404300E+00, 0.2920000E+00, 0.2802600E+00, 0.2802600E+00 /
      data (ref_adm(11,iz, 8, 8),iz = 1,20) / &
     & 0.2262400E+00, 0.2262400E+00, 0.2426900E+00, 0.2103900E+00, &
     & 0.2077900E+00, 0.2079200E+00, 0.2124600E+00, 0.2215800E+00, &
     & 0.2189800E+00, 0.2358100E+00, 0.2429300E+00, 0.1960500E+00, &
     & 0.2408300E+00, 0.2317300E+00, 0.2425300E+00, 0.2599300E+00, &
     & 0.2678800E+00, 0.2832500E+00, 0.2485200E+00, 0.2485200E+00 /
      data (ref_adm(11,iz, 9, 8),iz = 1,20) / &
     & 0.2452500E+00, 0.2452500E+00, 0.1949300E+00, 0.2243700E+00, &
     & 0.2310400E+00, 0.1978800E+00, 0.1870700E+00, 0.2111300E+00, &
     & 0.2155800E+00, 0.2428900E+00, 0.2368100E+00, 0.2395800E+00, &
     & 0.2216000E+00, 0.2107000E+00, 0.2313400E+00, 0.2503000E+00, &
     & 0.3015300E+00, 0.2453300E+00, 0.2209700E+00, 0.2209700E+00 /
      data (ref_adm(11,iz,10, 8),iz = 1,20) / &
     & 0.2283700E+00, 0.2283700E+00, 0.2046800E+00, 0.2537700E+00, &
     & 0.2463700E+00, 0.1983100E+00, 0.1841500E+00, 0.2184000E+00, &
     & 0.2356500E+00, 0.2497400E+00, 0.2321100E+00, 0.2332700E+00, &
     & 0.2255000E+00, 0.2290400E+00, 0.2306000E+00, 0.2561100E+00, &
     & 0.2834800E+00, 0.3202700E+00, 0.3506200E+00, 0.3506200E+00 /
      data (ref_adm(11,iz,11, 8),iz = 1,20) / &
     & 0.2625600E+00, 0.2625600E+00, 0.2247700E+00, 0.2078000E+00, &
     & 0.2173700E+00, 0.2557700E+00, 0.2351500E+00, 0.2139100E+00, &
     & 0.2354900E+00, 0.2521500E+00, 0.2286200E+00, 0.2344500E+00, &
     & 0.2197000E+00, 0.2000800E+00, 0.1938500E+00, 0.2583400E+00, &
     & 0.3085000E+00, 0.3062600E+00, 0.2463098E+00, 0.2463098E+00 /
      data (ref_adm(11,iz,12, 8),iz = 1,20) / &
     & 0.2373800E+00, 0.2373800E+00, 0.2384500E+00, 0.2205400E+00, &
     & 0.2248100E+00, 0.2191900E+00, 0.2050600E+00, 0.2127600E+00, &
     & 0.2091300E+00, 0.2088000E+00, 0.1904300E+00, 0.2134900E+00, &
     & 0.2118100E+00, 0.2028800E+00, 0.2014400E+00, 0.2503700E+00, &
     & 0.2763400E+00, 0.2927500E+00, 0.2355900E+00, 0.2355900E+00 /
      data (ref_adm(11,iz,13, 8),iz = 1,20) / &
     & 0.2287600E+00, 0.2287600E+00, 0.2251600E+00, 0.2219300E+00, &
     & 0.2100900E+00, 0.2145400E+00, 0.1975600E+00, 0.2079600E+00, &
     & 0.2225500E+00, 0.2175000E+00, 0.2004400E+00, 0.2167900E+00, &
     & 0.2070100E+00, 0.2105400E+00, 0.2172400E+00, 0.2427800E+00, &
     & 0.2469200E+00, 0.2225100E+00, 0.2419947E+00, 0.2419947E+00 /
      data (ref_adm(11,iz,14, 8),iz = 1,20) / &
     & 0.2357000E+00, 0.2357000E+00, 0.2343300E+00, 0.2085000E+00, &
     & 0.2071400E+00, 0.2073700E+00, 0.2136700E+00, 0.2196600E+00, &
     & 0.2092500E+00, 0.2236600E+00, 0.2268600E+00, 0.2261300E+00, &
     & 0.2248200E+00, 0.2131000E+00, 0.2225700E+00, 0.2220900E+00, &
     & 0.2875900E+00, 0.2351300E+00, 0.2479100E+00, 0.2479100E+00 /
      data (ref_adm(11,iz,15, 8),iz = 1,20) / &
     & 0.2358900E+00, 0.2358900E+00, 0.2332200E+00, 0.1980900E+00, &
     & 0.1930300E+00, 0.2303200E+00, 0.2028900E+00, 0.1964900E+00, &
     & 0.1957000E+00, 0.1940500E+00, 0.2199400E+00, 0.2212000E+00, &
     & 0.2202300E+00, 0.2074800E+00, 0.2151100E+00, 0.2124300E+00, &
     & 0.2826000E+00, 0.2472179E+00, 0.2378789E+00, 0.2378789E+00 /
      data (ref_adm(11,iz,16, 8),iz = 1,20) / &
     & 0.2322100E+00, 0.2322100E+00, 0.2377500E+00, 0.2304000E+00, &
     & 0.2275300E+00, 0.2056900E+00, 0.2021400E+00, 0.2221100E+00, &
     & 0.2107800E+00, 0.1942400E+00, 0.2326500E+00, 0.1937000E+00, &
     & 0.1939900E+00, 0.2073700E+00, 0.2384000E+00, 0.2517800E+00, &
     & 0.1925100E+00, 0.1983900E+00, 0.2358133E+00, 0.2358133E+00 /
      data (ref_adm(11,iz,17, 8),iz = 1,20) / &
     & 0.2008100E+00, 0.2008100E+00, 0.1998100E+00, 0.2304000E+00, &
     & 0.2157700E+00, 0.2164800E+00, 0.1957500E+00, 0.2160400E+00, &
     & 0.1717000E+00, 0.2010900E+00, 0.2292700E+00, 0.2402300E+00, &
     & 0.2253700E+00, 0.2140800E+00, 0.2312900E+00, 0.2334300E+00, &
     & 0.2466000E+00, 0.2446498E+00, 0.2339156E+00, 0.2339156E+00 /
      data (ref_adm(11,iz,18, 8),iz = 1,20) / &
     & 0.2339200E+00, 0.2339200E+00, 0.2416800E+00, 0.2427000E+00, &
     & 0.2350700E+00, 0.2174400E+00, 0.2433700E+00, 0.2515500E+00, &
     & 0.2284400E+00, 0.2263000E+00, 0.2469100E+00, 0.2262000E+00, &
     & 0.2324800E+00, 0.2176900E+00, 0.2440400E+00, 0.2306900E+00, &
     & 0.2425000E+00, 0.1987500E+00, 0.2251838E+00, 0.2251838E+00 /
      data (ref_adm(11,iz,19, 8),iz = 1,20) / &
     & 0.2242300E+00, 0.2242300E+00, 0.2275000E+00, 0.2426200E+00, &
     & 0.2304300E+00, 0.2251500E+00, 0.2464200E+00, 0.2318800E+00, &
     & 0.2271000E+00, 0.2228100E+00, 0.2470800E+00, 0.2200800E+00, &
     & 0.2150400E+00, 0.2103800E+00, 0.2721100E+00, 0.1929600E+00, &
     & 0.2079800E+00, 0.2230500E+00, 0.2244693E+00, 0.2244693E+00 /
      data (ref_adm(11,iz,20, 8),iz = 1,20) / &
     & 0.2472000E+00, 0.2472000E+00, 0.2141700E+00, 0.2355500E+00, &
     & 0.2547700E+00, 0.2646000E+00, 0.2666200E+00, 0.2257500E+00, &
     & 0.2595600E+00, 0.2160000E+00, 0.2189800E+00, 0.2136600E+00, &
     & 0.2308500E+00, 0.2082400E+00, 0.1992300E+00, 0.2702200E+00, &
     & 0.2015500E+00, 0.2230200E+00, 0.2239197E+00, 0.2239197E+00 /
      data (ref_adm(11,iz,21, 8),iz = 1,20) / &
     & 0.2484200E+00, 0.2484200E+00, 0.2618800E+00, 0.2651900E+00, &
     & 0.2332700E+00, 0.2319400E+00, 0.2338600E+00, 0.2429600E+00, &
     & 0.2338800E+00, 0.2472800E+00, 0.1923900E+00, 0.2326900E+00, &
     & 0.2177400E+00, 0.2094300E+00, 0.1937500E+00, 0.2355900E+00, &
     & 0.2007700E+00, 0.2319869E+00, 0.2234105E+00, 0.2234105E+00 /
      data (ref_adm(11,iz,22, 8),iz = 1,20) / &
     & 0.2339500E+00, 0.2339500E+00, 0.2446300E+00, 0.2183600E+00, &
     & 0.2610100E+00, 0.2326400E+00, 0.2001200E+00, 0.2699800E+00, &
     & 0.2537900E+00, 0.2323900E+00, 0.2641600E+00, 0.2417200E+00, &
     & 0.2236700E+00, 0.2289500E+00, 0.2434200E+00, 0.2449500E+00, &
     & 0.2579850E+00, 0.2596016E+00, 0.2462291E+00, 0.2462291E+00 /
      data (ref_adm(11,iz,23, 8),iz = 1,20) / &
     & 0.2391000E+00, 0.2391000E+00, 0.2439600E+00, 0.2350000E+00, &
     & 0.2403100E+00, 0.2174800E+00, 0.2049200E+00, 0.2405200E+00, &
     & 0.3025500E+00, 0.2493000E+00, 0.2315000E+00, 0.2230300E+00, &
     & 0.2235300E+00, 0.2421800E+00, 0.2335400E+00, 0.2404100E+00, &
     & 0.2215600E+00, 0.2591692E+00, 0.2458855E+00, 0.2458855E+00 /
      data (ref_adm(11,iz,24, 8),iz = 1,20) / &
     & 0.2254700E+00, 0.2254700E+00, 0.2447800E+00, 0.2605600E+00, &
     & 0.2511200E+00, 0.2473900E+00, 0.2225100E+00, 0.2419800E+00, &
     & 0.2471000E+00, 0.2527400E+00, 0.2510800E+00, 0.2270000E+00, &
     & 0.2357900E+00, 0.2412400E+00, 0.2295000E+00, 0.2503700E+00, &
     & 0.2586462E+00, 0.2589835E+00, 0.2459257E+00, 0.2459257E+00 /
      data (ref_adm(11,iz,25, 8),iz = 1,20) / &
     & 0.2324100E+00, 0.2324100E+00, 0.2545100E+00, 0.2220600E+00, &
     & 0.2424900E+00, 0.2312700E+00, 0.2295100E+00, 0.2535300E+00, &
     & 0.2639500E+00, 0.2443400E+00, 0.2868700E+00, 0.2357400E+00, &
     & 0.2599000E+00, 0.2468600E+00, 0.2001700E+00, 0.2245800E+00, &
     & 0.2494900E+00, 0.2302800E+00, 0.2462589E+00, 0.2462589E+00 /
      data (ref_adm(11,iz,26, 8),iz = 1,20) / &
     & 0.2211200E+00, 0.2211200E+00, 0.2349400E+00, 0.2295100E+00, &
     & 0.2231100E+00, 0.2459800E+00, 0.2383900E+00, 0.2179500E+00, &
     & 0.2370000E+00, 0.2374000E+00, 0.2530800E+00, 0.2693600E+00, &
     & 0.2388500E+00, 0.2502700E+00, 0.2612400E+00, 0.2395900E+00, &
     & 0.2558000E+00, 0.2645900E+00, 0.2470078E+00, 0.2470078E+00 /
      data (ref_adm(11,iz,27, 8),iz = 1,20) / &
     & 0.2302300E+00, 0.2302300E+00, 0.2433100E+00, 0.2378300E+00, &
     & 0.2299100E+00, 0.2465400E+00, 0.2611100E+00, 0.2589400E+00, &
     & 0.2376300E+00, 0.2423000E+00, 0.2505900E+00, 0.2278400E+00, &
     & 0.2321500E+00, 0.2365600E+00, 0.2533600E+00, 0.2543700E+00, &
     & 0.2368600E+00, 0.2413900E+00, 0.2009800E+00, 0.2009800E+00 /
      data (ref_adm(11,iz,28, 8),iz = 1,20) / &
     & 0.2321200E+00, 0.2321200E+00, 0.2388000E+00, 0.2313400E+00, &
     & 0.2507800E+00, 0.2388200E+00, 0.2567200E+00, 0.2619000E+00, &
     & 0.2604700E+00, 0.2546200E+00, 0.2680700E+00, 0.2565000E+00, &
     & 0.2465200E+00, 0.2380200E+00, 0.2317800E+00, 0.2597200E+00, &
     & 0.2566100E+00, 0.2420700E+00, 0.2172300E+00, 0.2172300E+00 /
      data (ref_adm(11,iz,29, 8),iz = 1,20) / &
     & 0.2328200E+00, 0.2328200E+00, 0.2487400E+00, 0.2371300E+00, &
     & 0.2397800E+00, 0.2289900E+00, 0.2522600E+00, 0.2488900E+00, &
     & 0.2688400E+00, 0.2575000E+00, 0.2588100E+00, 0.2576600E+00, &
     & 0.2749300E+00, 0.2618200E+00, 0.2746500E+00, 0.2570000E+00, &
     & 0.2625100E+00, 0.2686500E+00, 0.2028900E+00, 0.2028900E+00 /
      data (ref_adm(11,iz,30, 8),iz = 1,20) / &
     & 0.2383200E+00, 0.2383200E+00, 0.2336300E+00, 0.2307700E+00, &
     & 0.2332300E+00, 0.2720000E+00, 0.2371000E+00, 0.2397700E+00, &
     & 0.2504300E+00, 0.2508500E+00, 0.2668300E+00, 0.2519900E+00, &
     & 0.2574300E+00, 0.2644800E+00, 0.2661400E+00, 0.2595200E+00, &
     & 0.2610000E+00, 0.2560700E+00, 0.2032800E+00, 0.2032800E+00 /
      data (ref_adm(11,iz,31, 8),iz = 1,20) / &
     & 0.2387100E+00, 0.2387100E+00, 0.2447900E+00, 0.2311600E+00, &
     & 0.2390700E+00, 0.2458700E+00, 0.2772200E+00, 0.2895900E+00, &
     & 0.2994900E+00, 0.2854600E+00, 0.2850200E+00, 0.2582900E+00, &
     & 0.2497600E+00, 0.2486100E+00, 0.2549100E+00, 0.2591200E+00, &
     & 0.2662100E+00, 0.2651100E+00, 0.2264300E+00, 0.2264300E+00 /
      data (ref_adm(11,iz,32, 8),iz = 1,20) / &
     & 0.2287400E+00, 0.2287400E+00, 0.2224400E+00, 0.2147900E+00, &
     & 0.2553400E+00, 0.2808100E+00, 0.2684500E+00, 0.2561500E+00, &
     & 0.2934100E+00, 0.2843100E+00, 0.2955900E+00, 0.2752700E+00, &
     & 0.2832100E+00, 0.2515900E+00, 0.2596600E+00, 0.2863100E+00, &
     & 0.2701200E+00, 0.2699400E+00, 0.2568668E+00, 0.2568668E+00 /
      data (ref_adm(11,iz,33, 8),iz = 1,20) / &
     & 0.2120600E+00, 0.2120600E+00, 0.2249000E+00, 0.2529100E+00, &
     & 0.2772500E+00, 0.2801700E+00, 0.2107200E+00, 0.2634700E+00, &
     & 0.3104100E+00, 0.2436200E+00, 0.2528300E+00, 0.2529700E+00, &
     & 0.3052200E+00, 0.2606200E+00, 0.2875600E+00, 0.2814300E+00, &
     & 0.2786500E+00, 0.2607200E+00, 0.2588035E+00, 0.2588035E+00 /
      data (ref_adm(11,iz,34, 8),iz = 1,20) / &
     & 0.2345200E+00, 0.2345200E+00, 0.2444400E+00, 0.2598800E+00, &
     & 0.2597300E+00, 0.2104200E+00, 0.2147400E+00, 0.3302800E+00, &
     & 0.2878200E+00, 0.2998300E+00, 0.2613600E+00, 0.2467500E+00, &
     & 0.2575900E+00, 0.2988400E+00, 0.2912000E+00, 0.2664700E+00, &
     & 0.2675000E+00, 0.2729470E+00, 0.2603805E+00, 0.2603805E+00 /
      data (ref_adm(11,iz,35, 8),iz = 1,20) / &
     & 0.2412300E+00, 0.2412300E+00, 0.2639800E+00, 0.2387000E+00, &
     & 0.2288900E+00, 0.2212900E+00, 0.2433700E+00, 0.3472100E+00, &
     & 0.2970700E+00, 0.2606700E+00, 0.2789200E+00, 0.2724800E+00, &
     & 0.2899300E+00, 0.3055000E+00, 0.2890100E+00, 0.2735300E+00, &
     & 0.2776027E+00, 0.2741876E+00, 0.2617156E+00, 0.2617156E+00 /
      data (ref_adm(11,iz,36, 8),iz = 1,20) / &
     & 0.2543500E+00, 0.2543500E+00, 0.2606700E+00, 0.2380600E+00, &
     & 0.2511400E+00, 0.2525600E+00, 0.2715800E+00, 0.3064000E+00, &
     & 0.2933500E+00, 0.3387900E+00, 0.3023700E+00, 0.2989100E+00, &
     & 0.2920300E+00, 0.2965500E+00, 0.2703600E+00, 0.2440900E+00, &
     & 0.2785309E+00, 0.2750822E+00, 0.2626031E+00, 0.2626031E+00 /
      data (ref_adm(11,iz,37, 8),iz = 1,20) / &
     & 0.2348600E+00, 0.2348600E+00, 0.2393900E+00, 0.2634500E+00, &
     & 0.2653300E+00, 0.3012600E+00, 0.2915400E+00, 0.2988800E+00, &
     & 0.3224700E+00, 0.3399700E+00, 0.2881800E+00, 0.2708600E+00, &
     & 0.2859200E+00, 0.2958000E+00, 0.2866600E+00, 0.2801232E+00, &
     & 0.2791063E+00, 0.2755287E+00, 0.2631508E+00, 0.2631508E+00 /
      data (ref_adm(11,iz,38, 8),iz = 1,20) / &
     & 0.2348600E+00, 0.2348600E+00, 0.2393900E+00, 0.2634500E+00, &
     & 0.2653300E+00, 0.3012600E+00, 0.2915400E+00, 0.2988800E+00, &
     & 0.3224700E+00, 0.3399700E+00, 0.2881800E+00, 0.2708600E+00, &
     & 0.2859200E+00, 0.2958000E+00, 0.2866600E+00, 0.2801232E+00, &
     & 0.2791063E+00, 0.2755287E+00, 0.2631508E+00, 0.2631508E+00 /
! Solar Zenith Angle 40.0 Albedo  0.2411246E+00
      data (ref_adm(11,iz, 1, 9),iz = 1,20) / &
     & 0.2466100E+00, 0.2466100E+00, 0.2212200E+00, 0.2340600E+00, &
     & 0.2219000E+00, 0.2273000E+00, 0.2104900E+00, 0.2370000E+00, &
     & 0.2650700E+00, 0.3029800E+00, 0.2326200E+00, 0.2340300E+00, &
     & 0.2395800E+00, 0.2306500E+00, 0.2412200E+00, 0.2729400E+00, &
     & 0.3166800E+00, 0.3067300E+00, 0.2366558E+00, 0.2366558E+00 /
      data (ref_adm(11,iz, 2, 9),iz = 1,20) / &
     & 0.2466100E+00, 0.2466100E+00, 0.2212200E+00, 0.2340600E+00, &
     & 0.2219000E+00, 0.2273000E+00, 0.2104900E+00, 0.2370000E+00, &
     & 0.2650700E+00, 0.3029800E+00, 0.2326200E+00, 0.2340300E+00, &
     & 0.2395800E+00, 0.2306500E+00, 0.2412200E+00, 0.2729400E+00, &
     & 0.3166800E+00, 0.3067300E+00, 0.2366558E+00, 0.2366558E+00 /
      data (ref_adm(11,iz, 3, 9),iz = 1,20) / &
     & 0.2254300E+00, 0.2254300E+00, 0.2006400E+00, 0.2008800E+00, &
     & 0.2306300E+00, 0.2030000E+00, 0.2095900E+00, 0.2014100E+00, &
     & 0.2357200E+00, 0.2022300E+00, 0.2076700E+00, 0.2112600E+00, &
     & 0.2188000E+00, 0.2453100E+00, 0.2283300E+00, 0.2602100E+00, &
     & 0.3085300E+00, 0.2934500E+00, 0.3302400E+00, 0.3302400E+00 /
      data (ref_adm(11,iz, 4, 9),iz = 1,20) / &
     & 0.2391900E+00, 0.2391900E+00, 0.1921800E+00, 0.2646900E+00, &
     & 0.2076700E+00, 0.1845500E+00, 0.2382700E+00, 0.2307100E+00, &
     & 0.2332700E+00, 0.2261000E+00, 0.2125200E+00, 0.2236500E+00, &
     & 0.2224100E+00, 0.2192500E+00, 0.2397400E+00, 0.2437400E+00, &
     & 0.2983700E+00, 0.3382200E+00, 0.3310500E+00, 0.3310500E+00 /
      data (ref_adm(11,iz, 5, 9),iz = 1,20) / &
     & 0.2188400E+00, 0.2188400E+00, 0.2279300E+00, 0.2071500E+00, &
     & 0.2048500E+00, 0.2352300E+00, 0.2301700E+00, 0.2128900E+00, &
     & 0.1914800E+00, 0.2198800E+00, 0.2386800E+00, 0.2241600E+00, &
     & 0.2163500E+00, 0.2108000E+00, 0.2443200E+00, 0.2501300E+00, &
     & 0.2940800E+00, 0.3368700E+00, 0.3216400E+00, 0.3216400E+00 /
      data (ref_adm(11,iz, 6, 9),iz = 1,20) / &
     & 0.2564500E+00, 0.2564500E+00, 0.2832000E+00, 0.2294400E+00, &
     & 0.2136500E+00, 0.2020100E+00, 0.2240900E+00, 0.1983400E+00, &
     & 0.2068400E+00, 0.2055800E+00, 0.2070000E+00, 0.2126000E+00, &
     & 0.2289800E+00, 0.2450100E+00, 0.2460100E+00, 0.2545800E+00, &
     & 0.2738800E+00, 0.3538400E+00, 0.2943200E+00, 0.2943200E+00 /
      data (ref_adm(11,iz, 7, 9),iz = 1,20) / &
     & 0.2499200E+00, 0.2499200E+00, 0.2252800E+00, 0.2234200E+00, &
     & 0.2256000E+00, 0.2191400E+00, 0.2009800E+00, 0.2099400E+00, &
     & 0.2108600E+00, 0.1935800E+00, 0.2012700E+00, 0.2252700E+00, &
     & 0.2234500E+00, 0.2523400E+00, 0.2676800E+00, 0.2892700E+00, &
     & 0.3338700E+00, 0.3479600E+00, 0.3522700E+00, 0.3522700E+00 /
      data (ref_adm(11,iz, 8, 9),iz = 1,20) / &
     & 0.2285500E+00, 0.2285500E+00, 0.2199100E+00, 0.2245600E+00, &
     & 0.2176900E+00, 0.2150700E+00, 0.2140100E+00, 0.2287200E+00, &
     & 0.2023800E+00, 0.1933500E+00, 0.1861600E+00, 0.2049100E+00, &
     & 0.2055000E+00, 0.2208100E+00, 0.2219300E+00, 0.2582500E+00, &
     & 0.2655600E+00, 0.3052300E+00, 0.3190200E+00, 0.3190200E+00 /
      data (ref_adm(11,iz, 9, 9),iz = 1,20) / &
     & 0.2218900E+00, 0.2218900E+00, 0.2147500E+00, 0.1957000E+00, &
     & 0.1792900E+00, 0.1967100E+00, 0.2324500E+00, 0.1939500E+00, &
     & 0.2076000E+00, 0.1969800E+00, 0.1989300E+00, 0.2244100E+00, &
     & 0.2038000E+00, 0.2079100E+00, 0.2300000E+00, 0.2759400E+00, &
     & 0.2748500E+00, 0.3017600E+00, 0.3020400E+00, 0.3020400E+00 /
      data (ref_adm(11,iz,10, 9),iz = 1,20) / &
     & 0.2112100E+00, 0.2112100E+00, 0.2093200E+00, 0.1733900E+00, &
     & 0.2035500E+00, 0.2138600E+00, 0.2125400E+00, 0.2116100E+00, &
     & 0.2010100E+00, 0.2134000E+00, 0.2129700E+00, 0.2240600E+00, &
     & 0.2123700E+00, 0.2181000E+00, 0.2045700E+00, 0.2441200E+00, &
     & 0.2517500E+00, 0.2713100E+00, 0.2477400E+00, 0.2477400E+00 /
      data (ref_adm(11,iz,11, 9),iz = 1,20) / &
     & 0.2013500E+00, 0.2013500E+00, 0.1997400E+00, 0.2318800E+00, &
     & 0.2120900E+00, 0.2135600E+00, 0.2288400E+00, 0.2142800E+00, &
     & 0.2045400E+00, 0.2068800E+00, 0.2203500E+00, 0.2074800E+00, &
     & 0.2193100E+00, 0.2273300E+00, 0.2267900E+00, 0.2398300E+00, &
     & 0.2603200E+00, 0.2642500E+00, 0.2380500E+00, 0.2380500E+00 /
      data (ref_adm(11,iz,12, 9),iz = 1,20) / &
     & 0.2336700E+00, 0.2336700E+00, 0.2230000E+00, 0.2265500E+00, &
     & 0.2040600E+00, 0.2233500E+00, 0.2117300E+00, 0.2046900E+00, &
     & 0.1974500E+00, 0.2252100E+00, 0.2236400E+00, 0.2118800E+00, &
     & 0.2399400E+00, 0.2183800E+00, 0.2303300E+00, 0.2346300E+00, &
     & 0.2683100E+00, 0.2653500E+00, 0.2552000E+00, 0.2552000E+00 /
      data (ref_adm(11,iz,13, 9),iz = 1,20) / &
     & 0.2127300E+00, 0.2127300E+00, 0.2107200E+00, 0.2068700E+00, &
     & 0.1914600E+00, 0.1956000E+00, 0.2110800E+00, 0.2089900E+00, &
     & 0.2195700E+00, 0.2195100E+00, 0.2179800E+00, 0.2083800E+00, &
     & 0.1871700E+00, 0.2284500E+00, 0.2071800E+00, 0.2377100E+00, &
     & 0.2451100E+00, 0.2560900E+00, 0.2389400E+00, 0.2389400E+00 /
      data (ref_adm(11,iz,14, 9),iz = 1,20) / &
     & 0.2176900E+00, 0.2176900E+00, 0.2159500E+00, 0.2191300E+00, &
     & 0.2211300E+00, 0.2112300E+00, 0.2195700E+00, 0.2153800E+00, &
     & 0.2194200E+00, 0.2036800E+00, 0.2029500E+00, 0.2170300E+00, &
     & 0.2220400E+00, 0.2280300E+00, 0.2394500E+00, 0.2321800E+00, &
     & 0.2369300E+00, 0.2442700E+00, 0.2405200E+00, 0.2405200E+00 /
      data (ref_adm(11,iz,15, 9),iz = 1,20) / &
     & 0.2211000E+00, 0.2211000E+00, 0.2177900E+00, 0.2167200E+00, &
     & 0.1972300E+00, 0.1895400E+00, 0.2073400E+00, 0.2056300E+00, &
     & 0.1969300E+00, 0.2106700E+00, 0.2102500E+00, 0.2143200E+00, &
     & 0.2129800E+00, 0.2159800E+00, 0.2417300E+00, 0.2224800E+00, &
     & 0.2723600E+00, 0.2363000E+00, 0.2527200E+00, 0.2527200E+00 /
      data (ref_adm(11,iz,16, 9),iz = 1,20) / &
     & 0.2196400E+00, 0.2196400E+00, 0.2089700E+00, 0.1964200E+00, &
     & 0.2032000E+00, 0.1981800E+00, 0.2402300E+00, 0.2058800E+00, &
     & 0.1942500E+00, 0.2081500E+00, 0.2223700E+00, 0.2005100E+00, &
     & 0.2052100E+00, 0.2162700E+00, 0.2389100E+00, 0.2304700E+00, &
     & 0.2833100E+00, 0.2389100E+00, 0.2590300E+00, 0.2590300E+00 /
      data (ref_adm(11,iz,17, 9),iz = 1,20) / &
     & 0.2058400E+00, 0.2058400E+00, 0.1849500E+00, 0.2122800E+00, &
     & 0.2407900E+00, 0.1974800E+00, 0.2056300E+00, 0.2120200E+00, &
     & 0.2095500E+00, 0.1997200E+00, 0.1885400E+00, 0.1998800E+00, &
     & 0.2058200E+00, 0.2075500E+00, 0.2174500E+00, 0.2149200E+00, &
     & 0.2570100E+00, 0.2465800E+00, 0.2427700E+00, 0.2427700E+00 /
      data (ref_adm(11,iz,18, 9),iz = 1,20) / &
     & 0.1856700E+00, 0.1856700E+00, 0.2046700E+00, 0.2019700E+00, &
     & 0.2272500E+00, 0.2259700E+00, 0.2162300E+00, 0.2076000E+00, &
     & 0.1972300E+00, 0.1929400E+00, 0.2042100E+00, 0.1963900E+00, &
     & 0.2040300E+00, 0.2158100E+00, 0.2043200E+00, 0.2380000E+00, &
     & 0.2414100E+00, 0.2246600E+00, 0.2462900E+00, 0.2462900E+00 /
      data (ref_adm(11,iz,19, 9),iz = 1,20) / &
     & 0.2243700E+00, 0.2243700E+00, 0.2584400E+00, 0.1959400E+00, &
     & 0.2152400E+00, 0.2038900E+00, 0.2293000E+00, 0.1942700E+00, &
     & 0.1942000E+00, 0.2102500E+00, 0.2045900E+00, 0.2275200E+00, &
     & 0.2230800E+00, 0.2298500E+00, 0.2344400E+00, 0.2137200E+00, &
     & 0.2890600E+00, 0.2558200E+00, 0.2641028E+00, 0.2641028E+00 /
      data (ref_adm(11,iz,20, 9),iz = 1,20) / &
     & 0.2148400E+00, 0.2148400E+00, 0.2010800E+00, 0.2000600E+00, &
     & 0.2280900E+00, 0.2116000E+00, 0.2116200E+00, 0.2190200E+00, &
     & 0.2164000E+00, 0.2134300E+00, 0.2131700E+00, 0.2279000E+00, &
     & 0.2287900E+00, 0.2568500E+00, 0.2266600E+00, 0.2466100E+00, &
     & 0.2460400E+00, 0.3082900E+00, 0.2623844E+00, 0.2623844E+00 /
      data (ref_adm(11,iz,21, 9),iz = 1,20) / &
     & 0.2249500E+00, 0.2249500E+00, 0.2052200E+00, 0.1981500E+00, &
     & 0.2269800E+00, 0.1937500E+00, 0.2180300E+00, 0.2334200E+00, &
     & 0.2185900E+00, 0.2020300E+00, 0.2079300E+00, 0.2431600E+00, &
     & 0.2442700E+00, 0.2569400E+00, 0.2396500E+00, 0.2534200E+00, &
     & 0.2563856E+00, 0.2651292E+00, 0.2611216E+00, 0.2611216E+00 /
      data (ref_adm(11,iz,22, 9),iz = 1,20) / &
     & 0.2190500E+00, 0.2190500E+00, 0.2356100E+00, 0.2118300E+00, &
     & 0.2255600E+00, 0.1971300E+00, 0.2306400E+00, 0.2355300E+00, &
     & 0.2063800E+00, 0.2061600E+00, 0.2286700E+00, 0.2308500E+00, &
     & 0.2686700E+00, 0.2354300E+00, 0.2333400E+00, 0.2472900E+00, &
     & 0.2720312E+00, 0.2759055E+00, 0.2640166E+00, 0.2640166E+00 /
      data (ref_adm(11,iz,23, 9),iz = 1,20) / &
     & 0.2274200E+00, 0.2274200E+00, 0.2011400E+00, 0.2317500E+00, &
     & 0.2601100E+00, 0.2217800E+00, 0.2262300E+00, 0.2254500E+00, &
     & 0.2061600E+00, 0.2158600E+00, 0.2375400E+00, 0.2256400E+00, &
     & 0.2338200E+00, 0.2307700E+00, 0.2101700E+00, 0.2520000E+00, &
     & 0.2834000E+00, 0.2753035E+00, 0.2638492E+00, 0.2638492E+00 /
      data (ref_adm(11,iz,24, 9),iz = 1,20) / &
     & 0.2138500E+00, 0.2138500E+00, 0.2384200E+00, 0.2489800E+00, &
     & 0.2294600E+00, 0.2395100E+00, 0.2335000E+00, 0.2229900E+00, &
     & 0.2439700E+00, 0.2523300E+00, 0.2239300E+00, 0.2600900E+00, &
     & 0.2562500E+00, 0.2366600E+00, 0.2259400E+00, 0.2518900E+00, &
     & 0.2751200E+00, 0.2756003E+00, 0.2641988E+00, 0.2641988E+00 /
      data (ref_adm(11,iz,25, 9),iz = 1,20) / &
     & 0.2183400E+00, 0.2183400E+00, 0.2035900E+00, 0.2106400E+00, &
     & 0.2168800E+00, 0.2503300E+00, 0.2713700E+00, 0.2455500E+00, &
     & 0.2542800E+00, 0.2424700E+00, 0.2437900E+00, 0.2446200E+00, &
     & 0.2774300E+00, 0.2456000E+00, 0.2481500E+00, 0.2588800E+00, &
     & 0.2594700E+00, 0.2669500E+00, 0.2651502E+00, 0.2651502E+00 /
      data (ref_adm(11,iz,26, 9),iz = 1,20) / &
     & 0.2246000E+00, 0.2246000E+00, 0.2311000E+00, 0.2280100E+00, &
     & 0.2380700E+00, 0.2378700E+00, 0.2393200E+00, 0.2409300E+00, &
     & 0.2398900E+00, 0.2236100E+00, 0.2261600E+00, 0.2621300E+00, &
     & 0.2590500E+00, 0.2504500E+00, 0.2534600E+00, 0.2466400E+00, &
     & 0.2615300E+00, 0.2288600E+00, 0.2855100E+00, 0.2855100E+00 /
      data (ref_adm(11,iz,27, 9),iz = 1,20) / &
     & 0.2344600E+00, 0.2344600E+00, 0.2238200E+00, 0.2249400E+00, &
     & 0.2197200E+00, 0.2399100E+00, 0.2533600E+00, 0.2474000E+00, &
     & 0.2463900E+00, 0.2549800E+00, 0.2563600E+00, 0.2636200E+00, &
     & 0.2509300E+00, 0.2592900E+00, 0.2700300E+00, 0.2423400E+00, &
     & 0.2687600E+00, 0.2550300E+00, 0.1960600E+00, 0.1960600E+00 /
      data (ref_adm(11,iz,28, 9),iz = 1,20) / &
     & 0.2356200E+00, 0.2356200E+00, 0.2377800E+00, 0.2358000E+00, &
     & 0.2452200E+00, 0.2543000E+00, 0.2602200E+00, 0.2479300E+00, &
     & 0.2532100E+00, 0.2546900E+00, 0.2604400E+00, 0.2641300E+00, &
     & 0.2747900E+00, 0.2854000E+00, 0.2609700E+00, 0.2742200E+00, &
     & 0.2578100E+00, 0.2658400E+00, 0.2355300E+00, 0.2355300E+00 /
      data (ref_adm(11,iz,29, 9),iz = 1,20) / &
     & 0.2231900E+00, 0.2231900E+00, 0.2661500E+00, 0.2611400E+00, &
     & 0.2345300E+00, 0.2073400E+00, 0.2432300E+00, 0.2554100E+00, &
     & 0.2485900E+00, 0.2599000E+00, 0.2764600E+00, 0.2791300E+00, &
     & 0.2817300E+00, 0.2757100E+00, 0.2890000E+00, 0.2871500E+00, &
     & 0.2613100E+00, 0.2723600E+00, 0.2459800E+00, 0.2459800E+00 /
      data (ref_adm(11,iz,30, 9),iz = 1,20) / &
     & 0.2450400E+00, 0.2450400E+00, 0.2791600E+00, 0.2701400E+00, &
     & 0.2304100E+00, 0.2456100E+00, 0.2458700E+00, 0.2468500E+00, &
     & 0.2470200E+00, 0.2693600E+00, 0.2625900E+00, 0.2789800E+00, &
     & 0.2857900E+00, 0.2868800E+00, 0.2817400E+00, 0.2806300E+00, &
     & 0.2814000E+00, 0.2789900E+00, 0.2281100E+00, 0.2281100E+00 /
      data (ref_adm(11,iz,31, 9),iz = 1,20) / &
     & 0.2562300E+00, 0.2562300E+00, 0.2485300E+00, 0.2523300E+00, &
     & 0.2728400E+00, 0.2618700E+00, 0.3136600E+00, 0.2817100E+00, &
     & 0.2638200E+00, 0.2762900E+00, 0.2670500E+00, 0.2750200E+00, &
     & 0.2909500E+00, 0.2781900E+00, 0.2840600E+00, 0.2963700E+00, &
     & 0.2682500E+00, 0.2685200E+00, 0.2347400E+00, 0.2347400E+00 /
      data (ref_adm(11,iz,32, 9),iz = 1,20) / &
     & 0.2311400E+00, 0.2311400E+00, 0.2510700E+00, 0.2377200E+00, &
     & 0.2403500E+00, 0.2583400E+00, 0.2665000E+00, 0.2854600E+00, &
     & 0.2727000E+00, 0.2897800E+00, 0.2839300E+00, 0.2882800E+00, &
     & 0.3056300E+00, 0.2953400E+00, 0.2728600E+00, 0.2788500E+00, &
     & 0.2901400E+00, 0.2742500E+00, 0.2276000E+00, 0.2276000E+00 /
      data (ref_adm(11,iz,33, 9),iz = 1,20) / &
     & 0.2511200E+00, 0.2511200E+00, 0.2378800E+00, 0.2378100E+00, &
     & 0.2607900E+00, 0.2378400E+00, 0.2637900E+00, 0.2706900E+00, &
     & 0.2980000E+00, 0.2925000E+00, 0.3083600E+00, 0.2925700E+00, &
     & 0.3063800E+00, 0.3048100E+00, 0.2963300E+00, 0.2703400E+00, &
     & 0.3109600E+00, 0.3037100E+00, 0.2385000E+00, 0.2385000E+00 /
      data (ref_adm(11,iz,34, 9),iz = 1,20) / &
     & 0.2262800E+00, 0.2262800E+00, 0.2282600E+00, 0.2409400E+00, &
     & 0.2378200E+00, 0.2769700E+00, 0.2682800E+00, 0.2867200E+00, &
     & 0.2950900E+00, 0.2961800E+00, 0.3058300E+00, 0.2949600E+00, &
     & 0.2993500E+00, 0.2970900E+00, 0.2834300E+00, 0.2866700E+00, &
     & 0.3228000E+00, 0.3190800E+00, 0.2914275E+00, 0.2914275E+00 /
      data (ref_adm(11,iz,35, 9),iz = 1,20) / &
     & 0.2424500E+00, 0.2424500E+00, 0.2564600E+00, 0.2421200E+00, &
     & 0.2647200E+00, 0.2470200E+00, 0.2777600E+00, 0.2766900E+00, &
     & 0.2944600E+00, 0.2994800E+00, 0.3015400E+00, 0.3146800E+00, &
     & 0.2948800E+00, 0.2922900E+00, 0.2992700E+00, 0.2867300E+00, &
     & 0.3279200E+00, 0.3188100E+00, 0.2936385E+00, 0.2936385E+00 /
      data (ref_adm(11,iz,36, 9),iz = 1,20) / &
     & 0.2305900E+00, 0.2305900E+00, 0.2374900E+00, 0.2460700E+00, &
     & 0.2793900E+00, 0.2770000E+00, 0.2986500E+00, 0.2943400E+00, &
     & 0.3006200E+00, 0.3101200E+00, 0.3208800E+00, 0.3169600E+00, &
     & 0.2917000E+00, 0.2943100E+00, 0.3006500E+00, 0.3223700E+00, &
     & 0.3234200E+00, 0.3045078E+00, 0.2951734E+00, 0.2951734E+00 /
      data (ref_adm(11,iz,37, 9),iz = 1,20) / &
     & 0.2383100E+00, 0.2383100E+00, 0.2572000E+00, 0.2522600E+00, &
     & 0.2629600E+00, 0.2521500E+00, 0.2889200E+00, 0.2820600E+00, &
     & 0.2968500E+00, 0.3318400E+00, 0.3398300E+00, 0.3189100E+00, &
     & 0.3082200E+00, 0.3236700E+00, 0.3214600E+00, 0.2949900E+00, &
     & 0.3420500E+00, 0.3053161E+00, 0.2960437E+00, 0.2960437E+00 /
      data (ref_adm(11,iz,38, 9),iz = 1,20) / &
     & 0.2383100E+00, 0.2383100E+00, 0.2572000E+00, 0.2522600E+00, &
     & 0.2629600E+00, 0.2521500E+00, 0.2889200E+00, 0.2820600E+00, &
     & 0.2968500E+00, 0.3318400E+00, 0.3398300E+00, 0.3189100E+00, &
     & 0.3082200E+00, 0.3236700E+00, 0.3214600E+00, 0.2949900E+00, &
     & 0.3420500E+00, 0.3053161E+00, 0.2960437E+00, 0.2960437E+00 /
! Solar Zenith Angle 45.0 Albedo  0.2419129E+00
      data (ref_adm(11,iz, 1,10),iz = 1,20) / &
     & 0.2145600E+00, 0.2145600E+00, 0.2087900E+00, 0.2048700E+00, &
     & 0.2043600E+00, 0.2045900E+00, 0.2083300E+00, 0.2228300E+00, &
     & 0.2283800E+00, 0.2555500E+00, 0.3156900E+00, 0.2620500E+00, &
     & 0.2608600E+00, 0.2576600E+00, 0.2688800E+00, 0.3168000E+00, &
     & 0.3528700E+00, 0.3480100E+00, 0.3363900E+00, 0.3363900E+00 /
      data (ref_adm(11,iz, 2,10),iz = 1,20) / &
     & 0.2145600E+00, 0.2145600E+00, 0.2087900E+00, 0.2048700E+00, &
     & 0.2043600E+00, 0.2045900E+00, 0.2083300E+00, 0.2228300E+00, &
     & 0.2283800E+00, 0.2555500E+00, 0.3156900E+00, 0.2620500E+00, &
     & 0.2608600E+00, 0.2576600E+00, 0.2688800E+00, 0.3168000E+00, &
     & 0.3528700E+00, 0.3480100E+00, 0.3363900E+00, 0.3363900E+00 /
      data (ref_adm(11,iz, 3,10),iz = 1,20) / &
     & 0.2036200E+00, 0.2036200E+00, 0.2127900E+00, 0.1888700E+00, &
     & 0.2001700E+00, 0.2087400E+00, 0.2137900E+00, 0.2172700E+00, &
     & 0.2068100E+00, 0.2407900E+00, 0.2669000E+00, 0.2239600E+00, &
     & 0.2445700E+00, 0.2551600E+00, 0.2686700E+00, 0.2883300E+00, &
     & 0.3239200E+00, 0.3314700E+00, 0.3383400E+00, 0.3383400E+00 /
      data (ref_adm(11,iz, 4,10),iz = 1,20) / &
     & 0.2123700E+00, 0.2123700E+00, 0.1853200E+00, 0.1933800E+00, &
     & 0.2009200E+00, 0.2478600E+00, 0.2254800E+00, 0.2048000E+00, &
     & 0.1956700E+00, 0.2227600E+00, 0.2374900E+00, 0.2386100E+00, &
     & 0.2376000E+00, 0.2860000E+00, 0.2632000E+00, 0.2826300E+00, &
     & 0.3168100E+00, 0.3423000E+00, 0.3523000E+00, 0.3523000E+00 /
      data (ref_adm(11,iz, 5,10),iz = 1,20) / &
     & 0.2118000E+00, 0.2118000E+00, 0.2266100E+00, 0.1958400E+00, &
     & 0.1961700E+00, 0.2353400E+00, 0.2097600E+00, 0.1925700E+00, &
     & 0.2020400E+00, 0.2757400E+00, 0.2608700E+00, 0.2375200E+00, &
     & 0.2348600E+00, 0.2440700E+00, 0.2569500E+00, 0.2904300E+00, &
     & 0.3438700E+00, 0.3438500E+00, 0.3557100E+00, 0.3557100E+00 /
      data (ref_adm(11,iz, 6,10),iz = 1,20) / &
     & 0.2295400E+00, 0.2295400E+00, 0.2007900E+00, 0.2135100E+00, &
     & 0.2058400E+00, 0.2114300E+00, 0.2177100E+00, 0.2157000E+00, &
     & 0.2733700E+00, 0.2403300E+00, 0.2157500E+00, 0.2070600E+00, &
     & 0.2547100E+00, 0.2814300E+00, 0.2619000E+00, 0.2717900E+00, &
     & 0.3079000E+00, 0.3363900E+00, 0.2764700E+00, 0.2764700E+00 /
      data (ref_adm(11,iz, 7,10),iz = 1,20) / &
     & 0.2057100E+00, 0.2057100E+00, 0.2047100E+00, 0.2098400E+00, &
     & 0.2083600E+00, 0.1873300E+00, 0.1981800E+00, 0.1965900E+00, &
     & 0.2059200E+00, 0.2072700E+00, 0.2066900E+00, 0.2099100E+00, &
     & 0.2100400E+00, 0.2367000E+00, 0.2474200E+00, 0.2881200E+00, &
     & 0.3240800E+00, 0.3391800E+00, 0.3219200E+00, 0.3219200E+00 /
      data (ref_adm(11,iz, 8,10),iz = 1,20) / &
     & 0.2098800E+00, 0.2098800E+00, 0.2148500E+00, 0.2299500E+00, &
     & 0.2240000E+00, 0.2200100E+00, 0.1976200E+00, 0.2015600E+00, &
     & 0.2015600E+00, 0.2379200E+00, 0.2335900E+00, 0.2413800E+00, &
     & 0.2618900E+00, 0.2587600E+00, 0.2644700E+00, 0.2980700E+00, &
     & 0.3185900E+00, 0.3642400E+00, 0.3037900E+00, 0.3037900E+00 /
      data (ref_adm(11,iz, 9,10),iz = 1,20) / &
     & 0.2093300E+00, 0.2093300E+00, 0.1981900E+00, 0.2115600E+00, &
     & 0.2082200E+00, 0.1941400E+00, 0.1923600E+00, 0.1939100E+00, &
     & 0.2242200E+00, 0.2073400E+00, 0.2127900E+00, 0.2168700E+00, &
     & 0.2283800E+00, 0.2349900E+00, 0.2381200E+00, 0.2902100E+00, &
     & 0.3017700E+00, 0.3159100E+00, 0.3173900E+00, 0.3173900E+00 /
      data (ref_adm(11,iz,10,10),iz = 1,20) / &
     & 0.2170400E+00, 0.2170400E+00, 0.2142700E+00, 0.2111400E+00, &
     & 0.1893000E+00, 0.2002900E+00, 0.1986500E+00, 0.1809400E+00, &
     & 0.2229500E+00, 0.2194900E+00, 0.2294600E+00, 0.2165300E+00, &
     & 0.2326000E+00, 0.2305600E+00, 0.2336000E+00, 0.2541900E+00, &
     & 0.2897200E+00, 0.3020900E+00, 0.2868100E+00, 0.2868100E+00 /
      data (ref_adm(11,iz,11,10),iz = 1,20) / &
     & 0.2212700E+00, 0.2212700E+00, 0.2020700E+00, 0.2111300E+00, &
     & 0.2099100E+00, 0.1983800E+00, 0.1941000E+00, 0.1929600E+00, &
     & 0.1960100E+00, 0.2061200E+00, 0.2160600E+00, 0.2244900E+00, &
     & 0.2287000E+00, 0.2123900E+00, 0.2498200E+00, 0.2393400E+00, &
     & 0.2665500E+00, 0.2859600E+00, 0.2973000E+00, 0.2973000E+00 /
      data (ref_adm(11,iz,12,10),iz = 1,20) / &
     & 0.2032200E+00, 0.2032200E+00, 0.2080500E+00, 0.2101800E+00, &
     & 0.2061300E+00, 0.1986000E+00, 0.1882100E+00, 0.2027400E+00, &
     & 0.2094400E+00, 0.2254000E+00, 0.2260000E+00, 0.2236500E+00, &
     & 0.2195900E+00, 0.2188800E+00, 0.2239200E+00, 0.2424700E+00, &
     & 0.2655200E+00, 0.2848600E+00, 0.2796300E+00, 0.2796300E+00 /
      data (ref_adm(11,iz,13,10),iz = 1,20) / &
     & 0.2103200E+00, 0.2103200E+00, 0.2298500E+00, 0.2081800E+00, &
     & 0.2207100E+00, 0.2066800E+00, 0.1976300E+00, 0.2043300E+00, &
     & 0.2078500E+00, 0.2098100E+00, 0.2077100E+00, 0.2149400E+00, &
     & 0.2110400E+00, 0.2297800E+00, 0.2324400E+00, 0.2282700E+00, &
     & 0.2662300E+00, 0.2820200E+00, 0.2715600E+00, 0.2715600E+00 /
      data (ref_adm(11,iz,14,10),iz = 1,20) / &
     & 0.2020700E+00, 0.2020700E+00, 0.2026100E+00, 0.2054500E+00, &
     & 0.1969700E+00, 0.1927200E+00, 0.1992200E+00, 0.2011600E+00, &
     & 0.2085500E+00, 0.2151800E+00, 0.2145400E+00, 0.2147200E+00, &
     & 0.2265800E+00, 0.2278500E+00, 0.2389500E+00, 0.2643300E+00, &
     & 0.2539000E+00, 0.2635600E+00, 0.2729400E+00, 0.2729400E+00 /
      data (ref_adm(11,iz,15,10),iz = 1,20) / &
     & 0.2048800E+00, 0.2048800E+00, 0.2046300E+00, 0.2079900E+00, &
     & 0.2020400E+00, 0.2016700E+00, 0.2041000E+00, 0.1953200E+00, &
     & 0.2030700E+00, 0.2006000E+00, 0.1996400E+00, 0.2052800E+00, &
     & 0.2065000E+00, 0.2237700E+00, 0.2289100E+00, 0.2442600E+00, &
     & 0.2507400E+00, 0.2516900E+00, 0.2487500E+00, 0.2487500E+00 /
      data (ref_adm(11,iz,16,10),iz = 1,20) / &
     & 0.2034700E+00, 0.2034700E+00, 0.2165000E+00, 0.2039000E+00, &
     & 0.1922600E+00, 0.2050200E+00, 0.2014400E+00, 0.2035600E+00, &
     & 0.2027600E+00, 0.1880100E+00, 0.2033800E+00, 0.2157900E+00, &
     & 0.2085600E+00, 0.2129800E+00, 0.2401300E+00, 0.2338600E+00, &
     & 0.2350500E+00, 0.2473200E+00, 0.2369500E+00, 0.2369500E+00 /
      data (ref_adm(11,iz,17,10),iz = 1,20) / &
     & 0.2121400E+00, 0.2121400E+00, 0.2053800E+00, 0.2149400E+00, &
     & 0.1977000E+00, 0.2210400E+00, 0.2099800E+00, 0.1948300E+00, &
     & 0.1911100E+00, 0.2134600E+00, 0.2054700E+00, 0.2109000E+00, &
     & 0.2156200E+00, 0.2123700E+00, 0.2269200E+00, 0.2465000E+00, &
     & 0.2353500E+00, 0.2846900E+00, 0.2909500E+00, 0.2909500E+00 /
      data (ref_adm(11,iz,18,10),iz = 1,20) / &
     & 0.2155300E+00, 0.2155300E+00, 0.2181500E+00, 0.2110800E+00, &
     & 0.2082900E+00, 0.2176400E+00, 0.1984900E+00, 0.1867700E+00, &
     & 0.2040700E+00, 0.2190400E+00, 0.2140100E+00, 0.2108200E+00, &
     & 0.2252100E+00, 0.2318300E+00, 0.2244400E+00, 0.2414000E+00, &
     & 0.2466800E+00, 0.2749200E+00, 0.2687243E+00, 0.2687243E+00 /
      data (ref_adm(11,iz,19,10),iz = 1,20) / &
     & 0.2137100E+00, 0.2137100E+00, 0.2094300E+00, 0.2195300E+00, &
     & 0.2123000E+00, 0.2038700E+00, 0.1925900E+00, 0.2051300E+00, &
     & 0.2154000E+00, 0.2022200E+00, 0.2073300E+00, 0.2111600E+00, &
     & 0.2136900E+00, 0.2295100E+00, 0.2457100E+00, 0.2184100E+00, &
     & 0.2823700E+00, 0.2682621E+00, 0.2657411E+00, 0.2657411E+00 /
      data (ref_adm(11,iz,20,10),iz = 1,20) / &
     & 0.2031900E+00, 0.2031900E+00, 0.1984100E+00, 0.1859100E+00, &
     & 0.2010600E+00, 0.1979500E+00, 0.1896600E+00, 0.1895100E+00, &
     & 0.1971800E+00, 0.2074200E+00, 0.2093900E+00, 0.2150800E+00, &
     & 0.2270400E+00, 0.2276700E+00, 0.2507100E+00, 0.2487500E+00, &
     & 0.2565924E+00, 0.2669417E+00, 0.2638753E+00, 0.2638753E+00 /
      data (ref_adm(11,iz,21,10),iz = 1,20) / &
     & 0.2042500E+00, 0.2042500E+00, 0.2132300E+00, 0.2086900E+00, &
     & 0.2145800E+00, 0.2019200E+00, 0.2013700E+00, 0.1995600E+00, &
     & 0.2071300E+00, 0.2081900E+00, 0.2095100E+00, 0.2107100E+00, &
     & 0.2274700E+00, 0.2326800E+00, 0.2338500E+00, 0.2477500E+00, &
     & 0.2563649E+00, 0.2658651E+00, 0.2625376E+00, 0.2625376E+00 /
      data (ref_adm(11,iz,22,10),iz = 1,20) / &
     & 0.2130900E+00, 0.2130900E+00, 0.2173900E+00, 0.2073700E+00, &
     & 0.2365400E+00, 0.1994500E+00, 0.2181300E+00, 0.2108700E+00, &
     & 0.2156500E+00, 0.2110700E+00, 0.2095200E+00, 0.2245200E+00, &
     & 0.2332500E+00, 0.2500100E+00, 0.2400400E+00, 0.2660900E+00, &
     & 0.2752652E+00, 0.2810690E+00, 0.2710495E+00, 0.2710495E+00 /
      data (ref_adm(11,iz,23,10),iz = 1,20) / &
     & 0.2111700E+00, 0.2111700E+00, 0.2138600E+00, 0.2267900E+00, &
     & 0.2241300E+00, 0.2244500E+00, 0.2286200E+00, 0.2233800E+00, &
     & 0.2269200E+00, 0.2154700E+00, 0.2196600E+00, 0.2312200E+00, &
     & 0.2457800E+00, 0.2497200E+00, 0.2552900E+00, 0.2531600E+00, &
     & 0.2755677E+00, 0.2804956E+00, 0.2709495E+00, 0.2709495E+00 /
      data (ref_adm(11,iz,24,10),iz = 1,20) / &
     & 0.2091200E+00, 0.2091200E+00, 0.2178200E+00, 0.2186500E+00, &
     & 0.2111500E+00, 0.2166700E+00, 0.2181000E+00, 0.2184900E+00, &
     & 0.2286400E+00, 0.2325300E+00, 0.2251500E+00, 0.2383700E+00, &
     & 0.2369100E+00, 0.2565700E+00, 0.2535400E+00, 0.2494300E+00, &
     & 0.2524100E+00, 0.2808734E+00, 0.2714133E+00, 0.2714133E+00 /
      data (ref_adm(11,iz,25,10),iz = 1,20) / &
     & 0.2017500E+00, 0.2017500E+00, 0.2113100E+00, 0.2152000E+00, &
     & 0.2193700E+00, 0.2181400E+00, 0.2253100E+00, 0.2259500E+00, &
     & 0.2120200E+00, 0.2351900E+00, 0.2370300E+00, 0.2507600E+00, &
     & 0.2376800E+00, 0.2470700E+00, 0.2635800E+00, 0.2796700E+00, &
     & 0.2849300E+00, 0.3018400E+00, 0.2726918E+00, 0.2726918E+00 /
      data (ref_adm(11,iz,26,10),iz = 1,20) / &
     & 0.2124000E+00, 0.2124000E+00, 0.2203000E+00, 0.2204900E+00, &
     & 0.2234400E+00, 0.2241200E+00, 0.2288000E+00, 0.2329800E+00, &
     & 0.2361900E+00, 0.2432800E+00, 0.2451700E+00, 0.2471900E+00, &
     & 0.2611100E+00, 0.2725000E+00, 0.2850800E+00, 0.2917500E+00, &
     & 0.2798400E+00, 0.2716900E+00, 0.2567500E+00, 0.2567500E+00 /
      data (ref_adm(11,iz,27,10),iz = 1,20) / &
     & 0.2194700E+00, 0.2194700E+00, 0.2192300E+00, 0.2217300E+00, &
     & 0.2297400E+00, 0.2412900E+00, 0.2321700E+00, 0.2390700E+00, &
     & 0.2371000E+00, 0.2335100E+00, 0.2536100E+00, 0.2609200E+00, &
     & 0.2721900E+00, 0.2771100E+00, 0.2806600E+00, 0.2707600E+00, &
     & 0.2909600E+00, 0.2768200E+00, 0.2122400E+00, 0.2122400E+00 /
      data (ref_adm(11,iz,28,10),iz = 1,20) / &
     & 0.2113200E+00, 0.2113200E+00, 0.2170400E+00, 0.2154700E+00, &
     & 0.2252300E+00, 0.2217500E+00, 0.2326300E+00, 0.2307800E+00, &
     & 0.2564400E+00, 0.2577900E+00, 0.2598200E+00, 0.2613100E+00, &
     & 0.2712800E+00, 0.2687700E+00, 0.2694600E+00, 0.2879700E+00, &
     & 0.3014400E+00, 0.2843100E+00, 0.2557700E+00, 0.2557700E+00 /
      data (ref_adm(11,iz,29,10),iz = 1,20) / &
     & 0.2126100E+00, 0.2126100E+00, 0.2171400E+00, 0.2326200E+00, &
     & 0.2224700E+00, 0.2317800E+00, 0.2295800E+00, 0.2495400E+00, &
     & 0.2622500E+00, 0.2560800E+00, 0.2598000E+00, 0.2680800E+00, &
     & 0.2792800E+00, 0.3007000E+00, 0.2861900E+00, 0.3164500E+00, &
     & 0.3131700E+00, 0.2973000E+00, 0.2588300E+00, 0.2588300E+00 /
      data (ref_adm(11,iz,30,10),iz = 1,20) / &
     & 0.2130300E+00, 0.2130300E+00, 0.2408900E+00, 0.2190200E+00, &
     & 0.2392400E+00, 0.2322700E+00, 0.2445600E+00, 0.2365900E+00, &
     & 0.2531800E+00, 0.2500500E+00, 0.2726900E+00, 0.2729000E+00, &
     & 0.2782100E+00, 0.2863700E+00, 0.2941900E+00, 0.3053900E+00, &
     & 0.2935700E+00, 0.2949800E+00, 0.2490800E+00, 0.2490800E+00 /
      data (ref_adm(11,iz,31,10),iz = 1,20) / &
     & 0.2163600E+00, 0.2163600E+00, 0.2085700E+00, 0.2182400E+00, &
     & 0.2285900E+00, 0.2431300E+00, 0.2503900E+00, 0.2559300E+00, &
     & 0.2454000E+00, 0.2642400E+00, 0.2691100E+00, 0.2837300E+00, &
     & 0.2905400E+00, 0.2963600E+00, 0.2998800E+00, 0.3022600E+00, &
     & 0.2818800E+00, 0.2834100E+00, 0.2480900E+00, 0.2480900E+00 /
      data (ref_adm(11,iz,32,10),iz = 1,20) / &
     & 0.2210500E+00, 0.2210500E+00, 0.2385800E+00, 0.2321900E+00, &
     & 0.2531400E+00, 0.2574900E+00, 0.2530800E+00, 0.2652000E+00, &
     & 0.2660200E+00, 0.2988300E+00, 0.3070100E+00, 0.3085700E+00, &
     & 0.3247300E+00, 0.3098100E+00, 0.3085500E+00, 0.3082400E+00, &
     & 0.3233300E+00, 0.3112000E+00, 0.2645500E+00, 0.2645500E+00 /
      data (ref_adm(11,iz,33,10),iz = 1,20) / &
     & 0.2122200E+00, 0.2122200E+00, 0.2639200E+00, 0.2375700E+00, &
     & 0.2541800E+00, 0.2518200E+00, 0.2391800E+00, 0.2528400E+00, &
     & 0.2622900E+00, 0.2773700E+00, 0.2833500E+00, 0.2842000E+00, &
     & 0.3158800E+00, 0.3017600E+00, 0.2988300E+00, 0.3101600E+00, &
     & 0.3183500E+00, 0.3088300E+00, 0.2630000E+00, 0.2630000E+00 /
      data (ref_adm(11,iz,34,10),iz = 1,20) / &
     & 0.2199400E+00, 0.2199400E+00, 0.2504000E+00, 0.2542400E+00, &
     & 0.2504200E+00, 0.2405400E+00, 0.2576500E+00, 0.2535700E+00, &
     & 0.2758000E+00, 0.2867400E+00, 0.3026600E+00, 0.3015000E+00, &
     & 0.2945200E+00, 0.3198100E+00, 0.3135700E+00, 0.3086800E+00, &
     & 0.3126900E+00, 0.3078100E+00, 0.2549000E+00, 0.2549000E+00 /
      data (ref_adm(11,iz,35,10),iz = 1,20) / &
     & 0.2136600E+00, 0.2136600E+00, 0.2374100E+00, 0.2328200E+00, &
     & 0.2436500E+00, 0.2418000E+00, 0.2749400E+00, 0.2849300E+00, &
     & 0.2742300E+00, 0.3124200E+00, 0.3140200E+00, 0.3124200E+00, &
     & 0.2971200E+00, 0.3155600E+00, 0.3057000E+00, 0.3245200E+00, &
     & 0.3304100E+00, 0.3208900E+00, 0.2786700E+00, 0.2786700E+00 /
      data (ref_adm(11,iz,36,10),iz = 1,20) / &
     & 0.2189500E+00, 0.2189500E+00, 0.2161900E+00, 0.2289900E+00, &
     & 0.2208800E+00, 0.2454200E+00, 0.2659300E+00, 0.2865800E+00, &
     & 0.2821800E+00, 0.3108000E+00, 0.3185000E+00, 0.3284200E+00, &
     & 0.3291300E+00, 0.3065000E+00, 0.3243100E+00, 0.3231100E+00, &
     & 0.3234700E+00, 0.3208200E+00, 0.3093045E+00, 0.3093045E+00 /
      data (ref_adm(11,iz,37,10),iz = 1,20) / &
     & 0.2257500E+00, 0.2257500E+00, 0.2041400E+00, 0.2231900E+00, &
     & 0.2500400E+00, 0.2664100E+00, 0.2762700E+00, 0.2903600E+00, &
     & 0.3024300E+00, 0.2995000E+00, 0.3295500E+00, 0.3341900E+00, &
     & 0.3255400E+00, 0.3125500E+00, 0.3286300E+00, 0.3296000E+00, &
     & 0.3187700E+00, 0.3170017E+00, 0.3103560E+00, 0.3103560E+00 /
      data (ref_adm(11,iz,38,10),iz = 1,20) / &
     & 0.2257500E+00, 0.2257500E+00, 0.2041400E+00, 0.2231900E+00, &
     & 0.2500400E+00, 0.2664100E+00, 0.2762700E+00, 0.2903600E+00, &
     & 0.3024300E+00, 0.2995000E+00, 0.3295500E+00, 0.3341900E+00, &
     & 0.3255400E+00, 0.3125500E+00, 0.3286300E+00, 0.3296000E+00, &
     & 0.3187700E+00, 0.3170017E+00, 0.3103560E+00, 0.3103560E+00 /
! Solar Zenith Angle 50.0 Albedo  0.2409643E+00
      data (ref_adm(11,iz, 1,11),iz = 1,20) / &
     & 0.2171400E+00, 0.2171400E+00, 0.2085400E+00, 0.1990600E+00, &
     & 0.1800400E+00, 0.1962400E+00, 0.1869300E+00, 0.2184300E+00, &
     & 0.1967100E+00, 0.2165800E+00, 0.2632700E+00, 0.2767300E+00, &
     & 0.2710600E+00, 0.2812700E+00, 0.2767100E+00, 0.2977900E+00, &
     & 0.3364800E+00, 0.3688400E+00, 0.3831400E+00, 0.3831400E+00 /
      data (ref_adm(11,iz, 2,11),iz = 1,20) / &
     & 0.2171400E+00, 0.2171400E+00, 0.2085400E+00, 0.1990600E+00, &
     & 0.1800400E+00, 0.1962400E+00, 0.1869300E+00, 0.2184300E+00, &
     & 0.1967100E+00, 0.2165800E+00, 0.2632700E+00, 0.2767300E+00, &
     & 0.2710600E+00, 0.2812700E+00, 0.2767100E+00, 0.2977900E+00, &
     & 0.3364800E+00, 0.3688400E+00, 0.3831400E+00, 0.3831400E+00 /
      data (ref_adm(11,iz, 3,11),iz = 1,20) / &
     & 0.2098800E+00, 0.2098800E+00, 0.2084100E+00, 0.1968300E+00, &
     & 0.2063800E+00, 0.1878900E+00, 0.1878700E+00, 0.1870900E+00, &
     & 0.2052800E+00, 0.2238700E+00, 0.2343100E+00, 0.2419000E+00, &
     & 0.2502700E+00, 0.2695900E+00, 0.2699500E+00, 0.2949200E+00, &
     & 0.3253600E+00, 0.3546300E+00, 0.3966600E+00, 0.3966600E+00 /
      data (ref_adm(11,iz, 4,11),iz = 1,20) / &
     & 0.2113000E+00, 0.2113000E+00, 0.2067100E+00, 0.2209500E+00, &
     & 0.2032300E+00, 0.1838100E+00, 0.1890400E+00, 0.1980800E+00, &
     & 0.1993000E+00, 0.2145700E+00, 0.2111500E+00, 0.2102600E+00, &
     & 0.2398000E+00, 0.2425300E+00, 0.2680800E+00, 0.2834700E+00, &
     & 0.3250800E+00, 0.3839100E+00, 0.3888600E+00, 0.3888600E+00 /
      data (ref_adm(11,iz, 5,11),iz = 1,20) / &
     & 0.2112000E+00, 0.2112000E+00, 0.2085300E+00, 0.2196300E+00, &
     & 0.2027900E+00, 0.2065300E+00, 0.1930900E+00, 0.1950700E+00, &
     & 0.2037300E+00, 0.2267300E+00, 0.2141000E+00, 0.2171100E+00, &
     & 0.2399500E+00, 0.2305600E+00, 0.2708200E+00, 0.2801600E+00, &
     & 0.3127700E+00, 0.3433300E+00, 0.3576400E+00, 0.3576400E+00 /
      data (ref_adm(11,iz, 6,11),iz = 1,20) / &
     & 0.2200300E+00, 0.2200300E+00, 0.1994900E+00, 0.1955200E+00, &
     & 0.1893000E+00, 0.1938000E+00, 0.1887000E+00, 0.2081600E+00, &
     & 0.2074100E+00, 0.2137900E+00, 0.2102800E+00, 0.2301600E+00, &
     & 0.2132900E+00, 0.2315200E+00, 0.2618800E+00, 0.2647800E+00, &
     & 0.3090900E+00, 0.3227800E+00, 0.3583500E+00, 0.3583500E+00 /
      data (ref_adm(11,iz, 7,11),iz = 1,20) / &
     & 0.2105200E+00, 0.2105200E+00, 0.2051300E+00, 0.2035200E+00, &
     & 0.1984900E+00, 0.1975700E+00, 0.2008000E+00, 0.2104800E+00, &
     & 0.2093400E+00, 0.2081600E+00, 0.2074900E+00, 0.2242700E+00, &
     & 0.2344200E+00, 0.2429600E+00, 0.2558400E+00, 0.2745300E+00, &
     & 0.2970800E+00, 0.3232500E+00, 0.3248500E+00, 0.3248500E+00 /
      data (ref_adm(11,iz, 8,11),iz = 1,20) / &
     & 0.1897600E+00, 0.1897600E+00, 0.2219100E+00, 0.2226000E+00, &
     & 0.1977000E+00, 0.2060700E+00, 0.2209000E+00, 0.2205000E+00, &
     & 0.2104900E+00, 0.1934900E+00, 0.2042600E+00, 0.2242500E+00, &
     & 0.2230900E+00, 0.2184500E+00, 0.2478800E+00, 0.2754900E+00, &
     & 0.3126800E+00, 0.3362700E+00, 0.3260500E+00, 0.3260500E+00 /
      data (ref_adm(11,iz, 9,11),iz = 1,20) / &
     & 0.2034700E+00, 0.2034700E+00, 0.2018600E+00, 0.2035000E+00, &
     & 0.1828700E+00, 0.1913700E+00, 0.1922100E+00, 0.2171200E+00, &
     & 0.2012100E+00, 0.1795300E+00, 0.2089200E+00, 0.2116900E+00, &
     & 0.2225100E+00, 0.2281300E+00, 0.2412700E+00, 0.2860700E+00, &
     & 0.3269100E+00, 0.3092900E+00, 0.2871700E+00, 0.2871700E+00 /
      data (ref_adm(11,iz,10,11),iz = 1,20) / &
     & 0.1976000E+00, 0.1976000E+00, 0.1976300E+00, 0.2090600E+00, &
     & 0.1948200E+00, 0.2016200E+00, 0.2001800E+00, 0.2021800E+00, &
     & 0.1879100E+00, 0.1950700E+00, 0.2070200E+00, 0.2153800E+00, &
     & 0.2128100E+00, 0.2241300E+00, 0.2418200E+00, 0.2816000E+00, &
     & 0.2962000E+00, 0.3100600E+00, 0.2980500E+00, 0.2980500E+00 /
      data (ref_adm(11,iz,11,11),iz = 1,20) / &
     & 0.2028900E+00, 0.2028900E+00, 0.1959300E+00, 0.2047700E+00, &
     & 0.1926100E+00, 0.1896200E+00, 0.2028300E+00, 0.2001900E+00, &
     & 0.1885200E+00, 0.2019300E+00, 0.2071200E+00, 0.2179000E+00, &
     & 0.2173300E+00, 0.2180800E+00, 0.2402600E+00, 0.2717400E+00, &
     & 0.3020900E+00, 0.3058600E+00, 0.2888500E+00, 0.2888500E+00 /
      data (ref_adm(11,iz,12,11),iz = 1,20) / &
     & 0.1923300E+00, 0.1923300E+00, 0.2051600E+00, 0.2103300E+00, &
     & 0.2119700E+00, 0.2165000E+00, 0.2128700E+00, 0.1901600E+00, &
     & 0.1895800E+00, 0.2118800E+00, 0.2011700E+00, 0.2151200E+00, &
     & 0.2232900E+00, 0.2233700E+00, 0.2479400E+00, 0.2731400E+00, &
     & 0.2932200E+00, 0.2978400E+00, 0.2978500E+00, 0.2978500E+00 /
      data (ref_adm(11,iz,13,11),iz = 1,20) / &
     & 0.2060500E+00, 0.2060500E+00, 0.2040000E+00, 0.2059700E+00, &
     & 0.2028500E+00, 0.2043600E+00, 0.2063900E+00, 0.1928400E+00, &
     & 0.2049300E+00, 0.1991400E+00, 0.2036500E+00, 0.2157500E+00, &
     & 0.2146400E+00, 0.2146900E+00, 0.2580900E+00, 0.2616800E+00, &
     & 0.2917900E+00, 0.2866200E+00, 0.2831800E+00, 0.2831800E+00 /
      data (ref_adm(11,iz,14,11),iz = 1,20) / &
     & 0.1965900E+00, 0.1965900E+00, 0.1842000E+00, 0.1867400E+00, &
     & 0.1834200E+00, 0.1795500E+00, 0.1870600E+00, 0.1902700E+00, &
     & 0.1983600E+00, 0.1993400E+00, 0.1996800E+00, 0.2044100E+00, &
     & 0.2159500E+00, 0.2266400E+00, 0.2503700E+00, 0.2575100E+00, &
     & 0.2837300E+00, 0.2842200E+00, 0.2624100E+00, 0.2624100E+00 /
      data (ref_adm(11,iz,15,11),iz = 1,20) / &
     & 0.1996400E+00, 0.1996400E+00, 0.2006900E+00, 0.2022200E+00, &
     & 0.2024600E+00, 0.1983800E+00, 0.2020500E+00, 0.1987200E+00, &
     & 0.1994700E+00, 0.2033200E+00, 0.2020100E+00, 0.1986400E+00, &
     & 0.1972000E+00, 0.2009100E+00, 0.2349000E+00, 0.2484900E+00, &
     & 0.2717100E+00, 0.2849100E+00, 0.2123400E+00, 0.2123400E+00 /
      data (ref_adm(11,iz,16,11),iz = 1,20) / &
     & 0.2015100E+00, 0.2015100E+00, 0.1964900E+00, 0.1962600E+00, &
     & 0.1867500E+00, 0.2062900E+00, 0.2072200E+00, 0.2128700E+00, &
     & 0.1954200E+00, 0.1900100E+00, 0.2050700E+00, 0.2207000E+00, &
     & 0.2214400E+00, 0.2164200E+00, 0.2426900E+00, 0.2265500E+00, &
     & 0.2596600E+00, 0.2868200E+00, 0.2291700E+00, 0.2291700E+00 /
      data (ref_adm(11,iz,17,11),iz = 1,20) / &
     & 0.2061900E+00, 0.2061900E+00, 0.2081000E+00, 0.2062500E+00, &
     & 0.1997100E+00, 0.1935000E+00, 0.1948200E+00, 0.2124000E+00, &
     & 0.2116900E+00, 0.2096500E+00, 0.2078100E+00, 0.2191700E+00, &
     & 0.2263500E+00, 0.2184800E+00, 0.2320000E+00, 0.2436200E+00, &
     & 0.2566000E+00, 0.2717600E+00, 0.2313400E+00, 0.2313400E+00 /
      data (ref_adm(11,iz,18,11),iz = 1,20) / &
     & 0.2114100E+00, 0.2114100E+00, 0.1986000E+00, 0.2110000E+00, &
     & 0.2057100E+00, 0.1973700E+00, 0.2014500E+00, 0.2137800E+00, &
     & 0.2153800E+00, 0.2187200E+00, 0.2200100E+00, 0.2222000E+00, &
     & 0.2303000E+00, 0.2268700E+00, 0.2362000E+00, 0.2271600E+00, &
     & 0.2554200E+00, 0.2555100E+00, 0.2682927E+00, 0.2682927E+00 /
      data (ref_adm(11,iz,19,11),iz = 1,20) / &
     & 0.2071300E+00, 0.2071300E+00, 0.2074400E+00, 0.2069200E+00, &
     & 0.2032800E+00, 0.2010400E+00, 0.2286200E+00, 0.2103500E+00, &
     & 0.2175800E+00, 0.2122400E+00, 0.2191900E+00, 0.2253200E+00, &
     & 0.2321400E+00, 0.2246800E+00, 0.2358600E+00, 0.2467300E+00, &
     & 0.3018700E+00, 0.2524200E+00, 0.2653142E+00, 0.2653142E+00 /
      data (ref_adm(11,iz,20,11),iz = 1,20) / &
     & 0.2041100E+00, 0.2041100E+00, 0.1933200E+00, 0.1999300E+00, &
     & 0.1942200E+00, 0.2130900E+00, 0.2038400E+00, 0.2089800E+00, &
     & 0.2127000E+00, 0.2215400E+00, 0.2099600E+00, 0.2238000E+00, &
     & 0.2219800E+00, 0.2268700E+00, 0.2395000E+00, 0.2669200E+00, &
     & 0.2561802E+00, 0.2665130E+00, 0.2634513E+00, 0.2634513E+00 /
      data (ref_adm(11,iz,21,11),iz = 1,20) / &
     & 0.1953800E+00, 0.1953800E+00, 0.1978600E+00, 0.2033000E+00, &
     & 0.2135000E+00, 0.2117500E+00, 0.2069000E+00, 0.2131100E+00, &
     & 0.2098300E+00, 0.2161100E+00, 0.2099000E+00, 0.2167800E+00, &
     & 0.2379700E+00, 0.2328200E+00, 0.2424200E+00, 0.3027900E+00, &
     & 0.2559534E+00, 0.2654380E+00, 0.2621159E+00, 0.2621159E+00 /
      data (ref_adm(11,iz,22,11),iz = 1,20) / &
     & 0.2146700E+00, 0.2146700E+00, 0.1968500E+00, 0.1987600E+00, &
     & 0.1964300E+00, 0.1988300E+00, 0.2244600E+00, 0.2067100E+00, &
     & 0.2194000E+00, 0.2250000E+00, 0.2319100E+00, 0.2293000E+00, &
     & 0.2286700E+00, 0.2482400E+00, 0.2417100E+00, 0.2518200E+00, &
     & 0.3222124E+00, 0.3186252E+00, 0.2902564E+00, 0.2902564E+00 /
      data (ref_adm(11,iz,23,11),iz = 1,20) / &
     & 0.2025300E+00, 0.2025300E+00, 0.2115400E+00, 0.1993600E+00, &
     & 0.2013800E+00, 0.2090900E+00, 0.2131300E+00, 0.2203700E+00, &
     & 0.2227000E+00, 0.2241200E+00, 0.2382100E+00, 0.2380700E+00, &
     & 0.2390000E+00, 0.2469900E+00, 0.2473200E+00, 0.2491900E+00, &
     & 0.2634600E+00, 0.3116739E+00, 0.2876031E+00, 0.2876031E+00 /
      data (ref_adm(11,iz,24,11),iz = 1,20) / &
     & 0.2030900E+00, 0.2030900E+00, 0.2007400E+00, 0.2011000E+00, &
     & 0.2090700E+00, 0.2324900E+00, 0.2258800E+00, 0.2332300E+00, &
     & 0.2223300E+00, 0.2376400E+00, 0.2293100E+00, 0.2338700E+00, &
     & 0.2403600E+00, 0.2461100E+00, 0.2531500E+00, 0.2629600E+00, &
     & 0.2566200E+00, 0.3062026E+00, 0.2853915E+00, 0.2853915E+00 /
      data (ref_adm(11,iz,25,11),iz = 1,20) / &
     & 0.2025800E+00, 0.2025800E+00, 0.2058200E+00, 0.2084600E+00, &
     & 0.2137400E+00, 0.2163100E+00, 0.2243600E+00, 0.2322200E+00, &
     & 0.2385900E+00, 0.2389300E+00, 0.2350300E+00, 0.2372200E+00, &
     & 0.2524700E+00, 0.2494100E+00, 0.2540900E+00, 0.2551900E+00, &
     & 0.2632700E+00, 0.2764800E+00, 0.2841420E+00, 0.2841420E+00 /
      data (ref_adm(11,iz,26,11),iz = 1,20) / &
     & 0.1988000E+00, 0.1988000E+00, 0.1955000E+00, 0.2070700E+00, &
     & 0.2111400E+00, 0.2249900E+00, 0.2281800E+00, 0.2227400E+00, &
     & 0.2318800E+00, 0.2345200E+00, 0.2410500E+00, 0.2579000E+00, &
     & 0.2611300E+00, 0.2646000E+00, 0.2622500E+00, 0.2689300E+00, &
     & 0.2683100E+00, 0.2758300E+00, 0.2837697E+00, 0.2837697E+00 /
      data (ref_adm(11,iz,27,11),iz = 1,20) / &
     & 0.2042900E+00, 0.2042900E+00, 0.2092700E+00, 0.2177600E+00, &
     & 0.2357700E+00, 0.2257900E+00, 0.2470100E+00, 0.2502700E+00, &
     & 0.2576600E+00, 0.2608700E+00, 0.2605000E+00, 0.2634800E+00, &
     & 0.2622800E+00, 0.2728000E+00, 0.2779900E+00, 0.2782400E+00, &
     & 0.3022400E+00, 0.2888400E+00, 0.2787700E+00, 0.2787700E+00 /
      data (ref_adm(11,iz,28,11),iz = 1,20) / &
     & 0.2046800E+00, 0.2046800E+00, 0.2043500E+00, 0.2055900E+00, &
     & 0.2396700E+00, 0.2398600E+00, 0.2196200E+00, 0.2478700E+00, &
     & 0.2472800E+00, 0.2686900E+00, 0.2670200E+00, 0.2754300E+00, &
     & 0.2896700E+00, 0.2898400E+00, 0.2856800E+00, 0.2995600E+00, &
     & 0.3019000E+00, 0.2908900E+00, 0.2579200E+00, 0.2579200E+00 /
      data (ref_adm(11,iz,29,11),iz = 1,20) / &
     & 0.2033300E+00, 0.2033300E+00, 0.1939100E+00, 0.1937200E+00, &
     & 0.2160200E+00, 0.2417600E+00, 0.2261600E+00, 0.2179200E+00, &
     & 0.2633000E+00, 0.2666700E+00, 0.2709100E+00, 0.2660500E+00, &
     & 0.2847000E+00, 0.2912100E+00, 0.2961500E+00, 0.3076500E+00, &
     & 0.3134000E+00, 0.3178200E+00, 0.2615100E+00, 0.2615100E+00 /
      data (ref_adm(11,iz,30,11),iz = 1,20) / &
     & 0.2019400E+00, 0.2019400E+00, 0.2086000E+00, 0.2264700E+00, &
     & 0.2234300E+00, 0.2270300E+00, 0.2315100E+00, 0.2383600E+00, &
     & 0.2446400E+00, 0.2584100E+00, 0.2637900E+00, 0.2687000E+00, &
     & 0.2903600E+00, 0.2892300E+00, 0.3060900E+00, 0.3051000E+00, &
     & 0.3168800E+00, 0.3257000E+00, 0.2685800E+00, 0.2685800E+00 /
      data (ref_adm(11,iz,31,11),iz = 1,20) / &
     & 0.2071100E+00, 0.2071100E+00, 0.2158200E+00, 0.2173000E+00, &
     & 0.2229800E+00, 0.2171700E+00, 0.2432000E+00, 0.2489300E+00, &
     & 0.2745500E+00, 0.2653300E+00, 0.2722900E+00, 0.2865900E+00, &
     & 0.3072000E+00, 0.3002400E+00, 0.3034300E+00, 0.3149600E+00, &
     & 0.3263200E+00, 0.3272200E+00, 0.2827900E+00, 0.2827900E+00 /
      data (ref_adm(11,iz,32,11),iz = 1,20) / &
     & 0.2056100E+00, 0.2056100E+00, 0.2152400E+00, 0.2195700E+00, &
     & 0.2230300E+00, 0.2343600E+00, 0.2501600E+00, 0.2613900E+00, &
     & 0.2677900E+00, 0.2705000E+00, 0.2806400E+00, 0.2909300E+00, &
     & 0.3071100E+00, 0.3217000E+00, 0.3285200E+00, 0.3216500E+00, &
     & 0.3272400E+00, 0.3260900E+00, 0.2822700E+00, 0.2822700E+00 /
      data (ref_adm(11,iz,33,11),iz = 1,20) / &
     & 0.2179200E+00, 0.2179200E+00, 0.2353500E+00, 0.2389000E+00, &
     & 0.2578300E+00, 0.2420300E+00, 0.2615600E+00, 0.2574600E+00, &
     & 0.2665900E+00, 0.2740600E+00, 0.2919000E+00, 0.2997500E+00, &
     & 0.3148500E+00, 0.3190800E+00, 0.3230100E+00, 0.3271600E+00, &
     & 0.3323900E+00, 0.3259100E+00, 0.2735200E+00, 0.2735200E+00 /
      data (ref_adm(11,iz,34,11),iz = 1,20) / &
     & 0.2068700E+00, 0.2068700E+00, 0.2026700E+00, 0.2329600E+00, &
     & 0.2424800E+00, 0.2291000E+00, 0.2444400E+00, 0.2640100E+00, &
     & 0.2673000E+00, 0.2881500E+00, 0.2989200E+00, 0.3183100E+00, &
     & 0.3377200E+00, 0.3349000E+00, 0.3433900E+00, 0.3475800E+00, &
     & 0.3459300E+00, 0.3360700E+00, 0.3000300E+00, 0.3000300E+00 /
      data (ref_adm(11,iz,35,11),iz = 1,20) / &
     & 0.2064900E+00, 0.2064900E+00, 0.2009800E+00, 0.2275000E+00, &
     & 0.2211100E+00, 0.2294500E+00, 0.2398600E+00, 0.2636300E+00, &
     & 0.2736900E+00, 0.2980400E+00, 0.3251200E+00, 0.3382000E+00, &
     & 0.3310000E+00, 0.3382200E+00, 0.3370600E+00, 0.3515400E+00, &
     & 0.3476700E+00, 0.3323300E+00, 0.2914500E+00, 0.2914500E+00 /
      data (ref_adm(11,iz,36,11),iz = 1,20) / &
     & 0.2125200E+00, 0.2125200E+00, 0.2130000E+00, 0.2228300E+00, &
     & 0.2151700E+00, 0.2321000E+00, 0.2245400E+00, 0.2538500E+00, &
     & 0.2789700E+00, 0.2792700E+00, 0.3225800E+00, 0.3407000E+00, &
     & 0.3433900E+00, 0.3493800E+00, 0.3603700E+00, 0.3566100E+00, &
     & 0.3628600E+00, 0.3359400E+00, 0.2649500E+00, 0.2649500E+00 /
      data (ref_adm(11,iz,37,11),iz = 1,20) / &
     & 0.2104600E+00, 0.2104600E+00, 0.2112200E+00, 0.2222800E+00, &
     & 0.2147400E+00, 0.2337100E+00, 0.2326000E+00, 0.2446300E+00, &
     & 0.2846200E+00, 0.3171800E+00, 0.3450900E+00, 0.3600000E+00, &
     & 0.3471000E+00, 0.3539700E+00, 0.3645900E+00, 0.3588200E+00, &
     & 0.3508200E+00, 0.3653800E+00, 0.3083538E+00, 0.3083538E+00 /
      data (ref_adm(11,iz,38,11),iz = 1,20) / &
     & 0.2104600E+00, 0.2104600E+00, 0.2112200E+00, 0.2222800E+00, &
     & 0.2147400E+00, 0.2337100E+00, 0.2326000E+00, 0.2446300E+00, &
     & 0.2846200E+00, 0.3171800E+00, 0.3450900E+00, 0.3600000E+00, &
     & 0.3471000E+00, 0.3539700E+00, 0.3645900E+00, 0.3588200E+00, &
     & 0.3508200E+00, 0.3653800E+00, 0.3083538E+00, 0.3083538E+00 /
! Solar Zenith Angle 55.0 Albedo  0.2526714E+00
      data (ref_adm(11,iz, 1,12),iz = 1,20) / &
     & 0.2098700E+00, 0.2098700E+00, 0.2064300E+00, 0.1996300E+00, &
     & 0.1959500E+00, 0.1998800E+00, 0.2025900E+00, 0.2042000E+00, &
     & 0.2153800E+00, 0.2190600E+00, 0.2435200E+00, 0.2590000E+00, &
     & 0.3078900E+00, 0.3309700E+00, 0.3303900E+00, 0.3531700E+00, &
     & 0.4221300E+00, 0.4496600E+00, 0.4865700E+00, 0.4865700E+00 /
      data (ref_adm(11,iz, 2,12),iz = 1,20) / &
     & 0.2098700E+00, 0.2098700E+00, 0.2064300E+00, 0.1996300E+00, &
     & 0.1959500E+00, 0.1998800E+00, 0.2025900E+00, 0.2042000E+00, &
     & 0.2153800E+00, 0.2190600E+00, 0.2435200E+00, 0.2590000E+00, &
     & 0.3078900E+00, 0.3309700E+00, 0.3303900E+00, 0.3531700E+00, &
     & 0.4221300E+00, 0.4496600E+00, 0.4865700E+00, 0.4865700E+00 /
      data (ref_adm(11,iz, 3,12),iz = 1,20) / &
     & 0.2098400E+00, 0.2098400E+00, 0.2062600E+00, 0.2068800E+00, &
     & 0.1973100E+00, 0.1998600E+00, 0.1916700E+00, 0.2071100E+00, &
     & 0.2089500E+00, 0.2349500E+00, 0.2254900E+00, 0.2522900E+00, &
     & 0.2795900E+00, 0.2968700E+00, 0.3047000E+00, 0.3399400E+00, &
     & 0.4202800E+00, 0.4823000E+00, 0.4948300E+00, 0.4948300E+00 /
      data (ref_adm(11,iz, 4,12),iz = 1,20) / &
     & 0.2072100E+00, 0.2072100E+00, 0.2045800E+00, 0.1975100E+00, &
     & 0.2050600E+00, 0.1918900E+00, 0.1954200E+00, 0.2011500E+00, &
     & 0.2199800E+00, 0.2183700E+00, 0.2318100E+00, 0.2390400E+00, &
     & 0.2785600E+00, 0.2933500E+00, 0.3145900E+00, 0.3451300E+00, &
     & 0.3969700E+00, 0.4683400E+00, 0.4699000E+00, 0.4699000E+00 /
      data (ref_adm(11,iz, 5,12),iz = 1,20) / &
     & 0.2050100E+00, 0.2050100E+00, 0.2146700E+00, 0.2077500E+00, &
     & 0.2017500E+00, 0.1952300E+00, 0.2038900E+00, 0.2075600E+00, &
     & 0.2170500E+00, 0.2191500E+00, 0.2271800E+00, 0.2359400E+00, &
     & 0.2539500E+00, 0.2672000E+00, 0.3124200E+00, 0.3264100E+00, &
     & 0.3632600E+00, 0.4142900E+00, 0.5016800E+00, 0.5016800E+00 /
      data (ref_adm(11,iz, 6,12),iz = 1,20) / &
     & 0.1991300E+00, 0.1991300E+00, 0.2026000E+00, 0.1992100E+00, &
     & 0.2035300E+00, 0.2049700E+00, 0.2023700E+00, 0.2179800E+00, &
     & 0.2204100E+00, 0.2220200E+00, 0.2327500E+00, 0.2540500E+00, &
     & 0.2727600E+00, 0.2884000E+00, 0.3031700E+00, 0.3286500E+00, &
     & 0.3663100E+00, 0.4228500E+00, 0.4522300E+00, 0.4522300E+00 /
      data (ref_adm(11,iz, 7,12),iz = 1,20) / &
     & 0.1988000E+00, 0.1988000E+00, 0.1999300E+00, 0.1964000E+00, &
     & 0.1953400E+00, 0.1968100E+00, 0.2004500E+00, 0.1974100E+00, &
     & 0.1997600E+00, 0.2119400E+00, 0.2165700E+00, 0.2208200E+00, &
     & 0.2290400E+00, 0.2424700E+00, 0.2756700E+00, 0.2832800E+00, &
     & 0.3259100E+00, 0.3723600E+00, 0.3833300E+00, 0.3833300E+00 /
      data (ref_adm(11,iz, 8,12),iz = 1,20) / &
     & 0.2079200E+00, 0.2079200E+00, 0.2107200E+00, 0.1996600E+00, &
     & 0.2094100E+00, 0.2133300E+00, 0.2069100E+00, 0.2114200E+00, &
     & 0.2328200E+00, 0.2344500E+00, 0.2504200E+00, 0.2526800E+00, &
     & 0.2492400E+00, 0.2737500E+00, 0.3014800E+00, 0.3319100E+00, &
     & 0.3544300E+00, 0.3766700E+00, 0.3628400E+00, 0.3628400E+00 /
      data (ref_adm(11,iz, 9,12),iz = 1,20) / &
     & 0.1993700E+00, 0.1993700E+00, 0.1918800E+00, 0.1869000E+00, &
     & 0.2016900E+00, 0.1964100E+00, 0.1914700E+00, 0.1944100E+00, &
     & 0.2150100E+00, 0.2151500E+00, 0.2209500E+00, 0.2430800E+00, &
     & 0.2456700E+00, 0.2479100E+00, 0.2683300E+00, 0.2868700E+00, &
     & 0.3031900E+00, 0.3334100E+00, 0.3573400E+00, 0.3573400E+00 /
      data (ref_adm(11,iz,10,12),iz = 1,20) / &
     & 0.1970400E+00, 0.1970400E+00, 0.1926700E+00, 0.1859300E+00, &
     & 0.1943200E+00, 0.1853200E+00, 0.1910500E+00, 0.2003700E+00, &
     & 0.1963000E+00, 0.2011600E+00, 0.2155000E+00, 0.2256300E+00, &
     & 0.2453500E+00, 0.2465000E+00, 0.2810500E+00, 0.2968600E+00, &
     & 0.3167500E+00, 0.3409900E+00, 0.3306100E+00, 0.3306100E+00 /
      data (ref_adm(11,iz,11,12),iz = 1,20) / &
     & 0.2001100E+00, 0.2001100E+00, 0.1992900E+00, 0.1987500E+00, &
     & 0.1944700E+00, 0.1953100E+00, 0.1997100E+00, 0.2024400E+00, &
     & 0.2119100E+00, 0.2029900E+00, 0.2127500E+00, 0.2325300E+00, &
     & 0.2317800E+00, 0.2400700E+00, 0.2672300E+00, 0.2799500E+00, &
     & 0.3016500E+00, 0.3248200E+00, 0.2984300E+00, 0.2984300E+00 /
      data (ref_adm(11,iz,12,12),iz = 1,20) / &
     & 0.2023400E+00, 0.2023400E+00, 0.2304000E+00, 0.1949700E+00, &
     & 0.1989000E+00, 0.1854200E+00, 0.1954400E+00, 0.1910400E+00, &
     & 0.1985200E+00, 0.1987400E+00, 0.2183100E+00, 0.2238400E+00, &
     & 0.2320000E+00, 0.2356100E+00, 0.2531400E+00, 0.2616000E+00, &
     & 0.2931600E+00, 0.3032100E+00, 0.2926700E+00, 0.2926700E+00 /
      data (ref_adm(11,iz,13,12),iz = 1,20) / &
     & 0.2083600E+00, 0.2083600E+00, 0.2186700E+00, 0.2067300E+00, &
     & 0.2030900E+00, 0.1990500E+00, 0.2132600E+00, 0.2063000E+00, &
     & 0.1995600E+00, 0.2153400E+00, 0.2209000E+00, 0.2264100E+00, &
     & 0.2368600E+00, 0.2376200E+00, 0.2551500E+00, 0.2535500E+00, &
     & 0.2806100E+00, 0.2961900E+00, 0.2734400E+00, 0.2734400E+00 /
      data (ref_adm(11,iz,14,12),iz = 1,20) / &
     & 0.2069900E+00, 0.2069900E+00, 0.1960600E+00, 0.1961300E+00, &
     & 0.2003100E+00, 0.1981200E+00, 0.2013000E+00, 0.1985600E+00, &
     & 0.2064100E+00, 0.2092500E+00, 0.2095200E+00, 0.2231200E+00, &
     & 0.2385800E+00, 0.2447500E+00, 0.2498600E+00, 0.2583700E+00, &
     & 0.2800100E+00, 0.2897100E+00, 0.2823600E+00, 0.2823600E+00 /
      data (ref_adm(11,iz,15,12),iz = 1,20) / &
     & 0.2028500E+00, 0.2028500E+00, 0.2009100E+00, 0.1984000E+00, &
     & 0.2004300E+00, 0.1996200E+00, 0.2009800E+00, 0.2009700E+00, &
     & 0.2064300E+00, 0.2069800E+00, 0.2097500E+00, 0.2148900E+00, &
     & 0.2260300E+00, 0.2389100E+00, 0.2427200E+00, 0.2529900E+00, &
     & 0.2761300E+00, 0.2955500E+00, 0.2847000E+00, 0.2847000E+00 /
      data (ref_adm(11,iz,16,12),iz = 1,20) / &
     & 0.2042600E+00, 0.2042600E+00, 0.2062200E+00, 0.2051600E+00, &
     & 0.1959000E+00, 0.2067000E+00, 0.2056300E+00, 0.2196500E+00, &
     & 0.2092000E+00, 0.2126600E+00, 0.2128700E+00, 0.2132900E+00, &
     & 0.2245400E+00, 0.2371600E+00, 0.2458400E+00, 0.2564900E+00, &
     & 0.2589500E+00, 0.2809300E+00, 0.3190093E+00, 0.3190093E+00 /
      data (ref_adm(11,iz,17,12),iz = 1,20) / &
     & 0.1982600E+00, 0.1982600E+00, 0.1980600E+00, 0.1880000E+00, &
     & 0.2085100E+00, 0.2061800E+00, 0.2106400E+00, 0.2178700E+00, &
     & 0.2184400E+00, 0.2094100E+00, 0.2206700E+00, 0.2294900E+00, &
     & 0.2284900E+00, 0.2465500E+00, 0.2390300E+00, 0.2487300E+00, &
     & 0.2829500E+00, 0.3010400E+00, 0.3115834E+00, 0.3115834E+00 /
      data (ref_adm(11,iz,18,12),iz = 1,20) / &
     & 0.2060000E+00, 0.2060000E+00, 0.2110300E+00, 0.2072000E+00, &
     & 0.1915400E+00, 0.2005600E+00, 0.2188900E+00, 0.2134900E+00, &
     & 0.2194300E+00, 0.2062900E+00, 0.2185900E+00, 0.2314300E+00, &
     & 0.2305500E+00, 0.2394100E+00, 0.2403900E+00, 0.2538700E+00, &
     & 0.2908300E+00, 0.2967162E+00, 0.2981068E+00, 0.2981068E+00 /
      data (ref_adm(11,iz,19,12),iz = 1,20) / &
     & 0.1982500E+00, 0.1982500E+00, 0.2089800E+00, 0.2108500E+00, &
     & 0.2089500E+00, 0.2057100E+00, 0.2144100E+00, 0.2186100E+00, &
     & 0.2192100E+00, 0.2086700E+00, 0.2353500E+00, 0.2403600E+00, &
     & 0.2405200E+00, 0.2399600E+00, 0.2445100E+00, 0.2560400E+00, &
     & 0.2401200E+00, 0.2941977E+00, 0.2938675E+00, 0.2938675E+00 /
      data (ref_adm(11,iz,20,12),iz = 1,20) / &
     & 0.2002700E+00, 0.2002700E+00, 0.1966600E+00, 0.1927300E+00, &
     & 0.2076900E+00, 0.2096300E+00, 0.2121500E+00, 0.2084700E+00, &
     & 0.2088400E+00, 0.2071700E+00, 0.2218800E+00, 0.2262200E+00, &
     & 0.2286100E+00, 0.2430300E+00, 0.2413900E+00, 0.2541900E+00, &
     & 0.2780611E+00, 0.2921749E+00, 0.2914807E+00, 0.2914807E+00 /
      data (ref_adm(11,iz,21,12),iz = 1,20) / &
     & 0.2101300E+00, 0.2101300E+00, 0.1955400E+00, 0.2034300E+00, &
     & 0.2111300E+00, 0.2221000E+00, 0.2159400E+00, 0.2213200E+00, &
     & 0.2121500E+00, 0.2192000E+00, 0.2273500E+00, 0.2349200E+00, &
     & 0.2336500E+00, 0.2341300E+00, 0.2493000E+00, 0.2738700E+00, &
     & 0.2776210E+00, 0.2906764E+00, 0.2898054E+00, 0.2898054E+00 /
      data (ref_adm(11,iz,22,12),iz = 1,20) / &
     & 0.2106000E+00, 0.2106000E+00, 0.2177000E+00, 0.2043200E+00, &
     & 0.2158300E+00, 0.2268100E+00, 0.2178500E+00, 0.2088500E+00, &
     & 0.2168700E+00, 0.2216000E+00, 0.2313600E+00, 0.2365300E+00, &
     & 0.2446500E+00, 0.2432800E+00, 0.2553800E+00, 0.2630400E+00, &
     & 0.3501636E+00, 0.3486411E+00, 0.3210028E+00, 0.3210028E+00 /
      data (ref_adm(11,iz,23,12),iz = 1,20) / &
     & 0.2118900E+00, 0.2118900E+00, 0.2215800E+00, 0.2194600E+00, &
     & 0.2173900E+00, 0.2241800E+00, 0.2083100E+00, 0.2175900E+00, &
     & 0.2222000E+00, 0.2369300E+00, 0.2369500E+00, 0.2487800E+00, &
     & 0.2647500E+00, 0.2622500E+00, 0.2811400E+00, 0.2899900E+00, &
     & 0.3427805E+00, 0.3400629E+00, 0.3178509E+00, 0.3178509E+00 /
      data (ref_adm(11,iz,24,12),iz = 1,20) / &
     & 0.2040000E+00, 0.2040000E+00, 0.1999700E+00, 0.2138500E+00, &
     & 0.2086800E+00, 0.2144600E+00, 0.2175200E+00, 0.2223700E+00, &
     & 0.2243800E+00, 0.2361400E+00, 0.2333600E+00, 0.2511700E+00, &
     & 0.2583000E+00, 0.2612200E+00, 0.2773500E+00, 0.2961200E+00, &
     & 0.2938200E+00, 0.3335218E+00, 0.3155449E+00, 0.3155449E+00 /
      data (ref_adm(11,iz,25,12),iz = 1,20) / &
     & 0.2048200E+00, 0.2048200E+00, 0.2086600E+00, 0.2048500E+00, &
     & 0.2146000E+00, 0.2150500E+00, 0.2188000E+00, 0.2274200E+00, &
     & 0.2347400E+00, 0.2444000E+00, 0.2519900E+00, 0.2627900E+00, &
     & 0.2679700E+00, 0.2741500E+00, 0.2883600E+00, 0.3062700E+00, &
     & 0.3059500E+00, 0.2938900E+00, 0.3146983E+00, 0.3146983E+00 /
      data (ref_adm(11,iz,26,12),iz = 1,20) / &
     & 0.2020900E+00, 0.2020900E+00, 0.2133700E+00, 0.2171700E+00, &
     & 0.2190200E+00, 0.2164200E+00, 0.2259900E+00, 0.2312900E+00, &
     & 0.2289500E+00, 0.2342600E+00, 0.2365900E+00, 0.2464300E+00, &
     & 0.2572900E+00, 0.2689200E+00, 0.2762300E+00, 0.3042300E+00, &
     & 0.3133200E+00, 0.3272400E+00, 0.3146783E+00, 0.3146783E+00 /
      data (ref_adm(11,iz,27,12),iz = 1,20) / &
     & 0.2095600E+00, 0.2095600E+00, 0.2156900E+00, 0.2162800E+00, &
     & 0.2177600E+00, 0.2346800E+00, 0.2335900E+00, 0.2443600E+00, &
     & 0.2486500E+00, 0.2479600E+00, 0.2564800E+00, 0.2677000E+00, &
     & 0.2789900E+00, 0.2798400E+00, 0.2938100E+00, 0.3069100E+00, &
     & 0.3243900E+00, 0.3329400E+00, 0.2856100E+00, 0.2856100E+00 /
      data (ref_adm(11,iz,28,12),iz = 1,20) / &
     & 0.2121400E+00, 0.2121400E+00, 0.2121300E+00, 0.2195600E+00, &
     & 0.2201700E+00, 0.2306800E+00, 0.2372900E+00, 0.2459400E+00, &
     & 0.2582000E+00, 0.2549400E+00, 0.2645500E+00, 0.2776700E+00, &
     & 0.2848200E+00, 0.2980500E+00, 0.3134900E+00, 0.3171200E+00, &
     & 0.3303600E+00, 0.3390100E+00, 0.2819100E+00, 0.2819100E+00 /
      data (ref_adm(11,iz,29,12),iz = 1,20) / &
     & 0.2065400E+00, 0.2065400E+00, 0.2152900E+00, 0.2271300E+00, &
     & 0.2201100E+00, 0.2231700E+00, 0.2540900E+00, 0.2617900E+00, &
     & 0.2571200E+00, 0.2711700E+00, 0.2704800E+00, 0.2827800E+00, &
     & 0.2999400E+00, 0.3090100E+00, 0.3282700E+00, 0.3393200E+00, &
     & 0.3436900E+00, 0.3389800E+00, 0.2981900E+00, 0.2981900E+00 /
      data (ref_adm(11,iz,30,12),iz = 1,20) / &
     & 0.2005000E+00, 0.2005000E+00, 0.2143500E+00, 0.2280600E+00, &
     & 0.2532900E+00, 0.2324500E+00, 0.2473400E+00, 0.2459500E+00, &
     & 0.2639700E+00, 0.2715400E+00, 0.2814200E+00, 0.2911000E+00, &
     & 0.3063600E+00, 0.3149200E+00, 0.3244400E+00, 0.3457500E+00, &
     & 0.3548000E+00, 0.3489400E+00, 0.3033300E+00, 0.3033300E+00 /
      data (ref_adm(11,iz,31,12),iz = 1,20) / &
     & 0.2068700E+00, 0.2068700E+00, 0.2341600E+00, 0.2297100E+00, &
     & 0.2408500E+00, 0.2370100E+00, 0.2440100E+00, 0.2527300E+00, &
     & 0.2750300E+00, 0.2784900E+00, 0.2995600E+00, 0.3047900E+00, &
     & 0.3139000E+00, 0.3336600E+00, 0.3378300E+00, 0.3539700E+00, &
     & 0.3712800E+00, 0.3623600E+00, 0.3052100E+00, 0.3052100E+00 /
      data (ref_adm(11,iz,32,12),iz = 1,20) / &
     & 0.2115100E+00, 0.2115100E+00, 0.2158300E+00, 0.2214500E+00, &
     & 0.2242600E+00, 0.2208200E+00, 0.2373400E+00, 0.2603200E+00, &
     & 0.2647400E+00, 0.2811300E+00, 0.2893400E+00, 0.3055500E+00, &
     & 0.3209100E+00, 0.3363400E+00, 0.3524500E+00, 0.3716500E+00, &
     & 0.3725600E+00, 0.3597000E+00, 0.3094100E+00, 0.3094100E+00 /
      data (ref_adm(11,iz,33,12),iz = 1,20) / &
     & 0.2101900E+00, 0.2101900E+00, 0.2196500E+00, 0.2203600E+00, &
     & 0.2275700E+00, 0.2393800E+00, 0.2482500E+00, 0.2623800E+00, &
     & 0.2789700E+00, 0.2871000E+00, 0.3092200E+00, 0.3277200E+00, &
     & 0.3377600E+00, 0.3586000E+00, 0.3766800E+00, 0.3914500E+00, &
     & 0.3939400E+00, 0.3795500E+00, 0.3233500E+00, 0.3233500E+00 /
      data (ref_adm(11,iz,34,12),iz = 1,20) / &
     & 0.2059200E+00, 0.2059200E+00, 0.2143600E+00, 0.2233600E+00, &
     & 0.2412400E+00, 0.2306400E+00, 0.2451000E+00, 0.2438500E+00, &
     & 0.2716400E+00, 0.2944500E+00, 0.3069800E+00, 0.3258800E+00, &
     & 0.3514300E+00, 0.3638000E+00, 0.3766100E+00, 0.3809500E+00, &
     & 0.3777100E+00, 0.3839200E+00, 0.3351700E+00, 0.3351700E+00 /
      data (ref_adm(11,iz,35,12),iz = 1,20) / &
     & 0.2123900E+00, 0.2123900E+00, 0.2156300E+00, 0.2229900E+00, &
     & 0.2385600E+00, 0.2465900E+00, 0.2479100E+00, 0.2620000E+00, &
     & 0.2717200E+00, 0.2954700E+00, 0.3169200E+00, 0.3285100E+00, &
     & 0.3546500E+00, 0.3640300E+00, 0.3839000E+00, 0.3897700E+00, &
     & 0.3982700E+00, 0.3838600E+00, 0.3232900E+00, 0.3232900E+00 /
      data (ref_adm(11,iz,36,12),iz = 1,20) / &
     & 0.2122300E+00, 0.2122300E+00, 0.2249700E+00, 0.2312200E+00, &
     & 0.2367900E+00, 0.2491800E+00, 0.2597700E+00, 0.2613500E+00, &
     & 0.2699100E+00, 0.2968300E+00, 0.3215800E+00, 0.3455600E+00, &
     & 0.3754800E+00, 0.3765800E+00, 0.3939300E+00, 0.4049100E+00, &
     & 0.3957600E+00, 0.3978800E+00, 0.3420800E+00, 0.3420800E+00 /
      data (ref_adm(11,iz,37,12),iz = 1,20) / &
     & 0.2095700E+00, 0.2095700E+00, 0.2201100E+00, 0.2368800E+00, &
     & 0.2391700E+00, 0.2417600E+00, 0.2519900E+00, 0.2669000E+00, &
     & 0.2735700E+00, 0.2994500E+00, 0.3254000E+00, 0.3621400E+00, &
     & 0.4022100E+00, 0.3894800E+00, 0.4051700E+00, 0.3992900E+00, &
     & 0.4125900E+00, 0.4019900E+00, 0.3610705E+00, 0.3610705E+00 /
      data (ref_adm(11,iz,38,12),iz = 1,20) / &
     & 0.2095700E+00, 0.2095700E+00, 0.2201100E+00, 0.2368800E+00, &
     & 0.2391700E+00, 0.2417600E+00, 0.2519900E+00, 0.2669000E+00, &
     & 0.2735700E+00, 0.2994500E+00, 0.3254000E+00, 0.3621400E+00, &
     & 0.4022100E+00, 0.3894800E+00, 0.4051700E+00, 0.3992900E+00, &
     & 0.4125900E+00, 0.4019900E+00, 0.3610705E+00, 0.3610705E+00 /
! Solar Zenith Angle 60.0 Albedo  0.2664889E+00
      data (ref_adm(11,iz, 1,13),iz = 1,20) / &
     & 0.2092800E+00, 0.2092800E+00, 0.2052000E+00, 0.1921300E+00, &
     & 0.2012200E+00, 0.1983300E+00, 0.1911200E+00, 0.2179100E+00, &
     & 0.2357500E+00, 0.2505200E+00, 0.2602200E+00, 0.2917500E+00, &
     & 0.3429000E+00, 0.4316500E+00, 0.4520900E+00, 0.5079400E+00, &
     & 0.5665900E+00, 0.6388300E+00, 0.6362400E+00, 0.6362400E+00 /
      data (ref_adm(11,iz, 2,13),iz = 1,20) / &
     & 0.2092800E+00, 0.2092800E+00, 0.2052000E+00, 0.1921300E+00, &
     & 0.2012200E+00, 0.1983300E+00, 0.1911200E+00, 0.2179100E+00, &
     & 0.2357500E+00, 0.2505200E+00, 0.2602200E+00, 0.2917500E+00, &
     & 0.3429000E+00, 0.4316500E+00, 0.4520900E+00, 0.5079400E+00, &
     & 0.5665900E+00, 0.6388300E+00, 0.6362400E+00, 0.6362400E+00 /
      data (ref_adm(11,iz, 3,13),iz = 1,20) / &
     & 0.2209500E+00, 0.2209500E+00, 0.1974600E+00, 0.2044500E+00, &
     & 0.2085000E+00, 0.2051700E+00, 0.2093500E+00, 0.2163600E+00, &
     & 0.2338900E+00, 0.2436700E+00, 0.2451200E+00, 0.2797200E+00, &
     & 0.3158700E+00, 0.3574800E+00, 0.4120900E+00, 0.4636600E+00, &
     & 0.5678000E+00, 0.6329800E+00, 0.6075800E+00, 0.6075800E+00 /
      data (ref_adm(11,iz, 4,13),iz = 1,20) / &
     & 0.2163600E+00, 0.2163600E+00, 0.2047600E+00, 0.2052600E+00, &
     & 0.2005500E+00, 0.2042500E+00, 0.2019400E+00, 0.2203300E+00, &
     & 0.2281600E+00, 0.2353400E+00, 0.2379100E+00, 0.2757000E+00, &
     & 0.3033100E+00, 0.3615900E+00, 0.3998400E+00, 0.4543900E+00, &
     & 0.5350900E+00, 0.6376200E+00, 0.6318000E+00, 0.6318000E+00 /
      data (ref_adm(11,iz, 5,13),iz = 1,20) / &
     & 0.2112300E+00, 0.2112300E+00, 0.1974900E+00, 0.2036200E+00, &
     & 0.2028100E+00, 0.2003600E+00, 0.2106000E+00, 0.2193900E+00, &
     & 0.2410700E+00, 0.2367700E+00, 0.2640000E+00, 0.2551700E+00, &
     & 0.2952600E+00, 0.3274300E+00, 0.3829900E+00, 0.4526300E+00, &
     & 0.5285800E+00, 0.6291600E+00, 0.5975700E+00, 0.5975700E+00 /
      data (ref_adm(11,iz, 6,13),iz = 1,20) / &
     & 0.2062300E+00, 0.2062300E+00, 0.2014300E+00, 0.2028900E+00, &
     & 0.2043300E+00, 0.2057900E+00, 0.2056300E+00, 0.2167100E+00, &
     & 0.2222100E+00, 0.2378900E+00, 0.2592500E+00, 0.2794700E+00, &
     & 0.3115700E+00, 0.3449100E+00, 0.3965400E+00, 0.4707700E+00, &
     & 0.5306900E+00, 0.5787000E+00, 0.5579200E+00, 0.5579200E+00 /
      data (ref_adm(11,iz, 7,13),iz = 1,20) / &
     & 0.2071100E+00, 0.2071100E+00, 0.2071800E+00, 0.2132500E+00, &
     & 0.2082600E+00, 0.2017700E+00, 0.2041900E+00, 0.2100800E+00, &
     & 0.2163800E+00, 0.2194400E+00, 0.2431000E+00, 0.2561200E+00, &
     & 0.2778100E+00, 0.3049700E+00, 0.3450600E+00, 0.3918700E+00, &
     & 0.4793300E+00, 0.5354300E+00, 0.5364900E+00, 0.5364900E+00 /
      data (ref_adm(11,iz, 8,13),iz = 1,20) / &
     & 0.2023600E+00, 0.2023600E+00, 0.2028900E+00, 0.2054000E+00, &
     & 0.1937800E+00, 0.2018100E+00, 0.2053400E+00, 0.2120300E+00, &
     & 0.2260400E+00, 0.2410400E+00, 0.2467600E+00, 0.2536600E+00, &
     & 0.2786800E+00, 0.3104200E+00, 0.3405900E+00, 0.3811400E+00, &
     & 0.4184500E+00, 0.4470600E+00, 0.4277000E+00, 0.4277000E+00 /
      data (ref_adm(11,iz, 9,13),iz = 1,20) / &
     & 0.2016000E+00, 0.2016000E+00, 0.2003900E+00, 0.1887600E+00, &
     & 0.2007400E+00, 0.2049200E+00, 0.2063000E+00, 0.2115100E+00, &
     & 0.2170000E+00, 0.2255100E+00, 0.2491100E+00, 0.2547300E+00, &
     & 0.2705000E+00, 0.2928500E+00, 0.3279300E+00, 0.3592800E+00, &
     & 0.4256500E+00, 0.4337900E+00, 0.4356000E+00, 0.4356000E+00 /
      data (ref_adm(11,iz,10,13),iz = 1,20) / &
     & 0.2033300E+00, 0.2033300E+00, 0.1926400E+00, 0.1924000E+00, &
     & 0.1910500E+00, 0.2002800E+00, 0.2095700E+00, 0.1986600E+00, &
     & 0.2096200E+00, 0.2240000E+00, 0.2270800E+00, 0.2477700E+00, &
     & 0.2607900E+00, 0.2713200E+00, 0.2894600E+00, 0.3253700E+00, &
     & 0.3884500E+00, 0.4118700E+00, 0.4007700E+00, 0.4007700E+00 /
      data (ref_adm(11,iz,11,13),iz = 1,20) / &
     & 0.2071200E+00, 0.2071200E+00, 0.1946400E+00, 0.1961300E+00, &
     & 0.1948000E+00, 0.1966100E+00, 0.1983100E+00, 0.1918600E+00, &
     & 0.2089300E+00, 0.2252000E+00, 0.2361400E+00, 0.2339500E+00, &
     & 0.2538300E+00, 0.2628500E+00, 0.2932400E+00, 0.3227000E+00, &
     & 0.3684500E+00, 0.3881600E+00, 0.3707900E+00, 0.3707900E+00 /
      data (ref_adm(11,iz,12,13),iz = 1,20) / &
     & 0.1946100E+00, 0.1946100E+00, 0.1920300E+00, 0.1924900E+00, &
     & 0.1939400E+00, 0.1927100E+00, 0.1964200E+00, 0.2073000E+00, &
     & 0.2029500E+00, 0.2168000E+00, 0.2249700E+00, 0.2253900E+00, &
     & 0.2511500E+00, 0.2620200E+00, 0.2851600E+00, 0.3174300E+00, &
     & 0.3343400E+00, 0.3694400E+00, 0.3517700E+00, 0.3517700E+00 /
      data (ref_adm(11,iz,13,13),iz = 1,20) / &
     & 0.2010000E+00, 0.2010000E+00, 0.1993100E+00, 0.1978300E+00, &
     & 0.2083800E+00, 0.2047400E+00, 0.2005800E+00, 0.2055000E+00, &
     & 0.2046400E+00, 0.2216500E+00, 0.2261900E+00, 0.2325300E+00, &
     & 0.2579000E+00, 0.2612000E+00, 0.2784600E+00, 0.3029700E+00, &
     & 0.3238700E+00, 0.3412300E+00, 0.3274900E+00, 0.3274900E+00 /
      data (ref_adm(11,iz,14,13),iz = 1,20) / &
     & 0.2120600E+00, 0.2120600E+00, 0.2084400E+00, 0.2101200E+00, &
     & 0.2129700E+00, 0.2117000E+00, 0.2118000E+00, 0.2138500E+00, &
     & 0.2197600E+00, 0.2222600E+00, 0.2265000E+00, 0.2348700E+00, &
     & 0.2483000E+00, 0.2537500E+00, 0.2694200E+00, 0.2958500E+00, &
     & 0.3184500E+00, 0.3143400E+00, 0.2701800E+00, 0.2701800E+00 /
      data (ref_adm(11,iz,15,13),iz = 1,20) / &
     & 0.1993700E+00, 0.1993700E+00, 0.1940400E+00, 0.1902200E+00, &
     & 0.1955500E+00, 0.1949400E+00, 0.1949400E+00, 0.2017000E+00, &
     & 0.2073800E+00, 0.2131900E+00, 0.2172700E+00, 0.2314700E+00, &
     & 0.2479500E+00, 0.2630000E+00, 0.2666400E+00, 0.2807800E+00, &
     & 0.2937100E+00, 0.3191700E+00, 0.2748700E+00, 0.2748700E+00 /
      data (ref_adm(11,iz,16,13),iz = 1,20) / &
     & 0.1958400E+00, 0.1958400E+00, 0.2022200E+00, 0.1915400E+00, &
     & 0.2131200E+00, 0.2098500E+00, 0.1983100E+00, 0.1900300E+00, &
     & 0.2058000E+00, 0.2012200E+00, 0.2089200E+00, 0.2136400E+00, &
     & 0.2217900E+00, 0.2371100E+00, 0.2740500E+00, 0.2859700E+00, &
     & 0.2923600E+00, 0.3286000E+00, 0.3608142E+00, 0.3608142E+00 /
      data (ref_adm(11,iz,17,13),iz = 1,20) / &
     & 0.2044000E+00, 0.2044000E+00, 0.2087200E+00, 0.2112400E+00, &
     & 0.2045300E+00, 0.2094600E+00, 0.2090300E+00, 0.2144100E+00, &
     & 0.2133400E+00, 0.2172800E+00, 0.2179400E+00, 0.2286800E+00, &
     & 0.2403500E+00, 0.2589200E+00, 0.2689900E+00, 0.2853400E+00, &
     & 0.2976000E+00, 0.3814020E+00, 0.3502806E+00, 0.3502806E+00 /
      data (ref_adm(11,iz,18,13),iz = 1,20) / &
     & 0.2035700E+00, 0.2035700E+00, 0.2038300E+00, 0.2190500E+00, &
     & 0.2046300E+00, 0.2197500E+00, 0.2070800E+00, 0.2088500E+00, &
     & 0.2174500E+00, 0.2200900E+00, 0.2218600E+00, 0.2363300E+00, &
     & 0.2403500E+00, 0.2555700E+00, 0.2660400E+00, 0.2743500E+00, &
     & 0.2927900E+00, 0.3184704E+00, 0.3227521E+00, 0.3227521E+00 /
      data (ref_adm(11,iz,19,13),iz = 1,20) / &
     & 0.2099000E+00, 0.2099000E+00, 0.2094600E+00, 0.2072200E+00, &
     & 0.2031400E+00, 0.1990000E+00, 0.2012300E+00, 0.2129100E+00, &
     & 0.2290800E+00, 0.2172100E+00, 0.2300300E+00, 0.2335900E+00, &
     & 0.2382500E+00, 0.2532900E+00, 0.2627800E+00, 0.2816800E+00, &
     & 0.2694300E+00, 0.3150188E+00, 0.3174671E+00, 0.3174671E+00 /
      data (ref_adm(11,iz,20,13),iz = 1,20) / &
     & 0.2046000E+00, 0.2046000E+00, 0.1980100E+00, 0.2186500E+00, &
     & 0.2170000E+00, 0.2155100E+00, 0.1987700E+00, 0.2082000E+00, &
     & 0.2206300E+00, 0.2232300E+00, 0.2320000E+00, 0.2286400E+00, &
     & 0.2554400E+00, 0.2576000E+00, 0.2759500E+00, 0.2496000E+00, &
     & 0.2948524E+00, 0.3126674E+00, 0.3143908E+00, 0.3143908E+00 /
      data (ref_adm(11,iz,21,13),iz = 1,20) / &
     & 0.2109100E+00, 0.2109100E+00, 0.2036400E+00, 0.2052200E+00, &
     & 0.2170100E+00, 0.2095400E+00, 0.2103700E+00, 0.2154900E+00, &
     & 0.2240800E+00, 0.2281900E+00, 0.2258100E+00, 0.2397100E+00, &
     & 0.2529700E+00, 0.2542000E+00, 0.2743500E+00, 0.2829600E+00, &
     & 0.2943015E+00, 0.3108276E+00, 0.3123694E+00, 0.3123694E+00 /
      data (ref_adm(11,iz,22,13),iz = 1,20) / &
     & 0.1990000E+00, 0.1990000E+00, 0.2004900E+00, 0.2037300E+00, &
     & 0.2123400E+00, 0.2096100E+00, 0.2158300E+00, 0.2171600E+00, &
     & 0.2196200E+00, 0.2354800E+00, 0.2340900E+00, 0.2451200E+00, &
     & 0.2492800E+00, 0.2689200E+00, 0.2790400E+00, 0.2829600E+00, &
     & 0.3623613E+00, 0.3622887E+00, 0.3353651E+00, 0.3353651E+00 /
      data (ref_adm(11,iz,23,13),iz = 1,20) / &
     & 0.2040300E+00, 0.2040300E+00, 0.2048100E+00, 0.1959700E+00, &
     & 0.2057900E+00, 0.2080400E+00, 0.2143000E+00, 0.2174300E+00, &
     & 0.2291100E+00, 0.2319300E+00, 0.2455600E+00, 0.2515200E+00, &
     & 0.2583200E+00, 0.2673900E+00, 0.2689200E+00, 0.2977600E+00, &
     & 0.3545904E+00, 0.3529972E+00, 0.3320176E+00, 0.3320176E+00 /
      data (ref_adm(11,iz,24,13),iz = 1,20) / &
     & 0.1948800E+00, 0.1948800E+00, 0.1925200E+00, 0.1977800E+00, &
     & 0.2024300E+00, 0.2074000E+00, 0.2104000E+00, 0.2166200E+00, &
     & 0.2257100E+00, 0.2361700E+00, 0.2515800E+00, 0.2600500E+00, &
     & 0.2588700E+00, 0.2770500E+00, 0.2835700E+00, 0.2988100E+00, &
     & 0.3217300E+00, 0.3459171E+00, 0.3298068E+00, 0.3298068E+00 /
      data (ref_adm(11,iz,25,13),iz = 1,20) / &
     & 0.1974500E+00, 0.1974500E+00, 0.2092100E+00, 0.2137800E+00, &
     & 0.2185500E+00, 0.2222900E+00, 0.2237300E+00, 0.2259300E+00, &
     & 0.2319300E+00, 0.2352200E+00, 0.2472900E+00, 0.2558200E+00, &
     & 0.2651600E+00, 0.2788500E+00, 0.2917300E+00, 0.3254100E+00, &
     & 0.3344800E+00, 0.3167000E+00, 0.3290310E+00, 0.3290310E+00 /
      data (ref_adm(11,iz,26,13),iz = 1,20) / &
     & 0.2084300E+00, 0.2084300E+00, 0.2161000E+00, 0.2124000E+00, &
     & 0.2207600E+00, 0.2223500E+00, 0.2341700E+00, 0.2404900E+00, &
     & 0.2471300E+00, 0.2518000E+00, 0.2605000E+00, 0.2726500E+00, &
     & 0.2781500E+00, 0.2899600E+00, 0.3092700E+00, 0.3291900E+00, &
     & 0.3501100E+00, 0.3597800E+00, 0.3294917E+00, 0.3294917E+00 /
      data (ref_adm(11,iz,27,13),iz = 1,20) / &
     & 0.2049500E+00, 0.2049500E+00, 0.2014500E+00, 0.2113600E+00, &
     & 0.2064400E+00, 0.2097200E+00, 0.2279200E+00, 0.2323800E+00, &
     & 0.2426000E+00, 0.2562600E+00, 0.2599700E+00, 0.2711900E+00, &
     & 0.2889500E+00, 0.3008600E+00, 0.3185700E+00, 0.3299300E+00, &
     & 0.3556300E+00, 0.3614000E+00, 0.3130100E+00, 0.3130100E+00 /
      data (ref_adm(11,iz,28,13),iz = 1,20) / &
     & 0.1996700E+00, 0.1996700E+00, 0.2014800E+00, 0.2066000E+00, &
     & 0.2190500E+00, 0.2184600E+00, 0.2380800E+00, 0.2335100E+00, &
     & 0.2411400E+00, 0.2657600E+00, 0.2814500E+00, 0.2841600E+00, &
     & 0.2933300E+00, 0.3118900E+00, 0.3246900E+00, 0.3476300E+00, &
     & 0.3646500E+00, 0.3673200E+00, 0.3245000E+00, 0.3245000E+00 /
      data (ref_adm(11,iz,29,13),iz = 1,20) / &
     & 0.2027500E+00, 0.2027500E+00, 0.2083100E+00, 0.2044800E+00, &
     & 0.2138100E+00, 0.2268000E+00, 0.2316200E+00, 0.2392200E+00, &
     & 0.2471800E+00, 0.2742300E+00, 0.2841000E+00, 0.3018300E+00, &
     & 0.3104400E+00, 0.3200700E+00, 0.3421000E+00, 0.3645200E+00, &
     & 0.3819000E+00, 0.3814300E+00, 0.3253900E+00, 0.3253900E+00 /
      data (ref_adm(11,iz,30,13),iz = 1,20) / &
     & 0.1952100E+00, 0.1952100E+00, 0.1999300E+00, 0.2030900E+00, &
     & 0.2162800E+00, 0.2227000E+00, 0.2356500E+00, 0.2459100E+00, &
     & 0.2548000E+00, 0.2654000E+00, 0.2946500E+00, 0.3041800E+00, &
     & 0.3218400E+00, 0.3375100E+00, 0.3570400E+00, 0.3758700E+00, &
     & 0.4030200E+00, 0.3868200E+00, 0.3276700E+00, 0.3276700E+00 /
      data (ref_adm(11,iz,31,13),iz = 1,20) / &
     & 0.2050500E+00, 0.2050500E+00, 0.2054500E+00, 0.2082000E+00, &
     & 0.2176000E+00, 0.2278000E+00, 0.2467000E+00, 0.2514900E+00, &
     & 0.2660400E+00, 0.2749300E+00, 0.2879200E+00, 0.3093500E+00, &
     & 0.3331500E+00, 0.3538200E+00, 0.3704200E+00, 0.3795700E+00, &
     & 0.3982100E+00, 0.4013000E+00, 0.3425000E+00, 0.3425000E+00 /
      data (ref_adm(11,iz,32,13),iz = 1,20) / &
     & 0.2104400E+00, 0.2104400E+00, 0.2149700E+00, 0.2209600E+00, &
     & 0.2310700E+00, 0.2371800E+00, 0.2576600E+00, 0.2711000E+00, &
     & 0.2847600E+00, 0.2843300E+00, 0.2934800E+00, 0.3165400E+00, &
     & 0.3351900E+00, 0.3653000E+00, 0.3836800E+00, 0.4034700E+00, &
     & 0.4158000E+00, 0.4098000E+00, 0.3503700E+00, 0.3503700E+00 /
      data (ref_adm(11,iz,33,13),iz = 1,20) / &
     & 0.2052200E+00, 0.2052200E+00, 0.2120600E+00, 0.2149100E+00, &
     & 0.2256100E+00, 0.2379100E+00, 0.2517800E+00, 0.2617300E+00, &
     & 0.2703400E+00, 0.2884600E+00, 0.3048100E+00, 0.3286700E+00, &
     & 0.3477500E+00, 0.3663500E+00, 0.3920200E+00, 0.4120500E+00, &
     & 0.4147700E+00, 0.4166400E+00, 0.3489700E+00, 0.3489700E+00 /
      data (ref_adm(11,iz,34,13),iz = 1,20) / &
     & 0.2019300E+00, 0.2019300E+00, 0.2236600E+00, 0.2251300E+00, &
     & 0.2307600E+00, 0.2343400E+00, 0.2486800E+00, 0.2637800E+00, &
     & 0.2695000E+00, 0.2916000E+00, 0.3077900E+00, 0.3336700E+00, &
     & 0.3495100E+00, 0.3803500E+00, 0.4017000E+00, 0.4241300E+00, &
     & 0.4368000E+00, 0.4263200E+00, 0.3614400E+00, 0.3614400E+00 /
      data (ref_adm(11,iz,35,13),iz = 1,20) / &
     & 0.1995300E+00, 0.1995300E+00, 0.2140600E+00, 0.2214900E+00, &
     & 0.2232600E+00, 0.2353000E+00, 0.2456300E+00, 0.2661700E+00, &
     & 0.2736300E+00, 0.2948200E+00, 0.3157400E+00, 0.3414700E+00, &
     & 0.3591500E+00, 0.3839100E+00, 0.4041000E+00, 0.4213800E+00, &
     & 0.4475500E+00, 0.4318000E+00, 0.3787900E+00, 0.3787900E+00 /
      data (ref_adm(11,iz,36,13),iz = 1,20) / &
     & 0.2146500E+00, 0.2146500E+00, 0.2089500E+00, 0.2243300E+00, &
     & 0.2240000E+00, 0.2414000E+00, 0.2573500E+00, 0.2637300E+00, &
     & 0.2833200E+00, 0.2940800E+00, 0.3222000E+00, 0.3331300E+00, &
     & 0.3761800E+00, 0.4044300E+00, 0.4128500E+00, 0.4295300E+00, &
     & 0.4405300E+00, 0.4468000E+00, 0.3840000E+00, 0.3840000E+00 /
      data (ref_adm(11,iz,37,13),iz = 1,20) / &
     & 0.2077400E+00, 0.2077400E+00, 0.2153000E+00, 0.2150500E+00, &
     & 0.2366100E+00, 0.2483000E+00, 0.2607900E+00, 0.2689500E+00, &
     & 0.2794100E+00, 0.3086300E+00, 0.3195500E+00, 0.3403000E+00, &
     & 0.3781200E+00, 0.4224200E+00, 0.4267100E+00, 0.4290400E+00, &
     & 0.4549400E+00, 0.4508600E+00, 0.3579400E+00, 0.3579400E+00 /
      data (ref_adm(11,iz,38,13),iz = 1,20) / &
     & 0.2077400E+00, 0.2077400E+00, 0.2153000E+00, 0.2150500E+00, &
     & 0.2366100E+00, 0.2483000E+00, 0.2607900E+00, 0.2689500E+00, &
     & 0.2794100E+00, 0.3086300E+00, 0.3195500E+00, 0.3403000E+00, &
     & 0.3781200E+00, 0.4224200E+00, 0.4267100E+00, 0.4290400E+00, &
     & 0.4549400E+00, 0.4508600E+00, 0.3579400E+00, 0.3579400E+00 /
! Solar Zenith Angle 65.0 Albedo  0.2724216E+00
      data (ref_adm(11,iz, 1,14),iz = 1,20) / &
     & 0.2039700E+00, 0.2039700E+00, 0.1935900E+00, 0.1803200E+00, &
     & 0.1832900E+00, 0.2041000E+00, 0.1933900E+00, 0.2107300E+00, &
     & 0.2308800E+00, 0.2491200E+00, 0.2679900E+00, 0.3178500E+00, &
     & 0.3630100E+00, 0.4996300E+00, 0.6140700E+00, 0.7355300E+00, &
     & 0.7668100E+00, 0.7470800E+00, 0.6234851E+00, 0.6234851E+00 /
      data (ref_adm(11,iz, 2,14),iz = 1,20) / &
     & 0.2039700E+00, 0.2039700E+00, 0.1935900E+00, 0.1803200E+00, &
     & 0.1832900E+00, 0.2041000E+00, 0.1933900E+00, 0.2107300E+00, &
     & 0.2308800E+00, 0.2491200E+00, 0.2679900E+00, 0.3178500E+00, &
     & 0.3630100E+00, 0.4996300E+00, 0.6140700E+00, 0.7355300E+00, &
     & 0.7668100E+00, 0.7470800E+00, 0.6234851E+00, 0.6234851E+00 /
      data (ref_adm(11,iz, 3,14),iz = 1,20) / &
     & 0.1930500E+00, 0.1930500E+00, 0.1987100E+00, 0.1840300E+00, &
     & 0.1844300E+00, 0.1910600E+00, 0.2020100E+00, 0.2217300E+00, &
     & 0.2189800E+00, 0.2400000E+00, 0.2646600E+00, 0.3255700E+00, &
     & 0.3540600E+00, 0.4048900E+00, 0.4799500E+00, 0.5832400E+00, &
     & 0.7210400E+00, 0.7501700E+00, 0.9432314E-08, 0.9432314E-08 /
      data (ref_adm(11,iz, 4,14),iz = 1,20) / &
     & 0.1885900E+00, 0.1885900E+00, 0.1976000E+00, 0.1884600E+00, &
     & 0.1926100E+00, 0.1936700E+00, 0.2043200E+00, 0.2155000E+00, &
     & 0.2246800E+00, 0.2362900E+00, 0.2555600E+00, 0.2785400E+00, &
     & 0.3334400E+00, 0.3672700E+00, 0.4513800E+00, 0.5287800E+00, &
     & 0.6562900E+00, 0.7509100E+00, 0.5884330E+00, 0.5884330E+00 /
      data (ref_adm(11,iz, 5,14),iz = 1,20) / &
     & 0.1978200E+00, 0.1978200E+00, 0.1931600E+00, 0.1879000E+00, &
     & 0.1831700E+00, 0.1917200E+00, 0.2060100E+00, 0.2149000E+00, &
     & 0.2206000E+00, 0.2502500E+00, 0.2741200E+00, 0.2903200E+00, &
     & 0.3154800E+00, 0.3902600E+00, 0.4413500E+00, 0.5062500E+00, &
     & 0.6041000E+00, 0.7328700E+00, 0.5635049E+00, 0.5635049E+00 /
      data (ref_adm(11,iz, 6,14),iz = 1,20) / &
     & 0.1847900E+00, 0.1847900E+00, 0.1820600E+00, 0.1861400E+00, &
     & 0.1858000E+00, 0.1909600E+00, 0.2028500E+00, 0.2120100E+00, &
     & 0.2291900E+00, 0.2424600E+00, 0.2675000E+00, 0.3012300E+00, &
     & 0.3413800E+00, 0.3902700E+00, 0.4572000E+00, 0.5101500E+00, &
     & 0.5937000E+00, 0.6818500E+00, 0.6648700E+00, 0.6648700E+00 /
      data (ref_adm(11,iz, 7,14),iz = 1,20) / &
     & 0.1930200E+00, 0.1930200E+00, 0.1959300E+00, 0.1994600E+00, &
     & 0.2031300E+00, 0.1965900E+00, 0.2029900E+00, 0.2086200E+00, &
     & 0.2153900E+00, 0.2347600E+00, 0.2510000E+00, 0.2809300E+00, &
     & 0.2950400E+00, 0.3330400E+00, 0.3681000E+00, 0.4232500E+00, &
     & 0.5445100E+00, 0.6490900E+00, 0.5915000E+00, 0.5915000E+00 /
      data (ref_adm(11,iz, 8,14),iz = 1,20) / &
     & 0.1924600E+00, 0.1924600E+00, 0.1883700E+00, 0.1888500E+00, &
     & 0.1947000E+00, 0.1885900E+00, 0.1978400E+00, 0.2067200E+00, &
     & 0.2183500E+00, 0.2313600E+00, 0.2493300E+00, 0.2762400E+00, &
     & 0.2861900E+00, 0.3195200E+00, 0.3927500E+00, 0.4494000E+00, &
     & 0.5434100E+00, 0.5869300E+00, 0.5619600E+00, 0.5619600E+00 /
      data (ref_adm(11,iz, 9,14),iz = 1,20) / &
     & 0.1901600E+00, 0.1901600E+00, 0.1986700E+00, 0.1916600E+00, &
     & 0.1855400E+00, 0.1905100E+00, 0.1967700E+00, 0.2107300E+00, &
     & 0.2171300E+00, 0.2293200E+00, 0.2397100E+00, 0.2728000E+00, &
     & 0.2761100E+00, 0.3089100E+00, 0.3517700E+00, 0.4571400E+00, &
     & 0.5036200E+00, 0.5463900E+00, 0.5578700E+00, 0.5578700E+00 /
      data (ref_adm(11,iz,10,14),iz = 1,20) / &
     & 0.1975100E+00, 0.1975100E+00, 0.1850000E+00, 0.1848200E+00, &
     & 0.1878900E+00, 0.2013600E+00, 0.2089500E+00, 0.2226600E+00, &
     & 0.2275600E+00, 0.2344000E+00, 0.2331700E+00, 0.2508400E+00, &
     & 0.2714800E+00, 0.3085100E+00, 0.3503500E+00, 0.4087000E+00, &
     & 0.4678600E+00, 0.4901400E+00, 0.4574800E+00, 0.4574800E+00 /
      data (ref_adm(11,iz,11,14),iz = 1,20) / &
     & 0.1914500E+00, 0.1914500E+00, 0.1851700E+00, 0.1883700E+00, &
     & 0.1876600E+00, 0.1938100E+00, 0.2094400E+00, 0.2151100E+00, &
     & 0.2108600E+00, 0.2255600E+00, 0.2284900E+00, 0.2366300E+00, &
     & 0.2670300E+00, 0.2996100E+00, 0.3382100E+00, 0.3821900E+00, &
     & 0.4402500E+00, 0.4517600E+00, 0.4106500E+00, 0.4106500E+00 /
      data (ref_adm(11,iz,12,14),iz = 1,20) / &
     & 0.1825600E+00, 0.1825600E+00, 0.1888600E+00, 0.1974700E+00, &
     & 0.1939100E+00, 0.1930700E+00, 0.2064700E+00, 0.2073000E+00, &
     & 0.2068300E+00, 0.2243500E+00, 0.2315700E+00, 0.2530700E+00, &
     & 0.2632900E+00, 0.2867700E+00, 0.3297000E+00, 0.3616900E+00, &
     & 0.4154500E+00, 0.4393800E+00, 0.4051700E+00, 0.4051700E+00 /
      data (ref_adm(11,iz,13,14),iz = 1,20) / &
     & 0.1921400E+00, 0.1921400E+00, 0.1886600E+00, 0.1884500E+00, &
     & 0.1965100E+00, 0.1904400E+00, 0.1946700E+00, 0.2089800E+00, &
     & 0.2069800E+00, 0.2241600E+00, 0.2269200E+00, 0.2355600E+00, &
     & 0.2503700E+00, 0.2842300E+00, 0.3077000E+00, 0.3534000E+00, &
     & 0.3870400E+00, 0.3988100E+00, 0.3853600E+00, 0.3853600E+00 /
      data (ref_adm(11,iz,14,14),iz = 1,20) / &
     & 0.2010600E+00, 0.2010600E+00, 0.2009000E+00, 0.2050600E+00, &
     & 0.2018000E+00, 0.2032300E+00, 0.2118300E+00, 0.2211300E+00, &
     & 0.2208000E+00, 0.2227600E+00, 0.2273800E+00, 0.2352100E+00, &
     & 0.2488200E+00, 0.2754500E+00, 0.2870000E+00, 0.3323700E+00, &
     & 0.3595200E+00, 0.3832100E+00, 0.3002800E+00, 0.3002800E+00 /
      data (ref_adm(11,iz,15,14),iz = 1,20) / &
     & 0.1986000E+00, 0.1986000E+00, 0.1878500E+00, 0.1860100E+00, &
     & 0.1851300E+00, 0.1893200E+00, 0.1940700E+00, 0.2010700E+00, &
     & 0.2047500E+00, 0.2125100E+00, 0.2239400E+00, 0.2350300E+00, &
     & 0.2482600E+00, 0.2699500E+00, 0.2874000E+00, 0.3273300E+00, &
     & 0.3644700E+00, 0.3767800E+00, 0.3890595E+00, 0.3890595E+00 /
      data (ref_adm(11,iz,16,14),iz = 1,20) / &
     & 0.1832300E+00, 0.1832300E+00, 0.1747100E+00, 0.1839400E+00, &
     & 0.1851300E+00, 0.1791700E+00, 0.1748300E+00, 0.1812200E+00, &
     & 0.1895500E+00, 0.1954100E+00, 0.2063500E+00, 0.2133400E+00, &
     & 0.2274200E+00, 0.2461200E+00, 0.2814000E+00, 0.3037500E+00, &
     & 0.3409500E+00, 0.3335000E+00, 0.3766144E+00, 0.3766144E+00 /
      data (ref_adm(11,iz,17,14),iz = 1,20) / &
     & 0.1902400E+00, 0.1902400E+00, 0.1918800E+00, 0.1875000E+00, &
     & 0.1854300E+00, 0.1874900E+00, 0.2007900E+00, 0.2008100E+00, &
     & 0.2089800E+00, 0.2095700E+00, 0.2250500E+00, 0.2246800E+00, &
     & 0.2389600E+00, 0.2702700E+00, 0.2896600E+00, 0.2935000E+00, &
     & 0.2933900E+00, 0.3963626E+00, 0.3649521E+00, 0.3649521E+00 /
      data (ref_adm(11,iz,18,14),iz = 1,20) / &
     & 0.1913400E+00, 0.1913400E+00, 0.2006700E+00, 0.1867300E+00, &
     & 0.1946100E+00, 0.1976800E+00, 0.2024700E+00, 0.2100700E+00, &
     & 0.2157800E+00, 0.2219200E+00, 0.2230200E+00, 0.2230900E+00, &
     & 0.2351700E+00, 0.2642900E+00, 0.2761500E+00, 0.2980900E+00, &
     & 0.2311500E+00, 0.3394403E+00, 0.3489852E+00, 0.3489852E+00 /
      data (ref_adm(11,iz,19,14),iz = 1,20) / &
     & 0.1937500E+00, 0.1937500E+00, 0.1993600E+00, 0.1939000E+00, &
     & 0.1942000E+00, 0.1957300E+00, 0.1970200E+00, 0.2123200E+00, &
     & 0.2150500E+00, 0.2179000E+00, 0.2301300E+00, 0.2339800E+00, &
     & 0.2430400E+00, 0.2642900E+00, 0.2783100E+00, 0.3083400E+00, &
     & 0.3111101E+00, 0.3351691E+00, 0.3424817E+00, 0.3424817E+00 /
      data (ref_adm(11,iz,20,14),iz = 1,20) / &
     & 0.1944900E+00, 0.1944900E+00, 0.1928300E+00, 0.1992400E+00, &
     & 0.2067300E+00, 0.2041000E+00, 0.2084500E+00, 0.2128200E+00, &
     & 0.2131300E+00, 0.2195000E+00, 0.2218200E+00, 0.2335300E+00, &
     & 0.2503500E+00, 0.2653800E+00, 0.2822000E+00, 0.2907900E+00, &
     & 0.3092279E+00, 0.3323157E+00, 0.3386856E+00, 0.3386856E+00 /
      data (ref_adm(11,iz,21,14),iz = 1,20) / &
     & 0.1934000E+00, 0.1934000E+00, 0.1972900E+00, 0.2037900E+00, &
     & 0.1972700E+00, 0.2032100E+00, 0.2045100E+00, 0.2069500E+00, &
     & 0.2174400E+00, 0.2229800E+00, 0.2266600E+00, 0.2311800E+00, &
     & 0.2440100E+00, 0.2586700E+00, 0.2762500E+00, 0.2485700E+00, &
     & 0.3082508E+00, 0.3299966E+00, 0.3363439E+00, 0.3363439E+00 /
      data (ref_adm(11,iz,22,14),iz = 1,20) / &
     & 0.2032400E+00, 0.2032400E+00, 0.1983400E+00, 0.2052000E+00, &
     & 0.1988700E+00, 0.2078800E+00, 0.2035500E+00, 0.2059600E+00, &
     & 0.2225100E+00, 0.2243500E+00, 0.2246500E+00, 0.2415800E+00, &
     & 0.2498300E+00, 0.2677600E+00, 0.2881300E+00, 0.2952400E+00, &
     & 0.3351201E+00, 0.3565859E+00, 0.3605606E+00, 0.3605606E+00 /
      data (ref_adm(11,iz,23,14),iz = 1,20) / &
     & 0.1946400E+00, 0.1946400E+00, 0.1970200E+00, 0.2024900E+00, &
     & 0.2100800E+00, 0.2071900E+00, 0.2099600E+00, 0.2194500E+00, &
     & 0.2188500E+00, 0.2189300E+00, 0.2317400E+00, 0.2471700E+00, &
     & 0.2550000E+00, 0.2717900E+00, 0.2887700E+00, 0.3118900E+00, &
     & 0.3352560E+00, 0.3556582E+00, 0.3609499E+00, 0.3609499E+00 /
      data (ref_adm(11,iz,24,14),iz = 1,20) / &
     & 0.1821600E+00, 0.1821600E+00, 0.1855900E+00, 0.1882900E+00, &
     & 0.1901500E+00, 0.1970000E+00, 0.2017200E+00, 0.2113100E+00, &
     & 0.2149100E+00, 0.2161400E+00, 0.2264200E+00, 0.2384200E+00, &
     & 0.2551700E+00, 0.2835100E+00, 0.2935000E+00, 0.3077600E+00, &
     & 0.3479900E+00, 0.3568041E+00, 0.3634002E+00, 0.3634002E+00 /
      data (ref_adm(11,iz,25,14),iz = 1,20) / &
     & 0.1922800E+00, 0.1922800E+00, 0.2063000E+00, 0.2122600E+00, &
     & 0.2172400E+00, 0.2194200E+00, 0.2241900E+00, 0.2325800E+00, &
     & 0.2363000E+00, 0.2420900E+00, 0.2472900E+00, 0.2573600E+00, &
     & 0.2666900E+00, 0.2827700E+00, 0.2976000E+00, 0.3152700E+00, &
     & 0.3438800E+00, 0.3588915E+00, 0.3673969E+00, 0.3673969E+00 /
      data (ref_adm(11,iz,26,14),iz = 1,20) / &
     & 0.1976900E+00, 0.1976900E+00, 0.2054700E+00, 0.2085600E+00, &
     & 0.2227500E+00, 0.2292900E+00, 0.2361800E+00, 0.2378000E+00, &
     & 0.2495700E+00, 0.2582100E+00, 0.2683600E+00, 0.2814400E+00, &
     & 0.2967800E+00, 0.3181500E+00, 0.3219200E+00, 0.3183100E+00, &
     & 0.3599300E+00, 0.3654300E+00, 0.3738927E+00, 0.3738927E+00 /
      data (ref_adm(11,iz,27,14),iz = 1,20) / &
     & 0.1942000E+00, 0.1942000E+00, 0.1893100E+00, 0.1983900E+00, &
     & 0.2016500E+00, 0.2124900E+00, 0.2125800E+00, 0.2278000E+00, &
     & 0.2286400E+00, 0.2523400E+00, 0.2631200E+00, 0.2864400E+00, &
     & 0.2974400E+00, 0.3119400E+00, 0.3217600E+00, 0.3338000E+00, &
     & 0.3572700E+00, 0.3816700E+00, 0.3352900E+00, 0.3352900E+00 /
      data (ref_adm(11,iz,28,14),iz = 1,20) / &
     & 0.1971700E+00, 0.1971700E+00, 0.2166400E+00, 0.2116000E+00, &
     & 0.2042900E+00, 0.2121000E+00, 0.2229000E+00, 0.2336400E+00, &
     & 0.2420100E+00, 0.2566400E+00, 0.2609500E+00, 0.2807400E+00, &
     & 0.3029000E+00, 0.3271000E+00, 0.3307900E+00, 0.3444600E+00, &
     & 0.3825600E+00, 0.4035200E+00, 0.3599000E+00, 0.3599000E+00 /
      data (ref_adm(11,iz,29,14),iz = 1,20) / &
     & 0.1959500E+00, 0.1959500E+00, 0.2136400E+00, 0.2105600E+00, &
     & 0.2183600E+00, 0.2184400E+00, 0.2214200E+00, 0.2353200E+00, &
     & 0.2494400E+00, 0.2561600E+00, 0.2727400E+00, 0.2934400E+00, &
     & 0.3198800E+00, 0.3405700E+00, 0.3573200E+00, 0.3731000E+00, &
     & 0.4012300E+00, 0.4046700E+00, 0.3760400E+00, 0.3760400E+00 /
      data (ref_adm(11,iz,30,14),iz = 1,20) / &
     & 0.1890900E+00, 0.1890900E+00, 0.1948100E+00, 0.2087300E+00, &
     & 0.2171700E+00, 0.2222400E+00, 0.2268300E+00, 0.2382100E+00, &
     & 0.2547000E+00, 0.2643700E+00, 0.2821900E+00, 0.3014300E+00, &
     & 0.3176500E+00, 0.3433200E+00, 0.3665800E+00, 0.3904400E+00, &
     & 0.4143900E+00, 0.4327600E+00, 0.3800500E+00, 0.3800500E+00 /
      data (ref_adm(11,iz,31,14),iz = 1,20) / &
     & 0.1846800E+00, 0.1846800E+00, 0.2047300E+00, 0.2016400E+00, &
     & 0.2113500E+00, 0.2101800E+00, 0.2255300E+00, 0.2391900E+00, &
     & 0.2593400E+00, 0.2663300E+00, 0.2802700E+00, 0.3070700E+00, &
     & 0.3298500E+00, 0.3597700E+00, 0.3863900E+00, 0.4080100E+00, &
     & 0.4318400E+00, 0.4374200E+00, 0.3918200E+00, 0.3918200E+00 /
      data (ref_adm(11,iz,32,14),iz = 1,20) / &
     & 0.1959900E+00, 0.1959900E+00, 0.2076700E+00, 0.2128400E+00, &
     & 0.2177000E+00, 0.2236000E+00, 0.2339200E+00, 0.2553300E+00, &
     & 0.2765500E+00, 0.2956700E+00, 0.2999100E+00, 0.3246300E+00, &
     & 0.3484800E+00, 0.3778400E+00, 0.4005700E+00, 0.4341300E+00, &
     & 0.4537300E+00, 0.4554800E+00, 0.3937700E+00, 0.3937700E+00 /
      data (ref_adm(11,iz,33,14),iz = 1,20) / &
     & 0.1861900E+00, 0.1861900E+00, 0.1982800E+00, 0.1983100E+00, &
     & 0.2062500E+00, 0.2241100E+00, 0.2286100E+00, 0.2459100E+00, &
     & 0.2611700E+00, 0.2767200E+00, 0.2952600E+00, 0.3162500E+00, &
     & 0.3398200E+00, 0.3738400E+00, 0.4025600E+00, 0.4193600E+00, &
     & 0.4555100E+00, 0.4687800E+00, 0.4039200E+00, 0.4039200E+00 /
      data (ref_adm(11,iz,34,14),iz = 1,20) / &
     & 0.1999400E+00, 0.1999400E+00, 0.2064100E+00, 0.2028600E+00, &
     & 0.2152200E+00, 0.2282900E+00, 0.2489500E+00, 0.2484800E+00, &
     & 0.2717200E+00, 0.2921500E+00, 0.3058200E+00, 0.3327800E+00, &
     & 0.3490800E+00, 0.3857000E+00, 0.4092600E+00, 0.4349800E+00, &
     & 0.4646600E+00, 0.4781400E+00, 0.4159400E+00, 0.4159400E+00 /
      data (ref_adm(11,iz,35,14),iz = 1,20) / &
     & 0.1903200E+00, 0.1903200E+00, 0.1998900E+00, 0.2147300E+00, &
     & 0.2125800E+00, 0.2353100E+00, 0.2513600E+00, 0.2573700E+00, &
     & 0.2677300E+00, 0.2991400E+00, 0.3109300E+00, 0.3325400E+00, &
     & 0.3573700E+00, 0.3881600E+00, 0.4151600E+00, 0.4542100E+00, &
     & 0.4710900E+00, 0.4890400E+00, 0.4258300E+00, 0.4258300E+00 /
      data (ref_adm(11,iz,36,14),iz = 1,20) / &
     & 0.1984000E+00, 0.1984000E+00, 0.2010900E+00, 0.2125100E+00, &
     & 0.2125000E+00, 0.2180900E+00, 0.2516800E+00, 0.2585300E+00, &
     & 0.2700300E+00, 0.2950100E+00, 0.3281700E+00, 0.3407000E+00, &
     & 0.3713000E+00, 0.4018900E+00, 0.4434700E+00, 0.4690200E+00, &
     & 0.4860700E+00, 0.4958200E+00, 0.4330100E+00, 0.4330100E+00 /
      data (ref_adm(11,iz,37,14),iz = 1,20) / &
     & 0.2009800E+00, 0.2009800E+00, 0.2069300E+00, 0.2005200E+00, &
     & 0.2101800E+00, 0.2254200E+00, 0.2408600E+00, 0.2654700E+00, &
     & 0.2778500E+00, 0.2872800E+00, 0.3072100E+00, 0.3371700E+00, &
     & 0.3686100E+00, 0.4216700E+00, 0.4622600E+00, 0.4804300E+00, &
     & 0.4951400E+00, 0.4970300E+00, 0.4154800E+00, 0.4154800E+00 /
      data (ref_adm(11,iz,38,14),iz = 1,20) / &
     & 0.2009800E+00, 0.2009800E+00, 0.2069300E+00, 0.2005200E+00, &
     & 0.2101800E+00, 0.2254200E+00, 0.2408600E+00, 0.2654700E+00, &
     & 0.2778500E+00, 0.2872800E+00, 0.3072100E+00, 0.3371700E+00, &
     & 0.3686100E+00, 0.4216700E+00, 0.4622600E+00, 0.4804300E+00, &
     & 0.4951400E+00, 0.4970300E+00, 0.4154800E+00, 0.4154800E+00 /
! Solar Zenith Angle 70.0 Albedo  0.2785414E+00
      data (ref_adm(11,iz, 1,15),iz = 1,20) / &
     & 0.1936900E+00, 0.1936900E+00, 0.1940000E+00, 0.1939900E+00, &
     & 0.1976500E+00, 0.1957100E+00, 0.1974000E+00, 0.2217900E+00, &
     & 0.2321400E+00, 0.2586300E+00, 0.2731500E+00, 0.3399300E+00, &
     & 0.4259400E+00, 0.5181200E+00, 0.6672100E+00, 0.8722900E+00, &
     & 0.6376686E+00, 0.7405920E+00, 0.7558697E+00, 0.7558697E+00 /
      data (ref_adm(11,iz, 2,15),iz = 1,20) / &
     & 0.1936900E+00, 0.1936900E+00, 0.1940000E+00, 0.1939900E+00, &
     & 0.1976500E+00, 0.1957100E+00, 0.1974000E+00, 0.2217900E+00, &
     & 0.2321400E+00, 0.2586300E+00, 0.2731500E+00, 0.3399300E+00, &
     & 0.4259400E+00, 0.5181200E+00, 0.6672100E+00, 0.8722900E+00, &
     & 0.6376686E+00, 0.7405920E+00, 0.7558697E+00, 0.7558697E+00 /
      data (ref_adm(11,iz, 3,15),iz = 1,20) / &
     & 0.1991500E+00, 0.1991500E+00, 0.1931900E+00, 0.1847800E+00, &
     & 0.1938800E+00, 0.2019100E+00, 0.1963700E+00, 0.2093600E+00, &
     & 0.2297000E+00, 0.2459900E+00, 0.2847600E+00, 0.3273300E+00, &
     & 0.3749700E+00, 0.5032800E+00, 0.5137500E+00, 0.6381200E+00, &
     & 0.6320808E+00, 0.7267156E+00, 0.1132002E-07, 0.1132002E-07 /
      data (ref_adm(11,iz, 4,15),iz = 1,20) / &
     & 0.1879000E+00, 0.1879000E+00, 0.1867400E+00, 0.1882700E+00, &
     & 0.1961000E+00, 0.2004000E+00, 0.2037000E+00, 0.2100000E+00, &
     & 0.2244100E+00, 0.2472300E+00, 0.2756400E+00, 0.3046100E+00, &
     & 0.3557600E+00, 0.4275500E+00, 0.4980500E+00, 0.5671900E+00, &
     & 0.6614300E+00, 0.7024153E+00, 0.6892654E+00, 0.6892654E+00 /
      data (ref_adm(11,iz, 5,15),iz = 1,20) / &
     & 0.1854000E+00, 0.1854000E+00, 0.1910800E+00, 0.1861300E+00, &
     & 0.1869700E+00, 0.1877800E+00, 0.2043300E+00, 0.2107100E+00, &
     & 0.2216400E+00, 0.2498000E+00, 0.2743700E+00, 0.3162900E+00, &
     & 0.3755300E+00, 0.4147200E+00, 0.4648700E+00, 0.5618400E+00, &
     & 0.7023500E+00, 0.6777261E+00, 0.6396484E+00, 0.6396484E+00 /
      data (ref_adm(11,iz, 6,15),iz = 1,20) / &
     & 0.1821100E+00, 0.1821100E+00, 0.1805900E+00, 0.1814000E+00, &
     & 0.1854700E+00, 0.1873600E+00, 0.1975400E+00, 0.2114400E+00, &
     & 0.2252500E+00, 0.2342800E+00, 0.2643600E+00, 0.2928400E+00, &
     & 0.3476000E+00, 0.3909300E+00, 0.4556800E+00, 0.5749500E+00, &
     & 0.6932400E+00, 0.8474500E+00, 0.8841800E+00, 0.8841800E+00 /
      data (ref_adm(11,iz, 7,15),iz = 1,20) / &
     & 0.1889700E+00, 0.1889700E+00, 0.1861500E+00, 0.1857900E+00, &
     & 0.1863100E+00, 0.1903200E+00, 0.1949100E+00, 0.2056000E+00, &
     & 0.2254600E+00, 0.2411500E+00, 0.2612300E+00, 0.2816000E+00, &
     & 0.3174500E+00, 0.3690400E+00, 0.4337400E+00, 0.4879100E+00, &
     & 0.5862400E+00, 0.6693400E+00, 0.6146200E+00, 0.6146200E+00 /
      data (ref_adm(11,iz, 8,15),iz = 1,20) / &
     & 0.1882900E+00, 0.1882900E+00, 0.1769000E+00, 0.1830700E+00, &
     & 0.1801000E+00, 0.1857000E+00, 0.1932600E+00, 0.2045100E+00, &
     & 0.2106000E+00, 0.2330200E+00, 0.2646800E+00, 0.2745000E+00, &
     & 0.3129000E+00, 0.3492000E+00, 0.4098800E+00, 0.5067900E+00, &
     & 0.5906500E+00, 0.6391400E+00, 0.6371100E+00, 0.6371100E+00 /
      data (ref_adm(11,iz, 9,15),iz = 1,20) / &
     & 0.1892300E+00, 0.1892300E+00, 0.1829100E+00, 0.1777700E+00, &
     & 0.1821200E+00, 0.1863000E+00, 0.1853800E+00, 0.2048800E+00, &
     & 0.2137600E+00, 0.2216800E+00, 0.2560100E+00, 0.2790400E+00, &
     & 0.3019800E+00, 0.3212900E+00, 0.3903100E+00, 0.4488200E+00, &
     & 0.5633800E+00, 0.5960100E+00, 0.5160713E+00, 0.5160713E+00 /
      data (ref_adm(11,iz,10,15),iz = 1,20) / &
     & 0.1853900E+00, 0.1853900E+00, 0.1893100E+00, 0.1927000E+00, &
     & 0.1843200E+00, 0.1905300E+00, 0.1882400E+00, 0.1904800E+00, &
     & 0.1975700E+00, 0.2300100E+00, 0.2394600E+00, 0.2655200E+00, &
     & 0.2900200E+00, 0.3290500E+00, 0.3625700E+00, 0.4300500E+00, &
     & 0.5276400E+00, 0.5276100E+00, 0.4932700E+00, 0.4932700E+00 /
      data (ref_adm(11,iz,11,15),iz = 1,20) / &
     & 0.1913500E+00, 0.1913500E+00, 0.1934300E+00, 0.1848300E+00, &
     & 0.1748100E+00, 0.1852800E+00, 0.1946800E+00, 0.2043000E+00, &
     & 0.2112800E+00, 0.2199900E+00, 0.2282600E+00, 0.2478900E+00, &
     & 0.2815100E+00, 0.3004800E+00, 0.3459200E+00, 0.3900100E+00, &
     & 0.4962400E+00, 0.4719500E+00, 0.4784300E+00, 0.4784300E+00 /
      data (ref_adm(11,iz,12,15),iz = 1,20) / &
     & 0.1928300E+00, 0.1928300E+00, 0.1898900E+00, 0.1820000E+00, &
     & 0.1790100E+00, 0.1895900E+00, 0.2016900E+00, 0.2036900E+00, &
     & 0.2112200E+00, 0.2183700E+00, 0.2248800E+00, 0.2434900E+00, &
     & 0.2785400E+00, 0.2956900E+00, 0.3305000E+00, 0.3728300E+00, &
     & 0.4335400E+00, 0.4669500E+00, 0.3842400E+00, 0.3842400E+00 /
      data (ref_adm(11,iz,13,15),iz = 1,20) / &
     & 0.1954000E+00, 0.1954000E+00, 0.1857500E+00, 0.1897200E+00, &
     & 0.1914400E+00, 0.1882400E+00, 0.1960300E+00, 0.1974300E+00, &
     & 0.1984700E+00, 0.2122000E+00, 0.2252000E+00, 0.2526900E+00, &
     & 0.2719100E+00, 0.3015400E+00, 0.3299600E+00, 0.3579700E+00, &
     & 0.4189500E+00, 0.4467500E+00, 0.3675700E+00, 0.3675700E+00 /
      data (ref_adm(11,iz,14,15),iz = 1,20) / &
     & 0.1948200E+00, 0.1948200E+00, 0.1965100E+00, 0.1907800E+00, &
     & 0.1930300E+00, 0.1973200E+00, 0.2073500E+00, 0.2102400E+00, &
     & 0.2192600E+00, 0.2257900E+00, 0.2214200E+00, 0.2421100E+00, &
     & 0.2570200E+00, 0.2811600E+00, 0.2934900E+00, 0.3398900E+00, &
     & 0.3921500E+00, 0.4241200E+00, 0.4138545E+00, 0.4138545E+00 /
      data (ref_adm(11,iz,15,15),iz = 1,20) / &
     & 0.1961000E+00, 0.1961000E+00, 0.1901900E+00, 0.1866500E+00, &
     & 0.1863700E+00, 0.1908700E+00, 0.1944100E+00, 0.1984300E+00, &
     & 0.2069400E+00, 0.2158600E+00, 0.2283400E+00, 0.2434500E+00, &
     & 0.2598400E+00, 0.2783700E+00, 0.2870700E+00, 0.3363300E+00, &
     & 0.3656900E+00, 0.4078000E+00, 0.4035652E+00, 0.4035652E+00 /
      data (ref_adm(11,iz,16,15),iz = 1,20) / &
     & 0.1840100E+00, 0.1840100E+00, 0.1789400E+00, 0.1773000E+00, &
     & 0.1784100E+00, 0.1848300E+00, 0.1844200E+00, 0.1840600E+00, &
     & 0.1919400E+00, 0.1979800E+00, 0.2098800E+00, 0.2185200E+00, &
     & 0.2344200E+00, 0.2543700E+00, 0.2888500E+00, 0.3305700E+00, &
     & 0.3626300E+00, 0.4235031E+00, 0.3905742E+00, 0.3905742E+00 /
      data (ref_adm(11,iz,17,15),iz = 1,20) / &
     & 0.1815000E+00, 0.1815000E+00, 0.1952000E+00, 0.1768600E+00, &
     & 0.1898900E+00, 0.1900800E+00, 0.1896300E+00, 0.1924800E+00, &
     & 0.2110900E+00, 0.2152700E+00, 0.2211000E+00, 0.2441000E+00, &
     & 0.2494100E+00, 0.2737700E+00, 0.2872600E+00, 0.3325500E+00, &
     & 0.3872112E+00, 0.4082021E+00, 0.3777642E+00, 0.3777642E+00 /
      data (ref_adm(11,iz,18,15),iz = 1,20) / &
     & 0.1933400E+00, 0.1933400E+00, 0.1871500E+00, 0.1841200E+00, &
     & 0.1956800E+00, 0.1906200E+00, 0.1868200E+00, 0.1958000E+00, &
     & 0.2145200E+00, 0.2258700E+00, 0.2306600E+00, 0.2400300E+00, &
     & 0.2450300E+00, 0.2672200E+00, 0.2892900E+00, 0.3421700E+00, &
     & 0.3490970E+00, 0.3897396E+00, 0.4168068E+00, 0.4168068E+00 /
      data (ref_adm(11,iz,19,15),iz = 1,20) / &
     & 0.1916400E+00, 0.1916400E+00, 0.1920400E+00, 0.1868200E+00, &
     & 0.1936100E+00, 0.2002700E+00, 0.1969800E+00, 0.2022400E+00, &
     & 0.2131500E+00, 0.2252500E+00, 0.2267200E+00, 0.2355500E+00, &
     & 0.2489900E+00, 0.2646500E+00, 0.2943100E+00, 0.3268700E+00, &
     & 0.3446496E+00, 0.3829462E+00, 0.4075910E+00, 0.4075910E+00 /
      data (ref_adm(11,iz,20,15),iz = 1,20) / &
     & 0.1925600E+00, 0.1925600E+00, 0.1901900E+00, 0.1949400E+00, &
     & 0.1958600E+00, 0.1960100E+00, 0.1957300E+00, 0.2007000E+00, &
     & 0.2158900E+00, 0.2247000E+00, 0.2258900E+00, 0.2317400E+00, &
     & 0.2620900E+00, 0.2610800E+00, 0.2930600E+00, 0.2937300E+00, &
     & 0.3416912E+00, 0.3786944E+00, 0.4022724E+00, 0.4022724E+00 /
      data (ref_adm(11,iz,21,15),iz = 1,20) / &
     & 0.1993200E+00, 0.1993200E+00, 0.1991600E+00, 0.1832700E+00, &
     & 0.1978700E+00, 0.2033200E+00, 0.2008900E+00, 0.2028800E+00, &
     & 0.2132300E+00, 0.2241200E+00, 0.2261000E+00, 0.2450100E+00, &
     & 0.2595900E+00, 0.2706000E+00, 0.2963500E+00, 0.3125088E+00, &
     & 0.3398370E+00, 0.3754508E+00, 0.3989248E+00, 0.3989248E+00 /
      data (ref_adm(11,iz,22,15),iz = 1,20) / &
     & 0.1866300E+00, 0.1866300E+00, 0.1836400E+00, 0.1961600E+00, &
     & 0.1862700E+00, 0.2116700E+00, 0.2042900E+00, 0.2138400E+00, &
     & 0.2309500E+00, 0.2371800E+00, 0.2344600E+00, 0.2451600E+00, &
     & 0.2674500E+00, 0.2820900E+00, 0.2914500E+00, 0.3001400E+00, &
     & 0.3571224E+00, 0.3870560E+00, 0.4015959E+00, 0.4015959E+00 /
      data (ref_adm(11,iz,23,15),iz = 1,20) / &
     & 0.1957100E+00, 0.1957100E+00, 0.1925400E+00, 0.1905300E+00, &
     & 0.1969900E+00, 0.1956200E+00, 0.2018800E+00, 0.2140700E+00, &
     & 0.2263700E+00, 0.2300400E+00, 0.2396700E+00, 0.2452400E+00, &
     & 0.2572200E+00, 0.2874800E+00, 0.3065400E+00, 0.3421800E+00, &
     & 0.3570198E+00, 0.3859288E+00, 0.4022183E+00, 0.4022183E+00 /
      data (ref_adm(11,iz,24,15),iz = 1,20) / &
     & 0.1784900E+00, 0.1784900E+00, 0.1809000E+00, 0.1839800E+00, &
     & 0.1892900E+00, 0.1919600E+00, 0.1996700E+00, 0.2058600E+00, &
     & 0.2167100E+00, 0.2229100E+00, 0.2320000E+00, 0.2427600E+00, &
     & 0.2557800E+00, 0.2772200E+00, 0.3049000E+00, 0.3285200E+00, &
     & 0.3226900E+00, 0.3872052E+00, 0.4056485E+00, 0.4056485E+00 /
      data (ref_adm(11,iz,25,15),iz = 1,20) / &
     & 0.1927800E+00, 0.1927800E+00, 0.2026300E+00, 0.2031600E+00, &
     & 0.2117900E+00, 0.2126100E+00, 0.2230000E+00, 0.2287400E+00, &
     & 0.2390400E+00, 0.2465400E+00, 0.2583300E+00, 0.2686900E+00, &
     & 0.2841100E+00, 0.3006500E+00, 0.3151200E+00, 0.3270400E+00, &
     & 0.3600500E+00, 0.3899572E+00, 0.4107850E+00, 0.4107850E+00 /
      data (ref_adm(11,iz,26,15),iz = 1,20) / &
     & 0.1976700E+00, 0.1976700E+00, 0.1901600E+00, 0.1883100E+00, &
     & 0.2055600E+00, 0.2192100E+00, 0.2085000E+00, 0.2258300E+00, &
     & 0.2399600E+00, 0.2505200E+00, 0.2539900E+00, 0.2786700E+00, &
     & 0.2927600E+00, 0.3219000E+00, 0.3311800E+00, 0.3342800E+00, &
     & 0.3839300E+00, 0.3931100E+00, 0.4196009E+00, 0.4196009E+00 /
      data (ref_adm(11,iz,27,15),iz = 1,20) / &
     & 0.1954100E+00, 0.1954100E+00, 0.2039400E+00, 0.1876700E+00, &
     & 0.2016400E+00, 0.2046900E+00, 0.2108800E+00, 0.2197000E+00, &
     & 0.2295100E+00, 0.2415000E+00, 0.2533600E+00, 0.2604700E+00, &
     & 0.2933600E+00, 0.3085600E+00, 0.3289500E+00, 0.3535700E+00, &
     & 0.3904500E+00, 0.4180200E+00, 0.3747500E+00, 0.3747500E+00 /
      data (ref_adm(11,iz,28,15),iz = 1,20) / &
     & 0.1908200E+00, 0.1908200E+00, 0.1894800E+00, 0.2051900E+00, &
     & 0.2027800E+00, 0.2069300E+00, 0.2269500E+00, 0.2301400E+00, &
     & 0.2380100E+00, 0.2447500E+00, 0.2597700E+00, 0.2764900E+00, &
     & 0.2959000E+00, 0.3257200E+00, 0.3508500E+00, 0.3839900E+00, &
     & 0.4165900E+00, 0.4411700E+00, 0.4170600E+00, 0.4170600E+00 /
      data (ref_adm(11,iz,29,15),iz = 1,20) / &
     & 0.1858100E+00, 0.1858100E+00, 0.1916700E+00, 0.2045700E+00, &
     & 0.2146900E+00, 0.2124000E+00, 0.2166700E+00, 0.2347000E+00, &
     & 0.2466800E+00, 0.2632800E+00, 0.2736500E+00, 0.2906000E+00, &
     & 0.3109100E+00, 0.3375600E+00, 0.3577700E+00, 0.3907400E+00, &
     & 0.4456500E+00, 0.4465700E+00, 0.4082500E+00, 0.4082500E+00 /
      data (ref_adm(11,iz,30,15),iz = 1,20) / &
     & 0.1884300E+00, 0.1884300E+00, 0.1846400E+00, 0.2050600E+00, &
     & 0.2074000E+00, 0.2219800E+00, 0.2310200E+00, 0.2314600E+00, &
     & 0.2522800E+00, 0.2676100E+00, 0.2911200E+00, 0.3128200E+00, &
     & 0.3357900E+00, 0.3615700E+00, 0.3709300E+00, 0.4134600E+00, &
     & 0.4521300E+00, 0.4841000E+00, 0.4311300E+00, 0.4311300E+00 /
      data (ref_adm(11,iz,31,15),iz = 1,20) / &
     & 0.1903000E+00, 0.1903000E+00, 0.1940000E+00, 0.2011600E+00, &
     & 0.2101300E+00, 0.2136400E+00, 0.2237100E+00, 0.2334300E+00, &
     & 0.2490200E+00, 0.2678900E+00, 0.2902700E+00, 0.3159200E+00, &
     & 0.3358700E+00, 0.3733800E+00, 0.3951100E+00, 0.4361400E+00, &
     & 0.4648800E+00, 0.4988200E+00, 0.4363100E+00, 0.4363100E+00 /
      data (ref_adm(11,iz,32,15),iz = 1,20) / &
     & 0.1943100E+00, 0.1943100E+00, 0.1984000E+00, 0.2076500E+00, &
     & 0.2138300E+00, 0.2136000E+00, 0.2284500E+00, 0.2442900E+00, &
     & 0.2628200E+00, 0.2758300E+00, 0.2906700E+00, 0.3196800E+00, &
     & 0.3368900E+00, 0.3722200E+00, 0.4006900E+00, 0.4402100E+00, &
     & 0.4809200E+00, 0.5169400E+00, 0.4670300E+00, 0.4670300E+00 /
      data (ref_adm(11,iz,33,15),iz = 1,20) / &
     & 0.1908000E+00, 0.1908000E+00, 0.1911000E+00, 0.1964600E+00, &
     & 0.2065600E+00, 0.2143800E+00, 0.2245400E+00, 0.2422600E+00, &
     & 0.2626500E+00, 0.2728400E+00, 0.2950300E+00, 0.3219900E+00, &
     & 0.3422500E+00, 0.3790800E+00, 0.4118300E+00, 0.4549900E+00, &
     & 0.4957600E+00, 0.5233300E+00, 0.4580300E+00, 0.4580300E+00 /
      data (ref_adm(11,iz,34,15),iz = 1,20) / &
     & 0.1842000E+00, 0.1842000E+00, 0.1943800E+00, 0.1973700E+00, &
     & 0.2200900E+00, 0.2322700E+00, 0.2370600E+00, 0.2533900E+00, &
     & 0.2757700E+00, 0.2857700E+00, 0.2990100E+00, 0.3311900E+00, &
     & 0.3652800E+00, 0.3985600E+00, 0.4457000E+00, 0.4800200E+00, &
     & 0.4974900E+00, 0.5295300E+00, 0.4695200E+00, 0.4695200E+00 /
      data (ref_adm(11,iz,35,15),iz = 1,20) / &
     & 0.1955000E+00, 0.1955000E+00, 0.1858900E+00, 0.2011600E+00, &
     & 0.2185400E+00, 0.2244200E+00, 0.2291300E+00, 0.2542600E+00, &
     & 0.2790600E+00, 0.2897700E+00, 0.3029500E+00, 0.3349600E+00, &
     & 0.3812200E+00, 0.4052300E+00, 0.4414900E+00, 0.4885000E+00, &
     & 0.5255000E+00, 0.5436500E+00, 0.4816500E+00, 0.4816500E+00 /
      data (ref_adm(11,iz,36,15),iz = 1,20) / &
     & 0.2119700E+00, 0.2119700E+00, 0.1955800E+00, 0.2048600E+00, &
     & 0.2067000E+00, 0.2169600E+00, 0.2349300E+00, 0.2347100E+00, &
     & 0.2749000E+00, 0.3059100E+00, 0.3075500E+00, 0.3436200E+00, &
     & 0.3827300E+00, 0.4114200E+00, 0.4666200E+00, 0.5236300E+00, &
     & 0.5447600E+00, 0.5615700E+00, 0.5005600E+00, 0.5005600E+00 /
      data (ref_adm(11,iz,37,15),iz = 1,20) / &
     & 0.2014500E+00, 0.2014500E+00, 0.2097000E+00, 0.2076200E+00, &
     & 0.2128200E+00, 0.2206500E+00, 0.2191000E+00, 0.2458800E+00, &
     & 0.2765100E+00, 0.2831000E+00, 0.3178700E+00, 0.3424600E+00, &
     & 0.3886700E+00, 0.4232900E+00, 0.4756900E+00, 0.5524300E+00, &
     & 0.5669800E+00, 0.5801800E+00, 0.5137800E+00, 0.5137800E+00 /
      data (ref_adm(11,iz,38,15),iz = 1,20) / &
     & 0.2014500E+00, 0.2014500E+00, 0.2097000E+00, 0.2076200E+00, &
     & 0.2128200E+00, 0.2206500E+00, 0.2191000E+00, 0.2458800E+00, &
     & 0.2765100E+00, 0.2831000E+00, 0.3178700E+00, 0.3424600E+00, &
     & 0.3886700E+00, 0.4232900E+00, 0.4756900E+00, 0.5524300E+00, &
     & 0.5669800E+00, 0.5801800E+00, 0.5137800E+00, 0.5137800E+00 /
! Solar Zenith Angle 75.0 Albedo  0.3091806E+00
      data (ref_adm(11,iz, 1,16),iz = 1,20) / &
     & 0.2026900E+00, 0.2026900E+00, 0.2111900E+00, 0.2007800E+00, &
     & 0.1972200E+00, 0.1816300E+00, 0.1940200E+00, 0.2122600E+00, &
     & 0.2524700E+00, 0.2965500E+00, 0.3622900E+00, 0.3961600E+00, &
     & 0.4904700E+00, 0.4580200E+00, 0.6117257E+00, 0.9674087E+00, &
     & 0.1705544E+01, 0.1950749E+01, 0.2008644E+01, 0.2008644E+01 /
      data (ref_adm(11,iz, 2,16),iz = 1,20) / &
     & 0.2026900E+00, 0.2026900E+00, 0.2111900E+00, 0.2007800E+00, &
     & 0.1972200E+00, 0.1816300E+00, 0.1940200E+00, 0.2122600E+00, &
     & 0.2524700E+00, 0.2965500E+00, 0.3622900E+00, 0.3961600E+00, &
     & 0.4904700E+00, 0.4580200E+00, 0.6117257E+00, 0.9674087E+00, &
     & 0.1705544E+01, 0.1950749E+01, 0.2008644E+01, 0.2008644E+01 /
      data (ref_adm(11,iz, 3,16),iz = 1,20) / &
     & 0.2089000E+00, 0.2089000E+00, 0.2187000E+00, 0.1925700E+00, &
     & 0.1830300E+00, 0.1948700E+00, 0.2082800E+00, 0.2322500E+00, &
     & 0.2630500E+00, 0.2780500E+00, 0.3456500E+00, 0.4030300E+00, &
     & 0.4641600E+00, 0.4640954E+00, 0.5981249E+00, 0.9186954E+00, &
     & 0.1663440E+01, 0.2071019E+01, 0.2103620E+00, 0.2103620E+00 /
      data (ref_adm(11,iz, 4,16),iz = 1,20) / &
     & 0.1935000E+00, 0.1935000E+00, 0.2330800E+00, 0.1822500E+00, &
     & 0.1655000E+00, 0.2137600E+00, 0.2256400E+00, 0.2486400E+00, &
     & 0.2466100E+00, 0.3186000E+00, 0.2986500E+00, 0.3696500E+00, &
     & 0.4232500E+00, 0.5612000E+00, 0.5729151E+00, 0.8317226E+00, &
     & 0.1409885E+01, 0.2292120E+01, 0.2313007E+01, 0.2313007E+01 /
      data (ref_adm(11,iz, 5,16),iz = 1,20) / &
     & 0.1801400E+00, 0.1801400E+00, 0.1868500E+00, 0.1749500E+00, &
     & 0.2055700E+00, 0.2052100E+00, 0.2189800E+00, 0.2612000E+00, &
     & 0.2617000E+00, 0.2887200E+00, 0.3024300E+00, 0.3536700E+00, &
     & 0.4101900E+00, 0.4590500E+00, 0.5426639E+00, 0.7417625E+00, &
     & 0.1114036E+01, 0.2228705E+01, 0.3151018E+01, 0.3151018E+01 /
      data (ref_adm(11,iz, 6,16),iz = 1,20) / &
     & 0.1887300E+00, 0.1887300E+00, 0.1894200E+00, 0.1857800E+00, &
     & 0.1932200E+00, 0.2037600E+00, 0.2203900E+00, 0.2252600E+00, &
     & 0.2564700E+00, 0.2604900E+00, 0.2956400E+00, 0.3403100E+00, &
     & 0.4224600E+00, 0.5689900E+00, 0.6707000E+00, 0.7905000E+00, &
     & 0.1025100E+01, 0.1157100E+01, 0.2707285E+01, 0.2707285E+01 /
      data (ref_adm(11,iz, 7,16),iz = 1,20) / &
     & 0.1800900E+00, 0.1800900E+00, 0.1899500E+00, 0.2011600E+00, &
     & 0.2042500E+00, 0.2162000E+00, 0.2263800E+00, 0.2407300E+00, &
     & 0.2513000E+00, 0.2444300E+00, 0.2820700E+00, 0.3227800E+00, &
     & 0.3835200E+00, 0.4721600E+00, 0.6212400E+00, 0.7086000E+00, &
     & 0.8312900E+00, 0.9955100E+00, 0.9256400E+00, 0.9256400E+00 /
      data (ref_adm(11,iz, 8,16),iz = 1,20) / &
     & 0.1867600E+00, 0.1867600E+00, 0.1896500E+00, 0.1745600E+00, &
     & 0.1760800E+00, 0.2089700E+00, 0.2093400E+00, 0.2416000E+00, &
     & 0.2344200E+00, 0.2445500E+00, 0.2668500E+00, 0.3074400E+00, &
     & 0.3401600E+00, 0.4032400E+00, 0.5131400E+00, 0.6808400E+00, &
     & 0.7567300E+00, 0.8804900E+00, 0.1328921E+01, 0.1328921E+01 /
      data (ref_adm(11,iz, 9,16),iz = 1,20) / &
     & 0.1910300E+00, 0.1910300E+00, 0.1851800E+00, 0.2051500E+00, &
     & 0.1928400E+00, 0.2051600E+00, 0.1952600E+00, 0.2062000E+00, &
     & 0.2229300E+00, 0.2370200E+00, 0.2852400E+00, 0.2907300E+00, &
     & 0.2954900E+00, 0.3640600E+00, 0.4697600E+00, 0.5702100E+00, &
     & 0.7233700E+00, 0.7359300E+00, 0.1118281E+01, 0.1118281E+01 /
      data (ref_adm(11,iz,10,16),iz = 1,20) / &
     & 0.1959800E+00, 0.1959800E+00, 0.1835900E+00, 0.1756500E+00, &
     & 0.1828600E+00, 0.1910300E+00, 0.2071300E+00, 0.2046400E+00, &
     & 0.2083000E+00, 0.2337100E+00, 0.2531500E+00, 0.2836100E+00, &
     & 0.3097000E+00, 0.3382800E+00, 0.4555900E+00, 0.5583200E+00, &
     & 0.6196200E+00, 0.7127200E+00, 0.6036200E+00, 0.6036200E+00 /
      data (ref_adm(11,iz,11,16),iz = 1,20) / &
     & 0.2003800E+00, 0.2003800E+00, 0.1915000E+00, 0.1997500E+00, &
     & 0.2099000E+00, 0.2002200E+00, 0.1987400E+00, 0.1927900E+00, &
     & 0.2195900E+00, 0.2355200E+00, 0.2512700E+00, 0.2745200E+00, &
     & 0.3082700E+00, 0.3808100E+00, 0.4154200E+00, 0.4785300E+00, &
     & 0.5647600E+00, 0.5713600E+00, 0.5416100E+00, 0.5416100E+00 /
      data (ref_adm(11,iz,12,16),iz = 1,20) / &
     & 0.1939300E+00, 0.1939300E+00, 0.1857800E+00, 0.1787900E+00, &
     & 0.1754900E+00, 0.1857800E+00, 0.1832900E+00, 0.1970300E+00, &
     & 0.2327200E+00, 0.2379900E+00, 0.2524600E+00, 0.2571900E+00, &
     & 0.3029400E+00, 0.3488100E+00, 0.4142900E+00, 0.4789700E+00, &
     & 0.5113800E+00, 0.5337200E+00, 0.8863131E+00, 0.8863131E+00 /
      data (ref_adm(11,iz,13,16),iz = 1,20) / &
     & 0.1892100E+00, 0.1892100E+00, 0.1776600E+00, 0.1753400E+00, &
     & 0.1827800E+00, 0.1853200E+00, 0.1896000E+00, 0.2388300E+00, &
     & 0.2235400E+00, 0.2187800E+00, 0.2367500E+00, 0.2634300E+00, &
     & 0.3300200E+00, 0.3237700E+00, 0.3736600E+00, 0.4120300E+00, &
     & 0.4744300E+00, 0.4946900E+00, 0.8334101E+00, 0.8334101E+00 /
      data (ref_adm(11,iz,14,16),iz = 1,20) / &
     & 0.1793300E+00, 0.1793300E+00, 0.1813300E+00, 0.1881900E+00, &
     & 0.1807800E+00, 0.1953500E+00, 0.2023200E+00, 0.2017200E+00, &
     & 0.2072500E+00, 0.2211200E+00, 0.2254100E+00, 0.2499500E+00, &
     & 0.2880000E+00, 0.2964000E+00, 0.3439100E+00, 0.4077300E+00, &
     & 0.4492700E+00, 0.4687700E+00, 0.7966692E+00, 0.7966692E+00 /
      data (ref_adm(11,iz,15,16),iz = 1,20) / &
     & 0.1874500E+00, 0.1874500E+00, 0.1838800E+00, 0.1850000E+00, &
     & 0.1917900E+00, 0.1965300E+00, 0.1945300E+00, 0.2021200E+00, &
     & 0.2111300E+00, 0.2197100E+00, 0.2308900E+00, 0.2419800E+00, &
     & 0.2651600E+00, 0.2917600E+00, 0.3435500E+00, 0.3925200E+00, &
     & 0.4035200E+00, 0.6128788E+00, 0.7678193E+00, 0.7678193E+00 /
      data (ref_adm(11,iz,16,16),iz = 1,20) / &
     & 0.1880600E+00, 0.1880600E+00, 0.1830200E+00, 0.1834700E+00, &
     & 0.1826100E+00, 0.1820000E+00, 0.1915700E+00, 0.1872600E+00, &
     & 0.1960900E+00, 0.2058000E+00, 0.2210100E+00, 0.2331100E+00, &
     & 0.2569300E+00, 0.2755600E+00, 0.3158600E+00, 0.3599300E+00, &
     & 0.3958900E+00, 0.5940789E+00, 0.7421670E+00, 0.7421670E+00 /
      data (ref_adm(11,iz,17,16),iz = 1,20) / &
     & 0.1961500E+00, 0.1961500E+00, 0.1841300E+00, 0.1889900E+00, &
     & 0.1913000E+00, 0.1764200E+00, 0.2013300E+00, 0.2072100E+00, &
     & 0.2005200E+00, 0.2040500E+00, 0.2406200E+00, 0.2471700E+00, &
     & 0.2609700E+00, 0.2848800E+00, 0.2898700E+00, 0.3468200E+00, &
     & 0.4681738E+00, 0.5739402E+00, 0.7133978E+00, 0.7133978E+00 /
      data (ref_adm(11,iz,18,16),iz = 1,20) / &
     & 0.1897400E+00, 0.1897400E+00, 0.1863700E+00, 0.1872600E+00, &
     & 0.1925600E+00, 0.1961900E+00, 0.1976800E+00, 0.1966500E+00, &
     & 0.1894300E+00, 0.2289500E+00, 0.2577600E+00, 0.2491800E+00, &
     & 0.2551500E+00, 0.2914500E+00, 0.3215200E+00, 0.3415500E+00, &
     & 0.3834314E+00, 0.4371402E+00, 0.4805583E+00, 0.4805583E+00 /
      data (ref_adm(11,iz,19,16),iz = 1,20) / &
     & 0.1884500E+00, 0.1884500E+00, 0.1792800E+00, 0.1925000E+00, &
     & 0.1923300E+00, 0.1853700E+00, 0.1951400E+00, 0.1917900E+00, &
     & 0.2046200E+00, 0.2308900E+00, 0.2396300E+00, 0.2327900E+00, &
     & 0.2431600E+00, 0.2756000E+00, 0.3177900E+00, 0.3400000E+00, &
     & 0.3775681E+00, 0.4283561E+00, 0.4689155E+00, 0.4689155E+00 /
      data (ref_adm(11,iz,20,16),iz = 1,20) / &
     & 0.1915200E+00, 0.1915200E+00, 0.1900700E+00, 0.2139100E+00, &
     & 0.1831100E+00, 0.1894800E+00, 0.1915900E+00, 0.1985700E+00, &
     & 0.2331100E+00, 0.2253500E+00, 0.2386000E+00, 0.2514400E+00, &
     & 0.2568800E+00, 0.2780200E+00, 0.3064800E+00, 0.3379367E+00, &
     & 0.3737938E+00, 0.4229306E+00, 0.4621569E+00, 0.4621569E+00 /
      data (ref_adm(11,iz,21,16),iz = 1,20) / &
     & 0.1930500E+00, 0.1930500E+00, 0.1950900E+00, 0.2017200E+00, &
     & 0.2250900E+00, 0.2172700E+00, 0.1990900E+00, 0.2076500E+00, &
     & 0.2026700E+00, 0.2299600E+00, 0.2351900E+00, 0.2553600E+00, &
     & 0.2594600E+00, 0.2849800E+00, 0.3129500E+00, 0.3362756E+00, &
     & 0.3711686E+00, 0.4188357E+00, 0.4579860E+00, 0.4579860E+00 /
      data (ref_adm(11,iz,22,16),iz = 1,20) / &
     & 0.1881100E+00, 0.1881100E+00, 0.1806600E+00, 0.2082300E+00, &
     & 0.2067600E+00, 0.2007800E+00, 0.2045600E+00, 0.2250200E+00, &
     & 0.2115900E+00, 0.2425200E+00, 0.2344000E+00, 0.2521800E+00, &
     & 0.2724000E+00, 0.2866600E+00, 0.3064900E+00, 0.3405900E+00, &
     & 0.4020130E+00, 0.4534410E+00, 0.4976628E+00, 0.4976628E+00 /
      data (ref_adm(11,iz,23,16),iz = 1,20) / &
     & 0.1844800E+00, 0.1844800E+00, 0.1829500E+00, 0.1838100E+00, &
     & 0.1955200E+00, 0.2001700E+00, 0.1998000E+00, 0.2115800E+00, &
     & 0.2208800E+00, 0.2395800E+00, 0.2520500E+00, 0.2571500E+00, &
     & 0.2745900E+00, 0.2968400E+00, 0.3163800E+00, 0.3201800E+00, &
     & 0.4027794E+00, 0.4529482E+00, 0.4985835E+00, 0.4985835E+00 /
      data (ref_adm(11,iz,24,16),iz = 1,20) / &
     & 0.1840000E+00, 0.1840000E+00, 0.1857100E+00, 0.1881400E+00, &
     & 0.2019800E+00, 0.2057200E+00, 0.2091300E+00, 0.2190800E+00, &
     & 0.2259200E+00, 0.2298100E+00, 0.2415000E+00, 0.2549200E+00, &
     & 0.2731400E+00, 0.2966100E+00, 0.3155000E+00, 0.3554500E+00, &
     & 0.4952000E+00, 0.4553581E+00, 0.5035521E+00, 0.5035521E+00 /
      data (ref_adm(11,iz,25,16),iz = 1,20) / &
     & 0.1954100E+00, 0.1954100E+00, 0.2025400E+00, 0.1892900E+00, &
     & 0.2012400E+00, 0.2092800E+00, 0.2110800E+00, 0.2213200E+00, &
     & 0.2359400E+00, 0.2407900E+00, 0.2590100E+00, 0.2755600E+00, &
     & 0.2974900E+00, 0.3258600E+00, 0.3412400E+00, 0.3621200E+00, &
     & 0.4666600E+00, 0.3918600E+00, 0.5110797E+00, 0.5110797E+00 /
      data (ref_adm(11,iz,26,16),iz = 1,20) / &
     & 0.2011400E+00, 0.2011400E+00, 0.1976700E+00, 0.1844800E+00, &
     & 0.1850900E+00, 0.2040400E+00, 0.2204600E+00, 0.2096000E+00, &
     & 0.2295400E+00, 0.2304400E+00, 0.2440300E+00, 0.2725000E+00, &
     & 0.2874300E+00, 0.3153500E+00, 0.3607000E+00, 0.4295300E+00, &
     & 0.4697100E+00, 0.5280600E+00, 0.5241529E+00, 0.5241529E+00 /
      data (ref_adm(11,iz,27,16),iz = 1,20) / &
     & 0.1897000E+00, 0.1897000E+00, 0.2054900E+00, 0.1919700E+00, &
     & 0.1876800E+00, 0.2014900E+00, 0.2206900E+00, 0.2262100E+00, &
     & 0.2291400E+00, 0.2530100E+00, 0.2528100E+00, 0.2757900E+00, &
     & 0.2987500E+00, 0.3436200E+00, 0.3746500E+00, 0.3932100E+00, &
     & 0.4485500E+00, 0.5080000E+00, 0.5406530E+00, 0.5406530E+00 /
      data (ref_adm(11,iz,28,16),iz = 1,20) / &
     & 0.1875800E+00, 0.1875800E+00, 0.1853400E+00, 0.1854800E+00, &
     & 0.2003800E+00, 0.2007500E+00, 0.2039700E+00, 0.2567700E+00, &
     & 0.2652700E+00, 0.2642900E+00, 0.2588400E+00, 0.2856800E+00, &
     & 0.3143400E+00, 0.3446900E+00, 0.3695800E+00, 0.4355700E+00, &
     & 0.4700400E+00, 0.5033200E+00, 0.4712700E+00, 0.4712700E+00 /
      data (ref_adm(11,iz,29,16),iz = 1,20) / &
     & 0.1948800E+00, 0.1948800E+00, 0.1924200E+00, 0.1753800E+00, &
     & 0.1835200E+00, 0.2167100E+00, 0.2117100E+00, 0.2227200E+00, &
     & 0.2610600E+00, 0.2743600E+00, 0.2913400E+00, 0.2967700E+00, &
     & 0.3224500E+00, 0.3536700E+00, 0.3838200E+00, 0.4456200E+00, &
     & 0.4952200E+00, 0.5342500E+00, 0.5070600E+00, 0.5070600E+00 /
      data (ref_adm(11,iz,30,16),iz = 1,20) / &
     & 0.1945100E+00, 0.1945100E+00, 0.1970200E+00, 0.1896500E+00, &
     & 0.1956700E+00, 0.2092000E+00, 0.2419000E+00, 0.2576500E+00, &
     & 0.2423700E+00, 0.2811600E+00, 0.2853400E+00, 0.3043500E+00, &
     & 0.3331900E+00, 0.3700400E+00, 0.3999800E+00, 0.4696100E+00, &
     & 0.5164000E+00, 0.5472400E+00, 0.5343800E+00, 0.5343800E+00 /
      data (ref_adm(11,iz,31,16),iz = 1,20) / &
     & 0.1942900E+00, 0.1942900E+00, 0.1909600E+00, 0.2006400E+00, &
     & 0.2008800E+00, 0.2155500E+00, 0.2269500E+00, 0.2442900E+00, &
     & 0.2458600E+00, 0.2685000E+00, 0.2839600E+00, 0.3373200E+00, &
     & 0.3533800E+00, 0.3881500E+00, 0.4359600E+00, 0.4718500E+00, &
     & 0.5254800E+00, 0.5644200E+00, 0.5200600E+00, 0.5200600E+00 /
      data (ref_adm(11,iz,32,16),iz = 1,20) / &
     & 0.1839300E+00, 0.1839300E+00, 0.1881300E+00, 0.1996200E+00, &
     & 0.2173500E+00, 0.2173500E+00, 0.2373100E+00, 0.2528800E+00, &
     & 0.2518700E+00, 0.2759900E+00, 0.3006100E+00, 0.3293200E+00, &
     & 0.3683200E+00, 0.4061300E+00, 0.4404100E+00, 0.5110600E+00, &
     & 0.5734900E+00, 0.5962000E+00, 0.5503400E+00, 0.5503400E+00 /
      data (ref_adm(11,iz,33,16),iz = 1,20) / &
     & 0.1842600E+00, 0.1842600E+00, 0.2038200E+00, 0.2020600E+00, &
     & 0.2142700E+00, 0.2187400E+00, 0.2453000E+00, 0.2489000E+00, &
     & 0.2656800E+00, 0.2966900E+00, 0.3107600E+00, 0.3222700E+00, &
     & 0.3494800E+00, 0.3839800E+00, 0.4298800E+00, 0.5016700E+00, &
     & 0.5733200E+00, 0.6448000E+00, 0.5819600E+00, 0.5819600E+00 /
      data (ref_adm(11,iz,34,16),iz = 1,20) / &
     & 0.1928000E+00, 0.1928000E+00, 0.1903400E+00, 0.2026000E+00, &
     & 0.2132700E+00, 0.2214700E+00, 0.2384000E+00, 0.2549900E+00, &
     & 0.2751800E+00, 0.2922900E+00, 0.3226500E+00, 0.3379900E+00, &
     & 0.3674000E+00, 0.4076700E+00, 0.4448400E+00, 0.4993500E+00, &
     & 0.5859700E+00, 0.6936600E+00, 0.5908400E+00, 0.5908400E+00 /
      data (ref_adm(11,iz,35,16),iz = 1,20) / &
     & 0.1872900E+00, 0.1872900E+00, 0.2247300E+00, 0.1921800E+00, &
     & 0.2099300E+00, 0.2066600E+00, 0.2233200E+00, 0.2742800E+00, &
     & 0.2562600E+00, 0.2951700E+00, 0.3145800E+00, 0.3604000E+00, &
     & 0.3820400E+00, 0.4251300E+00, 0.4581300E+00, 0.5163400E+00, &
     & 0.5971700E+00, 0.6389500E+00, 0.5594600E+00, 0.5594600E+00 /
      data (ref_adm(11,iz,36,16),iz = 1,20) / &
     & 0.2140800E+00, 0.2140800E+00, 0.2224200E+00, 0.2123500E+00, &
     & 0.2022000E+00, 0.2047100E+00, 0.2221000E+00, 0.2539800E+00, &
     & 0.2695100E+00, 0.2849900E+00, 0.3250400E+00, 0.3517400E+00, &
     & 0.3987000E+00, 0.4319400E+00, 0.4779000E+00, 0.5595800E+00, &
     & 0.6282400E+00, 0.6775700E+00, 0.5660700E+00, 0.5660700E+00 /
      data (ref_adm(11,iz,37,16),iz = 1,20) / &
     & 0.2100500E+00, 0.2100500E+00, 0.1889600E+00, 0.1872000E+00, &
     & 0.1943500E+00, 0.2069200E+00, 0.2122500E+00, 0.2471000E+00, &
     & 0.2802000E+00, 0.2978700E+00, 0.3369800E+00, 0.3564700E+00, &
     & 0.3923000E+00, 0.4303800E+00, 0.4947100E+00, 0.5896400E+00, &
     & 0.6531200E+00, 0.6814100E+00, 0.6237100E+00, 0.6237100E+00 /
      data (ref_adm(11,iz,38,16),iz = 1,20) / &
     & 0.2100500E+00, 0.2100500E+00, 0.1889600E+00, 0.1872000E+00, &
     & 0.1943500E+00, 0.2069200E+00, 0.2122500E+00, 0.2471000E+00, &
     & 0.2802000E+00, 0.2978700E+00, 0.3369800E+00, 0.3564700E+00, &
     & 0.3923000E+00, 0.4303800E+00, 0.4947100E+00, 0.5896400E+00, &
     & 0.6531200E+00, 0.6814100E+00, 0.6237100E+00, 0.6237100E+00 /
! Solar Zenith Angle 80.0 Albedo  0.3438672E+00
      data (ref_adm(11,iz, 1,17),iz = 1,20) / &
     & 0.1880500E+00, 0.1880500E+00, 0.2100500E+00, 0.1997700E+00, &
     & 0.1952400E+00, 0.2012700E+00, 0.2076100E+00, 0.2523300E+00, &
     & 0.2540400E+00, 0.3017500E+00, 0.3851500E+00, 0.4140000E+00, &
     & 0.4721791E+00, 0.6027499E+00, 0.9533077E+00, 0.1809631E+01, &
     & 0.1959772E+01, 0.2197216E+01, 0.5318059E+01, 0.5318059E+01 /
      data (ref_adm(11,iz, 2,17),iz = 1,20) / &
     & 0.1880500E+00, 0.1880500E+00, 0.2100500E+00, 0.1997700E+00, &
     & 0.1952400E+00, 0.2012700E+00, 0.2076100E+00, 0.2523300E+00, &
     & 0.2540400E+00, 0.3017500E+00, 0.3851500E+00, 0.4140000E+00, &
     & 0.4721791E+00, 0.6027499E+00, 0.9533077E+00, 0.1809631E+01, &
     & 0.1959772E+01, 0.2197216E+01, 0.5318059E+01, 0.5318059E+01 /
      data (ref_adm(11,iz, 3,17),iz = 1,20) / &
     & 0.1910100E+00, 0.1910100E+00, 0.2060300E+00, 0.1870700E+00, &
     & 0.1885600E+00, 0.2098600E+00, 0.2296400E+00, 0.2252300E+00, &
     & 0.2665900E+00, 0.2913300E+00, 0.3404900E+00, 0.4273800E+00, &
     & 0.4663414E+00, 0.5884409E+00, 0.9018446E+00, 0.1782135E+01, &
     & 0.2066771E+01, 0.2178926E+01, 0.6285304E-07, 0.6285304E-07 /
      data (ref_adm(11,iz, 4,17),iz = 1,20) / &
     & 0.1810500E+00, 0.1810500E+00, 0.2047200E+00, 0.1813600E+00, &
     & 0.2140600E+00, 0.2324100E+00, 0.2323400E+00, 0.2579400E+00, &
     & 0.3243700E+00, 0.3138200E+00, 0.3327500E+00, 0.4281200E+00, &
     & 0.4558937E+00, 0.5621471E+00, 0.8121816E+00, 0.1530603E+01, &
     & 0.2340194E+01, 0.2524397E+01, 0.3367829E+01, 0.3367829E+01 /
      data (ref_adm(11,iz, 5,17),iz = 1,20) / &
     & 0.1832400E+00, 0.1832400E+00, 0.1827400E+00, 0.2271600E+00, &
     & 0.2132000E+00, 0.2409600E+00, 0.2290100E+00, 0.2563800E+00, &
     & 0.2573100E+00, 0.3147300E+00, 0.3691200E+00, 0.4636600E+00, &
     & 0.4447532E+00, 0.5307219E+00, 0.7211893E+00, 0.1171383E+01, &
     & 0.2202059E+01, 0.3521850E+01, 0.4044195E+01, 0.4044195E+01 /
      data (ref_adm(11,iz, 6,17),iz = 1,20) / &
     & 0.1868900E+00, 0.1868900E+00, 0.2016100E+00, 0.2136200E+00, &
     & 0.2269500E+00, 0.2189200E+00, 0.2361900E+00, 0.2573400E+00, &
     & 0.2890100E+00, 0.3064900E+00, 0.3580400E+00, 0.4122000E+00, &
     & 0.4827000E+00, 0.5645400E+00, 0.7529100E+00, 0.8583700E+00, &
     & 0.1073600E+01, 0.1138700E+01, 0.5751176E+01, 0.5751176E+01 /
      data (ref_adm(11,iz, 7,17),iz = 1,20) / &
     & 0.2005500E+00, 0.2005500E+00, 0.1923900E+00, 0.1782200E+00, &
     & 0.1954200E+00, 0.1892900E+00, 0.2202800E+00, 0.2224300E+00, &
     & 0.2422800E+00, 0.3137700E+00, 0.3152400E+00, 0.3801200E+00, &
     & 0.4836500E+00, 0.6640500E+00, 0.6752700E+00, 0.9571700E+00, &
     & 0.1250200E+01, 0.1212500E+01, 0.1176300E+01, 0.1176300E+01 /
      data (ref_adm(11,iz, 8,17),iz = 1,20) / &
     & 0.1724500E+00, 0.1724500E+00, 0.1694200E+00, 0.1889800E+00, &
     & 0.2168100E+00, 0.1936000E+00, 0.2215500E+00, 0.2250900E+00, &
     & 0.2362900E+00, 0.3151100E+00, 0.3340700E+00, 0.4367600E+00, &
     & 0.4440600E+00, 0.5675400E+00, 0.6631600E+00, 0.8385400E+00, &
     & 0.9121500E+00, 0.1317000E+01, 0.9116500E+00, 0.9116500E+00 /
      data (ref_adm(11,iz, 9,17),iz = 1,20) / &
     & 0.1827000E+00, 0.1827000E+00, 0.1839200E+00, 0.1709700E+00, &
     & 0.1823500E+00, 0.2043700E+00, 0.1941600E+00, 0.2546900E+00, &
     & 0.2665000E+00, 0.2818600E+00, 0.3307200E+00, 0.3656500E+00, &
     & 0.4116600E+00, 0.5400300E+00, 0.5845500E+00, 0.7598900E+00, &
     & 0.8442200E+00, 0.1088600E+01, 0.1966839E+01, 0.1966839E+01 /
      data (ref_adm(11,iz,10,17),iz = 1,20) / &
     & 0.2039000E+00, 0.2039000E+00, 0.1818500E+00, 0.2282900E+00, &
     & 0.1918400E+00, 0.2036000E+00, 0.2215900E+00, 0.1977700E+00, &
     & 0.3011600E+00, 0.2392900E+00, 0.2785800E+00, 0.3344800E+00, &
     & 0.3147300E+00, 0.4697000E+00, 0.5512500E+00, 0.6155100E+00, &
     & 0.7519600E+00, 0.9498600E+00, 0.1784664E+01, 0.1784664E+01 /
      data (ref_adm(11,iz,11,17),iz = 1,20) / &
     & 0.1464200E+00, 0.1464200E+00, 0.1784300E+00, 0.1943600E+00, &
     & 0.1846100E+00, 0.1721900E+00, 0.2016000E+00, 0.2242300E+00, &
     & 0.2424100E+00, 0.2523300E+00, 0.2814400E+00, 0.2921400E+00, &
     & 0.4353600E+00, 0.3937000E+00, 0.4813400E+00, 0.5582100E+00, &
     & 0.7076800E+00, 0.1045130E+01, 0.1665045E+01, 0.1665045E+01 /
      data (ref_adm(11,iz,12,17),iz = 1,20) / &
     & 0.1889900E+00, 0.1889900E+00, 0.1812900E+00, 0.1616900E+00, &
     & 0.2200800E+00, 0.1774800E+00, 0.1723100E+00, 0.2260300E+00, &
     & 0.2448700E+00, 0.2679200E+00, 0.2561500E+00, 0.2787400E+00, &
     & 0.3648400E+00, 0.3860700E+00, 0.4208000E+00, 0.4878200E+00, &
     & 0.5670100E+00, 0.6473800E+00, 0.1501439E+01, 0.1501439E+01 /
      data (ref_adm(11,iz,13,17),iz = 1,20) / &
     & 0.2007400E+00, 0.2007400E+00, 0.1972800E+00, 0.1892500E+00, &
     & 0.2434500E+00, 0.1910600E+00, 0.2016100E+00, 0.2641200E+00, &
     & 0.2794700E+00, 0.2948800E+00, 0.3155700E+00, 0.2972000E+00, &
     & 0.3559300E+00, 0.3683000E+00, 0.4036400E+00, 0.4395900E+00, &
     & 0.5452300E+00, 0.5752500E+00, 0.1398073E+01, 0.1398073E+01 /
      data (ref_adm(11,iz,14,17),iz = 1,20) / &
     & 0.1828800E+00, 0.1828800E+00, 0.2035600E+00, 0.2022100E+00, &
     & 0.2145700E+00, 0.2084000E+00, 0.2301600E+00, 0.2067100E+00, &
     & 0.2491600E+00, 0.2980500E+00, 0.3295600E+00, 0.2812800E+00, &
     & 0.2849400E+00, 0.3153500E+00, 0.3341500E+00, 0.3798700E+00, &
     & 0.5239200E+00, 0.8667697E+00, 0.1329093E+01, 0.1329093E+01 /
      data (ref_adm(11,iz,15,17),iz = 1,20) / &
     & 0.1881600E+00, 0.1881600E+00, 0.1891800E+00, 0.1925500E+00, &
     & 0.2080800E+00, 0.2081200E+00, 0.2083900E+00, 0.2175700E+00, &
     & 0.2301000E+00, 0.2386100E+00, 0.2530700E+00, 0.2625300E+00, &
     & 0.2785200E+00, 0.2929200E+00, 0.3571300E+00, 0.4200300E+00, &
     & 0.6279085E+00, 0.8397568E+00, 0.1276375E+01, 0.1276375E+01 /
      data (ref_adm(11,iz,16,17),iz = 1,20) / &
     & 0.1900500E+00, 0.1900500E+00, 0.1734700E+00, 0.1711000E+00, &
     & 0.1795100E+00, 0.1842500E+00, 0.1835300E+00, 0.1925300E+00, &
     & 0.2012300E+00, 0.2111700E+00, 0.2238500E+00, 0.2397700E+00, &
     & 0.2686400E+00, 0.2867600E+00, 0.3470900E+00, 0.4346000E+00, &
     & 0.4853400E+00, 0.8148499E+00, 0.1230785E+01, 0.1230785E+01 /
      data (ref_adm(11,iz,17,17),iz = 1,20) / &
     & 0.2021200E+00, 0.2021200E+00, 0.1858400E+00, 0.1807700E+00, &
     & 0.1806400E+00, 0.1888000E+00, 0.1945800E+00, 0.1991100E+00, &
     & 0.2098700E+00, 0.2737600E+00, 0.2361500E+00, 0.2659300E+00, &
     & 0.2640000E+00, 0.2938400E+00, 0.3243800E+00, 0.3756800E+00, &
     & 0.5905924E+00, 0.7854963E+00, 0.1178529E+01, 0.1178529E+01 /
      data (ref_adm(11,iz,18,17),iz = 1,20) / &
     & 0.2052800E+00, 0.2052800E+00, 0.2092200E+00, 0.1974200E+00, &
     & 0.2090000E+00, 0.1765600E+00, 0.2200800E+00, 0.2527800E+00, &
     & 0.2547900E+00, 0.2806700E+00, 0.2292300E+00, 0.2416600E+00, &
     & 0.2760200E+00, 0.2819000E+00, 0.3212900E+00, 0.3434600E+00, &
     & 0.4117524E+00, 0.4745705E+00, 0.5295122E+00, 0.5295122E+00 /
      data (ref_adm(11,iz,19,17),iz = 1,20) / &
     & 0.1891200E+00, 0.1891200E+00, 0.1772600E+00, 0.1872600E+00, &
     & 0.1749900E+00, 0.2153300E+00, 0.1977300E+00, 0.2387500E+00, &
     & 0.2308000E+00, 0.2378100E+00, 0.2210400E+00, 0.2362300E+00, &
     & 0.2573800E+00, 0.2835400E+00, 0.3302700E+00, 0.3630613E+00, &
     & 0.4049402E+00, 0.4644191E+00, 0.5161854E+00, 0.5161854E+00 /
      data (ref_adm(11,iz,20,17),iz = 1,20) / &
     & 0.1900400E+00, 0.1900400E+00, 0.2212900E+00, 0.1786500E+00, &
     & 0.2208400E+00, 0.1864400E+00, 0.1780300E+00, 0.2231800E+00, &
     & 0.2226000E+00, 0.2139700E+00, 0.2342000E+00, 0.2248300E+00, &
     & 0.2623600E+00, 0.2662900E+00, 0.3137800E+00, 0.3593766E+00, &
     & 0.4005160E+00, 0.4581841E+00, 0.5083811E+00, 0.5083811E+00 /
      data (ref_adm(11,iz,21,17),iz = 1,20) / &
     & 0.1960300E+00, 0.1960300E+00, 0.2117900E+00, 0.2106300E+00, &
     & 0.2506800E+00, 0.2233300E+00, 0.2397500E+00, 0.2263100E+00, &
     & 0.2247400E+00, 0.2446000E+00, 0.2353800E+00, 0.2292000E+00, &
     & 0.2520100E+00, 0.2780600E+00, 0.3295100E+00, 0.3572769E+00, &
     & 0.3974493E+00, 0.4535225E+00, 0.5036810E+00, 0.5036810E+00 /
      data (ref_adm(11,iz,22,17),iz = 1,20) / &
     & 0.1876400E+00, 0.1876400E+00, 0.1842900E+00, 0.2020400E+00, &
     & 0.1868800E+00, 0.2387900E+00, 0.2142000E+00, 0.1913700E+00, &
     & 0.2861000E+00, 0.2470100E+00, 0.2256000E+00, 0.2672400E+00, &
     & 0.2603200E+00, 0.2791200E+00, 0.3160000E+00, 0.2933700E+00, &
     & 0.4449511E+00, 0.5188033E+00, 0.6023223E+00, 0.6023223E+00 /
      data (ref_adm(11,iz,23,17),iz = 1,20) / &
     & 0.1726600E+00, 0.1726600E+00, 0.1775300E+00, 0.1828600E+00, &
     & 0.1856900E+00, 0.1859300E+00, 0.1909400E+00, 0.2012100E+00, &
     & 0.2095800E+00, 0.2149700E+00, 0.2443500E+00, 0.2459900E+00, &
     & 0.2694100E+00, 0.3062200E+00, 0.3178600E+00, 0.3840600E+00, &
     & 0.4452313E+00, 0.5176821E+00, 0.6035877E+00, 0.6035877E+00 /
      data (ref_adm(11,iz,24,17),iz = 1,20) / &
     & 0.2042500E+00, 0.2042500E+00, 0.2010200E+00, 0.1924400E+00, &
     & 0.1939600E+00, 0.1981100E+00, 0.2134700E+00, 0.2219100E+00, &
     & 0.2299000E+00, 0.2484100E+00, 0.2554600E+00, 0.2632400E+00, &
     & 0.2890800E+00, 0.3154000E+00, 0.3315600E+00, 0.3625600E+00, &
     & 0.4477673E+00, 0.5205649E+00, 0.6105989E+00, 0.6105989E+00 /
      data (ref_adm(11,iz,25,17),iz = 1,20) / &
     & 0.2223900E+00, 0.2223900E+00, 0.1985900E+00, 0.1886600E+00, &
     & 0.2265000E+00, 0.2198800E+00, 0.2316000E+00, 0.2251300E+00, &
     & 0.2261500E+00, 0.2410100E+00, 0.2565900E+00, 0.2808200E+00, &
     & 0.2898500E+00, 0.3176300E+00, 0.3414800E+00, 0.4017100E+00, &
     & 0.4644300E+00, 0.5259914E+00, 0.6209823E+00, 0.6209823E+00 /
      data (ref_adm(11,iz,26,17),iz = 1,20) / &
     & 0.2165600E+00, 0.2165600E+00, 0.1994300E+00, 0.1922000E+00, &
     & 0.1953800E+00, 0.1907100E+00, 0.2323000E+00, 0.2429900E+00, &
     & 0.2208800E+00, 0.2392200E+00, 0.2370400E+00, 0.2804400E+00, &
     & 0.2931100E+00, 0.3240300E+00, 0.3839300E+00, 0.4274600E+00, &
     & 0.4793100E+00, 0.6056300E+00, 0.6387026E+00, 0.6387026E+00 /
      data (ref_adm(11,iz,27,17),iz = 1,20) / &
     & 0.1884500E+00, 0.1884500E+00, 0.1993700E+00, 0.1667300E+00, &
     & 0.2046700E+00, 0.2122500E+00, 0.2074500E+00, 0.2149000E+00, &
     & 0.2028200E+00, 0.2409400E+00, 0.2752900E+00, 0.2787900E+00, &
     & 0.3198000E+00, 0.3361200E+00, 0.3755900E+00, 0.4370900E+00, &
     & 0.4911600E+00, 0.5645400E+00, 0.6612317E+00, 0.6612317E+00 /
      data (ref_adm(11,iz,28,17),iz = 1,20) / &
     & 0.1825100E+00, 0.1825100E+00, 0.1830500E+00, 0.1848300E+00, &
     & 0.2051400E+00, 0.2207500E+00, 0.1937400E+00, 0.2244700E+00, &
     & 0.2288300E+00, 0.2711800E+00, 0.3219100E+00, 0.3203900E+00, &
     & 0.3073000E+00, 0.3547000E+00, 0.4018800E+00, 0.4537800E+00, &
     & 0.5017300E+00, 0.6169500E+00, 0.6852151E+00, 0.6852151E+00 /
      data (ref_adm(11,iz,29,17),iz = 1,20) / &
     & 0.1654400E+00, 0.1654400E+00, 0.1787200E+00, 0.1876600E+00, &
     & 0.1885200E+00, 0.2136700E+00, 0.2108600E+00, 0.2083700E+00, &
     & 0.2338400E+00, 0.2526600E+00, 0.2822000E+00, 0.2903000E+00, &
     & 0.3330800E+00, 0.3587800E+00, 0.4203100E+00, 0.4778100E+00, &
     & 0.5327600E+00, 0.6679900E+00, 0.7173300E+00, 0.7173300E+00 /
      data (ref_adm(11,iz,30,17),iz = 1,20) / &
     & 0.1744800E+00, 0.1744800E+00, 0.1737800E+00, 0.1790200E+00, &
     & 0.2055500E+00, 0.2031700E+00, 0.2339500E+00, 0.2688100E+00, &
     & 0.2408100E+00, 0.2659500E+00, 0.2417500E+00, 0.3073600E+00, &
     & 0.3284100E+00, 0.3684000E+00, 0.4240400E+00, 0.5011400E+00, &
     & 0.5639000E+00, 0.6433500E+00, 0.6583300E+00, 0.6583300E+00 /
      data (ref_adm(11,iz,31,17),iz = 1,20) / &
     & 0.1988000E+00, 0.1988000E+00, 0.1736600E+00, 0.1999000E+00, &
     & 0.1824300E+00, 0.2186700E+00, 0.2155500E+00, 0.2352500E+00, &
     & 0.2608600E+00, 0.2656500E+00, 0.3347400E+00, 0.3004700E+00, &
     & 0.3302300E+00, 0.3805100E+00, 0.4294700E+00, 0.5215500E+00, &
     & 0.5746300E+00, 0.6927000E+00, 0.6089600E+00, 0.6089600E+00 /
      data (ref_adm(11,iz,32,17),iz = 1,20) / &
     & 0.1860500E+00, 0.1860500E+00, 0.1964800E+00, 0.2029200E+00, &
     & 0.1804100E+00, 0.1992300E+00, 0.2039500E+00, 0.2489700E+00, &
     & 0.2398700E+00, 0.2708900E+00, 0.3079700E+00, 0.3379700E+00, &
     & 0.3859300E+00, 0.4031300E+00, 0.4543500E+00, 0.5354100E+00, &
     & 0.6541300E+00, 0.7076900E+00, 0.7420600E+00, 0.7420600E+00 /
      data (ref_adm(11,iz,33,17),iz = 1,20) / &
     & 0.2000200E+00, 0.2000200E+00, 0.1987000E+00, 0.1966400E+00, &
     & 0.2153800E+00, 0.2396100E+00, 0.2384400E+00, 0.2573400E+00, &
     & 0.2774600E+00, 0.2995900E+00, 0.3218100E+00, 0.3487000E+00, &
     & 0.3784800E+00, 0.4479800E+00, 0.4776000E+00, 0.5575900E+00, &
     & 0.6599400E+00, 0.8026600E+00, 0.7298000E+00, 0.7298000E+00 /
      data (ref_adm(11,iz,34,17),iz = 1,20) / &
     & 0.1998800E+00, 0.1998800E+00, 0.2078100E+00, 0.2086200E+00, &
     & 0.2078200E+00, 0.2166100E+00, 0.2278400E+00, 0.2391500E+00, &
     & 0.2671800E+00, 0.2866600E+00, 0.3354300E+00, 0.3574800E+00, &
     & 0.3892100E+00, 0.4358300E+00, 0.4886400E+00, 0.5592300E+00, &
     & 0.6911900E+00, 0.7623600E+00, 0.7691400E+00, 0.7691400E+00 /
      data (ref_adm(11,iz,35,17),iz = 1,20) / &
     & 0.1861900E+00, 0.1861900E+00, 0.2026900E+00, 0.1922200E+00, &
     & 0.1870800E+00, 0.1989100E+00, 0.2517500E+00, 0.2341100E+00, &
     & 0.2764000E+00, 0.2905100E+00, 0.3239500E+00, 0.3443100E+00, &
     & 0.3950800E+00, 0.4260500E+00, 0.4860400E+00, 0.5887100E+00, &
     & 0.6817800E+00, 0.8166900E+00, 0.8259400E+00, 0.8259400E+00 /
      data (ref_adm(11,iz,36,17),iz = 1,20) / &
     & 0.1828200E+00, 0.1828200E+00, 0.1853200E+00, 0.1917600E+00, &
     & 0.2056700E+00, 0.2248400E+00, 0.2453300E+00, 0.2523900E+00, &
     & 0.2977200E+00, 0.3109600E+00, 0.3001000E+00, 0.3521500E+00, &
     & 0.4046900E+00, 0.4432900E+00, 0.4919700E+00, 0.5700700E+00, &
     & 0.7000600E+00, 0.8222900E+00, 0.8414400E+00, 0.8414400E+00 /
      data (ref_adm(11,iz,37,17),iz = 1,20) / &
     & 0.1871700E+00, 0.1871700E+00, 0.1909500E+00, 0.2076800E+00, &
     & 0.1963600E+00, 0.2230700E+00, 0.2336400E+00, 0.2727000E+00, &
     & 0.2652300E+00, 0.2885600E+00, 0.3434000E+00, 0.3535400E+00, &
     & 0.3868700E+00, 0.4501300E+00, 0.5112500E+00, 0.5941400E+00, &
     & 0.7176000E+00, 0.8658300E+00, 0.8705500E+00, 0.8705500E+00 /
      data (ref_adm(11,iz,38,17),iz = 1,20) / &
     & 0.1871700E+00, 0.1871700E+00, 0.1909500E+00, 0.2076800E+00, &
     & 0.1963600E+00, 0.2230700E+00, 0.2336400E+00, 0.2727000E+00, &
     & 0.2652300E+00, 0.2885600E+00, 0.3434000E+00, 0.3535400E+00, &
     & 0.3868700E+00, 0.4501300E+00, 0.5112500E+00, 0.5941400E+00, &
     & 0.7176000E+00, 0.8658300E+00, 0.8705500E+00, 0.8705500E+00 /
! Solar Zenith Angle 85.0 Albedo  0.4619112E+00
      data (ref_adm(11,iz, 1,18),iz = 1,20) / &
     & 0.2472300E+00, 0.2472300E+00, 0.1932300E+00, 0.2046100E+00, &
     & 0.2436800E+00, 0.2798457E+00, 0.2524500E+00, 0.3412900E+00, &
     & 0.4758000E+00, 0.3511900E+00, 0.4376534E+00, 0.7210000E+00, &
     & 0.6741766E+00, 0.8178909E+00, 0.1162428E+01, 0.2077433E+01, &
     & 0.3922429E+01, 0.3884663E+01, 0.2754834E+01, 0.2754834E+01 /
      data (ref_adm(11,iz, 2,18),iz = 1,20) / &
     & 0.2472300E+00, 0.2472300E+00, 0.1932300E+00, 0.2046100E+00, &
     & 0.2436800E+00, 0.2798457E+00, 0.2524500E+00, 0.3412900E+00, &
     & 0.4758000E+00, 0.3511900E+00, 0.4376534E+00, 0.7210000E+00, &
     & 0.6741766E+00, 0.8178909E+00, 0.1162428E+01, 0.2077433E+01, &
     & 0.3922429E+01, 0.3884663E+01, 0.2754834E+01, 0.2754834E+01 /
      data (ref_adm(11,iz, 3,18),iz = 1,20) / &
     & 0.1851500E+00, 0.1851500E+00, 0.2134000E+00, 0.2269100E+00, &
     & 0.2232500E+00, 0.2843000E+00, 0.2885100E+00, 0.3124200E+00, &
     & 0.3496880E+00, 0.3479400E+00, 0.4267900E+00, 0.6529700E+00, &
     & 0.6686063E+00, 0.8052344E+00, 0.1123246E+01, 0.1935239E+01, &
     & 0.3805412E+01, 0.4182270E+01, 0.4244499E-07, 0.4244499E-07 /
      data (ref_adm(11,iz, 4,18),iz = 1,20) / &
     & 0.2206000E+00, 0.2206000E+00, 0.1886500E+00, 0.2464726E+00, &
     & 0.2268800E+00, 0.2141800E+00, 0.2841200E+00, 0.3302500E+00, &
     & 0.3202400E+00, 0.3814300E+00, 0.4405300E+00, 0.6580700E+00, &
     & 0.6573899E+00, 0.7821211E+00, 0.1051761E+01, 0.1682470E+01, &
     & 0.3102955E+01, 0.4706954E+01, 0.3282505E+01, 0.3282505E+01 /
      data (ref_adm(11,iz, 5,18),iz = 1,20) / &
     & 0.2111300E+00, 0.2111300E+00, 0.2352438E+00, 0.1890100E+00, &
     & 0.2599313E+00, 0.2781710E+00, 0.2989329E+00, 0.2920600E+00, &
     & 0.3630800E+00, 0.3435000E+00, 0.4900500E+00, 0.5604200E+00, &
     & 0.6424536E+00, 0.7561393E+00, 0.9675239E+00, 0.1424904E+01, &
     & 0.2285366E+01, 0.4499026E+01, 0.4519068E+01, 0.4519068E+01 /
      data (ref_adm(11,iz, 6,18),iz = 1,20) / &
     & 0.2173600E+00, 0.2173600E+00, 0.1922700E+00, 0.2049300E+00, &
     & 0.2126800E+00, 0.2454300E+00, 0.2466600E+00, 0.2877600E+00, &
     & 0.3305100E+00, 0.3744700E+00, 0.4629300E+00, 0.5903300E+00, &
     & 0.6199585E+00, 0.9806100E+00, 0.8947718E+00, 0.1218821E+01, &
     & 0.1751756E+01, 0.2901108E+01, 0.3810918E+01, 0.3810918E+01 /
      data (ref_adm(11,iz, 7,18),iz = 1,20) / &
     & 0.1881900E+00, 0.1881900E+00, 0.2343843E+00, 0.2425000E+00, &
     & 0.2746000E+00, 0.2466300E+00, 0.3200700E+00, 0.3809700E+00, &
     & 0.3086500E+00, 0.3802100E+00, 0.3815700E+00, 0.4456100E+00, &
     & 0.5875046E+00, 0.6981361E+00, 0.1119800E+01, 0.1379500E+01, &
     & 0.1929700E+01, 0.1900300E+01, 0.2342576E+01, 0.2342576E+01 /
      data (ref_adm(11,iz, 8,18),iz = 1,20) / &
     & 0.1745900E+00, 0.1745900E+00, 0.2462500E+00, 0.2191100E+00, &
     & 0.2051700E+00, 0.2437300E+00, 0.3005800E+00, 0.2678000E+00, &
     & 0.2988800E+00, 0.2997800E+00, 0.4015965E+00, 0.5185100E+00, &
     & 0.7745300E+00, 0.6518700E+00, 0.1011700E+01, 0.1252600E+01, &
     & 0.1637900E+01, 0.1829800E+01, 0.1619100E+01, 0.1619100E+01 /
      data (ref_adm(11,iz, 9,18),iz = 1,20) / &
     & 0.1925400E+00, 0.1925400E+00, 0.2353500E+00, 0.2387400E+00, &
     & 0.2090600E+00, 0.2700267E+00, 0.1861300E+00, 0.2483500E+00, &
     & 0.3348424E+00, 0.3500400E+00, 0.3660900E+00, 0.4185100E+00, &
     & 0.5259670E+00, 0.6480200E+00, 0.8141700E+00, 0.1301900E+01, &
     & 0.1609600E+01, 0.1985900E+01, 0.1523600E+01, 0.1523600E+01 /
      data (ref_adm(11,iz,10,18),iz = 1,20) / &
     & 0.2125100E+00, 0.2125100E+00, 0.2189300E+00, 0.2391000E+00, &
     & 0.2957200E+00, 0.2083400E+00, 0.2064600E+00, 0.2155600E+00, &
     & 0.2821400E+00, 0.3446700E+00, 0.3760600E+00, 0.4248100E+00, &
     & 0.5041165E+00, 0.6473000E+00, 0.7340300E+00, 0.1194600E+01, &
     & 0.1468000E+01, 0.2259200E+01, 0.1321049E+01, 0.1321049E+01 /
      data (ref_adm(11,iz,11,18),iz = 1,20) / &
     & 0.2315800E+00, 0.2315800E+00, 0.2385300E+00, 0.2560900E+00, &
     & 0.2306100E+00, 0.2050600E+00, 0.2432300E+00, 0.2215600E+00, &
     & 0.3248451E+00, 0.4082900E+00, 0.3420300E+00, 0.3773900E+00, &
     & 0.4868587E+00, 0.9362500E+00, 0.8114600E+00, 0.1155600E+01, &
     & 0.1600000E+01, 0.1481900E+01, 0.1208190E+01, 0.1208190E+01 /
      data (ref_adm(11,iz,12,18),iz = 1,20) / &
     & 0.2234100E+00, 0.2234100E+00, 0.2979700E+00, 0.2874800E+00, &
     & 0.2489980E+00, 0.2226800E+00, 0.2646000E+00, 0.3134200E+00, &
     & 0.3185523E+00, 0.3408000E+00, 0.3070600E+00, 0.3047600E+00, &
     & 0.4745345E+00, 0.5735700E+00, 0.7302100E+00, 0.8124900E+00, &
     & 0.1294500E+01, 0.1444700E+01, 0.1087905E+01, 0.1087905E+01 /
      data (ref_adm(11,iz,13,18),iz = 1,20) / &
     & 0.2148700E+00, 0.2148700E+00, 0.2491800E+00, 0.2245100E+00, &
     & 0.2468121E+00, 0.2513800E+00, 0.2731762E+00, 0.2854300E+00, &
     & 0.2912000E+00, 0.3141100E+00, 0.3537900E+00, 0.3763900E+00, &
     & 0.7105400E+00, 0.5121436E+00, 0.7875900E+00, 0.7703100E+00, &
     & 0.8169400E+00, 0.9216678E+00, 0.1012051E+01, 0.1012051E+01 /
      data (ref_adm(11,iz,14,18),iz = 1,20) / &
     & 0.2283600E+00, 0.2283600E+00, 0.1931900E+00, 0.2315000E+00, &
     & 0.2463000E+00, 0.2442300E+00, 0.2208300E+00, 0.2546000E+00, &
     & 0.2981200E+00, 0.2789500E+00, 0.2942000E+00, 0.3158500E+00, &
     & 0.5311100E+00, 0.5323400E+00, 0.6086600E+00, 0.6690000E+00, &
     & 0.7540376E+00, 0.8774302E+00, 0.9620888E+00, 0.9620888E+00 /
      data (ref_adm(11,iz,15,18),iz = 1,20) / &
     & 0.2159900E+00, 0.2159900E+00, 0.2166300E+00, 0.2158900E+00, &
     & 0.2232400E+00, 0.2237000E+00, 0.2489300E+00, 0.2495800E+00, &
     & 0.2666900E+00, 0.2734900E+00, 0.2939000E+00, 0.2972500E+00, &
     & 0.3088800E+00, 0.3292100E+00, 0.5894500E+00, 0.6605700E+00, &
     & 0.7279477E+00, 0.8453528E+00, 0.9245359E+00, 0.9245359E+00 /
      data (ref_adm(11,iz,16,18),iz = 1,20) / &
     & 0.2335800E+00, 0.2335800E+00, 0.2496100E+00, 0.2316400E+00, &
     & 0.2048000E+00, 0.1948600E+00, 0.2147400E+00, 0.2355000E+00, &
     & 0.2306800E+00, 0.2519700E+00, 0.2560100E+00, 0.2553900E+00, &
     & 0.2915200E+00, 0.2913200E+00, 0.5684600E+00, 0.6744300E+00, &
     & 0.6978186E+00, 0.8119463E+00, 0.8910877E+00, 0.8910877E+00 /
      data (ref_adm(11,iz,17,18),iz = 1,20) / &
     & 0.2252300E+00, 0.2252300E+00, 0.2264771E+00, 0.1981000E+00, &
     & 0.2080200E+00, 0.2033600E+00, 0.2186700E+00, 0.2249900E+00, &
     & 0.2865001E+00, 0.3083300E+00, 0.2941600E+00, 0.2605700E+00, &
     & 0.4062205E+00, 0.4466337E+00, 0.4797200E+00, 0.5825540E+00, &
     & 0.6657662E+00, 0.7725751E+00, 0.8515469E+00, 0.8515469E+00 /
      data (ref_adm(11,iz,18,18),iz = 1,20) / &
     & 0.2407900E+00, 0.2407900E+00, 0.1915600E+00, 0.2285900E+00, &
     & 0.2273000E+00, 0.2489800E+00, 0.2383700E+00, 0.2296300E+00, &
     & 0.2759000E+00, 0.3068800E+00, 0.2827800E+00, 0.2795300E+00, &
     & 0.4052400E+00, 0.4536600E+00, 0.4513500E+00, 0.5569927E+00, &
     & 0.6817086E+00, 0.9213905E+00, 0.1479802E+01, 0.1479802E+01 /
      data (ref_adm(11,iz,19,18),iz = 1,20) / &
     & 0.2712000E+00, 0.2712000E+00, 0.1779400E+00, 0.2095800E+00, &
     & 0.2522300E+00, 0.2287991E+00, 0.2253400E+00, 0.2401900E+00, &
     & 0.2233900E+00, 0.2751573E+00, 0.3031500E+00, 0.2832500E+00, &
     & 0.4611700E+00, 0.3968640E+00, 0.4539858E+00, 0.5430245E+00, &
     & 0.6626463E+00, 0.8927489E+00, 0.1431545E+01, 0.1431545E+01 /
      data (ref_adm(11,iz,20,18),iz = 1,20) / &
     & 0.2031100E+00, 0.2031100E+00, 0.1974800E+00, 0.2227400E+00, &
     & 0.1921800E+00, 0.2180600E+00, 0.2430800E+00, 0.2201500E+00, &
     & 0.2554700E+00, 0.2422000E+00, 0.2504900E+00, 0.3076300E+00, &
     & 0.4670800E+00, 0.4690200E+00, 0.3518400E+00, 0.5341294E+00, &
     & 0.6506098E+00, 0.8736671E+00, 0.1404350E+01, 0.1404350E+01 /
      data (ref_adm(11,iz,21,18),iz = 1,20) / &
     & 0.2106700E+00, 0.2106700E+00, 0.2332000E+00, 0.1872100E+00, &
     & 0.1953600E+00, 0.2551000E+00, 0.2482600E+00, 0.2540900E+00, &
     & 0.2563864E+00, 0.2462500E+00, 0.2250000E+00, 0.3172383E+00, &
     & 0.5316900E+00, 0.3874426E+00, 0.4422919E+00, 0.5272855E+00, &
     & 0.6417455E+00, 0.8606117E+00, 0.1388952E+01, 0.1388952E+01 /
      data (ref_adm(11,iz,22,18),iz = 1,20) / &
     & 0.2113100E+00, 0.2113100E+00, 0.2405779E+00, 0.1804700E+00, &
     & 0.2362700E+00, 0.2421400E+00, 0.2668100E+00, 0.2471900E+00, &
     & 0.2140000E+00, 0.2289800E+00, 0.2383600E+00, 0.3507706E+00, &
     & 0.3546600E+00, 0.4087048E+00, 0.3795700E+00, 0.5000162E+00, &
     & 0.5619711E+00, 0.6690576E+00, 0.1009215E+01, 0.1009215E+01 /
      data (ref_adm(11,iz,23,18),iz = 1,20) / &
     & 0.2330000E+00, 0.2330000E+00, 0.2121400E+00, 0.1926200E+00, &
     & 0.2118700E+00, 0.2132600E+00, 0.2312700E+00, 0.2276100E+00, &
     & 0.2496100E+00, 0.2459200E+00, 0.2656200E+00, 0.3067400E+00, &
     & 0.3606400E+00, 0.3877600E+00, 0.4010800E+00, 0.5022132E+00, &
     & 0.5652931E+00, 0.6760277E+00, 0.1034165E+01, 0.1034165E+01 /
      data (ref_adm(11,iz,24,18),iz = 1,20) / &
     & 0.2144200E+00, 0.2144200E+00, 0.2236700E+00, 0.2495300E+00, &
     & 0.2287000E+00, 0.2371000E+00, 0.2667900E+00, 0.2668000E+00, &
     & 0.2762500E+00, 0.2771900E+00, 0.3133000E+00, 0.3462400E+00, &
     & 0.3883800E+00, 0.4355200E+00, 0.4337100E+00, 0.5099799E+00, &
     & 0.5755960E+00, 0.6916994E+00, 0.1071243E+01, 0.1071243E+01 /
      data (ref_adm(11,iz,25,18),iz = 1,20) / &
     & 0.2347600E+00, 0.2347600E+00, 0.2355900E+00, 0.2228200E+00, &
     & 0.2088700E+00, 0.2358000E+00, 0.3010200E+00, 0.3100700E+00, &
     & 0.2764800E+00, 0.3332300E+00, 0.2557400E+00, 0.3428900E+00, &
     & 0.3735400E+00, 0.3860400E+00, 0.5221200E+00, 0.4635900E+00, &
     & 0.5930717E+00, 0.7162895E+00, 0.1118802E+01, 0.1118802E+01 /
      data (ref_adm(11,iz,26,18),iz = 1,20) / &
     & 0.2309700E+00, 0.2309700E+00, 0.2090700E+00, 0.2469900E+00, &
     & 0.3499400E+00, 0.2062600E+00, 0.2894300E+00, 0.3245600E+00, &
     & 0.2987742E+00, 0.3173367E+00, 0.3321300E+00, 0.3698352E+00, &
     & 0.3811600E+00, 0.4562800E+00, 0.4073200E+00, 0.5070300E+00, &
     & 0.6187014E+00, 0.7513916E+00, 0.1177660E+01, 0.1177660E+01 /
      data (ref_adm(11,iz,27,18),iz = 1,20) / &
     & 0.2155000E+00, 0.2155000E+00, 0.2323800E+00, 0.2940100E+00, &
     & 0.2967800E+00, 0.2738900E+00, 0.2653300E+00, 0.2711800E+00, &
     & 0.3034736E+00, 0.3237150E+00, 0.3796700E+00, 0.3297800E+00, &
     & 0.4086500E+00, 0.4526800E+00, 0.4628900E+00, 0.5381000E+00, &
     & 0.6430722E+00, 0.7854687E+00, 0.1240065E+01, 0.1240065E+01 /
      data (ref_adm(11,iz,28,18),iz = 1,20) / &
     & 0.1991600E+00, 0.1991600E+00, 0.2197300E+00, 0.2595400E+00, &
     & 0.2384300E+00, 0.2639000E+00, 0.3010500E+00, 0.2355400E+00, &
     & 0.2420700E+00, 0.3304614E+00, 0.3464000E+00, 0.4609100E+00, &
     & 0.4348800E+00, 0.5348700E+00, 0.6005400E+00, 0.6700600E+00, &
     & 0.6762230E+00, 0.1026800E+01, 0.1312096E+01, 0.1312096E+01 /
      data (ref_adm(11,iz,29,18),iz = 1,20) / &
     & 0.2339000E+00, 0.2339000E+00, 0.2455000E+00, 0.2339700E+00, &
     & 0.2455400E+00, 0.2147100E+00, 0.2647000E+00, 0.3028900E+00, &
     & 0.2574300E+00, 0.2577700E+00, 0.4019700E+00, 0.4122300E+00, &
     & 0.4584900E+00, 0.5064600E+00, 0.6490100E+00, 0.1081900E+01, &
     & 0.1037100E+01, 0.9304128E+00, 0.1417808E+01, 0.1417808E+01 /
      data (ref_adm(11,iz,30,18),iz = 1,20) / &
     & 0.2040000E+00, 0.2040000E+00, 0.1832000E+00, 0.2299500E+00, &
     & 0.2214300E+00, 0.2467100E+00, 0.2633600E+00, 0.2755100E+00, &
     & 0.3168700E+00, 0.3164300E+00, 0.3509800E+00, 0.3931100E+00, &
     & 0.4157300E+00, 0.6600100E+00, 0.6050000E+00, 0.8813000E+00, &
     & 0.1554900E+01, 0.1662400E+01, 0.1521103E+01, 0.1521103E+01 /
      data (ref_adm(11,iz,31,18),iz = 1,20) / &
     & 0.2386461E+00, 0.2386461E+00, 0.2479300E+00, 0.2318000E+00, &
     & 0.2795600E+00, 0.2308200E+00, 0.3892000E+00, 0.2740300E+00, &
     & 0.3323100E+00, 0.3234800E+00, 0.3583700E+00, 0.4474200E+00, &
     & 0.4880100E+00, 0.5240000E+00, 0.6451800E+00, 0.7982200E+00, &
     & 0.9523100E+00, 0.1157800E+01, 0.1537318E+01, 0.1537318E+01 /
      data (ref_adm(11,iz,32,18),iz = 1,20) / &
     & 0.2052200E+00, 0.2052200E+00, 0.2618500E+00, 0.2359400E+00, &
     & 0.2284200E+00, 0.3076100E+00, 0.3290100E+00, 0.2335600E+00, &
     & 0.3283634E+00, 0.3439400E+00, 0.3493800E+00, 0.4134000E+00, &
     & 0.4864300E+00, 0.6184200E+00, 0.6080100E+00, 0.8937400E+00, &
     & 0.1245000E+01, 0.1101600E+01, 0.1580104E+01, 0.1580104E+01 /
      data (ref_adm(11,iz,33,18),iz = 1,20) / &
     & 0.1907600E+00, 0.1907600E+00, 0.1855000E+00, 0.1977700E+00, &
     & 0.2080900E+00, 0.2253400E+00, 0.2487400E+00, 0.2615300E+00, &
     & 0.2847500E+00, 0.3963700E+00, 0.4342600E+00, 0.4223900E+00, &
     & 0.5124800E+00, 0.5620900E+00, 0.6353800E+00, 0.8758900E+00, &
     & 0.1005500E+01, 0.1089700E+01, 0.1623064E+01, 0.1623064E+01 /
      data (ref_adm(11,iz,34,18),iz = 1,20) / &
     & 0.1968000E+00, 0.1968000E+00, 0.2288100E+00, 0.2839900E+00, &
     & 0.2579772E+00, 0.3566500E+00, 0.3029200E+00, 0.3775100E+00, &
     & 0.3770800E+00, 0.3684700E+00, 0.3906800E+00, 0.5172100E+00, &
     & 0.5821700E+00, 0.7560600E+00, 0.8038900E+00, 0.8235400E+00, &
     & 0.9399800E+00, 0.1473800E+01, 0.1656956E+01, 0.1656956E+01 /
      data (ref_adm(11,iz,35,18),iz = 1,20) / &
     & 0.2032700E+00, 0.2032700E+00, 0.1811300E+00, 0.2482953E+00, &
     & 0.2586190E+00, 0.2372300E+00, 0.2900200E+00, 0.3268000E+00, &
     & 0.3568000E+00, 0.3060700E+00, 0.4257300E+00, 0.4335000E+00, &
     & 0.5195700E+00, 0.7018200E+00, 0.7353900E+00, 0.8162400E+00, &
     & 0.8419600E+00, 0.1205100E+01, 0.1687378E+01, 0.1687378E+01 /
      data (ref_adm(11,iz,36,18),iz = 1,20) / &
     & 0.2230800E+00, 0.2230800E+00, 0.1927300E+00, 0.1978400E+00, &
     & 0.2155700E+00, 0.1932800E+00, 0.2924986E+00, 0.2815100E+00, &
     & 0.2909800E+00, 0.3976000E+00, 0.4779000E+00, 0.4256400E+00, &
     & 0.5160100E+00, 0.5446900E+00, 0.6649100E+00, 0.8631200E+00, &
     & 0.1284600E+01, 0.1367900E+01, 0.1427800E+01, 0.1427800E+01 /
      data (ref_adm(11,iz,37,18),iz = 1,20) / &
     & 0.2440000E+00, 0.2440000E+00, 0.2573600E+00, 0.2500600E+00, &
     & 0.2223100E+00, 0.2593700E+00, 0.2336200E+00, 0.3158385E+00, &
     & 0.3890500E+00, 0.4387900E+00, 0.4489800E+00, 0.6118800E+00, &
     & 0.5643500E+00, 0.5604000E+00, 0.6637600E+00, 0.7871700E+00, &
     & 0.1129700E+01, 0.1193400E+01, 0.1651800E+01, 0.1651800E+01 /
      data (ref_adm(11,iz,38,18),iz = 1,20) / &
     & 0.2440000E+00, 0.2440000E+00, 0.2573600E+00, 0.2500600E+00, &
     & 0.2223100E+00, 0.2593700E+00, 0.2336200E+00, 0.3158385E+00, &
     & 0.3890500E+00, 0.4387900E+00, 0.4489800E+00, 0.6118800E+00, &
     & 0.5643500E+00, 0.5604000E+00, 0.6637600E+00, 0.7871700E+00, &
     & 0.1129700E+01, 0.1193400E+01, 0.1651800E+01, 0.1651800E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(12,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(12,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(12,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.4430451E+04
      data (ref_adm(12,iz, 1, 4),iz = 1,20) / &
     & 0.1696941E+00, 0.1696941E+00, 0.1587469E+00, 0.1549724E+00, &
     & 0.1524245E+00, 0.1510663E+00, 0.1497129E+00, 0.1483059E+00, &
     & 0.1476042E+00, 0.1244200E+00, 0.1483898E+00, 0.1506376E+00, &
     & 0.1540259E+00, 0.1577421E+00, 0.1634615E+00, 0.1716040E+00, &
     & 0.1808696E+00, 0.1929443E+00, 0.1993710E+00, 0.1993710E+00 /
      data (ref_adm(12,iz, 2, 4),iz = 1,20) / &
     & 0.1696941E+00, 0.1696941E+00, 0.1587469E+00, 0.1549724E+00, &
     & 0.1524245E+00, 0.1510663E+00, 0.1497129E+00, 0.1483059E+00, &
     & 0.1476042E+00, 0.1244200E+00, 0.1483898E+00, 0.1506376E+00, &
     & 0.1540259E+00, 0.1577421E+00, 0.1634615E+00, 0.1716040E+00, &
     & 0.1808696E+00, 0.1929443E+00, 0.1993710E+00, 0.1993710E+00 /
      data (ref_adm(12,iz, 3, 4),iz = 1,20) / &
     & 0.1696941E+00, 0.1696941E+00, 0.1587469E+00, 0.1549724E+00, &
     & 0.1524245E+00, 0.1510663E+00, 0.1497129E+00, 0.1844000E+00, &
     & 0.1476042E+00, 0.1298800E+00, 0.1439500E+00, 0.1506376E+00, &
     & 0.1540259E+00, 0.1577421E+00, 0.1634615E+00, 0.1716040E+00, &
     & 0.1808696E+00, 0.1929443E+00, 0.3082537E-08, 0.3082537E-08 /
      data (ref_adm(12,iz, 4, 4),iz = 1,20) / &
     & 0.1696941E+00, 0.1696941E+00, 0.1587469E+00, 0.1549724E+00, &
     & 0.1524245E+00, 0.1510663E+00, 0.1497129E+00, 0.1483059E+00, &
     & 0.1476042E+00, 0.1475603E+00, 0.1483898E+00, 0.1506376E+00, &
     & 0.1540259E+00, 0.1577421E+00, 0.1634615E+00, 0.1716040E+00, &
     & 0.1808696E+00, 0.1929443E+00, 0.1993710E+00, 0.1993710E+00 /
      data (ref_adm(12,iz, 5, 4),iz = 1,20) / &
     & 0.1696941E+00, 0.1696941E+00, 0.1587469E+00, 0.1549724E+00, &
     & 0.1524245E+00, 0.1510663E+00, 0.1497129E+00, 0.1483059E+00, &
     & 0.1476042E+00, 0.1475603E+00, 0.1483898E+00, 0.1506376E+00, &
     & 0.1540259E+00, 0.1577421E+00, 0.1860000E+00, 0.1927700E+00, &
     & 0.1808696E+00, 0.1929443E+00, 0.1993711E+00, 0.1993711E+00 /
      data (ref_adm(12,iz, 6, 4),iz = 1,20) / &
     & 0.1696941E+00, 0.1696941E+00, 0.1587469E+00, 0.1549724E+00, &
     & 0.1524245E+00, 0.1510663E+00, 0.1497129E+00, 0.1483059E+00, &
     & 0.1476042E+00, 0.1802100E+00, 0.1483898E+00, 0.1506376E+00, &
     & 0.1324600E+00, 0.1577421E+00, 0.1634615E+00, 0.1716040E+00, &
     & 0.1808696E+00, 0.1929443E+00, 0.1993710E+00, 0.1993710E+00 /
      data (ref_adm(12,iz, 7, 4),iz = 1,20) / &
     & 0.1696941E+00, 0.1696941E+00, 0.1587469E+00, 0.1743100E+00, &
     & 0.2017700E+00, 0.1510663E+00, 0.1795200E+00, 0.1483059E+00, &
     & 0.1476042E+00, 0.1722800E+00, 0.1455200E+00, 0.1506376E+00, &
     & 0.1321500E+00, 0.1577421E+00, 0.1634615E+00, 0.1716040E+00, &
     & 0.1808696E+00, 0.1949100E+00, 0.1993711E+00, 0.1993711E+00 /
      data (ref_adm(12,iz, 8, 4),iz = 1,20) / &
     & 0.1696941E+00, 0.1696941E+00, 0.1587469E+00, 0.1549724E+00, &
     & 0.1524245E+00, 0.1510663E+00, 0.1659800E+00, 0.1345900E+00, &
     & 0.1364400E+00, 0.1475603E+00, 0.1483898E+00, 0.1133300E+00, &
     & 0.1540259E+00, 0.1577421E+00, 0.1634615E+00, 0.1716040E+00, &
     & 0.1808696E+00, 0.1308500E+00, 0.1993710E+00, 0.1993710E+00 /
      data (ref_adm(12,iz, 9, 4),iz = 1,20) / &
     & 0.1696941E+00, 0.1696941E+00, 0.1587469E+00, 0.1549724E+00, &
     & 0.1524245E+00, 0.1510663E+00, 0.1476900E+00, 0.1695400E+00, &
     & 0.1597000E+00, 0.1313300E+00, 0.1575600E+00, 0.1506376E+00, &
     & 0.1388600E+00, 0.1338800E+00, 0.1634615E+00, 0.1716040E+00, &
     & 0.1808696E+00, 0.1929443E+00, 0.1993711E+00, 0.1993711E+00 /
      data (ref_adm(12,iz,10, 4),iz = 1,20) / &
     & 0.1696941E+00, 0.1696941E+00, 0.1587469E+00, 0.1549724E+00, &
     & 0.1524245E+00, 0.1510663E+00, 0.1497129E+00, 0.1764400E+00, &
     & 0.1553500E+00, 0.2105300E+00, 0.1937000E+00, 0.1506376E+00, &
     & 0.1366200E+00, 0.1695700E+00, 0.1634615E+00, 0.1716040E+00, &
     & 0.1808696E+00, 0.1929443E+00, 0.1993710E+00, 0.1993710E+00 /
      data (ref_adm(12,iz,11, 4),iz = 1,20) / &
     & 0.1696941E+00, 0.1696941E+00, 0.1587469E+00, 0.1549724E+00, &
     & 0.1524245E+00, 0.1510663E+00, 0.1497129E+00, 0.1483059E+00, &
     & 0.1476042E+00, 0.1475603E+00, 0.1483898E+00, 0.1506376E+00, &
     & 0.1653300E+00, 0.1316900E+00, 0.1634615E+00, 0.1716040E+00, &
     & 0.1808696E+00, 0.1552200E+00, 0.1993711E+00, 0.1993711E+00 /
      data (ref_adm(12,iz,12, 4),iz = 1,20) / &
     & 0.1696941E+00, 0.1696941E+00, 0.1587469E+00, 0.1809100E+00, &
     & 0.1524245E+00, 0.1510663E+00, 0.1497129E+00, 0.1483059E+00, &
     & 0.1476042E+00, 0.1475603E+00, 0.1681900E+00, 0.1506376E+00, &
     & 0.1483000E+00, 0.1342800E+00, 0.1634615E+00, 0.1716040E+00, &
     & 0.1808696E+00, 0.1929443E+00, 0.1993710E+00, 0.1993710E+00 /
      data (ref_adm(12,iz,13, 4),iz = 1,20) / &
     & 0.1696941E+00, 0.1696941E+00, 0.1587469E+00, 0.1549724E+00, &
     & 0.1524245E+00, 0.1510663E+00, 0.1497129E+00, 0.1483059E+00, &
     & 0.1476042E+00, 0.1475603E+00, 0.1483898E+00, 0.1388500E+00, &
     & 0.1271800E+00, 0.1462000E+00, 0.1634615E+00, 0.1716040E+00, &
     & 0.1808696E+00, 0.1929443E+00, 0.1993711E+00, 0.1993711E+00 /
      data (ref_adm(12,iz,14, 4),iz = 1,20) / &
     & 0.1696941E+00, 0.1696941E+00, 0.1587469E+00, 0.1549724E+00, &
     & 0.1524245E+00, 0.1510663E+00, 0.1497129E+00, 0.1483059E+00, &
     & 0.1476042E+00, 0.1475603E+00, 0.1483898E+00, 0.1506376E+00, &
     & 0.1306200E+00, 0.1350500E+00, 0.1634615E+00, 0.1716040E+00, &
     & 0.1808696E+00, 0.1929443E+00, 0.1993710E+00, 0.1993710E+00 /
      data (ref_adm(12,iz,15, 4),iz = 1,20) / &
     & 0.1696941E+00, 0.1696941E+00, 0.1587469E+00, 0.1549724E+00, &
     & 0.1524245E+00, 0.1510663E+00, 0.1497129E+00, 0.1483059E+00, &
     & 0.1476042E+00, 0.1475603E+00, 0.1483898E+00, 0.1506376E+00, &
     & 0.1540259E+00, 0.1353100E+00, 0.1385300E+00, 0.1716040E+00, &
     & 0.1808696E+00, 0.1929443E+00, 0.1993711E+00, 0.1993711E+00 /
      data (ref_adm(12,iz,16, 4),iz = 1,20) / &
     & 0.1696941E+00, 0.1696941E+00, 0.1587469E+00, 0.1549724E+00, &
     & 0.1524245E+00, 0.1510663E+00, 0.1497129E+00, 0.1483059E+00, &
     & 0.1476042E+00, 0.1475603E+00, 0.1483898E+00, 0.1506376E+00, &
     & 0.1540259E+00, 0.1577421E+00, 0.1511100E+00, 0.1716040E+00, &
     & 0.1808696E+00, 0.1929443E+00, 0.1993710E+00, 0.1993710E+00 /
      data (ref_adm(12,iz,17, 4),iz = 1,20) / &
     & 0.1696941E+00, 0.1696941E+00, 0.1587469E+00, 0.1549724E+00, &
     & 0.1524245E+00, 0.1510663E+00, 0.1497129E+00, 0.1483059E+00, &
     & 0.1476042E+00, 0.1475603E+00, 0.1483898E+00, 0.1506376E+00, &
     & 0.1540259E+00, 0.1577421E+00, 0.1634615E+00, 0.1716040E+00, &
     & 0.1808696E+00, 0.1929443E+00, 0.1993711E+00, 0.1993711E+00 /
      data (ref_adm(12,iz,18, 4),iz = 1,20) / &
     & 0.1553713E+00, 0.1553713E+00, 0.1539481E+00, 0.1528376E+00, &
     & 0.1517775E+00, 0.1503879E+00, 0.1491611E+00, 0.1484496E+00, &
     & 0.1483619E+00, 0.1490625E+00, 0.1505455E+00, 0.1536572E+00, &
     & 0.1579601E+00, 0.1707600E+00, 0.1455500E+00, 0.1786450E+00, &
     & 0.1891854E+00, 0.2029557E+00, 0.2106030E+00, 0.2106030E+00 /
      data (ref_adm(12,iz,19, 4),iz = 1,20) / &
     & 0.1555172E+00, 0.1555172E+00, 0.1544511E+00, 0.1535039E+00, &
     & 0.1526420E+00, 0.1515466E+00, 0.1503550E+00, 0.1497271E+00, &
     & 0.1495611E+00, 0.2341300E+00, 0.1750500E+00, 0.1547146E+00, &
     & 0.1588505E+00, 0.1650900E+00, 0.1636100E+00, 0.1790255E+00, &
     & 0.1892782E+00, 0.2026184E+00, 0.2098564E+00, 0.2098564E+00 /
      data (ref_adm(12,iz,20, 4),iz = 1,20) / &
     & 0.1556882E+00, 0.1556882E+00, 0.1550345E+00, 0.1541957E+00, &
     & 0.1535108E+00, 0.1526861E+00, 0.1516411E+00, 0.1510006E+00, &
     & 0.1509034E+00, 0.1515126E+00, 0.1528716E+00, 0.1868400E+00, &
     & 0.1598425E+00, 0.1640616E+00, 0.1705015E+00, 0.1794272E+00, &
     & 0.1894698E+00, 0.2023950E+00, 0.2092893E+00, 0.2092893E+00 /
      data (ref_adm(12,iz,21, 4),iz = 1,20) / &
     & 0.1558483E+00, 0.1558483E+00, 0.1556301E+00, 0.1549368E+00, &
     & 0.1544163E+00, 0.1538384E+00, 0.1529889E+00, 0.1523902E+00, &
     & 0.1522498E+00, 0.1527895E+00, 0.1541356E+00, 0.1569867E+00, &
     & 0.1609113E+00, 0.1649725E+00, 0.1712418E+00, 0.1799546E+00, &
     & 0.1896794E+00, 0.2022142E+00, 0.2087658E+00, 0.2087658E+00 /
      data (ref_adm(12,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04, 0.1632300E+00,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(12,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo  0.1767355E+00
      data (ref_adm(12,iz, 1, 5),iz = 1,20) / &
     & 0.1744087E+00, 0.1744087E+00, 0.1943300E+00, 0.1975700E+00, &
     & 0.1656152E+00, 0.1653100E+00, 0.1817100E+00, 0.2085800E+00, &
     & 0.1829100E+00, 0.1541000E+00, 0.1591395E+00, 0.1600613E+00, &
     & 0.1350100E+00, 0.1264800E+00, 0.1671363E+00, 0.1717326E+00, &
     & 0.1755600E+00, 0.1840297E+00, 0.1841725E+00, 0.1841725E+00 /
      data (ref_adm(12,iz, 2, 5),iz = 1,20) / &
     & 0.1744087E+00, 0.1744087E+00, 0.1943300E+00, 0.1975700E+00, &
     & 0.1656152E+00, 0.1653100E+00, 0.1817100E+00, 0.2085800E+00, &
     & 0.1829100E+00, 0.1541000E+00, 0.1591395E+00, 0.1600613E+00, &
     & 0.1350100E+00, 0.1264800E+00, 0.1671363E+00, 0.1717326E+00, &
     & 0.1755600E+00, 0.1840297E+00, 0.1841725E+00, 0.1841725E+00 /
      data (ref_adm(12,iz, 3, 5),iz = 1,20) / &
     & 0.1744143E+00, 0.1744143E+00, 0.1698922E+00, 0.1672691E+00, &
     & 0.1656279E+00, 0.1638961E+00, 0.1677600E+00, 0.1813300E+00, &
     & 0.1595921E+00, 0.1723300E+00, 0.1591636E+00, 0.1600933E+00, &
     & 0.1283400E+00, 0.1168800E+00, 0.1657400E+00, 0.1717023E+00, &
     & 0.1539200E+00, 0.1839890E+00, 0.2911121E-01, 0.2911121E-01 /
      data (ref_adm(12,iz, 4, 5),iz = 1,20) / &
     & 0.1744241E+00, 0.1744241E+00, 0.1701800E+00, 0.1673107E+00, &
     & 0.1656659E+00, 0.2170300E+00, 0.1621196E+00, 0.2255400E+00, &
     & 0.1596152E+00, 0.1590895E+00, 0.1591881E+00, 0.1601680E+00, &
     & 0.1619417E+00, 0.1343200E+00, 0.1962200E+00, 0.1624000E+00, &
     & 0.1769313E+00, 0.1838602E+00, 0.1841284E+00, 0.1841284E+00 /
      data (ref_adm(12,iz, 5, 5),iz = 1,20) / &
     & 0.1744524E+00, 0.1744524E+00, 0.1716800E+00, 0.1973900E+00, &
     & 0.2088000E+00, 0.1367300E+00, 0.1611200E+00, 0.1656500E+00, &
     & 0.1650900E+00, 0.2087100E+00, 0.1585100E+00, 0.1601751E+00, &
     & 0.2140900E+00, 0.1687500E+00, 0.1734300E+00, 0.1717083E+00, &
     & 0.1769796E+00, 0.1839059E+00, 0.1840277E+00, 0.1840277E+00 /
      data (ref_adm(12,iz, 6, 5),iz = 1,20) / &
     & 0.1745221E+00, 0.1745221E+00, 0.2628500E+00, 0.1768100E+00, &
     & 0.1657919E+00, 0.1641029E+00, 0.1623023E+00, 0.1608703E+00, &
     & 0.1312700E+00, 0.1750900E+00, 0.1593377E+00, 0.1602736E+00, &
     & 0.1893600E+00, 0.1640859E+00, 0.1672264E+00, 0.1716870E+00, &
     & 0.1591600E+00, 0.1838249E+00, 0.1839464E+00, 0.1839464E+00 /
      data (ref_adm(12,iz, 7, 5),iz = 1,20) / &
     & 0.1745406E+00, 0.1745406E+00, 0.1680200E+00, 0.1990700E+00, &
     & 0.1658583E+00, 0.1431800E+00, 0.1624214E+00, 0.1580000E+00, &
     & 0.1146200E+00, 0.1593645E+00, 0.1333400E+00, 0.1351300E+00, &
     & 0.2008200E+00, 0.1461800E+00, 0.1317600E+00, 0.1717366E+00, &
     & 0.1768995E+00, 0.1837850E+00, 0.1838289E+00, 0.1838289E+00 /
      data (ref_adm(12,iz, 8, 5),iz = 1,20) / &
     & 0.1814500E+00, 0.1814500E+00, 0.1947400E+00, 0.1836800E+00, &
     & 0.1475200E+00, 0.1472800E+00, 0.1563500E+00, 0.1611100E+00, &
     & 0.1838300E+00, 0.1312100E+00, 0.1595454E+00, 0.1502700E+00, &
     & 0.1695100E+00, 0.1641985E+00, 0.1672480E+00, 0.1717364E+00, &
     & 0.1348800E+00, 0.1837052E+00, 0.1836249E+00, 0.1836249E+00 /
      data (ref_adm(12,iz, 9, 5),iz = 1,20) / &
     & 0.1746556E+00, 0.1746556E+00, 0.1876700E+00, 0.1795400E+00, &
     & 0.1847000E+00, 0.1941400E+00, 0.1828400E+00, 0.1557400E+00, &
     & 0.2155300E+00, 0.1343400E+00, 0.1385000E+00, 0.1634300E+00, &
     & 0.1566400E+00, 0.1642639E+00, 0.1673053E+00, 0.1717271E+00, &
     & 0.1482100E+00, 0.1836058E+00, 0.1834862E+00, 0.1834862E+00 /
      data (ref_adm(12,iz,10, 5),iz = 1,20) / &
     & 0.1747230E+00, 0.1747230E+00, 0.1705267E+00, 0.1815000E+00, &
     & 0.1666900E+00, 0.1686300E+00, 0.1785300E+00, 0.1690000E+00, &
     & 0.1658700E+00, 0.1663500E+00, 0.1261900E+00, 0.1669700E+00, &
     & 0.1200700E+00, 0.1643511E+00, 0.1673610E+00, 0.1717350E+00, &
     & 0.1448000E+00, 0.1705100E+00, 0.1833097E+00, 0.1833097E+00 /
      data (ref_adm(12,iz,11, 5),iz = 1,20) / &
     & 0.1745500E+00, 0.1745500E+00, 0.1706683E+00, 0.1679928E+00, &
     & 0.1647100E+00, 0.1846200E+00, 0.1909100E+00, 0.1497900E+00, &
     & 0.1583600E+00, 0.1386100E+00, 0.1654100E+00, 0.1546800E+00, &
     & 0.1625119E+00, 0.1388000E+00, 0.1195000E+00, 0.1717683E+00, &
     & 0.1767438E+00, 0.1834380E+00, 0.1831135E+00, 0.1831135E+00 /
      data (ref_adm(12,iz,12, 5),iz = 1,20) / &
     & 0.1748493E+00, 0.1748493E+00, 0.1708438E+00, 0.1681703E+00, &
     & 0.1664940E+00, 0.1650990E+00, 0.1633576E+00, 0.1619485E+00, &
     & 0.1657000E+00, 0.1514600E+00, 0.1501100E+00, 0.1526100E+00, &
     & 0.1502500E+00, 0.1472300E+00, 0.1675037E+00, 0.1717713E+00, &
     & 0.1767074E+00, 0.1833623E+00, 0.1829042E+00, 0.1829042E+00 /
      data (ref_adm(12,iz,13, 5),iz = 1,20) / &
     & 0.1749212E+00, 0.1749212E+00, 0.1710073E+00, 0.1683163E+00, &
     & 0.1666732E+00, 0.1653119E+00, 0.1635923E+00, 0.1621601E+00, &
     & 0.1610117E+00, 0.1388600E+00, 0.1573400E+00, 0.1610500E+00, &
     & 0.1559800E+00, 0.1546900E+00, 0.1676001E+00, 0.1717971E+00, &
     & 0.1766791E+00, 0.1832195E+00, 0.1826928E+00, 0.1826928E+00 /
      data (ref_adm(12,iz,14, 5),iz = 1,20) / &
     & 0.1750033E+00, 0.1750033E+00, 0.1711829E+00, 0.1685110E+00, &
     & 0.1668475E+00, 0.1655391E+00, 0.1638833E+00, 0.1624292E+00, &
     & 0.1613068E+00, 0.1606981E+00, 0.1766500E+00, 0.1480900E+00, &
     & 0.1629905E+00, 0.1226900E+00, 0.1676565E+00, 0.1717933E+00, &
     & 0.1766857E+00, 0.1831356E+00, 0.1825027E+00, 0.1825027E+00 /
      data (ref_adm(12,iz,15, 5),iz = 1,20) / &
     & 0.1751440E+00, 0.1751440E+00, 0.2358700E+00, 0.1492700E+00, &
     & 0.1762800E+00, 0.1658061E+00, 0.1642007E+00, 0.1627458E+00, &
     & 0.1615905E+00, 0.1578200E+00, 0.1608724E+00, 0.1417700E+00, &
     & 0.1567300E+00, 0.1346900E+00, 0.1677495E+00, 0.1717979E+00, &
     & 0.1766108E+00, 0.1829984E+00, 0.1822993E+00, 0.1822993E+00 /
      data (ref_adm(12,iz,16, 5),iz = 1,20) / &
     & 0.1905800E+00, 0.1905800E+00, 0.1716310E+00, 0.1858700E+00, &
     & 0.1538600E+00, 0.1660269E+00, 0.1253800E+00, 0.1552000E+00, &
     & 0.1618949E+00, 0.1584100E+00, 0.1611413E+00, 0.1407900E+00, &
     & 0.1240600E+00, 0.1650597E+00, 0.1678714E+00, 0.1718865E+00, &
     & 0.1766518E+00, 0.1829417E+00, 0.1820801E+00, 0.1820801E+00 /
      data (ref_adm(12,iz,17, 5),iz = 1,20) / &
     & 0.1753543E+00, 0.1753543E+00, 0.1718318E+00, 0.1878500E+00, &
     & 0.1945100E+00, 0.2093500E+00, 0.1835300E+00, 0.1633688E+00, &
     & 0.1858600E+00, 0.1395000E+00, 0.1664900E+00, 0.1780800E+00, &
     & 0.1381300E+00, 0.1449700E+00, 0.1330200E+00, 0.1719306E+00, &
     & 0.1765879E+00, 0.1827923E+00, 0.1818986E+00, 0.1818986E+00 /
      data (ref_adm(12,iz,18, 5),iz = 1,20) / &
     & 0.1804767E+00, 0.1804767E+00, 0.1646100E+00, 0.1648196E+00, &
     & 0.1992900E+00, 0.1606653E+00, 0.1592259E+00, 0.1577296E+00, &
     & 0.1569833E+00, 0.1569366E+00, 0.1369500E+00, 0.2260600E+00, &
     & 0.1731000E+00, 0.1400800E+00, 0.1320800E+00, 0.1825080E+00, &
     & 0.1923624E+00, 0.2052043E+00, 0.2120395E+00, 0.2120395E+00 /
      data (ref_adm(12,iz,19, 5),iz = 1,20) / &
     & 0.1804767E+00, 0.1804767E+00, 0.1495100E+00, 0.1648196E+00, &
     & 0.1621098E+00, 0.1606653E+00, 0.1592259E+00, 0.1577296E+00, &
     & 0.1569833E+00, 0.1569366E+00, 0.1578187E+00, 0.1680000E+00, &
     & 0.2249700E+00, 0.1677653E+00, 0.1738481E+00, 0.1825080E+00, &
     & 0.1923624E+00, 0.2052043E+00, 0.2120395E+00, 0.2120395E+00 /
      data (ref_adm(12,iz,20, 5),iz = 1,20) / &
     & 0.1672000E+00, 0.1672000E+00, 0.1688339E+00, 0.1648196E+00, &
     & 0.1753100E+00, 0.1606653E+00, 0.1592259E+00, 0.1577296E+00, &
     & 0.1569833E+00, 0.1569366E+00, 0.1578187E+00, 0.1602094E+00, &
     & 0.1638129E+00, 0.1316600E+00, 0.1738481E+00, 0.1361000E+00, &
     & 0.1923624E+00, 0.2052043E+00, 0.2120395E+00, 0.2120395E+00 /
      data (ref_adm(12,iz,21, 5),iz = 1,20) / &
     & 0.1804767E+00, 0.1804767E+00, 0.1688339E+00, 0.1648196E+00, &
     & 0.1841800E+00, 0.1813500E+00, 0.1592259E+00, 0.1577296E+00, &
     & 0.1569833E+00, 0.1569366E+00, 0.1519700E+00, 0.1602094E+00, &
     & 0.1569700E+00, 0.1517700E+00, 0.1657000E+00, 0.1401000E+00, &
     & 0.1357000E+00, 0.2052043E+00, 0.2120395E+00, 0.2120395E+00 /
      data (ref_adm(12,iz,22, 5),iz = 1,20) / &
     & 0.2174737E+00, 0.2174737E+00, 0.2135820E+00, 0.2147000E+00, &
     & 0.2111683E+00, 0.2104395E+00, 0.2091550E+00, 0.2069666E+00, &
     & 0.2041557E+00, 0.2007899E+00, 0.1971292E+00, 0.1920468E+00, &
     & 0.1744200E+00, 0.1522700E+00, 0.1744500E+00, 0.1619425E+00, &
     & 0.1451800E+00, 0.1367840E+00, 0.1116051E+00, 0.1116051E+00 /
      data (ref_adm(12,iz,23, 5),iz = 1,20) / &
     & 0.2017600E+00, 0.2017600E+00, 0.2135820E+00, 0.2122339E+00, &
     & 0.2111683E+00, 0.2104395E+00, 0.2091550E+00, 0.2069665E+00, &
     & 0.2041557E+00, 0.2007899E+00, 0.1971291E+00, 0.1920468E+00, &
     & 0.1675600E+00, 0.2043600E+00, 0.1914800E+00, 0.1619425E+00, &
     & 0.1510438E+00, 0.1367840E+00, 0.1116051E+00, 0.1116051E+00 /
      data (ref_adm(12,iz,24, 5),iz = 1,20) / &
     & 0.2174737E+00, 0.2174737E+00, 0.2135820E+00, 0.2122339E+00, &
     & 0.2111683E+00, 0.2033900E+00, 0.2091550E+00, 0.1417600E+00, &
     & 0.2041557E+00, 0.2007899E+00, 0.1971292E+00, 0.1920468E+00, &
     & 0.1674500E+00, 0.1627500E+00, 0.1725066E+00, 0.1565600E+00, &
     & 0.1510438E+00, 0.1367840E+00, 0.1116051E+00, 0.1116051E+00 /
      data (ref_adm(12,iz,25, 5),iz = 1,20) / &
     & 0.2174737E+00, 0.2174737E+00, 0.2135820E+00, 0.2122339E+00, &
     & 0.2111683E+00, 0.2104395E+00, 0.2091550E+00, 0.2069665E+00, &
     & 0.2041557E+00, 0.2007899E+00, 0.1971291E+00, 0.1920468E+00, &
     & 0.1861146E+00, 0.2071300E+00, 0.1725066E+00, 0.1786000E+00, &
     & 0.1748600E+00, 0.1367840E+00, 0.1116051E+00, 0.1116051E+00 /
      data (ref_adm(12,iz,26, 5),iz = 1,20) / &
     & 0.2174737E+00, 0.2174737E+00, 0.1816000E+00, 0.2122339E+00, &
     & 0.2111683E+00, 0.2104395E+00, 0.2091550E+00, 0.2069666E+00, &
     & 0.2041557E+00, 0.2007899E+00, 0.1971292E+00, 0.1920468E+00, &
     & 0.1861146E+00, 0.1805285E+00, 0.1725066E+00, 0.1619425E+00, &
     & 0.1510438E+00, 0.1367840E+00, 0.1116051E+00, 0.1116051E+00 /
      data (ref_adm(12,iz,27, 5),iz = 1,20) / &
     & 0.2174737E+00, 0.2174737E+00, 0.2135820E+00, 0.1857100E+00, &
     & 0.2111683E+00, 0.2104395E+00, 0.2091550E+00, 0.2069665E+00, &
     & 0.2041557E+00, 0.2007899E+00, 0.1971291E+00, 0.1920468E+00, &
     & 0.1861146E+00, 0.1805285E+00, 0.1725066E+00, 0.1619425E+00, &
     & 0.1510438E+00, 0.1367840E+00, 0.1116051E+00, 0.1116051E+00 /
      data (ref_adm(12,iz,28, 5),iz = 1,20) / &
     & 0.2174737E+00, 0.2174737E+00, 0.2135820E+00, 0.2122339E+00, &
     & 0.2111683E+00, 0.2104395E+00, 0.2091550E+00, 0.2069666E+00, &
     & 0.2041557E+00, 0.2007899E+00, 0.1971292E+00, 0.1920468E+00, &
     & 0.1861146E+00, 0.1805285E+00, 0.1725066E+00, 0.2115100E+00, &
     & 0.1510438E+00, 0.1367840E+00, 0.1116051E+00, 0.1116051E+00 /
      data (ref_adm(12,iz,29, 5),iz = 1,20) / &
     & 0.2174737E+00, 0.2174737E+00, 0.2135820E+00, 0.2122339E+00, &
     & 0.2111683E+00, 0.2104395E+00, 0.2091550E+00, 0.2069665E+00, &
     & 0.2041557E+00, 0.2007899E+00, 0.1971291E+00, 0.1920468E+00, &
     & 0.1861146E+00, 0.1936300E+00, 0.1725066E+00, 0.1619425E+00, &
     & 0.1510438E+00, 0.1367840E+00, 0.1116051E+00, 0.1116051E+00 /
      data (ref_adm(12,iz,30, 5),iz = 1,20) / &
     & 0.2174737E+00, 0.2174737E+00, 0.2135820E+00, 0.2122339E+00, &
     & 0.2111683E+00, 0.2104395E+00, 0.2091550E+00, 0.2069666E+00, &
     & 0.2041557E+00, 0.2007899E+00, 0.1971292E+00, 0.1920468E+00, &
     & 0.1861146E+00, 0.1805285E+00, 0.1725066E+00, 0.1619425E+00, &
     & 0.1510438E+00, 0.1367840E+00, 0.1116051E+00, 0.1116051E+00 /
      data (ref_adm(12,iz,31, 5),iz = 1,20) / &
     & 0.1864800E+00, 0.1864800E+00, 0.2648800E+00, 0.2126700E+00, &
     & 0.2111683E+00, 0.2104395E+00, 0.1991500E+00, 0.2069665E+00, &
     & 0.2041557E+00, 0.2007899E+00, 0.1971291E+00, 0.1920468E+00, &
     & 0.1861146E+00, 0.1805285E+00, 0.1725066E+00, 0.1619425E+00, &
     & 0.1510438E+00, 0.1367840E+00, 0.1116051E+00, 0.1116051E+00 /
      data (ref_adm(12,iz,32, 5),iz = 1,20) / &
     & 0.1946000E+00, 0.1946000E+00, 0.1784000E+00, 0.2122339E+00, &
     & 0.2111683E+00, 0.2104395E+00, 0.2091550E+00, 0.2069666E+00, &
     & 0.2041557E+00, 0.2007899E+00, 0.1971292E+00, 0.1920468E+00, &
     & 0.1861146E+00, 0.1805285E+00, 0.1725066E+00, 0.1619425E+00, &
     & 0.1510438E+00, 0.1367840E+00, 0.1116051E+00, 0.1116051E+00 /
      data (ref_adm(12,iz,33, 5),iz = 1,20) / &
     & 0.2972000E+00, 0.2972000E+00, 0.2068300E+00, 0.2036900E+00, &
     & 0.2111683E+00, 0.2104395E+00, 0.2091550E+00, 0.2163800E+00, &
     & 0.1851500E+00, 0.2007899E+00, 0.1971291E+00, 0.1920468E+00, &
     & 0.1861146E+00, 0.1805285E+00, 0.1725066E+00, 0.1619425E+00, &
     & 0.1510438E+00, 0.1367840E+00, 0.1116051E+00, 0.1116051E+00 /
      data (ref_adm(12,iz,34, 5),iz = 1,20) / &
     & 0.1890000E+00, 0.1890000E+00, 0.2135820E+00, 0.2122339E+00, &
     & 0.2111683E+00, 0.2104395E+00, 0.2342100E+00, 0.2257900E+00, &
     & 0.2508600E+00, 0.1944300E+00, 0.2121500E+00, 0.1920468E+00, &
     & 0.1861146E+00, 0.1805285E+00, 0.1725066E+00, 0.1619425E+00, &
     & 0.1510438E+00, 0.1367840E+00, 0.1116051E+00, 0.1116051E+00 /
      data (ref_adm(12,iz,35, 5),iz = 1,20) / &
     & 0.2174737E+00, 0.2174737E+00, 0.2135820E+00, 0.2122339E+00, &
     & 0.2111683E+00, 0.2104395E+00, 0.2091550E+00, 0.2069665E+00, &
     & 0.2050100E+00, 0.2007899E+00, 0.1971291E+00, 0.1920468E+00, &
     & 0.1861146E+00, 0.1805285E+00, 0.1725066E+00, 0.1619425E+00, &
     & 0.1510438E+00, 0.1367840E+00, 0.1116051E+00, 0.1116051E+00 /
      data (ref_adm(12,iz,36, 5),iz = 1,20) / &
     & 0.2174737E+00, 0.2174737E+00, 0.2135820E+00, 0.2122339E+00, &
     & 0.2111683E+00, 0.2104395E+00, 0.2091550E+00, 0.2069666E+00, &
     & 0.2041557E+00, 0.2007899E+00, 0.1971292E+00, 0.1920468E+00, &
     & 0.1861146E+00, 0.1805285E+00, 0.1725066E+00, 0.1619425E+00, &
     & 0.1510438E+00, 0.1367840E+00, 0.1116051E+00, 0.1116051E+00 /
      data (ref_adm(12,iz,37, 5),iz = 1,20) / &
     & 0.2174737E+00, 0.2174737E+00, 0.2135820E+00, 0.1798900E+00, &
     & 0.2111683E+00, 0.2104395E+00, 0.2091550E+00, 0.2069666E+00, &
     & 0.2041557E+00, 0.2007899E+00, 0.1971292E+00, 0.1920468E+00, &
     & 0.1861146E+00, 0.1805285E+00, 0.1725066E+00, 0.1619425E+00, &
     & 0.1510438E+00, 0.1367840E+00, 0.1116051E+00, 0.1116051E+00 /
      data (ref_adm(12,iz,38, 5),iz = 1,20) / &
     & 0.2174737E+00, 0.2174737E+00, 0.2135820E+00, 0.1798900E+00, &
     & 0.2111683E+00, 0.2104395E+00, 0.2091550E+00, 0.2069666E+00, &
     & 0.2041557E+00, 0.2007899E+00, 0.1971292E+00, 0.1920468E+00, &
     & 0.1861146E+00, 0.1805285E+00, 0.1725066E+00, 0.1619425E+00, &
     & 0.1510438E+00, 0.1367840E+00, 0.1116051E+00, 0.1116051E+00 /
! Solar Zenith Angle 25.0 Albedo  0.1839959E+00
      data (ref_adm(12,iz, 1, 6),iz = 1,20) / &
     & 0.1779502E+00, 0.1779502E+00, 0.1664704E+00, 0.1625123E+00, &
     & 0.1598405E+00, 0.1780000E+00, 0.1944400E+00, 0.1643300E+00, &
     & 0.1547856E+00, 0.1547397E+00, 0.1326600E+00, 0.1303800E+00, &
     & 0.1197300E+00, 0.1417200E+00, 0.1376900E+00, 0.2089500E+00, &
     & 0.1896695E+00, 0.2023317E+00, 0.2090711E+00, 0.2090711E+00 /
      data (ref_adm(12,iz, 2, 6),iz = 1,20) / &
     & 0.1779502E+00, 0.1779502E+00, 0.1664704E+00, 0.1625123E+00, &
     & 0.1598405E+00, 0.1780000E+00, 0.1944400E+00, 0.1643300E+00, &
     & 0.1547856E+00, 0.1547397E+00, 0.1326600E+00, 0.1303800E+00, &
     & 0.1197300E+00, 0.1417200E+00, 0.1376900E+00, 0.2089500E+00, &
     & 0.1896695E+00, 0.2023317E+00, 0.2090711E+00, 0.2090711E+00 /
      data (ref_adm(12,iz, 3, 6),iz = 1,20) / &
     & 0.2020800E+00, 0.2020800E+00, 0.2003500E+00, 0.1945200E+00, &
     & 0.1598405E+00, 0.1584162E+00, 0.1569969E+00, 0.1514500E+00, &
     & 0.1547856E+00, 0.1547397E+00, 0.1562100E+00, 0.1579666E+00, &
     & 0.1623400E+00, 0.1450000E+00, 0.1535200E+00, 0.1799531E+00, &
     & 0.1896695E+00, 0.2023317E+00, 0.3232512E-08, 0.3232512E-08 /
      data (ref_adm(12,iz, 4, 6),iz = 1,20) / &
     & 0.1779502E+00, 0.1779502E+00, 0.2085600E+00, 0.1890600E+00, &
     & 0.1857800E+00, 0.1662800E+00, 0.1553800E+00, 0.1263600E+00, &
     & 0.1547856E+00, 0.1787900E+00, 0.1556096E+00, 0.1579666E+00, &
     & 0.1331900E+00, 0.1567400E+00, 0.1467900E+00, 0.1377900E+00, &
     & 0.1896695E+00, 0.2023317E+00, 0.2090711E+00, 0.2090711E+00 /
      data (ref_adm(12,iz, 5, 6),iz = 1,20) / &
     & 0.2085000E+00, 0.2085000E+00, 0.2096000E+00, 0.2053000E+00, &
     & 0.1598405E+00, 0.1584162E+00, 0.1464000E+00, 0.1547300E+00, &
     & 0.1547856E+00, 0.1547397E+00, 0.1556096E+00, 0.1293500E+00, &
     & 0.1615197E+00, 0.1466500E+00, 0.1714144E+00, 0.1799531E+00, &
     & 0.1896695E+00, 0.2023317E+00, 0.2090711E+00, 0.2090711E+00 /
      data (ref_adm(12,iz, 6, 6),iz = 1,20) / &
     & 0.1779502E+00, 0.1779502E+00, 0.1664704E+00, 0.1625123E+00, &
     & 0.1598405E+00, 0.1584162E+00, 0.1296900E+00, 0.1420500E+00, &
     & 0.1579400E+00, 0.1547397E+00, 0.1434700E+00, 0.1498300E+00, &
     & 0.1615197E+00, 0.1478100E+00, 0.1635300E+00, 0.1607100E+00, &
     & 0.1506600E+00, 0.2023317E+00, 0.2413900E+00, 0.2413900E+00 /
      data (ref_adm(12,iz, 7, 6),iz = 1,20) / &
     & 0.1779502E+00, 0.1779502E+00, 0.1800000E+00, 0.1749600E+00, &
     & 0.1500600E+00, 0.1584162E+00, 0.1632000E+00, 0.1289300E+00, &
     & 0.1463800E+00, 0.1547397E+00, 0.1556096E+00, 0.1579666E+00, &
     & 0.1615197E+00, 0.1654168E+00, 0.1695900E+00, 0.1879500E+00, &
     & 0.1896695E+00, 0.1480700E+00, 0.2090711E+00, 0.2090711E+00 /
      data (ref_adm(12,iz, 8, 6),iz = 1,20) / &
     & 0.1779502E+00, 0.1779502E+00, 0.1927400E+00, 0.1860600E+00, &
     & 0.1963700E+00, 0.1874200E+00, 0.1411000E+00, 0.1555215E+00, &
     & 0.1789100E+00, 0.2048200E+00, 0.1556096E+00, 0.1579666E+00, &
     & 0.1593200E+00, 0.1972800E+00, 0.1433300E+00, 0.1877500E+00, &
     & 0.1896695E+00, 0.2023317E+00, 0.2090711E+00, 0.2090711E+00 /
      data (ref_adm(12,iz, 9, 6),iz = 1,20) / &
     & 0.1720900E+00, 0.1720900E+00, 0.1730600E+00, 0.1955300E+00, &
     & 0.1910500E+00, 0.1985700E+00, 0.1569969E+00, 0.1555215E+00, &
     & 0.1197600E+00, 0.1547397E+00, 0.1300500E+00, 0.1380100E+00, &
     & 0.1615197E+00, 0.2226000E+00, 0.1714144E+00, 0.1799531E+00, &
     & 0.1896695E+00, 0.2023317E+00, 0.2090711E+00, 0.2090711E+00 /
      data (ref_adm(12,iz,10, 6),iz = 1,20) / &
     & 0.1995900E+00, 0.1995900E+00, 0.1831100E+00, 0.1799100E+00, &
     & 0.1710300E+00, 0.1829400E+00, 0.1469000E+00, 0.1555215E+00, &
     & 0.1547856E+00, 0.1491900E+00, 0.1556096E+00, 0.1225800E+00, &
     & 0.1615197E+00, 0.1488800E+00, 0.1941900E+00, 0.1799531E+00, &
     & 0.1896695E+00, 0.2023317E+00, 0.2090711E+00, 0.2090711E+00 /
      data (ref_adm(12,iz,11, 6),iz = 1,20) / &
     & 0.2006700E+00, 0.2006700E+00, 0.1905600E+00, 0.1831800E+00, &
     & 0.1682400E+00, 0.1695000E+00, 0.1487200E+00, 0.1580700E+00, &
     & 0.1471600E+00, 0.1511900E+00, 0.1556096E+00, 0.1534800E+00, &
     & 0.1275900E+00, 0.1654168E+00, 0.1846300E+00, 0.1799531E+00, &
     & 0.1701900E+00, 0.1909500E+00, 0.2090711E+00, 0.2090711E+00 /
      data (ref_adm(12,iz,12, 6),iz = 1,20) / &
     & 0.1717300E+00, 0.1717300E+00, 0.1664704E+00, 0.1703100E+00, &
     & 0.1961000E+00, 0.1621200E+00, 0.1523400E+00, 0.1503000E+00, &
     & 0.1546200E+00, 0.1430700E+00, 0.1530900E+00, 0.1681900E+00, &
     & 0.1615197E+00, 0.1224500E+00, 0.1714900E+00, 0.1799531E+00, &
     & 0.1589500E+00, 0.1772500E+00, 0.2090711E+00, 0.2090711E+00 /
      data (ref_adm(12,iz,13, 6),iz = 1,20) / &
     & 0.1926400E+00, 0.1926400E+00, 0.1664704E+00, 0.1625123E+00, &
     & 0.1779600E+00, 0.1627200E+00, 0.1615800E+00, 0.1440900E+00, &
     & 0.1437200E+00, 0.1567900E+00, 0.1496700E+00, 0.1441300E+00, &
     & 0.1564200E+00, 0.1236400E+00, 0.1714144E+00, 0.1799531E+00, &
     & 0.1802200E+00, 0.1833100E+00, 0.2090711E+00, 0.2090711E+00 /
      data (ref_adm(12,iz,14, 6),iz = 1,20) / &
     & 0.1698900E+00, 0.1698900E+00, 0.1664704E+00, 0.2045600E+00, &
     & 0.1598405E+00, 0.1547200E+00, 0.1515300E+00, 0.1529800E+00, &
     & 0.1547856E+00, 0.1426000E+00, 0.1536000E+00, 0.1456500E+00, &
     & 0.1458900E+00, 0.1547800E+00, 0.1632700E+00, 0.1799531E+00, &
     & 0.1675900E+00, 0.1714900E+00, 0.2090711E+00, 0.2090711E+00 /
      data (ref_adm(12,iz,15, 6),iz = 1,20) / &
     & 0.1897400E+00, 0.1897400E+00, 0.1690800E+00, 0.2276400E+00, &
     & 0.1681700E+00, 0.1680500E+00, 0.1505000E+00, 0.1555215E+00, &
     & 0.1547856E+00, 0.1268100E+00, 0.1556096E+00, 0.1611700E+00, &
     & 0.1770800E+00, 0.1471900E+00, 0.1656800E+00, 0.1799531E+00, &
     & 0.1896695E+00, 0.1667100E+00, 0.2090711E+00, 0.2090711E+00 /
      data (ref_adm(12,iz,16, 6),iz = 1,20) / &
     & 0.1745800E+00, 0.1745800E+00, 0.1626100E+00, 0.1742600E+00, &
     & 0.1745000E+00, 0.1927700E+00, 0.1569969E+00, 0.1555215E+00, &
     & 0.1494100E+00, 0.1711300E+00, 0.1556096E+00, 0.1607400E+00, &
     & 0.1615197E+00, 0.1407400E+00, 0.1714144E+00, 0.1799531E+00, &
     & 0.1896695E+00, 0.1591100E+00, 0.1390100E+00, 0.1390100E+00 /
      data (ref_adm(12,iz,17, 6),iz = 1,20) / &
     & 0.1722900E+00, 0.1722900E+00, 0.1593800E+00, 0.1729800E+00, &
     & 0.1643600E+00, 0.1584162E+00, 0.1569969E+00, 0.1555215E+00, &
     & 0.1547856E+00, 0.1777500E+00, 0.1556096E+00, 0.1579666E+00, &
     & 0.1615197E+00, 0.1654168E+00, 0.1714144E+00, 0.1799531E+00, &
     & 0.1896695E+00, 0.2023317E+00, 0.2090711E+00, 0.2090711E+00 /
      data (ref_adm(12,iz,18, 6),iz = 1,20) / &
     & 0.1729500E+00, 0.1729500E+00, 0.1493000E+00, 0.1783238E+00, &
     & 0.1770788E+00, 0.1759081E+00, 0.1743508E+00, 0.1730247E+00, &
     & 0.2036400E+00, 0.1798000E+00, 0.1550700E+00, 0.1529100E+00, &
     & 0.1561800E+00, 0.1456500E+00, 0.1793923E+00, 0.1838676E+00, &
     & 0.1891008E+00, 0.1959354E+00, 0.1951096E+00, 0.1951096E+00 /
      data (ref_adm(12,iz,19, 6),iz = 1,20) / &
     & 0.1823584E+00, 0.1823584E+00, 0.1805213E+00, 0.1787580E+00, &
     & 0.1321800E+00, 0.1474400E+00, 0.1521800E+00, 0.1737183E+00, &
     & 0.2077600E+00, 0.1721649E+00, 0.1722115E+00, 0.2450100E+00, &
     & 0.1747049E+00, 0.1765990E+00, 0.1796204E+00, 0.1839455E+00, &
     & 0.1890458E+00, 0.1957404E+00, 0.1947210E+00, 0.1947210E+00 /
      data (ref_adm(12,iz,20, 6),iz = 1,20) / &
     & 0.1768700E+00, 0.1768700E+00, 0.1809595E+00, 0.1679700E+00, &
     & 0.1812400E+00, 0.1450100E+00, 0.1757361E+00, 0.1744214E+00, &
     & 0.1481000E+00, 0.1964900E+00, 0.1728180E+00, 0.1736948E+00, &
     & 0.1806800E+00, 0.1769433E+00, 0.1798854E+00, 0.1840786E+00, &
     & 0.2065000E+00, 0.1954934E+00, 0.1944084E+00, 0.1944084E+00 /
      data (ref_adm(12,iz,21, 6),iz = 1,20) / &
     & 0.2641900E+00, 0.2641900E+00, 0.2404700E+00, 0.1632300E+00, &
     & 0.1784143E+00, 0.1776226E+00, 0.1764729E+00, 0.1895700E+00, &
     & 0.1741358E+00, 0.1516300E+00, 0.1734856E+00, 0.1742505E+00, &
     & 0.1407200E+00, 0.1773640E+00, 0.2024400E+00, 0.1842789E+00, &
     & 0.1891427E+00, 0.1952781E+00, 0.1940476E+00, 0.1940476E+00 /
      data (ref_adm(12,iz,22, 6),iz = 1,20) / &
     & 0.1988300E+00, 0.1988300E+00, 0.2338700E+00, 0.1828269E+00, &
     & 0.2884800E+00, 0.2093700E+00, 0.1504600E+00, 0.1559400E+00, &
     & 0.1875222E+00, 0.1891795E+00, 0.1912050E+00, 0.1944928E+00, &
     & 0.1983584E+00, 0.2019832E+00, 0.2267100E+00, 0.1747800E+00, &
     & 0.2217591E+00, 0.2309010E+00, 0.2308805E+00, 0.2308805E+00 /
      data (ref_adm(12,iz,23, 6),iz = 1,20) / &
     & 0.1772900E+00, 0.1772900E+00, 0.1826603E+00, 0.1838242E+00, &
     & 0.1532100E+00, 0.1560400E+00, 0.1852400E+00, 0.1882227E+00, &
     & 0.1895399E+00, 0.1911917E+00, 0.1932447E+00, 0.1963848E+00, &
     & 0.2002104E+00, 0.1630100E+00, 0.1723500E+00, 0.1731100E+00, &
     & 0.2224974E+00, 0.2309061E+00, 0.2305697E+00, 0.2305697E+00 /
      data (ref_adm(12,iz,24, 6),iz = 1,20) / &
     & 0.1850300E+00, 0.1850300E+00, 0.1966000E+00, 0.1699800E+00, &
     & 0.2145900E+00, 0.2125200E+00, 0.1889521E+00, 0.1982200E+00, &
     & 0.2190800E+00, 0.2014400E+00, 0.2054400E+00, 0.1985292E+00, &
     & 0.2022424E+00, 0.1767800E+00, 0.2047900E+00, 0.1875900E+00, &
     & 0.2234586E+00, 0.2311593E+00, 0.2306521E+00, 0.2306521E+00 /
      data (ref_adm(12,iz,25, 6),iz = 1,20) / &
     & 0.1925300E+00, 0.1925300E+00, 0.1724600E+00, 0.1857651E+00, &
     & 0.1875983E+00, 0.1893273E+00, 0.2554100E+00, 0.2722900E+00, &
     & 0.2148700E+00, 0.1958896E+00, 0.1978255E+00, 0.2009092E+00, &
     & 0.1884100E+00, 0.1985000E+00, 0.1760500E+00, 0.1872800E+00, &
     & 0.1577600E+00, 0.2319346E+00, 0.2310263E+00, 0.2310263E+00 /
      data (ref_adm(12,iz,26, 6),iz = 1,20) / &
     & 0.1745800E+00, 0.1745800E+00, 0.1759600E+00, 0.1815600E+00, &
     & 0.1889016E+00, 0.1910073E+00, 0.1929711E+00, 0.1947451E+00, &
     & 0.1965506E+00, 0.1984494E+00, 0.2004685E+00, 0.1771600E+00, &
     & 0.2069256E+00, 0.2432700E+00, 0.2395000E+00, 0.2016100E+00, &
     & 0.2097600E+00, 0.2329392E+00, 0.2318134E+00, 0.2318134E+00 /
      data (ref_adm(12,iz,27, 6),iz = 1,20) / &
     & 0.1817809E+00, 0.1817809E+00, 0.1849469E+00, 0.1875954E+00, &
     & 0.1901460E+00, 0.1926062E+00, 0.1963800E+00, 0.1970100E+00, &
     & 0.1991020E+00, 0.2010820E+00, 0.1620300E+00, 0.1722900E+00, &
     & 0.1669300E+00, 0.2024300E+00, 0.1999700E+00, 0.2044500E+00, &
     & 0.1984300E+00, 0.1735200E+00, 0.2330110E+00, 0.2330110E+00 /
      data (ref_adm(12,iz,28, 6),iz = 1,20) / &
     & 0.1818958E+00, 0.1818958E+00, 0.1854536E+00, 0.1663800E+00, &
     & 0.1770800E+00, 0.1905800E+00, 0.2435500E+00, 0.2255100E+00, &
     & 0.2017197E+00, 0.1807900E+00, 0.1639300E+00, 0.2090654E+00, &
     & 0.1972800E+00, 0.2461000E+00, 0.2322900E+00, 0.2025300E+00, &
     & 0.1812200E+00, 0.1845000E+00, 0.1509400E+00, 0.1509400E+00 /
      data (ref_adm(12,iz,29, 6),iz = 1,20) / &
     & 0.2182100E+00, 0.2182100E+00, 0.2162800E+00, 0.1983800E+00, &
     & 0.2033200E+00, 0.2373800E+00, 0.2614500E+00, 0.2011995E+00, &
     & 0.2040603E+00, 0.2066632E+00, 0.2445400E+00, 0.2070100E+00, &
     & 0.2152305E+00, 0.2180895E+00, 0.2221444E+00, 0.1976900E+00, &
     & 0.2326504E+00, 0.2377203E+00, 0.2359692E+00, 0.2359692E+00 /
      data (ref_adm(12,iz,30, 6),iz = 1,20) / &
     & 0.1900300E+00, 0.1900300E+00, 0.2034700E+00, 0.1906900E+00, &
     & 0.2103100E+00, 0.2031300E+00, 0.1878300E+00, 0.1860200E+00, &
     & 0.2059954E+00, 0.1829100E+00, 0.1753100E+00, 0.1965100E+00, &
     & 0.2253100E+00, 0.2209312E+00, 0.1877600E+00, 0.1884000E+00, &
     & 0.2350734E+00, 0.2398317E+00, 0.2378651E+00, 0.2378651E+00 /
      data (ref_adm(12,iz,31, 6),iz = 1,20) / &
     & 0.2038400E+00, 0.2038400E+00, 0.2181800E+00, 0.2321200E+00, &
     & 0.2027600E+00, 0.2057500E+00, 0.2001000E+00, 0.1897500E+00, &
     & 0.1979900E+00, 0.2420100E+00, 0.2143520E+00, 0.2177554E+00, &
     & 0.2209858E+00, 0.1921300E+00, 0.2274883E+00, 0.2324142E+00, &
     & 0.2086800E+00, 0.2419814E+00, 0.2398186E+00, 0.2398186E+00 /
      data (ref_adm(12,iz,32, 6),iz = 1,20) / &
     & 0.1956100E+00, 0.1956100E+00, 0.2332000E+00, 0.2107700E+00, &
     & 0.1950040E+00, 0.2069000E+00, 0.2029903E+00, 0.2298500E+00, &
     & 0.2095419E+00, 0.2031500E+00, 0.2363700E+00, 0.2407500E+00, &
     & 0.1986900E+00, 0.2263844E+00, 0.2300164E+00, 0.2347558E+00, &
     & 0.2395902E+00, 0.2439992E+00, 0.2419198E+00, 0.2419198E+00 /
      data (ref_adm(12,iz,33, 6),iz = 1,20) / &
     & 0.2241300E+00, 0.2241300E+00, 0.1926800E+00, 0.2053700E+00, &
     & 0.2174900E+00, 0.2155300E+00, 0.2049105E+00, 0.1986200E+00, &
     & 0.2116945E+00, 0.2125600E+00, 0.2114300E+00, 0.2027800E+00, &
     & 0.2260655E+00, 0.2287831E+00, 0.2323466E+00, 0.2369283E+00, &
     & 0.2416185E+00, 0.2458568E+00, 0.2438991E+00, 0.2438991E+00 /
      data (ref_adm(12,iz,34, 6),iz = 1,20) / &
     & 0.1824407E+00, 0.1824407E+00, 0.1876111E+00, 0.1919088E+00, &
     & 0.1965768E+00, 0.1943000E+00, 0.2069118E+00, 0.2026700E+00, &
     & 0.2140326E+00, 0.2473100E+00, 0.2080900E+00, 0.2408800E+00, &
     & 0.2280554E+00, 0.2308067E+00, 0.2343667E+00, 0.2388036E+00, &
     & 0.2433485E+00, 0.2474484E+00, 0.2455123E+00, 0.2455123E+00 /
      data (ref_adm(12,iz,35, 6),iz = 1,20) / &
     & 0.1609400E+00, 0.1609400E+00, 0.1877925E+00, 0.1922347E+00, &
     & 0.2160600E+00, 0.2009400E+00, 0.2089417E+00, 0.2486800E+00, &
     & 0.2163897E+00, 0.2185722E+00, 0.2210171E+00, 0.2252660E+00, &
     & 0.2296234E+00, 0.2324817E+00, 0.2359506E+00, 0.2403632E+00, &
     & 0.2447944E+00, 0.2487571E+00, 0.2468773E+00, 0.2468773E+00 /
      data (ref_adm(12,iz,36, 6),iz = 1,20) / &
     & 0.1825229E+00, 0.1825229E+00, 0.1879059E+00, 0.1924367E+00, &
     & 0.1777900E+00, 0.1931500E+00, 0.2113040E+00, 0.2483000E+00, &
     & 0.2188589E+00, 0.2201152E+00, 0.2221733E+00, 0.2261551E+00, &
     & 0.2305872E+00, 0.2335856E+00, 0.2370337E+00, 0.2414265E+00, &
     & 0.2457514E+00, 0.2496877E+00, 0.2477869E+00, 0.2477869E+00 /
      data (ref_adm(12,iz,37, 6),iz = 1,20) / &
     & 0.1918000E+00, 0.1918000E+00, 0.1879747E+00, 0.2242000E+00, &
     & 0.1944400E+00, 0.2059300E+00, 0.2140536E+00, 0.2210595E+00, &
     & 0.2216803E+00, 0.2212368E+00, 0.2229058E+00, 0.2266310E+00, &
     & 0.2164600E+00, 0.2342397E+00, 0.2376698E+00, 0.2420462E+00, &
     & 0.2463160E+00, 0.2501584E+00, 0.2483453E+00, 0.2483453E+00 /
      data (ref_adm(12,iz,38, 6),iz = 1,20) / &
     & 0.1918000E+00, 0.1918000E+00, 0.1879747E+00, 0.2242000E+00, &
     & 0.1944400E+00, 0.2059300E+00, 0.2140536E+00, 0.2210595E+00, &
     & 0.2216803E+00, 0.2212368E+00, 0.2229058E+00, 0.2266310E+00, &
     & 0.2164600E+00, 0.2342397E+00, 0.2376698E+00, 0.2420462E+00, &
     & 0.2463160E+00, 0.2501584E+00, 0.2483453E+00, 0.2483453E+00 /
! Solar Zenith Angle 30.0 Albedo  0.1841169E+00
      data (ref_adm(12,iz, 1, 7),iz = 1,20) / &
     & 0.1427500E+00, 0.1427500E+00, 0.1858100E+00, 0.1848400E+00, &
     & 0.1655074E+00, 0.2073800E+00, 0.1625630E+00, 0.2207000E+00, &
     & 0.1879600E+00, 0.1602258E+00, 0.1611264E+00, 0.1330700E+00, &
     & 0.1762800E+00, 0.1620800E+00, 0.1447000E+00, 0.1972600E+00, &
     & 0.1981400E+00, 0.2095050E+00, 0.2164834E+00, 0.2164834E+00 /
      data (ref_adm(12,iz, 2, 7),iz = 1,20) / &
     & 0.1427500E+00, 0.1427500E+00, 0.1858100E+00, 0.1848400E+00, &
     & 0.1655074E+00, 0.2073800E+00, 0.1625630E+00, 0.2207000E+00, &
     & 0.1879600E+00, 0.1602258E+00, 0.1611264E+00, 0.1330700E+00, &
     & 0.1762800E+00, 0.1620800E+00, 0.1447000E+00, 0.1972600E+00, &
     & 0.1981400E+00, 0.2095050E+00, 0.2164834E+00, 0.2164834E+00 /
      data (ref_adm(12,iz, 3, 7),iz = 1,20) / &
     & 0.1462300E+00, 0.1462300E+00, 0.1551300E+00, 0.1682740E+00, &
     & 0.1383700E+00, 0.1857700E+00, 0.1625630E+00, 0.1610353E+00, &
     & 0.2223600E+00, 0.1602258E+00, 0.1637600E+00, 0.1693100E+00, &
     & 0.1424900E+00, 0.1493500E+00, 0.1832300E+00, 0.1985600E+00, &
     & 0.1669000E+00, 0.2095050E+00, 0.3347116E-08, 0.3347116E-08 /
      data (ref_adm(12,iz, 4, 7),iz = 1,20) / &
     & 0.1331100E+00, 0.1331100E+00, 0.1606000E+00, 0.1165800E+00, &
     & 0.1542800E+00, 0.1765600E+00, 0.1566600E+00, 0.1436000E+00, &
     & 0.1165100E+00, 0.1602258E+00, 0.1593300E+00, 0.1672300E+00, &
     & 0.1656900E+00, 0.1320700E+00, 0.1661000E+00, 0.1956800E+00, &
     & 0.1606400E+00, 0.2095050E+00, 0.2164834E+00, 0.2164834E+00 /
      data (ref_adm(12,iz, 5, 7),iz = 1,20) / &
     & 0.1638600E+00, 0.1638600E+00, 0.1866700E+00, 0.1703800E+00, &
     & 0.1493700E+00, 0.1616700E+00, 0.1625630E+00, 0.1762500E+00, &
     & 0.1602733E+00, 0.1602258E+00, 0.1328900E+00, 0.1384000E+00, &
     & 0.1693100E+00, 0.1726600E+00, 0.1816600E+00, 0.1821100E+00, &
     & 0.2022100E+00, 0.2095050E+00, 0.2164834E+00, 0.2164834E+00 /
      data (ref_adm(12,iz, 6, 7),iz = 1,20) / &
     & 0.1842592E+00, 0.1842592E+00, 0.1787600E+00, 0.1854800E+00, &
     & 0.1640700E+00, 0.1640326E+00, 0.1448200E+00, 0.1869300E+00, &
     & 0.1602733E+00, 0.1512600E+00, 0.1433200E+00, 0.1624200E+00, &
     & 0.1449000E+00, 0.1438400E+00, 0.1833300E+00, 0.2136900E+00, &
     & 0.2339000E+00, 0.2095050E+00, 0.2164834E+00, 0.2164834E+00 /
      data (ref_adm(12,iz, 7, 7),iz = 1,20) / &
     & 0.1842592E+00, 0.1842592E+00, 0.1723723E+00, 0.1391200E+00, &
     & 0.1980700E+00, 0.1776000E+00, 0.1978200E+00, 0.1561200E+00, &
     & 0.1602733E+00, 0.1602258E+00, 0.1708000E+00, 0.1428300E+00, &
     & 0.1422900E+00, 0.1880100E+00, 0.1669400E+00, 0.1822200E+00, &
     & 0.1963940E+00, 0.2535900E+00, 0.2164834E+00, 0.2164834E+00 /
      data (ref_adm(12,iz, 8, 7),iz = 1,20) / &
     & 0.1842592E+00, 0.1842592E+00, 0.1831600E+00, 0.1993900E+00, &
     & 0.1793900E+00, 0.1472800E+00, 0.1536300E+00, 0.1534900E+00, &
     & 0.1571800E+00, 0.1602258E+00, 0.1611264E+00, 0.1790300E+00, &
     & 0.1945900E+00, 0.1808900E+00, 0.2119800E+00, 0.1707700E+00, &
     & 0.2617500E+00, 0.2095050E+00, 0.2164834E+00, 0.2164834E+00 /
      data (ref_adm(12,iz, 9, 7),iz = 1,20) / &
     & 0.1707900E+00, 0.1707900E+00, 0.1933900E+00, 0.1628600E+00, &
     & 0.1733100E+00, 0.1461300E+00, 0.1312700E+00, 0.1795500E+00, &
     & 0.1795800E+00, 0.1496300E+00, 0.1611264E+00, 0.1780700E+00, &
     & 0.1485900E+00, 0.2234900E+00, 0.1774916E+00, 0.1923000E+00, &
     & 0.1916400E+00, 0.2095050E+00, 0.2164834E+00, 0.2164834E+00 /
      data (ref_adm(12,iz,10, 7),iz = 1,20) / &
     & 0.1683200E+00, 0.1683200E+00, 0.1943400E+00, 0.1586200E+00, &
     & 0.1516900E+00, 0.1548300E+00, 0.1505400E+00, 0.1197100E+00, &
     & 0.1831500E+00, 0.2554400E+00, 0.1821200E+00, 0.1847700E+00, &
     & 0.1738100E+00, 0.2117100E+00, 0.2059000E+00, 0.2275300E+00, &
     & 0.1963940E+00, 0.1684000E+00, 0.1715000E+00, 0.1715000E+00 /
      data (ref_adm(12,iz,11, 7),iz = 1,20) / &
     & 0.1500300E+00, 0.1500300E+00, 0.1828700E+00, 0.1720000E+00, &
     & 0.1775900E+00, 0.1587900E+00, 0.1530700E+00, 0.1515200E+00, &
     & 0.1451000E+00, 0.1731800E+00, 0.1183900E+00, 0.1821700E+00, &
     & 0.1811200E+00, 0.1534400E+00, 0.1636000E+00, 0.1863330E+00, &
     & 0.2100100E+00, 0.2095050E+00, 0.1562100E+00, 0.1562100E+00 /
      data (ref_adm(12,iz,12, 7),iz = 1,20) / &
     & 0.1884600E+00, 0.1884600E+00, 0.1729800E+00, 0.1662600E+00, &
     & 0.1891200E+00, 0.1733800E+00, 0.1649800E+00, 0.1709600E+00, &
     & 0.1663700E+00, 0.1732100E+00, 0.1489300E+00, 0.1364000E+00, &
     & 0.1640400E+00, 0.1344600E+00, 0.1460500E+00, 0.1723500E+00, &
     & 0.2213200E+00, 0.2095050E+00, 0.2164834E+00, 0.2164834E+00 /
      data (ref_adm(12,iz,13, 7),iz = 1,20) / &
     & 0.1775300E+00, 0.1775300E+00, 0.1484000E+00, 0.1563500E+00, &
     & 0.1734900E+00, 0.1726700E+00, 0.1658500E+00, 0.1686300E+00, &
     & 0.1652400E+00, 0.1821400E+00, 0.1776900E+00, 0.1589800E+00, &
     & 0.1679300E+00, 0.1623400E+00, 0.1774916E+00, 0.1863330E+00, &
     & 0.1963940E+00, 0.2095050E+00, 0.2164834E+00, 0.2164834E+00 /
      data (ref_adm(12,iz,14, 7),iz = 1,20) / &
     & 0.1924600E+00, 0.1924600E+00, 0.1723723E+00, 0.2493100E+00, &
     & 0.1566400E+00, 0.1700200E+00, 0.1411400E+00, 0.1533400E+00, &
     & 0.1481700E+00, 0.1756800E+00, 0.1671300E+00, 0.1694700E+00, &
     & 0.1708000E+00, 0.1764000E+00, 0.1774916E+00, 0.1863330E+00, &
     & 0.1963940E+00, 0.1712100E+00, 0.2164834E+00, 0.2164834E+00 /
      data (ref_adm(12,iz,15, 7),iz = 1,20) / &
     & 0.1510200E+00, 0.1510200E+00, 0.1181200E+00, 0.1682740E+00, &
     & 0.1655074E+00, 0.2101100E+00, 0.1816900E+00, 0.1788300E+00, &
     & 0.1539000E+00, 0.1618800E+00, 0.1480400E+00, 0.1531900E+00, &
     & 0.1629400E+00, 0.1679300E+00, 0.1774916E+00, 0.1863330E+00, &
     & 0.1963940E+00, 0.1606500E+00, 0.2164834E+00, 0.2164834E+00 /
      data (ref_adm(12,iz,16, 7),iz = 1,20) / &
     & 0.1481500E+00, 0.1481500E+00, 0.1495300E+00, 0.1581100E+00, &
     & 0.1296200E+00, 0.1767200E+00, 0.2052800E+00, 0.1929800E+00, &
     & 0.1510300E+00, 0.1701700E+00, 0.1855200E+00, 0.1702400E+00, &
     & 0.1333600E+00, 0.1555200E+00, 0.1774916E+00, 0.1863330E+00, &
     & 0.1648800E+00, 0.2095050E+00, 0.2164834E+00, 0.2164834E+00 /
      data (ref_adm(12,iz,17, 7),iz = 1,20) / &
     & 0.1943700E+00, 0.1943700E+00, 0.2445700E+00, 0.1741700E+00, &
     & 0.1655074E+00, 0.1833100E+00, 0.1829700E+00, 0.1610353E+00, &
     & 0.1433400E+00, 0.2132800E+00, 0.1604800E+00, 0.1698400E+00, &
     & 0.1267800E+00, 0.1712814E+00, 0.1513500E+00, 0.1692000E+00, &
     & 0.1963940E+00, 0.2095050E+00, 0.2164834E+00, 0.2164834E+00 /
      data (ref_adm(12,iz,18, 7),iz = 1,20) / &
     & 0.1816900E+00, 0.1816900E+00, 0.2348300E+00, 0.1605900E+00, &
     & 0.1535200E+00, 0.1578600E+00, 0.1574600E+00, 0.1253800E+00, &
     & 0.1344800E+00, 0.1595800E+00, 0.1605600E+00, 0.2111600E+00, &
     & 0.1312700E+00, 0.1726200E+00, 0.1505400E+00, 0.1820364E+00, &
     & 0.1872175E+00, 0.1939840E+00, 0.1931664E+00, 0.1931664E+00 /
      data (ref_adm(12,iz,19, 7),iz = 1,20) / &
     & 0.1805423E+00, 0.1805423E+00, 0.1101500E+00, 0.1722300E+00, &
     & 0.1578000E+00, 0.1747178E+00, 0.1732963E+00, 0.2014500E+00, &
     & 0.2251500E+00, 0.1537500E+00, 0.1759400E+00, 0.1854500E+00, &
     & 0.2041700E+00, 0.1623500E+00, 0.1723300E+00, 0.1821135E+00, &
     & 0.1871631E+00, 0.1937910E+00, 0.1927817E+00, 0.1927817E+00 /
      data (ref_adm(12,iz,20, 7),iz = 1,20) / &
     & 0.1747900E+00, 0.1747900E+00, 0.1693000E+00, 0.2110800E+00, &
     & 0.1761935E+00, 0.1947500E+00, 0.1830300E+00, 0.1859900E+00, &
     & 0.1716548E+00, 0.1660100E+00, 0.2255100E+00, 0.1644700E+00, &
     & 0.1734372E+00, 0.1321500E+00, 0.1756300E+00, 0.1822453E+00, &
     & 0.1871870E+00, 0.1935465E+00, 0.1924722E+00, 0.1924722E+00 /
      data (ref_adm(12,iz,21, 7),iz = 1,20) / &
     & 0.1808028E+00, 0.1808028E+00, 0.1795980E+00, 0.1779172E+00, &
     & 0.1855500E+00, 0.1758536E+00, 0.2272200E+00, 0.1857200E+00, &
     & 0.1645900E+00, 0.1864600E+00, 0.1717577E+00, 0.1710000E+00, &
     & 0.1739490E+00, 0.1468600E+00, 0.1713900E+00, 0.1824437E+00, &
     & 0.1872590E+00, 0.1933334E+00, 0.1921151E+00, 0.1921151E+00 /
      data (ref_adm(12,iz,22, 7),iz = 1,20) / &
     & 0.1779990E+00, 0.1779990E+00, 0.1956600E+00, 0.2041600E+00, &
     & 0.1485500E+00, 0.1874800E+00, 0.1758800E+00, 0.2249800E+00, &
     & 0.1976400E+00, 0.1821480E+00, 0.1426400E+00, 0.1863927E+00, &
     & 0.1917300E+00, 0.1929884E+00, 0.1673300E+00, 0.1989800E+00, &
     & 0.2101716E+00, 0.2169488E+00, 0.2136743E+00, 0.2136743E+00 /
      data (ref_adm(12,iz,23, 7),iz = 1,20) / &
     & 0.1563500E+00, 0.1563500E+00, 0.1839400E+00, 0.1593800E+00, &
     & 0.1873100E+00, 0.2105300E+00, 0.1829700E+00, 0.1722700E+00, &
     & 0.1890500E+00, 0.1656000E+00, 0.1523300E+00, 0.1656400E+00, &
     & 0.1869900E+00, 0.1953800E+00, 0.1467400E+00, 0.2105200E+00, &
     & 0.2107079E+00, 0.2168973E+00, 0.2132440E+00, 0.2132440E+00 /
      data (ref_adm(12,iz,24, 7),iz = 1,20) / &
     & 0.1757600E+00, 0.1757600E+00, 0.1799546E+00, 0.1903100E+00, &
     & 0.1920800E+00, 0.1755200E+00, 0.1834600E+00, 0.1959200E+00, &
     & 0.1975400E+00, 0.1862925E+00, 0.1438600E+00, 0.1689300E+00, &
     & 0.2082500E+00, 0.2095100E+00, 0.2009000E+00, 0.1762300E+00, &
     & 0.2113721E+00, 0.2168882E+00, 0.2131520E+00, 0.2131520E+00 /
      data (ref_adm(12,iz,25, 7),iz = 1,20) / &
     & 0.1794500E+00, 0.1794500E+00, 0.2040800E+00, 0.1819830E+00, &
     & 0.1919600E+00, 0.1986800E+00, 0.1524200E+00, 0.2039700E+00, &
     & 0.1875781E+00, 0.1627500E+00, 0.1909400E+00, 0.1841800E+00, &
     & 0.1749800E+00, 0.1829000E+00, 0.2088900E+00, 0.1745200E+00, &
     & 0.2120844E+00, 0.1744100E+00, 0.2133038E+00, 0.2133038E+00 /
      data (ref_adm(12,iz,26, 7),iz = 1,20) / &
     & 0.1992300E+00, 0.1992300E+00, 0.1854500E+00, 0.1975100E+00, &
     & 0.1833000E+00, 0.1651100E+00, 0.1797600E+00, 0.1890137E+00, &
     & 0.1899285E+00, 0.1910340E+00, 0.2047400E+00, 0.1803300E+00, &
     & 0.1504100E+00, 0.2238000E+00, 0.2142100E+00, 0.2127300E+00, &
     & 0.1961700E+00, 0.1703600E+00, 0.1455900E+00, 0.1455900E+00 /
      data (ref_adm(12,iz,27, 7),iz = 1,20) / &
     & 0.1457000E+00, 0.1457000E+00, 0.1602700E+00, 0.1629200E+00, &
     & 0.1654900E+00, 0.1558600E+00, 0.1507600E+00, 0.1691700E+00, &
     & 0.1923930E+00, 0.1934631E+00, 0.1969100E+00, 0.1838400E+00, &
     & 0.1422300E+00, 0.1741500E+00, 0.2107200E+00, 0.1924100E+00, &
     & 0.2167000E+00, 0.2266700E+00, 0.2141867E+00, 0.2141867E+00 /
      data (ref_adm(12,iz,28, 7),iz = 1,20) / &
     & 0.1830300E+00, 0.1830300E+00, 0.1727400E+00, 0.1951800E+00, &
     & 0.1530600E+00, 0.1799900E+00, 0.1643600E+00, 0.1928900E+00, &
     & 0.2256400E+00, 0.1986800E+00, 0.2013800E+00, 0.1606000E+00, &
     & 0.2043200E+00, 0.1799100E+00, 0.1917400E+00, 0.2133600E+00, &
     & 0.2119700E+00, 0.2071900E+00, 0.2150009E+00, 0.2150009E+00 /
      data (ref_adm(12,iz,29, 7),iz = 1,20) / &
     & 0.1850100E+00, 0.1850100E+00, 0.1846400E+00, 0.1936700E+00, &
     & 0.1825000E+00, 0.1835500E+00, 0.1957800E+00, 0.1960700E+00, &
     & 0.2044200E+00, 0.2193100E+00, 0.2107300E+00, 0.2116800E+00, &
     & 0.1898100E+00, 0.1936700E+00, 0.1857600E+00, 0.2196400E+00, &
     & 0.2173851E+00, 0.2205750E+00, 0.1683600E+00, 0.1683600E+00 /
      data (ref_adm(12,iz,30, 7),iz = 1,20) / &
     & 0.1729500E+00, 0.1729500E+00, 0.1784600E+00, 0.1748100E+00, &
     & 0.2093500E+00, 0.1910700E+00, 0.1842000E+00, 0.2112800E+00, &
     & 0.2209300E+00, 0.1989600E+00, 0.1924000E+00, 0.2149600E+00, &
     & 0.2064071E+00, 0.1994500E+00, 0.1981400E+00, 0.2234900E+00, &
     & 0.2191299E+00, 0.2217844E+00, 0.2168995E+00, 0.2168995E+00 /
      data (ref_adm(12,iz,31, 7),iz = 1,20) / &
     & 0.1516400E+00, 0.1516400E+00, 0.1826250E+00, 0.1968600E+00, &
     & 0.1900200E+00, 0.1707300E+00, 0.1891000E+00, 0.2630900E+00, &
     & 0.2083400E+00, 0.1960800E+00, 0.1861200E+00, 0.2168600E+00, &
     & 0.2262000E+00, 0.2145400E+00, 0.1936000E+00, 0.2056000E+00, &
     & 0.2234900E+00, 0.2230570E+00, 0.2179194E+00, 0.2179194E+00 /
      data (ref_adm(12,iz,32, 7),iz = 1,20) / &
     & 0.1766700E+00, 0.1766700E+00, 0.2054100E+00, 0.2210100E+00, &
     & 0.1898866E+00, 0.1934776E+00, 0.1810000E+00, 0.2228600E+00, &
     & 0.1616200E+00, 0.2036338E+00, 0.2064542E+00, 0.2211500E+00, &
     & 0.2213100E+00, 0.2287200E+00, 0.2073100E+00, 0.2217000E+00, &
     & 0.2326000E+00, 0.2243328E+00, 0.2190333E+00, 0.2190333E+00 /
      data (ref_adm(12,iz,33, 7),iz = 1,20) / &
     & 0.1583300E+00, 0.1583300E+00, 0.1910500E+00, 0.2059600E+00, &
     & 0.1909486E+00, 0.2427800E+00, 0.1981693E+00, 0.2004500E+00, &
     & 0.1685700E+00, 0.2075400E+00, 0.2031900E+00, 0.2303100E+00, &
     & 0.2127872E+00, 0.1938200E+00, 0.2170886E+00, 0.2300400E+00, &
     & 0.2236625E+00, 0.2255731E+00, 0.2201199E+00, 0.2201199E+00 /
      data (ref_adm(12,iz,34, 7),iz = 1,20) / &
     & 0.1865300E+00, 0.1865300E+00, 0.1730700E+00, 0.2238900E+00, &
     & 0.2623600E+00, 0.2180700E+00, 0.2002852E+00, 0.2247400E+00, &
     & 0.2206700E+00, 0.2279000E+00, 0.2238700E+00, 0.2493200E+00, &
     & 0.1985400E+00, 0.1807300E+00, 0.2185671E+00, 0.2624400E+00, &
     & 0.2247971E+00, 0.2265909E+00, 0.2210277E+00, 0.2210277E+00 /
      data (ref_adm(12,iz,35, 7),iz = 1,20) / &
     & 0.2081500E+00, 0.2081500E+00, 0.1983300E+00, 0.1875920E+00, &
     & 0.1929220E+00, 0.1987060E+00, 0.1721200E+00, 0.2813000E+00, &
     & 0.2241700E+00, 0.2310500E+00, 0.2099100E+00, 0.1842700E+00, &
     & 0.2274800E+00, 0.2174357E+00, 0.2197461E+00, 0.2227734E+00, &
     & 0.2257244E+00, 0.2274692E+00, 0.2217831E+00, 0.2217831E+00 /
      data (ref_adm(12,iz,36, 7),iz = 1,20) / &
     & 0.1557200E+00, 0.1557200E+00, 0.1827600E+00, 0.1734900E+00, &
     & 0.2394100E+00, 0.2018600E+00, 0.2345500E+00, 0.2395900E+00, &
     & 0.2064502E+00, 0.2360800E+00, 0.2449600E+00, 0.2388000E+00, &
     & 0.2393300E+00, 0.2182760E+00, 0.2355900E+00, 0.2235267E+00, &
     & 0.2264154E+00, 0.2280272E+00, 0.2223441E+00, 0.2223441E+00 /
      data (ref_adm(12,iz,37, 7),iz = 1,20) / &
     & 0.1673100E+00, 0.1673100E+00, 0.1885100E+00, 0.1880543E+00, &
     & 0.1941472E+00, 0.2454000E+00, 0.2600400E+00, 0.2201500E+00, &
     & 0.2323900E+00, 0.2541600E+00, 0.2285800E+00, 0.2143615E+00, &
     & 0.2269700E+00, 0.2018000E+00, 0.2210290E+00, 0.2239350E+00, &
     & 0.2267843E+00, 0.2283200E+00, 0.2226613E+00, 0.2226613E+00 /
      data (ref_adm(12,iz,38, 7),iz = 1,20) / &
     & 0.1673100E+00, 0.1673100E+00, 0.1885100E+00, 0.1880543E+00, &
     & 0.1941472E+00, 0.2454000E+00, 0.2600400E+00, 0.2201500E+00, &
     & 0.2323900E+00, 0.2541600E+00, 0.2285800E+00, 0.2143615E+00, &
     & 0.2269700E+00, 0.2018000E+00, 0.2210290E+00, 0.2239350E+00, &
     & 0.2267843E+00, 0.2283200E+00, 0.2226613E+00, 0.2226613E+00 /
! Solar Zenith Angle 35.0 Albedo  0.1967348E+00
      data (ref_adm(12,iz, 1, 8),iz = 1,20) / &
     & 0.1978300E+00, 0.1978300E+00, 0.1774800E+00, 0.1800977E+00, &
     & 0.2067400E+00, 0.1951100E+00, 0.1747600E+00, 0.1601200E+00, &
     & 0.2127900E+00, 0.1740700E+00, 0.1751200E+00, 0.1859000E+00, &
     & 0.1473000E+00, 0.1725200E+00, 0.1854400E+00, 0.1991900E+00, &
     & 0.2140700E+00, 0.2086600E+00, 0.2146164E+00, 0.2146164E+00 /
      data (ref_adm(12,iz, 2, 8),iz = 1,20) / &
     & 0.1978300E+00, 0.1978300E+00, 0.1774800E+00, 0.1800977E+00, &
     & 0.2067400E+00, 0.1951100E+00, 0.1747600E+00, 0.1601200E+00, &
     & 0.2127900E+00, 0.1740700E+00, 0.1751200E+00, 0.1859000E+00, &
     & 0.1473000E+00, 0.1725200E+00, 0.1854400E+00, 0.1991900E+00, &
     & 0.2140700E+00, 0.2086600E+00, 0.2146164E+00, 0.2146164E+00 /
      data (ref_adm(12,iz, 3, 8),iz = 1,20) / &
     & 0.1939500E+00, 0.1939500E+00, 0.1746000E+00, 0.1934400E+00, &
     & 0.1591000E+00, 0.1814100E+00, 0.1670400E+00, 0.1739300E+00, &
     & 0.1611200E+00, 0.1851200E+00, 0.1879700E+00, 0.1890400E+00, &
     & 0.1550200E+00, 0.1622600E+00, 0.1672300E+00, 0.2037400E+00, &
     & 0.2202900E+00, 0.2670700E+00, 0.3327194E-01, 0.3327194E-01 /
      data (ref_adm(12,iz, 4, 8),iz = 1,20) / &
     & 0.2139200E+00, 0.2139200E+00, 0.1766300E+00, 0.1933700E+00, &
     & 0.1622800E+00, 0.1576000E+00, 0.1434100E+00, 0.1751600E+00, &
     & 0.1755200E+00, 0.1614200E+00, 0.1774900E+00, 0.1711900E+00, &
     & 0.1571500E+00, 0.1571400E+00, 0.1664400E+00, 0.1851600E+00, &
     & 0.2104100E+00, 0.2119200E+00, 0.2087400E+00, 0.2087400E+00 /
      data (ref_adm(12,iz, 5, 8),iz = 1,20) / &
     & 0.2141700E+00, 0.2141700E+00, 0.1717100E+00, 0.1606900E+00, &
     & 0.1606200E+00, 0.2147300E+00, 0.1367000E+00, 0.1611900E+00, &
     & 0.1684800E+00, 0.1940900E+00, 0.1744400E+00, 0.1733200E+00, &
     & 0.1744200E+00, 0.1599900E+00, 0.1571800E+00, 0.1805000E+00, &
     & 0.2093800E+00, 0.2107196E+00, 0.2139441E+00, 0.2139441E+00 /
      data (ref_adm(12,iz, 6, 8),iz = 1,20) / &
     & 0.1858800E+00, 0.1858800E+00, 0.1700300E+00, 0.1679100E+00, &
     & 0.1627800E+00, 0.1624300E+00, 0.1689200E+00, 0.1481300E+00, &
     & 0.1741100E+00, 0.1883300E+00, 0.1734800E+00, 0.1781800E+00, &
     & 0.1528900E+00, 0.1848300E+00, 0.1910200E+00, 0.1674400E+00, &
     & 0.2402800E+00, 0.2067600E+00, 0.2135309E+00, 0.2135309E+00 /
      data (ref_adm(12,iz, 7, 8),iz = 1,20) / &
     & 0.1934500E+00, 0.1934500E+00, 0.2099900E+00, 0.1898500E+00, &
     & 0.1824200E+00, 0.1626900E+00, 0.1447300E+00, 0.1633400E+00, &
     & 0.1764900E+00, 0.2068700E+00, 0.1827200E+00, 0.1705000E+00, &
     & 0.1653000E+00, 0.1695600E+00, 0.1689600E+00, 0.2352600E+00, &
     & 0.1999648E+00, 0.1543600E+00, 0.2129568E+00, 0.2129568E+00 /
      data (ref_adm(12,iz, 8, 8),iz = 1,20) / &
     & 0.1717000E+00, 0.1717000E+00, 0.1644800E+00, 0.1786700E+00, &
     & 0.1804600E+00, 0.1784600E+00, 0.1916100E+00, 0.1873100E+00, &
     & 0.1811800E+00, 0.1942100E+00, 0.1944200E+00, 0.1681900E+00, &
     & 0.1786100E+00, 0.1932200E+00, 0.1940400E+00, 0.2261600E+00, &
     & 0.2812400E+00, 0.2095804E+00, 0.2342600E+00, 0.2342600E+00 /
      data (ref_adm(12,iz, 9, 8),iz = 1,20) / &
     & 0.2120800E+00, 0.2120800E+00, 0.1844800E+00, 0.1940500E+00, &
     & 0.2183100E+00, 0.1638700E+00, 0.1552100E+00, 0.1957000E+00, &
     & 0.2071100E+00, 0.1940300E+00, 0.2075800E+00, 0.1689100E+00, &
     & 0.1742000E+00, 0.1761900E+00, 0.2365900E+00, 0.1924528E+00, &
     & 0.2466700E+00, 0.1940700E+00, 0.2346400E+00, 0.2346400E+00 /
      data (ref_adm(12,iz,10, 8),iz = 1,20) / &
     & 0.2016400E+00, 0.2016400E+00, 0.1963300E+00, 0.2021500E+00, &
     & 0.1806700E+00, 0.1868100E+00, 0.1507800E+00, 0.2009400E+00, &
     & 0.1388200E+00, 0.1991500E+00, 0.1653600E+00, 0.1737000E+00, &
     & 0.2015300E+00, 0.1774400E+00, 0.2132600E+00, 0.2339100E+00, &
     & 0.2159900E+00, 0.2086376E+00, 0.2285500E+00, 0.2285500E+00 /
      data (ref_adm(12,iz,11, 8),iz = 1,20) / &
     & 0.2242400E+00, 0.2242400E+00, 0.1876300E+00, 0.1610000E+00, &
     & 0.1700400E+00, 0.1954100E+00, 0.1935800E+00, 0.1723000E+00, &
     & 0.1686800E+00, 0.1590000E+00, 0.1774500E+00, 0.1701800E+00, &
     & 0.1904600E+00, 0.1732400E+00, 0.1629200E+00, 0.1828500E+00, &
     & 0.2144200E+00, 0.2080728E+00, 0.1720900E+00, 0.1720900E+00 /
      data (ref_adm(12,iz,12, 8),iz = 1,20) / &
     & 0.1948100E+00, 0.1948100E+00, 0.1891400E+00, 0.1821200E+00, &
     & 0.1791700E+00, 0.1825400E+00, 0.1806600E+00, 0.1822900E+00, &
     & 0.1666900E+00, 0.1600700E+00, 0.1397800E+00, 0.1532100E+00, &
     & 0.1699300E+00, 0.1800300E+00, 0.2034100E+00, 0.2230000E+00, &
     & 0.1987631E+00, 0.2157400E+00, 0.2091915E+00, 0.2091915E+00 /
      data (ref_adm(12,iz,13, 8),iz = 1,20) / &
     & 0.1909100E+00, 0.1909100E+00, 0.1893300E+00, 0.1737800E+00, &
     & 0.1764300E+00, 0.1675400E+00, 0.1620800E+00, 0.1638300E+00, &
     & 0.1634800E+00, 0.1657100E+00, 0.1644600E+00, 0.1668000E+00, &
     & 0.1666700E+00, 0.1471400E+00, 0.1803900E+00, 0.1919400E+00, &
     & 0.1486100E+00, 0.2070843E+00, 0.2083384E+00, 0.2083384E+00 /
      data (ref_adm(12,iz,14, 8),iz = 1,20) / &
     & 0.1815900E+00, 0.1815900E+00, 0.1526000E+00, 0.1635300E+00, &
     & 0.1633100E+00, 0.1639000E+00, 0.1771200E+00, 0.1692700E+00, &
     & 0.1769700E+00, 0.1710200E+00, 0.1768200E+00, 0.1567400E+00, &
     & 0.1666000E+00, 0.1702500E+00, 0.1846400E+00, 0.2016500E+00, &
     & 0.2232700E+00, 0.2065867E+00, 0.2074450E+00, 0.2074450E+00 /
      data (ref_adm(12,iz,15, 8),iz = 1,20) / &
     & 0.1730600E+00, 0.1730600E+00, 0.1677000E+00, 0.1814800E+00, &
     & 0.1802000E+00, 0.1609100E+00, 0.1754600E+00, 0.1907800E+00, &
     & 0.1565200E+00, 0.1662500E+00, 0.1790300E+00, 0.1646000E+00, &
     & 0.1575500E+00, 0.1697300E+00, 0.2327300E+00, 0.1620100E+00, &
     & 0.2478400E+00, 0.2061649E+00, 0.1774500E+00, 0.1774500E+00 /
      data (ref_adm(12,iz,16, 8),iz = 1,20) / &
     & 0.1895600E+00, 0.1895600E+00, 0.2116500E+00, 0.2177400E+00, &
     & 0.1713400E+00, 0.1719600E+00, 0.1860200E+00, 0.1809000E+00, &
     & 0.1829700E+00, 0.1659800E+00, 0.1726200E+00, 0.1439300E+00, &
     & 0.1594700E+00, 0.1759100E+00, 0.2108900E+00, 0.1919038E+00, &
     & 0.1978666E+00, 0.1806200E+00, 0.2057473E+00, 0.2057473E+00 /
      data (ref_adm(12,iz,17, 8),iz = 1,20) / &
     & 0.1987500E+00, 0.1987500E+00, 0.1965700E+00, 0.1958600E+00, &
     & 0.1452300E+00, 0.1986200E+00, 0.1987500E+00, 0.1686500E+00, &
     & 0.1706100E+00, 0.1627100E+00, 0.1667000E+00, 0.1668400E+00, &
     & 0.1849300E+00, 0.1557200E+00, 0.2218900E+00, 0.1884200E+00, &
     & 0.1979300E+00, 0.2053661E+00, 0.2050238E+00, 0.2050238E+00 /
      data (ref_adm(12,iz,18, 8),iz = 1,20) / &
     & 0.2215500E+00, 0.2215500E+00, 0.2138200E+00, 0.1909100E+00, &
     & 0.1981300E+00, 0.1913900E+00, 0.1789400E+00, 0.1770800E+00, &
     & 0.1696900E+00, 0.1629700E+00, 0.1701900E+00, 0.1775400E+00, &
     & 0.1742000E+00, 0.2105700E+00, 0.1562100E+00, 0.1768400E+00, &
     & 0.2035500E+00, 0.2072136E+00, 0.2065270E+00, 0.2065270E+00 /
      data (ref_adm(12,iz,19, 8),iz = 1,20) / &
     & 0.2209200E+00, 0.2209200E+00, 0.2265700E+00, 0.1927700E+00, &
     & 0.1969700E+00, 0.1961900E+00, 0.2440900E+00, 0.1730300E+00, &
     & 0.1879500E+00, 0.1437600E+00, 0.1801700E+00, 0.1621400E+00, &
     & 0.1570000E+00, 0.1860200E+00, 0.1781000E+00, 0.2039000E+00, &
     & 0.1996762E+00, 0.2092600E+00, 0.2059743E+00, 0.2059743E+00 /
      data (ref_adm(12,iz,20, 8),iz = 1,20) / &
     & 0.1611800E+00, 0.1611800E+00, 0.1350100E+00, 0.2231200E+00, &
     & 0.2201700E+00, 0.1661600E+00, 0.1771900E+00, 0.1850000E+00, &
     & 0.1702600E+00, 0.1606800E+00, 0.1624100E+00, 0.1609900E+00, &
     & 0.1636400E+00, 0.1798500E+00, 0.1802100E+00, 0.1942771E+00, &
     & 0.1996875E+00, 0.2066009E+00, 0.2055437E+00, 0.2055437E+00 /
      data (ref_adm(12,iz,21, 8),iz = 1,20) / &
     & 0.1627900E+00, 0.1627900E+00, 0.2295300E+00, 0.1732400E+00, &
     & 0.1888400E+00, 0.1887100E+00, 0.1742400E+00, 0.1834400E+00, &
     & 0.2146300E+00, 0.1731400E+00, 0.1530200E+00, 0.1716200E+00, &
     & 0.1870300E+00, 0.1837000E+00, 0.1661000E+00, 0.2357300E+00, &
     & 0.1997332E+00, 0.2063451E+00, 0.2051081E+00, 0.2051081E+00 /
      data (ref_adm(12,iz,22, 8),iz = 1,20) / &
     & 0.1809200E+00, 0.1809200E+00, 0.1878700E+00, 0.1793200E+00, &
     & 0.1497200E+00, 0.1734300E+00, 0.1950000E+00, 0.2229600E+00, &
     & 0.2004600E+00, 0.1905100E+00, 0.1665700E+00, 0.1709500E+00, &
     & 0.1592500E+00, 0.1634100E+00, 0.1701900E+00, 0.2176700E+00, &
     & 0.2271729E+00, 0.2342874E+00, 0.2302816E+00, 0.2302816E+00 /
      data (ref_adm(12,iz,23, 8),iz = 1,20) / &
     & 0.1938400E+00, 0.1938400E+00, 0.2197700E+00, 0.2065900E+00, &
     & 0.1804200E+00, 0.1648000E+00, 0.1869800E+00, 0.1918500E+00, &
     & 0.2107100E+00, 0.1845900E+00, 0.2253600E+00, 0.1751800E+00, &
     & 0.1793300E+00, 0.2086600E+00, 0.2209100E+00, 0.2215419E+00, &
     & 0.2278477E+00, 0.2342122E+00, 0.2299603E+00, 0.2299603E+00 /
      data (ref_adm(12,iz,24, 8),iz = 1,20) / &
     & 0.1912800E+00, 0.1912800E+00, 0.2097000E+00, 0.1996900E+00, &
     & 0.1974300E+00, 0.1804300E+00, 0.2048900E+00, 0.2231900E+00, &
     & 0.1895400E+00, 0.2098000E+00, 0.2134200E+00, 0.1910500E+00, &
     & 0.1923900E+00, 0.2579400E+00, 0.2110800E+00, 0.2227925E+00, &
     & 0.2287270E+00, 0.2343801E+00, 0.2300206E+00, 0.2300206E+00 /
      data (ref_adm(12,iz,25, 8),iz = 1,20) / &
     & 0.1895800E+00, 0.1895800E+00, 0.2214300E+00, 0.1675800E+00, &
     & 0.1883600E+00, 0.1974900E+00, 0.1997600E+00, 0.1915100E+00, &
     & 0.1908300E+00, 0.2212200E+00, 0.2268800E+00, 0.2174100E+00, &
     & 0.1831200E+00, 0.2020000E+00, 0.1938700E+00, 0.1783700E+00, &
     & 0.2056200E+00, 0.2193800E+00, 0.2303674E+00, 0.2303674E+00 /
      data (ref_adm(12,iz,26, 8),iz = 1,20) / &
     & 0.1933500E+00, 0.1933500E+00, 0.2044900E+00, 0.1836400E+00, &
     & 0.1727800E+00, 0.2265900E+00, 0.2004600E+00, 0.1774500E+00, &
     & 0.1783700E+00, 0.1794300E+00, 0.1982200E+00, 0.1981000E+00, &
     & 0.2172900E+00, 0.2333700E+00, 0.2245700E+00, 0.1931800E+00, &
     & 0.1972500E+00, 0.1630900E+00, 0.2311216E+00, 0.2311216E+00 /
      data (ref_adm(12,iz,27, 8),iz = 1,20) / &
     & 0.1953200E+00, 0.1953200E+00, 0.2067900E+00, 0.1985000E+00, &
     & 0.1788400E+00, 0.1899300E+00, 0.2117300E+00, 0.2121300E+00, &
     & 0.1991400E+00, 0.1984300E+00, 0.2084600E+00, 0.2285100E+00, &
     & 0.2138800E+00, 0.2325400E+00, 0.2065300E+00, 0.2121600E+00, &
     & 0.1966000E+00, 0.2026800E+00, 0.2322796E+00, 0.2322796E+00 /
      data (ref_adm(12,iz,28, 8),iz = 1,20) / &
     & 0.1936900E+00, 0.1936900E+00, 0.2160000E+00, 0.1949000E+00, &
     & 0.2038100E+00, 0.2045200E+00, 0.2103500E+00, 0.2149400E+00, &
     & 0.2109700E+00, 0.2122300E+00, 0.2136200E+00, 0.2310000E+00, &
     & 0.2204400E+00, 0.2263000E+00, 0.2265061E+00, 0.1964600E+00, &
     & 0.2259100E+00, 0.2079200E+00, 0.2336268E+00, 0.2336268E+00 /
      data (ref_adm(12,iz,29, 8),iz = 1,20) / &
     & 0.1879100E+00, 0.1879100E+00, 0.1880000E+00, 0.2193200E+00, &
     & 0.2054000E+00, 0.1962600E+00, 0.1968300E+00, 0.2119200E+00, &
     & 0.2307500E+00, 0.2168600E+00, 0.2165600E+00, 0.2178300E+00, &
     & 0.2284300E+00, 0.2376000E+00, 0.2611200E+00, 0.2390900E+00, &
     & 0.2192500E+00, 0.2380500E+00, 0.1926300E+00, 0.1926300E+00 /
      data (ref_adm(12,iz,30, 8),iz = 1,20) / &
     & 0.2030100E+00, 0.2030100E+00, 0.2021800E+00, 0.1762900E+00, &
     & 0.1739400E+00, 0.2071000E+00, 0.1956300E+00, 0.1860100E+00, &
     & 0.1991800E+00, 0.2234200E+00, 0.2203300E+00, 0.2170700E+00, &
     & 0.2249900E+00, 0.2177600E+00, 0.2405700E+00, 0.2294900E+00, &
     & 0.2193100E+00, 0.2327600E+00, 0.2369976E+00, 0.2369976E+00 /
      data (ref_adm(12,iz,31, 8),iz = 1,20) / &
     & 0.1957400E+00, 0.1957400E+00, 0.2017500E+00, 0.1881800E+00, &
     & 0.1940200E+00, 0.1934100E+00, 0.1833400E+00, 0.1908600E+00, &
     & 0.2157800E+00, 0.2232100E+00, 0.2298100E+00, 0.2287400E+00, &
     & 0.2228000E+00, 0.2132100E+00, 0.2269000E+00, 0.2391800E+00, &
     & 0.2591300E+00, 0.2449800E+00, 0.1993700E+00, 0.1993700E+00 /
      data (ref_adm(12,iz,32, 8),iz = 1,20) / &
     & 0.1818200E+00, 0.1818200E+00, 0.2251200E+00, 0.1860600E+00, &
     & 0.2170000E+00, 0.2116800E+00, 0.2441000E+00, 0.2090400E+00, &
     & 0.2431800E+00, 0.2446800E+00, 0.2548000E+00, 0.2559700E+00, &
     & 0.2254300E+00, 0.2365300E+00, 0.2310700E+00, 0.2314200E+00, &
     & 0.2555800E+00, 0.2468391E+00, 0.1772200E+00, 0.1772200E+00 /
      data (ref_adm(12,iz,33, 8),iz = 1,20) / &
     & 0.1988700E+00, 0.1988700E+00, 0.2132800E+00, 0.2183800E+00, &
     & 0.2374900E+00, 0.2213900E+00, 0.2130500E+00, 0.2382200E+00, &
     & 0.2756100E+00, 0.2218700E+00, 0.2120500E+00, 0.2141500E+00, &
     & 0.2263700E+00, 0.2486800E+00, 0.2392500E+00, 0.2424000E+00, &
     & 0.2592700E+00, 0.2507500E+00, 0.2428874E+00, 0.2428874E+00 /
      data (ref_adm(12,iz,34, 8),iz = 1,20) / &
     & 0.1945100E+00, 0.1945100E+00, 0.2110300E+00, 0.2247200E+00, &
     & 0.2041200E+00, 0.2060600E+00, 0.2270700E+00, 0.2739300E+00, &
     & 0.2608300E+00, 0.2782600E+00, 0.2540200E+00, 0.2393000E+00, &
     & 0.2229200E+00, 0.2299400E+00, 0.1839900E+00, 0.2359900E+00, &
     & 0.2363800E+00, 0.2502418E+00, 0.2444616E+00, 0.2444616E+00 /
      data (ref_adm(12,iz,35, 8),iz = 1,20) / &
     & 0.1953400E+00, 0.1953400E+00, 0.1970600E+00, 0.1982100E+00, &
     & 0.2161200E+00, 0.2102100E+00, 0.2124700E+00, 0.2698800E+00, &
     & 0.2343300E+00, 0.2407900E+00, 0.2292934E+00, 0.2498700E+00, &
     & 0.2677100E+00, 0.2622500E+00, 0.2330900E+00, 0.2470571E+00, &
     & 0.2499919E+00, 0.2515347E+00, 0.2457945E+00, 0.2457945E+00 /
      data (ref_adm(12,iz,36, 8),iz = 1,20) / &
     & 0.2148000E+00, 0.2148000E+00, 0.1839200E+00, 0.2079800E+00, &
     & 0.2253100E+00, 0.2006300E+00, 0.2198731E+00, 0.3088300E+00, &
     & 0.2662100E+00, 0.2504500E+00, 0.2391700E+00, 0.2096100E+00, &
     & 0.2210300E+00, 0.2158300E+00, 0.2201200E+00, 0.2481660E+00, &
     & 0.2509578E+00, 0.2524579E+00, 0.2466821E+00, 0.2466821E+00 /
      data (ref_adm(12,iz,37, 8),iz = 1,20) / &
     & 0.1945100E+00, 0.1945100E+00, 0.2053200E+00, 0.2130300E+00, &
     & 0.2233800E+00, 0.2415400E+00, 0.2219800E+00, 0.2656500E+00, &
     & 0.2805900E+00, 0.2619300E+00, 0.2617700E+00, 0.2560000E+00, &
     & 0.2670000E+00, 0.2431360E+00, 0.2684400E+00, 0.2488181E+00, &
     & 0.2515381E+00, 0.2529216E+00, 0.2472278E+00, 0.2472278E+00 /
      data (ref_adm(12,iz,38, 8),iz = 1,20) / &
     & 0.1945100E+00, 0.1945100E+00, 0.2053200E+00, 0.2130300E+00, &
     & 0.2233800E+00, 0.2415400E+00, 0.2219800E+00, 0.2656500E+00, &
     & 0.2805900E+00, 0.2619300E+00, 0.2617700E+00, 0.2560000E+00, &
     & 0.2670000E+00, 0.2431360E+00, 0.2684400E+00, 0.2488181E+00, &
     & 0.2515381E+00, 0.2529216E+00, 0.2472278E+00, 0.2472278E+00 /
! Solar Zenith Angle 40.0 Albedo  0.1974607E+00
      data (ref_adm(12,iz, 1, 9),iz = 1,20) / &
     & 0.1900600E+00, 0.1900600E+00, 0.1668800E+00, 0.1613200E+00, &
     & 0.1635700E+00, 0.1618800E+00, 0.1756700E+00, 0.1948500E+00, &
     & 0.1761500E+00, 0.2098400E+00, 0.1823200E+00, 0.1756400E+00, &
     & 0.1877500E+00, 0.1873400E+00, 0.1982400E+00, 0.2240200E+00, &
     & 0.2340000E+00, 0.2483100E+00, 0.2276635E+00, 0.2276635E+00 /
      data (ref_adm(12,iz, 2, 9),iz = 1,20) / &
     & 0.1900600E+00, 0.1900600E+00, 0.1668800E+00, 0.1613200E+00, &
     & 0.1635700E+00, 0.1618800E+00, 0.1756700E+00, 0.1948500E+00, &
     & 0.1761500E+00, 0.2098400E+00, 0.1823200E+00, 0.1756400E+00, &
     & 0.1877500E+00, 0.1873400E+00, 0.1982400E+00, 0.2240200E+00, &
     & 0.2340000E+00, 0.2483100E+00, 0.2276635E+00, 0.2276635E+00 /
      data (ref_adm(12,iz, 3, 9),iz = 1,20) / &
     & 0.1785200E+00, 0.1785200E+00, 0.1695600E+00, 0.1590900E+00, &
     & 0.1537400E+00, 0.1636300E+00, 0.1934400E+00, 0.1840300E+00, &
     & 0.1615700E+00, 0.1669100E+00, 0.1860600E+00, 0.1793500E+00, &
     & 0.1611200E+00, 0.1996700E+00, 0.1831300E+00, 0.2095900E+00, &
     & 0.2178000E+00, 0.2519700E+00, 0.3443225E-01, 0.3443225E-01 /
      data (ref_adm(12,iz, 4, 9),iz = 1,20) / &
     & 0.1978300E+00, 0.1978300E+00, 0.1857700E+00, 0.1772100E+00, &
     & 0.1583300E+00, 0.1489600E+00, 0.1688300E+00, 0.1825600E+00, &
     & 0.1801300E+00, 0.1815000E+00, 0.1776900E+00, 0.1687400E+00, &
     & 0.1613600E+00, 0.1749000E+00, 0.1925800E+00, 0.2087000E+00, &
     & 0.2223000E+00, 0.2207400E+00, 0.2270909E+00, 0.2270909E+00 /
      data (ref_adm(12,iz, 5, 9),iz = 1,20) / &
     & 0.2042300E+00, 0.2042300E+00, 0.2012500E+00, 0.1798400E+00, &
     & 0.1631000E+00, 0.1702300E+00, 0.1600900E+00, 0.1615900E+00, &
     & 0.1331300E+00, 0.1955300E+00, 0.1697800E+00, 0.1890400E+00, &
     & 0.1646600E+00, 0.1789000E+00, 0.1975700E+00, 0.2210700E+00, &
     & 0.2134100E+00, 0.2483700E+00, 0.2264389E+00, 0.2264389E+00 /
      data (ref_adm(12,iz, 6, 9),iz = 1,20) / &
     & 0.1950600E+00, 0.1950600E+00, 0.1812300E+00, 0.1755100E+00, &
     & 0.1809700E+00, 0.1544000E+00, 0.1451100E+00, 0.1234000E+00, &
     & 0.1645500E+00, 0.1656700E+00, 0.1608400E+00, 0.1611800E+00, &
     & 0.1727100E+00, 0.1847700E+00, 0.1910500E+00, 0.1989600E+00, &
     & 0.2449000E+00, 0.2958200E+00, 0.2256862E+00, 0.2256862E+00 /
      data (ref_adm(12,iz, 7, 9),iz = 1,20) / &
     & 0.1935300E+00, 0.1935300E+00, 0.1948100E+00, 0.1919800E+00, &
     & 0.1905500E+00, 0.1628200E+00, 0.1517300E+00, 0.1448900E+00, &
     & 0.1581200E+00, 0.1688700E+00, 0.1605300E+00, 0.1463300E+00, &
     & 0.1549300E+00, 0.1613000E+00, 0.1744500E+00, 0.1991200E+00, &
     & 0.2122500E+00, 0.2186630E+00, 0.2245982E+00, 0.2245982E+00 /
      data (ref_adm(12,iz, 8, 9),iz = 1,20) / &
     & 0.1934800E+00, 0.1934800E+00, 0.1796900E+00, 0.1641000E+00, &
     & 0.1595700E+00, 0.1663800E+00, 0.1550400E+00, 0.1738300E+00, &
     & 0.1594100E+00, 0.1742000E+00, 0.1580400E+00, 0.1551500E+00, &
     & 0.1799500E+00, 0.1667900E+00, 0.1878500E+00, 0.2248300E+00, &
     & 0.2416000E+00, 0.2584800E+00, 0.2233711E+00, 0.2233711E+00 /
      data (ref_adm(12,iz, 9, 9),iz = 1,20) / &
     & 0.1725300E+00, 0.1725300E+00, 0.1665800E+00, 0.1769400E+00, &
     & 0.1603300E+00, 0.1616000E+00, 0.1522300E+00, 0.1724500E+00, &
     & 0.1695900E+00, 0.1668800E+00, 0.1559600E+00, 0.1714100E+00, &
     & 0.1653700E+00, 0.1555300E+00, 0.1666500E+00, 0.1963200E+00, &
     & 0.2691700E+00, 0.2504700E+00, 0.2232600E+00, 0.2232600E+00 /
      data (ref_adm(12,iz,10, 9),iz = 1,20) / &
     & 0.1714100E+00, 0.1714100E+00, 0.1624500E+00, 0.1467400E+00, &
     & 0.1618200E+00, 0.1715400E+00, 0.1746300E+00, 0.1885900E+00, &
     & 0.1774100E+00, 0.1594700E+00, 0.1804300E+00, 0.1882400E+00, &
     & 0.1800500E+00, 0.1863300E+00, 0.1837400E+00, 0.1851800E+00, &
     & 0.2058900E+00, 0.2187800E+00, 0.2342300E+00, 0.2342300E+00 /
      data (ref_adm(12,iz,11, 9),iz = 1,20) / &
     & 0.1815000E+00, 0.1815000E+00, 0.1625300E+00, 0.1561900E+00, &
     & 0.2186800E+00, 0.1517200E+00, 0.1726500E+00, 0.1828400E+00, &
     & 0.1661500E+00, 0.1950100E+00, 0.1604500E+00, 0.1972300E+00, &
     & 0.1985600E+00, 0.1862000E+00, 0.1846300E+00, 0.1922100E+00, &
     & 0.2180500E+00, 0.2119000E+00, 0.2235100E+00, 0.2235100E+00 /
      data (ref_adm(12,iz,12, 9),iz = 1,20) / &
     & 0.1722700E+00, 0.1722700E+00, 0.1820200E+00, 0.1824100E+00, &
     & 0.1713500E+00, 0.1659700E+00, 0.1712700E+00, 0.1788900E+00, &
     & 0.1561100E+00, 0.1667600E+00, 0.1348900E+00, 0.1704000E+00, &
     & 0.1827900E+00, 0.1959900E+00, 0.2092400E+00, 0.1990200E+00, &
     & 0.2233600E+00, 0.2056600E+00, 0.2168067E+00, 0.2168067E+00 /
      data (ref_adm(12,iz,13, 9),iz = 1,20) / &
     & 0.1671100E+00, 0.1671100E+00, 0.1662500E+00, 0.1626700E+00, &
     & 0.1482800E+00, 0.1496100E+00, 0.1641600E+00, 0.1615500E+00, &
     & 0.1760600E+00, 0.1732100E+00, 0.1616000E+00, 0.1588900E+00, &
     & 0.1556100E+00, 0.1588800E+00, 0.1974500E+00, 0.2068300E+00, &
     & 0.2306800E+00, 0.1963500E+00, 0.2152652E+00, 0.2152652E+00 /
      data (ref_adm(12,iz,14, 9),iz = 1,20) / &
     & 0.1761100E+00, 0.1761100E+00, 0.1760300E+00, 0.1712300E+00, &
     & 0.1751400E+00, 0.1616800E+00, 0.1599000E+00, 0.1648200E+00, &
     & 0.1612700E+00, 0.1583300E+00, 0.1638800E+00, 0.1754100E+00, &
     & 0.1746800E+00, 0.1708600E+00, 0.2112400E+00, 0.1975800E+00, &
     & 0.1730900E+00, 0.2001500E+00, 0.2135808E+00, 0.2135808E+00 /
      data (ref_adm(12,iz,15, 9),iz = 1,20) / &
     & 0.1676200E+00, 0.1676200E+00, 0.1651200E+00, 0.1581600E+00, &
     & 0.1566600E+00, 0.1464100E+00, 0.1586200E+00, 0.1678100E+00, &
     & 0.1704300E+00, 0.1667100E+00, 0.1669800E+00, 0.1673500E+00, &
     & 0.1646800E+00, 0.1722500E+00, 0.2018100E+00, 0.1816200E+00, &
     & 0.1751400E+00, 0.1935500E+00, 0.1913600E+00, 0.1913600E+00 /
      data (ref_adm(12,iz,16, 9),iz = 1,20) / &
     & 0.1652500E+00, 0.1652500E+00, 0.1602300E+00, 0.1604900E+00, &
     & 0.1661300E+00, 0.1737800E+00, 0.1902100E+00, 0.1696600E+00, &
     & 0.1712700E+00, 0.1741900E+00, 0.2016300E+00, 0.1905100E+00, &
     & 0.1806900E+00, 0.1817600E+00, 0.1821300E+00, 0.1787300E+00, &
     & 0.1972600E+00, 0.2089391E+00, 0.1964700E+00, 0.1964700E+00 /
      data (ref_adm(12,iz,17, 9),iz = 1,20) / &
     & 0.1502100E+00, 0.1502100E+00, 0.1455000E+00, 0.1843000E+00, &
     & 0.1741600E+00, 0.1572900E+00, 0.1800600E+00, 0.1733900E+00, &
     & 0.1759500E+00, 0.1735600E+00, 0.1589100E+00, 0.1794100E+00, &
     & 0.1736600E+00, 0.1830700E+00, 0.2030400E+00, 0.2435200E+00, &
     & 0.2089500E+00, 0.2417900E+00, 0.2087448E+00, 0.2087448E+00 /
      data (ref_adm(12,iz,18, 9),iz = 1,20) / &
     & 0.1641900E+00, 0.1641900E+00, 0.1720300E+00, 0.2351600E+00, &
     & 0.1598600E+00, 0.1903100E+00, 0.1939800E+00, 0.1849400E+00, &
     & 0.1730900E+00, 0.1712400E+00, 0.1448600E+00, 0.1764700E+00, &
     & 0.1728700E+00, 0.1907600E+00, 0.1842700E+00, 0.1908797E+00, &
     & 0.1943600E+00, 0.2054081E+00, 0.2053997E+00, 0.2053997E+00 /
      data (ref_adm(12,iz,19, 9),iz = 1,20) / &
     & 0.1477100E+00, 0.1477100E+00, 0.1722700E+00, 0.1493900E+00, &
     & 0.1749300E+00, 0.1609400E+00, 0.1624900E+00, 0.1560500E+00, &
     & 0.1713800E+00, 0.1731600E+00, 0.1552600E+00, 0.1797600E+00, &
     & 0.1595300E+00, 0.1956700E+00, 0.1743200E+00, 0.2130600E+00, &
     & 0.2480300E+00, 0.2048485E+00, 0.2044307E+00, 0.2044307E+00 /
      data (ref_adm(12,iz,20, 9),iz = 1,20) / &
     & 0.1597000E+00, 0.1597000E+00, 0.1485700E+00, 0.1581000E+00, &
     & 0.1425200E+00, 0.1733500E+00, 0.1607700E+00, 0.1848800E+00, &
     & 0.1937100E+00, 0.1835400E+00, 0.1671700E+00, 0.1782100E+00, &
     & 0.1771400E+00, 0.1954900E+00, 0.1921700E+00, 0.1798000E+00, &
     & 0.1613700E+00, 0.2043682E+00, 0.2036899E+00, 0.2036899E+00 /
      data (ref_adm(12,iz,21, 9),iz = 1,20) / &
     & 0.1784400E+00, 0.1784400E+00, 0.1753600E+00, 0.2031300E+00, &
     & 0.1604000E+00, 0.1697500E+00, 0.1538700E+00, 0.1544700E+00, &
     & 0.1537800E+00, 0.1633300E+00, 0.1766400E+00, 0.1925500E+00, &
     & 0.2112700E+00, 0.2010400E+00, 0.1889100E+00, 0.2169800E+00, &
     & 0.2402700E+00, 0.2040010E+00, 0.2030800E+00, 0.2030800E+00 /
      data (ref_adm(12,iz,22, 9),iz = 1,20) / &
     & 0.1617700E+00, 0.1617700E+00, 0.1746900E+00, 0.1717300E+00, &
     & 0.1684400E+00, 0.1743500E+00, 0.1657400E+00, 0.1708000E+00, &
     & 0.1481500E+00, 0.1682600E+00, 0.1815100E+00, 0.1906600E+00, &
     & 0.1641400E+00, 0.1911600E+00, 0.1802100E+00, 0.1913100E+00, &
     & 0.2354976E+00, 0.2443043E+00, 0.2414581E+00, 0.2414581E+00 /
      data (ref_adm(12,iz,23, 9),iz = 1,20) / &
     & 0.1729500E+00, 0.1729500E+00, 0.1717800E+00, 0.1473200E+00, &
     & 0.1860500E+00, 0.1883100E+00, 0.1681800E+00, 0.2024400E+00, &
     & 0.1549400E+00, 0.1681800E+00, 0.2009200E+00, 0.2042100E+00, &
     & 0.1863900E+00, 0.2160300E+00, 0.2181500E+00, 0.1754400E+00, &
     & 0.2362918E+00, 0.2441722E+00, 0.2413201E+00, 0.2413201E+00 /
      data (ref_adm(12,iz,24, 9),iz = 1,20) / &
     & 0.1620800E+00, 0.1620800E+00, 0.1656100E+00, 0.2029000E+00, &
     & 0.1744600E+00, 0.2037400E+00, 0.1554400E+00, 0.1861500E+00, &
     & 0.1664400E+00, 0.1779800E+00, 0.1883100E+00, 0.2217200E+00, &
     & 0.2196100E+00, 0.2265700E+00, 0.2153500E+00, 0.1966900E+00, &
     & 0.1950000E+00, 0.2448618E+00, 0.2416734E+00, 0.2416734E+00 /
      data (ref_adm(12,iz,25, 9),iz = 1,20) / &
     & 0.1738600E+00, 0.1738600E+00, 0.1548800E+00, 0.1635600E+00, &
     & 0.2065300E+00, 0.1803100E+00, 0.1699300E+00, 0.1833200E+00, &
     & 0.2061400E+00, 0.2075400E+00, 0.2149200E+00, 0.2175200E+00, &
     & 0.2172400E+00, 0.2324800E+00, 0.2153900E+00, 0.2416100E+00, &
     & 0.2057400E+00, 0.2535700E+00, 0.2426011E+00, 0.2426011E+00 /
      data (ref_adm(12,iz,26, 9),iz = 1,20) / &
     & 0.1753100E+00, 0.1753100E+00, 0.1926700E+00, 0.1897700E+00, &
     & 0.1919700E+00, 0.1900400E+00, 0.1963400E+00, 0.2092100E+00, &
     & 0.1945200E+00, 0.2021100E+00, 0.1703500E+00, 0.2171000E+00, &
     & 0.2288600E+00, 0.2093100E+00, 0.2009500E+00, 0.2093500E+00, &
     & 0.2077000E+00, 0.2039500E+00, 0.2442674E+00, 0.2442674E+00 /
      data (ref_adm(12,iz,27, 9),iz = 1,20) / &
     & 0.1766600E+00, 0.1766600E+00, 0.1847100E+00, 0.1763100E+00, &
     & 0.1844900E+00, 0.1914100E+00, 0.1970200E+00, 0.1956400E+00, &
     & 0.2006700E+00, 0.2078800E+00, 0.2124500E+00, 0.2185800E+00, &
     & 0.2165100E+00, 0.2348800E+00, 0.2135600E+00, 0.2299700E+00, &
     & 0.2182900E+00, 0.2198900E+00, 0.2460761E+00, 0.2460761E+00 /
      data (ref_adm(12,iz,28, 9),iz = 1,20) / &
     & 0.1804400E+00, 0.1804400E+00, 0.1816100E+00, 0.1887100E+00, &
     & 0.2210200E+00, 0.2004400E+00, 0.2148400E+00, 0.2124000E+00, &
     & 0.2147300E+00, 0.2195000E+00, 0.2102200E+00, 0.2086400E+00, &
     & 0.2403100E+00, 0.2411800E+00, 0.2220800E+00, 0.2126200E+00, &
     & 0.2419800E+00, 0.2483800E+00, 0.2283000E+00, 0.2283000E+00 /
      data (ref_adm(12,iz,29, 9),iz = 1,20) / &
     & 0.1753400E+00, 0.1753400E+00, 0.2042600E+00, 0.2004500E+00, &
     & 0.1714000E+00, 0.1752000E+00, 0.1948100E+00, 0.2002100E+00, &
     & 0.1845200E+00, 0.2206100E+00, 0.2283600E+00, 0.2276000E+00, &
     & 0.2401800E+00, 0.2359600E+00, 0.2465000E+00, 0.2177200E+00, &
     & 0.2175600E+00, 0.2296700E+00, 0.2201700E+00, 0.2201700E+00 /
      data (ref_adm(12,iz,30, 9),iz = 1,20) / &
     & 0.1730700E+00, 0.1730700E+00, 0.1919200E+00, 0.3445600E+00, &
     & 0.2155200E+00, 0.1990600E+00, 0.2005900E+00, 0.2164700E+00, &
     & 0.2187800E+00, 0.2388800E+00, 0.2495600E+00, 0.2430000E+00, &
     & 0.2451200E+00, 0.2525400E+00, 0.2392700E+00, 0.2401200E+00, &
     & 0.2384100E+00, 0.2405500E+00, 0.2152900E+00, 0.2152900E+00 /
      data (ref_adm(12,iz,31, 9),iz = 1,20) / &
     & 0.1698600E+00, 0.1698600E+00, 0.2047700E+00, 0.1831000E+00, &
     & 0.1782900E+00, 0.1938900E+00, 0.1976100E+00, 0.2042600E+00, &
     & 0.2023400E+00, 0.2096300E+00, 0.2112800E+00, 0.2079800E+00, &
     & 0.2150800E+00, 0.2232300E+00, 0.2270900E+00, 0.2386000E+00, &
     & 0.2765300E+00, 0.2778700E+00, 0.2212800E+00, 0.2212800E+00 /
      data (ref_adm(12,iz,32, 9),iz = 1,20) / &
     & 0.1959100E+00, 0.1959100E+00, 0.1990300E+00, 0.2082300E+00, &
     & 0.2218900E+00, 0.2095300E+00, 0.2142900E+00, 0.2115600E+00, &
     & 0.2170900E+00, 0.2218000E+00, 0.2315800E+00, 0.2447100E+00, &
     & 0.2692000E+00, 0.2547600E+00, 0.2809900E+00, 0.2915800E+00, &
     & 0.2747800E+00, 0.2353700E+00, 0.2117100E+00, 0.2117100E+00 /
      data (ref_adm(12,iz,33, 9),iz = 1,20) / &
     & 0.2061000E+00, 0.2061000E+00, 0.2311800E+00, 0.2246400E+00, &
     & 0.2002200E+00, 0.2064500E+00, 0.2202400E+00, 0.2124800E+00, &
     & 0.2606600E+00, 0.2558400E+00, 0.2737800E+00, 0.2787100E+00, &
     & 0.2385300E+00, 0.2516500E+00, 0.2518100E+00, 0.2461200E+00, &
     & 0.2685900E+00, 0.2670500E+00, 0.1946400E+00, 0.1946400E+00 /
      data (ref_adm(12,iz,34, 9),iz = 1,20) / &
     & 0.2100000E+00, 0.2100000E+00, 0.1809200E+00, 0.2035500E+00, &
     & 0.2130100E+00, 0.2407600E+00, 0.2047400E+00, 0.2479200E+00, &
     & 0.2560900E+00, 0.2683100E+00, 0.2608600E+00, 0.2560700E+00, &
     & 0.2645600E+00, 0.2646500E+00, 0.2506900E+00, 0.2469100E+00, &
     & 0.2736700E+00, 0.2654000E+00, 0.2679910E+00, 0.2679910E+00 /
      data (ref_adm(12,iz,35, 9),iz = 1,20) / &
     & 0.1782100E+00, 0.1782100E+00, 0.1894800E+00, 0.1948100E+00, &
     & 0.2236300E+00, 0.2200400E+00, 0.2482700E+00, 0.2508200E+00, &
     & 0.2692800E+00, 0.2699700E+00, 0.2720900E+00, 0.2394900E+00, &
     & 0.2634200E+00, 0.2598900E+00, 0.2999600E+00, 0.2244500E+00, &
     & 0.3146800E+00, 0.2734658E+00, 0.2701251E+00, 0.2701251E+00 /
      data (ref_adm(12,iz,36, 9),iz = 1,20) / &
     & 0.1893600E+00, 0.1893600E+00, 0.1992100E+00, 0.1997900E+00, &
     & 0.2100700E+00, 0.2309800E+00, 0.2496300E+00, 0.2791000E+00, &
     & 0.2682600E+00, 0.2860800E+00, 0.2798100E+00, 0.3092100E+00, &
     & 0.2648900E+00, 0.2677500E+00, 0.2791100E+00, 0.2620700E+00, &
     & 0.3462100E+00, 0.2749661E+00, 0.2716056E+00, 0.2716056E+00 /
      data (ref_adm(12,iz,37, 9),iz = 1,20) / &
     & 0.1724600E+00, 0.1724600E+00, 0.1924200E+00, 0.1940900E+00, &
     & 0.2148600E+00, 0.2205400E+00, 0.2468400E+00, 0.2576600E+00, &
     & 0.2855600E+00, 0.2951800E+00, 0.2980100E+00, 0.2889400E+00, &
     & 0.2692800E+00, 0.2596800E+00, 0.3202100E+00, 0.2682000E+00, &
     & 0.2729818E+00, 0.2757587E+00, 0.2724410E+00, 0.2724410E+00 /
      data (ref_adm(12,iz,38, 9),iz = 1,20) / &
     & 0.1724600E+00, 0.1724600E+00, 0.1924200E+00, 0.1940900E+00, &
     & 0.2148600E+00, 0.2205400E+00, 0.2468400E+00, 0.2576600E+00, &
     & 0.2855600E+00, 0.2951800E+00, 0.2980100E+00, 0.2889400E+00, &
     & 0.2692800E+00, 0.2596800E+00, 0.3202100E+00, 0.2682000E+00, &
     & 0.2729818E+00, 0.2757587E+00, 0.2724410E+00, 0.2724410E+00 /
! Solar Zenith Angle 45.0 Albedo  0.2001128E+00
      data (ref_adm(12,iz, 1,10),iz = 1,20) / &
     & 0.1567100E+00, 0.1567100E+00, 0.1617800E+00, 0.1778300E+00, &
     & 0.1852900E+00, 0.1758900E+00, 0.1625300E+00, 0.2463100E+00, &
     & 0.2800100E+00, 0.1675700E+00, 0.2169400E+00, 0.1952800E+00, &
     & 0.1974700E+00, 0.1915100E+00, 0.2183700E+00, 0.2383400E+00, &
     & 0.2774400E+00, 0.2775100E+00, 0.3181100E+00, 0.3181100E+00 /
      data (ref_adm(12,iz, 2,10),iz = 1,20) / &
     & 0.1567100E+00, 0.1567100E+00, 0.1617800E+00, 0.1778300E+00, &
     & 0.1852900E+00, 0.1758900E+00, 0.1625300E+00, 0.2463100E+00, &
     & 0.2800100E+00, 0.1675700E+00, 0.2169400E+00, 0.1952800E+00, &
     & 0.1974700E+00, 0.1915100E+00, 0.2183700E+00, 0.2383400E+00, &
     & 0.2774400E+00, 0.2775100E+00, 0.3181100E+00, 0.3181100E+00 /
      data (ref_adm(12,iz, 3,10),iz = 1,20) / &
     & 0.1720500E+00, 0.1720500E+00, 0.1633100E+00, 0.1607000E+00, &
     & 0.1737200E+00, 0.2021800E+00, 0.1912300E+00, 0.2498100E+00, &
     & 0.2380400E+00, 0.2036700E+00, 0.1783700E+00, 0.1728600E+00, &
     & 0.1903000E+00, 0.1871000E+00, 0.2179800E+00, 0.2544200E+00, &
     & 0.2541600E+00, 0.2529600E+00, 0.3258500E+00, 0.3258500E+00 /
      data (ref_adm(12,iz, 4,10),iz = 1,20) / &
     & 0.1577200E+00, 0.1577200E+00, 0.1516500E+00, 0.1566500E+00, &
     & 0.1985300E+00, 0.2516900E+00, 0.2376400E+00, 0.1543900E+00, &
     & 0.1652900E+00, 0.1837000E+00, 0.1642400E+00, 0.1729000E+00, &
     & 0.1785700E+00, 0.2074500E+00, 0.2059900E+00, 0.2433400E+00, &
     & 0.2715600E+00, 0.2780900E+00, 0.2382900E+00, 0.2382900E+00 /
      data (ref_adm(12,iz, 5,10),iz = 1,20) / &
     & 0.1659500E+00, 0.1659500E+00, 0.1519200E+00, 0.1584100E+00, &
     & 0.1723100E+00, 0.1720400E+00, 0.1726700E+00, 0.1640700E+00, &
     & 0.1454300E+00, 0.1926200E+00, 0.1850400E+00, 0.1969800E+00, &
     & 0.2125700E+00, 0.1953900E+00, 0.1972800E+00, 0.2051800E+00, &
     & 0.2852200E+00, 0.2737600E+00, 0.2631300E+00, 0.2631300E+00 /
      data (ref_adm(12,iz, 6,10),iz = 1,20) / &
     & 0.1522700E+00, 0.1522700E+00, 0.1694100E+00, 0.1635200E+00, &
     & 0.1499400E+00, 0.1661100E+00, 0.1459400E+00, 0.1614600E+00, &
     & 0.1626900E+00, 0.1545400E+00, 0.1845500E+00, 0.1783600E+00, &
     & 0.2173600E+00, 0.2110900E+00, 0.2095100E+00, 0.2246000E+00, &
     & 0.2435300E+00, 0.2398000E+00, 0.2198661E+00, 0.2198661E+00 /
      data (ref_adm(12,iz, 7,10),iz = 1,20) / &
     & 0.1862200E+00, 0.1862200E+00, 0.1715300E+00, 0.1647800E+00, &
     & 0.1645600E+00, 0.1646300E+00, 0.1556600E+00, 0.1600700E+00, &
     & 0.1613700E+00, 0.1722300E+00, 0.1785800E+00, 0.1851100E+00, &
     & 0.1885400E+00, 0.2004000E+00, 0.2154700E+00, 0.2398200E+00, &
     & 0.2489500E+00, 0.2779700E+00, 0.2806600E+00, 0.2806600E+00 /
      data (ref_adm(12,iz, 8,10),iz = 1,20) / &
     & 0.1822900E+00, 0.1822900E+00, 0.1781100E+00, 0.1791300E+00, &
     & 0.1669400E+00, 0.1594300E+00, 0.1597500E+00, 0.1504900E+00, &
     & 0.1759700E+00, 0.1784100E+00, 0.1702500E+00, 0.1858000E+00, &
     & 0.1880500E+00, 0.1944500E+00, 0.2143800E+00, 0.2389500E+00, &
     & 0.2530300E+00, 0.2893500E+00, 0.2852000E+00, 0.2852000E+00 /
      data (ref_adm(12,iz, 9,10),iz = 1,20) / &
     & 0.1753000E+00, 0.1753000E+00, 0.1836900E+00, 0.1731400E+00, &
     & 0.1614500E+00, 0.1436700E+00, 0.1615100E+00, 0.1360500E+00, &
     & 0.1638800E+00, 0.1683500E+00, 0.1564600E+00, 0.1695100E+00, &
     & 0.1925000E+00, 0.1902400E+00, 0.1814400E+00, 0.1968500E+00, &
     & 0.2650500E+00, 0.3015100E+00, 0.2062400E+00, 0.2062400E+00 /
      data (ref_adm(12,iz,10,10),iz = 1,20) / &
     & 0.1867000E+00, 0.1867000E+00, 0.1643700E+00, 0.1609200E+00, &
     & 0.1436800E+00, 0.1506600E+00, 0.1610500E+00, 0.1642100E+00, &
     & 0.1659800E+00, 0.1412700E+00, 0.1666900E+00, 0.1649700E+00, &
     & 0.1838000E+00, 0.1779000E+00, 0.1905600E+00, 0.2055900E+00, &
     & 0.2159500E+00, 0.2371400E+00, 0.2186875E+00, 0.2186875E+00 /
      data (ref_adm(12,iz,11,10),iz = 1,20) / &
     & 0.1647200E+00, 0.1647200E+00, 0.1567600E+00, 0.1521900E+00, &
     & 0.1821700E+00, 0.1646300E+00, 0.1929800E+00, 0.1648200E+00, &
     & 0.1561100E+00, 0.1772300E+00, 0.1696200E+00, 0.1771500E+00, &
     & 0.1667800E+00, 0.1944500E+00, 0.1877400E+00, 0.2011000E+00, &
     & 0.2012400E+00, 0.2197900E+00, 0.2152200E+00, 0.2152200E+00 /
      data (ref_adm(12,iz,12,10),iz = 1,20) / &
     & 0.1756400E+00, 0.1756400E+00, 0.1617300E+00, 0.1575500E+00, &
     & 0.1634300E+00, 0.1633000E+00, 0.1758600E+00, 0.1740900E+00, &
     & 0.1571000E+00, 0.1653300E+00, 0.1855500E+00, 0.1526000E+00, &
     & 0.1915400E+00, 0.1966500E+00, 0.1745300E+00, 0.1855300E+00, &
     & 0.2145300E+00, 0.2110500E+00, 0.1795300E+00, 0.1795300E+00 /
      data (ref_adm(12,iz,13,10),iz = 1,20) / &
     & 0.1770400E+00, 0.1770400E+00, 0.1751600E+00, 0.1773300E+00, &
     & 0.1744900E+00, 0.1703200E+00, 0.1712400E+00, 0.1699400E+00, &
     & 0.1585400E+00, 0.1573900E+00, 0.1685500E+00, 0.1551400E+00, &
     & 0.1732400E+00, 0.1827400E+00, 0.1775700E+00, 0.2168000E+00, &
     & 0.1910900E+00, 0.2307200E+00, 0.2206900E+00, 0.2206900E+00 /
      data (ref_adm(12,iz,14,10),iz = 1,20) / &
     & 0.1809700E+00, 0.1809700E+00, 0.1674700E+00, 0.1541100E+00, &
     & 0.1674700E+00, 0.1544400E+00, 0.1590900E+00, 0.1557200E+00, &
     & 0.1713700E+00, 0.1674500E+00, 0.1726500E+00, 0.1691800E+00, &
     & 0.1755900E+00, 0.1785800E+00, 0.2002500E+00, 0.2083100E+00, &
     & 0.2306000E+00, 0.2195700E+00, 0.1936100E+00, 0.1936100E+00 /
      data (ref_adm(12,iz,15,10),iz = 1,20) / &
     & 0.1737500E+00, 0.1737500E+00, 0.1757800E+00, 0.1696400E+00, &
     & 0.1646100E+00, 0.1627100E+00, 0.1527600E+00, 0.1466500E+00, &
     & 0.1527900E+00, 0.1581600E+00, 0.1573600E+00, 0.1554400E+00, &
     & 0.1622500E+00, 0.1913000E+00, 0.1997600E+00, 0.2015000E+00, &
     & 0.2131900E+00, 0.2152300E+00, 0.2363000E+00, 0.2363000E+00 /
      data (ref_adm(12,iz,16,10),iz = 1,20) / &
     & 0.1927400E+00, 0.1927400E+00, 0.1721700E+00, 0.1967200E+00, &
     & 0.1732900E+00, 0.1815300E+00, 0.1723200E+00, 0.1682800E+00, &
     & 0.1591200E+00, 0.1414500E+00, 0.1606300E+00, 0.1738600E+00, &
     & 0.1642600E+00, 0.1670700E+00, 0.2192600E+00, 0.2139700E+00, &
     & 0.1859100E+00, 0.2253600E+00, 0.2184300E+00, 0.2184300E+00 /
      data (ref_adm(12,iz,17,10),iz = 1,20) / &
     & 0.1731600E+00, 0.1731600E+00, 0.1845300E+00, 0.1707900E+00, &
     & 0.1675100E+00, 0.1730000E+00, 0.1744100E+00, 0.1821100E+00, &
     & 0.1642700E+00, 0.1567100E+00, 0.1718600E+00, 0.1751800E+00, &
     & 0.1755000E+00, 0.1642300E+00, 0.2055600E+00, 0.1668400E+00, &
     & 0.1941700E+00, 0.1891500E+00, 0.2158373E+00, 0.2158373E+00 /
      data (ref_adm(12,iz,18,10),iz = 1,20) / &
     & 0.1698000E+00, 0.1698000E+00, 0.1801100E+00, 0.1858900E+00, &
     & 0.1641000E+00, 0.1607700E+00, 0.1650500E+00, 0.1699900E+00, &
     & 0.1677300E+00, 0.1619400E+00, 0.1821100E+00, 0.1732900E+00, &
     & 0.1704600E+00, 0.1657000E+00, 0.1881100E+00, 0.1949800E+00, &
     & 0.2150400E+00, 0.2057777E+00, 0.2057695E+00, 0.2057695E+00 /
      data (ref_adm(12,iz,19,10),iz = 1,20) / &
     & 0.1707400E+00, 0.1707400E+00, 0.1659000E+00, 0.1604800E+00, &
     & 0.1631400E+00, 0.1592200E+00, 0.1733800E+00, 0.1419500E+00, &
     & 0.1611600E+00, 0.1670800E+00, 0.1708700E+00, 0.1710100E+00, &
     & 0.1731100E+00, 0.1795400E+00, 0.1923500E+00, 0.2061600E+00, &
     & 0.2335600E+00, 0.2052172E+00, 0.2047986E+00, 0.2047986E+00 /
      data (ref_adm(12,iz,20,10),iz = 1,20) / &
     & 0.1543600E+00, 0.1543600E+00, 0.1580500E+00, 0.1685800E+00, &
     & 0.1639700E+00, 0.1607700E+00, 0.1581800E+00, 0.1569800E+00, &
     & 0.1649300E+00, 0.1617900E+00, 0.1658900E+00, 0.1920200E+00, &
     & 0.1744300E+00, 0.1804700E+00, 0.2078000E+00, 0.2137800E+00, &
     & 0.2653800E+00, 0.2047361E+00, 0.2040565E+00, 0.2040565E+00 /
      data (ref_adm(12,iz,21,10),iz = 1,20) / &
     & 0.1603700E+00, 0.1603700E+00, 0.1750800E+00, 0.1877500E+00, &
     & 0.1777400E+00, 0.1587400E+00, 0.1681400E+00, 0.1666100E+00, &
     & 0.1601700E+00, 0.1635400E+00, 0.1620000E+00, 0.1931400E+00, &
     & 0.1778400E+00, 0.1910800E+00, 0.2146000E+00, 0.1773400E+00, &
     & 0.2689700E+00, 0.2043682E+00, 0.2034455E+00, 0.2034455E+00 /
      data (ref_adm(12,iz,22,10),iz = 1,20) / &
     & 0.1759700E+00, 0.1759700E+00, 0.1745700E+00, 0.1777400E+00, &
     & 0.1791300E+00, 0.1616600E+00, 0.1759800E+00, 0.1719200E+00, &
     & 0.1829100E+00, 0.1790000E+00, 0.1876300E+00, 0.1923200E+00, &
     & 0.1753700E+00, 0.1866400E+00, 0.2127500E+00, 0.2110400E+00, &
     & 0.2440873E+00, 0.2555131E+00, 0.2550188E+00, 0.2550188E+00 /
      data (ref_adm(12,iz,23,10),iz = 1,20) / &
     & 0.1764100E+00, 0.1764100E+00, 0.1928200E+00, 0.1760200E+00, &
     & 0.1552100E+00, 0.1842000E+00, 0.1996500E+00, 0.1861500E+00, &
     & 0.1874100E+00, 0.1875600E+00, 0.1763500E+00, 0.1916200E+00, &
     & 0.1982600E+00, 0.1953100E+00, 0.2066600E+00, 0.2055800E+00, &
     & 0.2088800E+00, 0.2554411E+00, 0.2549439E+00, 0.2549439E+00 /
      data (ref_adm(12,iz,24,10),iz = 1,20) / &
     & 0.1701300E+00, 0.1701300E+00, 0.1559200E+00, 0.1616300E+00, &
     & 0.1885900E+00, 0.1759500E+00, 0.1686200E+00, 0.1755800E+00, &
     & 0.1778000E+00, 0.1737900E+00, 0.1905000E+00, 0.2034000E+00, &
     & 0.1969800E+00, 0.2172900E+00, 0.2026400E+00, 0.2171300E+00, &
     & 0.2075100E+00, 0.2562727E+00, 0.2554193E+00, 0.2554193E+00 /
      data (ref_adm(12,iz,25,10),iz = 1,20) / &
     & 0.1697700E+00, 0.1697700E+00, 0.1685900E+00, 0.1787400E+00, &
     & 0.1743800E+00, 0.1808400E+00, 0.1870700E+00, 0.1822200E+00, &
     & 0.1893600E+00, 0.1882800E+00, 0.1793400E+00, 0.2142900E+00, &
     & 0.2087700E+00, 0.2169300E+00, 0.2354800E+00, 0.2177000E+00, &
     & 0.2271700E+00, 0.2479400E+00, 0.2567042E+00, 0.2567042E+00 /
      data (ref_adm(12,iz,26,10),iz = 1,20) / &
     & 0.1690900E+00, 0.1690900E+00, 0.1737900E+00, 0.1691900E+00, &
     & 0.1768300E+00, 0.1883100E+00, 0.1870900E+00, 0.1892400E+00, &
     & 0.1978800E+00, 0.2067700E+00, 0.2170000E+00, 0.2158000E+00, &
     & 0.2237300E+00, 0.2206200E+00, 0.2239200E+00, 0.2287500E+00, &
     & 0.2257000E+00, 0.2355500E+00, 0.2587245E+00, 0.2587245E+00 /
      data (ref_adm(12,iz,27,10),iz = 1,20) / &
     & 0.1784000E+00, 0.1784000E+00, 0.1912800E+00, 0.1994900E+00, &
     & 0.2057800E+00, 0.1933700E+00, 0.2052800E+00, 0.1995300E+00, &
     & 0.2054500E+00, 0.1956800E+00, 0.2024200E+00, 0.2156300E+00, &
     & 0.2285900E+00, 0.2370500E+00, 0.2426400E+00, 0.2291300E+00, &
     & 0.2426800E+00, 0.2333200E+00, 0.1890400E+00, 0.1890400E+00 /
      data (ref_adm(12,iz,28,10),iz = 1,20) / &
     & 0.1826200E+00, 0.1826200E+00, 0.1791000E+00, 0.1753800E+00, &
     & 0.1853300E+00, 0.1935300E+00, 0.2028800E+00, 0.2061400E+00, &
     & 0.2138000E+00, 0.2201900E+00, 0.2176600E+00, 0.2206900E+00, &
     & 0.2295500E+00, 0.2356300E+00, 0.2502700E+00, 0.2460300E+00, &
     & 0.2387100E+00, 0.2310900E+00, 0.2044600E+00, 0.2044600E+00 /
      data (ref_adm(12,iz,29,10),iz = 1,20) / &
     & 0.1817000E+00, 0.1817000E+00, 0.2009300E+00, 0.1896400E+00, &
     & 0.1833000E+00, 0.2133400E+00, 0.2139900E+00, 0.2080000E+00, &
     & 0.2055400E+00, 0.2214700E+00, 0.2407900E+00, 0.2309200E+00, &
     & 0.2425500E+00, 0.2453600E+00, 0.2540000E+00, 0.2857600E+00, &
     & 0.2792200E+00, 0.2476400E+00, 0.2002900E+00, 0.2002900E+00 /
      data (ref_adm(12,iz,30,10),iz = 1,20) / &
     & 0.1816500E+00, 0.1816500E+00, 0.1768700E+00, 0.1876700E+00, &
     & 0.2181800E+00, 0.1976500E+00, 0.2188200E+00, 0.2048900E+00, &
     & 0.1994700E+00, 0.2181400E+00, 0.2261400E+00, 0.2389800E+00, &
     & 0.2460600E+00, 0.2375000E+00, 0.2447300E+00, 0.2884600E+00, &
     & 0.3057500E+00, 0.2501200E+00, 0.2126600E+00, 0.2126600E+00 /
      data (ref_adm(12,iz,31,10),iz = 1,20) / &
     & 0.1763000E+00, 0.1763000E+00, 0.1667200E+00, 0.1857700E+00, &
     & 0.1915900E+00, 0.1980900E+00, 0.2101200E+00, 0.2065600E+00, &
     & 0.2118900E+00, 0.2005700E+00, 0.2220200E+00, 0.2163100E+00, &
     & 0.2281100E+00, 0.2351900E+00, 0.2373100E+00, 0.2511700E+00, &
     & 0.2627500E+00, 0.2518900E+00, 0.2106400E+00, 0.2106400E+00 /
      data (ref_adm(12,iz,32,10),iz = 1,20) / &
     & 0.1863300E+00, 0.1863300E+00, 0.1885500E+00, 0.2125900E+00, &
     & 0.2077800E+00, 0.2100500E+00, 0.2320500E+00, 0.2351700E+00, &
     & 0.2570100E+00, 0.2646800E+00, 0.2700900E+00, 0.2841200E+00, &
     & 0.2845700E+00, 0.2965900E+00, 0.2696400E+00, 0.2791900E+00, &
     & 0.2803300E+00, 0.2736300E+00, 0.2017900E+00, 0.2017900E+00 /
      data (ref_adm(12,iz,33,10),iz = 1,20) / &
     & 0.1763600E+00, 0.1763600E+00, 0.2041800E+00, 0.1997700E+00, &
     & 0.1990500E+00, 0.2056300E+00, 0.1967900E+00, 0.2282200E+00, &
     & 0.2328800E+00, 0.2406000E+00, 0.2383900E+00, 0.2377000E+00, &
     & 0.2684900E+00, 0.2486400E+00, 0.2548500E+00, 0.2704300E+00, &
     & 0.2844500E+00, 0.2756500E+00, 0.2404500E+00, 0.2404500E+00 /
      data (ref_adm(12,iz,34,10),iz = 1,20) / &
     & 0.1884400E+00, 0.1884400E+00, 0.2210200E+00, 0.2642400E+00, &
     & 0.1966000E+00, 0.2016200E+00, 0.2127100E+00, 0.2250700E+00, &
     & 0.2241700E+00, 0.2443600E+00, 0.2692800E+00, 0.2470500E+00, &
     & 0.2666400E+00, 0.2868200E+00, 0.2662900E+00, 0.2582300E+00, &
     & 0.2861400E+00, 0.2845100E+00, 0.2597400E+00, 0.2597400E+00 /
      data (ref_adm(12,iz,35,10),iz = 1,20) / &
     & 0.1742100E+00, 0.1742100E+00, 0.1947900E+00, 0.1842400E+00, &
     & 0.2010100E+00, 0.1981700E+00, 0.2124200E+00, 0.2202900E+00, &
     & 0.2495800E+00, 0.2502800E+00, 0.2639800E+00, 0.2844500E+00, &
     & 0.2591700E+00, 0.2667200E+00, 0.2810500E+00, 0.2950900E+00, &
     & 0.3079100E+00, 0.3074900E+00, 0.2604800E+00, 0.2604800E+00 /
      data (ref_adm(12,iz,36,10),iz = 1,20) / &
     & 0.1646800E+00, 0.1646800E+00, 0.1829800E+00, 0.2232800E+00, &
     & 0.2104400E+00, 0.2146700E+00, 0.2133800E+00, 0.2388500E+00, &
     & 0.2371200E+00, 0.2714600E+00, 0.2761400E+00, 0.2891300E+00, &
     & 0.2893700E+00, 0.2906500E+00, 0.2851300E+00, 0.2859300E+00, &
     & 0.3179500E+00, 0.2992100E+00, 0.2932291E+00, 0.2932291E+00 /
      data (ref_adm(12,iz,37,10),iz = 1,20) / &
     & 0.1711100E+00, 0.1711100E+00, 0.1664400E+00, 0.1853600E+00, &
     & 0.1939900E+00, 0.2210200E+00, 0.2298900E+00, 0.2281400E+00, &
     & 0.2489500E+00, 0.2532200E+00, 0.2816900E+00, 0.2935600E+00, &
     & 0.2902600E+00, 0.2838200E+00, 0.2942700E+00, 0.2972200E+00, &
     & 0.3295600E+00, 0.2945950E+00, 0.2942714E+00, 0.2942714E+00 /
      data (ref_adm(12,iz,38,10),iz = 1,20) / &
     & 0.1711100E+00, 0.1711100E+00, 0.1664400E+00, 0.1853600E+00, &
     & 0.1939900E+00, 0.2210200E+00, 0.2298900E+00, 0.2281400E+00, &
     & 0.2489500E+00, 0.2532200E+00, 0.2816900E+00, 0.2935600E+00, &
     & 0.2902600E+00, 0.2838200E+00, 0.2942700E+00, 0.2972200E+00, &
     & 0.3295600E+00, 0.2945950E+00, 0.2942714E+00, 0.2942714E+00 /
! Solar Zenith Angle 50.0 Albedo  0.2006662E+00
      data (ref_adm(12,iz, 1,11),iz = 1,20) / &
     & 0.1640100E+00, 0.1640100E+00, 0.1574000E+00, 0.1518400E+00, &
     & 0.1491100E+00, 0.1769200E+00, 0.1776700E+00, 0.1721300E+00, &
     & 0.1721400E+00, 0.1636800E+00, 0.2295100E+00, 0.2503300E+00, &
     & 0.2476900E+00, 0.2316900E+00, 0.2331800E+00, 0.2488100E+00, &
     & 0.2557200E+00, 0.2815500E+00, 0.3041300E+00, 0.3041300E+00 /
      data (ref_adm(12,iz, 2,11),iz = 1,20) / &
     & 0.1640100E+00, 0.1640100E+00, 0.1574000E+00, 0.1518400E+00, &
     & 0.1491100E+00, 0.1769200E+00, 0.1776700E+00, 0.1721300E+00, &
     & 0.1721400E+00, 0.1636800E+00, 0.2295100E+00, 0.2503300E+00, &
     & 0.2476900E+00, 0.2316900E+00, 0.2331800E+00, 0.2488100E+00, &
     & 0.2557200E+00, 0.2815500E+00, 0.3041300E+00, 0.3041300E+00 /
      data (ref_adm(12,iz, 3,11),iz = 1,20) / &
     & 0.1584100E+00, 0.1584100E+00, 0.1549300E+00, 0.1427900E+00, &
     & 0.1461600E+00, 0.1528900E+00, 0.1736300E+00, 0.1660600E+00, &
     & 0.1565800E+00, 0.1524000E+00, 0.1799000E+00, 0.2145600E+00, &
     & 0.2113900E+00, 0.2030500E+00, 0.2187200E+00, 0.2286300E+00, &
     & 0.2705700E+00, 0.2985200E+00, 0.3236200E+00, 0.3236200E+00 /
      data (ref_adm(12,iz, 4,11),iz = 1,20) / &
     & 0.1613400E+00, 0.1613400E+00, 0.1570700E+00, 0.1547000E+00, &
     & 0.1593900E+00, 0.1599000E+00, 0.1608700E+00, 0.1539000E+00, &
     & 0.1754300E+00, 0.1715700E+00, 0.1841600E+00, 0.1936800E+00, &
     & 0.1990700E+00, 0.1964800E+00, 0.2174700E+00, 0.2341300E+00, &
     & 0.2430500E+00, 0.3028000E+00, 0.2690600E+00, 0.2690600E+00 /
      data (ref_adm(12,iz, 5,11),iz = 1,20) / &
     & 0.1673100E+00, 0.1673100E+00, 0.1644400E+00, 0.1585600E+00, &
     & 0.1632000E+00, 0.1609600E+00, 0.1380100E+00, 0.1520900E+00, &
     & 0.1486800E+00, 0.1616800E+00, 0.1573500E+00, 0.1716100E+00, &
     & 0.1924300E+00, 0.1892000E+00, 0.2089800E+00, 0.2200500E+00, &
     & 0.2568500E+00, 0.2686900E+00, 0.2746500E+00, 0.2746500E+00 /
      data (ref_adm(12,iz, 6,11),iz = 1,20) / &
     & 0.1734400E+00, 0.1734400E+00, 0.1593800E+00, 0.1512600E+00, &
     & 0.1433200E+00, 0.1441300E+00, 0.1528100E+00, 0.1474300E+00, &
     & 0.1546300E+00, 0.1471000E+00, 0.1622900E+00, 0.1559400E+00, &
     & 0.1708200E+00, 0.1855500E+00, 0.1963000E+00, 0.2122600E+00, &
     & 0.2213500E+00, 0.2563600E+00, 0.2673500E+00, 0.2673500E+00 /
      data (ref_adm(12,iz, 7,11),iz = 1,20) / &
     & 0.1645300E+00, 0.1645300E+00, 0.1619000E+00, 0.1620700E+00, &
     & 0.1681300E+00, 0.1646100E+00, 0.1654700E+00, 0.1652500E+00, &
     & 0.1664300E+00, 0.1713700E+00, 0.1707100E+00, 0.1705200E+00, &
     & 0.1848100E+00, 0.1895900E+00, 0.2011200E+00, 0.2103700E+00, &
     & 0.2524400E+00, 0.2886600E+00, 0.2647100E+00, 0.2647100E+00 /
      data (ref_adm(12,iz, 8,11),iz = 1,20) / &
     & 0.1636500E+00, 0.1636500E+00, 0.1650700E+00, 0.1763300E+00, &
     & 0.1809400E+00, 0.1860200E+00, 0.1932900E+00, 0.1759900E+00, &
     & 0.1740500E+00, 0.1602900E+00, 0.1407100E+00, 0.1542600E+00, &
     & 0.1768400E+00, 0.1905900E+00, 0.1918200E+00, 0.2221200E+00, &
     & 0.2388000E+00, 0.2709100E+00, 0.2371800E+00, 0.2371800E+00 /
      data (ref_adm(12,iz, 9,11),iz = 1,20) / &
     & 0.1780300E+00, 0.1780300E+00, 0.1743800E+00, 0.1690800E+00, &
     & 0.1630200E+00, 0.1597500E+00, 0.1583100E+00, 0.1754600E+00, &
     & 0.1685300E+00, 0.1486700E+00, 0.1540100E+00, 0.1558500E+00, &
     & 0.1709500E+00, 0.1844900E+00, 0.1982600E+00, 0.2239100E+00, &
     & 0.2549700E+00, 0.2594100E+00, 0.3026200E+00, 0.3026200E+00 /
      data (ref_adm(12,iz,10,11),iz = 1,20) / &
     & 0.1635400E+00, 0.1635400E+00, 0.1577700E+00, 0.1571300E+00, &
     & 0.1542100E+00, 0.1557000E+00, 0.1532700E+00, 0.1602100E+00, &
     & 0.1563300E+00, 0.1485900E+00, 0.1572600E+00, 0.1655600E+00, &
     & 0.1653600E+00, 0.1810100E+00, 0.2001400E+00, 0.2165000E+00, &
     & 0.2428200E+00, 0.2863100E+00, 0.2512600E+00, 0.2512600E+00 /
      data (ref_adm(12,iz,11,11),iz = 1,20) / &
     & 0.1693600E+00, 0.1693600E+00, 0.1713200E+00, 0.1739300E+00, &
     & 0.1563000E+00, 0.1605000E+00, 0.1747400E+00, 0.1816300E+00, &
     & 0.1528700E+00, 0.1549200E+00, 0.1554900E+00, 0.1686500E+00, &
     & 0.1639400E+00, 0.1697900E+00, 0.1887500E+00, 0.2307500E+00, &
     & 0.2284100E+00, 0.3046600E+00, 0.2736300E+00, 0.2736300E+00 /
      data (ref_adm(12,iz,12,11),iz = 1,20) / &
     & 0.1701600E+00, 0.1701600E+00, 0.1691100E+00, 0.1645900E+00, &
     & 0.1739200E+00, 0.1610400E+00, 0.1585100E+00, 0.1742400E+00, &
     & 0.1449800E+00, 0.1518600E+00, 0.1578200E+00, 0.1541900E+00, &
     & 0.1681700E+00, 0.1762200E+00, 0.1848600E+00, 0.2133400E+00, &
     & 0.2556800E+00, 0.2307600E+00, 0.2200200E+00, 0.2200200E+00 /
      data (ref_adm(12,iz,13,11),iz = 1,20) / &
     & 0.1624700E+00, 0.1624700E+00, 0.1687800E+00, 0.1716500E+00, &
     & 0.1649800E+00, 0.1670000E+00, 0.1646200E+00, 0.1590600E+00, &
     & 0.1602400E+00, 0.1600100E+00, 0.1648300E+00, 0.1675000E+00, &
     & 0.1646700E+00, 0.1660700E+00, 0.1922000E+00, 0.2301600E+00, &
     & 0.2596700E+00, 0.2351100E+00, 0.2853900E+00, 0.2853900E+00 /
      data (ref_adm(12,iz,14,11),iz = 1,20) / &
     & 0.1593900E+00, 0.1593900E+00, 0.1493000E+00, 0.1478700E+00, &
     & 0.1473000E+00, 0.1510600E+00, 0.1546200E+00, 0.1648300E+00, &
     & 0.1592400E+00, 0.1637600E+00, 0.1598600E+00, 0.1663700E+00, &
     & 0.1756600E+00, 0.1855600E+00, 0.1887500E+00, 0.2110500E+00, &
     & 0.2576000E+00, 0.2393600E+00, 0.2119100E+00, 0.2119100E+00 /
      data (ref_adm(12,iz,15,11),iz = 1,20) / &
     & 0.1620400E+00, 0.1620400E+00, 0.1628400E+00, 0.1566000E+00, &
     & 0.1577400E+00, 0.1521100E+00, 0.1557600E+00, 0.1547300E+00, &
     & 0.1552300E+00, 0.1543900E+00, 0.1629400E+00, 0.1622200E+00, &
     & 0.1597100E+00, 0.1645300E+00, 0.1898300E+00, 0.2131900E+00, &
     & 0.2269600E+00, 0.2259900E+00, 0.2178900E+00, 0.2178900E+00 /
      data (ref_adm(12,iz,16,11),iz = 1,20) / &
     & 0.1674500E+00, 0.1674500E+00, 0.1638500E+00, 0.1621300E+00, &
     & 0.1490700E+00, 0.1503700E+00, 0.1653500E+00, 0.1602000E+00, &
     & 0.1592300E+00, 0.1508300E+00, 0.1664300E+00, 0.1743400E+00, &
     & 0.1735500E+00, 0.1739200E+00, 0.1930700E+00, 0.1864400E+00, &
     & 0.2348600E+00, 0.2248600E+00, 0.2177325E+00, 0.2177325E+00 /
      data (ref_adm(12,iz,17,11),iz = 1,20) / &
     & 0.1648500E+00, 0.1648500E+00, 0.1577000E+00, 0.1726800E+00, &
     & 0.1624600E+00, 0.1489300E+00, 0.1605400E+00, 0.1557600E+00, &
     & 0.1604300E+00, 0.1636600E+00, 0.1685200E+00, 0.1754200E+00, &
     & 0.1851200E+00, 0.1871800E+00, 0.1957300E+00, 0.1847800E+00, &
     & 0.2297400E+00, 0.3095900E+00, 0.2162021E+00, 0.2162021E+00 /
      data (ref_adm(12,iz,18,11),iz = 1,20) / &
     & 0.1668100E+00, 0.1668100E+00, 0.1522500E+00, 0.1591500E+00, &
     & 0.1566100E+00, 0.1568700E+00, 0.1620400E+00, 0.1808100E+00, &
     & 0.1680000E+00, 0.1599200E+00, 0.1763500E+00, 0.1752900E+00, &
     & 0.1926800E+00, 0.1872500E+00, 0.1743000E+00, 0.1879100E+00, &
     & 0.2580700E+00, 0.2567700E+00, 0.2115203E+00, 0.2115203E+00 /
      data (ref_adm(12,iz,19,11),iz = 1,20) / &
     & 0.1636000E+00, 0.1636000E+00, 0.1679200E+00, 0.1694800E+00, &
     & 0.1650700E+00, 0.1718800E+00, 0.1695700E+00, 0.1740900E+00, &
     & 0.1732900E+00, 0.1676200E+00, 0.1604800E+00, 0.1943800E+00, &
     & 0.1825000E+00, 0.2021500E+00, 0.1925000E+00, 0.1960000E+00, &
     & 0.2105300E+00, 0.2321739E+00, 0.2111295E+00, 0.2111295E+00 /
      data (ref_adm(12,iz,20,11),iz = 1,20) / &
     & 0.1516900E+00, 0.1516900E+00, 0.1591900E+00, 0.1467800E+00, &
     & 0.1651600E+00, 0.1558200E+00, 0.1628900E+00, 0.1624000E+00, &
     & 0.1639300E+00, 0.1623600E+00, 0.1633200E+00, 0.1828300E+00, &
     & 0.1942700E+00, 0.2029300E+00, 0.1871900E+00, 0.2460900E+00, &
     & 0.2271598E+00, 0.2312700E+00, 0.2107235E+00, 0.2107235E+00 /
      data (ref_adm(12,iz,21,11),iz = 1,20) / &
     & 0.1507900E+00, 0.1507900E+00, 0.1734200E+00, 0.1587700E+00, &
     & 0.1645800E+00, 0.1590400E+00, 0.1682300E+00, 0.1758500E+00, &
     & 0.1766100E+00, 0.1748000E+00, 0.1758300E+00, 0.1924900E+00, &
     & 0.1908900E+00, 0.1873100E+00, 0.1853300E+00, 0.2115300E+00, &
     & 0.2267533E+00, 0.2305368E+00, 0.2104206E+00, 0.2104206E+00 /
      data (ref_adm(12,iz,22,11),iz = 1,20) / &
     & 0.1579900E+00, 0.1579900E+00, 0.1809200E+00, 0.1608200E+00, &
     & 0.1549200E+00, 0.1607900E+00, 0.1743400E+00, 0.1756600E+00, &
     & 0.1762300E+00, 0.1840600E+00, 0.1811800E+00, 0.1945200E+00, &
     & 0.1953100E+00, 0.1984800E+00, 0.1930500E+00, 0.2196100E+00, &
     & 0.2884720E+00, 0.2962058E+00, 0.2809836E+00, 0.2809836E+00 /
      data (ref_adm(12,iz,23,11),iz = 1,20) / &
     & 0.1655000E+00, 0.1655000E+00, 0.1643300E+00, 0.1542800E+00, &
     & 0.1603300E+00, 0.1663600E+00, 0.1809500E+00, 0.1859600E+00, &
     & 0.1904700E+00, 0.1845600E+00, 0.1919700E+00, 0.2202400E+00, &
     & 0.2071300E+00, 0.2153300E+00, 0.2132700E+00, 0.2259300E+00, &
     & 0.2193100E+00, 0.2897891E+00, 0.2784879E+00, 0.2784879E+00 /
      data (ref_adm(12,iz,24,11),iz = 1,20) / &
     & 0.1589900E+00, 0.1589900E+00, 0.1636500E+00, 0.1686400E+00, &
     & 0.1744700E+00, 0.1828300E+00, 0.1849000E+00, 0.1795500E+00, &
     & 0.1903700E+00, 0.1964400E+00, 0.2002500E+00, 0.2152400E+00, &
     & 0.2060600E+00, 0.2165700E+00, 0.2057700E+00, 0.2123100E+00, &
     & 0.2548600E+00, 0.2847607E+00, 0.2764643E+00, 0.2764643E+00 /
      data (ref_adm(12,iz,25,11),iz = 1,20) / &
     & 0.1632100E+00, 0.1632100E+00, 0.1680200E+00, 0.1647300E+00, &
     & 0.1702800E+00, 0.1730800E+00, 0.1835500E+00, 0.1813700E+00, &
     & 0.1884900E+00, 0.1959100E+00, 0.2017400E+00, 0.2169100E+00, &
     & 0.2044400E+00, 0.2141400E+00, 0.2261600E+00, 0.2379200E+00, &
     & 0.2408900E+00, 0.2141000E+00, 0.2756552E+00, 0.2756552E+00 /
      data (ref_adm(12,iz,26,11),iz = 1,20) / &
     & 0.1603000E+00, 0.1603000E+00, 0.1641800E+00, 0.1678300E+00, &
     & 0.1670400E+00, 0.1678800E+00, 0.1825000E+00, 0.1915100E+00, &
     & 0.1860900E+00, 0.1927100E+00, 0.2031600E+00, 0.2170800E+00, &
     & 0.2159500E+00, 0.2308700E+00, 0.2362700E+00, 0.2507300E+00, &
     & 0.2632300E+00, 0.2596600E+00, 0.2452100E+00, 0.2452100E+00 /
      data (ref_adm(12,iz,27,11),iz = 1,20) / &
     & 0.1750200E+00, 0.1750200E+00, 0.1845700E+00, 0.1863700E+00, &
     & 0.1888700E+00, 0.1960900E+00, 0.2070100E+00, 0.2155400E+00, &
     & 0.2196400E+00, 0.2183300E+00, 0.2217800E+00, 0.2267400E+00, &
     & 0.2223000E+00, 0.2335700E+00, 0.2457600E+00, 0.2561100E+00, &
     & 0.2416300E+00, 0.2599600E+00, 0.2560900E+00, 0.2560900E+00 /
      data (ref_adm(12,iz,28,11),iz = 1,20) / &
     & 0.1650100E+00, 0.1650100E+00, 0.1704300E+00, 0.1732000E+00, &
     & 0.1654500E+00, 0.2056100E+00, 0.2041800E+00, 0.1964100E+00, &
     & 0.2130800E+00, 0.2288800E+00, 0.2341300E+00, 0.2388800E+00, &
     & 0.2477000E+00, 0.2525600E+00, 0.2594300E+00, 0.2518000E+00, &
     & 0.2687400E+00, 0.2708800E+00, 0.2471500E+00, 0.2471500E+00 /
      data (ref_adm(12,iz,29,11),iz = 1,20) / &
     & 0.1639500E+00, 0.1639500E+00, 0.1695000E+00, 0.1833100E+00, &
     & 0.1751900E+00, 0.1924000E+00, 0.2063000E+00, 0.1985300E+00, &
     & 0.2015600E+00, 0.2193100E+00, 0.2369800E+00, 0.2419100E+00, &
     & 0.2512000E+00, 0.2547200E+00, 0.2602000E+00, 0.2667700E+00, &
     & 0.2662600E+00, 0.2673000E+00, 0.2571100E+00, 0.2571100E+00 /
      data (ref_adm(12,iz,30,11),iz = 1,20) / &
     & 0.1737500E+00, 0.1737500E+00, 0.1787400E+00, 0.1850600E+00, &
     & 0.1867600E+00, 0.1796900E+00, 0.2016200E+00, 0.2200400E+00, &
     & 0.2275800E+00, 0.2208800E+00, 0.2317900E+00, 0.2380000E+00, &
     & 0.2622900E+00, 0.2576300E+00, 0.2565400E+00, 0.2721300E+00, &
     & 0.2824700E+00, 0.2804000E+00, 0.2365600E+00, 0.2365600E+00 /
      data (ref_adm(12,iz,31,11),iz = 1,20) / &
     & 0.1863800E+00, 0.1863800E+00, 0.1793300E+00, 0.1917700E+00, &
     & 0.1852900E+00, 0.1883500E+00, 0.1884400E+00, 0.1965700E+00, &
     & 0.2174800E+00, 0.2275600E+00, 0.2368100E+00, 0.2500200E+00, &
     & 0.2558500E+00, 0.2628100E+00, 0.2843600E+00, 0.2977700E+00, &
     & 0.2936000E+00, 0.2778500E+00, 0.2420500E+00, 0.2420500E+00 /
      data (ref_adm(12,iz,32,11),iz = 1,20) / &
     & 0.1682500E+00, 0.1682500E+00, 0.1816300E+00, 0.1907100E+00, &
     & 0.1963200E+00, 0.2156300E+00, 0.2186300E+00, 0.2368500E+00, &
     & 0.2298400E+00, 0.2420300E+00, 0.2481300E+00, 0.2639200E+00, &
     & 0.2790400E+00, 0.2796200E+00, 0.2818000E+00, 0.3026600E+00, &
     & 0.3023100E+00, 0.2999800E+00, 0.2663400E+00, 0.2663400E+00 /
      data (ref_adm(12,iz,33,11),iz = 1,20) / &
     & 0.1746100E+00, 0.1746100E+00, 0.1693800E+00, 0.1879100E+00, &
     & 0.1983600E+00, 0.2002000E+00, 0.1985400E+00, 0.2005800E+00, &
     & 0.2173300E+00, 0.2374200E+00, 0.2557200E+00, 0.2753400E+00, &
     & 0.2725100E+00, 0.2871300E+00, 0.2894500E+00, 0.2948800E+00, &
     & 0.3048800E+00, 0.3109300E+00, 0.2722400E+00, 0.2722400E+00 /
      data (ref_adm(12,iz,34,11),iz = 1,20) / &
     & 0.1717900E+00, 0.1717900E+00, 0.1892200E+00, 0.1916900E+00, &
     & 0.2036900E+00, 0.2130500E+00, 0.2008000E+00, 0.2221200E+00, &
     & 0.2355200E+00, 0.2525300E+00, 0.2704400E+00, 0.2890800E+00, &
     & 0.3006400E+00, 0.2932100E+00, 0.3046100E+00, 0.3075600E+00, &
     & 0.3079700E+00, 0.3030000E+00, 0.2487200E+00, 0.2487200E+00 /
      data (ref_adm(12,iz,35,11),iz = 1,20) / &
     & 0.1736100E+00, 0.1736100E+00, 0.1711800E+00, 0.2178600E+00, &
     & 0.1971000E+00, 0.2003200E+00, 0.2170700E+00, 0.2357500E+00, &
     & 0.2451100E+00, 0.2718600E+00, 0.2904800E+00, 0.2958500E+00, &
     & 0.3113700E+00, 0.3095200E+00, 0.3178900E+00, 0.3178000E+00, &
     & 0.3265100E+00, 0.3150600E+00, 0.2726400E+00, 0.2726400E+00 /
      data (ref_adm(12,iz,36,11),iz = 1,20) / &
     & 0.1608500E+00, 0.1608500E+00, 0.2243900E+00, 0.1933500E+00, &
     & 0.1757600E+00, 0.1918700E+00, 0.2019400E+00, 0.2198700E+00, &
     & 0.2312300E+00, 0.2585200E+00, 0.2943200E+00, 0.3108600E+00, &
     & 0.3053300E+00, 0.3145100E+00, 0.3202100E+00, 0.3228100E+00, &
     & 0.3404200E+00, 0.3220300E+00, 0.2289800E+00, 0.2289800E+00 /
      data (ref_adm(12,iz,37,11),iz = 1,20) / &
     & 0.1703000E+00, 0.1703000E+00, 0.1750700E+00, 0.1947100E+00, &
     & 0.1963100E+00, 0.1924100E+00, 0.1980400E+00, 0.2046200E+00, &
     & 0.2348800E+00, 0.2447000E+00, 0.2931400E+00, 0.2867800E+00, &
     & 0.3179500E+00, 0.3185000E+00, 0.3303100E+00, 0.3316800E+00, &
     & 0.3503100E+00, 0.2953300E+00, 0.3083960E+00, 0.3083960E+00 /
      data (ref_adm(12,iz,38,11),iz = 1,20) / &
     & 0.1703000E+00, 0.1703000E+00, 0.1750700E+00, 0.1947100E+00, &
     & 0.1963100E+00, 0.1924100E+00, 0.1980400E+00, 0.2046200E+00, &
     & 0.2348800E+00, 0.2447000E+00, 0.2931400E+00, 0.2867800E+00, &
     & 0.3179500E+00, 0.3185000E+00, 0.3303100E+00, 0.3316800E+00, &
     & 0.3503100E+00, 0.2953300E+00, 0.3083960E+00, 0.3083960E+00 /
! Solar Zenith Angle 55.0 Albedo  0.2108517E+00
      data (ref_adm(12,iz, 1,12),iz = 1,20) / &
     & 0.1692600E+00, 0.1692600E+00, 0.1751900E+00, 0.1542500E+00, &
     & 0.1571500E+00, 0.1510600E+00, 0.1579000E+00, 0.1578100E+00, &
     & 0.1592600E+00, 0.1604900E+00, 0.1836700E+00, 0.2271100E+00, &
     & 0.2757700E+00, 0.2927500E+00, 0.2916900E+00, 0.3033300E+00, &
     & 0.3457900E+00, 0.3934400E+00, 0.4147400E+00, 0.4147400E+00 /
      data (ref_adm(12,iz, 2,12),iz = 1,20) / &
     & 0.1692600E+00, 0.1692600E+00, 0.1751900E+00, 0.1542500E+00, &
     & 0.1571500E+00, 0.1510600E+00, 0.1579000E+00, 0.1578100E+00, &
     & 0.1592600E+00, 0.1604900E+00, 0.1836700E+00, 0.2271100E+00, &
     & 0.2757700E+00, 0.2927500E+00, 0.2916900E+00, 0.3033300E+00, &
     & 0.3457900E+00, 0.3934400E+00, 0.4147400E+00, 0.4147400E+00 /
      data (ref_adm(12,iz, 3,12),iz = 1,20) / &
     & 0.1657300E+00, 0.1657300E+00, 0.1643400E+00, 0.1559700E+00, &
     & 0.1563000E+00, 0.1534100E+00, 0.1455600E+00, 0.1647900E+00, &
     & 0.1626300E+00, 0.1713100E+00, 0.1778800E+00, 0.2140600E+00, &
     & 0.2178200E+00, 0.2353600E+00, 0.2502600E+00, 0.2910700E+00, &
     & 0.3357900E+00, 0.3824200E+00, 0.4108900E+00, 0.4108900E+00 /
      data (ref_adm(12,iz, 4,12),iz = 1,20) / &
     & 0.1551000E+00, 0.1551000E+00, 0.1869400E+00, 0.1755400E+00, &
     & 0.1641000E+00, 0.1431900E+00, 0.1614400E+00, 0.1578600E+00, &
     & 0.1714600E+00, 0.1571200E+00, 0.1779600E+00, 0.1956700E+00, &
     & 0.2031500E+00, 0.2270200E+00, 0.2515200E+00, 0.2651400E+00, &
     & 0.3078600E+00, 0.3664400E+00, 0.4291000E+00, 0.4291000E+00 /
      data (ref_adm(12,iz, 5,12),iz = 1,20) / &
     & 0.1843300E+00, 0.1843300E+00, 0.1610800E+00, 0.1562300E+00, &
     & 0.1518900E+00, 0.1514900E+00, 0.1511500E+00, 0.1735900E+00, &
     & 0.1632800E+00, 0.1663200E+00, 0.1702100E+00, 0.1763200E+00, &
     & 0.1971600E+00, 0.2179900E+00, 0.2399700E+00, 0.2533300E+00, &
     & 0.3175400E+00, 0.3367800E+00, 0.3938800E+00, 0.3938800E+00 /
      data (ref_adm(12,iz, 6,12),iz = 1,20) / &
     & 0.1631200E+00, 0.1631200E+00, 0.1611400E+00, 0.1638100E+00, &
     & 0.1590900E+00, 0.1556700E+00, 0.1558000E+00, 0.1632600E+00, &
     & 0.1644800E+00, 0.1761800E+00, 0.1753700E+00, 0.1737200E+00, &
     & 0.1886400E+00, 0.2078700E+00, 0.2261800E+00, 0.2712300E+00, &
     & 0.3298500E+00, 0.3502200E+00, 0.3461600E+00, 0.3461600E+00 /
      data (ref_adm(12,iz, 7,12),iz = 1,20) / &
     & 0.1657100E+00, 0.1657100E+00, 0.1554900E+00, 0.1496500E+00, &
     & 0.1533000E+00, 0.1535400E+00, 0.1566500E+00, 0.1654400E+00, &
     & 0.1669700E+00, 0.1783000E+00, 0.1790400E+00, 0.1878100E+00, &
     & 0.1931700E+00, 0.2123900E+00, 0.2327500E+00, 0.2730800E+00, &
     & 0.2899500E+00, 0.2739700E+00, 0.2999800E+00, 0.2999800E+00 /
      data (ref_adm(12,iz, 8,12),iz = 1,20) / &
     & 0.1586000E+00, 0.1586000E+00, 0.1617900E+00, 0.1598400E+00, &
     & 0.1586500E+00, 0.1624800E+00, 0.1631200E+00, 0.1672100E+00, &
     & 0.1714700E+00, 0.1654200E+00, 0.1759000E+00, 0.1922700E+00, &
     & 0.2041900E+00, 0.2394800E+00, 0.2531900E+00, 0.2303500E+00, &
     & 0.2694700E+00, 0.2866100E+00, 0.2955900E+00, 0.2955900E+00 /
      data (ref_adm(12,iz, 9,12),iz = 1,20) / &
     & 0.1555600E+00, 0.1555600E+00, 0.1533100E+00, 0.1536600E+00, &
     & 0.1568200E+00, 0.1483900E+00, 0.1561100E+00, 0.1617800E+00, &
     & 0.1532000E+00, 0.1654700E+00, 0.1650400E+00, 0.1815800E+00, &
     & 0.1958900E+00, 0.2079500E+00, 0.2245400E+00, 0.2347400E+00, &
     & 0.2683300E+00, 0.3080600E+00, 0.2825800E+00, 0.2825800E+00 /
      data (ref_adm(12,iz,10,12),iz = 1,20) / &
     & 0.1647400E+00, 0.1647400E+00, 0.1577500E+00, 0.1595200E+00, &
     & 0.1641000E+00, 0.1647100E+00, 0.1540500E+00, 0.1589800E+00, &
     & 0.1502800E+00, 0.1585200E+00, 0.1687400E+00, 0.1682400E+00, &
     & 0.1861900E+00, 0.1942300E+00, 0.1987000E+00, 0.2365100E+00, &
     & 0.2662500E+00, 0.2783900E+00, 0.2882600E+00, 0.2882600E+00 /
      data (ref_adm(12,iz,11,12),iz = 1,20) / &
     & 0.1737700E+00, 0.1737700E+00, 0.1712700E+00, 0.1590100E+00, &
     & 0.1628700E+00, 0.1629400E+00, 0.1544400E+00, 0.1480600E+00, &
     & 0.1605600E+00, 0.1578100E+00, 0.1729500E+00, 0.1641800E+00, &
     & 0.1795200E+00, 0.2075800E+00, 0.2041500E+00, 0.2198000E+00, &
     & 0.2590500E+00, 0.2714700E+00, 0.2536800E+00, 0.2536800E+00 /
      data (ref_adm(12,iz,12,12),iz = 1,20) / &
     & 0.1748200E+00, 0.1748200E+00, 0.1713200E+00, 0.1606600E+00, &
     & 0.1641700E+00, 0.1558700E+00, 0.1586300E+00, 0.1580000E+00, &
     & 0.1681300E+00, 0.1573300E+00, 0.1654200E+00, 0.1709000E+00, &
     & 0.1858300E+00, 0.1955800E+00, 0.2066200E+00, 0.2175000E+00, &
     & 0.2546400E+00, 0.2744300E+00, 0.2660900E+00, 0.2660900E+00 /
      data (ref_adm(12,iz,13,12),iz = 1,20) / &
     & 0.1758100E+00, 0.1758100E+00, 0.1713200E+00, 0.1662300E+00, &
     & 0.1577700E+00, 0.1587200E+00, 0.1612200E+00, 0.1638400E+00, &
     & 0.1692600E+00, 0.1628100E+00, 0.1722400E+00, 0.1796000E+00, &
     & 0.1864100E+00, 0.1992700E+00, 0.1961300E+00, 0.2123900E+00, &
     & 0.2610100E+00, 0.2509100E+00, 0.2297400E+00, 0.2297400E+00 /
      data (ref_adm(12,iz,14,12),iz = 1,20) / &
     & 0.1749100E+00, 0.1749100E+00, 0.1673400E+00, 0.1621800E+00, &
     & 0.1636400E+00, 0.1616000E+00, 0.1653600E+00, 0.1639500E+00, &
     & 0.1649500E+00, 0.1633600E+00, 0.1729000E+00, 0.1779700E+00, &
     & 0.1872000E+00, 0.1931400E+00, 0.2052400E+00, 0.2101800E+00, &
     & 0.2338000E+00, 0.2139500E+00, 0.3549266E+00, 0.3549266E+00 /
      data (ref_adm(12,iz,15,12),iz = 1,20) / &
     & 0.1608500E+00, 0.1608500E+00, 0.1588500E+00, 0.1565100E+00, &
     & 0.1547600E+00, 0.1539100E+00, 0.1558400E+00, 0.1604500E+00, &
     & 0.1586000E+00, 0.1602900E+00, 0.1690000E+00, 0.1753300E+00, &
     & 0.1873500E+00, 0.1969500E+00, 0.2047800E+00, 0.2270000E+00, &
     & 0.2271000E+00, 0.2356100E+00, 0.3468929E+00, 0.3468929E+00 /
      data (ref_adm(12,iz,16,12),iz = 1,20) / &
     & 0.1600700E+00, 0.1600700E+00, 0.1570400E+00, 0.1554700E+00, &
     & 0.1617500E+00, 0.1706100E+00, 0.1795800E+00, 0.1872300E+00, &
     & 0.1646500E+00, 0.1647800E+00, 0.1713800E+00, 0.1723600E+00, &
     & 0.1777200E+00, 0.1926100E+00, 0.2017200E+00, 0.2228200E+00, &
     & 0.2255600E+00, 0.2396000E+00, 0.3373223E+00, 0.3373223E+00 /
      data (ref_adm(12,iz,17,12),iz = 1,20) / &
     & 0.1639500E+00, 0.1639500E+00, 0.1591000E+00, 0.1588400E+00, &
     & 0.1580400E+00, 0.1683200E+00, 0.1916300E+00, 0.1685300E+00, &
     & 0.1610000E+00, 0.1704600E+00, 0.1695100E+00, 0.1698600E+00, &
     & 0.1892400E+00, 0.1942600E+00, 0.2024500E+00, 0.2225100E+00, &
     & 0.2488100E+00, 0.3045100E+00, 0.3289214E+00, 0.3289214E+00 /
      data (ref_adm(12,iz,18,12),iz = 1,20) / &
     & 0.1648200E+00, 0.1648200E+00, 0.1676800E+00, 0.1714500E+00, &
     & 0.1539600E+00, 0.1527600E+00, 0.1715500E+00, 0.1712400E+00, &
     & 0.1603000E+00, 0.1717000E+00, 0.1747400E+00, 0.1812000E+00, &
     & 0.1965900E+00, 0.1966200E+00, 0.2202300E+00, 0.2190900E+00, &
     & 0.2501100E+00, 0.2430652E+00, 0.2208648E+00, 0.2208648E+00 /
      data (ref_adm(12,iz,19,12),iz = 1,20) / &
     & 0.1740800E+00, 0.1740800E+00, 0.1775200E+00, 0.1700100E+00, &
     & 0.1644100E+00, 0.1661100E+00, 0.1720300E+00, 0.1702900E+00, &
     & 0.1634700E+00, 0.1728000E+00, 0.1785100E+00, 0.1855900E+00, &
     & 0.1902900E+00, 0.1988600E+00, 0.2050800E+00, 0.2047300E+00, &
     & 0.2378289E+00, 0.2421862E+00, 0.2202603E+00, 0.2202603E+00 /
      data (ref_adm(12,iz,20,12),iz = 1,20) / &
     & 0.1561300E+00, 0.1561300E+00, 0.1523900E+00, 0.1602300E+00, &
     & 0.1544800E+00, 0.1680600E+00, 0.1612200E+00, 0.1675200E+00, &
     & 0.1639100E+00, 0.1680900E+00, 0.1930000E+00, 0.1905000E+00, &
     & 0.2002200E+00, 0.2079800E+00, 0.2139400E+00, 0.2105800E+00, &
     & 0.2367235E+00, 0.2409635E+00, 0.2196743E+00, 0.2196743E+00 /
      data (ref_adm(12,iz,21,12),iz = 1,20) / &
     & 0.1685500E+00, 0.1685500E+00, 0.1694400E+00, 0.1732800E+00, &
     & 0.1676900E+00, 0.1721400E+00, 0.1751200E+00, 0.1736400E+00, &
     & 0.1812100E+00, 0.1773500E+00, 0.1879600E+00, 0.1872100E+00, &
     & 0.2052800E+00, 0.2004100E+00, 0.2082400E+00, 0.2088900E+00, &
     & 0.2359785E+00, 0.2398429E+00, 0.2190911E+00, 0.2190911E+00 /
      data (ref_adm(12,iz,22,12),iz = 1,20) / &
     & 0.1757200E+00, 0.1757200E+00, 0.1653400E+00, 0.1709000E+00, &
     & 0.1666900E+00, 0.1719300E+00, 0.1760100E+00, 0.1794100E+00, &
     & 0.1879700E+00, 0.1743200E+00, 0.1916300E+00, 0.2072800E+00, &
     & 0.2219800E+00, 0.2260400E+00, 0.2368600E+00, 0.2568200E+00, &
     & 0.3174305E+00, 0.3288150E+00, 0.3155145E+00, 0.3155145E+00 /
      data (ref_adm(12,iz,23,12),iz = 1,20) / &
     & 0.1674900E+00, 0.1674900E+00, 0.1691900E+00, 0.1618900E+00, &
     & 0.1712600E+00, 0.1676800E+00, 0.1757500E+00, 0.1783700E+00, &
     & 0.1846100E+00, 0.1817900E+00, 0.1948000E+00, 0.2023100E+00, &
     & 0.2210200E+00, 0.2280700E+00, 0.2487700E+00, 0.2569200E+00, &
     & 0.3113916E+00, 0.3206116E+00, 0.3125564E+00, 0.3125564E+00 /
      data (ref_adm(12,iz,24,12),iz = 1,20) / &
     & 0.1619900E+00, 0.1619900E+00, 0.1662000E+00, 0.1731200E+00, &
     & 0.1767500E+00, 0.1738900E+00, 0.1837500E+00, 0.1798700E+00, &
     & 0.1851000E+00, 0.1994000E+00, 0.1968300E+00, 0.2101100E+00, &
     & 0.2266700E+00, 0.2290900E+00, 0.2347500E+00, 0.2606500E+00, &
     & 0.2416400E+00, 0.3145730E+00, 0.3107363E+00, 0.3107363E+00 /
      data (ref_adm(12,iz,25,12),iz = 1,20) / &
     & 0.1626900E+00, 0.1626900E+00, 0.1678900E+00, 0.1696600E+00, &
     & 0.1735900E+00, 0.1746900E+00, 0.1790900E+00, 0.1857000E+00, &
     & 0.1942600E+00, 0.1969000E+00, 0.2063300E+00, 0.2238800E+00, &
     & 0.2278300E+00, 0.2393700E+00, 0.2464600E+00, 0.2665300E+00, &
     & 0.2907300E+00, 0.2462900E+00, 0.3103469E+00, 0.3103469E+00 /
      data (ref_adm(12,iz,26,12),iz = 1,20) / &
     & 0.1709500E+00, 0.1709500E+00, 0.1740800E+00, 0.1832600E+00, &
     & 0.1849700E+00, 0.1869200E+00, 0.1940900E+00, 0.1974300E+00, &
     & 0.1964400E+00, 0.2035700E+00, 0.2017300E+00, 0.2088000E+00, &
     & 0.2278400E+00, 0.2358100E+00, 0.2540500E+00, 0.2857000E+00, &
     & 0.2879600E+00, 0.2942200E+00, 0.3111797E+00, 0.3111797E+00 /
      data (ref_adm(12,iz,27,12),iz = 1,20) / &
     & 0.1707100E+00, 0.1707100E+00, 0.1754400E+00, 0.1741900E+00, &
     & 0.1878900E+00, 0.1873000E+00, 0.2023800E+00, 0.2028900E+00, &
     & 0.2116000E+00, 0.2145000E+00, 0.2241200E+00, 0.2318300E+00, &
     & 0.2453600E+00, 0.2458000E+00, 0.2620900E+00, 0.2713500E+00, &
     & 0.2855600E+00, 0.2897300E+00, 0.2764800E+00, 0.2764800E+00 /
      data (ref_adm(12,iz,28,12),iz = 1,20) / &
     & 0.1682200E+00, 0.1682200E+00, 0.1762100E+00, 0.1836400E+00, &
     & 0.1927200E+00, 0.1983400E+00, 0.1943100E+00, 0.2228400E+00, &
     & 0.2190900E+00, 0.2197900E+00, 0.2299700E+00, 0.2354400E+00, &
     & 0.2512300E+00, 0.2636900E+00, 0.2713900E+00, 0.3017900E+00, &
     & 0.2996200E+00, 0.3041100E+00, 0.2718900E+00, 0.2718900E+00 /
      data (ref_adm(12,iz,29,12),iz = 1,20) / &
     & 0.1797700E+00, 0.1797700E+00, 0.1821000E+00, 0.1944700E+00, &
     & 0.1963700E+00, 0.2061700E+00, 0.2255200E+00, 0.2428100E+00, &
     & 0.2196500E+00, 0.2293900E+00, 0.2411900E+00, 0.2429400E+00, &
     & 0.2616600E+00, 0.2657500E+00, 0.2801900E+00, 0.2920100E+00, &
     & 0.3089300E+00, 0.3101300E+00, 0.2684800E+00, 0.2684800E+00 /
      data (ref_adm(12,iz,30,12),iz = 1,20) / &
     & 0.1685900E+00, 0.1685900E+00, 0.1846400E+00, 0.1913000E+00, &
     & 0.1929600E+00, 0.2140400E+00, 0.2200000E+00, 0.2233500E+00, &
     & 0.2199500E+00, 0.2233800E+00, 0.2440100E+00, 0.2530100E+00, &
     & 0.2580300E+00, 0.2652100E+00, 0.2702400E+00, 0.3050600E+00, &
     & 0.3134300E+00, 0.3176500E+00, 0.2634100E+00, 0.2634100E+00 /
      data (ref_adm(12,iz,31,12),iz = 1,20) / &
     & 0.1802000E+00, 0.1802000E+00, 0.1829400E+00, 0.1959800E+00, &
     & 0.2098400E+00, 0.2063900E+00, 0.2151300E+00, 0.2267800E+00, &
     & 0.2331200E+00, 0.2448300E+00, 0.2593300E+00, 0.2714500E+00, &
     & 0.2740800E+00, 0.2814100E+00, 0.3052400E+00, 0.3235800E+00, &
     & 0.3336400E+00, 0.3243200E+00, 0.2734800E+00, 0.2734800E+00 /
      data (ref_adm(12,iz,32,12),iz = 1,20) / &
     & 0.1714700E+00, 0.1714700E+00, 0.1774900E+00, 0.1813000E+00, &
     & 0.1907500E+00, 0.2049100E+00, 0.2138900E+00, 0.2284600E+00, &
     & 0.2345100E+00, 0.2570000E+00, 0.2658700E+00, 0.2695500E+00, &
     & 0.2862300E+00, 0.3063600E+00, 0.3273900E+00, 0.3326200E+00, &
     & 0.3405200E+00, 0.3348700E+00, 0.2885800E+00, 0.2885800E+00 /
      data (ref_adm(12,iz,33,12),iz = 1,20) / &
     & 0.1667400E+00, 0.1667400E+00, 0.1796800E+00, 0.1849100E+00, &
     & 0.1894400E+00, 0.2013100E+00, 0.2120800E+00, 0.2253300E+00, &
     & 0.2291800E+00, 0.2379700E+00, 0.2591000E+00, 0.2883200E+00, &
     & 0.3084600E+00, 0.3316100E+00, 0.3346200E+00, 0.3366300E+00, &
     & 0.3527400E+00, 0.3407600E+00, 0.2933600E+00, 0.2933600E+00 /
      data (ref_adm(12,iz,34,12),iz = 1,20) / &
     & 0.1655600E+00, 0.1655600E+00, 0.1832300E+00, 0.1777000E+00, &
     & 0.1911600E+00, 0.2066400E+00, 0.2139300E+00, 0.2247100E+00, &
     & 0.2443900E+00, 0.2627200E+00, 0.2662800E+00, 0.2902100E+00, &
     & 0.3047000E+00, 0.3273500E+00, 0.3356300E+00, 0.3446900E+00, &
     & 0.3416000E+00, 0.3623900E+00, 0.3145700E+00, 0.3145700E+00 /
      data (ref_adm(12,iz,35,12),iz = 1,20) / &
     & 0.1700200E+00, 0.1700200E+00, 0.1785200E+00, 0.1966900E+00, &
     & 0.2080600E+00, 0.2185600E+00, 0.2187400E+00, 0.2179100E+00, &
     & 0.2510800E+00, 0.2428500E+00, 0.2748100E+00, 0.2985300E+00, &
     & 0.3018700E+00, 0.3290500E+00, 0.3472400E+00, 0.3500300E+00, &
     & 0.3745900E+00, 0.3875100E+00, 0.3142600E+00, 0.3142600E+00 /
      data (ref_adm(12,iz,36,12),iz = 1,20) / &
     & 0.1690400E+00, 0.1690400E+00, 0.1739200E+00, 0.1988000E+00, &
     & 0.2127600E+00, 0.2080900E+00, 0.2045900E+00, 0.2268700E+00, &
     & 0.2252200E+00, 0.2492800E+00, 0.2726200E+00, 0.3021100E+00, &
     & 0.3127500E+00, 0.3362500E+00, 0.3521400E+00, 0.3614800E+00, &
     & 0.3652500E+00, 0.3710200E+00, 0.3426200E+00, 0.3426200E+00 /
      data (ref_adm(12,iz,37,12),iz = 1,20) / &
     & 0.1698300E+00, 0.1698300E+00, 0.1820700E+00, 0.1924100E+00, &
     & 0.1925200E+00, 0.2151400E+00, 0.2211400E+00, 0.2295500E+00, &
     & 0.2393100E+00, 0.2436100E+00, 0.2732700E+00, 0.3067200E+00, &
     & 0.3455000E+00, 0.3526100E+00, 0.3642300E+00, 0.3703800E+00, &
     & 0.3849700E+00, 0.3764700E+00, 0.3699268E+00, 0.3699268E+00 /
      data (ref_adm(12,iz,38,12),iz = 1,20) / &
     & 0.1698300E+00, 0.1698300E+00, 0.1820700E+00, 0.1924100E+00, &
     & 0.1925200E+00, 0.2151400E+00, 0.2211400E+00, 0.2295500E+00, &
     & 0.2393100E+00, 0.2436100E+00, 0.2732700E+00, 0.3067200E+00, &
     & 0.3455000E+00, 0.3526100E+00, 0.3642300E+00, 0.3703800E+00, &
     & 0.3849700E+00, 0.3764700E+00, 0.3699268E+00, 0.3699268E+00 /
! Solar Zenith Angle 60.0 Albedo  0.2183225E+00
      data (ref_adm(12,iz, 1,13),iz = 1,20) / &
     & 0.1731900E+00, 0.1731900E+00, 0.1709500E+00, 0.1710700E+00, &
     & 0.1709200E+00, 0.1492100E+00, 0.1426300E+00, 0.1622900E+00, &
     & 0.1722000E+00, 0.1913700E+00, 0.2030000E+00, 0.2152400E+00, &
     & 0.2912200E+00, 0.4034500E+00, 0.3984900E+00, 0.4321800E+00, &
     & 0.4327400E+00, 0.5110900E+00, 0.5104800E+00, 0.5104800E+00 /
      data (ref_adm(12,iz, 2,13),iz = 1,20) / &
     & 0.1731900E+00, 0.1731900E+00, 0.1709500E+00, 0.1710700E+00, &
     & 0.1709200E+00, 0.1492100E+00, 0.1426300E+00, 0.1622900E+00, &
     & 0.1722000E+00, 0.1913700E+00, 0.2030000E+00, 0.2152400E+00, &
     & 0.2912200E+00, 0.4034500E+00, 0.3984900E+00, 0.4321800E+00, &
     & 0.4327400E+00, 0.5110900E+00, 0.5104800E+00, 0.5104800E+00 /
      data (ref_adm(12,iz, 3,13),iz = 1,20) / &
     & 0.1688700E+00, 0.1688700E+00, 0.1651800E+00, 0.1671100E+00, &
     & 0.1575100E+00, 0.1577000E+00, 0.1554600E+00, 0.1601000E+00, &
     & 0.1701800E+00, 0.1836300E+00, 0.1922900E+00, 0.2159000E+00, &
     & 0.2437800E+00, 0.2736200E+00, 0.3217500E+00, 0.3705000E+00, &
     & 0.4101900E+00, 0.4871600E+00, 0.5290200E+00, 0.5290200E+00 /
      data (ref_adm(12,iz, 4,13),iz = 1,20) / &
     & 0.1608100E+00, 0.1608100E+00, 0.1658900E+00, 0.1660100E+00, &
     & 0.1552000E+00, 0.1548900E+00, 0.1728500E+00, 0.1657100E+00, &
     & 0.1758600E+00, 0.1772900E+00, 0.1892500E+00, 0.2150000E+00, &
     & 0.2165100E+00, 0.2553900E+00, 0.2821700E+00, 0.3243500E+00, &
     & 0.4044800E+00, 0.4589400E+00, 0.4390000E+00, 0.4390000E+00 /
      data (ref_adm(12,iz, 5,13),iz = 1,20) / &
     & 0.1695900E+00, 0.1695900E+00, 0.1671900E+00, 0.1653100E+00, &
     & 0.1615200E+00, 0.1603400E+00, 0.1647100E+00, 0.1753900E+00, &
     & 0.1806500E+00, 0.1824400E+00, 0.1949500E+00, 0.1979400E+00, &
     & 0.2191800E+00, 0.2338700E+00, 0.2645400E+00, 0.3130300E+00, &
     & 0.3990800E+00, 0.4660100E+00, 0.4667800E+00, 0.4667800E+00 /
      data (ref_adm(12,iz, 6,13),iz = 1,20) / &
     & 0.1677600E+00, 0.1677600E+00, 0.1668000E+00, 0.1568200E+00, &
     & 0.1589700E+00, 0.1622400E+00, 0.1603000E+00, 0.1669000E+00, &
     & 0.1749200E+00, 0.1756500E+00, 0.1883600E+00, 0.1926400E+00, &
     & 0.2073900E+00, 0.2250900E+00, 0.2651700E+00, 0.3066100E+00, &
     & 0.3606400E+00, 0.4342600E+00, 0.4400100E+00, 0.4400100E+00 /
      data (ref_adm(12,iz, 7,13),iz = 1,20) / &
     & 0.1641600E+00, 0.1641600E+00, 0.1624500E+00, 0.1598400E+00, &
     & 0.1547900E+00, 0.1577600E+00, 0.1624500E+00, 0.1630700E+00, &
     & 0.1661900E+00, 0.1798400E+00, 0.1866300E+00, 0.1945500E+00, &
     & 0.2078700E+00, 0.2326200E+00, 0.2678200E+00, 0.3178400E+00, &
     & 0.3632500E+00, 0.3966300E+00, 0.4138100E+00, 0.4138100E+00 /
      data (ref_adm(12,iz, 8,13),iz = 1,20) / &
     & 0.1598100E+00, 0.1598100E+00, 0.1548700E+00, 0.1504900E+00, &
     & 0.1549500E+00, 0.1590700E+00, 0.1561200E+00, 0.1639100E+00, &
     & 0.1701000E+00, 0.1775100E+00, 0.1834000E+00, 0.1957400E+00, &
     & 0.2026800E+00, 0.2282900E+00, 0.2536700E+00, 0.2820800E+00, &
     & 0.3316900E+00, 0.3775400E+00, 0.3964500E+00, 0.3964500E+00 /
      data (ref_adm(12,iz, 9,13),iz = 1,20) / &
     & 0.1581500E+00, 0.1581500E+00, 0.1594500E+00, 0.1527100E+00, &
     & 0.1542000E+00, 0.1545300E+00, 0.1584800E+00, 0.1670800E+00, &
     & 0.1596400E+00, 0.1734900E+00, 0.1756800E+00, 0.1880200E+00, &
     & 0.1979800E+00, 0.2336000E+00, 0.2532900E+00, 0.2751800E+00, &
     & 0.3297400E+00, 0.3541500E+00, 0.3522100E+00, 0.3522100E+00 /
      data (ref_adm(12,iz,10,13),iz = 1,20) / &
     & 0.1507700E+00, 0.1507700E+00, 0.1552100E+00, 0.1568300E+00, &
     & 0.1447300E+00, 0.1544800E+00, 0.1538400E+00, 0.1578800E+00, &
     & 0.1619800E+00, 0.1717800E+00, 0.1743300E+00, 0.1853800E+00, &
     & 0.2057500E+00, 0.2150800E+00, 0.2438700E+00, 0.2704200E+00, &
     & 0.3122000E+00, 0.3527200E+00, 0.3550900E+00, 0.3550900E+00 /
      data (ref_adm(12,iz,11,13),iz = 1,20) / &
     & 0.1527600E+00, 0.1527600E+00, 0.1522900E+00, 0.1546500E+00, &
     & 0.1519800E+00, 0.1466900E+00, 0.1543000E+00, 0.1479200E+00, &
     & 0.1712900E+00, 0.1767500E+00, 0.1875000E+00, 0.1830700E+00, &
     & 0.2046800E+00, 0.2169500E+00, 0.2424300E+00, 0.2806100E+00, &
     & 0.2899700E+00, 0.3241800E+00, 0.3269100E+00, 0.3269100E+00 /
      data (ref_adm(12,iz,12,13),iz = 1,20) / &
     & 0.1562300E+00, 0.1562300E+00, 0.1547300E+00, 0.1559500E+00, &
     & 0.1491300E+00, 0.1549100E+00, 0.1577800E+00, 0.1535400E+00, &
     & 0.1653900E+00, 0.1765400E+00, 0.1812500E+00, 0.1728900E+00, &
     & 0.1991000E+00, 0.2143900E+00, 0.2248000E+00, 0.2605900E+00, &
     & 0.2747500E+00, 0.3038400E+00, 0.2933900E+00, 0.2933900E+00 /
      data (ref_adm(12,iz,13,13),iz = 1,20) / &
     & 0.1613900E+00, 0.1613900E+00, 0.1584600E+00, 0.1559600E+00, &
     & 0.1550500E+00, 0.1549900E+00, 0.1578000E+00, 0.1663400E+00, &
     & 0.1649400E+00, 0.1711700E+00, 0.1796300E+00, 0.1878500E+00, &
     & 0.2013700E+00, 0.2038100E+00, 0.2241800E+00, 0.2484300E+00, &
     & 0.2640400E+00, 0.3014300E+00, 0.2892800E+00, 0.2892800E+00 /
      data (ref_adm(12,iz,14,13),iz = 1,20) / &
     & 0.1685200E+00, 0.1685200E+00, 0.1727000E+00, 0.1684600E+00, &
     & 0.1677700E+00, 0.1668400E+00, 0.1694400E+00, 0.1685400E+00, &
     & 0.1777000E+00, 0.1783300E+00, 0.1823900E+00, 0.1871800E+00, &
     & 0.1926700E+00, 0.2031200E+00, 0.2113500E+00, 0.2398400E+00, &
     & 0.2594700E+00, 0.2767300E+00, 0.3302600E+00, 0.3302600E+00 /
      data (ref_adm(12,iz,15,13),iz = 1,20) / &
     & 0.1617300E+00, 0.1617300E+00, 0.1532200E+00, 0.1504700E+00, &
     & 0.1523900E+00, 0.1533000E+00, 0.1538700E+00, 0.1603000E+00, &
     & 0.1639300E+00, 0.1657000E+00, 0.1705300E+00, 0.1837500E+00, &
     & 0.1990900E+00, 0.2103000E+00, 0.2086400E+00, 0.2256400E+00, &
     & 0.2545500E+00, 0.2944100E+00, 0.3403200E+00, 0.3403200E+00 /
      data (ref_adm(12,iz,16,13),iz = 1,20) / &
     & 0.1572200E+00, 0.1572200E+00, 0.1532200E+00, 0.1560000E+00, &
     & 0.1578000E+00, 0.1635800E+00, 0.1573000E+00, 0.1523900E+00, &
     & 0.1624900E+00, 0.1632900E+00, 0.1678000E+00, 0.1741100E+00, &
     & 0.1843400E+00, 0.1980400E+00, 0.2108900E+00, 0.2405300E+00, &
     & 0.2719600E+00, 0.2891800E+00, 0.2721988E+00, 0.2721988E+00 /
      data (ref_adm(12,iz,17,13),iz = 1,20) / &
     & 0.1605400E+00, 0.1605400E+00, 0.1567400E+00, 0.1747300E+00, &
     & 0.1741900E+00, 0.1716600E+00, 0.1667500E+00, 0.1678600E+00, &
     & 0.1687700E+00, 0.1718300E+00, 0.1842300E+00, 0.1820700E+00, &
     & 0.1912500E+00, 0.2094900E+00, 0.2209400E+00, 0.2416800E+00, &
     & 0.2526800E+00, 0.2889000E+00, 0.2658624E+00, 0.2658624E+00 /
      data (ref_adm(12,iz,18,13),iz = 1,20) / &
     & 0.1641700E+00, 0.1641700E+00, 0.1601500E+00, 0.1612400E+00, &
     & 0.1708200E+00, 0.1758000E+00, 0.1713200E+00, 0.1693100E+00, &
     & 0.1726600E+00, 0.1829700E+00, 0.1833600E+00, 0.1890100E+00, &
     & 0.1955800E+00, 0.2140000E+00, 0.2207100E+00, 0.2367200E+00, &
     & 0.2089300E+00, 0.2573894E+00, 0.2336818E+00, 0.2336818E+00 /
      data (ref_adm(12,iz,19,13),iz = 1,20) / &
     & 0.1637600E+00, 0.1637600E+00, 0.1675300E+00, 0.1654600E+00, &
     & 0.1661500E+00, 0.1667400E+00, 0.1678900E+00, 0.1664800E+00, &
     & 0.1742900E+00, 0.1812300E+00, 0.1865800E+00, 0.1918200E+00, &
     & 0.2038100E+00, 0.2161500E+00, 0.2359000E+00, 0.2457800E+00, &
     & 0.2500136E+00, 0.2548332E+00, 0.2320692E+00, 0.2320692E+00 /
      data (ref_adm(12,iz,20,13),iz = 1,20) / &
     & 0.1705400E+00, 0.1705400E+00, 0.1587600E+00, 0.1667500E+00, &
     & 0.1693800E+00, 0.1743800E+00, 0.1650700E+00, 0.1768600E+00, &
     & 0.1822200E+00, 0.1841800E+00, 0.1898800E+00, 0.1957700E+00, &
     & 0.2038900E+00, 0.2143000E+00, 0.2328100E+00, 0.2736300E+00, &
     & 0.2477612E+00, 0.2523026E+00, 0.2306558E+00, 0.2306558E+00 /
      data (ref_adm(12,iz,21,13),iz = 1,20) / &
     & 0.1694800E+00, 0.1694800E+00, 0.1672300E+00, 0.1664700E+00, &
     & 0.1751200E+00, 0.1735200E+00, 0.1641100E+00, 0.1711200E+00, &
     & 0.1856900E+00, 0.1830700E+00, 0.1895300E+00, 0.1982800E+00, &
     & 0.2127700E+00, 0.2289100E+00, 0.2321100E+00, 0.2241500E+00, &
     & 0.2454896E+00, 0.2498090E+00, 0.2292968E+00, 0.2292968E+00 /
      data (ref_adm(12,iz,22,13),iz = 1,20) / &
     & 0.1721100E+00, 0.1721100E+00, 0.1713900E+00, 0.1742100E+00, &
     & 0.1703500E+00, 0.1775700E+00, 0.1865300E+00, 0.1815700E+00, &
     & 0.1857800E+00, 0.1998800E+00, 0.1909400E+00, 0.2088600E+00, &
     & 0.2219300E+00, 0.2329900E+00, 0.2416400E+00, 0.2452900E+00, &
     & 0.2841790E+00, 0.3043574E+00, 0.3105970E+00, 0.3105970E+00 /
      data (ref_adm(12,iz,23,13),iz = 1,20) / &
     & 0.1613400E+00, 0.1613400E+00, 0.1752300E+00, 0.1625000E+00, &
     & 0.1709300E+00, 0.1823500E+00, 0.1807200E+00, 0.1850700E+00, &
     & 0.1926500E+00, 0.1992500E+00, 0.1925000E+00, 0.2091600E+00, &
     & 0.2219700E+00, 0.2326300E+00, 0.2498100E+00, 0.2630000E+00, &
     & 0.2854876E+00, 0.3042670E+00, 0.3109587E+00, 0.3109587E+00 /
      data (ref_adm(12,iz,24,13),iz = 1,20) / &
     & 0.1613000E+00, 0.1613000E+00, 0.1598900E+00, 0.1630000E+00, &
     & 0.1656200E+00, 0.1702800E+00, 0.1761000E+00, 0.1831300E+00, &
     & 0.1888500E+00, 0.1973100E+00, 0.2044200E+00, 0.2109500E+00, &
     & 0.2247300E+00, 0.2419500E+00, 0.2448100E+00, 0.2693500E+00, &
     & 0.2824600E+00, 0.3058086E+00, 0.3126843E+00, 0.3126843E+00 /
      data (ref_adm(12,iz,25,13),iz = 1,20) / &
     & 0.1599600E+00, 0.1599600E+00, 0.1705100E+00, 0.1752400E+00, &
     & 0.1774300E+00, 0.1809700E+00, 0.1829700E+00, 0.1858300E+00, &
     & 0.1902500E+00, 0.1969600E+00, 0.2089700E+00, 0.2193600E+00, &
     & 0.2289600E+00, 0.2475100E+00, 0.2506000E+00, 0.2723800E+00, &
     & 0.2913700E+00, 0.2647700E+00, 0.3157466E+00, 0.3157466E+00 /
      data (ref_adm(12,iz,26,13),iz = 1,20) / &
     & 0.1726400E+00, 0.1726400E+00, 0.1787200E+00, 0.1800800E+00, &
     & 0.1832200E+00, 0.1888100E+00, 0.1896100E+00, 0.1980800E+00, &
     & 0.2065500E+00, 0.2108000E+00, 0.2186800E+00, 0.2293500E+00, &
     & 0.2402400E+00, 0.2580700E+00, 0.2664800E+00, 0.2881100E+00, &
     & 0.3145600E+00, 0.3043100E+00, 0.3201611E+00, 0.3201611E+00 /
      data (ref_adm(12,iz,27,13),iz = 1,20) / &
     & 0.1675600E+00, 0.1675600E+00, 0.1644800E+00, 0.1636700E+00, &
     & 0.1674900E+00, 0.1735800E+00, 0.1931200E+00, 0.2034100E+00, &
     & 0.1962500E+00, 0.2134600E+00, 0.2223100E+00, 0.2330500E+00, &
     & 0.2424900E+00, 0.2681600E+00, 0.2757400E+00, 0.2986200E+00, &
     & 0.3186100E+00, 0.3315800E+00, 0.3228600E+00, 0.3228600E+00 /
      data (ref_adm(12,iz,28,13),iz = 1,20) / &
     & 0.1669400E+00, 0.1669400E+00, 0.1651800E+00, 0.1684200E+00, &
     & 0.1682600E+00, 0.1814700E+00, 0.1868900E+00, 0.1900400E+00, &
     & 0.1951100E+00, 0.2145700E+00, 0.2310200E+00, 0.2378400E+00, &
     & 0.2584900E+00, 0.2721500E+00, 0.2787300E+00, 0.3085500E+00, &
     & 0.3218100E+00, 0.3379200E+00, 0.3087600E+00, 0.3087600E+00 /
      data (ref_adm(12,iz,29,13),iz = 1,20) / &
     & 0.1653100E+00, 0.1653100E+00, 0.1729900E+00, 0.1651100E+00, &
     & 0.1738500E+00, 0.1826300E+00, 0.1843900E+00, 0.2020300E+00, &
     & 0.2002900E+00, 0.2242200E+00, 0.2368800E+00, 0.2432700E+00, &
     & 0.2613400E+00, 0.2839600E+00, 0.2982000E+00, 0.3175000E+00, &
     & 0.3411700E+00, 0.3494700E+00, 0.3153400E+00, 0.3153400E+00 /
      data (ref_adm(12,iz,30,13),iz = 1,20) / &
     & 0.1614400E+00, 0.1614400E+00, 0.1706200E+00, 0.1744300E+00, &
     & 0.1768300E+00, 0.1822200E+00, 0.1897000E+00, 0.2052900E+00, &
     & 0.2072400E+00, 0.2217800E+00, 0.2347600E+00, 0.2518800E+00, &
     & 0.2691900E+00, 0.2931100E+00, 0.3068400E+00, 0.3270000E+00, &
     & 0.3527900E+00, 0.3643700E+00, 0.3148800E+00, 0.3148800E+00 /
      data (ref_adm(12,iz,31,13),iz = 1,20) / &
     & 0.1623900E+00, 0.1623900E+00, 0.1630500E+00, 0.1743900E+00, &
     & 0.1831100E+00, 0.1909800E+00, 0.2014000E+00, 0.2053200E+00, &
     & 0.2264000E+00, 0.2351500E+00, 0.2452800E+00, 0.2696200E+00, &
     & 0.2925700E+00, 0.2992700E+00, 0.3184900E+00, 0.3364000E+00, &
     & 0.3595200E+00, 0.3802600E+00, 0.3323500E+00, 0.3323500E+00 /
      data (ref_adm(12,iz,32,13),iz = 1,20) / &
     & 0.1661100E+00, 0.1661100E+00, 0.1740400E+00, 0.1733800E+00, &
     & 0.1840900E+00, 0.1945200E+00, 0.2030800E+00, 0.2063600E+00, &
     & 0.2156000E+00, 0.2253800E+00, 0.2456100E+00, 0.2672100E+00, &
     & 0.2873600E+00, 0.3128400E+00, 0.3217900E+00, 0.3536100E+00, &
     & 0.3782800E+00, 0.3880700E+00, 0.3384800E+00, 0.3384800E+00 /
      data (ref_adm(12,iz,33,13),iz = 1,20) / &
     & 0.1660400E+00, 0.1660400E+00, 0.1708500E+00, 0.1801700E+00, &
     & 0.1896300E+00, 0.1972400E+00, 0.2095400E+00, 0.2144900E+00, &
     & 0.2267000E+00, 0.2444600E+00, 0.2573000E+00, 0.2780400E+00, &
     & 0.2975700E+00, 0.3252600E+00, 0.3481400E+00, 0.3840900E+00, &
     & 0.4039600E+00, 0.4068300E+00, 0.3463000E+00, 0.3463000E+00 /
      data (ref_adm(12,iz,34,13),iz = 1,20) / &
     & 0.1700500E+00, 0.1700500E+00, 0.1826900E+00, 0.1798300E+00, &
     & 0.1875500E+00, 0.1887800E+00, 0.2079000E+00, 0.2263200E+00, &
     & 0.2402900E+00, 0.2447000E+00, 0.2597100E+00, 0.2836300E+00, &
     & 0.2999700E+00, 0.3355400E+00, 0.3546700E+00, 0.3793400E+00, &
     & 0.4031700E+00, 0.3941600E+00, 0.3444300E+00, 0.3444300E+00 /
      data (ref_adm(12,iz,35,13),iz = 1,20) / &
     & 0.1735900E+00, 0.1735900E+00, 0.1855000E+00, 0.1846900E+00, &
     & 0.2010300E+00, 0.1979300E+00, 0.2125000E+00, 0.2157600E+00, &
     & 0.2377500E+00, 0.2427000E+00, 0.2668500E+00, 0.2923600E+00, &
     & 0.3115500E+00, 0.3438100E+00, 0.3649300E+00, 0.3869800E+00, &
     & 0.3931700E+00, 0.4060300E+00, 0.3508300E+00, 0.3508300E+00 /
      data (ref_adm(12,iz,36,13),iz = 1,20) / &
     & 0.1752200E+00, 0.1752200E+00, 0.1737500E+00, 0.1818200E+00, &
     & 0.1942400E+00, 0.2111300E+00, 0.2065900E+00, 0.2239800E+00, &
     & 0.2376200E+00, 0.2499100E+00, 0.2690100E+00, 0.2884800E+00, &
     & 0.3298700E+00, 0.3637000E+00, 0.3700700E+00, 0.3986900E+00, &
     & 0.4081400E+00, 0.4207700E+00, 0.3648800E+00, 0.3648800E+00 /
      data (ref_adm(12,iz,37,13),iz = 1,20) / &
     & 0.1642700E+00, 0.1642700E+00, 0.1826400E+00, 0.1911100E+00, &
     & 0.1987000E+00, 0.2072200E+00, 0.2256400E+00, 0.2216500E+00, &
     & 0.2348000E+00, 0.2564900E+00, 0.2742700E+00, 0.3011300E+00, &
     & 0.3421600E+00, 0.3741300E+00, 0.3892700E+00, 0.3933800E+00, &
     & 0.4062500E+00, 0.4197300E+00, 0.3440400E+00, 0.3440400E+00 /
      data (ref_adm(12,iz,38,13),iz = 1,20) / &
     & 0.1642700E+00, 0.1642700E+00, 0.1826400E+00, 0.1911100E+00, &
     & 0.1987000E+00, 0.2072200E+00, 0.2256400E+00, 0.2216500E+00, &
     & 0.2348000E+00, 0.2564900E+00, 0.2742700E+00, 0.3011300E+00, &
     & 0.3421600E+00, 0.3741300E+00, 0.3892700E+00, 0.3933800E+00, &
     & 0.4062500E+00, 0.4197300E+00, 0.3440400E+00, 0.3440400E+00 /
! Solar Zenith Angle 65.0 Albedo  0.2273280E+00
      data (ref_adm(12,iz, 1,14),iz = 1,20) / &
     & 0.1640200E+00, 0.1640200E+00, 0.1644200E+00, 0.1515600E+00, &
     & 0.1427700E+00, 0.1434100E+00, 0.1541300E+00, 0.1619600E+00, &
     & 0.1822100E+00, 0.1879100E+00, 0.2078500E+00, 0.2404000E+00, &
     & 0.2972300E+00, 0.4625200E+00, 0.5212100E+00, 0.5102800E+00, &
     & 0.5811200E+00, 0.5397100E+00, 0.6777663E+00, 0.6777663E+00 /
      data (ref_adm(12,iz, 2,14),iz = 1,20) / &
     & 0.1640200E+00, 0.1640200E+00, 0.1644200E+00, 0.1515600E+00, &
     & 0.1427700E+00, 0.1434100E+00, 0.1541300E+00, 0.1619600E+00, &
     & 0.1822100E+00, 0.1879100E+00, 0.2078500E+00, 0.2404000E+00, &
     & 0.2972300E+00, 0.4625200E+00, 0.5212100E+00, 0.5102800E+00, &
     & 0.5811200E+00, 0.5397100E+00, 0.6777663E+00, 0.6777663E+00 /
      data (ref_adm(12,iz, 3,14),iz = 1,20) / &
     & 0.1473300E+00, 0.1473300E+00, 0.1531900E+00, 0.1619200E+00, &
     & 0.1608200E+00, 0.1563500E+00, 0.1583900E+00, 0.1645500E+00, &
     & 0.1746900E+00, 0.1830900E+00, 0.2087800E+00, 0.2286200E+00, &
     & 0.2738900E+00, 0.3045200E+00, 0.3594000E+00, 0.4459700E+00, &
     & 0.5022100E+00, 0.5808900E+00, 0.7449949E-01, 0.7449949E-01 /
      data (ref_adm(12,iz, 4,14),iz = 1,20) / &
     & 0.1570200E+00, 0.1570200E+00, 0.1639900E+00, 0.1567600E+00, &
     & 0.1640600E+00, 0.1651100E+00, 0.1668800E+00, 0.1670000E+00, &
     & 0.1720800E+00, 0.1855600E+00, 0.2090500E+00, 0.2197100E+00, &
     & 0.2464200E+00, 0.2851800E+00, 0.3269100E+00, 0.3713700E+00, &
     & 0.4667100E+00, 0.4844500E+00, 0.6128528E+00, 0.6128528E+00 /
      data (ref_adm(12,iz, 5,14),iz = 1,20) / &
     & 0.1591400E+00, 0.1591400E+00, 0.1607200E+00, 0.1572600E+00, &
     & 0.1572200E+00, 0.1593000E+00, 0.1683500E+00, 0.1694100E+00, &
     & 0.1771900E+00, 0.1927600E+00, 0.1987600E+00, 0.2111400E+00, &
     & 0.2549200E+00, 0.2891200E+00, 0.3049500E+00, 0.3462600E+00, &
     & 0.4595600E+00, 0.5204100E+00, 0.5636406E+00, 0.5636406E+00 /
      data (ref_adm(12,iz, 6,14),iz = 1,20) / &
     & 0.1600400E+00, 0.1600400E+00, 0.1575800E+00, 0.1580000E+00, &
     & 0.1575100E+00, 0.1551400E+00, 0.1621800E+00, 0.1686100E+00, &
     & 0.1762900E+00, 0.1802500E+00, 0.1977000E+00, 0.2203800E+00, &
     & 0.2383800E+00, 0.2751700E+00, 0.3008800E+00, 0.3686200E+00, &
     & 0.4626100E+00, 0.5510700E+00, 0.5018100E+00, 0.5018100E+00 /
      data (ref_adm(12,iz, 7,14),iz = 1,20) / &
     & 0.1663800E+00, 0.1663800E+00, 0.1742300E+00, 0.1701300E+00, &
     & 0.1641300E+00, 0.1586800E+00, 0.1660600E+00, 0.1784700E+00, &
     & 0.1774200E+00, 0.1824000E+00, 0.1960600E+00, 0.2175600E+00, &
     & 0.2424800E+00, 0.2643800E+00, 0.3038200E+00, 0.3461200E+00, &
     & 0.4167900E+00, 0.4545400E+00, 0.4377200E+00, 0.4377200E+00 /
      data (ref_adm(12,iz, 8,14),iz = 1,20) / &
     & 0.1607700E+00, 0.1607700E+00, 0.1537400E+00, 0.1481600E+00, &
     & 0.1545900E+00, 0.1621000E+00, 0.1590400E+00, 0.1636000E+00, &
     & 0.1766600E+00, 0.1838500E+00, 0.1944400E+00, 0.2028400E+00, &
     & 0.2247700E+00, 0.2411100E+00, 0.2832100E+00, 0.3104200E+00, &
     & 0.3930500E+00, 0.4467300E+00, 0.4226500E+00, 0.4226500E+00 /
      data (ref_adm(12,iz, 9,14),iz = 1,20) / &
     & 0.1580800E+00, 0.1580800E+00, 0.1535700E+00, 0.1553100E+00, &
     & 0.1558300E+00, 0.1575400E+00, 0.1583700E+00, 0.1676200E+00, &
     & 0.1704400E+00, 0.1756800E+00, 0.1891100E+00, 0.2017500E+00, &
     & 0.2168900E+00, 0.2406600E+00, 0.2699300E+00, 0.3231700E+00, &
     & 0.3830400E+00, 0.4159200E+00, 0.4216400E+00, 0.4216400E+00 /
      data (ref_adm(12,iz,10,14),iz = 1,20) / &
     & 0.1551700E+00, 0.1551700E+00, 0.1517700E+00, 0.1559100E+00, &
     & 0.1467500E+00, 0.1583100E+00, 0.1633000E+00, 0.1639100E+00, &
     & 0.1702900E+00, 0.1774500E+00, 0.1820700E+00, 0.1946400E+00, &
     & 0.2175800E+00, 0.2365900E+00, 0.2683900E+00, 0.3109500E+00, &
     & 0.3685300E+00, 0.4144100E+00, 0.3671900E+00, 0.3671900E+00 /
      data (ref_adm(12,iz,11,14),iz = 1,20) / &
     & 0.1577100E+00, 0.1577100E+00, 0.1502700E+00, 0.1513900E+00, &
     & 0.1560200E+00, 0.1600600E+00, 0.1659700E+00, 0.1579200E+00, &
     & 0.1656700E+00, 0.1789000E+00, 0.1828000E+00, 0.2010600E+00, &
     & 0.2233300E+00, 0.2402700E+00, 0.2633900E+00, 0.3045400E+00, &
     & 0.3583200E+00, 0.3839600E+00, 0.3503100E+00, 0.3503100E+00 /
      data (ref_adm(12,iz,12,14),iz = 1,20) / &
     & 0.1616400E+00, 0.1616400E+00, 0.1553300E+00, 0.1467100E+00, &
     & 0.1501300E+00, 0.1537700E+00, 0.1537700E+00, 0.1555600E+00, &
     & 0.1618100E+00, 0.1776700E+00, 0.1801100E+00, 0.1987700E+00, &
     & 0.2137100E+00, 0.2379400E+00, 0.2571000E+00, 0.2871400E+00, &
     & 0.3381900E+00, 0.3778200E+00, 0.3468300E+00, 0.3468300E+00 /
      data (ref_adm(12,iz,13,14),iz = 1,20) / &
     & 0.1651600E+00, 0.1651600E+00, 0.1579900E+00, 0.1637200E+00, &
     & 0.1578200E+00, 0.1528600E+00, 0.1534200E+00, 0.1592100E+00, &
     & 0.1679300E+00, 0.1825400E+00, 0.1882700E+00, 0.1944500E+00, &
     & 0.2023800E+00, 0.2215300E+00, 0.2532500E+00, 0.2837100E+00, &
     & 0.3185900E+00, 0.3455200E+00, 0.3080500E+00, 0.3080500E+00 /
      data (ref_adm(12,iz,14,14),iz = 1,20) / &
     & 0.1656600E+00, 0.1656600E+00, 0.1714000E+00, 0.1685900E+00, &
     & 0.1627300E+00, 0.1655100E+00, 0.1628800E+00, 0.1657900E+00, &
     & 0.1695800E+00, 0.1787300E+00, 0.1856100E+00, 0.1887400E+00, &
     & 0.1958600E+00, 0.2345900E+00, 0.2536800E+00, 0.2671700E+00, &
     & 0.3150600E+00, 0.3303900E+00, 0.2962800E+00, 0.2962800E+00 /
      data (ref_adm(12,iz,15,14),iz = 1,20) / &
     & 0.1660200E+00, 0.1660200E+00, 0.1553000E+00, 0.1538400E+00, &
     & 0.1514900E+00, 0.1536300E+00, 0.1578500E+00, 0.1607000E+00, &
     & 0.1676900E+00, 0.1715200E+00, 0.1799600E+00, 0.1900600E+00, &
     & 0.1990500E+00, 0.2171100E+00, 0.2339000E+00, 0.2458000E+00, &
     & 0.2992300E+00, 0.3339800E+00, 0.3524359E+00, 0.3524359E+00 /
      data (ref_adm(12,iz,16,14),iz = 1,20) / &
     & 0.1508800E+00, 0.1508800E+00, 0.1405400E+00, 0.1445200E+00, &
     & 0.1420700E+00, 0.1411700E+00, 0.1452100E+00, 0.1475200E+00, &
     & 0.1520700E+00, 0.1606600E+00, 0.1684300E+00, 0.1755500E+00, &
     & 0.1882100E+00, 0.2070600E+00, 0.2385400E+00, 0.2611700E+00, &
     & 0.2975700E+00, 0.2933100E+00, 0.3423467E+00, 0.3423467E+00 /
      data (ref_adm(12,iz,17,14),iz = 1,20) / &
     & 0.1545000E+00, 0.1545000E+00, 0.1516400E+00, 0.1502900E+00, &
     & 0.1694400E+00, 0.1615200E+00, 0.1641600E+00, 0.1540700E+00, &
     & 0.1695600E+00, 0.1749900E+00, 0.1763200E+00, 0.1931300E+00, &
     & 0.2045300E+00, 0.2210300E+00, 0.2388500E+00, 0.2473000E+00, &
     & 0.2460600E+00, 0.3132645E+00, 0.3324025E+00, 0.3324025E+00 /
      data (ref_adm(12,iz,18,14),iz = 1,20) / &
     & 0.1616100E+00, 0.1616100E+00, 0.1624100E+00, 0.1645600E+00, &
     & 0.1525600E+00, 0.1604200E+00, 0.1648900E+00, 0.1609400E+00, &
     & 0.1693400E+00, 0.1763600E+00, 0.1861400E+00, 0.1910900E+00, &
     & 0.2013900E+00, 0.2198800E+00, 0.2429300E+00, 0.2620500E+00, &
     & 0.2964900E+00, 0.3372088E+00, 0.3649886E+00, 0.3649886E+00 /
      data (ref_adm(12,iz,19,14),iz = 1,20) / &
     & 0.1604400E+00, 0.1604400E+00, 0.1568200E+00, 0.1595800E+00, &
     & 0.1514700E+00, 0.1584700E+00, 0.1723600E+00, 0.1714000E+00, &
     & 0.1757700E+00, 0.1756700E+00, 0.1865500E+00, 0.2016900E+00, &
     & 0.2086200E+00, 0.2195500E+00, 0.2433900E+00, 0.2675900E+00, &
     & 0.2965058E+00, 0.3328169E+00, 0.3574793E+00, 0.3574793E+00 /
      data (ref_adm(12,iz,20,14),iz = 1,20) / &
     & 0.1648800E+00, 0.1648800E+00, 0.1550900E+00, 0.1589100E+00, &
     & 0.1637800E+00, 0.1594300E+00, 0.1722000E+00, 0.1726700E+00, &
     & 0.1771200E+00, 0.1744200E+00, 0.1814100E+00, 0.1985800E+00, &
     & 0.2120800E+00, 0.2231900E+00, 0.2402400E+00, 0.2085000E+00, &
     & 0.2952873E+00, 0.3302334E+00, 0.3531296E+00, 0.3531296E+00 /
      data (ref_adm(12,iz,21,14),iz = 1,20) / &
     & 0.1626000E+00, 0.1626000E+00, 0.1578200E+00, 0.1563300E+00, &
     & 0.1655700E+00, 0.1617400E+00, 0.1724600E+00, 0.1783000E+00, &
     & 0.1745400E+00, 0.1785000E+00, 0.1898400E+00, 0.2008600E+00, &
     & 0.2138700E+00, 0.2248800E+00, 0.2395200E+00, 0.2780800E+00, &
     & 0.2951224E+00, 0.3283861E+00, 0.3504485E+00, 0.3504485E+00 /
      data (ref_adm(12,iz,22,14),iz = 1,20) / &
     & 0.1587000E+00, 0.1587000E+00, 0.1648300E+00, 0.1660200E+00, &
     & 0.1691900E+00, 0.1733200E+00, 0.1732700E+00, 0.1761800E+00, &
     & 0.1785200E+00, 0.1830600E+00, 0.1918200E+00, 0.2068500E+00, &
     & 0.2206700E+00, 0.2333900E+00, 0.2467200E+00, 0.2544200E+00, &
     & 0.3030359E+00, 0.3289433E+00, 0.3413331E+00, 0.3413331E+00 /
      data (ref_adm(12,iz,23,14),iz = 1,20) / &
     & 0.1653800E+00, 0.1653800E+00, 0.1709700E+00, 0.1638800E+00, &
     & 0.1692500E+00, 0.1806800E+00, 0.1931600E+00, 0.1829000E+00, &
     & 0.1752300E+00, 0.1817200E+00, 0.1953800E+00, 0.2088400E+00, &
     & 0.2245300E+00, 0.2360700E+00, 0.2480500E+00, 0.2697100E+00, &
     & 0.3041397E+00, 0.3288316E+00, 0.3417242E+00, 0.3417242E+00 /
      data (ref_adm(12,iz,24,14),iz = 1,20) / &
     & 0.1519200E+00, 0.1519200E+00, 0.1531900E+00, 0.1568500E+00, &
     & 0.1622000E+00, 0.1659000E+00, 0.1743000E+00, 0.1791300E+00, &
     & 0.1824800E+00, 0.1865200E+00, 0.1948200E+00, 0.2080500E+00, &
     & 0.2213200E+00, 0.2393000E+00, 0.2546600E+00, 0.2744400E+00, &
     & 0.3028300E+00, 0.3306766E+00, 0.3441161E+00, 0.3441161E+00 /
      data (ref_adm(12,iz,25,14),iz = 1,20) / &
     & 0.1563300E+00, 0.1563300E+00, 0.1711800E+00, 0.1747200E+00, &
     & 0.1777100E+00, 0.1860000E+00, 0.1921200E+00, 0.1948900E+00, &
     & 0.2001100E+00, 0.2040600E+00, 0.2158100E+00, 0.2243100E+00, &
     & 0.2360600E+00, 0.2537400E+00, 0.2660200E+00, 0.2855100E+00, &
     & 0.3038400E+00, 0.3334318E+00, 0.3480220E+00, 0.3480220E+00 /
      data (ref_adm(12,iz,26,14),iz = 1,20) / &
     & 0.1652500E+00, 0.1652500E+00, 0.1739000E+00, 0.1657600E+00, &
     & 0.1804900E+00, 0.1847500E+00, 0.1912400E+00, 0.1984600E+00, &
     & 0.2078500E+00, 0.2181500E+00, 0.2272200E+00, 0.2394600E+00, &
     & 0.2585500E+00, 0.2754200E+00, 0.2798800E+00, 0.2979500E+00, &
     & 0.3221500E+00, 0.3350300E+00, 0.3543709E+00, 0.3543709E+00 /
      data (ref_adm(12,iz,27,14),iz = 1,20) / &
     & 0.1631200E+00, 0.1631200E+00, 0.1628300E+00, 0.1591800E+00, &
     & 0.1699600E+00, 0.1693500E+00, 0.1834600E+00, 0.1875100E+00, &
     & 0.1955700E+00, 0.2126200E+00, 0.2178900E+00, 0.2347200E+00, &
     & 0.2484200E+00, 0.2761900E+00, 0.2869100E+00, 0.3019800E+00, &
     & 0.3416600E+00, 0.3647000E+00, 0.3342600E+00, 0.3342600E+00 /
      data (ref_adm(12,iz,28,14),iz = 1,20) / &
     & 0.1595400E+00, 0.1595400E+00, 0.1746700E+00, 0.1680900E+00, &
     & 0.1728200E+00, 0.1737500E+00, 0.1818900E+00, 0.1932100E+00, &
     & 0.2102500E+00, 0.2164200E+00, 0.2243900E+00, 0.2429100E+00, &
     & 0.2576100E+00, 0.2834400E+00, 0.3036600E+00, 0.3175600E+00, &
     & 0.3477300E+00, 0.3713200E+00, 0.3408600E+00, 0.3408600E+00 /
      data (ref_adm(12,iz,29,14),iz = 1,20) / &
     & 0.1727300E+00, 0.1727300E+00, 0.1698500E+00, 0.1652300E+00, &
     & 0.1760900E+00, 0.1798700E+00, 0.1954100E+00, 0.1954800E+00, &
     & 0.2127400E+00, 0.2304200E+00, 0.2368300E+00, 0.2528900E+00, &
     & 0.2689600E+00, 0.3000000E+00, 0.3098600E+00, 0.3313400E+00, &
     & 0.3497500E+00, 0.3747200E+00, 0.3423700E+00, 0.3423700E+00 /
      data (ref_adm(12,iz,30,14),iz = 1,20) / &
     & 0.1600400E+00, 0.1600400E+00, 0.1659500E+00, 0.1756800E+00, &
     & 0.1737500E+00, 0.1819000E+00, 0.1914200E+00, 0.2035000E+00, &
     & 0.2162100E+00, 0.2334600E+00, 0.2430900E+00, 0.2628500E+00, &
     & 0.2899900E+00, 0.3091700E+00, 0.3216500E+00, 0.3510700E+00, &
     & 0.3901600E+00, 0.3905000E+00, 0.3429900E+00, 0.3429900E+00 /
      data (ref_adm(12,iz,31,14),iz = 1,20) / &
     & 0.1581300E+00, 0.1581300E+00, 0.1664700E+00, 0.1685000E+00, &
     & 0.1693200E+00, 0.1816300E+00, 0.1935800E+00, 0.2099000E+00, &
     & 0.2187500E+00, 0.2280400E+00, 0.2511700E+00, 0.2635800E+00, &
     & 0.2988600E+00, 0.3274500E+00, 0.3419200E+00, 0.3648100E+00, &
     & 0.3898700E+00, 0.4073600E+00, 0.3465500E+00, 0.3465500E+00 /
      data (ref_adm(12,iz,32,14),iz = 1,20) / &
     & 0.1676300E+00, 0.1676300E+00, 0.1760000E+00, 0.1765600E+00, &
     & 0.1784700E+00, 0.1920000E+00, 0.2018600E+00, 0.2240800E+00, &
     & 0.2291700E+00, 0.2421200E+00, 0.2605200E+00, 0.2791500E+00, &
     & 0.3105300E+00, 0.3398800E+00, 0.3678400E+00, 0.3944500E+00, &
     & 0.4123100E+00, 0.4249300E+00, 0.3849400E+00, 0.3849400E+00 /
      data (ref_adm(12,iz,33,14),iz = 1,20) / &
     & 0.1655600E+00, 0.1655600E+00, 0.1747200E+00, 0.1760700E+00, &
     & 0.1832800E+00, 0.1910800E+00, 0.2056200E+00, 0.2159800E+00, &
     & 0.2325800E+00, 0.2411400E+00, 0.2631500E+00, 0.2793700E+00, &
     & 0.3074000E+00, 0.3325100E+00, 0.3666900E+00, 0.4003900E+00, &
     & 0.4331300E+00, 0.4427000E+00, 0.3903200E+00, 0.3903200E+00 /
      data (ref_adm(12,iz,34,14),iz = 1,20) / &
     & 0.1601100E+00, 0.1601100E+00, 0.1713200E+00, 0.1960200E+00, &
     & 0.1933200E+00, 0.1982100E+00, 0.2015900E+00, 0.2113600E+00, &
     & 0.2355900E+00, 0.2517100E+00, 0.2657600E+00, 0.2918500E+00, &
     & 0.3055400E+00, 0.3452200E+00, 0.3775700E+00, 0.4107600E+00, &
     & 0.4433000E+00, 0.4439500E+00, 0.3855100E+00, 0.3855100E+00 /
      data (ref_adm(12,iz,35,14),iz = 1,20) / &
     & 0.1652500E+00, 0.1652500E+00, 0.1716400E+00, 0.1753800E+00, &
     & 0.1889800E+00, 0.1971600E+00, 0.2111900E+00, 0.2141300E+00, &
     & 0.2260800E+00, 0.2466800E+00, 0.2713300E+00, 0.2987000E+00, &
     & 0.3137900E+00, 0.3609600E+00, 0.3953100E+00, 0.4292700E+00, &
     & 0.4548600E+00, 0.4680000E+00, 0.4032400E+00, 0.4032400E+00 /
      data (ref_adm(12,iz,36,14),iz = 1,20) / &
     & 0.1622300E+00, 0.1622300E+00, 0.1714100E+00, 0.1820500E+00, &
     & 0.1820900E+00, 0.2046300E+00, 0.2134300E+00, 0.2135900E+00, &
     & 0.2312900E+00, 0.2579500E+00, 0.2821900E+00, 0.3015900E+00, &
     & 0.3407600E+00, 0.3707300E+00, 0.4089900E+00, 0.4403800E+00, &
     & 0.4698600E+00, 0.4845400E+00, 0.4149200E+00, 0.4149200E+00 /
      data (ref_adm(12,iz,37,14),iz = 1,20) / &
     & 0.1590500E+00, 0.1590500E+00, 0.1715600E+00, 0.1756400E+00, &
     & 0.1827600E+00, 0.1916900E+00, 0.2067500E+00, 0.2263200E+00, &
     & 0.2392100E+00, 0.2591400E+00, 0.2791000E+00, 0.3122700E+00, &
     & 0.3429000E+00, 0.3944700E+00, 0.4345300E+00, 0.4569500E+00, &
     & 0.4771300E+00, 0.4957500E+00, 0.4236200E+00, 0.4236200E+00 /
      data (ref_adm(12,iz,38,14),iz = 1,20) / &
     & 0.1590500E+00, 0.1590500E+00, 0.1715600E+00, 0.1756400E+00, &
     & 0.1827600E+00, 0.1916900E+00, 0.2067500E+00, 0.2263200E+00, &
     & 0.2392100E+00, 0.2591400E+00, 0.2791000E+00, 0.3122700E+00, &
     & 0.3429000E+00, 0.3944700E+00, 0.4345300E+00, 0.4569500E+00, &
     & 0.4771300E+00, 0.4957500E+00, 0.4236200E+00, 0.4236200E+00 /
! Solar Zenith Angle 70.0 Albedo  0.2347896E+00
      data (ref_adm(12,iz, 1,15),iz = 1,20) / &
     & 0.1618800E+00, 0.1618800E+00, 0.1522500E+00, 0.1567600E+00, &
     & 0.1466700E+00, 0.1502900E+00, 0.1660600E+00, 0.1733900E+00, &
     & 0.1782700E+00, 0.1905100E+00, 0.2317300E+00, 0.2588500E+00, &
     & 0.3399200E+00, 0.5127800E+00, 0.7447400E+00, 0.6690300E+00, &
     & 0.6119096E+00, 0.1199369E+01, 0.2250612E+01, 0.2250612E+01 /
      data (ref_adm(12,iz, 2,15),iz = 1,20) / &
     & 0.1618800E+00, 0.1618800E+00, 0.1522500E+00, 0.1567600E+00, &
     & 0.1466700E+00, 0.1502900E+00, 0.1660600E+00, 0.1733900E+00, &
     & 0.1782700E+00, 0.1905100E+00, 0.2317300E+00, 0.2588500E+00, &
     & 0.3399200E+00, 0.5127800E+00, 0.7447400E+00, 0.6690300E+00, &
     & 0.6119096E+00, 0.1199369E+01, 0.2250612E+01, 0.2250612E+01 /
      data (ref_adm(12,iz, 3,15),iz = 1,20) / &
     & 0.1638600E+00, 0.1638600E+00, 0.1583400E+00, 0.1531700E+00, &
     & 0.1532600E+00, 0.1575700E+00, 0.1697400E+00, 0.1602000E+00, &
     & 0.1787500E+00, 0.1921200E+00, 0.2033500E+00, 0.2516500E+00, &
     & 0.2883400E+00, 0.3804900E+00, 0.4225300E+00, 0.4831600E+00, &
     & 0.5946901E+00, 0.1106882E+01, 0.3688245E-07, 0.3688245E-07 /
      data (ref_adm(12,iz, 4,15),iz = 1,20) / &
     & 0.1650800E+00, 0.1650800E+00, 0.1569200E+00, 0.1502200E+00, &
     & 0.1551900E+00, 0.1689500E+00, 0.1543100E+00, 0.1725900E+00, &
     & 0.1761700E+00, 0.1919700E+00, 0.2135900E+00, 0.2408200E+00, &
     & 0.2598400E+00, 0.3465300E+00, 0.3684200E+00, 0.4413100E+00, &
     & 0.5913700E+00, 0.9580996E+00, 0.1999980E+01, 0.1999980E+01 /
      data (ref_adm(12,iz, 5,15),iz = 1,20) / &
     & 0.1514400E+00, 0.1514400E+00, 0.1505900E+00, 0.1529400E+00, &
     & 0.1531000E+00, 0.1618200E+00, 0.1693500E+00, 0.1723100E+00, &
     & 0.1854300E+00, 0.1958400E+00, 0.2229000E+00, 0.2433500E+00, &
     & 0.2502500E+00, 0.3293100E+00, 0.3487100E+00, 0.3717900E+00, &
     & 0.3679200E+00, 0.8126844E+00, 0.1435686E+01, 0.1435686E+01 /
      data (ref_adm(12,iz, 6,15),iz = 1,20) / &
     & 0.1576100E+00, 0.1576100E+00, 0.1622000E+00, 0.1598500E+00, &
     & 0.1623800E+00, 0.1639800E+00, 0.1689600E+00, 0.1780100E+00, &
     & 0.1828500E+00, 0.1943600E+00, 0.2081600E+00, 0.2265100E+00, &
     & 0.2482400E+00, 0.2814000E+00, 0.3223400E+00, 0.3902300E+00, &
     & 0.5042200E+00, 0.6082800E+00, 0.1083075E+01, 0.1083075E+01 /
      data (ref_adm(12,iz, 7,15),iz = 1,20) / &
     & 0.1577300E+00, 0.1577300E+00, 0.1535000E+00, 0.1510500E+00, &
     & 0.1541600E+00, 0.1601800E+00, 0.1675100E+00, 0.1670800E+00, &
     & 0.1747800E+00, 0.1909600E+00, 0.2018500E+00, 0.2215100E+00, &
     & 0.2404600E+00, 0.2707500E+00, 0.3014000E+00, 0.3602500E+00, &
     & 0.4157400E+00, 0.5238400E+00, 0.5649900E+00, 0.5649900E+00 /
      data (ref_adm(12,iz, 8,15),iz = 1,20) / &
     & 0.1575800E+00, 0.1575800E+00, 0.1472500E+00, 0.1435600E+00, &
     & 0.1425700E+00, 0.1441600E+00, 0.1512300E+00, 0.1577700E+00, &
     & 0.1644000E+00, 0.1717600E+00, 0.1992000E+00, 0.2094200E+00, &
     & 0.2246800E+00, 0.2739000E+00, 0.2923500E+00, 0.3462300E+00, &
     & 0.4450000E+00, 0.5453500E+00, 0.7472445E+00, 0.7472445E+00 /
      data (ref_adm(12,iz, 9,15),iz = 1,20) / &
     & 0.1581500E+00, 0.1581500E+00, 0.1470400E+00, 0.1481200E+00, &
     & 0.1475300E+00, 0.1489500E+00, 0.1451800E+00, 0.1599000E+00, &
     & 0.1685900E+00, 0.1912000E+00, 0.1984100E+00, 0.2137900E+00, &
     & 0.2384000E+00, 0.2487000E+00, 0.2821400E+00, 0.3485000E+00, &
     & 0.4229900E+00, 0.4606400E+00, 0.6855931E+00, 0.6855931E+00 /
      data (ref_adm(12,iz,10,15),iz = 1,20) / &
     & 0.1591400E+00, 0.1591400E+00, 0.1559200E+00, 0.1488800E+00, &
     & 0.1469600E+00, 0.1465600E+00, 0.1448500E+00, 0.1543600E+00, &
     & 0.1629800E+00, 0.1847100E+00, 0.1879300E+00, 0.1961500E+00, &
     & 0.2160900E+00, 0.2538300E+00, 0.2748500E+00, 0.3311800E+00, &
     & 0.3828400E+00, 0.4505600E+00, 0.3569700E+00, 0.3569700E+00 /
      data (ref_adm(12,iz,11,15),iz = 1,20) / &
     & 0.1605700E+00, 0.1605700E+00, 0.1469300E+00, 0.1471900E+00, &
     & 0.1464700E+00, 0.1551000E+00, 0.1595600E+00, 0.1598400E+00, &
     & 0.1753300E+00, 0.1779400E+00, 0.1854800E+00, 0.1992300E+00, &
     & 0.2185800E+00, 0.2275200E+00, 0.2676000E+00, 0.3169500E+00, &
     & 0.3732000E+00, 0.4163600E+00, 0.3770900E+00, 0.3770900E+00 /
      data (ref_adm(12,iz,12,15),iz = 1,20) / &
     & 0.1550300E+00, 0.1550300E+00, 0.1536300E+00, 0.1507400E+00, &
     & 0.1670700E+00, 0.1645600E+00, 0.1640800E+00, 0.1543800E+00, &
     & 0.1763300E+00, 0.1748500E+00, 0.1856300E+00, 0.1912300E+00, &
     & 0.2136900E+00, 0.2245200E+00, 0.2522500E+00, 0.2897400E+00, &
     & 0.3386400E+00, 0.3773800E+00, 0.3480700E+00, 0.3480700E+00 /
      data (ref_adm(12,iz,13,15),iz = 1,20) / &
     & 0.1529700E+00, 0.1529700E+00, 0.1443700E+00, 0.1410500E+00, &
     & 0.1558300E+00, 0.1593500E+00, 0.1621600E+00, 0.1773700E+00, &
     & 0.1767100E+00, 0.1785200E+00, 0.1821400E+00, 0.1885000E+00, &
     & 0.2097900E+00, 0.2292300E+00, 0.2529500E+00, 0.2783500E+00, &
     & 0.3327700E+00, 0.3840700E+00, 0.5368019E+00, 0.5368019E+00 /
      data (ref_adm(12,iz,14,15),iz = 1,20) / &
     & 0.1528000E+00, 0.1528000E+00, 0.1584700E+00, 0.1564800E+00, &
     & 0.1580400E+00, 0.1572000E+00, 0.1650000E+00, 0.1764800E+00, &
     & 0.1747700E+00, 0.1730400E+00, 0.1796400E+00, 0.1822600E+00, &
     & 0.2145300E+00, 0.2239500E+00, 0.2436100E+00, 0.2806300E+00, &
     & 0.3253500E+00, 0.3750800E+00, 0.5176886E+00, 0.5176886E+00 /
      data (ref_adm(12,iz,15,15),iz = 1,20) / &
     & 0.1635000E+00, 0.1635000E+00, 0.1578300E+00, 0.1550700E+00, &
     & 0.1541000E+00, 0.1571900E+00, 0.1616600E+00, 0.1629600E+00, &
     & 0.1677800E+00, 0.1772500E+00, 0.1889900E+00, 0.1967300E+00, &
     & 0.2100200E+00, 0.2307200E+00, 0.2500800E+00, 0.2716000E+00, &
     & 0.3149900E+00, 0.3637000E+00, 0.5020152E+00, 0.5020152E+00 /
      data (ref_adm(12,iz,16,15),iz = 1,20) / &
     & 0.1531400E+00, 0.1531400E+00, 0.1438200E+00, 0.1429600E+00, &
     & 0.1442000E+00, 0.1478300E+00, 0.1491000E+00, 0.1527200E+00, &
     & 0.1601500E+00, 0.1647300E+00, 0.1717800E+00, 0.1823200E+00, &
     & 0.1950000E+00, 0.2128200E+00, 0.2389000E+00, 0.2593900E+00, &
     & 0.2877400E+00, 0.4196080E+00, 0.4865459E+00, 0.4865459E+00 /
      data (ref_adm(12,iz,17,15),iz = 1,20) / &
     & 0.1581500E+00, 0.1581500E+00, 0.1645400E+00, 0.1517500E+00, &
     & 0.1497000E+00, 0.1471800E+00, 0.1547900E+00, 0.1672800E+00, &
     & 0.1654200E+00, 0.1761100E+00, 0.1847800E+00, 0.1960500E+00, &
     & 0.2170800E+00, 0.2235600E+00, 0.2422500E+00, 0.2586900E+00, &
     & 0.2940700E+00, 0.4084447E+00, 0.4695617E+00, 0.4695617E+00 /
      data (ref_adm(12,iz,18,15),iz = 1,20) / &
     & 0.1543200E+00, 0.1543200E+00, 0.1544600E+00, 0.1482200E+00, &
     & 0.1509400E+00, 0.1523100E+00, 0.1544000E+00, 0.1575900E+00, &
     & 0.1659900E+00, 0.1732600E+00, 0.1838300E+00, 0.1910900E+00, &
     & 0.2020400E+00, 0.2282200E+00, 0.2348700E+00, 0.2746600E+00, &
     & 0.3074285E+00, 0.3492004E+00, 0.3801075E+00, 0.3801075E+00 /
      data (ref_adm(12,iz,19,15),iz = 1,20) / &
     & 0.1563400E+00, 0.1563400E+00, 0.1569500E+00, 0.1611400E+00, &
     & 0.1562700E+00, 0.1542100E+00, 0.1582100E+00, 0.1588000E+00, &
     & 0.1671300E+00, 0.1697900E+00, 0.1863600E+00, 0.1891200E+00, &
     & 0.2184200E+00, 0.2364400E+00, 0.2536900E+00, 0.2763500E+00, &
     & 0.3049095E+00, 0.3441838E+00, 0.3719209E+00, 0.3719209E+00 /
      data (ref_adm(12,iz,20,15),iz = 1,20) / &
     & 0.1541300E+00, 0.1541300E+00, 0.1566400E+00, 0.1618200E+00, &
     & 0.1639600E+00, 0.1563300E+00, 0.1572100E+00, 0.1571400E+00, &
     & 0.1683800E+00, 0.1736800E+00, 0.1885900E+00, 0.1875800E+00, &
     & 0.2216500E+00, 0.2302200E+00, 0.2525700E+00, 0.2793600E+00, &
     & 0.3034261E+00, 0.3412850E+00, 0.3671846E+00, 0.3671846E+00 /
      data (ref_adm(12,iz,21,15),iz = 1,20) / &
     & 0.1580800E+00, 0.1580800E+00, 0.1659000E+00, 0.1581500E+00, &
     & 0.1571100E+00, 0.1622900E+00, 0.1695500E+00, 0.1721600E+00, &
     & 0.1651000E+00, 0.1796600E+00, 0.1893700E+00, 0.1943700E+00, &
     & 0.2227600E+00, 0.2333000E+00, 0.2496600E+00, 0.2751733E+00, &
     & 0.3030974E+00, 0.3392405E+00, 0.3642452E+00, 0.3642452E+00 /
      data (ref_adm(12,iz,22,15),iz = 1,20) / &
     & 0.1664900E+00, 0.1664900E+00, 0.1569800E+00, 0.1597700E+00, &
     & 0.1636200E+00, 0.1664700E+00, 0.1607000E+00, 0.1711000E+00, &
     & 0.1810000E+00, 0.1780800E+00, 0.1881200E+00, 0.2089800E+00, &
     & 0.2293300E+00, 0.2349300E+00, 0.2539000E+00, 0.2934900E+00, &
     & 0.3237659E+00, 0.3590063E+00, 0.3827731E+00, 0.3827731E+00 /
      data (ref_adm(12,iz,23,15),iz = 1,20) / &
     & 0.1651100E+00, 0.1651100E+00, 0.1550000E+00, 0.1618800E+00, &
     & 0.1660800E+00, 0.1634500E+00, 0.1661900E+00, 0.1686400E+00, &
     & 0.1762200E+00, 0.1867400E+00, 0.1987400E+00, 0.2095100E+00, &
     & 0.2314300E+00, 0.2400500E+00, 0.2707400E+00, 0.2732000E+00, &
     & 0.3247102E+00, 0.3587746E+00, 0.3833786E+00, 0.3833786E+00 /
      data (ref_adm(12,iz,24,15),iz = 1,20) / &
     & 0.1554400E+00, 0.1554400E+00, 0.1537700E+00, 0.1563500E+00, &
     & 0.1590400E+00, 0.1654200E+00, 0.1686500E+00, 0.1745600E+00, &
     & 0.1814500E+00, 0.1893600E+00, 0.2000200E+00, 0.2133000E+00, &
     & 0.2251100E+00, 0.2421100E+00, 0.2727900E+00, 0.2879100E+00, &
     & 0.3311800E+00, 0.3608331E+00, 0.3867375E+00, 0.3867375E+00 /
      data (ref_adm(12,iz,25,15),iz = 1,20) / &
     & 0.1569700E+00, 0.1569700E+00, 0.1653400E+00, 0.1668500E+00, &
     & 0.1702900E+00, 0.1748800E+00, 0.1857300E+00, 0.1923900E+00, &
     & 0.2007500E+00, 0.2100300E+00, 0.2201600E+00, 0.2334600E+00, &
     & 0.2473000E+00, 0.2664000E+00, 0.2779000E+00, 0.2939800E+00, &
     & 0.3295100E+00, 0.3642911E+00, 0.3917606E+00, 0.3917606E+00 /
      data (ref_adm(12,iz,26,15),iz = 1,20) / &
     & 0.1589300E+00, 0.1589300E+00, 0.1599800E+00, 0.1559100E+00, &
     & 0.1652600E+00, 0.1798700E+00, 0.1743400E+00, 0.1810600E+00, &
     & 0.1917000E+00, 0.2014100E+00, 0.2194300E+00, 0.2279000E+00, &
     & 0.2530000E+00, 0.2782900E+00, 0.2938500E+00, 0.3136600E+00, &
     & 0.3306500E+00, 0.3787700E+00, 0.4004115E+00, 0.4004115E+00 /
      data (ref_adm(12,iz,27,15),iz = 1,20) / &
     & 0.1584300E+00, 0.1584300E+00, 0.1516300E+00, 0.1530400E+00, &
     & 0.1576700E+00, 0.1600200E+00, 0.1795400E+00, 0.1834100E+00, &
     & 0.1943600E+00, 0.2056300E+00, 0.2262500E+00, 0.2214800E+00, &
     & 0.2551100E+00, 0.2862600E+00, 0.3013200E+00, 0.3237800E+00, &
     & 0.3524400E+00, 0.4015600E+00, 0.3715600E+00, 0.3715600E+00 /
      data (ref_adm(12,iz,28,15),iz = 1,20) / &
     & 0.1592700E+00, 0.1592700E+00, 0.1606700E+00, 0.1617000E+00, &
     & 0.1734400E+00, 0.1915900E+00, 0.1827600E+00, 0.1888800E+00, &
     & 0.1962300E+00, 0.2156100E+00, 0.2353600E+00, 0.2315900E+00, &
     & 0.2672700E+00, 0.2812500E+00, 0.3081400E+00, 0.3442900E+00, &
     & 0.3630000E+00, 0.4186400E+00, 0.3784900E+00, 0.3784900E+00 /
      data (ref_adm(12,iz,29,15),iz = 1,20) / &
     & 0.1526000E+00, 0.1526000E+00, 0.1624900E+00, 0.1767600E+00, &
     & 0.1829000E+00, 0.1809000E+00, 0.1874200E+00, 0.1911100E+00, &
     & 0.2101300E+00, 0.2257700E+00, 0.2522000E+00, 0.2500200E+00, &
     & 0.2708900E+00, 0.3092300E+00, 0.3154100E+00, 0.3548300E+00, &
     & 0.3905700E+00, 0.4106700E+00, 0.3707900E+00, 0.3707900E+00 /
      data (ref_adm(12,iz,30,15),iz = 1,20) / &
     & 0.1627900E+00, 0.1627900E+00, 0.1643000E+00, 0.1693600E+00, &
     & 0.1720300E+00, 0.1772400E+00, 0.1936800E+00, 0.1921100E+00, &
     & 0.2149100E+00, 0.2255300E+00, 0.2544600E+00, 0.2629600E+00, &
     & 0.2825600E+00, 0.3182800E+00, 0.3324300E+00, 0.3674400E+00, &
     & 0.3960900E+00, 0.4349300E+00, 0.3830800E+00, 0.3830800E+00 /
      data (ref_adm(12,iz,31,15),iz = 1,20) / &
     & 0.1614100E+00, 0.1614100E+00, 0.1678200E+00, 0.1708700E+00, &
     & 0.1768400E+00, 0.1886800E+00, 0.1956000E+00, 0.2011500E+00, &
     & 0.2131400E+00, 0.2242700E+00, 0.2510500E+00, 0.2685500E+00, &
     & 0.2963900E+00, 0.3301400E+00, 0.3503900E+00, 0.3903400E+00, &
     & 0.4267300E+00, 0.4425400E+00, 0.4392100E+00, 0.4392100E+00 /
      data (ref_adm(12,iz,32,15),iz = 1,20) / &
     & 0.1561600E+00, 0.1561600E+00, 0.1640600E+00, 0.1786200E+00, &
     & 0.1879300E+00, 0.1894100E+00, 0.2030100E+00, 0.2102600E+00, &
     & 0.2194500E+00, 0.2385100E+00, 0.2558300E+00, 0.2823000E+00, &
     & 0.3038700E+00, 0.3380300E+00, 0.3747900E+00, 0.4148300E+00, &
     & 0.4718900E+00, 0.5062500E+00, 0.4717800E+00, 0.4717800E+00 /
      data (ref_adm(12,iz,33,15),iz = 1,20) / &
     & 0.1619000E+00, 0.1619000E+00, 0.1714200E+00, 0.1768800E+00, &
     & 0.1871800E+00, 0.1962400E+00, 0.2051800E+00, 0.2143700E+00, &
     & 0.2253100E+00, 0.2446100E+00, 0.2627500E+00, 0.2866900E+00, &
     & 0.3032700E+00, 0.3376300E+00, 0.3893200E+00, 0.4303200E+00, &
     & 0.4747900E+00, 0.5050000E+00, 0.4379200E+00, 0.4379200E+00 /
      data (ref_adm(12,iz,34,15),iz = 1,20) / &
     & 0.1572500E+00, 0.1572500E+00, 0.1608800E+00, 0.1676500E+00, &
     & 0.1879500E+00, 0.1967300E+00, 0.2155500E+00, 0.2104500E+00, &
     & 0.2168200E+00, 0.2447400E+00, 0.2752700E+00, 0.2875700E+00, &
     & 0.3248100E+00, 0.3499600E+00, 0.3891400E+00, 0.4433600E+00, &
     & 0.4917000E+00, 0.4885100E+00, 0.4525200E+00, 0.4525200E+00 /
      data (ref_adm(12,iz,35,15),iz = 1,20) / &
     & 0.1631100E+00, 0.1631100E+00, 0.1609900E+00, 0.1627100E+00, &
     & 0.1759100E+00, 0.1862200E+00, 0.2054100E+00, 0.2128500E+00, &
     & 0.2267300E+00, 0.2424400E+00, 0.2672200E+00, 0.2883000E+00, &
     & 0.3311300E+00, 0.3620900E+00, 0.4004900E+00, 0.4572300E+00, &
     & 0.5082300E+00, 0.5223000E+00, 0.4931000E+00, 0.4931000E+00 /
      data (ref_adm(12,iz,36,15),iz = 1,20) / &
     & 0.1629700E+00, 0.1629700E+00, 0.1617500E+00, 0.1681300E+00, &
     & 0.1687500E+00, 0.1919100E+00, 0.2027600E+00, 0.2179500E+00, &
     & 0.2407400E+00, 0.2438400E+00, 0.2666400E+00, 0.2930800E+00, &
     & 0.3290700E+00, 0.3667000E+00, 0.4217800E+00, 0.4635900E+00, &
     & 0.5035400E+00, 0.5616900E+00, 0.5075700E+00, 0.5075700E+00 /
      data (ref_adm(12,iz,37,15),iz = 1,20) / &
     & 0.1666800E+00, 0.1666800E+00, 0.1646400E+00, 0.1713500E+00, &
     & 0.1749200E+00, 0.1763500E+00, 0.2014300E+00, 0.2241000E+00, &
     & 0.2412800E+00, 0.2478800E+00, 0.2680700E+00, 0.2891000E+00, &
     & 0.3362300E+00, 0.3717400E+00, 0.4439400E+00, 0.4916100E+00, &
     & 0.5272400E+00, 0.5543400E+00, 0.5138000E+00, 0.5138000E+00 /
      data (ref_adm(12,iz,38,15),iz = 1,20) / &
     & 0.1666800E+00, 0.1666800E+00, 0.1646400E+00, 0.1713500E+00, &
     & 0.1749200E+00, 0.1763500E+00, 0.2014300E+00, 0.2241000E+00, &
     & 0.2412800E+00, 0.2478800E+00, 0.2680700E+00, 0.2891000E+00, &
     & 0.3362300E+00, 0.3717400E+00, 0.4439400E+00, 0.4916100E+00, &
     & 0.5272400E+00, 0.5543400E+00, 0.5138000E+00, 0.5138000E+00 /
! Solar Zenith Angle 75.0 Albedo  0.2493055E+00
      data (ref_adm(12,iz, 1,16),iz = 1,20) / &
     & 0.1563200E+00, 0.1563200E+00, 0.1565400E+00, 0.1730000E+00, &
     & 0.1557500E+00, 0.1494800E+00, 0.1670100E+00, 0.1754000E+00, &
     & 0.1877600E+00, 0.2058400E+00, 0.2502900E+00, 0.3653800E+00, &
     & 0.3960800E+00, 0.3260795E+00, 0.3764604E+00, 0.4713390E+00, &
     & 0.6508485E+00, 0.1275691E+01, 0.2393828E+01, 0.2393828E+01 /
      data (ref_adm(12,iz, 2,16),iz = 1,20) / &
     & 0.1563200E+00, 0.1563200E+00, 0.1565400E+00, 0.1730000E+00, &
     & 0.1557500E+00, 0.1494800E+00, 0.1670100E+00, 0.1754000E+00, &
     & 0.1877600E+00, 0.2058400E+00, 0.2502900E+00, 0.3653800E+00, &
     & 0.3960800E+00, 0.3260795E+00, 0.3764604E+00, 0.4713390E+00, &
     & 0.6508485E+00, 0.1275691E+01, 0.2393828E+01, 0.2393828E+01 /
      data (ref_adm(12,iz, 3,16),iz = 1,20) / &
     & 0.1582300E+00, 0.1582300E+00, 0.1628700E+00, 0.1541100E+00, &
     & 0.1492900E+00, 0.1789300E+00, 0.1652500E+00, 0.1731700E+00, &
     & 0.2019700E+00, 0.2226400E+00, 0.2573000E+00, 0.3094300E+00, &
     & 0.2902500E+00, 0.2242900E+00, 0.3751877E+00, 0.4646647E+00, &
     & 0.6325334E+00, 0.1177319E+01, 0.3922946E-07, 0.3922946E-07 /
      data (ref_adm(12,iz, 4,16),iz = 1,20) / &
     & 0.1753400E+00, 0.1753400E+00, 0.1723300E+00, 0.1539600E+00, &
     & 0.1629600E+00, 0.1684500E+00, 0.1743800E+00, 0.1827000E+00, &
     & 0.1844500E+00, 0.2329000E+00, 0.2191300E+00, 0.2607300E+00, &
     & 0.3128100E+00, 0.3081500E+00, 0.3722666E+00, 0.4530717E+00, &
     & 0.5986900E+00, 0.1019068E+01, 0.2127248E+01, 0.2127248E+01 /
      data (ref_adm(12,iz, 5,16),iz = 1,20) / &
     & 0.1510400E+00, 0.1510400E+00, 0.1479400E+00, 0.1516200E+00, &
     & 0.1650800E+00, 0.1721400E+00, 0.1745400E+00, 0.1911500E+00, &
     & 0.1943700E+00, 0.2175200E+00, 0.2438600E+00, 0.2619200E+00, &
     & 0.2928800E+00, 0.3144987E+00, 0.3683725E+00, 0.4393823E+00, &
     & 0.5599625E+00, 0.8643996E+00, 0.1527047E+01, 0.1527047E+01 /
      data (ref_adm(12,iz, 6,16),iz = 1,20) / &
     & 0.1601600E+00, 0.1601600E+00, 0.1502500E+00, 0.1514500E+00, &
     & 0.1492200E+00, 0.1495400E+00, 0.1701400E+00, 0.1687900E+00, &
     & 0.1850600E+00, 0.1975700E+00, 0.2182800E+00, 0.2412000E+00, &
     & 0.2587100E+00, 0.3113900E+00, 0.3927100E+00, 0.4900400E+00, &
     & 0.6731200E+00, 0.7490162E+00, 0.1151996E+01, 0.1151996E+01 /
      data (ref_adm(12,iz, 7,16),iz = 1,20) / &
     & 0.1490700E+00, 0.1490700E+00, 0.1614800E+00, 0.1590100E+00, &
     & 0.1667100E+00, 0.1845900E+00, 0.1849400E+00, 0.1928100E+00, &
     & 0.1835700E+00, 0.2067300E+00, 0.2225900E+00, 0.2430400E+00, &
     & 0.2616500E+00, 0.3181900E+00, 0.4062800E+00, 0.4754200E+00, &
     & 0.4778600E+00, 0.5850600E+00, 0.7228800E+00, 0.7228800E+00 /
      data (ref_adm(12,iz, 8,16),iz = 1,20) / &
     & 0.1429500E+00, 0.1429500E+00, 0.1495300E+00, 0.1591000E+00, &
     & 0.1603700E+00, 0.1635800E+00, 0.1613800E+00, 0.1592800E+00, &
     & 0.1797000E+00, 0.1950800E+00, 0.2118500E+00, 0.2432000E+00, &
     & 0.2554000E+00, 0.3250000E+00, 0.3935800E+00, 0.4449400E+00, &
     & 0.4846100E+00, 0.6107866E+00, 0.7947960E+00, 0.7947960E+00 /
      data (ref_adm(12,iz, 9,16),iz = 1,20) / &
     & 0.1477100E+00, 0.1477100E+00, 0.1782000E+00, 0.1579600E+00, &
     & 0.1642900E+00, 0.1641500E+00, 0.1607300E+00, 0.1657500E+00, &
     & 0.1755100E+00, 0.1963400E+00, 0.2181100E+00, 0.2299200E+00, &
     & 0.2535900E+00, 0.3257500E+00, 0.3684500E+00, 0.4044400E+00, &
     & 0.4268200E+00, 0.5554800E+00, 0.7292207E+00, 0.7292207E+00 /
      data (ref_adm(12,iz,10,16),iz = 1,20) / &
     & 0.1595800E+00, 0.1595800E+00, 0.1636900E+00, 0.1505700E+00, &
     & 0.1596600E+00, 0.1648000E+00, 0.1724400E+00, 0.1585400E+00, &
     & 0.1706300E+00, 0.1784400E+00, 0.2090700E+00, 0.2198400E+00, &
     & 0.2453700E+00, 0.2828200E+00, 0.3399500E+00, 0.3550700E+00, &
     & 0.4511100E+00, 0.4628500E+00, 0.6996645E+00, 0.6996645E+00 /
      data (ref_adm(12,iz,11,16),iz = 1,20) / &
     & 0.1690500E+00, 0.1690500E+00, 0.1587700E+00, 0.1528800E+00, &
     & 0.1465800E+00, 0.1566000E+00, 0.1567400E+00, 0.1641900E+00, &
     & 0.1802700E+00, 0.1831100E+00, 0.2019300E+00, 0.2171900E+00, &
     & 0.2551300E+00, 0.2831900E+00, 0.3189700E+00, 0.3421400E+00, &
     & 0.3878000E+00, 0.4709600E+00, 0.3857400E+00, 0.3857400E+00 /
      data (ref_adm(12,iz,12,16),iz = 1,20) / &
     & 0.1521600E+00, 0.1521600E+00, 0.1464700E+00, 0.1489500E+00, &
     & 0.1572100E+00, 0.1504200E+00, 0.1517400E+00, 0.1629200E+00, &
     & 0.1741800E+00, 0.1911300E+00, 0.1999400E+00, 0.2198100E+00, &
     & 0.2392500E+00, 0.2684000E+00, 0.3216700E+00, 0.3566100E+00, &
     & 0.4134800E+00, 0.4509000E+00, 0.5993852E+00, 0.5993852E+00 /
      data (ref_adm(12,iz,13,16),iz = 1,20) / &
     & 0.1590300E+00, 0.1590300E+00, 0.1557100E+00, 0.1531000E+00, &
     & 0.1494200E+00, 0.1475300E+00, 0.1584100E+00, 0.1580200E+00, &
     & 0.1894300E+00, 0.1812500E+00, 0.1988400E+00, 0.2181500E+00, &
     & 0.2268100E+00, 0.2550000E+00, 0.2847600E+00, 0.3366200E+00, &
     & 0.4214000E+00, 0.4607500E+00, 0.5709618E+00, 0.5709618E+00 /
      data (ref_adm(12,iz,14,16),iz = 1,20) / &
     & 0.1511300E+00, 0.1511300E+00, 0.1564800E+00, 0.1436200E+00, &
     & 0.1469400E+00, 0.1530700E+00, 0.1637900E+00, 0.1638300E+00, &
     & 0.1803800E+00, 0.1761700E+00, 0.1825900E+00, 0.2107800E+00, &
     & 0.2147000E+00, 0.2380300E+00, 0.2683500E+00, 0.2925200E+00, &
     & 0.4214300E+00, 0.4711800E+00, 0.5506321E+00, 0.5506321E+00 /
      data (ref_adm(12,iz,15,16),iz = 1,20) / &
     & 0.1541600E+00, 0.1541600E+00, 0.1542200E+00, 0.1554200E+00, &
     & 0.1517600E+00, 0.1586900E+00, 0.1621900E+00, 0.1635800E+00, &
     & 0.1749400E+00, 0.1828600E+00, 0.1905700E+00, 0.2016500E+00, &
     & 0.2199700E+00, 0.2525800E+00, 0.2389700E+00, 0.3210200E+00, &
     & 0.4082600E+00, 0.4591980E+00, 0.5339612E+00, 0.5339612E+00 /
      data (ref_adm(12,iz,16,16),iz = 1,20) / &
     & 0.1508600E+00, 0.1508600E+00, 0.1479300E+00, 0.1476500E+00, &
     & 0.1615300E+00, 0.1554800E+00, 0.1603400E+00, 0.1591400E+00, &
     & 0.1709400E+00, 0.1744700E+00, 0.1832400E+00, 0.1989700E+00, &
     & 0.2145800E+00, 0.2342600E+00, 0.2493000E+00, 0.3038100E+00, &
     & 0.3996900E+00, 0.4463099E+00, 0.5175073E+00, 0.5175073E+00 /
      data (ref_adm(12,iz,17,16),iz = 1,20) / &
     & 0.1508600E+00, 0.1508600E+00, 0.1447800E+00, 0.1469200E+00, &
     & 0.1558700E+00, 0.1471300E+00, 0.1668900E+00, 0.1782800E+00, &
     & 0.1919000E+00, 0.1650400E+00, 0.1868100E+00, 0.2083300E+00, &
     & 0.2178200E+00, 0.2317200E+00, 0.2635700E+00, 0.2911700E+00, &
     & 0.3442400E+00, 0.4344362E+00, 0.4994424E+00, 0.4994424E+00 /
      data (ref_adm(12,iz,18,16),iz = 1,20) / &
     & 0.1594700E+00, 0.1594700E+00, 0.1502800E+00, 0.1484600E+00, &
     & 0.1478600E+00, 0.1482700E+00, 0.1678700E+00, 0.1886200E+00, &
     & 0.1899300E+00, 0.1767500E+00, 0.2223100E+00, 0.2074400E+00, &
     & 0.2107600E+00, 0.2347900E+00, 0.2726400E+00, 0.2924600E+00, &
     & 0.3380997E+00, 0.3902969E+00, 0.4331520E+00, 0.4331520E+00 /
      data (ref_adm(12,iz,19,16),iz = 1,20) / &
     & 0.1526200E+00, 0.1526200E+00, 0.1625200E+00, 0.1528100E+00, &
     & 0.1487600E+00, 0.1481000E+00, 0.1571100E+00, 0.1757400E+00, &
     & 0.1792300E+00, 0.1865700E+00, 0.2200800E+00, 0.2166600E+00, &
     & 0.2124100E+00, 0.2398600E+00, 0.2736400E+00, 0.3348500E+00, &
     & 0.3345437E+00, 0.3837636E+00, 0.4229163E+00, 0.4229163E+00 /
      data (ref_adm(12,iz,20,16),iz = 1,20) / &
     & 0.1448200E+00, 0.1448200E+00, 0.1449700E+00, 0.1539200E+00, &
     & 0.1470800E+00, 0.1565600E+00, 0.1680300E+00, 0.1770900E+00, &
     & 0.1809200E+00, 0.1923500E+00, 0.2197900E+00, 0.2273900E+00, &
     & 0.2226500E+00, 0.2383500E+00, 0.2552100E+00, 0.2977085E+00, &
     & 0.3326924E+00, 0.3800027E+00, 0.4170644E+00, 0.4170644E+00 /
      data (ref_adm(12,iz,21,16),iz = 1,20) / &
     & 0.1475900E+00, 0.1475900E+00, 0.1685000E+00, 0.1919300E+00, &
     & 0.1650700E+00, 0.1717800E+00, 0.1632300E+00, 0.1657500E+00, &
     & 0.1745100E+00, 0.1908500E+00, 0.2006400E+00, 0.2197200E+00, &
     & 0.2449800E+00, 0.2457200E+00, 0.2547500E+00, 0.2977817E+00, &
     & 0.3317153E+00, 0.3773068E+00, 0.4133197E+00, 0.4133197E+00 /
      data (ref_adm(12,iz,22,16),iz = 1,20) / &
     & 0.1510400E+00, 0.1510400E+00, 0.1499100E+00, 0.1662600E+00, &
     & 0.1604800E+00, 0.1658400E+00, 0.1674600E+00, 0.1782000E+00, &
     & 0.1724300E+00, 0.1968000E+00, 0.1886900E+00, 0.2276800E+00, &
     & 0.2471000E+00, 0.2647900E+00, 0.2787900E+00, 0.3184000E+00, &
     & 0.3893820E+00, 0.4582418E+00, 0.5325465E+00, 0.5325465E+00 /
      data (ref_adm(12,iz,23,16),iz = 1,20) / &
     & 0.1559700E+00, 0.1559700E+00, 0.1571000E+00, 0.1577600E+00, &
     & 0.1651300E+00, 0.1671800E+00, 0.1747600E+00, 0.1856600E+00, &
     & 0.1836300E+00, 0.1897300E+00, 0.2054000E+00, 0.2174000E+00, &
     & 0.2289200E+00, 0.2587500E+00, 0.3010100E+00, 0.2971700E+00, &
     & 0.3912280E+00, 0.4585703E+00, 0.5335419E+00, 0.5335419E+00 /
      data (ref_adm(12,iz,24,16),iz = 1,20) / &
     & 0.1510400E+00, 0.1510400E+00, 0.1535600E+00, 0.1593700E+00, &
     & 0.1607700E+00, 0.1720500E+00, 0.1791800E+00, 0.1898900E+00, &
     & 0.1932200E+00, 0.1964300E+00, 0.2066700E+00, 0.2191200E+00, &
     & 0.2334700E+00, 0.2615800E+00, 0.2872300E+00, 0.2972400E+00, &
     & 0.3950090E+00, 0.4622328E+00, 0.5394233E+00, 0.5394233E+00 /
      data (ref_adm(12,iz,25,16),iz = 1,20) / &
     & 0.1569400E+00, 0.1569400E+00, 0.1567400E+00, 0.1611500E+00, &
     & 0.1602800E+00, 0.1695500E+00, 0.1753900E+00, 0.1879200E+00, &
     & 0.1981000E+00, 0.2045700E+00, 0.2222600E+00, 0.2402300E+00, &
     & 0.2602300E+00, 0.2907400E+00, 0.3048300E+00, 0.3522500E+00, &
     & 0.3976100E+00, 0.4682068E+00, 0.5482236E+00, 0.5482236E+00 /
      data (ref_adm(12,iz,26,16),iz = 1,20) / &
     & 0.1512200E+00, 0.1512200E+00, 0.1495200E+00, 0.1662300E+00, &
     & 0.1590200E+00, 0.1913800E+00, 0.1902600E+00, 0.1953400E+00, &
     & 0.2118500E+00, 0.2007000E+00, 0.2075300E+00, 0.2301700E+00, &
     & 0.2458500E+00, 0.2948800E+00, 0.3161900E+00, 0.3399000E+00, &
     & 0.3860900E+00, 0.4784290E+00, 0.5634865E+00, 0.5634865E+00 /
      data (ref_adm(12,iz,27,16),iz = 1,20) / &
     & 0.1612900E+00, 0.1612900E+00, 0.1716300E+00, 0.1778000E+00, &
     & 0.1696700E+00, 0.1703800E+00, 0.1949200E+00, 0.2067300E+00, &
     & 0.2087700E+00, 0.2160000E+00, 0.2195200E+00, 0.2340000E+00, &
     & 0.2651400E+00, 0.3006700E+00, 0.3298900E+00, 0.3546600E+00, &
     & 0.3974100E+00, 0.4694800E+00, 0.5828951E+00, 0.5828951E+00 /
      data (ref_adm(12,iz,28,16),iz = 1,20) / &
     & 0.1616000E+00, 0.1616000E+00, 0.1472200E+00, 0.1557400E+00, &
     & 0.1621100E+00, 0.1635400E+00, 0.1937400E+00, 0.2203900E+00, &
     & 0.2381400E+00, 0.2208800E+00, 0.2256800E+00, 0.2378700E+00, &
     & 0.2601200E+00, 0.3143600E+00, 0.3290000E+00, 0.3904100E+00, &
     & 0.4377100E+00, 0.4650900E+00, 0.4297100E+00, 0.4297100E+00 /
      data (ref_adm(12,iz,29,16),iz = 1,20) / &
     & 0.1599900E+00, 0.1599900E+00, 0.1508400E+00, 0.1559800E+00, &
     & 0.1555800E+00, 0.1632100E+00, 0.1874400E+00, 0.1989400E+00, &
     & 0.2177900E+00, 0.2281000E+00, 0.2428400E+00, 0.2489300E+00, &
     & 0.2754800E+00, 0.3130200E+00, 0.3458900E+00, 0.3929600E+00, &
     & 0.4335800E+00, 0.5098800E+00, 0.6281217E+00, 0.6281217E+00 /
      data (ref_adm(12,iz,30,16),iz = 1,20) / &
     & 0.1490400E+00, 0.1490400E+00, 0.1581200E+00, 0.1651000E+00, &
     & 0.1550100E+00, 0.1722200E+00, 0.1786700E+00, 0.2011400E+00, &
     & 0.2224800E+00, 0.2360500E+00, 0.2434300E+00, 0.2729300E+00, &
     & 0.2887100E+00, 0.3258900E+00, 0.3543000E+00, 0.4007300E+00, &
     & 0.4822300E+00, 0.5358200E+00, 0.6538596E+00, 0.6538596E+00 /
      data (ref_adm(12,iz,31,16),iz = 1,20) / &
     & 0.1586600E+00, 0.1586600E+00, 0.1536900E+00, 0.1544800E+00, &
     & 0.1796200E+00, 0.1627300E+00, 0.1958800E+00, 0.2133000E+00, &
     & 0.2337700E+00, 0.2382900E+00, 0.2507800E+00, 0.2791200E+00, &
     & 0.2902900E+00, 0.3348000E+00, 0.3711400E+00, 0.4186100E+00, &
     & 0.4818200E+00, 0.5067900E+00, 0.6813977E+00, 0.6813977E+00 /
      data (ref_adm(12,iz,32,16),iz = 1,20) / &
     & 0.1491400E+00, 0.1491400E+00, 0.1556400E+00, 0.1628000E+00, &
     & 0.1702000E+00, 0.1784100E+00, 0.2000500E+00, 0.2121900E+00, &
     & 0.2247800E+00, 0.2461900E+00, 0.2620800E+00, 0.2901600E+00, &
     & 0.3129800E+00, 0.3558500E+00, 0.3861400E+00, 0.4373500E+00, &
     & 0.5021200E+00, 0.5420100E+00, 0.5061200E+00, 0.5061200E+00 /
      data (ref_adm(12,iz,33,16),iz = 1,20) / &
     & 0.1514400E+00, 0.1514400E+00, 0.1582500E+00, 0.1677100E+00, &
     & 0.1708600E+00, 0.1811400E+00, 0.1991600E+00, 0.2278400E+00, &
     & 0.2264700E+00, 0.2508000E+00, 0.2676000E+00, 0.2817800E+00, &
     & 0.3076500E+00, 0.3462700E+00, 0.3934400E+00, 0.4609000E+00, &
     & 0.5577200E+00, 0.6358900E+00, 0.7315841E+00, 0.7315841E+00 /
      data (ref_adm(12,iz,34,16),iz = 1,20) / &
     & 0.1597800E+00, 0.1597800E+00, 0.1585500E+00, 0.1618400E+00, &
     & 0.1677700E+00, 0.1765500E+00, 0.1817300E+00, 0.2166900E+00, &
     & 0.2298800E+00, 0.2642300E+00, 0.2808600E+00, 0.3009900E+00, &
     & 0.3175100E+00, 0.3630800E+00, 0.4068700E+00, 0.4761500E+00, &
     & 0.5665600E+00, 0.6864700E+00, 0.7441827E+00, 0.7441827E+00 /
      data (ref_adm(12,iz,35,16),iz = 1,20) / &
     & 0.1479400E+00, 0.1479400E+00, 0.1549800E+00, 0.1680400E+00, &
     & 0.1724800E+00, 0.1901800E+00, 0.1846400E+00, 0.2017000E+00, &
     & 0.2468900E+00, 0.2603600E+00, 0.3054000E+00, 0.3156600E+00, &
     & 0.3172400E+00, 0.3898400E+00, 0.4140000E+00, 0.4931200E+00, &
     & 0.5487500E+00, 0.6194100E+00, 0.7475144E+00, 0.7475144E+00 /
      data (ref_adm(12,iz,36,16),iz = 1,20) / &
     & 0.1556200E+00, 0.1556200E+00, 0.1647000E+00, 0.1856400E+00, &
     & 0.1817300E+00, 0.1829400E+00, 0.1883800E+00, 0.1934700E+00, &
     & 0.2435200E+00, 0.2756200E+00, 0.2852400E+00, 0.3224700E+00, &
     & 0.3435500E+00, 0.4007000E+00, 0.4600200E+00, 0.5326600E+00, &
     & 0.5966000E+00, 0.6201600E+00, 0.6147300E+00, 0.6147300E+00 /
      data (ref_adm(12,iz,37,16),iz = 1,20) / &
     & 0.1520300E+00, 0.1520300E+00, 0.1723200E+00, 0.1646600E+00, &
     & 0.1584700E+00, 0.1740300E+00, 0.1929100E+00, 0.2091200E+00, &
     & 0.2185500E+00, 0.2578000E+00, 0.3050400E+00, 0.3143100E+00, &
     & 0.3388100E+00, 0.3946800E+00, 0.4532500E+00, 0.5393300E+00, &
     & 0.6522500E+00, 0.6704100E+00, 0.6145700E+00, 0.6145700E+00 /
      data (ref_adm(12,iz,38,16),iz = 1,20) / &
     & 0.1520300E+00, 0.1520300E+00, 0.1723200E+00, 0.1646600E+00, &
     & 0.1584700E+00, 0.1740300E+00, 0.1929100E+00, 0.2091200E+00, &
     & 0.2185500E+00, 0.2578000E+00, 0.3050400E+00, 0.3143100E+00, &
     & 0.3388100E+00, 0.3946800E+00, 0.4532500E+00, 0.5393300E+00, &
     & 0.6522500E+00, 0.6704100E+00, 0.6145700E+00, 0.6145700E+00 /
! Solar Zenith Angle 80.0 Albedo  0.2804044E+00
      data (ref_adm(12,iz, 1,17),iz = 1,20) / &
     & 0.1706900E+00, 0.1706900E+00, 0.1763800E+00, 0.1729700E+00, &
     & 0.1653000E+00, 0.1638500E+00, 0.2083200E+00, 0.2187300E+00, &
     & 0.2170900E+00, 0.2354000E+00, 0.3251500E+00, 0.3365200E+00, &
     & 0.3498847E+00, 0.3924848E+00, 0.4789036E+00, 0.6750606E+00, &
     & 0.1130403E+01, 0.2186919E+01, 0.1719085E+01, 0.1719085E+01 /
      data (ref_adm(12,iz, 2,17),iz = 1,20) / &
     & 0.1706900E+00, 0.1706900E+00, 0.1763800E+00, 0.1729700E+00, &
     & 0.1653000E+00, 0.1638500E+00, 0.2083200E+00, 0.2187300E+00, &
     & 0.2170900E+00, 0.2354000E+00, 0.3251500E+00, 0.3365200E+00, &
     & 0.3498847E+00, 0.3924848E+00, 0.4789036E+00, 0.6750606E+00, &
     & 0.1130403E+01, 0.2186919E+01, 0.1719085E+01, 0.1719085E+01 /
      data (ref_adm(12,iz, 3,17),iz = 1,20) / &
     & 0.1782800E+00, 0.1782800E+00, 0.1557600E+00, 0.1593300E+00, &
     & 0.1574200E+00, 0.1884500E+00, 0.1875600E+00, 0.1940100E+00, &
     & 0.1914700E+00, 0.2437100E+00, 0.3183700E+00, 0.3365400E+00, &
     & 0.3481743E+00, 0.3910785E+00, 0.4730681E+00, 0.6577813E+00, &
     & 0.1057750E+01, 0.2312111E+01, 0.2793964E-07, 0.2793964E-07 /
      data (ref_adm(12,iz, 4,17),iz = 1,20) / &
     & 0.1521600E+00, 0.1521600E+00, 0.1882600E+00, 0.1613700E+00, &
     & 0.1663300E+00, 0.2005400E+00, 0.1887600E+00, 0.1965500E+00, &
     & 0.2653500E+00, 0.2182800E+00, 0.2646900E+00, 0.3428900E+00, &
     & 0.3440748E+00, 0.3887597E+00, 0.4616602E+00, 0.6224412E+00, &
     & 0.9332095E+00, 0.2095273E+01, 0.2636706E+01, 0.2636706E+01 /
      data (ref_adm(12,iz, 5,17),iz = 1,20) / &
     & 0.1462600E+00, 0.1462600E+00, 0.1504500E+00, 0.1850500E+00, &
     & 0.1966300E+00, 0.1960900E+00, 0.1770600E+00, 0.1981100E+00, &
     & 0.2135900E+00, 0.2211200E+00, 0.2390200E+00, 0.3220100E+00, &
     & 0.3380284E+00, 0.3855079E+00, 0.4491999E+00, 0.5813562E+00, &
     & 0.8147283E+00, 0.1521062E+01, 0.3196191E+01, 0.3196191E+01 /
      data (ref_adm(12,iz, 6,17),iz = 1,20) / &
     & 0.1693400E+00, 0.1693400E+00, 0.1906500E+00, 0.1921400E+00, &
     & 0.2070100E+00, 0.2126000E+00, 0.2274700E+00, 0.2456900E+00, &
     & 0.2812200E+00, 0.3184400E+00, 0.3244200E+00, 0.3024300E+00, &
     & 0.3709800E+00, 0.3233700E+00, 0.4398947E+00, 0.5439096E+00, &
     & 0.7225453E+00, 0.1152820E+01, 0.2033464E+01, 0.2033464E+01 /
      data (ref_adm(12,iz, 7,17),iz = 1,20) / &
     & 0.1658400E+00, 0.1658400E+00, 0.1555100E+00, 0.1601800E+00, &
     & 0.1646500E+00, 0.1606400E+00, 0.1834800E+00, 0.1992800E+00, &
     & 0.2333100E+00, 0.2529000E+00, 0.3081400E+00, 0.3781100E+00, &
     & 0.3779800E+00, 0.4842000E+00, 0.6511600E+00, 0.9732600E+00, &
     & 0.8871800E+00, 0.8884400E+00, 0.1425050E+01, 0.1425050E+01 /
      data (ref_adm(12,iz, 8,17),iz = 1,20) / &
     & 0.1646800E+00, 0.1646800E+00, 0.1582900E+00, 0.1621200E+00, &
     & 0.1594800E+00, 0.1609800E+00, 0.1734700E+00, 0.2030200E+00, &
     & 0.1940300E+00, 0.2247200E+00, 0.2300500E+00, 0.3066300E+00, &
     & 0.3840300E+00, 0.5061800E+00, 0.5949900E+00, 0.7315300E+00, &
     & 0.7675200E+00, 0.1399200E+01, 0.1144398E+01, 0.1144398E+01 /
      data (ref_adm(12,iz, 9,17),iz = 1,20) / &
     & 0.1759200E+00, 0.1759200E+00, 0.2286700E+00, 0.1848100E+00, &
     & 0.1578800E+00, 0.1538900E+00, 0.1585900E+00, 0.1609100E+00, &
     & 0.1877500E+00, 0.2343800E+00, 0.2357600E+00, 0.2897200E+00, &
     & 0.3882100E+00, 0.3804200E+00, 0.4215700E+00, 0.4356000E+00, &
     & 0.5711700E+00, 0.7510222E+00, 0.9888141E+00, 0.9888141E+00 /
      data (ref_adm(12,iz,10,17),iz = 1,20) / &
     & 0.1489900E+00, 0.1489900E+00, 0.1582000E+00, 0.2151400E+00, &
     & 0.2036400E+00, 0.1638600E+00, 0.1746400E+00, 0.1830700E+00, &
     & 0.1895900E+00, 0.2118200E+00, 0.2563600E+00, 0.2396400E+00, &
     & 0.3573400E+00, 0.3013200E+00, 0.3459500E+00, 0.4473000E+00, &
     & 0.4387100E+00, 0.7232577E+00, 0.9393365E+00, 0.9393365E+00 /
      data (ref_adm(12,iz,11,17),iz = 1,20) / &
     & 0.1533500E+00, 0.1533500E+00, 0.1418300E+00, 0.1505700E+00, &
     & 0.1650400E+00, 0.1782700E+00, 0.1690600E+00, 0.1809900E+00, &
     & 0.2007400E+00, 0.2053700E+00, 0.2453300E+00, 0.2432900E+00, &
     & 0.2545500E+00, 0.2873500E+00, 0.3395100E+00, 0.4620300E+00, &
     & 0.5042200E+00, 0.6699167E+00, 0.8646159E+00, 0.8646159E+00 /
      data (ref_adm(12,iz,12,17),iz = 1,20) / &
     & 0.1492100E+00, 0.1492100E+00, 0.1398900E+00, 0.1413700E+00, &
     & 0.1866700E+00, 0.1930500E+00, 0.1947100E+00, 0.1744300E+00, &
     & 0.2062100E+00, 0.2296700E+00, 0.2357300E+00, 0.2460200E+00, &
     & 0.2254000E+00, 0.2671100E+00, 0.3143800E+00, 0.3693200E+00, &
     & 0.4874500E+00, 0.6318288E+00, 0.7973583E+00, 0.7973583E+00 /
      data (ref_adm(12,iz,13,17),iz = 1,20) / &
     & 0.1540100E+00, 0.1540100E+00, 0.1547000E+00, 0.1475800E+00, &
     & 0.1606300E+00, 0.1580000E+00, 0.2098100E+00, 0.1845400E+00, &
     & 0.2253600E+00, 0.2119500E+00, 0.2338800E+00, 0.2376200E+00, &
     & 0.2275700E+00, 0.2550900E+00, 0.2736000E+00, 0.3670400E+00, &
     & 0.4579400E+00, 0.6051661E+00, 0.7532459E+00, 0.7532459E+00 /
      data (ref_adm(12,iz,14,17),iz = 1,20) / &
     & 0.1645700E+00, 0.1645700E+00, 0.1667600E+00, 0.1569600E+00, &
     & 0.1621000E+00, 0.1808800E+00, 0.1908700E+00, 0.1744600E+00, &
     & 0.2673000E+00, 0.2388600E+00, 0.2218800E+00, 0.2188900E+00, &
     & 0.2321900E+00, 0.2625000E+00, 0.2673000E+00, 0.3676300E+00, &
     & 0.4774618E+00, 0.5870203E+00, 0.7224628E+00, 0.7224628E+00 /
      data (ref_adm(12,iz,15,17),iz = 1,20) / &
     & 0.1603100E+00, 0.1603100E+00, 0.1575700E+00, 0.1582900E+00, &
     & 0.1702400E+00, 0.1709400E+00, 0.1682700E+00, 0.1700100E+00, &
     & 0.1888900E+00, 0.2020600E+00, 0.2138100E+00, 0.2258100E+00, &
     & 0.2398500E+00, 0.2605800E+00, 0.2551400E+00, 0.3281000E+00, &
     & 0.4663879E+00, 0.5720722E+00, 0.6983071E+00, 0.6983071E+00 /
      data (ref_adm(12,iz,16,17),iz = 1,20) / &
     & 0.1488500E+00, 0.1488500E+00, 0.1433100E+00, 0.1493100E+00, &
     & 0.1533000E+00, 0.1497900E+00, 0.1637500E+00, 0.1631900E+00, &
     & 0.1768100E+00, 0.1886800E+00, 0.1902100E+00, 0.2110800E+00, &
     & 0.2328300E+00, 0.2474600E+00, 0.2687400E+00, 0.2980500E+00, &
     & 0.4538134E+00, 0.5560382E+00, 0.6756483E+00, 0.6756483E+00 /
      data (ref_adm(12,iz,17,17),iz = 1,20) / &
     & 0.1530200E+00, 0.1530200E+00, 0.1375600E+00, 0.1402600E+00, &
     & 0.1598500E+00, 0.1518400E+00, 0.1648500E+00, 0.1973700E+00, &
     & 0.2314000E+00, 0.2074000E+00, 0.1871700E+00, 0.2057000E+00, &
     & 0.2391100E+00, 0.2644800E+00, 0.2960300E+00, 0.3135400E+00, &
     & 0.4426254E+00, 0.5390773E+00, 0.6505273E+00, 0.6505273E+00 /
      data (ref_adm(12,iz,18,17),iz = 1,20) / &
     & 0.1620800E+00, 0.1620800E+00, 0.1572200E+00, 0.1362600E+00, &
     & 0.1701100E+00, 0.1355600E+00, 0.1689100E+00, 0.1723600E+00, &
     & 0.2494500E+00, 0.2072400E+00, 0.1948600E+00, 0.2057600E+00, &
     & 0.2375800E+00, 0.2674500E+00, 0.3008200E+00, 0.3296300E+00, &
     & 0.3672156E+00, 0.4286458E+00, 0.4833581E+00, 0.4833581E+00 /
      data (ref_adm(12,iz,19,17),iz = 1,20) / &
     & 0.1566100E+00, 0.1566100E+00, 0.1501500E+00, 0.1501500E+00, &
     & 0.1594400E+00, 0.1752500E+00, 0.1759800E+00, 0.1923300E+00, &
     & 0.2383100E+00, 0.2025400E+00, 0.2151800E+00, 0.2030400E+00, &
     & 0.2347700E+00, 0.2481100E+00, 0.2936800E+00, 0.3218317E+00, &
     & 0.3628229E+00, 0.4208389E+00, 0.4714094E+00, 0.4714094E+00 /
      data (ref_adm(12,iz,20,17),iz = 1,20) / &
     & 0.1567800E+00, 0.1567800E+00, 0.1612600E+00, 0.1672400E+00, &
     & 0.1635700E+00, 0.1826700E+00, 0.1606500E+00, 0.1733900E+00, &
     & 0.1777100E+00, 0.1847100E+00, 0.1911900E+00, 0.1954800E+00, &
     & 0.2211300E+00, 0.2634700E+00, 0.2718900E+00, 0.3201790E+00, &
     & 0.3604161E+00, 0.4163488E+00, 0.4644893E+00, 0.4644893E+00 /
      data (ref_adm(12,iz,21,17),iz = 1,20) / &
     & 0.1683200E+00, 0.1683200E+00, 0.1809900E+00, 0.1752400E+00, &
     & 0.1558800E+00, 0.1805600E+00, 0.1895900E+00, 0.2120600E+00, &
     & 0.1758700E+00, 0.2081300E+00, 0.2108900E+00, 0.2198100E+00, &
     & 0.2266500E+00, 0.2469300E+00, 0.2708300E+00, 0.3198905E+00, &
     & 0.3590823E+00, 0.4131592E+00, 0.4601959E+00, 0.4601959E+00 /
      data (ref_adm(12,iz,22,17),iz = 1,20) / &
     & 0.1519500E+00, 0.1519500E+00, 0.1641300E+00, 0.1593200E+00, &
     & 0.1750200E+00, 0.1665600E+00, 0.1594300E+00, 0.1981500E+00, &
     & 0.1811400E+00, 0.1954100E+00, 0.2415400E+00, 0.2183200E+00, &
     & 0.2320700E+00, 0.2829000E+00, 0.2873000E+00, 0.3777202E+00, &
     & 0.4404797E+00, 0.5388749E+00, 0.6761329E+00, 0.6761329E+00 /
      data (ref_adm(12,iz,23,17),iz = 1,20) / &
     & 0.1551400E+00, 0.1551400E+00, 0.1542300E+00, 0.1580600E+00, &
     & 0.1654200E+00, 0.1701200E+00, 0.1768100E+00, 0.1790400E+00, &
     & 0.1900900E+00, 0.1936100E+00, 0.2070800E+00, 0.2316000E+00, &
     & 0.2549400E+00, 0.2678200E+00, 0.3037000E+00, 0.3292200E+00, &
     & 0.4415622E+00, 0.5385738E+00, 0.6777808E+00, 0.6777808E+00 /
      data (ref_adm(12,iz,24,17),iz = 1,20) / &
     & 0.1518700E+00, 0.1518700E+00, 0.1599300E+00, 0.1603800E+00, &
     & 0.1640700E+00, 0.1695500E+00, 0.1786500E+00, 0.1936700E+00, &
     & 0.1931600E+00, 0.2192100E+00, 0.2247600E+00, 0.2356500E+00, &
     & 0.2523700E+00, 0.2787400E+00, 0.3036200E+00, 0.3398200E+00, &
     & 0.4455122E+00, 0.5425339E+00, 0.6859872E+00, 0.6859872E+00 /
      data (ref_adm(12,iz,25,17),iz = 1,20) / &
     & 0.1914600E+00, 0.1914600E+00, 0.1841600E+00, 0.1549100E+00, &
     & 0.1623800E+00, 0.1818200E+00, 0.1763800E+00, 0.1992500E+00, &
     & 0.2257400E+00, 0.2213500E+00, 0.2243600E+00, 0.2437200E+00, &
     & 0.2613000E+00, 0.3088600E+00, 0.3236000E+00, 0.3758000E+00, &
     & 0.3970500E+00, 0.5493764E+00, 0.6986439E+00, 0.6986439E+00 /
      data (ref_adm(12,iz,26,17),iz = 1,20) / &
     & 0.1565000E+00, 0.1565000E+00, 0.1667800E+00, 0.1478300E+00, &
     & 0.1532600E+00, 0.1687100E+00, 0.1749300E+00, 0.2389400E+00, &
     & 0.2078500E+00, 0.2047600E+00, 0.2206900E+00, 0.2561700E+00, &
     & 0.2573200E+00, 0.2937600E+00, 0.3271400E+00, 0.3970919E+00, &
     & 0.4706000E+00, 0.5618960E+00, 0.7203182E+00, 0.7203182E+00 /
      data (ref_adm(12,iz,27,17),iz = 1,20) / &
     & 0.1653300E+00, 0.1653300E+00, 0.1684100E+00, 0.1585400E+00, &
     & 0.1502500E+00, 0.1820600E+00, 0.1748900E+00, 0.1989300E+00, &
     & 0.2041200E+00, 0.2216900E+00, 0.2232000E+00, 0.2444100E+00, &
     & 0.2767800E+00, 0.3171400E+00, 0.3320700E+00, 0.3625400E+00, &
     & 0.4642700E+00, 0.5776980E+00, 0.7474131E+00, 0.7474131E+00 /
      data (ref_adm(12,iz,28,17),iz = 1,20) / &
     & 0.1580000E+00, 0.1580000E+00, 0.1491200E+00, 0.1734800E+00, &
     & 0.1833700E+00, 0.1721600E+00, 0.1938300E+00, 0.2027300E+00, &
     & 0.1987400E+00, 0.2174200E+00, 0.2304500E+00, 0.2605400E+00, &
     & 0.2754300E+00, 0.3146300E+00, 0.3370700E+00, 0.3970900E+00, &
     & 0.4444300E+00, 0.5408900E+00, 0.6236500E+00, 0.6236500E+00 /
      data (ref_adm(12,iz,29,17),iz = 1,20) / &
     & 0.1496800E+00, 0.1496800E+00, 0.1462500E+00, 0.1650400E+00, &
     & 0.1880200E+00, 0.1950700E+00, 0.1812200E+00, 0.2024200E+00, &
     & 0.1920200E+00, 0.2197700E+00, 0.2239400E+00, 0.2649700E+00, &
     & 0.2817000E+00, 0.3147300E+00, 0.3250700E+00, 0.4189900E+00, &
     & 0.5041500E+00, 0.6004900E+00, 0.8107193E+00, 0.8107193E+00 /
      data (ref_adm(12,iz,30,17),iz = 1,20) / &
     & 0.1442800E+00, 0.1442800E+00, 0.1563700E+00, 0.1517200E+00, &
     & 0.1361000E+00, 0.2483500E+00, 0.1863200E+00, 0.2080000E+00, &
     & 0.2211000E+00, 0.2353800E+00, 0.2539400E+00, 0.2654200E+00, &
     & 0.3029600E+00, 0.3228700E+00, 0.3801300E+00, 0.4681500E+00, &
     & 0.5494700E+00, 0.6416767E+00, 0.8474749E+00, 0.8474749E+00 /
      data (ref_adm(12,iz,31,17),iz = 1,20) / &
     & 0.1589700E+00, 0.1589700E+00, 0.1472800E+00, 0.1683200E+00, &
     & 0.1625700E+00, 0.1703800E+00, 0.1899300E+00, 0.2110300E+00, &
     & 0.2405300E+00, 0.2417700E+00, 0.2486500E+00, 0.2848200E+00, &
     & 0.3148500E+00, 0.3367700E+00, 0.3764100E+00, 0.4421600E+00, &
     & 0.5785000E+00, 0.7181500E+00, 0.8857701E+00, 0.8857701E+00 /
      data (ref_adm(12,iz,32,17),iz = 1,20) / &
     & 0.1498400E+00, 0.1498400E+00, 0.1644100E+00, 0.1869900E+00, &
     & 0.1527700E+00, 0.1868200E+00, 0.1824500E+00, 0.2126800E+00, &
     & 0.2055600E+00, 0.2523100E+00, 0.2602300E+00, 0.2960000E+00, &
     & 0.3358200E+00, 0.3576300E+00, 0.4234500E+00, 0.4929300E+00, &
     & 0.6056900E+00, 0.6686700E+00, 0.9222514E+00, 0.9222514E+00 /
      data (ref_adm(12,iz,33,17),iz = 1,20) / &
     & 0.1673200E+00, 0.1673200E+00, 0.1683600E+00, 0.1926800E+00, &
     & 0.2184100E+00, 0.1969100E+00, 0.1937000E+00, 0.2165600E+00, &
     & 0.2157800E+00, 0.2554900E+00, 0.2741300E+00, 0.3042800E+00, &
     & 0.3408900E+00, 0.3885400E+00, 0.4532000E+00, 0.5089100E+00, &
     & 0.5853200E+00, 0.6669700E+00, 0.9522696E+00, 0.9522696E+00 /
      data (ref_adm(12,iz,34,17),iz = 1,20) / &
     & 0.1590100E+00, 0.1590100E+00, 0.1556000E+00, 0.1594900E+00, &
     & 0.1646500E+00, 0.1838000E+00, 0.1896300E+00, 0.1990800E+00, &
     & 0.2164100E+00, 0.2521200E+00, 0.2752000E+00, 0.3061500E+00, &
     & 0.3349000E+00, 0.3873100E+00, 0.4390600E+00, 0.5168400E+00, &
     & 0.6143800E+00, 0.7385200E+00, 0.7239600E+00, 0.7239600E+00 /
      data (ref_adm(12,iz,35,17),iz = 1,20) / &
     & 0.1822300E+00, 0.1822300E+00, 0.2108500E+00, 0.1633800E+00, &
     & 0.1759600E+00, 0.1865700E+00, 0.2176800E+00, 0.2329200E+00, &
     & 0.2248900E+00, 0.2498000E+00, 0.2854400E+00, 0.3264300E+00, &
     & 0.3396400E+00, 0.4205000E+00, 0.4522000E+00, 0.5491900E+00, &
     & 0.6378000E+00, 0.7187200E+00, 0.9621509E+00, 0.9621509E+00 /
      data (ref_adm(12,iz,36,17),iz = 1,20) / &
     & 0.1510400E+00, 0.1510400E+00, 0.1606500E+00, 0.1547800E+00, &
     & 0.1785300E+00, 0.1756000E+00, 0.2099400E+00, 0.2403200E+00, &
     & 0.2385000E+00, 0.2430100E+00, 0.2923800E+00, 0.2966300E+00, &
     & 0.3537600E+00, 0.4179800E+00, 0.4820200E+00, 0.5375500E+00, &
     & 0.6444100E+00, 0.8362500E+00, 0.9696296E+00, 0.9696296E+00 /
      data (ref_adm(12,iz,37,17),iz = 1,20) / &
     & 0.1673300E+00, 0.1673300E+00, 0.1605100E+00, 0.1675700E+00, &
     & 0.1719700E+00, 0.1980400E+00, 0.1988300E+00, 0.2268100E+00, &
     & 0.2770200E+00, 0.2574500E+00, 0.2893500E+00, 0.3845200E+00, &
     & 0.3385500E+00, 0.4396200E+00, 0.4667500E+00, 0.5512200E+00, &
     & 0.6764200E+00, 0.7398028E+00, 0.9767183E+00, 0.9767183E+00 /
      data (ref_adm(12,iz,38,17),iz = 1,20) / &
     & 0.1673300E+00, 0.1673300E+00, 0.1605100E+00, 0.1675700E+00, &
     & 0.1719700E+00, 0.1980400E+00, 0.1988300E+00, 0.2268100E+00, &
     & 0.2770200E+00, 0.2574500E+00, 0.2893500E+00, 0.3845200E+00, &
     & 0.3385500E+00, 0.4396200E+00, 0.4667500E+00, 0.5512200E+00, &
     & 0.6764200E+00, 0.7398028E+00, 0.9767183E+00, 0.9767183E+00 /
! Solar Zenith Angle 85.0 Albedo  0.4753665E+00
      data (ref_adm(12,iz, 1,18),iz = 1,20) / &
     & 0.2419312E+00, 0.2419312E+00, 0.2281800E+00, 0.2575345E+00, &
     & 0.1978800E+00, 0.2854001E+00, 0.2267400E+00, 0.3235992E+00, &
     & 0.3844900E+00, 0.3916077E+00, 0.5177000E+00, 0.5311145E+00, &
     & 0.6721398E+00, 0.8924558E+00, 0.1503201E+01, 0.2919854E+01, &
     & 0.2170600E+01, 0.3404306E+01, 0.8423367E+01, 0.8423367E+01 /
      data (ref_adm(12,iz, 2,18),iz = 1,20) / &
     & 0.2419312E+00, 0.2419312E+00, 0.2281800E+00, 0.2575345E+00, &
     & 0.1978800E+00, 0.2854001E+00, 0.2267400E+00, 0.3235992E+00, &
     & 0.3844900E+00, 0.3916077E+00, 0.5177000E+00, 0.5311145E+00, &
     & 0.6721398E+00, 0.8924558E+00, 0.1503201E+01, 0.2919854E+01, &
     & 0.2170600E+01, 0.3404306E+01, 0.8423367E+01, 0.8423367E+01 /
      data (ref_adm(12,iz, 3,18),iz = 1,20) / &
     & 0.2070000E+00, 0.2070000E+00, 0.2482380E+00, 0.2574445E+00, &
     & 0.2719600E+00, 0.2060700E+00, 0.2931600E+00, 0.3065100E+00, &
     & 0.3590100E+00, 0.3067300E+00, 0.4488667E+00, 0.7137000E+00, &
     & 0.6598861E+00, 0.8657600E+00, 0.1405131E+01, 0.2930350E+01, &
     & 0.2388938E+01, 0.3119604E+01, 0.1079832E+01, 0.1079832E+01 /
      data (ref_adm(12,iz, 4,18),iz = 1,20) / &
     & 0.2418431E+00, 0.2418431E+00, 0.2480857E+00, 0.2572286E+00, &
     & 0.2693417E+00, 0.2847925E+00, 0.2417600E+00, 0.3047600E+00, &
     & 0.3488289E+00, 0.3187400E+00, 0.3457000E+00, 0.5233998E+00, &
     & 0.6373016E+00, 0.8166509E+00, 0.1234585E+01, 0.2492830E+01, &
     & 0.3387709E+01, 0.2990309E+01, 0.4672192E+01, 0.4672192E+01 /
      data (ref_adm(12,iz, 5,18),iz = 1,20) / &
     & 0.2686500E+00, 0.2686500E+00, 0.4062900E+00, 0.2562000E+00, &
     & 0.2033600E+00, 0.3403100E+00, 0.4942700E+00, 0.3288600E+00, &
     & 0.3147600E+00, 0.3636900E+00, 0.4224900E+00, 0.6621500E+00, &
     & 0.6127226E+00, 0.7561710E+00, 0.1067277E+01, 0.1820096E+01, &
     & 0.3550019E+01, 0.4584725E+01, 0.4677346E+01, 0.4677346E+01 /
      data (ref_adm(12,iz, 6,18),iz = 1,20) / &
     & 0.2111100E+00, 0.2111100E+00, 0.2416200E+00, 0.1815300E+00, &
     & 0.1899300E+00, 0.2084400E+00, 0.2563000E+00, 0.2455200E+00, &
     & 0.3092400E+00, 0.4502000E+00, 0.3724300E+00, 0.4897200E+00, &
     & 0.5919340E+00, 0.6989903E+00, 0.9306625E+00, 0.1399064E+01, &
     & 0.2296913E+01, 0.4711423E+01, 0.7911989E+01, 0.7911989E+01 /
      data (ref_adm(12,iz, 7,18),iz = 1,20) / &
     & 0.2377000E+00, 0.2377000E+00, 0.2474091E+00, 0.1831800E+00, &
     & 0.2668484E+00, 0.2813801E+00, 0.3264600E+00, 0.3830600E+00, &
     & 0.3803900E+00, 0.4081900E+00, 0.4765000E+00, 0.5206800E+00, &
     & 0.9131300E+00, 0.6594644E+00, 0.1702200E+01, 0.1929900E+01, &
     & 0.1508300E+01, 0.2790996E+01, 0.4981229E+01, 0.4981229E+01 /
      data (ref_adm(12,iz, 8,18),iz = 1,20) / &
     & 0.2417300E+00, 0.2417300E+00, 0.2470718E+00, 0.2549716E+00, &
     & 0.2657076E+00, 0.2265500E+00, 0.4279600E+00, 0.3141831E+00, &
     & 0.3361867E+00, 0.3285900E+00, 0.4389400E+00, 0.5341300E+00, &
     & 0.5585736E+00, 0.9261600E+00, 0.1577300E+01, 0.1058200E+01, &
     & 0.1303500E+01, 0.2033948E+01, 0.3449197E+01, 0.3449197E+01 /
      data (ref_adm(12,iz, 9,18),iz = 1,20) / &
     & 0.2201900E+00, 0.2201900E+00, 0.2468421E+00, 0.2543585E+00, &
     & 0.2643588E+00, 0.2776369E+00, 0.2937383E+00, 0.3115089E+00, &
     & 0.3322175E+00, 0.3588819E+00, 0.3952800E+00, 0.4488896E+00, &
     & 0.5260394E+00, 0.6095579E+00, 0.8379600E+00, 0.1297400E+01, &
     & 0.1763700E+01, 0.1646050E+01, 0.2741367E+01, 0.2741367E+01 /
      data (ref_adm(12,iz,10,18),iz = 1,20) / &
     & 0.2416184E+00, 0.2416184E+00, 0.2463277E+00, 0.2533518E+00, &
     & 0.2631931E+00, 0.2754334E+00, 0.2911789E+00, 0.3088857E+00, &
     & 0.3288919E+00, 0.3763100E+00, 0.3840267E+00, 0.4342014E+00, &
     & 0.5010071E+00, 0.5705436E+00, 0.9387000E+00, 0.1331400E+01, &
     & 0.1900100E+01, 0.1507137E+01, 0.2470648E+01, 0.2470648E+01 /
      data (ref_adm(12,iz,11,18),iz = 1,20) / &
     & 0.2145300E+00, 0.2145300E+00, 0.3685600E+00, 0.2434100E+00, &
     & 0.2617148E+00, 0.2241700E+00, 0.2879542E+00, 0.3056666E+00, &
     & 0.2720700E+00, 0.3004600E+00, 0.2964000E+00, 0.4225025E+00, &
     & 0.4811466E+00, 0.5891000E+00, 0.1214800E+01, 0.1707200E+01, &
     & 0.1353200E+01, 0.1402092E+01, 0.2308859E+01, 0.2308859E+01 /
      data (ref_adm(12,iz,12,18),iz = 1,20) / &
     & 0.2240100E+00, 0.2240100E+00, 0.2479400E+00, 0.2553800E+00, &
     & 0.2601474E+00, 0.2183900E+00, 0.2602900E+00, 0.3103600E+00, &
     & 0.2486900E+00, 0.3098000E+00, 0.2973500E+00, 0.4125803E+00, &
     & 0.4665463E+00, 0.5117000E+00, 0.1031600E+01, 0.7403609E+00, &
     & 0.9212962E+00, 0.1268734E+01, 0.2079554E+01, 0.2079554E+01 /
      data (ref_adm(12,iz,13,18),iz = 1,20) / &
     & 0.2552100E+00, 0.2552100E+00, 0.2449809E+00, 0.2503479E+00, &
     & 0.2584243E+00, 0.2690064E+00, 0.3259600E+00, 0.1916100E+00, &
     & 0.2273200E+00, 0.2935400E+00, 0.3641083E+00, 0.3242500E+00, &
     & 0.4545499E+00, 0.5043495E+00, 0.5831590E+00, 0.7049718E+00, &
     & 0.8694987E+00, 0.1184620E+01, 0.1931721E+01, 0.1931721E+01 /
      data (ref_adm(12,iz,14,18),iz = 1,20) / &
     & 0.2073400E+00, 0.2073400E+00, 0.2225100E+00, 0.2496641E+00, &
     & 0.2568211E+00, 0.2693600E+00, 0.3230800E+00, 0.1897300E+00, &
     & 0.2461500E+00, 0.2562900E+00, 0.3578301E+00, 0.3963822E+00, &
     & 0.4460100E+00, 0.4916354E+00, 0.5656138E+00, 0.7026700E+00, &
     & 0.8344700E+00, 0.1131152E+01, 0.1831857E+01, 0.1831857E+01 /
      data (ref_adm(12,iz,15,18),iz = 1,20) / &
     & 0.2116700E+00, 0.2116700E+00, 0.1950500E+00, 0.1974700E+00, &
     & 0.1939600E+00, 0.2130800E+00, 0.2180200E+00, 0.2224500E+00, &
     & 0.2421400E+00, 0.2377400E+00, 0.2664800E+00, 0.2627000E+00, &
     & 0.2939500E+00, 0.3053500E+00, 0.5505296E+00, 0.8231100E+00, &
     & 0.8070968E+00, 0.1090201E+01, 0.1755311E+01, 0.1755311E+01 /
      data (ref_adm(12,iz,16,18),iz = 1,20) / &
     & 0.1992500E+00, 0.1992500E+00, 0.2073600E+00, 0.2585700E+00, &
     & 0.1961100E+00, 0.1771800E+00, 0.2145700E+00, 0.2099500E+00, &
     & 0.2006000E+00, 0.2353700E+00, 0.2340400E+00, 0.2543000E+00, &
     & 0.3038200E+00, 0.4654078E+00, 0.5337863E+00, 0.6393622E+00, &
     & 0.7810779E+00, 0.1054303E+01, 0.1689354E+01, 0.1689354E+01 /
      data (ref_adm(12,iz,17,18),iz = 1,20) / &
     & 0.2410066E+00, 0.2410066E+00, 0.2251200E+00, 0.2471315E+00, &
     & 0.2528647E+00, 0.2601374E+00, 0.2698590E+00, 0.1996300E+00, &
     & 0.2964656E+00, 0.2082700E+00, 0.2668000E+00, 0.3695547E+00, &
     & 0.4113175E+00, 0.4524291E+00, 0.5171877E+00, 0.6172542E+00, &
     & 0.7523620E+00, 0.1012256E+01, 0.1616290E+01, 0.1616290E+01 /
      data (ref_adm(12,iz,18,18),iz = 1,20) / &
     & 0.2134500E+00, 0.2134500E+00, 0.1783900E+00, 0.2118794E+00, &
     & 0.2544200E+00, 0.2205800E+00, 0.2315760E+00, 0.2252800E+00, &
     & 0.2548796E+00, 0.2705825E+00, 0.2896627E+00, 0.3195033E+00, &
     & 0.3566115E+00, 0.3940265E+00, 0.4518252E+00, 0.5425034E+00, &
     & 0.6647933E+00, 0.9005805E+00, 0.1452174E+01, 0.1452174E+01 /
      data (ref_adm(12,iz,19,18),iz = 1,20) / &
     & 0.2712800E+00, 0.2712800E+00, 0.2180100E+00, 0.2113124E+00, &
     & 0.2159990E+00, 0.2222563E+00, 0.2302271E+00, 0.2375300E+00, &
     & 0.2524205E+00, 0.2674403E+00, 0.2714000E+00, 0.3142191E+00, &
     & 0.3501314E+00, 0.3860277E+00, 0.4417453E+00, 0.5287872E+00, &
     & 0.6460760E+00, 0.8724715E+00, 0.1404799E+01, 0.1404799E+01 /
      data (ref_adm(12,iz,20,18),iz = 1,20) / &
     & 0.1866600E+00, 0.1866600E+00, 0.2079870E+00, 0.2108079E+00, &
     & 0.2240400E+00, 0.2498800E+00, 0.2290951E+00, 0.2161100E+00, &
     & 0.2509023E+00, 0.2655055E+00, 0.2832659E+00, 0.3110573E+00, &
     & 0.3459886E+00, 0.3948700E+00, 0.4371300E+00, 0.5200549E+00, &
     & 0.6342595E+00, 0.8537751E+00, 0.1378122E+01, 0.1378122E+01 /
      data (ref_adm(12,iz,21,18),iz = 1,20) / &
     & 0.2687700E+00, 0.2687700E+00, 0.2255700E+00, 0.2104737E+00, &
     & 0.2146394E+00, 0.2202110E+00, 0.2085100E+00, 0.2374155E+00, &
     & 0.2492122E+00, 0.2635176E+00, 0.2809197E+00, 0.3084939E+00, &
     & 0.3426632E+00, 0.3420000E+00, 0.4303430E+00, 0.5134207E+00, &
     & 0.6256391E+00, 0.8410479E+00, 0.1363052E+01, 0.1363052E+01 /
      data (ref_adm(12,iz,22,18),iz = 1,20) / &
     & 0.2119200E+00, 0.2119200E+00, 0.1837200E+00, 0.2492505E+00, &
     & 0.2539145E+00, 0.2603432E+00, 0.2686171E+00, 0.2925400E+00, &
     & 0.2913484E+00, 0.3061085E+00, 0.3234971E+00, 0.3493686E+00, &
     & 0.3797778E+00, 0.4082951E+00, 0.4499605E+00, 0.5099778E+00, &
     & 0.5852955E+00, 0.7256485E+00, 0.1198377E+01, 0.1198377E+01 /
      data (ref_adm(12,iz,23,18),iz = 1,20) / &
     & 0.2361300E+00, 0.2361300E+00, 0.2077500E+00, 0.2109700E+00, &
     & 0.1860900E+00, 0.2056500E+00, 0.2338400E+00, 0.2510400E+00, &
     & 0.2320400E+00, 0.2642300E+00, 0.2587000E+00, 0.3776900E+00, &
     & 0.4112100E+00, 0.3823500E+00, 0.5581000E+00, 0.5121825E+00, &
     & 0.5886250E+00, 0.7327672E+00, 0.1228178E+01, 0.1228178E+01 /
      data (ref_adm(12,iz,24,18),iz = 1,20) / &
     & 0.1810600E+00, 0.1810600E+00, 0.2209700E+00, 0.2336900E+00, &
     & 0.2163000E+00, 0.2068100E+00, 0.2419200E+00, 0.2453900E+00, &
     & 0.2691000E+00, 0.2841800E+00, 0.2936100E+00, 0.3059600E+00, &
     & 0.3145200E+00, 0.4274800E+00, 0.4889200E+00, 0.5195025E+00, &
     & 0.5987189E+00, 0.7488819E+00, 0.1272520E+01, 0.1272520E+01 /
      data (ref_adm(12,iz,25,18),iz = 1,20) / &
     & 0.2121000E+00, 0.2121000E+00, 0.1684400E+00, 0.1886600E+00, &
     & 0.2311600E+00, 0.2011600E+00, 0.3437300E+00, 0.2813814E+00, &
     & 0.2850000E+00, 0.2528400E+00, 0.2832700E+00, 0.3161900E+00, &
     & 0.3902635E+00, 0.5273300E+00, 0.4661866E+00, 0.5318735E+00, &
     & 0.6153643E+00, 0.7740074E+00, 0.1329293E+01, 0.1329293E+01 /
      data (ref_adm(12,iz,26,18),iz = 1,20) / &
     & 0.2433400E+00, 0.2433400E+00, 0.2458798E+00, 0.1916700E+00, &
     & 0.3404800E+00, 0.2620593E+00, 0.3473300E+00, 0.2833863E+00, &
     & 0.2975903E+00, 0.3146023E+00, 0.2851500E+00, 0.3645979E+00, &
     & 0.3681500E+00, 0.4327458E+00, 0.4809359E+00, 0.5511045E+00, &
     & 0.6403946E+00, 0.8102505E+00, 0.1399791E+01, 0.1399791E+01 /
      data (ref_adm(12,iz,27,18),iz = 1,20) / &
     & 0.2436200E+00, 0.2436200E+00, 0.2458909E+00, 0.2824700E+00, &
     & 0.2920100E+00, 0.2629887E+00, 0.2439000E+00, 0.2856230E+00, &
     & 0.3009920E+00, 0.3194273E+00, 0.3414324E+00, 0.3676500E+00, &
     & 0.4111427E+00, 0.4457480E+00, 0.4965780E+00, 0.5706628E+00, &
     & 0.6655338E+00, 0.8467094E+00, 0.1475206E+01, 0.1475206E+01 /
      data (ref_adm(12,iz,28,18),iz = 1,20) / &
     & 0.2444312E+00, 0.2444312E+00, 0.2222700E+00, 0.3053200E+00, &
     & 0.2351200E+00, 0.2500100E+00, 0.2920100E+00, 0.2883706E+00, &
     & 0.3052725E+00, 0.2483700E+00, 0.3490082E+00, 0.2896900E+00, &
     & 0.3631800E+00, 0.6711100E+00, 0.5124134E+00, 0.5930998E+00, &
     & 0.6563400E+00, 0.8932989E+00, 0.1561976E+01, 0.1561976E+01 /
      data (ref_adm(12,iz,29,18),iz = 1,20) / &
     & 0.2213700E+00, 0.2213700E+00, 0.2733600E+00, 0.2501344E+00, &
     & 0.2139200E+00, 0.2633000E+00, 0.2689500E+00, 0.2916784E+00, &
     & 0.2676900E+00, 0.2988500E+00, 0.3301600E+00, 0.3908323E+00, &
     & 0.3983000E+00, 0.4351200E+00, 0.5410578E+00, 0.6394113E+00, &
     & 0.7636946E+00, 0.9895946E+00, 0.1684960E+01, 0.1684960E+01 /
      data (ref_adm(12,iz,30,18),iz = 1,20) / &
     & 0.2353500E+00, 0.2353500E+00, 0.2394300E+00, 0.1864300E+00, &
     & 0.2571859E+00, 0.2665601E+00, 0.3077700E+00, 0.2843500E+00, &
     & 0.3150282E+00, 0.3371199E+00, 0.3465600E+00, 0.4027177E+00, &
     & 0.4572622E+00, 0.5924400E+00, 0.5985012E+00, 0.7076269E+00, &
     & 0.8360725E+00, 0.1076575E+01, 0.1801113E+01, 0.1801113E+01 /
      data (ref_adm(12,iz,31,18),iz = 1,20) / &
     & 0.1805400E+00, 0.1805400E+00, 0.2462258E+00, 0.2050500E+00, &
     & 0.2280300E+00, 0.2678072E+00, 0.2813133E+00, 0.2770200E+00, &
     & 0.3898700E+00, 0.4818300E+00, 0.3408800E+00, 0.4191900E+00, &
     & 0.4158400E+00, 0.4285100E+00, 0.6328800E+00, 0.6624800E+00, &
     & 0.8148494E+00, 0.1052054E+01, 0.1829350E+01, 0.1829350E+01 /
      data (ref_adm(12,iz,32,18),iz = 1,20) / &
     & 0.2443886E+00, 0.2443886E+00, 0.2462911E+00, 0.2509749E+00, &
     & 0.2431300E+00, 0.2690248E+00, 0.2802900E+00, 0.3702200E+00, &
     & 0.3227395E+00, 0.3522700E+00, 0.3763900E+00, 0.4517902E+00, &
     & 0.4999700E+00, 0.5437356E+00, 0.5414700E+00, 0.1099600E+01, &
     & 0.8269895E+00, 0.1074261E+01, 0.1887210E+01, 0.1887210E+01 /
      data (ref_adm(12,iz,33,18),iz = 1,20) / &
     & 0.2328200E+00, 0.2328200E+00, 0.2025800E+00, 0.2124300E+00, &
     & 0.2290200E+00, 0.2641800E+00, 0.2805000E+00, 0.3477300E+00, &
     & 0.3949500E+00, 0.4516200E+00, 0.4838700E+00, 0.4763800E+00, &
     & 0.5114300E+00, 0.8152000E+00, 0.6317200E+00, 0.7206700E+00, &
     & 0.8395891E+00, 0.1092477E+01, 0.1940779E+01, 0.1940779E+01 /
      data (ref_adm(12,iz,34,18),iz = 1,20) / &
     & 0.3286900E+00, 0.3286900E+00, 0.3130900E+00, 0.3385300E+00, &
     & 0.2815800E+00, 0.2471900E+00, 0.3161200E+00, 0.2904800E+00, &
     & 0.3656100E+00, 0.4276200E+00, 0.4771500E+00, 0.4653131E+00, &
     & 0.4990671E+00, 0.5452118E+00, 0.9961100E+00, 0.7139729E+00, &
     & 0.8456457E+00, 0.1103130E+01, 0.1981257E+01, 0.1981257E+01 /
      data (ref_adm(12,iz,35,18),iz = 1,20) / &
     & 0.2443665E+00, 0.2443665E+00, 0.2411400E+00, 0.2412400E+00, &
     & 0.2875600E+00, 0.2493200E+00, 0.2106100E+00, 0.2712700E+00, &
     & 0.3686800E+00, 0.4053400E+00, 0.4308259E+00, 0.4862100E+00, &
     & 0.3940100E+00, 0.5492879E+00, 0.1122300E+01, 0.7175307E+00, &
     & 0.8525195E+00, 0.1117036E+01, 0.2018506E+01, 0.2018506E+01 /
      data (ref_adm(12,iz,36,18),iz = 1,20) / &
     & 0.1923000E+00, 0.1923000E+00, 0.2593300E+00, 0.2215800E+00, &
     & 0.2603253E+00, 0.2727507E+00, 0.2899350E+00, 0.2492000E+00, &
     & 0.2879100E+00, 0.3662600E+00, 0.4342802E+00, 0.4582426E+00, &
     & 0.4814000E+00, 0.6682500E+00, 0.9527000E+00, 0.1004400E+01, &
     & 0.1282700E+01, 0.1141969E+01, 0.2057367E+01, 0.2057367E+01 /
      data (ref_adm(12,iz,37,18),iz = 1,20) / &
     & 0.2670500E+00, 0.2670500E+00, 0.2364500E+00, 0.2518939E+00, &
     & 0.2605286E+00, 0.2730985E+00, 0.2904517E+00, 0.2345600E+00, &
     & 0.2628700E+00, 0.2936000E+00, 0.5557300E+00, 0.4522700E+00, &
     & 0.6633700E+00, 0.6278800E+00, 0.6703700E+00, 0.8192400E+00, &
     & 0.8740019E+00, 0.1219065E+01, 0.2128175E+01, 0.2128175E+01 /
      data (ref_adm(12,iz,38,18),iz = 1,20) / &
     & 0.2670500E+00, 0.2670500E+00, 0.2364500E+00, 0.2518939E+00, &
     & 0.2605286E+00, 0.2730985E+00, 0.2904517E+00, 0.2345600E+00, &
     & 0.2628700E+00, 0.2936000E+00, 0.5557300E+00, 0.4522700E+00, &
     & 0.6633700E+00, 0.6278800E+00, 0.6703700E+00, 0.8192400E+00, &
     & 0.8740019E+00, 0.1219065E+01, 0.2128175E+01, 0.2128175E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(13,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(13,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(13,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9999000E+04
      data (ref_adm(13,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.9977200E+04
      data (ref_adm(13,iz, 1, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 2, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 3, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 4, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 5, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 6, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 7, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 8, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz, 9, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     & 0.1137100E+00,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,10, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,11, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,12, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,13, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,14, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,15, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,16, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,17, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,22, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,23, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,24, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,25, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,26, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,27, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,28, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,29, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,30, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,31, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,32, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,33, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,34, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,35, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,36, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,37, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,38, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 25.0 Albedo -0.4448202E+04
      data (ref_adm(13,iz, 1, 6),iz = 1,20) / &
     & 0.1531685E+00, 0.1531685E+00, 0.1504275E+00, 0.1494780E+00, &
     & 0.1487276E+00, 0.1482143E+00, 0.1473096E+00, 0.1457683E+00, &
     & 0.1437885E+00, 0.1414180E+00, 0.1388396E+00, 0.1352601E+00, &
     & 0.1310821E+00, 0.1271477E+00, 0.1214978E+00, 0.1140574E+00, &
     & 0.1063814E+00, 0.9633811E-01, 0.7860442E-01, 0.7860442E-01 /
      data (ref_adm(13,iz, 2, 6),iz = 1,20) / &
     & 0.1531685E+00, 0.1531685E+00, 0.1504275E+00, 0.1494780E+00, &
     & 0.1487276E+00, 0.1482143E+00, 0.1473096E+00, 0.1457683E+00, &
     & 0.1437885E+00, 0.1414180E+00, 0.1388396E+00, 0.1352601E+00, &
     & 0.1310821E+00, 0.1271477E+00, 0.1214978E+00, 0.1140574E+00, &
     & 0.1063814E+00, 0.9633811E-01, 0.7860442E-01, 0.7860442E-01 /
      data (ref_adm(13,iz, 3, 6),iz = 1,20) / &
     & 0.1531685E+00, 0.1531685E+00, 0.1504275E+00, 0.1494781E+00, &
     & 0.1487276E+00, 0.1482143E+00, 0.1473096E+00, 0.1457682E+00, &
     & 0.1437885E+00, 0.1414180E+00, 0.1388396E+00, 0.1352601E+00, &
     & 0.1310821E+00, 0.1271477E+00, 0.1214978E+00, 0.1140574E+00, &
     & 0.1063814E+00, 0.9633811E-01, 0.7860442E-01, 0.7860442E-01 /
      data (ref_adm(13,iz, 4, 6),iz = 1,20) / &
     & 0.1531685E+00, 0.1531685E+00, 0.1504275E+00, 0.1494780E+00, &
     & 0.1487276E+00, 0.1482143E+00, 0.1473096E+00, 0.1457683E+00, &
     & 0.1437885E+00, 0.1414180E+00, 0.1388396E+00, 0.1352601E+00, &
     & 0.1310821E+00, 0.1271477E+00, 0.1214978E+00, 0.1140574E+00, &
     & 0.1063814E+00, 0.9633811E-01, 0.7860442E-01, 0.7860442E-01 /
      data (ref_adm(13,iz, 5, 6),iz = 1,20) / &
     & 0.1531685E+00, 0.1531685E+00, 0.1504275E+00, 0.1494781E+00, &
     & 0.1487276E+00, 0.1482143E+00, 0.1473096E+00, 0.1457682E+00, &
     & 0.1437885E+00, 0.1414180E+00, 0.1388396E+00, 0.1352601E+00, &
     & 0.1310821E+00, 0.1271477E+00, 0.1214978E+00, 0.1140574E+00, &
     & 0.1063814E+00, 0.9633811E-01, 0.7860442E-01, 0.7860442E-01 /
      data (ref_adm(13,iz, 6, 6),iz = 1,20) / &
     & 0.1531685E+00, 0.1531685E+00, 0.1504275E+00, 0.1494780E+00, &
     & 0.1487276E+00, 0.1482143E+00, 0.1473096E+00, 0.1457683E+00, &
     & 0.1437885E+00, 0.1414180E+00, 0.1388396E+00, 0.1352601E+00, &
     & 0.1310821E+00, 0.1271477E+00, 0.1214978E+00, 0.1140574E+00, &
     & 0.1063814E+00, 0.9633811E-01, 0.7860442E-01, 0.7860442E-01 /
      data (ref_adm(13,iz, 7, 6),iz = 1,20) / &
     & 0.1531685E+00, 0.1531685E+00, 0.1504275E+00, 0.1494781E+00, &
     & 0.1487276E+00, 0.1482143E+00, 0.1473096E+00, 0.1864100E+00, &
     & 0.1437885E+00, 0.1414180E+00, 0.1388396E+00, 0.1352601E+00, &
     & 0.1310821E+00, 0.1271477E+00, 0.1214978E+00, 0.1140574E+00, &
     & 0.1063814E+00, 0.9633811E-01, 0.7860442E-01, 0.7860442E-01 /
      data (ref_adm(13,iz, 8, 6),iz = 1,20) / &
     & 0.1531685E+00, 0.1531685E+00, 0.1504275E+00, 0.1494780E+00, &
     & 0.1487276E+00, 0.1482143E+00, 0.1473096E+00, 0.1457683E+00, &
     & 0.1437885E+00, 0.1414180E+00, 0.1388396E+00, 0.1352601E+00, &
     & 0.1310821E+00, 0.1271477E+00, 0.1214978E+00, 0.1140574E+00, &
     & 0.1063814E+00, 0.9633811E-01, 0.7860442E-01, 0.7860442E-01 /
      data (ref_adm(13,iz, 9, 6),iz = 1,20) / &
     & 0.1531685E+00, 0.1531685E+00, 0.1504275E+00, 0.1494781E+00, &
     & 0.1487276E+00, 0.1482143E+00, 0.1473096E+00, 0.1457682E+00, &
     & 0.1437885E+00, 0.1414180E+00, 0.1388396E+00, 0.1352601E+00, &
     & 0.1310821E+00, 0.1271477E+00, 0.1214978E+00, 0.1140574E+00, &
     & 0.1063814E+00, 0.9633811E-01, 0.7860442E-01, 0.7860442E-01 /
      data (ref_adm(13,iz,10, 6),iz = 1,20) / &
     & 0.1531685E+00, 0.1531685E+00, 0.1504275E+00, 0.1494780E+00, &
     & 0.1487276E+00, 0.1687400E+00, 0.1473096E+00, 0.1457683E+00, &
     & 0.1437885E+00, 0.1414180E+00, 0.1388396E+00, 0.1352601E+00, &
     & 0.1310821E+00, 0.1271477E+00, 0.1214978E+00, 0.1140574E+00, &
     & 0.1063814E+00, 0.9633811E-01, 0.7860442E-01, 0.7860442E-01 /
      data (ref_adm(13,iz,11, 6),iz = 1,20) / &
     & 0.1531685E+00, 0.1531685E+00, 0.1504275E+00, 0.1494781E+00, &
     & 0.1487276E+00, 0.1482143E+00, 0.1473096E+00, 0.1457682E+00, &
     & 0.1437885E+00, 0.1414180E+00, 0.1388396E+00, 0.1352601E+00, &
     & 0.1310821E+00, 0.1271477E+00, 0.1214978E+00, 0.1140574E+00, &
     & 0.1063814E+00, 0.9633811E-01, 0.7860442E-01, 0.7860442E-01 /
      data (ref_adm(13,iz,12, 6),iz = 1,20) / &
     & 0.1531685E+00, 0.1531685E+00, 0.1504275E+00, 0.1494780E+00, &
     & 0.1487276E+00, 0.1482143E+00, 0.1473096E+00, 0.1457683E+00, &
     & 0.1437885E+00, 0.1414180E+00, 0.1388396E+00, 0.1352601E+00, &
     & 0.1310821E+00, 0.1271477E+00, 0.1214978E+00, 0.1140574E+00, &
     & 0.1063814E+00, 0.9633811E-01, 0.7860442E-01, 0.7860442E-01 /
      data (ref_adm(13,iz,13, 6),iz = 1,20) / &
     & 0.1531685E+00, 0.1531685E+00, 0.1504275E+00, 0.1494781E+00, &
     & 0.1487276E+00, 0.1482143E+00, 0.1473096E+00, 0.9693400E-01, &
     & 0.1437885E+00, 0.1414180E+00, 0.1388396E+00, 0.1352601E+00, &
     & 0.1310821E+00, 0.1271477E+00, 0.1214978E+00, 0.1140574E+00, &
     & 0.1063814E+00, 0.9633811E-01, 0.7860442E-01, 0.7860442E-01 /
      data (ref_adm(13,iz,14, 6),iz = 1,20) / &
     & 0.1531685E+00, 0.1531685E+00, 0.1504275E+00, 0.1494780E+00, &
     & 0.1487276E+00, 0.1482143E+00, 0.1473096E+00, 0.1457683E+00, &
     & 0.1437885E+00, 0.1414180E+00, 0.1388396E+00, 0.1352601E+00, &
     & 0.1310821E+00, 0.1271477E+00, 0.1214978E+00, 0.1140574E+00, &
     & 0.1063814E+00, 0.9633811E-01, 0.7860442E-01, 0.7860442E-01 /
      data (ref_adm(13,iz,15, 6),iz = 1,20) / &
     & 0.1531685E+00, 0.1531685E+00, 0.1504275E+00, 0.1494781E+00, &
     & 0.1487276E+00, 0.1482143E+00, 0.1473096E+00, 0.1457682E+00, &
     & 0.1437885E+00, 0.1414180E+00, 0.1388396E+00, 0.1352601E+00, &
     & 0.1310821E+00, 0.1271477E+00, 0.1214978E+00, 0.1140574E+00, &
     & 0.1063814E+00, 0.9633811E-01, 0.7860442E-01, 0.7860442E-01 /
      data (ref_adm(13,iz,16, 6),iz = 1,20) / &
     & 0.1531685E+00, 0.1531685E+00, 0.1504275E+00, 0.1494780E+00, &
     & 0.1487276E+00, 0.1482143E+00, 0.1473096E+00, 0.1457683E+00, &
     & 0.1437885E+00, 0.1346300E+00, 0.1388396E+00, 0.1352601E+00, &
     & 0.1310821E+00, 0.1271477E+00, 0.1214978E+00, 0.1140574E+00, &
     & 0.1063814E+00, 0.9633811E-01, 0.7860442E-01, 0.7860442E-01 /
      data (ref_adm(13,iz,17, 6),iz = 1,20) / &
     & 0.1531685E+00, 0.1531685E+00, 0.1452700E+00, 0.1494781E+00, &
     & 0.1487276E+00, 0.1482143E+00, 0.1473096E+00, 0.1457682E+00, &
     & 0.1437885E+00, 0.1414180E+00, 0.1388396E+00, 0.1352601E+00, &
     & 0.1310821E+00, 0.1271477E+00, 0.1214978E+00, 0.1140574E+00, &
     & 0.1063814E+00, 0.9633811E-01, 0.7860442E-01, 0.7860442E-01 /
      data (ref_adm(13,iz,18, 6),iz = 1,20) / &
     & 0.1448384E+00, 0.1448384E+00, 0.1440398E+00, 0.1431802E+00, &
     & 0.1420739E+00, 0.1409723E+00, 0.1402767E+00, 0.1400012E+00, &
     & 0.1403942E+00, 0.1414198E+00, 0.1433300E+00, 0.1466664E+00, &
     & 0.1513014E+00, 0.1560205E+00, 0.1629785E+00, 0.1726243E+00, &
     & 0.1832646E+00, 0.1971781E+00, 0.2050357E+00, 0.2050357E+00 /
      data (ref_adm(13,iz,19, 6),iz = 1,20) / &
     & 0.1449742E+00, 0.1449742E+00, 0.1445023E+00, 0.1439540E+00, &
     & 0.1402500E+00, 0.1422674E+00, 0.1416372E+00, 0.1414005E+00, &
     & 0.1417934E+00, 0.1428327E+00, 0.1446095E+00, 0.1479571E+00, &
     & 0.1523509E+00, 0.1569189E+00, 0.1636869E+00, 0.1729928E+00, &
     & 0.1833356E+00, 0.1967569E+00, 0.2040125E+00, 0.2040125E+00 /
      data (ref_adm(13,iz,20, 6),iz = 1,20) / &
     & 0.1450936E+00, 0.1450936E+00, 0.1450126E+00, 0.1543000E+00, &
     & 0.1406300E+00, 0.1436555E+00, 0.1431163E+00, 0.1429630E+00, &
     & 0.1432983E+00, 0.1443444E+00, 0.1460134E+00, 0.1492875E+00, &
     & 0.1535465E+00, 0.1579159E+00, 0.1645080E+00, 0.1735425E+00, &
     & 0.1835406E+00, 0.1964172E+00, 0.2032367E+00, 0.2032367E+00 /
      data (ref_adm(13,iz,21, 6),iz = 1,20) / &
     & 0.1452535E+00, 0.1452535E+00, 0.1455248E+00, 0.1455739E+00, &
     & 0.1454554E+00, 0.1450811E+00, 0.1446460E+00, 0.1446120E+00, &
     & 0.1449623E+00, 0.1459252E+00, 0.1475222E+00, 0.1507113E+00, &
     & 0.1548471E+00, 0.1590539E+00, 0.1653909E+00, 0.1741450E+00, &
     & 0.1838638E+00, 0.1961940E+00, 0.2025995E+00, 0.2025995E+00 /
      data (ref_adm(13,iz,22, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,23, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,24, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,25, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,26, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,27, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,28, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,29, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,30, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,31, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,32, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,33, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,34, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,35, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,36, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,37, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(13,iz,38, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 30.0 Albedo  0.1286084E+00
      data (ref_adm(13,iz, 1, 7),iz = 1,20) / &
     & 0.1497017E+00, 0.1497017E+00, 0.1470227E+00, 0.1460947E+00, &
     & 0.1453612E+00, 0.1448595E+00, 0.1439753E+00, 0.1424689E+00, &
     & 0.1405340E+00, 0.1382171E+00, 0.1356971E+00, 0.1321986E+00, &
     & 0.1281151E+00, 0.1242698E+00, 0.1187478E+00, 0.1114758E+00, &
     & 0.1039736E+00, 0.9415756E-01, 0.7682528E-01, 0.7682528E-01 /
      data (ref_adm(13,iz, 2, 7),iz = 1,20) / &
     & 0.1497017E+00, 0.1497017E+00, 0.1470227E+00, 0.1460947E+00, &
     & 0.1453612E+00, 0.1448595E+00, 0.1439753E+00, 0.1424689E+00, &
     & 0.1405340E+00, 0.1382171E+00, 0.1356971E+00, 0.1321986E+00, &
     & 0.1281151E+00, 0.1242698E+00, 0.1187478E+00, 0.1114758E+00, &
     & 0.1039736E+00, 0.9415756E-01, 0.7682528E-01, 0.7682528E-01 /
      data (ref_adm(13,iz, 3, 7),iz = 1,20) / &
     & 0.1497017E+00, 0.1497017E+00, 0.1470227E+00, 0.1460947E+00, &
     & 0.1453612E+00, 0.1448595E+00, 0.1439753E+00, 0.1424689E+00, &
     & 0.1405340E+00, 0.1382171E+00, 0.1356971E+00, 0.1321986E+00, &
     & 0.1281151E+00, 0.1242698E+00, 0.1187478E+00, 0.1114758E+00, &
     & 0.1039736E+00, 0.9415756E-01, 0.7682528E-01, 0.7682528E-01 /
      data (ref_adm(13,iz, 4, 7),iz = 1,20) / &
     & 0.1497017E+00, 0.1497017E+00, 0.1470227E+00, 0.1460947E+00, &
     & 0.1453612E+00, 0.1448595E+00, 0.1439753E+00, 0.1424689E+00, &
     & 0.1405340E+00, 0.1382171E+00, 0.1356971E+00, 0.1321986E+00, &
     & 0.1281151E+00, 0.1242698E+00, 0.1187478E+00, 0.1114758E+00, &
     & 0.1039736E+00, 0.9415756E-01, 0.7682528E-01, 0.7682528E-01 /
      data (ref_adm(13,iz, 5, 7),iz = 1,20) / &
     & 0.1497017E+00, 0.1497017E+00, 0.1470227E+00, 0.1460947E+00, &
     & 0.1453612E+00, 0.1448595E+00, 0.1439753E+00, 0.1424689E+00, &
     & 0.1405340E+00, 0.1382171E+00, 0.1356971E+00, 0.1321986E+00, &
     & 0.1281151E+00, 0.1242698E+00, 0.1187478E+00, 0.1114758E+00, &
     & 0.1039736E+00, 0.9415756E-01, 0.7682528E-01, 0.7682528E-01 /
      data (ref_adm(13,iz, 6, 7),iz = 1,20) / &
     & 0.1497017E+00, 0.1497017E+00, 0.1470227E+00, 0.1460947E+00, &
     & 0.1453612E+00, 0.1448595E+00, 0.1439753E+00, 0.1424689E+00, &
     & 0.1405340E+00, 0.1382171E+00, 0.1356971E+00, 0.1321986E+00, &
     & 0.1281151E+00, 0.1242698E+00, 0.1187478E+00, 0.1114758E+00, &
     & 0.1039736E+00, 0.9415756E-01, 0.7682528E-01, 0.7682528E-01 /
      data (ref_adm(13,iz, 7, 7),iz = 1,20) / &
     & 0.1497017E+00, 0.1497017E+00, 0.1470227E+00, 0.1460947E+00, &
     & 0.1453612E+00, 0.1448595E+00, 0.1439753E+00, 0.1424689E+00, &
     & 0.1405340E+00, 0.1382171E+00, 0.1356971E+00, 0.1321986E+00, &
     & 0.1281151E+00, 0.1242698E+00, 0.1187478E+00, 0.1114758E+00, &
     & 0.1039736E+00, 0.9415756E-01, 0.7682528E-01, 0.7682528E-01 /
      data (ref_adm(13,iz, 8, 7),iz = 1,20) / &
     & 0.1497017E+00, 0.1497017E+00, 0.1470227E+00, 0.1460947E+00, &
     & 0.1453612E+00, 0.1448595E+00, 0.1439753E+00, 0.1424689E+00, &
     & 0.1405340E+00, 0.1382171E+00, 0.1356971E+00, 0.1321986E+00, &
     & 0.1281151E+00, 0.1242698E+00, 0.1187478E+00, 0.1625300E+00, &
     & 0.1039736E+00, 0.9415756E-01, 0.7682528E-01, 0.7682528E-01 /
      data (ref_adm(13,iz, 9, 7),iz = 1,20) / &
     & 0.1497017E+00, 0.1497017E+00, 0.1470227E+00, 0.1460947E+00, &
     & 0.1453612E+00, 0.1448595E+00, 0.1439753E+00, 0.1424689E+00, &
     & 0.1405340E+00, 0.1382171E+00, 0.1356971E+00, 0.1321986E+00, &
     & 0.1281151E+00, 0.1242698E+00, 0.1187478E+00, 0.1114758E+00, &
     & 0.1039736E+00, 0.9415756E-01, 0.7682528E-01, 0.7682528E-01 /
      data (ref_adm(13,iz,10, 7),iz = 1,20) / &
     & 0.1497017E+00, 0.1497017E+00, 0.1470227E+00, 0.1460947E+00, &
     & 0.1453612E+00, 0.1448595E+00, 0.1439753E+00, 0.1424689E+00, &
     & 0.1405340E+00, 0.1382171E+00, 0.1356971E+00, 0.1321986E+00, &
     & 0.1281151E+00, 0.1242698E+00, 0.1187478E+00, 0.1114758E+00, &
     & 0.1039736E+00, 0.9415756E-01, 0.7682528E-01, 0.7682528E-01 /
      data (ref_adm(13,iz,11, 7),iz = 1,20) / &
     & 0.1497017E+00, 0.1497017E+00, 0.1470227E+00, 0.1460947E+00, &
     & 0.1453612E+00, 0.1629300E+00, 0.1236400E+00, 0.1066700E+00, &
     & 0.1405340E+00, 0.1382171E+00, 0.1356971E+00, 0.1321986E+00, &
     & 0.1281151E+00, 0.1242698E+00, 0.1187478E+00, 0.1114758E+00, &
     & 0.1039736E+00, 0.9415756E-01, 0.7682528E-01, 0.7682528E-01 /
      data (ref_adm(13,iz,12, 7),iz = 1,20) / &
     & 0.1497017E+00, 0.1497017E+00, 0.1470227E+00, 0.1460947E+00, &
     & 0.1453612E+00, 0.1448595E+00, 0.1439753E+00, 0.1898500E+00, &
     & 0.1405340E+00, 0.1382171E+00, 0.1356971E+00, 0.1321986E+00, &
     & 0.1281151E+00, 0.1242698E+00, 0.1187478E+00, 0.1114758E+00, &
     & 0.1039736E+00, 0.9415756E-01, 0.7682528E-01, 0.7682528E-01 /
      data (ref_adm(13,iz,13, 7),iz = 1,20) / &
     & 0.1497017E+00, 0.1497017E+00, 0.1470227E+00, 0.1460947E+00, &
     & 0.1453612E+00, 0.1448595E+00, 0.9486600E-01, 0.1365300E+00, &
     & 0.1405340E+00, 0.1122300E+00, 0.1265700E+00, 0.1446800E+00, &
     & 0.1281151E+00, 0.1242698E+00, 0.1187478E+00, 0.1114758E+00, &
     & 0.1039736E+00, 0.9415756E-01, 0.7682528E-01, 0.7682528E-01 /
      data (ref_adm(13,iz,14, 7),iz = 1,20) / &
     & 0.1497017E+00, 0.1497017E+00, 0.1470227E+00, 0.1460947E+00, &
     & 0.1453612E+00, 0.1448595E+00, 0.1439753E+00, 0.1424689E+00, &
     & 0.1405340E+00, 0.1382171E+00, 0.1182400E+00, 0.1286800E+00, &
     & 0.1281151E+00, 0.1242698E+00, 0.1187478E+00, 0.1114758E+00, &
     & 0.1039736E+00, 0.9415756E-01, 0.7682528E-01, 0.7682528E-01 /
      data (ref_adm(13,iz,15, 7),iz = 1,20) / &
     & 0.9925400E-01, 0.9925400E-01, 0.1470227E+00, 0.1460947E+00, &
     & 0.1453612E+00, 0.1448595E+00, 0.1439753E+00, 0.1424689E+00, &
     & 0.1405340E+00, 0.1382171E+00, 0.1356971E+00, 0.1321986E+00, &
     & 0.1281151E+00, 0.1242698E+00, 0.1187478E+00, 0.1114758E+00, &
     & 0.1039736E+00, 0.9415756E-01, 0.7682528E-01, 0.7682528E-01 /
      data (ref_adm(13,iz,16, 7),iz = 1,20) / &
     & 0.1497017E+00, 0.1497017E+00, 0.1470227E+00, 0.1460947E+00, &
     & 0.1453612E+00, 0.1951700E+00, 0.1439753E+00, 0.1788400E+00, &
     & 0.1405340E+00, 0.1382171E+00, 0.1356971E+00, 0.1321986E+00, &
     & 0.1281151E+00, 0.1242698E+00, 0.1187478E+00, 0.1114758E+00, &
     & 0.1039736E+00, 0.9415756E-01, 0.7682528E-01, 0.7682528E-01 /
      data (ref_adm(13,iz,17, 7),iz = 1,20) / &
     & 0.1497017E+00, 0.1497017E+00, 0.1470227E+00, 0.1460947E+00, &
     & 0.1453612E+00, 0.1448595E+00, 0.1439753E+00, 0.1297200E+00, &
     & 0.1405340E+00, 0.1382171E+00, 0.1356971E+00, 0.1321986E+00, &
     & 0.1281151E+00, 0.1242698E+00, 0.1187478E+00, 0.1114758E+00, &
     & 0.1039736E+00, 0.9415756E-01, 0.7682528E-01, 0.7682528E-01 /
      data (ref_adm(13,iz,18, 7),iz = 1,20) / &
     & 0.1366845E+00, 0.1366845E+00, 0.1346043E+00, 0.1328107E+00, &
     & 0.1315775E+00, 0.1304774E+00, 0.1156700E+00, 0.1209000E+00, &
     & 0.1278605E+00, 0.1281756E+00, 0.1291435E+00, 0.1314927E+00, &
     & 0.1347878E+00, 0.1383208E+00, 0.1438128E+00, 0.1514356E+00, &
     & 0.1600126E+00, 0.1712402E+00, 0.1773906E+00, 0.1773906E+00 /
      data (ref_adm(13,iz,19, 7),iz = 1,20) / &
     & 0.1368392E+00, 0.1368392E+00, 0.1350379E+00, 0.1333228E+00, &
     & 0.1321037E+00, 0.1311324E+00, 0.1299310E+00, 0.9798100E-01, &
     & 0.1286319E+00, 0.1288798E+00, 0.1298457E+00, 0.1321323E+00, &
     & 0.1353473E+00, 0.1388333E+00, 0.1441782E+00, 0.1516438E+00, &
     & 0.1600694E+00, 0.1711219E+00, 0.1770158E+00, 0.1770158E+00 /
      data (ref_adm(13,iz,20, 7),iz = 1,20) / &
     & 0.1369773E+00, 0.1369773E+00, 0.1355318E+00, 0.1338358E+00, &
     & 0.1326504E+00, 0.1317992E+00, 0.1307119E+00, 0.1298206E+00, &
     & 0.1294014E+00, 0.1296342E+00, 0.1305477E+00, 0.1327913E+00, &
     & 0.1359449E+00, 0.1393123E+00, 0.1445801E+00, 0.1519054E+00, &
     & 0.1602020E+00, 0.1709536E+00, 0.1767178E+00, 0.1767178E+00 /
      data (ref_adm(13,iz,21, 7),iz = 1,20) / &
     & 0.1371382E+00, 0.1371382E+00, 0.1360354E+00, 0.1344341E+00, &
     & 0.1331973E+00, 0.1324635E+00, 0.1315307E+00, 0.1306078E+00, &
     & 0.1302388E+00, 0.1304331E+00, 0.1313055E+00, 0.1334544E+00, &
     & 0.1365806E+00, 0.1398638E+00, 0.1449825E+00, 0.1522293E+00, &
     & 0.1603780E+00, 0.1708143E+00, 0.1763701E+00, 0.1763701E+00 /
      data (ref_adm(13,iz,22, 7),iz = 1,20) / &
     & 0.1387108E+00, 0.1387108E+00, 0.1362285E+00, 0.1353687E+00, &
     & 0.1346890E+00, 0.1342242E+00, 0.1334049E+00, 0.1320091E+00, &
     & 0.1302162E+00, 0.1095700E+00, 0.1257345E+00, 0.1224928E+00, &
     & 0.1187091E+00, 0.1151461E+00, 0.1100295E+00, 0.1032914E+00, &
     & 0.9633996E-01, 0.8724467E-01, 0.7118488E-01, 0.7118488E-01 /
      data (ref_adm(13,iz,23, 7),iz = 1,20) / &
     & 0.1387108E+00, 0.1387108E+00, 0.1362285E+00, 0.1353687E+00, &
     & 0.1346890E+00, 0.1342242E+00, 0.1334049E+00, 0.1320090E+00, &
     & 0.1302162E+00, 0.1280694E+00, 0.1310700E+00, 0.1224928E+00, &
     & 0.1187091E+00, 0.1151461E+00, 0.1100295E+00, 0.1032914E+00, &
     & 0.9633996E-01, 0.8724467E-01, 0.7118488E-01, 0.7118488E-01 /
      data (ref_adm(13,iz,24, 7),iz = 1,20) / &
     & 0.1387108E+00, 0.1387108E+00, 0.1362285E+00, 0.1353687E+00, &
     & 0.1346890E+00, 0.1342242E+00, 0.1334049E+00, 0.1320091E+00, &
     & 0.1302162E+00, 0.1280694E+00, 0.1257345E+00, 0.1224928E+00, &
     & 0.1187091E+00, 0.1151461E+00, 0.1100295E+00, 0.1032914E+00, &
     & 0.9633996E-01, 0.8724467E-01, 0.7118488E-01, 0.7118488E-01 /
      data (ref_adm(13,iz,25, 7),iz = 1,20) / &
     & 0.1387108E+00, 0.1387108E+00, 0.1362285E+00, 0.1353687E+00, &
     & 0.1346890E+00, 0.1342242E+00, 0.1334049E+00, 0.1320090E+00, &
     & 0.1302162E+00, 0.1280694E+00, 0.1257344E+00, 0.1224928E+00, &
     & 0.1187091E+00, 0.1151461E+00, 0.1447200E+00, 0.1032914E+00, &
     & 0.9633996E-01, 0.8724467E-01, 0.7118488E-01, 0.7118488E-01 /
      data (ref_adm(13,iz,26, 7),iz = 1,20) / &
     & 0.1387108E+00, 0.1387108E+00, 0.1362285E+00, 0.1353687E+00, &
     & 0.1346890E+00, 0.1342242E+00, 0.1334049E+00, 0.1320091E+00, &
     & 0.1302162E+00, 0.1280694E+00, 0.1257345E+00, 0.1224928E+00, &
     & 0.1187091E+00, 0.1151461E+00, 0.1100295E+00, 0.1032914E+00, &
     & 0.9633996E-01, 0.8724467E-01, 0.7118488E-01, 0.7118488E-01 /
      data (ref_adm(13,iz,27, 7),iz = 1,20) / &
     & 0.1387108E+00, 0.1387108E+00, 0.1362285E+00, 0.1353687E+00, &
     & 0.1207900E+00, 0.1342242E+00, 0.1334049E+00, 0.1320090E+00, &
     & 0.1302162E+00, 0.1280694E+00, 0.1257344E+00, 0.1224928E+00, &
     & 0.1187091E+00, 0.1151461E+00, 0.1100295E+00, 0.1032914E+00, &
     & 0.9633996E-01, 0.8724467E-01, 0.7118488E-01, 0.7118488E-01 /
      data (ref_adm(13,iz,28, 7),iz = 1,20) / &
     & 0.1387108E+00, 0.1387108E+00, 0.1362285E+00, 0.1401900E+00, &
     & 0.1346890E+00, 0.1342242E+00, 0.1334049E+00, 0.1320091E+00, &
     & 0.1302162E+00, 0.1198500E+00, 0.1257345E+00, 0.1224928E+00, &
     & 0.1187091E+00, 0.1151461E+00, 0.1100295E+00, 0.1032914E+00, &
     & 0.9633996E-01, 0.8724467E-01, 0.7118488E-01, 0.7118488E-01 /
      data (ref_adm(13,iz,29, 7),iz = 1,20) / &
     & 0.1387108E+00, 0.1387108E+00, 0.1362285E+00, 0.1353687E+00, &
     & 0.1346890E+00, 0.1342242E+00, 0.1334049E+00, 0.1320090E+00, &
     & 0.1302162E+00, 0.1280694E+00, 0.1257344E+00, 0.1224928E+00, &
     & 0.1187091E+00, 0.1151461E+00, 0.1100295E+00, 0.1032914E+00, &
     & 0.9633996E-01, 0.8724467E-01, 0.7118488E-01, 0.7118488E-01 /
      data (ref_adm(13,iz,30, 7),iz = 1,20) / &
     & 0.1387108E+00, 0.1387108E+00, 0.1362285E+00, 0.1353687E+00, &
     & 0.1346890E+00, 0.1342242E+00, 0.1334049E+00, 0.1320091E+00, &
     & 0.1302162E+00, 0.1280694E+00, 0.1257345E+00, 0.1224928E+00, &
     & 0.1187091E+00, 0.1151461E+00, 0.1100295E+00, 0.1032914E+00, &
     & 0.9633996E-01, 0.8724467E-01, 0.7118488E-01, 0.7118488E-01 /
      data (ref_adm(13,iz,31, 7),iz = 1,20) / &
     & 0.1387108E+00, 0.1387108E+00, 0.1362285E+00, 0.1353687E+00, &
     & 0.1346890E+00, 0.1342242E+00, 0.1334049E+00, 0.1320090E+00, &
     & 0.1302162E+00, 0.1280694E+00, 0.1257344E+00, 0.1224928E+00, &
     & 0.1187091E+00, 0.1151461E+00, 0.1100295E+00, 0.1032914E+00, &
     & 0.9633996E-01, 0.8724467E-01, 0.7118488E-01, 0.7118488E-01 /
      data (ref_adm(13,iz,32, 7),iz = 1,20) / &
     & 0.1387108E+00, 0.1387108E+00, 0.1362285E+00, 0.1353687E+00, &
     & 0.1237100E+00, 0.1342242E+00, 0.1334049E+00, 0.1320091E+00, &
     & 0.1302162E+00, 0.1280694E+00, 0.1257345E+00, 0.1224928E+00, &
     & 0.1187091E+00, 0.1151461E+00, 0.1100295E+00, 0.1032914E+00, &
     & 0.9633996E-01, 0.8724467E-01, 0.7118488E-01, 0.7118488E-01 /
      data (ref_adm(13,iz,33, 7),iz = 1,20) / &
     & 0.1387108E+00, 0.1387108E+00, 0.1362285E+00, 0.1353687E+00, &
     & 0.1346890E+00, 0.1342242E+00, 0.1334049E+00, 0.1320090E+00, &
     & 0.1302162E+00, 0.1280694E+00, 0.1257344E+00, 0.1224928E+00, &
     & 0.1187091E+00, 0.1151461E+00, 0.1100295E+00, 0.1032914E+00, &
     & 0.9633996E-01, 0.8724467E-01, 0.7118488E-01, 0.7118488E-01 /
      data (ref_adm(13,iz,34, 7),iz = 1,20) / &
     & 0.1387108E+00, 0.1387108E+00, 0.1362285E+00, 0.1353687E+00, &
     & 0.1346890E+00, 0.1342242E+00, 0.1334049E+00, 0.1320091E+00, &
     & 0.1302162E+00, 0.1280694E+00, 0.1257345E+00, 0.1224928E+00, &
     & 0.1187091E+00, 0.1151461E+00, 0.1100295E+00, 0.1032914E+00, &
     & 0.9633996E-01, 0.8724467E-01, 0.7118488E-01, 0.7118488E-01 /
      data (ref_adm(13,iz,35, 7),iz = 1,20) / &
     & 0.1387108E+00, 0.1387108E+00, 0.1362285E+00, 0.1353687E+00, &
     & 0.1346890E+00, 0.1342242E+00, 0.1334049E+00, 0.1320090E+00, &
     & 0.1302162E+00, 0.1280694E+00, 0.1257344E+00, 0.1224928E+00, &
     & 0.1187091E+00, 0.1151461E+00, 0.1100295E+00, 0.1032914E+00, &
     & 0.9633996E-01, 0.8724467E-01, 0.7118488E-01, 0.7118488E-01 /
      data (ref_adm(13,iz,36, 7),iz = 1,20) / &
     & 0.1387108E+00, 0.1387108E+00, 0.1362285E+00, 0.1353687E+00, &
     & 0.1346890E+00, 0.1342242E+00, 0.1334049E+00, 0.1320091E+00, &
     & 0.1302162E+00, 0.1280694E+00, 0.1257345E+00, 0.1224928E+00, &
     & 0.1187091E+00, 0.1151461E+00, 0.1100295E+00, 0.1032914E+00, &
     & 0.9633996E-01, 0.8724467E-01, 0.7118488E-01, 0.7118488E-01 /
      data (ref_adm(13,iz,37, 7),iz = 1,20) / &
     & 0.1387108E+00, 0.1387108E+00, 0.1362285E+00, 0.1353687E+00, &
     & 0.1346890E+00, 0.1342242E+00, 0.1334049E+00, 0.1320091E+00, &
     & 0.1302162E+00, 0.1280694E+00, 0.1257345E+00, 0.1224928E+00, &
     & 0.1187091E+00, 0.1151461E+00, 0.1100295E+00, 0.1032914E+00, &
     & 0.9633996E-01, 0.8724467E-01, 0.7118488E-01, 0.7118488E-01 /
      data (ref_adm(13,iz,38, 7),iz = 1,20) / &
     & 0.1387108E+00, 0.1387108E+00, 0.1362285E+00, 0.1353687E+00, &
     & 0.1346890E+00, 0.1342242E+00, 0.1334049E+00, 0.1320091E+00, &
     & 0.1302162E+00, 0.1280694E+00, 0.1257345E+00, 0.1224928E+00, &
     & 0.1187091E+00, 0.1151461E+00, 0.1100295E+00, 0.1032914E+00, &
     & 0.9633996E-01, 0.8724467E-01, 0.7118488E-01, 0.7118488E-01 /
! Solar Zenith Angle 35.0 Albedo  0.1545315E+00
      data (ref_adm(13,iz, 1, 8),iz = 1,20) / &
     & 0.1522838E+00, 0.1522838E+00, 0.1424598E+00, 0.1390726E+00, &
     & 0.1367861E+00, 0.1355672E+00, 0.1343527E+00, 0.1330901E+00, &
     & 0.1324604E+00, 0.1324210E+00, 0.1331653E+00, 0.1351825E+00, &
     & 0.1467700E+00, 0.1415581E+00, 0.1466907E+00, 0.1539977E+00, &
     & 0.1623128E+00, 0.1731486E+00, 0.1789160E+00, 0.1789160E+00 /
      data (ref_adm(13,iz, 2, 8),iz = 1,20) / &
     & 0.1522838E+00, 0.1522838E+00, 0.1424598E+00, 0.1390726E+00, &
     & 0.1367861E+00, 0.1355672E+00, 0.1343527E+00, 0.1330901E+00, &
     & 0.1324604E+00, 0.1324210E+00, 0.1331653E+00, 0.1351825E+00, &
     & 0.1467700E+00, 0.1415581E+00, 0.1466907E+00, 0.1539977E+00, &
     & 0.1623128E+00, 0.1731486E+00, 0.1789160E+00, 0.1789160E+00 /
      data (ref_adm(13,iz, 3, 8),iz = 1,20) / &
     & 0.1682400E+00, 0.1682400E+00, 0.1424598E+00, 0.1390726E+00, &
     & 0.1367861E+00, 0.1355672E+00, 0.1343527E+00, 0.1330901E+00, &
     & 0.1324604E+00, 0.1324210E+00, 0.1331653E+00, 0.1351825E+00, &
     & 0.1468000E+00, 0.1415581E+00, 0.1466907E+00, 0.1539977E+00, &
     & 0.1623128E+00, 0.1731486E+00, 0.2766275E-08, 0.2766275E-08 /
      data (ref_adm(13,iz, 4, 8),iz = 1,20) / &
     & 0.1522838E+00, 0.1522838E+00, 0.1424598E+00, 0.1390726E+00, &
     & 0.1367861E+00, 0.1355672E+00, 0.1343527E+00, 0.1330901E+00, &
     & 0.1324604E+00, 0.1324210E+00, 0.1331653E+00, 0.1351825E+00, &
     & 0.1382231E+00, 0.1415581E+00, 0.1466907E+00, 0.1539977E+00, &
     & 0.1623128E+00, 0.1731486E+00, 0.1789160E+00, 0.1789160E+00 /
      data (ref_adm(13,iz, 5, 8),iz = 1,20) / &
     & 0.1719700E+00, 0.1719700E+00, 0.1424598E+00, 0.1390726E+00, &
     & 0.1367861E+00, 0.1355672E+00, 0.1343527E+00, 0.1330901E+00, &
     & 0.1324604E+00, 0.1324210E+00, 0.1331653E+00, 0.1351825E+00, &
     & 0.1382231E+00, 0.1415581E+00, 0.1466907E+00, 0.1539977E+00, &
     & 0.1623128E+00, 0.1731486E+00, 0.1789161E+00, 0.1789161E+00 /
      data (ref_adm(13,iz, 6, 8),iz = 1,20) / &
     & 0.1522838E+00, 0.1522838E+00, 0.1265500E+00, 0.1390726E+00, &
     & 0.1367861E+00, 0.1355672E+00, 0.1343527E+00, 0.1330901E+00, &
     & 0.1324604E+00, 0.1324210E+00, 0.1331653E+00, 0.1351825E+00, &
     & 0.1382231E+00, 0.1415581E+00, 0.1466907E+00, 0.1539977E+00, &
     & 0.1623128E+00, 0.1731486E+00, 0.1789160E+00, 0.1789160E+00 /
      data (ref_adm(13,iz, 7, 8),iz = 1,20) / &
     & 0.1522838E+00, 0.1522838E+00, 0.1424598E+00, 0.1390726E+00, &
     & 0.1367861E+00, 0.1355672E+00, 0.1343527E+00, 0.1330901E+00, &
     & 0.1324604E+00, 0.1324210E+00, 0.1331653E+00, 0.1351825E+00, &
     & 0.1382231E+00, 0.1415581E+00, 0.1664100E+00, 0.1539977E+00, &
     & 0.1623128E+00, 0.1731486E+00, 0.1789161E+00, 0.1789161E+00 /
      data (ref_adm(13,iz, 8, 8),iz = 1,20) / &
     & 0.1324300E+00, 0.1324300E+00, 0.1424598E+00, 0.1390726E+00, &
     & 0.1367861E+00, 0.1355672E+00, 0.1343527E+00, 0.1330901E+00, &
     & 0.1324604E+00, 0.1324210E+00, 0.1331653E+00, 0.1351825E+00, &
     & 0.1382231E+00, 0.1415581E+00, 0.1466907E+00, 0.1539977E+00, &
     & 0.1623128E+00, 0.1731486E+00, 0.1789160E+00, 0.1789160E+00 /
      data (ref_adm(13,iz, 9, 8),iz = 1,20) / &
     & 0.1522838E+00, 0.1522838E+00, 0.1424598E+00, 0.1390726E+00, &
     & 0.1367861E+00, 0.1355672E+00, 0.1343527E+00, 0.1330901E+00, &
     & 0.1324604E+00, 0.1324210E+00, 0.1331653E+00, 0.1351825E+00, &
     & 0.1382231E+00, 0.1415581E+00, 0.1466907E+00, 0.1539977E+00, &
     & 0.1623128E+00, 0.1731486E+00, 0.1789161E+00, 0.1789161E+00 /
      data (ref_adm(13,iz,10, 8),iz = 1,20) / &
     & 0.1522838E+00, 0.1522838E+00, 0.1424598E+00, 0.1390726E+00, &
     & 0.1367861E+00, 0.1355672E+00, 0.1343527E+00, 0.1330901E+00, &
     & 0.1324604E+00, 0.1324210E+00, 0.1331653E+00, 0.1385200E+00, &
     & 0.1382231E+00, 0.1415581E+00, 0.1466907E+00, 0.1539977E+00, &
     & 0.1623128E+00, 0.1731486E+00, 0.1789160E+00, 0.1789160E+00 /
      data (ref_adm(13,iz,11, 8),iz = 1,20) / &
     & 0.1522838E+00, 0.1522838E+00, 0.1424598E+00, 0.1390726E+00, &
     & 0.1367861E+00, 0.1355672E+00, 0.1343527E+00, 0.1330901E+00, &
     & 0.1324604E+00, 0.1324210E+00, 0.1415200E+00, 0.1426900E+00, &
     & 0.1382231E+00, 0.1415581E+00, 0.1466907E+00, 0.1539977E+00, &
     & 0.1623128E+00, 0.1731486E+00, 0.1789161E+00, 0.1789161E+00 /
      data (ref_adm(13,iz,12, 8),iz = 1,20) / &
     & 0.1219800E+00, 0.1219800E+00, 0.1424598E+00, 0.1390726E+00, &
     & 0.1311600E+00, 0.1355672E+00, 0.1343527E+00, 0.1330901E+00, &
     & 0.1324604E+00, 0.1324210E+00, 0.1331653E+00, 0.1351825E+00, &
     & 0.1382231E+00, 0.1415581E+00, 0.1466907E+00, 0.1539977E+00, &
     & 0.1623128E+00, 0.1731486E+00, 0.1789160E+00, 0.1789160E+00 /
      data (ref_adm(13,iz,13, 8),iz = 1,20) / &
     & 0.1522838E+00, 0.1522838E+00, 0.1343700E+00, 0.1390726E+00, &
     & 0.1367861E+00, 0.1461900E+00, 0.1240400E+00, 0.1188100E+00, &
     & 0.1276900E+00, 0.1288800E+00, 0.1349300E+00, 0.1460800E+00, &
     & 0.1101500E+00, 0.1636700E+00, 0.1466907E+00, 0.1539977E+00, &
     & 0.1623128E+00, 0.1731486E+00, 0.1789161E+00, 0.1789161E+00 /
      data (ref_adm(13,iz,14, 8),iz = 1,20) / &
     & 0.1537800E+00, 0.1537800E+00, 0.1264500E+00, 0.1211300E+00, &
     & 0.1336200E+00, 0.1355672E+00, 0.1343527E+00, 0.1330901E+00, &
     & 0.1317000E+00, 0.1216900E+00, 0.1431400E+00, 0.1341700E+00, &
     & 0.1323400E+00, 0.1415581E+00, 0.1466907E+00, 0.1539977E+00, &
     & 0.1623128E+00, 0.1731486E+00, 0.1789160E+00, 0.1789160E+00 /
      data (ref_adm(13,iz,15, 8),iz = 1,20) / &
     & 0.1522838E+00, 0.1522838E+00, 0.1424598E+00, 0.1390726E+00, &
     & 0.1467800E+00, 0.1355672E+00, 0.1343527E+00, 0.1330901E+00, &
     & 0.1324604E+00, 0.1264000E+00, 0.1375700E+00, 0.1375900E+00, &
     & 0.1382231E+00, 0.1293800E+00, 0.1466907E+00, 0.1539977E+00, &
     & 0.1623128E+00, 0.1731486E+00, 0.1789161E+00, 0.1789161E+00 /
      data (ref_adm(13,iz,16, 8),iz = 1,20) / &
     & 0.1522838E+00, 0.1522838E+00, 0.1424598E+00, 0.1390726E+00, &
     & 0.1367861E+00, 0.1355672E+00, 0.1343527E+00, 0.1330901E+00, &
     & 0.1324604E+00, 0.1324210E+00, 0.1468400E+00, 0.1351825E+00, &
     & 0.1567000E+00, 0.1415581E+00, 0.1466907E+00, 0.1539977E+00, &
     & 0.1623128E+00, 0.1731486E+00, 0.1789160E+00, 0.1789160E+00 /
      data (ref_adm(13,iz,17, 8),iz = 1,20) / &
     & 0.1522838E+00, 0.1522838E+00, 0.1424598E+00, 0.1390726E+00, &
     & 0.1367861E+00, 0.1355672E+00, 0.1343527E+00, 0.1330901E+00, &
     & 0.1260400E+00, 0.1324210E+00, 0.1546600E+00, 0.1351825E+00, &
     & 0.1382231E+00, 0.1415581E+00, 0.1466907E+00, 0.1539977E+00, &
     & 0.1623128E+00, 0.1731486E+00, 0.1789161E+00, 0.1789161E+00 /
      data (ref_adm(13,iz,18, 8),iz = 1,20) / &
     & 0.1421843E+00, 0.1421843E+00, 0.1414003E+00, 0.1405564E+00, &
     & 0.1394705E+00, 0.1383890E+00, 0.1377062E+00, 0.1374357E+00, &
     & 0.1285200E+00, 0.1340400E+00, 0.1591800E+00, 0.1580500E+00, &
     & 0.1485289E+00, 0.1531615E+00, 0.1349900E+00, 0.1694610E+00, &
     & 0.1799063E+00, 0.1935649E+00, 0.2012785E+00, 0.2012785E+00 /
      data (ref_adm(13,iz,19, 8),iz = 1,20) / &
     & 0.1423177E+00, 0.1423177E+00, 0.1418543E+00, 0.1413161E+00, &
     & 0.1405797E+00, 0.1396604E+00, 0.1390418E+00, 0.1388094E+00, &
     & 0.1332900E+00, 0.1417900E+00, 0.1613000E+00, 0.1616100E+00, &
     & 0.1495591E+00, 0.1540434E+00, 0.1606875E+00, 0.1698227E+00, &
     & 0.1799761E+00, 0.1931514E+00, 0.2002741E+00, 0.2002741E+00 /
      data (ref_adm(13,iz,20, 8),iz = 1,20) / &
     & 0.1424348E+00, 0.1424348E+00, 0.1423553E+00, 0.1421218E+00, &
     & 0.1416962E+00, 0.1410231E+00, 0.1404937E+00, 0.1403433E+00, &
     & 0.1406724E+00, 0.1499400E+00, 0.1433378E+00, 0.1642100E+00, &
     & 0.1507328E+00, 0.1550222E+00, 0.1614934E+00, 0.1703624E+00, &
     & 0.1801773E+00, 0.1928179E+00, 0.1995125E+00, 0.1995125E+00 /
      data (ref_adm(13,iz,21, 8),iz = 1,20) / &
     & 0.1425918E+00, 0.1425918E+00, 0.1428581E+00, 0.1429063E+00, &
     & 0.1427900E+00, 0.1424226E+00, 0.1419954E+00, 0.1419621E+00, &
     & 0.1423059E+00, 0.1549200E+00, 0.1517900E+00, 0.1619000E+00, &
     & 0.1674600E+00, 0.1561393E+00, 0.1623602E+00, 0.1709538E+00, &
     & 0.1804946E+00, 0.1925988E+00, 0.1988870E+00, 0.1988870E+00 /
      data (ref_adm(13,iz,22, 8),iz = 1,20) / &
     & 0.1061800E+00, 0.1061800E+00, 0.1451641E+00, 0.1457795E+00, &
     & 0.1462071E+00, 0.1464425E+00, 0.1467949E+00, 0.1473899E+00, &
     & 0.1483488E+00, 0.1498004E+00, 0.1511500E+00, 0.1555886E+00, &
     & 0.1505500E+00, 0.1647125E+00, 0.1713944E+00, 0.1806498E+00, &
     & 0.1904837E+00, 0.2030845E+00, 0.2093324E+00, 0.2093324E+00 /
      data (ref_adm(13,iz,23, 8),iz = 1,20) / &
     & 0.1444013E+00, 0.1444013E+00, 0.1457327E+00, 0.1467301E+00, &
     & 0.1475529E+00, 0.1482004E+00, 0.1487097E+00, 0.1494468E+00, &
     & 0.1504945E+00, 0.1519171E+00, 0.1397400E+00, 0.1410400E+00, &
     & 0.1621667E+00, 0.1664660E+00, 0.1728566E+00, 0.1817344E+00, &
     & 0.1913294E+00, 0.2033141E+00, 0.2088339E+00, 0.2088339E+00 /
      data (ref_adm(13,iz,24, 8),iz = 1,20) / &
     & 0.1445500E+00, 0.1445500E+00, 0.1463281E+00, 0.1476419E+00, &
     & 0.1488747E+00, 0.1499010E+00, 0.1507312E+00, 0.1515301E+00, &
     & 0.1527058E+00, 0.1541585E+00, 0.1561789E+00, 0.1596294E+00, &
     & 0.1640628E+00, 0.1683410E+00, 0.1745192E+00, 0.1829902E+00, &
     & 0.1922838E+00, 0.2035585E+00, 0.2087028E+00, 0.2087028E+00 /
      data (ref_adm(13,iz,25, 8),iz = 1,20) / &
     & 0.1447093E+00, 0.1447093E+00, 0.1468596E+00, 0.1485306E+00, &
     & 0.1500761E+00, 0.1515113E+00, 0.1528104E+00, 0.1537525E+00, &
     & 0.1549485E+00, 0.1565046E+00, 0.1584101E+00, 0.1618383E+00, &
     & 0.1661501E+00, 0.1704116E+00, 0.1762992E+00, 0.1843919E+00, &
     & 0.1933132E+00, 0.2040867E+00, 0.2087988E+00, 0.2087988E+00 /
      data (ref_adm(13,iz,26, 8),iz = 1,20) / &
     & 0.1448359E+00, 0.1448359E+00, 0.1473933E+00, 0.1493877E+00, &
     & 0.1076300E+00, 0.1530271E+00, 0.1546500E+00, 0.1560723E+00, &
     & 0.1573206E+00, 0.1589167E+00, 0.1608587E+00, 0.1641290E+00, &
     & 0.1682720E+00, 0.1723936E+00, 0.1782541E+00, 0.1860470E+00, &
     & 0.1945513E+00, 0.2047245E+00, 0.2089944E+00, 0.2089944E+00 /
      data (ref_adm(13,iz,27, 8),iz = 1,20) / &
     & 0.1449493E+00, 0.1449493E+00, 0.1479103E+00, 0.1502502E+00, &
     & 0.1986100E+00, 0.1604800E+00, 0.1564303E+00, 0.1582231E+00, &
     & 0.1597306E+00, 0.1613446E+00, 0.1633142E+00, 0.1664868E+00, &
     & 0.1705391E+00, 0.1744767E+00, 0.1802683E+00, 0.1878368E+00, &
     & 0.1958585E+00, 0.2056159E+00, 0.2093211E+00, 0.2093211E+00 /
      data (ref_adm(13,iz,28, 8),iz = 1,20) / &
     & 0.1578700E+00, 0.1578700E+00, 0.1483789E+00, 0.1858200E+00, &
     & 0.1536331E+00, 0.1559074E+00, 0.1580476E+00, 0.1251100E+00, &
     & 0.1621226E+00, 0.1637850E+00, 0.1657580E+00, 0.1428800E+00, &
     & 0.1728406E+00, 0.1766531E+00, 0.1822671E+00, 0.1896127E+00, &
     & 0.1974172E+00, 0.2065431E+00, 0.2099073E+00, 0.2099073E+00 /
      data (ref_adm(13,iz,29, 8),iz = 1,20) / &
     & 0.1451983E+00, 0.1451983E+00, 0.1488648E+00, 0.2029400E+00, &
     & 0.1971600E+00, 0.1574828E+00, 0.1597159E+00, 0.1619978E+00, &
     & 0.1642506E+00, 0.1662207E+00, 0.1681890E+00, 0.1712828E+00, &
     & 0.1750795E+00, 0.1298600E+00, 0.1842378E+00, 0.1914952E+00, &
     & 0.1989027E+00, 0.2075630E+00, 0.2106039E+00, 0.2106039E+00 /
      data (ref_adm(13,iz,30, 8),iz = 1,20) / &
     & 0.1771000E+00, 0.1771000E+00, 0.1207700E+00, 0.1230200E+00, &
     & 0.1562901E+00, 0.1591685E+00, 0.1614805E+00, 0.1637255E+00, &
     & 0.1661813E+00, 0.1685165E+00, 0.1705582E+00, 0.1736093E+00, &
     & 0.1772889E+00, 0.2015800E+00, 0.1861548E+00, 0.1933612E+00, &
     & 0.2005329E+00, 0.2086291E+00, 0.2114928E+00, 0.2114928E+00 /
      data (ref_adm(13,iz,31, 8),iz = 1,20) / &
     & 0.1281200E+00, 0.1281200E+00, 0.1398800E+00, 0.1506400E+00, &
     & 0.1577171E+00, 0.1610136E+00, 0.1734900E+00, 0.1654687E+00, &
     & 0.1871700E+00, 0.1705486E+00, 0.1728479E+00, 0.1757877E+00, &
     & 0.1794444E+00, 0.1829738E+00, 0.1880376E+00, 0.1950502E+00, &
     & 0.2020993E+00, 0.2097520E+00, 0.2123018E+00, 0.2123018E+00 /
      data (ref_adm(13,iz,32, 8),iz = 1,20) / &
     & 0.1454477E+00, 0.1454477E+00, 0.1501234E+00, 0.1545854E+00, &
     & 0.1591928E+00, 0.1629581E+00, 0.1654713E+00, 0.1673151E+00, &
     & 0.1694894E+00, 0.1722244E+00, 0.1748802E+00, 0.1778432E+00, &
     & 0.1814117E+00, 0.1847817E+00, 0.2140000E+00, 0.1965930E+00, &
     & 0.2036452E+00, 0.2108590E+00, 0.2130285E+00, 0.2130285E+00 /
      data (ref_adm(13,iz,33, 8),iz = 1,20) / &
     & 0.1455429E+00, 0.1455429E+00, 0.1504545E+00, 0.1553788E+00, &
     & 0.1606040E+00, 0.1649454E+00, 0.1676443E+00, 0.1692976E+00, &
     & 0.1710672E+00, 0.1736820E+00, 0.1765596E+00, 0.1796532E+00, &
     & 0.1832431E+00, 0.1865226E+00, 0.1914166E+00, 0.1980198E+00, &
     & 0.2050074E+00, 0.2119491E+00, 0.2137576E+00, 0.2137576E+00 /
      data (ref_adm(13,iz,34, 8),iz = 1,20) / &
     & 0.1455862E+00, 0.1455862E+00, 0.1507445E+00, 0.1560696E+00, &
     & 0.1619463E+00, 0.1670112E+00, 0.1699270E+00, 0.1712476E+00, &
     & 0.1725885E+00, 0.1748658E+00, 0.1779024E+00, 0.1812209E+00, &
     & 0.1846477E+00, 0.1879003E+00, 0.1927238E+00, 0.1991850E+00, &
     & 0.2060900E+00, 0.2128442E+00, 0.2144201E+00, 0.2144201E+00 /
      data (ref_adm(13,iz,35, 8),iz = 1,20) / &
     & 0.1456155E+00, 0.1456155E+00, 0.1509627E+00, 0.1566931E+00, &
     & 0.1631764E+00, 0.1693930E+00, 0.1722248E+00, 0.1730361E+00, &
     & 0.1739927E+00, 0.1759110E+00, 0.1789350E+00, 0.1824123E+00, &
     & 0.1858753E+00, 0.1751400E+00, 0.1937891E+00, 0.2001387E+00, &
     & 0.2068747E+00, 0.2136125E+00, 0.2149418E+00, 0.2149418E+00 /
      data (ref_adm(13,iz,36, 8),iz = 1,20) / &
     & 0.1456683E+00, 0.1456683E+00, 0.1511274E+00, 0.1571070E+00, &
     & 0.1641505E+00, 0.1725821E+00, 0.1750090E+00, 0.1744010E+00, &
     & 0.1749483E+00, 0.1766433E+00, 0.1795342E+00, 0.1832223E+00, &
     & 0.1866117E+00, 0.1898895E+00, 0.1944991E+00, 0.2008129E+00, &
     & 0.2075277E+00, 0.2141271E+00, 0.2153865E+00, 0.2153865E+00 /
      data (ref_adm(13,iz,37, 8),iz = 1,20) / &
     & 0.1564900E+00, 0.1564900E+00, 0.1512208E+00, 0.1573330E+00, &
     & 0.1647926E+00, 0.1765561E+00, 0.2043100E+00, 0.1752602E+00, &
     & 0.1755438E+00, 0.1770519E+00, 0.1799401E+00, 0.1837066E+00, &
     & 0.1870638E+00, 0.1903022E+00, 0.1948915E+00, 0.2012022E+00, &
     & 0.2078647E+00, 0.2144078E+00, 0.2155984E+00, 0.2155984E+00 /
      data (ref_adm(13,iz,38, 8),iz = 1,20) / &
     & 0.1564900E+00, 0.1564900E+00, 0.1512208E+00, 0.1573330E+00, &
     & 0.1647926E+00, 0.1765561E+00, 0.2043100E+00, 0.1752602E+00, &
     & 0.1755438E+00, 0.1770519E+00, 0.1799401E+00, 0.1837066E+00, &
     & 0.1870638E+00, 0.1903022E+00, 0.1948915E+00, 0.2012022E+00, &
     & 0.2078647E+00, 0.2144078E+00, 0.2155984E+00, 0.2155984E+00 /
! Solar Zenith Angle 40.0 Albedo  0.1624396E+00
      data (ref_adm(13,iz, 1, 9),iz = 1,20) / &
     & 0.1500204E+00, 0.1500204E+00, 0.1446541E+00, 0.1174400E+00, &
     & 0.1397594E+00, 0.1177800E+00, 0.1605300E+00, 0.1347674E+00, &
     & 0.1266100E+00, 0.1252500E+00, 0.1457500E+00, 0.1381244E+00, &
     & 0.1418974E+00, 0.1459866E+00, 0.1520291E+00, 0.1607071E+00, &
     & 0.1704008E+00, 0.1832793E+00, 0.1912157E+00, 0.1912157E+00 /
      data (ref_adm(13,iz, 2, 9),iz = 1,20) / &
     & 0.1500204E+00, 0.1500204E+00, 0.1446541E+00, 0.1174400E+00, &
     & 0.1397594E+00, 0.1177800E+00, 0.1605300E+00, 0.1347674E+00, &
     & 0.1266100E+00, 0.1252500E+00, 0.1457500E+00, 0.1381244E+00, &
     & 0.1418974E+00, 0.1459866E+00, 0.1520291E+00, 0.1607071E+00, &
     & 0.1704008E+00, 0.1832793E+00, 0.1912157E+00, 0.1912157E+00 /
      data (ref_adm(13,iz, 3, 9),iz = 1,20) / &
     & 0.1500276E+00, 0.1500276E+00, 0.1446732E+00, 0.1416632E+00, &
     & 0.1397779E+00, 0.1905900E+00, 0.1589100E+00, 0.1129100E+00, &
     & 0.1342937E+00, 0.1345327E+00, 0.1366200E+00, 0.1359500E+00, &
     & 0.1419156E+00, 0.1459568E+00, 0.1520368E+00, 0.1606807E+00, &
     & 0.1703887E+00, 0.1832374E+00, 0.2955597E-08, 0.2955597E-08 /
      data (ref_adm(13,iz, 4, 9),iz = 1,20) / &
     & 0.1500411E+00, 0.1500411E+00, 0.1447168E+00, 0.1417165E+00, &
     & 0.1398286E+00, 0.1379498E+00, 0.1360818E+00, 0.1580600E+00, &
     & 0.1343316E+00, 0.1346072E+00, 0.1357189E+00, 0.1483200E+00, &
     & 0.1419659E+00, 0.1430900E+00, 0.1521122E+00, 0.1607266E+00, &
     & 0.1703359E+00, 0.1831039E+00, 0.1911685E+00, 0.1911685E+00 /
      data (ref_adm(13,iz, 5, 9),iz = 1,20) / &
     & 0.1500757E+00, 0.1500757E+00, 0.1267500E+00, 0.1510800E+00, &
     & 0.1399113E+00, 0.2025500E+00, 0.1362059E+00, 0.1349707E+00, &
     & 0.1617200E+00, 0.1346861E+00, 0.1358101E+00, 0.1300800E+00, &
     & 0.1613100E+00, 0.1460665E+00, 0.1521173E+00, 0.1607184E+00, &
     & 0.1704028E+00, 0.1831640E+00, 0.1910550E+00, 0.1910550E+00 /
      data (ref_adm(13,iz, 6, 9),iz = 1,20) / &
     & 0.1501548E+00, 0.1501548E+00, 0.1448595E+00, 0.1809200E+00, &
     & 0.1576000E+00, 0.1381446E+00, 0.1363177E+00, 0.1351146E+00, &
     & 0.1345562E+00, 0.1278400E+00, 0.1359197E+00, 0.1384090E+00, &
     & 0.1653100E+00, 0.1444600E+00, 0.1521914E+00, 0.1607200E+00, &
     & 0.1703700E+00, 0.1830877E+00, 0.1909661E+00, 0.1909661E+00 /
      data (ref_adm(13,iz, 7, 9),iz = 1,20) / &
     & 0.1501825E+00, 0.1501825E+00, 0.1785500E+00, 0.1420323E+00, &
     & 0.1400953E+00, 0.1382966E+00, 0.1365200E+00, 0.1352826E+00, &
     & 0.1347206E+00, 0.1349721E+00, 0.1360502E+00, 0.1385510E+00, &
     & 0.1422137E+00, 0.1461884E+00, 0.1453900E+00, 0.1608027E+00, &
     & 0.1703618E+00, 0.1830584E+00, 0.1908360E+00, 0.1908360E+00 /
      data (ref_adm(13,iz, 8, 9),iz = 1,20) / &
     & 0.1482500E+00, 0.1482500E+00, 0.1456200E+00, 0.1605200E+00, &
     & 0.1480800E+00, 0.1384748E+00, 0.1366800E+00, 0.1354392E+00, &
     & 0.1349071E+00, 0.1351531E+00, 0.1362057E+00, 0.1386804E+00, &
     & 0.1423262E+00, 0.1463020E+00, 0.1522879E+00, 0.1608383E+00, &
     & 0.1703459E+00, 0.1829902E+00, 0.1906076E+00, 0.1906076E+00 /
      data (ref_adm(13,iz, 9, 9),iz = 1,20) / &
     & 0.1485900E+00, 0.1485900E+00, 0.1452760E+00, 0.1422707E+00, &
     & 0.1403789E+00, 0.1386936E+00, 0.1368807E+00, 0.8150300E-01, &
     & 0.1245700E+00, 0.1353419E+00, 0.1363760E+00, 0.1388455E+00, &
     & 0.1424862E+00, 0.1464175E+00, 0.1523941E+00, 0.1608689E+00, &
     & 0.1703333E+00, 0.1829035E+00, 0.1904560E+00, 0.1904560E+00 /
      data (ref_adm(13,iz,10, 9),iz = 1,20) / &
     & 0.1369300E+00, 0.1369300E+00, 0.1532000E+00, 0.1424358E+00, &
     & 0.1405762E+00, 0.1389147E+00, 0.1371459E+00, 0.1359276E+00, &
     & 0.1353573E+00, 0.1355691E+00, 0.1365980E+00, 0.1390578E+00, &
     & 0.1426600E+00, 0.1465622E+00, 0.1525051E+00, 0.1609240E+00, &
     & 0.1703301E+00, 0.1828388E+00, 0.1902601E+00, 0.1902601E+00 /
      data (ref_adm(13,iz,11, 9),iz = 1,20) / &
     & 0.1505046E+00, 0.1505046E+00, 0.1552100E+00, 0.1514300E+00, &
     & 0.1407762E+00, 0.1391637E+00, 0.1373990E+00, 0.1361898E+00, &
     & 0.1355904E+00, 0.1358508E+00, 0.1368393E+00, 0.1392804E+00, &
     & 0.1428352E+00, 0.1467252E+00, 0.1526325E+00, 0.1610102E+00, &
     & 0.1703374E+00, 0.1827701E+00, 0.1900425E+00, 0.1900425E+00 /
      data (ref_adm(13,iz,12, 9),iz = 1,20) / &
     & 0.1389600E+00, 0.1389600E+00, 0.1311300E+00, 0.1627600E+00, &
     & 0.1836300E+00, 0.1394457E+00, 0.1376994E+00, 0.1365311E+00, &
     & 0.2021600E+00, 0.1361327E+00, 0.1370854E+00, 0.1395255E+00, &
     & 0.1430589E+00, 0.1468814E+00, 0.1527752E+00, 0.1610691E+00, &
     & 0.1703443E+00, 0.1827147E+00, 0.1898114E+00, 0.1898114E+00 /
      data (ref_adm(13,iz,13, 9),iz = 1,20) / &
     & 0.1349300E+00, 0.1349300E+00, 0.1375400E+00, 0.1356400E+00, &
     & 0.1242800E+00, 0.1280100E+00, 0.1307000E+00, 0.1276900E+00, &
     & 0.1307900E+00, 0.1144300E+00, 0.1188900E+00, 0.1397989E+00, &
     & 0.1432880E+00, 0.1234700E+00, 0.1529438E+00, 0.1611560E+00, &
     & 0.1703619E+00, 0.1825902E+00, 0.1895771E+00, 0.1895771E+00 /
      data (ref_adm(13,iz,14, 9),iz = 1,20) / &
     & 0.1428100E+00, 0.1428100E+00, 0.1294500E+00, 0.1206500E+00, &
     & 0.1452400E+00, 0.1305200E+00, 0.1156700E+00, 0.1093500E+00, &
     & 0.1329300E+00, 0.1657500E+00, 0.1339100E+00, 0.1348300E+00, &
     & 0.1377200E+00, 0.1385800E+00, 0.1530741E+00, 0.1612148E+00, &
     & 0.1704191E+00, 0.1825299E+00, 0.1893670E+00, 0.1893670E+00 /
      data (ref_adm(13,iz,15, 9),iz = 1,20) / &
     & 0.1339300E+00, 0.1339300E+00, 0.1466238E+00, 0.1435964E+00, &
     & 0.1417270E+00, 0.1219000E+00, 0.1273800E+00, 0.1375744E+00, &
     & 0.1379700E+00, 0.1371169E+00, 0.1180200E+00, 0.1472400E+00, &
     & 0.1515400E+00, 0.1506900E+00, 0.2019000E+00, 0.1612856E+00, &
     & 0.1703906E+00, 0.1824112E+00, 0.1891434E+00, 0.1891434E+00 /
      data (ref_adm(13,iz,16, 9),iz = 1,20) / &
     & 0.1510405E+00, 0.1510405E+00, 0.1469158E+00, 0.1439396E+00, &
     & 0.1271500E+00, 0.1093300E+00, 0.1239200E+00, 0.1379427E+00, &
     & 0.1373338E+00, 0.1374747E+00, 0.1383436E+00, 0.1407044E+00, &
     & 0.1440399E+00, 0.1593200E+00, 0.1534534E+00, 0.1614478E+00, &
     & 0.1704898E+00, 0.1823846E+00, 0.1888991E+00, 0.1888991E+00 /
      data (ref_adm(13,iz,17, 9),iz = 1,20) / &
     & 0.1418700E+00, 0.1418700E+00, 0.1471841E+00, 0.1442923E+00, &
     & 0.1423184E+00, 0.1410735E+00, 0.1287600E+00, 0.1383801E+00, &
     & 0.1377240E+00, 0.1378434E+00, 0.1387354E+00, 0.1410032E+00, &
     & 0.1443478E+00, 0.1400600E+00, 0.1536384E+00, 0.1615655E+00, &
     & 0.1704775E+00, 0.1822568E+00, 0.1887004E+00, 0.1887004E+00 /
      data (ref_adm(13,iz,18, 9),iz = 1,20) / &
     & 0.1030200E+00, 0.1030200E+00, 0.1403200E+00, 0.1350400E+00, &
     & 0.1153400E+00, 0.1322377E+00, 0.1319686E+00, 0.1322337E+00, &
     & 0.1330455E+00, 0.1345426E+00, 0.1367537E+00, 0.1404974E+00, &
     & 0.1454855E+00, 0.1505077E+00, 0.1576788E+00, 0.1676979E+00, &
     & 0.1785566E+00, 0.1927678E+00, 0.2010149E+00, 0.2010149E+00 /
      data (ref_adm(13,iz,19, 9),iz = 1,20) / &
     & 0.1569700E+00, 0.1569700E+00, 0.1351259E+00, 0.1345756E+00, &
     & 0.1368700E+00, 0.1335786E+00, 0.1334519E+00, 0.1187800E+00, &
     & 0.1345810E+00, 0.1359881E+00, 0.1381814E+00, 0.1418525E+00, &
     & 0.1466101E+00, 0.1612700E+00, 0.1584640E+00, 0.1680977E+00, &
     & 0.1786600E+00, 0.1923310E+00, 0.1996335E+00, 0.1996335E+00 /
      data (ref_adm(13,iz,20, 9),iz = 1,20) / &
     & 0.1357110E+00, 0.1357110E+00, 0.1357324E+00, 0.1355452E+00, &
     & 0.1204300E+00, 0.1349804E+00, 0.1350193E+00, 0.1353457E+00, &
     & 0.1362148E+00, 0.1376371E+00, 0.1397232E+00, 0.1433518E+00, &
     & 0.1479333E+00, 0.1525077E+00, 0.1593851E+00, 0.1686159E+00, &
     & 0.1787985E+00, 0.1918048E+00, 0.1987192E+00, 0.1987192E+00 /
      data (ref_adm(13,iz,21, 9),iz = 1,20) / &
     & 0.1358436E+00, 0.1358436E+00, 0.1362875E+00, 0.1365259E+00, &
     & 0.1216600E+00, 0.1408100E+00, 0.1366898E+00, 0.1371322E+00, &
     & 0.1318200E+00, 0.1342000E+00, 0.1350600E+00, 0.1449710E+00, &
     & 0.1494372E+00, 0.1538661E+00, 0.1610100E+00, 0.1693461E+00, &
     & 0.1792205E+00, 0.1916201E+00, 0.1979533E+00, 0.1979533E+00 /
      data (ref_adm(13,iz,22, 9),iz = 1,20) / &
     & 0.1412077E+00, 0.1412077E+00, 0.1425809E+00, 0.1401100E+00, &
     & 0.1452979E+00, 0.1377000E+00, 0.1484400E+00, 0.1510255E+00, &
     & 0.1536608E+00, 0.1468500E+00, 0.1363400E+00, 0.1664281E+00, &
     & 0.1732150E+00, 0.1795603E+00, 0.1772700E+00, 0.1762800E+00, &
     & 0.2134501E+00, 0.2293458E+00, 0.2373504E+00, 0.2373504E+00 /
      data (ref_adm(13,iz,23, 9),iz = 1,20) / &
     & 0.1393700E+00, 0.1393700E+00, 0.1371600E+00, 0.1286300E+00, &
     & 0.1468122E+00, 0.1488199E+00, 0.1509794E+00, 0.1534231E+00, &
     & 0.1562258E+00, 0.1595037E+00, 0.1633250E+00, 0.1691409E+00, &
     & 0.1759202E+00, 0.1820694E+00, 0.1907617E+00, 0.2024142E+00, &
     & 0.2148335E+00, 0.2296854E+00, 0.2371634E+00, 0.2371634E+00 /
      data (ref_adm(13,iz,24, 9),iz = 1,20) / &
     & 0.1415555E+00, 0.1415555E+00, 0.1439641E+00, 0.1461241E+00, &
     & 0.1483994E+00, 0.1507726E+00, 0.1533079E+00, 0.1560179E+00, &
     & 0.1589936E+00, 0.1624146E+00, 0.1663342E+00, 0.1720768E+00, &
     & 0.1788522E+00, 0.1849920E+00, 0.1934378E+00, 0.2046495E+00, &
     & 0.2165478E+00, 0.2306546E+00, 0.2374672E+00, 0.2374672E+00 /
      data (ref_adm(13,iz,25, 9),iz = 1,20) / &
     & 0.1417306E+00, 0.1417306E+00, 0.1446463E+00, 0.1472672E+00, &
     & 0.1543000E+00, 0.1527874E+00, 0.1556885E+00, 0.1587500E+00, &
     & 0.1619833E+00, 0.1655245E+00, 0.1695156E+00, 0.1753503E+00, &
     & 0.1820082E+00, 0.1881641E+00, 0.1965069E+00, 0.2073262E+00, &
     & 0.2186559E+00, 0.2321198E+00, 0.2382291E+00, 0.2382291E+00 /
      data (ref_adm(13,iz,26, 9),iz = 1,20) / &
     & 0.1419026E+00, 0.1419026E+00, 0.1521900E+00, 0.1483911E+00, &
     & 0.1286000E+00, 0.1548496E+00, 0.1245400E+00, 0.1615561E+00, &
     & 0.1650999E+00, 0.1976700E+00, 0.1729725E+00, 0.1788376E+00, &
     & 0.1738800E+00, 0.1915123E+00, 0.1998663E+00, 0.2104868E+00, &
     & 0.2214129E+00, 0.2338378E+00, 0.2397007E+00, 0.2397007E+00 /
      data (ref_adm(13,iz,27, 9),iz = 1,20) / &
     & 0.1438000E+00, 0.1438000E+00, 0.1588200E+00, 0.1668500E+00, &
     & 0.1457900E+00, 0.1652000E+00, 0.1607088E+00, 0.1644870E+00, &
     & 0.1707900E+00, 0.1723219E+00, 0.1353800E+00, 0.1825770E+00, &
     & 0.1892437E+00, 0.1952617E+00, 0.2033482E+00, 0.2139659E+00, &
     & 0.2245345E+00, 0.2361543E+00, 0.2414668E+00, 0.2414668E+00 /
      data (ref_adm(13,iz,28, 9),iz = 1,20) / &
     & 0.1240000E+00, 0.1240000E+00, 0.1377500E+00, 0.1229300E+00, &
     & 0.1636100E+00, 0.1761200E+00, 0.1312700E+00, 0.1674485E+00, &
     & 0.1885800E+00, 0.1796400E+00, 0.1804536E+00, 0.1854600E+00, &
     & 0.1931906E+00, 0.1991319E+00, 0.2071284E+00, 0.2174941E+00, &
     & 0.2279831E+00, 0.2390219E+00, 0.2437270E+00, 0.2437270E+00 /
      data (ref_adm(13,iz,29, 9),iz = 1,20) / &
     & 0.1423429E+00, 0.1423429E+00, 0.1471696E+00, 0.1515613E+00, &
     & 0.1561445E+00, 0.2594900E+00, 0.1654535E+00, 0.1381900E+00, &
     & 0.1749204E+00, 0.1610400E+00, 0.1843050E+00, 0.1905689E+00, &
     & 0.1731000E+00, 0.2030755E+00, 0.2110831E+00, 0.2211667E+00, &
     & 0.2315288E+00, 0.2422530E+00, 0.2464866E+00, 0.2464866E+00 /
      data (ref_adm(13,iz,30, 9),iz = 1,20) / &
     & 0.1332900E+00, 0.1332900E+00, 0.1477235E+00, 0.1525122E+00, &
     & 0.1574669E+00, 0.1549700E+00, 0.1674104E+00, 0.1724883E+00, &
     & 0.1776416E+00, 0.1828951E+00, 0.1881427E+00, 0.1945765E+00, &
     & 0.2014085E+00, 0.2072692E+00, 0.2150473E+00, 0.2250883E+00, &
     & 0.2350968E+00, 0.2456330E+00, 0.2497197E+00, 0.2497197E+00 /
      data (ref_adm(13,iz,31, 9),iz = 1,20) / &
     & 0.1425816E+00, 0.1425816E+00, 0.1568200E+00, 0.1533586E+00, &
     & 0.1585986E+00, 0.1730900E+00, 0.1876700E+00, 0.1695900E+00, &
     & 0.1845900E+00, 0.1830900E+00, 0.1856400E+00, 0.1882900E+00, &
     & 0.2054207E+00, 0.1954700E+00, 0.2190570E+00, 0.2288790E+00, &
     & 0.2387053E+00, 0.2489110E+00, 0.2530498E+00, 0.2530498E+00 /
      data (ref_adm(13,iz,32, 9),iz = 1,20) / &
     & 0.1493700E+00, 0.1493700E+00, 0.1486214E+00, 0.1540766E+00, &
     & 0.1596053E+00, 0.1652084E+00, 0.1710222E+00, 0.1768339E+00, &
     & 0.1824525E+00, 0.1881039E+00, 0.1940299E+00, 0.2910500E+00, &
     & 0.2092340E+00, 0.2151095E+00, 0.2228550E+00, 0.2324822E+00, &
     & 0.2421643E+00, 0.2519840E+00, 0.2562490E+00, 0.2562490E+00 /
      data (ref_adm(13,iz,33, 9),iz = 1,20) / &
     & 0.1427660E+00, 0.1427660E+00, 0.1582700E+00, 0.1547147E+00, &
     & 0.1604503E+00, 0.1664564E+00, 0.1728685E+00, 0.1793122E+00, &
     & 0.1852552E+00, 0.1903000E+00, 0.1965491E+00, 0.2044241E+00, &
     & 0.2125417E+00, 0.2186498E+00, 0.2263257E+00, 0.2358414E+00, &
     & 0.2453069E+00, 0.2548952E+00, 0.2591178E+00, 0.2591178E+00 /
      data (ref_adm(13,iz,34, 9),iz = 1,20) / &
     & 0.1744100E+00, 0.1744100E+00, 0.1970000E+00, 0.1552005E+00, &
     & 0.1611962E+00, 0.1676126E+00, 0.1747497E+00, 0.1819714E+00, &
     & 0.1884007E+00, 0.1939308E+00, 0.1991533E+00, 0.2066388E+00, &
     & 0.2150347E+00, 0.2215270E+00, 0.2293114E+00, 0.2387407E+00, &
     & 0.2480778E+00, 0.2574455E+00, 0.2615172E+00, 0.2615172E+00 /
      data (ref_adm(13,iz,35, 9),iz = 1,20) / &
     & 0.1428709E+00, 0.1428709E+00, 0.1495525E+00, 0.1556034E+00, &
     & 0.1617489E+00, 0.1686560E+00, 0.1764957E+00, 0.1846683E+00, &
     & 0.1916097E+00, 0.1969600E+00, 0.2018754E+00, 0.2086141E+00, &
     & 0.2169365E+00, 0.2237393E+00, 0.2317009E+00, 0.2410952E+00, &
     & 0.2503419E+00, 0.2594941E+00, 0.2635460E+00, 0.2635460E+00 /
      data (ref_adm(13,iz,36, 9),iz = 1,20) / &
     & 0.1145800E+00, 0.1145800E+00, 0.1496999E+00, 0.1558462E+00, &
     & 0.1621462E+00, 0.1693697E+00, 0.1779658E+00, 0.1875327E+00, &
     & 0.1953995E+00, 0.2002983E+00, 0.2041396E+00, 0.2102394E+00, &
     & 0.2181326E+00, 0.2251449E+00, 0.2333481E+00, 0.2427316E+00, &
     & 0.2518829E+00, 0.2609586E+00, 0.2649161E+00, 0.2649161E+00 /
      data (ref_adm(13,iz,37, 9),iz = 1,20) / &
     & 0.1429388E+00, 0.1429388E+00, 0.1639700E+00, 0.1559974E+00, &
     & 0.1624007E+00, 0.1698340E+00, 0.1789041E+00, 0.1908427E+00, &
     & 0.2005182E+00, 0.2040762E+00, 0.2057583E+00, 0.2112241E+00, &
     & 0.2188657E+00, 0.2259640E+00, 0.2342296E+00, 0.2436579E+00, &
     & 0.2528150E+00, 0.2617159E+00, 0.2657115E+00, 0.2657115E+00 /
      data (ref_adm(13,iz,38, 9),iz = 1,20) / &
     & 0.1429388E+00, 0.1429388E+00, 0.1639700E+00, 0.1559974E+00, &
     & 0.1624007E+00, 0.1698340E+00, 0.1789041E+00, 0.1908427E+00, &
     & 0.2005182E+00, 0.2040762E+00, 0.2057583E+00, 0.2112241E+00, &
     & 0.2188657E+00, 0.2259640E+00, 0.2342296E+00, 0.2436579E+00, &
     & 0.2528150E+00, 0.2617159E+00, 0.2657115E+00, 0.2657115E+00 /
! Solar Zenith Angle 45.0 Albedo  0.1692918E+00
      data (ref_adm(13,iz, 1,10),iz = 1,20) / &
     & 0.1222100E+00, 0.1222100E+00, 0.1116000E+00, 0.1107400E+00, &
     & 0.1358100E+00, 0.1694700E+00, 0.1393155E+00, 0.1381389E+00, &
     & 0.1377717E+00, 0.1382528E+00, 0.3592300E+00, 0.1252600E+00, &
     & 0.1346900E+00, 0.1912900E+00, 0.1580797E+00, 0.1676322E+00, &
     & 0.1783429E+00, 0.1927598E+00, 0.2024718E+00, 0.2024718E+00 /
      data (ref_adm(13,iz, 2,10),iz = 1,20) / &
     & 0.1222100E+00, 0.1222100E+00, 0.1116000E+00, 0.1107400E+00, &
     & 0.1358100E+00, 0.1694700E+00, 0.1393155E+00, 0.1381389E+00, &
     & 0.1377717E+00, 0.1382528E+00, 0.3592300E+00, 0.1252600E+00, &
     & 0.1346900E+00, 0.1912900E+00, 0.1580797E+00, 0.1676322E+00, &
     & 0.1783429E+00, 0.1927598E+00, 0.2024718E+00, 0.2024718E+00 /
      data (ref_adm(13,iz, 3,10),iz = 1,20) / &
     & 0.1281400E+00, 0.1281400E+00, 0.1238500E+00, 0.1171100E+00, &
     & 0.1747800E+00, 0.1411936E+00, 0.1792400E+00, 0.1382084E+00, &
     & 0.1378241E+00, 0.1247500E+00, 0.9471700E-01, 0.1269200E+00, &
     & 0.1341300E+00, 0.1212000E+00, 0.1185300E+00, 0.1679100E+00, &
     & 0.1984900E+00, 0.1926556E+00, 0.3129267E-08, 0.3129267E-08 /
      data (ref_adm(13,iz, 4,10),iz = 1,20) / &
     & 0.1353300E+00, 0.1353300E+00, 0.2716300E+00, 0.1225000E+00, &
     & 0.1156200E+00, 0.1414000E+00, 0.1206600E+00, 0.1330100E+00, &
     & 0.1378814E+00, 0.1098900E+00, 0.1381400E+00, 0.1275700E+00, &
     & 0.1363100E+00, 0.1405800E+00, 0.1627600E+00, 0.1676533E+00, &
     & 0.1782642E+00, 0.1925528E+00, 0.2023381E+00, 0.2023381E+00 /
      data (ref_adm(13,iz, 5,10),iz = 1,20) / &
     & 0.1294400E+00, 0.1294400E+00, 0.1637700E+00, 0.1243100E+00, &
     & 0.1233500E+00, 0.1144000E+00, 0.1395812E+00, 0.1284600E+00, &
     & 0.1500100E+00, 0.1093000E+00, 0.1378800E+00, 0.1346500E+00, &
     & 0.1069000E+00, 0.1920000E+00, 0.1419400E+00, 0.1500100E+00, &
     & 0.1783036E+00, 0.1925221E+00, 0.2021489E+00, 0.2021489E+00 /
      data (ref_adm(13,iz, 6,10),iz = 1,20) / &
     & 0.1461200E+00, 0.1461200E+00, 0.1280200E+00, 0.1166700E+00, &
     & 0.1174500E+00, 0.1166200E+00, 0.1157400E+00, 0.1180700E+00, &
     & 0.1270000E+00, 0.1278600E+00, 0.1399621E+00, 0.1428422E+00, &
     & 0.1703400E+00, 0.1515144E+00, 0.1582421E+00, 0.1676722E+00, &
     & 0.1782616E+00, 0.1923924E+00, 0.2019646E+00, 0.2019646E+00 /
      data (ref_adm(13,iz, 7,10),iz = 1,20) / &
     & 0.1487800E+00, 0.1487800E+00, 0.1489362E+00, 0.1207600E+00, &
     & 0.1144100E+00, 0.1162100E+00, 0.1176500E+00, 0.1118500E+00, &
     & 0.1104100E+00, 0.1138500E+00, 0.5928100E+00, 0.1430254E+00, &
     & 0.1616800E+00, 0.1535800E+00, 0.1927400E+00, 0.1709700E+00, &
     & 0.1782294E+00, 0.1922912E+00, 0.2016814E+00, 0.2016814E+00 /
      data (ref_adm(13,iz, 8,10),iz = 1,20) / &
     & 0.1480300E+00, 0.1480300E+00, 0.1443400E+00, 0.1417000E+00, &
     & 0.1380600E+00, 0.1340800E+00, 0.1315200E+00, 0.1283200E+00, &
     & 0.1296800E+00, 0.1411000E+00, 0.1484400E+00, 0.1553300E+00, &
     & 0.1700100E+00, 0.2088300E+00, 0.1889900E+00, 0.1677197E+00, &
     & 0.1781511E+00, 0.1920801E+00, 0.2013615E+00, 0.2013615E+00 /
      data (ref_adm(13,iz, 9,10),iz = 1,20) / &
     & 0.1439600E+00, 0.1439600E+00, 0.1376400E+00, 0.1276500E+00, &
     & 0.9895200E-01, 0.1191800E+00, 0.1189700E+00, 0.1168100E+00, &
     & 0.1128400E+00, 0.1393719E+00, 0.1406397E+00, 0.1702700E+00, &
     & 0.1973700E+00, 0.1519433E+00, 0.1336300E+00, 0.1677415E+00, &
     & 0.1781452E+00, 0.1919045E+00, 0.2010006E+00, 0.2010006E+00 /
      data (ref_adm(13,iz,10,10),iz = 1,20) / &
     & 0.2415900E+00, 0.2415900E+00, 0.1264100E+00, 0.1231000E+00, &
     & 0.1446981E+00, 0.1243200E+00, 0.1085300E+00, 0.1233200E+00, &
     & 0.1056600E+00, 0.1529600E+00, 0.1409577E+00, 0.1735900E+00, &
     & 0.1477831E+00, 0.1521261E+00, 0.1586002E+00, 0.1678075E+00, &
     & 0.1780916E+00, 0.1917721E+00, 0.2005972E+00, 0.2005972E+00 /
      data (ref_adm(13,iz,11,10),iz = 1,20) / &
     & 0.1555300E+00, 0.1555300E+00, 0.1198100E+00, 0.1318600E+00, &
     & 0.1241200E+00, 0.1197700E+00, 0.1194200E+00, 0.1166800E+00, &
     & 0.1238400E+00, 0.1444400E+00, 0.1208900E+00, 0.1680500E+00, &
     & 0.1480117E+00, 0.1523040E+00, 0.1587794E+00, 0.1679168E+00, &
     & 0.1780875E+00, 0.1916128E+00, 0.2001876E+00, 0.2001876E+00 /
      data (ref_adm(13,iz,12,10),iz = 1,20) / &
     & 0.1289200E+00, 0.1289200E+00, 0.1364400E+00, 0.1260800E+00, &
     & 0.1281600E+00, 0.1326100E+00, 0.1250000E+00, 0.1219100E+00, &
     & 0.1400940E+00, 0.1606900E+00, 0.1441500E+00, 0.1630000E+00, &
     & 0.1151700E+00, 0.1525464E+00, 0.1589296E+00, 0.1679603E+00, &
     & 0.1780538E+00, 0.1914478E+00, 0.1997204E+00, 0.1997204E+00 /
      data (ref_adm(13,iz,13,10),iz = 1,20) / &
     & 0.1276700E+00, 0.1276700E+00, 0.1608200E+00, 0.1541300E+00, &
     & 0.1357200E+00, 0.1292200E+00, 0.1217300E+00, 0.1202600E+00, &
     & 0.1238100E+00, 0.1223800E+00, 0.1228300E+00, 0.1853700E+00, &
     & 0.1444100E+00, 0.1354700E+00, 0.1549900E+00, 0.1680575E+00, &
     & 0.1780120E+00, 0.1912729E+00, 0.1992618E+00, 0.1992618E+00 /
      data (ref_adm(13,iz,14,10),iz = 1,20) / &
     & 0.1723000E+00, 0.1723000E+00, 0.2725500E+00, 0.1471900E+00, &
     & 0.1708800E+00, 0.1246300E+00, 0.1305800E+00, 0.1266800E+00, &
     & 0.1450200E+00, 0.1475500E+00, 0.1386200E+00, 0.1466900E+00, &
     & 0.1390900E+00, 0.1560800E+00, 0.1929400E+00, 0.1681510E+00, &
     & 0.1780395E+00, 0.1910961E+00, 0.1988081E+00, 0.1988081E+00 /
      data (ref_adm(13,iz,15,10),iz = 1,20) / &
     & 0.1957700E+00, 0.1957700E+00, 0.3023100E+00, 0.1634800E+00, &
     & 0.1290900E+00, 0.1242900E+00, 0.1093500E+00, 0.1157300E+00, &
     & 0.1166200E+00, 0.1236700E+00, 0.1459900E+00, 0.1577800E+00, &
     & 0.1554900E+00, 0.1530300E+00, 0.1595643E+00, 0.1682642E+00, &
     & 0.1780180E+00, 0.1909276E+00, 0.1983894E+00, 0.1983894E+00 /
      data (ref_adm(13,iz,16,10),iz = 1,20) / &
     & 0.1452600E+00, 0.1452600E+00, 0.1616800E+00, 0.1697100E+00, &
     & 0.3619300E+00, 0.1453936E+00, 0.1437954E+00, 0.1141200E+00, &
     & 0.1285300E+00, 0.1448000E+00, 0.1224700E+00, 0.1587800E+00, &
     & 0.1037500E+00, 0.1240500E+00, 0.9372100E-01, 0.1684380E+00, &
     & 0.1780709E+00, 0.1908075E+00, 0.1979594E+00, 0.1979594E+00 /
      data (ref_adm(13,iz,17,10),iz = 1,20) / &
     & 0.1306200E+00, 0.1306200E+00, 0.1010700E+00, 0.3802200E+00, &
     & 0.1565200E+00, 0.1432700E+00, 0.1444052E+00, 0.8932300E-01, &
     & 0.1427076E+00, 0.1758200E+00, 0.1496600E+00, 0.1880000E+00, &
     & 0.1441200E+00, 0.1514500E+00, 0.1601193E+00, 0.1685810E+00, &
     & 0.1781050E+00, 0.1906223E+00, 0.1975988E+00, 0.1975988E+00 /
      data (ref_adm(13,iz,18,10),iz = 1,20) / &
     & 0.1292100E+00, 0.1292100E+00, 0.1092700E+00, 0.1538911E+00, &
     & 0.1520984E+00, 0.7172400E-01, 0.1226500E+00, 0.7903100E-01, &
     & 0.1301100E+00, 0.1478023E+00, 0.1488163E+00, 0.1763300E+00, &
     & 0.1550512E+00, 0.1528300E+00, 0.1651490E+00, 0.1888700E+00, &
     & 0.1834448E+00, 0.1961183E+00, 0.2030615E+00, 0.2030615E+00 /
      data (ref_adm(13,iz,19,10),iz = 1,20) / &
     & 0.1478800E+00, 0.1478800E+00, 0.1618900E+00, 0.1723000E+00, &
     & 0.1505100E+00, 0.1513968E+00, 0.1468300E+00, 0.1115600E+00, &
     & 0.1382800E+00, 0.1409300E+00, 0.1494397E+00, 0.1607400E+00, &
     & 0.1742000E+00, 0.1598100E+00, 0.1654956E+00, 0.1739367E+00, &
     & 0.1835337E+00, 0.1960515E+00, 0.2027353E+00, 0.2027353E+00 /
      data (ref_adm(13,iz,20,10),iz = 1,20) / &
     & 0.1397100E+00, 0.1397100E+00, 0.1352300E+00, 0.3634800E+00, &
     & 0.1272200E+00, 0.1260300E+00, 0.1285600E+00, 0.1188200E+00, &
     & 0.1071800E+00, 0.1490836E+00, 0.1549500E+00, 0.1525090E+00, &
     & 0.1335400E+00, 0.1697500E+00, 0.1658320E+00, 0.1741700E+00, &
     & 0.1835897E+00, 0.1958750E+00, 0.2024743E+00, 0.2024743E+00 /
      data (ref_adm(13,iz,21,10),iz = 1,20) / &
     & 0.1597900E+00, 0.1597900E+00, 0.1786900E+00, 0.1611900E+00, &
     & 0.1457700E+00, 0.1411900E+00, 0.1804900E+00, 0.1306100E+00, &
     & 0.1484900E+00, 0.1299200E+00, 0.1649000E+00, 0.1613300E+00, &
     & 0.1479300E+00, 0.1635800E+00, 0.1661769E+00, 0.1818300E+00, &
     & 0.1837554E+00, 0.1957491E+00, 0.2022020E+00, 0.2022020E+00 /
      data (ref_adm(13,iz,22,10),iz = 1,20) / &
     & 0.1474500E+00, 0.1474500E+00, 0.1236100E+00, 0.1369900E+00, &
     & 0.1211100E+00, 0.1420200E+00, 0.1508591E+00, 0.1540431E+00, &
     & 0.1933200E+00, 0.1569300E+00, 0.1573500E+00, 0.1656700E+00, &
     & 0.1723300E+00, 0.1909113E+00, 0.2021429E+00, 0.2168383E+00, &
     & 0.2322629E+00, 0.2514715E+00, 0.2618861E+00, 0.2618861E+00 /
      data (ref_adm(13,iz,23,10),iz = 1,20) / &
     & 0.1258000E+00, 0.1258000E+00, 0.1814600E+00, 0.1339700E+00, &
     & 0.1293400E+00, 0.1126300E+00, 0.1567600E+00, 0.1705200E+00, &
     & 0.2036900E+00, 0.1648050E+00, 0.1600100E+00, 0.1644900E+00, &
     & 0.1860167E+00, 0.1937290E+00, 0.2046696E+00, 0.2188595E+00, &
     & 0.2340114E+00, 0.2520216E+00, 0.2619045E+00, 0.2619045E+00 /
      data (ref_adm(13,iz,24,10),iz = 1,20) / &
     & 0.1210600E+00, 0.1210600E+00, 0.1303900E+00, 0.1458745E+00, &
     & 0.1586800E+00, 0.1380600E+00, 0.2763700E+00, 0.1598100E+00, &
     & 0.1585200E+00, 0.1679373E+00, 0.1586700E+00, 0.1535200E+00, &
     & 0.1894417E+00, 0.1971842E+00, 0.2040200E+00, 0.2216308E+00, &
     & 0.2362824E+00, 0.2535369E+00, 0.2625306E+00, 0.2625306E+00 /
      data (ref_adm(13,iz,25,10),iz = 1,20) / &
     & 0.1435500E+00, 0.1435500E+00, 0.1339800E+00, 0.1214700E+00, &
     & 0.1427800E+00, 0.1370500E+00, 0.1576013E+00, 0.1742100E+00, &
     & 0.1690100E+00, 0.1432000E+00, 0.1517200E+00, 0.1486600E+00, &
     & 0.1758200E+00, 0.2009221E+00, 0.2115458E+00, 0.2250747E+00, &
     & 0.2392121E+00, 0.2556600E+00, 0.2642369E+00, 0.2642369E+00 /
      data (ref_adm(13,iz,26,10),iz = 1,20) / &
     & 0.1227200E+00, 0.1227200E+00, 0.1342300E+00, 0.1374300E+00, &
     & 0.1338100E+00, 0.1384300E+00, 0.1453000E+00, 0.1472500E+00, &
     & 0.1662000E+00, 0.1689600E+00, 0.1805210E+00, 0.1849200E+00, &
     & 0.1524500E+00, 0.1697800E+00, 0.1952600E+00, 0.2292518E+00, &
     & 0.2122900E+00, 0.2585312E+00, 0.2666790E+00, 0.2666790E+00 /
      data (ref_adm(13,iz,27,10),iz = 1,20) / &
     & 0.1534200E+00, 0.1534200E+00, 0.1852500E+00, 0.1597200E+00, &
     & 0.1635800E+00, 0.1596000E+00, 0.1453000E+00, 0.1658300E+00, &
     & 0.1806200E+00, 0.1639600E+00, 0.1716500E+00, 0.1716000E+00, &
     & 0.1757700E+00, 0.1855900E+00, 0.1983100E+00, 0.2338065E+00, &
     & 0.2474859E+00, 0.2622555E+00, 0.2698455E+00, 0.2698455E+00 /
      data (ref_adm(13,iz,28,10),iz = 1,20) / &
     & 0.1404900E+00, 0.1404900E+00, 0.2922500E+00, 0.1405000E+00, &
     & 0.1857400E+00, 0.1860400E+00, 0.2268900E+00, 0.1598700E+00, &
     & 0.1640400E+00, 0.1826783E+00, 0.1865600E+00, 0.1661500E+00, &
     & 0.1879500E+00, 0.2044900E+00, 0.2089300E+00, 0.1814400E+00, &
     & 0.1982200E+00, 0.2668266E+00, 0.2742820E+00, 0.2742820E+00 /
      data (ref_adm(13,iz,29,10),iz = 1,20) / &
     & 0.1349000E+00, 0.1349000E+00, 0.1243600E+00, 0.1460800E+00, &
     & 0.1561300E+00, 0.1520500E+00, 0.1677469E+00, 0.1708800E+00, &
     & 0.1803300E+00, 0.1868061E+00, 0.1935372E+00, 0.2024239E+00, &
     & 0.1833300E+00, 0.2104700E+00, 0.2238400E+00, 0.2150500E+00, &
     & 0.2572591E+00, 0.2718052E+00, 0.2794018E+00, 0.2794018E+00 /
      data (ref_adm(13,iz,30,10),iz = 1,20) / &
     & 0.2032400E+00, 0.2032400E+00, 0.1499000E+00, 0.1887100E+00, &
     & 0.3761800E+00, 0.1637450E+00, 0.1702594E+00, 0.1768963E+00, &
     & 0.2445400E+00, 0.1907749E+00, 0.1842000E+00, 0.1981900E+00, &
     & 0.2171760E+00, 0.2253144E+00, 0.2360228E+00, 0.2493018E+00, &
     & 0.2626674E+00, 0.2765654E+00, 0.2848548E+00, 0.2848548E+00 /
      data (ref_adm(13,iz,31,10),iz = 1,20) / &
     & 0.1462000E+00, 0.1462000E+00, 0.1506100E+00, 0.1522300E+00, &
     & 0.1603900E+00, 0.1679100E+00, 0.1645200E+00, 0.1691700E+00, &
     & 0.1719900E+00, 0.1789800E+00, 0.1851600E+00, 0.1943800E+00, &
     & 0.2091700E+00, 0.2110000E+00, 0.2415417E+00, 0.2547512E+00, &
     & 0.2679520E+00, 0.2817280E+00, 0.2900347E+00, 0.2900347E+00 /
      data (ref_adm(13,iz,32,10),iz = 1,20) / &
     & 0.1601200E+00, 0.1601200E+00, 0.2040200E+00, 0.1540600E+00, &
     & 0.2055000E+00, 0.2548300E+00, 0.2239700E+00, 0.1813656E+00, &
     & 0.1888160E+00, 0.1966235E+00, 0.2048372E+00, 0.2156247E+00, &
     & 0.2269116E+00, 0.2358040E+00, 0.2467195E+00, 0.2342900E+00, &
     & 0.2311300E+00, 0.2868075E+00, 0.2948855E+00, 0.2948855E+00 /
      data (ref_adm(13,iz,33,10),iz = 1,20) / &
     & 0.1273800E+00, 0.1273800E+00, 0.2102600E+00, 0.1541414E+00, &
     & 0.1410600E+00, 0.1684143E+00, 0.1651000E+00, 0.1851200E+00, &
     & 0.1912300E+00, 0.1510900E+00, 0.1956800E+00, 0.2185885E+00, &
     & 0.2302621E+00, 0.2400709E+00, 0.2269200E+00, 0.2370700E+00, &
     & 0.2441700E+00, 0.2916164E+00, 0.2995889E+00, 0.2995889E+00 /
      data (ref_adm(13,iz,34,10),iz = 1,20) / &
     & 0.1311300E+00, 0.1311300E+00, 0.2403000E+00, 0.1570100E+00, &
     & 0.1414000E+00, 0.1495300E+00, 0.1632700E+00, 0.1703100E+00, &
     & 0.1939570E+00, 0.2275100E+00, 0.2115431E+00, 0.2218217E+00, &
     & 0.2329253E+00, 0.2430021E+00, 0.2555644E+00, 0.2217300E+00, &
     & 0.2383200E+00, 0.2956386E+00, 0.3039708E+00, 0.3039708E+00 /
      data (ref_adm(13,iz,35,10),iz = 1,20) / &
     & 0.1449400E+00, 0.1449400E+00, 0.1620400E+00, 0.1551349E+00, &
     & 0.1626024E+00, 0.1701668E+00, 0.1601900E+00, 0.2043900E+00, &
     & 0.2127400E+00, 0.2242100E+00, 0.2155719E+00, 0.2253064E+00, &
     & 0.1985200E+00, 0.2451874E+00, 0.2584031E+00, 0.2727798E+00, &
     & 0.2859291E+00, 0.2991452E+00, 0.3073542E+00, 0.3073542E+00 /
      data (ref_adm(13,iz,36,10),iz = 1,20) / &
     & 0.1277800E+00, 0.1277800E+00, 0.1213700E+00, 0.1554391E+00, &
     & 0.1630444E+00, 0.1706198E+00, 0.1597300E+00, 0.1780900E+00, &
     & 0.1977400E+00, 0.2107394E+00, 0.2200891E+00, 0.2285434E+00, &
     & 0.2719800E+00, 0.2467184E+00, 0.2357600E+00, 0.2753010E+00, &
     & 0.2883341E+00, 0.3016486E+00, 0.3096099E+00, 0.3096099E+00 /
      data (ref_adm(13,iz,37,10),iz = 1,20) / &
     & 0.1397300E+00, 0.1397300E+00, 0.1761600E+00, 0.1264300E+00, &
     & 0.1693900E+00, 0.1708940E+00, 0.1789903E+00, 0.1889956E+00, &
     & 0.1963900E+00, 0.2466100E+00, 0.2275283E+00, 0.2308457E+00, &
     & 0.2392135E+00, 0.2537100E+00, 0.2609603E+00, 0.2765989E+00, &
     & 0.2896614E+00, 0.3030282E+00, 0.3108892E+00, 0.3108892E+00 /
      data (ref_adm(13,iz,38,10),iz = 1,20) / &
     & 0.1397300E+00, 0.1397300E+00, 0.1761600E+00, 0.1264300E+00, &
     & 0.1693900E+00, 0.1708940E+00, 0.1789903E+00, 0.1889956E+00, &
     & 0.1963900E+00, 0.2466100E+00, 0.2275283E+00, 0.2308457E+00, &
     & 0.2392135E+00, 0.2537100E+00, 0.2609603E+00, 0.2765989E+00, &
     & 0.2896614E+00, 0.3030282E+00, 0.3108892E+00, 0.3108892E+00 /
! Solar Zenith Angle 50.0 Albedo  0.1697733E+00
      data (ref_adm(13,iz, 1,11),iz = 1,20) / &
     & 0.1239700E+00, 0.1239700E+00, 0.1284400E+00, 0.2345900E+00, &
     & 0.4373200E+00, 0.2383000E+00, 0.2280600E+00, 0.1106000E+00, &
     & 0.1398552E+00, 0.1398137E+00, 0.1614100E+00, 0.1470800E+00, &
     & 0.1459397E+00, 0.1543200E+00, 0.1515700E+00, 0.1625950E+00, &
     & 0.1713742E+00, 0.1828149E+00, 0.1889044E+00, 0.1889044E+00 /
      data (ref_adm(13,iz, 2,11),iz = 1,20) / &
     & 0.1239700E+00, 0.1239700E+00, 0.1284400E+00, 0.2345900E+00, &
     & 0.4373200E+00, 0.2383000E+00, 0.2280600E+00, 0.1106000E+00, &
     & 0.1398552E+00, 0.1398137E+00, 0.1614100E+00, 0.1470800E+00, &
     & 0.1459397E+00, 0.1543200E+00, 0.1515700E+00, 0.1625950E+00, &
     & 0.1713742E+00, 0.1828149E+00, 0.1889044E+00, 0.1889044E+00 /
      data (ref_adm(13,iz, 3,11),iz = 1,20) / &
     & 0.1430600E+00, 0.1430600E+00, 0.1314500E+00, 0.1660600E+00, &
     & 0.1230100E+00, 0.1431354E+00, 0.1297700E+00, 0.1379300E+00, &
     & 0.1481900E+00, 0.1398136E+00, 0.1327300E+00, 0.1577600E+00, &
     & 0.1602000E+00, 0.1732800E+00, 0.1754800E+00, 0.2454900E+00, &
     & 0.1713742E+00, 0.1828149E+00, 0.2920707E-08, 0.2920707E-08 /
      data (ref_adm(13,iz, 4,11),iz = 1,20) / &
     & 0.1395400E+00, 0.1395400E+00, 0.1323500E+00, 0.1319600E+00, &
     & 0.1248600E+00, 0.1578900E+00, 0.1020100E+00, 0.1405201E+00, &
     & 0.1398552E+00, 0.1198100E+00, 0.1348100E+00, 0.1553300E+00, &
     & 0.1700800E+00, 0.1442800E+00, 0.1577700E+00, 0.1625950E+00, &
     & 0.1713742E+00, 0.1828149E+00, 0.1889044E+00, 0.1889044E+00 /
      data (ref_adm(13,iz, 5,11),iz = 1,20) / &
     & 0.1414800E+00, 0.1414800E+00, 0.1211800E+00, 0.1260000E+00, &
     & 0.1301700E+00, 0.1194300E+00, 0.1082500E+00, 0.1405201E+00, &
     & 0.1471600E+00, 0.1195300E+00, 0.1821300E+00, 0.1427292E+00, &
     & 0.1411300E+00, 0.1754000E+00, 0.1548799E+00, 0.1984000E+00, &
     & 0.1713742E+00, 0.1828149E+00, 0.1889044E+00, 0.1889044E+00 /
      data (ref_adm(13,iz, 6,11),iz = 1,20) / &
     & 0.1413200E+00, 0.1413200E+00, 0.1383000E+00, 0.1361900E+00, &
     & 0.1242800E+00, 0.1173600E+00, 0.1213800E+00, 0.1276000E+00, &
     & 0.1974300E+00, 0.1169700E+00, 0.1208800E+00, 0.1401400E+00, &
     & 0.1395700E+00, 0.1318000E+00, 0.1734700E+00, 0.1928200E+00, &
     & 0.1713742E+00, 0.1828149E+00, 0.1889044E+00, 0.1889044E+00 /
      data (ref_adm(13,iz, 7,11),iz = 1,20) / &
     & 0.1413200E+00, 0.1413200E+00, 0.1175100E+00, 0.1217100E+00, &
     & 0.1061500E+00, 0.1031400E+00, 0.1383000E+00, 0.1175300E+00, &
     & 0.1834800E+00, 0.1331000E+00, 0.1236500E+00, 0.1765200E+00, &
     & 0.1831500E+00, 0.1500000E+00, 0.1768900E+00, 0.1625950E+00, &
     & 0.1713742E+00, 0.1828149E+00, 0.1889044E+00, 0.1889044E+00 /
      data (ref_adm(13,iz, 8,11),iz = 1,20) / &
     & 0.2570100E+00, 0.2570100E+00, 0.1066700E+00, 0.1183800E+00, &
     & 0.1390700E+00, 0.1787300E+00, 0.1642800E+00, 0.1342700E+00, &
     & 0.1378800E+00, 0.1274200E+00, 0.1356700E+00, 0.1336500E+00, &
     & 0.1375500E+00, 0.1446800E+00, 0.1741700E+00, 0.1865600E+00, &
     & 0.1713742E+00, 0.1828149E+00, 0.1889044E+00, 0.1889044E+00 /
      data (ref_adm(13,iz, 9,11),iz = 1,20) / &
     & 0.1261300E+00, 0.1261300E+00, 0.1195600E+00, 0.1732300E+00, &
     & 0.1277300E+00, 0.1359500E+00, 0.1191400E+00, 0.1202600E+00, &
     & 0.1296700E+00, 0.1199900E+00, 0.1586100E+00, 0.1537600E+00, &
     & 0.1542200E+00, 0.1716600E+00, 0.1548799E+00, 0.1625950E+00, &
     & 0.2092600E+00, 0.1828149E+00, 0.1889044E+00, 0.1889044E+00 /
      data (ref_adm(13,iz,10,11),iz = 1,20) / &
     & 0.1315800E+00, 0.1315800E+00, 0.1407100E+00, 0.1759100E+00, &
     & 0.1108500E+00, 0.1190200E+00, 0.1127000E+00, 0.1108000E+00, &
     & 0.1168500E+00, 0.1445200E+00, 0.1348900E+00, 0.1478700E+00, &
     & 0.1637100E+00, 0.1274000E+00, 0.1668500E+00, 0.2036300E+00, &
     & 0.1713742E+00, 0.1828149E+00, 0.1889044E+00, 0.1889044E+00 /
      data (ref_adm(13,iz,11,11),iz = 1,20) / &
     & 0.2022700E+00, 0.2022700E+00, 0.1879400E+00, 0.1037900E+00, &
     & 0.1220100E+00, 0.1074300E+00, 0.1060700E+00, 0.1335600E+00, &
     & 0.1340900E+00, 0.1418700E+00, 0.1197600E+00, 0.1552000E+00, &
     & 0.1598000E+00, 0.1353600E+00, 0.1215200E+00, 0.1905500E+00, &
     & 0.1713742E+00, 0.1828149E+00, 0.1889044E+00, 0.1889044E+00 /
      data (ref_adm(13,iz,12,11),iz = 1,20) / &
     & 0.1331800E+00, 0.1331800E+00, 0.1211000E+00, 0.1237400E+00, &
     & 0.1151900E+00, 0.1178700E+00, 0.1165500E+00, 0.2013400E+00, &
     & 0.1216500E+00, 0.1407900E+00, 0.1254900E+00, 0.1494900E+00, &
     & 0.1700200E+00, 0.1396800E+00, 0.1216400E+00, 0.1625950E+00, &
     & 0.1713742E+00, 0.1828149E+00, 0.1889044E+00, 0.1889044E+00 /
      data (ref_adm(13,iz,13,11),iz = 1,20) / &
     & 0.1490800E+00, 0.1490800E+00, 0.1675600E+00, 0.1371100E+00, &
     & 0.1331800E+00, 0.1282000E+00, 0.1281200E+00, 0.1414500E+00, &
     & 0.1716300E+00, 0.1444500E+00, 0.1338500E+00, 0.1723200E+00, &
     & 0.1459397E+00, 0.1430300E+00, 0.1411300E+00, 0.1405000E+00, &
     & 0.1713742E+00, 0.1828149E+00, 0.1889044E+00, 0.1889044E+00 /
      data (ref_adm(13,iz,14,11),iz = 1,20) / &
     & 0.1444900E+00, 0.1444900E+00, 0.1960000E+00, 0.1329400E+00, &
     & 0.1390800E+00, 0.1361600E+00, 0.1362300E+00, 0.1376900E+00, &
     & 0.1372800E+00, 0.1391900E+00, 0.1338100E+00, 0.1367200E+00, &
     & 0.1496700E+00, 0.1574100E+00, 0.1433500E+00, 0.1443100E+00, &
     & 0.1713742E+00, 0.1828149E+00, 0.1889044E+00, 0.1889044E+00 /
      data (ref_adm(13,iz,15,11),iz = 1,20) / &
     & 0.1269700E+00, 0.1269700E+00, 0.1276200E+00, 0.1304900E+00, &
     & 0.1303500E+00, 0.1219200E+00, 0.1216200E+00, 0.1264300E+00, &
     & 0.1283700E+00, 0.1372600E+00, 0.1330900E+00, 0.1385700E+00, &
     & 0.1472000E+00, 0.1459400E+00, 0.1389400E+00, 0.1683300E+00, &
     & 0.1713742E+00, 0.1828149E+00, 0.1889044E+00, 0.1889044E+00 /
      data (ref_adm(13,iz,16,11),iz = 1,20) / &
     & 0.1659500E+00, 0.1659500E+00, 0.3609200E+00, 0.1319200E+00, &
     & 0.1228000E+00, 0.1374900E+00, 0.1237400E+00, 0.1252100E+00, &
     & 0.1305500E+00, 0.1601000E+00, 0.1407400E+00, 0.1381300E+00, &
     & 0.1425900E+00, 0.1383100E+00, 0.1548799E+00, 0.1785200E+00, &
     & 0.1713742E+00, 0.1828149E+00, 0.1889044E+00, 0.1889044E+00 /
      data (ref_adm(13,iz,17,11),iz = 1,20) / &
     & 0.1282700E+00, 0.1282700E+00, 0.1339100E+00, 0.1351000E+00, &
     & 0.1384700E+00, 0.1254000E+00, 0.1251100E+00, 0.1218100E+00, &
     & 0.1218800E+00, 0.2328600E+00, 0.1775800E+00, 0.1500100E+00, &
     & 0.1511000E+00, 0.2060900E+00, 0.1981000E+00, 0.1625950E+00, &
     & 0.1713742E+00, 0.1828149E+00, 0.1889044E+00, 0.1889044E+00 /
      data (ref_adm(13,iz,18,11),iz = 1,20) / &
     & 0.1348700E+00, 0.1348700E+00, 0.1348000E+00, 0.1211800E+00, &
     & 0.1346200E+00, 0.1357700E+00, 0.1298200E+00, 0.1130100E+00, &
     & 0.1571400E+00, 0.9469400E-01, 0.1614000E+00, 0.1582400E+00, &
     & 0.1606200E+00, 0.1374200E+00, 0.1736173E+00, 0.1853800E+00, &
     & 0.1981941E+00, 0.2147755E+00, 0.2246541E+00, 0.2246541E+00 /
      data (ref_adm(13,iz,19,11),iz = 1,20) / &
     & 0.1335100E+00, 0.1335100E+00, 0.1419800E+00, 0.1394800E+00, &
     & 0.1662400E+00, 0.1475200E+00, 0.1317100E+00, 0.1059900E+00, &
     & 0.1135700E+00, 0.1709800E+00, 0.1707700E+00, 0.1544400E+00, &
     & 0.1743100E+00, 0.2166400E+00, 0.1562100E+00, 0.1857939E+00, &
     & 0.1980617E+00, 0.2140632E+00, 0.2227069E+00, 0.2227069E+00 /
      data (ref_adm(13,iz,20,11),iz = 1,20) / &
     & 0.1221100E+00, 0.1221100E+00, 0.1507400E+00, 0.1489700E+00, &
     & 0.1549700E+00, 0.1372400E+00, 0.1735400E+00, 0.1283600E+00, &
     & 0.1495900E+00, 0.1478700E+00, 0.1505400E+00, 0.1542200E+00, &
     & 0.1582800E+00, 0.1811800E+00, 0.1137700E+00, 0.1863869E+00, &
     & 0.1983151E+00, 0.2134432E+00, 0.2214292E+00, 0.2214292E+00 /
      data (ref_adm(13,iz,21,11),iz = 1,20) / &
     & 0.1378200E+00, 0.1378200E+00, 0.1652400E+00, 0.1352300E+00, &
     & 0.1229100E+00, 0.1297000E+00, 0.1462400E+00, 0.1328700E+00, &
     & 0.1427600E+00, 0.1446000E+00, 0.1406300E+00, 0.1527700E+00, &
     & 0.1714600E+00, 0.1848800E+00, 0.1948000E+00, 0.1872759E+00, &
     & 0.1987301E+00, 0.2130720E+00, 0.2204690E+00, 0.2204690E+00 /
      data (ref_adm(13,iz,22,11),iz = 1,20) / &
     & 0.1256000E+00, 0.1256000E+00, 0.1366200E+00, 0.1404700E+00, &
     & 0.1434400E+00, 0.1314400E+00, 0.1496800E+00, 0.1548700E+00, &
     & 0.1722700E+00, 0.1769800E+00, 0.1668668E+00, 0.2177000E+00, &
     & 0.1827536E+00, 0.1721700E+00, 0.1890100E+00, 0.1734100E+00, &
     & 0.2318610E+00, 0.2510365E+00, 0.2614329E+00, 0.2614329E+00 /
      data (ref_adm(13,iz,23,11),iz = 1,20) / &
     & 0.1146200E+00, 0.1146200E+00, 0.1485000E+00, 0.1421800E+00, &
     & 0.1358400E+00, 0.1482600E+00, 0.1506400E+00, 0.1424400E+00, &
     & 0.2036600E+00, 0.1743700E+00, 0.1545100E+00, 0.1714600E+00, &
     & 0.1802500E+00, 0.1933938E+00, 0.1801300E+00, 0.2184808E+00, &
     & 0.2336065E+00, 0.2515854E+00, 0.2614512E+00, 0.2614512E+00 /
      data (ref_adm(13,iz,24,11),iz = 1,20) / &
     & 0.1020600E+00, 0.1020600E+00, 0.1670200E+00, 0.1659500E+00, &
     & 0.1423400E+00, 0.1469300E+00, 0.2523400E+00, 0.1614500E+00, &
     & 0.1602800E+00, 0.1755300E+00, 0.1793900E+00, 0.2005100E+00, &
     & 0.1886300E+00, 0.1918500E+00, 0.1993800E+00, 0.2212472E+00, &
     & 0.2358734E+00, 0.2530981E+00, 0.2620762E+00, 0.2620762E+00 /
      data (ref_adm(13,iz,25,11),iz = 1,20) / &
     & 0.1218000E+00, 0.1218000E+00, 0.1311100E+00, 0.1391500E+00, &
     & 0.1429400E+00, 0.1410500E+00, 0.1435600E+00, 0.1493600E+00, &
     & 0.1555600E+00, 0.1814200E+00, 0.1605300E+00, 0.1668000E+00, &
     & 0.1765100E+00, 0.1723700E+00, 0.1518800E+00, 0.1801100E+00, &
     & 0.2387981E+00, 0.2552175E+00, 0.2637796E+00, 0.2637796E+00 /
      data (ref_adm(13,iz,26,11),iz = 1,20) / &
     & 0.1432100E+00, 0.1432100E+00, 0.1725800E+00, 0.1550000E+00, &
     & 0.1397000E+00, 0.1543200E+00, 0.1400800E+00, 0.1501600E+00, &
     & 0.1616500E+00, 0.1483500E+00, 0.1632100E+00, 0.1931500E+00, &
     & 0.2072200E+00, 0.1793300E+00, 0.1990600E+00, 0.2288552E+00, &
     & 0.2425974E+00, 0.2580839E+00, 0.2662175E+00, 0.2662175E+00 /
      data (ref_adm(13,iz,27,11),iz = 1,20) / &
     & 0.1579900E+00, 0.1579900E+00, 0.1453400E+00, 0.1548300E+00, &
     & 0.1789600E+00, 0.1556600E+00, 0.1715800E+00, 0.2194100E+00, &
     & 0.1737500E+00, 0.1972400E+00, 0.1766900E+00, 0.1773800E+00, &
     & 0.1990300E+00, 0.1927400E+00, 0.2048800E+00, 0.2334019E+00, &
     & 0.2470576E+00, 0.2618016E+00, 0.2693785E+00, 0.2693785E+00 /
      data (ref_adm(13,iz,28,11),iz = 1,20) / &
     & 0.1599800E+00, 0.1599800E+00, 0.1454200E+00, 0.1636600E+00, &
     & 0.1474500E+00, 0.1543400E+00, 0.1310800E+00, 0.1470200E+00, &
     & 0.1739700E+00, 0.1964900E+00, 0.1948600E+00, 0.1785100E+00, &
     & 0.1980500E+00, 0.2241100E+00, 0.2086000E+00, 0.2382825E+00, &
     & 0.2518349E+00, 0.2663648E+00, 0.2738074E+00, 0.2738074E+00 /
      data (ref_adm(13,iz,29,11),iz = 1,20) / &
     & 0.1429400E+00, 0.1429400E+00, 0.1485000E+00, 0.1500900E+00, &
     & 0.2094900E+00, 0.1572100E+00, 0.1663800E+00, 0.1663200E+00, &
     & 0.1805900E+00, 0.1864828E+00, 0.1932022E+00, 0.2220300E+00, &
     & 0.2076000E+00, 0.1989800E+00, 0.2122900E+00, 0.2164400E+00, &
     & 0.2568139E+00, 0.2713348E+00, 0.2789183E+00, 0.2789183E+00 /
      data (ref_adm(13,iz,30,11),iz = 1,20) / &
     & 0.1361500E+00, 0.1361500E+00, 0.1400600E+00, 0.1563300E+00, &
     & 0.1609000E+00, 0.1665300E+00, 0.1710700E+00, 0.1795700E+00, &
     & 0.1778000E+00, 0.1794500E+00, 0.1977605E+00, 0.2070254E+00, &
     & 0.2179900E+00, 0.2249245E+00, 0.2315800E+00, 0.2242900E+00, &
     & 0.2622129E+00, 0.2760867E+00, 0.2843619E+00, 0.2843619E+00 /
      data (ref_adm(13,iz,31,11),iz = 1,20) / &
     & 0.1421200E+00, 0.1421200E+00, 0.2019200E+00, 0.1479900E+00, &
     & 0.1536200E+00, 0.1598300E+00, 0.1843300E+00, 0.1751300E+00, &
     & 0.1816700E+00, 0.1963200E+00, 0.1963700E+00, 0.2087800E+00, &
     & 0.2173100E+00, 0.2478200E+00, 0.2368700E+00, 0.2543104E+00, &
     & 0.2674883E+00, 0.2812404E+00, 0.2895327E+00, 0.2895327E+00 /
      data (ref_adm(13,iz,32,11),iz = 1,20) / &
     & 0.1398900E+00, 0.1398900E+00, 0.1564200E+00, 0.1671200E+00, &
     & 0.1683600E+00, 0.1713200E+00, 0.1770700E+00, 0.1720500E+00, &
     & 0.1843800E+00, 0.1827600E+00, 0.2146000E+00, 0.2152515E+00, &
     & 0.2265189E+00, 0.2353961E+00, 0.2462926E+00, 0.2597380E+00, &
     & 0.2693600E+00, 0.2863113E+00, 0.2943752E+00, 0.2943752E+00 /
      data (ref_adm(13,iz,33,11),iz = 1,20) / &
     & 0.1397900E+00, 0.1397900E+00, 0.1547600E+00, 0.1635000E+00, &
     & 0.1638300E+00, 0.1659300E+00, 0.1727700E+00, 0.1738200E+00, &
     & 0.1947600E+00, 0.1726600E+00, 0.1990900E+00, 0.2182102E+00, &
     & 0.2443000E+00, 0.2396554E+00, 0.2760300E+00, 0.2431800E+00, &
     & 0.2469000E+00, 0.2911118E+00, 0.2990704E+00, 0.2990704E+00 /
      data (ref_adm(13,iz,34,11),iz = 1,20) / &
     & 0.1494100E+00, 0.1494100E+00, 0.1359800E+00, 0.2100100E+00, &
     & 0.1513200E+00, 0.1512400E+00, 0.1715100E+00, 0.2145800E+00, &
     & 0.2174600E+00, 0.1888200E+00, 0.2006100E+00, 0.2214379E+00, &
     & 0.2601000E+00, 0.2438300E+00, 0.2782100E+00, 0.2723300E+00, &
     & 0.2463500E+00, 0.2951269E+00, 0.3034446E+00, 0.3034446E+00 /
      data (ref_adm(13,iz,35,11),iz = 1,20) / &
     & 0.1467000E+00, 0.1467000E+00, 0.2926600E+00, 0.1544600E+00, &
     & 0.1531800E+00, 0.1838000E+00, 0.1655600E+00, 0.1684100E+00, &
     & 0.1987000E+00, 0.1875800E+00, 0.2184300E+00, 0.2216300E+00, &
     & 0.2045000E+00, 0.2161800E+00, 0.2454900E+00, 0.2846000E+00, &
     & 0.2854344E+00, 0.2986276E+00, 0.3068225E+00, 0.3068225E+00 /
      data (ref_adm(13,iz,36,11),iz = 1,20) / &
     & 0.1249700E+00, 0.1249700E+00, 0.1419100E+00, 0.1550900E+00, &
     & 0.1718000E+00, 0.1777100E+00, 0.1583600E+00, 0.1860800E+00, &
     & 0.1947600E+00, 0.1996800E+00, 0.2197081E+00, 0.2348400E+00, &
     & 0.2596700E+00, 0.2442700E+00, 0.2568600E+00, 0.2976900E+00, &
     & 0.2878351E+00, 0.3011267E+00, 0.3090742E+00, 0.3090742E+00 /
      data (ref_adm(13,iz,37,11),iz = 1,20) / &
     & 0.1248300E+00, 0.1248300E+00, 0.1456700E+00, 0.1325800E+00, &
     & 0.1584300E+00, 0.1772500E+00, 0.1648600E+00, 0.1784400E+00, &
     & 0.2236700E+00, 0.3258600E+00, 0.2207000E+00, 0.2304462E+00, &
     & 0.2352700E+00, 0.2587900E+00, 0.2899300E+00, 0.2818700E+00, &
     & 0.2891601E+00, 0.3025038E+00, 0.3103512E+00, 0.3103512E+00 /
      data (ref_adm(13,iz,38,11),iz = 1,20) / &
     & 0.1248300E+00, 0.1248300E+00, 0.1456700E+00, 0.1325800E+00, &
     & 0.1584300E+00, 0.1772500E+00, 0.1648600E+00, 0.1784400E+00, &
     & 0.2236700E+00, 0.3258600E+00, 0.2207000E+00, 0.2304462E+00, &
     & 0.2352700E+00, 0.2587900E+00, 0.2899300E+00, 0.2818700E+00, &
     & 0.2891601E+00, 0.3025038E+00, 0.3103512E+00, 0.3103512E+00 /
! Solar Zenith Angle 55.0 Albedo  0.1803179E+00
      data (ref_adm(13,iz, 1,12),iz = 1,20) / &
     & 0.1428500E+00, 0.1428500E+00, 0.1280100E+00, 0.1310300E+00, &
     & 0.1511000E+00, 0.1175100E+00, 0.1403300E+00, 0.1231900E+00, &
     & 0.1166100E+00, 0.1243500E+00, 0.1661900E+00, 0.1732900E+00, &
     & 0.3025300E+00, 0.2022000E+00, 0.2444900E+00, 0.2849400E+00, &
     & 0.2879300E+00, 0.3904000E+00, 0.3935378E+00, 0.3935378E+00 /
      data (ref_adm(13,iz, 2,12),iz = 1,20) / &
     & 0.1428500E+00, 0.1428500E+00, 0.1280100E+00, 0.1310300E+00, &
     & 0.1511000E+00, 0.1175100E+00, 0.1403300E+00, 0.1231900E+00, &
     & 0.1166100E+00, 0.1243500E+00, 0.1661900E+00, 0.1732900E+00, &
     & 0.3025300E+00, 0.2022000E+00, 0.2444900E+00, 0.2849400E+00, &
     & 0.2879300E+00, 0.3904000E+00, 0.3935378E+00, 0.3935378E+00 /
      data (ref_adm(13,iz, 3,12),iz = 1,20) / &
     & 0.1514900E+00, 0.1514900E+00, 0.1335000E+00, 0.1198600E+00, &
     & 0.1195500E+00, 0.1339400E+00, 0.1244900E+00, 0.1311800E+00, &
     & 0.1413500E+00, 0.1346700E+00, 0.1494600E+00, 0.1482600E+00, &
     & 0.1642600E+00, 0.1729700E+00, 0.2206800E+00, 0.2517100E+00, &
     & 0.3290500E+00, 0.4979100E+00, 0.6058389E-08, 0.6058389E-08 /
      data (ref_adm(13,iz, 4,12),iz = 1,20) / &
     & 0.1672700E+00, 0.1672700E+00, 0.1272500E+00, 0.1369000E+00, &
     & 0.1280400E+00, 0.1233100E+00, 0.1280100E+00, 0.1199600E+00, &
     & 0.1267600E+00, 0.1510000E+00, 0.1407800E+00, 0.1566800E+00, &
     & 0.1571400E+00, 0.1572400E+00, 0.1731600E+00, 0.2248200E+00, &
     & 0.3208900E+00, 0.3386700E+00, 0.3896077E+00, 0.3896077E+00 /
      data (ref_adm(13,iz, 5,12),iz = 1,20) / &
     & 0.1254700E+00, 0.1254700E+00, 0.1287600E+00, 0.1277500E+00, &
     & 0.1281200E+00, 0.1187900E+00, 0.1119300E+00, 0.1359700E+00, &
     & 0.1330700E+00, 0.1623200E+00, 0.1464700E+00, 0.1631500E+00, &
     & 0.1557200E+00, 0.1963400E+00, 0.1868500E+00, 0.2390500E+00, &
     & 0.2866900E+00, 0.3246495E+00, 0.3879582E+00, 0.3879582E+00 /
      data (ref_adm(13,iz, 6,12),iz = 1,20) / &
     & 0.1289600E+00, 0.1289600E+00, 0.1223400E+00, 0.1272300E+00, &
     & 0.1307200E+00, 0.1208300E+00, 0.1288300E+00, 0.1352800E+00, &
     & 0.1344200E+00, 0.1210700E+00, 0.1307500E+00, 0.1560500E+00, &
     & 0.1533300E+00, 0.1690600E+00, 0.1878100E+00, 0.1986700E+00, &
     & 0.2661638E+00, 0.3164327E+00, 0.3635300E+00, 0.3635300E+00 /
      data (ref_adm(13,iz, 7,12),iz = 1,20) / &
     & 0.1396700E+00, 0.1396700E+00, 0.1439200E+00, 0.1436700E+00, &
     & 0.1443100E+00, 0.1313000E+00, 0.1348300E+00, 0.1602800E+00, &
     & 0.1730300E+00, 0.1827400E+00, 0.1919800E+00, 0.2106600E+00, &
     & 0.2485200E+00, 0.2599700E+00, 0.2852500E+00, 0.2545900E+00, &
     & 0.2499000E+00, 0.2939500E+00, 0.3157200E+00, 0.3157200E+00 /
      data (ref_adm(13,iz, 8,12),iz = 1,20) / &
     & 0.1489600E+00, 0.1489600E+00, 0.1354600E+00, 0.1315100E+00, &
     & 0.1237800E+00, 0.1295500E+00, 0.1229300E+00, 0.1358900E+00, &
     & 0.1256600E+00, 0.1104300E+00, 0.1149400E+00, 0.1303000E+00, &
     & 0.1487100E+00, 0.1573300E+00, 0.1644400E+00, 0.2034600E+00, &
     & 0.2222600E+00, 0.3007056E+00, 0.3476587E+00, 0.3476587E+00 /
      data (ref_adm(13,iz, 9,12),iz = 1,20) / &
     & 0.1310900E+00, 0.1310900E+00, 0.1282100E+00, 0.1336700E+00, &
     & 0.1215100E+00, 0.1253500E+00, 0.1257600E+00, 0.1295700E+00, &
     & 0.1230200E+00, 0.1137800E+00, 0.1107700E+00, 0.1303100E+00, &
     & 0.1238400E+00, 0.1780300E+00, 0.1689400E+00, 0.2619800E+00, &
     & 0.3077900E+00, 0.2940519E+00, 0.3342003E+00, 0.3342003E+00 /
      data (ref_adm(13,iz,10,12),iz = 1,20) / &
     & 0.1327200E+00, 0.1327200E+00, 0.1248900E+00, 0.1315000E+00, &
     & 0.1206500E+00, 0.1150800E+00, 0.1300800E+00, 0.1154500E+00, &
     & 0.1176000E+00, 0.1136700E+00, 0.1283300E+00, 0.1210400E+00, &
     & 0.1443000E+00, 0.1581800E+00, 0.1641200E+00, 0.2265900E+00, &
     & 0.2516378E+00, 0.2883403E+00, 0.3230006E+00, 0.3230006E+00 /
      data (ref_adm(13,iz,11,12),iz = 1,20) / &
     & 0.1383400E+00, 0.1383400E+00, 0.1395100E+00, 0.1238900E+00, &
     & 0.1205600E+00, 0.1645200E+00, 0.1157500E+00, 0.1192300E+00, &
     & 0.1134200E+00, 0.1399700E+00, 0.1284800E+00, 0.1516900E+00, &
     & 0.1610700E+00, 0.1838100E+00, 0.1993200E+00, 0.2743200E+00, &
     & 0.1821700E+00, 0.3128300E+00, 0.3139529E+00, 0.3139529E+00 /
      data (ref_adm(13,iz,12,12),iz = 1,20) / &
     & 0.1489700E+00, 0.1489700E+00, 0.9838000E-01, 0.1307300E+00, &
     & 0.1589700E+00, 0.1237400E+00, 0.1120200E+00, 0.1203700E+00, &
     & 0.1374800E+00, 0.1597600E+00, 0.1336400E+00, 0.1316800E+00, &
     & 0.1549400E+00, 0.1437200E+00, 0.1813300E+00, 0.2770000E+00, &
     & 0.2448878E+00, 0.2785448E+00, 0.3063363E+00, 0.3063363E+00 /
      data (ref_adm(13,iz,13,12),iz = 1,20) / &
     & 0.1321800E+00, 0.1321800E+00, 0.1384500E+00, 0.1270600E+00, &
     & 0.1302700E+00, 0.1413100E+00, 0.1365400E+00, 0.1339400E+00, &
     & 0.1248800E+00, 0.1362600E+00, 0.1211000E+00, 0.1395600E+00, &
     & 0.1513600E+00, 0.1760500E+00, 0.1434600E+00, 0.1874100E+00, &
     & 0.1978600E+00, 0.2741509E+00, 0.2999014E+00, 0.2999014E+00 /
      data (ref_adm(13,iz,14,12),iz = 1,20) / &
     & 0.1459200E+00, 0.1459200E+00, 0.1379800E+00, 0.1335400E+00, &
     & 0.1315100E+00, 0.1328900E+00, 0.1353400E+00, 0.1315900E+00, &
     & 0.1353500E+00, 0.1374900E+00, 0.1381400E+00, 0.1478300E+00, &
     & 0.1443400E+00, 0.1562700E+00, 0.1929381E+00, 0.2138013E+00, &
     & 0.2057700E+00, 0.2692543E+00, 0.2936949E+00, 0.2936949E+00 /
      data (ref_adm(13,iz,15,12),iz = 1,20) / &
     & 0.1309900E+00, 0.1309900E+00, 0.1272600E+00, 0.1280800E+00, &
     & 0.1221800E+00, 0.1239100E+00, 0.1277400E+00, 0.1293000E+00, &
     & 0.1370700E+00, 0.1335500E+00, 0.1440200E+00, 0.1528500E+00, &
     & 0.1556500E+00, 0.1662400E+00, 0.1913464E+00, 0.1746500E+00, &
     & 0.2334027E+00, 0.2638331E+00, 0.2872341E+00, 0.2872341E+00 /
      data (ref_adm(13,iz,16,12),iz = 1,20) / &
     & 0.1351500E+00, 0.1351500E+00, 0.1227800E+00, 0.1162000E+00, &
     & 0.1163200E+00, 0.1191800E+00, 0.1195400E+00, 0.1274400E+00, &
     & 0.1344600E+00, 0.1295300E+00, 0.1362700E+00, 0.1363300E+00, &
     & 0.1505500E+00, 0.1577600E+00, 0.1632700E+00, 0.2090692E+00, &
     & 0.2303497E+00, 0.2589202E+00, 0.2795357E+00, 0.2795357E+00 /
      data (ref_adm(13,iz,17,12),iz = 1,20) / &
     & 0.1360000E+00, 0.1360000E+00, 0.1255200E+00, 0.1272300E+00, &
     & 0.1309100E+00, 0.1339200E+00, 0.1782100E+00, 0.1372200E+00, &
     & 0.1228200E+00, 0.1807400E+00, 0.1308500E+00, 0.1611300E+00, &
     & 0.1642600E+00, 0.1717200E+00, 0.1971700E+00, 0.2076503E+00, &
     & 0.2275012E+00, 0.2545651E+00, 0.2730954E+00, 0.2730954E+00 /
      data (ref_adm(13,iz,18,12),iz = 1,20) / &
     & 0.1353200E+00, 0.1353200E+00, 0.1358700E+00, 0.1237800E+00, &
     & 0.1250100E+00, 0.1292000E+00, 0.1400700E+00, 0.1284500E+00, &
     & 0.1758800E+00, 0.2031100E+00, 0.1546300E+00, 0.1523800E+00, &
     & 0.1516500E+00, 0.2034800E+00, 0.1872300E+00, 0.1933526E+00, &
     & 0.2081934E+00, 0.2272862E+00, 0.2390462E+00, 0.2390462E+00 /
      data (ref_adm(13,iz,19,12),iz = 1,20) / &
     & 0.1309500E+00, 0.1309500E+00, 0.1342100E+00, 0.1363300E+00, &
     & 0.1376200E+00, 0.1298700E+00, 0.1360500E+00, 0.1712700E+00, &
     & 0.2917000E+00, 0.1283000E+00, 0.1103300E+00, 0.1698600E+00, &
     & 0.1544000E+00, 0.1646600E+00, 0.1661900E+00, 0.1935868E+00, &
     & 0.2077705E+00, 0.2259771E+00, 0.2362064E+00, 0.2362064E+00 /
      data (ref_adm(13,iz,20,12),iz = 1,20) / &
     & 0.1463500E+00, 0.1463500E+00, 0.1338400E+00, 0.1427800E+00, &
     & 0.1324600E+00, 0.1472300E+00, 0.1592400E+00, 0.2194400E+00, &
     & 0.2562900E+00, 0.1596400E+00, 0.1576000E+00, 0.1400600E+00, &
     & 0.1645900E+00, 0.1649200E+00, 0.1779300E+00, 0.1941336E+00, &
     & 0.2078198E+00, 0.2251278E+00, 0.2344480E+00, 0.2344480E+00 /
      data (ref_adm(13,iz,21,12),iz = 1,20) / &
     & 0.1349100E+00, 0.1349100E+00, 0.1309900E+00, 0.1427500E+00, &
     & 0.1351600E+00, 0.1445500E+00, 0.1579300E+00, 0.1255700E+00, &
     & 0.1378300E+00, 0.1380200E+00, 0.1554400E+00, 0.1449900E+00, &
     & 0.1716900E+00, 0.1874700E+00, 0.1902800E+00, 0.1987100E+00, &
     & 0.2081963E+00, 0.2245338E+00, 0.2331992E+00, 0.2331992E+00 /
      data (ref_adm(13,iz,22,12),iz = 1,20) / &
     & 0.1375600E+00, 0.1375600E+00, 0.1271400E+00, 0.1252000E+00, &
     & 0.1232600E+00, 0.1319800E+00, 0.1506900E+00, 0.1411200E+00, &
     & 0.1316100E+00, 0.1443600E+00, 0.1556400E+00, 0.1622400E+00, &
     & 0.1675500E+00, 0.1823500E+00, 0.1981400E+00, 0.1962600E+00, &
     & 0.2635595E+00, 0.2922658E+00, 0.3110469E+00, 0.3110469E+00 /
      data (ref_adm(13,iz,23,12),iz = 1,20) / &
     & 0.1305800E+00, 0.1305800E+00, 0.1210600E+00, 0.1346200E+00, &
     & 0.1285300E+00, 0.1327700E+00, 0.1763000E+00, 0.1879600E+00, &
     & 0.1432400E+00, 0.1510800E+00, 0.1669300E+00, 0.1699900E+00, &
     & 0.1701700E+00, 0.1807700E+00, 0.1919500E+00, 0.2205000E+00, &
     & 0.2656447E+00, 0.2929077E+00, 0.3114368E+00, 0.3114368E+00 /
      data (ref_adm(13,iz,24,12),iz = 1,20) / &
     & 0.1375500E+00, 0.1375500E+00, 0.1262300E+00, 0.1299600E+00, &
     & 0.1384700E+00, 0.1427000E+00, 0.1616600E+00, 0.1536400E+00, &
     & 0.1634600E+00, 0.1506100E+00, 0.1584300E+00, 0.1409200E+00, &
     & 0.1790900E+00, 0.1880600E+00, 0.1824300E+00, 0.2369700E+00, &
     & 0.2370400E+00, 0.2952749E+00, 0.3134867E+00, 0.3134867E+00 /
      data (ref_adm(13,iz,25,12),iz = 1,20) / &
     & 0.1341500E+00, 0.1341500E+00, 0.1352100E+00, 0.1368700E+00, &
     & 0.1376700E+00, 0.1492000E+00, 0.1495700E+00, 0.1577700E+00, &
     & 0.1538200E+00, 0.1578500E+00, 0.1655700E+00, 0.1802400E+00, &
     & 0.1772700E+00, 0.1957100E+00, 0.1982900E+00, 0.2268400E+00, &
     & 0.2311600E+00, 0.2984872E+00, 0.3169581E+00, 0.3169581E+00 /
      data (ref_adm(13,iz,26,12),iz = 1,20) / &
     & 0.1381000E+00, 0.1381000E+00, 0.1455900E+00, 0.1495600E+00, &
     & 0.1493600E+00, 0.1518800E+00, 0.1849000E+00, 0.1838000E+00, &
     & 0.1647700E+00, 0.1746800E+00, 0.1734300E+00, 0.1863100E+00, &
     & 0.1845900E+00, 0.2047100E+00, 0.2168100E+00, 0.2220100E+00, &
     & 0.2232300E+00, 0.3037208E+00, 0.3223107E+00, 0.3223107E+00 /
      data (ref_adm(13,iz,27,12),iz = 1,20) / &
     & 0.1374500E+00, 0.1374500E+00, 0.1491100E+00, 0.1473100E+00, &
     & 0.1494100E+00, 0.1569700E+00, 0.1830300E+00, 0.1718900E+00, &
     & 0.1788500E+00, 0.1821400E+00, 0.1967900E+00, 0.2042500E+00, &
     & 0.2202800E+00, 0.2165700E+00, 0.2099500E+00, 0.2319000E+00, &
     & 0.2846899E+00, 0.3103807E+00, 0.3298086E+00, 0.3298086E+00 /
      data (ref_adm(13,iz,28,12),iz = 1,20) / &
     & 0.1349700E+00, 0.1349700E+00, 0.1542800E+00, 0.1477500E+00, &
     & 0.1514900E+00, 0.1358200E+00, 0.1564000E+00, 0.1594700E+00, &
     & 0.1721000E+00, 0.1725900E+00, 0.1952500E+00, 0.1976900E+00, &
     & 0.2010100E+00, 0.2204200E+00, 0.2198700E+00, 0.2784100E+00, &
     & 0.2552200E+00, 0.3533600E+00, 0.3389679E+00, 0.3389679E+00 /
      data (ref_adm(13,iz,29,12),iz = 1,20) / &
     & 0.1359600E+00, 0.1359600E+00, 0.1426000E+00, 0.1485200E+00, &
     & 0.1736000E+00, 0.1995800E+00, 0.2134600E+00, 0.1718400E+00, &
     & 0.1613100E+00, 0.1976400E+00, 0.2009300E+00, 0.1988300E+00, &
     & 0.1971100E+00, 0.2230500E+00, 0.2499000E+00, 0.2442700E+00, &
     & 0.2649400E+00, 0.3260264E+00, 0.3482671E+00, 0.3482671E+00 /
      data (ref_adm(13,iz,30,12),iz = 1,20) / &
     & 0.1441200E+00, 0.1441200E+00, 0.1473800E+00, 0.1539700E+00, &
     & 0.1583900E+00, 0.1791700E+00, 0.1765500E+00, 0.1597000E+00, &
     & 0.1708500E+00, 0.1890400E+00, 0.2072200E+00, 0.2441500E+00, &
     & 0.2095100E+00, 0.2350200E+00, 0.2572800E+00, 0.2619400E+00, &
     & 0.3083119E+00, 0.3350926E+00, 0.3585058E+00, 0.3585058E+00 /
      data (ref_adm(13,iz,31,12),iz = 1,20) / &
     & 0.1431500E+00, 0.1431500E+00, 0.1448600E+00, 0.1534400E+00, &
     & 0.1580800E+00, 0.1558800E+00, 0.1703300E+00, 0.1786900E+00, &
     & 0.1843000E+00, 0.1944300E+00, 0.2097100E+00, 0.2195400E+00, &
     & 0.2239800E+00, 0.2418200E+00, 0.2699800E+00, 0.2826700E+00, &
     & 0.2991300E+00, 0.3445006E+00, 0.3690379E+00, 0.3690379E+00 /
      data (ref_adm(13,iz,32,12),iz = 1,20) / &
     & 0.1454200E+00, 0.1454200E+00, 0.1521800E+00, 0.1626000E+00, &
     & 0.1705300E+00, 0.1729800E+00, 0.1824200E+00, 0.2019300E+00, &
     & 0.2105000E+00, 0.2249600E+00, 0.2241600E+00, 0.2367100E+00, &
     & 0.2472200E+00, 0.2545400E+00, 0.2689900E+00, 0.3086700E+00, &
     & 0.3227500E+00, 0.3320000E+00, 0.2827800E+00, 0.2827800E+00 /
      data (ref_adm(13,iz,33,12),iz = 1,20) / &
     & 0.1382600E+00, 0.1382600E+00, 0.1451800E+00, 0.1368500E+00, &
     & 0.1622100E+00, 0.1628900E+00, 0.1627500E+00, 0.1957000E+00, &
     & 0.2633800E+00, 0.2032000E+00, 0.2171300E+00, 0.2313100E+00, &
     & 0.2767000E+00, 0.2637000E+00, 0.2636400E+00, 0.2842800E+00, &
     & 0.3052700E+00, 0.3629642E+00, 0.3892349E+00, 0.3892349E+00 /
      data (ref_adm(13,iz,34,12),iz = 1,20) / &
     & 0.1279000E+00, 0.1279000E+00, 0.1437500E+00, 0.1371200E+00, &
     & 0.1554000E+00, 0.1627000E+00, 0.1731500E+00, 0.1939400E+00, &
     & 0.2366700E+00, 0.2509700E+00, 0.2124900E+00, 0.2302200E+00, &
     & 0.2491800E+00, 0.2710100E+00, 0.2863200E+00, 0.3124030E+00, &
     & 0.3038400E+00, 0.3707431E+00, 0.3977050E+00, 0.3977050E+00 /
      data (ref_adm(13,iz,35,12),iz = 1,20) / &
     & 0.1301000E+00, 0.1301000E+00, 0.1288800E+00, 0.1379800E+00, &
     & 0.1496000E+00, 0.1705600E+00, 0.1864300E+00, 0.1835900E+00, &
     & 0.2145800E+00, 0.2394800E+00, 0.2317900E+00, 0.2474600E+00, &
     & 0.2613700E+00, 0.3055000E+00, 0.3390000E+00, 0.2921100E+00, &
     & 0.4796400E+00, 0.4596500E+00, 0.4046426E+00, 0.4046426E+00 /
      data (ref_adm(13,iz,36,12),iz = 1,20) / &
     & 0.1460000E+00, 0.1460000E+00, 0.1234700E+00, 0.1382200E+00, &
     & 0.1527300E+00, 0.1623300E+00, 0.1776700E+00, 0.2084000E+00, &
     & 0.1979400E+00, 0.2460000E+00, 0.2205600E+00, 0.2734300E+00, &
     & 0.3066400E+00, 0.3119300E+00, 0.3064700E+00, 0.2959700E+00, &
     & 0.3493000E+00, 0.4041100E+00, 0.4094130E+00, 0.4094130E+00 /
      data (ref_adm(13,iz,37,12),iz = 1,20) / &
     & 0.1328500E+00, 0.1328500E+00, 0.1465900E+00, 0.1539500E+00, &
     & 0.1552219E+00, 0.1932200E+00, 0.1698400E+00, 0.1859400E+00, &
     & 0.1982600E+00, 0.2204200E+00, 0.2745000E+00, 0.3451800E+00, &
     & 0.3237200E+00, 0.3474100E+00, 0.2904200E+00, 0.2991500E+00, &
     & 0.3463527E+00, 0.3813960E+00, 0.4121821E+00, 0.4121821E+00 /
      data (ref_adm(13,iz,38,12),iz = 1,20) / &
     & 0.1328500E+00, 0.1328500E+00, 0.1465900E+00, 0.1539500E+00, &
     & 0.1552219E+00, 0.1932200E+00, 0.1698400E+00, 0.1859400E+00, &
     & 0.1982600E+00, 0.2204200E+00, 0.2745000E+00, 0.3451800E+00, &
     & 0.3237200E+00, 0.3474100E+00, 0.2904200E+00, 0.2991500E+00, &
     & 0.3463527E+00, 0.3813960E+00, 0.4121821E+00, 0.4121821E+00 /
! Solar Zenith Angle 60.0 Albedo  0.1845281E+00
      data (ref_adm(13,iz, 1,13),iz = 1,20) / &
     & 0.1291900E+00, 0.1291900E+00, 0.1191200E+00, 0.1247200E+00, &
     & 0.1267200E+00, 0.1322900E+00, 0.1257700E+00, 0.1245700E+00, &
     & 0.1281900E+00, 0.1452900E+00, 0.1525700E+00, 0.1643800E+00, &
     & 0.2530400E+00, 0.2983500E+00, 0.2576800E+00, 0.4246900E+00, &
     & 0.4661900E+00, 0.6706900E+00, 0.5697514E+00, 0.5697514E+00 /
      data (ref_adm(13,iz, 2,13),iz = 1,20) / &
     & 0.1291900E+00, 0.1291900E+00, 0.1191200E+00, 0.1247200E+00, &
     & 0.1267200E+00, 0.1322900E+00, 0.1257700E+00, 0.1245700E+00, &
     & 0.1281900E+00, 0.1452900E+00, 0.1525700E+00, 0.1643800E+00, &
     & 0.2530400E+00, 0.2983500E+00, 0.2576800E+00, 0.4246900E+00, &
     & 0.4661900E+00, 0.6706900E+00, 0.5697514E+00, 0.5697514E+00 /
      data (ref_adm(13,iz, 3,13),iz = 1,20) / &
     & 0.1279100E+00, 0.1279100E+00, 0.1273800E+00, 0.1407400E+00, &
     & 0.1254000E+00, 0.1291500E+00, 0.1278300E+00, 0.1334000E+00, &
     & 0.1516000E+00, 0.1500400E+00, 0.1351600E+00, 0.1668500E+00, &
     & 0.1818000E+00, 0.2476500E+00, 0.2545000E+00, 0.2739700E+00, &
     & 0.3326200E+00, 0.3831200E+00, 0.8572870E-08, 0.8572870E-08 /
      data (ref_adm(13,iz, 4,13),iz = 1,20) / &
     & 0.1348400E+00, 0.1348400E+00, 0.1292000E+00, 0.1214000E+00, &
     & 0.1306000E+00, 0.1219300E+00, 0.1341200E+00, 0.1372400E+00, &
     & 0.1528300E+00, 0.1502900E+00, 0.1563400E+00, 0.1653300E+00, &
     & 0.1660100E+00, 0.2098400E+00, 0.2190700E+00, 0.2716300E+00, &
     & 0.3458500E+00, 0.3668700E+00, 0.5245181E+00, 0.5245181E+00 /
      data (ref_adm(13,iz, 5,13),iz = 1,20) / &
     & 0.1476600E+00, 0.1476600E+00, 0.1397200E+00, 0.1341200E+00, &
     & 0.1341100E+00, 0.1501800E+00, 0.1301000E+00, 0.1500400E+00, &
     & 0.1452700E+00, 0.1463800E+00, 0.1462600E+00, 0.1557000E+00, &
     & 0.1875600E+00, 0.1728000E+00, 0.2312900E+00, 0.2439500E+00, &
     & 0.2866300E+00, 0.3756200E+00, 0.4013300E+00, 0.4013300E+00 /
      data (ref_adm(13,iz, 6,13),iz = 1,20) / &
     & 0.1377900E+00, 0.1377900E+00, 0.1443900E+00, 0.1334200E+00, &
     & 0.1245200E+00, 0.1378700E+00, 0.1370800E+00, 0.1400000E+00, &
     & 0.1372300E+00, 0.1522800E+00, 0.1581900E+00, 0.1548400E+00, &
     & 0.1775500E+00, 0.1897900E+00, 0.2266600E+00, 0.2295000E+00, &
     & 0.2542600E+00, 0.3795733E+00, 0.4610831E+00, 0.4610831E+00 /
      data (ref_adm(13,iz, 7,13),iz = 1,20) / &
     & 0.1393100E+00, 0.1393100E+00, 0.1298500E+00, 0.1247700E+00, &
     & 0.1205000E+00, 0.1327800E+00, 0.1374300E+00, 0.1262100E+00, &
     & 0.1281600E+00, 0.1263400E+00, 0.1421900E+00, 0.1570600E+00, &
     & 0.1603200E+00, 0.1694000E+00, 0.2038100E+00, 0.2254900E+00, &
     & 0.2874400E+00, 0.3700882E+00, 0.4415963E+00, 0.4415963E+00 /
      data (ref_adm(13,iz, 8,13),iz = 1,20) / &
     & 0.1438800E+00, 0.1438800E+00, 0.1341200E+00, 0.1481400E+00, &
     & 0.1320000E+00, 0.1401100E+00, 0.1393000E+00, 0.1315200E+00, &
     & 0.1377700E+00, 0.1362100E+00, 0.1464400E+00, 0.1546000E+00, &
     & 0.1470900E+00, 0.1723600E+00, 0.2061300E+00, 0.2555451E+00, &
     & 0.2882200E+00, 0.3567453E+00, 0.4270417E+00, 0.4270417E+00 /
      data (ref_adm(13,iz, 9,13),iz = 1,20) / &
     & 0.1392700E+00, 0.1392700E+00, 0.1331600E+00, 0.1451600E+00, &
     & 0.1444900E+00, 0.1337500E+00, 0.1281500E+00, 0.1437900E+00, &
     & 0.1436100E+00, 0.1328200E+00, 0.1515700E+00, 0.1475800E+00, &
     & 0.1623000E+00, 0.1760600E+00, 0.1976000E+00, 0.2267100E+00, &
     & 0.2892800E+00, 0.3412075E+00, 0.4052369E+00, 0.4052369E+00 /
      data (ref_adm(13,iz,10,13),iz = 1,20) / &
     & 0.1368600E+00, 0.1368600E+00, 0.1365300E+00, 0.1415400E+00, &
     & 0.1371200E+00, 0.1292600E+00, 0.1285200E+00, 0.1334000E+00, &
     & 0.1349700E+00, 0.1352100E+00, 0.1452900E+00, 0.1506600E+00, &
     & 0.1616100E+00, 0.1793400E+00, 0.1922300E+00, 0.2400500E+00, &
     & 0.2239100E+00, 0.3288514E+00, 0.3808529E+00, 0.3808529E+00 /
      data (ref_adm(13,iz,11,13),iz = 1,20) / &
     & 0.1465200E+00, 0.1465200E+00, 0.1330600E+00, 0.1331600E+00, &
     & 0.1335400E+00, 0.1431800E+00, 0.1300500E+00, 0.1336600E+00, &
     & 0.1402200E+00, 0.1505700E+00, 0.1539600E+00, 0.1641200E+00, &
     & 0.1688600E+00, 0.1848800E+00, 0.1887400E+00, 0.1987500E+00, &
     & 0.1989700E+00, 0.2252100E+00, 0.3627967E+00, 0.3627967E+00 /
      data (ref_adm(13,iz,12,13),iz = 1,20) / &
     & 0.1303300E+00, 0.1303300E+00, 0.1343400E+00, 0.1287500E+00, &
     & 0.1288800E+00, 0.1341900E+00, 0.1305000E+00, 0.1365500E+00, &
     & 0.1386700E+00, 0.1528900E+00, 0.1431600E+00, 0.1566500E+00, &
     & 0.1710400E+00, 0.1760300E+00, 0.1690900E+00, 0.1990900E+00, &
     & 0.2342800E+00, 0.2302300E+00, 0.3498859E+00, 0.3498859E+00 /
      data (ref_adm(13,iz,13,13),iz = 1,20) / &
     & 0.1429300E+00, 0.1429300E+00, 0.1301800E+00, 0.1289700E+00, &
     & 0.1261800E+00, 0.1306600E+00, 0.1380700E+00, 0.1304000E+00, &
     & 0.1359600E+00, 0.1448200E+00, 0.1606400E+00, 0.1552800E+00, &
     & 0.1678100E+00, 0.1629200E+00, 0.1884300E+00, 0.2003600E+00, &
     & 0.2169600E+00, 0.3050107E+00, 0.3395223E+00, 0.3395223E+00 /
      data (ref_adm(13,iz,14,13),iz = 1,20) / &
     & 0.1389500E+00, 0.1389500E+00, 0.1374500E+00, 0.1341300E+00, &
     & 0.1334600E+00, 0.1334300E+00, 0.1326800E+00, 0.1384700E+00, &
     & 0.1395900E+00, 0.1437400E+00, 0.1440400E+00, 0.1489900E+00, &
     & 0.1610000E+00, 0.1761000E+00, 0.1751400E+00, 0.1992700E+00, &
     & 0.2069100E+00, 0.2992484E+00, 0.3310924E+00, 0.3310924E+00 /
      data (ref_adm(13,iz,15,13),iz = 1,20) / &
     & 0.1324100E+00, 0.1324100E+00, 0.1293600E+00, 0.1303900E+00, &
     & 0.1283400E+00, 0.1293900E+00, 0.1323900E+00, 0.1340800E+00, &
     & 0.1357600E+00, 0.1387600E+00, 0.1414900E+00, 0.1560800E+00, &
     & 0.1669600E+00, 0.1753600E+00, 0.1504600E+00, 0.2084200E+00, &
     & 0.1658700E+00, 0.2821900E+00, 0.3231332E+00, 0.3231332E+00 /
      data (ref_adm(13,iz,16,13),iz = 1,20) / &
     & 0.1329600E+00, 0.1329600E+00, 0.1242200E+00, 0.1336900E+00, &
     & 0.1328900E+00, 0.1404700E+00, 0.1364600E+00, 0.1287700E+00, &
     & 0.1375600E+00, 0.1433300E+00, 0.1422700E+00, 0.1530300E+00, &
     & 0.1612200E+00, 0.1704300E+00, 0.1812300E+00, 0.1837600E+00, &
     & 0.2923600E+00, 0.2860166E+00, 0.3138599E+00, 0.3138599E+00 /
      data (ref_adm(13,iz,17,13),iz = 1,20) / &
     & 0.1346100E+00, 0.1346100E+00, 0.1316600E+00, 0.1313800E+00, &
     & 0.1465000E+00, 0.1437100E+00, 0.1367300E+00, 0.1396800E+00, &
     & 0.1423900E+00, 0.1452700E+00, 0.1433700E+00, 0.1528600E+00, &
     & 0.1559000E+00, 0.1668800E+00, 0.1710300E+00, 0.1841000E+00, &
     & 0.1888500E+00, 0.2801298E+00, 0.3049926E+00, 0.3049926E+00 /
      data (ref_adm(13,iz,18,13),iz = 1,20) / &
     & 0.1338100E+00, 0.1338100E+00, 0.1391000E+00, 0.1459500E+00, &
     & 0.1375100E+00, 0.1369200E+00, 0.1367600E+00, 0.1303400E+00, &
     & 0.1422700E+00, 0.1455600E+00, 0.1468800E+00, 0.1537000E+00, &
     & 0.1528300E+00, 0.1697200E+00, 0.1813100E+00, 0.2004266E+00, &
     & 0.2163347E+00, 0.2367511E+00, 0.2495513E+00, 0.2495513E+00 /
      data (ref_adm(13,iz,19,13),iz = 1,20) / &
     & 0.1426900E+00, 0.1426900E+00, 0.1427800E+00, 0.1574900E+00, &
     & 0.1315900E+00, 0.1520900E+00, 0.1455800E+00, 0.1396300E+00, &
     & 0.1403500E+00, 0.1592500E+00, 0.1520600E+00, 0.1478500E+00, &
     & 0.1699100E+00, 0.1549600E+00, 0.2001500E+00, 0.2054600E+00, &
     & 0.2157150E+00, 0.2352233E+00, 0.2462891E+00, 0.2462891E+00 /
      data (ref_adm(13,iz,20,13),iz = 1,20) / &
     & 0.1316300E+00, 0.1316300E+00, 0.1388200E+00, 0.1337100E+00, &
     & 0.1330100E+00, 0.1463800E+00, 0.1437200E+00, 0.1416000E+00, &
     & 0.1472200E+00, 0.1443100E+00, 0.1551800E+00, 0.1548500E+00, &
     & 0.1781500E+00, 0.1752500E+00, 0.1838400E+00, 0.2011088E+00, &
     & 0.2157368E+00, 0.2342676E+00, 0.2443321E+00, 0.2443321E+00 /
      data (ref_adm(13,iz,21,13),iz = 1,20) / &
     & 0.1413300E+00, 0.1413300E+00, 0.1360500E+00, 0.1382000E+00, &
     & 0.1505400E+00, 0.1451100E+00, 0.1527600E+00, 0.1524800E+00, &
     & 0.1496900E+00, 0.1492800E+00, 0.1636900E+00, 0.1755500E+00, &
     & 0.1869100E+00, 0.1847900E+00, 0.1986100E+00, 0.2020266E+00, &
     & 0.2161388E+00, 0.2336102E+00, 0.2429716E+00, 0.2429716E+00 /
      data (ref_adm(13,iz,22,13),iz = 1,20) / &
     & 0.1441800E+00, 0.1441800E+00, 0.1376900E+00, 0.1419700E+00, &
     & 0.1445400E+00, 0.1527300E+00, 0.1469100E+00, 0.1508500E+00, &
     & 0.1518900E+00, 0.1608500E+00, 0.1593300E+00, 0.1702300E+00, &
     & 0.1932400E+00, 0.1999000E+00, 0.1761700E+00, 0.2447871E+00, &
     & 0.2674775E+00, 0.2966106E+00, 0.3156711E+00, 0.3156711E+00 /
      data (ref_adm(13,iz,23,13),iz = 1,20) / &
     & 0.1360600E+00, 0.1360600E+00, 0.1408400E+00, 0.1411000E+00, &
     & 0.1444000E+00, 0.1541400E+00, 0.1427000E+00, 0.1643100E+00, &
     & 0.1615100E+00, 0.1611400E+00, 0.1663700E+00, 0.1765900E+00, &
     & 0.1960500E+00, 0.2012300E+00, 0.2159200E+00, 0.2381500E+00, &
     & 0.2695939E+00, 0.2972620E+00, 0.3160668E+00, 0.3160668E+00 /
      data (ref_adm(13,iz,24,13),iz = 1,20) / &
     & 0.1330300E+00, 0.1330300E+00, 0.1353800E+00, 0.1363200E+00, &
     & 0.1440900E+00, 0.1448600E+00, 0.1464700E+00, 0.1555400E+00, &
     & 0.1601400E+00, 0.1639700E+00, 0.1768400E+00, 0.1821600E+00, &
     & 0.2045600E+00, 0.1904000E+00, 0.2204700E+00, 0.2191600E+00, &
     & 0.2565900E+00, 0.2996647E+00, 0.3181471E+00, 0.3181471E+00 /
      data (ref_adm(13,iz,25,13),iz = 1,20) / &
     & 0.1365800E+00, 0.1365800E+00, 0.1394200E+00, 0.1481800E+00, &
     & 0.1494800E+00, 0.1499400E+00, 0.1514900E+00, 0.1574300E+00, &
     & 0.1613300E+00, 0.1671500E+00, 0.1778800E+00, 0.1854000E+00, &
     & 0.1986700E+00, 0.2043200E+00, 0.2214500E+00, 0.2485100E+00, &
     & 0.2357400E+00, 0.2797500E+00, 0.3216701E+00, 0.3216701E+00 /
      data (ref_adm(13,iz,26,13),iz = 1,20) / &
     & 0.1407500E+00, 0.1407500E+00, 0.1515400E+00, 0.1526900E+00, &
     & 0.1502800E+00, 0.1544100E+00, 0.1553600E+00, 0.1630600E+00, &
     & 0.1707300E+00, 0.1802700E+00, 0.1856100E+00, 0.1940000E+00, &
     & 0.2051200E+00, 0.2081000E+00, 0.2219000E+00, 0.2399300E+00, &
     & 0.2474500E+00, 0.3082359E+00, 0.3271022E+00, 0.3271022E+00 /
      data (ref_adm(13,iz,27,13),iz = 1,20) / &
     & 0.1438300E+00, 0.1438300E+00, 0.1392900E+00, 0.1581600E+00, &
     & 0.1575200E+00, 0.1586000E+00, 0.1748500E+00, 0.1634900E+00, &
     & 0.1706700E+00, 0.1877000E+00, 0.1870300E+00, 0.2032500E+00, &
     & 0.2128400E+00, 0.2232500E+00, 0.2405200E+00, 0.2519200E+00, &
     & 0.2718000E+00, 0.2899200E+00, 0.3347118E+00, 0.3347118E+00 /
      data (ref_adm(13,iz,28,13),iz = 1,20) / &
     & 0.1405400E+00, 0.1405400E+00, 0.1368000E+00, 0.1391500E+00, &
     & 0.1537900E+00, 0.1499000E+00, 0.1609700E+00, 0.1674600E+00, &
     & 0.1726000E+00, 0.1820400E+00, 0.1921400E+00, 0.2129500E+00, &
     & 0.2321000E+00, 0.2414000E+00, 0.2479800E+00, 0.2410000E+00, &
     & 0.2806700E+00, 0.2930100E+00, 0.3440071E+00, 0.3440071E+00 /
      data (ref_adm(13,iz,29,13),iz = 1,20) / &
     & 0.1399600E+00, 0.1399600E+00, 0.1417300E+00, 0.1395000E+00, &
     & 0.1457800E+00, 0.1580900E+00, 0.1565800E+00, 0.1698900E+00, &
     & 0.1930800E+00, 0.1799400E+00, 0.2019800E+00, 0.2212800E+00, &
     & 0.2244600E+00, 0.2463500E+00, 0.2516600E+00, 0.2785000E+00, &
     & 0.2646900E+00, 0.3308733E+00, 0.3534445E+00, 0.3534445E+00 /
      data (ref_adm(13,iz,30,13),iz = 1,20) / &
     & 0.1473400E+00, 0.1473400E+00, 0.1397000E+00, 0.1481700E+00, &
     & 0.1478700E+00, 0.1590200E+00, 0.1839400E+00, 0.1907200E+00, &
     & 0.1924400E+00, 0.1872000E+00, 0.1997300E+00, 0.2239200E+00, &
     & 0.2245500E+00, 0.2499000E+00, 0.2636700E+00, 0.2656100E+00, &
     & 0.3019300E+00, 0.3355200E+00, 0.2666500E+00, 0.2666500E+00 /
      data (ref_adm(13,iz,31,13),iz = 1,20) / &
     & 0.1343200E+00, 0.1343200E+00, 0.1403200E+00, 0.1507900E+00, &
     & 0.1613600E+00, 0.1608100E+00, 0.1653800E+00, 0.1871100E+00, &
     & 0.1785400E+00, 0.1893400E+00, 0.2134400E+00, 0.2179700E+00, &
     & 0.2424600E+00, 0.2450100E+00, 0.2847400E+00, 0.3104700E+00, &
     & 0.3198300E+00, 0.3828900E+00, 0.3745241E+00, 0.3745241E+00 /
      data (ref_adm(13,iz,32,13),iz = 1,20) / &
     & 0.1430900E+00, 0.1430900E+00, 0.1449200E+00, 0.1586800E+00, &
     & 0.1599400E+00, 0.1639200E+00, 0.1632600E+00, 0.1792600E+00, &
     & 0.1928600E+00, 0.2070500E+00, 0.2144800E+00, 0.2388100E+00, &
     & 0.2447500E+00, 0.2677400E+00, 0.3016400E+00, 0.3287400E+00, &
     & 0.3452000E+00, 0.3593207E+00, 0.3207300E+00, 0.3207300E+00 /
      data (ref_adm(13,iz,33,13),iz = 1,20) / &
     & 0.1443700E+00, 0.1443700E+00, 0.1397800E+00, 0.1436700E+00, &
     & 0.1583100E+00, 0.1706900E+00, 0.1748200E+00, 0.1795300E+00, &
     & 0.2043400E+00, 0.2225500E+00, 0.2283600E+00, 0.2482700E+00, &
     & 0.2630300E+00, 0.2746800E+00, 0.3086900E+00, 0.3217700E+00, &
     & 0.3175800E+00, 0.3683601E+00, 0.3950215E+00, 0.3950215E+00 /
      data (ref_adm(13,iz,34,13),iz = 1,20) / &
     & 0.1475100E+00, 0.1475100E+00, 0.1456600E+00, 0.1477100E+00, &
     & 0.1594000E+00, 0.1649500E+00, 0.1715300E+00, 0.1850600E+00, &
     & 0.1976100E+00, 0.2179500E+00, 0.2259700E+00, 0.2456500E+00, &
     & 0.2602700E+00, 0.2861000E+00, 0.2906400E+00, 0.3266500E+00, &
     & 0.3359100E+00, 0.3762548E+00, 0.4036175E+00, 0.4036175E+00 /
      data (ref_adm(13,iz,35,13),iz = 1,20) / &
     & 0.1460000E+00, 0.1460000E+00, 0.1517700E+00, 0.1506200E+00, &
     & 0.1540600E+00, 0.1644700E+00, 0.1763200E+00, 0.1820900E+00, &
     & 0.2054600E+00, 0.2088700E+00, 0.2325000E+00, 0.2344400E+00, &
     & 0.2629200E+00, 0.2999200E+00, 0.2947100E+00, 0.3274200E+00, &
     & 0.3601400E+00, 0.3821696E+00, 0.4106583E+00, 0.4106583E+00 /
      data (ref_adm(13,iz,36,13),iz = 1,20) / &
     & 0.1422400E+00, 0.1422400E+00, 0.1470900E+00, 0.1608400E+00, &
     & 0.1704600E+00, 0.1696000E+00, 0.1873300E+00, 0.1990800E+00, &
     & 0.2042200E+00, 0.2069700E+00, 0.2234400E+00, 0.2587300E+00, &
     & 0.2853100E+00, 0.3305300E+00, 0.3197700E+00, 0.3298000E+00, &
     & 0.3808300E+00, 0.3855176E+00, 0.4154995E+00, 0.4154995E+00 /
      data (ref_adm(13,iz,37,13),iz = 1,20) / &
     & 0.1389100E+00, 0.1389100E+00, 0.1447700E+00, 0.1593500E+00, &
     & 0.1685800E+00, 0.1707100E+00, 0.1805100E+00, 0.1880000E+00, &
     & 0.2020700E+00, 0.2296900E+00, 0.2319200E+00, 0.2684600E+00, &
     & 0.3149000E+00, 0.3470100E+00, 0.3314200E+00, 0.3502900E+00, &
     & 0.3631000E+00, 0.4164900E+00, 0.4183096E+00, 0.4183096E+00 /
      data (ref_adm(13,iz,38,13),iz = 1,20) / &
     & 0.1389100E+00, 0.1389100E+00, 0.1447700E+00, 0.1593500E+00, &
     & 0.1685800E+00, 0.1707100E+00, 0.1805100E+00, 0.1880000E+00, &
     & 0.2020700E+00, 0.2296900E+00, 0.2319200E+00, 0.2684600E+00, &
     & 0.3149000E+00, 0.3470100E+00, 0.3314200E+00, 0.3502900E+00, &
     & 0.3631000E+00, 0.4164900E+00, 0.4183096E+00, 0.4183096E+00 /
! Solar Zenith Angle 65.0 Albedo  0.1950806E+00
      data (ref_adm(13,iz, 1,14),iz = 1,20) / &
     & 0.1310600E+00, 0.1310600E+00, 0.1284100E+00, 0.1277600E+00, &
     & 0.1180400E+00, 0.1187300E+00, 0.1273800E+00, 0.1372200E+00, &
     & 0.1450600E+00, 0.1592700E+00, 0.1726800E+00, 0.2171400E+00, &
     & 0.2632700E+00, 0.2766200E+00, 0.2942000E+00, 0.3743300E+00, &
     & 0.3756100E+00, 0.3977087E+00, 0.5066897E+00, 0.5066897E+00 /
      data (ref_adm(13,iz, 2,14),iz = 1,20) / &
     & 0.1310600E+00, 0.1310600E+00, 0.1284100E+00, 0.1277600E+00, &
     & 0.1180400E+00, 0.1187300E+00, 0.1273800E+00, 0.1372200E+00, &
     & 0.1450600E+00, 0.1592700E+00, 0.1726800E+00, 0.2171400E+00, &
     & 0.2632700E+00, 0.2766200E+00, 0.2942000E+00, 0.3743300E+00, &
     & 0.3756100E+00, 0.3977087E+00, 0.5066897E+00, 0.5066897E+00 /
      data (ref_adm(13,iz, 3,14),iz = 1,20) / &
     & 0.1309100E+00, 0.1309100E+00, 0.1344500E+00, 0.1293000E+00, &
     & 0.1371500E+00, 0.1184400E+00, 0.1340800E+00, 0.1465000E+00, &
     & 0.1498500E+00, 0.1712600E+00, 0.1711200E+00, 0.2042500E+00, &
     & 0.2187300E+00, 0.2374900E+00, 0.2735100E+00, 0.3281800E+00, &
     & 0.3089600E+00, 0.3954784E+00, 0.7695749E-08, 0.7695749E-08 /
      data (ref_adm(13,iz, 4,14),iz = 1,20) / &
     & 0.1306600E+00, 0.1306600E+00, 0.1273800E+00, 0.1280400E+00, &
     & 0.1322900E+00, 0.1214500E+00, 0.1280700E+00, 0.1328900E+00, &
     & 0.1487500E+00, 0.1477200E+00, 0.1739500E+00, 0.1919300E+00, &
     & 0.2007500E+00, 0.2360800E+00, 0.2434400E+00, 0.2896200E+00, &
     & 0.3217100E+00, 0.3918929E+00, 0.4811330E+00, 0.4811330E+00 /
      data (ref_adm(13,iz, 5,14),iz = 1,20) / &
     & 0.1352600E+00, 0.1352600E+00, 0.1342200E+00, 0.1335600E+00, &
     & 0.1429400E+00, 0.1432000E+00, 0.1353200E+00, 0.1424900E+00, &
     & 0.1550000E+00, 0.1598700E+00, 0.1712900E+00, 0.1737000E+00, &
     & 0.1909300E+00, 0.2284000E+00, 0.2300300E+00, 0.2387800E+00, &
     & 0.3778200E+00, 0.3884519E+00, 0.4626999E+00, 0.4626999E+00 /
      data (ref_adm(13,iz, 6,14),iz = 1,20) / &
     & 0.1309400E+00, 0.1309400E+00, 0.1281800E+00, 0.1263700E+00, &
     & 0.1301900E+00, 0.1299400E+00, 0.1305300E+00, 0.1333400E+00, &
     & 0.1348800E+00, 0.1426000E+00, 0.1524600E+00, 0.1682300E+00, &
     & 0.1772000E+00, 0.2115000E+00, 0.2362300E+00, 0.2798400E+00, &
     & 0.3703500E+00, 0.3744800E+00, 0.4486827E+00, 0.4486827E+00 /
      data (ref_adm(13,iz, 7,14),iz = 1,20) / &
     & 0.1371500E+00, 0.1371500E+00, 0.1361100E+00, 0.1360900E+00, &
     & 0.1340200E+00, 0.1354700E+00, 0.1413800E+00, 0.1435100E+00, &
     & 0.1507600E+00, 0.1557100E+00, 0.1597600E+00, 0.1707300E+00, &
     & 0.1814200E+00, 0.2115500E+00, 0.2252100E+00, 0.2332800E+00, &
     & 0.3214000E+00, 0.3330900E+00, 0.4426372E+00, 0.4426372E+00 /
      data (ref_adm(13,iz, 8,14),iz = 1,20) / &
     & 0.1336400E+00, 0.1336400E+00, 0.1309000E+00, 0.1294900E+00, &
     & 0.1222800E+00, 0.1207300E+00, 0.1275500E+00, 0.1344500E+00, &
     & 0.1462100E+00, 0.1468200E+00, 0.1542800E+00, 0.1756600E+00, &
     & 0.1997200E+00, 0.2157800E+00, 0.2263000E+00, 0.2669700E+00, &
     & 0.3200700E+00, 0.3552519E+00, 0.4252539E+00, 0.4252539E+00 /
      data (ref_adm(13,iz, 9,14),iz = 1,20) / &
     & 0.1414500E+00, 0.1414500E+00, 0.1350400E+00, 0.1370500E+00, &
     & 0.1259400E+00, 0.1301300E+00, 0.1402900E+00, 0.1358700E+00, &
     & 0.1682900E+00, 0.1459400E+00, 0.1650100E+00, 0.2021000E+00, &
     & 0.2045600E+00, 0.2204400E+00, 0.2305600E+00, 0.2649900E+00, &
     & 0.3106100E+00, 0.3428947E+00, 0.3995560E+00, 0.3995560E+00 /
      data (ref_adm(13,iz,10,14),iz = 1,20) / &
     & 0.1442200E+00, 0.1442200E+00, 0.1299800E+00, 0.1262100E+00, &
     & 0.1232700E+00, 0.1282700E+00, 0.1358800E+00, 0.1601900E+00, &
     & 0.1602200E+00, 0.1388100E+00, 0.1493900E+00, 0.1797300E+00, &
     & 0.1743400E+00, 0.2092600E+00, 0.2443800E+00, 0.2514300E+00, &
     & 0.2813300E+00, 0.3326782E+00, 0.3801027E+00, 0.3801027E+00 /
      data (ref_adm(13,iz,11,14),iz = 1,20) / &
     & 0.1333600E+00, 0.1333600E+00, 0.1240700E+00, 0.1241700E+00, &
     & 0.1336600E+00, 0.1385100E+00, 0.1543600E+00, 0.1582100E+00, &
     & 0.1484900E+00, 0.1461700E+00, 0.1450900E+00, 0.1651200E+00, &
     & 0.1765200E+00, 0.1836600E+00, 0.1945400E+00, 0.2345400E+00, &
     & 0.2641700E+00, 0.3247551E+00, 0.3197200E+00, 0.3197200E+00 /
      data (ref_adm(13,iz,12,14),iz = 1,20) / &
     & 0.1310600E+00, 0.1310600E+00, 0.1308200E+00, 0.1228900E+00, &
     & 0.1299500E+00, 0.1366100E+00, 0.1568000E+00, 0.1410600E+00, &
     & 0.1407400E+00, 0.1549900E+00, 0.1533600E+00, 0.1498300E+00, &
     & 0.1598600E+00, 0.2022900E+00, 0.2013100E+00, 0.2149000E+00, &
     & 0.2744100E+00, 0.3180352E+00, 0.3540186E+00, 0.3540186E+00 /
      data (ref_adm(13,iz,13,14),iz = 1,20) / &
     & 0.1353300E+00, 0.1353300E+00, 0.1334700E+00, 0.1430000E+00, &
     & 0.1487600E+00, 0.1682300E+00, 0.1399200E+00, 0.1379300E+00, &
     & 0.1379000E+00, 0.1453400E+00, 0.1545500E+00, 0.1571400E+00, &
     & 0.1740600E+00, 0.1959700E+00, 0.2237500E+00, 0.2407100E+00, &
     & 0.2617300E+00, 0.2579400E+00, 0.3446162E+00, 0.3446162E+00 /
      data (ref_adm(13,iz,14,14),iz = 1,20) / &
     & 0.1421200E+00, 0.1421200E+00, 0.1363200E+00, 0.1462400E+00, &
     & 0.1566600E+00, 0.1375500E+00, 0.1400200E+00, 0.1414400E+00, &
     & 0.1450900E+00, 0.1518900E+00, 0.1547900E+00, 0.1616200E+00, &
     & 0.1681000E+00, 0.1965400E+00, 0.2181900E+00, 0.2354900E+00, &
     & 0.2710800E+00, 0.2679400E+00, 0.3367463E+00, 0.3367463E+00 /
      data (ref_adm(13,iz,15,14),iz = 1,20) / &
     & 0.1350800E+00, 0.1350800E+00, 0.1320200E+00, 0.1301600E+00, &
     & 0.1318500E+00, 0.1333700E+00, 0.1355400E+00, 0.1377700E+00, &
     & 0.1416700E+00, 0.1478000E+00, 0.1515600E+00, 0.1650900E+00, &
     & 0.1783500E+00, 0.1823700E+00, 0.2035500E+00, 0.2240800E+00, &
     & 0.2625680E+00, 0.2997788E+00, 0.3289326E+00, 0.3289326E+00 /
      data (ref_adm(13,iz,16,14),iz = 1,20) / &
     & 0.1310500E+00, 0.1310500E+00, 0.1265800E+00, 0.1260700E+00, &
     & 0.1307200E+00, 0.1309500E+00, 0.1336900E+00, 0.1383800E+00, &
     & 0.1418100E+00, 0.1458300E+00, 0.1510500E+00, 0.1584500E+00, &
     & 0.1698500E+00, 0.1820400E+00, 0.1825700E+00, 0.2118000E+00, &
     & 0.2412300E+00, 0.2933731E+00, 0.3196257E+00, 0.3196257E+00 /
      data (ref_adm(13,iz,17,14),iz = 1,20) / &
     & 0.1340200E+00, 0.1340200E+00, 0.1248700E+00, 0.1244200E+00, &
     & 0.1317700E+00, 0.1312300E+00, 0.1368100E+00, 0.1458300E+00, &
     & 0.1480300E+00, 0.1548400E+00, 0.1432900E+00, 0.1538500E+00, &
     & 0.1681900E+00, 0.1846400E+00, 0.2026600E+00, 0.2077900E+00, &
     & 0.2547646E+00, 0.2876275E+00, 0.3111307E+00, 0.3111307E+00 /
      data (ref_adm(13,iz,18,14),iz = 1,20) / &
     & 0.1283600E+00, 0.1283600E+00, 0.1287200E+00, 0.1266900E+00, &
     & 0.1384500E+00, 0.1423300E+00, 0.1458800E+00, 0.1458500E+00, &
     & 0.1380100E+00, 0.1506100E+00, 0.1587000E+00, 0.1638700E+00, &
     & 0.1754300E+00, 0.1871000E+00, 0.2155300E+00, 0.2101000E+00, &
     & 0.2294528E+00, 0.2528772E+00, 0.2677114E+00, 0.2677114E+00 /
      data (ref_adm(13,iz,19,14),iz = 1,20) / &
     & 0.1282900E+00, 0.1282900E+00, 0.1311700E+00, 0.1273400E+00, &
     & 0.1303200E+00, 0.1359800E+00, 0.1433800E+00, 0.1371500E+00, &
     & 0.1427900E+00, 0.1538700E+00, 0.1570700E+00, 0.1554400E+00, &
     & 0.1791800E+00, 0.1865700E+00, 0.2102100E+00, 0.1885300E+00, &
     & 0.2286867E+00, 0.2509459E+00, 0.2636663E+00, 0.2636663E+00 /
      data (ref_adm(13,iz,20,14),iz = 1,20) / &
     & 0.1376300E+00, 0.1376300E+00, 0.1300000E+00, 0.1319200E+00, &
     & 0.1346300E+00, 0.1414700E+00, 0.1482400E+00, 0.1523800E+00, &
     & 0.1573700E+00, 0.1541700E+00, 0.1586700E+00, 0.1616700E+00, &
     & 0.1835000E+00, 0.1970800E+00, 0.2168600E+00, 0.1793900E+00, &
     & 0.2284556E+00, 0.2495402E+00, 0.2614126E+00, 0.2614126E+00 /
      data (ref_adm(13,iz,21,14),iz = 1,20) / &
     & 0.1351700E+00, 0.1351700E+00, 0.1379100E+00, 0.1351300E+00, &
     & 0.1373100E+00, 0.1481300E+00, 0.1498100E+00, 0.1544300E+00, &
     & 0.1522900E+00, 0.1541400E+00, 0.1603900E+00, 0.1749200E+00, &
     & 0.1689700E+00, 0.1897500E+00, 0.2003100E+00, 0.2220200E+00, &
     & 0.2287712E+00, 0.2486571E+00, 0.2598416E+00, 0.2598416E+00 /
      data (ref_adm(13,iz,22,14),iz = 1,20) / &
     & 0.1338900E+00, 0.1338900E+00, 0.1387800E+00, 0.1378700E+00, &
     & 0.1325700E+00, 0.1345600E+00, 0.1521900E+00, 0.1454100E+00, &
     & 0.1528600E+00, 0.1622200E+00, 0.1622300E+00, 0.1759600E+00, &
     & 0.1839900E+00, 0.1956800E+00, 0.2197400E+00, 0.2707852E+00, &
     & 0.3009115E+00, 0.3409579E+00, 0.3730510E+00, 0.3730510E+00 /
      data (ref_adm(13,iz,23,14),iz = 1,20) / &
     & 0.1368100E+00, 0.1368100E+00, 0.1469000E+00, 0.1423100E+00, &
     & 0.1459400E+00, 0.1413000E+00, 0.1529500E+00, 0.1533100E+00, &
     & 0.1581500E+00, 0.1637800E+00, 0.1669500E+00, 0.1771000E+00, &
     & 0.1852700E+00, 0.2011800E+00, 0.2066000E+00, 0.2611000E+00, &
     & 0.3029456E+00, 0.3416191E+00, 0.3736480E+00, 0.3736480E+00 /
      data (ref_adm(13,iz,24,14),iz = 1,20) / &
     & 0.1324200E+00, 0.1324200E+00, 0.1353100E+00, 0.1384600E+00, &
     & 0.1402500E+00, 0.1450100E+00, 0.1513400E+00, 0.1550700E+00, &
     & 0.1588500E+00, 0.1689100E+00, 0.1755000E+00, 0.1862100E+00, &
     & 0.2017800E+00, 0.2138100E+00, 0.2134700E+00, 0.2471400E+00, &
     & 0.3062409E+00, 0.3445059E+00, 0.3770017E+00, 0.3770017E+00 /
      data (ref_adm(13,iz,25,14),iz = 1,20) / &
     & 0.1348600E+00, 0.1348600E+00, 0.1449100E+00, 0.1479200E+00, &
     & 0.1480600E+00, 0.1576000E+00, 0.1650400E+00, 0.1681500E+00, &
     & 0.1694500E+00, 0.1775500E+00, 0.1878200E+00, 0.1958700E+00, &
     & 0.2022100E+00, 0.2276100E+00, 0.2383200E+00, 0.2415200E+00, &
     & 0.3111822E+00, 0.3487495E+00, 0.3820107E+00, 0.3820107E+00 /
      data (ref_adm(13,iz,26,14),iz = 1,20) / &
     & 0.1398100E+00, 0.1398100E+00, 0.1501800E+00, 0.1472700E+00, &
     & 0.1478100E+00, 0.1548500E+00, 0.1612300E+00, 0.1658700E+00, &
     & 0.1833800E+00, 0.1851600E+00, 0.1941100E+00, 0.1998600E+00, &
     & 0.2212200E+00, 0.2442900E+00, 0.2627000E+00, 0.2875500E+00, &
     & 0.2689400E+00, 0.3557120E+00, 0.3906731E+00, 0.3906731E+00 /
      data (ref_adm(13,iz,27,14),iz = 1,20) / &
     & 0.1376900E+00, 0.1376900E+00, 0.1470100E+00, 0.1501200E+00, &
     & 0.1528900E+00, 0.1468600E+00, 0.1540300E+00, 0.1640700E+00, &
     & 0.1724700E+00, 0.1833300E+00, 0.1975300E+00, 0.2213800E+00, &
     & 0.2149100E+00, 0.2421500E+00, 0.2529500E+00, 0.2985600E+00, &
     & 0.3258267E+00, 0.3682100E+00, 0.4021964E+00, 0.4021964E+00 /
      data (ref_adm(13,iz,28,14),iz = 1,20) / &
     & 0.1354100E+00, 0.1354100E+00, 0.1417900E+00, 0.1490300E+00, &
     & 0.1450300E+00, 0.1571000E+00, 0.1654100E+00, 0.1702800E+00, &
     & 0.1746700E+00, 0.1991700E+00, 0.2053400E+00, 0.2332400E+00, &
     & 0.2344600E+00, 0.2492500E+00, 0.2936000E+00, 0.2703700E+00, &
     & 0.2871800E+00, 0.3744099E+00, 0.4149100E+00, 0.4149100E+00 /
      data (ref_adm(13,iz,29,14),iz = 1,20) / &
     & 0.1397000E+00, 0.1397000E+00, 0.1413200E+00, 0.1481200E+00, &
     & 0.1528700E+00, 0.1528200E+00, 0.1683700E+00, 0.1745300E+00, &
     & 0.1802400E+00, 0.2093100E+00, 0.2058500E+00, 0.2321800E+00, &
     & 0.2443100E+00, 0.2601100E+00, 0.2893600E+00, 0.2826200E+00, &
     & 0.3300100E+00, 0.3860522E+00, 0.4287845E+00, 0.4287845E+00 /
      data (ref_adm(13,iz,30,14),iz = 1,20) / &
     & 0.1371300E+00, 0.1371300E+00, 0.1468100E+00, 0.1538100E+00, &
     & 0.1619800E+00, 0.1637900E+00, 0.1681200E+00, 0.1790700E+00, &
     & 0.1859100E+00, 0.2048900E+00, 0.2185400E+00, 0.2230900E+00, &
     & 0.2463600E+00, 0.2653100E+00, 0.3012100E+00, 0.3171500E+00, &
     & 0.3564030E+00, 0.3907200E+00, 0.4439926E+00, 0.4439926E+00 /
      data (ref_adm(13,iz,31,14),iz = 1,20) / &
     & 0.1350100E+00, 0.1350100E+00, 0.1505200E+00, 0.1507800E+00, &
     & 0.1546800E+00, 0.1708600E+00, 0.1789100E+00, 0.1769700E+00, &
     & 0.1996900E+00, 0.2043100E+00, 0.2259700E+00, 0.2389000E+00, &
     & 0.2425500E+00, 0.2722600E+00, 0.3000900E+00, 0.3281300E+00, &
     & 0.3307000E+00, 0.3981400E+00, 0.3485400E+00, 0.3485400E+00 /
      data (ref_adm(13,iz,32,14),iz = 1,20) / &
     & 0.1419200E+00, 0.1419200E+00, 0.1482500E+00, 0.1580300E+00, &
     & 0.1632700E+00, 0.1755100E+00, 0.1760100E+00, 0.1859200E+00, &
     & 0.1980200E+00, 0.2138900E+00, 0.2331200E+00, 0.2404400E+00, &
     & 0.2528800E+00, 0.2803200E+00, 0.3162200E+00, 0.3486800E+00, &
     & 0.3565700E+00, 0.4247640E+00, 0.4756123E+00, 0.4756123E+00 /
      data (ref_adm(13,iz,33,14),iz = 1,20) / &
     & 0.1384700E+00, 0.1384700E+00, 0.1438100E+00, 0.1498300E+00, &
     & 0.1555300E+00, 0.1661300E+00, 0.1777100E+00, 0.1796400E+00, &
     & 0.1975400E+00, 0.2102100E+00, 0.2306000E+00, 0.2554800E+00, &
     & 0.2731800E+00, 0.2995900E+00, 0.3244700E+00, 0.3925500E+00, &
     & 0.3878843E+00, 0.4371895E+00, 0.4895713E+00, 0.4895713E+00 /
      data (ref_adm(13,iz,34,14),iz = 1,20) / &
     & 0.1334000E+00, 0.1334000E+00, 0.1475400E+00, 0.1506800E+00, &
     & 0.1639000E+00, 0.1773900E+00, 0.1799100E+00, 0.1944000E+00, &
     & 0.1990000E+00, 0.2137800E+00, 0.2335400E+00, 0.2626400E+00, &
     & 0.2651200E+00, 0.3078700E+00, 0.3494900E+00, 0.3900000E+00, &
     & 0.3917762E+00, 0.4451897E+00, 0.4160700E+00, 0.4160700E+00 /
      data (ref_adm(13,iz,35,14),iz = 1,20) / &
     & 0.1331500E+00, 0.1331500E+00, 0.1379000E+00, 0.1605300E+00, &
     & 0.1703500E+00, 0.1650100E+00, 0.1746900E+00, 0.1854600E+00, &
     & 0.1991200E+00, 0.2283600E+00, 0.2588100E+00, 0.2786100E+00, &
     & 0.2902300E+00, 0.3385600E+00, 0.3663500E+00, 0.3745000E+00, &
     & 0.3913100E+00, 0.4481495E+00, 0.5122416E+00, 0.5122416E+00 /
      data (ref_adm(13,iz,36,14),iz = 1,20) / &
     & 0.1397500E+00, 0.1397500E+00, 0.1453600E+00, 0.1427600E+00, &
     & 0.1511300E+00, 0.1654700E+00, 0.1729200E+00, 0.1981900E+00, &
     & 0.2221500E+00, 0.2294600E+00, 0.2355800E+00, 0.2686100E+00, &
     & 0.2911900E+00, 0.3235600E+00, 0.3660900E+00, 0.4009100E+00, &
     & 0.4351000E+00, 0.4488038E+00, 0.5165484E+00, 0.5165484E+00 /
      data (ref_adm(13,iz,37,14),iz = 1,20) / &
     & 0.1376200E+00, 0.1376200E+00, 0.1399600E+00, 0.1435000E+00, &
     & 0.1464700E+00, 0.1579500E+00, 0.1809600E+00, 0.1936200E+00, &
     & 0.2247900E+00, 0.2296900E+00, 0.2471500E+00, 0.2770600E+00, &
     & 0.3083400E+00, 0.3446800E+00, 0.3818400E+00, 0.4407900E+00, &
     & 0.4060000E+00, 0.5083800E+00, 0.5181785E+00, 0.5181785E+00 /
      data (ref_adm(13,iz,38,14),iz = 1,20) / &
     & 0.1376200E+00, 0.1376200E+00, 0.1399600E+00, 0.1435000E+00, &
     & 0.1464700E+00, 0.1579500E+00, 0.1809600E+00, 0.1936200E+00, &
     & 0.2247900E+00, 0.2296900E+00, 0.2471500E+00, 0.2770600E+00, &
     & 0.3083400E+00, 0.3446800E+00, 0.3818400E+00, 0.4407900E+00, &
     & 0.4060000E+00, 0.5083800E+00, 0.5181785E+00, 0.5181785E+00 /
! Solar Zenith Angle 70.0 Albedo  0.2099170E+00
      data (ref_adm(13,iz, 1,15),iz = 1,20) / &
     & 0.1323700E+00, 0.1323700E+00, 0.1309500E+00, 0.1354700E+00, &
     & 0.1427900E+00, 0.1271800E+00, 0.1377900E+00, 0.1448000E+00, &
     & 0.1607700E+00, 0.1748900E+00, 0.1803000E+00, 0.2139300E+00, &
     & 0.4540600E+00, 0.4074400E+00, 0.4317000E+00, 0.3710882E+00, &
     & 0.4887784E+00, 0.8676966E+00, 0.1621492E+01, 0.1621492E+01 /
      data (ref_adm(13,iz, 2,15),iz = 1,20) / &
     & 0.1323700E+00, 0.1323700E+00, 0.1309500E+00, 0.1354700E+00, &
     & 0.1427900E+00, 0.1271800E+00, 0.1377900E+00, 0.1448000E+00, &
     & 0.1607700E+00, 0.1748900E+00, 0.1803000E+00, 0.2139300E+00, &
     & 0.4540600E+00, 0.4074400E+00, 0.4317000E+00, 0.3710882E+00, &
     & 0.4887784E+00, 0.8676966E+00, 0.1621492E+01, 0.1621492E+01 /
      data (ref_adm(13,iz, 3,15),iz = 1,20) / &
     & 0.1275200E+00, 0.1275200E+00, 0.1249400E+00, 0.1302800E+00, &
     & 0.1325800E+00, 0.1388600E+00, 0.1594100E+00, 0.1514900E+00, &
     & 0.1586900E+00, 0.1733100E+00, 0.1937200E+00, 0.2000300E+00, &
     & 0.2792000E+00, 0.3192300E+00, 0.4610000E+00, 0.3675966E+00, &
     & 0.4778617E+00, 0.8141001E+00, 0.2535661E-07, 0.2535661E-07 /
      data (ref_adm(13,iz, 4,15),iz = 1,20) / &
     & 0.1331300E+00, 0.1331300E+00, 0.1256200E+00, 0.1253000E+00, &
     & 0.1393200E+00, 0.1450500E+00, 0.1505700E+00, 0.1478200E+00, &
     & 0.1555700E+00, 0.1693700E+00, 0.1804500E+00, 0.1853100E+00, &
     & 0.2695900E+00, 0.3403400E+00, 0.4773400E+00, 0.3612607E+00, &
     & 0.4578195E+00, 0.7257829E+00, 0.1386348E+01, 0.1386348E+01 /
      data (ref_adm(13,iz, 5,15),iz = 1,20) / &
     & 0.1346900E+00, 0.1346900E+00, 0.1293600E+00, 0.1332000E+00, &
     & 0.1400200E+00, 0.1502400E+00, 0.1502600E+00, 0.1568200E+00, &
     & 0.1528500E+00, 0.1667400E+00, 0.1798800E+00, 0.1963000E+00, &
     & 0.1965000E+00, 0.2428200E+00, 0.2964343E+00, 0.4719100E+00, &
     & 0.4353760E+00, 0.6368195E+00, 0.1052776E+01, 0.1052776E+01 /
      data (ref_adm(13,iz, 6,15),iz = 1,20) / &
     & 0.1361900E+00, 0.1361900E+00, 0.1401400E+00, 0.1425500E+00, &
     & 0.1408100E+00, 0.1454500E+00, 0.1441000E+00, 0.1517400E+00, &
     & 0.1484000E+00, 0.1559100E+00, 0.1654000E+00, 0.1871600E+00, &
     & 0.1967400E+00, 0.2152100E+00, 0.2543200E+00, 0.2751500E+00, &
     & 0.4152788E+00, 0.5667859E+00, 0.8350598E+00, 0.8350598E+00 /
      data (ref_adm(13,iz, 7,15),iz = 1,20) / &
     & 0.1330000E+00, 0.1330000E+00, 0.1328200E+00, 0.1287900E+00, &
     & 0.1307800E+00, 0.1301400E+00, 0.1421600E+00, 0.1440500E+00, &
     & 0.1563500E+00, 0.1483900E+00, 0.1963500E+00, 0.2028700E+00, &
     & 0.2227100E+00, 0.2588600E+00, 0.2605600E+00, 0.2802100E+00, &
     & 0.4335600E+00, 0.5141233E+00, 0.6957339E+00, 0.6957339E+00 /
      data (ref_adm(13,iz, 8,15),iz = 1,20) / &
     & 0.1371900E+00, 0.1371900E+00, 0.1278900E+00, 0.1245200E+00, &
     & 0.1231200E+00, 0.1230500E+00, 0.1295400E+00, 0.1340000E+00, &
     & 0.1423300E+00, 0.1664000E+00, 0.1710600E+00, 0.1893000E+00, &
     & 0.2074800E+00, 0.2586000E+00, 0.2494900E+00, 0.3034100E+00, &
     & 0.3898911E+00, 0.4859713E+00, 0.6130202E+00, 0.6130202E+00 /
      data (ref_adm(13,iz, 9,15),iz = 1,20) / &
     & 0.1216700E+00, 0.1216700E+00, 0.1177600E+00, 0.1282300E+00, &
     & 0.1327000E+00, 0.1230200E+00, 0.1249600E+00, 0.1334700E+00, &
     & 0.1537800E+00, 0.1565400E+00, 0.1728900E+00, 0.1732900E+00, &
     & 0.1965100E+00, 0.2153700E+00, 0.2494900E+00, 0.2977500E+00, &
     & 0.3740185E+00, 0.4692100E+00, 0.5759269E+00, 0.5759269E+00 /
      data (ref_adm(13,iz,10,15),iz = 1,20) / &
     & 0.1368900E+00, 0.1368900E+00, 0.1236200E+00, 0.1221000E+00, &
     & 0.1216800E+00, 0.1163500E+00, 0.1281000E+00, 0.1438500E+00, &
     & 0.1359600E+00, 0.1579200E+00, 0.1505900E+00, 0.1743000E+00, &
     & 0.1803100E+00, 0.2038600E+00, 0.2169500E+00, 0.2778800E+00, &
     & 0.4189200E+00, 0.4421428E+00, 0.5461696E+00, 0.5461696E+00 /
      data (ref_adm(13,iz,11,15),iz = 1,20) / &
     & 0.1319700E+00, 0.1319700E+00, 0.1317700E+00, 0.1204800E+00, &
     & 0.1348600E+00, 0.1237900E+00, 0.1170000E+00, 0.1357100E+00, &
     & 0.1405000E+00, 0.1591500E+00, 0.1633400E+00, 0.1615900E+00, &
     & 0.1724600E+00, 0.2109100E+00, 0.2563200E+00, 0.3408300E+00, &
     & 0.3440176E+00, 0.4176716E+00, 0.5023283E+00, 0.5023283E+00 /
      data (ref_adm(13,iz,12,15),iz = 1,20) / &
     & 0.1383700E+00, 0.1383700E+00, 0.1275100E+00, 0.1316200E+00, &
     & 0.1328000E+00, 0.1362300E+00, 0.1570100E+00, 0.1540500E+00, &
     & 0.1860700E+00, 0.1552200E+00, 0.1574500E+00, 0.1606000E+00, &
     & 0.1796100E+00, 0.2116500E+00, 0.2146300E+00, 0.2746600E+00, &
     & 0.2850700E+00, 0.4008385E+00, 0.4733343E+00, 0.4733343E+00 /
      data (ref_adm(13,iz,13,15),iz = 1,20) / &
     & 0.1274500E+00, 0.1274500E+00, 0.1247800E+00, 0.1235300E+00, &
     & 0.1305000E+00, 0.1399900E+00, 0.1391200E+00, 0.1666000E+00, &
     & 0.1792600E+00, 0.1529600E+00, 0.1646200E+00, 0.1777100E+00, &
     & 0.1913200E+00, 0.1945800E+00, 0.2265600E+00, 0.2272900E+00, &
     & 0.3264794E+00, 0.3881560E+00, 0.4525881E+00, 0.4525881E+00 /
      data (ref_adm(13,iz,14,15),iz = 1,20) / &
     & 0.1368000E+00, 0.1368000E+00, 0.1314700E+00, 0.1363700E+00, &
     & 0.1349400E+00, 0.1411900E+00, 0.1299500E+00, 0.1478000E+00, &
     & 0.1491100E+00, 0.1620300E+00, 0.1551800E+00, 0.1704400E+00, &
     & 0.1805500E+00, 0.1988900E+00, 0.2071300E+00, 0.2790511E+00, &
     & 0.3196188E+00, 0.3787336E+00, 0.4374072E+00, 0.4374072E+00 /
      data (ref_adm(13,iz,15,15),iz = 1,20) / &
     & 0.1440200E+00, 0.1440200E+00, 0.1363100E+00, 0.1347200E+00, &
     & 0.1352100E+00, 0.1385100E+00, 0.1403600E+00, 0.1428300E+00, &
     & 0.1480600E+00, 0.1547600E+00, 0.1709200E+00, 0.1709100E+00, &
     & 0.1816400E+00, 0.1978200E+00, 0.2193500E+00, 0.2433800E+00, &
     & 0.2412800E+00, 0.3701438E+00, 0.4247563E+00, 0.4247563E+00 /
      data (ref_adm(13,iz,16,15),iz = 1,20) / &
     & 0.1303300E+00, 0.1303300E+00, 0.1317000E+00, 0.1276500E+00, &
     & 0.1296100E+00, 0.1311700E+00, 0.1306700E+00, 0.1366300E+00, &
     & 0.1438500E+00, 0.1532600E+00, 0.1599900E+00, 0.1671000E+00, &
     & 0.1781900E+00, 0.1855400E+00, 0.2415600E+00, 0.2543200E+00, &
     & 0.2880100E+00, 0.3599930E+00, 0.4118876E+00, 0.4118876E+00 /
      data (ref_adm(13,iz,17,15),iz = 1,20) / &
     & 0.1341400E+00, 0.1341400E+00, 0.1494000E+00, 0.1297800E+00, &
     & 0.1326000E+00, 0.1328400E+00, 0.1402000E+00, 0.1541200E+00, &
     & 0.1419200E+00, 0.1577200E+00, 0.1713700E+00, 0.1683900E+00, &
     & 0.1876500E+00, 0.2117800E+00, 0.2494000E+00, 0.2463900E+00, &
     & 0.2989689E+00, 0.3509054E+00, 0.3979585E+00, 0.3979585E+00 /
      data (ref_adm(13,iz,18,15),iz = 1,20) / &
     & 0.1348200E+00, 0.1348200E+00, 0.1360600E+00, 0.1390900E+00, &
     & 0.1430800E+00, 0.1466500E+00, 0.1388100E+00, 0.1541500E+00, &
     & 0.1477800E+00, 0.1688700E+00, 0.1711500E+00, 0.1659800E+00, &
     & 0.1951400E+00, 0.2160200E+00, 0.2191300E+00, 0.2326492E+00, &
     & 0.2549847E+00, 0.2846930E+00, 0.3048327E+00, 0.3048327E+00 /
      data (ref_adm(13,iz,19,15),iz = 1,20) / &
     & 0.1379200E+00, 0.1379200E+00, 0.1399800E+00, 0.1315800E+00, &
     & 0.1330300E+00, 0.1387800E+00, 0.1399100E+00, 0.1360200E+00, &
     & 0.1465300E+00, 0.1536200E+00, 0.1642500E+00, 0.1812900E+00, &
     & 0.2048100E+00, 0.2172000E+00, 0.2124500E+00, 0.2319145E+00, &
     & 0.2535931E+00, 0.2816262E+00, 0.2992062E+00, 0.2992062E+00 /
      data (ref_adm(13,iz,20,15),iz = 1,20) / &
     & 0.1406400E+00, 0.1406400E+00, 0.1423900E+00, 0.1488700E+00, &
     & 0.1437000E+00, 0.1366600E+00, 0.1466100E+00, 0.1402600E+00, &
     & 0.1434100E+00, 0.1633900E+00, 0.1633100E+00, 0.1834200E+00, &
     & 0.1891900E+00, 0.2136100E+00, 0.1996600E+00, 0.2320655E+00, &
     & 0.2528934E+00, 0.2797707E+00, 0.2959501E+00, 0.2959501E+00 /
      data (ref_adm(13,iz,21,15),iz = 1,20) / &
     & 0.1371100E+00, 0.1371100E+00, 0.1559300E+00, 0.1458700E+00, &
     & 0.1350000E+00, 0.1539400E+00, 0.1453100E+00, 0.1538300E+00, &
     & 0.1499300E+00, 0.1636500E+00, 0.1699400E+00, 0.1776800E+00, &
     & 0.1752100E+00, 0.2083100E+00, 0.2235100E+00, 0.2327312E+00, &
     & 0.2530409E+00, 0.2784597E+00, 0.2939011E+00, 0.2939011E+00 /
      data (ref_adm(13,iz,22,15),iz = 1,20) / &
     & 0.1506100E+00, 0.1506100E+00, 0.1488700E+00, 0.1352500E+00, &
     & 0.1328300E+00, 0.1478700E+00, 0.1497500E+00, 0.1481600E+00, &
     & 0.1523600E+00, 0.1609800E+00, 0.1764700E+00, 0.1816200E+00, &
     & 0.1846200E+00, 0.2115200E+00, 0.2224200E+00, 0.2785131E+00, &
     & 0.3094991E+00, 0.3506886E+00, 0.3836972E+00, 0.3836972E+00 /
      data (ref_adm(13,iz,23,15),iz = 1,20) / &
     & 0.1441700E+00, 0.1441700E+00, 0.1448800E+00, 0.1513700E+00, &
     & 0.1591900E+00, 0.1473200E+00, 0.1638900E+00, 0.1497500E+00, &
     & 0.1643400E+00, 0.1654000E+00, 0.1791100E+00, 0.1963700E+00, &
     & 0.1984100E+00, 0.2348500E+00, 0.2233400E+00, 0.2808452E+00, &
     & 0.3115915E+00, 0.3513684E+00, 0.3843118E+00, 0.3843118E+00 /
      data (ref_adm(13,iz,24,15),iz = 1,20) / &
     & 0.1359300E+00, 0.1359300E+00, 0.1326000E+00, 0.1354200E+00, &
     & 0.1391000E+00, 0.1449000E+00, 0.1510900E+00, 0.1599500E+00, &
     & 0.1677600E+00, 0.1700500E+00, 0.1795500E+00, 0.1923700E+00, &
     & 0.2158300E+00, 0.2181400E+00, 0.2491200E+00, 0.2533500E+00, &
     & 0.3149807E+00, 0.3543376E+00, 0.3877609E+00, 0.3877609E+00 /
      data (ref_adm(13,iz,25,15),iz = 1,20) / &
     & 0.1396400E+00, 0.1396400E+00, 0.1455300E+00, 0.1439800E+00, &
     & 0.1429400E+00, 0.1523100E+00, 0.1614600E+00, 0.1675400E+00, &
     & 0.1742700E+00, 0.1765500E+00, 0.1913900E+00, 0.2042600E+00, &
     & 0.2247400E+00, 0.2394000E+00, 0.2663700E+00, 0.2895007E+00, &
     & 0.3200632E+00, 0.3587023E+00, 0.3929127E+00, 0.3929127E+00 /
      data (ref_adm(13,iz,26,15),iz = 1,20) / &
     & 0.1365900E+00, 0.1365900E+00, 0.1342300E+00, 0.1391300E+00, &
     & 0.1643700E+00, 0.1493200E+00, 0.1524000E+00, 0.1676600E+00, &
     & 0.1739700E+00, 0.1826300E+00, 0.1959100E+00, 0.2091900E+00, &
     & 0.2462300E+00, 0.2508900E+00, 0.2671600E+00, 0.2722100E+00, &
     & 0.2999100E+00, 0.3658637E+00, 0.4018224E+00, 0.4018224E+00 /
      data (ref_adm(13,iz,27,15),iz = 1,20) / &
     & 0.1289300E+00, 0.1289300E+00, 0.1325000E+00, 0.1392800E+00, &
     & 0.1394000E+00, 0.1499800E+00, 0.1555100E+00, 0.1609700E+00, &
     & 0.1726200E+00, 0.1736000E+00, 0.1937300E+00, 0.1987000E+00, &
     & 0.2788400E+00, 0.2484800E+00, 0.2769100E+00, 0.3178100E+00, &
     & 0.3351255E+00, 0.3751743E+00, 0.4136746E+00, 0.4136746E+00 /
      data (ref_adm(13,iz,28,15),iz = 1,20) / &
     & 0.1348700E+00, 0.1348700E+00, 0.1325300E+00, 0.1389700E+00, &
     & 0.1643700E+00, 0.1602300E+00, 0.1599000E+00, 0.1632300E+00, &
     & 0.1767900E+00, 0.1852300E+00, 0.1978000E+00, 0.2267400E+00, &
     & 0.2530400E+00, 0.2503700E+00, 0.3401500E+00, 0.3131700E+00, &
     & 0.3444567E+00, 0.3850953E+00, 0.4267509E+00, 0.4267509E+00 /
      data (ref_adm(13,iz,29,15),iz = 1,20) / &
     & 0.1363300E+00, 0.1363300E+00, 0.1359000E+00, 0.1399400E+00, &
     & 0.1530100E+00, 0.1611000E+00, 0.1688600E+00, 0.1725200E+00, &
     & 0.1723800E+00, 0.1897100E+00, 0.2056500E+00, 0.2300600E+00, &
     & 0.2441800E+00, 0.2870600E+00, 0.3260700E+00, 0.3363300E+00, &
     & 0.3548703E+00, 0.3970696E+00, 0.4410217E+00, 0.4410217E+00 /
      data (ref_adm(13,iz,30,15),iz = 1,20) / &
     & 0.1350800E+00, 0.1350800E+00, 0.1476300E+00, 0.1392600E+00, &
     & 0.1450300E+00, 0.1496000E+00, 0.1777500E+00, 0.1767500E+00, &
     & 0.1793500E+00, 0.2122300E+00, 0.2117900E+00, 0.2239700E+00, &
     & 0.2379800E+00, 0.2915400E+00, 0.3579800E+00, 0.3341000E+00, &
     & 0.3386200E+00, 0.4098462E+00, 0.4566636E+00, 0.4566636E+00 /
      data (ref_adm(13,iz,31,15),iz = 1,20) / &
     & 0.1416600E+00, 0.1416600E+00, 0.1455200E+00, 0.1567600E+00, &
     & 0.1465600E+00, 0.1598100E+00, 0.1778400E+00, 0.1847800E+00, &
     & 0.1926200E+00, 0.2008800E+00, 0.2163800E+00, 0.2507400E+00, &
     & 0.2941700E+00, 0.3192000E+00, 0.3370600E+00, 0.3564100E+00, &
     & 0.3783312E+00, 0.4235843E+00, 0.4729254E+00, 0.4729254E+00 /
      data (ref_adm(13,iz,32,15),iz = 1,20) / &
     & 0.1389400E+00, 0.1389400E+00, 0.1534100E+00, 0.1532800E+00, &
     & 0.1580000E+00, 0.1723600E+00, 0.1843700E+00, 0.1894500E+00, &
     & 0.1959900E+00, 0.2203800E+00, 0.2319200E+00, 0.2580300E+00, &
     & 0.2852400E+00, 0.3199400E+00, 0.3494300E+00, 0.4176000E+00, &
     & 0.4556400E+00, 0.4368864E+00, 0.4891856E+00, 0.4891856E+00 /
      data (ref_adm(13,iz,33,15),iz = 1,20) / &
     & 0.1387100E+00, 0.1387100E+00, 0.1447700E+00, 0.1488500E+00, &
     & 0.1556100E+00, 0.1704600E+00, 0.1782800E+00, 0.1861300E+00, &
     & 0.1986100E+00, 0.2126400E+00, 0.2314100E+00, 0.2442700E+00, &
     & 0.2692400E+00, 0.2915300E+00, 0.3381100E+00, 0.3669900E+00, &
     & 0.4976600E+00, 0.4496664E+00, 0.5035428E+00, 0.5035428E+00 /
      data (ref_adm(13,iz,34,15),iz = 1,20) / &
     & 0.1358400E+00, 0.1358400E+00, 0.1472100E+00, 0.1547100E+00, &
     & 0.1540300E+00, 0.1764900E+00, 0.1880900E+00, 0.1942000E+00, &
     & 0.2206900E+00, 0.2169000E+00, 0.2486700E+00, 0.2597200E+00, &
     & 0.2792300E+00, 0.3014000E+00, 0.3678300E+00, 0.4215900E+00, &
     & 0.4369400E+00, 0.4578950E+00, 0.5169079E+00, 0.5169079E+00 /
      data (ref_adm(13,iz,35,15),iz = 1,20) / &
     & 0.1375900E+00, 0.1375900E+00, 0.1477500E+00, 0.1606200E+00, &
     & 0.1578100E+00, 0.1646300E+00, 0.1673000E+00, 0.2010100E+00, &
     & 0.2320600E+00, 0.2377600E+00, 0.2458000E+00, 0.2673900E+00, &
     & 0.2986600E+00, 0.3537700E+00, 0.4188500E+00, 0.4090700E+00, &
     & 0.5084600E+00, 0.4609390E+00, 0.5268604E+00, 0.5268604E+00 /
      data (ref_adm(13,iz,36,15),iz = 1,20) / &
     & 0.1543300E+00, 0.1543300E+00, 0.1532900E+00, 0.1516000E+00, &
     & 0.1487500E+00, 0.1607500E+00, 0.1865700E+00, 0.1853100E+00, &
     & 0.2219900E+00, 0.2364600E+00, 0.2591800E+00, 0.2837400E+00, &
     & 0.3196000E+00, 0.3615000E+00, 0.3954400E+00, 0.4896800E+00, &
     & 0.4797800E+00, 0.4616119E+00, 0.5312899E+00, 0.5312899E+00 /
      data (ref_adm(13,iz,37,15),iz = 1,20) / &
     & 0.1264100E+00, 0.1264100E+00, 0.1234500E+00, 0.1530100E+00, &
     & 0.1649200E+00, 0.1649600E+00, 0.1742400E+00, 0.1861400E+00, &
     & 0.2045000E+00, 0.2257200E+00, 0.2405800E+00, 0.2763900E+00, &
     & 0.3127100E+00, 0.3620200E+00, 0.3986000E+00, 0.5025600E+00, &
     & 0.4110733E+00, 0.4622242E+00, 0.4661500E+00, 0.4661500E+00 /
      data (ref_adm(13,iz,38,15),iz = 1,20) / &
     & 0.1264100E+00, 0.1264100E+00, 0.1234500E+00, 0.1530100E+00, &
     & 0.1649200E+00, 0.1649600E+00, 0.1742400E+00, 0.1861400E+00, &
     & 0.2045000E+00, 0.2257200E+00, 0.2405800E+00, 0.2763900E+00, &
     & 0.3127100E+00, 0.3620200E+00, 0.3986000E+00, 0.5025600E+00, &
     & 0.4110733E+00, 0.4622242E+00, 0.4661500E+00, 0.4661500E+00 /
! Solar Zenith Angle 75.0 Albedo  0.2210302E+00
      data (ref_adm(13,iz, 1,16),iz = 1,20) / &
     & 0.2219200E+00, 0.2219200E+00, 0.1025600E+00, 0.1135000E+00, &
     & 0.1402200E+00, 0.1468700E+00, 0.1465300E+00, 0.1541900E+00, &
     & 0.1654408E+00, 0.1999000E+00, 0.1907400E+00, 0.1711900E+00, &
     & 0.2268090E+00, 0.2473524E+00, 0.2788571E+00, 0.3277513E+00, &
     & 0.3843475E+00, 0.4856955E+00, 0.6719651E+00, 0.6719651E+00 /
      data (ref_adm(13,iz, 2,16),iz = 1,20) / &
     & 0.2219200E+00, 0.2219200E+00, 0.1025600E+00, 0.1135000E+00, &
     & 0.1402200E+00, 0.1468700E+00, 0.1465300E+00, 0.1541900E+00, &
     & 0.1654408E+00, 0.1999000E+00, 0.1907400E+00, 0.1711900E+00, &
     & 0.2268090E+00, 0.2473524E+00, 0.2788571E+00, 0.3277513E+00, &
     & 0.3843475E+00, 0.4856955E+00, 0.6719651E+00, 0.6719651E+00 /
      data (ref_adm(13,iz, 3,16),iz = 1,20) / &
     & 0.1339500E+00, 0.1339500E+00, 0.2120600E+00, 0.1325900E+00, &
     & 0.1331200E+00, 0.1394400E+00, 0.1541000E+00, 0.1471600E+00, &
     & 0.1575700E+00, 0.1728100E+00, 0.2011600E+00, 0.2023900E+00, &
     & 0.2190800E+00, 0.2466573E+00, 0.2781663E+00, 0.3263886E+00, &
     & 0.3825128E+00, 0.4797050E+00, 0.1011085E-07, 0.1011085E-07 /
      data (ref_adm(13,iz, 4,16),iz = 1,20) / &
     & 0.1460100E+00, 0.1460100E+00, 0.1745200E+00, 0.1522400E+00, &
     & 0.1448000E+00, 0.1375800E+00, 0.1608300E+00, 0.1605500E+00, &
     & 0.1752800E+00, 0.1470000E+00, 0.1874700E+00, 0.2271600E+00, &
     & 0.2807300E+00, 0.2458368E+00, 0.2763598E+00, 0.3230687E+00, &
     & 0.3788677E+00, 0.4691207E+00, 0.6186171E+00, 0.6186171E+00 /
      data (ref_adm(13,iz, 5,16),iz = 1,20) / &
     & 0.1372600E+00, 0.1372600E+00, 0.1592000E+00, 0.1762500E+00, &
     & 0.1535100E+00, 0.1487300E+00, 0.1306300E+00, 0.1491200E+00, &
     & 0.1538000E+00, 0.1556700E+00, 0.1544300E+00, 0.2038166E+00, &
     & 0.2683400E+00, 0.2443206E+00, 0.2736851E+00, 0.3185598E+00, &
     & 0.3742499E+00, 0.4582992E+00, 0.5787638E+00, 0.5787638E+00 /
      data (ref_adm(13,iz, 6,16),iz = 1,20) / &
     & 0.1249300E+00, 0.1249300E+00, 0.1205500E+00, 0.1293800E+00, &
     & 0.1403000E+00, 0.1258900E+00, 0.1274400E+00, 0.1360500E+00, &
     & 0.1389400E+00, 0.1592700E+00, 0.1726100E+00, 0.1795900E+00, &
     & 0.2101800E+00, 0.2562400E+00, 0.3087700E+00, 0.3772900E+00, &
     & 0.3666506E+00, 0.4476691E+00, 0.5438018E+00, 0.5438018E+00 /
      data (ref_adm(13,iz, 7,16),iz = 1,20) / &
     & 0.1594900E+00, 0.1594900E+00, 0.1281700E+00, 0.1141800E+00, &
     & 0.1275800E+00, 0.1354400E+00, 0.1780600E+00, 0.1463400E+00, &
     & 0.1693600E+00, 0.1875700E+00, 0.2101100E+00, 0.2640100E+00, &
     & 0.2858600E+00, 0.3279600E+00, 0.4894600E+00, 0.4062000E+00, &
     & 0.4401500E+00, 0.4364824E+00, 0.5208190E+00, 0.5208190E+00 /
      data (ref_adm(13,iz, 8,16),iz = 1,20) / &
     & 0.1347400E+00, 0.1347400E+00, 0.1278900E+00, 0.1488500E+00, &
     & 0.1266500E+00, 0.1317900E+00, 0.1493500E+00, 0.1419600E+00, &
     & 0.1781200E+00, 0.1891500E+00, 0.2120900E+00, 0.2252400E+00, &
     & 0.2206200E+00, 0.2380036E+00, 0.4647000E+00, 0.3864500E+00, &
     & 0.4457500E+00, 0.4207457E+00, 0.5036535E+00, 0.5036535E+00 /
      data (ref_adm(13,iz, 9,16),iz = 1,20) / &
     & 0.1260100E+00, 0.1260100E+00, 0.1196300E+00, 0.1328000E+00, &
     & 0.1264700E+00, 0.1348200E+00, 0.1379800E+00, 0.1437200E+00, &
     & 0.1570900E+00, 0.1751300E+00, 0.1934400E+00, 0.2125100E+00, &
     & 0.2557900E+00, 0.3068300E+00, 0.2576200E+00, 0.3703500E+00, &
     & 0.3376311E+00, 0.4024205E+00, 0.4779368E+00, 0.4779368E+00 /
      data (ref_adm(13,iz,10,16),iz = 1,20) / &
     & 0.1284900E+00, 0.1284900E+00, 0.1249600E+00, 0.1249400E+00, &
     & 0.1346700E+00, 0.1267100E+00, 0.1311600E+00, 0.1650400E+00, &
     & 0.1576400E+00, 0.1678100E+00, 0.1794300E+00, 0.1769900E+00, &
     & 0.2348900E+00, 0.2628800E+00, 0.2943700E+00, 0.2948400E+00, &
     & 0.3627800E+00, 0.3878478E+00, 0.4491781E+00, 0.4491781E+00 /
      data (ref_adm(13,iz,11,16),iz = 1,20) / &
     & 0.1392400E+00, 0.1392400E+00, 0.1299700E+00, 0.1253100E+00, &
     & 0.1316300E+00, 0.1297000E+00, 0.1558700E+00, 0.1455900E+00, &
     & 0.1772100E+00, 0.1899600E+00, 0.1791600E+00, 0.1625200E+00, &
     & 0.2515800E+00, 0.3098600E+00, 0.3125600E+00, 0.2993600E+00, &
     & 0.2961500E+00, 0.3763197E+00, 0.4278827E+00, 0.4278827E+00 /
      data (ref_adm(13,iz,12,16),iz = 1,20) / &
     & 0.1313100E+00, 0.1313100E+00, 0.1371900E+00, 0.1298100E+00, &
     & 0.1282300E+00, 0.1427500E+00, 0.1499100E+00, 0.1598800E+00, &
     & 0.1607500E+00, 0.1831200E+00, 0.1473400E+00, 0.1936500E+00, &
     & 0.1847200E+00, 0.2774800E+00, 0.2856000E+00, 0.2739800E+00, &
     & 0.3573800E+00, 0.3673398E+00, 0.4126557E+00, 0.4126557E+00 /
      data (ref_adm(13,iz,13,16),iz = 1,20) / &
     & 0.1311800E+00, 0.1311800E+00, 0.1354600E+00, 0.1271900E+00, &
     & 0.1239100E+00, 0.1355900E+00, 0.1455600E+00, 0.1446000E+00, &
     & 0.1660200E+00, 0.1617400E+00, 0.1786800E+00, 0.1824500E+00, &
     & 0.2044200E+00, 0.2261900E+00, 0.2554800E+00, 0.2726200E+00, &
     & 0.3123743E+00, 0.3597299E+00, 0.4004329E+00, 0.4004329E+00 /
      data (ref_adm(13,iz,14,16),iz = 1,20) / &
     & 0.1355800E+00, 0.1355800E+00, 0.1322100E+00, 0.1379000E+00, &
     & 0.1294800E+00, 0.1380200E+00, 0.1257000E+00, 0.1395300E+00, &
     & 0.1485300E+00, 0.1592000E+00, 0.1704200E+00, 0.1863100E+00, &
     & 0.1942800E+00, 0.2044300E+00, 0.2462900E+00, 0.2729467E+00, &
     & 0.3734400E+00, 0.3529340E+00, 0.3904906E+00, 0.3904906E+00 /
      data (ref_adm(13,iz,15,16),iz = 1,20) / &
     & 0.1373500E+00, 0.1373500E+00, 0.1379600E+00, 0.1465800E+00, &
     & 0.1402200E+00, 0.1443900E+00, 0.1444000E+00, 0.1484500E+00, &
     & 0.1654600E+00, 0.1715300E+00, 0.1855700E+00, 0.1857200E+00, &
     & 0.1922100E+00, 0.2252900E+00, 0.2361400E+00, 0.2686455E+00, &
     & 0.3004425E+00, 0.3452937E+00, 0.3811037E+00, 0.3811037E+00 /
      data (ref_adm(13,iz,16,16),iz = 1,20) / &
     & 0.1340000E+00, 0.1340000E+00, 0.1487200E+00, 0.1361500E+00, &
     & 0.1355700E+00, 0.1488000E+00, 0.1507400E+00, 0.1502500E+00, &
     & 0.1514600E+00, 0.1594800E+00, 0.1691000E+00, 0.1755200E+00, &
     & 0.1929700E+00, 0.2076900E+00, 0.2321200E+00, 0.2648486E+00, &
     & 0.2953466E+00, 0.3373282E+00, 0.3701666E+00, 0.3701666E+00 /
      data (ref_adm(13,iz,17,16),iz = 1,20) / &
     & 0.1358800E+00, 0.1358800E+00, 0.1261800E+00, 0.1294000E+00, &
     & 0.1411100E+00, 0.1421100E+00, 0.1449800E+00, 0.1568500E+00, &
     & 0.1489300E+00, 0.1542500E+00, 0.1839400E+00, 0.1899380E+00, &
     & 0.2088900E+00, 0.2051600E+00, 0.2392400E+00, 0.2617755E+00, &
     & 0.2906557E+00, 0.3303854E+00, 0.3597086E+00, 0.3597086E+00 /
      data (ref_adm(13,iz,18,16),iz = 1,20) / &
     & 0.1316800E+00, 0.1316800E+00, 0.1351100E+00, 0.1387300E+00, &
     & 0.1400500E+00, 0.1396600E+00, 0.1430000E+00, 0.1501600E+00, &
     & 0.1725200E+00, 0.1627900E+00, 0.1871500E+00, 0.1939200E+00, &
     & 0.2184500E+00, 0.2080900E+00, 0.2497700E+00, 0.2601682E+00, &
     & 0.2890431E+00, 0.3283169E+00, 0.3573756E+00, 0.3573756E+00 /
      data (ref_adm(13,iz,19,16),iz = 1,20) / &
     & 0.1309200E+00, 0.1309200E+00, 0.1453000E+00, 0.1310900E+00, &
     & 0.1394700E+00, 0.1388600E+00, 0.1485600E+00, 0.1529000E+00, &
     & 0.1615600E+00, 0.1648800E+00, 0.1832400E+00, 0.1898700E+00, &
     & 0.2025400E+00, 0.2033600E+00, 0.2213900E+00, 0.2587949E+00, &
     & 0.2866748E+00, 0.3236004E+00, 0.3496786E+00, 0.3496786E+00 /
      data (ref_adm(13,iz,20,16),iz = 1,20) / &
     & 0.1287200E+00, 0.1287200E+00, 0.1375500E+00, 0.1370800E+00, &
     & 0.1442400E+00, 0.1420500E+00, 0.1475500E+00, 0.1526400E+00, &
     & 0.1891000E+00, 0.1728300E+00, 0.1955600E+00, 0.1898000E+00, &
     & 0.1967100E+00, 0.2454700E+00, 0.2396800E+00, 0.2583052E+00, &
     & 0.2852801E+00, 0.3208750E+00, 0.3452256E+00, 0.3452256E+00 /
      data (ref_adm(13,iz,21,16),iz = 1,20) / &
     & 0.1325400E+00, 0.1325400E+00, 0.1359400E+00, 0.1529900E+00, &
     & 0.1773200E+00, 0.1437600E+00, 0.1535800E+00, 0.1518200E+00, &
     & 0.1647500E+00, 0.1790200E+00, 0.1969800E+00, 0.1905000E+00, &
     & 0.1969400E+00, 0.2462400E+00, 0.2740000E+00, 0.2587171E+00, &
     & 0.2849710E+00, 0.3189526E+00, 0.3424621E+00, 0.3424621E+00 /
      data (ref_adm(13,iz,22,16),iz = 1,20) / &
     & 0.1438700E+00, 0.1438700E+00, 0.1301100E+00, 0.1344500E+00, &
     & 0.1436400E+00, 0.1483900E+00, 0.1542000E+00, 0.1591900E+00, &
     & 0.1586300E+00, 0.1659700E+00, 0.1944600E+00, 0.1982000E+00, &
     & 0.2002800E+00, 0.2083200E+00, 0.2243400E+00, 0.3186600E+00, &
     & 0.3634138E+00, 0.4276811E+00, 0.4970307E+00, 0.4970307E+00 /
      data (ref_adm(13,iz,23,16),iz = 1,20) / &
     & 0.1493700E+00, 0.1493700E+00, 0.1538900E+00, 0.1476800E+00, &
     & 0.1494900E+00, 0.1540200E+00, 0.1600000E+00, 0.1657800E+00, &
     & 0.1689200E+00, 0.1858600E+00, 0.2026200E+00, 0.1927600E+00, &
     & 0.2196200E+00, 0.2304600E+00, 0.2435100E+00, 0.2812600E+00, &
     & 0.3651368E+00, 0.4279883E+00, 0.4979598E+00, 0.4979598E+00 /
      data (ref_adm(13,iz,24,16),iz = 1,20) / &
     & 0.1361500E+00, 0.1361500E+00, 0.1379300E+00, 0.1429700E+00, &
     & 0.1465400E+00, 0.1512100E+00, 0.1545600E+00, 0.1638700E+00, &
     & 0.1743200E+00, 0.1855400E+00, 0.1971000E+00, 0.2122400E+00, &
     & 0.2291000E+00, 0.2459800E+00, 0.2626500E+00, 0.2935300E+00, &
     & 0.3686657E+00, 0.4314062E+00, 0.5034489E+00, 0.5034489E+00 /
      data (ref_adm(13,iz,25,16),iz = 1,20) / &
     & 0.1382900E+00, 0.1382900E+00, 0.1386400E+00, 0.1356300E+00, &
     & 0.1412800E+00, 0.1452600E+00, 0.1577700E+00, 0.1701200E+00, &
     & 0.1786400E+00, 0.1893300E+00, 0.2098200E+00, 0.2272900E+00, &
     & 0.2586800E+00, 0.2737600E+00, 0.2948100E+00, 0.3290800E+00, &
     & 0.3552200E+00, 0.4369816E+00, 0.5116621E+00, 0.5116621E+00 /
      data (ref_adm(13,iz,26,16),iz = 1,20) / &
     & 0.1343000E+00, 0.1343000E+00, 0.1367800E+00, 0.1439600E+00, &
     & 0.1502700E+00, 0.1600400E+00, 0.1668400E+00, 0.1703300E+00, &
     & 0.1983400E+00, 0.1857300E+00, 0.2079200E+00, 0.2197700E+00, &
     & 0.2734500E+00, 0.2990000E+00, 0.3046600E+00, 0.3265300E+00, &
     & 0.3828242E+00, 0.4465218E+00, 0.5259072E+00, 0.5259072E+00 /
      data (ref_adm(13,iz,27,16),iz = 1,20) / &
     & 0.1392300E+00, 0.1392300E+00, 0.1356900E+00, 0.1415400E+00, &
     & 0.1344300E+00, 0.1735300E+00, 0.1656100E+00, 0.1743300E+00, &
     & 0.2478600E+00, 0.2097900E+00, 0.2091100E+00, 0.2337000E+00, &
     & 0.2607700E+00, 0.3219100E+00, 0.3355400E+00, 0.3454600E+00, &
     & 0.3927787E+00, 0.4586260E+00, 0.5440214E+00, 0.5440214E+00 /
      data (ref_adm(13,iz,28,16),iz = 1,20) / &
     & 0.1389100E+00, 0.1389100E+00, 0.1478700E+00, 0.1452400E+00, &
     & 0.1425300E+00, 0.1458200E+00, 0.1570400E+00, 0.1724300E+00, &
     & 0.2315000E+00, 0.2024300E+00, 0.2285300E+00, 0.2367000E+00, &
     & 0.2514500E+00, 0.2898000E+00, 0.3433600E+00, 0.3617200E+00, &
     & 0.4043807E+00, 0.4722153E+00, 0.5634652E+00, 0.5634652E+00 /
      data (ref_adm(13,iz,29,16),iz = 1,20) / &
     & 0.1365700E+00, 0.1365700E+00, 0.1445600E+00, 0.1500300E+00, &
     & 0.1510100E+00, 0.1562800E+00, 0.1645000E+00, 0.1824300E+00, &
     & 0.2013000E+00, 0.2085500E+00, 0.2203500E+00, 0.2514200E+00, &
     & 0.2552400E+00, 0.2827400E+00, 0.3229500E+00, 0.3831300E+00, &
     & 0.4174742E+00, 0.4883368E+00, 0.5862319E+00, 0.5862319E+00 /
      data (ref_adm(13,iz,30,16),iz = 1,20) / &
     & 0.1366800E+00, 0.1366800E+00, 0.1399600E+00, 0.1541700E+00, &
     & 0.1556500E+00, 0.1667400E+00, 0.1760500E+00, 0.1731100E+00, &
     & 0.1996000E+00, 0.2179100E+00, 0.2104800E+00, 0.2544800E+00, &
     & 0.2490900E+00, 0.3003200E+00, 0.3490500E+00, 0.3983900E+00, &
     & 0.4322284E+00, 0.5062672E+00, 0.6102533E+00, 0.6102533E+00 /
      data (ref_adm(13,iz,31,16),iz = 1,20) / &
     & 0.1353100E+00, 0.1353100E+00, 0.1408300E+00, 0.1470200E+00, &
     & 0.1472700E+00, 0.1738300E+00, 0.1671600E+00, 0.1798400E+00, &
     & 0.1877200E+00, 0.2349300E+00, 0.2314800E+00, 0.2582400E+00, &
     & 0.2669100E+00, 0.3505300E+00, 0.3649000E+00, 0.3915564E+00, &
     & 0.4219800E+00, 0.5250688E+00, 0.6359547E+00, 0.6359547E+00 /
      data (ref_adm(13,iz,32,16),iz = 1,20) / &
     & 0.1370200E+00, 0.1370200E+00, 0.1356200E+00, 0.1412800E+00, &
     & 0.1522800E+00, 0.1665300E+00, 0.1772000E+00, 0.1939000E+00, &
     & 0.2039300E+00, 0.2235200E+00, 0.2503600E+00, 0.2663600E+00, &
     & 0.2844100E+00, 0.3163300E+00, 0.3672100E+00, 0.3962400E+00, &
     & 0.4613190E+00, 0.5434420E+00, 0.6600607E+00, 0.6600607E+00 /
      data (ref_adm(13,iz,33,16),iz = 1,20) / &
     & 0.1305600E+00, 0.1305600E+00, 0.1356200E+00, 0.1401300E+00, &
     & 0.1437500E+00, 0.1531900E+00, 0.1681400E+00, 0.1818400E+00, &
     & 0.1936700E+00, 0.2080600E+00, 0.2464300E+00, 0.2752200E+00, &
     & 0.3201100E+00, 0.3681900E+00, 0.3868700E+00, 0.4236800E+00, &
     & 0.4695884E+00, 0.5570346E+00, 0.6827946E+00, 0.6827946E+00 /
      data (ref_adm(13,iz,34,16),iz = 1,20) / &
     & 0.1307600E+00, 0.1307600E+00, 0.1494900E+00, 0.1634500E+00, &
     & 0.1983900E+00, 0.2037400E+00, 0.2133800E+00, 0.2127100E+00, &
     & 0.2217000E+00, 0.2249700E+00, 0.2547100E+00, 0.2906800E+00, &
     & 0.3502900E+00, 0.3995900E+00, 0.4291700E+00, 0.4923300E+00, &
     & 0.5279400E+00, 0.5597954E+00, 0.6945524E+00, 0.6945524E+00 /
      data (ref_adm(13,iz,35,16),iz = 1,20) / &
     & 0.1322200E+00, 0.1322200E+00, 0.1458300E+00, 0.1690800E+00, &
     & 0.1948600E+00, 0.1876000E+00, 0.1863900E+00, 0.1964400E+00, &
     & 0.2285000E+00, 0.2462900E+00, 0.2479000E+00, 0.3077400E+00, &
     & 0.3390400E+00, 0.3898800E+00, 0.4355100E+00, 0.4891400E+00, &
     & 0.4763056E+00, 0.5610227E+00, 0.6976620E+00, 0.6976620E+00 /
      data (ref_adm(13,iz,36,16),iz = 1,20) / &
     & 0.1522600E+00, 0.1522600E+00, 0.1840300E+00, 0.1714300E+00, &
     & 0.1532100E+00, 0.1618300E+00, 0.1595300E+00, 0.1823400E+00, &
     & 0.2316700E+00, 0.2560500E+00, 0.2623300E+00, 0.3052300E+00, &
     & 0.3148200E+00, 0.4059800E+00, 0.4391200E+00, 0.4241574E+00, &
     & 0.4835815E+00, 0.5657364E+00, 0.6991938E+00, 0.6991938E+00 /
      data (ref_adm(13,iz,37,16),iz = 1,20) / &
     & 0.1668300E+00, 0.1668300E+00, 0.1648300E+00, 0.1664700E+00, &
     & 0.1497800E+00, 0.1592500E+00, 0.1795700E+00, 0.1925200E+00, &
     & 0.2204400E+00, 0.2491700E+00, 0.2912200E+00, 0.2914100E+00, &
     & 0.3419400E+00, 0.3669400E+00, 0.3793500E+00, 0.5144100E+00, &
     & 0.4965503E+00, 0.5706072E+00, 0.7008699E+00, 0.7008699E+00 /
      data (ref_adm(13,iz,38,16),iz = 1,20) / &
     & 0.1668300E+00, 0.1668300E+00, 0.1648300E+00, 0.1664700E+00, &
     & 0.1497800E+00, 0.1592500E+00, 0.1795700E+00, 0.1925200E+00, &
     & 0.2204400E+00, 0.2491700E+00, 0.2912200E+00, 0.2914100E+00, &
     & 0.3419400E+00, 0.3669400E+00, 0.3793500E+00, 0.5144100E+00, &
     & 0.4965503E+00, 0.5706072E+00, 0.7008699E+00, 0.7008699E+00 /
! Solar Zenith Angle 80.0 Albedo  0.2426979E+00
      data (ref_adm(13,iz, 1,17),iz = 1,20) / &
     & 0.1514591E+00, 0.1514591E+00, 0.1511448E+00, 0.1527901E+00, &
     & 0.1576000E+00, 0.1527500E+00, 0.1569500E+00, 0.1699700E+00, &
     & 0.2039300E+00, 0.2353300E+00, 0.2191216E+00, 0.2444745E+00, &
     & 0.2776730E+00, 0.3132705E+00, 0.3632788E+00, 0.4427577E+00, &
     & 0.5831780E+00, 0.1035278E+01, 0.1934657E+01, 0.1934657E+01 /
      data (ref_adm(13,iz, 2,17),iz = 1,20) / &
     & 0.1514591E+00, 0.1514591E+00, 0.1511448E+00, 0.1527901E+00, &
     & 0.1576000E+00, 0.1527500E+00, 0.1569500E+00, 0.1699700E+00, &
     & 0.2039300E+00, 0.2353300E+00, 0.2191216E+00, 0.2444745E+00, &
     & 0.2776730E+00, 0.3132705E+00, 0.3632788E+00, 0.4427577E+00, &
     & 0.5831780E+00, 0.1035278E+01, 0.1934657E+01, 0.1934657E+01 /
      data (ref_adm(13,iz, 3,17),iz = 1,20) / &
     & 0.1555600E+00, 0.1555600E+00, 0.1575900E+00, 0.1482200E+00, &
     & 0.1539500E+00, 0.1689200E+00, 0.1635300E+00, 0.1806200E+00, &
     & 0.1849200E+00, 0.1891300E+00, 0.2189095E+00, 0.2441276E+00, &
     & 0.2768005E+00, 0.3118456E+00, 0.3618159E+00, 0.4385917E+00, &
     & 0.5701528E+00, 0.9713304E+00, 0.3025384E-07, 0.3025384E-07 /
      data (ref_adm(13,iz, 4,17),iz = 1,20) / &
     & 0.1486800E+00, 0.1486800E+00, 0.1448800E+00, 0.1436100E+00, &
     & 0.1419800E+00, 0.1611726E+00, 0.1683367E+00, 0.1753200E+00, &
     & 0.1889386E+00, 0.1883800E+00, 0.2343400E+00, 0.3033100E+00, &
     & 0.2748814E+00, 0.3084421E+00, 0.3583742E+00, 0.4310324E+00, &
     & 0.5462398E+00, 0.8659559E+00, 0.1654098E+01, 0.1654098E+01 /
      data (ref_adm(13,iz, 5,17),iz = 1,20) / &
     & 0.1441500E+00, 0.1441500E+00, 0.1512372E+00, 0.1464300E+00, &
     & 0.1564500E+00, 0.2153400E+00, 0.1962500E+00, 0.1737300E+00, &
     & 0.1972400E+00, 0.2290500E+00, 0.2332900E+00, 0.2910700E+00, &
     & 0.2720587E+00, 0.3039657E+00, 0.3536858E+00, 0.4220397E+00, &
     & 0.5194620E+00, 0.7598107E+00, 0.1256102E+01, 0.1256102E+01 /
      data (ref_adm(13,iz, 6,17),iz = 1,20) / &
     & 0.1451100E+00, 0.1451100E+00, 0.1512348E+00, 0.1528086E+00, &
     & 0.1762100E+00, 0.1907200E+00, 0.2148600E+00, 0.1800500E+00, &
     & 0.1899100E+00, 0.2194600E+00, 0.2160707E+00, 0.2395007E+00, &
     & 0.2688649E+00, 0.2987324E+00, 0.3463988E+00, 0.4132774E+00, &
     & 0.4954834E+00, 0.6762513E+00, 0.9963383E+00, 0.9963383E+00 /
      data (ref_adm(13,iz, 7,17),iz = 1,20) / &
     & 0.1338500E+00, 0.1338500E+00, 0.1305200E+00, 0.1409300E+00, &
     & 0.1412100E+00, 0.1573700E+00, 0.2127800E+00, 0.1833200E+00, &
     & 0.1913500E+00, 0.2116700E+00, 0.2146499E+00, 0.2373901E+00, &
     & 0.2654195E+00, 0.2933690E+00, 0.3371943E+00, 0.4036165E+00, &
     & 0.4788365E+00, 0.6134178E+00, 0.8301035E+00, 0.8301035E+00 /
      data (ref_adm(13,iz, 8,17),iz = 1,20) / &
     & 0.1301900E+00, 0.1301900E+00, 0.1683700E+00, 0.1612200E+00, &
     & 0.1611000E+00, 0.1478400E+00, 0.1693600E+00, 0.1899300E+00, &
     & 0.1905500E+00, 0.1807900E+00, 0.2129398E+00, 0.2350671E+00, &
     & 0.3508700E+00, 0.3286000E+00, 0.3418300E+00, 0.3901465E+00, &
     & 0.4651924E+00, 0.5798287E+00, 0.7314154E+00, 0.7314154E+00 /
      data (ref_adm(13,iz, 9,17),iz = 1,20) / &
     & 0.1370300E+00, 0.1370300E+00, 0.1482300E+00, 0.1492200E+00, &
     & 0.1406700E+00, 0.1460900E+00, 0.1719700E+00, 0.1455000E+00, &
     & 0.1701000E+00, 0.1764500E+00, 0.2145500E+00, 0.2331900E+00, &
     & 0.2399700E+00, 0.2830744E+00, 0.3203233E+00, 0.3754036E+00, &
     & 0.4462540E+00, 0.5598301E+00, 0.6871579E+00, 0.6871579E+00 /
      data (ref_adm(13,iz,10,17),iz = 1,20) / &
     & 0.1178000E+00, 0.1178000E+00, 0.1408400E+00, 0.1387700E+00, &
     & 0.1390700E+00, 0.1600039E+00, 0.1346000E+00, 0.1735954E+00, &
     & 0.1967600E+00, 0.2006900E+00, 0.2236400E+00, 0.2443200E+00, &
     & 0.2548816E+00, 0.3104800E+00, 0.3158900E+00, 0.3639452E+00, &
     & 0.4022600E+00, 0.5275354E+00, 0.6516535E+00, 0.6516535E+00 /
      data (ref_adm(13,iz,11,17),iz = 1,20) / &
     & 0.1290700E+00, 0.1290700E+00, 0.1222000E+00, 0.1486200E+00, &
     & 0.1604300E+00, 0.1128500E+00, 0.1689900E+00, 0.1728196E+00, &
     & 0.1820328E+00, 0.2192500E+00, 0.2206700E+00, 0.2587300E+00, &
     & 0.2943600E+00, 0.3556000E+00, 0.2779100E+00, 0.3543509E+00, &
     & 0.3927800E+00, 0.4983377E+00, 0.5993448E+00, 0.5993448E+00 /
      data (ref_adm(13,iz,12,17),iz = 1,20) / &
     & 0.1423100E+00, 0.1423100E+00, 0.1287600E+00, 0.1419400E+00, &
     & 0.1506200E+00, 0.1597364E+00, 0.3115700E+00, 0.1721301E+00, &
     & 0.1809182E+00, 0.2220300E+00, 0.1931900E+00, 0.2242108E+00, &
     & 0.2964700E+00, 0.2820300E+00, 0.2795100E+00, 0.3463158E+00, &
     & 0.3990024E+00, 0.4782540E+00, 0.5647513E+00, 0.5647513E+00 /
      data (ref_adm(13,iz,13,17),iz = 1,20) / &
     & 0.1403000E+00, 0.1403000E+00, 0.1470000E+00, 0.1512600E+00, &
     & 0.1504800E+00, 0.1471900E+00, 0.1424400E+00, 0.1838500E+00, &
     & 0.1799934E+00, 0.1863800E+00, 0.1864600E+00, 0.1981100E+00, &
     & 0.2440325E+00, 0.2761200E+00, 0.2762000E+00, 0.3395548E+00, &
     & 0.3895336E+00, 0.4631220E+00, 0.5399982E+00, 0.5399982E+00 /
      data (ref_adm(13,iz,14,17),iz = 1,20) / &
     & 0.2139200E+00, 0.2139200E+00, 0.2106700E+00, 0.1448200E+00, &
     & 0.1539000E+00, 0.1429800E+00, 0.1741800E+00, 0.1812900E+00, &
     & 0.1590000E+00, 0.2557500E+00, 0.2016400E+00, 0.2332200E+00, &
     & 0.2155100E+00, 0.2609607E+00, 0.2354700E+00, 0.3329453E+00, &
     & 0.3813480E+00, 0.4518798E+00, 0.5218857E+00, 0.5218857E+00 /
      data (ref_adm(13,iz,15,17),iz = 1,20) / &
     & 0.1446900E+00, 0.1446900E+00, 0.1420100E+00, 0.1444700E+00, &
     & 0.1533800E+00, 0.1529800E+00, 0.1579100E+00, 0.1585200E+00, &
     & 0.1697800E+00, 0.1888800E+00, 0.2137800E+00, 0.1949100E+00, &
     & 0.2339300E+00, 0.2547300E+00, 0.2752900E+00, 0.3257444E+00, &
     & 0.3729216E+00, 0.4416311E+00, 0.5067913E+00, 0.5067913E+00 /
      data (ref_adm(13,iz,16,17),iz = 1,20) / &
     & 0.1604300E+00, 0.1604300E+00, 0.1964800E+00, 0.1436900E+00, &
     & 0.1392300E+00, 0.1430600E+00, 0.1554800E+00, 0.1576700E+00, &
     & 0.1556300E+00, 0.1755000E+00, 0.1874900E+00, 0.2108300E+00, &
     & 0.2267700E+00, 0.2362400E+00, 0.2369200E+00, 0.2664100E+00, &
     & 0.3640450E+00, 0.4295196E+00, 0.4914370E+00, 0.4914370E+00 /
      data (ref_adm(13,iz,17,17),iz = 1,20) / &
     & 0.1428500E+00, 0.1428500E+00, 0.1287400E+00, 0.1330200E+00, &
     & 0.1434800E+00, 0.1530600E+00, 0.1542900E+00, 0.1582400E+00, &
     & 0.1764200E+00, 0.1859700E+00, 0.1918600E+00, 0.2135385E+00, &
     & 0.2240600E+00, 0.1901300E+00, 0.2769436E+00, 0.3138805E+00, &
     & 0.3567099E+00, 0.4186770E+00, 0.4748179E+00, 0.4748179E+00 /
      data (ref_adm(13,iz,18,17),iz = 1,20) / &
     & 0.1398700E+00, 0.1398700E+00, 0.1280300E+00, 0.1414800E+00, &
     & 0.1519000E+00, 0.1465600E+00, 0.1472000E+00, 0.1749400E+00, &
     & 0.1785600E+00, 0.1802000E+00, 0.1929400E+00, 0.1884100E+00, &
     & 0.2065200E+00, 0.2390898E+00, 0.2611360E+00, 0.2914492E+00, &
     & 0.3256595E+00, 0.3730926E+00, 0.4103427E+00, 0.4103427E+00 /
      data (ref_adm(13,iz,19,17),iz = 1,20) / &
     & 0.1386600E+00, 0.1386600E+00, 0.1469900E+00, 0.1673100E+00, &
     & 0.1448900E+00, 0.1533800E+00, 0.1519400E+00, 0.1717800E+00, &
     & 0.1669000E+00, 0.1759000E+00, 0.2167800E+00, 0.2132300E+00, &
     & 0.2207100E+00, 0.2386923E+00, 0.2601488E+00, 0.2896242E+00, &
     & 0.3225914E+00, 0.3672616E+00, 0.4010436E+00, 0.4010436E+00 /
      data (ref_adm(13,iz,20,17),iz = 1,20) / &
     & 0.1516200E+00, 0.1516200E+00, 0.1679200E+00, 0.1619400E+00, &
     & 0.1551500E+00, 0.1582200E+00, 0.1411400E+00, 0.1365200E+00, &
     & 0.1784432E+00, 0.1800900E+00, 0.1950330E+00, 0.2084548E+00, &
     & 0.2259400E+00, 0.2096300E+00, 0.2600626E+00, 0.2887706E+00, &
     & 0.3209081E+00, 0.3638993E+00, 0.3956994E+00, 0.3956994E+00 /
      data (ref_adm(13,iz,21,17),iz = 1,20) / &
     & 0.1654600E+00, 0.1654600E+00, 0.2438800E+00, 0.1841300E+00, &
     & 0.1414900E+00, 0.1556300E+00, 0.1523900E+00, 0.1766900E+00, &
     & 0.1711900E+00, 0.2376600E+00, 0.2826000E+00, 0.2630200E+00, &
     & 0.2147100E+00, 0.2364100E+00, 0.2825700E+00, 0.2890266E+00, &
     & 0.3202467E+00, 0.3615058E+00, 0.3923249E+00, 0.3923249E+00 /
      data (ref_adm(13,iz,22,17),iz = 1,20) / &
     & 0.1426100E+00, 0.1426100E+00, 0.3157400E+00, 0.1570573E+00, &
     & 0.1583800E+00, 0.1576200E+00, 0.1536100E+00, 0.1711400E+00, &
     & 0.1892600E+00, 0.2041100E+00, 0.1747500E+00, 0.1759200E+00, &
     & 0.2437854E+00, 0.2667100E+00, 0.2882800E+00, 0.3305573E+00, &
     & 0.3767141E+00, 0.4433337E+00, 0.5152207E+00, 0.5152207E+00 /
      data (ref_adm(13,iz,23,17),iz = 1,20) / &
     & 0.1529900E+00, 0.1529900E+00, 0.1496000E+00, 0.1498600E+00, &
     & 0.1506400E+00, 0.1721900E+00, 0.1731500E+00, 0.1870600E+00, &
     & 0.1941900E+00, 0.1769000E+00, 0.2006100E+00, 0.2306300E+00, &
     & 0.2459100E+00, 0.2384200E+00, 0.2886300E+00, 0.3327718E+00, &
     & 0.3785001E+00, 0.4436517E+00, 0.5161840E+00, 0.5161840E+00 /
      data (ref_adm(13,iz,24,17),iz = 1,20) / &
     & 0.1393400E+00, 0.1393400E+00, 0.1571100E+00, 0.1483900E+00, &
     & 0.1538700E+00, 0.1557300E+00, 0.1637200E+00, 0.1767400E+00, &
     & 0.1825100E+00, 0.1943100E+00, 0.2273900E+00, 0.2252600E+00, &
     & 0.2436500E+00, 0.2534400E+00, 0.2918200E+00, 0.3058700E+00, &
     & 0.3821581E+00, 0.4471946E+00, 0.5218742E+00, 0.5218742E+00 /
      data (ref_adm(13,iz,25,17),iz = 1,20) / &
     & 0.1682900E+00, 0.1682900E+00, 0.1740700E+00, 0.1678300E+00, &
     & 0.1386300E+00, 0.1465900E+00, 0.1568900E+00, 0.1522600E+00, &
     & 0.1730800E+00, 0.1867400E+00, 0.2092100E+00, 0.2083300E+00, &
     & 0.2378500E+00, 0.2520900E+00, 0.3040600E+00, 0.3419187E+00, &
     & 0.3881570E+00, 0.4529743E+00, 0.5303879E+00, 0.5303879E+00 /
      data (ref_adm(13,iz,26,17),iz = 1,20) / &
     & 0.1452300E+00, 0.1452300E+00, 0.1600600E+00, 0.1399000E+00, &
     & 0.1562300E+00, 0.1488900E+00, 0.1951900E+00, 0.1936300E+00, &
     & 0.1927892E+00, 0.1946500E+00, 0.2223600E+00, 0.2359158E+00, &
     & 0.2581797E+00, 0.2967600E+00, 0.3085493E+00, 0.3497168E+00, &
     & 0.4843900E+00, 0.4628639E+00, 0.5451543E+00, 0.5451543E+00 /
      data (ref_adm(13,iz,27,17),iz = 1,20) / &
     & 0.1396100E+00, 0.1396100E+00, 0.1830400E+00, 0.1686000E+00, &
     & 0.1335100E+00, 0.1709100E+00, 0.1772700E+00, 0.1889300E+00, &
     & 0.1945300E+00, 0.2072105E+00, 0.2208344E+00, 0.2406345E+00, &
     & 0.2796500E+00, 0.2852492E+00, 0.3160097E+00, 0.3583870E+00, &
     & 0.4071538E+00, 0.4754107E+00, 0.5639313E+00, 0.5639313E+00 /
      data (ref_adm(13,iz,28,17),iz = 1,20) / &
     & 0.1426300E+00, 0.1426300E+00, 0.1222700E+00, 0.1571300E+00, &
     & 0.1459900E+00, 0.1355800E+00, 0.1612100E+00, 0.1961000E+00, &
     & 0.1992900E+00, 0.5928600E+00, 0.2250170E+00, 0.2203000E+00, &
     & 0.2860300E+00, 0.3046800E+00, 0.3247523E+00, 0.3689108E+00, &
     & 0.4191803E+00, 0.4894972E+00, 0.5840869E+00, 0.5840869E+00 /
      data (ref_adm(13,iz,29,17),iz = 1,20) / &
     & 0.1242200E+00, 0.1242200E+00, 0.1561872E+00, 0.1766100E+00, &
     & 0.1600600E+00, 0.3169300E+00, 0.1507500E+00, 0.1769300E+00, &
     & 0.2012007E+00, 0.1924500E+00, 0.2356500E+00, 0.2518177E+00, &
     & 0.2645700E+00, 0.3067100E+00, 0.3344151E+00, 0.3803333E+00, &
     & 0.4327531E+00, 0.5062091E+00, 0.6076867E+00, 0.6076867E+00 /
      data (ref_adm(13,iz,30,17),iz = 1,20) / &
     & 0.1322900E+00, 0.1322900E+00, 0.1470300E+00, 0.1633200E+00, &
     & 0.1658418E+00, 0.1634300E+00, 0.1678900E+00, 0.1635000E+00, &
     & 0.1882300E+00, 0.2235500E+00, 0.2498300E+00, 0.2579024E+00, &
     & 0.2883200E+00, 0.3189200E+00, 0.3450529E+00, 0.3932741E+00, &
     & 0.4480471E+00, 0.5247956E+00, 0.6325873E+00, 0.6325873E+00 /
      data (ref_adm(13,iz,31,17),iz = 1,20) / &
     & 0.1230400E+00, 0.1230400E+00, 0.1723000E+00, 0.1639900E+00, &
     & 0.1244900E+00, 0.1740847E+00, 0.1833624E+00, 0.1933400E+00, &
     & 0.1912100E+00, 0.1935500E+00, 0.2500200E+00, 0.2559500E+00, &
     & 0.2818300E+00, 0.3186908E+00, 0.3556547E+00, 0.4058868E+00, &
     & 0.4632400E+00, 0.5442853E+00, 0.6592295E+00, 0.6592295E+00 /
      data (ref_adm(13,iz,32,17),iz = 1,20) / &
     & 0.1603800E+00, 0.1603800E+00, 0.1284600E+00, 0.1581400E+00, &
     & 0.1600600E+00, 0.1452500E+00, 0.1820300E+00, 0.1963836E+00, &
     & 0.2338300E+00, 0.2407800E+00, 0.2244400E+00, 0.2838100E+00, &
     & 0.3000757E+00, 0.2841900E+00, 0.3656831E+00, 0.4181277E+00, &
     & 0.4782023E+00, 0.5633309E+00, 0.6842176E+00, 0.6842176E+00 /
      data (ref_adm(13,iz,33,17),iz = 1,20) / &
     & 0.1473100E+00, 0.1473100E+00, 0.1566800E+00, 0.1477600E+00, &
     & 0.1282500E+00, 0.1443600E+00, 0.1387100E+00, 0.2232600E+00, &
     & 0.2125849E+00, 0.2291291E+00, 0.2480748E+00, 0.2754478E+00, &
     & 0.3061188E+00, 0.3332798E+00, 0.3715721E+00, 0.4246325E+00, &
     & 0.4867744E+00, 0.5774207E+00, 0.7077833E+00, 0.7077833E+00 /
      data (ref_adm(13,iz,34,17),iz = 1,20) / &
     & 0.1346100E+00, 0.1346100E+00, 0.1581700E+00, 0.1642600E+00, &
     & 0.1640300E+00, 0.1753700E+00, 0.1879900E+00, 0.1990200E+00, &
     & 0.2147942E+00, 0.2320358E+00, 0.2516914E+00, 0.2793409E+00, &
     & 0.3092979E+00, 0.3359413E+00, 0.3740592E+00, 0.5158600E+00, &
     & 0.4889237E+00, 0.5802830E+00, 0.7199717E+00, 0.7199717E+00 /
      data (ref_adm(13,iz,35,17),iz = 1,20) / &
     & 0.1538080E+00, 0.1538080E+00, 0.1563100E+00, 0.1619069E+00, &
     & 0.1753600E+00, 0.1754900E+00, 0.1827100E+00, 0.2012505E+00, &
     & 0.2166214E+00, 0.2615700E+00, 0.2823100E+00, 0.3218200E+00, &
     & 0.3157300E+00, 0.4459000E+00, 0.4660500E+00, 0.4866300E+00, &
     & 0.4937375E+00, 0.5815551E+00, 0.7231950E+00, 0.7231950E+00 /
      data (ref_adm(13,iz,36,17),iz = 1,20) / &
     & 0.1445400E+00, 0.1445400E+00, 0.1410000E+00, 0.1631500E+00, &
     & 0.1783500E+00, 0.1746900E+00, 0.1888326E+00, 0.2058800E+00, &
     & 0.1873900E+00, 0.2649700E+00, 0.2748900E+00, 0.2889100E+00, &
     & 0.2950200E+00, 0.3412523E+00, 0.3832194E+00, 0.4793800E+00, &
     & 0.5012795E+00, 0.5864413E+00, 0.7247828E+00, 0.7247828E+00 /
      data (ref_adm(13,iz,37,17),iz = 1,20) / &
     & 0.1583500E+00, 0.1583500E+00, 0.1547600E+00, 0.1551000E+00, &
     & 0.1567400E+00, 0.1880900E+00, 0.2021400E+00, 0.2026707E+00, &
     & 0.2185512E+00, 0.2368642E+00, 0.2570534E+00, 0.3002800E+00, &
     & 0.3023800E+00, 0.3435883E+00, 0.3904871E+00, 0.4558333E+00, &
     & 0.5147232E+00, 0.5914905E+00, 0.7265202E+00, 0.7265202E+00 /
      data (ref_adm(13,iz,38,17),iz = 1,20) / &
     & 0.1583500E+00, 0.1583500E+00, 0.1547600E+00, 0.1551000E+00, &
     & 0.1567400E+00, 0.1880900E+00, 0.2021400E+00, 0.2026707E+00, &
     & 0.2185512E+00, 0.2368642E+00, 0.2570534E+00, 0.3002800E+00, &
     & 0.3023800E+00, 0.3435883E+00, 0.3904871E+00, 0.4558333E+00, &
     & 0.5147232E+00, 0.5914905E+00, 0.7265202E+00, 0.7265202E+00 /
! Solar Zenith Angle 85.0 Albedo  0.2950877E+00
      data (ref_adm(13,iz, 1,18),iz = 1,20) / &
     & 0.2422220E+00, 0.2422220E+00, 0.2378874E+00, 0.2363859E+00, &
     & 0.2351991E+00, 0.2343873E+00, 0.2329566E+00, 0.2305192E+00, &
     & 0.2273885E+00, 0.2236396E+00, 0.2195623E+00, 0.2139015E+00, &
     & 0.2072943E+00, 0.2010725E+00, 0.1921376E+00, 0.1803714E+00, &
     & 0.1682325E+00, 0.1523499E+00, 0.1243057E+00, 0.1243057E+00 /
      data (ref_adm(13,iz, 2,18),iz = 1,20) / &
     & 0.2422220E+00, 0.2422220E+00, 0.2378874E+00, 0.2363859E+00, &
     & 0.2351991E+00, 0.2343873E+00, 0.2329566E+00, 0.2305192E+00, &
     & 0.2273885E+00, 0.2236396E+00, 0.2195623E+00, 0.2139015E+00, &
     & 0.2072943E+00, 0.2010725E+00, 0.1921376E+00, 0.1803714E+00, &
     & 0.1682325E+00, 0.1523499E+00, 0.1243057E+00, 0.1243057E+00 /
      data (ref_adm(13,iz, 3,18),iz = 1,20) / &
     & 0.2422220E+00, 0.2422220E+00, 0.2378874E+00, 0.2363859E+00, &
     & 0.2351991E+00, 0.2343873E+00, 0.2329566E+00, 0.2305192E+00, &
     & 0.2273885E+00, 0.2236396E+00, 0.2195622E+00, 0.2139015E+00, &
     & 0.2072943E+00, 0.2010725E+00, 0.1921376E+00, 0.1803714E+00, &
     & 0.1682325E+00, 0.1523499E+00, 0.1243057E+00, 0.1243057E+00 /
      data (ref_adm(13,iz, 4,18),iz = 1,20) / &
     & 0.2422220E+00, 0.2422220E+00, 0.2378874E+00, 0.2363859E+00, &
     & 0.2351991E+00, 0.2343873E+00, 0.2329566E+00, 0.2305192E+00, &
     & 0.2273885E+00, 0.2236396E+00, 0.2195623E+00, 0.2139015E+00, &
     & 0.2072943E+00, 0.2010725E+00, 0.1921376E+00, 0.1803714E+00, &
     & 0.1682325E+00, 0.1523499E+00, 0.1243057E+00, 0.1243057E+00 /
      data (ref_adm(13,iz, 5,18),iz = 1,20) / &
     & 0.2422220E+00, 0.2422220E+00, 0.2378874E+00, 0.2363859E+00, &
     & 0.2351991E+00, 0.2343873E+00, 0.2329566E+00, 0.2305192E+00, &
     & 0.2273885E+00, 0.2236396E+00, 0.2195622E+00, 0.2139015E+00, &
     & 0.2072943E+00, 0.2010725E+00, 0.1921376E+00, 0.1803714E+00, &
     & 0.1682325E+00, 0.1523499E+00, 0.1243057E+00, 0.1243057E+00 /
      data (ref_adm(13,iz, 6,18),iz = 1,20) / &
     & 0.2422220E+00, 0.2422220E+00, 0.2378874E+00, 0.2546900E+00, &
     & 0.3604600E+00, 0.2343873E+00, 0.2329566E+00, 0.2305192E+00, &
     & 0.2273885E+00, 0.2236396E+00, 0.2195623E+00, 0.2139015E+00, &
     & 0.2072943E+00, 0.2010725E+00, 0.1921376E+00, 0.1803714E+00, &
     & 0.1682325E+00, 0.1523499E+00, 0.1243057E+00, 0.1243057E+00 /
      data (ref_adm(13,iz, 7,18),iz = 1,20) / &
     & 0.2422220E+00, 0.2422220E+00, 0.2378874E+00, 0.2363859E+00, &
     & 0.2351991E+00, 0.2343873E+00, 0.2329566E+00, 0.2305192E+00, &
     & 0.2273885E+00, 0.2236396E+00, 0.2195622E+00, 0.2139015E+00, &
     & 0.2072943E+00, 0.2010725E+00, 0.1921376E+00, 0.1803714E+00, &
     & 0.1682325E+00, 0.1523499E+00, 0.1243057E+00, 0.1243057E+00 /
      data (ref_adm(13,iz, 8,18),iz = 1,20) / &
     & 0.2422220E+00, 0.2422220E+00, 0.2378874E+00, 0.2363859E+00, &
     & 0.2351991E+00, 0.2343873E+00, 0.2329566E+00, 0.2305192E+00, &
     & 0.2273885E+00, 0.2236396E+00, 0.2195623E+00, 0.2139015E+00, &
     & 0.2072943E+00, 0.2010725E+00, 0.1921376E+00, 0.1803714E+00, &
     & 0.1682325E+00, 0.1523499E+00, 0.1243057E+00, 0.1243057E+00 /
      data (ref_adm(13,iz, 9,18),iz = 1,20) / &
     & 0.2422220E+00, 0.2422220E+00, 0.2378874E+00, 0.2363859E+00, &
     & 0.2351991E+00, 0.2343873E+00, 0.2329566E+00, 0.2305192E+00, &
     & 0.2273885E+00, 0.2236396E+00, 0.2195622E+00, 0.2139015E+00, &
     & 0.2072943E+00, 0.2010725E+00, 0.1921376E+00, 0.1803714E+00, &
     & 0.1682325E+00, 0.1523499E+00, 0.1243057E+00, 0.1243057E+00 /
      data (ref_adm(13,iz,10,18),iz = 1,20) / &
     & 0.2422220E+00, 0.2422220E+00, 0.2378874E+00, 0.2363859E+00, &
     & 0.2351991E+00, 0.2343873E+00, 0.2329566E+00, 0.2305192E+00, &
     & 0.2273885E+00, 0.2236396E+00, 0.2195623E+00, 0.2139015E+00, &
     & 0.2072943E+00, 0.2010725E+00, 0.1921376E+00, 0.1803714E+00, &
     & 0.1682325E+00, 0.1523499E+00, 0.1243057E+00, 0.1243057E+00 /
      data (ref_adm(13,iz,11,18),iz = 1,20) / &
     & 0.2422220E+00, 0.2422220E+00, 0.2378874E+00, 0.2363859E+00, &
     & 0.2351991E+00, 0.2343873E+00, 0.2329566E+00, 0.2305192E+00, &
     & 0.2273885E+00, 0.2236396E+00, 0.2195622E+00, 0.2139015E+00, &
     & 0.2072943E+00, 0.2010725E+00, 0.1921376E+00, 0.1803714E+00, &
     & 0.1682325E+00, 0.1523499E+00, 0.1243057E+00, 0.1243057E+00 /
      data (ref_adm(13,iz,12,18),iz = 1,20) / &
     & 0.2422220E+00, 0.2422220E+00, 0.2378874E+00, 0.2363859E+00, &
     & 0.2351991E+00, 0.2343873E+00, 0.2329566E+00, 0.2305192E+00, &
     & 0.2273885E+00, 0.2236396E+00, 0.2195623E+00, 0.2139015E+00, &
     & 0.2072943E+00, 0.2010725E+00, 0.1921376E+00, 0.1803714E+00, &
     & 0.1682325E+00, 0.1523499E+00, 0.1243057E+00, 0.1243057E+00 /
      data (ref_adm(13,iz,13,18),iz = 1,20) / &
     & 0.2422220E+00, 0.2422220E+00, 0.2378874E+00, 0.2363859E+00, &
     & 0.2351991E+00, 0.2343873E+00, 0.2329566E+00, 0.2305192E+00, &
     & 0.2273885E+00, 0.2236396E+00, 0.2195622E+00, 0.2139015E+00, &
     & 0.2072943E+00, 0.2010725E+00, 0.1921376E+00, 0.1803714E+00, &
     & 0.1682325E+00, 0.1523499E+00, 0.1243057E+00, 0.1243057E+00 /
      data (ref_adm(13,iz,14,18),iz = 1,20) / &
     & 0.2422220E+00, 0.2422220E+00, 0.2378874E+00, 0.2363859E+00, &
     & 0.2351991E+00, 0.2343873E+00, 0.2329566E+00, 0.2305192E+00, &
     & 0.2273885E+00, 0.2236396E+00, 0.2195623E+00, 0.2139015E+00, &
     & 0.2072943E+00, 0.2010725E+00, 0.1921376E+00, 0.1803714E+00, &
     & 0.1682325E+00, 0.1523499E+00, 0.1243057E+00, 0.1243057E+00 /
      data (ref_adm(13,iz,15,18),iz = 1,20) / &
     & 0.2305700E+00, 0.2305700E+00, 0.2454200E+00, 0.1917100E+00, &
     & 0.2074900E+00, 0.2005600E+00, 0.2137300E+00, 0.2167100E+00, &
     & 0.2273885E+00, 0.2236396E+00, 0.2195622E+00, 0.2139015E+00, &
     & 0.2072943E+00, 0.2010725E+00, 0.1921376E+00, 0.1803714E+00, &
     & 0.1682325E+00, 0.1523499E+00, 0.1243057E+00, 0.1243057E+00 /
      data (ref_adm(13,iz,16,18),iz = 1,20) / &
     & 0.2422220E+00, 0.2422220E+00, 0.2378874E+00, 0.2363859E+00, &
     & 0.2351991E+00, 0.2343873E+00, 0.2329566E+00, 0.2305192E+00, &
     & 0.2273885E+00, 0.2236396E+00, 0.2195623E+00, 0.2139015E+00, &
     & 0.2072943E+00, 0.2010725E+00, 0.1921376E+00, 0.1803714E+00, &
     & 0.1682325E+00, 0.1523499E+00, 0.1243057E+00, 0.1243057E+00 /
      data (ref_adm(13,iz,17,18),iz = 1,20) / &
     & 0.2422220E+00, 0.2422220E+00, 0.2378874E+00, 0.2363859E+00, &
     & 0.2351991E+00, 0.2343873E+00, 0.2329566E+00, 0.2305192E+00, &
     & 0.2273885E+00, 0.2236396E+00, 0.2195622E+00, 0.2139015E+00, &
     & 0.2072943E+00, 0.2010725E+00, 0.1921376E+00, 0.1803714E+00, &
     & 0.1682325E+00, 0.1523499E+00, 0.1243057E+00, 0.1243057E+00 /
      data (ref_adm(13,iz,18,18),iz = 1,20) / &
     & 0.2054804E+00, 0.2054804E+00, 0.2066140E+00, 0.2086773E+00, &
     & 0.2119291E+00, 0.2164124E+00, 0.2221388E+00, 0.2293139E+00, &
     & 0.2381111E+00, 0.2486168E+00, 0.2612098E+00, 0.2804345E+00, &
     & 0.3036453E+00, 0.3262354E+00, 0.3594787E+00, 0.4074873E+00, &
     & 0.4655728E+00, 0.5552605E+00, 0.6557550E+00, 0.6557550E+00 /
      data (ref_adm(13,iz,19,18),iz = 1,20) / &
     & 0.2054438E+00, 0.2054438E+00, 0.2066147E+00, 0.2087442E+00, &
     & 0.2120287E+00, 0.2164342E+00, 0.2220717E+00, 0.2290411E+00, &
     & 0.2376493E+00, 0.2479489E+00, 0.2602839E+00, 0.2791850E+00, &
     & 0.3020037E+00, 0.3237363E+00, 0.3560777E+00, 0.4022706E+00, &
     & 0.4580577E+00, 0.5431118E+00, 0.6383327E+00, 0.6383327E+00 /
      data (ref_adm(13,iz,20,18),iz = 1,20) / &
     & 0.2055025E+00, 0.2055025E+00, 0.2066891E+00, 0.2088068E+00, &
     & 0.2121078E+00, 0.2164664E+00, 0.2222051E+00, 0.2292155E+00, &
     & 0.2376873E+00, 0.2478712E+00, 0.2600126E+00, 0.2785636E+00, &
     & 0.3009058E+00, 0.3222966E+00, 0.3538953E+00, 0.3994046E+00, &
     & 0.4536201E+00, 0.5358189E+00, 0.6280524E+00, 0.6280524E+00 /
      data (ref_adm(13,iz,21,18),iz = 1,20) / &
     & 0.2055068E+00, 0.2055068E+00, 0.2067128E+00, 0.2089939E+00, &
     & 0.2122326E+00, 0.2166940E+00, 0.2224134E+00, 0.2293192E+00, &
     & 0.2379515E+00, 0.2480635E+00, 0.2601418E+00, 0.2785955E+00, &
     & 0.3007600E+00, 0.3219331E+00, 0.3530082E+00, 0.3974986E+00, &
     & 0.4507503E+00, 0.5305366E+00, 0.6221228E+00, 0.6221228E+00 /
      data (ref_adm(13,iz,22,18),iz = 1,20) / &
     & 0.2146473E+00, 0.2146473E+00, 0.2162166E+00, 0.2192267E+00, &
     & 0.2238923E+00, 0.2304923E+00, 0.2391656E+00, 0.2498871E+00, &
     & 0.2630797E+00, 0.2788321E+00, 0.2981276E+00, 0.3282126E+00, &
     & 0.3652291E+00, 0.4018046E+00, 0.4578839E+00, 0.5434214E+00, &
     & 0.6552538E+00, 0.8561467E+00, 0.1282157E+01, 0.1282157E+01 /
      data (ref_adm(13,iz,23,18),iz = 1,20) / &
     & 0.2146591E+00, 0.2146591E+00, 0.2159771E+00, 0.2190110E+00, &
     & 0.2238104E+00, 0.2303552E+00, 0.2390334E+00, 0.2498428E+00, &
     & 0.2630398E+00, 0.2791221E+00, 0.2985204E+00, 0.3285576E+00, &
     & 0.3658134E+00, 0.4023961E+00, 0.4584110E+00, 0.5436728E+00, &
     & 0.6545150E+00, 0.8538535E+00, 0.1286693E+01, 0.1286693E+01 /
      data (ref_adm(13,iz,24,18),iz = 1,20) / &
     & 0.2145815E+00, 0.2145815E+00, 0.2122400E+00, 0.1742400E+00, &
     & 0.2023700E+00, 0.1986600E+00, 0.2393139E+00, 0.2502601E+00, &
     & 0.2598900E+00, 0.2982900E+00, 0.2998298E+00, 0.3303849E+00, &
     & 0.3680086E+00, 0.4049248E+00, 0.4615361E+00, 0.5475788E+00, &
     & 0.6593090E+00, 0.8584800E+00, 0.1304361E+01, 0.1304361E+01 /
      data (ref_adm(13,iz,25,18),iz = 1,20) / &
     & 0.2144814E+00, 0.2144814E+00, 0.2158151E+00, 0.2187985E+00, &
     & 0.2238108E+00, 0.2306366E+00, 0.2397299E+00, 0.2510333E+00, &
     & 0.2650584E+00, 0.2817744E+00, 0.3020358E+00, 0.3331589E+00, &
     & 0.3715807E+00, 0.4092158E+00, 0.4667943E+00, 0.5541949E+00, &
     & 0.6675532E+00, 0.8688181E+00, 0.1332205E+01, 0.1332205E+01 /
      data (ref_adm(13,iz,26,18),iz = 1,20) / &
     & 0.2144881E+00, 0.2144881E+00, 0.2156542E+00, 0.2187756E+00, &
     & 0.2239319E+00, 0.2310657E+00, 0.2404372E+00, 0.2523092E+00, &
     & 0.2666667E+00, 0.2840522E+00, 0.3049059E+00, 0.3376068E+00, &
     & 0.3775752E+00, 0.4165008E+00, 0.4759911E+00, 0.5659106E+00, &
     & 0.6822331E+00, 0.8892376E+00, 0.1379247E+01, 0.1379247E+01 /
      data (ref_adm(13,iz,27,18),iz = 1,20) / &
     & 0.2145153E+00, 0.2145153E+00, 0.2155700E+00, 0.2188208E+00, &
     & 0.2241036E+00, 0.2315466E+00, 0.2414829E+00, 0.2537493E+00, &
     & 0.2688509E+00, 0.2870016E+00, 0.3093736E+00, 0.3433654E+00, &
     & 0.3853065E+00, 0.4259185E+00, 0.4878899E+00, 0.5808992E+00, &
     & 0.7012950E+00, 0.9155629E+00, 0.1436422E+01, 0.1436422E+01 /
      data (ref_adm(13,iz,28,18),iz = 1,20) / &
     & 0.2144024E+00, 0.2144024E+00, 0.2155575E+00, 0.2189285E+00, &
     & 0.2244141E+00, 0.2322014E+00, 0.2425219E+00, 0.2554690E+00, &
     & 0.2715183E+00, 0.2909530E+00, 0.3144403E+00, 0.3502760E+00, &
     & 0.3937306E+00, 0.4361736E+00, 0.5006283E+00, 0.5976532E+00, &
     & 0.7228301E+00, 0.9462654E+00, 0.1498803E+01, 0.1498803E+01 /
      data (ref_adm(13,iz,29,18),iz = 1,20) / &
     & 0.2144425E+00, 0.2144425E+00, 0.2156778E+00, 0.2190252E+00, &
     & 0.2246826E+00, 0.2330270E+00, 0.2437637E+00, 0.2576213E+00, &
     & 0.2747542E+00, 0.2953338E+00, 0.3198393E+00, 0.3573459E+00, &
     & 0.4033754E+00, 0.4481815E+00, 0.5157663E+00, 0.6174300E+00, &
     & 0.7484897E+00, 0.9832423E+00, 0.1570587E+01, 0.1570587E+01 /
      data (ref_adm(13,iz,30,18),iz = 1,20) / &
     & 0.2144434E+00, 0.2144434E+00, 0.2155657E+00, 0.2191929E+00, &
     & 0.2251336E+00, 0.2337904E+00, 0.2452235E+00, 0.2600516E+00, &
     & 0.2780315E+00, 0.2996231E+00, 0.3254810E+00, 0.3652760E+00, &
     & 0.4139903E+00, 0.4608231E+00, 0.5322890E+00, 0.6393553E+00, &
     & 0.7776052E+00, 0.1025657E+01, 0.1650074E+01, 0.1650074E+01 /
      data (ref_adm(13,iz,31,18),iz = 1,20) / &
     & 0.2143903E+00, 0.2143903E+00, 0.2155946E+00, 0.1943700E+00, &
     & 0.2160100E+00, 0.2346219E+00, 0.2467330E+00, 0.2623909E+00, &
     & 0.2813743E+00, 0.3041022E+00, 0.3313879E+00, 0.3734587E+00, &
     & 0.4247866E+00, 0.4747004E+00, 0.5502229E+00, 0.6623736E+00, &
     & 0.8076905E+00, 0.1068542E+01, 0.1728418E+01, 0.1728418E+01 /
      data (ref_adm(13,iz,32,18),iz = 1,20) / &
     & 0.2143860E+00, 0.2143860E+00, 0.2155809E+00, 0.2193453E+00, &
     & 0.1909500E+00, 0.2293500E+00, 0.2482621E+00, 0.2645746E+00, &
     & 0.2843780E+00, 0.3082974E+00, 0.3371457E+00, 0.3816591E+00, &
     & 0.4358999E+00, 0.4879768E+00, 0.5667709E+00, 0.6848610E+00, &
     & 0.8369776E+00, 0.1111877E+01, 0.1808176E+01, 0.1808176E+01 /
      data (ref_adm(13,iz,33,18),iz = 1,20) / &
     & 0.2144031E+00, 0.2144031E+00, 0.3029500E+00, 0.2897000E+00, &
     & 0.1948400E+00, 0.2170400E+00, 0.2939900E+00, 0.4656900E+00, &
     & 0.2872476E+00, 0.3123565E+00, 0.3426491E+00, 0.3892911E+00, &
     & 0.4460724E+00, 0.5006226E+00, 0.5820984E+00, 0.7019632E+00, &
     & 0.8544219E+00, 0.1133535E+01, 0.1861033E+01, 0.1861033E+01 /
      data (ref_adm(13,iz,34,18),iz = 1,20) / &
     & 0.3574400E+00, 0.3574400E+00, 0.2155748E+00, 0.2196834E+00, &
     & 0.2266539E+00, 0.1795300E+00, 0.2103800E+00, 0.2683938E+00, &
     & 0.2897399E+00, 0.3158601E+00, 0.3473937E+00, 0.3960206E+00, &
     & 0.4547049E+00, 0.5101995E+00, 0.5899490E+00, 0.7045717E+00, &
     & 0.8535826E+00, 0.1128854E+01, 0.1867613E+01, 0.1867613E+01 /
      data (ref_adm(13,iz,35,18),iz = 1,20) / &
     & 0.2143376E+00, 0.2143376E+00, 0.2156982E+00, 0.2197393E+00, &
     & 0.2269812E+00, 0.1651500E+00, 0.2518402E+00, 0.2698448E+00, &
     & 0.2917670E+00, 0.3187329E+00, 0.3514032E+00, 0.4014343E+00, &
     & 0.4610641E+00, 0.5154931E+00, 0.5914617E+00, 0.7047364E+00, &
     & 0.8567796E+00, 0.1133985E+01, 0.1879128E+01, 0.1879128E+01 /
      data (ref_adm(13,iz,36,18),iz = 1,20) / &
     & 0.2143863E+00, 0.2143863E+00, 0.2156039E+00, 0.2197719E+00, &
     & 0.2270539E+00, 0.2378497E+00, 0.2106200E+00, 0.2707598E+00, &
     & 0.2931680E+00, 0.2633000E+00, 0.3370800E+00, 0.4051838E+00, &
     & 0.4648500E+00, 0.5173054E+00, 0.5921760E+00, 0.7091228E+00, &
     & 0.8672208E+00, 0.1153485E+01, 0.1907183E+01, 0.1907183E+01 /
      data (ref_adm(13,iz,37,18),iz = 1,20) / &
     & 0.2143468E+00, 0.2143468E+00, 0.2155740E+00, 0.2198220E+00, &
     & 0.2272837E+00, 0.2380427E+00, 0.2529257E+00, 0.2712974E+00, &
     & 0.2409700E+00, 0.2978400E+00, 0.3553956E+00, 0.4070559E+00, &
     & 0.4666024E+00, 0.5180764E+00, 0.5930543E+00, 0.7136090E+00, &
     & 0.8878881E+00, 0.1213113E+01, 0.1956792E+01, 0.1956792E+01 /
      data (ref_adm(13,iz,38,18),iz = 1,20) / &
     & 0.2143468E+00, 0.2143468E+00, 0.2155740E+00, 0.2198220E+00, &
     & 0.2272837E+00, 0.2380427E+00, 0.2529257E+00, 0.2712974E+00, &
     & 0.2409700E+00, 0.2978400E+00, 0.3553956E+00, 0.4070559E+00, &
     & 0.4666024E+00, 0.5180764E+00, 0.5930543E+00, 0.7136090E+00, &
     & 0.8878881E+00, 0.1213113E+01, 0.1956792E+01, 0.1956792E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(14,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.5550521E+04
      data (ref_adm(14,iz, 1, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(14,iz, 2, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(14,iz, 3, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605230E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(14,iz, 4, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.3987900E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(14,iz, 5, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605230E+00, 0.4486499E+00, &
     & 0.4260700E+00, 0.4388300E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(14,iz, 6, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(14,iz, 7, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605230E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4175200E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(14,iz, 8, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(14,iz, 9, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605230E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(14,iz,10, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(14,iz,11, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605230E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(14,iz,12, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(14,iz,13, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605230E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(14,iz,14, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(14,iz,15, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605230E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(14,iz,16, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(14,iz,17, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605230E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(14,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.4448015E+04
      data (ref_adm(14,iz, 1, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5449400E+00, &
     & 0.4722900E+00, 0.5188377E+00, 0.5940800E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4775112E+00, 0.4818900E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(14,iz, 2, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5449400E+00, &
     & 0.4722900E+00, 0.5188377E+00, 0.5940800E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4775112E+00, 0.4818900E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(14,iz, 3, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422413E+00, &
     & 0.5405188E+00, 0.5406688E+00, 0.5081000E+00, 0.5022100E+00, &
     & 0.5564600E+00, 0.5328500E+00, 0.5082500E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4775112E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167829E+00, 0.3843662E+00, 0.2680392E+00, 0.2680392E+00 /
      data (ref_adm(14,iz, 4, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188377E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.3659200E+00, 0.4775112E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(14,iz, 5, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422413E+00, &
     & 0.5405188E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.4317300E+00, 0.4223200E+00, 0.3945600E+00, &
     & 0.5139700E+00, 0.4775112E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167829E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(14,iz, 6, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188377E+00, 0.4751000E+00, 0.4592600E+00, &
     & 0.4886369E+00, 0.4775112E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(14,iz, 7, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422413E+00, &
     & 0.5405188E+00, 0.5406688E+00, 0.5385088E+00, 0.4704500E+00, &
     & 0.5265433E+00, 0.5188378E+00, 0.5547600E+00, 0.6056600E+00, &
     & 0.4886369E+00, 0.4325900E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167829E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(14,iz, 8, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5315600E+00, 0.5777600E+00, 0.5562500E+00, &
     & 0.4886369E+00, 0.4525800E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(14,iz, 9, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422413E+00, &
     & 0.5405188E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.6368500E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4775112E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167829E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(14,iz,10, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188377E+00, 0.4668700E+00, 0.4788500E+00, &
     & 0.5369600E+00, 0.5226700E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(14,iz,11, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422413E+00, &
     & 0.5405188E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188378E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4886400E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167829E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(14,iz,12, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188377E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4159500E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(14,iz,13, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422413E+00, &
     & 0.5405188E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188378E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4775112E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167829E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(14,iz,14, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188377E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.5389900E+00, 0.5196000E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(14,iz,15, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422413E+00, &
     & 0.5405188E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188378E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.5325900E+00, 0.5152300E+00, 0.4397078E+00, &
     & 0.4167829E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(14,iz,16, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188377E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4428700E+00, 0.4521000E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(14,iz,17, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422413E+00, &
     & 0.5405188E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188378E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4775112E+00, 0.4321700E+00, 0.4397078E+00, &
     & 0.4167829E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(14,iz,18, 3),iz = 1,20) / &
     & 0.2987390E+00, 0.2987390E+00, 0.2998366E+00, 0.3025214E+00, &
     & 0.3068576E+00, 0.3129562E+00, 0.3209432E+00, 0.3308018E+00, &
     & 0.3425409E+00, 0.3559576E+00, 0.3708281E+00, 0.3907863E+00, &
     & 0.4110438E+00, 0.4264155E+00, 0.4361400E+00, 0.4556682E+00, &
     & 0.4593453E+00, 0.4500630E+00, 0.4263837E+00, 0.4263837E+00 /
      data (ref_adm(14,iz,19, 3),iz = 1,20) / &
     & 0.2988766E+00, 0.2988766E+00, 0.3002329E+00, 0.3029731E+00, &
     & 0.3072269E+00, 0.3130540E+00, 0.3205469E+00, 0.3297646E+00, &
     & 0.3406003E+00, 0.3528923E+00, 0.3664396E+00, 0.3843660E+00, &
     & 0.4023336E+00, 0.4157224E+00, 0.4295564E+00, 0.4401397E+00, &
     & 0.4424806E+00, 0.4339786E+00, 0.4177297E+00, 0.4177297E+00 /
      data (ref_adm(14,iz,20, 3),iz = 1,20) / &
     & 0.2990270E+00, 0.2990270E+00, 0.3007635E+00, 0.3036823E+00, &
     & 0.3079769E+00, 0.3136902E+00, 0.3209122E+00, 0.3296176E+00, &
     & 0.3397800E+00, 0.3512594E+00, 0.3637644E+00, 0.3801849E+00, &
     & 0.3964507E+00, 0.4083865E+00, 0.4205012E+00, 0.4293460E+00, &
     & 0.4309158E+00, 0.4234107E+00, 0.4133912E+00, 0.4133912E+00 /
      data (ref_adm(14,iz,21, 3),iz = 1,20) / &
     & 0.2992071E+00, 0.2992071E+00, 0.3013931E+00, 0.3046421E+00, &
     & 0.3091875E+00, 0.3149734E+00, 0.3220687E+00, 0.3304707E+00, &
     & 0.3401388E+00, 0.3509967E+00, 0.3626835E+00, 0.3779883E+00, &
     & 0.3929769E+00, 0.4038107E+00, 0.4146363E+00, 0.4224349E+00, &
     & 0.4235362E+00, 0.4170500E+00, 0.4124861E+00, 0.4124861E+00 /
      data (ref_adm(14,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(14,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo  0.5189013E+00
      data (ref_adm(14,iz, 1, 4),iz = 1,20) / &
     & 0.5930200E+00, 0.5930200E+00, 0.5469900E+00, 0.6522200E+00, &
     & 0.6856400E+00, 0.5025800E+00, 0.5137000E+00, 0.5385692E+00, &
     & 0.4073800E+00, 0.5177376E+00, 0.5123934E+00, 0.5036141E+00, &
     & 0.4956961E+00, 0.4876378E+00, 0.4747117E+00, 0.4543022E+00, &
     & 0.4286948E+00, 0.3880129E+00, 0.3159428E+00, 0.3159428E+00 /
      data (ref_adm(14,iz, 2, 4),iz = 1,20) / &
     & 0.5930200E+00, 0.5930200E+00, 0.5469900E+00, 0.6522200E+00, &
     & 0.6856400E+00, 0.5025800E+00, 0.5137000E+00, 0.5385692E+00, &
     & 0.4073800E+00, 0.5177376E+00, 0.5123934E+00, 0.5036141E+00, &
     & 0.4956961E+00, 0.4876378E+00, 0.4747117E+00, 0.4543022E+00, &
     & 0.4286948E+00, 0.3880129E+00, 0.3159428E+00, 0.3159428E+00 /
      data (ref_adm(14,iz, 3, 4),iz = 1,20) / &
     & 0.5563800E+00, 0.5563800E+00, 0.4868000E+00, 0.5405400E+00, &
     & 0.5885000E+00, 0.5608800E+00, 0.5722500E+00, 0.5337500E+00, &
     & 0.5236516E+00, 0.5177441E+00, 0.5123602E+00, 0.5038233E+00, &
     & 0.5237100E+00, 0.4873238E+00, 0.4746539E+00, 0.4541701E+00, &
     & 0.4284453E+00, 0.3877755E+00, 0.2087654E+00, 0.2087654E+00 /
      data (ref_adm(14,iz, 4, 4),iz = 1,20) / &
     & 0.5052400E+00, 0.5052400E+00, 0.5127300E+00, 0.5360600E+00, &
     & 0.4185700E+00, 0.5547300E+00, 0.6085500E+00, 0.5049800E+00, &
     & 0.4679400E+00, 0.5177931E+00, 0.4419400E+00, 0.5037769E+00, &
     & 0.4956089E+00, 0.4873440E+00, 0.4745592E+00, 0.4540435E+00, &
     & 0.4282779E+00, 0.3875540E+00, 0.3156804E+00, 0.3156804E+00 /
      data (ref_adm(14,iz, 5, 4),iz = 1,20) / &
     & 0.5723000E+00, 0.5723000E+00, 0.5468909E+00, 0.5367300E+00, &
     & 0.5437300E+00, 0.5465100E+00, 0.5315200E+00, 0.5142500E+00, &
     & 0.5238453E+00, 0.5177968E+00, 0.3890800E+00, 0.5038254E+00, &
     & 0.4954155E+00, 0.5416000E+00, 0.4742891E+00, 0.4538660E+00, &
     & 0.4280439E+00, 0.3871926E+00, 0.3154172E+00, 0.3154172E+00 /
      data (ref_adm(14,iz, 6, 4),iz = 1,20) / &
     & 0.5471525E+00, 0.5471525E+00, 0.4904600E+00, 0.5406100E+00, &
     & 0.5392000E+00, 0.5605500E+00, 0.5899700E+00, 0.6083900E+00, &
     & 0.5242186E+00, 0.4089700E+00, 0.5125120E+00, 0.5037722E+00, &
     & 0.4951872E+00, 0.4869674E+00, 0.4739088E+00, 0.4534087E+00, &
     & 0.4275777E+00, 0.3867238E+00, 0.3151058E+00, 0.3151058E+00 /
      data (ref_adm(14,iz, 7, 4),iz = 1,20) / &
     & 0.5457000E+00, 0.5457000E+00, 0.5408300E+00, 0.5166000E+00, &
     & 0.6140300E+00, 0.6087500E+00, 0.6121700E+00, 0.5456600E+00, &
     & 0.5247949E+00, 0.5178417E+00, 0.5037400E+00, 0.5038359E+00, &
     & 0.4595800E+00, 0.4865900E+00, 0.4736156E+00, 0.4529518E+00, &
     & 0.4270517E+00, 0.3861947E+00, 0.3146686E+00, 0.3146686E+00 /
      data (ref_adm(14,iz, 8, 4),iz = 1,20) / &
     & 0.5000900E+00, 0.5000900E+00, 0.5460600E+00, 0.5709200E+00, &
     & 0.5836500E+00, 0.5492200E+00, 0.5307600E+00, 0.5275800E+00, &
     & 0.5361700E+00, 0.5732000E+00, 0.5289400E+00, 0.4471100E+00, &
     & 0.5371000E+00, 0.5578700E+00, 0.4729955E+00, 0.4521660E+00, &
     & 0.4262984E+00, 0.3854245E+00, 0.3142223E+00, 0.3142223E+00 /
      data (ref_adm(14,iz, 9, 4),iz = 1,20) / &
     & 0.5198900E+00, 0.5198900E+00, 0.3957000E+00, 0.7851800E+00, &
     & 0.4960200E+00, 0.5262900E+00, 0.5281500E+00, 0.5488400E+00, &
     & 0.5371700E+00, 0.5537100E+00, 0.5326600E+00, 0.4832800E+00, &
     & 0.4943394E+00, 0.4820600E+00, 0.4745800E+00, 0.4514772E+00, &
     & 0.4257470E+00, 0.3847102E+00, 0.3136711E+00, 0.3136711E+00 /
      data (ref_adm(14,iz,10, 4),iz = 1,20) / &
     & 0.5001000E+00, 0.5001000E+00, 0.5465468E+00, 0.5496675E+00, &
     & 0.5516185E+00, 0.5170800E+00, 0.5519311E+00, 0.5237400E+00, &
     & 0.5099400E+00, 0.5493100E+00, 0.5476000E+00, 0.4918500E+00, &
     & 0.5456500E+00, 0.5272000E+00, 0.4717261E+00, 0.4508501E+00, &
     & 0.4248846E+00, 0.3839814E+00, 0.3130946E+00, 0.3130946E+00 /
      data (ref_adm(14,iz,11, 4),iz = 1,20) / &
     & 0.5475235E+00, 0.5475235E+00, 0.5464556E+00, 0.5494627E+00, &
     & 0.5514527E+00, 0.5492875E+00, 0.7524000E+00, 0.6507700E+00, &
     & 0.5798100E+00, 0.5184709E+00, 0.5169500E+00, 0.5226600E+00, &
     & 0.5027600E+00, 0.4889900E+00, 0.4712568E+00, 0.4502696E+00, &
     & 0.4241607E+00, 0.3832119E+00, 0.3125221E+00, 0.3125221E+00 /
      data (ref_adm(14,iz,12, 4),iz = 1,20) / &
     & 0.5474820E+00, 0.5474820E+00, 0.5463498E+00, 0.5491859E+00, &
     & 0.5515593E+00, 0.5497929E+00, 0.5496455E+00, 0.4833500E+00, &
     & 0.5693300E+00, 0.5992400E+00, 0.5022600E+00, 0.4846700E+00, &
     & 0.4444600E+00, 0.4619600E+00, 0.4704857E+00, 0.4493438E+00, &
     & 0.4232666E+00, 0.3823613E+00, 0.3118869E+00, 0.3118869E+00 /
      data (ref_adm(14,iz,13, 4),iz = 1,20) / &
     & 0.5475609E+00, 0.5475609E+00, 0.5462341E+00, 0.5489845E+00, &
     & 0.5515862E+00, 0.5502712E+00, 0.5486803E+00, 0.5541393E+00, &
     & 0.5324892E+00, 0.6551500E+00, 0.5413700E+00, 0.5042931E+00, &
     & 0.4933313E+00, 0.4234500E+00, 0.4697607E+00, 0.4485643E+00, &
     & 0.4222570E+00, 0.3815564E+00, 0.3112840E+00, 0.3112840E+00 /
      data (ref_adm(14,iz,14, 4),iz = 1,20) / &
     & 0.5475913E+00, 0.5475913E+00, 0.5463487E+00, 0.5487491E+00, &
     & 0.5515428E+00, 0.4917400E+00, 0.5482321E+00, 0.5592600E+00, &
     & 0.5228500E+00, 0.5199200E+00, 0.5222500E+00, 0.5221700E+00, &
     & 0.5109000E+00, 0.4244300E+00, 0.4218000E+00, 0.4477294E+00, &
     & 0.4214000E+00, 0.3806478E+00, 0.3106699E+00, 0.3106699E+00 /
      data (ref_adm(14,iz,15, 4),iz = 1,20) / &
     & 0.5475542E+00, 0.5475542E+00, 0.5462874E+00, 0.5483659E+00, &
     & 0.5513879E+00, 0.5510141E+00, 0.5478259E+00, 0.4748200E+00, &
     & 0.5284200E+00, 0.5635200E+00, 0.5270100E+00, 0.4739900E+00, &
     & 0.4931153E+00, 0.4831942E+00, 0.4685560E+00, 0.4469245E+00, &
     & 0.4204801E+00, 0.3798220E+00, 0.3101166E+00, 0.3101166E+00 /
      data (ref_adm(14,iz,16, 4),iz = 1,20) / &
     & 0.5477098E+00, 0.5477098E+00, 0.5464472E+00, 0.5477690E+00, &
     & 0.5331100E+00, 0.5512006E+00, 0.5481321E+00, 0.5530335E+00, &
     & 0.5425188E+00, 0.5225813E+00, 0.5138112E+00, 0.5050806E+00, &
     & 0.4931379E+00, 0.4566500E+00, 0.4680007E+00, 0.4461139E+00, &
     & 0.4195606E+00, 0.3789881E+00, 0.3095970E+00, 0.3095970E+00 /
      data (ref_adm(14,iz,17, 4),iz = 1,20) / &
     & 0.5477158E+00, 0.5477158E+00, 0.5297300E+00, 0.5325900E+00, &
     & 0.5279600E+00, 0.5873300E+00, 0.5484068E+00, 0.5512903E+00, &
     & 0.5463167E+00, 0.5243445E+00, 0.5141789E+00, 0.5053542E+00, &
     & 0.4933658E+00, 0.4823718E+00, 0.4674087E+00, 0.4452220E+00, &
     & 0.4187714E+00, 0.3781355E+00, 0.3091367E+00, 0.3091367E+00 /
      data (ref_adm(14,iz,18, 4),iz = 1,20) / &
     & 0.5419955E+00, 0.5419955E+00, 0.5360469E+00, 0.5367500E+00, &
     & 0.5411600E+00, 0.6019500E+00, 0.5362385E+00, 0.5290898E+00, &
     & 0.5216197E+00, 0.5144680E+00, 0.5080696E+00, 0.5012813E+00, &
     & 0.4933343E+00, 0.4871179E+00, 0.4532600E+00, 0.4638581E+00, &
     & 0.4859300E+00, 0.4100356E+00, 0.3305425E+00, 0.3305425E+00 /
      data (ref_adm(14,iz,19, 4),iz = 1,20) / &
     & 0.5423709E+00, 0.5423709E+00, 0.5365926E+00, 0.5342160E+00, &
     & 0.4616300E+00, 0.5483400E+00, 0.5371960E+00, 0.5296957E+00, &
     & 0.5216998E+00, 0.5147610E+00, 0.5084286E+00, 0.4447800E+00, &
     & 0.4931818E+00, 0.4491800E+00, 0.4147800E+00, 0.4948100E+00, &
     & 0.4838600E+00, 0.4095625E+00, 0.3302289E+00, 0.3302289E+00 /
      data (ref_adm(14,iz,20, 4),iz = 1,20) / &
     & 0.5428099E+00, 0.5428099E+00, 0.5363916E+00, 0.5337950E+00, &
     & 0.5214400E+00, 0.5436100E+00, 0.5373862E+00, 0.5299929E+00, &
     & 0.5226351E+00, 0.5151010E+00, 0.5085164E+00, 0.5010431E+00, &
     & 0.4930237E+00, 0.4861296E+00, 0.4253000E+00, 0.4628329E+00, &
     & 0.4438991E+00, 0.4086959E+00, 0.3298850E+00, 0.3298850E+00 /
      data (ref_adm(14,iz,21, 4),iz = 1,20) / &
     & 0.5427460E+00, 0.5427460E+00, 0.5366275E+00, 0.5339406E+00, &
     & 0.5345777E+00, 0.4631700E+00, 0.4836000E+00, 0.5303496E+00, &
     & 0.5231439E+00, 0.5377000E+00, 0.5088131E+00, 0.4774300E+00, &
     & 0.4927787E+00, 0.4232100E+00, 0.4042300E+00, 0.4621844E+00, &
     & 0.4434300E+00, 0.4079882E+00, 0.3296444E+00, 0.3296444E+00 /
      data (ref_adm(14,iz,22, 4),iz = 1,20) / &
     & 0.5487490E+00, 0.5487490E+00, 0.5493711E+00, 0.5521761E+00, &
     & 0.5556300E+00, 0.5370400E+00, 0.5540959E+00, 0.5206300E+00, &
     & 0.5458370E+00, 0.5213400E+00, 0.5383678E+00, 0.5339481E+00, &
     & 0.5288323E+00, 0.6641100E+00, 0.6169900E+00, 0.4980428E+00, &
     & 0.4751498E+00, 0.4356326E+00, 0.3536094E+00, 0.3536094E+00 /
      data (ref_adm(14,iz,23, 4),iz = 1,20) / &
     & 0.5486221E+00, 0.5486221E+00, 0.5485655E+00, 0.5504228E+00, &
     & 0.5546122E+00, 0.5764200E+00, 0.5533500E+00, 0.5519264E+00, &
     & 0.5158100E+00, 0.5012700E+00, 0.5390869E+00, 0.5336393E+00, &
     & 0.5283033E+00, 0.5216327E+00, 0.5113926E+00, 0.4951056E+00, &
     & 0.4721653E+00, 0.4328305E+00, 0.3524744E+00, 0.3524744E+00 /
      data (ref_adm(14,iz,24, 4),iz = 1,20) / &
     & 0.5012800E+00, 0.5012800E+00, 0.5460600E+00, 0.5484961E+00, &
     & 0.5521360E+00, 0.5564503E+00, 0.6014000E+00, 0.5797100E+00, &
     & 0.4350700E+00, 0.5212600E+00, 0.5400236E+00, 0.5339889E+00, &
     & 0.5278136E+00, 0.5208690E+00, 0.5097368E+00, 0.4925471E+00, &
     & 0.4696676E+00, 0.4301873E+00, 0.3514055E+00, 0.3514055E+00 /
      data (ref_adm(14,iz,25, 4),iz = 1,20) / &
     & 0.5479831E+00, 0.5479831E+00, 0.5460492E+00, 0.5465954E+00, &
     & 0.5498339E+00, 0.5877500E+00, 0.6121500E+00, 0.5560955E+00, &
     & 0.5516075E+00, 0.5466857E+00, 0.5409872E+00, 0.5345336E+00, &
     & 0.5272886E+00, 0.5205296E+00, 0.5082058E+00, 0.4904897E+00, &
     & 0.4674624E+00, 0.4275597E+00, 0.3508092E+00, 0.3508092E+00 /
      data (ref_adm(14,iz,26, 4),iz = 1,20) / &
     & 0.5479519E+00, 0.5479519E+00, 0.5450536E+00, 0.5451903E+00, &
     & 0.5442600E+00, 0.5490900E+00, 0.6308500E+00, 0.6335600E+00, &
     & 0.5537716E+00, 0.5488291E+00, 0.5427512E+00, 0.5353243E+00, &
     & 0.5271528E+00, 0.5201195E+00, 0.5076612E+00, 0.4881730E+00, &
     & 0.4649347E+00, 0.4252376E+00, 0.3501377E+00, 0.3501377E+00 /
      data (ref_adm(14,iz,27, 4),iz = 1,20) / &
     & 0.5474525E+00, 0.5474525E+00, 0.5448092E+00, 0.5447887E+00, &
     & 0.5565400E+00, 0.5270900E+00, 0.5575300E+00, 0.5587974E+00, &
     & 0.5559535E+00, 0.5505868E+00, 0.5445067E+00, 0.5365168E+00, &
     & 0.5273327E+00, 0.5195522E+00, 0.5070606E+00, 0.4867514E+00, &
     & 0.4627140E+00, 0.4233325E+00, 0.3496383E+00, 0.3496383E+00 /
      data (ref_adm(14,iz,28, 4),iz = 1,20) / &
     & 0.5345200E+00, 0.5345200E+00, 0.5437000E+00, 0.5445800E+00, &
     & 0.4844800E+00, 0.5467742E+00, 0.4226400E+00, 0.5579177E+00, &
     & 0.5581669E+00, 0.5525772E+00, 0.5466284E+00, 0.5371802E+00, &
     & 0.5279292E+00, 0.5193554E+00, 0.5068948E+00, 0.4858760E+00, &
     & 0.4610355E+00, 0.4218905E+00, 0.3491235E+00, 0.3491235E+00 /
      data (ref_adm(14,iz,29, 4),iz = 1,20) / &
     & 0.5469108E+00, 0.5469108E+00, 0.5500200E+00, 0.5442722E+00, &
     & 0.5439374E+00, 0.4786700E+00, 0.5491406E+00, 0.5559601E+00, &
     & 0.5592794E+00, 0.5547536E+00, 0.5485095E+00, 0.5383556E+00, &
     & 0.5287877E+00, 0.5193889E+00, 0.5062788E+00, 0.4849845E+00, &
     & 0.4596649E+00, 0.4203233E+00, 0.3488700E+00, 0.3488700E+00 /
      data (ref_adm(14,iz,30, 4),iz = 1,20) / &
     & 0.5267100E+00, 0.5267100E+00, 0.5435163E+00, 0.5441866E+00, &
     & 0.5447716E+00, 0.5448763E+00, 0.5468783E+00, 0.5532115E+00, &
     & 0.5585362E+00, 0.5567392E+00, 0.5500100E+00, 0.5404308E+00, &
     & 0.5297499E+00, 0.5201041E+00, 0.5063964E+00, 0.4847191E+00, &
     & 0.4586019E+00, 0.4190997E+00, 0.3486789E+00, 0.3486789E+00 /
      data (ref_adm(14,iz,31, 4),iz = 1,20) / &
     & 0.5468860E+00, 0.5468860E+00, 0.5436988E+00, 0.5448934E+00, &
     & 0.5455540E+00, 0.5451937E+00, 0.5457483E+00, 0.5505668E+00, &
     & 0.5574076E+00, 0.5584130E+00, 0.5513999E+00, 0.5420443E+00, &
     & 0.5305088E+00, 0.5209198E+00, 0.5060452E+00, 0.4845245E+00, &
     & 0.4580101E+00, 0.4177917E+00, 0.3486893E+00, 0.3486893E+00 /
      data (ref_adm(14,iz,32, 4),iz = 1,20) / &
     & 0.5466123E+00, 0.5466123E+00, 0.5439165E+00, 0.5449796E+00, &
     & 0.5461150E+00, 0.5459093E+00, 0.5454364E+00, 0.5483606E+00, &
     & 0.5552993E+00, 0.5587189E+00, 0.5533223E+00, 0.5434822E+00, &
     & 0.5312733E+00, 0.5213853E+00, 0.5058948E+00, 0.4843905E+00, &
     & 0.4572822E+00, 0.4169929E+00, 0.3488352E+00, 0.3488352E+00 /
      data (ref_adm(14,iz,33, 4),iz = 1,20) / &
     & 0.5467652E+00, 0.5467652E+00, 0.5436209E+00, 0.5457626E+00, &
     & 0.5473814E+00, 0.5469118E+00, 0.5461752E+00, 0.5465124E+00, &
     & 0.5529353E+00, 0.5584824E+00, 0.5548529E+00, 0.5448371E+00, &
     & 0.5326645E+00, 0.5222075E+00, 0.5062948E+00, 0.4845508E+00, &
     & 0.4569279E+00, 0.4164509E+00, 0.3489353E+00, 0.3489353E+00 /
      data (ref_adm(14,iz,34, 4),iz = 1,20) / &
     & 0.5465765E+00, 0.5465765E+00, 0.5443618E+00, 0.5467255E+00, &
     & 0.6003900E+00, 0.5495209E+00, 0.5464953E+00, 0.5461743E+00, &
     & 0.5513510E+00, 0.5577273E+00, 0.5560492E+00, 0.5456887E+00, &
     & 0.5333343E+00, 0.5224414E+00, 0.5063512E+00, 0.4843164E+00, &
     & 0.4565650E+00, 0.4156607E+00, 0.3490457E+00, 0.3490457E+00 /
      data (ref_adm(14,iz,35, 4),iz = 1,20) / &
     & 0.5462964E+00, 0.5462964E+00, 0.5443266E+00, 0.5478545E+00, &
     & 0.5577130E+00, 0.5535942E+00, 0.5471379E+00, 0.5457825E+00, &
     & 0.5494070E+00, 0.5570846E+00, 0.5566854E+00, 0.5466304E+00, &
     & 0.5340832E+00, 0.5229000E+00, 0.5068082E+00, 0.4842134E+00, &
     & 0.4564642E+00, 0.4153992E+00, 0.3491459E+00, 0.3491459E+00 /
      data (ref_adm(14,iz,36, 4),iz = 1,20) / &
     & 0.5300200E+00, 0.5300200E+00, 0.5444708E+00, 0.5487239E+00, &
     & 0.5718242E+00, 0.5633133E+00, 0.5480452E+00, 0.5457216E+00, &
     & 0.5486944E+00, 0.5561230E+00, 0.5573266E+00, 0.5473805E+00, &
     & 0.5345892E+00, 0.5232161E+00, 0.5069337E+00, 0.4843244E+00, &
     & 0.4566248E+00, 0.4153939E+00, 0.3492164E+00, 0.3492164E+00 /
      data (ref_adm(14,iz,37, 4),iz = 1,20) / &
     & 0.5213400E+00, 0.5213400E+00, 0.5560400E+00, 0.5672400E+00, &
     & 0.6127700E+00, 0.5753938E+00, 0.5486901E+00, 0.5456576E+00, &
     & 0.5483541E+00, 0.5556615E+00, 0.5574991E+00, 0.5473525E+00, &
     & 0.5351964E+00, 0.5237082E+00, 0.5072488E+00, 0.4845108E+00, &
     & 0.4563589E+00, 0.4152577E+00, 0.3492323E+00, 0.3492323E+00 /
      data (ref_adm(14,iz,38, 4),iz = 1,20) / &
     & 0.5213400E+00, 0.5213400E+00, 0.5560400E+00, 0.5672400E+00, &
     & 0.6127700E+00, 0.5753938E+00, 0.5486901E+00, 0.5456576E+00, &
     & 0.5483541E+00, 0.5556615E+00, 0.5574991E+00, 0.5473525E+00, &
     & 0.5351964E+00, 0.5237082E+00, 0.5072488E+00, 0.4845108E+00, &
     & 0.4563589E+00, 0.4152577E+00, 0.3492323E+00, 0.3492323E+00 /
! Solar Zenith Angle 20.0 Albedo  0.5301804E+00
      data (ref_adm(14,iz, 1, 5),iz = 1,20) / &
     & 0.5552900E+00, 0.5552900E+00, 0.5673100E+00, 0.5079600E+00, &
     & 0.5525888E+00, 0.5553613E+00, 0.5448501E+00, 0.4439200E+00, &
     & 0.5335155E+00, 0.5714200E+00, 0.5279733E+00, 0.5255331E+00, &
     & 0.6216000E+00, 0.5185366E+00, 0.5091615E+00, 0.4918883E+00, &
     & 0.4680393E+00, 0.4269145E+00, 0.3413464E+00, 0.3413464E+00 /
      data (ref_adm(14,iz, 2, 5),iz = 1,20) / &
     & 0.5552900E+00, 0.5552900E+00, 0.5673100E+00, 0.5079600E+00, &
     & 0.5525888E+00, 0.5553613E+00, 0.5448501E+00, 0.4439200E+00, &
     & 0.5335155E+00, 0.5714200E+00, 0.5279733E+00, 0.5255331E+00, &
     & 0.6216000E+00, 0.5185366E+00, 0.5091615E+00, 0.4918883E+00, &
     & 0.4680393E+00, 0.4269145E+00, 0.3413464E+00, 0.3413464E+00 /
      data (ref_adm(14,iz, 3, 5),iz = 1,20) / &
     & 0.5110900E+00, 0.5110900E+00, 0.5240700E+00, 0.5122800E+00, &
     & 0.5525689E+00, 0.6137200E+00, 0.5512300E+00, 0.5361966E+00, &
     & 0.5334954E+00, 0.5308603E+00, 0.4701700E+00, 0.5257818E+00, &
     & 0.5224326E+00, 0.5311800E+00, 0.5091830E+00, 0.4789500E+00, &
     & 0.4675622E+00, 0.4265018E+00, 0.2737923E+00, 0.2737923E+00 /
      data (ref_adm(14,iz, 4, 5),iz = 1,20) / &
     & 0.5173300E+00, 0.5173300E+00, 0.5750700E+00, 0.5562677E+00, &
     & 0.5737700E+00, 0.5556858E+00, 0.5727000E+00, 0.4169300E+00, &
     & 0.5391500E+00, 0.5308927E+00, 0.5278926E+00, 0.5253220E+00, &
     & 0.5078100E+00, 0.5181000E+00, 0.5087395E+00, 0.4913967E+00, &
     & 0.4672445E+00, 0.4260719E+00, 0.3408226E+00, 0.3408226E+00 /
      data (ref_adm(14,iz, 5, 5),iz = 1,20) / &
     & 0.5798700E+00, 0.5798700E+00, 0.6128700E+00, 0.5629400E+00, &
     & 0.6343900E+00, 0.6730100E+00, 0.4279800E+00, 0.4659900E+00, &
     & 0.3827600E+00, 0.5307387E+00, 0.6172700E+00, 0.5251887E+00, &
     & 0.5217969E+00, 0.5440700E+00, 0.5082605E+00, 0.5706500E+00, &
     & 0.4664258E+00, 0.4253472E+00, 0.3402976E+00, 0.3402976E+00 /
      data (ref_adm(14,iz, 6, 5),iz = 1,20) / &
     & 0.5318900E+00, 0.5318900E+00, 0.5193000E+00, 0.5175300E+00, &
     & 0.5924100E+00, 0.5162900E+00, 0.5469910E+00, 0.5366378E+00, &
     & 0.6180000E+00, 0.5931200E+00, 0.5813300E+00, 0.5249562E+00, &
     & 0.5047700E+00, 0.5170587E+00, 0.5747900E+00, 0.4899965E+00, &
     & 0.4656929E+00, 0.4243005E+00, 0.3396338E+00, 0.3396338E+00 /
      data (ref_adm(14,iz, 7, 5),iz = 1,20) / &
     & 0.4983500E+00, 0.4983500E+00, 0.5051600E+00, 0.5107500E+00, &
     & 0.5853700E+00, 0.7067900E+00, 0.5484555E+00, 0.5740800E+00, &
     & 0.5759500E+00, 0.5124500E+00, 0.5157100E+00, 0.4609000E+00, &
     & 0.5205625E+00, 0.5162665E+00, 0.5063758E+00, 0.4889480E+00, &
     & 0.4644680E+00, 0.4232039E+00, 0.3387974E+00, 0.3387974E+00 /
      data (ref_adm(14,iz, 8, 5),iz = 1,20) / &
     & 0.5342700E+00, 0.5342700E+00, 0.5456800E+00, 0.5117400E+00, &
     & 0.5692800E+00, 0.5749400E+00, 0.5496800E+00, 0.5550200E+00, &
     & 0.5851900E+00, 0.6581800E+00, 0.5273412E+00, 0.5238668E+00, &
     & 0.5200332E+00, 0.5151579E+00, 0.4695900E+00, 0.4880138E+00, &
     & 0.4633172E+00, 0.4219364E+00, 0.3378435E+00, 0.3378435E+00 /
      data (ref_adm(14,iz, 9, 5),iz = 1,20) / &
     & 0.5104000E+00, 0.5104000E+00, 0.5986200E+00, 0.5563000E+00, &
     & 0.5799700E+00, 0.5664400E+00, 0.5272500E+00, 0.4973500E+00, &
     & 0.5393400E+00, 0.6049700E+00, 0.5272377E+00, 0.5233794E+00, &
     & 0.5192854E+00, 0.5523900E+00, 0.5043498E+00, 0.4867389E+00, &
     & 0.4620216E+00, 0.4204389E+00, 0.3368257E+00, 0.3368257E+00 /
      data (ref_adm(14,iz,10, 5),iz = 1,20) / &
     & 0.5529700E+00, 0.5529700E+00, 0.5547831E+00, 0.6353700E+00, &
     & 0.6717300E+00, 0.6201200E+00, 0.5564500E+00, 0.5453700E+00, &
     & 0.4512900E+00, 0.4869500E+00, 0.5119800E+00, 0.4490800E+00, &
     & 0.5184882E+00, 0.5129994E+00, 0.5030806E+00, 0.4852819E+00, &
     & 0.4604359E+00, 0.4188139E+00, 0.3357298E+00, 0.3357298E+00 /
      data (ref_adm(14,iz,11, 5),iz = 1,20) / &
     & 0.5417300E+00, 0.5417300E+00, 0.5546069E+00, 0.4745300E+00, &
     & 0.5626900E+00, 0.5536825E+00, 0.5333600E+00, 0.5493400E+00, &
     & 0.5103600E+00, 0.5083200E+00, 0.4848300E+00, 0.4795000E+00, &
     & 0.5020500E+00, 0.5117770E+00, 0.5017942E+00, 0.4123200E+00, &
     & 0.4377900E+00, 0.4169511E+00, 0.3345114E+00, 0.3345114E+00 /
      data (ref_adm(14,iz,12, 5),iz = 1,20) / &
     & 0.5393700E+00, 0.5393700E+00, 0.6548100E+00, 0.5576941E+00, &
     & 0.5034500E+00, 0.4964900E+00, 0.5556905E+00, 0.5424994E+00, &
     & 0.5340681E+00, 0.6435600E+00, 0.5899200E+00, 0.5386100E+00, &
     & 0.5069800E+00, 0.5106357E+00, 0.5002189E+00, 0.4631500E+00, &
     & 0.4515600E+00, 0.4152158E+00, 0.3332652E+00, 0.3332652E+00 /
      data (ref_adm(14,iz,13, 5),iz = 1,20) / &
     & 0.5440200E+00, 0.5440200E+00, 0.5534858E+00, 0.5572500E+00, &
     & 0.4935200E+00, 0.5535280E+00, 0.5560904E+00, 0.5448328E+00, &
     & 0.5347076E+00, 0.5306447E+00, 0.4725000E+00, 0.5389500E+00, &
     & 0.4786900E+00, 0.4987200E+00, 0.4618400E+00, 0.4537300E+00, &
     & 0.5397500E+00, 0.4135000E+00, 0.3320597E+00, 0.3320597E+00 /
      data (ref_adm(14,iz,14, 5),iz = 1,20) / &
     & 0.4405800E+00, 0.4405800E+00, 0.4350500E+00, 0.4411600E+00, &
     & 0.6503400E+00, 0.5289900E+00, 0.5221500E+00, 0.5476832E+00, &
     & 0.5358539E+00, 0.5304373E+00, 0.6647100E+00, 0.5179900E+00, &
     & 0.4973800E+00, 0.5381900E+00, 0.4972301E+00, 0.4194700E+00, &
     & 0.4539174E+00, 0.4118015E+00, 0.3308165E+00, 0.3308165E+00 /
      data (ref_adm(14,iz,15, 5),iz = 1,20) / &
     & 0.5498826E+00, 0.5498826E+00, 0.5527027E+00, 0.5398000E+00, &
     & 0.7511100E+00, 0.6646600E+00, 0.6922700E+00, 0.4998000E+00, &
     & 0.5796300E+00, 0.5067600E+00, 0.5367700E+00, 0.5628600E+00, &
     & 0.5030500E+00, 0.4490700E+00, 0.4957925E+00, 0.4770964E+00, &
     & 0.4522445E+00, 0.4101800E+00, 0.3296126E+00, 0.3296126E+00 /
      data (ref_adm(14,iz,16, 5),iz = 1,20) / &
     & 0.5138300E+00, 0.5138300E+00, 0.4929200E+00, 0.4861300E+00, &
     & 0.4881800E+00, 0.5923300E+00, 0.7315000E+00, 0.7244500E+00, &
     & 0.5069600E+00, 0.5313658E+00, 0.4000300E+00, 0.5418400E+00, &
     & 0.5098000E+00, 0.4289000E+00, 0.4942758E+00, 0.4754238E+00, &
     & 0.4503374E+00, 0.4085341E+00, 0.3284918E+00, 0.3284918E+00 /
      data (ref_adm(14,iz,17, 5),iz = 1,20) / &
     & 0.4939100E+00, 0.4939100E+00, 0.4922500E+00, 0.4969500E+00, &
     & 0.5661900E+00, 0.5354000E+00, 0.5530990E+00, 0.6563600E+00, &
     & 0.6409500E+00, 0.4303800E+00, 0.5274962E+00, 0.6189900E+00, &
     & 0.4494700E+00, 0.4604900E+00, 0.4476200E+00, 0.4737434E+00, &
     & 0.4485632E+00, 0.4070141E+00, 0.3275042E+00, 0.3275042E+00 /
      data (ref_adm(14,iz,18, 5),iz = 1,20) / &
     & 0.5375700E+00, 0.5375700E+00, 0.5225100E+00, 0.5497770E+00, &
     & 0.5533715E+00, 0.5320400E+00, 0.5853200E+00, 0.6044800E+00, &
     & 0.6852200E+00, 0.4886300E+00, 0.5205265E+00, 0.5121695E+00, &
     & 0.5009823E+00, 0.4495600E+00, 0.4383200E+00, 0.4560300E+00, &
     & 0.4285408E+00, 0.3874120E+00, 0.3136644E+00, 0.3136644E+00 /
      data (ref_adm(14,iz,19, 5),iz = 1,20) / &
     & 0.5310100E+00, 0.5310100E+00, 0.5487639E+00, 0.5283500E+00, &
     & 0.5527474E+00, 0.5550461E+00, 0.5524825E+00, 0.5501265E+00, &
     & 0.6313300E+00, 0.6553200E+00, 0.4811400E+00, 0.5123403E+00, &
     & 0.5011176E+00, 0.4886700E+00, 0.4755897E+00, 0.4462100E+00, &
     & 0.4275927E+00, 0.3866056E+00, 0.3132912E+00, 0.3132912E+00 /
      data (ref_adm(14,iz,20, 5),iz = 1,20) / &
     & 0.5181300E+00, 0.5181300E+00, 0.5490600E+00, 0.5490342E+00, &
     & 0.5520576E+00, 0.5549446E+00, 0.5530345E+00, 0.5496467E+00, &
     & 0.5531313E+00, 0.7025000E+00, 0.6747200E+00, 0.5125098E+00, &
     & 0.5044900E+00, 0.4813800E+00, 0.4100500E+00, 0.4529637E+00, &
     & 0.4267634E+00, 0.3857474E+00, 0.3129751E+00, 0.3129751E+00 /
      data (ref_adm(14,iz,21, 5),iz = 1,20) / &
     & 0.5114900E+00, 0.5114900E+00, 0.5492973E+00, 0.5489764E+00, &
     & 0.5512322E+00, 0.5546732E+00, 0.5536548E+00, 0.5494375E+00, &
     & 0.5529078E+00, 0.5402340E+00, 0.6826200E+00, 0.5126295E+00, &
     & 0.4780700E+00, 0.4805800E+00, 0.4117400E+00, 0.4523632E+00, &
     & 0.4260733E+00, 0.3849449E+00, 0.3126611E+00, 0.3126611E+00 /
      data (ref_adm(14,iz,22, 5),iz = 1,20) / &
     & 0.5901700E+00, 0.5901700E+00, 0.6337800E+00, 0.5252507E+00, &
     & 0.5259857E+00, 0.5266253E+00, 0.5272959E+00, 0.5280867E+00, &
     & 0.5020800E+00, 0.5303122E+00, 0.5603400E+00, 0.5331898E+00, &
     & 0.5085900E+00, 0.5316300E+00, 0.4727300E+00, 0.5224262E+00, &
     & 0.5052263E+00, 0.4712686E+00, 0.3954060E+00, 0.3954060E+00 /
      data (ref_adm(14,iz,23, 5),iz = 1,20) / &
     & 0.5777800E+00, 0.5777800E+00, 0.5252087E+00, 0.4768600E+00, &
     & 0.5183200E+00, 0.5177600E+00, 0.4856300E+00, 0.5651200E+00, &
     & 0.5297869E+00, 0.5301549E+00, 0.5552300E+00, 0.5325919E+00, &
     & 0.6047400E+00, 0.4797200E+00, 0.4668000E+00, 0.5160987E+00, &
     & 0.4994432E+00, 0.4651922E+00, 0.3940504E+00, 0.3940504E+00 /
      data (ref_adm(14,iz,24, 5),iz = 1,20) / &
     & 0.5908100E+00, 0.5908100E+00, 0.4818000E+00, 0.4491600E+00, &
     & 0.5537800E+00, 0.5288913E+00, 0.5298455E+00, 0.5307595E+00, &
     & 0.5314948E+00, 0.4519700E+00, 0.5321447E+00, 0.5318362E+00, &
     & 0.5347700E+00, 0.4637100E+00, 0.4459500E+00, 0.5057200E+00, &
     & 0.4940339E+00, 0.4605252E+00, 0.3933343E+00, 0.3933343E+00 /
      data (ref_adm(14,iz,25, 5),iz = 1,20) / &
     & 0.5023700E+00, 0.5023700E+00, 0.4810400E+00, 0.5106100E+00, &
     & 0.4617600E+00, 0.4919200E+00, 0.4891300E+00, 0.5378400E+00, &
     & 0.5531900E+00, 0.5256200E+00, 0.4941900E+00, 0.5329223E+00, &
     & 0.4328300E+00, 0.5069000E+00, 0.4480700E+00, 0.4461800E+00, &
     & 0.4546300E+00, 0.4565353E+00, 0.3937429E+00, 0.3937429E+00 /
      data (ref_adm(14,iz,26, 5),iz = 1,20) / &
     & 0.5705200E+00, 0.5705200E+00, 0.5548900E+00, 0.5777600E+00, &
     & 0.5314300E+00, 0.5073400E+00, 0.5573600E+00, 0.5363082E+00, &
     & 0.5368829E+00, 0.5838100E+00, 0.5258100E+00, 0.5351250E+00, &
     & 0.4393800E+00, 0.4644300E+00, 0.4920600E+00, 0.5081064E+00, &
     & 0.3873300E+00, 0.4540028E+00, 0.3949699E+00, 0.3949699E+00 /
      data (ref_adm(14,iz,27, 5),iz = 1,20) / &
     & 0.5364000E+00, 0.5364000E+00, 0.5358900E+00, 0.5186000E+00, &
     & 0.5184000E+00, 0.5357413E+00, 0.5101200E+00, 0.5398484E+00, &
     & 0.4569600E+00, 0.5580900E+00, 0.5669000E+00, 0.5381840E+00, &
     & 0.5153600E+00, 0.5330300E+00, 0.4639400E+00, 0.5083743E+00, &
     & 0.4882500E+00, 0.4531766E+00, 0.3971078E+00, 0.3971078E+00 /
      data (ref_adm(14,iz,28, 5),iz = 1,20) / &
     & 0.5261900E+00, 0.5261900E+00, 0.5348600E+00, 0.5468400E+00, &
     & 0.5347510E+00, 0.5376925E+00, 0.4230300E+00, 0.5432641E+00, &
     & 0.5448563E+00, 0.5810200E+00, 0.5952200E+00, 0.6340500E+00, &
     & 0.5194400E+00, 0.4790500E+00, 0.5251330E+00, 0.5096571E+00, &
     & 0.4889590E+00, 0.4542767E+00, 0.4006094E+00, 0.4006094E+00 /
      data (ref_adm(14,iz,29, 5),iz = 1,20) / &
     & 0.4990300E+00, 0.4990300E+00, 0.4841300E+00, 0.4883900E+00, &
     & 0.5362945E+00, 0.5400600E+00, 0.4326600E+00, 0.5674300E+00, &
     & 0.5397100E+00, 0.4914800E+00, 0.5767000E+00, 0.5482713E+00, &
     & 0.4837700E+00, 0.5390177E+00, 0.5286779E+00, 0.5127303E+00, &
     & 0.4903955E+00, 0.4561934E+00, 0.4049480E+00, 0.4049480E+00 /
      data (ref_adm(14,iz,30, 5),iz = 1,20) / &
     & 0.6069000E+00, 0.6069000E+00, 0.4868800E+00, 0.4984000E+00, &
     & 0.5376854E+00, 0.5426651E+00, 0.5470836E+00, 0.5498432E+00, &
     & 0.6014900E+00, 0.5090000E+00, 0.5964100E+00, 0.5540261E+00, &
     & 0.5504593E+00, 0.5445294E+00, 0.5338966E+00, 0.5158683E+00, &
     & 0.4936187E+00, 0.4578855E+00, 0.4096261E+00, 0.4096261E+00 /
      data (ref_adm(14,iz,31, 5),iz = 1,20) / &
     & 0.5306700E+00, 0.5306700E+00, 0.5508700E+00, 0.5647600E+00, &
     & 0.5392839E+00, 0.5448357E+00, 0.5873400E+00, 0.5486998E+00, &
     & 0.5497487E+00, 0.5520134E+00, 0.5533800E+00, 0.5580709E+00, &
     & 0.5560716E+00, 0.5503667E+00, 0.5396441E+00, 0.5204325E+00, &
     & 0.4969274E+00, 0.4610910E+00, 0.4140385E+00, 0.4140385E+00 /
      data (ref_adm(14,iz,32, 5),iz = 1,20) / &
     & 0.5572600E+00, 0.5572600E+00, 0.5361100E+00, 0.5680900E+00, &
     & 0.5578600E+00, 0.5596500E+00, 0.5384100E+00, 0.5285900E+00, &
     & 0.5442910E+00, 0.5456017E+00, 0.5491999E+00, 0.5546548E+00, &
     & 0.5587230E+00, 0.5559815E+00, 0.5448493E+00, 0.5261292E+00, &
     & 0.5009923E+00, 0.4646376E+00, 0.4183096E+00, 0.4183096E+00 /
      data (ref_adm(14,iz,33, 5),iz = 1,20) / &
     & 0.5496800E+00, 0.5496800E+00, 0.5410700E+00, 0.5325800E+00, &
     & 0.5722500E+00, 0.5874600E+00, 0.5781200E+00, 0.5604200E+00, &
     & 0.5408500E+00, 0.5258500E+00, 0.5435926E+00, 0.5705300E+00, &
     & 0.5547605E+00, 0.5579191E+00, 0.5500971E+00, 0.5308471E+00, &
     & 0.5059855E+00, 0.4683990E+00, 0.4225494E+00, 0.4225494E+00 /
      data (ref_adm(14,iz,34, 5),iz = 1,20) / &
     & 0.5111400E+00, 0.5111400E+00, 0.4777700E+00, 0.5738000E+00, &
     & 0.6069600E+00, 0.5676700E+00, 0.5826400E+00, 0.5859600E+00, &
     & 0.5659900E+00, 0.5618000E+00, 0.5426835E+00, 0.5439837E+00, &
     & 0.5485079E+00, 0.5544215E+00, 0.5531664E+00, 0.5353932E+00, &
     & 0.5105704E+00, 0.4716516E+00, 0.4265398E+00, 0.4265398E+00 /
      data (ref_adm(14,iz,35, 5),iz = 1,20) / &
     & 0.5198400E+00, 0.5198400E+00, 0.5227700E+00, 0.5369900E+00, &
     & 0.5736700E+00, 0.5921400E+00, 0.6034500E+00, 0.5589800E+00, &
     & 0.5885000E+00, 0.5430929E+00, 0.5445699E+00, 0.5436813E+00, &
     & 0.5444890E+00, 0.5496113E+00, 0.5532152E+00, 0.5389879E+00, &
     & 0.5135853E+00, 0.4749098E+00, 0.4295810E+00, 0.4295810E+00 /
      data (ref_adm(14,iz,36, 5),iz = 1,20) / &
     & 0.5610500E+00, 0.5610500E+00, 0.5370600E+00, 0.5617500E+00, &
     & 0.5775400E+00, 0.5409400E+00, 0.5918600E+00, 0.5789600E+00, &
     & 0.5898300E+00, 0.5497868E+00, 0.5514067E+00, 0.5265400E+00, &
     & 0.5431702E+00, 0.5457476E+00, 0.5515063E+00, 0.5419719E+00, &
     & 0.5160146E+00, 0.4773622E+00, 0.4315895E+00, 0.4315895E+00 /
      data (ref_adm(14,iz,37, 5),iz = 1,20) / &
     & 0.5247200E+00, 0.5247200E+00, 0.5046100E+00, 0.6133800E+00, &
     & 0.5990800E+00, 0.6293600E+00, 0.5768900E+00, 0.5447800E+00, &
     & 0.5241800E+00, 0.6605200E+00, 0.6050400E+00, 0.5909000E+00, &
     & 0.5434632E+00, 0.5439785E+00, 0.5499054E+00, 0.5431272E+00, &
     & 0.5173815E+00, 0.4788002E+00, 0.4328085E+00, 0.4328085E+00 /
      data (ref_adm(14,iz,38, 5),iz = 1,20) / &
     & 0.5247200E+00, 0.5247200E+00, 0.5046100E+00, 0.6133800E+00, &
     & 0.5990800E+00, 0.6293600E+00, 0.5768900E+00, 0.5447800E+00, &
     & 0.5241800E+00, 0.6605200E+00, 0.6050400E+00, 0.5909000E+00, &
     & 0.5434632E+00, 0.5439785E+00, 0.5499054E+00, 0.5431272E+00, &
     & 0.5173815E+00, 0.4788002E+00, 0.4328085E+00, 0.4328085E+00 /
! Solar Zenith Angle 25.0 Albedo  0.5328301E+00
      data (ref_adm(14,iz, 1, 6),iz = 1,20) / &
     & 0.5533643E+00, 0.5533643E+00, 0.5572393E+00, 0.5360700E+00, &
     & 0.6380900E+00, 0.5668100E+00, 0.5452562E+00, 0.5710100E+00, &
     & 0.5460300E+00, 0.6298800E+00, 0.4512400E+00, 0.5310425E+00, &
     & 0.5303600E+00, 0.5542800E+00, 0.5665700E+00, 0.5080309E+00, &
     & 0.4864311E+00, 0.4455906E+00, 0.3536891E+00, 0.3536891E+00 /
      data (ref_adm(14,iz, 2, 6),iz = 1,20) / &
     & 0.5533643E+00, 0.5533643E+00, 0.5572393E+00, 0.5360700E+00, &
     & 0.6380900E+00, 0.5668100E+00, 0.5452562E+00, 0.5710100E+00, &
     & 0.5460300E+00, 0.6298800E+00, 0.4512400E+00, 0.5310425E+00, &
     & 0.5303600E+00, 0.5542800E+00, 0.5665700E+00, 0.5080309E+00, &
     & 0.4864311E+00, 0.4455906E+00, 0.3536891E+00, 0.3536891E+00 /
      data (ref_adm(14,iz, 3, 6),iz = 1,20) / &
     & 0.5517200E+00, 0.5517200E+00, 0.5336200E+00, 0.5601578E+00, &
     & 0.5566008E+00, 0.5688000E+00, 0.6183400E+00, 0.5694400E+00, &
     & 0.5480000E+00, 0.5060200E+00, 0.5322465E+00, 0.5314006E+00, &
     & 0.4908900E+00, 0.5278704E+00, 0.5807300E+00, 0.5145300E+00, &
     & 0.4859024E+00, 0.4539000E+00, 0.2404391E+00, 0.2404391E+00 /
      data (ref_adm(14,iz, 4, 6),iz = 1,20) / &
     & 0.5354700E+00, 0.5354700E+00, 0.6619400E+00, 0.6817600E+00, &
     & 0.5409400E+00, 0.5508232E+00, 0.5559800E+00, 0.5859900E+00, &
     & 0.5387800E+00, 0.5003000E+00, 0.5321794E+00, 0.5309911E+00, &
     & 0.5369600E+00, 0.5705100E+00, 0.5807700E+00, 0.5150200E+00, &
     & 0.4857034E+00, 0.4447867E+00, 0.3532534E+00, 0.3532534E+00 /
      data (ref_adm(14,iz, 5, 6),iz = 1,20) / &
     & 0.6572300E+00, 0.6572300E+00, 0.6879200E+00, 0.5601757E+00, &
     & 0.5054500E+00, 0.4701000E+00, 0.5022900E+00, 0.6050700E+00, &
     & 0.4679500E+00, 0.5341620E+00, 0.4873200E+00, 0.5308957E+00, &
     & 0.5237400E+00, 0.5406800E+00, 0.5065900E+00, 0.5074043E+00, &
     & 0.4851467E+00, 0.4441948E+00, 0.3528076E+00, 0.3528076E+00 /
      data (ref_adm(14,iz, 6, 6),iz = 1,20) / &
     & 0.6100000E+00, 0.6100000E+00, 0.5328900E+00, 0.4985600E+00, &
     & 0.6430800E+00, 0.5514249E+00, 0.5457481E+00, 0.5921000E+00, &
     & 0.5269200E+00, 0.5341322E+00, 0.5666800E+00, 0.5306041E+00, &
     & 0.5272600E+00, 0.5374300E+00, 0.5059300E+00, 0.5799400E+00, &
     & 0.4613800E+00, 0.4433316E+00, 0.3522825E+00, 0.3522825E+00 /
      data (ref_adm(14,iz, 7, 6),iz = 1,20) / &
     & 0.4994500E+00, 0.4994500E+00, 0.5324100E+00, 0.4954600E+00, &
     & 0.5254200E+00, 0.5520149E+00, 0.5460945E+00, 0.5683400E+00, &
     & 0.5369977E+00, 0.4447000E+00, 0.4681500E+00, 0.5016100E+00, &
     & 0.5417600E+00, 0.5508300E+00, 0.5411000E+00, 0.5177700E+00, &
     & 0.4835644E+00, 0.4424673E+00, 0.3515401E+00, 0.3515401E+00 /
      data (ref_adm(14,iz, 8, 6),iz = 1,20) / &
     & 0.5533910E+00, 0.5533910E+00, 0.6230800E+00, 0.4903200E+00, &
     & 0.4419100E+00, 0.4233600E+00, 0.5463724E+00, 0.5205400E+00, &
     & 0.5369919E+00, 0.5424300E+00, 0.5267600E+00, 0.5295483E+00, &
     & 0.5280189E+00, 0.5090500E+00, 0.5068800E+00, 0.5046843E+00, &
     & 0.4824481E+00, 0.4412683E+00, 0.3507515E+00, 0.3507515E+00 /
      data (ref_adm(14,iz, 9, 6),iz = 1,20) / &
     & 0.5203500E+00, 0.5203500E+00, 0.5287500E+00, 0.5340900E+00, &
     & 0.6471900E+00, 0.4679200E+00, 0.4805500E+00, 0.5083800E+00, &
     & 0.5370519E+00, 0.5339910E+00, 0.6028200E+00, 0.5522600E+00, &
     & 0.5659300E+00, 0.5246357E+00, 0.5011700E+00, 0.4886500E+00, &
     & 0.4814888E+00, 0.4400090E+00, 0.3498317E+00, 0.3498317E+00 /
      data (ref_adm(14,iz,10, 6),iz = 1,20) / &
     & 0.5711600E+00, 0.5711600E+00, 0.5700800E+00, 0.5546900E+00, &
     & 0.6199700E+00, 0.5516500E+00, 0.4839700E+00, 0.5416803E+00, &
     & 0.5109400E+00, 0.4848600E+00, 0.5141300E+00, 0.6359300E+00, &
     & 0.5746500E+00, 0.5432000E+00, 0.5164588E+00, 0.5022870E+00, &
     & 0.4800372E+00, 0.4386913E+00, 0.3488435E+00, 0.3488435E+00 /
      data (ref_adm(14,iz,11, 6),iz = 1,20) / &
     & 0.5924300E+00, 0.5924300E+00, 0.5497300E+00, 0.5650800E+00, &
     & 0.5851100E+00, 0.5455300E+00, 0.5464100E+00, 0.5612700E+00, &
     & 0.5295800E+00, 0.4953700E+00, 0.5426900E+00, 0.5279527E+00, &
     & 0.6614100E+00, 0.4157900E+00, 0.5153922E+00, 0.5010696E+00, &
     & 0.4789702E+00, 0.4371265E+00, 0.3477566E+00, 0.3477566E+00 /
      data (ref_adm(14,iz,12, 6),iz = 1,20) / &
     & 0.5323700E+00, 0.5323700E+00, 0.4466600E+00, 0.6186100E+00, &
     & 0.5406400E+00, 0.5413700E+00, 0.5754700E+00, 0.5325000E+00, &
     & 0.5292000E+00, 0.5052600E+00, 0.5230000E+00, 0.6153100E+00, &
     & 0.4733200E+00, 0.4684000E+00, 0.5137690E+00, 0.4993398E+00, &
     & 0.4773338E+00, 0.4355791E+00, 0.3465730E+00, 0.3465730E+00 /
      data (ref_adm(14,iz,13, 6),iz = 1,20) / &
     & 0.5727500E+00, 0.5727500E+00, 0.5549363E+00, 0.5595924E+00, &
     & 0.6154200E+00, 0.5395200E+00, 0.5339500E+00, 0.5108800E+00, &
     & 0.5094100E+00, 0.5493800E+00, 0.5413200E+00, 0.5245700E+00, &
     & 0.4633800E+00, 0.5244600E+00, 0.6007600E+00, 0.4977249E+00, &
     & 0.4756597E+00, 0.4340748E+00, 0.3454299E+00, 0.3454299E+00 /
      data (ref_adm(14,iz,14, 6),iz = 1,20) / &
     & 0.5933400E+00, 0.5933400E+00, 0.5121000E+00, 0.5592920E+00, &
     & 0.5748300E+00, 0.6188300E+00, 0.5638300E+00, 0.4515300E+00, &
     & 0.4284600E+00, 0.5447400E+00, 0.5438700E+00, 0.5966900E+00, &
     & 0.4953100E+00, 0.5054100E+00, 0.5108691E+00, 0.4961876E+00, &
     & 0.4739270E+00, 0.4324161E+00, 0.3441927E+00, 0.3441927E+00 /
      data (ref_adm(14,iz,15, 6),iz = 1,20) / &
     & 0.4877900E+00, 0.4877900E+00, 0.5543433E+00, 0.5876900E+00, &
     & 0.6178700E+00, 0.6020500E+00, 0.5395600E+00, 0.5442681E+00, &
     & 0.5387073E+00, 0.4710200E+00, 0.5305093E+00, 0.5599500E+00, &
     & 0.4576300E+00, 0.5244300E+00, 0.5092837E+00, 0.4944667E+00, &
     & 0.4722237E+00, 0.4308495E+00, 0.3860200E+00, 0.3860200E+00 /
      data (ref_adm(14,iz,16, 6),iz = 1,20) / &
     & 0.5365100E+00, 0.5365100E+00, 0.5281400E+00, 0.4965800E+00, &
     & 0.5989500E+00, 0.7051800E+00, 0.5332000E+00, 0.5070600E+00, &
     & 0.5392781E+00, 0.5029100E+00, 0.5239100E+00, 0.5702500E+00, &
     & 0.4323700E+00, 0.5774100E+00, 0.4028900E+00, 0.5394700E+00, &
     & 0.4702753E+00, 0.4291777E+00, 0.3418291E+00, 0.3418291E+00 /
      data (ref_adm(14,iz,17, 6),iz = 1,20) / &
     & 0.4947600E+00, 0.4947600E+00, 0.5536082E+00, 0.5758700E+00, &
     & 0.5607184E+00, 0.5590987E+00, 0.5026400E+00, 0.5460742E+00, &
     & 0.5985500E+00, 0.5110000E+00, 0.4568500E+00, 0.5251488E+00, &
     & 0.5195838E+00, 0.5603600E+00, 0.4158200E+00, 0.4907586E+00, &
     & 0.4684810E+00, 0.4275002E+00, 0.3407688E+00, 0.3407688E+00 /
      data (ref_adm(14,iz,18, 6),iz = 1,20) / &
     & 0.4714100E+00, 0.4714100E+00, 0.5685542E+00, 0.5693114E+00, &
     & 0.6939700E+00, 0.6949100E+00, 0.7711000E+00, 0.5684114E+00, &
     & 0.6341400E+00, 0.5201200E+00, 0.4876100E+00, 0.5370400E+00, &
     & 0.5259000E+00, 0.5016803E+00, 0.5174100E+00, 0.4645000E+00, &
     & 0.3974300E+00, 0.3914191E+00, 0.3164548E+00, 0.3164548E+00 /
      data (ref_adm(14,iz,19, 6),iz = 1,20) / &
     & 0.5701203E+00, 0.5701203E+00, 0.5685898E+00, 0.5690710E+00, &
     & 0.6522000E+00, 0.6600000E+00, 0.6438900E+00, 0.4844900E+00, &
     & 0.6312600E+00, 0.5933100E+00, 0.5362463E+00, 0.5445000E+00, &
     & 0.4848300E+00, 0.5015647E+00, 0.4852359E+00, 0.4616495E+00, &
     & 0.4337538E+00, 0.3906670E+00, 0.3161138E+00, 0.3161138E+00 /
      data (ref_adm(14,iz,20, 6),iz = 1,20) / &
     & 0.5629400E+00, 0.5629400E+00, 0.4965200E+00, 0.5508200E+00, &
     & 0.5575000E+00, 0.5063000E+00, 0.5497600E+00, 0.5670021E+00, &
     & 0.5697159E+00, 0.5523202E+00, 0.5370497E+00, 0.5261999E+00, &
     & 0.4839500E+00, 0.4699700E+00, 0.4847054E+00, 0.4608923E+00, &
     & 0.4329765E+00, 0.3898707E+00, 0.3158300E+00, 0.3158300E+00 /
      data (ref_adm(14,iz,21, 6),iz = 1,20) / &
     & 0.4465800E+00, 0.4465800E+00, 0.4835100E+00, 0.6450000E+00, &
     & 0.5339300E+00, 0.5544100E+00, 0.5423600E+00, 0.4826700E+00, &
     & 0.5061900E+00, 0.5499000E+00, 0.5383590E+00, 0.5159800E+00, &
     & 0.5177800E+00, 0.4491800E+00, 0.4619300E+00, 0.5023600E+00, &
     & 0.4323413E+00, 0.3891310E+00, 0.3155536E+00, 0.3155536E+00 /
      data (ref_adm(14,iz,22, 6),iz = 1,20) / &
     & 0.6200000E+00, 0.6200000E+00, 0.6313200E+00, 0.5944200E+00, &
     & 0.5577404E+00, 0.4837400E+00, 0.5510700E+00, 0.5531600E+00, &
     & 0.5102800E+00, 0.7100800E+00, 0.5437900E+00, 0.5911800E+00, &
     & 0.5001400E+00, 0.4481700E+00, 0.4608200E+00, 0.5029858E+00, &
     & 0.4798921E+00, 0.3901200E+00, 0.3571377E+00, 0.3571377E+00 /
      data (ref_adm(14,iz,23, 6),iz = 1,20) / &
     & 0.5527537E+00, 0.5527537E+00, 0.5526074E+00, 0.4508700E+00, &
     & 0.5163100E+00, 0.5244800E+00, 0.6142500E+00, 0.5574500E+00, &
     & 0.5285000E+00, 0.5465608E+00, 0.5431414E+00, 0.4470100E+00, &
     & 0.4544100E+00, 0.5266013E+00, 0.4547200E+00, 0.4344000E+00, &
     & 0.4067300E+00, 0.3558800E+00, 0.3559767E+00, 0.3559767E+00 /
      data (ref_adm(14,iz,24, 6),iz = 1,20) / &
     & 0.5524925E+00, 0.5524925E+00, 0.7815500E+00, 0.5526994E+00, &
     & 0.4170000E+00, 0.5586728E+00, 0.5589110E+00, 0.5558151E+00, &
     & 0.6305600E+00, 0.6766500E+00, 0.5765300E+00, 0.5006800E+00, &
     & 0.5479900E+00, 0.4768400E+00, 0.5535500E+00, 0.4782100E+00, &
     & 0.4759400E+00, 0.4343385E+00, 0.3550760E+00, 0.3550760E+00 /
      data (ref_adm(14,iz,25, 6),iz = 1,20) / &
     & 0.5849100E+00, 0.5849100E+00, 0.5908200E+00, 0.7895900E+00, &
     & 0.7921800E+00, 0.5575645E+00, 0.5604728E+00, 0.6889400E+00, &
     & 0.5407600E+00, 0.6039200E+00, 0.5348200E+00, 0.4950700E+00, &
     & 0.5322067E+00, 0.5663000E+00, 0.4671400E+00, 0.4079800E+00, &
     & 0.4505200E+00, 0.4317378E+00, 0.3545071E+00, 0.3545071E+00 /
      data (ref_adm(14,iz,26, 6),iz = 1,20) / &
     & 0.6867800E+00, 0.6867800E+00, 0.6132800E+00, 0.5492408E+00, &
     & 0.7177100E+00, 0.6258700E+00, 0.5941700E+00, 0.5606581E+00, &
     & 0.4748200E+00, 0.5672200E+00, 0.5473355E+00, 0.4763300E+00, &
     & 0.5491600E+00, 0.5341800E+00, 0.5352600E+00, 0.4701400E+00, &
     & 0.4025500E+00, 0.4293694E+00, 0.3539735E+00, 0.3539735E+00 /
      data (ref_adm(14,iz,27, 6),iz = 1,20) / &
     & 0.4827500E+00, 0.4827500E+00, 0.5487834E+00, 0.5480587E+00, &
     & 0.6944800E+00, 0.6790600E+00, 0.6819100E+00, 0.5249700E+00, &
     & 0.5594571E+00, 0.5432000E+00, 0.5888400E+00, 0.5038000E+00, &
     & 0.5079700E+00, 0.5245712E+00, 0.4109300E+00, 0.5735300E+00, &
     & 0.5362000E+00, 0.4274817E+00, 0.3536108E+00, 0.3536108E+00 /
      data (ref_adm(14,iz,28, 6),iz = 1,20) / &
     & 0.5026100E+00, 0.5026100E+00, 0.5258800E+00, 0.6427900E+00, &
     & 0.5948400E+00, 0.5076000E+00, 0.5547862E+00, 0.4899700E+00, &
     & 0.5488200E+00, 0.5757800E+00, 0.5389400E+00, 0.5157600E+00, &
     & 0.4447600E+00, 0.4825200E+00, 0.4275200E+00, 0.4566500E+00, &
     & 0.4031000E+00, 0.4258659E+00, 0.3534320E+00, 0.3534320E+00 /
      data (ref_adm(14,iz,29, 6),iz = 1,20) / &
     & 0.5063900E+00, 0.5063900E+00, 0.5432300E+00, 0.6075600E+00, &
     & 0.6847200E+00, 0.6404300E+00, 0.4292900E+00, 0.4796600E+00, &
     & 0.5451000E+00, 0.4543400E+00, 0.5398400E+00, 0.5084500E+00, &
     & 0.5346059E+00, 0.5328700E+00, 0.5128700E+00, 0.4409100E+00, &
     & 0.4641014E+00, 0.4243914E+00, 0.3534403E+00, 0.3534403E+00 /
      data (ref_adm(14,iz,30, 6),iz = 1,20) / &
     & 0.5185700E+00, 0.5185700E+00, 0.5573800E+00, 0.5543900E+00, &
     & 0.5733000E+00, 0.5781400E+00, 0.5477100E+00, 0.5311200E+00, &
     & 0.5612200E+00, 0.5224400E+00, 0.5202100E+00, 0.5172100E+00, &
     & 0.4863700E+00, 0.5113700E+00, 0.4543800E+00, 0.4901826E+00, &
     & 0.4756300E+00, 0.4232744E+00, 0.3535949E+00, 0.3535949E+00 /
      data (ref_adm(14,iz,31, 6),iz = 1,20) / &
     & 0.5073000E+00, 0.5073000E+00, 0.5207300E+00, 0.4993200E+00, &
     & 0.5407200E+00, 0.5551900E+00, 0.5834400E+00, 0.5715900E+00, &
     & 0.5904500E+00, 0.5767900E+00, 0.5856800E+00, 0.5713000E+00, &
     & 0.5650600E+00, 0.5060700E+00, 0.4836400E+00, 0.4522000E+00, &
     & 0.4630450E+00, 0.4223164E+00, 0.3538153E+00, 0.3538153E+00 /
      data (ref_adm(14,iz,32, 6),iz = 1,20) / &
     & 0.5169200E+00, 0.5169200E+00, 0.5631700E+00, 0.5150100E+00, &
     & 0.5900600E+00, 0.5195100E+00, 0.5676900E+00, 0.5875700E+00, &
     & 0.6025000E+00, 0.5367600E+00, 0.5405700E+00, 0.5834600E+00, &
     & 0.5874400E+00, 0.5278861E+00, 0.5398900E+00, 0.4899231E+00, &
     & 0.4628752E+00, 0.4217370E+00, 0.3541094E+00, 0.3541094E+00 /
      data (ref_adm(14,iz,33, 6),iz = 1,20) / &
     & 0.4700700E+00, 0.4700700E+00, 0.5061200E+00, 0.4939500E+00, &
     & 0.5938200E+00, 0.6410500E+00, 0.5713400E+00, 0.5527500E+00, &
     & 0.5646800E+00, 0.5626300E+00, 0.5603200E+00, 0.5542600E+00, &
     & 0.5365400E+00, 0.4971200E+00, 0.4764300E+00, 0.4901372E+00, &
     & 0.4628472E+00, 0.4214657E+00, 0.3544110E+00, 0.3544110E+00 /
      data (ref_adm(14,iz,34, 6),iz = 1,20) / &
     & 0.5321800E+00, 0.5321800E+00, 0.4516100E+00, 0.5076300E+00, &
     & 0.5554000E+00, 0.5333600E+00, 0.5495581E+00, 0.5555600E+00, &
     & 0.5764000E+00, 0.5996200E+00, 0.5672100E+00, 0.5483000E+00, &
     & 0.5050000E+00, 0.5433400E+00, 0.5607800E+00, 0.4901089E+00, &
     & 0.4626973E+00, 0.4210841E+00, 0.3547151E+00, 0.3547151E+00 /
      data (ref_adm(14,iz,35, 6),iz = 1,20) / &
     & 0.5298700E+00, 0.5298700E+00, 0.5256400E+00, 0.4852200E+00, &
     & 0.5119100E+00, 0.4982800E+00, 0.6138000E+00, 0.5331100E+00, &
     & 0.5508788E+00, 0.5516400E+00, 0.5256300E+00, 0.5888000E+00, &
     & 0.5214200E+00, 0.5598700E+00, 0.4855200E+00, 0.4901898E+00, &
     & 0.4625106E+00, 0.4210239E+00, 0.3549659E+00, 0.3549659E+00 /
      data (ref_adm(14,iz,36, 6),iz = 1,20) / &
     & 0.5671200E+00, 0.5671200E+00, 0.5677000E+00, 0.5096100E+00, &
     & 0.5557200E+00, 0.5644100E+00, 0.5964200E+00, 0.5267900E+00, &
     & 0.5334000E+00, 0.5799400E+00, 0.5600601E+00, 0.5260900E+00, &
     & 0.5045800E+00, 0.5212200E+00, 0.5140647E+00, 0.4904074E+00, &
     & 0.4627508E+00, 0.4210585E+00, 0.3551928E+00, 0.3551928E+00 /
      data (ref_adm(14,iz,37, 6),iz = 1,20) / &
     & 0.5019000E+00, 0.5019000E+00, 0.5504200E+00, 0.5892700E+00, &
     & 0.6373000E+00, 0.6518400E+00, 0.5553000E+00, 0.5497850E+00, &
     & 0.5500798E+00, 0.5550420E+00, 0.6054200E+00, 0.5454900E+00, &
     & 0.5647800E+00, 0.5375000E+00, 0.5382600E+00, 0.4906419E+00, &
     & 0.4626866E+00, 0.4210320E+00, 0.3552794E+00, 0.3552794E+00 /
      data (ref_adm(14,iz,38, 6),iz = 1,20) / &
     & 0.5019000E+00, 0.5019000E+00, 0.5504200E+00, 0.5892700E+00, &
     & 0.6373000E+00, 0.6518400E+00, 0.5553000E+00, 0.5497850E+00, &
     & 0.5500798E+00, 0.5550420E+00, 0.6054200E+00, 0.5454900E+00, &
     & 0.5647800E+00, 0.5375000E+00, 0.5382600E+00, 0.4906419E+00, &
     & 0.4626866E+00, 0.4210320E+00, 0.3552794E+00, 0.3552794E+00 /
! Solar Zenith Angle 30.0 Albedo  0.5517205E+00
      data (ref_adm(14,iz, 1, 7),iz = 1,20) / &
     & 0.6149900E+00, 0.6149900E+00, 0.5996500E+00, 0.5683600E+00, &
     & 0.5534100E+00, 0.6131100E+00, 0.6031000E+00, 0.5030900E+00, &
     & 0.5644200E+00, 0.6815200E+00, 0.6348300E+00, 0.5948800E+00, &
     & 0.6382400E+00, 0.5392700E+00, 0.5689700E+00, 0.6443300E+00, &
     & 0.5353100E+00, 0.5294236E+00, 0.4271186E+00, 0.4271186E+00 /
      data (ref_adm(14,iz, 2, 7),iz = 1,20) / &
     & 0.6149900E+00, 0.6149900E+00, 0.5996500E+00, 0.5683600E+00, &
     & 0.5534100E+00, 0.6131100E+00, 0.6031000E+00, 0.5030900E+00, &
     & 0.5644200E+00, 0.6815200E+00, 0.6348300E+00, 0.5948800E+00, &
     & 0.6382400E+00, 0.5392700E+00, 0.5689700E+00, 0.6443300E+00, &
     & 0.5353100E+00, 0.5294236E+00, 0.4271186E+00, 0.4271186E+00 /
      data (ref_adm(14,iz, 3, 7),iz = 1,20) / &
     & 0.5928700E+00, 0.5928700E+00, 0.5397718E+00, 0.5683900E+00, &
     & 0.4855100E+00, 0.4447700E+00, 0.4922400E+00, 0.5536900E+00, &
     & 0.5873500E+00, 0.5879500E+00, 0.6443500E+00, 0.5016500E+00, &
     & 0.5502500E+00, 0.5898671E+00, 0.5824400E+00, 0.6480900E+00, &
     & 0.6587200E+00, 0.5288612E+00, 0.3928455E+00, 0.3928455E+00 /
      data (ref_adm(14,iz, 4, 7),iz = 1,20) / &
     & 0.5232400E+00, 0.5232400E+00, 0.4740300E+00, 0.4798500E+00, &
     & 0.5412537E+00, 0.6107500E+00, 0.5427300E+00, 0.5301700E+00, &
     & 0.7057800E+00, 0.5631949E+00, 0.5754400E+00, 0.6754800E+00, &
     & 0.5486100E+00, 0.5756300E+00, 0.5475200E+00, 0.5789200E+00, &
     & 0.5894000E+00, 0.5261800E+00, 0.4247385E+00, 0.4247385E+00 /
      data (ref_adm(14,iz, 5, 7),iz = 1,20) / &
     & 0.5253500E+00, 0.5253500E+00, 0.6325200E+00, 0.6076700E+00, &
     & 0.5857900E+00, 0.4272200E+00, 0.6558600E+00, 0.5365900E+00, &
     & 0.6022200E+00, 0.5098300E+00, 0.5620900E+00, 0.5480500E+00, &
     & 0.4404700E+00, 0.5123400E+00, 0.5448100E+00, 0.5419400E+00, &
     & 0.5856400E+00, 0.5253136E+00, 0.4226135E+00, 0.4226135E+00 /
      data (ref_adm(14,iz, 6, 7),iz = 1,20) / &
     & 0.5275500E+00, 0.5275500E+00, 0.5924400E+00, 0.5396874E+00, &
     & 0.4550500E+00, 0.4903500E+00, 0.5428000E+00, 0.5421800E+00, &
     & 0.4623300E+00, 0.4981400E+00, 0.6505800E+00, 0.4873700E+00, &
     & 0.5901600E+00, 0.4893700E+00, 0.5521400E+00, 0.5684000E+00, &
     & 0.5480600E+00, 0.5226094E+00, 0.4196158E+00, 0.4196158E+00 /
      data (ref_adm(14,iz, 7, 7),iz = 1,20) / &
     & 0.5396800E+00, 0.5396800E+00, 0.5232700E+00, 0.4920800E+00, &
     & 0.5284200E+00, 0.5214200E+00, 0.5962000E+00, 0.5483014E+00, &
     & 0.5534306E+00, 0.5590160E+00, 0.5185500E+00, 0.5487000E+00, &
     & 0.5716400E+00, 0.5595400E+00, 0.5338400E+00, 0.5383700E+00, &
     & 0.5609750E+00, 0.5050600E+00, 0.4163940E+00, 0.4163940E+00 /
      data (ref_adm(14,iz, 8, 7),iz = 1,20) / &
     & 0.5566900E+00, 0.5566900E+00, 0.5362300E+00, 0.4659800E+00, &
     & 0.5125200E+00, 0.6168100E+00, 0.5650500E+00, 0.4533600E+00, &
     & 0.5583200E+00, 0.7309700E+00, 0.4723200E+00, 0.5066600E+00, &
     & 0.5356800E+00, 0.6134000E+00, 0.5878000E+00, 0.6039600E+00, &
     & 0.5569147E+00, 0.5724400E+00, 0.4127700E+00, 0.4127700E+00 /
      data (ref_adm(14,iz, 9, 7),iz = 1,20) / &
     & 0.6031800E+00, 0.6031800E+00, 0.6143700E+00, 0.5914100E+00, &
     & 0.5495900E+00, 0.5890000E+00, 0.5405300E+00, 0.5503400E+00, &
     & 0.5682400E+00, 0.5963500E+00, 0.5625600E+00, 0.5515500E+00, &
     & 0.5356100E+00, 0.4796000E+00, 0.5093300E+00, 0.4860300E+00, &
     & 0.4809500E+00, 0.4649700E+00, 0.4090513E+00, 0.4090513E+00 /
      data (ref_adm(14,iz,10, 7),iz = 1,20) / &
     & 0.5855600E+00, 0.5855600E+00, 0.5782100E+00, 0.5947700E+00, &
     & 0.5517100E+00, 0.5289300E+00, 0.5385900E+00, 0.4865100E+00, &
     & 0.5047200E+00, 0.5844100E+00, 0.5963700E+00, 0.5908700E+00, &
     & 0.6060200E+00, 0.5952100E+00, 0.5260500E+00, 0.4953900E+00, &
     & 0.5025400E+00, 0.5085098E+00, 0.4053366E+00, 0.4053366E+00 /
      data (ref_adm(14,iz,11, 7),iz = 1,20) / &
     & 0.6273900E+00, 0.6273900E+00, 0.5603100E+00, 0.5807500E+00, &
     & 0.5520200E+00, 0.6357000E+00, 0.5965700E+00, 0.5469700E+00, &
     & 0.5435400E+00, 0.6062000E+00, 0.5448800E+00, 0.6057400E+00, &
     & 0.5731400E+00, 0.5620500E+00, 0.5478500E+00, 0.4887000E+00, &
     & 0.5389614E+00, 0.5035476E+00, 0.4013756E+00, 0.4013756E+00 /
      data (ref_adm(14,iz,12, 7),iz = 1,20) / &
     & 0.6202900E+00, 0.6202900E+00, 0.6023500E+00, 0.5727300E+00, &
     & 0.5642700E+00, 0.5378200E+00, 0.5365200E+00, 0.5511600E+00, &
     & 0.5419500E+00, 0.5696100E+00, 0.4906400E+00, 0.5020200E+00, &
     & 0.5342200E+00, 0.5353900E+00, 0.5096600E+00, 0.5775500E+00, &
     & 0.5329615E+00, 0.4972830E+00, 0.3973110E+00, 0.3973110E+00 /
      data (ref_adm(14,iz,13, 7),iz = 1,20) / &
     & 0.5681300E+00, 0.5681300E+00, 0.6165600E+00, 0.5522400E+00, &
     & 0.5489200E+00, 0.5343900E+00, 0.5262300E+00, 0.5683800E+00, &
     & 0.5298100E+00, 0.5285100E+00, 0.5449900E+00, 0.5706900E+00, &
     & 0.5296200E+00, 0.5479100E+00, 0.4969600E+00, 0.5409691E+00, &
     & 0.4832100E+00, 0.4904040E+00, 0.3926721E+00, 0.3926721E+00 /
      data (ref_adm(14,iz,14, 7),iz = 1,20) / &
     & 0.5731600E+00, 0.5731600E+00, 0.5730000E+00, 0.5929500E+00, &
     & 0.4104000E+00, 0.5149800E+00, 0.5306700E+00, 0.5457100E+00, &
     & 0.4961500E+00, 0.5202600E+00, 0.5217800E+00, 0.5368400E+00, &
     & 0.5741000E+00, 0.5907600E+00, 0.5508000E+00, 0.5077400E+00, &
     & 0.5191217E+00, 0.4837497E+00, 0.3875247E+00, 0.3875247E+00 /
      data (ref_adm(14,iz,15, 7),iz = 1,20) / &
     & 0.5578400E+00, 0.5578400E+00, 0.5214300E+00, 0.6794100E+00, &
     & 0.5174700E+00, 0.5050800E+00, 0.4583700E+00, 0.5650100E+00, &
     & 0.5450600E+00, 0.4910300E+00, 0.4865000E+00, 0.5233600E+00, &
     & 0.5110200E+00, 0.5368000E+00, 0.5382915E+00, 0.5542800E+00, &
     & 0.5123560E+00, 0.4773849E+00, 0.3824500E+00, 0.3824500E+00 /
      data (ref_adm(14,iz,16, 7),iz = 1,20) / &
     & 0.5147100E+00, 0.5147100E+00, 0.5282800E+00, 0.5664500E+00, &
     & 0.5651800E+00, 0.5082700E+00, 0.4784500E+00, 0.5131100E+00, &
     & 0.5307900E+00, 0.6260100E+00, 0.5936400E+00, 0.5214700E+00, &
     & 0.5693300E+00, 0.5050300E+00, 0.5325670E+00, 0.5227883E+00, &
     & 0.5058119E+00, 0.4704146E+00, 0.3780820E+00, 0.3780820E+00 /
      data (ref_adm(14,iz,17, 7),iz = 1,20) / &
     & 0.4503100E+00, 0.4503100E+00, 0.4997100E+00, 0.5561100E+00, &
     & 0.5581400E+00, 0.5844800E+00, 0.5443400E+00, 0.5226500E+00, &
     & 0.5578200E+00, 0.6303000E+00, 0.4678900E+00, 0.5086200E+00, &
     & 0.4876500E+00, 0.4873100E+00, 0.5960200E+00, 0.5191700E+00, &
     & 0.4999741E+00, 0.4640241E+00, 0.3738096E+00, 0.3738096E+00 /
      data (ref_adm(14,iz,18, 7),iz = 1,20) / &
     & 0.5206400E+00, 0.5206400E+00, 0.5358700E+00, 0.5583100E+00, &
     & 0.6151900E+00, 0.6700100E+00, 0.6913200E+00, 0.5230300E+00, &
     & 0.5677600E+00, 0.6452900E+00, 0.5555300E+00, 0.5676600E+00, &
     & 0.5389915E+00, 0.5333081E+00, 0.5104700E+00, 0.5040497E+00, &
     & 0.4425300E+00, 0.4353223E+00, 0.3520232E+00, 0.3520232E+00 /
      data (ref_adm(14,iz,19, 7),iz = 1,20) / &
     & 0.6736900E+00, 0.6736900E+00, 0.5872200E+00, 0.6177300E+00, &
     & 0.6667400E+00, 0.6274500E+00, 0.6131900E+00, 0.6109300E+00, &
     & 0.5350800E+00, 0.5574800E+00, 0.5584000E+00, 0.5648400E+00, &
     & 0.5373312E+00, 0.5309148E+00, 0.4967800E+00, 0.5308500E+00, &
     & 0.4749815E+00, 0.4322558E+00, 0.3502278E+00, 0.3502278E+00 /
      data (ref_adm(14,iz,20, 7),iz = 1,20) / &
     & 0.6301900E+00, 0.6301900E+00, 0.6250200E+00, 0.6624500E+00, &
     & 0.6486900E+00, 0.5585200E+00, 0.5721000E+00, 0.5086200E+00, &
     & 0.5604800E+00, 0.5831800E+00, 0.5766200E+00, 0.5439113E+00, &
     & 0.5360616E+00, 0.5286929E+00, 0.4614400E+00, 0.4813300E+00, &
     & 0.4719173E+00, 0.4292500E+00, 0.3490659E+00, 0.3490659E+00 /
      data (ref_adm(14,iz,21, 7),iz = 1,20) / &
     & 0.6147000E+00, 0.6147000E+00, 0.6034800E+00, 0.6202000E+00, &
     & 0.5760200E+00, 0.5737447E+00, 0.5896200E+00, 0.5295900E+00, &
     & 0.5620700E+00, 0.5967100E+00, 0.5705300E+00, 0.5532500E+00, &
     & 0.4872900E+00, 0.4895200E+00, 0.5146897E+00, 0.4946305E+00, &
     & 0.4690090E+00, 0.4266313E+00, 0.3482824E+00, 0.3482824E+00 /
      data (ref_adm(14,iz,22, 7),iz = 1,20) / &
     & 0.6306900E+00, 0.6306900E+00, 0.5649100E+00, 0.5327700E+00, &
     & 0.5720800E+00, 0.5460000E+00, 0.5798574E+00, 0.5814300E+00, &
     & 0.5467800E+00, 0.5779300E+00, 0.5016100E+00, 0.6534200E+00, &
     & 0.5685100E+00, 0.5150000E+00, 0.5085818E+00, 0.4865505E+00, &
     & 0.4591865E+00, 0.4171286E+00, 0.3441308E+00, 0.3441308E+00 /
      data (ref_adm(14,iz,23, 7),iz = 1,20) / &
     & 0.5870800E+00, 0.5870800E+00, 0.5187000E+00, 0.6186000E+00, &
     & 0.4691500E+00, 0.5793391E+00, 0.5007100E+00, 0.5737100E+00, &
     & 0.5831500E+00, 0.5771500E+00, 0.5502700E+00, 0.5629600E+00, &
     & 0.5130000E+00, 0.5468700E+00, 0.5274600E+00, 0.6345400E+00, &
     & 0.4576545E+00, 0.4155671E+00, 0.3442259E+00, 0.3442259E+00 /
      data (ref_adm(14,iz,24, 7),iz = 1,20) / &
     & 0.6097000E+00, 0.6097000E+00, 0.5442900E+00, 0.5479500E+00, &
     & 0.6400600E+00, 0.5329700E+00, 0.5439600E+00, 0.5798300E+00, &
     & 0.6304100E+00, 0.5626300E+00, 0.5626628E+00, 0.5415000E+00, &
     & 0.5042300E+00, 0.5246100E+00, 0.5087054E+00, 0.4890900E+00, &
     & 0.5324000E+00, 0.4142449E+00, 0.3447407E+00, 0.3447407E+00 /
      data (ref_adm(14,iz,25, 7),iz = 1,20) / &
     & 0.5997000E+00, 0.5997000E+00, 0.6354800E+00, 0.6235800E+00, &
     & 0.6046600E+00, 0.5443800E+00, 0.6108500E+00, 0.6157200E+00, &
     & 0.5844600E+00, 0.5973500E+00, 0.6217300E+00, 0.5761000E+00, &
     & 0.5629700E+00, 0.5010100E+00, 0.4934900E+00, 0.4338400E+00, &
     & 0.4553890E+00, 0.4136961E+00, 0.3455855E+00, 0.3455855E+00 /
      data (ref_adm(14,iz,26, 7),iz = 1,20) / &
     & 0.5621900E+00, 0.5621900E+00, 0.6198000E+00, 0.6338100E+00, &
     & 0.6730500E+00, 0.5821000E+00, 0.5759700E+00, 0.5697900E+00, &
     & 0.6022200E+00, 0.5668700E+00, 0.5529800E+00, 0.5272100E+00, &
     & 0.5735800E+00, 0.5136200E+00, 0.5477400E+00, 0.4628900E+00, &
     & 0.4370400E+00, 0.4051700E+00, 0.3467627E+00, 0.3467627E+00 /
      data (ref_adm(14,iz,27, 7),iz = 1,20) / &
     & 0.5985400E+00, 0.5985400E+00, 0.6503700E+00, 0.5633500E+00, &
     & 0.6069600E+00, 0.6630200E+00, 0.6692300E+00, 0.5480700E+00, &
     & 0.5611400E+00, 0.5326200E+00, 0.5485400E+00, 0.5188900E+00, &
     & 0.5170900E+00, 0.5327900E+00, 0.5138400E+00, 0.4597700E+00, &
     & 0.4587900E+00, 0.4286700E+00, 0.3483084E+00, 0.3483084E+00 /
      data (ref_adm(14,iz,28, 7),iz = 1,20) / &
     & 0.6046500E+00, 0.6046500E+00, 0.5866700E+00, 0.6113700E+00, &
     & 0.6090800E+00, 0.5743000E+00, 0.6127300E+00, 0.6382200E+00, &
     & 0.6041800E+00, 0.6389300E+00, 0.5743728E+00, 0.5179300E+00, &
     & 0.4864000E+00, 0.5153800E+00, 0.5068700E+00, 0.4988300E+00, &
     & 0.4853900E+00, 0.4338700E+00, 0.3369800E+00, 0.3369800E+00 /
      data (ref_adm(14,iz,29, 7),iz = 1,20) / &
     & 0.5834300E+00, 0.5834300E+00, 0.5694300E+00, 0.5966100E+00, &
     & 0.6388200E+00, 0.6013100E+00, 0.5745600E+00, 0.5900500E+00, &
     & 0.5804500E+00, 0.5641100E+00, 0.5714200E+00, 0.5556000E+00, &
     & 0.5643400E+00, 0.5196300E+00, 0.4939200E+00, 0.4594600E+00, &
     & 0.4594640E+00, 0.3658000E+00, 0.3519091E+00, 0.3519091E+00 /
      data (ref_adm(14,iz,30, 7),iz = 1,20) / &
     & 0.6222200E+00, 0.6222200E+00, 0.5749200E+00, 0.6128000E+00, &
     & 0.6092000E+00, 0.6252000E+00, 0.5630400E+00, 0.5777600E+00, &
     & 0.5964800E+00, 0.5848800E+00, 0.5607500E+00, 0.5744200E+00, &
     & 0.5274200E+00, 0.5510500E+00, 0.5060600E+00, 0.4810900E+00, &
     & 0.4492100E+00, 0.4907000E+00, 0.3539232E+00, 0.3539232E+00 /
      data (ref_adm(14,iz,31, 7),iz = 1,20) / &
     & 0.5687800E+00, 0.5687800E+00, 0.5180400E+00, 0.6174500E+00, &
     & 0.5809100E+00, 0.5125300E+00, 0.5665700E+00, 0.5550100E+00, &
     & 0.5721400E+00, 0.5727400E+00, 0.5492500E+00, 0.5471200E+00, &
     & 0.5217700E+00, 0.5224200E+00, 0.5334700E+00, 0.4900600E+00, &
     & 0.4703800E+00, 0.4192549E+00, 0.3559908E+00, 0.3559908E+00 /
      data (ref_adm(14,iz,32, 7),iz = 1,20) / &
     & 0.5858300E+00, 0.5858300E+00, 0.5809653E+00, 0.6483300E+00, &
     & 0.6456100E+00, 0.5776500E+00, 0.6096200E+00, 0.5358700E+00, &
     & 0.5603200E+00, 0.5233800E+00, 0.5627200E+00, 0.5516300E+00, &
     & 0.5425900E+00, 0.4922600E+00, 0.5192200E+00, 0.5561500E+00, &
     & 0.4350000E+00, 0.4210423E+00, 0.3581226E+00, 0.3581226E+00 /
      data (ref_adm(14,iz,33, 7),iz = 1,20) / &
     & 0.5959800E+00, 0.5959800E+00, 0.4768600E+00, 0.5620900E+00, &
     & 0.4758900E+00, 0.5937000E+00, 0.6182100E+00, 0.5403900E+00, &
     & 0.5701100E+00, 0.4962100E+00, 0.5519100E+00, 0.5243100E+00, &
     & 0.5268200E+00, 0.5772900E+00, 0.5893000E+00, 0.5761000E+00, &
     & 0.4653910E+00, 0.4226389E+00, 0.3600985E+00, 0.3600985E+00 /
      data (ref_adm(14,iz,34, 7),iz = 1,20) / &
     & 0.5239900E+00, 0.5239900E+00, 0.5232200E+00, 0.4746000E+00, &
     & 0.5228400E+00, 0.6012500E+00, 0.6630600E+00, 0.6736500E+00, &
     & 0.5683700E+00, 0.5685100E+00, 0.5757520E+00, 0.5174600E+00, &
     & 0.5196900E+00, 0.5871000E+00, 0.5997400E+00, 0.5042101E+00, &
     & 0.4667880E+00, 0.4238588E+00, 0.3617211E+00, 0.3617211E+00 /
      data (ref_adm(14,iz,35, 7),iz = 1,20) / &
     & 0.5585300E+00, 0.5585300E+00, 0.6248200E+00, 0.4767500E+00, &
     & 0.5390400E+00, 0.5995000E+00, 0.5552100E+00, 0.4829200E+00, &
     & 0.5410400E+00, 0.5416600E+00, 0.5990600E+00, 0.5389600E+00, &
     & 0.5674233E+00, 0.5050100E+00, 0.5691400E+00, 0.5084311E+00, &
     & 0.4683504E+00, 0.4248939E+00, 0.3630695E+00, 0.3630695E+00 /
      data (ref_adm(14,iz,36, 7),iz = 1,20) / &
     & 0.5102900E+00, 0.5102900E+00, 0.6138400E+00, 0.5466700E+00, &
     & 0.6308300E+00, 0.5706500E+00, 0.6025000E+00, 0.5564600E+00, &
     & 0.6320500E+00, 0.7400100E+00, 0.5943400E+00, 0.5395400E+00, &
     & 0.5465600E+00, 0.4835500E+00, 0.5549400E+00, 0.5117867E+00, &
     & 0.4695334E+00, 0.4255176E+00, 0.3639764E+00, 0.3639764E+00 /
      data (ref_adm(14,iz,37, 7),iz = 1,20) / &
     & 0.6091900E+00, 0.6091900E+00, 0.6177400E+00, 0.5567700E+00, &
     & 0.5509700E+00, 0.6582600E+00, 0.6855200E+00, 0.6493000E+00, &
     & 0.6300000E+00, 0.6030300E+00, 0.6328500E+00, 0.5511200E+00, &
     & 0.5629200E+00, 0.5571758E+00, 0.5479930E+00, 0.5136036E+00, &
     & 0.4702598E+00, 0.4258333E+00, 0.3645088E+00, 0.3645088E+00 /
      data (ref_adm(14,iz,38, 7),iz = 1,20) / &
     & 0.6091900E+00, 0.6091900E+00, 0.6177400E+00, 0.5567700E+00, &
     & 0.5509700E+00, 0.6582600E+00, 0.6855200E+00, 0.6493000E+00, &
     & 0.6300000E+00, 0.6030300E+00, 0.6328500E+00, 0.5511200E+00, &
     & 0.5629200E+00, 0.5571758E+00, 0.5479930E+00, 0.5136036E+00, &
     & 0.4702598E+00, 0.4258333E+00, 0.3645088E+00, 0.3645088E+00 /
! Solar Zenith Angle 35.0 Albedo  0.5627343E+00
      data (ref_adm(14,iz, 1, 8),iz = 1,20) / &
     & 0.5250000E+00, 0.5250000E+00, 0.5930000E+00, 0.5341500E+00, &
     & 0.5510000E+00, 0.6275500E+00, 0.5854900E+00, 0.5911400E+00, &
     & 0.5924700E+00, 0.5907500E+00, 0.5756400E+00, 0.6079800E+00, &
     & 0.6194200E+00, 0.6284600E+00, 0.5893700E+00, 0.6025000E+00, &
     & 0.5809100E+00, 0.5631200E+00, 0.4334777E+00, 0.4334777E+00 /
      data (ref_adm(14,iz, 2, 8),iz = 1,20) / &
     & 0.5250000E+00, 0.5250000E+00, 0.5930000E+00, 0.5341500E+00, &
     & 0.5510000E+00, 0.6275500E+00, 0.5854900E+00, 0.5911400E+00, &
     & 0.5924700E+00, 0.5907500E+00, 0.5756400E+00, 0.6079800E+00, &
     & 0.6194200E+00, 0.6284600E+00, 0.5893700E+00, 0.6025000E+00, &
     & 0.5809100E+00, 0.5631200E+00, 0.4334777E+00, 0.4334777E+00 /
      data (ref_adm(14,iz, 3, 8),iz = 1,20) / &
     & 0.5817500E+00, 0.5817500E+00, 0.5649600E+00, 0.5747200E+00, &
     & 0.5251600E+00, 0.6170500E+00, 0.6170800E+00, 0.6143100E+00, &
     & 0.6557900E+00, 0.5746500E+00, 0.5898400E+00, 0.6324700E+00, &
     & 0.6080900E+00, 0.6393600E+00, 0.5898700E+00, 0.5651800E+00, &
     & 0.5738500E+00, 0.5386900E+00, 0.3584293E+00, 0.3584293E+00 /
      data (ref_adm(14,iz, 4, 8),iz = 1,20) / &
     & 0.5945400E+00, 0.5945400E+00, 0.5573100E+00, 0.5950800E+00, &
     & 0.6027700E+00, 0.5426500E+00, 0.6229500E+00, 0.5818400E+00, &
     & 0.5951700E+00, 0.6572300E+00, 0.5661100E+00, 0.5710900E+00, &
     & 0.6077700E+00, 0.5703900E+00, 0.5883000E+00, 0.6087400E+00, &
     & 0.5998200E+00, 0.5290759E+00, 0.4309440E+00, 0.4309440E+00 /
      data (ref_adm(14,iz, 5, 8),iz = 1,20) / &
     & 0.5519600E+00, 0.5519600E+00, 0.5987900E+00, 0.6356700E+00, &
     & 0.5611800E+00, 0.5612300E+00, 0.5829900E+00, 0.5878500E+00, &
     & 0.5305900E+00, 0.5439600E+00, 0.5115500E+00, 0.6773100E+00, &
     & 0.5879200E+00, 0.5899300E+00, 0.6294700E+00, 0.6290300E+00, &
     & 0.6282500E+00, 0.5261513E+00, 0.4286757E+00, 0.4286757E+00 /
      data (ref_adm(14,iz, 6, 8),iz = 1,20) / &
     & 0.5871100E+00, 0.5871100E+00, 0.5176600E+00, 0.5522900E+00, &
     & 0.5984300E+00, 0.5573300E+00, 0.5520000E+00, 0.6017200E+00, &
     & 0.5940500E+00, 0.5548800E+00, 0.5931810E+00, 0.5300900E+00, &
     & 0.5701900E+00, 0.5787400E+00, 0.5828900E+00, 0.5940700E+00, &
     & 0.6042900E+00, 0.5690200E+00, 0.4254818E+00, 0.4254818E+00 /
      data (ref_adm(14,iz, 7, 8),iz = 1,20) / &
     & 0.5187500E+00, 0.5187500E+00, 0.5059500E+00, 0.5273400E+00, &
     & 0.6438000E+00, 0.5973900E+00, 0.5964300E+00, 0.6119300E+00, &
     & 0.5921900E+00, 0.4471600E+00, 0.5523300E+00, 0.5440400E+00, &
     & 0.5456200E+00, 0.5906800E+00, 0.6030000E+00, 0.5320500E+00, &
     & 0.5908700E+00, 0.5937400E+00, 0.4220403E+00, 0.4220403E+00 /
      data (ref_adm(14,iz, 8, 8),iz = 1,20) / &
     & 0.6014700E+00, 0.6014700E+00, 0.5888500E+00, 0.6073400E+00, &
     & 0.5331900E+00, 0.5790700E+00, 0.6028800E+00, 0.5904600E+00, &
     & 0.5844300E+00, 0.5752700E+00, 0.5893500E+00, 0.5927600E+00, &
     & 0.6269800E+00, 0.6584200E+00, 0.6515200E+00, 0.6563500E+00, &
     & 0.6510200E+00, 0.5130839E+00, 0.4181620E+00, 0.4181620E+00 /
      data (ref_adm(14,iz, 9, 8),iz = 1,20) / &
     & 0.5544700E+00, 0.5544700E+00, 0.5673400E+00, 0.5319500E+00, &
     & 0.5438300E+00, 0.5825100E+00, 0.5597800E+00, 0.5974100E+00, &
     & 0.5968800E+00, 0.6456900E+00, 0.6375600E+00, 0.6431200E+00, &
     & 0.6173200E+00, 0.6023200E+00, 0.5836400E+00, 0.6206200E+00, &
     & 0.6100300E+00, 0.5080267E+00, 0.4141620E+00, 0.4141620E+00 /
      data (ref_adm(14,iz,10, 8),iz = 1,20) / &
     & 0.5477700E+00, 0.5477700E+00, 0.5127900E+00, 0.5233600E+00, &
     & 0.5537500E+00, 0.5513600E+00, 0.5620100E+00, 0.5999900E+00, &
     & 0.5702100E+00, 0.5850700E+00, 0.5885800E+00, 0.5700900E+00, &
     & 0.5864800E+00, 0.5803800E+00, 0.5730600E+00, 0.5860900E+00, &
     & 0.5628400E+00, 0.5101800E+00, 0.4565300E+00, 0.4565300E+00 /
      data (ref_adm(14,iz,11, 8),iz = 1,20) / &
     & 0.5800400E+00, 0.5800400E+00, 0.6195700E+00, 0.5607000E+00, &
     & 0.5593500E+00, 0.5653700E+00, 0.6022600E+00, 0.5773000E+00, &
     & 0.5475800E+00, 0.5640700E+00, 0.5791716E+00, 0.5902300E+00, &
     & 0.6160600E+00, 0.5041600E+00, 0.5608900E+00, 0.6533600E+00, &
     & 0.6015100E+00, 0.4961636E+00, 0.4430900E+00, 0.4430900E+00 /
      data (ref_adm(14,iz,12, 8),iz = 1,20) / &
     & 0.6006700E+00, 0.6006700E+00, 0.5746900E+00, 0.5786300E+00, &
     & 0.5547800E+00, 0.5609900E+00, 0.5738700E+00, 0.5956300E+00, &
     & 0.5723600E+00, 0.5655800E+00, 0.5023100E+00, 0.5859400E+00, &
     & 0.6094100E+00, 0.5079700E+00, 0.5260800E+00, 0.5473490E+00, &
     & 0.5884000E+00, 0.5312900E+00, 0.4016703E+00, 0.4016703E+00 /
      data (ref_adm(14,iz,13, 8),iz = 1,20) / &
     & 0.5610700E+00, 0.5610700E+00, 0.5588100E+00, 0.5392400E+00, &
     & 0.5546800E+00, 0.5331500E+00, 0.5438400E+00, 0.5767000E+00, &
     & 0.5798900E+00, 0.5946300E+00, 0.5650000E+00, 0.5894800E+00, &
     & 0.5819500E+00, 0.5723500E+00, 0.5141200E+00, 0.5277300E+00, &
     & 0.5186806E+00, 0.4814650E+00, 0.3968385E+00, 0.3968385E+00 /
      data (ref_adm(14,iz,14, 8),iz = 1,20) / &
     & 0.5621800E+00, 0.5621800E+00, 0.5674000E+00, 0.5475400E+00, &
     & 0.5756300E+00, 0.5472700E+00, 0.5488800E+00, 0.5316600E+00, &
     & 0.5396600E+00, 0.5459400E+00, 0.5595600E+00, 0.6067700E+00, &
     & 0.6144000E+00, 0.6029700E+00, 0.5481573E+00, 0.6373000E+00, &
     & 0.5105757E+00, 0.4741096E+00, 0.3914789E+00, 0.3914789E+00 /
      data (ref_adm(14,iz,15, 8),iz = 1,20) / &
     & 0.5719000E+00, 0.5719000E+00, 0.5541800E+00, 0.5162300E+00, &
     & 0.5562200E+00, 0.4737200E+00, 0.5699600E+00, 0.5510800E+00, &
     & 0.5063000E+00, 0.5251000E+00, 0.5418700E+00, 0.5355200E+00, &
     & 0.5441300E+00, 0.5682800E+00, 0.5201100E+00, 0.5661000E+00, &
     & 0.4855400E+00, 0.4449000E+00, 0.3861844E+00, 0.3861844E+00 /
      data (ref_adm(14,iz,16, 8),iz = 1,20) / &
     & 0.5626200E+00, 0.5626200E+00, 0.6068600E+00, 0.5364000E+00, &
     & 0.5456700E+00, 0.5436600E+00, 0.5437700E+00, 0.5542500E+00, &
     & 0.5462800E+00, 0.5892800E+00, 0.5505000E+00, 0.5359000E+00, &
     & 0.5849100E+00, 0.5449700E+00, 0.5253500E+00, 0.5563100E+00, &
     & 0.5242200E+00, 0.3585600E+00, 0.3367300E+00, 0.3367300E+00 /
      data (ref_adm(14,iz,17, 8),iz = 1,20) / &
     & 0.5302900E+00, 0.5302900E+00, 0.5846800E+00, 0.5966300E+00, &
     & 0.5502400E+00, 0.6036000E+00, 0.6184900E+00, 0.5592200E+00, &
     & 0.5630900E+00, 0.5010100E+00, 0.5516500E+00, 0.4893200E+00, &
     & 0.5013200E+00, 0.5386000E+00, 0.6052600E+00, 0.4793100E+00, &
     & 0.4576500E+00, 0.4176300E+00, 0.3771710E+00, 0.3771710E+00 /
      data (ref_adm(14,iz,18, 8),iz = 1,20) / &
     & 0.4754300E+00, 0.4754300E+00, 0.5569800E+00, 0.6020500E+00, &
     & 0.5889700E+00, 0.5687500E+00, 0.5339000E+00, 0.5580000E+00, &
     & 0.5563200E+00, 0.5708200E+00, 0.5659300E+00, 0.5426548E+00, &
     & 0.4670900E+00, 0.5173800E+00, 0.5198700E+00, 0.4554800E+00, &
     & 0.4427400E+00, 0.4439635E+00, 0.3644233E+00, 0.3644233E+00 /
      data (ref_adm(14,iz,19, 8),iz = 1,20) / &
     & 0.5915200E+00, 0.5915200E+00, 0.5488300E+00, 0.5670300E+00, &
     & 0.5416700E+00, 0.5771900E+00, 0.5703400E+00, 0.5715100E+00, &
     & 0.5241200E+00, 0.5421100E+00, 0.5051400E+00, 0.5568600E+00, &
     & 0.5218900E+00, 0.5575900E+00, 0.5420800E+00, 0.5053036E+00, &
     & 0.4810548E+00, 0.4394327E+00, 0.3618100E+00, 0.3618100E+00 /
      data (ref_adm(14,iz,20, 8),iz = 1,20) / &
     & 0.5963700E+00, 0.5963700E+00, 0.5953700E+00, 0.5545700E+00, &
     & 0.5591800E+00, 0.5348000E+00, 0.5091200E+00, 0.5561600E+00, &
     & 0.5643500E+00, 0.5376000E+00, 0.5264800E+00, 0.5416500E+00, &
     & 0.4841500E+00, 0.5643800E+00, 0.5711300E+00, 0.6033200E+00, &
     & 0.4768194E+00, 0.3347300E+00, 0.3602634E+00, 0.3602634E+00 /
      data (ref_adm(14,iz,21, 8),iz = 1,20) / &
     & 0.5606500E+00, 0.5606500E+00, 0.5857600E+00, 0.5274800E+00, &
     & 0.5460300E+00, 0.6094900E+00, 0.5090800E+00, 0.5264500E+00, &
     & 0.5280300E+00, 0.5377400E+00, 0.5221700E+00, 0.5343000E+00, &
     & 0.5025900E+00, 0.5910600E+00, 0.6079400E+00, 0.4977117E+00, &
     & 0.3814600E+00, 0.4323958E+00, 0.3594123E+00, 0.3594123E+00 /
      data (ref_adm(14,iz,22, 8),iz = 1,20) / &
     & 0.6018400E+00, 0.6018400E+00, 0.5647800E+00, 0.5321200E+00, &
     & 0.5482300E+00, 0.5298200E+00, 0.5559200E+00, 0.5559200E+00, &
     & 0.5165100E+00, 0.5231000E+00, 0.5070900E+00, 0.5329600E+00, &
     & 0.5166700E+00, 0.5506000E+00, 0.5857700E+00, 0.5142000E+00, &
     & 0.4849068E+00, 0.4405812E+00, 0.3508464E+00, 0.3508464E+00 /
      data (ref_adm(14,iz,23, 8),iz = 1,20) / &
     & 0.5747100E+00, 0.5747100E+00, 0.5460000E+00, 0.6076300E+00, &
     & 0.6012900E+00, 0.5614300E+00, 0.4900500E+00, 0.5996100E+00, &
     & 0.5358000E+00, 0.5043600E+00, 0.5633900E+00, 0.5615823E+00, &
     & 0.5597100E+00, 0.5160800E+00, 0.5251800E+00, 0.5320800E+00, &
     & 0.4828062E+00, 0.4387748E+00, 0.3501228E+00, 0.3501228E+00 /
      data (ref_adm(14,iz,24, 8),iz = 1,20) / &
     & 0.5758400E+00, 0.5758400E+00, 0.6441500E+00, 0.6343700E+00, &
     & 0.5731700E+00, 0.5677400E+00, 0.5687200E+00, 0.5703200E+00, &
     & 0.5718600E+00, 0.6041900E+00, 0.5731700E+00, 0.5722600E+00, &
     & 0.5602700E+00, 0.5350700E+00, 0.5436800E+00, 0.4895800E+00, &
     & 0.4809802E+00, 0.4370778E+00, 0.3495000E+00, 0.3495000E+00 /
      data (ref_adm(14,iz,25, 8),iz = 1,20) / &
     & 0.5875900E+00, 0.5875900E+00, 0.6089600E+00, 0.5992800E+00, &
     & 0.5472200E+00, 0.5322400E+00, 0.5642500E+00, 0.6023300E+00, &
     & 0.5684900E+00, 0.5591400E+00, 0.5529700E+00, 0.5519800E+00, &
     & 0.5304100E+00, 0.6126700E+00, 0.5293500E+00, 0.5158900E+00, &
     & 0.3792300E+00, 0.4354967E+00, 0.3490596E+00, 0.3490596E+00 /
      data (ref_adm(14,iz,26, 8),iz = 1,20) / &
     & 0.5798400E+00, 0.5798400E+00, 0.5777700E+00, 0.6002900E+00, &
     & 0.5544800E+00, 0.5469300E+00, 0.5600400E+00, 0.5829000E+00, &
     & 0.5394800E+00, 0.5783000E+00, 0.5701700E+00, 0.5654100E+00, &
     & 0.5301500E+00, 0.6096900E+00, 0.5273900E+00, 0.4977700E+00, &
     & 0.4893200E+00, 0.4840100E+00, 0.3486175E+00, 0.3486175E+00 /
      data (ref_adm(14,iz,27, 8),iz = 1,20) / &
     & 0.5769800E+00, 0.5769800E+00, 0.5841100E+00, 0.5813500E+00, &
     & 0.5678500E+00, 0.5732700E+00, 0.5718000E+00, 0.5740200E+00, &
     & 0.5678000E+00, 0.5701800E+00, 0.6059500E+00, 0.5743800E+00, &
     & 0.4733800E+00, 0.5558300E+00, 0.5287000E+00, 0.5267000E+00, &
     & 0.4775600E+00, 0.4494000E+00, 0.3646700E+00, 0.3646700E+00 /
      data (ref_adm(14,iz,28, 8),iz = 1,20) / &
     & 0.5822500E+00, 0.5822500E+00, 0.5853200E+00, 0.5889000E+00, &
     & 0.6116000E+00, 0.5747400E+00, 0.5440700E+00, 0.5694800E+00, &
     & 0.5737500E+00, 0.5591400E+00, 0.5670200E+00, 0.5441300E+00, &
     & 0.5914600E+00, 0.5547500E+00, 0.5138200E+00, 0.5278300E+00, &
     & 0.5310300E+00, 0.4313419E+00, 0.3481837E+00, 0.3481837E+00 /
      data (ref_adm(14,iz,29, 8),iz = 1,20) / &
     & 0.5665100E+00, 0.5665100E+00, 0.5718800E+00, 0.5658100E+00, &
     & 0.5968200E+00, 0.5966600E+00, 0.5820400E+00, 0.5696200E+00, &
     & 0.5830100E+00, 0.5685700E+00, 0.5774400E+00, 0.5747400E+00, &
     & 0.5640300E+00, 0.5856300E+00, 0.5593900E+00, 0.5305300E+00, &
     & 0.4962200E+00, 0.4599600E+00, 0.3480435E+00, 0.3480435E+00 /
      data (ref_adm(14,iz,30, 8),iz = 1,20) / &
     & 0.5566800E+00, 0.5566800E+00, 0.5468100E+00, 0.5516600E+00, &
     & 0.5024200E+00, 0.4943200E+00, 0.5501400E+00, 0.5703900E+00, &
     & 0.5964000E+00, 0.6107900E+00, 0.6008000E+00, 0.5911800E+00, &
     & 0.5892700E+00, 0.5852300E+00, 0.5669200E+00, 0.5318100E+00, &
     & 0.4966100E+00, 0.4882300E+00, 0.3478750E+00, 0.3478750E+00 /
      data (ref_adm(14,iz,31, 8),iz = 1,20) / &
     & 0.5603100E+00, 0.5603100E+00, 0.5753600E+00, 0.5674900E+00, &
     & 0.5681300E+00, 0.5828800E+00, 0.6015000E+00, 0.5645200E+00, &
     & 0.6528400E+00, 0.6365200E+00, 0.6123800E+00, 0.5906800E+00, &
     & 0.5707800E+00, 0.5631200E+00, 0.5572100E+00, 0.5311300E+00, &
     & 0.5102500E+00, 0.4730900E+00, 0.3737200E+00, 0.3737200E+00 /
      data (ref_adm(14,iz,32, 8),iz = 1,20) / &
     & 0.5433700E+00, 0.5433700E+00, 0.5551500E+00, 0.5890100E+00, &
     & 0.5398700E+00, 0.5504800E+00, 0.5028900E+00, 0.4974000E+00, &
     & 0.6058100E+00, 0.6240700E+00, 0.6028500E+00, 0.5841500E+00, &
     & 0.5722500E+00, 0.5195000E+00, 0.5381800E+00, 0.5060400E+00, &
     & 0.5026000E+00, 0.3588000E+00, 0.3477196E+00, 0.3477196E+00 /
      data (ref_adm(14,iz,33, 8),iz = 1,20) / &
     & 0.6155300E+00, 0.6155300E+00, 0.5585500E+00, 0.5800300E+00, &
     & 0.5112200E+00, 0.5284200E+00, 0.5922600E+00, 0.6090900E+00, &
     & 0.5818800E+00, 0.6208300E+00, 0.6585200E+00, 0.5946800E+00, &
     & 0.6239900E+00, 0.5382700E+00, 0.5472300E+00, 0.5275000E+00, &
     & 0.4829800E+00, 0.4446500E+00, 0.3477374E+00, 0.3477374E+00 /
      data (ref_adm(14,iz,34, 8),iz = 1,20) / &
     & 0.5533300E+00, 0.5533300E+00, 0.5671800E+00, 0.5220500E+00, &
     & 0.5399500E+00, 0.5341800E+00, 0.4983800E+00, 0.5420200E+00, &
     & 0.6102800E+00, 0.5968000E+00, 0.5740600E+00, 0.6487900E+00, &
     & 0.5478700E+00, 0.5238000E+00, 0.5616100E+00, 0.5124000E+00, &
     & 0.4972400E+00, 0.4271685E+00, 0.3477222E+00, 0.3477222E+00 /
      data (ref_adm(14,iz,35, 8),iz = 1,20) / &
     & 0.5410500E+00, 0.5410500E+00, 0.5957500E+00, 0.5839500E+00, &
     & 0.5719800E+00, 0.5737100E+00, 0.5625500E+00, 0.6939000E+00, &
     & 0.6352900E+00, 0.5852300E+00, 0.5951100E+00, 0.5703700E+00, &
     & 0.5649700E+00, 0.5495600E+00, 0.5088900E+00, 0.5441900E+00, &
     & 0.5308600E+00, 0.4268024E+00, 0.3477711E+00, 0.3477711E+00 /
      data (ref_adm(14,iz,36, 8),iz = 1,20) / &
     & 0.5919600E+00, 0.5919600E+00, 0.6134400E+00, 0.6008000E+00, &
     & 0.5522600E+00, 0.5764700E+00, 0.6150000E+00, 0.6624600E+00, &
     & 0.6922000E+00, 0.6068100E+00, 0.5770700E+00, 0.5916100E+00, &
     & 0.5230800E+00, 0.5230500E+00, 0.5377100E+00, 0.4997316E+00, &
     & 0.4700200E+00, 0.4265791E+00, 0.3477489E+00, 0.3477489E+00 /
      data (ref_adm(14,iz,37, 8),iz = 1,20) / &
     & 0.6099800E+00, 0.6099800E+00, 0.5433700E+00, 0.6066300E+00, &
     & 0.6400800E+00, 0.6122400E+00, 0.6234900E+00, 0.6206100E+00, &
     & 0.6563200E+00, 0.6865500E+00, 0.5478300E+00, 0.5967600E+00, &
     & 0.5809300E+00, 0.5232300E+00, 0.5347500E+00, 0.4995827E+00, &
     & 0.4700953E+00, 0.4264791E+00, 0.3477291E+00, 0.3477291E+00 /
      data (ref_adm(14,iz,38, 8),iz = 1,20) / &
     & 0.6099800E+00, 0.6099800E+00, 0.5433700E+00, 0.6066300E+00, &
     & 0.6400800E+00, 0.6122400E+00, 0.6234900E+00, 0.6206100E+00, &
     & 0.6563200E+00, 0.6865500E+00, 0.5478300E+00, 0.5967600E+00, &
     & 0.5809300E+00, 0.5232300E+00, 0.5347500E+00, 0.4995827E+00, &
     & 0.4700953E+00, 0.4264791E+00, 0.3477291E+00, 0.3477291E+00 /
! Solar Zenith Angle 40.0 Albedo  0.5771078E+00
      data (ref_adm(14,iz, 1, 9),iz = 1,20) / &
     & 0.5216500E+00, 0.5216500E+00, 0.5538400E+00, 0.5980000E+00, &
     & 0.5913900E+00, 0.5491400E+00, 0.5597800E+00, 0.5439700E+00, &
     & 0.5648500E+00, 0.6028100E+00, 0.6242700E+00, 0.6827000E+00, &
     & 0.6141700E+00, 0.6637400E+00, 0.6879700E+00, 0.6819300E+00, &
     & 0.6765400E+00, 0.6383200E+00, 0.5269728E+00, 0.5269728E+00 /
      data (ref_adm(14,iz, 2, 9),iz = 1,20) / &
     & 0.5216500E+00, 0.5216500E+00, 0.5538400E+00, 0.5980000E+00, &
     & 0.5913900E+00, 0.5491400E+00, 0.5597800E+00, 0.5439700E+00, &
     & 0.5648500E+00, 0.6028100E+00, 0.6242700E+00, 0.6827000E+00, &
     & 0.6141700E+00, 0.6637400E+00, 0.6879700E+00, 0.6819300E+00, &
     & 0.6765400E+00, 0.6383200E+00, 0.5269728E+00, 0.5269728E+00 /
      data (ref_adm(14,iz, 3, 9),iz = 1,20) / &
     & 0.5822800E+00, 0.5822800E+00, 0.6233200E+00, 0.5497500E+00, &
     & 0.5615400E+00, 0.5496200E+00, 0.5536400E+00, 0.5838800E+00, &
     & 0.5482400E+00, 0.5895900E+00, 0.6048500E+00, 0.6396500E+00, &
     & 0.6336300E+00, 0.6318000E+00, 0.6808500E+00, 0.6972800E+00, &
     & 0.6684400E+00, 0.6609100E+00, 0.5664800E+00, 0.5664800E+00 /
      data (ref_adm(14,iz, 4, 9),iz = 1,20) / &
     & 0.5810600E+00, 0.5810600E+00, 0.5402400E+00, 0.5907100E+00, &
     & 0.6174400E+00, 0.5691300E+00, 0.5579400E+00, 0.5867600E+00, &
     & 0.6016500E+00, 0.6103700E+00, 0.6112100E+00, 0.6316500E+00, &
     & 0.6435200E+00, 0.6641200E+00, 0.6937300E+00, 0.6582900E+00, &
     & 0.6501800E+00, 0.5106600E+00, 0.5461000E+00, 0.5461000E+00 /
      data (ref_adm(14,iz, 5, 9),iz = 1,20) / &
     & 0.5690400E+00, 0.5690400E+00, 0.5578700E+00, 0.5364000E+00, &
     & 0.5348700E+00, 0.5737300E+00, 0.5782200E+00, 0.6010200E+00, &
     & 0.6217800E+00, 0.5866300E+00, 0.6208500E+00, 0.6487400E+00, &
     & 0.6274000E+00, 0.6772800E+00, 0.6784200E+00, 0.6769200E+00, &
     & 0.6094800E+00, 0.6102545E+00, 0.5665400E+00, 0.5665400E+00 /
      data (ref_adm(14,iz, 6, 9),iz = 1,20) / &
     & 0.5760300E+00, 0.5760300E+00, 0.5330800E+00, 0.5651100E+00, &
     & 0.5490700E+00, 0.5623800E+00, 0.6246100E+00, 0.5971000E+00, &
     & 0.6095600E+00, 0.6049100E+00, 0.6155900E+00, 0.6039300E+00, &
     & 0.6188500E+00, 0.6506200E+00, 0.6551700E+00, 0.6713800E+00, &
     & 0.6876600E+00, 0.6017506E+00, 0.5003819E+00, 0.5003819E+00 /
      data (ref_adm(14,iz, 7, 9),iz = 1,20) / &
     & 0.5733500E+00, 0.5733500E+00, 0.5469200E+00, 0.5571200E+00, &
     & 0.5558400E+00, 0.5722400E+00, 0.5842300E+00, 0.5937300E+00, &
     & 0.6052400E+00, 0.5984000E+00, 0.6287300E+00, 0.6362100E+00, &
     & 0.6488300E+00, 0.6706400E+00, 0.6649400E+00, 0.6513200E+00, &
     & 0.6808900E+00, 0.5922793E+00, 0.5159400E+00, 0.5159400E+00 /
      data (ref_adm(14,iz, 8, 9),iz = 1,20) / &
     & 0.5552000E+00, 0.5552000E+00, 0.5688800E+00, 0.5602600E+00, &
     & 0.5474400E+00, 0.5503100E+00, 0.5569500E+00, 0.5765300E+00, &
     & 0.5639500E+00, 0.5901900E+00, 0.5925500E+00, 0.6140900E+00, &
     & 0.6348800E+00, 0.5943100E+00, 0.6030100E+00, 0.6333800E+00, &
     & 0.6309400E+00, 0.5596300E+00, 0.4816594E+00, 0.4816594E+00 /
      data (ref_adm(14,iz, 9, 9),iz = 1,20) / &
     & 0.5673600E+00, 0.5673600E+00, 0.5718400E+00, 0.5546500E+00, &
     & 0.5585200E+00, 0.5188800E+00, 0.5540200E+00, 0.5443400E+00, &
     & 0.5835500E+00, 0.5545800E+00, 0.5783200E+00, 0.6025000E+00, &
     & 0.6073700E+00, 0.5999300E+00, 0.5814800E+00, 0.6159500E+00, &
     & 0.5847800E+00, 0.5441000E+00, 0.4729275E+00, 0.4729275E+00 /
      data (ref_adm(14,iz,10, 9),iz = 1,20) / &
     & 0.5745700E+00, 0.5745700E+00, 0.5474100E+00, 0.5605500E+00, &
     & 0.5743600E+00, 0.5467300E+00, 0.5579100E+00, 0.5544200E+00, &
     & 0.5712700E+00, 0.5514900E+00, 0.5471800E+00, 0.5824600E+00, &
     & 0.5794700E+00, 0.5837800E+00, 0.5838300E+00, 0.5855100E+00, &
     & 0.5684800E+00, 0.5228500E+00, 0.4650507E+00, 0.4650507E+00 /
      data (ref_adm(14,iz,11, 9),iz = 1,20) / &
     & 0.5533500E+00, 0.5533500E+00, 0.5802700E+00, 0.5713800E+00, &
     & 0.5731900E+00, 0.5946300E+00, 0.5772100E+00, 0.5036300E+00, &
     & 0.5292500E+00, 0.5766100E+00, 0.5818100E+00, 0.5506500E+00, &
     & 0.5638000E+00, 0.5934000E+00, 0.5592400E+00, 0.5561900E+00, &
     & 0.5380500E+00, 0.4873400E+00, 0.4576325E+00, 0.4576325E+00 /
      data (ref_adm(14,iz,12, 9),iz = 1,20) / &
     & 0.5799600E+00, 0.5799600E+00, 0.5719100E+00, 0.5624000E+00, &
     & 0.5407500E+00, 0.5674700E+00, 0.6042900E+00, 0.6235300E+00, &
     & 0.5848300E+00, 0.5815300E+00, 0.5734000E+00, 0.5510300E+00, &
     & 0.5569900E+00, 0.5496300E+00, 0.5475800E+00, 0.5547900E+00, &
     & 0.5687200E+00, 0.4801100E+00, 0.4711600E+00, 0.4711600E+00 /
      data (ref_adm(14,iz,13, 9),iz = 1,20) / &
     & 0.5721600E+00, 0.5721600E+00, 0.5720000E+00, 0.5709100E+00, &
     & 0.5729200E+00, 0.5660100E+00, 0.5907200E+00, 0.5935400E+00, &
     & 0.6151700E+00, 0.6111300E+00, 0.6107500E+00, 0.6084900E+00, &
     & 0.5847600E+00, 0.5656600E+00, 0.5698800E+00, 0.6186200E+00, &
     & 0.6098100E+00, 0.5240900E+00, 0.4134800E+00, 0.4134800E+00 /
      data (ref_adm(14,iz,14, 9),iz = 1,20) / &
     & 0.5533200E+00, 0.5533200E+00, 0.5600900E+00, 0.5416500E+00, &
     & 0.5303900E+00, 0.5342600E+00, 0.5435300E+00, 0.5613700E+00, &
     & 0.5847700E+00, 0.5811100E+00, 0.5918300E+00, 0.5867200E+00, &
     & 0.5970800E+00, 0.5912600E+00, 0.6138300E+00, 0.5515000E+00, &
     & 0.5762900E+00, 0.3346900E+00, 0.4379389E+00, 0.4379389E+00 /
      data (ref_adm(14,iz,15, 9),iz = 1,20) / &
     & 0.5482200E+00, 0.5482200E+00, 0.5569500E+00, 0.5527600E+00, &
     & 0.5511700E+00, 0.5288700E+00, 0.5387900E+00, 0.5466300E+00, &
     & 0.5436200E+00, 0.5413500E+00, 0.5575500E+00, 0.6009200E+00, &
     & 0.5967400E+00, 0.5623200E+00, 0.5660600E+00, 0.5195700E+00, &
     & 0.4911600E+00, 0.4738500E+00, 0.4305913E+00, 0.4305913E+00 /
      data (ref_adm(14,iz,16, 9),iz = 1,20) / &
     & 0.5601300E+00, 0.5601300E+00, 0.5467300E+00, 0.5345600E+00, &
     & 0.5640000E+00, 0.5519300E+00, 0.5445700E+00, 0.5486000E+00, &
     & 0.5893100E+00, 0.4910900E+00, 0.5675500E+00, 0.5560000E+00, &
     & 0.5417700E+00, 0.5406700E+00, 0.4700300E+00, 0.5141000E+00, &
     & 0.5565509E+00, 0.3932800E+00, 0.4234330E+00, 0.4234330E+00 /
      data (ref_adm(14,iz,17, 9),iz = 1,20) / &
     & 0.5230200E+00, 0.5230200E+00, 0.5746100E+00, 0.5464500E+00, &
     & 0.5479000E+00, 0.5699600E+00, 0.5632800E+00, 0.5877100E+00, &
     & 0.5825300E+00, 0.6044300E+00, 0.5277100E+00, 0.5866300E+00, &
     & 0.5136300E+00, 0.5251000E+00, 0.5112800E+00, 0.5015000E+00, &
     & 0.5061200E+00, 0.5117062E+00, 0.4172013E+00, 0.4172013E+00 /
      data (ref_adm(14,iz,18, 9),iz = 1,20) / &
     & 0.5325100E+00, 0.5325100E+00, 0.5893600E+00, 0.5581600E+00, &
     & 0.5836500E+00, 0.5501400E+00, 0.6067700E+00, 0.5867300E+00, &
     & 0.6059500E+00, 0.6086900E+00, 0.5679700E+00, 0.5793800E+00, &
     & 0.5697800E+00, 0.5397500E+00, 0.5112600E+00, 0.5856200E+00, &
     & 0.4977500E+00, 0.4925600E+00, 0.3775487E+00, 0.3775487E+00 /
      data (ref_adm(14,iz,19, 9),iz = 1,20) / &
     & 0.5650600E+00, 0.5650600E+00, 0.5623700E+00, 0.5759200E+00, &
     & 0.5827400E+00, 0.5446100E+00, 0.6228800E+00, 0.6008500E+00, &
     & 0.6392100E+00, 0.6349100E+00, 0.5074200E+00, 0.5524000E+00, &
     & 0.5916800E+00, 0.5221500E+00, 0.5443800E+00, 0.4925300E+00, &
     & 0.4720900E+00, 0.4715381E+00, 0.3753364E+00, 0.3753364E+00 /
      data (ref_adm(14,iz,20, 9),iz = 1,20) / &
     & 0.5724100E+00, 0.5724100E+00, 0.5492400E+00, 0.5461700E+00, &
     & 0.5694400E+00, 0.5257500E+00, 0.5628000E+00, 0.5879800E+00, &
     & 0.6103100E+00, 0.5959400E+00, 0.5144300E+00, 0.5547700E+00, &
     & 0.5367400E+00, 0.4937700E+00, 0.5868200E+00, 0.5318702E+00, &
     & 0.5113734E+00, 0.4692692E+00, 0.3738442E+00, 0.3738442E+00 /
      data (ref_adm(14,iz,21, 9),iz = 1,20) / &
     & 0.5588300E+00, 0.5588300E+00, 0.5613500E+00, 0.5562800E+00, &
     & 0.5338900E+00, 0.5439500E+00, 0.5530100E+00, 0.6029200E+00, &
     & 0.6075100E+00, 0.6044400E+00, 0.6084800E+00, 0.5388000E+00, &
     & 0.5430100E+00, 0.5470900E+00, 0.5629800E+00, 0.5994600E+00, &
     & 0.5096202E+00, 0.4671234E+00, 0.3727023E+00, 0.3727023E+00 /
      data (ref_adm(14,iz,22, 9),iz = 1,20) / &
     & 0.5169700E+00, 0.5169700E+00, 0.5797800E+00, 0.5580600E+00, &
     & 0.5795500E+00, 0.5525400E+00, 0.5654500E+00, 0.6046100E+00, &
     & 0.6335400E+00, 0.6176500E+00, 0.6266000E+00, 0.5914000E+00, &
     & 0.5966400E+00, 0.5906900E+00, 0.5607000E+00, 0.5097895E+00, &
     & 0.4838300E+00, 0.4423457E+00, 0.3686770E+00, 0.3686770E+00 /
      data (ref_adm(14,iz,23, 9),iz = 1,20) / &
     & 0.5319500E+00, 0.5319500E+00, 0.5790800E+00, 0.5747800E+00, &
     & 0.5527000E+00, 0.5063800E+00, 0.5385200E+00, 0.5526500E+00, &
     & 0.5976700E+00, 0.6081800E+00, 0.6005100E+00, 0.6243700E+00, &
     & 0.5570100E+00, 0.5650600E+00, 0.5755000E+00, 0.5338900E+00, &
     & 0.4954600E+00, 0.4402518E+00, 0.3691646E+00, 0.3691646E+00 /
      data (ref_adm(14,iz,24, 9),iz = 1,20) / &
     & 0.5640400E+00, 0.5640400E+00, 0.5244300E+00, 0.5458000E+00, &
     & 0.5648400E+00, 0.5717600E+00, 0.5690800E+00, 0.5803400E+00, &
     & 0.5453300E+00, 0.5862700E+00, 0.6171200E+00, 0.6199400E+00, &
     & 0.5330500E+00, 0.5064400E+00, 0.5629900E+00, 0.5925000E+00, &
     & 0.4858500E+00, 0.4391760E+00, 0.3702893E+00, 0.3702893E+00 /
      data (ref_adm(14,iz,25, 9),iz = 1,20) / &
     & 0.5424100E+00, 0.5424100E+00, 0.5672200E+00, 0.5558300E+00, &
     & 0.5448600E+00, 0.5883500E+00, 0.6126600E+00, 0.5744400E+00, &
     & 0.5679400E+00, 0.5617800E+00, 0.6199400E+00, 0.5791800E+00, &
     & 0.5119000E+00, 0.5605700E+00, 0.5692300E+00, 0.6021600E+00, &
     & 0.5515000E+00, 0.5139900E+00, 0.3719975E+00, 0.3719975E+00 /
      data (ref_adm(14,iz,26, 9),iz = 1,20) / &
     & 0.5515000E+00, 0.5515000E+00, 0.5540000E+00, 0.5811800E+00, &
     & 0.5652300E+00, 0.5875400E+00, 0.5820100E+00, 0.5719300E+00, &
     & 0.5705700E+00, 0.5781200E+00, 0.5711200E+00, 0.5834400E+00, &
     & 0.5748100E+00, 0.5896900E+00, 0.6151100E+00, 0.6079400E+00, &
     & 0.5123800E+00, 0.4829600E+00, 0.3744143E+00, 0.3744143E+00 /
      data (ref_adm(14,iz,27, 9),iz = 1,20) / &
     & 0.5648900E+00, 0.5648900E+00, 0.6044100E+00, 0.5957800E+00, &
     & 0.5763300E+00, 0.5930200E+00, 0.5852300E+00, 0.5797000E+00, &
     & 0.5746600E+00, 0.5778100E+00, 0.5789300E+00, 0.5750300E+00, &
     & 0.5583500E+00, 0.5392100E+00, 0.5789200E+00, 0.5636400E+00, &
     & 0.5253700E+00, 0.4832400E+00, 0.3772211E+00, 0.3772211E+00 /
      data (ref_adm(14,iz,28, 9),iz = 1,20) / &
     & 0.5854600E+00, 0.5854600E+00, 0.5936500E+00, 0.6073200E+00, &
     & 0.5911900E+00, 0.5809100E+00, 0.5942200E+00, 0.5972000E+00, &
     & 0.5888000E+00, 0.5818500E+00, 0.5767600E+00, 0.5827900E+00, &
     & 0.5919500E+00, 0.5520000E+00, 0.5445800E+00, 0.5325100E+00, &
     & 0.4896500E+00, 0.5067300E+00, 0.3448800E+00, 0.3448800E+00 /
      data (ref_adm(14,iz,29, 9),iz = 1,20) / &
     & 0.5634000E+00, 0.5634000E+00, 0.5886400E+00, 0.5776900E+00, &
     & 0.5529000E+00, 0.5882200E+00, 0.5978700E+00, 0.5739700E+00, &
     & 0.5523700E+00, 0.5860600E+00, 0.5879300E+00, 0.5995200E+00, &
     & 0.5851700E+00, 0.5701400E+00, 0.5585700E+00, 0.5394500E+00, &
     & 0.5153300E+00, 0.4700000E+00, 0.3749500E+00, 0.3749500E+00 /
      data (ref_adm(14,iz,30, 9),iz = 1,20) / &
     & 0.5825600E+00, 0.5825600E+00, 0.5573800E+00, 0.5565200E+00, &
     & 0.5565100E+00, 0.5809400E+00, 0.5830900E+00, 0.5693000E+00, &
     & 0.5541100E+00, 0.5635400E+00, 0.5901700E+00, 0.6218700E+00, &
     & 0.5807100E+00, 0.5722500E+00, 0.5759800E+00, 0.5271000E+00, &
     & 0.4983900E+00, 0.4718600E+00, 0.3878800E+00, 0.3878800E+00 /
      data (ref_adm(14,iz,31, 9),iz = 1,20) / &
     & 0.5601600E+00, 0.5601600E+00, 0.5742200E+00, 0.5893800E+00, &
     & 0.5678000E+00, 0.5880900E+00, 0.5969900E+00, 0.6343200E+00, &
     & 0.6668400E+00, 0.6471200E+00, 0.6075100E+00, 0.6055700E+00, &
     & 0.5756800E+00, 0.5568700E+00, 0.5478600E+00, 0.5145000E+00, &
     & 0.4937900E+00, 0.4566600E+00, 0.3687400E+00, 0.3687400E+00 /
      data (ref_adm(14,iz,32, 9),iz = 1,20) / &
     & 0.5686500E+00, 0.5686500E+00, 0.5160500E+00, 0.5444900E+00, &
     & 0.5732800E+00, 0.5787900E+00, 0.6277400E+00, 0.5917600E+00, &
     & 0.6219300E+00, 0.5734400E+00, 0.5466600E+00, 0.5771100E+00, &
     & 0.6289200E+00, 0.5727000E+00, 0.5916100E+00, 0.5270800E+00, &
     & 0.5269600E+00, 0.4702500E+00, 0.3962068E+00, 0.3962068E+00 /
      data (ref_adm(14,iz,33, 9),iz = 1,20) / &
     & 0.5418000E+00, 0.5418000E+00, 0.5627800E+00, 0.5743800E+00, &
     & 0.5462800E+00, 0.5820400E+00, 0.5666600E+00, 0.6066400E+00, &
     & 0.6156800E+00, 0.5899400E+00, 0.5985700E+00, 0.6337500E+00, &
     & 0.6070300E+00, 0.5700000E+00, 0.5365400E+00, 0.5421300E+00, &
     & 0.5173900E+00, 0.4591790E+00, 0.3369700E+00, 0.3369700E+00 /
      data (ref_adm(14,iz,34, 9),iz = 1,20) / &
     & 0.5606300E+00, 0.5606300E+00, 0.6029600E+00, 0.5945700E+00, &
     & 0.6203300E+00, 0.5751100E+00, 0.5893900E+00, 0.6264500E+00, &
     & 0.5970900E+00, 0.5952200E+00, 0.6134300E+00, 0.6573100E+00, &
     & 0.5757900E+00, 0.5348400E+00, 0.5549300E+00, 0.5265000E+00, &
     & 0.4830500E+00, 0.4105200E+00, 0.4023264E+00, 0.4023264E+00 /
      data (ref_adm(14,iz,35, 9),iz = 1,20) / &
     & 0.5697900E+00, 0.5697900E+00, 0.5698000E+00, 0.5438700E+00, &
     & 0.5808400E+00, 0.6098500E+00, 0.5744400E+00, 0.5593500E+00, &
     & 0.6112400E+00, 0.6178700E+00, 0.6179300E+00, 0.6503000E+00, &
     & 0.6320700E+00, 0.5555700E+00, 0.5973700E+00, 0.5458000E+00, &
     & 0.5002100E+00, 0.4040200E+00, 0.4046831E+00, 0.4046831E+00 /
      data (ref_adm(14,iz,36, 9),iz = 1,20) / &
     & 0.5786900E+00, 0.5786900E+00, 0.5923600E+00, 0.5508300E+00, &
     & 0.5658800E+00, 0.6147900E+00, 0.5896900E+00, 0.5627100E+00, &
     & 0.6098000E+00, 0.6273100E+00, 0.6741500E+00, 0.6199700E+00, &
     & 0.5935500E+00, 0.5811900E+00, 0.5748000E+00, 0.5108000E+00, &
     & 0.5130600E+00, 0.4701177E+00, 0.4063221E+00, 0.4063221E+00 /
      data (ref_adm(14,iz,37, 9),iz = 1,20) / &
     & 0.5633200E+00, 0.5633200E+00, 0.5658800E+00, 0.5752600E+00, &
     & 0.5590500E+00, 0.5740300E+00, 0.5745700E+00, 0.6208700E+00, &
     & 0.6248600E+00, 0.6406300E+00, 0.6404200E+00, 0.5233100E+00, &
     & 0.5535700E+00, 0.5625200E+00, 0.5375900E+00, 0.5396300E+00, &
     & 0.5263876E+00, 0.4718926E+00, 0.4072996E+00, 0.4072996E+00 /
      data (ref_adm(14,iz,38, 9),iz = 1,20) / &
     & 0.5633200E+00, 0.5633200E+00, 0.5658800E+00, 0.5752600E+00, &
     & 0.5590500E+00, 0.5740300E+00, 0.5745700E+00, 0.6208700E+00, &
     & 0.6248600E+00, 0.6406300E+00, 0.6404200E+00, 0.5233100E+00, &
     & 0.5535700E+00, 0.5625200E+00, 0.5375900E+00, 0.5396300E+00, &
     & 0.5263876E+00, 0.4718926E+00, 0.4072996E+00, 0.4072996E+00 /
! Solar Zenith Angle 45.0 Albedo  0.5850841E+00
      data (ref_adm(14,iz, 1,10),iz = 1,20) / &
     & 0.5757000E+00, 0.5757000E+00, 0.5894400E+00, 0.6205300E+00, &
     & 0.6043100E+00, 0.5814000E+00, 0.5840900E+00, 0.5876400E+00, &
     & 0.5800500E+00, 0.5986200E+00, 0.6432500E+00, 0.6530700E+00, &
     & 0.6798600E+00, 0.7109300E+00, 0.7282100E+00, 0.7653200E+00, &
     & 0.7549000E+00, 0.7511700E+00, 0.6203467E+00, 0.6203467E+00 /
      data (ref_adm(14,iz, 2,10),iz = 1,20) / &
     & 0.5757000E+00, 0.5757000E+00, 0.5894400E+00, 0.6205300E+00, &
     & 0.6043100E+00, 0.5814000E+00, 0.5840900E+00, 0.5876400E+00, &
     & 0.5800500E+00, 0.5986200E+00, 0.6432500E+00, 0.6530700E+00, &
     & 0.6798600E+00, 0.7109300E+00, 0.7282100E+00, 0.7653200E+00, &
     & 0.7549000E+00, 0.7511700E+00, 0.6203467E+00, 0.6203467E+00 /
      data (ref_adm(14,iz, 3,10),iz = 1,20) / &
     & 0.5769400E+00, 0.5769400E+00, 0.6008600E+00, 0.5967100E+00, &
     & 0.5984100E+00, 0.5802500E+00, 0.5826800E+00, 0.5821800E+00, &
     & 0.5813400E+00, 0.6004900E+00, 0.6196700E+00, 0.6593100E+00, &
     & 0.6740500E+00, 0.6892000E+00, 0.7006200E+00, 0.7465600E+00, &
     & 0.7554000E+00, 0.7237900E+00, 0.6223300E+00, 0.6223300E+00 /
      data (ref_adm(14,iz, 4,10),iz = 1,20) / &
     & 0.5871000E+00, 0.5871000E+00, 0.5854900E+00, 0.5439500E+00, &
     & 0.5810900E+00, 0.5816700E+00, 0.5796800E+00, 0.5822300E+00, &
     & 0.5952600E+00, 0.6241300E+00, 0.6132100E+00, 0.6439200E+00, &
     & 0.6552000E+00, 0.6790900E+00, 0.6955600E+00, 0.7155300E+00, &
     & 0.7624500E+00, 0.7071800E+00, 0.6105900E+00, 0.6105900E+00 /
      data (ref_adm(14,iz, 5,10),iz = 1,20) / &
     & 0.5585600E+00, 0.5585600E+00, 0.5565200E+00, 0.5249700E+00, &
     & 0.5679900E+00, 0.5692700E+00, 0.5781200E+00, 0.5905800E+00, &
     & 0.6019000E+00, 0.6085700E+00, 0.6172900E+00, 0.6474300E+00, &
     & 0.6649800E+00, 0.6864300E+00, 0.6973800E+00, 0.7481600E+00, &
     & 0.7656400E+00, 0.6835100E+00, 0.5615300E+00, 0.5615300E+00 /
      data (ref_adm(14,iz, 6,10),iz = 1,20) / &
     & 0.5496700E+00, 0.5496700E+00, 0.5135800E+00, 0.5514300E+00, &
     & 0.5412700E+00, 0.5341300E+00, 0.5880700E+00, 0.6049500E+00, &
     & 0.6155300E+00, 0.5939700E+00, 0.6257500E+00, 0.6412500E+00, &
     & 0.6837500E+00, 0.6894000E+00, 0.7083600E+00, 0.7303100E+00, &
     & 0.7428400E+00, 0.6419800E+00, 0.5859600E+00, 0.5859600E+00 /
      data (ref_adm(14,iz, 7,10),iz = 1,20) / &
     & 0.5510800E+00, 0.5510800E+00, 0.5508400E+00, 0.5534800E+00, &
     & 0.5752600E+00, 0.5553300E+00, 0.5589000E+00, 0.5827000E+00, &
     & 0.5836600E+00, 0.6327000E+00, 0.6307600E+00, 0.6240000E+00, &
     & 0.6399400E+00, 0.6541300E+00, 0.6938200E+00, 0.6737100E+00, &
     & 0.6668200E+00, 0.6390800E+00, 0.5298200E+00, 0.5298200E+00 /
      data (ref_adm(14,iz, 8,10),iz = 1,20) / &
     & 0.5303600E+00, 0.5303600E+00, 0.5023800E+00, 0.5309800E+00, &
     & 0.5328200E+00, 0.5601300E+00, 0.5443400E+00, 0.5641000E+00, &
     & 0.5847300E+00, 0.6083300E+00, 0.6106000E+00, 0.6181000E+00, &
     & 0.6233100E+00, 0.6418300E+00, 0.6595400E+00, 0.6868100E+00, &
     & 0.6818000E+00, 0.6243600E+00, 0.5535500E+00, 0.5535500E+00 /
      data (ref_adm(14,iz, 9,10),iz = 1,20) / &
     & 0.5649400E+00, 0.5649400E+00, 0.5636400E+00, 0.5475700E+00, &
     & 0.5409900E+00, 0.5266300E+00, 0.5519600E+00, 0.5597900E+00, &
     & 0.5794400E+00, 0.5777000E+00, 0.5978700E+00, 0.6119200E+00, &
     & 0.6271800E+00, 0.6365700E+00, 0.6664900E+00, 0.6868100E+00, &
     & 0.6724800E+00, 0.6235700E+00, 0.5356768E+00, 0.5356768E+00 /
      data (ref_adm(14,iz,10,10),iz = 1,20) / &
     & 0.5696800E+00, 0.5696800E+00, 0.5588700E+00, 0.5810500E+00, &
     & 0.5575200E+00, 0.5776700E+00, 0.5577800E+00, 0.5261200E+00, &
     & 0.5630700E+00, 0.5719200E+00, 0.6082700E+00, 0.5866800E+00, &
     & 0.6056900E+00, 0.6168500E+00, 0.6339000E+00, 0.6347200E+00, &
     & 0.6625500E+00, 0.5879000E+00, 0.4883300E+00, 0.4883300E+00 /
      data (ref_adm(14,iz,11,10),iz = 1,20) / &
     & 0.5345700E+00, 0.5345700E+00, 0.5480800E+00, 0.5470000E+00, &
     & 0.5658700E+00, 0.5415100E+00, 0.5258500E+00, 0.5298000E+00, &
     & 0.5469500E+00, 0.5693600E+00, 0.6102200E+00, 0.5890200E+00, &
     & 0.6053000E+00, 0.6290200E+00, 0.6106800E+00, 0.6288500E+00, &
     & 0.6226500E+00, 0.5693600E+00, 0.5064434E+00, 0.5064434E+00 /
      data (ref_adm(14,iz,12,10),iz = 1,20) / &
     & 0.5642500E+00, 0.5642500E+00, 0.5847400E+00, 0.6132400E+00, &
     & 0.5979000E+00, 0.5923000E+00, 0.5733300E+00, 0.5446200E+00, &
     & 0.5620500E+00, 0.5707900E+00, 0.5880100E+00, 0.5986800E+00, &
     & 0.6049600E+00, 0.5992400E+00, 0.5909300E+00, 0.6099400E+00, &
     & 0.5908900E+00, 0.5451900E+00, 0.4527800E+00, 0.4527800E+00 /
      data (ref_adm(14,iz,13,10),iz = 1,20) / &
     & 0.5858500E+00, 0.5858500E+00, 0.5741900E+00, 0.5748000E+00, &
     & 0.5743900E+00, 0.5730600E+00, 0.5846800E+00, 0.5790100E+00, &
     & 0.5759700E+00, 0.5917700E+00, 0.6163600E+00, 0.6158300E+00, &
     & 0.5959200E+00, 0.5866900E+00, 0.6060500E+00, 0.6236000E+00, &
     & 0.5779900E+00, 0.5185100E+00, 0.4195500E+00, 0.4195500E+00 /
      data (ref_adm(14,iz,14,10),iz = 1,20) / &
     & 0.5582500E+00, 0.5582500E+00, 0.5430300E+00, 0.5397200E+00, &
     & 0.5515600E+00, 0.5413000E+00, 0.5619400E+00, 0.5743000E+00, &
     & 0.5900500E+00, 0.5852100E+00, 0.5908000E+00, 0.5994000E+00, &
     & 0.6179300E+00, 0.6443400E+00, 0.6227000E+00, 0.6104900E+00, &
     & 0.5803500E+00, 0.4874600E+00, 0.4133000E+00, 0.4133000E+00 /
      data (ref_adm(14,iz,15,10),iz = 1,20) / &
     & 0.5427500E+00, 0.5427500E+00, 0.5325200E+00, 0.5163200E+00, &
     & 0.5227900E+00, 0.5352500E+00, 0.5248800E+00, 0.5268900E+00, &
     & 0.5358600E+00, 0.5404700E+00, 0.5753600E+00, 0.5754000E+00, &
     & 0.5808500E+00, 0.5884100E+00, 0.5673000E+00, 0.5704600E+00, &
     & 0.5642800E+00, 0.4691800E+00, 0.4684380E+00, 0.4684380E+00 /
      data (ref_adm(14,iz,16,10),iz = 1,20) / &
     & 0.5510600E+00, 0.5510600E+00, 0.5819500E+00, 0.5431500E+00, &
     & 0.5113100E+00, 0.5399000E+00, 0.5760400E+00, 0.5786500E+00, &
     & 0.5681200E+00, 0.5318400E+00, 0.5571700E+00, 0.5681000E+00, &
     & 0.5791700E+00, 0.5684700E+00, 0.5638500E+00, 0.5111100E+00, &
     & 0.5135600E+00, 0.4573000E+00, 0.4588017E+00, 0.4588017E+00 /
      data (ref_adm(14,iz,17,10),iz = 1,20) / &
     & 0.5449200E+00, 0.5449200E+00, 0.5464100E+00, 0.5503400E+00, &
     & 0.5083400E+00, 0.5390300E+00, 0.5564000E+00, 0.5836400E+00, &
     & 0.5366900E+00, 0.5158600E+00, 0.5777700E+00, 0.5867300E+00, &
     & 0.5639100E+00, 0.6151600E+00, 0.5690600E+00, 0.5135900E+00, &
     & 0.4453100E+00, 0.5448723E+00, 0.4504604E+00, 0.4504604E+00 /
      data (ref_adm(14,iz,18,10),iz = 1,20) / &
     & 0.5339200E+00, 0.5339200E+00, 0.5279200E+00, 0.5544500E+00, &
     & 0.5274400E+00, 0.5464600E+00, 0.5934300E+00, 0.5553100E+00, &
     & 0.5469900E+00, 0.5708600E+00, 0.5708900E+00, 0.5815900E+00, &
     & 0.5659700E+00, 0.5839000E+00, 0.5331000E+00, 0.5112200E+00, &
     & 0.4633000E+00, 0.4919724E+00, 0.4045645E+00, 0.4045645E+00 /
      data (ref_adm(14,iz,19,10),iz = 1,20) / &
     & 0.5407200E+00, 0.5407200E+00, 0.5258000E+00, 0.5191700E+00, &
     & 0.5504600E+00, 0.5534900E+00, 0.5885600E+00, 0.5773300E+00, &
     & 0.5578600E+00, 0.5693500E+00, 0.5899200E+00, 0.5980400E+00, &
     & 0.5858200E+00, 0.5535400E+00, 0.5884300E+00, 0.5459884E+00, &
     & 0.4252900E+00, 0.4852456E+00, 0.4004094E+00, 0.4004094E+00 /
      data (ref_adm(14,iz,20,10),iz = 1,20) / &
     & 0.5150300E+00, 0.5150300E+00, 0.5258700E+00, 0.5266900E+00, &
     & 0.5380000E+00, 0.5476700E+00, 0.5556900E+00, 0.5424900E+00, &
     & 0.5469200E+00, 0.5412700E+00, 0.5860500E+00, 0.5844000E+00, &
     & 0.5690500E+00, 0.5368600E+00, 0.5344100E+00, 0.5450000E+00, &
     & 0.5188089E+00, 0.4792374E+00, 0.3980175E+00, 0.3980175E+00 /
      data (ref_adm(14,iz,21,10),iz = 1,20) / &
     & 0.5383300E+00, 0.5383300E+00, 0.5822200E+00, 0.5616500E+00, &
     & 0.5866900E+00, 0.5879800E+00, 0.5763100E+00, 0.5354900E+00, &
     & 0.5363600E+00, 0.5459600E+00, 0.5802000E+00, 0.5693200E+00, &
     & 0.5929700E+00, 0.5336100E+00, 0.5407900E+00, 0.5258900E+00, &
     & 0.5131223E+00, 0.4740370E+00, 0.3965712E+00, 0.3965712E+00 /
      data (ref_adm(14,iz,22,10),iz = 1,20) / &
     & 0.5358900E+00, 0.5358900E+00, 0.5309800E+00, 0.5630900E+00, &
     & 0.5710100E+00, 0.5696500E+00, 0.5903900E+00, 0.5663800E+00, &
     & 0.5516100E+00, 0.5864300E+00, 0.5904900E+00, 0.5939700E+00, &
     & 0.5713400E+00, 0.5818200E+00, 0.5652300E+00, 0.5944000E+00, &
     & 0.5218971E+00, 0.4805351E+00, 0.3940698E+00, 0.3940698E+00 /
      data (ref_adm(14,iz,23,10),iz = 1,20) / &
     & 0.5387400E+00, 0.5387400E+00, 0.5530200E+00, 0.5350800E+00, &
     & 0.5449900E+00, 0.5572100E+00, 0.5914600E+00, 0.5812000E+00, &
     & 0.5799900E+00, 0.5849200E+00, 0.5782200E+00, 0.5877400E+00, &
     & 0.5644600E+00, 0.5516400E+00, 0.5672400E+00, 0.5666700E+00, &
     & 0.5576700E+00, 0.4758178E+00, 0.3931363E+00, 0.3931363E+00 /
      data (ref_adm(14,iz,24,10),iz = 1,20) / &
     & 0.5354800E+00, 0.5354800E+00, 0.5356300E+00, 0.5667200E+00, &
     & 0.5455800E+00, 0.5618700E+00, 0.5879200E+00, 0.6004400E+00, &
     & 0.5910900E+00, 0.5874000E+00, 0.5820700E+00, 0.5732900E+00, &
     & 0.5722500E+00, 0.5710700E+00, 0.5690500E+00, 0.5107300E+00, &
     & 0.5061000E+00, 0.4720915E+00, 0.3926979E+00, 0.3926979E+00 /
      data (ref_adm(14,iz,25,10),iz = 1,20) / &
     & 0.5342600E+00, 0.5342600E+00, 0.5308700E+00, 0.5473900E+00, &
     & 0.5509800E+00, 0.5600800E+00, 0.5715200E+00, 0.5707900E+00, &
     & 0.5931400E+00, 0.6015700E+00, 0.6075400E+00, 0.6039200E+00, &
     & 0.5783200E+00, 0.5987200E+00, 0.6002800E+00, 0.5355800E+00, &
     & 0.5280800E+00, 0.4645100E+00, 0.3928039E+00, 0.3928039E+00 /
      data (ref_adm(14,iz,26,10),iz = 1,20) / &
     & 0.5431700E+00, 0.5431700E+00, 0.5450600E+00, 0.5520800E+00, &
     & 0.5655400E+00, 0.5624100E+00, 0.5727900E+00, 0.5661600E+00, &
     & 0.5871000E+00, 0.5857300E+00, 0.5833500E+00, 0.5837600E+00, &
     & 0.5882900E+00, 0.5781800E+00, 0.5317000E+00, 0.5508600E+00, &
     & 0.5263000E+00, 0.4995800E+00, 0.4137300E+00, 0.4137300E+00 /
      data (ref_adm(14,iz,27,10),iz = 1,20) / &
     & 0.5618400E+00, 0.5618400E+00, 0.5758000E+00, 0.5654800E+00, &
     & 0.5886000E+00, 0.5928700E+00, 0.5869800E+00, 0.5848300E+00, &
     & 0.5962100E+00, 0.6115400E+00, 0.5865000E+00, 0.5677900E+00, &
     & 0.5739200E+00, 0.5707000E+00, 0.5598600E+00, 0.5569200E+00, &
     & 0.5223100E+00, 0.4841300E+00, 0.4499400E+00, 0.4499400E+00 /
      data (ref_adm(14,iz,28,10),iz = 1,20) / &
     & 0.5720400E+00, 0.5720400E+00, 0.5600400E+00, 0.5678100E+00, &
     & 0.5666600E+00, 0.5731600E+00, 0.5935800E+00, 0.6040800E+00, &
     & 0.6180900E+00, 0.6248200E+00, 0.6211300E+00, 0.5926400E+00, &
     & 0.6100400E+00, 0.6040500E+00, 0.5670800E+00, 0.5514900E+00, &
     & 0.5291100E+00, 0.5025600E+00, 0.4565100E+00, 0.4565100E+00 /
      data (ref_adm(14,iz,29,10),iz = 1,20) / &
     & 0.5739800E+00, 0.5739800E+00, 0.5671000E+00, 0.5588300E+00, &
     & 0.5691800E+00, 0.5740700E+00, 0.5841800E+00, 0.5836600E+00, &
     & 0.5951500E+00, 0.5775000E+00, 0.6009900E+00, 0.5964700E+00, &
     & 0.6158100E+00, 0.6216200E+00, 0.5788800E+00, 0.5637600E+00, &
     & 0.5466500E+00, 0.4903600E+00, 0.3785100E+00, 0.3785100E+00 /
      data (ref_adm(14,iz,30,10),iz = 1,20) / &
     & 0.5680800E+00, 0.5680800E+00, 0.5670400E+00, 0.5683000E+00, &
     & 0.5471000E+00, 0.5528300E+00, 0.5607300E+00, 0.5616700E+00, &
     & 0.5959700E+00, 0.5909000E+00, 0.5924200E+00, 0.5685500E+00, &
     & 0.5794800E+00, 0.5956200E+00, 0.6049700E+00, 0.5732300E+00, &
     & 0.5432700E+00, 0.4943800E+00, 0.3998100E+00, 0.3998100E+00 /
      data (ref_adm(14,iz,31,10),iz = 1,20) / &
     & 0.5588300E+00, 0.5588300E+00, 0.5509600E+00, 0.5428000E+00, &
     & 0.5591700E+00, 0.5715700E+00, 0.5705000E+00, 0.5852500E+00, &
     & 0.6017900E+00, 0.6261800E+00, 0.6209300E+00, 0.5989400E+00, &
     & 0.5964000E+00, 0.5758500E+00, 0.5684300E+00, 0.5578300E+00, &
     & 0.5324700E+00, 0.4805100E+00, 0.3791900E+00, 0.3791900E+00 /
      data (ref_adm(14,iz,32,10),iz = 1,20) / &
     & 0.5611800E+00, 0.5611800E+00, 0.5651400E+00, 0.5719700E+00, &
     & 0.5783700E+00, 0.5784600E+00, 0.5956500E+00, 0.5930500E+00, &
     & 0.6262100E+00, 0.6245800E+00, 0.6124300E+00, 0.6136100E+00, &
     & 0.5830900E+00, 0.5791500E+00, 0.5753400E+00, 0.5728500E+00, &
     & 0.5382700E+00, 0.4805800E+00, 0.4009500E+00, 0.4009500E+00 /
      data (ref_adm(14,iz,33,10),iz = 1,20) / &
     & 0.5520400E+00, 0.5520400E+00, 0.5581400E+00, 0.5596100E+00, &
     & 0.5729500E+00, 0.6126600E+00, 0.5964000E+00, 0.6066000E+00, &
     & 0.6231800E+00, 0.6103400E+00, 0.6268500E+00, 0.6415200E+00, &
     & 0.6076000E+00, 0.5992800E+00, 0.5858900E+00, 0.5731200E+00, &
     & 0.5375300E+00, 0.4715900E+00, 0.4107649E+00, 0.4107649E+00 /
      data (ref_adm(14,iz,34,10),iz = 1,20) / &
     & 0.5453100E+00, 0.5453100E+00, 0.5359200E+00, 0.5781600E+00, &
     & 0.5599200E+00, 0.5944300E+00, 0.5978700E+00, 0.5892100E+00, &
     & 0.5930400E+00, 0.6088800E+00, 0.6427700E+00, 0.6422500E+00, &
     & 0.6231800E+00, 0.6187800E+00, 0.5783400E+00, 0.5404000E+00, &
     & 0.5296100E+00, 0.4640300E+00, 0.3709700E+00, 0.3709700E+00 /
      data (ref_adm(14,iz,35,10),iz = 1,20) / &
     & 0.5609600E+00, 0.5609600E+00, 0.5529700E+00, 0.5597300E+00, &
     & 0.5792700E+00, 0.5879200E+00, 0.5882700E+00, 0.5842600E+00, &
     & 0.5788000E+00, 0.6074000E+00, 0.6292500E+00, 0.6439800E+00, &
     & 0.6436800E+00, 0.6158500E+00, 0.5691400E+00, 0.5475000E+00, &
     & 0.5332000E+00, 0.4757100E+00, 0.3512200E+00, 0.3512200E+00 /
      data (ref_adm(14,iz,36,10),iz = 1,20) / &
     & 0.5706700E+00, 0.5706700E+00, 0.5672700E+00, 0.5813100E+00, &
     & 0.5992700E+00, 0.5719800E+00, 0.5976600E+00, 0.5967400E+00, &
     & 0.6080300E+00, 0.6081600E+00, 0.6290700E+00, 0.6476600E+00, &
     & 0.6293600E+00, 0.6056800E+00, 0.5541700E+00, 0.5405600E+00, &
     & 0.5098900E+00, 0.4756600E+00, 0.4161925E+00, 0.4161925E+00 /
      data (ref_adm(14,iz,37,10),iz = 1,20) / &
     & 0.5737200E+00, 0.5737200E+00, 0.5879900E+00, 0.6082500E+00, &
     & 0.5944700E+00, 0.5624900E+00, 0.5461100E+00, 0.5984100E+00, &
     & 0.5976000E+00, 0.6186100E+00, 0.6281000E+00, 0.6407900E+00, &
     & 0.6183000E+00, 0.5692200E+00, 0.5716100E+00, 0.5758900E+00, &
     & 0.5027600E+00, 0.4763099E+00, 0.4169527E+00, 0.4169527E+00 /
      data (ref_adm(14,iz,38,10),iz = 1,20) / &
     & 0.5737200E+00, 0.5737200E+00, 0.5879900E+00, 0.6082500E+00, &
     & 0.5944700E+00, 0.5624900E+00, 0.5461100E+00, 0.5984100E+00, &
     & 0.5976000E+00, 0.6186100E+00, 0.6281000E+00, 0.6407900E+00, &
     & 0.6183000E+00, 0.5692200E+00, 0.5716100E+00, 0.5758900E+00, &
     & 0.5027600E+00, 0.4763099E+00, 0.4169527E+00, 0.4169527E+00 /
! Solar Zenith Angle 50.0 Albedo  0.5826732E+00
      data (ref_adm(14,iz, 1,11),iz = 1,20) / &
     & 0.5072300E+00, 0.5072300E+00, 0.5221000E+00, 0.5241200E+00, &
     & 0.5444500E+00, 0.5298600E+00, 0.5406100E+00, 0.5576500E+00, &
     & 0.5664400E+00, 0.5785300E+00, 0.6206700E+00, 0.6999000E+00, &
     & 0.7305000E+00, 0.7638000E+00, 0.8029300E+00, 0.8262400E+00, &
     & 0.8784400E+00, 0.8951800E+00, 0.7289200E+00, 0.7289200E+00 /
      data (ref_adm(14,iz, 2,11),iz = 1,20) / &
     & 0.5072300E+00, 0.5072300E+00, 0.5221000E+00, 0.5241200E+00, &
     & 0.5444500E+00, 0.5298600E+00, 0.5406100E+00, 0.5576500E+00, &
     & 0.5664400E+00, 0.5785300E+00, 0.6206700E+00, 0.6999000E+00, &
     & 0.7305000E+00, 0.7638000E+00, 0.8029300E+00, 0.8262400E+00, &
     & 0.8784400E+00, 0.8951800E+00, 0.7289200E+00, 0.7289200E+00 /
      data (ref_adm(14,iz, 3,11),iz = 1,20) / &
     & 0.5181600E+00, 0.5181600E+00, 0.5239000E+00, 0.5292200E+00, &
     & 0.5465300E+00, 0.5296300E+00, 0.5427300E+00, 0.5530400E+00, &
     & 0.5667900E+00, 0.5933400E+00, 0.6341300E+00, 0.6522400E+00, &
     & 0.7185100E+00, 0.7718100E+00, 0.7954900E+00, 0.8288700E+00, &
     & 0.8476800E+00, 0.8508000E+00, 0.6724900E+00, 0.6724900E+00 /
      data (ref_adm(14,iz, 4,11),iz = 1,20) / &
     & 0.5175500E+00, 0.5175500E+00, 0.5308600E+00, 0.5049700E+00, &
     & 0.5238700E+00, 0.5327300E+00, 0.5397600E+00, 0.5518900E+00, &
     & 0.5701300E+00, 0.5926300E+00, 0.6264900E+00, 0.6607700E+00, &
     & 0.7031200E+00, 0.7504700E+00, 0.7789300E+00, 0.8112600E+00, &
     & 0.8489700E+00, 0.8318600E+00, 0.6499200E+00, 0.6499200E+00 /
      data (ref_adm(14,iz, 5,11),iz = 1,20) / &
     & 0.5318300E+00, 0.5318300E+00, 0.5247100E+00, 0.5205900E+00, &
     & 0.5230300E+00, 0.5299500E+00, 0.5454500E+00, 0.5627600E+00, &
     & 0.5888500E+00, 0.5970100E+00, 0.6270500E+00, 0.6360800E+00, &
     & 0.6875800E+00, 0.7292400E+00, 0.7614000E+00, 0.7989100E+00, &
     & 0.8149900E+00, 0.7905600E+00, 0.6516700E+00, 0.6516700E+00 /
      data (ref_adm(14,iz, 6,11),iz = 1,20) / &
     & 0.5408700E+00, 0.5408700E+00, 0.5456400E+00, 0.5328900E+00, &
     & 0.5318400E+00, 0.5276400E+00, 0.5331900E+00, 0.5615000E+00, &
     & 0.5819000E+00, 0.6034000E+00, 0.6261000E+00, 0.6514500E+00, &
     & 0.6898100E+00, 0.7257600E+00, 0.7616100E+00, 0.7764500E+00, &
     & 0.7903600E+00, 0.7358300E+00, 0.6637300E+00, 0.6637300E+00 /
      data (ref_adm(14,iz, 7,11),iz = 1,20) / &
     & 0.5300000E+00, 0.5300000E+00, 0.5229500E+00, 0.5269300E+00, &
     & 0.5153800E+00, 0.5249100E+00, 0.5175000E+00, 0.5400200E+00, &
     & 0.5655200E+00, 0.5859200E+00, 0.5989500E+00, 0.6280000E+00, &
     & 0.6653800E+00, 0.6975100E+00, 0.7355000E+00, 0.7765900E+00, &
     & 0.8036700E+00, 0.7659200E+00, 0.6532900E+00, 0.6532900E+00 /
      data (ref_adm(14,iz, 8,11),iz = 1,20) / &
     & 0.5269900E+00, 0.5269900E+00, 0.5282300E+00, 0.5303600E+00, &
     & 0.5290000E+00, 0.5106800E+00, 0.5193200E+00, 0.5284400E+00, &
     & 0.5545200E+00, 0.5888500E+00, 0.5914500E+00, 0.6395500E+00, &
     & 0.6530400E+00, 0.6726300E+00, 0.7040900E+00, 0.7155300E+00, &
     & 0.7167100E+00, 0.6679100E+00, 0.5583800E+00, 0.5583800E+00 /
      data (ref_adm(14,iz, 9,11),iz = 1,20) / &
     & 0.5080700E+00, 0.5080700E+00, 0.5076900E+00, 0.5086000E+00, &
     & 0.5165600E+00, 0.5279000E+00, 0.5449300E+00, 0.5519700E+00, &
     & 0.5605100E+00, 0.5847300E+00, 0.6134800E+00, 0.6276700E+00, &
     & 0.6488400E+00, 0.6642800E+00, 0.6959800E+00, 0.6948100E+00, &
     & 0.6981900E+00, 0.6581600E+00, 0.5646400E+00, 0.5646400E+00 /
      data (ref_adm(14,iz,10,11),iz = 1,20) / &
     & 0.5005500E+00, 0.5005500E+00, 0.5151100E+00, 0.4957700E+00, &
     & 0.5076600E+00, 0.5007100E+00, 0.5451500E+00, 0.5524300E+00, &
     & 0.5670800E+00, 0.5783600E+00, 0.5944300E+00, 0.6027200E+00, &
     & 0.6235600E+00, 0.6467100E+00, 0.6645400E+00, 0.6840300E+00, &
     & 0.6881200E+00, 0.6300400E+00, 0.5496600E+00, 0.5496600E+00 /
      data (ref_adm(14,iz,11,11),iz = 1,20) / &
     & 0.5092900E+00, 0.5092900E+00, 0.5190100E+00, 0.5212300E+00, &
     & 0.5030700E+00, 0.5340600E+00, 0.5397200E+00, 0.5553900E+00, &
     & 0.5649100E+00, 0.5643300E+00, 0.5982900E+00, 0.6149200E+00, &
     & 0.6204900E+00, 0.6469400E+00, 0.6585500E+00, 0.6585000E+00, &
     & 0.6516500E+00, 0.5806600E+00, 0.4805500E+00, 0.4805500E+00 /
      data (ref_adm(14,iz,12,11),iz = 1,20) / &
     & 0.5278900E+00, 0.5278900E+00, 0.5307900E+00, 0.5072800E+00, &
     & 0.5274800E+00, 0.5404600E+00, 0.5426600E+00, 0.5446300E+00, &
     & 0.5597800E+00, 0.5647100E+00, 0.5955000E+00, 0.6030400E+00, &
     & 0.6117200E+00, 0.6152400E+00, 0.6261100E+00, 0.6610700E+00, &
     & 0.6246000E+00, 0.5573200E+00, 0.4829100E+00, 0.4829100E+00 /
      data (ref_adm(14,iz,13,11),iz = 1,20) / &
     & 0.5399900E+00, 0.5399900E+00, 0.5476800E+00, 0.5465300E+00, &
     & 0.5403600E+00, 0.5452600E+00, 0.5541000E+00, 0.5714200E+00, &
     & 0.5904400E+00, 0.6089900E+00, 0.6123100E+00, 0.6021300E+00, &
     & 0.6087700E+00, 0.6087600E+00, 0.6134600E+00, 0.6193800E+00, &
     & 0.6133500E+00, 0.5518800E+00, 0.4726300E+00, 0.4726300E+00 /
      data (ref_adm(14,iz,14,11),iz = 1,20) / &
     & 0.5331300E+00, 0.5331300E+00, 0.5311000E+00, 0.5297800E+00, &
     & 0.5366100E+00, 0.5397000E+00, 0.5522600E+00, 0.5532000E+00, &
     & 0.5678100E+00, 0.5781400E+00, 0.6054400E+00, 0.6140300E+00, &
     & 0.6257200E+00, 0.6193400E+00, 0.5873700E+00, 0.5964900E+00, &
     & 0.6033100E+00, 0.5181800E+00, 0.4381900E+00, 0.4381900E+00 /
      data (ref_adm(14,iz,15,11),iz = 1,20) / &
     & 0.5118400E+00, 0.5118400E+00, 0.5104500E+00, 0.5110300E+00, &
     & 0.5080700E+00, 0.5116900E+00, 0.5212700E+00, 0.5240400E+00, &
     & 0.5362200E+00, 0.5539600E+00, 0.5735700E+00, 0.5823700E+00, &
     & 0.5887900E+00, 0.5961700E+00, 0.5702900E+00, 0.5870200E+00, &
     & 0.5680000E+00, 0.5192700E+00, 0.4354700E+00, 0.4354700E+00 /
      data (ref_adm(14,iz,16,11),iz = 1,20) / &
     & 0.5270000E+00, 0.5270000E+00, 0.5447700E+00, 0.5251900E+00, &
     & 0.5346300E+00, 0.5358100E+00, 0.5274500E+00, 0.5479600E+00, &
     & 0.5356400E+00, 0.5569700E+00, 0.5541400E+00, 0.5545200E+00, &
     & 0.5951200E+00, 0.5715600E+00, 0.5867300E+00, 0.5995200E+00, &
     & 0.5778600E+00, 0.5883300E+00, 0.4703261E+00, 0.4703261E+00 /
      data (ref_adm(14,iz,17,11),iz = 1,20) / &
     & 0.5279700E+00, 0.5279700E+00, 0.5342700E+00, 0.5489500E+00, &
     & 0.5448100E+00, 0.5437500E+00, 0.5510900E+00, 0.5749600E+00, &
     & 0.5684200E+00, 0.5864100E+00, 0.5790700E+00, 0.5611000E+00, &
     & 0.5814600E+00, 0.5593800E+00, 0.5881000E+00, 0.5925100E+00, &
     & 0.5568600E+00, 0.5621300E+00, 0.4602409E+00, 0.4602409E+00 /
      data (ref_adm(14,iz,18,11),iz = 1,20) / &
     & 0.5323100E+00, 0.5323100E+00, 0.5388400E+00, 0.5307500E+00, &
     & 0.5530800E+00, 0.5270100E+00, 0.5343300E+00, 0.5576100E+00, &
     & 0.5565000E+00, 0.5727500E+00, 0.5830200E+00, 0.5941700E+00, &
     & 0.5988200E+00, 0.5553300E+00, 0.5490400E+00, 0.5354300E+00, &
     & 0.5449400E+00, 0.5331587E+00, 0.4525084E+00, 0.4525084E+00 /
      data (ref_adm(14,iz,19,11),iz = 1,20) / &
     & 0.5305400E+00, 0.5305400E+00, 0.5020800E+00, 0.5090600E+00, &
     & 0.5377700E+00, 0.5393700E+00, 0.5667000E+00, 0.5557500E+00, &
     & 0.5736900E+00, 0.5632200E+00, 0.5677100E+00, 0.5566100E+00, &
     & 0.5874600E+00, 0.5925400E+00, 0.5540900E+00, 0.5620600E+00, &
     & 0.5669000E+00, 0.5264408E+00, 0.4462993E+00, 0.4462993E+00 /
      data (ref_adm(14,iz,20,11),iz = 1,20) / &
     & 0.5119100E+00, 0.5119100E+00, 0.5143100E+00, 0.5184400E+00, &
     & 0.5115400E+00, 0.5212200E+00, 0.5215100E+00, 0.5344000E+00, &
     & 0.5324800E+00, 0.5473600E+00, 0.5505400E+00, 0.5721100E+00, &
     & 0.5587000E+00, 0.5537200E+00, 0.5521000E+00, 0.4799500E+00, &
     & 0.5483059E+00, 0.5208281E+00, 0.4424835E+00, 0.4424835E+00 /
      data (ref_adm(14,iz,21,11),iz = 1,20) / &
     & 0.5276100E+00, 0.5276100E+00, 0.5476100E+00, 0.5539900E+00, &
     & 0.5180100E+00, 0.5223600E+00, 0.5405000E+00, 0.5418100E+00, &
     & 0.5556000E+00, 0.5554000E+00, 0.5382200E+00, 0.5671700E+00, &
     & 0.5591000E+00, 0.5234600E+00, 0.5218800E+00, 0.5785100E+00, &
     & 0.5437133E+00, 0.5153518E+00, 0.4398785E+00, 0.4398785E+00 /
      data (ref_adm(14,iz,22,11),iz = 1,20) / &
     & 0.5391700E+00, 0.5391700E+00, 0.5285500E+00, 0.5382500E+00, &
     & 0.5468000E+00, 0.5429200E+00, 0.5427900E+00, 0.5457800E+00, &
     & 0.5537000E+00, 0.5789400E+00, 0.6027600E+00, 0.5778700E+00, &
     & 0.5740900E+00, 0.5838500E+00, 0.5675200E+00, 0.5811800E+00, &
     & 0.5167486E+00, 0.4800000E+00, 0.4071739E+00, 0.4071739E+00 /
      data (ref_adm(14,iz,23,11),iz = 1,20) / &
     & 0.5260000E+00, 0.5260000E+00, 0.5395600E+00, 0.5408600E+00, &
     & 0.5425700E+00, 0.5272300E+00, 0.5445600E+00, 0.5527100E+00, &
     & 0.5540600E+00, 0.5561800E+00, 0.5546600E+00, 0.5523800E+00, &
     & 0.5446300E+00, 0.5467200E+00, 0.5635700E+00, 0.5650500E+00, &
     & 0.6015000E+00, 0.4766080E+00, 0.4079973E+00, 0.4079973E+00 /
      data (ref_adm(14,iz,24,11),iz = 1,20) / &
     & 0.5230100E+00, 0.5230100E+00, 0.5117800E+00, 0.5264500E+00, &
     & 0.5395500E+00, 0.5463000E+00, 0.5282300E+00, 0.5618900E+00, &
     & 0.5602700E+00, 0.5608400E+00, 0.5882900E+00, 0.5667300E+00, &
     & 0.5548700E+00, 0.5583700E+00, 0.5553300E+00, 0.5678600E+00, &
     & 0.5404000E+00, 0.4749787E+00, 0.4099093E+00, 0.4099093E+00 /
      data (ref_adm(14,iz,25,11),iz = 1,20) / &
     & 0.5085000E+00, 0.5085000E+00, 0.5132300E+00, 0.5261400E+00, &
     & 0.5306500E+00, 0.5353400E+00, 0.5541100E+00, 0.5571300E+00, &
     & 0.5510100E+00, 0.5621700E+00, 0.5591000E+00, 0.5639300E+00, &
     & 0.5640400E+00, 0.5611600E+00, 0.5505800E+00, 0.5518500E+00, &
     & 0.5514800E+00, 0.5500200E+00, 0.4130141E+00, 0.4130141E+00 /
      data (ref_adm(14,iz,26,11),iz = 1,20) / &
     & 0.5243000E+00, 0.5243000E+00, 0.5352400E+00, 0.5401000E+00, &
     & 0.5484000E+00, 0.5586500E+00, 0.5656200E+00, 0.5635400E+00, &
     & 0.5777000E+00, 0.5643700E+00, 0.5641400E+00, 0.5621400E+00, &
     & 0.5633900E+00, 0.5669800E+00, 0.5515500E+00, 0.5291900E+00, &
     & 0.5242800E+00, 0.5116700E+00, 0.3794000E+00, 0.3794000E+00 /
      data (ref_adm(14,iz,27,11),iz = 1,20) / &
     & 0.5408200E+00, 0.5408200E+00, 0.5632300E+00, 0.5691800E+00, &
     & 0.5698200E+00, 0.5872900E+00, 0.5954200E+00, 0.5912200E+00, &
     & 0.5901100E+00, 0.5980400E+00, 0.5970500E+00, 0.5997900E+00, &
     & 0.5908600E+00, 0.5778100E+00, 0.5719700E+00, 0.5513700E+00, &
     & 0.5237300E+00, 0.4945900E+00, 0.4295000E+00, 0.4295000E+00 /
      data (ref_adm(14,iz,28,11),iz = 1,20) / &
     & 0.5348000E+00, 0.5348000E+00, 0.5456900E+00, 0.5320100E+00, &
     & 0.5537700E+00, 0.5687200E+00, 0.5659700E+00, 0.5870300E+00, &
     & 0.6084700E+00, 0.6148900E+00, 0.6266300E+00, 0.6070000E+00, &
     & 0.6191300E+00, 0.6162500E+00, 0.5882300E+00, 0.5698500E+00, &
     & 0.5475700E+00, 0.5138100E+00, 0.4178700E+00, 0.4178700E+00 /
      data (ref_adm(14,iz,29,11),iz = 1,20) / &
     & 0.5411900E+00, 0.5411900E+00, 0.5556700E+00, 0.5408100E+00, &
     & 0.5671700E+00, 0.5783900E+00, 0.5826000E+00, 0.5767100E+00, &
     & 0.5764400E+00, 0.5800200E+00, 0.6012900E+00, 0.5920400E+00, &
     & 0.5905300E+00, 0.6001900E+00, 0.5841900E+00, 0.5880400E+00, &
     & 0.5489900E+00, 0.5139500E+00, 0.4094000E+00, 0.4094000E+00 /
      data (ref_adm(14,iz,30,11),iz = 1,20) / &
     & 0.5223100E+00, 0.5223100E+00, 0.5309600E+00, 0.5489100E+00, &
     & 0.5558600E+00, 0.5622600E+00, 0.5686700E+00, 0.5831100E+00, &
     & 0.5813200E+00, 0.5983100E+00, 0.5983100E+00, 0.6073300E+00, &
     & 0.5937500E+00, 0.6028500E+00, 0.6052200E+00, 0.6006500E+00, &
     & 0.5555000E+00, 0.5217600E+00, 0.4193100E+00, 0.4193100E+00 /
      data (ref_adm(14,iz,31,11),iz = 1,20) / &
     & 0.5185500E+00, 0.5185500E+00, 0.5327100E+00, 0.5401700E+00, &
     & 0.5536800E+00, 0.5653000E+00, 0.5571300E+00, 0.5711500E+00, &
     & 0.5768800E+00, 0.5886300E+00, 0.5898900E+00, 0.6016200E+00, &
     & 0.5988800E+00, 0.5979200E+00, 0.5960700E+00, 0.5856000E+00, &
     & 0.5651500E+00, 0.5198500E+00, 0.4121700E+00, 0.4121700E+00 /
      data (ref_adm(14,iz,32,11),iz = 1,20) / &
     & 0.5180100E+00, 0.5180100E+00, 0.5232800E+00, 0.5405200E+00, &
     & 0.5432300E+00, 0.5658100E+00, 0.5602200E+00, 0.5578400E+00, &
     & 0.5704300E+00, 0.5783900E+00, 0.5777100E+00, 0.5794000E+00, &
     & 0.5790900E+00, 0.5927700E+00, 0.6045100E+00, 0.6061800E+00, &
     & 0.5836100E+00, 0.5261600E+00, 0.4066600E+00, 0.4066600E+00 /
      data (ref_adm(14,iz,33,11),iz = 1,20) / &
     & 0.5257100E+00, 0.5257100E+00, 0.5636200E+00, 0.5576200E+00, &
     & 0.5658800E+00, 0.5843000E+00, 0.5832500E+00, 0.5700300E+00, &
     & 0.5887100E+00, 0.5933200E+00, 0.6024100E+00, 0.6008700E+00, &
     & 0.5996300E+00, 0.6058800E+00, 0.6071200E+00, 0.6088000E+00, &
     & 0.5857900E+00, 0.5243700E+00, 0.3975600E+00, 0.3975600E+00 /
      data (ref_adm(14,iz,34,11),iz = 1,20) / &
     & 0.5225800E+00, 0.5225800E+00, 0.5199500E+00, 0.5488100E+00, &
     & 0.5781900E+00, 0.5774800E+00, 0.5642200E+00, 0.5991600E+00, &
     & 0.5990900E+00, 0.5812900E+00, 0.5870700E+00, 0.6162600E+00, &
     & 0.6094800E+00, 0.6040400E+00, 0.6076100E+00, 0.5929500E+00, &
     & 0.5722600E+00, 0.5201600E+00, 0.4087600E+00, 0.4087600E+00 /
      data (ref_adm(14,iz,35,11),iz = 1,20) / &
     & 0.5282200E+00, 0.5282200E+00, 0.5365200E+00, 0.5430500E+00, &
     & 0.5615700E+00, 0.5425600E+00, 0.5612000E+00, 0.5840100E+00, &
     & 0.5948500E+00, 0.5864600E+00, 0.6018900E+00, 0.6370400E+00, &
     & 0.6223700E+00, 0.6209500E+00, 0.6074600E+00, 0.5902000E+00, &
     & 0.5654700E+00, 0.5203500E+00, 0.3995700E+00, 0.3995700E+00 /
      data (ref_adm(14,iz,36,11),iz = 1,20) / &
     & 0.5267600E+00, 0.5267600E+00, 0.5409600E+00, 0.5518700E+00, &
     & 0.5466400E+00, 0.5660100E+00, 0.5714800E+00, 0.5668600E+00, &
     & 0.5835800E+00, 0.6046700E+00, 0.6177800E+00, 0.6405900E+00, &
     & 0.6370400E+00, 0.6373300E+00, 0.5974500E+00, 0.5907500E+00, &
     & 0.5650400E+00, 0.5172500E+00, 0.4332600E+00, 0.4332600E+00 /
      data (ref_adm(14,iz,37,11),iz = 1,20) / &
     & 0.5189300E+00, 0.5189300E+00, 0.5098400E+00, 0.5271300E+00, &
     & 0.5559800E+00, 0.5645300E+00, 0.5366700E+00, 0.5437700E+00, &
     & 0.5840200E+00, 0.6212600E+00, 0.6258900E+00, 0.6475500E+00, &
     & 0.6477800E+00, 0.6273100E+00, 0.6062800E+00, 0.6012900E+00, &
     & 0.5501600E+00, 0.5126300E+00, 0.4814768E+00, 0.4814768E+00 /
      data (ref_adm(14,iz,38,11),iz = 1,20) / &
     & 0.5189300E+00, 0.5189300E+00, 0.5098400E+00, 0.5271300E+00, &
     & 0.5559800E+00, 0.5645300E+00, 0.5366700E+00, 0.5437700E+00, &
     & 0.5840200E+00, 0.6212600E+00, 0.6258900E+00, 0.6475500E+00, &
     & 0.6477800E+00, 0.6273100E+00, 0.6062800E+00, 0.6012900E+00, &
     & 0.5501600E+00, 0.5126300E+00, 0.4814768E+00, 0.4814768E+00 /
! Solar Zenith Angle 55.0 Albedo  0.5823677E+00
      data (ref_adm(14,iz, 1,12),iz = 1,20) / &
     & 0.5096900E+00, 0.5096900E+00, 0.5004400E+00, 0.5093600E+00, &
     & 0.4987900E+00, 0.5263300E+00, 0.5442300E+00, 0.5468000E+00, &
     & 0.5868500E+00, 0.6239100E+00, 0.6432200E+00, 0.7030000E+00, &
     & 0.7883900E+00, 0.8187300E+00, 0.8726800E+00, 0.9535100E+00, &
     & 0.1019700E+01, 0.1010900E+01, 0.9038000E+00, 0.9038000E+00 /
      data (ref_adm(14,iz, 2,12),iz = 1,20) / &
     & 0.5096900E+00, 0.5096900E+00, 0.5004400E+00, 0.5093600E+00, &
     & 0.4987900E+00, 0.5263300E+00, 0.5442300E+00, 0.5468000E+00, &
     & 0.5868500E+00, 0.6239100E+00, 0.6432200E+00, 0.7030000E+00, &
     & 0.7883900E+00, 0.8187300E+00, 0.8726800E+00, 0.9535100E+00, &
     & 0.1019700E+01, 0.1010900E+01, 0.9038000E+00, 0.9038000E+00 /
      data (ref_adm(14,iz, 3,12),iz = 1,20) / &
     & 0.5123900E+00, 0.5123900E+00, 0.5160100E+00, 0.5084100E+00, &
     & 0.5252600E+00, 0.5210200E+00, 0.5361900E+00, 0.5623000E+00, &
     & 0.5807800E+00, 0.6231400E+00, 0.6516800E+00, 0.6991600E+00, &
     & 0.7475000E+00, 0.8160900E+00, 0.8661500E+00, 0.9350700E+00, &
     & 0.1010300E+01, 0.9951600E+00, 0.8608200E+00, 0.8608200E+00 /
      data (ref_adm(14,iz, 4,12),iz = 1,20) / &
     & 0.5066800E+00, 0.5066800E+00, 0.5061200E+00, 0.5236800E+00, &
     & 0.5120200E+00, 0.5279700E+00, 0.5450600E+00, 0.5637200E+00, &
     & 0.5772800E+00, 0.6143300E+00, 0.6485600E+00, 0.6751700E+00, &
     & 0.7304800E+00, 0.8022500E+00, 0.8599800E+00, 0.9296900E+00, &
     & 0.9589500E+00, 0.9555300E+00, 0.8616000E+00, 0.8616000E+00 /
      data (ref_adm(14,iz, 5,12),iz = 1,20) / &
     & 0.5143700E+00, 0.5143700E+00, 0.5007000E+00, 0.5074000E+00, &
     & 0.5175400E+00, 0.5280100E+00, 0.5430800E+00, 0.5528400E+00, &
     & 0.5825200E+00, 0.6139500E+00, 0.6531600E+00, 0.6864900E+00, &
     & 0.7233000E+00, 0.7946800E+00, 0.8339600E+00, 0.8993600E+00, &
     & 0.9237700E+00, 0.9155400E+00, 0.7809600E+00, 0.7809600E+00 /
      data (ref_adm(14,iz, 6,12),iz = 1,20) / &
     & 0.4926200E+00, 0.4926200E+00, 0.5052400E+00, 0.5004100E+00, &
     & 0.5105400E+00, 0.5298100E+00, 0.5468900E+00, 0.5613500E+00, &
     & 0.5820000E+00, 0.6165100E+00, 0.6417100E+00, 0.6784100E+00, &
     & 0.7225200E+00, 0.7676400E+00, 0.8163700E+00, 0.8704800E+00, &
     & 0.9061300E+00, 0.8909700E+00, 0.7459900E+00, 0.7459900E+00 /
      data (ref_adm(14,iz, 7,12),iz = 1,20) / &
     & 0.4897200E+00, 0.4897200E+00, 0.4880300E+00, 0.4938500E+00, &
     & 0.5066100E+00, 0.5225900E+00, 0.5299200E+00, 0.5430000E+00, &
     & 0.5764100E+00, 0.5989800E+00, 0.6219400E+00, 0.6493600E+00, &
     & 0.6960500E+00, 0.7311200E+00, 0.7883700E+00, 0.8358100E+00, &
     & 0.8474100E+00, 0.8078900E+00, 0.7161100E+00, 0.7161100E+00 /
      data (ref_adm(14,iz, 8,12),iz = 1,20) / &
     & 0.5065500E+00, 0.5065500E+00, 0.5020200E+00, 0.5068300E+00, &
     & 0.5044400E+00, 0.5123500E+00, 0.5168900E+00, 0.5353100E+00, &
     & 0.5614100E+00, 0.5875700E+00, 0.6254400E+00, 0.6504900E+00, &
     & 0.6852300E+00, 0.7265600E+00, 0.7679400E+00, 0.8149000E+00, &
     & 0.8300500E+00, 0.7868700E+00, 0.6458000E+00, 0.6458000E+00 /
      data (ref_adm(14,iz, 9,12),iz = 1,20) / &
     & 0.5045300E+00, 0.5045300E+00, 0.5112200E+00, 0.4911000E+00, &
     & 0.4982300E+00, 0.5208300E+00, 0.5208500E+00, 0.5374200E+00, &
     & 0.5703100E+00, 0.5785600E+00, 0.6075700E+00, 0.6477200E+00, &
     & 0.6817700E+00, 0.7067100E+00, 0.7406800E+00, 0.7695100E+00, &
     & 0.7967400E+00, 0.7498300E+00, 0.6213800E+00, 0.6213800E+00 /
      data (ref_adm(14,iz,10,12),iz = 1,20) / &
     & 0.5034300E+00, 0.5034300E+00, 0.5009800E+00, 0.4999800E+00, &
     & 0.5148300E+00, 0.5221800E+00, 0.5231300E+00, 0.5496100E+00, &
     & 0.5522100E+00, 0.5774900E+00, 0.5957600E+00, 0.6318000E+00, &
     & 0.6562500E+00, 0.6774300E+00, 0.6957300E+00, 0.7217700E+00, &
     & 0.7427200E+00, 0.7073100E+00, 0.5774300E+00, 0.5774300E+00 /
      data (ref_adm(14,iz,11,12),iz = 1,20) / &
     & 0.4854000E+00, 0.4854000E+00, 0.4917300E+00, 0.5011300E+00, &
     & 0.5088500E+00, 0.5192300E+00, 0.5264400E+00, 0.5359000E+00, &
     & 0.5508800E+00, 0.5690400E+00, 0.5870900E+00, 0.6198100E+00, &
     & 0.6449700E+00, 0.6740600E+00, 0.6784900E+00, 0.6990200E+00, &
     & 0.7059400E+00, 0.6730000E+00, 0.5429400E+00, 0.5429400E+00 /
      data (ref_adm(14,iz,12,12),iz = 1,20) / &
     & 0.4969200E+00, 0.4969200E+00, 0.4985100E+00, 0.5048100E+00, &
     & 0.5072300E+00, 0.5281600E+00, 0.5324000E+00, 0.5414700E+00, &
     & 0.5406100E+00, 0.5688500E+00, 0.5889200E+00, 0.5992300E+00, &
     & 0.6253300E+00, 0.6544900E+00, 0.6578600E+00, 0.6775100E+00, &
     & 0.6657100E+00, 0.6380600E+00, 0.5287500E+00, 0.5287500E+00 /
      data (ref_adm(14,iz,13,12),iz = 1,20) / &
     & 0.5037400E+00, 0.5037400E+00, 0.5360000E+00, 0.5329500E+00, &
     & 0.5415400E+00, 0.5559800E+00, 0.5395900E+00, 0.5418300E+00, &
     & 0.5549600E+00, 0.5506400E+00, 0.5719500E+00, 0.5951900E+00, &
     & 0.6078000E+00, 0.6391300E+00, 0.6463200E+00, 0.6461200E+00, &
     & 0.6443700E+00, 0.6064000E+00, 0.4989900E+00, 0.4989900E+00 /
      data (ref_adm(14,iz,14,12),iz = 1,20) / &
     & 0.5200300E+00, 0.5200300E+00, 0.5139000E+00, 0.5157900E+00, &
     & 0.5214100E+00, 0.5314400E+00, 0.5338600E+00, 0.5482100E+00, &
     & 0.5620600E+00, 0.5731800E+00, 0.5786000E+00, 0.5997200E+00, &
     & 0.6095900E+00, 0.6270100E+00, 0.6218800E+00, 0.6422500E+00, &
     & 0.6208600E+00, 0.5501300E+00, 0.4894100E+00, 0.4894100E+00 /
      data (ref_adm(14,iz,15,12),iz = 1,20) / &
     & 0.4984200E+00, 0.4984200E+00, 0.4904700E+00, 0.4929400E+00, &
     & 0.5012500E+00, 0.5093600E+00, 0.5172300E+00, 0.5212000E+00, &
     & 0.5294600E+00, 0.5498100E+00, 0.5704800E+00, 0.5981500E+00, &
     & 0.6153500E+00, 0.6177200E+00, 0.6017500E+00, 0.5970500E+00, &
     & 0.5990600E+00, 0.5345500E+00, 0.4944600E+00, 0.4944600E+00 /
      data (ref_adm(14,iz,16,12),iz = 1,20) / &
     & 0.5038700E+00, 0.5038700E+00, 0.4912300E+00, 0.5105400E+00, &
     & 0.5254500E+00, 0.5256500E+00, 0.5343500E+00, 0.5271700E+00, &
     & 0.5267500E+00, 0.5361400E+00, 0.5601600E+00, 0.5762600E+00, &
     & 0.5905100E+00, 0.5876200E+00, 0.5924500E+00, 0.5916300E+00, &
     & 0.5691500E+00, 0.5297000E+00, 0.5175952E+00, 0.5175952E+00 /
      data (ref_adm(14,iz,17,12),iz = 1,20) / &
     & 0.5045000E+00, 0.5045000E+00, 0.5102800E+00, 0.5246600E+00, &
     & 0.5139500E+00, 0.5175000E+00, 0.5384000E+00, 0.5242900E+00, &
     & 0.5291700E+00, 0.5418800E+00, 0.5508100E+00, 0.5685000E+00, &
     & 0.5801300E+00, 0.5877200E+00, 0.5847700E+00, 0.5789300E+00, &
     & 0.5840000E+00, 0.6070100E+00, 0.5049229E+00, 0.5049229E+00 /
      data (ref_adm(14,iz,18,12),iz = 1,20) / &
     & 0.5027800E+00, 0.5027800E+00, 0.5093400E+00, 0.5086500E+00, &
     & 0.5091200E+00, 0.5226500E+00, 0.5354100E+00, 0.5262700E+00, &
     & 0.5285800E+00, 0.5490200E+00, 0.5534500E+00, 0.5645200E+00, &
     & 0.5879300E+00, 0.5802600E+00, 0.5811900E+00, 0.5778500E+00, &
     & 0.5751800E+00, 0.5307347E+00, 0.4495499E+00, 0.4495499E+00 /
      data (ref_adm(14,iz,19,12),iz = 1,20) / &
     & 0.5052500E+00, 0.5052500E+00, 0.5159200E+00, 0.5198000E+00, &
     & 0.5232700E+00, 0.5266500E+00, 0.5190100E+00, 0.5309600E+00, &
     & 0.5346200E+00, 0.5390100E+00, 0.5521600E+00, 0.5477700E+00, &
     & 0.5704400E+00, 0.5560200E+00, 0.5520500E+00, 0.5511800E+00, &
     & 0.5533537E+00, 0.5199427E+00, 0.4431008E+00, 0.4431008E+00 /
      data (ref_adm(14,iz,20,12),iz = 1,20) / &
     & 0.5023500E+00, 0.5023500E+00, 0.5072900E+00, 0.5095600E+00, &
     & 0.5126400E+00, 0.5124200E+00, 0.5144400E+00, 0.5137900E+00, &
     & 0.5275900E+00, 0.5231300E+00, 0.5403800E+00, 0.5385100E+00, &
     & 0.5605000E+00, 0.5577300E+00, 0.5745000E+00, 0.5332400E+00, &
     & 0.5438657E+00, 0.5116253E+00, 0.4394453E+00, 0.4394453E+00 /
      data (ref_adm(14,iz,21,12),iz = 1,20) / &
     & 0.5200700E+00, 0.5200700E+00, 0.5226600E+00, 0.5274900E+00, &
     & 0.5289500E+00, 0.5252800E+00, 0.5282000E+00, 0.5316100E+00, &
     & 0.5429900E+00, 0.5386200E+00, 0.5416200E+00, 0.5503800E+00, &
     & 0.5504200E+00, 0.5464800E+00, 0.5610700E+00, 0.5413200E+00, &
     & 0.5362276E+00, 0.5046245E+00, 0.4376328E+00, 0.4376328E+00 /
      data (ref_adm(14,iz,22,12),iz = 1,20) / &
     & 0.5189900E+00, 0.5189900E+00, 0.5234100E+00, 0.5285200E+00, &
     & 0.5218300E+00, 0.5367800E+00, 0.5254400E+00, 0.5341100E+00, &
     & 0.5506400E+00, 0.5481200E+00, 0.5727600E+00, 0.5519400E+00, &
     & 0.5645300E+00, 0.5698100E+00, 0.5608600E+00, 0.5665600E+00, &
     & 0.5218177E+00, 0.4899396E+00, 0.4259027E+00, 0.4259027E+00 /
      data (ref_adm(14,iz,23,12),iz = 1,20) / &
     & 0.5138800E+00, 0.5138800E+00, 0.5227300E+00, 0.5196100E+00, &
     & 0.5163300E+00, 0.5401200E+00, 0.5262600E+00, 0.5287100E+00, &
     & 0.5432100E+00, 0.5496200E+00, 0.5433800E+00, 0.5538200E+00, &
     & 0.5567200E+00, 0.5675300E+00, 0.5535300E+00, 0.5497900E+00, &
     & 0.6363800E+00, 0.4867924E+00, 0.4275180E+00, 0.4275180E+00 /
      data (ref_adm(14,iz,24,12),iz = 1,20) / &
     & 0.5111500E+00, 0.5111500E+00, 0.4987000E+00, 0.5020400E+00, &
     & 0.5158400E+00, 0.5234800E+00, 0.5321300E+00, 0.5307100E+00, &
     & 0.5430500E+00, 0.5555000E+00, 0.5472800E+00, 0.5584900E+00, &
     & 0.5431500E+00, 0.5589500E+00, 0.5664900E+00, 0.5492800E+00, &
     & 0.5669500E+00, 0.4859333E+00, 0.4307429E+00, 0.4307429E+00 /
      data (ref_adm(14,iz,25,12),iz = 1,20) / &
     & 0.4982700E+00, 0.4982700E+00, 0.5030100E+00, 0.5077600E+00, &
     & 0.5125800E+00, 0.5137800E+00, 0.5235200E+00, 0.5227900E+00, &
     & 0.5270800E+00, 0.5388300E+00, 0.5462500E+00, 0.5559200E+00, &
     & 0.5576000E+00, 0.5585900E+00, 0.5525900E+00, 0.5530800E+00, &
     & 0.5682400E+00, 0.5788000E+00, 0.4354290E+00, 0.4354290E+00 /
      data (ref_adm(14,iz,26,12),iz = 1,20) / &
     & 0.5076500E+00, 0.5076500E+00, 0.5214600E+00, 0.5282800E+00, &
     & 0.5374000E+00, 0.5422500E+00, 0.5481600E+00, 0.5584900E+00, &
     & 0.5638000E+00, 0.5666900E+00, 0.5660000E+00, 0.5708300E+00, &
     & 0.5607500E+00, 0.5570800E+00, 0.5627000E+00, 0.5629900E+00, &
     & 0.5566300E+00, 0.5185500E+00, 0.4416669E+00, 0.4416669E+00 /
      data (ref_adm(14,iz,27,12),iz = 1,20) / &
     & 0.5122700E+00, 0.5122700E+00, 0.5386300E+00, 0.5332700E+00, &
     & 0.5323000E+00, 0.5492000E+00, 0.5550400E+00, 0.5603200E+00, &
     & 0.5842200E+00, 0.5851800E+00, 0.5936700E+00, 0.5979300E+00, &
     & 0.5914500E+00, 0.5904400E+00, 0.5765000E+00, 0.5640100E+00, &
     & 0.5447000E+00, 0.5288200E+00, 0.4375800E+00, 0.4375800E+00 /
      data (ref_adm(14,iz,28,12),iz = 1,20) / &
     & 0.5108200E+00, 0.5108200E+00, 0.5153100E+00, 0.5210800E+00, &
     & 0.5177000E+00, 0.5296500E+00, 0.5390000E+00, 0.5452700E+00, &
     & 0.5555200E+00, 0.5786200E+00, 0.5928300E+00, 0.6092600E+00, &
     & 0.6091500E+00, 0.6161200E+00, 0.5990100E+00, 0.5735500E+00, &
     & 0.5558700E+00, 0.5176900E+00, 0.4231300E+00, 0.4231300E+00 /
      data (ref_adm(14,iz,29,12),iz = 1,20) / &
     & 0.5103700E+00, 0.5103700E+00, 0.4973300E+00, 0.5197800E+00, &
     & 0.5379300E+00, 0.5324400E+00, 0.5446500E+00, 0.5504400E+00, &
     & 0.5700100E+00, 0.5811800E+00, 0.5959300E+00, 0.5964200E+00, &
     & 0.6009500E+00, 0.5998400E+00, 0.6067500E+00, 0.5942100E+00, &
     & 0.5644700E+00, 0.5226000E+00, 0.4332200E+00, 0.4332200E+00 /
      data (ref_adm(14,iz,30,12),iz = 1,20) / &
     & 0.5201300E+00, 0.5201300E+00, 0.5083900E+00, 0.5237200E+00, &
     & 0.5406800E+00, 0.5602500E+00, 0.5572900E+00, 0.5802000E+00, &
     & 0.5716000E+00, 0.5790200E+00, 0.5870400E+00, 0.5924200E+00, &
     & 0.5987900E+00, 0.6016400E+00, 0.6027700E+00, 0.5991800E+00, &
     & 0.5874100E+00, 0.5460400E+00, 0.4447500E+00, 0.4447500E+00 /
      data (ref_adm(14,iz,31,12),iz = 1,20) / &
     & 0.5045300E+00, 0.5045300E+00, 0.5184800E+00, 0.5180600E+00, &
     & 0.5263700E+00, 0.5537600E+00, 0.5580600E+00, 0.5621600E+00, &
     & 0.5703300E+00, 0.5756700E+00, 0.5918800E+00, 0.6009300E+00, &
     & 0.5932400E+00, 0.5991100E+00, 0.6024800E+00, 0.5860400E+00, &
     & 0.5934700E+00, 0.5558300E+00, 0.4583500E+00, 0.4583500E+00 /
      data (ref_adm(14,iz,32,12),iz = 1,20) / &
     & 0.5008000E+00, 0.5008000E+00, 0.5032800E+00, 0.5095200E+00, &
     & 0.5273700E+00, 0.5343600E+00, 0.5536900E+00, 0.5693000E+00, &
     & 0.5626800E+00, 0.5693400E+00, 0.5812000E+00, 0.5960400E+00, &
     & 0.5977600E+00, 0.6049400E+00, 0.6047500E+00, 0.6009600E+00, &
     & 0.5965600E+00, 0.5621200E+00, 0.4569000E+00, 0.4569000E+00 /
      data (ref_adm(14,iz,33,12),iz = 1,20) / &
     & 0.4901000E+00, 0.4901000E+00, 0.4910500E+00, 0.5032300E+00, &
     & 0.5206800E+00, 0.5418500E+00, 0.5499000E+00, 0.5508100E+00, &
     & 0.5590200E+00, 0.5640000E+00, 0.5806500E+00, 0.5850000E+00, &
     & 0.5924000E+00, 0.6025700E+00, 0.6021600E+00, 0.5914700E+00, &
     & 0.5787000E+00, 0.5449900E+00, 0.4485900E+00, 0.4485900E+00 /
      data (ref_adm(14,iz,34,12),iz = 1,20) / &
     & 0.4897400E+00, 0.4897400E+00, 0.4919800E+00, 0.5237100E+00, &
     & 0.5280900E+00, 0.5441600E+00, 0.5505600E+00, 0.5548300E+00, &
     & 0.5511500E+00, 0.5712500E+00, 0.5798200E+00, 0.5959100E+00, &
     & 0.6069200E+00, 0.6186200E+00, 0.6157600E+00, 0.6000100E+00, &
     & 0.5952400E+00, 0.5610700E+00, 0.4455700E+00, 0.4455700E+00 /
      data (ref_adm(14,iz,35,12),iz = 1,20) / &
     & 0.5031400E+00, 0.5031400E+00, 0.4996700E+00, 0.5169800E+00, &
     & 0.5325300E+00, 0.5453900E+00, 0.5496200E+00, 0.5465900E+00, &
     & 0.5552900E+00, 0.5691800E+00, 0.5842100E+00, 0.6070900E+00, &
     & 0.6066300E+00, 0.6144600E+00, 0.6174100E+00, 0.6027400E+00, &
     & 0.5889600E+00, 0.5538900E+00, 0.4437700E+00, 0.4437700E+00 /
      data (ref_adm(14,iz,36,12),iz = 1,20) / &
     & 0.5178200E+00, 0.5178200E+00, 0.5168700E+00, 0.5223100E+00, &
     & 0.5343300E+00, 0.5359600E+00, 0.5303400E+00, 0.5487100E+00, &
     & 0.5547000E+00, 0.5798100E+00, 0.5879300E+00, 0.5979800E+00, &
     & 0.6184100E+00, 0.6195700E+00, 0.6215700E+00, 0.6065800E+00, &
     & 0.5821600E+00, 0.5441800E+00, 0.4217300E+00, 0.4217300E+00 /
      data (ref_adm(14,iz,37,12),iz = 1,20) / &
     & 0.5165600E+00, 0.5165600E+00, 0.5268700E+00, 0.5286000E+00, &
     & 0.5414000E+00, 0.5229000E+00, 0.5189000E+00, 0.5310500E+00, &
     & 0.5609900E+00, 0.5760300E+00, 0.5857300E+00, 0.6050600E+00, &
     & 0.6423000E+00, 0.6329200E+00, 0.6132100E+00, 0.6114000E+00, &
     & 0.5910300E+00, 0.5410600E+00, 0.5288901E+00, 0.5288901E+00 /
      data (ref_adm(14,iz,38,12),iz = 1,20) / &
     & 0.5165600E+00, 0.5165600E+00, 0.5268700E+00, 0.5286000E+00, &
     & 0.5414000E+00, 0.5229000E+00, 0.5189000E+00, 0.5310500E+00, &
     & 0.5609900E+00, 0.5760300E+00, 0.5857300E+00, 0.6050600E+00, &
     & 0.6423000E+00, 0.6329200E+00, 0.6132100E+00, 0.6114000E+00, &
     & 0.5910300E+00, 0.5410600E+00, 0.5288901E+00, 0.5288901E+00 /
! Solar Zenith Angle 60.0 Albedo  0.5887979E+00
      data (ref_adm(14,iz, 1,13),iz = 1,20) / &
     & 0.4757800E+00, 0.4757800E+00, 0.4752500E+00, 0.4883600E+00, &
     & 0.5031300E+00, 0.5139600E+00, 0.5252600E+00, 0.5406100E+00, &
     & 0.5957500E+00, 0.6272000E+00, 0.6851700E+00, 0.7417400E+00, &
     & 0.8335000E+00, 0.9588000E+00, 0.1029500E+01, 0.1134200E+01, &
     & 0.1251200E+01, 0.1301400E+01, 0.1094100E+01, 0.1094100E+01 /
      data (ref_adm(14,iz, 2,13),iz = 1,20) / &
     & 0.4757800E+00, 0.4757800E+00, 0.4752500E+00, 0.4883600E+00, &
     & 0.5031300E+00, 0.5139600E+00, 0.5252600E+00, 0.5406100E+00, &
     & 0.5957500E+00, 0.6272000E+00, 0.6851700E+00, 0.7417400E+00, &
     & 0.8335000E+00, 0.9588000E+00, 0.1029500E+01, 0.1134200E+01, &
     & 0.1251200E+01, 0.1301400E+01, 0.1094100E+01, 0.1094100E+01 /
      data (ref_adm(14,iz, 3,13),iz = 1,20) / &
     & 0.4926900E+00, 0.4926900E+00, 0.4811400E+00, 0.4790900E+00, &
     & 0.4911200E+00, 0.5092100E+00, 0.5318400E+00, 0.5536800E+00, &
     & 0.5826000E+00, 0.6320900E+00, 0.6746400E+00, 0.7354600E+00, &
     & 0.8175200E+00, 0.9025200E+00, 0.9951100E+00, 0.1097300E+01, &
     & 0.1206600E+01, 0.1262400E+01, 0.1056100E+01, 0.1056100E+01 /
      data (ref_adm(14,iz, 4,13),iz = 1,20) / &
     & 0.4803000E+00, 0.4803000E+00, 0.4770900E+00, 0.4768000E+00, &
     & 0.4941000E+00, 0.5171100E+00, 0.5256100E+00, 0.5516200E+00, &
     & 0.5879000E+00, 0.6262800E+00, 0.6669100E+00, 0.7304800E+00, &
     & 0.8142500E+00, 0.8914000E+00, 0.9776900E+00, 0.1071600E+01, &
     & 0.1183700E+01, 0.1207700E+01, 0.1000300E+01, 0.1000300E+01 /
      data (ref_adm(14,iz, 5,13),iz = 1,20) / &
     & 0.4992000E+00, 0.4992000E+00, 0.4819100E+00, 0.5009900E+00, &
     & 0.5115700E+00, 0.5142200E+00, 0.5326600E+00, 0.5485300E+00, &
     & 0.5835200E+00, 0.6135600E+00, 0.6600800E+00, 0.7195200E+00, &
     & 0.7985600E+00, 0.8818700E+00, 0.9554700E+00, 0.1031200E+01, &
     & 0.1119300E+01, 0.1113400E+01, 0.8907100E+00, 0.8907100E+00 /
      data (ref_adm(14,iz, 6,13),iz = 1,20) / &
     & 0.4831800E+00, 0.4831800E+00, 0.4974300E+00, 0.4966500E+00, &
     & 0.5005400E+00, 0.5125000E+00, 0.5300900E+00, 0.5549400E+00, &
     & 0.5792500E+00, 0.6050300E+00, 0.6491400E+00, 0.7017900E+00, &
     & 0.7659800E+00, 0.8424500E+00, 0.9145300E+00, 0.9972900E+00, &
     & 0.1055700E+01, 0.1043100E+01, 0.8816500E+00, 0.8816500E+00 /
      data (ref_adm(14,iz, 7,13),iz = 1,20) / &
     & 0.4746700E+00, 0.4746700E+00, 0.4836900E+00, 0.4874100E+00, &
     & 0.4914000E+00, 0.5085800E+00, 0.5195400E+00, 0.5433800E+00, &
     & 0.5769600E+00, 0.5927100E+00, 0.6336500E+00, 0.6825100E+00, &
     & 0.7481700E+00, 0.8086400E+00, 0.8532100E+00, 0.9388500E+00, &
     & 0.9846600E+00, 0.9539800E+00, 0.8642400E+00, 0.8642400E+00 /
      data (ref_adm(14,iz, 8,13),iz = 1,20) / &
     & 0.4829700E+00, 0.4829700E+00, 0.4922800E+00, 0.4943200E+00, &
     & 0.5159800E+00, 0.5081700E+00, 0.5225600E+00, 0.5379500E+00, &
     & 0.5681100E+00, 0.5965300E+00, 0.6400000E+00, 0.6777700E+00, &
     & 0.7305400E+00, 0.7885300E+00, 0.8356700E+00, 0.9124000E+00, &
     & 0.9670800E+00, 0.9134000E+00, 0.7731800E+00, 0.7731800E+00 /
      data (ref_adm(14,iz, 9,13),iz = 1,20) / &
     & 0.4822100E+00, 0.4822100E+00, 0.4843000E+00, 0.4971900E+00, &
     & 0.5160200E+00, 0.5305600E+00, 0.5284300E+00, 0.5533600E+00, &
     & 0.5570400E+00, 0.5816500E+00, 0.6253400E+00, 0.6528200E+00, &
     & 0.7070100E+00, 0.7537600E+00, 0.8022300E+00, 0.8580400E+00, &
     & 0.8978900E+00, 0.8515700E+00, 0.7255000E+00, 0.7255000E+00 /
      data (ref_adm(14,iz,10,13),iz = 1,20) / &
     & 0.4860100E+00, 0.4860100E+00, 0.4890300E+00, 0.5041900E+00, &
     & 0.5097100E+00, 0.5060400E+00, 0.5325900E+00, 0.5341800E+00, &
     & 0.5590000E+00, 0.5805500E+00, 0.6114800E+00, 0.6520500E+00, &
     & 0.6839100E+00, 0.7273300E+00, 0.7641900E+00, 0.8009600E+00, &
     & 0.8440100E+00, 0.8094500E+00, 0.6588400E+00, 0.6588400E+00 /
      data (ref_adm(14,iz,11,13),iz = 1,20) / &
     & 0.4952300E+00, 0.4952300E+00, 0.5027800E+00, 0.5050200E+00, &
     & 0.5022800E+00, 0.4976200E+00, 0.5172200E+00, 0.5365400E+00, &
     & 0.5532900E+00, 0.5685300E+00, 0.6059900E+00, 0.6337800E+00, &
     & 0.6531700E+00, 0.6974500E+00, 0.7357600E+00, 0.7587000E+00, &
     & 0.7782200E+00, 0.7414700E+00, 0.6044400E+00, 0.6044400E+00 /
      data (ref_adm(14,iz,12,13),iz = 1,20) / &
     & 0.4892600E+00, 0.4892600E+00, 0.4877900E+00, 0.4953300E+00, &
     & 0.4960900E+00, 0.5087800E+00, 0.5210500E+00, 0.5417400E+00, &
     & 0.5563700E+00, 0.5824500E+00, 0.5968800E+00, 0.6127100E+00, &
     & 0.6431500E+00, 0.6805000E+00, 0.6900800E+00, 0.7240200E+00, &
     & 0.7378100E+00, 0.6785700E+00, 0.6324100E+00, 0.6324100E+00 /
      data (ref_adm(14,iz,13,13),iz = 1,20) / &
     & 0.4812100E+00, 0.4812100E+00, 0.4994200E+00, 0.5070400E+00, &
     & 0.4951900E+00, 0.4969600E+00, 0.5131100E+00, 0.5303600E+00, &
     & 0.5497600E+00, 0.5684900E+00, 0.5864400E+00, 0.6066500E+00, &
     & 0.6227700E+00, 0.6496800E+00, 0.6611600E+00, 0.6858100E+00, &
     & 0.6997400E+00, 0.6484800E+00, 0.6329500E+00, 0.6329500E+00 /
      data (ref_adm(14,iz,14,13),iz = 1,20) / &
     & 0.4963500E+00, 0.4963500E+00, 0.4968700E+00, 0.4999700E+00, &
     & 0.5046800E+00, 0.5124800E+00, 0.5258200E+00, 0.5447100E+00, &
     & 0.5569000E+00, 0.5730400E+00, 0.5892100E+00, 0.6149200E+00, &
     & 0.6320400E+00, 0.6417500E+00, 0.6213400E+00, 0.6400400E+00, &
     & 0.6574500E+00, 0.6094200E+00, 0.5773693E+00, 0.5773693E+00 /
      data (ref_adm(14,iz,15,13),iz = 1,20) / &
     & 0.4813400E+00, 0.4813400E+00, 0.4855600E+00, 0.4841800E+00, &
     & 0.4849200E+00, 0.4921300E+00, 0.5031100E+00, 0.5177300E+00, &
     & 0.5323200E+00, 0.5494500E+00, 0.5672400E+00, 0.6055900E+00, &
     & 0.6249800E+00, 0.6311900E+00, 0.6166300E+00, 0.6173400E+00, &
     & 0.6270700E+00, 0.6186300E+00, 0.5619577E+00, 0.5619577E+00 /
      data (ref_adm(14,iz,16,13),iz = 1,20) / &
     & 0.4833500E+00, 0.4833500E+00, 0.4937800E+00, 0.4992500E+00, &
     & 0.4917600E+00, 0.4989200E+00, 0.5098000E+00, 0.5208900E+00, &
     & 0.5288000E+00, 0.5452300E+00, 0.5551300E+00, 0.5728800E+00, &
     & 0.5960000E+00, 0.6080100E+00, 0.5999700E+00, 0.6115300E+00, &
     & 0.6191900E+00, 0.5587100E+00, 0.5464782E+00, 0.5464782E+00 /
      data (ref_adm(14,iz,17,13),iz = 1,20) / &
     & 0.4883400E+00, 0.4883400E+00, 0.4987100E+00, 0.4998400E+00, &
     & 0.4930000E+00, 0.5066900E+00, 0.5175900E+00, 0.5307700E+00, &
     & 0.5414400E+00, 0.5443100E+00, 0.5481700E+00, 0.5540200E+00, &
     & 0.5789300E+00, 0.5934200E+00, 0.5862200E+00, 0.5923800E+00, &
     & 0.5882600E+00, 0.5940692E+00, 0.5315924E+00, 0.5315924E+00 /
      data (ref_adm(14,iz,18,13),iz = 1,20) / &
     & 0.4886200E+00, 0.4886200E+00, 0.4973900E+00, 0.5108800E+00, &
     & 0.4833700E+00, 0.5031900E+00, 0.5071000E+00, 0.5127700E+00, &
     & 0.5250800E+00, 0.5386000E+00, 0.5422500E+00, 0.5520600E+00, &
     & 0.5699300E+00, 0.5855500E+00, 0.5879600E+00, 0.5975500E+00, &
     & 0.6275700E+00, 0.5636555E+00, 0.4863670E+00, 0.4863670E+00 /
      data (ref_adm(14,iz,19,13),iz = 1,20) / &
     & 0.4871300E+00, 0.4871300E+00, 0.4958900E+00, 0.4989800E+00, &
     & 0.4988600E+00, 0.5019000E+00, 0.5116000E+00, 0.5063200E+00, &
     & 0.5180500E+00, 0.5183600E+00, 0.5344800E+00, 0.5406200E+00, &
     & 0.5600900E+00, 0.5816000E+00, 0.5692600E+00, 0.5828800E+00, &
     & 0.5766101E+00, 0.5498247E+00, 0.4782256E+00, 0.4782256E+00 /
      data (ref_adm(14,iz,20,13),iz = 1,20) / &
     & 0.4952100E+00, 0.4952100E+00, 0.5002500E+00, 0.4929000E+00, &
     & 0.4951700E+00, 0.5142700E+00, 0.5117200E+00, 0.5142900E+00, &
     & 0.5117200E+00, 0.5271500E+00, 0.5281200E+00, 0.5395300E+00, &
     & 0.5633500E+00, 0.5705900E+00, 0.5559400E+00, 0.6419500E+00, &
     & 0.5650569E+00, 0.5395896E+00, 0.4736400E+00, 0.4736400E+00 /
      data (ref_adm(14,iz,21,13),iz = 1,20) / &
     & 0.4836700E+00, 0.4836700E+00, 0.4949200E+00, 0.4946600E+00, &
     & 0.4895500E+00, 0.5030000E+00, 0.5059200E+00, 0.5058600E+00, &
     & 0.5303800E+00, 0.5280900E+00, 0.5319200E+00, 0.5512500E+00, &
     & 0.5647700E+00, 0.5609100E+00, 0.5641000E+00, 0.5940200E+00, &
     & 0.5558645E+00, 0.5310954E+00, 0.4714056E+00, 0.4714056E+00 /
      data (ref_adm(14,iz,22,13),iz = 1,20) / &
     & 0.4844500E+00, 0.4844500E+00, 0.4877900E+00, 0.4916500E+00, &
     & 0.4960900E+00, 0.4876500E+00, 0.4978200E+00, 0.5086600E+00, &
     & 0.5261700E+00, 0.5151700E+00, 0.5402400E+00, 0.5562700E+00, &
     & 0.5562000E+00, 0.5639200E+00, 0.5587800E+00, 0.5770000E+00, &
     & 0.5362355E+00, 0.5099123E+00, 0.4526087E+00, 0.4526087E+00 /
      data (ref_adm(14,iz,23,13),iz = 1,20) / &
     & 0.4795700E+00, 0.4795700E+00, 0.4824700E+00, 0.4856200E+00, &
     & 0.4879000E+00, 0.4948300E+00, 0.5133900E+00, 0.5028700E+00, &
     & 0.5318400E+00, 0.5309900E+00, 0.5395800E+00, 0.5658300E+00, &
     & 0.5606300E+00, 0.5703400E+00, 0.5787400E+00, 0.5440200E+00, &
     & 0.6032400E+00, 0.5063053E+00, 0.4546999E+00, 0.4546999E+00 /
      data (ref_adm(14,iz,24,13),iz = 1,20) / &
     & 0.4699500E+00, 0.4699500E+00, 0.4765300E+00, 0.4764600E+00, &
     & 0.4854100E+00, 0.4957000E+00, 0.5014700E+00, 0.5085000E+00, &
     & 0.5203900E+00, 0.5339500E+00, 0.5423100E+00, 0.5644700E+00, &
     & 0.5685700E+00, 0.5688500E+00, 0.5589000E+00, 0.5487400E+00, &
     & 0.5599200E+00, 0.5055034E+00, 0.4589882E+00, 0.4589882E+00 /
      data (ref_adm(14,iz,25,13),iz = 1,20) / &
     & 0.4837300E+00, 0.4837300E+00, 0.4963700E+00, 0.4958300E+00, &
     & 0.5058900E+00, 0.5029800E+00, 0.5024700E+00, 0.5137600E+00, &
     & 0.5243900E+00, 0.5309500E+00, 0.5365900E+00, 0.5479100E+00, &
     & 0.5487200E+00, 0.5571900E+00, 0.5636600E+00, 0.5747400E+00, &
     & 0.5565500E+00, 0.5521100E+00, 0.4650215E+00, 0.4650215E+00 /
      data (ref_adm(14,iz,26,13),iz = 1,20) / &
     & 0.4925000E+00, 0.4925000E+00, 0.4994900E+00, 0.5013000E+00, &
     & 0.5085700E+00, 0.5147800E+00, 0.5189900E+00, 0.5287600E+00, &
     & 0.5429700E+00, 0.5529000E+00, 0.5578400E+00, 0.5663100E+00, &
     & 0.5744900E+00, 0.5758900E+00, 0.5688000E+00, 0.5684500E+00, &
     & 0.5562200E+00, 0.5075900E+00, 0.4733831E+00, 0.4733831E+00 /
      data (ref_adm(14,iz,27,13),iz = 1,20) / &
     & 0.4904800E+00, 0.4904800E+00, 0.4816200E+00, 0.4867500E+00, &
     & 0.4997400E+00, 0.5095900E+00, 0.5104300E+00, 0.5209800E+00, &
     & 0.5281700E+00, 0.5430900E+00, 0.5607300E+00, 0.5881800E+00, &
     & 0.5875400E+00, 0.5957500E+00, 0.5850400E+00, 0.5791500E+00, &
     & 0.5605300E+00, 0.5196200E+00, 0.4837097E+00, 0.4837097E+00 /
      data (ref_adm(14,iz,28,13),iz = 1,20) / &
     & 0.4880200E+00, 0.4880200E+00, 0.4825000E+00, 0.4943800E+00, &
     & 0.4980500E+00, 0.5036200E+00, 0.5207200E+00, 0.5447000E+00, &
     & 0.5554200E+00, 0.5703900E+00, 0.5668100E+00, 0.5941800E+00, &
     & 0.6005700E+00, 0.6081800E+00, 0.6006600E+00, 0.5879500E+00, &
     & 0.5798500E+00, 0.5497200E+00, 0.4615900E+00, 0.4615900E+00 /
      data (ref_adm(14,iz,29,13),iz = 1,20) / &
     & 0.4971700E+00, 0.4971700E+00, 0.4846200E+00, 0.4903800E+00, &
     & 0.4986000E+00, 0.5134400E+00, 0.5230100E+00, 0.5307600E+00, &
     & 0.5531300E+00, 0.5648200E+00, 0.5832200E+00, 0.6008200E+00, &
     & 0.6060800E+00, 0.6063700E+00, 0.6169500E+00, 0.6091100E+00, &
     & 0.6037500E+00, 0.5624000E+00, 0.4705700E+00, 0.4705700E+00 /
      data (ref_adm(14,iz,30,13),iz = 1,20) / &
     & 0.4947100E+00, 0.4947100E+00, 0.4955100E+00, 0.4887900E+00, &
     & 0.5000300E+00, 0.5175800E+00, 0.5352100E+00, 0.5392000E+00, &
     & 0.5573900E+00, 0.5744900E+00, 0.5872600E+00, 0.6030200E+00, &
     & 0.6125600E+00, 0.6095700E+00, 0.6187700E+00, 0.6237700E+00, &
     & 0.6100500E+00, 0.5786900E+00, 0.4864900E+00, 0.4864900E+00 /
      data (ref_adm(14,iz,31,13),iz = 1,20) / &
     & 0.4773100E+00, 0.4773100E+00, 0.4909200E+00, 0.4899900E+00, &
     & 0.4947600E+00, 0.5107800E+00, 0.5238100E+00, 0.5441800E+00, &
     & 0.5544200E+00, 0.5678900E+00, 0.5802700E+00, 0.5923000E+00, &
     & 0.5976900E+00, 0.6076200E+00, 0.6129000E+00, 0.6141800E+00, &
     & 0.6162900E+00, 0.5944500E+00, 0.4918000E+00, 0.4918000E+00 /
      data (ref_adm(14,iz,32,13),iz = 1,20) / &
     & 0.4773400E+00, 0.4773400E+00, 0.4757300E+00, 0.4787100E+00, &
     & 0.4948800E+00, 0.5097600E+00, 0.5297300E+00, 0.5467900E+00, &
     & 0.5530600E+00, 0.5635200E+00, 0.5759100E+00, 0.5862900E+00, &
     & 0.6014800E+00, 0.6021800E+00, 0.6098800E+00, 0.6149900E+00, &
     & 0.6209500E+00, 0.5851400E+00, 0.4894400E+00, 0.4894400E+00 /
      data (ref_adm(14,iz,33,13),iz = 1,20) / &
     & 0.4904500E+00, 0.4904500E+00, 0.5008700E+00, 0.4965700E+00, &
     & 0.4987000E+00, 0.5230200E+00, 0.5401500E+00, 0.5466000E+00, &
     & 0.5581200E+00, 0.5693400E+00, 0.5756700E+00, 0.5863000E+00, &
     & 0.6005000E+00, 0.6157800E+00, 0.6224700E+00, 0.6251400E+00, &
     & 0.6097400E+00, 0.5794800E+00, 0.4810600E+00, 0.4810600E+00 /
      data (ref_adm(14,iz,34,13),iz = 1,20) / &
     & 0.4915600E+00, 0.4915600E+00, 0.5035000E+00, 0.5002000E+00, &
     & 0.4924100E+00, 0.5297800E+00, 0.5438600E+00, 0.5513800E+00, &
     & 0.5530300E+00, 0.5691400E+00, 0.5841500E+00, 0.5991500E+00, &
     & 0.6016100E+00, 0.6266700E+00, 0.6258800E+00, 0.6323900E+00, &
     & 0.6193500E+00, 0.5804500E+00, 0.4794000E+00, 0.4794000E+00 /
      data (ref_adm(14,iz,35,13),iz = 1,20) / &
     & 0.4906600E+00, 0.4906600E+00, 0.4929000E+00, 0.4988000E+00, &
     & 0.5065800E+00, 0.5242900E+00, 0.5455600E+00, 0.5410100E+00, &
     & 0.5545500E+00, 0.5623900E+00, 0.5781600E+00, 0.6006500E+00, &
     & 0.6164600E+00, 0.6383900E+00, 0.6275500E+00, 0.6352300E+00, &
     & 0.6213400E+00, 0.5908100E+00, 0.4809700E+00, 0.4809700E+00 /
      data (ref_adm(14,iz,36,13),iz = 1,20) / &
     & 0.4876500E+00, 0.4876500E+00, 0.4911200E+00, 0.4942300E+00, &
     & 0.4972300E+00, 0.5359400E+00, 0.5381600E+00, 0.5440900E+00, &
     & 0.5575700E+00, 0.5664100E+00, 0.5822100E+00, 0.6078900E+00, &
     & 0.6318000E+00, 0.6432500E+00, 0.6414200E+00, 0.6397600E+00, &
     & 0.6301400E+00, 0.5959100E+00, 0.4716500E+00, 0.4716500E+00 /
      data (ref_adm(14,iz,37,13),iz = 1,20) / &
     & 0.4815800E+00, 0.4815800E+00, 0.4954000E+00, 0.5010700E+00, &
     & 0.5085200E+00, 0.5209600E+00, 0.5390900E+00, 0.5345200E+00, &
     & 0.5437600E+00, 0.5562800E+00, 0.5841900E+00, 0.6018800E+00, &
     & 0.6436900E+00, 0.6764700E+00, 0.6584200E+00, 0.6335700E+00, &
     & 0.6301800E+00, 0.5896200E+00, 0.4682500E+00, 0.4682500E+00 /
      data (ref_adm(14,iz,38,13),iz = 1,20) / &
     & 0.4815800E+00, 0.4815800E+00, 0.4954000E+00, 0.5010700E+00, &
     & 0.5085200E+00, 0.5209600E+00, 0.5390900E+00, 0.5345200E+00, &
     & 0.5437600E+00, 0.5562800E+00, 0.5841900E+00, 0.6018800E+00, &
     & 0.6436900E+00, 0.6764700E+00, 0.6584200E+00, 0.6335700E+00, &
     & 0.6301800E+00, 0.5896200E+00, 0.4682500E+00, 0.4682500E+00 /
! Solar Zenith Angle 65.0 Albedo  0.5986494E+00
      data (ref_adm(14,iz, 1,14),iz = 1,20) / &
     & 0.4626100E+00, 0.4626100E+00, 0.4649200E+00, 0.4782400E+00, &
     & 0.4939100E+00, 0.5109000E+00, 0.5427300E+00, 0.5689000E+00, &
     & 0.6056600E+00, 0.6610100E+00, 0.7149500E+00, 0.7970100E+00, &
     & 0.9176900E+00, 0.1062900E+01, 0.1237400E+01, 0.1389000E+01, &
     & 0.1516200E+01, 0.1535800E+01, 0.1393936E+01, 0.1393936E+01 /
      data (ref_adm(14,iz, 2,14),iz = 1,20) / &
     & 0.4626100E+00, 0.4626100E+00, 0.4649200E+00, 0.4782400E+00, &
     & 0.4939100E+00, 0.5109000E+00, 0.5427300E+00, 0.5689000E+00, &
     & 0.6056600E+00, 0.6610100E+00, 0.7149500E+00, 0.7970100E+00, &
     & 0.9176900E+00, 0.1062900E+01, 0.1237400E+01, 0.1389000E+01, &
     & 0.1516200E+01, 0.1535800E+01, 0.1393936E+01, 0.1393936E+01 /
      data (ref_adm(14,iz, 3,14),iz = 1,20) / &
     & 0.4734500E+00, 0.4734500E+00, 0.4754500E+00, 0.4809900E+00, &
     & 0.5041800E+00, 0.5210400E+00, 0.5350400E+00, 0.5677100E+00, &
     & 0.6110900E+00, 0.6622800E+00, 0.7231600E+00, 0.7973400E+00, &
     & 0.9043400E+00, 0.1029200E+01, 0.1160500E+01, 0.1341500E+01, &
     & 0.1491200E+01, 0.1504700E+01, 0.9376085E+00, 0.9376085E+00 /
      data (ref_adm(14,iz, 4,14),iz = 1,20) / &
     & 0.4716100E+00, 0.4716100E+00, 0.4764900E+00, 0.4829500E+00, &
     & 0.4955500E+00, 0.5027700E+00, 0.5340500E+00, 0.5653100E+00, &
     & 0.6015100E+00, 0.6464900E+00, 0.7137200E+00, 0.7993500E+00, &
     & 0.8799200E+00, 0.1000200E+01, 0.1094200E+01, 0.1261300E+01, &
     & 0.1412200E+01, 0.1401600E+01, 0.1221489E+01, 0.1221489E+01 /
      data (ref_adm(14,iz, 5,14),iz = 1,20) / &
     & 0.4740400E+00, 0.4740400E+00, 0.4820800E+00, 0.4851300E+00, &
     & 0.4941500E+00, 0.5275000E+00, 0.5376200E+00, 0.5565800E+00, &
     & 0.5974800E+00, 0.6489300E+00, 0.7049800E+00, 0.7847600E+00, &
     & 0.8646200E+00, 0.9712300E+00, 0.1082800E+01, 0.1215600E+01, &
     & 0.1308700E+01, 0.1281600E+01, 0.1106829E+01, 0.1106829E+01 /
      data (ref_adm(14,iz, 6,14),iz = 1,20) / &
     & 0.4701300E+00, 0.4701300E+00, 0.4783600E+00, 0.4808100E+00, &
     & 0.4938100E+00, 0.5155700E+00, 0.5312600E+00, 0.5561300E+00, &
     & 0.5911000E+00, 0.6324000E+00, 0.6835200E+00, 0.7475300E+00, &
     & 0.8321700E+00, 0.9270600E+00, 0.1032000E+01, 0.1154600E+01, &
     & 0.1260100E+01, 0.1283900E+01, 0.1103800E+01, 0.1103800E+01 /
      data (ref_adm(14,iz, 7,14),iz = 1,20) / &
     & 0.4717900E+00, 0.4717900E+00, 0.4740800E+00, 0.4872600E+00, &
     & 0.4992900E+00, 0.5143900E+00, 0.5313300E+00, 0.5585000E+00, &
     & 0.5879900E+00, 0.6298400E+00, 0.6775200E+00, 0.7351200E+00, &
     & 0.8080300E+00, 0.9019200E+00, 0.9920100E+00, 0.1085800E+01, &
     & 0.1147600E+01, 0.1117600E+01, 0.9279900E+00, 0.9279900E+00 /
      data (ref_adm(14,iz, 8,14),iz = 1,20) / &
     & 0.4733500E+00, 0.4733500E+00, 0.4689400E+00, 0.4790500E+00, &
     & 0.4935100E+00, 0.5083100E+00, 0.5146900E+00, 0.5437000E+00, &
     & 0.5731300E+00, 0.6101700E+00, 0.6545400E+00, 0.7168900E+00, &
     & 0.7813300E+00, 0.8528400E+00, 0.9411800E+00, 0.1023300E+01, &
     & 0.1091100E+01, 0.1039600E+01, 0.9120300E+00, 0.9120300E+00 /
      data (ref_adm(14,iz, 9,14),iz = 1,20) / &
     & 0.4735900E+00, 0.4735900E+00, 0.4743400E+00, 0.4733800E+00, &
     & 0.4863800E+00, 0.5037700E+00, 0.5080800E+00, 0.5391600E+00, &
     & 0.5600300E+00, 0.6064800E+00, 0.6441100E+00, 0.6901400E+00, &
     & 0.7546900E+00, 0.8166200E+00, 0.8906100E+00, 0.9669000E+00, &
     & 0.1019500E+01, 0.1000400E+01, 0.8540300E+00, 0.8540300E+00 /
      data (ref_adm(14,iz,10,14),iz = 1,20) / &
     & 0.4779000E+00, 0.4779000E+00, 0.4820900E+00, 0.4756700E+00, &
     & 0.4811800E+00, 0.4883600E+00, 0.5123900E+00, 0.5366300E+00, &
     & 0.5611100E+00, 0.5962500E+00, 0.6344000E+00, 0.6691400E+00, &
     & 0.7181700E+00, 0.7751000E+00, 0.8357700E+00, 0.8929400E+00, &
     & 0.9433200E+00, 0.9012600E+00, 0.7562800E+00, 0.7562800E+00 /
      data (ref_adm(14,iz,11,14),iz = 1,20) / &
     & 0.4719200E+00, 0.4719200E+00, 0.4695300E+00, 0.4747400E+00, &
     & 0.4781100E+00, 0.4754800E+00, 0.5072300E+00, 0.5263500E+00, &
     & 0.5490800E+00, 0.5762000E+00, 0.6116800E+00, 0.6569100E+00, &
     & 0.7005700E+00, 0.7371700E+00, 0.7865800E+00, 0.8327500E+00, &
     & 0.8760400E+00, 0.8335000E+00, 0.6985600E+00, 0.6985600E+00 /
      data (ref_adm(14,iz,12,14),iz = 1,20) / &
     & 0.4735200E+00, 0.4735200E+00, 0.4635500E+00, 0.4647200E+00, &
     & 0.4830300E+00, 0.4954100E+00, 0.5175500E+00, 0.5252500E+00, &
     & 0.5445300E+00, 0.5714000E+00, 0.5990300E+00, 0.6333200E+00, &
     & 0.6771900E+00, 0.7105300E+00, 0.7447800E+00, 0.7855300E+00, &
     & 0.8195300E+00, 0.7617000E+00, 0.6557900E+00, 0.6557900E+00 /
      data (ref_adm(14,iz,13,14),iz = 1,20) / &
     & 0.4665100E+00, 0.4665100E+00, 0.4586700E+00, 0.4673200E+00, &
     & 0.4851400E+00, 0.4912800E+00, 0.5058300E+00, 0.5268800E+00, &
     & 0.5441600E+00, 0.5729700E+00, 0.5897000E+00, 0.6172100E+00, &
     & 0.6529500E+00, 0.6775900E+00, 0.7023400E+00, 0.7352600E+00, &
     & 0.7566700E+00, 0.7101700E+00, 0.6273100E+00, 0.6273100E+00 /
      data (ref_adm(14,iz,14,14),iz = 1,20) / &
     & 0.4736200E+00, 0.4736200E+00, 0.4792400E+00, 0.4841900E+00, &
     & 0.4919000E+00, 0.5019700E+00, 0.5099900E+00, 0.5296000E+00, &
     & 0.5460500E+00, 0.5684100E+00, 0.5956000E+00, 0.6111800E+00, &
     & 0.6438100E+00, 0.6727600E+00, 0.6819600E+00, 0.7033800E+00, &
     & 0.7226700E+00, 0.6814200E+00, 0.6091481E+00, 0.6091481E+00 /
      data (ref_adm(14,iz,15,14),iz = 1,20) / &
     & 0.4748600E+00, 0.4748600E+00, 0.4724800E+00, 0.4720400E+00, &
     & 0.4769400E+00, 0.4872400E+00, 0.4962600E+00, 0.5045900E+00, &
     & 0.5237700E+00, 0.5492200E+00, 0.5765300E+00, 0.6075500E+00, &
     & 0.6264100E+00, 0.6536200E+00, 0.6493600E+00, 0.6662700E+00, &
     & 0.6687500E+00, 0.6576800E+00, 0.5867891E+00, 0.5867891E+00 /
      data (ref_adm(14,iz,16,14),iz = 1,20) / &
     & 0.4646800E+00, 0.4646800E+00, 0.4632700E+00, 0.4685000E+00, &
     & 0.4719100E+00, 0.4781600E+00, 0.4884100E+00, 0.4966000E+00, &
     & 0.5154400E+00, 0.5337800E+00, 0.5526900E+00, 0.5755200E+00, &
     & 0.5966000E+00, 0.6142400E+00, 0.6168100E+00, 0.6211200E+00, &
     & 0.6686500E+00, 0.7003600E+00, 0.5670030E+00, 0.5670030E+00 /
      data (ref_adm(14,iz,17,14),iz = 1,20) / &
     & 0.4693200E+00, 0.4693200E+00, 0.4685900E+00, 0.4826800E+00, &
     & 0.4681100E+00, 0.4885400E+00, 0.4928800E+00, 0.4908300E+00, &
     & 0.5134900E+00, 0.5225300E+00, 0.5541000E+00, 0.5653500E+00, &
     & 0.5857100E+00, 0.5995500E+00, 0.6001200E+00, 0.6104700E+00, &
     & 0.6196600E+00, 0.6069517E+00, 0.5492833E+00, 0.5492833E+00 /
      data (ref_adm(14,iz,18,14),iz = 1,20) / &
     & 0.4680900E+00, 0.4680900E+00, 0.4706200E+00, 0.4757200E+00, &
     & 0.4776900E+00, 0.4832100E+00, 0.4883300E+00, 0.4908600E+00, &
     & 0.5048300E+00, 0.5286000E+00, 0.5417900E+00, 0.5587300E+00, &
     & 0.5681000E+00, 0.5814100E+00, 0.5851100E+00, 0.5918400E+00, &
     & 0.5799300E+00, 0.6038474E+00, 0.5368742E+00, 0.5368742E+00 /
      data (ref_adm(14,iz,19,14),iz = 1,20) / &
     & 0.4625500E+00, 0.4625500E+00, 0.4680600E+00, 0.4688500E+00, &
     & 0.4701700E+00, 0.4923500E+00, 0.4871000E+00, 0.4951400E+00, &
     & 0.5062000E+00, 0.5211600E+00, 0.5323700E+00, 0.5393600E+00, &
     & 0.5482500E+00, 0.5574800E+00, 0.5689800E+00, 0.5809000E+00, &
     & 0.6033482E+00, 0.5869714E+00, 0.5268252E+00, 0.5268252E+00 /
      data (ref_adm(14,iz,20,14),iz = 1,20) / &
     & 0.4612100E+00, 0.4612100E+00, 0.4700900E+00, 0.4722100E+00, &
     & 0.4837800E+00, 0.4921100E+00, 0.4931600E+00, 0.4988300E+00, &
     & 0.5076300E+00, 0.5195500E+00, 0.5367500E+00, 0.5429400E+00, &
     & 0.5531900E+00, 0.5587000E+00, 0.5644200E+00, 0.5959000E+00, &
     & 0.5904394E+00, 0.5748942E+00, 0.5213888E+00, 0.5213888E+00 /
      data (ref_adm(14,iz,21,14),iz = 1,20) / &
     & 0.4599300E+00, 0.4599300E+00, 0.4763200E+00, 0.4664700E+00, &
     & 0.4756500E+00, 0.4837000E+00, 0.4792100E+00, 0.4907800E+00, &
     & 0.4968000E+00, 0.5194300E+00, 0.5262000E+00, 0.5310900E+00, &
     & 0.5560900E+00, 0.5599800E+00, 0.5592500E+00, 0.6004100E+00, &
     & 0.5796006E+00, 0.5651460E+00, 0.5190002E+00, 0.5190002E+00 /
      data (ref_adm(14,iz,22,14),iz = 1,20) / &
     & 0.4672600E+00, 0.4672600E+00, 0.4716200E+00, 0.4684200E+00, &
     & 0.4747200E+00, 0.4834400E+00, 0.4878800E+00, 0.4889900E+00, &
     & 0.4959200E+00, 0.5164900E+00, 0.5286400E+00, 0.5343700E+00, &
     & 0.5453100E+00, 0.5459500E+00, 0.5554800E+00, 0.5835800E+00, &
     & 0.5527871E+00, 0.5345646E+00, 0.4932567E+00, 0.4932567E+00 /
      data (ref_adm(14,iz,23,14),iz = 1,20) / &
     & 0.4644000E+00, 0.4644000E+00, 0.4653100E+00, 0.4715600E+00, &
     & 0.4665200E+00, 0.4817700E+00, 0.4929700E+00, 0.4970100E+00, &
     & 0.5027600E+00, 0.5058600E+00, 0.5200900E+00, 0.5375700E+00, &
     & 0.5448100E+00, 0.5420700E+00, 0.5767400E+00, 0.5971900E+00, &
     & 0.5617300E+00, 0.5313877E+00, 0.4966062E+00, 0.4966062E+00 /
      data (ref_adm(14,iz,24,14),iz = 1,20) / &
     & 0.4605600E+00, 0.4605600E+00, 0.4607100E+00, 0.4625200E+00, &
     & 0.4650500E+00, 0.4732900E+00, 0.4787300E+00, 0.4871600E+00, &
     & 0.4992700E+00, 0.5081500E+00, 0.5179000E+00, 0.5284900E+00, &
     & 0.5393700E+00, 0.5520700E+00, 0.5594000E+00, 0.5767300E+00, &
     & 0.5764300E+00, 0.5317782E+00, 0.5029848E+00, 0.5029848E+00 /
      data (ref_adm(14,iz,25,14),iz = 1,20) / &
     & 0.4711000E+00, 0.4711000E+00, 0.4870600E+00, 0.4932900E+00, &
     & 0.4926300E+00, 0.4977500E+00, 0.5031900E+00, 0.5118900E+00, &
     & 0.5166800E+00, 0.5232100E+00, 0.5323100E+00, 0.5368100E+00, &
     & 0.5470700E+00, 0.5583100E+00, 0.5667300E+00, 0.5835300E+00, &
     & 0.5852000E+00, 0.5739000E+00, 0.5116588E+00, 0.5116588E+00 /
      data (ref_adm(14,iz,26,14),iz = 1,20) / &
     & 0.4717000E+00, 0.4717000E+00, 0.4812400E+00, 0.4907600E+00, &
     & 0.4974000E+00, 0.5018400E+00, 0.5039100E+00, 0.5159600E+00, &
     & 0.5290000E+00, 0.5433700E+00, 0.5475200E+00, 0.5596800E+00, &
     & 0.5717300E+00, 0.5838600E+00, 0.5774500E+00, 0.5898800E+00, &
     & 0.5882500E+00, 0.5678000E+00, 0.5237193E+00, 0.5237193E+00 /
      data (ref_adm(14,iz,27,14),iz = 1,20) / &
     & 0.4738400E+00, 0.4738400E+00, 0.4728600E+00, 0.4731400E+00, &
     & 0.4760200E+00, 0.4970400E+00, 0.4948700E+00, 0.5021800E+00, &
     & 0.5108600E+00, 0.5252400E+00, 0.5328800E+00, 0.5464400E+00, &
     & 0.5603500E+00, 0.5867900E+00, 0.5846400E+00, 0.5970000E+00, &
     & 0.5891200E+00, 0.5832900E+00, 0.5181500E+00, 0.5181500E+00 /
      data (ref_adm(14,iz,28,14),iz = 1,20) / &
     & 0.4743200E+00, 0.4743200E+00, 0.4745800E+00, 0.4836600E+00, &
     & 0.4854700E+00, 0.4950000E+00, 0.4989100E+00, 0.5141400E+00, &
     & 0.5200800E+00, 0.5314400E+00, 0.5508200E+00, 0.5680500E+00, &
     & 0.5855700E+00, 0.6010700E+00, 0.6070800E+00, 0.6208300E+00, &
     & 0.6129900E+00, 0.5913300E+00, 0.5048200E+00, 0.5048200E+00 /
      data (ref_adm(14,iz,29,14),iz = 1,20) / &
     & 0.4707500E+00, 0.4707500E+00, 0.4698400E+00, 0.4745000E+00, &
     & 0.4843400E+00, 0.4966200E+00, 0.5118700E+00, 0.5177900E+00, &
     & 0.5346600E+00, 0.5502300E+00, 0.5654800E+00, 0.5873700E+00, &
     & 0.6040800E+00, 0.6203600E+00, 0.6255100E+00, 0.6431200E+00, &
     & 0.6287300E+00, 0.6106800E+00, 0.5119700E+00, 0.5119700E+00 /
      data (ref_adm(14,iz,30,14),iz = 1,20) / &
     & 0.4714400E+00, 0.4714400E+00, 0.4723900E+00, 0.4668800E+00, &
     & 0.4770500E+00, 0.4966000E+00, 0.4962800E+00, 0.5256400E+00, &
     & 0.5429800E+00, 0.5650600E+00, 0.5823700E+00, 0.5884200E+00, &
     & 0.5967400E+00, 0.6118800E+00, 0.6304500E+00, 0.6457700E+00, &
     & 0.6451100E+00, 0.6291200E+00, 0.5360700E+00, 0.5360700E+00 /
      data (ref_adm(14,iz,31,14),iz = 1,20) / &
     & 0.4664000E+00, 0.4664000E+00, 0.4730000E+00, 0.4819500E+00, &
     & 0.4820200E+00, 0.4977700E+00, 0.5047100E+00, 0.5183200E+00, &
     & 0.5441000E+00, 0.5650800E+00, 0.5781700E+00, 0.5817600E+00, &
     & 0.5986500E+00, 0.6097800E+00, 0.6263000E+00, 0.6377400E+00, &
     & 0.6450100E+00, 0.6244100E+00, 0.5315000E+00, 0.5315000E+00 /
      data (ref_adm(14,iz,32,14),iz = 1,20) / &
     & 0.4759000E+00, 0.4759000E+00, 0.4789700E+00, 0.4819400E+00, &
     & 0.4930900E+00, 0.4989200E+00, 0.5141500E+00, 0.5418100E+00, &
     & 0.5610900E+00, 0.5691100E+00, 0.5810300E+00, 0.5928500E+00, &
     & 0.6053900E+00, 0.6248500E+00, 0.6444200E+00, 0.6545800E+00, &
     & 0.6623800E+00, 0.6455500E+00, 0.5416300E+00, 0.5416300E+00 /
      data (ref_adm(14,iz,33,14),iz = 1,20) / &
     & 0.4691000E+00, 0.4691000E+00, 0.4708300E+00, 0.4778500E+00, &
     & 0.4854600E+00, 0.4968700E+00, 0.5155500E+00, 0.5411000E+00, &
     & 0.5503400E+00, 0.5577400E+00, 0.5744300E+00, 0.5950500E+00, &
     & 0.6093700E+00, 0.6324200E+00, 0.6462800E+00, 0.6607100E+00, &
     & 0.6615100E+00, 0.6399500E+00, 0.5385900E+00, 0.5385900E+00 /
      data (ref_adm(14,iz,34,14),iz = 1,20) / &
     & 0.4703400E+00, 0.4703400E+00, 0.4810000E+00, 0.4771900E+00, &
     & 0.4832500E+00, 0.4950300E+00, 0.5114400E+00, 0.5319400E+00, &
     & 0.5475900E+00, 0.5516400E+00, 0.5713900E+00, 0.5925600E+00, &
     & 0.6093500E+00, 0.6287500E+00, 0.6459700E+00, 0.6659300E+00, &
     & 0.6740300E+00, 0.6422000E+00, 0.5177100E+00, 0.5177100E+00 /
      data (ref_adm(14,iz,35,14),iz = 1,20) / &
     & 0.4750800E+00, 0.4750800E+00, 0.4726600E+00, 0.4760300E+00, &
     & 0.4809500E+00, 0.4943500E+00, 0.5127700E+00, 0.5328600E+00, &
     & 0.5413500E+00, 0.5565100E+00, 0.5702500E+00, 0.5867600E+00, &
     & 0.6083200E+00, 0.6371800E+00, 0.6600700E+00, 0.6667900E+00, &
     & 0.6726600E+00, 0.6456600E+00, 0.5381900E+00, 0.5381900E+00 /
      data (ref_adm(14,iz,36,14),iz = 1,20) / &
     & 0.4749400E+00, 0.4749400E+00, 0.4675400E+00, 0.4820200E+00, &
     & 0.4919800E+00, 0.4981700E+00, 0.5193200E+00, 0.5348500E+00, &
     & 0.5382000E+00, 0.5534100E+00, 0.5664900E+00, 0.5873500E+00, &
     & 0.6122600E+00, 0.6517200E+00, 0.6729700E+00, 0.6857000E+00, &
     & 0.6825300E+00, 0.6460500E+00, 0.5324000E+00, 0.5324000E+00 /
      data (ref_adm(14,iz,37,14),iz = 1,20) / &
     & 0.4642000E+00, 0.4642000E+00, 0.4745800E+00, 0.4816300E+00, &
     & 0.4835800E+00, 0.5067300E+00, 0.5263900E+00, 0.5366300E+00, &
     & 0.5363500E+00, 0.5546100E+00, 0.5757100E+00, 0.5934900E+00, &
     & 0.6208900E+00, 0.6712700E+00, 0.7066600E+00, 0.7055000E+00, &
     & 0.6863900E+00, 0.6457600E+00, 0.5295700E+00, 0.5295700E+00 /
      data (ref_adm(14,iz,38,14),iz = 1,20) / &
     & 0.4642000E+00, 0.4642000E+00, 0.4745800E+00, 0.4816300E+00, &
     & 0.4835800E+00, 0.5067300E+00, 0.5263900E+00, 0.5366300E+00, &
     & 0.5363500E+00, 0.5546100E+00, 0.5757100E+00, 0.5934900E+00, &
     & 0.6208900E+00, 0.6712700E+00, 0.7066600E+00, 0.7055000E+00, &
     & 0.6863900E+00, 0.6457600E+00, 0.5295700E+00, 0.5295700E+00 /
! Solar Zenith Angle 70.0 Albedo  0.6132268E+00
      data (ref_adm(14,iz, 1,15),iz = 1,20) / &
     & 0.4635800E+00, 0.4635800E+00, 0.4651300E+00, 0.4732200E+00, &
     & 0.4824200E+00, 0.5086800E+00, 0.5353700E+00, 0.5744600E+00, &
     & 0.6199600E+00, 0.6663000E+00, 0.7640500E+00, 0.8686900E+00, &
     & 0.9973600E+00, 0.1176300E+01, 0.1373600E+01, 0.1546700E+01, &
     & 0.1934210E+01, 0.2566542E+01, 0.2349254E+01, 0.2349254E+01 /
      data (ref_adm(14,iz, 2,15),iz = 1,20) / &
     & 0.4635800E+00, 0.4635800E+00, 0.4651300E+00, 0.4732200E+00, &
     & 0.4824200E+00, 0.5086800E+00, 0.5353700E+00, 0.5744600E+00, &
     & 0.6199600E+00, 0.6663000E+00, 0.7640500E+00, 0.8686900E+00, &
     & 0.9973600E+00, 0.1176300E+01, 0.1373600E+01, 0.1546700E+01, &
     & 0.1934210E+01, 0.2566542E+01, 0.2349254E+01, 0.2349254E+01 /
      data (ref_adm(14,iz, 3,15),iz = 1,20) / &
     & 0.4526800E+00, 0.4526800E+00, 0.4588200E+00, 0.4761500E+00, &
     & 0.4916800E+00, 0.5041900E+00, 0.5289200E+00, 0.5691700E+00, &
     & 0.6144300E+00, 0.6771700E+00, 0.7585400E+00, 0.8569000E+00, &
     & 0.9923300E+00, 0.1155500E+01, 0.1326400E+01, 0.1513200E+01, &
     & 0.1878462E+01, 0.2417653E+01, 0.1760792E+01, 0.1760792E+01 /
      data (ref_adm(14,iz, 4,15),iz = 1,20) / &
     & 0.4480200E+00, 0.4480200E+00, 0.4636100E+00, 0.4740800E+00, &
     & 0.4837500E+00, 0.5061100E+00, 0.5268700E+00, 0.5651300E+00, &
     & 0.6089000E+00, 0.6691600E+00, 0.7451400E+00, 0.8511300E+00, &
     & 0.9642800E+00, 0.1118700E+01, 0.1288300E+01, 0.1449000E+01, &
     & 0.1769619E+01, 0.2163195E+01, 0.1993988E+01, 0.1993988E+01 /
      data (ref_adm(14,iz, 5,15),iz = 1,20) / &
     & 0.4558500E+00, 0.4558500E+00, 0.4607400E+00, 0.4751300E+00, &
     & 0.4951000E+00, 0.5075900E+00, 0.5335400E+00, 0.5576400E+00, &
     & 0.6079800E+00, 0.6628700E+00, 0.7324800E+00, 0.8251500E+00, &
     & 0.9389800E+00, 0.1089900E+01, 0.1243200E+01, 0.1370000E+01, &
     & 0.1462400E+01, 0.1894854E+01, 0.1627035E+01, 0.1627035E+01 /
      data (ref_adm(14,iz, 6,15),iz = 1,20) / &
     & 0.4548700E+00, 0.4548700E+00, 0.4663700E+00, 0.4713800E+00, &
     & 0.4858000E+00, 0.5009200E+00, 0.5225500E+00, 0.5568100E+00, &
     & 0.5994300E+00, 0.6504700E+00, 0.7113600E+00, 0.7932800E+00, &
     & 0.8994300E+00, 0.1044400E+01, 0.1188400E+01, 0.1340600E+01, &
     & 0.1541500E+01, 0.1611000E+01, 0.1399700E+01, 0.1399700E+01 /
      data (ref_adm(14,iz, 7,15),iz = 1,20) / &
     & 0.4549600E+00, 0.4549600E+00, 0.4633600E+00, 0.4730300E+00, &
     & 0.4819400E+00, 0.5003400E+00, 0.5245600E+00, 0.5573100E+00, &
     & 0.5995700E+00, 0.6431200E+00, 0.7053600E+00, 0.7738300E+00, &
     & 0.8794800E+00, 0.1001600E+01, 0.1128700E+01, 0.1296300E+01, &
     & 0.1460400E+01, 0.1459200E+01, 0.1194420E+01, 0.1194420E+01 /
      data (ref_adm(14,iz, 8,15),iz = 1,20) / &
     & 0.4507600E+00, 0.4507600E+00, 0.4701300E+00, 0.4756500E+00, &
     & 0.4840500E+00, 0.4964500E+00, 0.5230700E+00, 0.5493900E+00, &
     & 0.5810500E+00, 0.6212900E+00, 0.6861400E+00, 0.7485100E+00, &
     & 0.8301600E+00, 0.9441000E+00, 0.1043000E+01, 0.1156500E+01, &
     & 0.1278400E+01, 0.1242400E+01, 0.1087100E+01, 0.1087100E+01 /
      data (ref_adm(14,iz, 9,15),iz = 1,20) / &
     & 0.4634100E+00, 0.4634100E+00, 0.4545900E+00, 0.4563000E+00, &
     & 0.4857200E+00, 0.4934800E+00, 0.5111600E+00, 0.5397900E+00, &
     & 0.5749000E+00, 0.5968100E+00, 0.6626400E+00, 0.7236700E+00, &
     & 0.8011400E+00, 0.8791100E+00, 0.9784800E+00, 0.1083000E+01, &
     & 0.1177500E+01, 0.1088400E+01, 0.1000800E+01, 0.1000800E+01 /
      data (ref_adm(14,iz,10,15),iz = 1,20) / &
     & 0.4589900E+00, 0.4589900E+00, 0.4597200E+00, 0.4531700E+00, &
     & 0.4685800E+00, 0.4954900E+00, 0.5208700E+00, 0.5379900E+00, &
     & 0.5681600E+00, 0.6021000E+00, 0.6487400E+00, 0.7050000E+00, &
     & 0.7650200E+00, 0.8448000E+00, 0.9136100E+00, 0.1002900E+01, &
     & 0.1071400E+01, 0.9923900E+00, 0.8620800E+00, 0.8620800E+00 /
      data (ref_adm(14,iz,11,15),iz = 1,20) / &
     & 0.4581400E+00, 0.4581400E+00, 0.4555600E+00, 0.4630700E+00, &
     & 0.4800900E+00, 0.4962900E+00, 0.5120500E+00, 0.5306200E+00, &
     & 0.5581400E+00, 0.5878500E+00, 0.6214200E+00, 0.6751700E+00, &
     & 0.7239400E+00, 0.7939500E+00, 0.8561700E+00, 0.9200600E+00, &
     & 0.9963500E+00, 0.9310400E+00, 0.7681500E+00, 0.7681500E+00 /
      data (ref_adm(14,iz,12,15),iz = 1,20) / &
     & 0.4509400E+00, 0.4509400E+00, 0.4431600E+00, 0.4630000E+00, &
     & 0.4724500E+00, 0.4842400E+00, 0.4976900E+00, 0.5277200E+00, &
     & 0.5440200E+00, 0.5658200E+00, 0.6082800E+00, 0.6509900E+00, &
     & 0.6891300E+00, 0.7425100E+00, 0.8025500E+00, 0.8543300E+00, &
     & 0.9071500E+00, 0.8616100E+00, 0.7229500E+00, 0.7229500E+00 /
      data (ref_adm(14,iz,13,15),iz = 1,20) / &
     & 0.4484100E+00, 0.4484100E+00, 0.4611700E+00, 0.4599900E+00, &
     & 0.4768400E+00, 0.4821400E+00, 0.4880200E+00, 0.5043600E+00, &
     & 0.5226300E+00, 0.5492200E+00, 0.5971100E+00, 0.6221700E+00, &
     & 0.6583600E+00, 0.7034900E+00, 0.7478800E+00, 0.7926700E+00, &
     & 0.8359100E+00, 0.8047400E+00, 0.7545483E+00, 0.7545483E+00 /
      data (ref_adm(14,iz,14,15),iz = 1,20) / &
     & 0.4545800E+00, 0.4545800E+00, 0.4573700E+00, 0.4641900E+00, &
     & 0.4768200E+00, 0.4821500E+00, 0.4965400E+00, 0.5150800E+00, &
     & 0.5393100E+00, 0.5645500E+00, 0.5896600E+00, 0.6191400E+00, &
     & 0.6389700E+00, 0.6731200E+00, 0.7120200E+00, 0.7415400E+00, &
     & 0.7693300E+00, 0.7570600E+00, 0.7470000E+00, 0.7470000E+00 /
      data (ref_adm(14,iz,15,15),iz = 1,20) / &
     & 0.4550700E+00, 0.4550700E+00, 0.4609300E+00, 0.4648900E+00, &
     & 0.4714000E+00, 0.4770800E+00, 0.4921300E+00, 0.5053800E+00, &
     & 0.5317700E+00, 0.5524200E+00, 0.5767700E+00, 0.6109200E+00, &
     & 0.6397700E+00, 0.6711400E+00, 0.6757200E+00, 0.7030300E+00, &
     & 0.7331000E+00, 0.7503700E+00, 0.6903713E+00, 0.6903713E+00 /
      data (ref_adm(14,iz,16,15),iz = 1,20) / &
     & 0.4498400E+00, 0.4498400E+00, 0.4439900E+00, 0.4484800E+00, &
     & 0.4571300E+00, 0.4663100E+00, 0.4752200E+00, 0.4892000E+00, &
     & 0.5103200E+00, 0.5272700E+00, 0.5459400E+00, 0.5758000E+00, &
     & 0.6010900E+00, 0.6302900E+00, 0.6529000E+00, 0.6669300E+00, &
     & 0.6931500E+00, 0.7256739E+00, 0.6651214E+00, 0.6651214E+00 /
      data (ref_adm(14,iz,17,15),iz = 1,20) / &
     & 0.4524000E+00, 0.4524000E+00, 0.4506500E+00, 0.4476300E+00, &
     & 0.4601500E+00, 0.4739300E+00, 0.4777000E+00, 0.4890400E+00, &
     & 0.5049600E+00, 0.5239100E+00, 0.5291600E+00, 0.5499200E+00, &
     & 0.5746000E+00, 0.6067600E+00, 0.6143300E+00, 0.6370700E+00, &
     & 0.6740200E+00, 0.6930552E+00, 0.6419970E+00, 0.6419970E+00 /
      data (ref_adm(14,iz,18,15),iz = 1,20) / &
     & 0.4492000E+00, 0.4492000E+00, 0.4513600E+00, 0.4589200E+00, &
     & 0.4599900E+00, 0.4682000E+00, 0.4807100E+00, 0.4851900E+00, &
     & 0.5044200E+00, 0.5207900E+00, 0.5177400E+00, 0.5466000E+00, &
     & 0.5671700E+00, 0.5969100E+00, 0.5965800E+00, 0.6020400E+00, &
     & 0.6430525E+00, 0.6366578E+00, 0.5788670E+00, 0.5788670E+00 /
      data (ref_adm(14,iz,19,15),iz = 1,20) / &
     & 0.4483800E+00, 0.4483800E+00, 0.4496700E+00, 0.4594500E+00, &
     & 0.4629000E+00, 0.4735700E+00, 0.4789500E+00, 0.4866500E+00, &
     & 0.4961900E+00, 0.5009600E+00, 0.5153300E+00, 0.5449200E+00, &
     & 0.5679700E+00, 0.5821200E+00, 0.5834500E+00, 0.6078900E+00, &
     & 0.6240463E+00, 0.6169246E+00, 0.5668196E+00, 0.5668196E+00 /
      data (ref_adm(14,iz,20,15),iz = 1,20) / &
     & 0.4436400E+00, 0.4436400E+00, 0.4532900E+00, 0.4606300E+00, &
     & 0.4677600E+00, 0.4784800E+00, 0.4885900E+00, 0.4772900E+00, &
     & 0.4855400E+00, 0.5058100E+00, 0.5155800E+00, 0.5312400E+00, &
     & 0.5485800E+00, 0.5666800E+00, 0.5922200E+00, 0.5451400E+00, &
     & 0.6093225E+00, 0.6028591E+00, 0.5601332E+00, 0.5601332E+00 /
      data (ref_adm(14,iz,21,15),iz = 1,20) / &
     & 0.4492800E+00, 0.4492800E+00, 0.4548100E+00, 0.4645800E+00, &
     & 0.4643400E+00, 0.4757100E+00, 0.4826100E+00, 0.4874200E+00, &
     & 0.4923000E+00, 0.5015500E+00, 0.5117400E+00, 0.5309600E+00, &
     & 0.5497700E+00, 0.5570000E+00, 0.5623600E+00, 0.5522800E+00, &
     & 0.5969913E+00, 0.5914992E+00, 0.5570247E+00, 0.5570247E+00 /
      data (ref_adm(14,iz,22,15),iz = 1,20) / &
     & 0.4560900E+00, 0.4560900E+00, 0.4611900E+00, 0.4595500E+00, &
     & 0.4663300E+00, 0.4724400E+00, 0.4738800E+00, 0.4805700E+00, &
     & 0.4918800E+00, 0.4966700E+00, 0.5020900E+00, 0.5297000E+00, &
     & 0.5419900E+00, 0.5615300E+00, 0.5638700E+00, 0.5726400E+00, &
     & 0.5657648E+00, 0.5523932E+00, 0.5180136E+00, 0.5180136E+00 /
      data (ref_adm(14,iz,23,15),iz = 1,20) / &
     & 0.4496900E+00, 0.4496900E+00, 0.4598500E+00, 0.4604700E+00, &
     & 0.4594500E+00, 0.4736600E+00, 0.4718500E+00, 0.4844800E+00, &
     & 0.4956800E+00, 0.4996200E+00, 0.5032100E+00, 0.5347400E+00, &
     & 0.5351900E+00, 0.5553800E+00, 0.5594300E+00, 0.5747300E+00, &
     & 0.6377000E+00, 0.5489875E+00, 0.5218267E+00, 0.5218267E+00 /
      data (ref_adm(14,iz,24,15),iz = 1,20) / &
     & 0.4464300E+00, 0.4464300E+00, 0.4553000E+00, 0.4523700E+00, &
     & 0.4580800E+00, 0.4647500E+00, 0.4731100E+00, 0.4808300E+00, &
     & 0.4901800E+00, 0.5023500E+00, 0.5107300E+00, 0.5252000E+00, &
     & 0.5406600E+00, 0.5520300E+00, 0.5645000E+00, 0.5830800E+00, &
     & 0.5931800E+00, 0.5494649E+00, 0.5290822E+00, 0.5290822E+00 /
      data (ref_adm(14,iz,25,15),iz = 1,20) / &
     & 0.4596100E+00, 0.4596100E+00, 0.4586200E+00, 0.4627400E+00, &
     & 0.4681600E+00, 0.4714400E+00, 0.4765100E+00, 0.4841100E+00, &
     & 0.4962100E+00, 0.5091800E+00, 0.5280700E+00, 0.5437300E+00, &
     & 0.5514800E+00, 0.5615300E+00, 0.5720500E+00, 0.5896300E+00, &
     & 0.6253400E+00, 0.5533495E+00, 0.5389109E+00, 0.5389109E+00 /
      data (ref_adm(14,iz,26,15),iz = 1,20) / &
     & 0.4505700E+00, 0.4505700E+00, 0.4544800E+00, 0.4607600E+00, &
     & 0.4609900E+00, 0.4639100E+00, 0.4846300E+00, 0.4906300E+00, &
     & 0.5041500E+00, 0.5149100E+00, 0.5291000E+00, 0.5484200E+00, &
     & 0.5621100E+00, 0.5782700E+00, 0.5863400E+00, 0.6060600E+00, &
     & 0.6151800E+00, 0.6135600E+00, 0.5526604E+00, 0.5526604E+00 /
      data (ref_adm(14,iz,27,15),iz = 1,20) / &
     & 0.4525100E+00, 0.4525100E+00, 0.4563200E+00, 0.4585800E+00, &
     & 0.4671400E+00, 0.4682600E+00, 0.4730400E+00, 0.4933600E+00, &
     & 0.5014200E+00, 0.5183600E+00, 0.5277800E+00, 0.5378500E+00, &
     & 0.5633000E+00, 0.5792400E+00, 0.5915000E+00, 0.6172200E+00, &
     & 0.6293300E+00, 0.6244200E+00, 0.5467600E+00, 0.5467600E+00 /
      data (ref_adm(14,iz,28,15),iz = 1,20) / &
     & 0.4548100E+00, 0.4548100E+00, 0.4541900E+00, 0.4615900E+00, &
     & 0.4685400E+00, 0.4746400E+00, 0.4761500E+00, 0.4895200E+00, &
     & 0.5028500E+00, 0.5201900E+00, 0.5350100E+00, 0.5539800E+00, &
     & 0.5758200E+00, 0.5989600E+00, 0.6152400E+00, 0.6345400E+00, &
     & 0.6506200E+00, 0.6454500E+00, 0.5648700E+00, 0.5648700E+00 /
      data (ref_adm(14,iz,29,15),iz = 1,20) / &
     & 0.4539400E+00, 0.4539400E+00, 0.4517800E+00, 0.4635500E+00, &
     & 0.4620100E+00, 0.4730500E+00, 0.4863500E+00, 0.4894500E+00, &
     & 0.5055000E+00, 0.5288900E+00, 0.5447100E+00, 0.5752000E+00, &
     & 0.6073200E+00, 0.6215900E+00, 0.6422100E+00, 0.6633000E+00, &
     & 0.6789300E+00, 0.6684700E+00, 0.5778300E+00, 0.5778300E+00 /
      data (ref_adm(14,iz,30,15),iz = 1,20) / &
     & 0.4588800E+00, 0.4588800E+00, 0.4564400E+00, 0.4615700E+00, &
     & 0.4651900E+00, 0.4702600E+00, 0.4928900E+00, 0.4962700E+00, &
     & 0.5228200E+00, 0.5440900E+00, 0.5672400E+00, 0.5917600E+00, &
     & 0.6178500E+00, 0.6337500E+00, 0.6484000E+00, 0.6733300E+00, &
     & 0.6929500E+00, 0.6921700E+00, 0.5951700E+00, 0.5951700E+00 /
      data (ref_adm(14,iz,31,15),iz = 1,20) / &
     & 0.4576600E+00, 0.4576600E+00, 0.4555100E+00, 0.4649700E+00, &
     & 0.4633100E+00, 0.4759600E+00, 0.4886500E+00, 0.5024200E+00, &
     & 0.5237600E+00, 0.5513800E+00, 0.5694900E+00, 0.5840900E+00, &
     & 0.6050900E+00, 0.6249100E+00, 0.6487200E+00, 0.6629200E+00, &
     & 0.6855700E+00, 0.6918900E+00, 0.6108300E+00, 0.6108300E+00 /
      data (ref_adm(14,iz,32,15),iz = 1,20) / &
     & 0.4450600E+00, 0.4450600E+00, 0.4555200E+00, 0.4581300E+00, &
     & 0.4669400E+00, 0.4748800E+00, 0.4855400E+00, 0.5045600E+00, &
     & 0.5306100E+00, 0.5577800E+00, 0.5715500E+00, 0.5834500E+00, &
     & 0.6041300E+00, 0.6265300E+00, 0.6506200E+00, 0.6778000E+00, &
     & 0.6969000E+00, 0.7025200E+00, 0.6147600E+00, 0.6147600E+00 /
      data (ref_adm(14,iz,33,15),iz = 1,20) / &
     & 0.4554700E+00, 0.4554700E+00, 0.4565000E+00, 0.4594800E+00, &
     & 0.4693900E+00, 0.4780600E+00, 0.4945500E+00, 0.5175500E+00, &
     & 0.5421000E+00, 0.5539800E+00, 0.5656800E+00, 0.5849700E+00, &
     & 0.6071800E+00, 0.6338600E+00, 0.6545100E+00, 0.6804800E+00, &
     & 0.7119400E+00, 0.7169700E+00, 0.6176900E+00, 0.6176900E+00 /
      data (ref_adm(14,iz,34,15),iz = 1,20) / &
     & 0.4524900E+00, 0.4524900E+00, 0.4536700E+00, 0.4713900E+00, &
     & 0.4684700E+00, 0.4842700E+00, 0.5018200E+00, 0.5241900E+00, &
     & 0.5680200E+00, 0.5517200E+00, 0.5715700E+00, 0.5914700E+00, &
     & 0.6218600E+00, 0.6394000E+00, 0.6681400E+00, 0.6970300E+00, &
     & 0.7322000E+00, 0.7114800E+00, 0.6088500E+00, 0.6088500E+00 /
      data (ref_adm(14,iz,35,15),iz = 1,20) / &
     & 0.4562100E+00, 0.4562100E+00, 0.4556000E+00, 0.4623200E+00, &
     & 0.4715500E+00, 0.4819700E+00, 0.4968100E+00, 0.5192100E+00, &
     & 0.5573000E+00, 0.5629000E+00, 0.5745000E+00, 0.5902700E+00, &
     & 0.6121000E+00, 0.6470400E+00, 0.6782900E+00, 0.7097100E+00, &
     & 0.7211500E+00, 0.7201600E+00, 0.5994200E+00, 0.5994200E+00 /
      data (ref_adm(14,iz,36,15),iz = 1,20) / &
     & 0.4523600E+00, 0.4523600E+00, 0.4589800E+00, 0.4604400E+00, &
     & 0.4671500E+00, 0.4757500E+00, 0.4993200E+00, 0.5220000E+00, &
     & 0.5429300E+00, 0.5553100E+00, 0.5763000E+00, 0.5932000E+00, &
     & 0.6184700E+00, 0.6549000E+00, 0.6933300E+00, 0.7270000E+00, &
     & 0.7350300E+00, 0.7288700E+00, 0.6186500E+00, 0.6186500E+00 /
      data (ref_adm(14,iz,37,15),iz = 1,20) / &
     & 0.4595500E+00, 0.4595500E+00, 0.4541900E+00, 0.4587100E+00, &
     & 0.4689900E+00, 0.4851400E+00, 0.4985500E+00, 0.5278500E+00, &
     & 0.5422600E+00, 0.5576700E+00, 0.5788400E+00, 0.5916200E+00, &
     & 0.6241400E+00, 0.6639400E+00, 0.7144600E+00, 0.7688400E+00, &
     & 0.7616300E+00, 0.7303100E+00, 0.6126700E+00, 0.6126700E+00 /
      data (ref_adm(14,iz,38,15),iz = 1,20) / &
     & 0.4595500E+00, 0.4595500E+00, 0.4541900E+00, 0.4587100E+00, &
     & 0.4689900E+00, 0.4851400E+00, 0.4985500E+00, 0.5278500E+00, &
     & 0.5422600E+00, 0.5576700E+00, 0.5788400E+00, 0.5916200E+00, &
     & 0.6241400E+00, 0.6639400E+00, 0.7144600E+00, 0.7688400E+00, &
     & 0.7616300E+00, 0.7303100E+00, 0.6126700E+00, 0.6126700E+00 /
! Solar Zenith Angle 75.0 Albedo  0.6332208E+00
      data (ref_adm(14,iz, 1,16),iz = 1,20) / &
     & 0.4303200E+00, 0.4303200E+00, 0.4454900E+00, 0.4602800E+00, &
     & 0.4788200E+00, 0.4942100E+00, 0.5284200E+00, 0.5706100E+00, &
     & 0.6251200E+00, 0.6977200E+00, 0.7951100E+00, 0.9092500E+00, &
     & 0.1058400E+01, 0.1089800E+01, 0.1457705E+01, 0.1946760E+01, &
     & 0.2760514E+01, 0.3988728E+01, 0.2081273E+01, 0.2081273E+01 /
      data (ref_adm(14,iz, 2,16),iz = 1,20) / &
     & 0.4303200E+00, 0.4303200E+00, 0.4454900E+00, 0.4602800E+00, &
     & 0.4788200E+00, 0.4942100E+00, 0.5284200E+00, 0.5706100E+00, &
     & 0.6251200E+00, 0.6977200E+00, 0.7951100E+00, 0.9092500E+00, &
     & 0.1058400E+01, 0.1089800E+01, 0.1457705E+01, 0.1946760E+01, &
     & 0.2760514E+01, 0.3988728E+01, 0.2081273E+01, 0.2081273E+01 /
      data (ref_adm(14,iz, 3,16),iz = 1,20) / &
     & 0.4336400E+00, 0.4336400E+00, 0.4411800E+00, 0.4514400E+00, &
     & 0.4796300E+00, 0.4979300E+00, 0.5303900E+00, 0.5684600E+00, &
     & 0.6101400E+00, 0.6908700E+00, 0.7807600E+00, 0.9090100E+00, &
     & 0.1034200E+01, 0.1210100E+01, 0.1431281E+01, 0.1890428E+01, &
     & 0.2607637E+01, 0.4050834E+01, 0.1603439E+01, 0.1603439E+01 /
      data (ref_adm(14,iz, 4,16),iz = 1,20) / &
     & 0.4465300E+00, 0.4465300E+00, 0.4428300E+00, 0.4547900E+00, &
     & 0.4760500E+00, 0.4975000E+00, 0.5324000E+00, 0.5581700E+00, &
     & 0.6187600E+00, 0.6871800E+00, 0.7753200E+00, 0.8869200E+00, &
     & 0.1007300E+01, 0.1127500E+01, 0.1378221E+01, 0.1776381E+01, &
     & 0.2336642E+01, 0.3599355E+01, 0.2707589E+01, 0.2707589E+01 /
      data (ref_adm(14,iz, 5,16),iz = 1,20) / &
     & 0.4516600E+00, 0.4516600E+00, 0.4524200E+00, 0.4609100E+00, &
     & 0.4755900E+00, 0.5016900E+00, 0.5204000E+00, 0.5584700E+00, &
     & 0.6230200E+00, 0.6786000E+00, 0.7590500E+00, 0.8533200E+00, &
     & 0.9928500E+00, 0.1124700E+01, 0.1312811E+01, 0.1636649E+01, &
     & 0.2054136E+01, 0.2772572E+01, 0.2771662E+01, 0.2771662E+01 /
      data (ref_adm(14,iz, 6,16),iz = 1,20) / &
     & 0.4377800E+00, 0.4377800E+00, 0.4467100E+00, 0.4589200E+00, &
     & 0.4714300E+00, 0.4911700E+00, 0.5197800E+00, 0.5633300E+00, &
     & 0.6090400E+00, 0.6695000E+00, 0.7446600E+00, 0.8447600E+00, &
     & 0.9726800E+00, 0.1144800E+01, 0.1347700E+01, 0.1615800E+01, &
     & 0.1880200E+01, 0.2050600E+01, 0.2012747E+01, 0.2012747E+01 /
      data (ref_adm(14,iz, 7,16),iz = 1,20) / &
     & 0.4457200E+00, 0.4457200E+00, 0.4550400E+00, 0.4562100E+00, &
     & 0.4757300E+00, 0.5005400E+00, 0.5275900E+00, 0.5653900E+00, &
     & 0.6005600E+00, 0.6558800E+00, 0.7182200E+00, 0.8153800E+00, &
     & 0.9229400E+00, 0.1085900E+01, 0.1272000E+01, 0.1512800E+01, &
     & 0.1719200E+01, 0.1817700E+01, 0.1553200E+01, 0.1553200E+01 /
      data (ref_adm(14,iz, 8,16),iz = 1,20) / &
     & 0.4435000E+00, 0.4435000E+00, 0.4436800E+00, 0.4551900E+00, &
     & 0.4750100E+00, 0.4898500E+00, 0.5260400E+00, 0.5614000E+00, &
     & 0.5911400E+00, 0.6366000E+00, 0.6969200E+00, 0.7843100E+00, &
     & 0.8826200E+00, 0.1016200E+01, 0.1194600E+01, 0.1376100E+01, &
     & 0.1552400E+01, 0.1516800E+01, 0.1342700E+01, 0.1342700E+01 /
      data (ref_adm(14,iz, 9,16),iz = 1,20) / &
     & 0.4438300E+00, 0.4438300E+00, 0.4419800E+00, 0.4518900E+00, &
     & 0.4643200E+00, 0.4924900E+00, 0.5218900E+00, 0.5415600E+00, &
     & 0.5762700E+00, 0.6181900E+00, 0.6803200E+00, 0.7478200E+00, &
     & 0.8364800E+00, 0.9352800E+00, 0.1070400E+01, 0.1254800E+01, &
     & 0.1384900E+01, 0.1296700E+01, 0.1124000E+01, 0.1124000E+01 /
      data (ref_adm(14,iz,10,16),iz = 1,20) / &
     & 0.4402100E+00, 0.4402100E+00, 0.4524300E+00, 0.4503600E+00, &
     & 0.4717600E+00, 0.4907500E+00, 0.5108600E+00, 0.5404700E+00, &
     & 0.5689800E+00, 0.5993000E+00, 0.6549900E+00, 0.7209200E+00, &
     & 0.7943100E+00, 0.8857500E+00, 0.9932400E+00, 0.1109900E+01, &
     & 0.1222500E+01, 0.1175400E+01, 0.1049100E+01, 0.1049100E+01 /
      data (ref_adm(14,iz,11,16),iz = 1,20) / &
     & 0.4533800E+00, 0.4533800E+00, 0.4598700E+00, 0.4584300E+00, &
     & 0.4684100E+00, 0.4840100E+00, 0.5054200E+00, 0.5332100E+00, &
     & 0.5609800E+00, 0.5922600E+00, 0.6435200E+00, 0.6941900E+00, &
     & 0.7667100E+00, 0.8316300E+00, 0.9181400E+00, 0.1026200E+01, &
     & 0.1104500E+01, 0.1048300E+01, 0.9114400E+00, 0.9114400E+00 /
      data (ref_adm(14,iz,12,16),iz = 1,20) / &
     & 0.4428000E+00, 0.4428000E+00, 0.4571200E+00, 0.4560900E+00, &
     & 0.4662900E+00, 0.4841100E+00, 0.5050000E+00, 0.5212800E+00, &
     & 0.5475300E+00, 0.5701400E+00, 0.6166100E+00, 0.6614800E+00, &
     & 0.7194300E+00, 0.7943200E+00, 0.8555000E+00, 0.9415000E+00, &
     & 0.1008700E+01, 0.9674800E+00, 0.8609400E+00, 0.8609400E+00 /
      data (ref_adm(14,iz,13,16),iz = 1,20) / &
     & 0.4475600E+00, 0.4475600E+00, 0.4463100E+00, 0.4452200E+00, &
     & 0.4575000E+00, 0.4684800E+00, 0.4932000E+00, 0.5191500E+00, &
     & 0.5435400E+00, 0.5568000E+00, 0.5920000E+00, 0.6365800E+00, &
     & 0.6887400E+00, 0.7406400E+00, 0.8000200E+00, 0.8778300E+00, &
     & 0.9309100E+00, 0.8748400E+00, 0.9180408E+00, 0.9180408E+00 /
      data (ref_adm(14,iz,14,16),iz = 1,20) / &
     & 0.4459200E+00, 0.4459200E+00, 0.4485100E+00, 0.4500000E+00, &
     & 0.4596900E+00, 0.4749900E+00, 0.4955000E+00, 0.5164400E+00, &
     & 0.5358100E+00, 0.5601900E+00, 0.5884400E+00, 0.6185600E+00, &
     & 0.6622200E+00, 0.7129100E+00, 0.7508100E+00, 0.8220700E+00, &
     & 0.8685300E+00, 0.8688800E+00, 0.8728725E+00, 0.8728725E+00 /
      data (ref_adm(14,iz,15,16),iz = 1,20) / &
     & 0.4443500E+00, 0.4443500E+00, 0.4495600E+00, 0.4554900E+00, &
     & 0.4611700E+00, 0.4707200E+00, 0.4869300E+00, 0.5044000E+00, &
     & 0.5235800E+00, 0.5433000E+00, 0.5671100E+00, 0.6020900E+00, &
     & 0.6436800E+00, 0.6931700E+00, 0.7034900E+00, 0.7488300E+00, &
     & 0.7961800E+00, 0.8686396E+00, 0.8361012E+00, 0.8361012E+00 /
      data (ref_adm(14,iz,16,16),iz = 1,20) / &
     & 0.4420100E+00, 0.4420100E+00, 0.4402700E+00, 0.4402700E+00, &
     & 0.4509000E+00, 0.4616000E+00, 0.4712300E+00, 0.4914500E+00, &
     & 0.5068100E+00, 0.5276900E+00, 0.5491500E+00, 0.5778100E+00, &
     & 0.6067200E+00, 0.6447600E+00, 0.6777200E+00, 0.7238500E+00, &
     & 0.7640800E+00, 0.8273776E+00, 0.8044025E+00, 0.8044025E+00 /
      data (ref_adm(14,iz,17,16),iz = 1,20) / &
     & 0.4400500E+00, 0.4400500E+00, 0.4462900E+00, 0.4458000E+00, &
     & 0.4554800E+00, 0.4589600E+00, 0.4749000E+00, 0.4915600E+00, &
     & 0.5024300E+00, 0.5274300E+00, 0.5404800E+00, 0.5747000E+00, &
     & 0.5927800E+00, 0.6302500E+00, 0.6620200E+00, 0.6900300E+00, &
     & 0.7486800E+00, 0.7885473E+00, 0.7747819E+00, 0.7747819E+00 /
      data (ref_adm(14,iz,18,16),iz = 1,20) / &
     & 0.4373400E+00, 0.4373400E+00, 0.4404200E+00, 0.4433500E+00, &
     & 0.4596900E+00, 0.4691800E+00, 0.4701400E+00, 0.4906500E+00, &
     & 0.4939300E+00, 0.5083300E+00, 0.5246600E+00, 0.5525300E+00, &
     & 0.5735200E+00, 0.6017200E+00, 0.6322000E+00, 0.6588200E+00, &
     & 0.7006139E+00, 0.7180494E+00, 0.6854880E+00, 0.6854880E+00 /
      data (ref_adm(14,iz,19,16),iz = 1,20) / &
     & 0.4445100E+00, 0.4445100E+00, 0.4489900E+00, 0.4464400E+00, &
     & 0.4492900E+00, 0.4661000E+00, 0.4610100E+00, 0.4673600E+00, &
     & 0.4915700E+00, 0.5075700E+00, 0.5106400E+00, 0.5477400E+00, &
     & 0.5664100E+00, 0.5911100E+00, 0.6159200E+00, 0.6700600E+00, &
     & 0.6781201E+00, 0.6937442E+00, 0.6696735E+00, 0.6696735E+00 /
      data (ref_adm(14,iz,20,16),iz = 1,20) / &
     & 0.4408800E+00, 0.4408800E+00, 0.4339300E+00, 0.4320200E+00, &
     & 0.4396200E+00, 0.4530500E+00, 0.4699500E+00, 0.4708200E+00, &
     & 0.4786200E+00, 0.4929000E+00, 0.5055700E+00, 0.5319500E+00, &
     & 0.5563900E+00, 0.5792000E+00, 0.5878200E+00, 0.6381498E+00, &
     & 0.6607850E+00, 0.6764293E+00, 0.6607254E+00, 0.6607254E+00 /
      data (ref_adm(14,iz,21,16),iz = 1,20) / &
     & 0.4401600E+00, 0.4401600E+00, 0.4500700E+00, 0.4451100E+00, &
     & 0.4525400E+00, 0.4491500E+00, 0.4545200E+00, 0.4666100E+00, &
     & 0.4743500E+00, 0.4927500E+00, 0.5104300E+00, 0.5229500E+00, &
     & 0.5494100E+00, 0.5810500E+00, 0.5967000E+00, 0.7013500E+00, &
     & 0.6459929E+00, 0.6621678E+00, 0.6565139E+00, 0.6565139E+00 /
      data (ref_adm(14,iz,22,16),iz = 1,20) / &
     & 0.4340600E+00, 0.4340600E+00, 0.4468400E+00, 0.4431400E+00, &
     & 0.4408000E+00, 0.4461300E+00, 0.4637000E+00, 0.4792800E+00, &
     & 0.4938900E+00, 0.4950200E+00, 0.5082500E+00, 0.5228500E+00, &
     & 0.5386800E+00, 0.5642400E+00, 0.5887300E+00, 0.6422200E+00, &
     & 0.6055229E+00, 0.6076581E+00, 0.5928810E+00, 0.5928810E+00 /
      data (ref_adm(14,iz,23,16),iz = 1,20) / &
     & 0.4242800E+00, 0.4242800E+00, 0.4288500E+00, 0.4364800E+00, &
     & 0.4348100E+00, 0.4414600E+00, 0.4504300E+00, 0.4707100E+00, &
     & 0.4848600E+00, 0.4967900E+00, 0.5059700E+00, 0.5262900E+00, &
     & 0.5347200E+00, 0.5693000E+00, 0.5871100E+00, 0.5963900E+00, &
     & 0.6000847E+00, 0.6033326E+00, 0.5979123E+00, 0.5979123E+00 /
      data (ref_adm(14,iz,24,16),iz = 1,20) / &
     & 0.4350800E+00, 0.4350800E+00, 0.4356700E+00, 0.4381400E+00, &
     & 0.4458800E+00, 0.4526600E+00, 0.4595900E+00, 0.4684900E+00, &
     & 0.4799700E+00, 0.4942300E+00, 0.5069200E+00, 0.5234400E+00, &
     & 0.5402200E+00, 0.5625600E+00, 0.5770900E+00, 0.6037500E+00, &
     & 0.6872000E+00, 0.6034092E+00, 0.6073756E+00, 0.6073756E+00 /
      data (ref_adm(14,iz,25,16),iz = 1,20) / &
     & 0.4431200E+00, 0.4431200E+00, 0.4451200E+00, 0.4490500E+00, &
     & 0.4553300E+00, 0.4643300E+00, 0.4702000E+00, 0.4793300E+00, &
     & 0.4867000E+00, 0.5009000E+00, 0.5163100E+00, 0.5354000E+00, &
     & 0.5598300E+00, 0.5862800E+00, 0.5994500E+00, 0.6202400E+00, &
     & 0.6445300E+00, 0.5967200E+00, 0.6202260E+00, 0.6202260E+00 /
      data (ref_adm(14,iz,26,16),iz = 1,20) / &
     & 0.4412400E+00, 0.4412400E+00, 0.4503900E+00, 0.4479300E+00, &
     & 0.4469900E+00, 0.4601100E+00, 0.4673700E+00, 0.4798500E+00, &
     & 0.4810300E+00, 0.5065500E+00, 0.5153100E+00, 0.5313700E+00, &
     & 0.5487700E+00, 0.5783000E+00, 0.5924200E+00, 0.6293300E+00, &
     & 0.6524000E+00, 0.6717100E+00, 0.6381108E+00, 0.6381108E+00 /
      data (ref_adm(14,iz,27,16),iz = 1,20) / &
     & 0.4403100E+00, 0.4403100E+00, 0.4404300E+00, 0.4419100E+00, &
     & 0.4478400E+00, 0.4563100E+00, 0.4620200E+00, 0.4806200E+00, &
     & 0.4859700E+00, 0.5029300E+00, 0.5241500E+00, 0.5393400E+00, &
     & 0.5560900E+00, 0.5885500E+00, 0.6048000E+00, 0.6499600E+00, &
     & 0.6823400E+00, 0.6891400E+00, 0.6526400E+00, 0.6526400E+00 /
      data (ref_adm(14,iz,28,16),iz = 1,20) / &
     & 0.4413500E+00, 0.4413500E+00, 0.4359300E+00, 0.4375700E+00, &
     & 0.4526300E+00, 0.4517800E+00, 0.4577800E+00, 0.4732200E+00, &
     & 0.4945800E+00, 0.5066800E+00, 0.5219300E+00, 0.5461300E+00, &
     & 0.5664900E+00, 0.6012300E+00, 0.6254800E+00, 0.6641200E+00, &
     & 0.7018000E+00, 0.7097500E+00, 0.6527900E+00, 0.6527900E+00 /
      data (ref_adm(14,iz,29,16),iz = 1,20) / &
     & 0.4452500E+00, 0.4452500E+00, 0.4352400E+00, 0.4414300E+00, &
     & 0.4474400E+00, 0.4609100E+00, 0.4683200E+00, 0.4816700E+00, &
     & 0.4821600E+00, 0.5092900E+00, 0.5401700E+00, 0.5540900E+00, &
     & 0.5917800E+00, 0.6252800E+00, 0.6529000E+00, 0.6989600E+00, &
     & 0.7248700E+00, 0.7396000E+00, 0.6728100E+00, 0.6728100E+00 /
      data (ref_adm(14,iz,30,16),iz = 1,20) / &
     & 0.4373800E+00, 0.4373800E+00, 0.4445800E+00, 0.4375900E+00, &
     & 0.4511700E+00, 0.4596800E+00, 0.4650700E+00, 0.4761000E+00, &
     & 0.4932800E+00, 0.5166100E+00, 0.5400400E+00, 0.5735400E+00, &
     & 0.6075200E+00, 0.6480400E+00, 0.6759600E+00, 0.7228100E+00, &
     & 0.7636200E+00, 0.7771700E+00, 0.7006100E+00, 0.7006100E+00 /
      data (ref_adm(14,iz,31,16),iz = 1,20) / &
     & 0.4482700E+00, 0.4482700E+00, 0.4414600E+00, 0.4404800E+00, &
     & 0.4450800E+00, 0.4510900E+00, 0.4690800E+00, 0.4811400E+00, &
     & 0.4941500E+00, 0.5234900E+00, 0.5632200E+00, 0.5913800E+00, &
     & 0.6146500E+00, 0.6451500E+00, 0.6720900E+00, 0.7047100E+00, &
     & 0.7398600E+00, 0.7912400E+00, 0.7020000E+00, 0.7020000E+00 /
      data (ref_adm(14,iz,32,16),iz = 1,20) / &
     & 0.4402300E+00, 0.4402300E+00, 0.4410000E+00, 0.4467200E+00, &
     & 0.4502600E+00, 0.4586100E+00, 0.4688100E+00, 0.4859400E+00, &
     & 0.5039400E+00, 0.5350500E+00, 0.5694000E+00, 0.5922400E+00, &
     & 0.6165300E+00, 0.6516000E+00, 0.6837900E+00, 0.7263600E+00, &
     & 0.7776000E+00, 0.7988300E+00, 0.7034400E+00, 0.7034400E+00 /
      data (ref_adm(14,iz,33,16),iz = 1,20) / &
     & 0.4440700E+00, 0.4440700E+00, 0.4408800E+00, 0.4355400E+00, &
     & 0.4465100E+00, 0.4562800E+00, 0.4711100E+00, 0.4881500E+00, &
     & 0.5131100E+00, 0.5442400E+00, 0.5632700E+00, 0.5846200E+00, &
     & 0.6131000E+00, 0.6537900E+00, 0.6896200E+00, 0.7377900E+00, &
     & 0.7933400E+00, 0.8152000E+00, 0.7266500E+00, 0.7266500E+00 /
      data (ref_adm(14,iz,34,16),iz = 1,20) / &
     & 0.4350400E+00, 0.4350400E+00, 0.4279100E+00, 0.4344300E+00, &
     & 0.4403300E+00, 0.4495800E+00, 0.4615900E+00, 0.4907300E+00, &
     & 0.5208700E+00, 0.5465400E+00, 0.5597900E+00, 0.5819100E+00, &
     & 0.6114900E+00, 0.6557800E+00, 0.6887500E+00, 0.7394300E+00, &
     & 0.7950100E+00, 0.8109000E+00, 0.7282000E+00, 0.7282000E+00 /
      data (ref_adm(14,iz,35,16),iz = 1,20) / &
     & 0.4414000E+00, 0.4414000E+00, 0.4396900E+00, 0.4413600E+00, &
     & 0.4442300E+00, 0.4585900E+00, 0.4752600E+00, 0.4968300E+00, &
     & 0.5212900E+00, 0.5439500E+00, 0.5638700E+00, 0.5882400E+00, &
     & 0.6207500E+00, 0.6583000E+00, 0.7065600E+00, 0.7473600E+00, &
     & 0.8007000E+00, 0.8211800E+00, 0.7064600E+00, 0.7064600E+00 /
      data (ref_adm(14,iz,36,16),iz = 1,20) / &
     & 0.4359100E+00, 0.4359100E+00, 0.4382500E+00, 0.4355900E+00, &
     & 0.4444400E+00, 0.4588700E+00, 0.4739600E+00, 0.4949500E+00, &
     & 0.5217900E+00, 0.5538100E+00, 0.5676400E+00, 0.5902900E+00, &
     & 0.6242900E+00, 0.6657600E+00, 0.7103700E+00, 0.7651100E+00, &
     & 0.8181600E+00, 0.8477100E+00, 0.7531800E+00, 0.7531800E+00 /
      data (ref_adm(14,iz,37,16),iz = 1,20) / &
     & 0.4301300E+00, 0.4301300E+00, 0.4306700E+00, 0.4473800E+00, &
     & 0.4574700E+00, 0.4619500E+00, 0.4762200E+00, 0.5008600E+00, &
     & 0.5210500E+00, 0.5494100E+00, 0.5762000E+00, 0.5955900E+00, &
     & 0.6317000E+00, 0.6675800E+00, 0.7147000E+00, 0.7878600E+00, &
     & 0.8452800E+00, 0.8683100E+00, 0.7427900E+00, 0.7427900E+00 /
      data (ref_adm(14,iz,38,16),iz = 1,20) / &
     & 0.4301300E+00, 0.4301300E+00, 0.4306700E+00, 0.4473800E+00, &
     & 0.4574700E+00, 0.4619500E+00, 0.4762200E+00, 0.5008600E+00, &
     & 0.5210500E+00, 0.5494100E+00, 0.5762000E+00, 0.5955900E+00, &
     & 0.6317000E+00, 0.6675800E+00, 0.7147000E+00, 0.7878600E+00, &
     & 0.8452800E+00, 0.8683100E+00, 0.7427900E+00, 0.7427900E+00 /
! Solar Zenith Angle 80.0 Albedo  0.6349124E+00
      data (ref_adm(14,iz, 1,17),iz = 1,20) / &
     & 0.4054000E+00, 0.4054000E+00, 0.4161200E+00, 0.4395400E+00, &
     & 0.4525900E+00, 0.4799000E+00, 0.5193700E+00, 0.5572600E+00, &
     & 0.6034800E+00, 0.6835300E+00, 0.7987600E+00, 0.9270300E+00, &
     & 0.1083074E+01, 0.1289390E+01, 0.1677789E+01, 0.2434446E+01, &
     & 0.3649997E+01, 0.4138456E+01, 0.2721037E+01, 0.2721037E+01 /
      data (ref_adm(14,iz, 2,17),iz = 1,20) / &
     & 0.4054000E+00, 0.4054000E+00, 0.4161200E+00, 0.4395400E+00, &
     & 0.4525900E+00, 0.4799000E+00, 0.5193700E+00, 0.5572600E+00, &
     & 0.6034800E+00, 0.6835300E+00, 0.7987600E+00, 0.9270300E+00, &
     & 0.1083074E+01, 0.1289390E+01, 0.1677789E+01, 0.2434446E+01, &
     & 0.3649997E+01, 0.4138456E+01, 0.2721037E+01, 0.2721037E+01 /
      data (ref_adm(14,iz, 3,17),iz = 1,20) / &
     & 0.4078900E+00, 0.4078900E+00, 0.4138900E+00, 0.4412800E+00, &
     & 0.4605000E+00, 0.4913600E+00, 0.5114900E+00, 0.5606000E+00, &
     & 0.6080000E+00, 0.6811300E+00, 0.7965300E+00, 0.9196400E+00, &
     & 0.1071642E+01, 0.1270229E+01, 0.1637542E+01, 0.2333547E+01, &
     & 0.3514062E+01, 0.4130348E+01, 0.1935773E+01, 0.1935773E+01 /
      data (ref_adm(14,iz, 4,17),iz = 1,20) / &
     & 0.4078100E+00, 0.4078100E+00, 0.4230700E+00, 0.4293700E+00, &
     & 0.4628600E+00, 0.4821300E+00, 0.5120800E+00, 0.5558200E+00, &
     & 0.6074500E+00, 0.6548200E+00, 0.7848300E+00, 0.8929100E+00, &
     & 0.1047770E+01, 0.1231445E+01, 0.1558676E+01, 0.2144661E+01, &
     & 0.3078009E+01, 0.4109648E+01, 0.2799017E+01, 0.2799017E+01 /
      data (ref_adm(14,iz, 5,17),iz = 1,20) / &
     & 0.4180500E+00, 0.4180500E+00, 0.4294400E+00, 0.4424100E+00, &
     & 0.4434400E+00, 0.4686300E+00, 0.5000300E+00, 0.5441300E+00, &
     & 0.5938500E+00, 0.6642200E+00, 0.7582700E+00, 0.8591900E+00, &
     & 0.1015327E+01, 0.1181017E+01, 0.1459227E+01, 0.1928613E+01, &
     & 0.2576257E+01, 0.3744018E+01, 0.3196060E+01, 0.3196060E+01 /
      data (ref_adm(14,iz, 6,17),iz = 1,20) / &
     & 0.4047000E+00, 0.4047000E+00, 0.4154100E+00, 0.4229900E+00, &
     & 0.4488800E+00, 0.4729000E+00, 0.4975600E+00, 0.5337000E+00, &
     & 0.5872700E+00, 0.6513200E+00, 0.7311600E+00, 0.8364100E+00, &
     & 0.9777900E+00, 0.1182700E+01, 0.1410000E+01, 0.1715900E+01, &
     & 0.2075400E+01, 0.2300200E+01, 0.2707713E+01, 0.2707713E+01 /
      data (ref_adm(14,iz, 7,17),iz = 1,20) / &
     & 0.4196400E+00, 0.4196400E+00, 0.4263900E+00, 0.4466500E+00, &
     & 0.4601700E+00, 0.4765600E+00, 0.5005000E+00, 0.5469900E+00, &
     & 0.5872300E+00, 0.6578500E+00, 0.7217700E+00, 0.8053000E+00, &
     & 0.9102200E+00, 0.1106600E+01, 0.1275900E+01, 0.1561100E+01, &
     & 0.1907100E+01, 0.2127100E+01, 0.1834700E+01, 0.1834700E+01 /
      data (ref_adm(14,iz, 8,17),iz = 1,20) / &
     & 0.4198800E+00, 0.4198800E+00, 0.4241700E+00, 0.4413100E+00, &
     & 0.4511600E+00, 0.4675500E+00, 0.4998500E+00, 0.5294100E+00, &
     & 0.5810000E+00, 0.6302100E+00, 0.6929400E+00, 0.7918100E+00, &
     & 0.9273800E+00, 0.1049800E+01, 0.1211200E+01, 0.1468400E+01, &
     & 0.1743400E+01, 0.1867100E+01, 0.1666579E+01, 0.1666579E+01 /
      data (ref_adm(14,iz, 9,17),iz = 1,20) / &
     & 0.4139400E+00, 0.4139400E+00, 0.4204600E+00, 0.4335300E+00, &
     & 0.4311100E+00, 0.4580500E+00, 0.4877900E+00, 0.5264300E+00, &
     & 0.5747900E+00, 0.6178000E+00, 0.6628600E+00, 0.7399600E+00, &
     & 0.8675700E+00, 0.9862100E+00, 0.1118600E+01, 0.1312700E+01, &
     & 0.1543300E+01, 0.1590900E+01, 0.1328900E+01, 0.1328900E+01 /
      data (ref_adm(14,iz,10,17),iz = 1,20) / &
     & 0.4195000E+00, 0.4195000E+00, 0.4172500E+00, 0.4339400E+00, &
     & 0.4393600E+00, 0.4472100E+00, 0.4857600E+00, 0.5214800E+00, &
     & 0.5577800E+00, 0.5916100E+00, 0.6338700E+00, 0.7071100E+00, &
     & 0.7949800E+00, 0.9124200E+00, 0.1026800E+01, 0.1198300E+01, &
     & 0.1386700E+01, 0.1403300E+01, 0.1212000E+01, 0.1212000E+01 /
      data (ref_adm(14,iz,11,17),iz = 1,20) / &
     & 0.4212400E+00, 0.4212400E+00, 0.4206700E+00, 0.4282800E+00, &
     & 0.4361800E+00, 0.4603100E+00, 0.4753500E+00, 0.5058400E+00, &
     & 0.5367800E+00, 0.5836000E+00, 0.6083100E+00, 0.6793100E+00, &
     & 0.7636900E+00, 0.8470900E+00, 0.9383400E+00, 0.1114800E+01, &
     & 0.1249500E+01, 0.1247100E+01, 0.1076600E+01, 0.1076600E+01 /
      data (ref_adm(14,iz,12,17),iz = 1,20) / &
     & 0.4248700E+00, 0.4248700E+00, 0.4255600E+00, 0.4221100E+00, &
     & 0.4406900E+00, 0.4550700E+00, 0.4766100E+00, 0.5037500E+00, &
     & 0.5232400E+00, 0.5552300E+00, 0.5899800E+00, 0.6477800E+00, &
     & 0.7248600E+00, 0.8130100E+00, 0.8803800E+00, 0.1010000E+01, &
     & 0.1163700E+01, 0.1121200E+01, 0.8918500E+00, 0.8918500E+00 /
      data (ref_adm(14,iz,13,17),iz = 1,20) / &
     & 0.4204200E+00, 0.4204200E+00, 0.4231600E+00, 0.4271500E+00, &
     & 0.4355800E+00, 0.4590800E+00, 0.4619200E+00, 0.4890000E+00, &
     & 0.5154300E+00, 0.5454700E+00, 0.5794700E+00, 0.6236700E+00, &
     & 0.6894600E+00, 0.7731200E+00, 0.8328000E+00, 0.9345400E+00, &
     & 0.1025800E+01, 0.1017200E+01, 0.1063904E+01, 0.1063904E+01 /
      data (ref_adm(14,iz,14,17),iz = 1,20) / &
     & 0.4294100E+00, 0.4294100E+00, 0.4328900E+00, 0.4428500E+00, &
     & 0.4590900E+00, 0.4708200E+00, 0.4862500E+00, 0.4992400E+00, &
     & 0.5241500E+00, 0.5475700E+00, 0.5780800E+00, 0.6201300E+00, &
     & 0.6715300E+00, 0.7226400E+00, 0.7856800E+00, 0.8851700E+00, &
     & 0.9325800E+00, 0.8868400E+00, 0.1006212E+01, 0.1006212E+01 /
      data (ref_adm(14,iz,15,17),iz = 1,20) / &
     & 0.4179100E+00, 0.4179100E+00, 0.4080600E+00, 0.4146500E+00, &
     & 0.4267800E+00, 0.4382300E+00, 0.4521600E+00, 0.4693900E+00, &
     & 0.4909700E+00, 0.5106500E+00, 0.5393700E+00, 0.5825700E+00, &
     & 0.6340900E+00, 0.6789800E+00, 0.7276100E+00, 0.8217300E+00, &
     & 0.8639900E+00, 0.8398500E+00, 0.9591114E+00, 0.9591114E+00 /
      data (ref_adm(14,iz,16,17),iz = 1,20) / &
     & 0.4124200E+00, 0.4124200E+00, 0.4166400E+00, 0.4251200E+00, &
     & 0.4375500E+00, 0.4383300E+00, 0.4508700E+00, 0.4754200E+00, &
     & 0.4912500E+00, 0.5109400E+00, 0.5384600E+00, 0.5743000E+00, &
     & 0.6078700E+00, 0.6440600E+00, 0.7025400E+00, 0.7626700E+00, &
     & 0.8429300E+00, 0.8711873E+00, 0.9196913E+00, 0.9196913E+00 /
      data (ref_adm(14,iz,17,17),iz = 1,20) / &
     & 0.4144700E+00, 0.4144700E+00, 0.4154000E+00, 0.4162900E+00, &
     & 0.4185300E+00, 0.4359500E+00, 0.4543300E+00, 0.4601400E+00, &
     & 0.4789900E+00, 0.5082900E+00, 0.5251700E+00, 0.5502000E+00, &
     & 0.5886100E+00, 0.6087200E+00, 0.6553000E+00, 0.7109800E+00, &
     & 0.8408300E+00, 0.8257349E+00, 0.8830487E+00, 0.8830487E+00 /
      data (ref_adm(14,iz,18,17),iz = 1,20) / &
     & 0.4146900E+00, 0.4146900E+00, 0.4188400E+00, 0.4187300E+00, &
     & 0.4330400E+00, 0.4470800E+00, 0.4475600E+00, 0.4537100E+00, &
     & 0.4682900E+00, 0.4964100E+00, 0.5081000E+00, 0.5359800E+00, &
     & 0.5578200E+00, 0.5899600E+00, 0.6336200E+00, 0.7005000E+00, &
     & 0.7382752E+00, 0.7926710E+00, 0.8389356E+00, 0.8389356E+00 /
      data (ref_adm(14,iz,19,17),iz = 1,20) / &
     & 0.4236000E+00, 0.4236000E+00, 0.4122700E+00, 0.4269700E+00, &
     & 0.4366900E+00, 0.4348200E+00, 0.4319900E+00, 0.4611800E+00, &
     & 0.4636600E+00, 0.4829400E+00, 0.4998100E+00, 0.5219400E+00, &
     & 0.5547800E+00, 0.5844400E+00, 0.6179600E+00, 0.6312800E+00, &
     & 0.7112800E+00, 0.7626212E+00, 0.8175744E+00, 0.8175744E+00 /
      data (ref_adm(14,iz,20,17),iz = 1,20) / &
     & 0.4196500E+00, 0.4196500E+00, 0.4189600E+00, 0.4197100E+00, &
     & 0.4240400E+00, 0.4384200E+00, 0.4303400E+00, 0.4534000E+00, &
     & 0.4645300E+00, 0.4802400E+00, 0.4991500E+00, 0.5144300E+00, &
     & 0.5312500E+00, 0.5754100E+00, 0.6043200E+00, 0.6507012E+00, &
     & 0.6916962E+00, 0.7415672E+00, 0.8059551E+00, 0.8059551E+00 /
      data (ref_adm(14,iz,21,17),iz = 1,20) / &
     & 0.4309900E+00, 0.4309900E+00, 0.4308600E+00, 0.4341700E+00, &
     & 0.4248000E+00, 0.4266700E+00, 0.4328000E+00, 0.4535800E+00, &
     & 0.4631100E+00, 0.4798800E+00, 0.4972000E+00, 0.5003800E+00, &
     & 0.5285500E+00, 0.5612900E+00, 0.5878000E+00, 0.6902500E+00, &
     & 0.6760467E+00, 0.7258906E+00, 0.8014736E+00, 0.8014736E+00 /
      data (ref_adm(14,iz,22,17),iz = 1,20) / &
     & 0.4156900E+00, 0.4156900E+00, 0.4198100E+00, 0.4199600E+00, &
     & 0.4259700E+00, 0.4317100E+00, 0.4278800E+00, 0.4456900E+00, &
     & 0.4511900E+00, 0.4782800E+00, 0.4985700E+00, 0.5170600E+00, &
     & 0.5370400E+00, 0.5543300E+00, 0.5715700E+00, 0.6385200E+00, &
     & 0.6284457E+00, 0.6560994E+00, 0.6973915E+00, 0.6973915E+00 /
      data (ref_adm(14,iz,23,17),iz = 1,20) / &
     & 0.4103800E+00, 0.4103800E+00, 0.4033400E+00, 0.4030300E+00, &
     & 0.4212300E+00, 0.4226200E+00, 0.4357900E+00, 0.4391000E+00, &
     & 0.4581400E+00, 0.4732700E+00, 0.4805600E+00, 0.5130700E+00, &
     & 0.5293500E+00, 0.5383200E+00, 0.5805000E+00, 0.6249400E+00, &
     & 0.6236527E+00, 0.6526954E+00, 0.7055681E+00, 0.7055681E+00 /
      data (ref_adm(14,iz,24,17),iz = 1,20) / &
     & 0.4184500E+00, 0.4184500E+00, 0.4111900E+00, 0.4140000E+00, &
     & 0.4160200E+00, 0.4236900E+00, 0.4322000E+00, 0.4402600E+00, &
     & 0.4541200E+00, 0.4663900E+00, 0.4831600E+00, 0.5055500E+00, &
     & 0.5354500E+00, 0.5567600E+00, 0.5720100E+00, 0.6270200E+00, &
     & 0.7134600E+00, 0.6553599E+00, 0.7199613E+00, 0.7199613E+00 /
      data (ref_adm(14,iz,25,17),iz = 1,20) / &
     & 0.4133100E+00, 0.4133100E+00, 0.4192000E+00, 0.4271500E+00, &
     & 0.4307700E+00, 0.4355400E+00, 0.4417000E+00, 0.4506900E+00, &
     & 0.4641100E+00, 0.4801200E+00, 0.4996700E+00, 0.5239200E+00, &
     & 0.5447900E+00, 0.5804900E+00, 0.5971200E+00, 0.6355600E+00, &
     & 0.6954300E+00, 0.6917300E+00, 0.7392552E+00, 0.7392552E+00 /
      data (ref_adm(14,iz,26,17),iz = 1,20) / &
     & 0.4232400E+00, 0.4232400E+00, 0.4052300E+00, 0.4114500E+00, &
     & 0.4186400E+00, 0.4225800E+00, 0.4224000E+00, 0.4438700E+00, &
     & 0.4530600E+00, 0.4651900E+00, 0.4921100E+00, 0.5184900E+00, &
     & 0.5505400E+00, 0.5851800E+00, 0.6175000E+00, 0.6606900E+00, &
     & 0.7070200E+00, 0.7698900E+00, 0.7651477E+00, 0.7651477E+00 /
      data (ref_adm(14,iz,27,17),iz = 1,20) / &
     & 0.4150900E+00, 0.4150900E+00, 0.4142800E+00, 0.4161100E+00, &
     & 0.4136200E+00, 0.4209500E+00, 0.4352600E+00, 0.4468100E+00, &
     & 0.4625500E+00, 0.4773500E+00, 0.4983300E+00, 0.5259500E+00, &
     & 0.5678500E+00, 0.5864500E+00, 0.6232600E+00, 0.6623500E+00, &
     & 0.7138200E+00, 0.7558600E+00, 0.7405700E+00, 0.7405700E+00 /
      data (ref_adm(14,iz,28,17),iz = 1,20) / &
     & 0.4169700E+00, 0.4169700E+00, 0.4176500E+00, 0.4134400E+00, &
     & 0.4172000E+00, 0.4268500E+00, 0.4278700E+00, 0.4432700E+00, &
     & 0.4587000E+00, 0.4814400E+00, 0.5119400E+00, 0.5279500E+00, &
     & 0.5603300E+00, 0.5890300E+00, 0.6365500E+00, 0.6763900E+00, &
     & 0.7369700E+00, 0.8026300E+00, 0.8027800E+00, 0.8027800E+00 /
      data (ref_adm(14,iz,29,17),iz = 1,20) / &
     & 0.4200600E+00, 0.4200600E+00, 0.4146500E+00, 0.4114500E+00, &
     & 0.4108000E+00, 0.4172800E+00, 0.4314800E+00, 0.4510600E+00, &
     & 0.4786700E+00, 0.4880500E+00, 0.5020600E+00, 0.5267000E+00, &
     & 0.5674700E+00, 0.6087700E+00, 0.6469100E+00, 0.7104500E+00, &
     & 0.7789700E+00, 0.8487600E+00, 0.8098400E+00, 0.8098400E+00 /
      data (ref_adm(14,iz,30,17),iz = 1,20) / &
     & 0.4161800E+00, 0.4161800E+00, 0.4164700E+00, 0.4130000E+00, &
     & 0.4225400E+00, 0.4312800E+00, 0.4322400E+00, 0.4441600E+00, &
     & 0.4672000E+00, 0.4768700E+00, 0.5112000E+00, 0.5465100E+00, &
     & 0.5962000E+00, 0.6382500E+00, 0.6760200E+00, 0.7288100E+00, &
     & 0.8108900E+00, 0.8787600E+00, 0.8333700E+00, 0.8333700E+00 /
      data (ref_adm(14,iz,31,17),iz = 1,20) / &
     & 0.4113200E+00, 0.4113200E+00, 0.4123700E+00, 0.4132000E+00, &
     & 0.4250200E+00, 0.4302700E+00, 0.4376800E+00, 0.4505300E+00, &
     & 0.4647400E+00, 0.4906800E+00, 0.5293400E+00, 0.5567600E+00, &
     & 0.6008800E+00, 0.6347700E+00, 0.6693700E+00, 0.7262300E+00, &
     & 0.7948400E+00, 0.8474200E+00, 0.8368200E+00, 0.8368200E+00 /
      data (ref_adm(14,iz,32,17),iz = 1,20) / &
     & 0.4183100E+00, 0.4183100E+00, 0.4150500E+00, 0.4266200E+00, &
     & 0.4260700E+00, 0.4449000E+00, 0.4445100E+00, 0.4517800E+00, &
     & 0.4718700E+00, 0.4994500E+00, 0.5334400E+00, 0.5577900E+00, &
     & 0.5911800E+00, 0.6375500E+00, 0.6768300E+00, 0.7349200E+00, &
     & 0.8385800E+00, 0.8864900E+00, 0.8748200E+00, 0.8748200E+00 /
      data (ref_adm(14,iz,33,17),iz = 1,20) / &
     & 0.4138700E+00, 0.4138700E+00, 0.4111300E+00, 0.4153800E+00, &
     & 0.4218600E+00, 0.4279500E+00, 0.4419600E+00, 0.4522100E+00, &
     & 0.4678200E+00, 0.4908200E+00, 0.5238900E+00, 0.5505400E+00, &
     & 0.5851100E+00, 0.6349100E+00, 0.6860700E+00, 0.7560600E+00, &
     & 0.8307100E+00, 0.8920700E+00, 0.8628100E+00, 0.8628100E+00 /
      data (ref_adm(14,iz,34,17),iz = 1,20) / &
     & 0.4188100E+00, 0.4188100E+00, 0.4076700E+00, 0.4047500E+00, &
     & 0.4092500E+00, 0.4250000E+00, 0.4515700E+00, 0.4594700E+00, &
     & 0.4760000E+00, 0.5098100E+00, 0.5422100E+00, 0.5742500E+00, &
     & 0.6014500E+00, 0.6466900E+00, 0.6978900E+00, 0.7558700E+00, &
     & 0.8305800E+00, 0.9223400E+00, 0.9081200E+00, 0.9081200E+00 /
      data (ref_adm(14,iz,35,17),iz = 1,20) / &
     & 0.4098600E+00, 0.4098600E+00, 0.4081600E+00, 0.4097300E+00, &
     & 0.4119700E+00, 0.4225900E+00, 0.4360800E+00, 0.4621300E+00, &
     & 0.4834600E+00, 0.5186200E+00, 0.5377900E+00, 0.5619900E+00, &
     & 0.5954500E+00, 0.6451100E+00, 0.7001100E+00, 0.7706100E+00, &
     & 0.8525600E+00, 0.9540400E+00, 0.8926400E+00, 0.8926400E+00 /
      data (ref_adm(14,iz,36,17),iz = 1,20) / &
     & 0.4196000E+00, 0.4196000E+00, 0.4004600E+00, 0.4088400E+00, &
     & 0.4186000E+00, 0.4155600E+00, 0.4350000E+00, 0.4554500E+00, &
     & 0.4892900E+00, 0.5179800E+00, 0.5338700E+00, 0.5681100E+00, &
     & 0.6103700E+00, 0.6509200E+00, 0.6925100E+00, 0.7759300E+00, &
     & 0.8800400E+00, 0.9680300E+00, 0.9298900E+00, 0.9298900E+00 /
      data (ref_adm(14,iz,37,17),iz = 1,20) / &
     & 0.4087100E+00, 0.4087100E+00, 0.4130000E+00, 0.4163700E+00, &
     & 0.4137200E+00, 0.4276000E+00, 0.4452100E+00, 0.4644400E+00, &
     & 0.4886600E+00, 0.5212000E+00, 0.5336600E+00, 0.5690100E+00, &
     & 0.6148400E+00, 0.6472600E+00, 0.6904200E+00, 0.7899300E+00, &
     & 0.9054900E+00, 0.1021000E+01, 0.9601800E+00, 0.9601800E+00 /
      data (ref_adm(14,iz,38,17),iz = 1,20) / &
     & 0.4087100E+00, 0.4087100E+00, 0.4130000E+00, 0.4163700E+00, &
     & 0.4137200E+00, 0.4276000E+00, 0.4452100E+00, 0.4644400E+00, &
     & 0.4886600E+00, 0.5212000E+00, 0.5336600E+00, 0.5690100E+00, &
     & 0.6148400E+00, 0.6472600E+00, 0.6904200E+00, 0.7899300E+00, &
     & 0.9054900E+00, 0.1021000E+01, 0.9601800E+00, 0.9601800E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6317008E+00
      data (ref_adm(14,iz, 1,18),iz = 1,20) / &
     & 0.4171000E+00, 0.4171000E+00, 0.3930600E+00, 0.4113600E+00, &
     & 0.4423600E+00, 0.4530500E+00, 0.4776400E+00, 0.5453100E+00, &
     & 0.5995600E+00, 0.5973600E+00, 0.7279300E+00, 0.8609000E+00, &
     & 0.1116127E+01, 0.1316841E+01, 0.1657372E+01, 0.2221574E+01, &
     & 0.3012158E+01, 0.4085850E+01, 0.2427521E+01, 0.2427521E+01 /
      data (ref_adm(14,iz, 2,18),iz = 1,20) / &
     & 0.4171000E+00, 0.4171000E+00, 0.3930600E+00, 0.4113600E+00, &
     & 0.4423600E+00, 0.4530500E+00, 0.4776400E+00, 0.5453100E+00, &
     & 0.5995600E+00, 0.5973600E+00, 0.7279300E+00, 0.8609000E+00, &
     & 0.1116127E+01, 0.1316841E+01, 0.1657372E+01, 0.2221574E+01, &
     & 0.3012158E+01, 0.4085850E+01, 0.2427521E+01, 0.2427521E+01 /
      data (ref_adm(14,iz, 3,18),iz = 1,20) / &
     & 0.3863600E+00, 0.3863600E+00, 0.3908600E+00, 0.4019600E+00, &
     & 0.4400500E+00, 0.4649600E+00, 0.4917200E+00, 0.5480300E+00, &
     & 0.5923300E+00, 0.6370800E+00, 0.7586300E+00, 0.9045200E+00, &
     & 0.1103701E+01, 0.1299981E+01, 0.1625627E+01, 0.2160042E+01, &
     & 0.2878069E+01, 0.4054594E+01, 0.1290204E+01, 0.1290204E+01 /
      data (ref_adm(14,iz, 4,18),iz = 1,20) / &
     & 0.3754300E+00, 0.3754300E+00, 0.4087300E+00, 0.4459700E+00, &
     & 0.4385000E+00, 0.4811300E+00, 0.4995300E+00, 0.5262400E+00, &
     & 0.5947000E+00, 0.6234100E+00, 0.7622700E+00, 0.8233200E+00, &
     & 0.1077215E+01, 0.1264875E+01, 0.1560996E+01, 0.2035832E+01, &
     & 0.2630996E+01, 0.3650660E+01, 0.2751406E+01, 0.2751406E+01 /
      data (ref_adm(14,iz, 5,18),iz = 1,20) / &
     & 0.4048700E+00, 0.4048700E+00, 0.4053300E+00, 0.4029700E+00, &
     & 0.4537100E+00, 0.4650500E+00, 0.4794800E+00, 0.5084500E+00, &
     & 0.5675200E+00, 0.6436900E+00, 0.7349200E+00, 0.8185300E+00, &
     & 0.1040487E+01, 0.1216835E+01, 0.1477539E+01, 0.1879277E+01, &
     & 0.2350337E+01, 0.2986207E+01, 0.2728362E+01, 0.2728362E+01 /
      data (ref_adm(14,iz, 6,18),iz = 1,20) / &
     & 0.3991400E+00, 0.3991400E+00, 0.3987900E+00, 0.4135800E+00, &
     & 0.4103800E+00, 0.4402000E+00, 0.4576600E+00, 0.4968900E+00, &
     & 0.5379300E+00, 0.5987100E+00, 0.6731900E+00, 0.7530400E+00, &
     & 0.8176500E+00, 0.1087100E+01, 0.1318700E+01, 0.1832200E+01, &
     & 0.2514400E+01, 0.2467930E+01, 0.2090384E+01, 0.2090384E+01 /
      data (ref_adm(14,iz, 7,18),iz = 1,20) / &
     & 0.4006400E+00, 0.4006400E+00, 0.4409300E+00, 0.4177600E+00, &
     & 0.4740900E+00, 0.4877200E+00, 0.4964100E+00, 0.5326800E+00, &
     & 0.5584300E+00, 0.6065100E+00, 0.6808600E+00, 0.8056000E+00, &
     & 0.9235300E+00, 0.1125400E+01, 0.1366000E+01, 0.1766100E+01, &
     & 0.1823946E+01, 0.2077585E+01, 0.1707227E+01, 0.1707227E+01 /
      data (ref_adm(14,iz, 8,18),iz = 1,20) / &
     & 0.4284600E+00, 0.4284600E+00, 0.4425500E+00, 0.4667000E+00, &
     & 0.4224800E+00, 0.4648800E+00, 0.4985000E+00, 0.5171800E+00, &
     & 0.5562900E+00, 0.6156300E+00, 0.6799500E+00, 0.7440000E+00, &
     & 0.9067400E+00, 0.1003500E+01, 0.1190427E+01, 0.1414989E+01, &
     & 0.1618442E+01, 0.1780666E+01, 0.1474489E+01, 0.1474489E+01 /
      data (ref_adm(14,iz, 9,18),iz = 1,20) / &
     & 0.4154300E+00, 0.4154300E+00, 0.4189300E+00, 0.4044300E+00, &
     & 0.4405500E+00, 0.4450300E+00, 0.4595600E+00, 0.5351800E+00, &
     & 0.5373200E+00, 0.5988400E+00, 0.6405800E+00, 0.6999500E+00, &
     & 0.8575400E+00, 0.1028800E+01, 0.1066000E+01, 0.1280865E+01, &
     & 0.1452996E+01, 0.1560104E+01, 0.1310721E+01, 0.1310721E+01 /
      data (ref_adm(14,iz,10,18),iz = 1,20) / &
     & 0.4177500E+00, 0.4177500E+00, 0.4054700E+00, 0.4226700E+00, &
     & 0.4233100E+00, 0.4640900E+00, 0.4710600E+00, 0.4934700E+00, &
     & 0.5243700E+00, 0.5755200E+00, 0.5943300E+00, 0.6750700E+00, &
     & 0.8513900E+00, 0.9360000E+00, 0.1038300E+01, 0.1155966E+01, &
     & 0.1293754E+01, 0.1393773E+01, 0.1207368E+01, 0.1207368E+01 /
      data (ref_adm(14,iz,11,18),iz = 1,20) / &
     & 0.4095100E+00, 0.4095100E+00, 0.3826700E+00, 0.4045400E+00, &
     & 0.4161700E+00, 0.4537600E+00, 0.4705100E+00, 0.5082100E+00, &
     & 0.5120000E+00, 0.5316700E+00, 0.5843000E+00, 0.6049400E+00, &
     & 0.7905200E+00, 0.8293300E+00, 0.9630900E+00, 0.1255900E+01, &
     & 0.1349600E+01, 0.1230792E+01, 0.1100786E+01, 0.1100786E+01 /
      data (ref_adm(14,iz,12,18),iz = 1,20) / &
     & 0.4072800E+00, 0.4072800E+00, 0.4216300E+00, 0.4154500E+00, &
     & 0.4074000E+00, 0.4167000E+00, 0.4825800E+00, 0.4942500E+00, &
     & 0.5093400E+00, 0.5354600E+00, 0.5807800E+00, 0.6230600E+00, &
     & 0.6706100E+00, 0.7544600E+00, 0.9600200E+00, 0.1124100E+01, &
     & 0.1044685E+01, 0.1103481E+01, 0.1011539E+01, 0.1011539E+01 /
      data (ref_adm(14,iz,13,18),iz = 1,20) / &
     & 0.4232800E+00, 0.4232800E+00, 0.4204500E+00, 0.4227500E+00, &
     & 0.4018700E+00, 0.4298200E+00, 0.4318900E+00, 0.4467100E+00, &
     & 0.5024800E+00, 0.5244800E+00, 0.5461800E+00, 0.6052500E+00, &
     & 0.6225000E+00, 0.6824800E+00, 0.9804000E+00, 0.1032600E+01, &
     & 0.9528640E+00, 0.1001740E+01, 0.9411899E+00, 0.9411899E+00 /
      data (ref_adm(14,iz,14,18),iz = 1,20) / &
     & 0.4091300E+00, 0.4091300E+00, 0.4273700E+00, 0.4388000E+00, &
     & 0.4491800E+00, 0.4659400E+00, 0.4661100E+00, 0.4828400E+00, &
     & 0.5142200E+00, 0.5230600E+00, 0.5558900E+00, 0.6116200E+00, &
     & 0.6619800E+00, 0.7060600E+00, 0.8362600E+00, 0.9685500E+00, &
     & 0.8791246E+00, 0.9228503E+00, 0.8856652E+00, 0.8856652E+00 /
      data (ref_adm(14,iz,15,18),iz = 1,20) / &
     & 0.3953100E+00, 0.3953100E+00, 0.3938100E+00, 0.3999300E+00, &
     & 0.4084800E+00, 0.4270900E+00, 0.4479500E+00, 0.4562200E+00, &
     & 0.4808200E+00, 0.4971700E+00, 0.5236400E+00, 0.5753300E+00, &
     & 0.6143300E+00, 0.6656600E+00, 0.8011200E+00, 0.9616000E+00, &
     & 0.1006700E+01, 0.8586435E+00, 0.8402262E+00, 0.8402262E+00 /
      data (ref_adm(14,iz,16,18),iz = 1,20) / &
     & 0.3982500E+00, 0.3982500E+00, 0.3883600E+00, 0.3942800E+00, &
     & 0.3895400E+00, 0.4037800E+00, 0.4220600E+00, 0.4687400E+00, &
     & 0.4785400E+00, 0.4714600E+00, 0.5088900E+00, 0.5514600E+00, &
     & 0.5810000E+00, 0.6650100E+00, 0.7640100E+00, 0.9005100E+00, &
     & 0.7654431E+00, 0.8053179E+00, 0.8025544E+00, 0.8025544E+00 /
      data (ref_adm(14,iz,17,18),iz = 1,20) / &
     & 0.3984900E+00, 0.3984900E+00, 0.4066600E+00, 0.3846500E+00, &
     & 0.3961600E+00, 0.4407100E+00, 0.4112300E+00, 0.4450100E+00, &
     & 0.4660600E+00, 0.4649100E+00, 0.5017700E+00, 0.5151200E+00, &
     & 0.6518000E+00, 0.6469200E+00, 0.7383400E+00, 0.6825484E+00, &
     & 0.7219609E+00, 0.7594352E+00, 0.7696458E+00, 0.7696458E+00 /
      data (ref_adm(14,iz,18,18),iz = 1,20) / &
     & 0.4045800E+00, 0.4045800E+00, 0.4201600E+00, 0.4217600E+00, &
     & 0.4011400E+00, 0.4280400E+00, 0.4263300E+00, 0.4530000E+00, &
     & 0.4987300E+00, 0.4727100E+00, 0.4906200E+00, 0.5227600E+00, &
     & 0.6011500E+00, 0.6633800E+00, 0.6865100E+00, 0.7833800E+00, &
     & 0.9265196E+00, 0.1143027E+01, 0.1617488E+01, 0.1617488E+01 /
      data (ref_adm(14,iz,19,18),iz = 1,20) / &
     & 0.4227900E+00, 0.4227900E+00, 0.3946500E+00, 0.4036300E+00, &
     & 0.3823400E+00, 0.4218300E+00, 0.4348700E+00, 0.4509400E+00, &
     & 0.4506900E+00, 0.4736400E+00, 0.5076300E+00, 0.5242700E+00, &
     & 0.5324800E+00, 0.6282300E+00, 0.6589800E+00, 0.7751647E+00, &
     & 0.8900884E+00, 0.1095358E+01, 0.1562572E+01, 0.1562572E+01 /
      data (ref_adm(14,iz,20,18),iz = 1,20) / &
     & 0.4187800E+00, 0.4187800E+00, 0.4094200E+00, 0.4017700E+00, &
     & 0.4156000E+00, 0.4469000E+00, 0.4568200E+00, 0.4404900E+00, &
     & 0.4398800E+00, 0.4434400E+00, 0.4917700E+00, 0.5022700E+00, &
     & 0.5766600E+00, 0.6060565E+00, 0.6565100E+00, 0.7533754E+00, &
     & 0.8628299E+00, 0.1059024E+01, 0.1529495E+01, 0.1529495E+01 /
      data (ref_adm(14,iz,21,18),iz = 1,20) / &
     & 0.4195100E+00, 0.4195100E+00, 0.4133500E+00, 0.4122000E+00, &
     & 0.4096000E+00, 0.4053900E+00, 0.4185200E+00, 0.4222900E+00, &
     & 0.4675000E+00, 0.4497300E+00, 0.4807700E+00, 0.5062900E+00, &
     & 0.5368900E+00, 0.6276700E+00, 0.6609100E+00, 0.7331341E+00, &
     & 0.8384811E+00, 0.1029107E+01, 0.1508667E+01, 0.1508667E+01 /
      data (ref_adm(14,iz,22,18),iz = 1,20) / &
     & 0.4128400E+00, 0.4128400E+00, 0.3636200E+00, 0.3895300E+00, &
     & 0.4229500E+00, 0.4069300E+00, 0.4204900E+00, 0.4299500E+00, &
     & 0.4588700E+00, 0.4609200E+00, 0.4674400E+00, 0.4962300E+00, &
     & 0.5082900E+00, 0.5536800E+00, 0.6139700E+00, 0.6848060E+00, &
     & 0.7785619E+00, 0.9514377E+00, 0.1447041E+01, 0.1447041E+01 /
      data (ref_adm(14,iz,23,18),iz = 1,20) / &
     & 0.3976300E+00, 0.3976300E+00, 0.3814200E+00, 0.3803400E+00, &
     & 0.3776600E+00, 0.4092600E+00, 0.4007100E+00, 0.4160900E+00, &
     & 0.4294600E+00, 0.4497300E+00, 0.4954200E+00, 0.4838600E+00, &
     & 0.5229700E+00, 0.5779000E+00, 0.6192700E+00, 0.6795329E+00, &
     & 0.7723776E+00, 0.9467392E+00, 0.1469485E+01, 0.1469485E+01 /
      data (ref_adm(14,iz,24,18),iz = 1,20) / &
     & 0.3985400E+00, 0.3985400E+00, 0.3910700E+00, 0.3882700E+00, &
     & 0.3965000E+00, 0.4025300E+00, 0.4174600E+00, 0.4280800E+00, &
     & 0.4417400E+00, 0.4632000E+00, 0.4823000E+00, 0.4964200E+00, &
     & 0.5308600E+00, 0.5938900E+00, 0.6100500E+00, 0.6832000E+00, &
     & 0.7729816E+00, 0.9503459E+00, 0.1507242E+01, 0.1507242E+01 /
      data (ref_adm(14,iz,25,18),iz = 1,20) / &
     & 0.3964900E+00, 0.3964900E+00, 0.3962600E+00, 0.4016200E+00, &
     & 0.4221600E+00, 0.4185100E+00, 0.4296600E+00, 0.4437200E+00, &
     & 0.4419300E+00, 0.4502500E+00, 0.4787100E+00, 0.5019600E+00, &
     & 0.5480200E+00, 0.6113600E+00, 0.6414500E+00, 0.6576900E+00, &
     & 0.7788603E+00, 0.9621896E+00, 0.1557475E+01, 0.1557475E+01 /
      data (ref_adm(14,iz,26,18),iz = 1,20) / &
     & 0.4042500E+00, 0.4042500E+00, 0.3767600E+00, 0.4045200E+00, &
     & 0.4022500E+00, 0.4034500E+00, 0.4141100E+00, 0.4318700E+00, &
     & 0.4266700E+00, 0.4397000E+00, 0.4845900E+00, 0.5270800E+00, &
     & 0.5659200E+00, 0.6086100E+00, 0.6964500E+00, 0.7160100E+00, &
     & 0.8471600E+00, 0.9863996E+00, 0.1624543E+01, 0.1624543E+01 /
      data (ref_adm(14,iz,27,18),iz = 1,20) / &
     & 0.4007000E+00, 0.4007000E+00, 0.3832400E+00, 0.3980200E+00, &
     & 0.4210900E+00, 0.4243200E+00, 0.4242100E+00, 0.4808100E+00, &
     & 0.4406800E+00, 0.4502800E+00, 0.4693800E+00, 0.5221900E+00, &
     & 0.5672300E+00, 0.6501700E+00, 0.6850300E+00, 0.7787600E+00, &
     & 0.8129467E+00, 0.1015757E+01, 0.1700302E+01, 0.1700302E+01 /
      data (ref_adm(14,iz,28,18),iz = 1,20) / &
     & 0.3970200E+00, 0.3970200E+00, 0.4070000E+00, 0.4115600E+00, &
     & 0.3958600E+00, 0.4227900E+00, 0.4017000E+00, 0.4252700E+00, &
     & 0.4290700E+00, 0.4423500E+00, 0.4772100E+00, 0.5201600E+00, &
     & 0.5595900E+00, 0.5975500E+00, 0.6626800E+00, 0.7517900E+00, &
     & 0.8357651E+00, 0.1051715E+01, 0.1783170E+01, 0.1783170E+01 /
      data (ref_adm(14,iz,29,18),iz = 1,20) / &
     & 0.4037000E+00, 0.4037000E+00, 0.4185900E+00, 0.4028500E+00, &
     & 0.3793200E+00, 0.4105900E+00, 0.3986400E+00, 0.4268400E+00, &
     & 0.4330900E+00, 0.4394900E+00, 0.4733800E+00, 0.4967500E+00, &
     & 0.5271300E+00, 0.6004800E+00, 0.6625300E+00, 0.7945500E+00, &
     & 0.8728157E+00, 0.1107519E+01, 0.1881143E+01, 0.1881143E+01 /
      data (ref_adm(14,iz,30,18),iz = 1,20) / &
     & 0.4131000E+00, 0.4131000E+00, 0.3982200E+00, 0.3848900E+00, &
     & 0.3947800E+00, 0.4061800E+00, 0.4051700E+00, 0.3888300E+00, &
     & 0.4251100E+00, 0.4610800E+00, 0.4599900E+00, 0.5062400E+00, &
     & 0.6095500E+00, 0.6088000E+00, 0.6759200E+00, 0.7060500E+00, &
     & 0.9156252E+00, 0.1165219E+01, 0.1981299E+01, 0.1981299E+01 /
      data (ref_adm(14,iz,31,18),iz = 1,20) / &
     & 0.4067200E+00, 0.4067200E+00, 0.3994100E+00, 0.3840000E+00, &
     & 0.4131100E+00, 0.4202600E+00, 0.4420500E+00, 0.4325700E+00, &
     & 0.4471100E+00, 0.4718000E+00, 0.4850400E+00, 0.5082900E+00, &
     & 0.5605700E+00, 0.6048200E+00, 0.6827400E+00, 0.7762400E+00, &
     & 0.9426500E+00, 0.1192667E+01, 0.2054921E+01, 0.2054921E+01 /
      data (ref_adm(14,iz,32,18),iz = 1,20) / &
     & 0.4028800E+00, 0.4028800E+00, 0.4099700E+00, 0.4041700E+00, &
     & 0.4050200E+00, 0.4181200E+00, 0.4257600E+00, 0.4299000E+00, &
     & 0.4281100E+00, 0.4562600E+00, 0.5172500E+00, 0.5225900E+00, &
     & 0.5906100E+00, 0.6232400E+00, 0.6635600E+00, 0.7404300E+00, &
     & 0.9608907E+00, 0.1234603E+01, 0.2136500E+01, 0.2136500E+01 /
      data (ref_adm(14,iz,33,18),iz = 1,20) / &
     & 0.3963100E+00, 0.3963100E+00, 0.3877300E+00, 0.3891800E+00, &
     & 0.3937700E+00, 0.4036300E+00, 0.4057200E+00, 0.4164600E+00, &
     & 0.4240900E+00, 0.4482700E+00, 0.4839800E+00, 0.5238700E+00, &
     & 0.5818800E+00, 0.5976400E+00, 0.6682700E+00, 0.7831200E+00, &
     & 0.9138100E+00, 0.1257267E+01, 0.2198802E+01, 0.2198802E+01 /
      data (ref_adm(14,iz,34,18),iz = 1,20) / &
     & 0.3837100E+00, 0.3837100E+00, 0.4018300E+00, 0.3956200E+00, &
     & 0.4160900E+00, 0.4286100E+00, 0.4133000E+00, 0.4175700E+00, &
     & 0.4348500E+00, 0.4735800E+00, 0.5112200E+00, 0.5276400E+00, &
     & 0.5968700E+00, 0.7011900E+00, 0.6824800E+00, 0.7790700E+00, &
     & 0.9761398E+00, 0.1253788E+01, 0.2231081E+01, 0.2231081E+01 /
      data (ref_adm(14,iz,35,18),iz = 1,20) / &
     & 0.3883400E+00, 0.3883400E+00, 0.3961400E+00, 0.4065300E+00, &
     & 0.3780100E+00, 0.4010700E+00, 0.4035700E+00, 0.4279200E+00, &
     & 0.4608200E+00, 0.5001300E+00, 0.5041600E+00, 0.5248500E+00, &
     & 0.5750000E+00, 0.6507800E+00, 0.7176400E+00, 0.8107300E+00, &
     & 0.9753205E+00, 0.1259716E+01, 0.2263519E+01, 0.2263519E+01 /
      data (ref_adm(14,iz,36,18),iz = 1,20) / &
     & 0.3821100E+00, 0.3821100E+00, 0.4072600E+00, 0.3828300E+00, &
     & 0.3746900E+00, 0.3774600E+00, 0.3964400E+00, 0.4319200E+00, &
     & 0.4414100E+00, 0.4826800E+00, 0.5318900E+00, 0.5511500E+00, &
     & 0.5736600E+00, 0.6697600E+00, 0.7793600E+00, 0.8758400E+00, &
     & 0.9833707E+00, 0.1281252E+01, 0.2300251E+01, 0.2300251E+01 /
      data (ref_adm(14,iz,37,18),iz = 1,20) / &
     & 0.3755800E+00, 0.3755800E+00, 0.3793900E+00, 0.3946200E+00, &
     & 0.3893400E+00, 0.3819300E+00, 0.4005500E+00, 0.4169900E+00, &
     & 0.4727800E+00, 0.5185700E+00, 0.5230300E+00, 0.5370700E+00, &
     & 0.5912900E+00, 0.6682700E+00, 0.7287200E+00, 0.8382195E+00, &
     & 0.9929811E+00, 0.1353778E+01, 0.2362768E+01, 0.2362768E+01 /
      data (ref_adm(14,iz,38,18),iz = 1,20) / &
     & 0.3755800E+00, 0.3755800E+00, 0.3793900E+00, 0.3946200E+00, &
     & 0.3893400E+00, 0.3819300E+00, 0.4005500E+00, 0.4169900E+00, &
     & 0.4727800E+00, 0.5185700E+00, 0.5230300E+00, 0.5370700E+00, &
     & 0.5912900E+00, 0.6682700E+00, 0.7287200E+00, 0.8382195E+00, &
     & 0.9929811E+00, 0.1353778E+01, 0.2362768E+01, 0.2362768E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 25.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 30.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 35.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 40.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 45.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 50.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 55.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 60.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 65.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 70.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 75.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 80.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 85.0 Albedo -0.9999000E+04
      data (ref_adm(15,iz, 1,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 2,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 3,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 4,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 5,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 6,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 7,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 8,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz, 9,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,10,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,11,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,12,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,13,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,14,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,15,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,16,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,17,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,18,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,19,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,20,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,21,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,22,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,23,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,24,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,25,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,26,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,27,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,28,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,29,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,30,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,31,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,32,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,33,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,34,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,35,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,36,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,37,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(15,iz,38,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(16,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(16,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9977028E+04
      data (ref_adm(16,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     & 0.3341700E+00,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.4448109E+04
      data (ref_adm(16,iz, 1, 4),iz = 1,20) / &
     & 0.3590972E+00, 0.3590972E+00, 0.3526712E+00, 0.3504452E+00, &
     & 0.3486857E+00, 0.3474822E+00, 0.3453612E+00, 0.3417476E+00, &
     & 0.3371063E+00, 0.3315486E+00, 0.3255039E+00, 0.3171117E+00, &
     & 0.3073165E+00, 0.2980926E+00, 0.2848465E+00, 0.2674029E+00, &
     & 0.2494068E+00, 0.2258607E+00, 0.1842849E+00, 0.1842849E+00 /
      data (ref_adm(16,iz, 2, 4),iz = 1,20) / &
     & 0.3590972E+00, 0.3590972E+00, 0.3526712E+00, 0.3504452E+00, &
     & 0.3486857E+00, 0.3474822E+00, 0.3453612E+00, 0.3417476E+00, &
     & 0.3371063E+00, 0.3315486E+00, 0.3255039E+00, 0.3171117E+00, &
     & 0.3073165E+00, 0.2980926E+00, 0.2848465E+00, 0.2674029E+00, &
     & 0.2494068E+00, 0.2258607E+00, 0.1842849E+00, 0.1842849E+00 /
      data (ref_adm(16,iz, 3, 4),iz = 1,20) / &
     & 0.3590972E+00, 0.3590972E+00, 0.3526712E+00, 0.3504452E+00, &
     & 0.3486856E+00, 0.3474822E+00, 0.3453612E+00, 0.3417476E+00, &
     & 0.3371063E+00, 0.3315486E+00, 0.3255039E+00, 0.3171117E+00, &
     & 0.3073165E+00, 0.2980926E+00, 0.2848465E+00, 0.2674029E+00, &
     & 0.2494068E+00, 0.2258607E+00, 0.1842849E+00, 0.1842849E+00 /
      data (ref_adm(16,iz, 4, 4),iz = 1,20) / &
     & 0.3590972E+00, 0.3590972E+00, 0.3526712E+00, 0.3504452E+00, &
     & 0.3486857E+00, 0.3474822E+00, 0.3453612E+00, 0.3417476E+00, &
     & 0.3371063E+00, 0.3315486E+00, 0.3255039E+00, 0.3171117E+00, &
     & 0.3073165E+00, 0.2980926E+00, 0.2848465E+00, 0.2674029E+00, &
     & 0.2494068E+00, 0.2258607E+00, 0.1842849E+00, 0.1842849E+00 /
      data (ref_adm(16,iz, 5, 4),iz = 1,20) / &
     & 0.3590972E+00, 0.3590972E+00, 0.3526712E+00, 0.3504452E+00, &
     & 0.3486856E+00, 0.3474822E+00, 0.2879000E+00, 0.3417476E+00, &
     & 0.3371063E+00, 0.3315486E+00, 0.3255039E+00, 0.3171117E+00, &
     & 0.3073165E+00, 0.2980926E+00, 0.2848465E+00, 0.2674029E+00, &
     & 0.2494068E+00, 0.2258607E+00, 0.1842849E+00, 0.1842849E+00 /
      data (ref_adm(16,iz, 6, 4),iz = 1,20) / &
     & 0.3590972E+00, 0.3590972E+00, 0.3526712E+00, 0.3504452E+00, &
     & 0.3486857E+00, 0.3474822E+00, 0.3453612E+00, 0.3417476E+00, &
     & 0.3371063E+00, 0.3315486E+00, 0.3255039E+00, 0.3171117E+00, &
     & 0.3073165E+00, 0.2980926E+00, 0.2848465E+00, 0.2674029E+00, &
     & 0.2494068E+00, 0.2258607E+00, 0.1842849E+00, 0.1842849E+00 /
      data (ref_adm(16,iz, 7, 4),iz = 1,20) / &
     & 0.3590972E+00, 0.3590972E+00, 0.3526712E+00, 0.5872700E+00, &
     & 0.3486856E+00, 0.3474822E+00, 0.3386500E+00, 0.3417476E+00, &
     & 0.3371063E+00, 0.3315486E+00, 0.3255039E+00, 0.3171117E+00, &
     & 0.3073165E+00, 0.2980926E+00, 0.2848465E+00, 0.2674029E+00, &
     & 0.2494068E+00, 0.2258607E+00, 0.1842849E+00, 0.1842849E+00 /
      data (ref_adm(16,iz, 8, 4),iz = 1,20) / &
     & 0.3590972E+00, 0.3590972E+00, 0.3526712E+00, 0.3504452E+00, &
     & 0.3486857E+00, 0.3474822E+00, 0.3453612E+00, 0.2397300E+00, &
     & 0.3134800E+00, 0.3315486E+00, 0.3255039E+00, 0.3171117E+00, &
     & 0.3073165E+00, 0.2980926E+00, 0.2848465E+00, 0.2674029E+00, &
     & 0.2494068E+00, 0.2258607E+00, 0.1842849E+00, 0.1842849E+00 /
      data (ref_adm(16,iz, 9, 4),iz = 1,20) / &
     & 0.3590972E+00, 0.3590972E+00, 0.3526712E+00, 0.3504452E+00, &
     & 0.3486856E+00, 0.3474822E+00, 0.3453612E+00, 0.3417476E+00, &
     & 0.3371063E+00, 0.3315486E+00, 0.3255039E+00, 0.3171117E+00, &
     & 0.3073165E+00, 0.2980926E+00, 0.2848465E+00, 0.2674029E+00, &
     & 0.2494068E+00, 0.2258607E+00, 0.1842849E+00, 0.1842849E+00 /
      data (ref_adm(16,iz,10, 4),iz = 1,20) / &
     & 0.3590972E+00, 0.3590972E+00, 0.3526712E+00, 0.3504452E+00, &
     & 0.3486857E+00, 0.3474822E+00, 0.3453612E+00, 0.3417476E+00, &
     & 0.3371063E+00, 0.3315486E+00, 0.2410500E+00, 0.3154200E+00, &
     & 0.3073165E+00, 0.2980926E+00, 0.2848465E+00, 0.2674029E+00, &
     & 0.2494068E+00, 0.2258607E+00, 0.1842849E+00, 0.1842849E+00 /
      data (ref_adm(16,iz,11, 4),iz = 1,20) / &
     & 0.3590972E+00, 0.3590972E+00, 0.3526712E+00, 0.3504452E+00, &
     & 0.3486856E+00, 0.3474822E+00, 0.3453612E+00, 0.3417476E+00, &
     & 0.3371063E+00, 0.3315486E+00, 0.3255039E+00, 0.3171117E+00, &
     & 0.3752900E+00, 0.2980926E+00, 0.2848465E+00, 0.2674029E+00, &
     & 0.2494068E+00, 0.2258607E+00, 0.1842849E+00, 0.1842849E+00 /
      data (ref_adm(16,iz,12, 4),iz = 1,20) / &
     & 0.3590972E+00, 0.3590972E+00, 0.3526712E+00, 0.3504452E+00, &
     & 0.3486857E+00, 0.3474822E+00, 0.3453612E+00, 0.3417476E+00, &
     & 0.3371063E+00, 0.3315486E+00, 0.3255039E+00, 0.3024800E+00, &
     & 0.3669300E+00, 0.2980926E+00, 0.2848465E+00, 0.2674029E+00, &
     & 0.2494068E+00, 0.2258607E+00, 0.1842849E+00, 0.1842849E+00 /
      data (ref_adm(16,iz,13, 4),iz = 1,20) / &
     & 0.3590972E+00, 0.3590972E+00, 0.3526712E+00, 0.3504452E+00, &
     & 0.3486856E+00, 0.3474822E+00, 0.3453612E+00, 0.3417476E+00, &
     & 0.3371063E+00, 0.3315486E+00, 0.3255039E+00, 0.3171117E+00, &
     & 0.3073165E+00, 0.2707200E+00, 0.2848465E+00, 0.2674029E+00, &
     & 0.2494068E+00, 0.2258607E+00, 0.1842849E+00, 0.1842849E+00 /
      data (ref_adm(16,iz,14, 4),iz = 1,20) / &
     & 0.3590972E+00, 0.3590972E+00, 0.3526712E+00, 0.3504452E+00, &
     & 0.3486857E+00, 0.3474822E+00, 0.3453612E+00, 0.3417476E+00, &
     & 0.3371063E+00, 0.3315486E+00, 0.3255039E+00, 0.2746900E+00, &
     & 0.3073165E+00, 0.2980926E+00, 0.2848465E+00, 0.2674029E+00, &
     & 0.2494068E+00, 0.2258607E+00, 0.1842849E+00, 0.1842849E+00 /
      data (ref_adm(16,iz,15, 4),iz = 1,20) / &
     & 0.3590972E+00, 0.3590972E+00, 0.3526712E+00, 0.3504452E+00, &
     & 0.3486856E+00, 0.3474822E+00, 0.3453612E+00, 0.3417476E+00, &
     & 0.3371063E+00, 0.3315486E+00, 0.3255039E+00, 0.3171117E+00, &
     & 0.3073165E+00, 0.2980926E+00, 0.2848465E+00, 0.2674029E+00, &
     & 0.2494068E+00, 0.2258607E+00, 0.1842849E+00, 0.1842849E+00 /
      data (ref_adm(16,iz,16, 4),iz = 1,20) / &
     & 0.3590972E+00, 0.3590972E+00, 0.3526712E+00, 0.3504452E+00, &
     & 0.3486857E+00, 0.3474822E+00, 0.3453612E+00, 0.3417476E+00, &
     & 0.3371063E+00, 0.3315486E+00, 0.3255039E+00, 0.3171117E+00, &
     & 0.3073165E+00, 0.2980926E+00, 0.2848465E+00, 0.2674029E+00, &
     & 0.2494068E+00, 0.2258607E+00, 0.1842849E+00, 0.1842849E+00 /
      data (ref_adm(16,iz,17, 4),iz = 1,20) / &
     & 0.3590972E+00, 0.3590972E+00, 0.3526712E+00, 0.3504452E+00, &
     & 0.3486856E+00, 0.3474822E+00, 0.3453612E+00, 0.3417476E+00, &
     & 0.3371063E+00, 0.3315486E+00, 0.3255039E+00, 0.3171117E+00, &
     & 0.3073165E+00, 0.2980926E+00, 0.2848465E+00, 0.2674029E+00, &
     & 0.2494068E+00, 0.2258607E+00, 0.1842849E+00, 0.1842849E+00 /
      data (ref_adm(16,iz,18, 4),iz = 1,20) / &
     & 0.2958049E+00, 0.2958049E+00, 0.2905115E+00, 0.2886778E+00, &
     & 0.2872284E+00, 0.2862371E+00, 0.2844899E+00, 0.2815133E+00, &
     & 0.2776899E+00, 0.2731118E+00, 0.2681325E+00, 0.2612195E+00, &
     & 0.2531507E+00, 0.2328900E+00, 0.2346412E+00, 0.2202721E+00, &
     & 0.2054479E+00, 0.1860519E+00, 0.1518039E+00, 0.1518039E+00 /
      data (ref_adm(16,iz,19, 4),iz = 1,20) / &
     & 0.2958049E+00, 0.2958049E+00, 0.2905115E+00, 0.2886778E+00, &
     & 0.2872284E+00, 0.2862371E+00, 0.2844899E+00, 0.2815132E+00, &
     & 0.2776899E+00, 0.2731118E+00, 0.2681325E+00, 0.2612195E+00, &
     & 0.2531507E+00, 0.2455526E+00, 0.2346412E+00, 0.2202721E+00, &
     & 0.2054479E+00, 0.1860519E+00, 0.1518039E+00, 0.1518039E+00 /
      data (ref_adm(16,iz,20, 4),iz = 1,20) / &
     & 0.2958049E+00, 0.2958049E+00, 0.2905115E+00, 0.2886778E+00, &
     & 0.2872284E+00, 0.2862371E+00, 0.2844899E+00, 0.2815133E+00, &
     & 0.2776899E+00, 0.2731118E+00, 0.2681325E+00, 0.2612195E+00, &
     & 0.2531507E+00, 0.2455526E+00, 0.2346412E+00, 0.2202721E+00, &
     & 0.2054479E+00, 0.1860519E+00, 0.1518039E+00, 0.1518039E+00 /
      data (ref_adm(16,iz,21, 4),iz = 1,20) / &
     & 0.2958049E+00, 0.2958049E+00, 0.2905115E+00, 0.2886778E+00, &
     & 0.2872284E+00, 0.2862371E+00, 0.2844899E+00, 0.2815132E+00, &
     & 0.2776899E+00, 0.2731118E+00, 0.2681325E+00, 0.2612195E+00, &
     & 0.2531507E+00, 0.2455526E+00, 0.2346412E+00, 0.2202721E+00, &
     & 0.2054479E+00, 0.1860519E+00, 0.1518039E+00, 0.1518039E+00 /
      data (ref_adm(16,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(16,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo  0.3539644E+00
      data (ref_adm(16,iz, 1, 5),iz = 1,20) / &
     & 0.4310957E+00, 0.4310957E+00, 0.4233813E+00, 0.4207089E+00, &
     & 0.4185967E+00, 0.4171519E+00, 0.2912900E+00, 0.4102676E+00, &
     & 0.4046956E+00, 0.3980236E+00, 0.3907669E+00, 0.3806922E+00, &
     & 0.3689330E+00, 0.3578598E+00, 0.3419578E+00, 0.3210168E+00, &
     & 0.2994125E+00, 0.2711455E+00, 0.2212337E+00, 0.2212337E+00 /
      data (ref_adm(16,iz, 2, 5),iz = 1,20) / &
     & 0.4310957E+00, 0.4310957E+00, 0.4233813E+00, 0.4207089E+00, &
     & 0.4185967E+00, 0.4171519E+00, 0.2912900E+00, 0.4102676E+00, &
     & 0.4046956E+00, 0.3980236E+00, 0.3907669E+00, 0.3806922E+00, &
     & 0.3689330E+00, 0.3578598E+00, 0.3419578E+00, 0.3210168E+00, &
     & 0.2994125E+00, 0.2711455E+00, 0.2212337E+00, 0.2212337E+00 /
      data (ref_adm(16,iz, 3, 5),iz = 1,20) / &
     & 0.4310957E+00, 0.4310957E+00, 0.4233813E+00, 0.4207089E+00, &
     & 0.4185966E+00, 0.4171519E+00, 0.4146056E+00, 0.4102675E+00, &
     & 0.4046956E+00, 0.3980236E+00, 0.3907669E+00, 0.3806922E+00, &
     & 0.3689330E+00, 0.3578598E+00, 0.3419578E+00, 0.3210168E+00, &
     & 0.2994125E+00, 0.2711455E+00, 0.2212337E+00, 0.2212337E+00 /
      data (ref_adm(16,iz, 4, 5),iz = 1,20) / &
     & 0.4310957E+00, 0.4310957E+00, 0.4233813E+00, 0.4915700E+00, &
     & 0.4185967E+00, 0.4171519E+00, 0.4146056E+00, 0.4102676E+00, &
     & 0.4046956E+00, 0.3980236E+00, 0.3907669E+00, 0.3806922E+00, &
     & 0.3689330E+00, 0.3578598E+00, 0.3419578E+00, 0.3210168E+00, &
     & 0.2994125E+00, 0.2711455E+00, 0.2212337E+00, 0.2212337E+00 /
      data (ref_adm(16,iz, 5, 5),iz = 1,20) / &
     & 0.4310957E+00, 0.4310957E+00, 0.4233813E+00, 0.4207089E+00, &
     & 0.4185966E+00, 0.4171519E+00, 0.4146056E+00, 0.4102675E+00, &
     & 0.4046956E+00, 0.3980236E+00, 0.3907669E+00, 0.3806922E+00, &
     & 0.3689330E+00, 0.3578598E+00, 0.3419578E+00, 0.3210168E+00, &
     & 0.2994125E+00, 0.2711455E+00, 0.2212337E+00, 0.2212337E+00 /
      data (ref_adm(16,iz, 6, 5),iz = 1,20) / &
     & 0.4310957E+00, 0.4310957E+00, 0.4233813E+00, 0.4207089E+00, &
     & 0.4185967E+00, 0.4171519E+00, 0.4146056E+00, 0.4102676E+00, &
     & 0.4046956E+00, 0.3980236E+00, 0.3907669E+00, 0.3806922E+00, &
     & 0.3689330E+00, 0.3703500E+00, 0.3419578E+00, 0.3210168E+00, &
     & 0.2994125E+00, 0.2711455E+00, 0.2212337E+00, 0.2212337E+00 /
      data (ref_adm(16,iz, 7, 5),iz = 1,20) / &
     & 0.4310957E+00, 0.4310957E+00, 0.5798100E+00, 0.6066700E+00, &
     & 0.4185966E+00, 0.4171519E+00, 0.4146056E+00, 0.4102675E+00, &
     & 0.4046956E+00, 0.3980236E+00, 0.3907669E+00, 0.3806922E+00, &
     & 0.3689330E+00, 0.3578598E+00, 0.3419578E+00, 0.3210168E+00, &
     & 0.2994125E+00, 0.2711455E+00, 0.2212337E+00, 0.2212337E+00 /
      data (ref_adm(16,iz, 8, 5),iz = 1,20) / &
     & 0.4310957E+00, 0.4310957E+00, 0.3164200E+00, 0.4142600E+00, &
     & 0.4787000E+00, 0.4171519E+00, 0.4146056E+00, 0.4102676E+00, &
     & 0.4046956E+00, 0.3980236E+00, 0.3907669E+00, 0.3806922E+00, &
     & 0.3689330E+00, 0.3578598E+00, 0.3419578E+00, 0.3210168E+00, &
     & 0.2994125E+00, 0.2711455E+00, 0.2212337E+00, 0.2212337E+00 /
      data (ref_adm(16,iz, 9, 5),iz = 1,20) / &
     & 0.2798500E+00, 0.2798500E+00, 0.3562800E+00, 0.3680500E+00, &
     & 0.4185966E+00, 0.4778400E+00, 0.4146056E+00, 0.3484600E+00, &
     & 0.4046956E+00, 0.3980236E+00, 0.3907669E+00, 0.3806922E+00, &
     & 0.3689330E+00, 0.3578598E+00, 0.3419578E+00, 0.3210168E+00, &
     & 0.2994125E+00, 0.2711455E+00, 0.2212337E+00, 0.2212337E+00 /
      data (ref_adm(16,iz,10, 5),iz = 1,20) / &
     & 0.4310957E+00, 0.4310957E+00, 0.4233813E+00, 0.4393700E+00, &
     & 0.4839100E+00, 0.3966200E+00, 0.3820700E+00, 0.4102676E+00, &
     & 0.2438600E+00, 0.3980236E+00, 0.3907669E+00, 0.3806922E+00, &
     & 0.3277200E+00, 0.3578598E+00, 0.3419578E+00, 0.3210168E+00, &
     & 0.2994125E+00, 0.2711455E+00, 0.2212337E+00, 0.2212337E+00 /
      data (ref_adm(16,iz,11, 5),iz = 1,20) / &
     & 0.4310957E+00, 0.4310957E+00, 0.4233813E+00, 0.4218800E+00, &
     & 0.4185966E+00, 0.4171519E+00, 0.4146056E+00, 0.4102675E+00, &
     & 0.4046956E+00, 0.3980236E+00, 0.3907669E+00, 0.3820100E+00, &
     & 0.3689330E+00, 0.3578598E+00, 0.3419578E+00, 0.3210168E+00, &
     & 0.2994125E+00, 0.2711455E+00, 0.2212337E+00, 0.2212337E+00 /
      data (ref_adm(16,iz,12, 5),iz = 1,20) / &
     & 0.4310957E+00, 0.4310957E+00, 0.6346800E+00, 0.6221700E+00, &
     & 0.4185967E+00, 0.4171519E+00, 0.4146056E+00, 0.4102676E+00, &
     & 0.4046956E+00, 0.3978500E+00, 0.3907669E+00, 0.4161900E+00, &
     & 0.3517700E+00, 0.3578598E+00, 0.3419578E+00, 0.3210168E+00, &
     & 0.2994125E+00, 0.2711455E+00, 0.2212337E+00, 0.2212337E+00 /
      data (ref_adm(16,iz,13, 5),iz = 1,20) / &
     & 0.4310957E+00, 0.4310957E+00, 0.4233813E+00, 0.4207089E+00, &
     & 0.4185966E+00, 0.4171519E+00, 0.4146056E+00, 0.4102675E+00, &
     & 0.4046956E+00, 0.3980236E+00, 0.3907669E+00, 0.3991300E+00, &
     & 0.3447100E+00, 0.3454100E+00, 0.3419578E+00, 0.3210168E+00, &
     & 0.2994125E+00, 0.2711455E+00, 0.2212337E+00, 0.2212337E+00 /
      data (ref_adm(16,iz,14, 5),iz = 1,20) / &
     & 0.4310957E+00, 0.4310957E+00, 0.4233813E+00, 0.4207089E+00, &
     & 0.4185967E+00, 0.4171519E+00, 0.4146056E+00, 0.4102676E+00, &
     & 0.4046956E+00, 0.3980236E+00, 0.3907669E+00, 0.4429200E+00, &
     & 0.3689330E+00, 0.3578598E+00, 0.3419578E+00, 0.3210168E+00, &
     & 0.2994125E+00, 0.2711455E+00, 0.2212337E+00, 0.2212337E+00 /
      data (ref_adm(16,iz,15, 5),iz = 1,20) / &
     & 0.4310957E+00, 0.4310957E+00, 0.4233813E+00, 0.4207089E+00, &
     & 0.4185966E+00, 0.4171519E+00, 0.4146056E+00, 0.4102675E+00, &
     & 0.4046956E+00, 0.3980236E+00, 0.3907669E+00, 0.4395500E+00, &
     & 0.3689330E+00, 0.3578598E+00, 0.3419578E+00, 0.3210168E+00, &
     & 0.2994125E+00, 0.2711455E+00, 0.2212337E+00, 0.2212337E+00 /
      data (ref_adm(16,iz,16, 5),iz = 1,20) / &
     & 0.4310957E+00, 0.4310957E+00, 0.4233813E+00, 0.4207089E+00, &
     & 0.4185967E+00, 0.4171519E+00, 0.4146056E+00, 0.4102676E+00, &
     & 0.4046956E+00, 0.3980236E+00, 0.3040100E+00, 0.3806922E+00, &
     & 0.3689330E+00, 0.3578598E+00, 0.3419578E+00, 0.3210168E+00, &
     & 0.2994125E+00, 0.2711455E+00, 0.2212337E+00, 0.2212337E+00 /
      data (ref_adm(16,iz,17, 5),iz = 1,20) / &
     & 0.4310957E+00, 0.4310957E+00, 0.3117300E+00, 0.4207089E+00, &
     & 0.4185966E+00, 0.4171519E+00, 0.4146056E+00, 0.2758200E+00, &
     & 0.4046956E+00, 0.3980236E+00, 0.3907669E+00, 0.3806922E+00, &
     & 0.3689330E+00, 0.3578598E+00, 0.3419578E+00, 0.3210168E+00, &
     & 0.2994125E+00, 0.2711455E+00, 0.2212337E+00, 0.2212337E+00 /
      data (ref_adm(16,iz,18, 5),iz = 1,20) / &
     & 0.2677974E+00, 0.2677974E+00, 0.2699445E+00, 0.2734215E+00, &
     & 0.2781576E+00, 0.2839606E+00, 0.2917235E+00, 0.3011170E+00, &
     & 0.3128359E+00, 0.3267728E+00, 0.3426148E+00, 0.2792300E+00, &
     & 0.3936861E+00, 0.4178934E+00, 0.4493773E+00, 0.4871530E+00, &
     & 0.5203345E+00, 0.5469751E+00, 0.5173725E+00, 0.5173725E+00 /
      data (ref_adm(16,iz,19, 5),iz = 1,20) / &
     & 0.2676228E+00, 0.2676228E+00, 0.2695002E+00, 0.2722521E+00, &
     & 0.2764581E+00, 0.2951800E+00, 0.2894253E+00, 0.2980374E+00, &
     & 0.3085760E+00, 0.3212981E+00, 0.3365784E+00, 0.3589716E+00, &
     & 0.3841493E+00, 0.4069779E+00, 0.4367568E+00, 0.4724984E+00, &
     & 0.5032260E+00, 0.5272331E+00, 0.5024180E+00, 0.5024180E+00 /
      data (ref_adm(16,iz,20, 5),iz = 1,20) / &
     & 0.2673415E+00, 0.2673415E+00, 0.2686102E+00, 0.2710576E+00, &
     & 0.2748565E+00, 0.2800480E+00, 0.2870707E+00, 0.2952244E+00, &
     & 0.4262900E+00, 0.3168806E+00, 0.3306915E+00, 0.3514562E+00, &
     & 0.3759017E+00, 0.3968926E+00, 0.4249004E+00, 0.4582883E+00, &
     & 0.4883412E+00, 0.5113716E+00, 0.4923852E+00, 0.4923852E+00 /
      data (ref_adm(16,iz,21, 5),iz = 1,20) / &
     & 0.2673104E+00, 0.2673104E+00, 0.2683714E+00, 0.2701102E+00, &
     & 0.2736443E+00, 0.2781672E+00, 0.2845633E+00, 0.2922442E+00, &
     & 0.3016408E+00, 0.3130119E+00, 0.3258712E+00, 0.3457047E+00, &
     & 0.3673998E+00, 0.3875836E+00, 0.4139163E+00, 0.4457214E+00, &
     & 0.4734241E+00, 0.4957147E+00, 0.4843535E+00, 0.4843535E+00 /
      data (ref_adm(16,iz,22, 5),iz = 1,20) / &
     & 0.3706051E+00, 0.3706051E+00, 0.3639731E+00, 0.3616758E+00, &
     & 0.3598599E+00, 0.3586179E+00, 0.3564289E+00, 0.3526996E+00, &
     & 0.3479095E+00, 0.3421737E+00, 0.2749600E+00, 0.3272741E+00, &
     & 0.3171650E+00, 0.3076455E+00, 0.2939750E+00, 0.2759723E+00, &
     & 0.2573995E+00, 0.2330988E+00, 0.1901906E+00, 0.1901906E+00 /
      data (ref_adm(16,iz,23, 5),iz = 1,20) / &
     & 0.3706051E+00, 0.3706051E+00, 0.2085700E+00, 0.3616759E+00, &
     & 0.3598599E+00, 0.3586179E+00, 0.3564289E+00, 0.3526995E+00, &
     & 0.3479095E+00, 0.3031900E+00, 0.3359352E+00, 0.3272741E+00, &
     & 0.3171650E+00, 0.3076455E+00, 0.2939750E+00, 0.2759723E+00, &
     & 0.2573995E+00, 0.2330988E+00, 0.1901906E+00, 0.1901906E+00 /
      data (ref_adm(16,iz,24, 5),iz = 1,20) / &
     & 0.3706051E+00, 0.3706051E+00, 0.3639731E+00, 0.3616758E+00, &
     & 0.3598599E+00, 0.3586179E+00, 0.3564289E+00, 0.3526996E+00, &
     & 0.3087100E+00, 0.3421737E+00, 0.3359352E+00, 0.3272741E+00, &
     & 0.3171650E+00, 0.3076455E+00, 0.2939750E+00, 0.2759723E+00, &
     & 0.2573995E+00, 0.2330988E+00, 0.1901906E+00, 0.1901906E+00 /
      data (ref_adm(16,iz,25, 5),iz = 1,20) / &
     & 0.3706051E+00, 0.3706051E+00, 0.3639731E+00, 0.3616759E+00, &
     & 0.3598599E+00, 0.3586179E+00, 0.3564289E+00, 0.2863300E+00, &
     & 0.2966700E+00, 0.3421737E+00, 0.3359352E+00, 0.3272741E+00, &
     & 0.3171650E+00, 0.3076455E+00, 0.2939750E+00, 0.2759723E+00, &
     & 0.2573995E+00, 0.2330988E+00, 0.1901906E+00, 0.1901906E+00 /
      data (ref_adm(16,iz,26, 5),iz = 1,20) / &
     & 0.4299100E+00, 0.4299100E+00, 0.3639731E+00, 0.3616758E+00, &
     & 0.3598599E+00, 0.3586179E+00, 0.3564289E+00, 0.3526996E+00, &
     & 0.3479095E+00, 0.3421737E+00, 0.3359352E+00, 0.3272741E+00, &
     & 0.3171650E+00, 0.3076455E+00, 0.2939750E+00, 0.2759723E+00, &
     & 0.2573995E+00, 0.2330988E+00, 0.1901906E+00, 0.1901906E+00 /
      data (ref_adm(16,iz,27, 5),iz = 1,20) / &
     & 0.4103400E+00, 0.4103400E+00, 0.3639731E+00, 0.3616759E+00, &
     & 0.3598599E+00, 0.3586179E+00, 0.3564289E+00, 0.3107100E+00, &
     & 0.3479095E+00, 0.3421737E+00, 0.3359352E+00, 0.3272741E+00, &
     & 0.3171650E+00, 0.3076455E+00, 0.2939750E+00, 0.2759723E+00, &
     & 0.2573995E+00, 0.2330988E+00, 0.1901906E+00, 0.1901906E+00 /
      data (ref_adm(16,iz,28, 5),iz = 1,20) / &
     & 0.3706051E+00, 0.3706051E+00, 0.3639731E+00, 0.3616758E+00, &
     & 0.3598599E+00, 0.3586179E+00, 0.3564289E+00, 0.3526996E+00, &
     & 0.3479095E+00, 0.3421737E+00, 0.3359352E+00, 0.3272741E+00, &
     & 0.3477600E+00, 0.3076455E+00, 0.2939750E+00, 0.2759723E+00, &
     & 0.2573995E+00, 0.2330988E+00, 0.1901906E+00, 0.1901906E+00 /
      data (ref_adm(16,iz,29, 5),iz = 1,20) / &
     & 0.3706051E+00, 0.3706051E+00, 0.3639731E+00, 0.3616759E+00, &
     & 0.3598599E+00, 0.3586179E+00, 0.3564289E+00, 0.3526995E+00, &
     & 0.3479095E+00, 0.3421737E+00, 0.3359352E+00, 0.3272741E+00, &
     & 0.3171650E+00, 0.3737500E+00, 0.3547600E+00, 0.2759723E+00, &
     & 0.2573995E+00, 0.2330988E+00, 0.1901906E+00, 0.1901906E+00 /
      data (ref_adm(16,iz,30, 5),iz = 1,20) / &
     & 0.3706051E+00, 0.3706051E+00, 0.3639731E+00, 0.3616758E+00, &
     & 0.3598599E+00, 0.3586179E+00, 0.3564289E+00, 0.3526996E+00, &
     & 0.3479095E+00, 0.3421737E+00, 0.3359352E+00, 0.3272741E+00, &
     & 0.3171650E+00, 0.3076455E+00, 0.2939750E+00, 0.2759723E+00, &
     & 0.2573995E+00, 0.2330988E+00, 0.1901906E+00, 0.1901906E+00 /
      data (ref_adm(16,iz,31, 5),iz = 1,20) / &
     & 0.3706051E+00, 0.3706051E+00, 0.3639731E+00, 0.3616759E+00, &
     & 0.3598599E+00, 0.3586179E+00, 0.3564289E+00, 0.3526995E+00, &
     & 0.3479095E+00, 0.3421737E+00, 0.3359352E+00, 0.3272741E+00, &
     & 0.3171650E+00, 0.3076455E+00, 0.2939750E+00, 0.2759723E+00, &
     & 0.2573995E+00, 0.2330988E+00, 0.1901906E+00, 0.1901906E+00 /
      data (ref_adm(16,iz,32, 5),iz = 1,20) / &
     & 0.5257900E+00, 0.5257900E+00, 0.3639731E+00, 0.2572000E+00, &
     & 0.3598599E+00, 0.3586179E+00, 0.3564289E+00, 0.3526996E+00, &
     & 0.3479095E+00, 0.3421737E+00, 0.3359352E+00, 0.3272741E+00, &
     & 0.3171650E+00, 0.3076455E+00, 0.2939750E+00, 0.2759723E+00, &
     & 0.2573995E+00, 0.2330988E+00, 0.1901906E+00, 0.1901906E+00 /
      data (ref_adm(16,iz,33, 5),iz = 1,20) / &
     & 0.2850900E+00, 0.2850900E+00, 0.3639731E+00, 0.3616759E+00, &
     & 0.3598599E+00, 0.3009500E+00, 0.3299300E+00, 0.3526995E+00, &
     & 0.3479095E+00, 0.3421737E+00, 0.3359352E+00, 0.3272741E+00, &
     & 0.3171650E+00, 0.3076455E+00, 0.2939750E+00, 0.2759723E+00, &
     & 0.2573995E+00, 0.2330988E+00, 0.1901906E+00, 0.1901906E+00 /
      data (ref_adm(16,iz,34, 5),iz = 1,20) / &
     & 0.4593900E+00, 0.4593900E+00, 0.3639731E+00, 0.3616758E+00, &
     & 0.3598599E+00, 0.3586179E+00, 0.3224400E+00, 0.3526996E+00, &
     & 0.4511500E+00, 0.3421737E+00, 0.3359352E+00, 0.3272741E+00, &
     & 0.3171650E+00, 0.3076455E+00, 0.2939750E+00, 0.2759723E+00, &
     & 0.2573995E+00, 0.2330988E+00, 0.1901906E+00, 0.1901906E+00 /
      data (ref_adm(16,iz,35, 5),iz = 1,20) / &
     & 0.3706051E+00, 0.3706051E+00, 0.3639731E+00, 0.3616759E+00, &
     & 0.3598599E+00, 0.3586179E+00, 0.4243400E+00, 0.3526995E+00, &
     & 0.3479095E+00, 0.3421737E+00, 0.3359352E+00, 0.3272741E+00, &
     & 0.3171650E+00, 0.3076455E+00, 0.2939750E+00, 0.2759723E+00, &
     & 0.2573995E+00, 0.2330988E+00, 0.1901906E+00, 0.1901906E+00 /
      data (ref_adm(16,iz,36, 5),iz = 1,20) / &
     & 0.3706051E+00, 0.3706051E+00, 0.3639731E+00, 0.3616758E+00, &
     & 0.3598599E+00, 0.4334900E+00, 0.3564289E+00, 0.3526996E+00, &
     & 0.3479095E+00, 0.3421737E+00, 0.3359352E+00, 0.3272741E+00, &
     & 0.3171650E+00, 0.3076455E+00, 0.2939750E+00, 0.2759723E+00, &
     & 0.2573995E+00, 0.2330988E+00, 0.1901906E+00, 0.1901906E+00 /
      data (ref_adm(16,iz,37, 5),iz = 1,20) / &
     & 0.3706051E+00, 0.3706051E+00, 0.3639731E+00, 0.3616758E+00, &
     & 0.3598599E+00, 0.3586179E+00, 0.3564289E+00, 0.3526996E+00, &
     & 0.3479095E+00, 0.3421737E+00, 0.3359352E+00, 0.3272741E+00, &
     & 0.3171650E+00, 0.3076455E+00, 0.2939750E+00, 0.2759723E+00, &
     & 0.2573995E+00, 0.2330988E+00, 0.1901906E+00, 0.1901906E+00 /
      data (ref_adm(16,iz,38, 5),iz = 1,20) / &
     & 0.3706051E+00, 0.3706051E+00, 0.3639731E+00, 0.3616758E+00, &
     & 0.3598599E+00, 0.3586179E+00, 0.3564289E+00, 0.3526996E+00, &
     & 0.3479095E+00, 0.3421737E+00, 0.3359352E+00, 0.3272741E+00, &
     & 0.3171650E+00, 0.3076455E+00, 0.2939750E+00, 0.2759723E+00, &
     & 0.2573995E+00, 0.2330988E+00, 0.1901906E+00, 0.1901906E+00 /
! Solar Zenith Angle 25.0 Albedo  0.3765169E+00
      data (ref_adm(16,iz, 1, 6),iz = 1,20) / &
     & 0.3899208E+00, 0.3899208E+00, 0.3912858E+00, 0.3922711E+00, &
     & 0.3930579E+00, 0.4094511E+00, 0.3886825E+00, 0.3721709E+00, &
     & 0.3697091E+00, 0.3679288E+00, 0.3645687E+00, 0.3622480E+00, &
     & 0.3239500E+00, 0.3447200E+00, 0.3518274E+00, 0.3406451E+00, &
     & 0.3250625E+00, 0.2995524E+00, 0.2575996E+00, 0.2575996E+00 /
      data (ref_adm(16,iz, 2, 6),iz = 1,20) / &
     & 0.3899208E+00, 0.3899208E+00, 0.3912858E+00, 0.3922711E+00, &
     & 0.3930579E+00, 0.4094511E+00, 0.3886825E+00, 0.3721709E+00, &
     & 0.3697091E+00, 0.3679288E+00, 0.3645687E+00, 0.3622480E+00, &
     & 0.3239500E+00, 0.3447200E+00, 0.3518274E+00, 0.3406451E+00, &
     & 0.3250625E+00, 0.2995524E+00, 0.2575996E+00, 0.2575996E+00 /
      data (ref_adm(16,iz, 3, 6),iz = 1,20) / &
     & 0.3899134E+00, 0.3899134E+00, 0.3912997E+00, 0.3922843E+00, &
     & 0.3930032E+00, 0.4094313E+00, 0.3891011E+00, 0.3723708E+00, &
     & 0.3697395E+00, 0.3680042E+00, 0.3645812E+00, 0.3623360E+00, &
     & 0.3370400E+00, 0.3257300E+00, 0.3517451E+00, 0.3404885E+00, &
     & 0.3763900E+00, 0.2992728E+00, 0.8217668E-01, 0.8217668E-01 /
      data (ref_adm(16,iz, 4, 6),iz = 1,20) / &
     & 0.3898935E+00, 0.3898935E+00, 0.3913221E+00, 0.3923098E+00, &
     & 0.3930101E+00, 0.5587600E+00, 0.3901205E+00, 0.3725972E+00, &
     & 0.3697632E+00, 0.3681329E+00, 0.3646752E+00, 0.3621894E+00, &
     & 0.3315700E+00, 0.3322500E+00, 0.3514154E+00, 0.3401223E+00, &
     & 0.3243730E+00, 0.2988191E+00, 0.2570932E+00, 0.2570932E+00 /
      data (ref_adm(16,iz, 5, 6),iz = 1,20) / &
     & 0.3899494E+00, 0.3899494E+00, 0.4840400E+00, 0.3878300E+00, &
     & 0.3930451E+00, 0.4088319E+00, 0.3916801E+00, 0.3729923E+00, &
     & 0.3698730E+00, 0.3682620E+00, 0.3647921E+00, 0.3120400E+00, &
     & 0.3554800E+00, 0.3745100E+00, 0.3509771E+00, 0.3396049E+00, &
     & 0.3236869E+00, 0.2981174E+00, 0.2565850E+00, 0.2565850E+00 /
      data (ref_adm(16,iz, 6, 6),iz = 1,20) / &
     & 0.3899593E+00, 0.3899593E+00, 0.3913327E+00, 0.3923936E+00, &
     & 0.3930655E+00, 0.4080862E+00, 0.3939163E+00, 0.3736016E+00, &
     & 0.3699850E+00, 0.3684927E+00, 0.3649729E+00, 0.3290400E+00, &
     & 0.2725300E+00, 0.2946000E+00, 0.4199600E+00, 0.3388026E+00, &
     & 0.3228837E+00, 0.2971885E+00, 0.2559237E+00, 0.2559237E+00 /
      data (ref_adm(16,iz, 7, 6),iz = 1,20) / &
     & 0.3899463E+00, 0.3899463E+00, 0.3912778E+00, 0.3925004E+00, &
     & 0.3930898E+00, 0.4070530E+00, 0.3967409E+00, 0.3746013E+00, &
     & 0.3700612E+00, 0.3687303E+00, 0.3652936E+00, 0.3619965E+00, &
     & 0.3592188E+00, 0.3561753E+00, 0.4134400E+00, 0.3379048E+00, &
     & 0.3218126E+00, 0.2961155E+00, 0.2551250E+00, 0.2551250E+00 /
      data (ref_adm(16,iz, 8, 6),iz = 1,20) / &
     & 0.3899480E+00, 0.3899480E+00, 0.3912953E+00, 0.3926338E+00, &
     & 0.3931758E+00, 0.3681200E+00, 0.3999842E+00, 0.3757907E+00, &
     & 0.3703367E+00, 0.3690048E+00, 0.3655785E+00, 0.3618570E+00, &
     & 0.3588988E+00, 0.3555202E+00, 0.3489132E+00, 0.3369744E+00, &
     & 0.3206885E+00, 0.2949036E+00, 0.2542177E+00, 0.2542177E+00 /
      data (ref_adm(16,iz, 9, 6),iz = 1,20) / &
     & 0.3899101E+00, 0.3899101E+00, 0.3491300E+00, 0.3927422E+00, &
     & 0.3931881E+00, 0.3197500E+00, 0.4037303E+00, 0.3234700E+00, &
     & 0.3706755E+00, 0.3692801E+00, 0.4195100E+00, 0.3618310E+00, &
     & 0.3585408E+00, 0.3548839E+00, 0.3480290E+00, 0.3358667E+00, &
     & 0.3194298E+00, 0.2935503E+00, 0.2532409E+00, 0.2532409E+00 /
      data (ref_adm(16,iz,10, 6),iz = 1,20) / &
     & 0.5000700E+00, 0.5000700E+00, 0.3667000E+00, 0.2506600E+00, &
     & 0.3503100E+00, 0.4634700E+00, 0.4075294E+00, 0.3797491E+00, &
     & 0.3711390E+00, 0.3695844E+00, 0.4271800E+00, 0.4390300E+00, &
     & 0.3581908E+00, 0.3542473E+00, 0.3471476E+00, 0.3347136E+00, &
     & 0.3180807E+00, 0.2921121E+00, 0.2522092E+00, 0.2522092E+00 /
      data (ref_adm(16,iz,11, 6),iz = 1,20) / &
     & 0.2649000E+00, 0.2649000E+00, 0.3654200E+00, 0.3575100E+00, &
     & 0.3685100E+00, 0.4181200E+00, 0.3590600E+00, 0.3452600E+00, &
     & 0.4023600E+00, 0.4503600E+00, 0.3670000E+00, 0.3619536E+00, &
     & 0.3578449E+00, 0.3535784E+00, 0.3462480E+00, 0.3334932E+00, &
     & 0.3167821E+00, 0.2905869E+00, 0.2511311E+00, 0.2511311E+00 /
      data (ref_adm(16,iz,12, 6),iz = 1,20) / &
     & 0.3899229E+00, 0.3899229E+00, 0.3911174E+00, 0.3929844E+00, &
     & 0.3163800E+00, 0.3970928E+00, 0.4633700E+00, 0.4559000E+00, &
     & 0.3072000E+00, 0.3909500E+00, 0.3910400E+00, 0.3537900E+00, &
     & 0.3552400E+00, 0.4280000E+00, 0.3453135E+00, 0.3322727E+00, &
     & 0.3153662E+00, 0.2891188E+00, 0.2500573E+00, 0.2500573E+00 /
      data (ref_adm(16,iz,13, 6),iz = 1,20) / &
     & 0.5169600E+00, 0.5169600E+00, 0.4925700E+00, 0.3929194E+00, &
     & 0.3941018E+00, 0.3958344E+00, 0.4125791E+00, 0.3925765E+00, &
     & 0.3853900E+00, 0.4956600E+00, 0.3571900E+00, 0.4105800E+00, &
     & 0.3184500E+00, 0.3784800E+00, 0.3444583E+00, 0.3310695E+00, &
     & 0.3140277E+00, 0.2876894E+00, 0.2490236E+00, 0.2490236E+00 /
      data (ref_adm(16,iz,14, 6),iz = 1,20) / &
     & 0.3899913E+00, 0.3899913E+00, 0.3909484E+00, 0.3929428E+00, &
     & 0.3943408E+00, 0.3952912E+00, 0.4103193E+00, 0.3993031E+00, &
     & 0.3766185E+00, 0.3708812E+00, 0.3113700E+00, 0.3632541E+00, &
     & 0.3253000E+00, 0.4003200E+00, 0.3436235E+00, 0.3300373E+00, &
     & 0.3126906E+00, 0.2863315E+00, 0.2480345E+00, 0.2480345E+00 /
      data (ref_adm(16,iz,15, 6),iz = 1,20) / &
     & 0.3900141E+00, 0.3900141E+00, 0.3359800E+00, 0.3391600E+00, &
     & 0.3944766E+00, 0.3954237E+00, 0.4065310E+00, 0.4064137E+00, &
     & 0.3797900E+00, 0.5214300E+00, 0.3255900E+00, 0.3360500E+00, &
     & 0.3340900E+00, 0.4406000E+00, 0.3429113E+00, 0.3289879E+00, &
     & 0.3114998E+00, 0.2850675E+00, 0.2471217E+00, 0.2471217E+00 /
      data (ref_adm(16,iz,16, 6),iz = 1,20) / &
     & 0.3899965E+00, 0.3899965E+00, 0.3408900E+00, 0.3560900E+00, &
     & 0.3646800E+00, 0.3954345E+00, 0.2898400E+00, 0.3315000E+00, &
     & 0.2985400E+00, 0.3728423E+00, 0.3670300E+00, 0.3648725E+00, &
     & 0.3573593E+00, 0.3514701E+00, 0.3422764E+00, 0.3280807E+00, &
     & 0.3103297E+00, 0.2839079E+00, 0.2463125E+00, 0.2463125E+00 /
      data (ref_adm(16,iz,17, 6),iz = 1,20) / &
     & 0.3899973E+00, 0.3899973E+00, 0.3906619E+00, 0.3926616E+00, &
     & 0.3946413E+00, 0.3958068E+00, 0.3990991E+00, 0.4152195E+00, &
     & 0.3908229E+00, 0.4627400E+00, 0.3809500E+00, 0.3420700E+00, &
     & 0.3578183E+00, 0.3512909E+00, 0.3418062E+00, 0.3272690E+00, &
     & 0.3093125E+00, 0.2828959E+00, 0.2456290E+00, 0.2456290E+00 /
      data (ref_adm(16,iz,18, 6),iz = 1,20) / &
     & 0.4270473E+00, 0.4270473E+00, 0.3693600E+00, 0.3759600E+00, &
     & 0.3767410E+00, 0.3827052E+00, 0.3829277E+00, 0.3772850E+00, &
     & 0.3723233E+00, 0.3675855E+00, 0.2961300E+00, 0.3559100E+00, &
     & 0.3615709E+00, 0.3619188E+00, 0.3623648E+00, 0.3614801E+00, &
     & 0.3570571E+00, 0.3391946E+00, 0.2843673E+00, 0.2843673E+00 /
      data (ref_adm(16,iz,19, 6),iz = 1,20) / &
     & 0.4270473E+00, 0.4270473E+00, 0.3775961E+00, 0.2957600E+00, &
     & 0.3767410E+00, 0.3827053E+00, 0.3829277E+00, 0.3772850E+00, &
     & 0.3723233E+00, 0.3561200E+00, 0.3646085E+00, 0.3626148E+00, &
     & 0.3615710E+00, 0.3619188E+00, 0.3623648E+00, 0.3614801E+00, &
     & 0.3570571E+00, 0.3391946E+00, 0.2843673E+00, 0.2843673E+00 /
      data (ref_adm(16,iz,20, 6),iz = 1,20) / &
     & 0.4270473E+00, 0.4270473E+00, 0.3775961E+00, 0.3478400E+00, &
     & 0.3767410E+00, 0.6168400E+00, 0.3829277E+00, 0.3772850E+00, &
     & 0.3860900E+00, 0.3675855E+00, 0.3646085E+00, 0.3626148E+00, &
     & 0.3615709E+00, 0.3619188E+00, 0.3623648E+00, 0.3614801E+00, &
     & 0.3570571E+00, 0.3391946E+00, 0.2843673E+00, 0.2843673E+00 /
      data (ref_adm(16,iz,21, 6),iz = 1,20) / &
     & 0.4270473E+00, 0.4270473E+00, 0.3775961E+00, 0.3676900E+00, &
     & 0.3767410E+00, 0.3827053E+00, 0.3829277E+00, 0.3772850E+00, &
     & 0.3723233E+00, 0.3675855E+00, 0.3646085E+00, 0.3626148E+00, &
     & 0.3615710E+00, 0.3619188E+00, 0.3623648E+00, 0.2769400E+00, &
     & 0.3570571E+00, 0.3391946E+00, 0.2843673E+00, 0.2843673E+00 /
      data (ref_adm(16,iz,22, 6),iz = 1,20) / &
     & 0.4067045E+00, 0.4067045E+00, 0.4066928E+00, 0.4066400E+00, &
     & 0.4072040E+00, 0.4074940E+00, 0.4047728E+00, 0.4002207E+00, &
     & 0.3955868E+00, 0.3909319E+00, 0.3866620E+00, 0.3815056E+00, &
     & 0.3762251E+00, 0.3716595E+00, 0.3656266E+00, 0.3573936E+00, &
     & 0.3470236E+00, 0.3293882E+00, 0.2865210E+00, 0.2865210E+00 /
      data (ref_adm(16,iz,23, 6),iz = 1,20) / &
     & 0.4069445E+00, 0.4069445E+00, 0.4130200E+00, 0.4066385E+00, &
     & 0.3453200E+00, 0.4024500E+00, 0.4060652E+00, 0.4016353E+00, &
     & 0.3971384E+00, 0.3920629E+00, 0.3877361E+00, 0.3821631E+00, &
     & 0.3769178E+00, 0.3719393E+00, 0.3656061E+00, 0.3571725E+00, &
     & 0.3464069E+00, 0.3286843E+00, 0.2860166E+00, 0.2860166E+00 /
      data (ref_adm(16,iz,24, 6),iz = 1,20) / &
     & 0.4069934E+00, 0.4069934E+00, 0.4072789E+00, 0.4068420E+00, &
     & 0.4688500E+00, 0.4055100E+00, 0.4070295E+00, 0.4030792E+00, &
     & 0.3984889E+00, 0.3007600E+00, 0.3886872E+00, 0.3829468E+00, &
     & 0.3774554E+00, 0.3723207E+00, 0.3656370E+00, 0.3568532E+00, &
     & 0.3718600E+00, 0.3280769E+00, 0.2856152E+00, 0.2856152E+00 /
      data (ref_adm(16,iz,25, 6),iz = 1,20) / &
     & 0.5265900E+00, 0.5265900E+00, 0.4080013E+00, 0.4220300E+00, &
     & 0.3825500E+00, 0.4074575E+00, 0.4077241E+00, 0.4046865E+00, &
     & 0.3998706E+00, 0.3949759E+00, 0.3899176E+00, 0.3838933E+00, &
     & 0.3780655E+00, 0.3728611E+00, 0.3658231E+00, 0.3565590E+00, &
     & 0.3456870E+00, 0.3275574E+00, 0.2853722E+00, 0.2853722E+00 /
      data (ref_adm(16,iz,26, 6),iz = 1,20) / &
     & 0.5723000E+00, 0.5723000E+00, 0.3398300E+00, 0.4079633E+00, &
     & 0.4528300E+00, 0.3036800E+00, 0.4080347E+00, 0.4060953E+00, &
     & 0.4013142E+00, 0.3964185E+00, 0.3910190E+00, 0.3848358E+00, &
     & 0.3786397E+00, 0.3735287E+00, 0.3660912E+00, 0.3564501E+00, &
     & 0.3454546E+00, 0.3269849E+00, 0.2851275E+00, 0.2851275E+00 /
      data (ref_adm(16,iz,27, 6),iz = 1,20) / &
     & 0.6221600E+00, 0.6221600E+00, 0.6274900E+00, 0.4087136E+00, &
     & 0.3955600E+00, 0.4070761E+00, 0.4079723E+00, 0.4071983E+00, &
     & 0.4028723E+00, 0.3977648E+00, 0.3923745E+00, 0.3858387E+00, &
     & 0.3793279E+00, 0.3742128E+00, 0.3047500E+00, 0.3564769E+00, &
     & 0.3453153E+00, 0.3267167E+00, 0.2851027E+00, 0.2851027E+00 /
      data (ref_adm(16,iz,28, 6),iz = 1,20) / &
     & 0.4412400E+00, 0.4412400E+00, 0.5481000E+00, 0.4094593E+00, &
     & 0.4081222E+00, 0.4072273E+00, 0.4078705E+00, 0.4079680E+00, &
     & 0.4043139E+00, 0.3914600E+00, 0.3936403E+00, 0.3868577E+00, &
     & 0.3798958E+00, 0.3648700E+00, 0.3669376E+00, 0.3564998E+00, &
     & 0.3450447E+00, 0.3263635E+00, 0.2850629E+00, 0.2850629E+00 /
      data (ref_adm(16,iz,29, 6),iz = 1,20) / &
     & 0.4445200E+00, 0.4445200E+00, 0.4149300E+00, 0.4103732E+00, &
     & 0.4091067E+00, 0.4073833E+00, 0.4076875E+00, 0.4084380E+00, &
     & 0.4058134E+00, 0.4005878E+00, 0.3371400E+00, 0.3514200E+00, &
     & 0.3808905E+00, 0.3753214E+00, 0.3674351E+00, 0.3567234E+00, &
     & 0.3449543E+00, 0.3261733E+00, 0.2850815E+00, 0.2850815E+00 /
      data (ref_adm(16,iz,30, 6),iz = 1,20) / &
     & 0.4691400E+00, 0.4691400E+00, 0.4455700E+00, 0.3504800E+00, &
     & 0.3854600E+00, 0.3843400E+00, 0.3953200E+00, 0.4084683E+00, &
     & 0.3693500E+00, 0.4017282E+00, 0.3962213E+00, 0.3887373E+00, &
     & 0.3816215E+00, 0.3756231E+00, 0.2753700E+00, 0.3569025E+00, &
     & 0.3449660E+00, 0.3260042E+00, 0.2850911E+00, 0.2850911E+00 /
      data (ref_adm(16,iz,31, 6),iz = 1,20) / &
     & 0.4373700E+00, 0.4373700E+00, 0.4404300E+00, 0.4120299E+00, &
     & 0.3808700E+00, 0.4916600E+00, 0.3762700E+00, 0.4141300E+00, &
     & 0.3970600E+00, 0.4029918E+00, 0.3973337E+00, 0.3897936E+00, &
     & 0.3825303E+00, 0.3763199E+00, 0.3683895E+00, 0.3571904E+00, &
     & 0.3448805E+00, 0.3259231E+00, 0.2851370E+00, 0.2851370E+00 /
      data (ref_adm(16,iz,32, 6),iz = 1,20) / &
     & 0.3443600E+00, 0.3443600E+00, 0.4115238E+00, 0.3297200E+00, &
     & 0.4264600E+00, 0.4098128E+00, 0.4078212E+00, 0.4083775E+00, &
     & 0.4083003E+00, 0.4012500E+00, 0.3350600E+00, 0.3905564E+00, &
     & 0.3831333E+00, 0.3768294E+00, 0.3688380E+00, 0.3574391E+00, &
     & 0.3449723E+00, 0.3259135E+00, 0.2852063E+00, 0.2852063E+00 /
      data (ref_adm(16,iz,33, 6),iz = 1,20) / &
     & 0.4080973E+00, 0.4080973E+00, 0.4121101E+00, 0.4152485E+00, &
     & 0.3601700E+00, 0.4104620E+00, 0.4083048E+00, 0.3783000E+00, &
     & 0.4086399E+00, 0.5254300E+00, 0.3991075E+00, 0.3913775E+00, &
     & 0.3251800E+00, 0.3234500E+00, 0.3692802E+00, 0.3577064E+00, &
     & 0.3450924E+00, 0.3259423E+00, 0.2853152E+00, 0.2853152E+00 /
      data (ref_adm(16,iz,34, 6),iz = 1,20) / &
     & 0.4080854E+00, 0.4080854E+00, 0.3209000E+00, 0.4183141E+00, &
     & 0.3792100E+00, 0.3737200E+00, 0.4087211E+00, 0.4080536E+00, &
     & 0.4088041E+00, 0.4906400E+00, 0.3998126E+00, 0.3921278E+00, &
     & 0.3843312E+00, 0.3777417E+00, 0.3696332E+00, 0.3579977E+00, &
     & 0.3452438E+00, 0.3259338E+00, 0.2853832E+00, 0.2853832E+00 /
      data (ref_adm(16,iz,35, 6),iz = 1,20) / &
     & 0.3220000E+00, 0.3220000E+00, 0.3486100E+00, 0.4899700E+00, &
     & 0.4394000E+00, 0.4122220E+00, 0.4087510E+00, 0.4080841E+00, &
     & 0.4089074E+00, 0.4062580E+00, 0.4004443E+00, 0.3925613E+00, &
     & 0.3846917E+00, 0.3781703E+00, 0.3698001E+00, 0.3581729E+00, &
     & 0.3452196E+00, 0.3258991E+00, 0.2854971E+00, 0.2854971E+00 /
      data (ref_adm(16,iz,36, 6),iz = 1,20) / &
     & 0.4081904E+00, 0.4081904E+00, 0.4136019E+00, 0.5642800E+00, &
     & 0.4269700E+00, 0.4127761E+00, 0.4092188E+00, 0.4080033E+00, &
     & 0.4090517E+00, 0.4065703E+00, 0.4008423E+00, 0.3930020E+00, &
     & 0.3212200E+00, 0.3784140E+00, 0.3699083E+00, 0.3583854E+00, &
     & 0.3452018E+00, 0.3258974E+00, 0.2855220E+00, 0.2855220E+00 /
      data (ref_adm(16,iz,37, 6),iz = 1,20) / &
     & 0.4082101E+00, 0.4082101E+00, 0.4139968E+00, 0.4387866E+00, &
     & 0.4275016E+00, 0.4680500E+00, 0.4093888E+00, 0.4080982E+00, &
     & 0.4087783E+00, 0.2716100E+00, 0.4009044E+00, 0.3931076E+00, &
     & 0.3850358E+00, 0.3787073E+00, 0.3701062E+00, 0.3584026E+00, &
     & 0.3453289E+00, 0.3259127E+00, 0.2855295E+00, 0.2855295E+00 /
      data (ref_adm(16,iz,38, 6),iz = 1,20) / &
     & 0.4082101E+00, 0.4082101E+00, 0.4139968E+00, 0.4387866E+00, &
     & 0.4275016E+00, 0.4680500E+00, 0.4093888E+00, 0.4080982E+00, &
     & 0.4087783E+00, 0.2716100E+00, 0.4009044E+00, 0.3931076E+00, &
     & 0.3850358E+00, 0.3787073E+00, 0.3701062E+00, 0.3584026E+00, &
     & 0.3453289E+00, 0.3259127E+00, 0.2855295E+00, 0.2855295E+00 /
! Solar Zenith Angle 30.0 Albedo  0.3975434E+00
      data (ref_adm(16,iz, 1, 7),iz = 1,20) / &
     & 0.3984026E+00, 0.3984026E+00, 0.3965900E+00, 0.4983400E+00, &
     & 0.3987600E+00, 0.3977305E+00, 0.3931459E+00, 0.3137300E+00, &
     & 0.3149400E+00, 0.3564300E+00, 0.3835355E+00, 0.3845455E+00, &
     & 0.3237900E+00, 0.3250500E+00, 0.3954286E+00, 0.4191500E+00, &
     & 0.3689300E+00, 0.3729108E+00, 0.3094143E+00, 0.3094143E+00 /
      data (ref_adm(16,iz, 2, 7),iz = 1,20) / &
     & 0.3984026E+00, 0.3984026E+00, 0.3965900E+00, 0.4983400E+00, &
     & 0.3987600E+00, 0.3977305E+00, 0.3931459E+00, 0.3137300E+00, &
     & 0.3149400E+00, 0.3564300E+00, 0.3835355E+00, 0.3845455E+00, &
     & 0.3237900E+00, 0.3250500E+00, 0.3954286E+00, 0.4191500E+00, &
     & 0.3689300E+00, 0.3729108E+00, 0.3094143E+00, 0.3094143E+00 /
      data (ref_adm(16,iz, 3, 7),iz = 1,20) / &
     & 0.3983769E+00, 0.3983769E+00, 0.3562200E+00, 0.4038230E+00, &
     & 0.4034023E+00, 0.3979035E+00, 0.3291200E+00, 0.3888910E+00, &
     & 0.3193600E+00, 0.3341700E+00, 0.3834499E+00, 0.3849013E+00, &
     & 0.3888890E+00, 0.3913725E+00, 0.4366100E+00, 0.4760800E+00, &
     & 0.3919239E+00, 0.3724346E+00, 0.1139981E+00, 0.1139981E+00 /
      data (ref_adm(16,iz, 4, 7),iz = 1,20) / &
     & 0.3983244E+00, 0.3983244E+00, 0.3988384E+00, 0.4313400E+00, &
     & 0.4035115E+00, 0.4396300E+00, 0.3730300E+00, 0.4362600E+00, &
     & 0.4430800E+00, 0.3997100E+00, 0.4693500E+00, 0.3020600E+00, &
     & 0.3879700E+00, 0.2979800E+00, 0.3524300E+00, 0.4067900E+00, &
     & 0.3918097E+00, 0.3810600E+00, 0.3090793E+00, 0.3090793E+00 /
      data (ref_adm(16,iz, 5, 7),iz = 1,20) / &
     & 0.3984911E+00, 0.3984911E+00, 0.5411900E+00, 0.5135200E+00, &
     & 0.4361100E+00, 0.4563800E+00, 0.5063900E+00, 0.5381800E+00, &
     & 0.3022900E+00, 0.3861600E+00, 0.3341100E+00, 0.3688900E+00, &
     & 0.3483700E+00, 0.3112200E+00, 0.3613500E+00, 0.3707000E+00, &
     & 0.3916620E+00, 0.3717821E+00, 0.3087128E+00, 0.3087128E+00 /
      data (ref_adm(16,iz, 6, 7),iz = 1,20) / &
     & 0.5326800E+00, 0.5326800E+00, 0.3990604E+00, 0.4927900E+00, &
     & 0.4357400E+00, 0.5342900E+00, 0.5734100E+00, 0.3892752E+00, &
     & 0.3469700E+00, 0.3843480E+00, 0.3857800E+00, 0.4514600E+00, &
     & 0.3269900E+00, 0.3912614E+00, 0.3551700E+00, 0.3643400E+00, &
     & 0.3911752E+00, 0.3712069E+00, 0.3083190E+00, 0.3083190E+00 /
      data (ref_adm(16,iz, 7, 7),iz = 1,20) / &
     & 0.3983426E+00, 0.3983426E+00, 0.3987577E+00, 0.4092200E+00, &
     & 0.4098500E+00, 0.5039100E+00, 0.4579900E+00, 0.3894776E+00, &
     & 0.3863323E+00, 0.3315300E+00, 0.3994000E+00, 0.3848009E+00, &
     & 0.3879222E+00, 0.4001700E+00, 0.3757600E+00, 0.3732600E+00, &
     & 0.3557100E+00, 0.3706042E+00, 0.3076843E+00, 0.3076843E+00 /
      data (ref_adm(16,iz, 8, 7),iz = 1,20) / &
     & 0.3984600E+00, 0.3984600E+00, 0.3985342E+00, 0.4640300E+00, &
     & 0.4045316E+00, 0.4120600E+00, 0.3580200E+00, 0.3548400E+00, &
     & 0.3865418E+00, 0.4042600E+00, 0.3272300E+00, 0.3386500E+00, &
     & 0.3726800E+00, 0.3668200E+00, 0.3656500E+00, 0.3764500E+00, &
     & 0.3895773E+00, 0.3694664E+00, 0.3070962E+00, 0.3070962E+00 /
      data (ref_adm(16,iz, 9, 7),iz = 1,20) / &
     & 0.4853900E+00, 0.4853900E+00, 0.3983803E+00, 0.4022000E+00, &
     & 0.3533800E+00, 0.3670600E+00, 0.3951622E+00, 0.3901078E+00, &
     & 0.3868091E+00, 0.3463400E+00, 0.3106100E+00, 0.2929000E+00, &
     & 0.3872433E+00, 0.3708100E+00, 0.2730400E+00, 0.3934847E+00, &
     & 0.3890655E+00, 0.3685551E+00, 0.3062773E+00, 0.3062773E+00 /
      data (ref_adm(16,iz,10, 7),iz = 1,20) / &
     & 0.4281300E+00, 0.4281300E+00, 0.4119900E+00, 0.3840800E+00, &
     & 0.4337500E+00, 0.4012500E+00, 0.3379100E+00, 0.3907409E+00, &
     & 0.3274700E+00, 0.3924900E+00, 0.3844823E+00, 0.3846276E+00, &
     & 0.4535900E+00, 0.3900661E+00, 0.3330300E+00, 0.3928264E+00, &
     & 0.3879896E+00, 0.3677166E+00, 0.3054099E+00, 0.3054099E+00 /
      data (ref_adm(16,iz,11, 7),iz = 1,20) / &
     & 0.4372600E+00, 0.4372600E+00, 0.4570600E+00, 0.4178000E+00, &
     & 0.4061100E+00, 0.3916900E+00, 0.4421800E+00, 0.4103600E+00, &
     & 0.4031400E+00, 0.2959300E+00, 0.3842845E+00, 0.3844180E+00, &
     & 0.3864414E+00, 0.3040400E+00, 0.4038700E+00, 0.3811700E+00, &
     & 0.3871896E+00, 0.3667392E+00, 0.3045677E+00, 0.3045677E+00 /
      data (ref_adm(16,iz,12, 7),iz = 1,20) / &
     & 0.4119800E+00, 0.4119800E+00, 0.4299900E+00, 0.3969800E+00, &
     & 0.4386300E+00, 0.4529700E+00, 0.4147100E+00, 0.4025600E+00, &
     & 0.4274600E+00, 0.4378900E+00, 0.3864500E+00, 0.3950100E+00, &
     & 0.3861918E+00, 0.2678100E+00, 0.2829800E+00, 0.3910497E+00, &
     & 0.3860088E+00, 0.3656023E+00, 0.3035443E+00, 0.3035443E+00 /
      data (ref_adm(16,iz,13, 7),iz = 1,20) / &
     & 0.4331800E+00, 0.4331800E+00, 0.4931300E+00, 0.4256400E+00, &
     & 0.4266300E+00, 0.4542400E+00, 0.3929300E+00, 0.3731700E+00, &
     & 0.4435000E+00, 0.4673500E+00, 0.3960700E+00, 0.4748500E+00, &
     & 0.4078200E+00, 0.3623800E+00, 0.3552600E+00, 0.3900496E+00, &
     & 0.3846068E+00, 0.3645347E+00, 0.3025627E+00, 0.3025627E+00 /
      data (ref_adm(16,iz,14, 7),iz = 1,20) / &
     & 0.4605000E+00, 0.4605000E+00, 0.3839400E+00, 0.4014978E+00, &
     & 0.3916000E+00, 0.4520000E+00, 0.3699400E+00, 0.3959200E+00, &
     & 0.3586800E+00, 0.3954800E+00, 0.2871400E+00, 0.3484000E+00, &
     & 0.3725900E+00, 0.3551000E+00, 0.3132200E+00, 0.3889741E+00, &
     & 0.3834575E+00, 0.3631935E+00, 0.3015162E+00, 0.3015162E+00 /
      data (ref_adm(16,iz,15, 7),iz = 1,20) / &
     & 0.3509700E+00, 0.3509700E+00, 0.4007100E+00, 0.4348100E+00, &
     & 0.4053235E+00, 0.4044491E+00, 0.3688200E+00, 0.4075200E+00, &
     & 0.4046200E+00, 0.6133400E+00, 0.3814900E+00, 0.3754700E+00, &
     & 0.3169100E+00, 0.3153000E+00, 0.3882282E+00, 0.3878744E+00, &
     & 0.3821597E+00, 0.3619729E+00, 0.3005763E+00, 0.3005763E+00 /
      data (ref_adm(16,iz,16, 7),iz = 1,20) / &
     & 0.3990954E+00, 0.3990954E+00, 0.3978697E+00, 0.4000181E+00, &
     & 0.4050341E+00, 0.4050267E+00, 0.4002791E+00, 0.4818700E+00, &
     & 0.4541000E+00, 0.3876855E+00, 0.3856186E+00, 0.3325200E+00, &
     & 0.3848999E+00, 0.3392900E+00, 0.3875056E+00, 0.3867241E+00, &
     & 0.3807794E+00, 0.3606823E+00, 0.2996224E+00, 0.2996224E+00 /
      data (ref_adm(16,iz,17, 7),iz = 1,20) / &
     & 0.4149300E+00, 0.4149300E+00, 0.3979246E+00, 0.3997547E+00, &
     & 0.4044992E+00, 0.4184900E+00, 0.3572400E+00, 0.2149500E+00, &
     & 0.3913808E+00, 0.3883660E+00, 0.3859944E+00, 0.3850506E+00, &
     & 0.3848864E+00, 0.3306400E+00, 0.3556000E+00, 0.3853280E+00, &
     & 0.3796081E+00, 0.3592388E+00, 0.2987644E+00, 0.2987644E+00 /
      data (ref_adm(16,iz,18, 7),iz = 1,20) / &
     & 0.4080800E+00, 0.4080800E+00, 0.4695800E+00, 0.4698500E+00, &
     & 0.4077964E+00, 0.4090593E+00, 0.4100218E+00, 0.3614500E+00, &
     & 0.4252710E+00, 0.4198900E+00, 0.3851564E+00, 0.3231600E+00, &
     & 0.3058500E+00, 0.3578130E+00, 0.3442833E+00, 0.3261456E+00, &
     & 0.3065010E+00, 0.2806609E+00, 0.2454648E+00, 0.2454648E+00 /
      data (ref_adm(16,iz,19, 7),iz = 1,20) / &
     & 0.4268600E+00, 0.4268600E+00, 0.4541000E+00, 0.4356000E+00, &
     & 0.4102200E+00, 0.3948100E+00, 0.3503300E+00, 0.3136900E+00, &
     & 0.4249581E+00, 0.5348900E+00, 0.4092200E+00, 0.3776434E+00, &
     & 0.3684006E+00, 0.3963300E+00, 0.3442329E+00, 0.3260016E+00, &
     & 0.3063083E+00, 0.2804872E+00, 0.2453625E+00, 0.2453625E+00 /
      data (ref_adm(16,iz,20, 7),iz = 1,20) / &
     & 0.3600900E+00, 0.3600900E+00, 0.4055400E+00, 0.5624900E+00, &
     & 0.4077460E+00, 0.5935700E+00, 0.4079700E+00, 0.4104830E+00, &
     & 0.3067800E+00, 0.4071141E+00, 0.4197700E+00, 0.3777398E+00, &
     & 0.3238500E+00, 0.2796300E+00, 0.3441547E+00, 0.3258280E+00, &
     & 0.3060550E+00, 0.2802605E+00, 0.2452690E+00, 0.2452690E+00 /
      data (ref_adm(16,iz,21, 7),iz = 1,20) / &
     & 0.4099900E+00, 0.4099900E+00, 0.4324800E+00, 0.4075876E+00, &
     & 0.4076811E+00, 0.4087843E+00, 0.4098036E+00, 0.4102567E+00, &
     & 0.4750400E+00, 0.3743400E+00, 0.4746800E+00, 0.3424900E+00, &
     & 0.3409100E+00, 0.3042000E+00, 0.2560200E+00, 0.3256965E+00, &
     & 0.3059320E+00, 0.2800824E+00, 0.2452099E+00, 0.2452099E+00 /
      data (ref_adm(16,iz,22, 7),iz = 1,20) / &
     & 0.3720400E+00, 0.3720400E+00, 0.3848000E+00, 0.4187000E+00, &
     & 0.4605100E+00, 0.3973921E+00, 0.4021900E+00, 0.3909026E+00, &
     & 0.3901972E+00, 0.3917244E+00, 0.3942277E+00, 0.4034200E+00, &
     & 0.2728100E+00, 0.3930113E+00, 0.2520600E+00, 0.3776627E+00, &
     & 0.3625298E+00, 0.3375109E+00, 0.2986274E+00, 0.2986274E+00 /
      data (ref_adm(16,iz,23, 7),iz = 1,20) / &
     & 0.4251200E+00, 0.4251200E+00, 0.4592300E+00, 0.4495900E+00, &
     & 0.4061900E+00, 0.4068898E+00, 0.3943600E+00, 0.4139800E+00, &
     & 0.3972229E+00, 0.3953780E+00, 0.3960164E+00, 0.3980423E+00, &
     & 0.3982541E+00, 0.3955000E+00, 0.4248500E+00, 0.3773251E+00, &
     & 0.3620822E+00, 0.3370667E+00, 0.3001170E+00, 0.3001170E+00 /
      data (ref_adm(16,iz,24, 7),iz = 1,20) / &
     & 0.4038500E+00, 0.4038500E+00, 0.3993962E+00, 0.4636000E+00, &
     & 0.4256400E+00, 0.2632900E+00, 0.4378500E+00, 0.3735500E+00, &
     & 0.4958500E+00, 0.4813600E+00, 0.4015921E+00, 0.4301700E+00, &
     & 0.4002222E+00, 0.3984584E+00, 0.3922600E+00, 0.3759100E+00, &
     & 0.3775700E+00, 0.3379579E+00, 0.3024777E+00, 0.3024777E+00 /
      data (ref_adm(16,iz,25, 7),iz = 1,20) / &
     & 0.3943702E+00, 0.3943702E+00, 0.4001760E+00, 0.2914900E+00, &
     & 0.4680400E+00, 0.4572600E+00, 0.4110800E+00, 0.4240357E+00, &
     & 0.4286405E+00, 0.4250694E+00, 0.4152484E+00, 0.3621500E+00, &
     & 0.4163900E+00, 0.4100100E+00, 0.3766900E+00, 0.3250700E+00, &
     & 0.3651211E+00, 0.3397867E+00, 0.3056588E+00, 0.3056588E+00 /
      data (ref_adm(16,iz,26, 7),iz = 1,20) / &
     & 0.3947227E+00, 0.3947227E+00, 0.4010501E+00, 0.3616900E+00, &
     & 0.4528900E+00, 0.5254800E+00, 0.4367200E+00, 0.3710600E+00, &
     & 0.3720000E+00, 0.3712100E+00, 0.4572500E+00, 0.4302900E+00, &
     & 0.3696200E+00, 0.3621100E+00, 0.3255600E+00, 0.3868334E+00, &
     & 0.3695390E+00, 0.3429840E+00, 0.3096466E+00, 0.3096466E+00 /
      data (ref_adm(16,iz,27, 7),iz = 1,20) / &
     & 0.3460000E+00, 0.3460000E+00, 0.3537200E+00, 0.4452300E+00, &
     & 0.4722700E+00, 0.4056665E+00, 0.4090744E+00, 0.4075900E+00, &
     & 0.4150700E+00, 0.3995100E+00, 0.4397001E+00, 0.4234000E+00, &
     & 0.3702300E+00, 0.3072700E+00, 0.3231000E+00, 0.3226900E+00, &
     & 0.3744510E+00, 0.3477275E+00, 0.3142993E+00, 0.3142993E+00 /
      data (ref_adm(16,iz,28, 7),iz = 1,20) / &
     & 0.4273200E+00, 0.4273200E+00, 0.4456100E+00, 0.4272900E+00, &
     & 0.4264400E+00, 0.4725000E+00, 0.4645300E+00, 0.4405400E+00, &
     & 0.3847300E+00, 0.4194500E+00, 0.3742500E+00, 0.4294600E+00, &
     & 0.3942600E+00, 0.3778000E+00, 0.3681400E+00, 0.3950778E+00, &
     & 0.3785933E+00, 0.3531280E+00, 0.3197469E+00, 0.3197469E+00 /
      data (ref_adm(16,iz,29, 7),iz = 1,20) / &
     & 0.4376100E+00, 0.4376100E+00, 0.4560300E+00, 0.4259600E+00, &
     & 0.4954100E+00, 0.3959900E+00, 0.3492700E+00, 0.4423700E+00, &
     & 0.4274900E+00, 0.4286800E+00, 0.4377200E+00, 0.4708900E+00, &
     & 0.3580500E+00, 0.4073100E+00, 0.3431100E+00, 0.3360500E+00, &
     & 0.3832259E+00, 0.2876000E+00, 0.3255152E+00, 0.3255152E+00 /
      data (ref_adm(16,iz,30, 7),iz = 1,20) / &
     & 0.5042200E+00, 0.5042200E+00, 0.4908900E+00, 0.4000973E+00, &
     & 0.4468800E+00, 0.4186400E+00, 0.4681000E+00, 0.4139100E+00, &
     & 0.4385100E+00, 0.3765400E+00, 0.4543200E+00, 0.2823600E+00, &
     & 0.4402587E+00, 0.4474466E+00, 0.3298300E+00, 0.3293400E+00, &
     & 0.3916857E+00, 0.3630366E+00, 0.3311548E+00, 0.3311548E+00 /
      data (ref_adm(16,iz,31, 7),iz = 1,20) / &
     & 0.4647800E+00, 0.4647800E+00, 0.4029639E+00, 0.3993496E+00, &
     & 0.4021200E+00, 0.4167600E+00, 0.5082900E+00, 0.4147633E+00, &
     & 0.4198736E+00, 0.4484400E+00, 0.3887800E+00, 0.3546800E+00, &
     & 0.4227000E+00, 0.4427482E+00, 0.3659400E+00, 0.4450420E+00, &
     & 0.4064875E+00, 0.3691464E+00, 0.3365009E+00, 0.3365009E+00 /
      data (ref_adm(16,iz,32, 7),iz = 1,20) / &
     & 0.4693200E+00, 0.4693200E+00, 0.5280700E+00, 0.5109500E+00, &
     & 0.4604700E+00, 0.3127800E+00, 0.4393400E+00, 0.4094100E+00, &
     & 0.4723600E+00, 0.4307900E+00, 0.3569300E+00, 0.4378692E+00, &
     & 0.3201200E+00, 0.3447200E+00, 0.4448090E+00, 0.4493250E+00, &
     & 0.4252383E+00, 0.3782134E+00, 0.3416142E+00, 0.3416142E+00 /
      data (ref_adm(16,iz,33, 7),iz = 1,20) / &
     & 0.3724300E+00, 0.3724300E+00, 0.3684200E+00, 0.4786600E+00, &
     & 0.4026102E+00, 0.4058503E+00, 0.4090488E+00, 0.4132434E+00, &
     & 0.4182867E+00, 0.4237271E+00, 0.4295325E+00, 0.4366520E+00, &
     & 0.3420600E+00, 0.4460224E+00, 0.4445467E+00, 0.4459273E+00, &
     & 0.4367065E+00, 0.3900394E+00, 0.3466406E+00, 0.3466406E+00 /
      data (ref_adm(16,iz,34, 7),iz = 1,20) / &
     & 0.4714500E+00, 0.4714500E+00, 0.3507200E+00, 0.3990697E+00, &
     & 0.4026551E+00, 0.4728300E+00, 0.4567700E+00, 0.4242400E+00, &
     & 0.4330000E+00, 0.4249350E+00, 0.4299250E+00, 0.4360843E+00, &
     & 0.4424689E+00, 0.4462239E+00, 0.4458684E+00, 0.4428489E+00, &
     & 0.4394510E+00, 0.4012362E+00, 0.3515510E+00, 0.3515510E+00 /
      data (ref_adm(16,iz,35, 7),iz = 1,20) / &
     & 0.4052400E+00, 0.4052400E+00, 0.3694100E+00, 0.3991974E+00, &
     & 0.4026544E+00, 0.4053224E+00, 0.4085944E+00, 0.4142531E+00, &
     & 0.5307700E+00, 0.4273954E+00, 0.5683200E+00, 0.4365676E+00, &
     & 0.4067600E+00, 0.4458468E+00, 0.4467475E+00, 0.4416775E+00, &
     & 0.4394985E+00, 0.4089027E+00, 0.3560065E+00, 0.3560065E+00 /
      data (ref_adm(16,iz,36, 7),iz = 1,20) / &
     & 0.4257500E+00, 0.4257500E+00, 0.4159100E+00, 0.4042800E+00, &
     & 0.4026238E+00, 0.4050058E+00, 0.4087676E+00, 0.4153459E+00, &
     & 0.4257144E+00, 0.5423900E+00, 0.5827800E+00, 0.4380606E+00, &
     & 0.3860100E+00, 0.4453826E+00, 0.4470998E+00, 0.4419779E+00, &
     & 0.4388764E+00, 0.4128287E+00, 0.3593554E+00, 0.3593554E+00 /
      data (ref_adm(16,iz,37, 7),iz = 1,20) / &
     & 0.3521100E+00, 0.3521100E+00, 0.4400400E+00, 0.3818500E+00, &
     & 0.4026105E+00, 0.4049792E+00, 0.4088784E+00, 0.4166550E+00, &
     & 0.5289400E+00, 0.5858100E+00, 0.4518974E+00, 0.4397512E+00, &
     & 0.4418717E+00, 0.3601200E+00, 0.4471147E+00, 0.4421765E+00, &
     & 0.4383839E+00, 0.4146232E+00, 0.3613338E+00, 0.3613338E+00 /
      data (ref_adm(16,iz,38, 7),iz = 1,20) / &
     & 0.3521100E+00, 0.3521100E+00, 0.4400400E+00, 0.3818500E+00, &
     & 0.4026105E+00, 0.4049792E+00, 0.4088784E+00, 0.4166550E+00, &
     & 0.5289400E+00, 0.5858100E+00, 0.4518974E+00, 0.4397512E+00, &
     & 0.4418717E+00, 0.3601200E+00, 0.4471147E+00, 0.4421765E+00, &
     & 0.4383839E+00, 0.4146232E+00, 0.3613338E+00, 0.3613338E+00 /
! Solar Zenith Angle 35.0 Albedo  0.4318181E+00
      data (ref_adm(16,iz, 1, 8),iz = 1,20) / &
     & 0.4376600E+00, 0.4376600E+00, 0.4399100E+00, 0.3357500E+00, &
     & 0.4236800E+00, 0.4654700E+00, 0.4139310E+00, 0.4136400E+00, &
     & 0.4575900E+00, 0.4406800E+00, 0.5822400E+00, 0.4400800E+00, &
     & 0.4142700E+00, 0.4399300E+00, 0.4279700E+00, 0.4235900E+00, &
     & 0.4130450E+00, 0.3953914E+00, 0.3418071E+00, 0.3418071E+00 /
      data (ref_adm(16,iz, 2, 8),iz = 1,20) / &
     & 0.4376600E+00, 0.4376600E+00, 0.4399100E+00, 0.3357500E+00, &
     & 0.4236800E+00, 0.4654700E+00, 0.4139310E+00, 0.4136400E+00, &
     & 0.4575900E+00, 0.4406800E+00, 0.5822400E+00, 0.4400800E+00, &
     & 0.4142700E+00, 0.4399300E+00, 0.4279700E+00, 0.4235900E+00, &
     & 0.4130450E+00, 0.3953914E+00, 0.3418071E+00, 0.3418071E+00 /
      data (ref_adm(16,iz, 3, 8),iz = 1,20) / &
     & 0.4464300E+00, 0.4464300E+00, 0.3863200E+00, 0.4461500E+00, &
     & 0.4604500E+00, 0.4376100E+00, 0.4176300E+00, 0.3776500E+00, &
     & 0.4713400E+00, 0.5636900E+00, 0.4535400E+00, 0.4283400E+00, &
     & 0.4409800E+00, 0.4068600E+00, 0.4771700E+00, 0.3804500E+00, &
     & 0.3978400E+00, 0.3949738E+00, 0.2194985E+00, 0.2194985E+00 /
      data (ref_adm(16,iz, 4, 8),iz = 1,20) / &
     & 0.4543000E+00, 0.4543000E+00, 0.5864100E+00, 0.4519300E+00, &
     & 0.4001500E+00, 0.3039600E+00, 0.3752000E+00, 0.4919700E+00, &
     & 0.4757100E+00, 0.3107900E+00, 0.4170613E+00, 0.4327600E+00, &
     & 0.4285100E+00, 0.3877200E+00, 0.4490500E+00, 0.4420900E+00, &
     & 0.4474700E+00, 0.3943476E+00, 0.3407355E+00, 0.3407355E+00 /
      data (ref_adm(16,iz, 5, 8),iz = 1,20) / &
     & 0.5365400E+00, 0.5365400E+00, 0.5103700E+00, 0.4334500E+00, &
     & 0.4006200E+00, 0.4036600E+00, 0.3494200E+00, 0.4423900E+00, &
     & 0.4497800E+00, 0.4828700E+00, 0.2707600E+00, 0.4188843E+00, &
     & 0.4769700E+00, 0.3945600E+00, 0.4117700E+00, 0.4189400E+00, &
     & 0.4108712E+00, 0.3934243E+00, 0.3396682E+00, 0.3396682E+00 /
      data (ref_adm(16,iz, 6, 8),iz = 1,20) / &
     & 0.4833300E+00, 0.4833300E+00, 0.4815100E+00, 0.4351500E+00, &
     & 0.4065200E+00, 0.3706100E+00, 0.3960000E+00, 0.3403400E+00, &
     & 0.4053500E+00, 0.4148624E+00, 0.4163238E+00, 0.3680100E+00, &
     & 0.1814600E+00, 0.3083100E+00, 0.3707100E+00, 0.4305600E+00, &
     & 0.4092818E+00, 0.3921118E+00, 0.3383102E+00, 0.3383102E+00 /
      data (ref_adm(16,iz, 7, 8),iz = 1,20) / &
     & 0.5425800E+00, 0.5425800E+00, 0.5050800E+00, 0.4735500E+00, &
     & 0.4310700E+00, 0.3618200E+00, 0.4143800E+00, 0.2741900E+00, &
     & 0.3331400E+00, 0.3697200E+00, 0.3695000E+00, 0.4070400E+00, &
     & 0.4201800E+00, 0.4176100E+00, 0.2857800E+00, 0.4531300E+00, &
     & 0.4978900E+00, 0.3904501E+00, 0.3367026E+00, 0.3367026E+00 /
      data (ref_adm(16,iz, 8, 8),iz = 1,20) / &
     & 0.3652100E+00, 0.3652100E+00, 0.4158500E+00, 0.4256300E+00, &
     & 0.3755800E+00, 0.3952900E+00, 0.3777100E+00, 0.3644200E+00, &
     & 0.4827500E+00, 0.4645200E+00, 0.4103500E+00, 0.4424300E+00, &
     & 0.4180743E+00, 0.4380400E+00, 0.3404600E+00, 0.4264600E+00, &
     & 0.4182500E+00, 0.3884164E+00, 0.3348132E+00, 0.3348132E+00 /
      data (ref_adm(16,iz, 9, 8),iz = 1,20) / &
     & 0.2473000E+00, 0.2473000E+00, 0.5413400E+00, 0.4340700E+00, &
     & 0.4575600E+00, 0.3592200E+00, 0.5305000E+00, 0.4790300E+00, &
     & 0.3315600E+00, 0.4200000E+00, 0.4112400E+00, 0.3495200E+00, &
     & 0.3471800E+00, 0.2544100E+00, 0.3111500E+00, 0.3759900E+00, &
     & 0.4032199E+00, 0.3860596E+00, 0.3327893E+00, 0.3327893E+00 /
      data (ref_adm(16,iz,10, 8),iz = 1,20) / &
     & 0.4269700E+00, 0.4269700E+00, 0.4710800E+00, 0.4685600E+00, &
     & 0.5063400E+00, 0.5230800E+00, 0.4504100E+00, 0.5223600E+00, &
     & 0.4510100E+00, 0.3870400E+00, 0.4170800E+00, 0.4438000E+00, &
     & 0.3652400E+00, 0.3293400E+00, 0.4136335E+00, 0.4088200E+00, &
     & 0.4682100E+00, 0.3833017E+00, 0.3303106E+00, 0.3303106E+00 /
      data (ref_adm(16,iz,11, 8),iz = 1,20) / &
     & 0.4362200E+00, 0.4362200E+00, 0.4587100E+00, 0.4535300E+00, &
     & 0.4560400E+00, 0.4241000E+00, 0.4223200E+00, 0.4740800E+00, &
     & 0.4449200E+00, 0.3997600E+00, 0.4126400E+00, 0.4582800E+00, &
     & 0.3990600E+00, 0.3370000E+00, 0.3812000E+00, 0.3499000E+00, &
     & 0.3820300E+00, 0.4127200E+00, 0.3276792E+00, 0.3276792E+00 /
      data (ref_adm(16,iz,12, 8),iz = 1,20) / &
     & 0.4481600E+00, 0.4481600E+00, 0.4597900E+00, 0.4526400E+00, &
     & 0.4652300E+00, 0.4376800E+00, 0.4163900E+00, 0.4007400E+00, &
     & 0.4489500E+00, 0.4171400E+00, 0.3896300E+00, 0.4061600E+00, &
     & 0.4041100E+00, 0.3930200E+00, 0.4370000E+00, 0.3890300E+00, &
     & 0.3715600E+00, 0.3772780E+00, 0.3246669E+00, 0.3246669E+00 /
      data (ref_adm(16,iz,13, 8),iz = 1,20) / &
     & 0.4716500E+00, 0.4716500E+00, 0.4283700E+00, 0.4088100E+00, &
     & 0.4803400E+00, 0.5014600E+00, 0.5089100E+00, 0.4727400E+00, &
     & 0.4950500E+00, 0.4362100E+00, 0.4360100E+00, 0.4280700E+00, &
     & 0.4001800E+00, 0.3622900E+00, 0.4859700E+00, 0.5104500E+00, &
     & 0.3925501E+00, 0.3741028E+00, 0.3214718E+00, 0.3214718E+00 /
      data (ref_adm(16,iz,14, 8),iz = 1,20) / &
     & 0.4468300E+00, 0.4468300E+00, 0.4008900E+00, 0.3582100E+00, &
     & 0.3311200E+00, 0.3582500E+00, 0.4228000E+00, 0.4507100E+00, &
     & 0.4454200E+00, 0.4384300E+00, 0.4102200E+00, 0.4329000E+00, &
     & 0.4179800E+00, 0.4364600E+00, 0.3802200E+00, 0.3998559E+00, &
     & 0.3898163E+00, 0.3708363E+00, 0.3183338E+00, 0.3183338E+00 /
      data (ref_adm(16,iz,15, 8),iz = 1,20) / &
     & 0.4931300E+00, 0.4931300E+00, 0.4125400E+00, 0.4108100E+00, &
     & 0.3054800E+00, 0.3437000E+00, 0.4019300E+00, 0.4517200E+00, &
     & 0.3071300E+00, 0.4706300E+00, 0.4107300E+00, 0.4236400E+00, &
     & 0.4031300E+00, 0.3849600E+00, 0.3729800E+00, 0.3978893E+00, &
     & 0.3873066E+00, 0.3676573E+00, 0.3154589E+00, 0.3154589E+00 /
      data (ref_adm(16,iz,16, 8),iz = 1,20) / &
     & 0.4083200E+00, 0.4083200E+00, 0.4681600E+00, 0.3587500E+00, &
     & 0.3883200E+00, 0.4206876E+00, 0.3153000E+00, 0.4056600E+00, &
     & 0.4006900E+00, 0.4198900E+00, 0.4523600E+00, 0.4219100E+00, &
     & 0.4081104E+00, 0.3251100E+00, 0.3725200E+00, 0.3955567E+00, &
     & 0.3849922E+00, 0.3647478E+00, 0.3126946E+00, 0.3126946E+00 /
      data (ref_adm(16,iz,17, 8),iz = 1,20) / &
     & 0.5005500E+00, 0.5005500E+00, 0.4297901E+00, 0.3776100E+00, &
     & 0.4326200E+00, 0.3437900E+00, 0.4191089E+00, 0.2863800E+00, &
     & 0.3729900E+00, 0.3495400E+00, 0.4359400E+00, 0.4209100E+00, &
     & 0.3114300E+00, 0.4047979E+00, 0.4449600E+00, 0.3935264E+00, &
     & 0.3827955E+00, 0.3620493E+00, 0.3100004E+00, 0.3100004E+00 /
      data (ref_adm(16,iz,18, 8),iz = 1,20) / &
     & 0.4873700E+00, 0.4873700E+00, 0.4532900E+00, 0.3067400E+00, &
     & 0.3728800E+00, 0.5316300E+00, 0.4313000E+00, 0.3952200E+00, &
     & 0.3790000E+00, 0.4291800E+00, 0.4541400E+00, 0.4659600E+00, &
     & 0.3615000E+00, 0.4301100E+00, 0.4073497E+00, 0.3943407E+00, &
     & 0.3759144E+00, 0.3451946E+00, 0.2953379E+00, 0.2953379E+00 /
      data (ref_adm(16,iz,19, 8),iz = 1,20) / &
     & 0.5369600E+00, 0.5369600E+00, 0.3973700E+00, 0.3002900E+00, &
     & 0.5632400E+00, 0.4645900E+00, 0.4903700E+00, 0.4699700E+00, &
     & 0.4129200E+00, 0.4398400E+00, 0.4180600E+00, 0.4314300E+00, &
     & 0.4355100E+00, 0.4098800E+00, 0.4008600E+00, 0.3914809E+00, &
     & 0.3726414E+00, 0.3421703E+00, 0.2936092E+00, 0.2936092E+00 /
      data (ref_adm(16,iz,20, 8),iz = 1,20) / &
     & 0.4348900E+00, 0.4348900E+00, 0.4498200E+00, 0.4831600E+00, &
     & 0.4485500E+00, 0.5980100E+00, 0.5362400E+00, 0.4977300E+00, &
     & 0.4814300E+00, 0.4334500E+00, 0.4044200E+00, 0.3946000E+00, &
     & 0.2827600E+00, 0.4144100E+00, 0.3578000E+00, 0.3892049E+00, &
     & 0.3702235E+00, 0.3398654E+00, 0.2926709E+00, 0.2926709E+00 /
      data (ref_adm(16,iz,21, 8),iz = 1,20) / &
     & 0.4172200E+00, 0.4172200E+00, 0.4957000E+00, 0.4799600E+00, &
     & 0.4858000E+00, 0.4387200E+00, 0.5357900E+00, 0.4320900E+00, &
     & 0.4296200E+00, 0.4798000E+00, 0.4016100E+00, 0.3859400E+00, &
     & 0.3922200E+00, 0.3844900E+00, 0.4027006E+00, 0.3877345E+00, &
     & 0.3684173E+00, 0.3382092E+00, 0.2923236E+00, 0.2923236E+00 /
      data (ref_adm(16,iz,22, 8),iz = 1,20) / &
     & 0.4313100E+00, 0.4313100E+00, 0.4644400E+00, 0.4215100E+00, &
     & 0.4312100E+00, 0.4950000E+00, 0.5400100E+00, 0.5259100E+00, &
     & 0.4609700E+00, 0.4542400E+00, 0.4598700E+00, 0.4622700E+00, &
     & 0.4223400E+00, 0.3717700E+00, 0.3168300E+00, 0.3871563E+00, &
     & 0.3638954E+00, 0.3296719E+00, 0.2755629E+00, 0.2755629E+00 /
      data (ref_adm(16,iz,23, 8),iz = 1,20) / &
     & 0.4629100E+00, 0.4629100E+00, 0.4162600E+00, 0.4500700E+00, &
     & 0.5876400E+00, 0.5003400E+00, 0.4896400E+00, 0.5245700E+00, &
     & 0.5151900E+00, 0.4031300E+00, 0.4044600E+00, 0.4443700E+00, &
     & 0.4289900E+00, 0.4588800E+00, 0.4045300E+00, 0.4580000E+00, &
     & 0.3633335E+00, 0.3292183E+00, 0.2754886E+00, 0.2754886E+00 /
      data (ref_adm(16,iz,24, 8),iz = 1,20) / &
     & 0.4140600E+00, 0.4140600E+00, 0.4458500E+00, 0.5635500E+00, &
     & 0.4944700E+00, 0.4666700E+00, 0.4178100E+00, 0.4514700E+00, &
     & 0.4920900E+00, 0.4386000E+00, 0.4200900E+00, 0.4851000E+00, &
     & 0.4862400E+00, 0.4178600E+00, 0.4217500E+00, 0.4387400E+00, &
     & 0.3629902E+00, 0.3288495E+00, 0.2754761E+00, 0.2754761E+00 /
      data (ref_adm(16,iz,25, 8),iz = 1,20) / &
     & 0.4710100E+00, 0.4710100E+00, 0.5640700E+00, 0.5185500E+00, &
     & 0.5152700E+00, 0.5038900E+00, 0.4264100E+00, 0.4724900E+00, &
     & 0.4626600E+00, 0.5026100E+00, 0.4914900E+00, 0.4475000E+00, &
     & 0.4226000E+00, 0.3042100E+00, 0.4434000E+00, 0.3707800E+00, &
     & 0.3816900E+00, 0.3285854E+00, 0.2755613E+00, 0.2755613E+00 /
      data (ref_adm(16,iz,26, 8),iz = 1,20) / &
     & 0.4998700E+00, 0.4998700E+00, 0.4450500E+00, 0.4866100E+00, &
     & 0.4970300E+00, 0.4694800E+00, 0.4552800E+00, 0.4961300E+00, &
     & 0.3420800E+00, 0.5586400E+00, 0.4073900E+00, 0.5078600E+00, &
     & 0.5058700E+00, 0.4224200E+00, 0.4664800E+00, 0.4276200E+00, &
     & 0.3625723E+00, 0.3283331E+00, 0.2756864E+00, 0.2756864E+00 /
      data (ref_adm(16,iz,27, 8),iz = 1,20) / &
     & 0.4335400E+00, 0.4335400E+00, 0.4228700E+00, 0.4344100E+00, &
     & 0.4609700E+00, 0.4248600E+00, 0.3732500E+00, 0.3982300E+00, &
     & 0.4860300E+00, 0.4892600E+00, 0.4646400E+00, 0.4999000E+00, &
     & 0.3922300E+00, 0.4460200E+00, 0.4280700E+00, 0.4186100E+00, &
     & 0.3712800E+00, 0.3282353E+00, 0.2758915E+00, 0.2758915E+00 /
      data (ref_adm(16,iz,28, 8),iz = 1,20) / &
     & 0.4754700E+00, 0.4754700E+00, 0.4624700E+00, 0.4510000E+00, &
     & 0.4412600E+00, 0.4252700E+00, 0.4470000E+00, 0.4546400E+00, &
     & 0.4553900E+00, 0.4250300E+00, 0.4327800E+00, 0.4618400E+00, &
     & 0.3771300E+00, 0.4076900E+00, 0.4095100E+00, 0.3748500E+00, &
     & 0.3624230E+00, 0.3281565E+00, 0.2761170E+00, 0.2761170E+00 /
      data (ref_adm(16,iz,29, 8),iz = 1,20) / &
     & 0.4465100E+00, 0.4465100E+00, 0.4634000E+00, 0.4622400E+00, &
     & 0.4601000E+00, 0.4585600E+00, 0.4576000E+00, 0.4782600E+00, &
     & 0.4823900E+00, 0.4891400E+00, 0.4888900E+00, 0.4556600E+00, &
     & 0.4051300E+00, 0.4362600E+00, 0.4110200E+00, 0.4186300E+00, &
     & 0.3624461E+00, 0.3281218E+00, 0.2763613E+00, 0.2763613E+00 /
      data (ref_adm(16,iz,30, 8),iz = 1,20) / &
     & 0.3787900E+00, 0.3787900E+00, 0.4299900E+00, 0.3836500E+00, &
     & 0.4860600E+00, 0.3551900E+00, 0.3456900E+00, 0.4157000E+00, &
     & 0.4769900E+00, 0.4879100E+00, 0.4829900E+00, 0.4643700E+00, &
     & 0.4390900E+00, 0.4479100E+00, 0.4948900E+00, 0.3633900E+00, &
     & 0.3625910E+00, 0.3281960E+00, 0.2766255E+00, 0.2766255E+00 /
      data (ref_adm(16,iz,31, 8),iz = 1,20) / &
     & 0.4177600E+00, 0.4177600E+00, 0.4798170E+00, 0.3806500E+00, &
     & 0.4320100E+00, 0.3846400E+00, 0.4890300E+00, 0.4544100E+00, &
     & 0.5356400E+00, 0.5434000E+00, 0.4275400E+00, 0.4873600E+00, &
     & 0.4940900E+00, 0.4398600E+00, 0.4496400E+00, 0.3878485E+00, &
     & 0.3971500E+00, 0.3282266E+00, 0.2768936E+00, 0.2768936E+00 /
      data (ref_adm(16,iz,32, 8),iz = 1,20) / &
     & 0.4069200E+00, 0.4069200E+00, 0.3565800E+00, 0.4804408E+00, &
     & 0.4798900E+00, 0.5236200E+00, 0.5456300E+00, 0.5421800E+00, &
     & 0.4449900E+00, 0.3927700E+00, 0.4682500E+00, 0.4982200E+00, &
     & 0.3814800E+00, 0.4130200E+00, 0.4116518E+00, 0.5164600E+00, &
     & 0.3628668E+00, 0.3283274E+00, 0.2771270E+00, 0.2771270E+00 /
      data (ref_adm(16,iz,33, 8),iz = 1,20) / &
     & 0.5425000E+00, 0.5425000E+00, 0.4194800E+00, 0.4954100E+00, &
     & 0.4646400E+00, 0.5465200E+00, 0.4600700E+00, 0.4417900E+00, &
     & 0.5008700E+00, 0.5413600E+00, 0.5403100E+00, 0.4816600E+00, &
     & 0.4424488E+00, 0.5260000E+00, 0.4120103E+00, 0.3885512E+00, &
     & 0.3630471E+00, 0.3284130E+00, 0.2773741E+00, 0.2773741E+00 /
      data (ref_adm(16,iz,34, 8),iz = 1,20) / &
     & 0.4503900E+00, 0.4503900E+00, 0.4511100E+00, 0.5017700E+00, &
     & 0.5251900E+00, 0.5484300E+00, 0.5278300E+00, 0.4495200E+00, &
     & 0.3736100E+00, 0.5765000E+00, 0.5346700E+00, 0.4585700E+00, &
     & 0.4199100E+00, 0.4642000E+00, 0.4123354E+00, 0.3889641E+00, &
     & 0.3632045E+00, 0.3284833E+00, 0.2775595E+00, 0.2775595E+00 /
      data (ref_adm(16,iz,35, 8),iz = 1,20) / &
     & 0.4298700E+00, 0.4298700E+00, 0.4183100E+00, 0.4514200E+00, &
     & 0.4873500E+00, 0.4974600E+00, 0.5383900E+00, 0.5998800E+00, &
     & 0.4657900E+00, 0.5735000E+00, 0.4907000E+00, 0.3976600E+00, &
     & 0.4538300E+00, 0.4253300E+00, 0.4124934E+00, 0.3891934E+00, &
     & 0.3632678E+00, 0.3285398E+00, 0.2777286E+00, 0.2777286E+00 /
      data (ref_adm(16,iz,36, 8),iz = 1,20) / &
     & 0.4389000E+00, 0.4389000E+00, 0.5917700E+00, 0.5222800E+00, &
     & 0.5101300E+00, 0.4433400E+00, 0.4544500E+00, 0.5068900E+00, &
     & 0.5811800E+00, 0.4777227E+00, 0.6420900E+00, 0.5054500E+00, &
     & 0.5100200E+00, 0.4293069E+00, 0.3529900E+00, 0.3893805E+00, &
     & 0.3633455E+00, 0.3285942E+00, 0.2778401E+00, 0.2778401E+00 /
      data (ref_adm(16,iz,37, 8),iz = 1,20) / &
     & 0.4890600E+00, 0.4890600E+00, 0.4612300E+00, 0.5331900E+00, &
     & 0.4820400E+00, 0.4569400E+00, 0.4775500E+00, 0.4546500E+00, &
     & 0.5084700E+00, 0.4993700E+00, 0.6874400E+00, 0.6291900E+00, &
     & 0.4158000E+00, 0.4083800E+00, 0.4011600E+00, 0.3894597E+00, &
     & 0.3634783E+00, 0.3286546E+00, 0.2778918E+00, 0.2778918E+00 /
      data (ref_adm(16,iz,38, 8),iz = 1,20) / &
     & 0.4890600E+00, 0.4890600E+00, 0.4612300E+00, 0.5331900E+00, &
     & 0.4820400E+00, 0.4569400E+00, 0.4775500E+00, 0.4546500E+00, &
     & 0.5084700E+00, 0.4993700E+00, 0.6874400E+00, 0.6291900E+00, &
     & 0.4158000E+00, 0.4083800E+00, 0.4011600E+00, 0.3894597E+00, &
     & 0.3634783E+00, 0.3286546E+00, 0.2778918E+00, 0.2778918E+00 /
! Solar Zenith Angle 40.0 Albedo  0.4302429E+00
      data (ref_adm(16,iz, 1, 9),iz = 1,20) / &
     & 0.4624100E+00, 0.4624100E+00, 0.5337400E+00, 0.4970900E+00, &
     & 0.4672700E+00, 0.4443400E+00, 0.4427000E+00, 0.4458700E+00, &
     & 0.4391200E+00, 0.4105500E+00, 0.4276600E+00, 0.5127900E+00, &
     & 0.4626000E+00, 0.3874300E+00, 0.3945700E+00, 0.4208000E+00, &
     & 0.5309800E+00, 0.5636200E+00, 0.3253069E+00, 0.3253069E+00 /
      data (ref_adm(16,iz, 2, 9),iz = 1,20) / &
     & 0.4624100E+00, 0.4624100E+00, 0.5337400E+00, 0.4970900E+00, &
     & 0.4672700E+00, 0.4443400E+00, 0.4427000E+00, 0.4458700E+00, &
     & 0.4391200E+00, 0.4105500E+00, 0.4276600E+00, 0.5127900E+00, &
     & 0.4626000E+00, 0.3874300E+00, 0.3945700E+00, 0.4208000E+00, &
     & 0.5309800E+00, 0.5636200E+00, 0.3253069E+00, 0.3253069E+00 /
      data (ref_adm(16,iz, 3, 9),iz = 1,20) / &
     & 0.4588900E+00, 0.4588900E+00, 0.4669500E+00, 0.4573500E+00, &
     & 0.4547700E+00, 0.4898500E+00, 0.4563500E+00, 0.4855000E+00, &
     & 0.4316500E+00, 0.4684400E+00, 0.4763900E+00, 0.4336200E+00, &
     & 0.4574700E+00, 0.4565200E+00, 0.3939700E+00, 0.4007500E+00, &
     & 0.4746300E+00, 0.4954500E+00, 0.1834734E+00, 0.1834734E+00 /
      data (ref_adm(16,iz, 4, 9),iz = 1,20) / &
     & 0.4317500E+00, 0.4317500E+00, 0.5027800E+00, 0.4640100E+00, &
     & 0.3827900E+00, 0.4333200E+00, 0.4416800E+00, 0.4571600E+00, &
     & 0.4426400E+00, 0.4314800E+00, 0.4438800E+00, 0.4344300E+00, &
     & 0.4297400E+00, 0.4464800E+00, 0.4297200E+00, 0.4404100E+00, &
     & 0.3989300E+00, 0.3674400E+00, 0.3246517E+00, 0.3246517E+00 /
      data (ref_adm(16,iz, 5, 9),iz = 1,20) / &
     & 0.4258400E+00, 0.4258400E+00, 0.4201500E+00, 0.4316000E+00, &
     & 0.4585800E+00, 0.3666100E+00, 0.4022500E+00, 0.3992400E+00, &
     & 0.3745300E+00, 0.4224000E+00, 0.4247600E+00, 0.4271900E+00, &
     & 0.4272300E+00, 0.4538900E+00, 0.4538100E+00, 0.4395800E+00, &
     & 0.3504200E+00, 0.3726100E+00, 0.3238797E+00, 0.3238797E+00 /
      data (ref_adm(16,iz, 6, 9),iz = 1,20) / &
     & 0.4333600E+00, 0.4333600E+00, 0.4027700E+00, 0.4093000E+00, &
     & 0.4451200E+00, 0.4050100E+00, 0.3358400E+00, 0.3674600E+00, &
     & 0.4693200E+00, 0.3883000E+00, 0.4871000E+00, 0.4033200E+00, &
     & 0.4693900E+00, 0.3682900E+00, 0.4816900E+00, 0.4447300E+00, &
     & 0.4028300E+00, 0.3948199E+00, 0.3229839E+00, 0.3229839E+00 /
      data (ref_adm(16,iz, 7, 9),iz = 1,20) / &
     & 0.4044200E+00, 0.4044200E+00, 0.4745500E+00, 0.4289900E+00, &
     & 0.3597200E+00, 0.3986200E+00, 0.3011800E+00, 0.3286000E+00, &
     & 0.4169451E+00, 0.3984100E+00, 0.4299200E+00, 0.4350400E+00, &
     & 0.4741700E+00, 0.4785600E+00, 0.4550900E+00, 0.4392200E+00, &
     & 0.4245700E+00, 0.3933887E+00, 0.3217122E+00, 0.3217122E+00 /
      data (ref_adm(16,iz, 8, 9),iz = 1,20) / &
     & 0.4440400E+00, 0.4440400E+00, 0.3991800E+00, 0.3979800E+00, &
     & 0.4337800E+00, 0.3733100E+00, 0.3529300E+00, 0.3503400E+00, &
     & 0.3786600E+00, 0.3516100E+00, 0.3184800E+00, 0.3929000E+00, &
     & 0.4259400E+00, 0.3971600E+00, 0.4015800E+00, 0.4001100E+00, &
     & 0.4504200E+00, 0.3917990E+00, 0.3202695E+00, 0.3202695E+00 /
      data (ref_adm(16,iz, 9, 9),iz = 1,20) / &
     & 0.4216500E+00, 0.4216500E+00, 0.4203100E+00, 0.4662200E+00, &
     & 0.4005800E+00, 0.3803100E+00, 0.4212100E+00, 0.4475700E+00, &
     & 0.4065000E+00, 0.4101000E+00, 0.3436900E+00, 0.4046800E+00, &
     & 0.4744500E+00, 0.3722000E+00, 0.4715600E+00, 0.4939700E+00, &
     & 0.3827000E+00, 0.4091800E+00, 0.3185483E+00, 0.3185483E+00 /
      data (ref_adm(16,iz,10, 9),iz = 1,20) / &
     & 0.4739700E+00, 0.4739700E+00, 0.4131500E+00, 0.4781300E+00, &
     & 0.4867500E+00, 0.4501100E+00, 0.4539000E+00, 0.4695200E+00, &
     & 0.4740400E+00, 0.4452900E+00, 0.4129900E+00, 0.4926300E+00, &
     & 0.5639800E+00, 0.4929800E+00, 0.4921600E+00, 0.5055500E+00, &
     & 0.4860100E+00, 0.3679600E+00, 0.3165722E+00, 0.3165722E+00 /
      data (ref_adm(16,iz,11, 9),iz = 1,20) / &
     & 0.4567300E+00, 0.4567300E+00, 0.4391000E+00, 0.3961700E+00, &
     & 0.4024200E+00, 0.4362800E+00, 0.3749400E+00, 0.4041100E+00, &
     & 0.4120100E+00, 0.4222700E+00, 0.3423800E+00, 0.5100900E+00, &
     & 0.4024200E+00, 0.4247700E+00, 0.3547900E+00, 0.4731300E+00, &
     & 0.4112900E+00, 0.3404500E+00, 0.3145724E+00, 0.3145724E+00 /
      data (ref_adm(16,iz,12, 9),iz = 1,20) / &
     & 0.4621100E+00, 0.4621100E+00, 0.4274100E+00, 0.4259100E+00, &
     & 0.4536600E+00, 0.4411000E+00, 0.4501600E+00, 0.4405900E+00, &
     & 0.4275100E+00, 0.4067700E+00, 0.4519700E+00, 0.4563400E+00, &
     & 0.4118400E+00, 0.3442800E+00, 0.5146400E+00, 0.4045600E+00, &
     & 0.3768400E+00, 0.3830082E+00, 0.3126208E+00, 0.3126208E+00 /
      data (ref_adm(16,iz,13, 9),iz = 1,20) / &
     & 0.4784000E+00, 0.4784000E+00, 0.4382600E+00, 0.4083700E+00, &
     & 0.3849600E+00, 0.4083600E+00, 0.4155600E+00, 0.4296700E+00, &
     & 0.4282300E+00, 0.4300700E+00, 0.4521800E+00, 0.4445200E+00, &
     & 0.4239700E+00, 0.4011900E+00, 0.3050900E+00, 0.4150102E+00, &
     & 0.4053543E+00, 0.3167100E+00, 0.3107595E+00, 0.3107595E+00 /
      data (ref_adm(16,iz,14, 9),iz = 1,20) / &
     & 0.4297500E+00, 0.4297500E+00, 0.3891400E+00, 0.4064600E+00, &
     & 0.3983800E+00, 0.4039500E+00, 0.4002400E+00, 0.4122700E+00, &
     & 0.4005500E+00, 0.3563000E+00, 0.3882300E+00, 0.4150700E+00, &
     & 0.4059600E+00, 0.4466300E+00, 0.4071500E+00, 0.4133467E+00, &
     & 0.3164300E+00, 0.3777769E+00, 0.3086544E+00, 0.3086544E+00 /
      data (ref_adm(16,iz,15, 9),iz = 1,20) / &
     & 0.4502600E+00, 0.4502600E+00, 0.4187700E+00, 0.4198400E+00, &
     & 0.3420700E+00, 0.3708300E+00, 0.3855300E+00, 0.3549300E+00, &
     & 0.4231200E+00, 0.3848500E+00, 0.3901500E+00, 0.4406500E+00, &
     & 0.4108500E+00, 0.4068700E+00, 0.4152700E+00, 0.4116206E+00, &
     & 0.3470900E+00, 0.3752578E+00, 0.3066455E+00, 0.3066455E+00 /
      data (ref_adm(16,iz,16, 9),iz = 1,20) / &
     & 0.4392600E+00, 0.4392600E+00, 0.3745200E+00, 0.3912600E+00, &
     & 0.3756200E+00, 0.3727100E+00, 0.3842000E+00, 0.4184700E+00, &
     & 0.4226700E+00, 0.4293200E+00, 0.4077900E+00, 0.4766600E+00, &
     & 0.3529800E+00, 0.3530500E+00, 0.3537000E+00, 0.4117000E+00, &
     & 0.4149600E+00, 0.3728525E+00, 0.3044601E+00, 0.3044601E+00 /
      data (ref_adm(16,iz,17, 9),iz = 1,20) / &
     & 0.3980700E+00, 0.3980700E+00, 0.4479800E+00, 0.3905100E+00, &
     & 0.3929100E+00, 0.4159500E+00, 0.4174300E+00, 0.4169000E+00, &
     & 0.4879500E+00, 0.3082600E+00, 0.4300100E+00, 0.4254900E+00, &
     & 0.3511000E+00, 0.4290700E+00, 0.4337500E+00, 0.3993400E+00, &
     & 0.3768000E+00, 0.3707547E+00, 0.3025439E+00, 0.3025439E+00 /
      data (ref_adm(16,iz,18, 9),iz = 1,20) / &
     & 0.4653300E+00, 0.4653300E+00, 0.3506000E+00, 0.3778400E+00, &
     & 0.4572800E+00, 0.3841900E+00, 0.4195600E+00, 0.3644200E+00, &
     & 0.5464900E+00, 0.5064600E+00, 0.3503000E+00, 0.3971600E+00, &
     & 0.3917700E+00, 0.2587200E+00, 0.4630400E+00, 0.3651300E+00, &
     & 0.3782600E+00, 0.3669224E+00, 0.3157602E+00, 0.3157602E+00 /
      data (ref_adm(16,iz,19, 9),iz = 1,20) / &
     & 0.4143700E+00, 0.4143700E+00, 0.3927400E+00, 0.3798000E+00, &
     & 0.3984500E+00, 0.3481200E+00, 0.3388400E+00, 0.4688900E+00, &
     & 0.5491600E+00, 0.4590500E+00, 0.3680600E+00, 0.4459200E+00, &
     & 0.3600500E+00, 0.2938000E+00, 0.2743100E+00, 0.3927234E+00, &
     & 0.3832084E+00, 0.3647036E+00, 0.3136763E+00, 0.3136763E+00 /
      data (ref_adm(16,iz,20, 9),iz = 1,20) / &
     & 0.3781000E+00, 0.3781000E+00, 0.3609800E+00, 0.3729700E+00, &
     & 0.3929500E+00, 0.3927800E+00, 0.3738300E+00, 0.3629400E+00, &
     & 0.3252800E+00, 0.4832400E+00, 0.4652800E+00, 0.3565000E+00, &
     & 0.4383800E+00, 0.3906200E+00, 0.4419400E+00, 0.3907153E+00, &
     & 0.3812625E+00, 0.3623714E+00, 0.3122401E+00, 0.3122401E+00 /
      data (ref_adm(16,iz,21, 9),iz = 1,20) / &
     & 0.3945500E+00, 0.3945500E+00, 0.4150200E+00, 0.4309000E+00, &
     & 0.3899900E+00, 0.4802500E+00, 0.4618000E+00, 0.3569400E+00, &
     & 0.4195100E+00, 0.4054600E+00, 0.4685700E+00, 0.3992500E+00, &
     & 0.4667000E+00, 0.3758300E+00, 0.4028700E+00, 0.4325600E+00, &
     & 0.4159300E+00, 0.3602775E+00, 0.3111027E+00, 0.3111027E+00 /
      data (ref_adm(16,iz,22, 9),iz = 1,20) / &
     & 0.4225500E+00, 0.4225500E+00, 0.3935800E+00, 0.4287000E+00, &
     & 0.4245600E+00, 0.4232300E+00, 0.4597700E+00, 0.3784100E+00, &
     & 0.3957900E+00, 0.4707200E+00, 0.4577000E+00, 0.3999700E+00, &
     & 0.4840100E+00, 0.4584700E+00, 0.4242800E+00, 0.4742700E+00, &
     & 0.4536384E+00, 0.4366189E+00, 0.3800373E+00, 0.3800373E+00 /
      data (ref_adm(16,iz,23, 9),iz = 1,20) / &
     & 0.4256900E+00, 0.4256900E+00, 0.4321000E+00, 0.4041000E+00, &
     & 0.4193700E+00, 0.4482300E+00, 0.3737800E+00, 0.4259400E+00, &
     & 0.4164700E+00, 0.5289400E+00, 0.4424500E+00, 0.4656300E+00, &
     & 0.4190800E+00, 0.3798100E+00, 0.3540600E+00, 0.3721800E+00, &
     & 0.4473989E+00, 0.4296201E+00, 0.3784915E+00, 0.3784915E+00 /
      data (ref_adm(16,iz,24, 9),iz = 1,20) / &
     & 0.5078600E+00, 0.5078600E+00, 0.5023300E+00, 0.4325000E+00, &
     & 0.5043300E+00, 0.4608100E+00, 0.4071500E+00, 0.3283700E+00, &
     & 0.4189300E+00, 0.4152100E+00, 0.3978400E+00, 0.4434300E+00, &
     & 0.4183100E+00, 0.3545900E+00, 0.3131700E+00, 0.3652400E+00, &
     & 0.3833000E+00, 0.4245934E+00, 0.3779157E+00, 0.3779157E+00 /
      data (ref_adm(16,iz,25, 9),iz = 1,20) / &
     & 0.4210200E+00, 0.4210200E+00, 0.4415300E+00, 0.4554700E+00, &
     & 0.4383200E+00, 0.4430700E+00, 0.4061200E+00, 0.4043700E+00, &
     & 0.3866400E+00, 0.4113400E+00, 0.4327300E+00, 0.4430500E+00, &
     & 0.4409200E+00, 0.4131500E+00, 0.3162800E+00, 0.4307400E+00, &
     & 0.3964700E+00, 0.4198809E+00, 0.3787154E+00, 0.3787154E+00 /
      data (ref_adm(16,iz,26, 9),iz = 1,20) / &
     & 0.4115700E+00, 0.4115700E+00, 0.4290800E+00, 0.4288900E+00, &
     & 0.4447800E+00, 0.4066900E+00, 0.3846500E+00, 0.4297700E+00, &
     & 0.4218800E+00, 0.4070700E+00, 0.3721600E+00, 0.5066600E+00, &
     & 0.4839900E+00, 0.4589800E+00, 0.3070900E+00, 0.4353100E+00, &
     & 0.3630300E+00, 0.4178290E+00, 0.3804155E+00, 0.3804155E+00 /
      data (ref_adm(16,iz,27, 9),iz = 1,20) / &
     & 0.4348200E+00, 0.4348200E+00, 0.4154700E+00, 0.4328400E+00, &
     & 0.4130800E+00, 0.4499700E+00, 0.4301800E+00, 0.3945200E+00, &
     & 0.4202700E+00, 0.4210100E+00, 0.4094300E+00, 0.4305600E+00, &
     & 0.3606800E+00, 0.4320300E+00, 0.4586600E+00, 0.4577100E+00, &
     & 0.3939200E+00, 0.3082800E+00, 0.2393700E+00, 0.2393700E+00 /
      data (ref_adm(16,iz,28, 9),iz = 1,20) / &
     & 0.4494600E+00, 0.4494600E+00, 0.4497400E+00, 0.4425000E+00, &
     & 0.4641000E+00, 0.4466800E+00, 0.4495100E+00, 0.4747100E+00, &
     & 0.4945600E+00, 0.4834000E+00, 0.4967200E+00, 0.4938400E+00, &
     & 0.4442000E+00, 0.4309500E+00, 0.4349300E+00, 0.4169000E+00, &
     & 0.4437400E+00, 0.3655700E+00, 0.3891528E+00, 0.3891528E+00 /
      data (ref_adm(16,iz,29, 9),iz = 1,20) / &
     & 0.4527800E+00, 0.4527800E+00, 0.4078100E+00, 0.4136200E+00, &
     & 0.3819500E+00, 0.4242700E+00, 0.4622900E+00, 0.4687100E+00, &
     & 0.4828300E+00, 0.4955400E+00, 0.5046300E+00, 0.4772100E+00, &
     & 0.4756500E+00, 0.4224600E+00, 0.4443200E+00, 0.4190700E+00, &
     & 0.4972400E+00, 0.3911100E+00, 0.3951658E+00, 0.3951658E+00 /
      data (ref_adm(16,iz,30, 9),iz = 1,20) / &
     & 0.4172900E+00, 0.4172900E+00, 0.4214900E+00, 0.4246400E+00, &
     & 0.3984200E+00, 0.3948000E+00, 0.4571100E+00, 0.4838600E+00, &
     & 0.4831900E+00, 0.4800200E+00, 0.4755700E+00, 0.4326700E+00, &
     & 0.4435700E+00, 0.4751900E+00, 0.5021600E+00, 0.3803900E+00, &
     & 0.3305300E+00, 0.3010600E+00, 0.2639700E+00, 0.2639700E+00 /
      data (ref_adm(16,iz,31, 9),iz = 1,20) / &
     & 0.4300900E+00, 0.4300900E+00, 0.3657300E+00, 0.4341500E+00, &
     & 0.4314300E+00, 0.4544000E+00, 0.4544200E+00, 0.4620100E+00, &
     & 0.5336700E+00, 0.5379600E+00, 0.4860600E+00, 0.4880100E+00, &
     & 0.4910200E+00, 0.4384500E+00, 0.3333800E+00, 0.4000900E+00, &
     & 0.4305300E+00, 0.3696800E+00, 0.4070201E+00, 0.4070201E+00 /
      data (ref_adm(16,iz,32, 9),iz = 1,20) / &
     & 0.4487800E+00, 0.4487800E+00, 0.4009600E+00, 0.5383700E+00, &
     & 0.3945000E+00, 0.4452700E+00, 0.4608900E+00, 0.4894200E+00, &
     & 0.4587900E+00, 0.5154000E+00, 0.4904600E+00, 0.5070900E+00, &
     & 0.4915400E+00, 0.4511400E+00, 0.4130200E+00, 0.4241600E+00, &
     & 0.4415500E+00, 0.4146600E+00, 0.4135860E+00, 0.4135860E+00 /
      data (ref_adm(16,iz,33, 9),iz = 1,20) / &
     & 0.4233700E+00, 0.4233700E+00, 0.4736800E+00, 0.4163200E+00, &
     & 0.4216400E+00, 0.4467400E+00, 0.4552100E+00, 0.4690400E+00, &
     & 0.4840200E+00, 0.5061500E+00, 0.4703500E+00, 0.4929000E+00, &
     & 0.4214800E+00, 0.4552500E+00, 0.4638600E+00, 0.4252300E+00, &
     & 0.4175500E+00, 0.4236600E+00, 0.4193897E+00, 0.4193897E+00 /
      data (ref_adm(16,iz,34, 9),iz = 1,20) / &
     & 0.4050500E+00, 0.4050500E+00, 0.4259300E+00, 0.4358200E+00, &
     & 0.4902800E+00, 0.4688200E+00, 0.4214500E+00, 0.4927900E+00, &
     & 0.5210400E+00, 0.4828100E+00, 0.4846000E+00, 0.5073400E+00, &
     & 0.4924400E+00, 0.4243400E+00, 0.4441500E+00, 0.4806324E+00, &
     & 0.4702049E+00, 0.4486903E+00, 0.4244832E+00, 0.4244832E+00 /
      data (ref_adm(16,iz,35, 9),iz = 1,20) / &
     & 0.4338800E+00, 0.4338800E+00, 0.4456000E+00, 0.5097800E+00, &
     & 0.4684800E+00, 0.4640700E+00, 0.4481600E+00, 0.4556900E+00, &
     & 0.4983700E+00, 0.4319500E+00, 0.5001900E+00, 0.4422100E+00, &
     & 0.4202800E+00, 0.4620300E+00, 0.4479400E+00, 0.4823027E+00, &
     & 0.4752157E+00, 0.4530258E+00, 0.4291371E+00, 0.4291371E+00 /
      data (ref_adm(16,iz,36, 9),iz = 1,20) / &
     & 0.4466500E+00, 0.4466500E+00, 0.4254700E+00, 0.4681300E+00, &
     & 0.4690900E+00, 0.4794700E+00, 0.5078700E+00, 0.5021100E+00, &
     & 0.4801700E+00, 0.4536300E+00, 0.4741600E+00, 0.5396000E+00, &
     & 0.5677200E+00, 0.4627400E+00, 0.4698700E+00, 0.4735700E+00, &
     & 0.4783125E+00, 0.4562742E+00, 0.4322866E+00, 0.4322866E+00 /
      data (ref_adm(16,iz,37, 9),iz = 1,20) / &
     & 0.4577700E+00, 0.4577700E+00, 0.4914100E+00, 0.4225300E+00, &
     & 0.4150700E+00, 0.4959500E+00, 0.4906800E+00, 0.4475100E+00, &
     & 0.4563400E+00, 0.4619600E+00, 0.5139300E+00, 0.5924000E+00, &
     & 0.5368900E+00, 0.4720400E+00, 0.5123200E+00, 0.4795295E+00, &
     & 0.4798655E+00, 0.4583385E+00, 0.4340439E+00, 0.4340439E+00 /
      data (ref_adm(16,iz,38, 9),iz = 1,20) / &
     & 0.4577700E+00, 0.4577700E+00, 0.4914100E+00, 0.4225300E+00, &
     & 0.4150700E+00, 0.4959500E+00, 0.4906800E+00, 0.4475100E+00, &
     & 0.4563400E+00, 0.4619600E+00, 0.5139300E+00, 0.5924000E+00, &
     & 0.5368900E+00, 0.4720400E+00, 0.5123200E+00, 0.4795295E+00, &
     & 0.4798655E+00, 0.4583385E+00, 0.4340439E+00, 0.4340439E+00 /
! Solar Zenith Angle 45.0 Albedo  0.4255299E+00
      data (ref_adm(16,iz, 1,10),iz = 1,20) / &
     & 0.3451300E+00, 0.3451300E+00, 0.4074000E+00, 0.4473900E+00, &
     & 0.3975700E+00, 0.4179900E+00, 0.4138200E+00, 0.4281500E+00, &
     & 0.4356400E+00, 0.4943500E+00, 0.4368600E+00, 0.4973000E+00, &
     & 0.4782300E+00, 0.4924000E+00, 0.4713800E+00, 0.5386000E+00, &
     & 0.6129200E+00, 0.5557200E+00, 0.5456873E+00, 0.5456873E+00 /
      data (ref_adm(16,iz, 2,10),iz = 1,20) / &
     & 0.3451300E+00, 0.3451300E+00, 0.4074000E+00, 0.4473900E+00, &
     & 0.3975700E+00, 0.4179900E+00, 0.4138200E+00, 0.4281500E+00, &
     & 0.4356400E+00, 0.4943500E+00, 0.4368600E+00, 0.4973000E+00, &
     & 0.4782300E+00, 0.4924000E+00, 0.4713800E+00, 0.5386000E+00, &
     & 0.6129200E+00, 0.5557200E+00, 0.5456873E+00, 0.5456873E+00 /
      data (ref_adm(16,iz, 3,10),iz = 1,20) / &
     & 0.4228200E+00, 0.4228200E+00, 0.4038900E+00, 0.3971800E+00, &
     & 0.3900600E+00, 0.3880400E+00, 0.3691900E+00, 0.4314700E+00, &
     & 0.4138400E+00, 0.4439600E+00, 0.4414200E+00, 0.4601300E+00, &
     & 0.4667000E+00, 0.4879200E+00, 0.4761400E+00, 0.5690100E+00, &
     & 0.5869800E+00, 0.5741200E+00, 0.5138000E+00, 0.5138000E+00 /
      data (ref_adm(16,iz, 4,10),iz = 1,20) / &
     & 0.4307700E+00, 0.4307700E+00, 0.4034600E+00, 0.4120200E+00, &
     & 0.3924800E+00, 0.3858200E+00, 0.4361100E+00, 0.4181300E+00, &
     & 0.4368600E+00, 0.4208800E+00, 0.4228100E+00, 0.4184100E+00, &
     & 0.4409800E+00, 0.4694300E+00, 0.4820400E+00, 0.5753900E+00, &
     & 0.5719500E+00, 0.5532200E+00, 0.5013400E+00, 0.5013400E+00 /
      data (ref_adm(16,iz, 5,10),iz = 1,20) / &
     & 0.4703000E+00, 0.4703000E+00, 0.4279900E+00, 0.4322800E+00, &
     & 0.4020500E+00, 0.4164500E+00, 0.3890800E+00, 0.4586200E+00, &
     & 0.4199700E+00, 0.4251300E+00, 0.4472900E+00, 0.4220000E+00, &
     & 0.4767500E+00, 0.5095500E+00, 0.4695500E+00, 0.4965200E+00, &
     & 0.5359800E+00, 0.5148700E+00, 0.5234720E+00, 0.5234720E+00 /
      data (ref_adm(16,iz, 6,10),iz = 1,20) / &
     & 0.4553700E+00, 0.4553700E+00, 0.4561700E+00, 0.4483500E+00, &
     & 0.4339400E+00, 0.4001000E+00, 0.3903800E+00, 0.3655000E+00, &
     & 0.4047900E+00, 0.4329400E+00, 0.4472500E+00, 0.4533000E+00, &
     & 0.4270500E+00, 0.4422100E+00, 0.4986500E+00, 0.5068700E+00, &
     & 0.4825800E+00, 0.4421700E+00, 0.5127155E+00, 0.5127155E+00 /
      data (ref_adm(16,iz, 7,10),iz = 1,20) / &
     & 0.4613400E+00, 0.4613400E+00, 0.4502800E+00, 0.4566700E+00, &
     & 0.4218500E+00, 0.4365500E+00, 0.3890500E+00, 0.4286200E+00, &
     & 0.4113800E+00, 0.4704100E+00, 0.4817100E+00, 0.4385900E+00, &
     & 0.4695000E+00, 0.4261200E+00, 0.4264100E+00, 0.4656000E+00, &
     & 0.4969500E+00, 0.4513100E+00, 0.5012365E+00, 0.5012365E+00 /
      data (ref_adm(16,iz, 8,10),iz = 1,20) / &
     & 0.4003300E+00, 0.4003300E+00, 0.4061100E+00, 0.3860000E+00, &
     & 0.3985600E+00, 0.3765100E+00, 0.3735600E+00, 0.3623400E+00, &
     & 0.4114200E+00, 0.4707600E+00, 0.4281500E+00, 0.4310700E+00, &
     & 0.4897700E+00, 0.4766900E+00, 0.5055700E+00, 0.4846700E+00, &
     & 0.5374600E+00, 0.5137500E+00, 0.4976800E+00, 0.4976800E+00 /
      data (ref_adm(16,iz, 9,10),iz = 1,20) / &
     & 0.3918800E+00, 0.3918800E+00, 0.4141700E+00, 0.3999300E+00, &
     & 0.4057900E+00, 0.4038600E+00, 0.4134000E+00, 0.3898400E+00, &
     & 0.3936000E+00, 0.4039300E+00, 0.4141700E+00, 0.4418800E+00, &
     & 0.4426400E+00, 0.4399900E+00, 0.4984900E+00, 0.5144700E+00, &
     & 0.5134100E+00, 0.4472800E+00, 0.4647453E+00, 0.4647453E+00 /
      data (ref_adm(16,iz,10,10),iz = 1,20) / &
     & 0.4044500E+00, 0.4044500E+00, 0.3872300E+00, 0.3561500E+00, &
     & 0.3890500E+00, 0.3654300E+00, 0.3611800E+00, 0.3918200E+00, &
     & 0.3713600E+00, 0.3534900E+00, 0.3630300E+00, 0.4215600E+00, &
     & 0.3777800E+00, 0.4466000E+00, 0.4521600E+00, 0.3782800E+00, &
     & 0.4282700E+00, 0.4542600E+00, 0.4496157E+00, 0.4496157E+00 /
      data (ref_adm(16,iz,11,10),iz = 1,20) / &
     & 0.4309000E+00, 0.4309000E+00, 0.3613400E+00, 0.3698400E+00, &
     & 0.3613300E+00, 0.4132800E+00, 0.3713200E+00, 0.3720900E+00, &
     & 0.4081600E+00, 0.3954900E+00, 0.3421400E+00, 0.4418100E+00, &
     & 0.4547200E+00, 0.5119000E+00, 0.4653500E+00, 0.4691300E+00, &
     & 0.5063300E+00, 0.4244300E+00, 0.4372013E+00, 0.4372013E+00 /
      data (ref_adm(16,iz,12,10),iz = 1,20) / &
     & 0.4193400E+00, 0.4193400E+00, 0.4086200E+00, 0.4074300E+00, &
     & 0.3770300E+00, 0.3968000E+00, 0.3798800E+00, 0.3923100E+00, &
     & 0.3985900E+00, 0.3918000E+00, 0.3973900E+00, 0.4061200E+00, &
     & 0.4105200E+00, 0.4452500E+00, 0.4163500E+00, 0.3884900E+00, &
     & 0.4192300E+00, 0.4684884E+00, 0.4271635E+00, 0.4271635E+00 /
      data (ref_adm(16,iz,13,10),iz = 1,20) / &
     & 0.4262900E+00, 0.4262900E+00, 0.4199800E+00, 0.4263800E+00, &
     & 0.4288500E+00, 0.4222700E+00, 0.4266000E+00, 0.4177800E+00, &
     & 0.4176000E+00, 0.4242700E+00, 0.4317700E+00, 0.3945600E+00, &
     & 0.3663300E+00, 0.3930300E+00, 0.4922000E+00, 0.3839100E+00, &
     & 0.3652200E+00, 0.4383000E+00, 0.4184310E+00, 0.4184310E+00 /
      data (ref_adm(16,iz,14,10),iz = 1,20) / &
     & 0.4142900E+00, 0.4142900E+00, 0.3987600E+00, 0.3674200E+00, &
     & 0.3542300E+00, 0.3687800E+00, 0.3804700E+00, 0.4104000E+00, &
     & 0.4061000E+00, 0.4050800E+00, 0.4093700E+00, 0.4416000E+00, &
     & 0.4246200E+00, 0.4445700E+00, 0.3355800E+00, 0.3910200E+00, &
     & 0.3495900E+00, 0.4988300E+00, 0.4105736E+00, 0.4105736E+00 /
      data (ref_adm(16,iz,15,10),iz = 1,20) / &
     & 0.3904500E+00, 0.3904500E+00, 0.3870400E+00, 0.3835600E+00, &
     & 0.3751600E+00, 0.3694100E+00, 0.3955000E+00, 0.3911800E+00, &
     & 0.3896600E+00, 0.3881100E+00, 0.3803800E+00, 0.3814700E+00, &
     & 0.4047600E+00, 0.4360900E+00, 0.3887000E+00, 0.4071200E+00, &
     & 0.3324500E+00, 0.3559600E+00, 0.4027037E+00, 0.4027037E+00 /
      data (ref_adm(16,iz,16,10),iz = 1,20) / &
     & 0.3954000E+00, 0.3954000E+00, 0.4058500E+00, 0.3634400E+00, &
     & 0.3777200E+00, 0.4105100E+00, 0.4243800E+00, 0.4172500E+00, &
     & 0.4147500E+00, 0.3872300E+00, 0.3609600E+00, 0.3904100E+00, &
     & 0.3577200E+00, 0.3502500E+00, 0.3896100E+00, 0.4826000E+00, &
     & 0.4088800E+00, 0.4382988E+00, 0.3938688E+00, 0.3938688E+00 /
      data (ref_adm(16,iz,17,10),iz = 1,20) / &
     & 0.4042500E+00, 0.4042500E+00, 0.3953400E+00, 0.4027000E+00, &
     & 0.3507900E+00, 0.4327600E+00, 0.4217200E+00, 0.4374800E+00, &
     & 0.4417300E+00, 0.3878000E+00, 0.4209600E+00, 0.4711400E+00, &
     & 0.3770200E+00, 0.4207900E+00, 0.3922200E+00, 0.3542600E+00, &
     & 0.4337277E+00, 0.4306422E+00, 0.3862267E+00, 0.3862267E+00 /
      data (ref_adm(16,iz,18,10),iz = 1,20) / &
     & 0.4022500E+00, 0.4022500E+00, 0.3901300E+00, 0.3568500E+00, &
     & 0.4089500E+00, 0.3991700E+00, 0.3755200E+00, 0.4099600E+00, &
     & 0.4183100E+00, 0.3934000E+00, 0.4312400E+00, 0.4915900E+00, &
     & 0.4150800E+00, 0.3981500E+00, 0.3963700E+00, 0.3760400E+00, &
     & 0.3736300E+00, 0.4191102E+00, 0.3872768E+00, 0.3872768E+00 /
      data (ref_adm(16,iz,19,10),iz = 1,20) / &
     & 0.4018500E+00, 0.4018500E+00, 0.3398400E+00, 0.3157000E+00, &
     & 0.3489800E+00, 0.3769100E+00, 0.4020200E+00, 0.3836900E+00, &
     & 0.3817400E+00, 0.3695600E+00, 0.3792400E+00, 0.4494800E+00, &
     & 0.4355600E+00, 0.3976600E+00, 0.3929600E+00, 0.4424700E+00, &
     & 0.3730800E+00, 0.4156297E+00, 0.3820593E+00, 0.3820593E+00 /
      data (ref_adm(16,iz,20,10),iz = 1,20) / &
     & 0.3404200E+00, 0.3404200E+00, 0.3144500E+00, 0.3310500E+00, &
     & 0.3245200E+00, 0.3170400E+00, 0.2917100E+00, 0.3275700E+00, &
     & 0.3493700E+00, 0.3645700E+00, 0.3556800E+00, 0.4073000E+00, &
     & 0.4619400E+00, 0.3989800E+00, 0.4203200E+00, 0.4126700E+00, &
     & 0.4495400E+00, 0.4133124E+00, 0.3791891E+00, 0.3791891E+00 /
      data (ref_adm(16,iz,21,10),iz = 1,20) / &
     & 0.3454300E+00, 0.3454300E+00, 0.3312000E+00, 0.3569600E+00, &
     & 0.3259800E+00, 0.3636900E+00, 0.3509200E+00, 0.3520200E+00, &
     & 0.3861800E+00, 0.3866900E+00, 0.3452200E+00, 0.3087800E+00, &
     & 0.3846600E+00, 0.3984800E+00, 0.4121800E+00, 0.4089800E+00, &
     & 0.4151084E+00, 0.4114466E+00, 0.3775845E+00, 0.3775845E+00 /
      data (ref_adm(16,iz,22,10),iz = 1,20) / &
     & 0.3534100E+00, 0.3534100E+00, 0.4188500E+00, 0.4087100E+00, &
     & 0.3500100E+00, 0.3583900E+00, 0.3845300E+00, 0.3903000E+00, &
     & 0.3921600E+00, 0.4114400E+00, 0.3838700E+00, 0.3839700E+00, &
     & 0.3510500E+00, 0.4267100E+00, 0.3902400E+00, 0.4678200E+00, &
     & 0.4090865E+00, 0.3935989E+00, 0.3468221E+00, 0.3468221E+00 /
      data (ref_adm(16,iz,23,10),iz = 1,20) / &
     & 0.4239100E+00, 0.4239100E+00, 0.4039100E+00, 0.3967500E+00, &
     & 0.3928600E+00, 0.3292200E+00, 0.3815100E+00, 0.4648100E+00, &
     & 0.3807700E+00, 0.3732900E+00, 0.4170500E+00, 0.4120700E+00, &
     & 0.4370600E+00, 0.4594700E+00, 0.4344000E+00, 0.4705700E+00, &
     & 0.4523900E+00, 0.3917945E+00, 0.3470272E+00, 0.3470272E+00 /
      data (ref_adm(16,iz,24,10),iz = 1,20) / &
     & 0.4014800E+00, 0.4014800E+00, 0.4077800E+00, 0.3896500E+00, &
     & 0.3909700E+00, 0.4133600E+00, 0.4060300E+00, 0.3682800E+00, &
     & 0.3743400E+00, 0.3941900E+00, 0.4326900E+00, 0.4318700E+00, &
     & 0.4685500E+00, 0.4383600E+00, 0.4127600E+00, 0.4467000E+00, &
     & 0.4867200E+00, 0.3910974E+00, 0.3479226E+00, 0.3479226E+00 /
      data (ref_adm(16,iz,25,10),iz = 1,20) / &
     & 0.4031000E+00, 0.4031000E+00, 0.3730400E+00, 0.3785900E+00, &
     & 0.4070600E+00, 0.3848800E+00, 0.3486400E+00, 0.3715800E+00, &
     & 0.3895800E+00, 0.4191900E+00, 0.4471500E+00, 0.4513100E+00, &
     & 0.4697600E+00, 0.4465100E+00, 0.4300200E+00, 0.4147300E+00, &
     & 0.4220500E+00, 0.3850900E+00, 0.3498367E+00, 0.3498367E+00 /
      data (ref_adm(16,iz,26,10),iz = 1,20) / &
     & 0.4025500E+00, 0.4025500E+00, 0.3856300E+00, 0.3929400E+00, &
     & 0.3992900E+00, 0.4037600E+00, 0.3920200E+00, 0.3953700E+00, &
     & 0.4010600E+00, 0.3910100E+00, 0.4117000E+00, 0.4016400E+00, &
     & 0.4223200E+00, 0.4365800E+00, 0.4446600E+00, 0.4102100E+00, &
     & 0.4255300E+00, 0.3915200E+00, 0.3525012E+00, 0.3525012E+00 /
      data (ref_adm(16,iz,27,10),iz = 1,20) / &
     & 0.3939400E+00, 0.3939400E+00, 0.4381400E+00, 0.4198800E+00, &
     & 0.4259000E+00, 0.4314300E+00, 0.4167100E+00, 0.4135800E+00, &
     & 0.4035200E+00, 0.3972700E+00, 0.4180500E+00, 0.4079700E+00, &
     & 0.4563600E+00, 0.4232900E+00, 0.4211800E+00, 0.4017300E+00, &
     & 0.4221900E+00, 0.3894600E+00, 0.3110700E+00, 0.3110700E+00 /
      data (ref_adm(16,iz,28,10),iz = 1,20) / &
     & 0.4331700E+00, 0.4331700E+00, 0.4728400E+00, 0.4452000E+00, &
     & 0.4574800E+00, 0.4465000E+00, 0.4514400E+00, 0.4543400E+00, &
     & 0.4774100E+00, 0.4680100E+00, 0.4836400E+00, 0.4974500E+00, &
     & 0.4838800E+00, 0.4526100E+00, 0.4375100E+00, 0.4321500E+00, &
     & 0.4251300E+00, 0.3923000E+00, 0.3313600E+00, 0.3313600E+00 /
      data (ref_adm(16,iz,29,10),iz = 1,20) / &
     & 0.4220100E+00, 0.4220100E+00, 0.4048700E+00, 0.4159700E+00, &
     & 0.4300800E+00, 0.4327400E+00, 0.4051700E+00, 0.4229800E+00, &
     & 0.4450600E+00, 0.4311700E+00, 0.4279000E+00, 0.4847600E+00, &
     & 0.4804800E+00, 0.5172700E+00, 0.4299900E+00, 0.4400500E+00, &
     & 0.4073000E+00, 0.4136200E+00, 0.3146900E+00, 0.3146900E+00 /
      data (ref_adm(16,iz,30,10),iz = 1,20) / &
     & 0.4289800E+00, 0.4289800E+00, 0.4188100E+00, 0.4330500E+00, &
     & 0.4313400E+00, 0.4373900E+00, 0.4405300E+00, 0.4549200E+00, &
     & 0.4684600E+00, 0.4484000E+00, 0.4366600E+00, 0.4312600E+00, &
     & 0.4409600E+00, 0.4363600E+00, 0.4705500E+00, 0.4605400E+00, &
     & 0.4286100E+00, 0.4002900E+00, 0.3359900E+00, 0.3359900E+00 /
      data (ref_adm(16,iz,31,10),iz = 1,20) / &
     & 0.4007200E+00, 0.4007200E+00, 0.4347900E+00, 0.4675100E+00, &
     & 0.4704600E+00, 0.4503600E+00, 0.3882700E+00, 0.4577900E+00, &
     & 0.4473900E+00, 0.4290400E+00, 0.4431900E+00, 0.3838000E+00, &
     & 0.3713700E+00, 0.3965900E+00, 0.4189200E+00, 0.4548700E+00, &
     & 0.4346500E+00, 0.4054700E+00, 0.3428300E+00, 0.3428300E+00 /
      data (ref_adm(16,iz,32,10),iz = 1,20) / &
     & 0.4204800E+00, 0.4204800E+00, 0.4488300E+00, 0.4584400E+00, &
     & 0.4625700E+00, 0.4701300E+00, 0.4610700E+00, 0.4557500E+00, &
     & 0.4699500E+00, 0.4926300E+00, 0.4995300E+00, 0.4873700E+00, &
     & 0.4816300E+00, 0.4674000E+00, 0.4590800E+00, 0.4666200E+00, &
     & 0.4289700E+00, 0.3935800E+00, 0.3057900E+00, 0.3057900E+00 /
      data (ref_adm(16,iz,33,10),iz = 1,20) / &
     & 0.4404300E+00, 0.4404300E+00, 0.4300200E+00, 0.4387000E+00, &
     & 0.4355500E+00, 0.4946300E+00, 0.5035300E+00, 0.4691200E+00, &
     & 0.4666900E+00, 0.4962700E+00, 0.4855600E+00, 0.4761000E+00, &
     & 0.5406100E+00, 0.4469600E+00, 0.4464700E+00, 0.4670800E+00, &
     & 0.4415400E+00, 0.4238800E+00, 0.2945800E+00, 0.2945800E+00 /
      data (ref_adm(16,iz,34,10),iz = 1,20) / &
     & 0.4348300E+00, 0.4348300E+00, 0.4428600E+00, 0.4222800E+00, &
     & 0.4262200E+00, 0.4732800E+00, 0.4741600E+00, 0.4579900E+00, &
     & 0.4983100E+00, 0.4592000E+00, 0.4553100E+00, 0.4944800E+00, &
     & 0.4259600E+00, 0.4433000E+00, 0.4639400E+00, 0.4345500E+00, &
     & 0.4081800E+00, 0.3817600E+00, 0.3899181E+00, 0.3899181E+00 /
      data (ref_adm(16,iz,35,10),iz = 1,20) / &
     & 0.4208900E+00, 0.4208900E+00, 0.4618300E+00, 0.4394600E+00, &
     & 0.4573400E+00, 0.4884800E+00, 0.4973500E+00, 0.4650700E+00, &
     & 0.4915900E+00, 0.4427500E+00, 0.4726300E+00, 0.5133700E+00, &
     & 0.4600500E+00, 0.4327400E+00, 0.4157200E+00, 0.4655900E+00, &
     & 0.4448451E+00, 0.4406000E+00, 0.3931859E+00, 0.3931859E+00 /
      data (ref_adm(16,iz,36,10),iz = 1,20) / &
     & 0.4011100E+00, 0.4011100E+00, 0.4625600E+00, 0.4387500E+00, &
     & 0.4125100E+00, 0.4435500E+00, 0.3943300E+00, 0.4585800E+00, &
     & 0.4488800E+00, 0.4579200E+00, 0.4884000E+00, 0.4423700E+00, &
     & 0.4799400E+00, 0.4568700E+00, 0.5146400E+00, 0.4732900E+00, &
     & 0.4858800E+00, 0.4274869E+00, 0.3953588E+00, 0.3953588E+00 /
      data (ref_adm(16,iz,37,10),iz = 1,20) / &
     & 0.4122600E+00, 0.4122600E+00, 0.4133900E+00, 0.4082800E+00, &
     & 0.4724600E+00, 0.4662900E+00, 0.4873800E+00, 0.4436400E+00, &
     & 0.4794200E+00, 0.4614700E+00, 0.4825300E+00, 0.4837000E+00, &
     & 0.4773100E+00, 0.4253700E+00, 0.5114900E+00, 0.4720000E+00, &
     & 0.3869600E+00, 0.4288349E+00, 0.3966110E+00, 0.3966110E+00 /
      data (ref_adm(16,iz,38,10),iz = 1,20) / &
     & 0.4122600E+00, 0.4122600E+00, 0.4133900E+00, 0.4082800E+00, &
     & 0.4724600E+00, 0.4662900E+00, 0.4873800E+00, 0.4436400E+00, &
     & 0.4794200E+00, 0.4614700E+00, 0.4825300E+00, 0.4837000E+00, &
     & 0.4773100E+00, 0.4253700E+00, 0.5114900E+00, 0.4720000E+00, &
     & 0.3869600E+00, 0.4288349E+00, 0.3966110E+00, 0.3966110E+00 /
! Solar Zenith Angle 50.0 Albedo  0.4254904E+00
      data (ref_adm(16,iz, 1,11),iz = 1,20) / &
     & 0.3912200E+00, 0.3912200E+00, 0.3791100E+00, 0.3870900E+00, &
     & 0.3924900E+00, 0.3772700E+00, 0.3911800E+00, 0.4196600E+00, &
     & 0.4507500E+00, 0.4482900E+00, 0.4578700E+00, 0.4792800E+00, &
     & 0.4857900E+00, 0.4828700E+00, 0.5384100E+00, 0.5848900E+00, &
     & 0.6547100E+00, 0.5872700E+00, 0.6133987E+00, 0.6133987E+00 /
      data (ref_adm(16,iz, 2,11),iz = 1,20) / &
     & 0.3912200E+00, 0.3912200E+00, 0.3791100E+00, 0.3870900E+00, &
     & 0.3924900E+00, 0.3772700E+00, 0.3911800E+00, 0.4196600E+00, &
     & 0.4507500E+00, 0.4482900E+00, 0.4578700E+00, 0.4792800E+00, &
     & 0.4857900E+00, 0.4828700E+00, 0.5384100E+00, 0.5848900E+00, &
     & 0.6547100E+00, 0.5872700E+00, 0.6133987E+00, 0.6133987E+00 /
      data (ref_adm(16,iz, 3,11),iz = 1,20) / &
     & 0.3918400E+00, 0.3918400E+00, 0.3911900E+00, 0.3873900E+00, &
     & 0.3806700E+00, 0.3761400E+00, 0.4070900E+00, 0.4031100E+00, &
     & 0.4413500E+00, 0.4470500E+00, 0.4324100E+00, 0.4183300E+00, &
     & 0.4693000E+00, 0.5202200E+00, 0.5317700E+00, 0.5490100E+00, &
     & 0.6397800E+00, 0.5942100E+00, 0.4312100E+00, 0.4312100E+00 /
      data (ref_adm(16,iz, 4,11),iz = 1,20) / &
     & 0.3680300E+00, 0.3680300E+00, 0.3531100E+00, 0.3593800E+00, &
     & 0.3679800E+00, 0.3892600E+00, 0.3910500E+00, 0.4118700E+00, &
     & 0.4169800E+00, 0.4145600E+00, 0.4581900E+00, 0.4564700E+00, &
     & 0.4820600E+00, 0.4980400E+00, 0.5560900E+00, 0.5602200E+00, &
     & 0.5973200E+00, 0.6037800E+00, 0.6459400E+00, 0.6459400E+00 /
      data (ref_adm(16,iz, 5,11),iz = 1,20) / &
     & 0.3782100E+00, 0.3782100E+00, 0.3798500E+00, 0.3759500E+00, &
     & 0.3909700E+00, 0.4007400E+00, 0.4084800E+00, 0.4230100E+00, &
     & 0.4190400E+00, 0.3995700E+00, 0.4447900E+00, 0.4876000E+00, &
     & 0.4810200E+00, 0.4835100E+00, 0.5157600E+00, 0.5333600E+00, &
     & 0.5804100E+00, 0.5459300E+00, 0.4920800E+00, 0.4920800E+00 /
      data (ref_adm(16,iz, 6,11),iz = 1,20) / &
     & 0.3971200E+00, 0.3971200E+00, 0.4022600E+00, 0.3844800E+00, &
     & 0.3789700E+00, 0.4012800E+00, 0.4004000E+00, 0.4100600E+00, &
     & 0.3949300E+00, 0.3621700E+00, 0.4466400E+00, 0.4585900E+00, &
     & 0.4765700E+00, 0.5101200E+00, 0.5195900E+00, 0.5158200E+00, &
     & 0.5476200E+00, 0.5403400E+00, 0.5607900E+00, 0.5607900E+00 /
      data (ref_adm(16,iz, 7,11),iz = 1,20) / &
     & 0.4202200E+00, 0.4202200E+00, 0.3907800E+00, 0.3780700E+00, &
     & 0.3787600E+00, 0.3773300E+00, 0.3746300E+00, 0.3978900E+00, &
     & 0.3995900E+00, 0.3979300E+00, 0.4216400E+00, 0.4376400E+00, &
     & 0.4365500E+00, 0.4583000E+00, 0.4689300E+00, 0.4665700E+00, &
     & 0.5032400E+00, 0.5407100E+00, 0.4344800E+00, 0.4344800E+00 /
      data (ref_adm(16,iz, 8,11),iz = 1,20) / &
     & 0.4085400E+00, 0.4085400E+00, 0.4251100E+00, 0.4348000E+00, &
     & 0.4255600E+00, 0.4154600E+00, 0.4147000E+00, 0.4344500E+00, &
     & 0.4377800E+00, 0.4697100E+00, 0.4743900E+00, 0.4768600E+00, &
     & 0.5013800E+00, 0.4903800E+00, 0.5097900E+00, 0.5395300E+00, &
     & 0.5641000E+00, 0.5239600E+00, 0.4668400E+00, 0.4668400E+00 /
      data (ref_adm(16,iz, 9,11),iz = 1,20) / &
     & 0.4321800E+00, 0.4321800E+00, 0.4181800E+00, 0.4053400E+00, &
     & 0.4118300E+00, 0.4052100E+00, 0.3837000E+00, 0.3886100E+00, &
     & 0.3947600E+00, 0.3952300E+00, 0.4380600E+00, 0.4399200E+00, &
     & 0.4383900E+00, 0.4528300E+00, 0.4948900E+00, 0.5199300E+00, &
     & 0.5050600E+00, 0.4965400E+00, 0.4360900E+00, 0.4360900E+00 /
      data (ref_adm(16,iz,10,11),iz = 1,20) / &
     & 0.3964300E+00, 0.3964300E+00, 0.3729100E+00, 0.3831600E+00, &
     & 0.4135200E+00, 0.4226800E+00, 0.4141900E+00, 0.3879300E+00, &
     & 0.3886300E+00, 0.3699000E+00, 0.4077400E+00, 0.4191500E+00, &
     & 0.4498000E+00, 0.4492800E+00, 0.4397900E+00, 0.4689800E+00, &
     & 0.4656400E+00, 0.4686100E+00, 0.3671000E+00, 0.3671000E+00 /
      data (ref_adm(16,iz,11,11),iz = 1,20) / &
     & 0.4103900E+00, 0.4103900E+00, 0.3808700E+00, 0.3980800E+00, &
     & 0.3873700E+00, 0.4079900E+00, 0.4311000E+00, 0.3786000E+00, &
     & 0.4042500E+00, 0.4135500E+00, 0.4313800E+00, 0.4119600E+00, &
     & 0.4177500E+00, 0.4268000E+00, 0.4418700E+00, 0.4351700E+00, &
     & 0.4702000E+00, 0.4385500E+00, 0.3495900E+00, 0.3495900E+00 /
      data (ref_adm(16,iz,12,11),iz = 1,20) / &
     & 0.3986100E+00, 0.3986100E+00, 0.3988200E+00, 0.3959700E+00, &
     & 0.4244500E+00, 0.4203800E+00, 0.3927200E+00, 0.3497500E+00, &
     & 0.3824000E+00, 0.4182300E+00, 0.3975500E+00, 0.4007500E+00, &
     & 0.4348700E+00, 0.4633500E+00, 0.4604600E+00, 0.4514800E+00, &
     & 0.4425400E+00, 0.4159300E+00, 0.4060500E+00, 0.4060500E+00 /
      data (ref_adm(16,iz,13,11),iz = 1,20) / &
     & 0.4224900E+00, 0.4224900E+00, 0.4284800E+00, 0.4239300E+00, &
     & 0.4222100E+00, 0.4185800E+00, 0.4100200E+00, 0.4071100E+00, &
     & 0.4135200E+00, 0.4187900E+00, 0.4091700E+00, 0.4215300E+00, &
     & 0.4007200E+00, 0.4511700E+00, 0.4737100E+00, 0.4399200E+00, &
     & 0.4199100E+00, 0.3928000E+00, 0.3310600E+00, 0.3310600E+00 /
      data (ref_adm(16,iz,14,11),iz = 1,20) / &
     & 0.4034700E+00, 0.4034700E+00, 0.3855400E+00, 0.3815400E+00, &
     & 0.3799500E+00, 0.3842800E+00, 0.3810100E+00, 0.3957600E+00, &
     & 0.3946600E+00, 0.4044600E+00, 0.4185200E+00, 0.4265800E+00, &
     & 0.4437400E+00, 0.4388800E+00, 0.4690100E+00, 0.4350200E+00, &
     & 0.4242600E+00, 0.4033200E+00, 0.4381061E+00, 0.4381061E+00 /
      data (ref_adm(16,iz,15,11),iz = 1,20) / &
     & 0.3889400E+00, 0.3889400E+00, 0.3780100E+00, 0.3615600E+00, &
     & 0.3739000E+00, 0.3718000E+00, 0.3594100E+00, 0.3709800E+00, &
     & 0.3818900E+00, 0.3817100E+00, 0.3959100E+00, 0.3820100E+00, &
     & 0.3918200E+00, 0.4227400E+00, 0.3756100E+00, 0.4106800E+00, &
     & 0.3758900E+00, 0.4370600E+00, 0.3369200E+00, 0.3369200E+00 /
      data (ref_adm(16,iz,16,11),iz = 1,20) / &
     & 0.3971700E+00, 0.3971700E+00, 0.3829300E+00, 0.3890900E+00, &
     & 0.3862400E+00, 0.3774300E+00, 0.4144400E+00, 0.3760200E+00, &
     & 0.3676600E+00, 0.3427800E+00, 0.3586700E+00, 0.3761700E+00, &
     & 0.3851000E+00, 0.3816200E+00, 0.3761700E+00, 0.3930800E+00, &
     & 0.3947600E+00, 0.3988900E+00, 0.4188579E+00, 0.4188579E+00 /
      data (ref_adm(16,iz,17,11),iz = 1,20) / &
     & 0.4031500E+00, 0.4031500E+00, 0.3897700E+00, 0.3915000E+00, &
     & 0.3968400E+00, 0.3959500E+00, 0.3854300E+00, 0.3808300E+00, &
     & 0.4052800E+00, 0.3695100E+00, 0.4094600E+00, 0.3943400E+00, &
     & 0.4224000E+00, 0.4115800E+00, 0.4074600E+00, 0.3817400E+00, &
     & 0.3875800E+00, 0.3787700E+00, 0.4096998E+00, 0.4096998E+00 /
      data (ref_adm(16,iz,18,11),iz = 1,20) / &
     & 0.3977400E+00, 0.3977400E+00, 0.3864900E+00, 0.4044600E+00, &
     & 0.3831300E+00, 0.3745500E+00, 0.3795500E+00, 0.3921700E+00, &
     & 0.4139600E+00, 0.3958600E+00, 0.4015400E+00, 0.3928900E+00, &
     & 0.4104800E+00, 0.4095900E+00, 0.3906800E+00, 0.4123000E+00, &
     & 0.3997000E+00, 0.3861016E+00, 0.3179245E+00, 0.3179245E+00 /
      data (ref_adm(16,iz,19,11),iz = 1,20) / &
     & 0.3761700E+00, 0.3761700E+00, 0.3656900E+00, 0.3832500E+00, &
     & 0.3845700E+00, 0.3891100E+00, 0.3712800E+00, 0.3931600E+00, &
     & 0.3799200E+00, 0.3967100E+00, 0.3978300E+00, 0.4029500E+00, &
     & 0.4204100E+00, 0.3708300E+00, 0.3733300E+00, 0.3864300E+00, &
     & 0.4078300E+00, 0.3832169E+00, 0.3158847E+00, 0.3158847E+00 /
      data (ref_adm(16,iz,20,11),iz = 1,20) / &
     & 0.3765500E+00, 0.3765500E+00, 0.3966500E+00, 0.4188900E+00, &
     & 0.4071800E+00, 0.4032800E+00, 0.3864100E+00, 0.3917100E+00, &
     & 0.3996800E+00, 0.4257900E+00, 0.4190300E+00, 0.3987100E+00, &
     & 0.4045200E+00, 0.3970800E+00, 0.3853900E+00, 0.4379400E+00, &
     & 0.4049155E+00, 0.3799824E+00, 0.3142067E+00, 0.3142067E+00 /
      data (ref_adm(16,iz,21,11),iz = 1,20) / &
     & 0.3835900E+00, 0.3835900E+00, 0.3851200E+00, 0.3866100E+00, &
     & 0.3972700E+00, 0.4175000E+00, 0.4100100E+00, 0.3811900E+00, &
     & 0.4539700E+00, 0.4437000E+00, 0.4219100E+00, 0.4005600E+00, &
     & 0.4313600E+00, 0.4186200E+00, 0.4499000E+00, 0.4764000E+00, &
     & 0.4021436E+00, 0.3770957E+00, 0.3126499E+00, 0.3126499E+00 /
      data (ref_adm(16,iz,22,11),iz = 1,20) / &
     & 0.3990300E+00, 0.3990300E+00, 0.4014400E+00, 0.4281000E+00, &
     & 0.4355300E+00, 0.4173000E+00, 0.4391200E+00, 0.3754500E+00, &
     & 0.4018100E+00, 0.4234400E+00, 0.4101400E+00, 0.3679600E+00, &
     & 0.4083700E+00, 0.4197200E+00, 0.4167100E+00, 0.4412300E+00, &
     & 0.3785499E+00, 0.3530482E+00, 0.3131549E+00, 0.3131549E+00 /
      data (ref_adm(16,iz,23,11),iz = 1,20) / &
     & 0.4044200E+00, 0.4044200E+00, 0.4104100E+00, 0.4234100E+00, &
     & 0.4172200E+00, 0.4009600E+00, 0.4210300E+00, 0.4061600E+00, &
     & 0.4209800E+00, 0.4421800E+00, 0.4303500E+00, 0.4035400E+00, &
     & 0.3932500E+00, 0.4129200E+00, 0.3985100E+00, 0.4330600E+00, &
     & 0.4805000E+00, 0.3525832E+00, 0.3147335E+00, 0.3147335E+00 /
      data (ref_adm(16,iz,24,11),iz = 1,20) / &
     & 0.3871000E+00, 0.3871000E+00, 0.3880000E+00, 0.3901700E+00, &
     & 0.3936200E+00, 0.4031500E+00, 0.4356300E+00, 0.4268700E+00, &
     & 0.3763400E+00, 0.4226800E+00, 0.3930200E+00, 0.4167600E+00, &
     & 0.3989900E+00, 0.4133400E+00, 0.4130100E+00, 0.4404400E+00, &
     & 0.4234800E+00, 0.3535320E+00, 0.3172351E+00, 0.3172351E+00 /
      data (ref_adm(16,iz,25,11),iz = 1,20) / &
     & 0.3984200E+00, 0.3984200E+00, 0.4022000E+00, 0.3940300E+00, &
     & 0.3953800E+00, 0.3988700E+00, 0.4035600E+00, 0.3976100E+00, &
     & 0.4027600E+00, 0.3896000E+00, 0.3596800E+00, 0.3936300E+00, &
     & 0.3616000E+00, 0.4278200E+00, 0.4363700E+00, 0.4186800E+00, &
     & 0.4127000E+00, 0.3534400E+00, 0.3206057E+00, 0.3206057E+00 /
      data (ref_adm(16,iz,26,11),iz = 1,20) / &
     & 0.3935400E+00, 0.3935400E+00, 0.3886900E+00, 0.3877000E+00, &
     & 0.3935900E+00, 0.3938500E+00, 0.3959800E+00, 0.3954400E+00, &
     & 0.4058100E+00, 0.4080600E+00, 0.4081300E+00, 0.4211000E+00, &
     & 0.4213600E+00, 0.4085300E+00, 0.4440000E+00, 0.4357300E+00, &
     & 0.4235000E+00, 0.3944200E+00, 0.3248307E+00, 0.3248307E+00 /
      data (ref_adm(16,iz,27,11),iz = 1,20) / &
     & 0.4100200E+00, 0.4100200E+00, 0.4251100E+00, 0.4143100E+00, &
     & 0.4338400E+00, 0.4366100E+00, 0.4448600E+00, 0.4475200E+00, &
     & 0.4454400E+00, 0.4358700E+00, 0.4398300E+00, 0.4391800E+00, &
     & 0.4393500E+00, 0.4272500E+00, 0.4145000E+00, 0.4294800E+00, &
     & 0.4042600E+00, 0.3924900E+00, 0.3264200E+00, 0.3264200E+00 /
      data (ref_adm(16,iz,28,11),iz = 1,20) / &
     & 0.4064000E+00, 0.4064000E+00, 0.4072000E+00, 0.4209700E+00, &
     & 0.4065300E+00, 0.4487500E+00, 0.4520000E+00, 0.4539900E+00, &
     & 0.4463200E+00, 0.4501600E+00, 0.4660500E+00, 0.4575900E+00, &
     & 0.4650200E+00, 0.4696900E+00, 0.4340100E+00, 0.4245900E+00, &
     & 0.3986700E+00, 0.4123300E+00, 0.3360500E+00, 0.3360500E+00 /
      data (ref_adm(16,iz,29,11),iz = 1,20) / &
     & 0.4027300E+00, 0.4027300E+00, 0.3972900E+00, 0.4008300E+00, &
     & 0.3984800E+00, 0.4293400E+00, 0.4556100E+00, 0.4326400E+00, &
     & 0.4288500E+00, 0.4311700E+00, 0.4638600E+00, 0.4689800E+00, &
     & 0.4612900E+00, 0.4786200E+00, 0.4456300E+00, 0.4326200E+00, &
     & 0.4348200E+00, 0.4097900E+00, 0.3402900E+00, 0.3402900E+00 /
      data (ref_adm(16,iz,30,11),iz = 1,20) / &
     & 0.4257700E+00, 0.4257700E+00, 0.4221900E+00, 0.3954000E+00, &
     & 0.4012000E+00, 0.4140100E+00, 0.4193100E+00, 0.4704300E+00, &
     & 0.4353000E+00, 0.4322800E+00, 0.4357500E+00, 0.4305800E+00, &
     & 0.4505200E+00, 0.4332300E+00, 0.4183400E+00, 0.4417100E+00, &
     & 0.4264000E+00, 0.4138400E+00, 0.3566300E+00, 0.3566300E+00 /
      data (ref_adm(16,iz,31,11),iz = 1,20) / &
     & 0.4330400E+00, 0.4330400E+00, 0.4504300E+00, 0.4632700E+00, &
     & 0.4607500E+00, 0.4694900E+00, 0.4689200E+00, 0.4648200E+00, &
     & 0.4513800E+00, 0.4699800E+00, 0.4672600E+00, 0.4687100E+00, &
     & 0.4717100E+00, 0.4514200E+00, 0.4542100E+00, 0.4579900E+00, &
     & 0.4406000E+00, 0.4389900E+00, 0.3584900E+00, 0.3584900E+00 /
      data (ref_adm(16,iz,32,11),iz = 1,20) / &
     & 0.3690200E+00, 0.3690200E+00, 0.3736100E+00, 0.3905700E+00, &
     & 0.3954000E+00, 0.4048300E+00, 0.3864100E+00, 0.4208500E+00, &
     & 0.3937900E+00, 0.4260600E+00, 0.3968800E+00, 0.4057900E+00, &
     & 0.4407300E+00, 0.4260700E+00, 0.4093400E+00, 0.4115000E+00, &
     & 0.4374400E+00, 0.4154700E+00, 0.3470600E+00, 0.3470600E+00 /
      data (ref_adm(16,iz,33,11),iz = 1,20) / &
     & 0.4013900E+00, 0.4013900E+00, 0.3997800E+00, 0.4086000E+00, &
     & 0.4264300E+00, 0.4318000E+00, 0.4368300E+00, 0.4245000E+00, &
     & 0.3988900E+00, 0.4016700E+00, 0.4448600E+00, 0.4561300E+00, &
     & 0.4699500E+00, 0.4713100E+00, 0.4691400E+00, 0.4615100E+00, &
     & 0.4272300E+00, 0.4106800E+00, 0.3497400E+00, 0.3497400E+00 /
      data (ref_adm(16,iz,34,11),iz = 1,20) / &
     & 0.4072600E+00, 0.4072600E+00, 0.3901300E+00, 0.4147000E+00, &
     & 0.4205100E+00, 0.4273700E+00, 0.4475800E+00, 0.4398000E+00, &
     & 0.4377900E+00, 0.4473200E+00, 0.4420500E+00, 0.4706500E+00, &
     & 0.4738100E+00, 0.4660900E+00, 0.4453900E+00, 0.4580300E+00, &
     & 0.4329600E+00, 0.4290700E+00, 0.3611400E+00, 0.3611400E+00 /
      data (ref_adm(16,iz,35,11),iz = 1,20) / &
     & 0.3874200E+00, 0.3874200E+00, 0.3908800E+00, 0.4185300E+00, &
     & 0.4248700E+00, 0.4363400E+00, 0.4167700E+00, 0.4403100E+00, &
     & 0.4591700E+00, 0.4661900E+00, 0.4357900E+00, 0.4746400E+00, &
     & 0.4814000E+00, 0.4703000E+00, 0.4502900E+00, 0.4664400E+00, &
     & 0.4596400E+00, 0.4275000E+00, 0.2866800E+00, 0.2866800E+00 /
      data (ref_adm(16,iz,36,11),iz = 1,20) / &
     & 0.3989600E+00, 0.3989600E+00, 0.3984400E+00, 0.4279500E+00, &
     & 0.4014100E+00, 0.4019200E+00, 0.4039000E+00, 0.4464100E+00, &
     & 0.4608800E+00, 0.4696500E+00, 0.5200200E+00, 0.4881600E+00, &
     & 0.4972200E+00, 0.4840400E+00, 0.4781000E+00, 0.4718600E+00, &
     & 0.4803200E+00, 0.4412200E+00, 0.3774866E+00, 0.3774866E+00 /
      data (ref_adm(16,iz,37,11),iz = 1,20) / &
     & 0.4112000E+00, 0.4112000E+00, 0.4160200E+00, 0.4043000E+00, &
     & 0.4014100E+00, 0.4365100E+00, 0.4571100E+00, 0.4161400E+00, &
     & 0.4121300E+00, 0.4576800E+00, 0.4916300E+00, 0.4940700E+00, &
     & 0.4872100E+00, 0.4962100E+00, 0.4794400E+00, 0.4657900E+00, &
     & 0.4756700E+00, 0.3635300E+00, 0.3795822E+00, 0.3795822E+00 /
      data (ref_adm(16,iz,38,11),iz = 1,20) / &
     & 0.4112000E+00, 0.4112000E+00, 0.4160200E+00, 0.4043000E+00, &
     & 0.4014100E+00, 0.4365100E+00, 0.4571100E+00, 0.4161400E+00, &
     & 0.4121300E+00, 0.4576800E+00, 0.4916300E+00, 0.4940700E+00, &
     & 0.4872100E+00, 0.4962100E+00, 0.4794400E+00, 0.4657900E+00, &
     & 0.4756700E+00, 0.3635300E+00, 0.3795822E+00, 0.3795822E+00 /
! Solar Zenith Angle 55.0 Albedo  0.4314466E+00
      data (ref_adm(16,iz, 1,12),iz = 1,20) / &
     & 0.4073300E+00, 0.4073300E+00, 0.3945500E+00, 0.3873700E+00, &
     & 0.3923500E+00, 0.3837300E+00, 0.3847700E+00, 0.3968700E+00, &
     & 0.4338200E+00, 0.4427400E+00, 0.4731700E+00, 0.5085600E+00, &
     & 0.5645000E+00, 0.5689800E+00, 0.5646300E+00, 0.6588800E+00, &
     & 0.6823000E+00, 0.7391400E+00, 0.7299400E+00, 0.7299400E+00 /
      data (ref_adm(16,iz, 2,12),iz = 1,20) / &
     & 0.4073300E+00, 0.4073300E+00, 0.3945500E+00, 0.3873700E+00, &
     & 0.3923500E+00, 0.3837300E+00, 0.3847700E+00, 0.3968700E+00, &
     & 0.4338200E+00, 0.4427400E+00, 0.4731700E+00, 0.5085600E+00, &
     & 0.5645000E+00, 0.5689800E+00, 0.5646300E+00, 0.6588800E+00, &
     & 0.6823000E+00, 0.7391400E+00, 0.7299400E+00, 0.7299400E+00 /
      data (ref_adm(16,iz, 3,12),iz = 1,20) / &
     & 0.3912100E+00, 0.3912100E+00, 0.3948000E+00, 0.4174100E+00, &
     & 0.3989200E+00, 0.3938000E+00, 0.3953000E+00, 0.4253100E+00, &
     & 0.4101600E+00, 0.4494000E+00, 0.4445900E+00, 0.4951900E+00, &
     & 0.5278000E+00, 0.5614300E+00, 0.5748600E+00, 0.6348200E+00, &
     & 0.6914500E+00, 0.7301400E+00, 0.7000600E+00, 0.7000600E+00 /
      data (ref_adm(16,iz, 4,12),iz = 1,20) / &
     & 0.3815400E+00, 0.3815400E+00, 0.3812300E+00, 0.3729600E+00, &
     & 0.4007600E+00, 0.3995900E+00, 0.4147500E+00, 0.4015300E+00, &
     & 0.4145100E+00, 0.4200500E+00, 0.4366200E+00, 0.4681600E+00, &
     & 0.4871800E+00, 0.5564400E+00, 0.5493000E+00, 0.6324100E+00, &
     & 0.6860600E+00, 0.7239100E+00, 0.5519646E+00, 0.5519646E+00 /
      data (ref_adm(16,iz, 5,12),iz = 1,20) / &
     & 0.3870100E+00, 0.3870100E+00, 0.3530700E+00, 0.3784100E+00, &
     & 0.3948200E+00, 0.4111000E+00, 0.4152400E+00, 0.4440900E+00, &
     & 0.4128000E+00, 0.4046700E+00, 0.4429300E+00, 0.4583000E+00, &
     & 0.4818600E+00, 0.5292200E+00, 0.5751000E+00, 0.6115200E+00, &
     & 0.6773800E+00, 0.7166400E+00, 0.5570800E+00, 0.5570800E+00 /
      data (ref_adm(16,iz, 6,12),iz = 1,20) / &
     & 0.4128300E+00, 0.4128300E+00, 0.3844100E+00, 0.3925300E+00, &
     & 0.3950200E+00, 0.3984800E+00, 0.4046900E+00, 0.4358900E+00, &
     & 0.4327900E+00, 0.4466800E+00, 0.4621700E+00, 0.4553900E+00, &
     & 0.4969000E+00, 0.5102300E+00, 0.5375200E+00, 0.5910200E+00, &
     & 0.6894200E+00, 0.6488800E+00, 0.5977200E+00, 0.5977200E+00 /
      data (ref_adm(16,iz, 7,12),iz = 1,20) / &
     & 0.3699000E+00, 0.3699000E+00, 0.3686400E+00, 0.3765000E+00, &
     & 0.3650600E+00, 0.3744200E+00, 0.3838600E+00, 0.3887500E+00, &
     & 0.3990300E+00, 0.3990900E+00, 0.4059500E+00, 0.4150700E+00, &
     & 0.4576600E+00, 0.4706400E+00, 0.5047700E+00, 0.5486000E+00, &
     & 0.6092500E+00, 0.6186500E+00, 0.6165800E+00, 0.6165800E+00 /
      data (ref_adm(16,iz, 8,12),iz = 1,20) / &
     & 0.3982500E+00, 0.3982500E+00, 0.4110900E+00, 0.4166800E+00, &
     & 0.4121800E+00, 0.4124600E+00, 0.4172900E+00, 0.4344900E+00, &
     & 0.4488300E+00, 0.4612500E+00, 0.4831300E+00, 0.5112500E+00, &
     & 0.5306300E+00, 0.5283900E+00, 0.5550800E+00, 0.6097900E+00, &
     & 0.6242600E+00, 0.5997300E+00, 0.5409700E+00, 0.5409700E+00 /
      data (ref_adm(16,iz, 9,12),iz = 1,20) / &
     & 0.3869200E+00, 0.3869200E+00, 0.3988400E+00, 0.3672600E+00, &
     & 0.3724900E+00, 0.3522600E+00, 0.3827300E+00, 0.3696200E+00, &
     & 0.4062400E+00, 0.4174300E+00, 0.4204100E+00, 0.4650100E+00, &
     & 0.4519800E+00, 0.4702500E+00, 0.4920300E+00, 0.5189900E+00, &
     & 0.5410600E+00, 0.5538500E+00, 0.4889300E+00, 0.4889300E+00 /
      data (ref_adm(16,iz,10,12),iz = 1,20) / &
     & 0.3892300E+00, 0.3892300E+00, 0.3761300E+00, 0.3710800E+00, &
     & 0.3731600E+00, 0.3940000E+00, 0.3873700E+00, 0.3947300E+00, &
     & 0.3825800E+00, 0.4016000E+00, 0.4018900E+00, 0.4497700E+00, &
     & 0.4594400E+00, 0.4577000E+00, 0.4654400E+00, 0.5031800E+00, &
     & 0.4964500E+00, 0.5209100E+00, 0.4817100E+00, 0.4817100E+00 /
      data (ref_adm(16,iz,11,12),iz = 1,20) / &
     & 0.3970400E+00, 0.3970400E+00, 0.3963500E+00, 0.3630000E+00, &
     & 0.3842100E+00, 0.3623100E+00, 0.3808900E+00, 0.3972200E+00, &
     & 0.3978500E+00, 0.3908200E+00, 0.4129800E+00, 0.4341300E+00, &
     & 0.4438900E+00, 0.4583500E+00, 0.4684800E+00, 0.5017700E+00, &
     & 0.4808100E+00, 0.4706900E+00, 0.4644300E+00, 0.4644300E+00 /
      data (ref_adm(16,iz,12,12),iz = 1,20) / &
     & 0.4077200E+00, 0.4077200E+00, 0.3791600E+00, 0.3866000E+00, &
     & 0.3767100E+00, 0.3606100E+00, 0.3762000E+00, 0.3979300E+00, &
     & 0.4186500E+00, 0.3953200E+00, 0.3951900E+00, 0.4322600E+00, &
     & 0.4295400E+00, 0.4429100E+00, 0.4241400E+00, 0.4622200E+00, &
     & 0.4696400E+00, 0.4484400E+00, 0.4111600E+00, 0.4111600E+00 /
      data (ref_adm(16,iz,13,12),iz = 1,20) / &
     & 0.3939200E+00, 0.3939200E+00, 0.3939100E+00, 0.3856500E+00, &
     & 0.3919700E+00, 0.3950400E+00, 0.3969200E+00, 0.3817900E+00, &
     & 0.3895300E+00, 0.3736700E+00, 0.4074500E+00, 0.4188300E+00, &
     & 0.4356200E+00, 0.4051300E+00, 0.4456100E+00, 0.4057800E+00, &
     & 0.5020200E+00, 0.4523800E+00, 0.3648300E+00, 0.3648300E+00 /
      data (ref_adm(16,iz,14,12),iz = 1,20) / &
     & 0.3883700E+00, 0.3883700E+00, 0.3986300E+00, 0.3892000E+00, &
     & 0.3914300E+00, 0.3954300E+00, 0.3992200E+00, 0.4070600E+00, &
     & 0.4069500E+00, 0.4058600E+00, 0.4216800E+00, 0.4309600E+00, &
     & 0.4385300E+00, 0.4675500E+00, 0.4521700E+00, 0.4248300E+00, &
     & 0.4868200E+00, 0.4299700E+00, 0.3187100E+00, 0.3187100E+00 /
      data (ref_adm(16,iz,15,12),iz = 1,20) / &
     & 0.3826500E+00, 0.3826500E+00, 0.3830400E+00, 0.3662900E+00, &
     & 0.3836600E+00, 0.3860600E+00, 0.3906600E+00, 0.3869600E+00, &
     & 0.4050700E+00, 0.3934400E+00, 0.4026600E+00, 0.4018700E+00, &
     & 0.4123900E+00, 0.4158700E+00, 0.4405600E+00, 0.4278500E+00, &
     & 0.4862700E+00, 0.4308500E+00, 0.4436500E+00, 0.4436500E+00 /
      data (ref_adm(16,iz,16,12),iz = 1,20) / &
     & 0.3839800E+00, 0.3839800E+00, 0.3874300E+00, 0.4017100E+00, &
     & 0.3868700E+00, 0.4023800E+00, 0.3647000E+00, 0.3616500E+00, &
     & 0.3684800E+00, 0.3786200E+00, 0.3989800E+00, 0.3986300E+00, &
     & 0.4156500E+00, 0.4127300E+00, 0.4406200E+00, 0.4332100E+00, &
     & 0.4534400E+00, 0.4096100E+00, 0.4126387E+00, 0.4126387E+00 /
      data (ref_adm(16,iz,17,12),iz = 1,20) / &
     & 0.3931300E+00, 0.3931300E+00, 0.3999700E+00, 0.3763600E+00, &
     & 0.3907500E+00, 0.3849700E+00, 0.3928900E+00, 0.3700300E+00, &
     & 0.3807900E+00, 0.4035900E+00, 0.4130000E+00, 0.4083800E+00, &
     & 0.4081300E+00, 0.4086200E+00, 0.4192800E+00, 0.4403800E+00, &
     & 0.4097700E+00, 0.3839300E+00, 0.4032310E+00, 0.4032310E+00 /
      data (ref_adm(16,iz,18,12),iz = 1,20) / &
     & 0.3902100E+00, 0.3902100E+00, 0.3976800E+00, 0.3885500E+00, &
     & 0.3946500E+00, 0.3774200E+00, 0.3839000E+00, 0.3721100E+00, &
     & 0.3918300E+00, 0.4086000E+00, 0.4210400E+00, 0.3978100E+00, &
     & 0.3863800E+00, 0.4233200E+00, 0.4279800E+00, 0.4435500E+00, &
     & 0.4240900E+00, 0.4159681E+00, 0.3490845E+00, 0.3490845E+00 /
      data (ref_adm(16,iz,19,12),iz = 1,20) / &
     & 0.3888500E+00, 0.3888500E+00, 0.3835200E+00, 0.4007600E+00, &
     & 0.3791000E+00, 0.3877800E+00, 0.3917400E+00, 0.3894700E+00, &
     & 0.3828400E+00, 0.4234000E+00, 0.4128100E+00, 0.3962100E+00, &
     & 0.4147700E+00, 0.4069300E+00, 0.4461900E+00, 0.4768100E+00, &
     & 0.4319100E+00, 0.4109319E+00, 0.3450656E+00, 0.3450656E+00 /
      data (ref_adm(16,iz,20,12),iz = 1,20) / &
     & 0.3707900E+00, 0.3707900E+00, 0.3989500E+00, 0.3873000E+00, &
     & 0.3768600E+00, 0.3899300E+00, 0.3648100E+00, 0.3861000E+00, &
     & 0.3726000E+00, 0.3909800E+00, 0.3956800E+00, 0.4015600E+00, &
     & 0.4180100E+00, 0.4259400E+00, 0.4322100E+00, 0.4633600E+00, &
     & 0.4273472E+00, 0.4061269E+00, 0.3421793E+00, 0.3421793E+00 /
      data (ref_adm(16,iz,21,12),iz = 1,20) / &
     & 0.3886500E+00, 0.3886500E+00, 0.3974800E+00, 0.4047000E+00, &
     & 0.3926200E+00, 0.3836200E+00, 0.3964300E+00, 0.4116800E+00, &
     & 0.4084700E+00, 0.4161300E+00, 0.4035700E+00, 0.4031700E+00, &
     & 0.4023600E+00, 0.4146400E+00, 0.4223300E+00, 0.4687400E+00, &
     & 0.4227480E+00, 0.4012635E+00, 0.3397475E+00, 0.3397475E+00 /
      data (ref_adm(16,iz,22,12),iz = 1,20) / &
     & 0.3787200E+00, 0.3787200E+00, 0.3907900E+00, 0.3921400E+00, &
     & 0.3932700E+00, 0.3856900E+00, 0.3957800E+00, 0.4212500E+00, &
     & 0.4207700E+00, 0.4137800E+00, 0.4094100E+00, 0.4355200E+00, &
     & 0.4311600E+00, 0.4219600E+00, 0.4111100E+00, 0.4278600E+00, &
     & 0.4708164E+00, 0.4514507E+00, 0.3961377E+00, 0.3961377E+00 /
      data (ref_adm(16,iz,23,12),iz = 1,20) / &
     & 0.3781000E+00, 0.3781000E+00, 0.3766400E+00, 0.3893000E+00, &
     & 0.3965300E+00, 0.4023300E+00, 0.4059500E+00, 0.3787500E+00, &
     & 0.3875100E+00, 0.4042000E+00, 0.4142400E+00, 0.4285300E+00, &
     & 0.4204600E+00, 0.4296600E+00, 0.4163600E+00, 0.4298100E+00, &
     & 0.4624392E+00, 0.4421206E+00, 0.3929065E+00, 0.3929065E+00 /
      data (ref_adm(16,iz,24,12),iz = 1,20) / &
     & 0.3758800E+00, 0.3758800E+00, 0.3658000E+00, 0.3648600E+00, &
     & 0.3979300E+00, 0.4049600E+00, 0.3960000E+00, 0.3948500E+00, &
     & 0.3918100E+00, 0.4041900E+00, 0.4028700E+00, 0.4324900E+00, &
     & 0.4378000E+00, 0.4316500E+00, 0.4388700E+00, 0.4208800E+00, &
     & 0.4428400E+00, 0.4349655E+00, 0.3905999E+00, 0.3905999E+00 /
      data (ref_adm(16,iz,25,12),iz = 1,20) / &
     & 0.3806600E+00, 0.3806600E+00, 0.3842400E+00, 0.3848100E+00, &
     & 0.3896300E+00, 0.3860900E+00, 0.3979500E+00, 0.4112800E+00, &
     & 0.4061000E+00, 0.4045000E+00, 0.4092900E+00, 0.4311100E+00, &
     & 0.4165700E+00, 0.4081400E+00, 0.4283900E+00, 0.4353800E+00, &
     & 0.4349800E+00, 0.4492300E+00, 0.3898345E+00, 0.3898345E+00 /
      data (ref_adm(16,iz,26,12),iz = 1,20) / &
     & 0.3878800E+00, 0.3878800E+00, 0.3959000E+00, 0.3972700E+00, &
     & 0.3970100E+00, 0.3963700E+00, 0.3939100E+00, 0.3930800E+00, &
     & 0.3999700E+00, 0.3984300E+00, 0.3958900E+00, 0.4117500E+00, &
     & 0.4118100E+00, 0.4149800E+00, 0.4310000E+00, 0.4341400E+00, &
     & 0.4223500E+00, 0.4018100E+00, 0.3899777E+00, 0.3899777E+00 /
      data (ref_adm(16,iz,27,12),iz = 1,20) / &
     & 0.3976700E+00, 0.3976700E+00, 0.3888500E+00, 0.4020500E+00, &
     & 0.4170500E+00, 0.4020700E+00, 0.4155500E+00, 0.4135900E+00, &
     & 0.4329700E+00, 0.4335200E+00, 0.4374500E+00, 0.4510100E+00, &
     & 0.4532500E+00, 0.4520500E+00, 0.4398200E+00, 0.4624700E+00, &
     & 0.4479000E+00, 0.4177200E+00, 0.3594700E+00, 0.3594700E+00 /
      data (ref_adm(16,iz,28,12),iz = 1,20) / &
     & 0.3885900E+00, 0.3885900E+00, 0.3803900E+00, 0.3866600E+00, &
     & 0.4145500E+00, 0.4267900E+00, 0.4047500E+00, 0.4255600E+00, &
     & 0.4275400E+00, 0.4191600E+00, 0.4279700E+00, 0.4344500E+00, &
     & 0.4775500E+00, 0.4747500E+00, 0.4663200E+00, 0.4283700E+00, &
     & 0.4326300E+00, 0.4209800E+00, 0.3609700E+00, 0.3609700E+00 /
      data (ref_adm(16,iz,29,12),iz = 1,20) / &
     & 0.3791300E+00, 0.3791300E+00, 0.3885100E+00, 0.3929800E+00, &
     & 0.4071600E+00, 0.4031200E+00, 0.4371400E+00, 0.4325400E+00, &
     & 0.4134600E+00, 0.4283000E+00, 0.4425600E+00, 0.4536900E+00, &
     & 0.4551800E+00, 0.4338000E+00, 0.4484600E+00, 0.4379700E+00, &
     & 0.4388600E+00, 0.4234300E+00, 0.3695800E+00, 0.3695800E+00 /
      data (ref_adm(16,iz,30,12),iz = 1,20) / &
     & 0.3752600E+00, 0.3752600E+00, 0.3958700E+00, 0.3918800E+00, &
     & 0.4083500E+00, 0.4108200E+00, 0.4178300E+00, 0.4252800E+00, &
     & 0.4349500E+00, 0.4375100E+00, 0.4572200E+00, 0.4341800E+00, &
     & 0.4535600E+00, 0.4658300E+00, 0.4457300E+00, 0.4517700E+00, &
     & 0.4364100E+00, 0.4407200E+00, 0.3697600E+00, 0.3697600E+00 /
      data (ref_adm(16,iz,31,12),iz = 1,20) / &
     & 0.3972600E+00, 0.3972600E+00, 0.3948000E+00, 0.4110200E+00, &
     & 0.4200600E+00, 0.4248700E+00, 0.4343100E+00, 0.4434900E+00, &
     & 0.4647200E+00, 0.4642000E+00, 0.4601600E+00, 0.4602500E+00, &
     & 0.4744200E+00, 0.4807300E+00, 0.4763300E+00, 0.4739200E+00, &
     & 0.4657700E+00, 0.4518600E+00, 0.3796100E+00, 0.3796100E+00 /
      data (ref_adm(16,iz,32,12),iz = 1,20) / &
     & 0.3800300E+00, 0.3800300E+00, 0.3904700E+00, 0.4050100E+00, &
     & 0.4032700E+00, 0.4018700E+00, 0.4022300E+00, 0.4027900E+00, &
     & 0.4127100E+00, 0.4097300E+00, 0.4276200E+00, 0.4348600E+00, &
     & 0.4617700E+00, 0.4625400E+00, 0.4504900E+00, 0.4517600E+00, &
     & 0.4474500E+00, 0.4252700E+00, 0.3469800E+00, 0.3469800E+00 /
      data (ref_adm(16,iz,33,12),iz = 1,20) / &
     & 0.3927900E+00, 0.3927900E+00, 0.3785600E+00, 0.3777000E+00, &
     & 0.3862200E+00, 0.3926200E+00, 0.4185100E+00, 0.4142700E+00, &
     & 0.4098700E+00, 0.4233400E+00, 0.4370400E+00, 0.4508000E+00, &
     & 0.4739300E+00, 0.4800600E+00, 0.4877700E+00, 0.5032900E+00, &
     & 0.4641100E+00, 0.4318000E+00, 0.3510000E+00, 0.3510000E+00 /
      data (ref_adm(16,iz,34,12),iz = 1,20) / &
     & 0.3999300E+00, 0.3999300E+00, 0.3778600E+00, 0.3619200E+00, &
     & 0.3904600E+00, 0.3951800E+00, 0.4275000E+00, 0.4233500E+00, &
     & 0.4367200E+00, 0.4480900E+00, 0.4388800E+00, 0.4506400E+00, &
     & 0.4964700E+00, 0.4734200E+00, 0.4963000E+00, 0.4820500E+00, &
     & 0.4819000E+00, 0.4733000E+00, 0.3832200E+00, 0.3832200E+00 /
      data (ref_adm(16,iz,35,12),iz = 1,20) / &
     & 0.3869500E+00, 0.3869500E+00, 0.3848400E+00, 0.3964500E+00, &
     & 0.4096500E+00, 0.4134000E+00, 0.3992900E+00, 0.4305800E+00, &
     & 0.4421400E+00, 0.4503900E+00, 0.4560300E+00, 0.4614600E+00, &
     & 0.4870400E+00, 0.4923600E+00, 0.5043100E+00, 0.4903300E+00, &
     & 0.4777200E+00, 0.4537900E+00, 0.3603300E+00, 0.3603300E+00 /
      data (ref_adm(16,iz,36,12),iz = 1,20) / &
     & 0.3926300E+00, 0.3926300E+00, 0.3900300E+00, 0.3975300E+00, &
     & 0.4264200E+00, 0.4087700E+00, 0.4370700E+00, 0.4319600E+00, &
     & 0.4447100E+00, 0.4509200E+00, 0.4659200E+00, 0.4714300E+00, &
     & 0.4875400E+00, 0.4786900E+00, 0.5117600E+00, 0.4982000E+00, &
     & 0.5099100E+00, 0.4778200E+00, 0.4378556E+00, 0.4378556E+00 /
      data (ref_adm(16,iz,37,12),iz = 1,20) / &
     & 0.4044200E+00, 0.4044200E+00, 0.3986900E+00, 0.3920500E+00, &
     & 0.4221300E+00, 0.4423500E+00, 0.4436500E+00, 0.4369100E+00, &
     & 0.4483500E+00, 0.4251500E+00, 0.4677200E+00, 0.4867600E+00, &
     & 0.5114600E+00, 0.5005200E+00, 0.5157200E+00, 0.5119200E+00, &
     & 0.5030600E+00, 0.5611300E+00, 0.4395861E+00, 0.4395861E+00 /
      data (ref_adm(16,iz,38,12),iz = 1,20) / &
     & 0.4044200E+00, 0.4044200E+00, 0.3986900E+00, 0.3920500E+00, &
     & 0.4221300E+00, 0.4423500E+00, 0.4436500E+00, 0.4369100E+00, &
     & 0.4483500E+00, 0.4251500E+00, 0.4677200E+00, 0.4867600E+00, &
     & 0.5114600E+00, 0.5005200E+00, 0.5157200E+00, 0.5119200E+00, &
     & 0.5030600E+00, 0.5611300E+00, 0.4395861E+00, 0.4395861E+00 /
! Solar Zenith Angle 60.0 Albedo  0.4498081E+00
      data (ref_adm(16,iz, 1,13),iz = 1,20) / &
     & 0.3770700E+00, 0.3770700E+00, 0.3889500E+00, 0.3826200E+00, &
     & 0.3799000E+00, 0.3722000E+00, 0.4025700E+00, 0.4170200E+00, &
     & 0.4456600E+00, 0.4602600E+00, 0.5036800E+00, 0.5114400E+00, &
     & 0.5773700E+00, 0.6302200E+00, 0.6889400E+00, 0.7267300E+00, &
     & 0.8195100E+00, 0.8843200E+00, 0.7546500E+00, 0.7546500E+00 /
      data (ref_adm(16,iz, 2,13),iz = 1,20) / &
     & 0.3770700E+00, 0.3770700E+00, 0.3889500E+00, 0.3826200E+00, &
     & 0.3799000E+00, 0.3722000E+00, 0.4025700E+00, 0.4170200E+00, &
     & 0.4456600E+00, 0.4602600E+00, 0.5036800E+00, 0.5114400E+00, &
     & 0.5773700E+00, 0.6302200E+00, 0.6889400E+00, 0.7267300E+00, &
     & 0.8195100E+00, 0.8843200E+00, 0.7546500E+00, 0.7546500E+00 /
      data (ref_adm(16,iz, 3,13),iz = 1,20) / &
     & 0.4065400E+00, 0.4065400E+00, 0.3764600E+00, 0.3799300E+00, &
     & 0.3949700E+00, 0.3936000E+00, 0.3891500E+00, 0.4072900E+00, &
     & 0.4349700E+00, 0.4764700E+00, 0.4890600E+00, 0.5221100E+00, &
     & 0.5504400E+00, 0.5840100E+00, 0.6648700E+00, 0.7246000E+00, &
     & 0.7658700E+00, 0.8766700E+00, 0.7899600E+00, 0.7899600E+00 /
      data (ref_adm(16,iz, 4,13),iz = 1,20) / &
     & 0.3953800E+00, 0.3953800E+00, 0.4014300E+00, 0.3962000E+00, &
     & 0.3915900E+00, 0.3995300E+00, 0.3926800E+00, 0.4079100E+00, &
     & 0.4356000E+00, 0.4428700E+00, 0.4680600E+00, 0.5027200E+00, &
     & 0.5486300E+00, 0.5937200E+00, 0.6237800E+00, 0.7011000E+00, &
     & 0.7632600E+00, 0.8411400E+00, 0.7117900E+00, 0.7117900E+00 /
      data (ref_adm(16,iz, 5,13),iz = 1,20) / &
     & 0.3899500E+00, 0.3899500E+00, 0.3993200E+00, 0.4006300E+00, &
     & 0.4092500E+00, 0.3968700E+00, 0.4229500E+00, 0.4288500E+00, &
     & 0.4404900E+00, 0.4523900E+00, 0.4783400E+00, 0.4959800E+00, &
     & 0.5403000E+00, 0.5710700E+00, 0.6182400E+00, 0.6829300E+00, &
     & 0.7818600E+00, 0.8431500E+00, 0.7649200E+00, 0.7649200E+00 /
      data (ref_adm(16,iz, 6,13),iz = 1,20) / &
     & 0.3825700E+00, 0.3825700E+00, 0.3869100E+00, 0.3882900E+00, &
     & 0.3992500E+00, 0.3999600E+00, 0.4019500E+00, 0.4245700E+00, &
     & 0.4320600E+00, 0.4393800E+00, 0.4601700E+00, 0.5018600E+00, &
     & 0.5315400E+00, 0.5670500E+00, 0.6009700E+00, 0.6586200E+00, &
     & 0.7885800E+00, 0.8258300E+00, 0.7229600E+00, 0.7229600E+00 /
      data (ref_adm(16,iz, 7,13),iz = 1,20) / &
     & 0.4037100E+00, 0.4037100E+00, 0.3957100E+00, 0.4091400E+00, &
     & 0.4158700E+00, 0.4186900E+00, 0.4134000E+00, 0.4308000E+00, &
     & 0.4303200E+00, 0.4431400E+00, 0.4637700E+00, 0.4932200E+00, &
     & 0.5075100E+00, 0.5619300E+00, 0.6010200E+00, 0.6536800E+00, &
     & 0.7416600E+00, 0.7751500E+00, 0.7121800E+00, 0.7121800E+00 /
      data (ref_adm(16,iz, 8,13),iz = 1,20) / &
     & 0.3998400E+00, 0.3998400E+00, 0.3937400E+00, 0.4008500E+00, &
     & 0.4052600E+00, 0.4065300E+00, 0.4039800E+00, 0.4218600E+00, &
     & 0.4234600E+00, 0.4374900E+00, 0.4511700E+00, 0.4746900E+00, &
     & 0.4881700E+00, 0.5474100E+00, 0.5707500E+00, 0.6218700E+00, &
     & 0.6850000E+00, 0.6990800E+00, 0.5291500E+00, 0.5291500E+00 /
      data (ref_adm(16,iz, 9,13),iz = 1,20) / &
     & 0.4096400E+00, 0.4096400E+00, 0.3952000E+00, 0.3965700E+00, &
     & 0.3892700E+00, 0.3768000E+00, 0.4066100E+00, 0.4027200E+00, &
     & 0.4077100E+00, 0.4259500E+00, 0.4249700E+00, 0.4724000E+00, &
     & 0.4767800E+00, 0.5183500E+00, 0.5574800E+00, 0.6080800E+00, &
     & 0.6422800E+00, 0.6199400E+00, 0.5599400E+00, 0.5599400E+00 /
      data (ref_adm(16,iz,10,13),iz = 1,20) / &
     & 0.3942100E+00, 0.3942100E+00, 0.3995100E+00, 0.4056700E+00, &
     & 0.3817900E+00, 0.4008300E+00, 0.3996500E+00, 0.3925300E+00, &
     & 0.4151700E+00, 0.4272500E+00, 0.4324100E+00, 0.4564700E+00, &
     & 0.4789600E+00, 0.5022900E+00, 0.5023400E+00, 0.5823800E+00, &
     & 0.5996200E+00, 0.5917600E+00, 0.5379500E+00, 0.5379500E+00 /
      data (ref_adm(16,iz,11,13),iz = 1,20) / &
     & 0.3975400E+00, 0.3975400E+00, 0.3940200E+00, 0.3845500E+00, &
     & 0.3907900E+00, 0.3841400E+00, 0.3802400E+00, 0.4022600E+00, &
     & 0.4145400E+00, 0.4213100E+00, 0.4228100E+00, 0.4218900E+00, &
     & 0.4448300E+00, 0.4757600E+00, 0.4892400E+00, 0.5318300E+00, &
     & 0.5408500E+00, 0.5485000E+00, 0.5477800E+00, 0.5477800E+00 /
      data (ref_adm(16,iz,12,13),iz = 1,20) / &
     & 0.4016600E+00, 0.4016600E+00, 0.3924800E+00, 0.3972000E+00, &
     & 0.4025600E+00, 0.3950400E+00, 0.3923500E+00, 0.4043200E+00, &
     & 0.4093200E+00, 0.4170100E+00, 0.4208600E+00, 0.4399100E+00, &
     & 0.4637600E+00, 0.4663400E+00, 0.4731000E+00, 0.5059500E+00, &
     & 0.5375000E+00, 0.5273200E+00, 0.5062700E+00, 0.5062700E+00 /
      data (ref_adm(16,iz,13,13),iz = 1,20) / &
     & 0.4032100E+00, 0.4032100E+00, 0.3950400E+00, 0.3793200E+00, &
     & 0.3760900E+00, 0.4009500E+00, 0.4065800E+00, 0.4281100E+00, &
     & 0.4169900E+00, 0.4061500E+00, 0.4397500E+00, 0.4309300E+00, &
     & 0.4416500E+00, 0.4613800E+00, 0.4613800E+00, 0.4860900E+00, &
     & 0.5273700E+00, 0.4926600E+00, 0.4788000E+00, 0.4788000E+00 /
      data (ref_adm(16,iz,14,13),iz = 1,20) / &
     & 0.3848600E+00, 0.3848600E+00, 0.3880900E+00, 0.3864400E+00, &
     & 0.3858600E+00, 0.3893600E+00, 0.3958300E+00, 0.3974700E+00, &
     & 0.3980100E+00, 0.3989800E+00, 0.4206200E+00, 0.4396800E+00, &
     & 0.4512700E+00, 0.4514400E+00, 0.4486700E+00, 0.4739200E+00, &
     & 0.4859500E+00, 0.4675900E+00, 0.4086000E+00, 0.4086000E+00 /
      data (ref_adm(16,iz,15,13),iz = 1,20) / &
     & 0.4034600E+00, 0.4034600E+00, 0.3999200E+00, 0.3954100E+00, &
     & 0.4127400E+00, 0.4132100E+00, 0.4155800E+00, 0.4268700E+00, &
     & 0.4272400E+00, 0.4256500E+00, 0.4272500E+00, 0.4288300E+00, &
     & 0.4289900E+00, 0.4346700E+00, 0.4502000E+00, 0.4692400E+00, &
     & 0.4690600E+00, 0.4623200E+00, 0.4642751E+00, 0.4642751E+00 /
      data (ref_adm(16,iz,16,13),iz = 1,20) / &
     & 0.3846100E+00, 0.3846100E+00, 0.3818800E+00, 0.3916700E+00, &
     & 0.3977300E+00, 0.3991500E+00, 0.3888900E+00, 0.3804100E+00, &
     & 0.3668100E+00, 0.3701700E+00, 0.3860700E+00, 0.3904200E+00, &
     & 0.3991600E+00, 0.4259800E+00, 0.4591800E+00, 0.4729900E+00, &
     & 0.4665000E+00, 0.4376000E+00, 0.4514357E+00, 0.4514357E+00 /
      data (ref_adm(16,iz,17,13),iz = 1,20) / &
     & 0.3998200E+00, 0.3998200E+00, 0.3920900E+00, 0.3822900E+00, &
     & 0.3931800E+00, 0.4091200E+00, 0.4157400E+00, 0.3956500E+00, &
     & 0.3967800E+00, 0.3936600E+00, 0.4321000E+00, 0.4368200E+00, &
     & 0.4242200E+00, 0.4256400E+00, 0.4458500E+00, 0.4548100E+00, &
     & 0.4497200E+00, 0.5137665E+00, 0.4397711E+00, 0.4397711E+00 /
      data (ref_adm(16,iz,18,13),iz = 1,20) / &
     & 0.3837000E+00, 0.3837000E+00, 0.3985300E+00, 0.3789100E+00, &
     & 0.3954200E+00, 0.4042300E+00, 0.4070300E+00, 0.4006200E+00, &
     & 0.4113700E+00, 0.4170100E+00, 0.4213500E+00, 0.4255500E+00, &
     & 0.4274700E+00, 0.4285200E+00, 0.4450700E+00, 0.4374800E+00, &
     & 0.4714800E+00, 0.4409891E+00, 0.3806321E+00, 0.3806321E+00 /
      data (ref_adm(16,iz,19,13),iz = 1,20) / &
     & 0.3947900E+00, 0.3947900E+00, 0.3981400E+00, 0.3943500E+00, &
     & 0.4093500E+00, 0.4074700E+00, 0.3958300E+00, 0.4117600E+00, &
     & 0.4274900E+00, 0.4101200E+00, 0.4244800E+00, 0.4266200E+00, &
     & 0.4270400E+00, 0.4404500E+00, 0.4297400E+00, 0.4524300E+00, &
     & 0.5474900E+00, 0.4349453E+00, 0.3751151E+00, 0.3751151E+00 /
      data (ref_adm(16,iz,20,13),iz = 1,20) / &
     & 0.3872200E+00, 0.3872200E+00, 0.3982700E+00, 0.4129100E+00, &
     & 0.3981400E+00, 0.4067900E+00, 0.4202400E+00, 0.4182000E+00, &
     & 0.4229500E+00, 0.4267400E+00, 0.4069800E+00, 0.4206900E+00, &
     & 0.4391900E+00, 0.4182400E+00, 0.4241400E+00, 0.4313200E+00, &
     & 0.4429401E+00, 0.4294061E+00, 0.3716274E+00, 0.3716274E+00 /
      data (ref_adm(16,iz,21,13),iz = 1,20) / &
     & 0.4021900E+00, 0.4021900E+00, 0.4111500E+00, 0.3898100E+00, &
     & 0.3879300E+00, 0.4078400E+00, 0.4151100E+00, 0.4087000E+00, &
     & 0.4121500E+00, 0.4198800E+00, 0.4221600E+00, 0.4119200E+00, &
     & 0.4421200E+00, 0.4366500E+00, 0.4324400E+00, 0.4262300E+00, &
     & 0.4386311E+00, 0.4240420E+00, 0.3689323E+00, 0.3689323E+00 /
      data (ref_adm(16,iz,22,13),iz = 1,20) / &
     & 0.3968100E+00, 0.3968100E+00, 0.4132000E+00, 0.4102700E+00, &
     & 0.4035500E+00, 0.4015600E+00, 0.3963100E+00, 0.4038300E+00, &
     & 0.4106800E+00, 0.4179100E+00, 0.4161000E+00, 0.4162300E+00, &
     & 0.4267300E+00, 0.4324600E+00, 0.4391800E+00, 0.4470200E+00, &
     & 0.4902346E+00, 0.4716359E+00, 0.4148998E+00, 0.4148998E+00 /
      data (ref_adm(16,iz,23,13),iz = 1,20) / &
     & 0.3948900E+00, 0.3948900E+00, 0.4010800E+00, 0.4005700E+00, &
     & 0.3821700E+00, 0.3916000E+00, 0.3979900E+00, 0.4025900E+00, &
     & 0.4082300E+00, 0.4362600E+00, 0.4213200E+00, 0.4269100E+00, &
     & 0.4451700E+00, 0.4469300E+00, 0.4202100E+00, 0.4299200E+00, &
     & 0.4614800E+00, 0.4618586E+00, 0.4118042E+00, 0.4118042E+00 /
      data (ref_adm(16,iz,24,13),iz = 1,20) / &
     & 0.3847500E+00, 0.3847500E+00, 0.3699100E+00, 0.3682300E+00, &
     & 0.3737500E+00, 0.3711600E+00, 0.3801000E+00, 0.3974200E+00, &
     & 0.4084100E+00, 0.4293000E+00, 0.4261000E+00, 0.4324700E+00, &
     & 0.4246800E+00, 0.4314200E+00, 0.4483300E+00, 0.4234200E+00, &
     & 0.4129600E+00, 0.4544263E+00, 0.4099619E+00, 0.4099619E+00 /
      data (ref_adm(16,iz,25,13),iz = 1,20) / &
     & 0.4067800E+00, 0.4067800E+00, 0.4118700E+00, 0.4127600E+00, &
     & 0.4131600E+00, 0.4110100E+00, 0.4148200E+00, 0.4198000E+00, &
     & 0.4259200E+00, 0.4255400E+00, 0.4376800E+00, 0.4404800E+00, &
     & 0.4278400E+00, 0.4410300E+00, 0.4524100E+00, 0.4512100E+00, &
     & 0.4507700E+00, 0.4287100E+00, 0.4096349E+00, 0.4096349E+00 /
      data (ref_adm(16,iz,26,13),iz = 1,20) / &
     & 0.3943400E+00, 0.3943400E+00, 0.3928700E+00, 0.3927600E+00, &
     & 0.3926300E+00, 0.3980400E+00, 0.3960200E+00, 0.4005700E+00, &
     & 0.4088000E+00, 0.4098900E+00, 0.4195300E+00, 0.4283200E+00, &
     & 0.4339300E+00, 0.4393900E+00, 0.4446600E+00, 0.4597300E+00, &
     & 0.4588600E+00, 0.4537600E+00, 0.4106498E+00, 0.4106498E+00 /
      data (ref_adm(16,iz,27,13),iz = 1,20) / &
     & 0.4028200E+00, 0.4028200E+00, 0.3916700E+00, 0.3995200E+00, &
     & 0.4053500E+00, 0.4131800E+00, 0.4067500E+00, 0.4200600E+00, &
     & 0.4132400E+00, 0.4313100E+00, 0.4456400E+00, 0.4658600E+00, &
     & 0.4673000E+00, 0.4604700E+00, 0.4609500E+00, 0.4643600E+00, &
     & 0.4530900E+00, 0.4443900E+00, 0.3681300E+00, 0.3681300E+00 /
      data (ref_adm(16,iz,28,13),iz = 1,20) / &
     & 0.3907600E+00, 0.3907600E+00, 0.4017400E+00, 0.3776900E+00, &
     & 0.3948600E+00, 0.4014100E+00, 0.4131400E+00, 0.4195700E+00, &
     & 0.4300500E+00, 0.4263100E+00, 0.4553600E+00, 0.4629900E+00, &
     & 0.4732100E+00, 0.4801800E+00, 0.4621100E+00, 0.4769100E+00, &
     & 0.4720500E+00, 0.4586100E+00, 0.3895800E+00, 0.3895800E+00 /
      data (ref_adm(16,iz,29,13),iz = 1,20) / &
     & 0.3970700E+00, 0.3970700E+00, 0.3993500E+00, 0.4119100E+00, &
     & 0.4009300E+00, 0.4170400E+00, 0.4209200E+00, 0.4351000E+00, &
     & 0.4283900E+00, 0.4262200E+00, 0.4464800E+00, 0.4646400E+00, &
     & 0.4733100E+00, 0.4815400E+00, 0.4803400E+00, 0.4772200E+00, &
     & 0.4785400E+00, 0.4595600E+00, 0.3901000E+00, 0.3901000E+00 /
      data (ref_adm(16,iz,30,13),iz = 1,20) / &
     & 0.4076400E+00, 0.4076400E+00, 0.4003100E+00, 0.3865900E+00, &
     & 0.4149500E+00, 0.4276500E+00, 0.4202800E+00, 0.4402700E+00, &
     & 0.4420400E+00, 0.4363000E+00, 0.4444400E+00, 0.4660300E+00, &
     & 0.4723700E+00, 0.4777500E+00, 0.4980700E+00, 0.5011800E+00, &
     & 0.4946400E+00, 0.4714600E+00, 0.3985100E+00, 0.3985100E+00 /
      data (ref_adm(16,iz,31,13),iz = 1,20) / &
     & 0.3981900E+00, 0.3981900E+00, 0.4025300E+00, 0.4070500E+00, &
     & 0.4156100E+00, 0.4248500E+00, 0.4274300E+00, 0.4271200E+00, &
     & 0.4555600E+00, 0.4533300E+00, 0.4664500E+00, 0.4752500E+00, &
     & 0.4918000E+00, 0.4872500E+00, 0.5067400E+00, 0.5195300E+00, &
     & 0.5117800E+00, 0.4968000E+00, 0.4039700E+00, 0.4039700E+00 /
      data (ref_adm(16,iz,32,13),iz = 1,20) / &
     & 0.3948100E+00, 0.3948100E+00, 0.4074000E+00, 0.4160200E+00, &
     & 0.4131200E+00, 0.4137000E+00, 0.4164900E+00, 0.4226700E+00, &
     & 0.4379500E+00, 0.4471800E+00, 0.4592300E+00, 0.4702800E+00, &
     & 0.5011600E+00, 0.5071500E+00, 0.5147300E+00, 0.5172500E+00, &
     & 0.5224800E+00, 0.5032100E+00, 0.4201300E+00, 0.4201300E+00 /
      data (ref_adm(16,iz,33,13),iz = 1,20) / &
     & 0.4056900E+00, 0.4056900E+00, 0.4002200E+00, 0.4086300E+00, &
     & 0.4103800E+00, 0.4024700E+00, 0.4215000E+00, 0.4286300E+00, &
     & 0.4436000E+00, 0.4642400E+00, 0.4738100E+00, 0.4800100E+00, &
     & 0.4971300E+00, 0.5018400E+00, 0.5052900E+00, 0.5134700E+00, &
     & 0.5299000E+00, 0.5060900E+00, 0.4088100E+00, 0.4088100E+00 /
      data (ref_adm(16,iz,34,13),iz = 1,20) / &
     & 0.3959500E+00, 0.3959500E+00, 0.3885300E+00, 0.4084300E+00, &
     & 0.4248900E+00, 0.4248500E+00, 0.4256000E+00, 0.4217300E+00, &
     & 0.4321100E+00, 0.4574600E+00, 0.4854700E+00, 0.4862900E+00, &
     & 0.4967600E+00, 0.5034300E+00, 0.5163400E+00, 0.5405000E+00, &
     & 0.5284900E+00, 0.5058100E+00, 0.4151600E+00, 0.4151600E+00 /
      data (ref_adm(16,iz,35,13),iz = 1,20) / &
     & 0.3915500E+00, 0.3915500E+00, 0.3869900E+00, 0.3931900E+00, &
     & 0.4179500E+00, 0.4270300E+00, 0.4211700E+00, 0.4407300E+00, &
     & 0.4370800E+00, 0.4494700E+00, 0.4757300E+00, 0.4812200E+00, &
     & 0.5003800E+00, 0.5089700E+00, 0.5198200E+00, 0.5371700E+00, &
     & 0.5299300E+00, 0.5180800E+00, 0.4046500E+00, 0.4046500E+00 /
      data (ref_adm(16,iz,36,13),iz = 1,20) / &
     & 0.3982000E+00, 0.3982000E+00, 0.3942100E+00, 0.4200800E+00, &
     & 0.4200500E+00, 0.4261800E+00, 0.4432600E+00, 0.4438700E+00, &
     & 0.4517800E+00, 0.4419900E+00, 0.4669900E+00, 0.4852700E+00, &
     & 0.4984400E+00, 0.5328800E+00, 0.5337900E+00, 0.5239800E+00, &
     & 0.5471000E+00, 0.5233800E+00, 0.4300800E+00, 0.4300800E+00 /
      data (ref_adm(16,iz,37,13),iz = 1,20) / &
     & 0.4100000E+00, 0.4100000E+00, 0.4223200E+00, 0.4329800E+00, &
     & 0.4238100E+00, 0.4326100E+00, 0.4427100E+00, 0.4458100E+00, &
     & 0.4375600E+00, 0.4472200E+00, 0.4637700E+00, 0.4927800E+00, &
     & 0.5137900E+00, 0.5524300E+00, 0.5449000E+00, 0.5466600E+00, &
     & 0.5582100E+00, 0.5115500E+00, 0.4718868E+00, 0.4718868E+00 /
      data (ref_adm(16,iz,38,13),iz = 1,20) / &
     & 0.4100000E+00, 0.4100000E+00, 0.4223200E+00, 0.4329800E+00, &
     & 0.4238100E+00, 0.4326100E+00, 0.4427100E+00, 0.4458100E+00, &
     & 0.4375600E+00, 0.4472200E+00, 0.4637700E+00, 0.4927800E+00, &
     & 0.5137900E+00, 0.5524300E+00, 0.5449000E+00, 0.5466600E+00, &
     & 0.5582100E+00, 0.5115500E+00, 0.4718868E+00, 0.4718868E+00 /
! Solar Zenith Angle 65.0 Albedo  0.4608643E+00
      data (ref_adm(16,iz, 1,14),iz = 1,20) / &
     & 0.3645500E+00, 0.3645500E+00, 0.3728300E+00, 0.3864900E+00, &
     & 0.4034600E+00, 0.3968900E+00, 0.4077700E+00, 0.4228300E+00, &
     & 0.4424800E+00, 0.4778300E+00, 0.5004400E+00, 0.5354700E+00, &
     & 0.6142200E+00, 0.7080400E+00, 0.7898800E+00, 0.8836400E+00, &
     & 0.9783500E+00, 0.1026200E+01, 0.7402734E+00, 0.7402734E+00 /
      data (ref_adm(16,iz, 2,14),iz = 1,20) / &
     & 0.3645500E+00, 0.3645500E+00, 0.3728300E+00, 0.3864900E+00, &
     & 0.4034600E+00, 0.3968900E+00, 0.4077700E+00, 0.4228300E+00, &
     & 0.4424800E+00, 0.4778300E+00, 0.5004400E+00, 0.5354700E+00, &
     & 0.6142200E+00, 0.7080400E+00, 0.7898800E+00, 0.8836400E+00, &
     & 0.9783500E+00, 0.1026200E+01, 0.7402734E+00, 0.7402734E+00 /
      data (ref_adm(16,iz, 3,14),iz = 1,20) / &
     & 0.3695300E+00, 0.3695300E+00, 0.3718800E+00, 0.3845600E+00, &
     & 0.3989100E+00, 0.4003700E+00, 0.4166800E+00, 0.4349900E+00, &
     & 0.4278600E+00, 0.4767700E+00, 0.5028000E+00, 0.5269400E+00, &
     & 0.5898200E+00, 0.6692400E+00, 0.7540400E+00, 0.8422500E+00, &
     & 0.9395500E+00, 0.9818200E+00, 0.2068333E+00, 0.2068333E+00 /
      data (ref_adm(16,iz, 4,14),iz = 1,20) / &
     & 0.3883500E+00, 0.3883500E+00, 0.3856600E+00, 0.3905800E+00, &
     & 0.3824900E+00, 0.3883800E+00, 0.4326400E+00, 0.4248400E+00, &
     & 0.4334600E+00, 0.4671200E+00, 0.4901500E+00, 0.5291100E+00, &
     & 0.5833700E+00, 0.6487100E+00, 0.7186800E+00, 0.8083500E+00, &
     & 0.8921300E+00, 0.9502000E+00, 0.7115148E+00, 0.7115148E+00 /
      data (ref_adm(16,iz, 5,14),iz = 1,20) / &
     & 0.3891700E+00, 0.3891700E+00, 0.4064200E+00, 0.4041900E+00, &
     & 0.4079400E+00, 0.4021000E+00, 0.4154400E+00, 0.4317900E+00, &
     & 0.4521200E+00, 0.4858600E+00, 0.4892900E+00, 0.5440700E+00, &
     & 0.5701500E+00, 0.6190800E+00, 0.6911200E+00, 0.7792000E+00, &
     & 0.8731300E+00, 0.8985900E+00, 0.6861081E+00, 0.6861081E+00 /
      data (ref_adm(16,iz, 6,14),iz = 1,20) / &
     & 0.3820100E+00, 0.3820100E+00, 0.3777600E+00, 0.3806000E+00, &
     & 0.3941100E+00, 0.4077200E+00, 0.4044800E+00, 0.4158500E+00, &
     & 0.4399400E+00, 0.4496400E+00, 0.4855100E+00, 0.5242000E+00, &
     & 0.5631500E+00, 0.6246500E+00, 0.6812700E+00, 0.7704300E+00, &
     & 0.8801300E+00, 0.8824900E+00, 0.7577500E+00, 0.7577500E+00 /
      data (ref_adm(16,iz, 7,14),iz = 1,20) / &
     & 0.4113100E+00, 0.4113100E+00, 0.3963100E+00, 0.4029400E+00, &
     & 0.4119900E+00, 0.4189700E+00, 0.4185300E+00, 0.4341400E+00, &
     & 0.4434400E+00, 0.4674200E+00, 0.5054400E+00, 0.5291700E+00, &
     & 0.5572100E+00, 0.6141200E+00, 0.6621000E+00, 0.7461900E+00, &
     & 0.8238600E+00, 0.8618200E+00, 0.8203800E+00, 0.8203800E+00 /
      data (ref_adm(16,iz, 8,14),iz = 1,20) / &
     & 0.3871300E+00, 0.3871300E+00, 0.4024900E+00, 0.4094600E+00, &
     & 0.4004300E+00, 0.4019900E+00, 0.3996800E+00, 0.4170400E+00, &
     & 0.4317700E+00, 0.4570600E+00, 0.4969400E+00, 0.5058000E+00, &
     & 0.5364200E+00, 0.5788700E+00, 0.6497900E+00, 0.7454300E+00, &
     & 0.7708100E+00, 0.7703500E+00, 0.7600500E+00, 0.7600500E+00 /
      data (ref_adm(16,iz, 9,14),iz = 1,20) / &
     & 0.3844300E+00, 0.3844300E+00, 0.4037200E+00, 0.3989000E+00, &
     & 0.3894200E+00, 0.4012900E+00, 0.4090000E+00, 0.4219200E+00, &
     & 0.4364500E+00, 0.4686500E+00, 0.4879500E+00, 0.4938300E+00, &
     & 0.5222000E+00, 0.5580500E+00, 0.6150800E+00, 0.6992800E+00, &
     & 0.7374600E+00, 0.7301700E+00, 0.6953200E+00, 0.6953200E+00 /
      data (ref_adm(16,iz,10,14),iz = 1,20) / &
     & 0.3946500E+00, 0.3946500E+00, 0.3917200E+00, 0.3863000E+00, &
     & 0.3909300E+00, 0.4005800E+00, 0.3987900E+00, 0.4217200E+00, &
     & 0.4111800E+00, 0.4449500E+00, 0.4526800E+00, 0.4707300E+00, &
     & 0.5019600E+00, 0.5424900E+00, 0.5837800E+00, 0.6674600E+00, &
     & 0.6963600E+00, 0.6814500E+00, 0.6241700E+00, 0.6241700E+00 /
      data (ref_adm(16,iz,11,14),iz = 1,20) / &
     & 0.3908400E+00, 0.3908400E+00, 0.3966000E+00, 0.3935300E+00, &
     & 0.3876500E+00, 0.3971000E+00, 0.4002600E+00, 0.4193800E+00, &
     & 0.4270300E+00, 0.4254200E+00, 0.4368000E+00, 0.4694100E+00, &
     & 0.4857100E+00, 0.5216300E+00, 0.5378200E+00, 0.6017900E+00, &
     & 0.6271500E+00, 0.6423900E+00, 0.5843300E+00, 0.5843300E+00 /
      data (ref_adm(16,iz,12,14),iz = 1,20) / &
     & 0.3812900E+00, 0.3812900E+00, 0.3895100E+00, 0.3949600E+00, &
     & 0.3947100E+00, 0.3943900E+00, 0.3911800E+00, 0.4162300E+00, &
     & 0.4284000E+00, 0.4251500E+00, 0.4262500E+00, 0.4575700E+00, &
     & 0.4805100E+00, 0.4931300E+00, 0.5253600E+00, 0.5608600E+00, &
     & 0.5878900E+00, 0.6002700E+00, 0.5455400E+00, 0.5455400E+00 /
      data (ref_adm(16,iz,13,14),iz = 1,20) / &
     & 0.3858000E+00, 0.3858000E+00, 0.3779400E+00, 0.3834700E+00, &
     & 0.3945700E+00, 0.4063500E+00, 0.4034600E+00, 0.4077800E+00, &
     & 0.4108500E+00, 0.4217000E+00, 0.4235500E+00, 0.4486700E+00, &
     & 0.4591600E+00, 0.4867900E+00, 0.5077400E+00, 0.5310000E+00, &
     & 0.5663800E+00, 0.5519000E+00, 0.4883700E+00, 0.4883700E+00 /
      data (ref_adm(16,iz,14,14),iz = 1,20) / &
     & 0.3810800E+00, 0.3810800E+00, 0.3917200E+00, 0.3909200E+00, &
     & 0.3905300E+00, 0.3913900E+00, 0.3965100E+00, 0.3977800E+00, &
     & 0.3960700E+00, 0.4038400E+00, 0.4055700E+00, 0.4236600E+00, &
     & 0.4297800E+00, 0.4439000E+00, 0.5098500E+00, 0.5229500E+00, &
     & 0.5419400E+00, 0.5288200E+00, 0.4490600E+00, 0.4490600E+00 /
      data (ref_adm(16,iz,15,14),iz = 1,20) / &
     & 0.4173300E+00, 0.4173300E+00, 0.4063700E+00, 0.3966900E+00, &
     & 0.4035000E+00, 0.4116400E+00, 0.4229200E+00, 0.4339700E+00, &
     & 0.4432300E+00, 0.4513200E+00, 0.4593500E+00, 0.4696100E+00, &
     & 0.4691900E+00, 0.4742100E+00, 0.4943700E+00, 0.4982100E+00, &
     & 0.5136700E+00, 0.5268300E+00, 0.4221994E+00, 0.4221994E+00 /
      data (ref_adm(16,iz,16,14),iz = 1,20) / &
     & 0.3618600E+00, 0.3618600E+00, 0.3423200E+00, 0.3471300E+00, &
     & 0.3528100E+00, 0.3304200E+00, 0.3451100E+00, 0.3463200E+00, &
     & 0.3532300E+00, 0.3588400E+00, 0.3648700E+00, 0.3852300E+00, &
     & 0.3907300E+00, 0.4037600E+00, 0.4575300E+00, 0.4836500E+00, &
     & 0.5079000E+00, 0.5405100E+00, 0.4086951E+00, 0.4086951E+00 /
      data (ref_adm(16,iz,17,14),iz = 1,20) / &
     & 0.3923700E+00, 0.3923700E+00, 0.3993300E+00, 0.4014000E+00, &
     & 0.4012900E+00, 0.4029300E+00, 0.3984900E+00, 0.3987300E+00, &
     & 0.3971600E+00, 0.4118200E+00, 0.4062800E+00, 0.4302100E+00, &
     & 0.4366800E+00, 0.4436600E+00, 0.4565900E+00, 0.4842600E+00, &
     & 0.4822300E+00, 0.4512690E+00, 0.3976819E+00, 0.3976819E+00 /
      data (ref_adm(16,iz,18,14),iz = 1,20) / &
     & 0.3786900E+00, 0.3786900E+00, 0.3916800E+00, 0.3944200E+00, &
     & 0.3963700E+00, 0.4017500E+00, 0.4047800E+00, 0.4040200E+00, &
     & 0.4087500E+00, 0.4182700E+00, 0.4182300E+00, 0.4307000E+00, &
     & 0.4517100E+00, 0.4376700E+00, 0.4533700E+00, 0.4712500E+00, &
     & 0.5193200E+00, 0.4795745E+00, 0.4381926E+00, 0.4381926E+00 /
      data (ref_adm(16,iz,19,14),iz = 1,20) / &
     & 0.3727800E+00, 0.3727800E+00, 0.3832400E+00, 0.3831800E+00, &
     & 0.3922600E+00, 0.3973900E+00, 0.3979300E+00, 0.3978400E+00, &
     & 0.4142200E+00, 0.4202800E+00, 0.4166800E+00, 0.4304100E+00, &
     & 0.4394000E+00, 0.4441000E+00, 0.4475400E+00, 0.4713100E+00, &
     & 0.4733355E+00, 0.4716739E+00, 0.4309001E+00, 0.4309001E+00 /
      data (ref_adm(16,iz,20,14),iz = 1,20) / &
     & 0.3976100E+00, 0.3976100E+00, 0.3931700E+00, 0.4075400E+00, &
     & 0.3938700E+00, 0.4025500E+00, 0.4018000E+00, 0.4037100E+00, &
     & 0.4156200E+00, 0.4111000E+00, 0.3993000E+00, 0.4165300E+00, &
     & 0.4281700E+00, 0.4419900E+00, 0.4507300E+00, 0.4044300E+00, &
     & 0.4672269E+00, 0.4656839E+00, 0.4266398E+00, 0.4266398E+00 /
      data (ref_adm(16,iz,21,14),iz = 1,20) / &
     & 0.3932400E+00, 0.3932400E+00, 0.3918800E+00, 0.3939100E+00, &
     & 0.3862900E+00, 0.3893500E+00, 0.3815400E+00, 0.4009800E+00, &
     & 0.4192900E+00, 0.4106000E+00, 0.4076600E+00, 0.4117800E+00, &
     & 0.4394100E+00, 0.4514300E+00, 0.4503700E+00, 0.4293500E+00, &
     & 0.4622030E+00, 0.4601862E+00, 0.4240304E+00, 0.4240304E+00 /
      data (ref_adm(16,iz,22,14),iz = 1,20) / &
     & 0.3915200E+00, 0.3915200E+00, 0.4113500E+00, 0.3980600E+00, &
     & 0.3837000E+00, 0.3913600E+00, 0.3916600E+00, 0.4086100E+00, &
     & 0.4047500E+00, 0.4138700E+00, 0.4105700E+00, 0.4193600E+00, &
     & 0.4401000E+00, 0.4410300E+00, 0.4460200E+00, 0.4490900E+00, &
     & 0.4482855E+00, 0.4340851E+00, 0.4136766E+00, 0.4136766E+00 /
      data (ref_adm(16,iz,23,14),iz = 1,20) / &
     & 0.3982100E+00, 0.3982100E+00, 0.4079500E+00, 0.3923000E+00, &
     & 0.3869300E+00, 0.3925500E+00, 0.3986200E+00, 0.4065300E+00, &
     & 0.4062800E+00, 0.4191000E+00, 0.4068700E+00, 0.4184500E+00, &
     & 0.4401500E+00, 0.4407000E+00, 0.4328700E+00, 0.4579800E+00, &
     & 0.4122800E+00, 0.4344020E+00, 0.4181983E+00, 0.4181983E+00 /
      data (ref_adm(16,iz,24,14),iz = 1,20) / &
     & 0.3449000E+00, 0.3449000E+00, 0.3435500E+00, 0.3427000E+00, &
     & 0.3506200E+00, 0.3583200E+00, 0.3648700E+00, 0.3640700E+00, &
     & 0.3667000E+00, 0.3777300E+00, 0.3879300E+00, 0.4065400E+00, &
     & 0.4364800E+00, 0.4548700E+00, 0.4675800E+00, 0.4644400E+00, &
     & 0.4343300E+00, 0.4380886E+00, 0.4254074E+00, 0.4254074E+00 /
      data (ref_adm(16,iz,25,14),iz = 1,20) / &
     & 0.4083700E+00, 0.4083700E+00, 0.4230200E+00, 0.4174600E+00, &
     & 0.4168100E+00, 0.4177300E+00, 0.4192100E+00, 0.4276600E+00, &
     & 0.4379700E+00, 0.4510800E+00, 0.4523700E+00, 0.4564600E+00, &
     & 0.4630400E+00, 0.4671900E+00, 0.4696400E+00, 0.4658300E+00, &
     & 0.4676600E+00, 0.5290900E+00, 0.4347941E+00, 0.4347941E+00 /
      data (ref_adm(16,iz,26,14),iz = 1,20) / &
     & 0.3915900E+00, 0.3915900E+00, 0.3758700E+00, 0.3799800E+00, &
     & 0.3850600E+00, 0.3855900E+00, 0.3871800E+00, 0.3891500E+00, &
     & 0.3912000E+00, 0.3987000E+00, 0.4087700E+00, 0.4296400E+00, &
     & 0.4421800E+00, 0.4582400E+00, 0.4734300E+00, 0.4861600E+00, &
     & 0.4914600E+00, 0.4598500E+00, 0.4469976E+00, 0.4469976E+00 /
      data (ref_adm(16,iz,27,14),iz = 1,20) / &
     & 0.3848600E+00, 0.3848600E+00, 0.3969800E+00, 0.3979500E+00, &
     & 0.4073100E+00, 0.4218900E+00, 0.4173300E+00, 0.4237000E+00, &
     & 0.4203700E+00, 0.4213600E+00, 0.4227100E+00, 0.4361100E+00, &
     & 0.4666400E+00, 0.4809000E+00, 0.4857900E+00, 0.4924600E+00, &
     & 0.5117400E+00, 0.4956000E+00, 0.4240300E+00, 0.4240300E+00 /
      data (ref_adm(16,iz,28,14),iz = 1,20) / &
     & 0.3824000E+00, 0.3824000E+00, 0.4017700E+00, 0.3988500E+00, &
     & 0.4069800E+00, 0.4077500E+00, 0.4220200E+00, 0.4295500E+00, &
     & 0.4252800E+00, 0.4298400E+00, 0.4415700E+00, 0.4570600E+00, &
     & 0.4672200E+00, 0.4799500E+00, 0.4803000E+00, 0.5095000E+00, &
     & 0.5097800E+00, 0.4906000E+00, 0.4232900E+00, 0.4232900E+00 /
      data (ref_adm(16,iz,29,14),iz = 1,20) / &
     & 0.3957600E+00, 0.3957600E+00, 0.4074700E+00, 0.3988500E+00, &
     & 0.3986300E+00, 0.4048600E+00, 0.3970900E+00, 0.4213400E+00, &
     & 0.4239700E+00, 0.4443900E+00, 0.4490100E+00, 0.4554500E+00, &
     & 0.4834400E+00, 0.5039800E+00, 0.5086700E+00, 0.5093700E+00, &
     & 0.5160000E+00, 0.5119000E+00, 0.4331600E+00, 0.4331600E+00 /
      data (ref_adm(16,iz,30,14),iz = 1,20) / &
     & 0.3939500E+00, 0.3939500E+00, 0.4054100E+00, 0.3978800E+00, &
     & 0.4071100E+00, 0.4028000E+00, 0.4177300E+00, 0.4062800E+00, &
     & 0.4305500E+00, 0.4453900E+00, 0.4649000E+00, 0.4697100E+00, &
     & 0.4851100E+00, 0.4932600E+00, 0.5082100E+00, 0.5048700E+00, &
     & 0.5310300E+00, 0.5236300E+00, 0.4525100E+00, 0.4525100E+00 /
      data (ref_adm(16,iz,31,14),iz = 1,20) / &
     & 0.3867900E+00, 0.3867900E+00, 0.3895900E+00, 0.3983900E+00, &
     & 0.4059700E+00, 0.4119000E+00, 0.4236700E+00, 0.4208500E+00, &
     & 0.4230100E+00, 0.4501800E+00, 0.4720100E+00, 0.4869700E+00, &
     & 0.4911400E+00, 0.4943400E+00, 0.5041000E+00, 0.5378400E+00, &
     & 0.5527200E+00, 0.5476000E+00, 0.4632500E+00, 0.4632500E+00 /
      data (ref_adm(16,iz,32,14),iz = 1,20) / &
     & 0.3814700E+00, 0.3814700E+00, 0.3903900E+00, 0.4031800E+00, &
     & 0.4100300E+00, 0.4084400E+00, 0.4211800E+00, 0.4349700E+00, &
     & 0.4501700E+00, 0.4701000E+00, 0.4770800E+00, 0.4872400E+00, &
     & 0.5069900E+00, 0.5273400E+00, 0.5408200E+00, 0.5512600E+00, &
     & 0.5611200E+00, 0.5515800E+00, 0.4671600E+00, 0.4671600E+00 /
      data (ref_adm(16,iz,33,14),iz = 1,20) / &
     & 0.3909100E+00, 0.3909100E+00, 0.3939300E+00, 0.3864600E+00, &
     & 0.3889200E+00, 0.3963400E+00, 0.4000300E+00, 0.4118200E+00, &
     & 0.4253000E+00, 0.4385000E+00, 0.4553300E+00, 0.4749000E+00, &
     & 0.5003200E+00, 0.5247900E+00, 0.5345500E+00, 0.5530500E+00, &
     & 0.5608500E+00, 0.5481300E+00, 0.4633400E+00, 0.4633400E+00 /
      data (ref_adm(16,iz,34,14),iz = 1,20) / &
     & 0.3823400E+00, 0.3823400E+00, 0.4034000E+00, 0.3959800E+00, &
     & 0.4122800E+00, 0.4130600E+00, 0.4192500E+00, 0.4185200E+00, &
     & 0.4241100E+00, 0.4517400E+00, 0.4698700E+00, 0.4892000E+00, &
     & 0.5177100E+00, 0.5299800E+00, 0.5415000E+00, 0.5558600E+00, &
     & 0.5703400E+00, 0.5678900E+00, 0.4741100E+00, 0.4741100E+00 /
      data (ref_adm(16,iz,35,14),iz = 1,20) / &
     & 0.3802900E+00, 0.3802900E+00, 0.3705800E+00, 0.3924700E+00, &
     & 0.4012300E+00, 0.4121200E+00, 0.4119600E+00, 0.4206300E+00, &
     & 0.4374000E+00, 0.4440200E+00, 0.4719000E+00, 0.4761700E+00, &
     & 0.5147200E+00, 0.5406700E+00, 0.5555900E+00, 0.5801500E+00, &
     & 0.5785300E+00, 0.5775000E+00, 0.4787300E+00, 0.4787300E+00 /
      data (ref_adm(16,iz,36,14),iz = 1,20) / &
     & 0.3832300E+00, 0.3832300E+00, 0.3807900E+00, 0.3861500E+00, &
     & 0.3988100E+00, 0.4200100E+00, 0.4186200E+00, 0.4233200E+00, &
     & 0.4383400E+00, 0.4490000E+00, 0.4602400E+00, 0.4838800E+00, &
     & 0.5191300E+00, 0.5542000E+00, 0.5531400E+00, 0.5879600E+00, &
     & 0.5943800E+00, 0.5783600E+00, 0.4882000E+00, 0.4882000E+00 /
      data (ref_adm(16,iz,37,14),iz = 1,20) / &
     & 0.3773700E+00, 0.3773700E+00, 0.3869100E+00, 0.3961000E+00, &
     & 0.4112200E+00, 0.4082300E+00, 0.4136300E+00, 0.4378700E+00, &
     & 0.4415700E+00, 0.4427200E+00, 0.4645500E+00, 0.4858300E+00, &
     & 0.5136800E+00, 0.5477600E+00, 0.5762300E+00, 0.6076100E+00, &
     & 0.5944600E+00, 0.5952300E+00, 0.5458900E+00, 0.5458900E+00 /
      data (ref_adm(16,iz,38,14),iz = 1,20) / &
     & 0.3773700E+00, 0.3773700E+00, 0.3869100E+00, 0.3961000E+00, &
     & 0.4112200E+00, 0.4082300E+00, 0.4136300E+00, 0.4378700E+00, &
     & 0.4415700E+00, 0.4427200E+00, 0.4645500E+00, 0.4858300E+00, &
     & 0.5136800E+00, 0.5477600E+00, 0.5762300E+00, 0.6076100E+00, &
     & 0.5944600E+00, 0.5952300E+00, 0.5458900E+00, 0.5458900E+00 /
! Solar Zenith Angle 70.0 Albedo  0.4660855E+00
      data (ref_adm(16,iz, 1,15),iz = 1,20) / &
     & 0.3679800E+00, 0.3679800E+00, 0.3784400E+00, 0.3834900E+00, &
     & 0.3817000E+00, 0.3946400E+00, 0.4076000E+00, 0.4250700E+00, &
     & 0.4547100E+00, 0.4815100E+00, 0.5237300E+00, 0.5728800E+00, &
     & 0.6559200E+00, 0.7750700E+00, 0.8823100E+00, 0.1087100E+01, &
     & 0.1062393E+01, 0.1122735E+01, 0.8486831E+00, 0.8486831E+00 /
      data (ref_adm(16,iz, 2,15),iz = 1,20) / &
     & 0.3679800E+00, 0.3679800E+00, 0.3784400E+00, 0.3834900E+00, &
     & 0.3817000E+00, 0.3946400E+00, 0.4076000E+00, 0.4250700E+00, &
     & 0.4547100E+00, 0.4815100E+00, 0.5237300E+00, 0.5728800E+00, &
     & 0.6559200E+00, 0.7750700E+00, 0.8823100E+00, 0.1087100E+01, &
     & 0.1062393E+01, 0.1122735E+01, 0.8486831E+00, 0.8486831E+00 /
      data (ref_adm(16,iz, 3,15),iz = 1,20) / &
     & 0.3708800E+00, 0.3708800E+00, 0.3716800E+00, 0.3795200E+00, &
     & 0.3943200E+00, 0.3970000E+00, 0.4084200E+00, 0.4280300E+00, &
     & 0.4621200E+00, 0.4774900E+00, 0.5253900E+00, 0.5779600E+00, &
     & 0.6375000E+00, 0.7531400E+00, 0.8247400E+00, 0.9308400E+00, &
     & 0.1006500E+01, 0.1104210E+01, 0.2347440E+00, 0.2347440E+00 /
      data (ref_adm(16,iz, 4,15),iz = 1,20) / &
     & 0.3897900E+00, 0.3897900E+00, 0.3733300E+00, 0.3734000E+00, &
     & 0.3820900E+00, 0.3997900E+00, 0.4166400E+00, 0.4399200E+00, &
     & 0.4329500E+00, 0.4761700E+00, 0.5118700E+00, 0.5615600E+00, &
     & 0.6448500E+00, 0.7149800E+00, 0.7949300E+00, 0.8891500E+00, &
     & 0.1003000E+01, 0.1067139E+01, 0.8068515E+00, 0.8068515E+00 /
      data (ref_adm(16,iz, 5,15),iz = 1,20) / &
     & 0.3910500E+00, 0.3910500E+00, 0.3852900E+00, 0.3828000E+00, &
     & 0.3817100E+00, 0.3950700E+00, 0.4228200E+00, 0.4461700E+00, &
     & 0.4559000E+00, 0.4928400E+00, 0.5029300E+00, 0.5501100E+00, &
     & 0.6251100E+00, 0.7075000E+00, 0.7632500E+00, 0.8522500E+00, &
     & 0.9661200E+00, 0.1018493E+01, 0.7705396E+00, 0.7705396E+00 /
      data (ref_adm(16,iz, 6,15),iz = 1,20) / &
     & 0.3753200E+00, 0.3753200E+00, 0.3679700E+00, 0.3814800E+00, &
     & 0.3776500E+00, 0.3877600E+00, 0.4047200E+00, 0.4043300E+00, &
     & 0.4327000E+00, 0.4483500E+00, 0.4862100E+00, 0.5324500E+00, &
     & 0.5872600E+00, 0.6611800E+00, 0.7405900E+00, 0.8379000E+00, &
     & 0.1045100E+01, 0.1103200E+01, 0.1016300E+01, 0.1016300E+01 /
      data (ref_adm(16,iz, 7,15),iz = 1,20) / &
     & 0.3841600E+00, 0.3841600E+00, 0.3893000E+00, 0.3900900E+00, &
     & 0.3965100E+00, 0.4103100E+00, 0.4179700E+00, 0.4358100E+00, &
     & 0.4589500E+00, 0.4815000E+00, 0.4983600E+00, 0.5465000E+00, &
     & 0.6036900E+00, 0.6818400E+00, 0.7552600E+00, 0.8688100E+00, &
     & 0.1018700E+01, 0.1077300E+01, 0.1001800E+01, 0.1001800E+01 /
      data (ref_adm(16,iz, 8,15),iz = 1,20) / &
     & 0.3873700E+00, 0.3873700E+00, 0.3775500E+00, 0.3691900E+00, &
     & 0.3804200E+00, 0.3886900E+00, 0.4082700E+00, 0.4153800E+00, &
     & 0.4308700E+00, 0.4535500E+00, 0.4686200E+00, 0.5161100E+00, &
     & 0.5566900E+00, 0.6147300E+00, 0.6680000E+00, 0.8089200E+00, &
     & 0.9341200E+00, 0.9165000E+00, 0.8804400E+00, 0.8804400E+00 /
      data (ref_adm(16,iz, 9,15),iz = 1,20) / &
     & 0.3796500E+00, 0.3796500E+00, 0.3767600E+00, 0.3689400E+00, &
     & 0.3742900E+00, 0.3855700E+00, 0.3958100E+00, 0.4236700E+00, &
     & 0.4353600E+00, 0.4426800E+00, 0.4663100E+00, 0.5119100E+00, &
     & 0.5485800E+00, 0.5900600E+00, 0.6434200E+00, 0.7460500E+00, &
     & 0.8485400E+00, 0.8131000E+00, 0.8214700E+00, 0.8214700E+00 /
      data (ref_adm(16,iz,10,15),iz = 1,20) / &
     & 0.3722600E+00, 0.3722600E+00, 0.3793500E+00, 0.3751600E+00, &
     & 0.3864500E+00, 0.3744100E+00, 0.4002300E+00, 0.4229900E+00, &
     & 0.4332500E+00, 0.4348000E+00, 0.4654000E+00, 0.4962500E+00, &
     & 0.5241900E+00, 0.5593300E+00, 0.6056300E+00, 0.6997700E+00, &
     & 0.7651300E+00, 0.7486600E+00, 0.7371700E+00, 0.7371700E+00 /
      data (ref_adm(16,iz,11,15),iz = 1,20) / &
     & 0.3796200E+00, 0.3796200E+00, 0.3811900E+00, 0.3814000E+00, &
     & 0.3755700E+00, 0.3905100E+00, 0.3890500E+00, 0.4063400E+00, &
     & 0.4208400E+00, 0.4304100E+00, 0.4516100E+00, 0.4680000E+00, &
     & 0.5054000E+00, 0.5467800E+00, 0.5793100E+00, 0.6538800E+00, &
     & 0.7081200E+00, 0.6745700E+00, 0.6824100E+00, 0.6824100E+00 /
      data (ref_adm(16,iz,12,15),iz = 1,20) / &
     & 0.3674600E+00, 0.3674600E+00, 0.3854700E+00, 0.3931200E+00, &
     & 0.3915500E+00, 0.3806700E+00, 0.3973500E+00, 0.4137600E+00, &
     & 0.4132100E+00, 0.4313000E+00, 0.4362800E+00, 0.4617400E+00, &
     & 0.4907600E+00, 0.5060200E+00, 0.5651900E+00, 0.6079300E+00, &
     & 0.6723300E+00, 0.6398200E+00, 0.6231900E+00, 0.6231900E+00 /
      data (ref_adm(16,iz,13,15),iz = 1,20) / &
     & 0.3725000E+00, 0.3725000E+00, 0.3799000E+00, 0.3859800E+00, &
     & 0.3892700E+00, 0.3914400E+00, 0.3892500E+00, 0.3865600E+00, &
     & 0.4022400E+00, 0.4149600E+00, 0.4221000E+00, 0.4500400E+00, &
     & 0.4738400E+00, 0.4781400E+00, 0.5394700E+00, 0.5857600E+00, &
     & 0.6273100E+00, 0.6128200E+00, 0.5767500E+00, 0.5767500E+00 /
      data (ref_adm(16,iz,14,15),iz = 1,20) / &
     & 0.3853100E+00, 0.3853100E+00, 0.3967100E+00, 0.3938400E+00, &
     & 0.3946200E+00, 0.3956600E+00, 0.3963900E+00, 0.3954600E+00, &
     & 0.4058800E+00, 0.4038600E+00, 0.4121700E+00, 0.4203300E+00, &
     & 0.4390500E+00, 0.4485400E+00, 0.5054000E+00, 0.5542800E+00, &
     & 0.5814700E+00, 0.5936500E+00, 0.4638672E+00, 0.4638672E+00 /
      data (ref_adm(16,iz,15,15),iz = 1,20) / &
     & 0.4081600E+00, 0.4081600E+00, 0.3914400E+00, 0.3825400E+00, &
     & 0.3856500E+00, 0.3975200E+00, 0.4047200E+00, 0.4131600E+00, &
     & 0.4223600E+00, 0.4330000E+00, 0.4502300E+00, 0.4640800E+00, &
     & 0.4801000E+00, 0.4932600E+00, 0.5051500E+00, 0.5305100E+00, &
     & 0.5703300E+00, 0.5651300E+00, 0.4456622E+00, 0.4456622E+00 /
      data (ref_adm(16,iz,16,15),iz = 1,20) / &
     & 0.3484700E+00, 0.3484700E+00, 0.3305600E+00, 0.3339500E+00, &
     & 0.3317300E+00, 0.3442500E+00, 0.3402000E+00, 0.3423200E+00, &
     & 0.3477500E+00, 0.3493400E+00, 0.3563200E+00, 0.3700500E+00, &
     & 0.3798700E+00, 0.3987100E+00, 0.4978000E+00, 0.5161300E+00, &
     & 0.5524000E+00, 0.4908535E+00, 0.4302621E+00, 0.4302621E+00 /
      data (ref_adm(16,iz,17,15),iz = 1,20) / &
     & 0.3684700E+00, 0.3684700E+00, 0.3763500E+00, 0.3748100E+00, &
     & 0.3738500E+00, 0.3822600E+00, 0.3901200E+00, 0.3846900E+00, &
     & 0.3783700E+00, 0.3946800E+00, 0.4159900E+00, 0.4180900E+00, &
     & 0.4413200E+00, 0.4519900E+00, 0.4837700E+00, 0.4988000E+00, &
     & 0.5276600E+00, 0.4710082E+00, 0.4176392E+00, 0.4176392E+00 /
      data (ref_adm(16,iz,18,15),iz = 1,20) / &
     & 0.3652800E+00, 0.3652800E+00, 0.3782500E+00, 0.3730500E+00, &
     & 0.3796700E+00, 0.3733100E+00, 0.3860200E+00, 0.3858100E+00, &
     & 0.3906300E+00, 0.3878800E+00, 0.4137900E+00, 0.4167300E+00, &
     & 0.4377200E+00, 0.4437900E+00, 0.4757000E+00, 0.4964000E+00, &
     & 0.5029600E+00, 0.5381250E+00, 0.5141589E+00, 0.5141589E+00 /
      data (ref_adm(16,iz,19,15),iz = 1,20) / &
     & 0.3709200E+00, 0.3709200E+00, 0.3801100E+00, 0.3720100E+00, &
     & 0.3759500E+00, 0.3736100E+00, 0.3722600E+00, 0.3938800E+00, &
     & 0.3914600E+00, 0.4119600E+00, 0.4075900E+00, 0.4184800E+00, &
     & 0.4217000E+00, 0.4390800E+00, 0.4653700E+00, 0.4565700E+00, &
     & 0.5098104E+00, 0.5270298E+00, 0.5038536E+00, 0.5038536E+00 /
      data (ref_adm(16,iz,20,15),iz = 1,20) / &
     & 0.3852100E+00, 0.3852100E+00, 0.3785500E+00, 0.3802800E+00, &
     & 0.3848000E+00, 0.3778500E+00, 0.3752000E+00, 0.3808100E+00, &
     & 0.3934100E+00, 0.4035100E+00, 0.4121200E+00, 0.4183800E+00, &
     & 0.4257700E+00, 0.4420700E+00, 0.4644000E+00, 0.4561600E+00, &
     & 0.5027705E+00, 0.5191866E+00, 0.4979869E+00, 0.4979869E+00 /
      data (ref_adm(16,iz,21,15),iz = 1,20) / &
     & 0.3896800E+00, 0.3896800E+00, 0.3824200E+00, 0.3895600E+00, &
     & 0.3828400E+00, 0.3792500E+00, 0.3729500E+00, 0.3912400E+00, &
     & 0.4005000E+00, 0.4099800E+00, 0.4105000E+00, 0.4168700E+00, &
     & 0.4297300E+00, 0.4459300E+00, 0.4589300E+00, 0.4518800E+00, &
     & 0.4962565E+00, 0.5121392E+00, 0.4943950E+00, 0.4943950E+00 /
      data (ref_adm(16,iz,22,15),iz = 1,20) / &
     & 0.3793000E+00, 0.3793000E+00, 0.3785200E+00, 0.3782400E+00, &
     & 0.3593500E+00, 0.3665300E+00, 0.3716400E+00, 0.3773800E+00, &
     & 0.3948100E+00, 0.4115200E+00, 0.4097100E+00, 0.4105500E+00, &
     & 0.4354000E+00, 0.4379900E+00, 0.4581200E+00, 0.4655700E+00, &
     & 0.4845197E+00, 0.4804586E+00, 0.4699090E+00, 0.4699090E+00 /
      data (ref_adm(16,iz,23,15),iz = 1,20) / &
     & 0.3667300E+00, 0.3667300E+00, 0.3711900E+00, 0.3755100E+00, &
     & 0.3790100E+00, 0.3781500E+00, 0.3837700E+00, 0.3979200E+00, &
     & 0.3863400E+00, 0.4023200E+00, 0.4156300E+00, 0.4206200E+00, &
     & 0.4296100E+00, 0.4432400E+00, 0.4579100E+00, 0.4728400E+00, &
     & 0.4896200E+00, 0.4794334E+00, 0.4749243E+00, 0.4749243E+00 /
      data (ref_adm(16,iz,24,15),iz = 1,20) / &
     & 0.3425300E+00, 0.3425300E+00, 0.3380100E+00, 0.3411700E+00, &
     & 0.3418700E+00, 0.3443900E+00, 0.3478000E+00, 0.3545700E+00, &
     & 0.3638300E+00, 0.3688200E+00, 0.3798400E+00, 0.3879900E+00, &
     & 0.4056500E+00, 0.4130400E+00, 0.4509600E+00, 0.4842000E+00, &
     & 0.4966000E+00, 0.4824479E+00, 0.4834213E+00, 0.4834213E+00 /
      data (ref_adm(16,iz,25,15),iz = 1,20) / &
     & 0.3918400E+00, 0.3918400E+00, 0.4066200E+00, 0.4057000E+00, &
     & 0.4041400E+00, 0.4046400E+00, 0.4117600E+00, 0.4140200E+00, &
     & 0.4324800E+00, 0.4431300E+00, 0.4567500E+00, 0.4735500E+00, &
     & 0.4901100E+00, 0.4943400E+00, 0.4916400E+00, 0.5020500E+00, &
     & 0.5183900E+00, 0.5271900E+00, 0.4946682E+00, 0.4946682E+00 /
      data (ref_adm(16,iz,26,15),iz = 1,20) / &
     & 0.3793800E+00, 0.3793800E+00, 0.3757200E+00, 0.3702100E+00, &
     & 0.3686500E+00, 0.3766700E+00, 0.3770600E+00, 0.3758500E+00, &
     & 0.3827100E+00, 0.3898600E+00, 0.4004000E+00, 0.4118000E+00, &
     & 0.4372200E+00, 0.4631200E+00, 0.4790200E+00, 0.5193800E+00, &
     & 0.5290500E+00, 0.5355300E+00, 0.5097241E+00, 0.5097241E+00 /
      data (ref_adm(16,iz,27,15),iz = 1,20) / &
     & 0.3712100E+00, 0.3712100E+00, 0.3853000E+00, 0.3818100E+00, &
     & 0.3884200E+00, 0.3889700E+00, 0.4031600E+00, 0.3862700E+00, &
     & 0.4040900E+00, 0.4103300E+00, 0.4212300E+00, 0.4401300E+00, &
     & 0.4547100E+00, 0.4812800E+00, 0.4881900E+00, 0.5199100E+00, &
     & 0.5349000E+00, 0.5504600E+00, 0.4660100E+00, 0.4660100E+00 /
      data (ref_adm(16,iz,28,15),iz = 1,20) / &
     & 0.3651400E+00, 0.3651400E+00, 0.3793400E+00, 0.3813300E+00, &
     & 0.3855600E+00, 0.3840300E+00, 0.3931600E+00, 0.3913300E+00, &
     & 0.4013900E+00, 0.4069900E+00, 0.4242300E+00, 0.4351900E+00, &
     & 0.4687900E+00, 0.4884400E+00, 0.5061900E+00, 0.5324800E+00, &
     & 0.5411500E+00, 0.5535600E+00, 0.4960900E+00, 0.4960900E+00 /
      data (ref_adm(16,iz,29,15),iz = 1,20) / &
     & 0.3734500E+00, 0.3734500E+00, 0.3850200E+00, 0.3785800E+00, &
     & 0.3805200E+00, 0.3835900E+00, 0.3884300E+00, 0.3969700E+00, &
     & 0.4115900E+00, 0.4123600E+00, 0.4493900E+00, 0.4450300E+00, &
     & 0.4781000E+00, 0.5026900E+00, 0.5194700E+00, 0.5491700E+00, &
     & 0.5611200E+00, 0.5697400E+00, 0.4970600E+00, 0.4970600E+00 /
      data (ref_adm(16,iz,30,15),iz = 1,20) / &
     & 0.3871100E+00, 0.3871100E+00, 0.3786600E+00, 0.3819600E+00, &
     & 0.3810000E+00, 0.3837500E+00, 0.3947600E+00, 0.3987600E+00, &
     & 0.4170300E+00, 0.4221700E+00, 0.4521700E+00, 0.4619800E+00, &
     & 0.4898800E+00, 0.5007700E+00, 0.5205800E+00, 0.5560200E+00, &
     & 0.5868200E+00, 0.5929400E+00, 0.5194100E+00, 0.5194100E+00 /
      data (ref_adm(16,iz,31,15),iz = 1,20) / &
     & 0.3834900E+00, 0.3834900E+00, 0.3839000E+00, 0.3825100E+00, &
     & 0.3851800E+00, 0.3934400E+00, 0.3994400E+00, 0.4129600E+00, &
     & 0.4225600E+00, 0.4376700E+00, 0.4464400E+00, 0.4707000E+00, &
     & 0.5066200E+00, 0.5268500E+00, 0.5416300E+00, 0.5697500E+00, &
     & 0.6076000E+00, 0.6113800E+00, 0.5265700E+00, 0.5265700E+00 /
      data (ref_adm(16,iz,32,15),iz = 1,20) / &
     & 0.3786100E+00, 0.3786100E+00, 0.3850700E+00, 0.3928200E+00, &
     & 0.3967600E+00, 0.3971000E+00, 0.4064500E+00, 0.4202600E+00, &
     & 0.4287100E+00, 0.4389500E+00, 0.4451900E+00, 0.4725000E+00, &
     & 0.4888100E+00, 0.5166600E+00, 0.5449500E+00, 0.5749000E+00, &
     & 0.6003200E+00, 0.6088200E+00, 0.5268000E+00, 0.5268000E+00 /
      data (ref_adm(16,iz,33,15),iz = 1,20) / &
     & 0.3799100E+00, 0.3799100E+00, 0.3774100E+00, 0.3750000E+00, &
     & 0.3850400E+00, 0.3847300E+00, 0.3950900E+00, 0.4058500E+00, &
     & 0.4235800E+00, 0.4306500E+00, 0.4448000E+00, 0.4665500E+00, &
     & 0.4864400E+00, 0.5128700E+00, 0.5459700E+00, 0.5756400E+00, &
     & 0.6140400E+00, 0.6208200E+00, 0.5421700E+00, 0.5421700E+00 /
      data (ref_adm(16,iz,34,15),iz = 1,20) / &
     & 0.3677600E+00, 0.3677600E+00, 0.3756600E+00, 0.3897200E+00, &
     & 0.3900500E+00, 0.3951000E+00, 0.4018900E+00, 0.4153600E+00, &
     & 0.4377800E+00, 0.4386900E+00, 0.4569600E+00, 0.4719300E+00, &
     & 0.5103900E+00, 0.5366500E+00, 0.5702600E+00, 0.5948700E+00, &
     & 0.6220600E+00, 0.6268300E+00, 0.5419100E+00, 0.5419100E+00 /
      data (ref_adm(16,iz,35,15),iz = 1,20) / &
     & 0.3791900E+00, 0.3791900E+00, 0.3888900E+00, 0.3885500E+00, &
     & 0.3878100E+00, 0.4020600E+00, 0.4115000E+00, 0.4231100E+00, &
     & 0.4360900E+00, 0.4404100E+00, 0.4555500E+00, 0.4795100E+00, &
     & 0.5032500E+00, 0.5451400E+00, 0.5703900E+00, 0.6145500E+00, &
     & 0.6307000E+00, 0.6359400E+00, 0.5570500E+00, 0.5570500E+00 /
      data (ref_adm(16,iz,36,15),iz = 1,20) / &
     & 0.3681300E+00, 0.3681300E+00, 0.3753200E+00, 0.3755100E+00, &
     & 0.3793400E+00, 0.3980400E+00, 0.4077500E+00, 0.4165600E+00, &
     & 0.4325000E+00, 0.4514500E+00, 0.4684600E+00, 0.4787000E+00, &
     & 0.5104500E+00, 0.5509000E+00, 0.5876600E+00, 0.6259400E+00, &
     & 0.6524500E+00, 0.6497400E+00, 0.5638100E+00, 0.5638100E+00 /
      data (ref_adm(16,iz,37,15),iz = 1,20) / &
     & 0.3756000E+00, 0.3756000E+00, 0.3702000E+00, 0.3715000E+00, &
     & 0.3738600E+00, 0.3904400E+00, 0.4105700E+00, 0.4220300E+00, &
     & 0.4387400E+00, 0.4492700E+00, 0.4569300E+00, 0.4856700E+00, &
     & 0.5151400E+00, 0.5601100E+00, 0.6035800E+00, 0.6490700E+00, &
     & 0.6759600E+00, 0.6825700E+00, 0.5740900E+00, 0.5740900E+00 /
      data (ref_adm(16,iz,38,15),iz = 1,20) / &
     & 0.3756000E+00, 0.3756000E+00, 0.3702000E+00, 0.3715000E+00, &
     & 0.3738600E+00, 0.3904400E+00, 0.4105700E+00, 0.4220300E+00, &
     & 0.4387400E+00, 0.4492700E+00, 0.4569300E+00, 0.4856700E+00, &
     & 0.5151400E+00, 0.5601100E+00, 0.6035800E+00, 0.6490700E+00, &
     & 0.6759600E+00, 0.6825700E+00, 0.5740900E+00, 0.5740900E+00 /
! Solar Zenith Angle 75.0 Albedo  0.4769802E+00
      data (ref_adm(16,iz, 1,16),iz = 1,20) / &
     & 0.3655900E+00, 0.3655900E+00, 0.3623200E+00, 0.3682700E+00, &
     & 0.3819400E+00, 0.3982700E+00, 0.4137000E+00, 0.4441400E+00, &
     & 0.4673800E+00, 0.5127300E+00, 0.5633800E+00, 0.6262900E+00, &
     & 0.7393500E+00, 0.8009900E+00, 0.8995920E+00, 0.1023505E+01, &
     & 0.1124697E+01, 0.1173197E+01, 0.8771285E+00, 0.8771285E+00 /
      data (ref_adm(16,iz, 2,16),iz = 1,20) / &
     & 0.3655900E+00, 0.3655900E+00, 0.3623200E+00, 0.3682700E+00, &
     & 0.3819400E+00, 0.3982700E+00, 0.4137000E+00, 0.4441400E+00, &
     & 0.4673800E+00, 0.5127300E+00, 0.5633800E+00, 0.6262900E+00, &
     & 0.7393500E+00, 0.8009900E+00, 0.8995920E+00, 0.1023505E+01, &
     & 0.1124697E+01, 0.1173197E+01, 0.8771285E+00, 0.8771285E+00 /
      data (ref_adm(16,iz, 3,16),iz = 1,20) / &
     & 0.3483500E+00, 0.3483500E+00, 0.3691100E+00, 0.3772600E+00, &
     & 0.3766900E+00, 0.3990900E+00, 0.4160700E+00, 0.4329800E+00, &
     & 0.4803600E+00, 0.5092500E+00, 0.5486800E+00, 0.6211900E+00, &
     & 0.6804400E+00, 0.7681600E+00, 0.8916861E+00, 0.1012202E+01, &
     & 0.1110083E+01, 0.1153595E+01, 0.2487511E+00, 0.2487511E+00 /
      data (ref_adm(16,iz, 4,16),iz = 1,20) / &
     & 0.3528600E+00, 0.3528600E+00, 0.3578500E+00, 0.3718200E+00, &
     & 0.3898800E+00, 0.3899600E+00, 0.4035300E+00, 0.4285300E+00, &
     & 0.4742000E+00, 0.5087400E+00, 0.5453900E+00, 0.6147400E+00, &
     & 0.6751500E+00, 0.7306500E+00, 0.8745435E+00, 0.9878762E+00, &
     & 0.1079409E+01, 0.1114233E+01, 0.8331687E+00, 0.8331687E+00 /
      data (ref_adm(16,iz, 5,16),iz = 1,20) / &
     & 0.3630800E+00, 0.3630800E+00, 0.3596100E+00, 0.3647700E+00, &
     & 0.3817100E+00, 0.3923900E+00, 0.4045800E+00, 0.4297900E+00, &
     & 0.4555100E+00, 0.4850700E+00, 0.5357400E+00, 0.6137500E+00, &
     & 0.6545000E+00, 0.7597100E+00, 0.8503190E+00, 0.9542038E+00, &
     & 0.1037326E+01, 0.1062453E+01, 0.7951162E+00, 0.7951162E+00 /
      data (ref_adm(16,iz, 6,16),iz = 1,20) / &
     & 0.3524900E+00, 0.3524900E+00, 0.3596200E+00, 0.3637300E+00, &
     & 0.3675400E+00, 0.3869700E+00, 0.4051000E+00, 0.4275900E+00, &
     & 0.4484100E+00, 0.4778300E+00, 0.5235800E+00, 0.5785900E+00, &
     & 0.6466600E+00, 0.7549300E+00, 0.8876800E+00, 0.1091200E+01, &
     & 0.1309800E+01, 0.1427400E+01, 0.7532594E+00, 0.7532594E+00 /
      data (ref_adm(16,iz, 7,16),iz = 1,20) / &
     & 0.3825800E+00, 0.3825800E+00, 0.3855300E+00, 0.3904800E+00, &
     & 0.3981100E+00, 0.4038700E+00, 0.4222900E+00, 0.4446300E+00, &
     & 0.4666800E+00, 0.5024700E+00, 0.5336000E+00, 0.5896800E+00, &
     & 0.6567300E+00, 0.7537300E+00, 0.8663500E+00, 0.9929400E+00, &
     & 0.1192100E+01, 0.1312800E+01, 0.1183100E+01, 0.1183100E+01 /
      data (ref_adm(16,iz, 8,16),iz = 1,20) / &
     & 0.3786500E+00, 0.3786500E+00, 0.3881900E+00, 0.3924600E+00, &
     & 0.3928500E+00, 0.4038500E+00, 0.3998600E+00, 0.4268900E+00, &
     & 0.4309700E+00, 0.4674300E+00, 0.4925000E+00, 0.5393900E+00, &
     & 0.6071200E+00, 0.6937300E+00, 0.7867100E+00, 0.9029000E+00, &
     & 0.1084200E+01, 0.1129300E+01, 0.1061500E+01, 0.1061500E+01 /
      data (ref_adm(16,iz, 9,16),iz = 1,20) / &
     & 0.3718300E+00, 0.3718300E+00, 0.3715400E+00, 0.3821800E+00, &
     & 0.3950000E+00, 0.3905300E+00, 0.4110100E+00, 0.4234500E+00, &
     & 0.4300900E+00, 0.4478500E+00, 0.4920200E+00, 0.5219800E+00, &
     & 0.5861800E+00, 0.6378800E+00, 0.7327700E+00, 0.8481100E+00, &
     & 0.9716500E+00, 0.9870500E+00, 0.9397500E+00, 0.9397500E+00 /
      data (ref_adm(16,iz,10,16),iz = 1,20) / &
     & 0.3739700E+00, 0.3739700E+00, 0.3652300E+00, 0.3670800E+00, &
     & 0.3713600E+00, 0.3873500E+00, 0.4054200E+00, 0.4148600E+00, &
     & 0.4203700E+00, 0.4482400E+00, 0.4809400E+00, 0.4988700E+00, &
     & 0.5453600E+00, 0.6119100E+00, 0.6922800E+00, 0.7886800E+00, &
     & 0.8810400E+00, 0.8893500E+00, 0.8561700E+00, 0.8561700E+00 /
      data (ref_adm(16,iz,11,16),iz = 1,20) / &
     & 0.3641800E+00, 0.3641800E+00, 0.3655800E+00, 0.3732500E+00, &
     & 0.3785600E+00, 0.3997900E+00, 0.4004200E+00, 0.3982400E+00, &
     & 0.4182900E+00, 0.4363600E+00, 0.4618300E+00, 0.4969300E+00, &
     & 0.5391700E+00, 0.5926300E+00, 0.6545100E+00, 0.7020400E+00, &
     & 0.7925400E+00, 0.8016500E+00, 0.7717800E+00, 0.7717800E+00 /
      data (ref_adm(16,iz,12,16),iz = 1,20) / &
     & 0.3623200E+00, 0.3623200E+00, 0.3644300E+00, 0.3773400E+00, &
     & 0.3870900E+00, 0.3947600E+00, 0.3997900E+00, 0.3930800E+00, &
     & 0.4041900E+00, 0.4275500E+00, 0.4518300E+00, 0.4828600E+00, &
     & 0.5038400E+00, 0.5516400E+00, 0.6022400E+00, 0.6539400E+00, &
     & 0.7269300E+00, 0.7332800E+00, 0.7252900E+00, 0.7252900E+00 /
      data (ref_adm(16,iz,13,16),iz = 1,20) / &
     & 0.3663700E+00, 0.3663700E+00, 0.3660900E+00, 0.3690400E+00, &
     & 0.3728000E+00, 0.3782000E+00, 0.3860400E+00, 0.3883000E+00, &
     & 0.4039600E+00, 0.4160200E+00, 0.4508900E+00, 0.4695100E+00, &
     & 0.4832500E+00, 0.5181600E+00, 0.5858400E+00, 0.6160600E+00, &
     & 0.6698400E+00, 0.6921000E+00, 0.6523300E+00, 0.6523300E+00 /
      data (ref_adm(16,iz,14,16),iz = 1,20) / &
     & 0.3923800E+00, 0.3923800E+00, 0.4016300E+00, 0.4024300E+00, &
     & 0.3998700E+00, 0.4039700E+00, 0.4074100E+00, 0.4138200E+00, &
     & 0.4198700E+00, 0.4294000E+00, 0.4461700E+00, 0.4592300E+00, &
     & 0.4727700E+00, 0.4960500E+00, 0.5344700E+00, 0.5915300E+00, &
     & 0.6428400E+00, 0.6696200E+00, 0.4766043E+00, 0.4766043E+00 /
      data (ref_adm(16,iz,15,16),iz = 1,20) / &
     & 0.3811300E+00, 0.3811300E+00, 0.3576600E+00, 0.3555900E+00, &
     & 0.3574900E+00, 0.3643600E+00, 0.3679600E+00, 0.3787700E+00, &
     & 0.3844100E+00, 0.3994000E+00, 0.4160900E+00, 0.4377300E+00, &
     & 0.4627300E+00, 0.4933900E+00, 0.5216600E+00, 0.5544700E+00, &
     & 0.5940900E+00, 0.6748100E+00, 0.4577192E+00, 0.4577192E+00 /
      data (ref_adm(16,iz,16,16),iz = 1,20) / &
     & 0.3462200E+00, 0.3462200E+00, 0.3395300E+00, 0.3392200E+00, &
     & 0.3399600E+00, 0.3472800E+00, 0.3492300E+00, 0.3539400E+00, &
     & 0.3612900E+00, 0.3697200E+00, 0.3774600E+00, 0.3882400E+00, &
     & 0.4032100E+00, 0.4287000E+00, 0.4940700E+00, 0.5397300E+00, &
     & 0.5910300E+00, 0.5018219E+00, 0.4416846E+00, 0.4416846E+00 /
      data (ref_adm(16,iz,17,16),iz = 1,20) / &
     & 0.3524500E+00, 0.3524500E+00, 0.3712200E+00, 0.3776000E+00, &
     & 0.3706800E+00, 0.3659600E+00, 0.3783300E+00, 0.3885600E+00, &
     & 0.3856900E+00, 0.3936600E+00, 0.3986300E+00, 0.4200200E+00, &
     & 0.4394600E+00, 0.4587700E+00, 0.4783300E+00, 0.5263500E+00, &
     & 0.5614800E+00, 0.4806108E+00, 0.4284886E+00, 0.4284886E+00 /
      data (ref_adm(16,iz,18,16),iz = 1,20) / &
     & 0.3501200E+00, 0.3501200E+00, 0.3727100E+00, 0.3711400E+00, &
     & 0.3676100E+00, 0.3690300E+00, 0.3704500E+00, 0.3676000E+00, &
     & 0.3773200E+00, 0.3878900E+00, 0.4024000E+00, 0.4139300E+00, &
     & 0.4191700E+00, 0.4519900E+00, 0.4657400E+00, 0.5032400E+00, &
     & 0.5603300E+00, 0.6182589E+00, 0.6478235E+00, 0.6478235E+00 /
      data (ref_adm(16,iz,19,16),iz = 1,20) / &
     & 0.3483600E+00, 0.3483600E+00, 0.3629500E+00, 0.3616500E+00, &
     & 0.3662300E+00, 0.3561000E+00, 0.3699300E+00, 0.3752000E+00, &
     & 0.3846900E+00, 0.3876800E+00, 0.3942800E+00, 0.4013900E+00, &
     & 0.4204400E+00, 0.4403100E+00, 0.4600100E+00, 0.5112200E+00, &
     & 0.5497274E+00, 0.6035007E+00, 0.6327587E+00, 0.6327587E+00 /
      data (ref_adm(16,iz,20,16),iz = 1,20) / &
     & 0.3622700E+00, 0.3622700E+00, 0.3663100E+00, 0.3688000E+00, &
     & 0.3645600E+00, 0.3625100E+00, 0.3697700E+00, 0.3706900E+00, &
     & 0.3867800E+00, 0.3848400E+00, 0.3916300E+00, 0.3960900E+00, &
     & 0.4281000E+00, 0.4459800E+00, 0.4548800E+00, 0.5497700E+00, &
     & 0.5420960E+00, 0.5936892E+00, 0.6240887E+00, 0.6240887E+00 /
      data (ref_adm(16,iz,21,16),iz = 1,20) / &
     & 0.3604800E+00, 0.3604800E+00, 0.3742500E+00, 0.3642000E+00, &
     & 0.3647700E+00, 0.3655200E+00, 0.3736100E+00, 0.3759300E+00, &
     & 0.3744200E+00, 0.3773200E+00, 0.3870000E+00, 0.3875800E+00, &
     & 0.4308300E+00, 0.4401500E+00, 0.4626000E+00, 0.4887900E+00, &
     & 0.5355638E+00, 0.5854316E+00, 0.6193388E+00, 0.6193388E+00 /
      data (ref_adm(16,iz,22,16),iz = 1,20) / &
     & 0.3668200E+00, 0.3668200E+00, 0.3640800E+00, 0.3753300E+00, &
     & 0.3495400E+00, 0.3571400E+00, 0.3762200E+00, 0.3825500E+00, &
     & 0.3874700E+00, 0.3887200E+00, 0.3891800E+00, 0.4045800E+00, &
     & 0.4232600E+00, 0.4408900E+00, 0.4632300E+00, 0.4849500E+00, &
     & 0.5212122E+00, 0.5319019E+00, 0.5470818E+00, 0.5470818E+00 /
      data (ref_adm(16,iz,23,16),iz = 1,20) / &
     & 0.3467500E+00, 0.3467500E+00, 0.3558300E+00, 0.3560800E+00, &
     & 0.3376100E+00, 0.3497600E+00, 0.3670900E+00, 0.3726800E+00, &
     & 0.3696600E+00, 0.3831300E+00, 0.3851500E+00, 0.4040400E+00, &
     & 0.4252800E+00, 0.4415300E+00, 0.4703200E+00, 0.4991700E+00, &
     & 0.5187970E+00, 0.5308367E+00, 0.5538408E+00, 0.5538408E+00 /
      data (ref_adm(16,iz,24,16),iz = 1,20) / &
     & 0.3491000E+00, 0.3491000E+00, 0.3418500E+00, 0.3407500E+00, &
     & 0.3411300E+00, 0.3449000E+00, 0.3490300E+00, 0.3532400E+00, &
     & 0.3605000E+00, 0.3632700E+00, 0.3722100E+00, 0.3838600E+00, &
     & 0.4024000E+00, 0.4252600E+00, 0.4614800E+00, 0.5105800E+00, &
     & 0.5304700E+00, 0.5347172E+00, 0.5652411E+00, 0.5652411E+00 /
      data (ref_adm(16,iz,25,16),iz = 1,20) / &
     & 0.3717700E+00, 0.3717700E+00, 0.3891200E+00, 0.3883900E+00, &
     & 0.3858800E+00, 0.3864000E+00, 0.3878700E+00, 0.3931300E+00, &
     & 0.3964300E+00, 0.4040200E+00, 0.4179000E+00, 0.4327700E+00, &
     & 0.4521900E+00, 0.4780400E+00, 0.4930800E+00, 0.5252900E+00, &
     & 0.5488700E+00, 0.6116400E+00, 0.5804190E+00, 0.5804190E+00 /
      data (ref_adm(16,iz,26,16),iz = 1,20) / &
     & 0.3739700E+00, 0.3739700E+00, 0.3734500E+00, 0.3752600E+00, &
     & 0.3767900E+00, 0.3798300E+00, 0.3773900E+00, 0.3928300E+00, &
     & 0.3956200E+00, 0.4096200E+00, 0.4068100E+00, 0.4102600E+00, &
     & 0.4289100E+00, 0.4559800E+00, 0.4840000E+00, 0.5359400E+00, &
     & 0.5786100E+00, 0.6083100E+00, 0.6005896E+00, 0.6005896E+00 /
      data (ref_adm(16,iz,27,16),iz = 1,20) / &
     & 0.3647800E+00, 0.3647800E+00, 0.3694000E+00, 0.3694700E+00, &
     & 0.3740600E+00, 0.3759300E+00, 0.3929600E+00, 0.3952600E+00, &
     & 0.3997700E+00, 0.4108000E+00, 0.4198900E+00, 0.4332100E+00, &
     & 0.4611200E+00, 0.4795200E+00, 0.5137300E+00, 0.5428000E+00, &
     & 0.5802600E+00, 0.6131900E+00, 0.5557400E+00, 0.5557400E+00 /
      data (ref_adm(16,iz,28,16),iz = 1,20) / &
     & 0.3548100E+00, 0.3548100E+00, 0.3763200E+00, 0.3735800E+00, &
     & 0.3814500E+00, 0.3828200E+00, 0.3831100E+00, 0.3874900E+00, &
     & 0.4024800E+00, 0.4127200E+00, 0.4289400E+00, 0.4412600E+00, &
     & 0.4568800E+00, 0.4853200E+00, 0.5133800E+00, 0.5669300E+00, &
     & 0.6037000E+00, 0.6344800E+00, 0.5849000E+00, 0.5849000E+00 /
      data (ref_adm(16,iz,29,16),iz = 1,20) / &
     & 0.3677700E+00, 0.3677700E+00, 0.3692500E+00, 0.3735100E+00, &
     & 0.3841100E+00, 0.3796800E+00, 0.3814000E+00, 0.3935500E+00, &
     & 0.4120100E+00, 0.4196000E+00, 0.4221600E+00, 0.4417700E+00, &
     & 0.4728800E+00, 0.5037100E+00, 0.5427100E+00, 0.5933000E+00, &
     & 0.6199700E+00, 0.6601400E+00, 0.5973300E+00, 0.5973300E+00 /
      data (ref_adm(16,iz,30,16),iz = 1,20) / &
     & 0.3674300E+00, 0.3674300E+00, 0.3763500E+00, 0.3740300E+00, &
     & 0.3771500E+00, 0.3834400E+00, 0.3863300E+00, 0.3965000E+00, &
     & 0.4029100E+00, 0.4155200E+00, 0.4305100E+00, 0.4568900E+00, &
     & 0.4800800E+00, 0.5204500E+00, 0.5503800E+00, 0.6019300E+00, &
     & 0.6559400E+00, 0.6871600E+00, 0.6255300E+00, 0.6255300E+00 /
      data (ref_adm(16,iz,31,16),iz = 1,20) / &
     & 0.3762400E+00, 0.3762400E+00, 0.3841400E+00, 0.3727900E+00, &
     & 0.3621800E+00, 0.3817400E+00, 0.3909700E+00, 0.3963100E+00, &
     & 0.4027900E+00, 0.4241200E+00, 0.4549900E+00, 0.4755600E+00, &
     & 0.4873800E+00, 0.5353700E+00, 0.5670700E+00, 0.6181900E+00, &
     & 0.6658100E+00, 0.6995300E+00, 0.6305200E+00, 0.6305200E+00 /
      data (ref_adm(16,iz,32,16),iz = 1,20) / &
     & 0.3725500E+00, 0.3725500E+00, 0.3830900E+00, 0.3903600E+00, &
     & 0.3891800E+00, 0.3899800E+00, 0.3998900E+00, 0.4148700E+00, &
     & 0.4338100E+00, 0.4544200E+00, 0.4684300E+00, 0.4916500E+00, &
     & 0.5168900E+00, 0.5539500E+00, 0.5887000E+00, 0.6476800E+00, &
     & 0.6942100E+00, 0.7262100E+00, 0.6513600E+00, 0.6513600E+00 /
      data (ref_adm(16,iz,33,16),iz = 1,20) / &
     & 0.3634000E+00, 0.3634000E+00, 0.3548700E+00, 0.3631600E+00, &
     & 0.3697700E+00, 0.3731800E+00, 0.3750300E+00, 0.3878300E+00, &
     & 0.4038500E+00, 0.4208100E+00, 0.4441200E+00, 0.4682100E+00, &
     & 0.4924400E+00, 0.5283500E+00, 0.5759500E+00, 0.6238300E+00, &
     & 0.6760000E+00, 0.7165100E+00, 0.6418600E+00, 0.6418600E+00 /
      data (ref_adm(16,iz,34,16),iz = 1,20) / &
     & 0.3599300E+00, 0.3599300E+00, 0.3669500E+00, 0.3665700E+00, &
     & 0.3666900E+00, 0.3776000E+00, 0.3805200E+00, 0.3990500E+00, &
     & 0.4244500E+00, 0.4312300E+00, 0.4536700E+00, 0.4772500E+00, &
     & 0.5046100E+00, 0.5438800E+00, 0.5848300E+00, 0.6463900E+00, &
     & 0.7016100E+00, 0.7575900E+00, 0.6653300E+00, 0.6653300E+00 /
      data (ref_adm(16,iz,35,16),iz = 1,20) / &
     & 0.3513900E+00, 0.3513900E+00, 0.3578600E+00, 0.3702500E+00, &
     & 0.3763500E+00, 0.3706500E+00, 0.3898400E+00, 0.4076000E+00, &
     & 0.4162800E+00, 0.4381000E+00, 0.4521800E+00, 0.4743600E+00, &
     & 0.4995400E+00, 0.5470600E+00, 0.5929400E+00, 0.6475300E+00, &
     & 0.7074700E+00, 0.7529500E+00, 0.6626500E+00, 0.6626500E+00 /
      data (ref_adm(16,iz,36,16),iz = 1,20) / &
     & 0.3581900E+00, 0.3581900E+00, 0.3612100E+00, 0.3636000E+00, &
     & 0.3674800E+00, 0.3812400E+00, 0.3837200E+00, 0.3911600E+00, &
     & 0.4133200E+00, 0.4366100E+00, 0.4517900E+00, 0.4842600E+00, &
     & 0.5096700E+00, 0.5620000E+00, 0.6012600E+00, 0.6612400E+00, &
     & 0.7283100E+00, 0.7664800E+00, 0.6757500E+00, 0.6757500E+00 /
      data (ref_adm(16,iz,37,16),iz = 1,20) / &
     & 0.3637900E+00, 0.3637900E+00, 0.3635200E+00, 0.3712100E+00, &
     & 0.3767700E+00, 0.3817100E+00, 0.3805500E+00, 0.3938800E+00, &
     & 0.4074000E+00, 0.4276600E+00, 0.4513000E+00, 0.4793600E+00, &
     & 0.5128400E+00, 0.5598100E+00, 0.6143400E+00, 0.6713600E+00, &
     & 0.7584500E+00, 0.7920300E+00, 0.6994900E+00, 0.6994900E+00 /
      data (ref_adm(16,iz,38,16),iz = 1,20) / &
     & 0.3637900E+00, 0.3637900E+00, 0.3635200E+00, 0.3712100E+00, &
     & 0.3767700E+00, 0.3817100E+00, 0.3805500E+00, 0.3938800E+00, &
     & 0.4074000E+00, 0.4276600E+00, 0.4513000E+00, 0.4793600E+00, &
     & 0.5128400E+00, 0.5598100E+00, 0.6143400E+00, 0.6713600E+00, &
     & 0.7584500E+00, 0.7920300E+00, 0.6994900E+00, 0.6994900E+00 /
! Solar Zenith Angle 80.0 Albedo  0.4944665E+00
      data (ref_adm(16,iz, 1,17),iz = 1,20) / &
     & 0.3532800E+00, 0.3532800E+00, 0.3605600E+00, 0.3694000E+00, &
     & 0.3778800E+00, 0.3958700E+00, 0.4182200E+00, 0.4328200E+00, &
     & 0.4820900E+00, 0.5172900E+00, 0.5758500E+00, 0.6729400E+00, &
     & 0.7842246E+00, 0.8930060E+00, 0.1053045E+01, 0.1258718E+01, &
     & 0.1475598E+01, 0.1711996E+01, 0.1359685E+01, 0.1359685E+01 /
      data (ref_adm(16,iz, 2,17),iz = 1,20) / &
     & 0.3532800E+00, 0.3532800E+00, 0.3605600E+00, 0.3694000E+00, &
     & 0.3778800E+00, 0.3958700E+00, 0.4182200E+00, 0.4328200E+00, &
     & 0.4820900E+00, 0.5172900E+00, 0.5758500E+00, 0.6729400E+00, &
     & 0.7842246E+00, 0.8930060E+00, 0.1053045E+01, 0.1258718E+01, &
     & 0.1475598E+01, 0.1711996E+01, 0.1359685E+01, 0.1359685E+01 /
      data (ref_adm(16,iz, 3,17),iz = 1,20) / &
     & 0.3551900E+00, 0.3551900E+00, 0.3651900E+00, 0.3638500E+00, &
     & 0.3799000E+00, 0.3930900E+00, 0.4098200E+00, 0.4370700E+00, &
     & 0.4743300E+00, 0.5063500E+00, 0.5730100E+00, 0.6628100E+00, &
     & 0.7783617E+00, 0.8846725E+00, 0.1040627E+01, 0.1241503E+01, &
     & 0.1447761E+01, 0.1667098E+01, 0.3769593E+00, 0.3769593E+00 /
      data (ref_adm(16,iz, 4,17),iz = 1,20) / &
     & 0.3562700E+00, 0.3562700E+00, 0.3604800E+00, 0.3600900E+00, &
     & 0.3692700E+00, 0.3882700E+00, 0.4148500E+00, 0.4411900E+00, &
     & 0.4641400E+00, 0.5047500E+00, 0.5684000E+00, 0.6431100E+00, &
     & 0.7651669E+00, 0.8663701E+00, 0.1014285E+01, 0.1204648E+01, &
     & 0.1391846E+01, 0.1579450E+01, 0.1233713E+01, 0.1233713E+01 /
      data (ref_adm(16,iz, 5,17),iz = 1,20) / &
     & 0.3553000E+00, 0.3553000E+00, 0.3553900E+00, 0.3631900E+00, &
     & 0.3601600E+00, 0.3843300E+00, 0.4153600E+00, 0.4343800E+00, &
     & 0.4621900E+00, 0.4955000E+00, 0.5560800E+00, 0.6279400E+00, &
     & 0.7471002E+00, 0.8415571E+00, 0.9779032E+00, 0.1154520E+01, &
     & 0.1317436E+01, 0.1467059E+01, 0.1139099E+01, 0.1139099E+01 /
      data (ref_adm(16,iz, 6,17),iz = 1,20) / &
     & 0.3395000E+00, 0.3395000E+00, 0.3439000E+00, 0.3529900E+00, &
     & 0.3653800E+00, 0.3731300E+00, 0.3942400E+00, 0.4185700E+00, &
     & 0.4523900E+00, 0.4912600E+00, 0.5442000E+00, 0.6100100E+00, &
     & 0.7281300E+00, 0.8675800E+00, 0.1047400E+01, 0.1301300E+01, &
     & 0.1640200E+01, 0.1872700E+01, 0.1044250E+01, 0.1044250E+01 /
      data (ref_adm(16,iz, 7,17),iz = 1,20) / &
     & 0.3530900E+00, 0.3530900E+00, 0.3559600E+00, 0.3683100E+00, &
     & 0.3789400E+00, 0.4003200E+00, 0.4143400E+00, 0.4227900E+00, &
     & 0.4516000E+00, 0.4926500E+00, 0.5452800E+00, 0.5933000E+00, &
     & 0.7122300E+00, 0.8270600E+00, 0.9736300E+00, 0.1190500E+01, &
     & 0.1485700E+01, 0.1665700E+01, 0.1544700E+01, 0.1544700E+01 /
      data (ref_adm(16,iz, 8,17),iz = 1,20) / &
     & 0.3495500E+00, 0.3495500E+00, 0.3658300E+00, 0.3529700E+00, &
     & 0.3676100E+00, 0.3875400E+00, 0.3882400E+00, 0.4123600E+00, &
     & 0.4332300E+00, 0.4669900E+00, 0.5079800E+00, 0.5543000E+00, &
     & 0.6722700E+00, 0.7911400E+00, 0.9042500E+00, 0.1108100E+01, &
     & 0.1351700E+01, 0.1436100E+01, 0.1330700E+01, 0.1330700E+01 /
      data (ref_adm(16,iz, 9,17),iz = 1,20) / &
     & 0.3447600E+00, 0.3447600E+00, 0.3464600E+00, 0.3590500E+00, &
     & 0.3684300E+00, 0.3761800E+00, 0.3810500E+00, 0.4062800E+00, &
     & 0.4379100E+00, 0.4669800E+00, 0.4925200E+00, 0.5458700E+00, &
     & 0.6400600E+00, 0.7282500E+00, 0.8399300E+00, 0.1007100E+01, &
     & 0.1193600E+01, 0.1264400E+01, 0.1141300E+01, 0.1141300E+01 /
      data (ref_adm(16,iz,10,17),iz = 1,20) / &
     & 0.3490900E+00, 0.3490900E+00, 0.3508800E+00, 0.3541200E+00, &
     & 0.3614900E+00, 0.3701300E+00, 0.3816300E+00, 0.4048400E+00, &
     & 0.4261700E+00, 0.4421600E+00, 0.4817100E+00, 0.5184500E+00, &
     & 0.6036300E+00, 0.6837000E+00, 0.7745700E+00, 0.9027300E+00, &
     & 0.1062100E+01, 0.1129000E+01, 0.1019200E+01, 0.1019200E+01 /
      data (ref_adm(16,iz,11,17),iz = 1,20) / &
     & 0.3499900E+00, 0.3499900E+00, 0.3568500E+00, 0.3472200E+00, &
     & 0.3489500E+00, 0.3571500E+00, 0.3836400E+00, 0.3957600E+00, &
     & 0.4087900E+00, 0.4315100E+00, 0.4561300E+00, 0.5009100E+00, &
     & 0.5718000E+00, 0.6452800E+00, 0.7173700E+00, 0.8259500E+00, &
     & 0.9317200E+00, 0.9909700E+00, 0.9482400E+00, 0.9482400E+00 /
      data (ref_adm(16,iz,12,17),iz = 1,20) / &
     & 0.3445600E+00, 0.3445600E+00, 0.3494100E+00, 0.3438200E+00, &
     & 0.3499200E+00, 0.3615900E+00, 0.3863800E+00, 0.3958800E+00, &
     & 0.4075800E+00, 0.4211400E+00, 0.4359900E+00, 0.4817200E+00, &
     & 0.5538800E+00, 0.5980100E+00, 0.6532200E+00, 0.7319000E+00, &
     & 0.8424700E+00, 0.8866700E+00, 0.8374900E+00, 0.8374900E+00 /
      data (ref_adm(16,iz,13,17),iz = 1,20) / &
     & 0.3420600E+00, 0.3420600E+00, 0.3483000E+00, 0.3510300E+00, &
     & 0.3596300E+00, 0.3611600E+00, 0.3775900E+00, 0.3969600E+00, &
     & 0.4050200E+00, 0.4162700E+00, 0.4372100E+00, 0.4696500E+00, &
     & 0.5140200E+00, 0.5713200E+00, 0.6047200E+00, 0.6770500E+00, &
     & 0.7712600E+00, 0.8119700E+00, 0.8081300E+00, 0.8081300E+00 /
      data (ref_adm(16,iz,14,17),iz = 1,20) / &
     & 0.3849400E+00, 0.3849400E+00, 0.3901500E+00, 0.3864200E+00, &
     & 0.3925800E+00, 0.3976700E+00, 0.4004600E+00, 0.4066500E+00, &
     & 0.4169300E+00, 0.4302200E+00, 0.4460200E+00, 0.4638200E+00, &
     & 0.4951000E+00, 0.5189900E+00, 0.5530900E+00, 0.6169700E+00, &
     & 0.7109500E+00, 0.8011300E+00, 0.5692667E+00, 0.5692667E+00 /
      data (ref_adm(16,iz,15,17),iz = 1,20) / &
     & 0.3454500E+00, 0.3454500E+00, 0.3215000E+00, 0.3223300E+00, &
     & 0.3256400E+00, 0.3309600E+00, 0.3370100E+00, 0.3444700E+00, &
     & 0.3503300E+00, 0.3635200E+00, 0.3792900E+00, 0.3962900E+00, &
     & 0.4201100E+00, 0.4526900E+00, 0.5451300E+00, 0.5924100E+00, &
     & 0.6509100E+00, 0.7536000E+00, 0.5415371E+00, 0.5415371E+00 /
      data (ref_adm(16,iz,16,17),iz = 1,20) / &
     & 0.3380300E+00, 0.3380300E+00, 0.3481500E+00, 0.3532600E+00, &
     & 0.3593900E+00, 0.3622400E+00, 0.3683000E+00, 0.3731000E+00, &
     & 0.3808600E+00, 0.3927200E+00, 0.4027900E+00, 0.4197200E+00, &
     & 0.4359200E+00, 0.4557300E+00, 0.5176400E+00, 0.5571300E+00, &
     & 0.5817200E+00, 0.5648954E+00, 0.5188213E+00, 0.5188213E+00 /
      data (ref_adm(16,iz,17,17),iz = 1,20) / &
     & 0.3404400E+00, 0.3404400E+00, 0.3485900E+00, 0.3575600E+00, &
     & 0.3630700E+00, 0.3633300E+00, 0.3589000E+00, 0.3678600E+00, &
     & 0.3848000E+00, 0.3923900E+00, 0.4074500E+00, 0.4246600E+00, &
     & 0.4406500E+00, 0.4620700E+00, 0.4888500E+00, 0.5193100E+00, &
     & 0.6922600E+00, 0.5372078E+00, 0.5001153E+00, 0.5001153E+00 /
      data (ref_adm(16,iz,18,17),iz = 1,20) / &
     & 0.3344100E+00, 0.3344100E+00, 0.3504000E+00, 0.3490300E+00, &
     & 0.3488500E+00, 0.3621300E+00, 0.3609500E+00, 0.3745100E+00, &
     & 0.3881700E+00, 0.3907200E+00, 0.4003800E+00, 0.4100600E+00, &
     & 0.4354100E+00, 0.4418300E+00, 0.4685600E+00, 0.4962900E+00, &
     & 0.6046658E+00, 0.7021407E+00, 0.8143268E+00, 0.8143268E+00 /
      data (ref_adm(16,iz,19,17),iz = 1,20) / &
     & 0.3368000E+00, 0.3368000E+00, 0.3539800E+00, 0.3507200E+00, &
     & 0.3615500E+00, 0.3636600E+00, 0.3608300E+00, 0.3734500E+00, &
     & 0.3769100E+00, 0.3899500E+00, 0.4001700E+00, 0.4114900E+00, &
     & 0.4185100E+00, 0.4448000E+00, 0.4695000E+00, 0.4701700E+00, &
     & 0.5920520E+00, 0.6841784E+00, 0.7936125E+00, 0.7936125E+00 /
      data (ref_adm(16,iz,20,17),iz = 1,20) / &
     & 0.3488900E+00, 0.3488900E+00, 0.3517200E+00, 0.3481300E+00, &
     & 0.3564100E+00, 0.3538100E+00, 0.3663600E+00, 0.3669500E+00, &
     & 0.3734600E+00, 0.3890500E+00, 0.4049500E+00, 0.4097700E+00, &
     & 0.4279500E+00, 0.4440500E+00, 0.4505200E+00, 0.5280512E+00, &
     & 0.5836645E+00, 0.6720650E+00, 0.7818179E+00, 0.7818179E+00 /
      data (ref_adm(16,iz,21,17),iz = 1,20) / &
     & 0.3474100E+00, 0.3474100E+00, 0.3528500E+00, 0.3598300E+00, &
     & 0.3576300E+00, 0.3552100E+00, 0.3595300E+00, 0.3689900E+00, &
     & 0.3846400E+00, 0.3853400E+00, 0.3948000E+00, 0.3999300E+00, &
     & 0.4147600E+00, 0.4356500E+00, 0.4630900E+00, 0.5651400E+00, &
     & 0.5768436E+00, 0.6629392E+00, 0.7757372E+00, 0.7757372E+00 /
      data (ref_adm(16,iz,22,17),iz = 1,20) / &
     & 0.3458000E+00, 0.3458000E+00, 0.3477900E+00, 0.3487800E+00, &
     & 0.3608100E+00, 0.3619200E+00, 0.3563800E+00, 0.3652300E+00, &
     & 0.3732400E+00, 0.3787200E+00, 0.3947200E+00, 0.4010700E+00, &
     & 0.4224500E+00, 0.4374600E+00, 0.4658200E+00, 0.5155900E+00, &
     & 0.5654062E+00, 0.5985867E+00, 0.6538074E+00, 0.6538074E+00 /
      data (ref_adm(16,iz,23,17),iz = 1,20) / &
     & 0.3284600E+00, 0.3284600E+00, 0.3259900E+00, 0.3323000E+00, &
     & 0.3387300E+00, 0.3431400E+00, 0.3503400E+00, 0.3562100E+00, &
     & 0.3666300E+00, 0.3760600E+00, 0.3795700E+00, 0.3908700E+00, &
     & 0.4165400E+00, 0.4381200E+00, 0.4714700E+00, 0.5126100E+00, &
     & 0.6139700E+00, 0.5961492E+00, 0.6621197E+00, 0.6621197E+00 /
      data (ref_adm(16,iz,24,17),iz = 1,20) / &
     & 0.3472000E+00, 0.3472000E+00, 0.3384300E+00, 0.3362500E+00, &
     & 0.3381300E+00, 0.3402600E+00, 0.3470700E+00, 0.3523000E+00, &
     & 0.3588900E+00, 0.3674300E+00, 0.3770500E+00, 0.3889500E+00, &
     & 0.4118300E+00, 0.4307000E+00, 0.4623000E+00, 0.5252000E+00, &
     & 0.5778500E+00, 0.5997992E+00, 0.6765885E+00, 0.6765885E+00 /
      data (ref_adm(16,iz,25,17),iz = 1,20) / &
     & 0.3496500E+00, 0.3496500E+00, 0.3652100E+00, 0.3700500E+00, &
     & 0.3741900E+00, 0.3798100E+00, 0.3815400E+00, 0.3887300E+00, &
     & 0.3960400E+00, 0.4053500E+00, 0.4158100E+00, 0.4268100E+00, &
     & 0.4444100E+00, 0.4643200E+00, 0.4853400E+00, 0.5427700E+00, &
     & 0.5997800E+00, 0.6416400E+00, 0.6959852E+00, 0.6959852E+00 /
      data (ref_adm(16,iz,26,17),iz = 1,20) / &
     & 0.3548400E+00, 0.3548400E+00, 0.3463000E+00, 0.3519000E+00, &
     & 0.3547900E+00, 0.3550400E+00, 0.3638400E+00, 0.3820900E+00, &
     & 0.3819000E+00, 0.3910900E+00, 0.4001400E+00, 0.4172700E+00, &
     & 0.4503500E+00, 0.4818500E+00, 0.5110800E+00, 0.5677500E+00, &
     & 0.6260500E+00, 0.7064500E+00, 0.7218664E+00, 0.7218664E+00 /
      data (ref_adm(16,iz,27,17),iz = 1,20) / &
     & 0.3415400E+00, 0.3415400E+00, 0.3509400E+00, 0.3561600E+00, &
     & 0.3523700E+00, 0.3647200E+00, 0.3676900E+00, 0.3760200E+00, &
     & 0.3938700E+00, 0.4024700E+00, 0.4048800E+00, 0.4202300E+00, &
     & 0.4403000E+00, 0.4895600E+00, 0.5269400E+00, 0.5702700E+00, &
     & 0.6368300E+00, 0.7110000E+00, 0.7407700E+00, 0.7407700E+00 /
      data (ref_adm(16,iz,28,17),iz = 1,20) / &
     & 0.3327200E+00, 0.3327200E+00, 0.3538400E+00, 0.3548600E+00, &
     & 0.3484900E+00, 0.3480800E+00, 0.3616900E+00, 0.3821400E+00, &
     & 0.3936800E+00, 0.3991900E+00, 0.4160300E+00, 0.4373500E+00, &
     & 0.4602600E+00, 0.5010400E+00, 0.5354900E+00, 0.5823400E+00, &
     & 0.6581500E+00, 0.7421000E+00, 0.7272600E+00, 0.7272600E+00 /
      data (ref_adm(16,iz,29,17),iz = 1,20) / &
     & 0.3461300E+00, 0.3461300E+00, 0.3488100E+00, 0.3499600E+00, &
     & 0.3586200E+00, 0.3604600E+00, 0.3661300E+00, 0.3758100E+00, &
     & 0.3925900E+00, 0.4037400E+00, 0.4262900E+00, 0.4457300E+00, &
     & 0.4780800E+00, 0.5107100E+00, 0.5456600E+00, 0.6107300E+00, &
     & 0.6989500E+00, 0.7820400E+00, 0.7548100E+00, 0.7548100E+00 /
      data (ref_adm(16,iz,30,17),iz = 1,20) / &
     & 0.3505700E+00, 0.3505700E+00, 0.3498700E+00, 0.3503000E+00, &
     & 0.3553900E+00, 0.3647300E+00, 0.3722700E+00, 0.3827400E+00, &
     & 0.3972200E+00, 0.4165200E+00, 0.4370900E+00, 0.4575400E+00, &
     & 0.4885700E+00, 0.5181900E+00, 0.5626200E+00, 0.6451300E+00, &
     & 0.7301100E+00, 0.8187500E+00, 0.8022500E+00, 0.8022500E+00 /
      data (ref_adm(16,iz,31,17),iz = 1,20) / &
     & 0.3509600E+00, 0.3509600E+00, 0.3408700E+00, 0.3518300E+00, &
     & 0.3599400E+00, 0.3658400E+00, 0.3819000E+00, 0.3861500E+00, &
     & 0.4038000E+00, 0.4215200E+00, 0.4452000E+00, 0.4686600E+00, &
     & 0.5078800E+00, 0.5373900E+00, 0.5754000E+00, 0.6573300E+00, &
     & 0.7538700E+00, 0.8567800E+00, 0.8348900E+00, 0.8348900E+00 /
      data (ref_adm(16,iz,32,17),iz = 1,20) / &
     & 0.3567500E+00, 0.3567500E+00, 0.3519400E+00, 0.3604700E+00, &
     & 0.3715500E+00, 0.3744000E+00, 0.3856800E+00, 0.4034800E+00, &
     & 0.4177200E+00, 0.4359100E+00, 0.4609700E+00, 0.4942800E+00, &
     & 0.5270200E+00, 0.5541200E+00, 0.6021800E+00, 0.6784700E+00, &
     & 0.7759000E+00, 0.8714400E+00, 0.8209700E+00, 0.8209700E+00 /
      data (ref_adm(16,iz,33,17),iz = 1,20) / &
     & 0.3396400E+00, 0.3396400E+00, 0.3433000E+00, 0.3435500E+00, &
     & 0.3502900E+00, 0.3587400E+00, 0.3677900E+00, 0.3798400E+00, &
     & 0.3990300E+00, 0.4205500E+00, 0.4436700E+00, 0.4754100E+00, &
     & 0.5093200E+00, 0.5499900E+00, 0.6003200E+00, 0.6781400E+00, &
     & 0.7790200E+00, 0.8804500E+00, 0.8625500E+00, 0.8625500E+00 /
      data (ref_adm(16,iz,34,17),iz = 1,20) / &
     & 0.3460800E+00, 0.3460800E+00, 0.3582200E+00, 0.3548100E+00, &
     & 0.3591000E+00, 0.3687600E+00, 0.3775400E+00, 0.3895400E+00, &
     & 0.4039100E+00, 0.4314900E+00, 0.4557100E+00, 0.4854300E+00, &
     & 0.5208600E+00, 0.5616400E+00, 0.6086600E+00, 0.6864600E+00, &
     & 0.7809400E+00, 0.8894900E+00, 0.8543800E+00, 0.8543800E+00 /
      data (ref_adm(16,iz,35,17),iz = 1,20) / &
     & 0.3552200E+00, 0.3552200E+00, 0.3568700E+00, 0.3534300E+00, &
     & 0.3558000E+00, 0.3683200E+00, 0.3790600E+00, 0.4008700E+00, &
     & 0.4093400E+00, 0.4294300E+00, 0.4556200E+00, 0.4875700E+00, &
     & 0.5226700E+00, 0.5653800E+00, 0.6186100E+00, 0.6946900E+00, &
     & 0.7974000E+00, 0.9143200E+00, 0.8853200E+00, 0.8853200E+00 /
      data (ref_adm(16,iz,36,17),iz = 1,20) / &
     & 0.3496900E+00, 0.3496900E+00, 0.3532500E+00, 0.3579100E+00, &
     & 0.3632100E+00, 0.3762900E+00, 0.3886600E+00, 0.4001100E+00, &
     & 0.4071900E+00, 0.4392800E+00, 0.4582600E+00, 0.4842800E+00, &
     & 0.5311200E+00, 0.5728700E+00, 0.6302200E+00, 0.7033200E+00, &
     & 0.8156600E+00, 0.9334600E+00, 0.8975500E+00, 0.8975500E+00 /
      data (ref_adm(16,iz,37,17),iz = 1,20) / &
     & 0.3513700E+00, 0.3513700E+00, 0.3630300E+00, 0.3649500E+00, &
     & 0.3772600E+00, 0.3783100E+00, 0.3827200E+00, 0.3957400E+00, &
     & 0.4180100E+00, 0.4375300E+00, 0.4673200E+00, 0.4842800E+00, &
     & 0.5332100E+00, 0.5783500E+00, 0.6272800E+00, 0.7121000E+00, &
     & 0.8313100E+00, 0.9616600E+00, 0.9300100E+00, 0.9300100E+00 /
      data (ref_adm(16,iz,38,17),iz = 1,20) / &
     & 0.3513700E+00, 0.3513700E+00, 0.3630300E+00, 0.3649500E+00, &
     & 0.3772600E+00, 0.3783100E+00, 0.3827200E+00, 0.3957400E+00, &
     & 0.4180100E+00, 0.4375300E+00, 0.4673200E+00, 0.4842800E+00, &
     & 0.5332100E+00, 0.5783500E+00, 0.6272800E+00, 0.7121000E+00, &
     & 0.8313100E+00, 0.9616600E+00, 0.9300100E+00, 0.9300100E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6568460E+00
      data (ref_adm(16,iz, 1,18),iz = 1,20) / &
     & 0.4197000E+00, 0.4197000E+00, 0.4277600E+00, 0.4467200E+00, &
     & 0.4646400E+00, 0.4803200E+00, 0.5058400E+00, 0.5415100E+00, &
     & 0.5707800E+00, 0.6233500E+00, 0.7289900E+00, 0.8428900E+00, &
     & 0.1001451E+01, 0.1294516E+01, 0.2040925E+01, 0.3697152E+01, &
     & 0.2966808E+01, 0.4275245E+01, 0.6997098E+01, 0.6997098E+01 /
      data (ref_adm(16,iz, 2,18),iz = 1,20) / &
     & 0.4197000E+00, 0.4197000E+00, 0.4277600E+00, 0.4467200E+00, &
     & 0.4646400E+00, 0.4803200E+00, 0.5058400E+00, 0.5415100E+00, &
     & 0.5707800E+00, 0.6233500E+00, 0.7289900E+00, 0.8428900E+00, &
     & 0.1001451E+01, 0.1294516E+01, 0.2040925E+01, 0.3697152E+01, &
     & 0.2966808E+01, 0.4275245E+01, 0.6997098E+01, 0.6997098E+01 /
      data (ref_adm(16,iz, 3,18),iz = 1,20) / &
     & 0.4318500E+00, 0.4318500E+00, 0.4433100E+00, 0.4438900E+00, &
     & 0.4600300E+00, 0.4940900E+00, 0.5117200E+00, 0.5342400E+00, &
     & 0.5646200E+00, 0.6393300E+00, 0.7221200E+00, 0.8162200E+00, &
     & 0.9840308E+00, 0.1258978E+01, 0.1922974E+01, 0.3674564E+01, &
     & 0.3190452E+01, 0.3979191E+01, 0.3760980E+01, 0.3760980E+01 /
      data (ref_adm(16,iz, 4,18),iz = 1,20) / &
     & 0.4232600E+00, 0.4232600E+00, 0.4393300E+00, 0.4554500E+00, &
     & 0.4581200E+00, 0.4857600E+00, 0.5009500E+00, 0.5324900E+00, &
     & 0.5737300E+00, 0.6385300E+00, 0.7057500E+00, 0.7953400E+00, &
     & 0.9510123E+00, 0.1191736E+01, 0.1716233E+01, 0.3142544E+01, &
     & 0.4185991E+01, 0.3790978E+01, 0.4437473E+01, 0.4437473E+01 /
      data (ref_adm(16,iz, 5,18),iz = 1,20) / &
     & 0.4253100E+00, 0.4253100E+00, 0.4345200E+00, 0.4403100E+00, &
     & 0.4521600E+00, 0.4753800E+00, 0.4918900E+00, 0.5248200E+00, &
     & 0.5731200E+00, 0.6494700E+00, 0.7025200E+00, 0.7675400E+00, &
     & 0.9129604E+00, 0.1107819E+01, 0.1506780E+01, 0.2386565E+01, &
     & 0.4193179E+01, 0.5175568E+01, 0.4294708E+01, 0.4294708E+01 /
      data (ref_adm(16,iz, 6,18),iz = 1,20) / &
     & 0.4334400E+00, 0.4334400E+00, 0.4259600E+00, 0.4347700E+00, &
     & 0.4526300E+00, 0.4684800E+00, 0.4986800E+00, 0.5289600E+00, &
     & 0.5716000E+00, 0.6290700E+00, 0.6871800E+00, 0.7703000E+00, &
     & 0.8899900E+00, 0.1055500E+01, 0.1314200E+01, 0.1640500E+01, &
     & 0.2399400E+01, 0.2702600E+01, 0.2695700E+01, 0.2695700E+01 /
      data (ref_adm(16,iz, 7,18),iz = 1,20) / &
     & 0.4204200E+00, 0.4204200E+00, 0.4166600E+00, 0.4237700E+00, &
     & 0.4392900E+00, 0.4615800E+00, 0.4898300E+00, 0.5197900E+00, &
     & 0.5647500E+00, 0.6072500E+00, 0.6584600E+00, 0.7419000E+00, &
     & 0.9340800E+00, 0.1130100E+01, 0.1389300E+01, 0.1734900E+01, &
     & 0.2183000E+01, 0.2608300E+01, 0.2343600E+01, 0.2343600E+01 /
      data (ref_adm(16,iz, 8,18),iz = 1,20) / &
     & 0.4184900E+00, 0.4184900E+00, 0.4187000E+00, 0.4279500E+00, &
     & 0.4360200E+00, 0.4512500E+00, 0.4748800E+00, 0.5029900E+00, &
     & 0.5328200E+00, 0.5741300E+00, 0.6165400E+00, 0.7023000E+00, &
     & 0.8635700E+00, 0.1057900E+01, 0.1260400E+01, 0.1546100E+01, &
     & 0.1891500E+01, 0.2233900E+01, 0.2259100E+01, 0.2259100E+01 /
      data (ref_adm(16,iz, 9,18),iz = 1,20) / &
     & 0.4191600E+00, 0.4191600E+00, 0.4293400E+00, 0.4338700E+00, &
     & 0.4374800E+00, 0.4504100E+00, 0.4626600E+00, 0.4929200E+00, &
     & 0.5186400E+00, 0.5532900E+00, 0.5941100E+00, 0.6719200E+00, &
     & 0.8106200E+00, 0.9694400E+00, 0.1141900E+01, 0.1353900E+01, &
     & 0.1679400E+01, 0.1949900E+01, 0.1942500E+01, 0.1942500E+01 /
      data (ref_adm(16,iz,10,18),iz = 1,20) / &
     & 0.4207300E+00, 0.4207300E+00, 0.4278200E+00, 0.4289200E+00, &
     & 0.4443900E+00, 0.4458600E+00, 0.4665600E+00, 0.4788900E+00, &
     & 0.5215100E+00, 0.5321300E+00, 0.5826400E+00, 0.6461900E+00, &
     & 0.7580700E+00, 0.8953700E+00, 0.1039700E+01, 0.1278400E+01, &
     & 0.1507400E+01, 0.1731100E+01, 0.1684100E+01, 0.1684100E+01 /
      data (ref_adm(16,iz,11,18),iz = 1,20) / &
     & 0.4232900E+00, 0.4232900E+00, 0.4163300E+00, 0.4316400E+00, &
     & 0.4361100E+00, 0.4426800E+00, 0.4653800E+00, 0.4789300E+00, &
     & 0.4987400E+00, 0.5155000E+00, 0.5784600E+00, 0.6286400E+00, &
     & 0.7237500E+00, 0.8362700E+00, 0.9360000E+00, 0.1155400E+01, &
     & 0.1404000E+01, 0.1623800E+01, 0.1642900E+01, 0.1642900E+01 /
      data (ref_adm(16,iz,12,18),iz = 1,20) / &
     & 0.4189400E+00, 0.4189400E+00, 0.4088200E+00, 0.4208100E+00, &
     & 0.4439000E+00, 0.4419800E+00, 0.4571700E+00, 0.4630400E+00, &
     & 0.4886500E+00, 0.5138000E+00, 0.5527700E+00, 0.5882700E+00, &
     & 0.7000800E+00, 0.7864100E+00, 0.8524700E+00, 0.1050500E+01, &
     & 0.1216500E+01, 0.1455200E+01, 0.1417300E+01, 0.1417300E+01 /
      data (ref_adm(16,iz,13,18),iz = 1,20) / &
     & 0.4208000E+00, 0.4208000E+00, 0.4205100E+00, 0.4292100E+00, &
     & 0.4265000E+00, 0.4335100E+00, 0.4395200E+00, 0.4592500E+00, &
     & 0.4831400E+00, 0.4961600E+00, 0.5197800E+00, 0.5544800E+00, &
     & 0.6662500E+00, 0.7430900E+00, 0.8157600E+00, 0.9815600E+00, &
     & 0.1151400E+01, 0.1319200E+01, 0.1250600E+01, 0.1250600E+01 /
      data (ref_adm(16,iz,14,18),iz = 1,20) / &
     & 0.4368300E+00, 0.4368300E+00, 0.4369100E+00, 0.4326000E+00, &
     & 0.4319100E+00, 0.4354200E+00, 0.4374400E+00, 0.4400200E+00, &
     & 0.4520100E+00, 0.4583300E+00, 0.4768100E+00, 0.4987500E+00, &
     & 0.5396400E+00, 0.5964000E+00, 0.7972400E+00, 0.9115000E+00, &
     & 0.1054000E+01, 0.1277000E+01, 0.1715897E+01, 0.1715897E+01 /
      data (ref_adm(16,iz,15,18),iz = 1,20) / &
     & 0.4173000E+00, 0.4173000E+00, 0.4076000E+00, 0.4091400E+00, &
     & 0.4080300E+00, 0.4120300E+00, 0.4132500E+00, 0.4156800E+00, &
     & 0.4211500E+00, 0.4257900E+00, 0.4396600E+00, 0.4491200E+00, &
     & 0.4657600E+00, 0.4898400E+00, 0.7279100E+00, 0.8547500E+00, &
     & 0.9688700E+00, 0.1158616E+01, 0.1628829E+01, 0.1628829E+01 /
      data (ref_adm(16,iz,16,18),iz = 1,20) / &
     & 0.4203300E+00, 0.4203300E+00, 0.4256900E+00, 0.4275100E+00, &
     & 0.4259200E+00, 0.4298800E+00, 0.4308800E+00, 0.4434600E+00, &
     & 0.4545800E+00, 0.4640600E+00, 0.4687700E+00, 0.4834100E+00, &
     & 0.5018600E+00, 0.5258300E+00, 0.7032300E+00, 0.7868500E+00, &
     & 0.8699400E+00, 0.1106587E+01, 0.1557264E+01, 0.1557264E+01 /
      data (ref_adm(16,iz,17,18),iz = 1,20) / &
     & 0.4161000E+00, 0.4161000E+00, 0.4154200E+00, 0.4164600E+00, &
     & 0.4252600E+00, 0.4296200E+00, 0.4269000E+00, 0.4405500E+00, &
     & 0.4537600E+00, 0.4564300E+00, 0.4722500E+00, 0.5022300E+00, &
     & 0.5954500E+00, 0.6236400E+00, 0.6874800E+00, 0.7242300E+00, &
     & 0.8646691E+00, 0.1053914E+01, 0.1490007E+01, 0.1490007E+01 /
      data (ref_adm(16,iz,18,18),iz = 1,20) / &
     & 0.4157700E+00, 0.4157700E+00, 0.4224200E+00, 0.4221200E+00, &
     & 0.4238900E+00, 0.4241000E+00, 0.4312100E+00, 0.4349400E+00, &
     & 0.4519100E+00, 0.4454000E+00, 0.4673500E+00, 0.4894100E+00, &
     & 0.5633500E+00, 0.5974700E+00, 0.6596400E+00, 0.6820900E+00, &
     & 0.8208732E+00, 0.1019630E+01, 0.1483277E+01, 0.1483277E+01 /
      data (ref_adm(16,iz,19,18),iz = 1,20) / &
     & 0.4217700E+00, 0.4217700E+00, 0.4210700E+00, 0.4155400E+00, &
     & 0.4208400E+00, 0.4262100E+00, 0.4277600E+00, 0.4232500E+00, &
     & 0.4331700E+00, 0.4364900E+00, 0.4613200E+00, 0.5017600E+00, &
     & 0.5576000E+00, 0.6033700E+00, 0.6319700E+00, 0.6621000E+00, &
     & 0.7948078E+00, 0.9849485E+00, 0.1444677E+01, 0.1444677E+01 /
      data (ref_adm(16,iz,20,18),iz = 1,20) / &
     & 0.4120900E+00, 0.4120900E+00, 0.4217800E+00, 0.4178400E+00, &
     & 0.4281400E+00, 0.4289400E+00, 0.4353500E+00, 0.4223500E+00, &
     & 0.4228200E+00, 0.4452800E+00, 0.4598400E+00, 0.4882800E+00, &
     & 0.5621700E+00, 0.5823800E+00, 0.6432100E+00, 0.6791989E+00, &
     & 0.7774014E+00, 0.9614888E+00, 0.1425780E+01, 0.1425780E+01 /
      data (ref_adm(16,iz,21,18),iz = 1,20) / &
     & 0.4139900E+00, 0.4139900E+00, 0.4171900E+00, 0.4176000E+00, &
     & 0.4254900E+00, 0.4250800E+00, 0.4176700E+00, 0.4339600E+00, &
     & 0.4306500E+00, 0.4508500E+00, 0.4702500E+00, 0.4842200E+00, &
     & 0.5404500E+00, 0.5557100E+00, 0.5645800E+00, 0.6679242E+00, &
     & 0.7637062E+00, 0.9448810E+00, 0.1420420E+01, 0.1420420E+01 /
      data (ref_adm(16,iz,22,18),iz = 1,20) / &
     & 0.4177900E+00, 0.4177900E+00, 0.4264000E+00, 0.4269000E+00, &
     & 0.4100100E+00, 0.4243400E+00, 0.4212300E+00, 0.4335900E+00, &
     & 0.4444500E+00, 0.4390000E+00, 0.4696300E+00, 0.4856900E+00, &
     & 0.5085300E+00, 0.5330600E+00, 0.5420700E+00, 0.5357200E+00, &
     & 0.7611209E+00, 0.8794799E+00, 0.1179685E+01, 0.1179685E+01 /
      data (ref_adm(16,iz,23,18),iz = 1,20) / &
     & 0.4169500E+00, 0.4169500E+00, 0.4046500E+00, 0.4392800E+00, &
     & 0.4342600E+00, 0.4332900E+00, 0.4486400E+00, 0.4578300E+00, &
     & 0.4805200E+00, 0.4888100E+00, 0.5108500E+00, 0.5096900E+00, &
     & 0.5384200E+00, 0.5386900E+00, 0.5423000E+00, 0.5705100E+00, &
     & 0.7520430E+00, 0.8713973E+00, 0.1193473E+01, 0.1193473E+01 /
      data (ref_adm(16,iz,24,18),iz = 1,20) / &
     & 0.4272500E+00, 0.4272500E+00, 0.4170400E+00, 0.4124900E+00, &
     & 0.4192300E+00, 0.4251800E+00, 0.4272300E+00, 0.4396400E+00, &
     & 0.4477100E+00, 0.4630800E+00, 0.4814200E+00, 0.5081000E+00, &
     & 0.5423900E+00, 0.5903200E+00, 0.6095800E+00, 0.5878400E+00, &
     & 0.6469000E+00, 0.8708003E+00, 0.1218996E+01, 0.1218996E+01 /
      data (ref_adm(16,iz,25,18),iz = 1,20) / &
     & 0.4186900E+00, 0.4186900E+00, 0.4169600E+00, 0.4185900E+00, &
     & 0.4253200E+00, 0.4298700E+00, 0.4444200E+00, 0.4484700E+00, &
     & 0.4564300E+00, 0.4702600E+00, 0.4916200E+00, 0.5182400E+00, &
     & 0.5444100E+00, 0.5831700E+00, 0.5980600E+00, 0.6378000E+00, &
     & 0.7041800E+00, 0.8770103E+00, 0.1253984E+01, 0.1253984E+01 /
      data (ref_adm(16,iz,26,18),iz = 1,20) / &
     & 0.4145100E+00, 0.4145100E+00, 0.4241000E+00, 0.4246500E+00, &
     & 0.4272600E+00, 0.4299400E+00, 0.4339200E+00, 0.4524700E+00, &
     & 0.4703300E+00, 0.4834900E+00, 0.5005100E+00, 0.5220900E+00, &
     & 0.5525300E+00, 0.5812100E+00, 0.6200400E+00, 0.6831700E+00, &
     & 0.7695700E+00, 0.9071100E+00, 0.1302598E+01, 0.1302598E+01 /
      data (ref_adm(16,iz,27,18),iz = 1,20) / &
     & 0.4115400E+00, 0.4115400E+00, 0.4160400E+00, 0.4339500E+00, &
     & 0.4284700E+00, 0.4360200E+00, 0.4395600E+00, 0.4543200E+00, &
     & 0.4763400E+00, 0.4821600E+00, 0.5079100E+00, 0.5368300E+00, &
     & 0.5652200E+00, 0.6057700E+00, 0.6579000E+00, 0.7238800E+00, &
     & 0.8318400E+00, 0.9945000E+00, 0.1243900E+01, 0.1243900E+01 /
      data (ref_adm(16,iz,28,18),iz = 1,20) / &
     & 0.4070500E+00, 0.4070500E+00, 0.4261300E+00, 0.4202500E+00, &
     & 0.4298300E+00, 0.4371600E+00, 0.4373000E+00, 0.4488500E+00, &
     & 0.4791300E+00, 0.4819800E+00, 0.5140300E+00, 0.5434200E+00, &
     & 0.5976500E+00, 0.6368700E+00, 0.6956900E+00, 0.7774600E+00, &
     & 0.8895500E+00, 0.1155100E+01, 0.1300000E+01, 0.1300000E+01 /
      data (ref_adm(16,iz,29,18),iz = 1,20) / &
     & 0.4164300E+00, 0.4164300E+00, 0.4189800E+00, 0.4144000E+00, &
     & 0.4243500E+00, 0.4375500E+00, 0.4471200E+00, 0.4620400E+00, &
     & 0.4765700E+00, 0.4973700E+00, 0.5176700E+00, 0.5469800E+00, &
     & 0.6159900E+00, 0.6717500E+00, 0.7319000E+00, 0.8229100E+00, &
     & 0.9727800E+00, 0.1210400E+01, 0.1422000E+01, 0.1422000E+01 /
      data (ref_adm(16,iz,30,18),iz = 1,20) / &
     & 0.4176000E+00, 0.4176000E+00, 0.4128400E+00, 0.4204300E+00, &
     & 0.4276100E+00, 0.4251500E+00, 0.4429800E+00, 0.4531700E+00, &
     & 0.4838800E+00, 0.5037800E+00, 0.5326800E+00, 0.5619100E+00, &
     & 0.6208100E+00, 0.6847200E+00, 0.7550500E+00, 0.8956900E+00, &
     & 0.1050300E+01, 0.1268200E+01, 0.1455100E+01, 0.1455100E+01 /
      data (ref_adm(16,iz,31,18),iz = 1,20) / &
     & 0.4220200E+00, 0.4220200E+00, 0.4126900E+00, 0.4133400E+00, &
     & 0.4263200E+00, 0.4303300E+00, 0.4415500E+00, 0.4644200E+00, &
     & 0.4726900E+00, 0.5005100E+00, 0.5419700E+00, 0.5871800E+00, &
     & 0.6515100E+00, 0.7028200E+00, 0.7921400E+00, 0.9136200E+00, &
     & 0.1080700E+01, 0.1329800E+01, 0.1506000E+01, 0.1506000E+01 /
      data (ref_adm(16,iz,32,18),iz = 1,20) / &
     & 0.4253100E+00, 0.4253100E+00, 0.4223300E+00, 0.4236500E+00, &
     & 0.4187700E+00, 0.4351800E+00, 0.4526900E+00, 0.4644800E+00, &
     & 0.4938400E+00, 0.5269400E+00, 0.5463900E+00, 0.5965700E+00, &
     & 0.6538800E+00, 0.7237400E+00, 0.7900000E+00, 0.8972300E+00, &
     & 0.1069000E+01, 0.1313900E+01, 0.1501300E+01, 0.1501300E+01 /
      data (ref_adm(16,iz,33,18),iz = 1,20) / &
     & 0.4029800E+00, 0.4029800E+00, 0.4166100E+00, 0.4186900E+00, &
     & 0.4345100E+00, 0.4466600E+00, 0.4600400E+00, 0.4749800E+00, &
     & 0.4960200E+00, 0.5270500E+00, 0.5583000E+00, 0.6106300E+00, &
     & 0.6614700E+00, 0.7379900E+00, 0.8079500E+00, 0.9061900E+00, &
     & 0.1053200E+01, 0.1305400E+01, 0.1494500E+01, 0.1494500E+01 /
      data (ref_adm(16,iz,34,18),iz = 1,20) / &
     & 0.4294200E+00, 0.4294200E+00, 0.4263000E+00, 0.4276300E+00, &
     & 0.4375500E+00, 0.4494500E+00, 0.4612400E+00, 0.4734500E+00, &
     & 0.4897000E+00, 0.5331700E+00, 0.5708400E+00, 0.6067200E+00, &
     & 0.6648500E+00, 0.7310700E+00, 0.8106500E+00, 0.9353700E+00, &
     & 0.1103300E+01, 0.1372400E+01, 0.1511700E+01, 0.1511700E+01 /
      data (ref_adm(16,iz,35,18),iz = 1,20) / &
     & 0.4117200E+00, 0.4117200E+00, 0.4226000E+00, 0.4220200E+00, &
     & 0.4359500E+00, 0.4516400E+00, 0.4505400E+00, 0.4679400E+00, &
     & 0.4878300E+00, 0.5356100E+00, 0.5613400E+00, 0.6009500E+00, &
     & 0.6679700E+00, 0.7339800E+00, 0.8251500E+00, 0.9444100E+00, &
     & 0.1120300E+01, 0.1375900E+01, 0.1592800E+01, 0.1592800E+01 /
      data (ref_adm(16,iz,36,18),iz = 1,20) / &
     & 0.4275500E+00, 0.4275500E+00, 0.4243200E+00, 0.4137800E+00, &
     & 0.4404000E+00, 0.4354500E+00, 0.4472500E+00, 0.4714600E+00, &
     & 0.4974900E+00, 0.5330600E+00, 0.5858200E+00, 0.6155300E+00, &
     & 0.6742600E+00, 0.7275300E+00, 0.8132800E+00, 0.9673100E+00, &
     & 0.1154800E+01, 0.1381100E+01, 0.1640900E+01, 0.1640900E+01 /
      data (ref_adm(16,iz,37,18),iz = 1,20) / &
     & 0.4256500E+00, 0.4256500E+00, 0.4362300E+00, 0.4299200E+00, &
     & 0.4267000E+00, 0.4352800E+00, 0.4463600E+00, 0.4685500E+00, &
     & 0.4939000E+00, 0.5465400E+00, 0.5761400E+00, 0.6045600E+00, &
     & 0.6516300E+00, 0.7399600E+00, 0.8343100E+00, 0.9678500E+00, &
     & 0.1162400E+01, 0.1431900E+01, 0.1749800E+01, 0.1749800E+01 /
      data (ref_adm(16,iz,38,18),iz = 1,20) / &
     & 0.4256500E+00, 0.4256500E+00, 0.4362300E+00, 0.4299200E+00, &
     & 0.4267000E+00, 0.4352800E+00, 0.4463600E+00, 0.4685500E+00, &
     & 0.4939000E+00, 0.5465400E+00, 0.5761400E+00, 0.6045600E+00, &
     & 0.6516300E+00, 0.7399600E+00, 0.8343100E+00, 0.9678500E+00, &
     & 0.1162400E+01, 0.1431900E+01, 0.1749800E+01, 0.1749800E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(17,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(17,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(17,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.4448147E+04
      data (ref_adm(17,iz, 1, 4),iz = 1,20) / &
     & 0.2713247E+00, 0.2713247E+00, 0.2664694E+00, 0.2647874E+00, &
     & 0.2634580E+00, 0.2625487E+00, 0.2609461E+00, 0.2582158E+00, &
     & 0.2547090E+00, 0.2505097E+00, 0.2459424E+00, 0.2396015E+00, &
     & 0.2322005E+00, 0.2252312E+00, 0.2152228E+00, 0.2020429E+00, &
     & 0.1884454E+00, 0.1706546E+00, 0.1392409E+00, 0.1392409E+00 /
      data (ref_adm(17,iz, 2, 4),iz = 1,20) / &
     & 0.2713247E+00, 0.2713247E+00, 0.2664694E+00, 0.2647874E+00, &
     & 0.2634580E+00, 0.2625487E+00, 0.2609461E+00, 0.2582158E+00, &
     & 0.2547090E+00, 0.2505097E+00, 0.2459424E+00, 0.2396015E+00, &
     & 0.2322005E+00, 0.2252312E+00, 0.2152228E+00, 0.2020429E+00, &
     & 0.1884454E+00, 0.1706546E+00, 0.1392409E+00, 0.1392409E+00 /
      data (ref_adm(17,iz, 3, 4),iz = 1,20) / &
     & 0.2713247E+00, 0.2713247E+00, 0.2664694E+00, 0.2647874E+00, &
     & 0.2634579E+00, 0.2625487E+00, 0.2247100E+00, 0.2582158E+00, &
     & 0.2547090E+00, 0.2505097E+00, 0.1877000E+00, 0.2396015E+00, &
     & 0.2322005E+00, 0.2252312E+00, 0.2152228E+00, 0.2020429E+00, &
     & 0.1884454E+00, 0.1706546E+00, 0.1392409E+00, 0.1392409E+00 /
      data (ref_adm(17,iz, 4, 4),iz = 1,20) / &
     & 0.2713247E+00, 0.2713247E+00, 0.2664694E+00, 0.2647874E+00, &
     & 0.2634580E+00, 0.2625487E+00, 0.2609461E+00, 0.2582158E+00, &
     & 0.2547090E+00, 0.2505097E+00, 0.2459424E+00, 0.2396015E+00, &
     & 0.2322005E+00, 0.2252312E+00, 0.2152228E+00, 0.2020429E+00, &
     & 0.1884454E+00, 0.1706546E+00, 0.1392409E+00, 0.1392409E+00 /
      data (ref_adm(17,iz, 5, 4),iz = 1,20) / &
     & 0.2713247E+00, 0.2713247E+00, 0.2664694E+00, 0.2647874E+00, &
     & 0.2634579E+00, 0.2625487E+00, 0.2609461E+00, 0.2582158E+00, &
     & 0.2547090E+00, 0.2505097E+00, 0.2459424E+00, 0.2396015E+00, &
     & 0.2322005E+00, 0.2252312E+00, 0.2152228E+00, 0.2020429E+00, &
     & 0.1884454E+00, 0.1706546E+00, 0.1392409E+00, 0.1392409E+00 /
      data (ref_adm(17,iz, 6, 4),iz = 1,20) / &
     & 0.2713247E+00, 0.2713247E+00, 0.2664694E+00, 0.2647874E+00, &
     & 0.2634580E+00, 0.2625487E+00, 0.2386200E+00, 0.2582158E+00, &
     & 0.2547090E+00, 0.2505097E+00, 0.3023700E+00, 0.2396015E+00, &
     & 0.2322005E+00, 0.2252312E+00, 0.2152228E+00, 0.2020429E+00, &
     & 0.1884454E+00, 0.1706546E+00, 0.1392409E+00, 0.1392409E+00 /
      data (ref_adm(17,iz, 7, 4),iz = 1,20) / &
     & 0.2713247E+00, 0.2713247E+00, 0.2664694E+00, 0.2387700E+00, &
     & 0.2731300E+00, 0.2802200E+00, 0.2609461E+00, 0.2865200E+00, &
     & 0.2547090E+00, 0.2505097E+00, 0.2459424E+00, 0.2396015E+00, &
     & 0.2322005E+00, 0.2252312E+00, 0.2152228E+00, 0.2020429E+00, &
     & 0.1884454E+00, 0.1706546E+00, 0.1392409E+00, 0.1392409E+00 /
      data (ref_adm(17,iz, 8, 4),iz = 1,20) / &
     & 0.2713247E+00, 0.2713247E+00, 0.2664694E+00, 0.2647874E+00, &
     & 0.2634580E+00, 0.2625487E+00, 0.2609461E+00, 0.2582158E+00, &
     & 0.2547090E+00, 0.2505097E+00, 0.2459424E+00, 0.2396015E+00, &
     & 0.2322005E+00, 0.2252312E+00, 0.2152228E+00, 0.2020429E+00, &
     & 0.1884454E+00, 0.1706546E+00, 0.1392409E+00, 0.1392409E+00 /
      data (ref_adm(17,iz, 9, 4),iz = 1,20) / &
     & 0.2713247E+00, 0.2713247E+00, 0.2664694E+00, 0.2647874E+00, &
     & 0.2634579E+00, 0.2625487E+00, 0.2727700E+00, 0.1937200E+00, &
     & 0.2312200E+00, 0.2419400E+00, 0.2295600E+00, 0.1979800E+00, &
     & 0.2322005E+00, 0.2252312E+00, 0.2152228E+00, 0.2020429E+00, &
     & 0.1884454E+00, 0.1706546E+00, 0.1392409E+00, 0.1392409E+00 /
      data (ref_adm(17,iz,10, 4),iz = 1,20) / &
     & 0.2713247E+00, 0.2713247E+00, 0.2664694E+00, 0.2647874E+00, &
     & 0.2634580E+00, 0.2625487E+00, 0.2609461E+00, 0.2582158E+00, &
     & 0.2547090E+00, 0.3095600E+00, 0.2404100E+00, 0.2396015E+00, &
     & 0.2322005E+00, 0.2252312E+00, 0.2152228E+00, 0.2020429E+00, &
     & 0.1884454E+00, 0.1706546E+00, 0.1392409E+00, 0.1392409E+00 /
      data (ref_adm(17,iz,11, 4),iz = 1,20) / &
     & 0.2713247E+00, 0.2713247E+00, 0.2664694E+00, 0.2647874E+00, &
     & 0.2634579E+00, 0.2625487E+00, 0.2609461E+00, 0.2582158E+00, &
     & 0.2547090E+00, 0.2505097E+00, 0.2459424E+00, 0.2796300E+00, &
     & 0.3096100E+00, 0.2252312E+00, 0.2152228E+00, 0.2020429E+00, &
     & 0.1884454E+00, 0.1706546E+00, 0.1392409E+00, 0.1392409E+00 /
      data (ref_adm(17,iz,12, 4),iz = 1,20) / &
     & 0.2713247E+00, 0.2713247E+00, 0.2664694E+00, 0.2647874E+00, &
     & 0.2634580E+00, 0.2625487E+00, 0.2609461E+00, 0.2582158E+00, &
     & 0.2547090E+00, 0.2505097E+00, 0.2459424E+00, 0.2565600E+00, &
     & 0.2715100E+00, 0.2686700E+00, 0.2152228E+00, 0.2020429E+00, &
     & 0.1884454E+00, 0.1706546E+00, 0.1392409E+00, 0.1392409E+00 /
      data (ref_adm(17,iz,13, 4),iz = 1,20) / &
     & 0.2713247E+00, 0.2713247E+00, 0.2664694E+00, 0.2647874E+00, &
     & 0.2634579E+00, 0.2625487E+00, 0.2609461E+00, 0.2582158E+00, &
     & 0.2547090E+00, 0.2505097E+00, 0.2459424E+00, 0.2396015E+00, &
     & 0.2322005E+00, 0.2252312E+00, 0.2152228E+00, 0.2020429E+00, &
     & 0.1884454E+00, 0.1706546E+00, 0.1392409E+00, 0.1392409E+00 /
      data (ref_adm(17,iz,14, 4),iz = 1,20) / &
     & 0.2713247E+00, 0.2713247E+00, 0.2664694E+00, 0.2647874E+00, &
     & 0.2634580E+00, 0.2625487E+00, 0.2609461E+00, 0.2582158E+00, &
     & 0.2547090E+00, 0.2505097E+00, 0.2459424E+00, 0.2396015E+00, &
     & 0.2322005E+00, 0.2252312E+00, 0.2152228E+00, 0.2020429E+00, &
     & 0.1884454E+00, 0.1706546E+00, 0.1392409E+00, 0.1392409E+00 /
      data (ref_adm(17,iz,15, 4),iz = 1,20) / &
     & 0.2713247E+00, 0.2713247E+00, 0.2664694E+00, 0.2647874E+00, &
     & 0.2634579E+00, 0.2625487E+00, 0.2609461E+00, 0.2582158E+00, &
     & 0.2547090E+00, 0.2505097E+00, 0.2459424E+00, 0.2396015E+00, &
     & 0.2322005E+00, 0.2252312E+00, 0.2152228E+00, 0.2020429E+00, &
     & 0.1884454E+00, 0.1706546E+00, 0.1392409E+00, 0.1392409E+00 /
      data (ref_adm(17,iz,16, 4),iz = 1,20) / &
     & 0.2713247E+00, 0.2713247E+00, 0.2664694E+00, 0.2647874E+00, &
     & 0.2634580E+00, 0.2625487E+00, 0.2609461E+00, 0.2582158E+00, &
     & 0.2547090E+00, 0.2505097E+00, 0.2459424E+00, 0.2396015E+00, &
     & 0.2141300E+00, 0.2252312E+00, 0.2152228E+00, 0.2020429E+00, &
     & 0.1884454E+00, 0.1706546E+00, 0.1392409E+00, 0.1392409E+00 /
      data (ref_adm(17,iz,17, 4),iz = 1,20) / &
     & 0.2713247E+00, 0.2713247E+00, 0.2664694E+00, 0.2647874E+00, &
     & 0.2634579E+00, 0.2625487E+00, 0.2609461E+00, 0.2582158E+00, &
     & 0.2547090E+00, 0.1994900E+00, 0.2459424E+00, 0.1970800E+00, &
     & 0.2322005E+00, 0.2252312E+00, 0.2152228E+00, 0.2020429E+00, &
     & 0.1884454E+00, 0.1706546E+00, 0.1392409E+00, 0.1392409E+00 /
      data (ref_adm(17,iz,18, 4),iz = 1,20) / &
     & 0.2346431E+00, 0.2346431E+00, 0.2335661E+00, 0.2328119E+00, &
     & 0.2319991E+00, 0.2304772E+00, 0.2287560E+00, 0.2271733E+00, &
     & 0.2258037E+00, 0.2248607E+00, 0.2243415E+00, 0.2244301E+00, &
     & 0.2250451E+00, 0.2259813E+00, 0.2276505E+00, 0.2300179E+00, &
     & 0.2329175E+00, 0.2360708E+00, 0.2259586E+00, 0.2259586E+00 /
      data (ref_adm(17,iz,19, 4),iz = 1,20) / &
     & 0.2347227E+00, 0.2347227E+00, 0.2338434E+00, 0.2331595E+00, &
     & 0.2325191E+00, 0.2313284E+00, 0.2296063E+00, 0.2281044E+00, &
     & 0.2266114E+00, 0.2256444E+00, 0.2250451E+00, 0.2250369E+00, &
     & 0.2254377E+00, 0.2261934E+00, 0.2277538E+00, 0.2299208E+00, &
     & 0.2326012E+00, 0.2354659E+00, 0.2252324E+00, 0.2252324E+00 /
      data (ref_adm(17,iz,20, 4),iz = 1,20) / &
     & 0.2348328E+00, 0.2348328E+00, 0.2342102E+00, 0.2335151E+00, &
     & 0.2330156E+00, 0.2321253E+00, 0.2305556E+00, 0.2290059E+00, &
     & 0.2275874E+00, 0.2722200E+00, 0.2258162E+00, 0.2256995E+00, &
     & 0.2259347E+00, 0.2265753E+00, 0.2445700E+00, 0.2298301E+00, &
     & 0.2323861E+00, 0.2349719E+00, 0.2246706E+00, 0.2246706E+00 /
      data (ref_adm(17,iz,21, 4),iz = 1,20) / &
     & 0.2349275E+00, 0.2349275E+00, 0.2345824E+00, 0.2339152E+00, &
     & 0.2335360E+00, 0.2329170E+00, 0.2315672E+00, 0.2300446E+00, &
     & 0.2285518E+00, 0.2273694E+00, 0.2266572E+00, 0.2263849E+00, &
     & 0.2265104E+00, 0.2269615E+00, 0.2280853E+00, 0.2298766E+00, &
     & 0.2321803E+00, 0.2345129E+00, 0.2241470E+00, 0.2241470E+00 /
      data (ref_adm(17,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(17,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo  0.2978483E+00
      data (ref_adm(17,iz, 1, 5),iz = 1,20) / &
     & 0.3115725E+00, 0.3115725E+00, 0.3062899E+00, 0.3023660E+00, &
     & 0.2991859E+00, 0.2968327E+00, 0.2825300E+00, 0.2549900E+00, &
     & 0.2944988E+00, 0.2954033E+00, 0.2970321E+00, 0.3002621E+00, &
     & 0.3044191E+00, 0.3083512E+00, 0.3131993E+00, 0.3242100E+00, &
     & 0.3256563E+00, 0.3296160E+00, 0.3085616E+00, 0.3085616E+00 /
      data (ref_adm(17,iz, 2, 5),iz = 1,20) / &
     & 0.3115725E+00, 0.3115725E+00, 0.3062899E+00, 0.3023660E+00, &
     & 0.2991859E+00, 0.2968327E+00, 0.2825300E+00, 0.2549900E+00, &
     & 0.2944988E+00, 0.2954033E+00, 0.2970321E+00, 0.3002621E+00, &
     & 0.3044191E+00, 0.3083512E+00, 0.3131993E+00, 0.3242100E+00, &
     & 0.3256563E+00, 0.3296160E+00, 0.3085616E+00, 0.3085616E+00 /
      data (ref_adm(17,iz, 3, 5),iz = 1,20) / &
     & 0.3115734E+00, 0.3115734E+00, 0.3063250E+00, 0.3024203E+00, &
     & 0.2992515E+00, 0.2969237E+00, 0.2565900E+00, 0.2945070E+00, &
     & 0.2944550E+00, 0.2954667E+00, 0.2970050E+00, 0.3003215E+00, &
     & 0.3043754E+00, 0.3082580E+00, 0.2678900E+00, 0.3197212E+00, &
     & 0.3253485E+00, 0.3292807E+00, 0.1287858E+00, 0.1287858E+00 /
      data (ref_adm(17,iz, 4, 5),iz = 1,20) / &
     & 0.3115778E+00, 0.3115778E+00, 0.3064495E+00, 0.3025950E+00, &
     & 0.2994162E+00, 0.2972500E+00, 0.3121300E+00, 0.2946164E+00, &
     & 0.2945744E+00, 0.2954777E+00, 0.2970740E+00, 0.3021200E+00, &
     & 0.3043506E+00, 0.3036600E+00, 0.2838600E+00, 0.3194555E+00, &
     & 0.3248179E+00, 0.3288355E+00, 0.3076705E+00, 0.3076705E+00 /
      data (ref_adm(17,iz, 5, 5),iz = 1,20) / &
     & 0.3116571E+00, 0.3116571E+00, 0.3231800E+00, 0.3028318E+00, &
     & 0.2953400E+00, 0.2715500E+00, 0.2956876E+00, 0.2517500E+00, &
     & 0.2259600E+00, 0.2619600E+00, 0.2970843E+00, 0.3364600E+00, &
     & 0.3041835E+00, 0.3251700E+00, 0.3126737E+00, 0.3189817E+00, &
     & 0.3242444E+00, 0.3279841E+00, 0.3068565E+00, 0.3068565E+00 /
      data (ref_adm(17,iz, 6, 5),iz = 1,20) / &
     & 0.3116790E+00, 0.3116790E+00, 0.3068061E+00, 0.3030950E+00, &
     & 0.2998674E+00, 0.2975125E+00, 0.2960229E+00, 0.2949885E+00, &
     & 0.2949072E+00, 0.2627800E+00, 0.2972042E+00, 0.3001919E+00, &
     & 0.3040291E+00, 0.3158400E+00, 0.3122522E+00, 0.3181705E+00, &
     & 0.3233409E+00, 0.3268407E+00, 0.3056979E+00, 0.3056979E+00 /
      data (ref_adm(17,iz, 7, 5),iz = 1,20) / &
     & 0.4020000E+00, 0.4020000E+00, 0.6036900E+00, 0.2754500E+00, &
     & 0.3002411E+00, 0.2979315E+00, 0.2962771E+00, 0.2953442E+00, &
     & 0.2378600E+00, 0.2958499E+00, 0.2972855E+00, 0.3001337E+00, &
     & 0.3214500E+00, 0.3073851E+00, 0.3117919E+00, 0.3175252E+00, &
     & 0.3224475E+00, 0.3254090E+00, 0.3043077E+00, 0.3043077E+00 /
      data (ref_adm(17,iz, 8, 5),iz = 1,20) / &
     & 0.2958800E+00, 0.2958800E+00, 0.2860300E+00, 0.3090000E+00, &
     & 0.3006089E+00, 0.2982813E+00, 0.2503200E+00, 0.3708300E+00, &
     & 0.2954022E+00, 0.2959562E+00, 0.2974380E+00, 0.3000894E+00, &
     & 0.2387000E+00, 0.3069501E+00, 0.3531500E+00, 0.3165408E+00, &
     & 0.3211577E+00, 0.3236540E+00, 0.3027153E+00, 0.3027153E+00 /
      data (ref_adm(17,iz, 9, 5),iz = 1,20) / &
     & 0.2749500E+00, 0.2749500E+00, 0.2832000E+00, 0.2905700E+00, &
     & 0.3144500E+00, 0.2771500E+00, 0.2635000E+00, 0.3007700E+00, &
     & 0.2547000E+00, 0.2962600E+00, 0.2976113E+00, 0.3001314E+00, &
     & 0.3034712E+00, 0.3066877E+00, 0.3108292E+00, 0.3154998E+00, &
     & 0.3197897E+00, 0.3217006E+00, 0.3009025E+00, 0.3009025E+00 /
      data (ref_adm(17,iz,10, 5),iz = 1,20) / &
     & 0.2606200E+00, 0.2606200E+00, 0.3079105E+00, 0.4402600E+00, &
     & 0.3016218E+00, 0.2314900E+00, 0.2873900E+00, 0.3406900E+00, &
     & 0.2632600E+00, 0.3063600E+00, 0.3487600E+00, 0.4304800E+00, &
     & 0.3033918E+00, 0.1861500E+00, 0.3102481E+00, 0.3144556E+00, &
     & 0.3183644E+00, 0.3197022E+00, 0.2984279E+00, 0.2984279E+00 /
      data (ref_adm(17,iz,11, 5),iz = 1,20) / &
     & 0.3121048E+00, 0.3121048E+00, 0.3083209E+00, 0.3051739E+00, &
     & 0.3023312E+00, 0.3000855E+00, 0.3764200E+00, 0.2972809E+00, &
     & 0.3165900E+00, 0.2894100E+00, 0.2730900E+00, 0.3564900E+00, &
     & 0.2582100E+00, 0.2007300E+00, 0.3096170E+00, 0.3135850E+00, &
     & 0.3167817E+00, 0.3175470E+00, 0.2958592E+00, 0.2958592E+00 /
      data (ref_adm(17,iz,12, 5),iz = 1,20) / &
     & 0.4723100E+00, 0.4723100E+00, 0.3087600E+00, 0.3058153E+00, &
     & 0.3030372E+00, 0.3006978E+00, 0.2990575E+00, 0.2980004E+00, &
     & 0.3503900E+00, 0.3000500E+00, 0.2744600E+00, 0.2847900E+00, &
     & 0.2197100E+00, 0.3057824E+00, 0.3090176E+00, 0.3126754E+00, &
     & 0.3151629E+00, 0.3154317E+00, 0.2930324E+00, 0.2930324E+00 /
      data (ref_adm(17,iz,13, 5),iz = 1,20) / &
     & 0.3123577E+00, 0.3123577E+00, 0.3092788E+00, 0.3065012E+00, &
     & 0.3038213E+00, 0.3015919E+00, 0.2998753E+00, 0.2986970E+00, &
     & 0.2981939E+00, 0.2980528E+00, 0.2833500E+00, 0.3714000E+00, &
     & 0.2625500E+00, 0.2549700E+00, 0.3086262E+00, 0.3117164E+00, &
     & 0.3136350E+00, 0.3132106E+00, 0.2901739E+00, 0.2901739E+00 /
      data (ref_adm(17,iz,14, 5),iz = 1,20) / &
     & 0.3124962E+00, 0.3124962E+00, 0.3097139E+00, 0.3071094E+00, &
     & 0.3689700E+00, 0.3024272E+00, 0.3008356E+00, 0.2995555E+00, &
     & 0.2990326E+00, 0.2987753E+00, 0.2905000E+00, 0.4011300E+00, &
     & 0.2664400E+00, 0.2858000E+00, 0.3081069E+00, 0.3108995E+00, &
     & 0.3123069E+00, 0.3109572E+00, 0.2875112E+00, 0.2875112E+00 /
      data (ref_adm(17,iz,15, 5),iz = 1,20) / &
     & 0.2196900E+00, 0.2196900E+00, 0.2254600E+00, 0.3079680E+00, &
     & 0.3057323E+00, 0.3035657E+00, 0.3018583E+00, 0.3005158E+00, &
     & 0.2999810E+00, 0.2996316E+00, 0.2999573E+00, 0.4390900E+00, &
     & 0.3033499E+00, 0.3051578E+00, 0.3077081E+00, 0.3102576E+00, &
     & 0.3111520E+00, 0.3087778E+00, 0.2850457E+00, 0.2850457E+00 /
      data (ref_adm(17,iz,16, 5),iz = 1,20) / &
     & 0.3127064E+00, 0.3127064E+00, 0.3108543E+00, 0.2579900E+00, &
     & 0.3067385E+00, 0.3046529E+00, 0.3029529E+00, 0.3207100E+00, &
     & 0.3009125E+00, 0.3007057E+00, 0.3076300E+00, 0.4105100E+00, &
     & 0.3036452E+00, 0.3052721E+00, 0.3074942E+00, 0.3093759E+00, &
     & 0.3100632E+00, 0.3070234E+00, 0.2825603E+00, 0.2825603E+00 /
      data (ref_adm(17,iz,17, 5),iz = 1,20) / &
     & 0.3128564E+00, 0.3128564E+00, 0.3114655E+00, 0.2771600E+00, &
     & 0.2732200E+00, 0.3059434E+00, 0.3042092E+00, 0.3029512E+00, &
     & 0.3020459E+00, 0.3017620E+00, 0.2418800E+00, 0.3070300E+00, &
     & 0.3039358E+00, 0.3053975E+00, 0.3071879E+00, 0.3088434E+00, &
     & 0.3090679E+00, 0.3054273E+00, 0.2801961E+00, 0.2801961E+00 /
      data (ref_adm(17,iz,18, 5),iz = 1,20) / &
     & 0.2837502E+00, 0.2837502E+00, 0.3371500E+00, 0.3786100E+00, &
     & 0.3254400E+00, 0.2687100E+00, 0.2847617E+00, 0.2857974E+00, &
     & 0.2869954E+00, 0.2885272E+00, 0.2903226E+00, 0.4215500E+00, &
     & 0.4196500E+00, 0.2981251E+00, 0.3009601E+00, 0.3039260E+00, &
     & 0.3065583E+00, 0.3083379E+00, 0.2931867E+00, 0.2931867E+00 /
      data (ref_adm(17,iz,19, 5),iz = 1,20) / &
     & 0.2838178E+00, 0.2838178E+00, 0.2837928E+00, 0.2839655E+00, &
     & 0.2842484E+00, 0.2847305E+00, 0.2853228E+00, 0.2862678E+00, &
     & 0.2873779E+00, 0.2886861E+00, 0.2902518E+00, 0.2924976E+00, &
     & 0.2452200E+00, 0.2455800E+00, 0.2992328E+00, 0.3018317E+00, &
     & 0.3039280E+00, 0.3054388E+00, 0.2898589E+00, 0.2898589E+00 /
      data (ref_adm(17,iz,20, 5),iz = 1,20) / &
     & 0.2839189E+00, 0.2839189E+00, 0.2841758E+00, 0.2844666E+00, &
     & 0.2848764E+00, 0.2854606E+00, 0.2861304E+00, 0.2869005E+00, &
     & 0.2380300E+00, 0.2891941E+00, 0.2904883E+00, 0.2923978E+00, &
     & 0.2078200E+00, 0.2935100E+00, 0.2690000E+00, 0.2992100E+00, &
     & 0.3020666E+00, 0.3031761E+00, 0.2878077E+00, 0.2878077E+00 /
      data (ref_adm(17,iz,21, 5),iz = 1,20) / &
     & 0.2840271E+00, 0.2840271E+00, 0.2845107E+00, 0.2850710E+00, &
     & 0.2856436E+00, 0.2862484E+00, 0.2870488E+00, 0.2878503E+00, &
     & 0.2887244E+00, 0.2898739E+00, 0.2796200E+00, 0.2926522E+00, &
     & 0.2944396E+00, 0.2957009E+00, 0.2383800E+00, 0.2692800E+00, &
     & 0.3006658E+00, 0.3012634E+00, 0.2863680E+00, 0.2863680E+00 /
      data (ref_adm(17,iz,22, 5),iz = 1,20) / &
     & 0.3383761E+00, 0.3383761E+00, 0.2926804E+00, 0.1921700E+00, &
     & 0.2929318E+00, 0.2992960E+00, 0.3006729E+00, 0.2970365E+00, &
     & 0.2944120E+00, 0.2923584E+00, 0.2829900E+00, 0.2934901E+00, &
     & 0.2953865E+00, 0.2973730E+00, 0.2987148E+00, 0.2698600E+00, &
     & 0.2910131E+00, 0.2731595E+00, 0.2269562E+00, 0.2269562E+00 /
      data (ref_adm(17,iz,23, 5),iz = 1,20) / &
     & 0.2160000E+00, 0.2160000E+00, 0.2926804E+00, 0.2906750E+00, &
     & 0.2929318E+00, 0.2992960E+00, 0.3006729E+00, 0.2970365E+00, &
     & 0.2944119E+00, 0.3209600E+00, 0.2922400E+00, 0.2934901E+00, &
     & 0.2953865E+00, 0.2936900E+00, 0.2987148E+00, 0.2972195E+00, &
     & 0.2910131E+00, 0.2731595E+00, 0.2269562E+00, 0.2269562E+00 /
      data (ref_adm(17,iz,24, 5),iz = 1,20) / &
     & 0.2146600E+00, 0.2146600E+00, 0.2926804E+00, 0.2906750E+00, &
     & 0.2929318E+00, 0.2992960E+00, 0.3006729E+00, 0.2970365E+00, &
     & 0.2944120E+00, 0.2736100E+00, 0.2921466E+00, 0.2934901E+00, &
     & 0.2953865E+00, 0.2973730E+00, 0.2987148E+00, 0.2979000E+00, &
     & 0.2910131E+00, 0.2731595E+00, 0.2269562E+00, 0.2269562E+00 /
      data (ref_adm(17,iz,25, 5),iz = 1,20) / &
     & 0.3383762E+00, 0.3383762E+00, 0.2926804E+00, 0.2906750E+00, &
     & 0.2929318E+00, 0.2992960E+00, 0.3006729E+00, 0.2970365E+00, &
     & 0.3034000E+00, 0.2757400E+00, 0.2921466E+00, 0.2934901E+00, &
     & 0.2953865E+00, 0.2973730E+00, 0.2987148E+00, 0.2767500E+00, &
     & 0.2910131E+00, 0.2731595E+00, 0.2269562E+00, 0.2269562E+00 /
      data (ref_adm(17,iz,26, 5),iz = 1,20) / &
     & 0.3383761E+00, 0.3383761E+00, 0.2926804E+00, 0.2906750E+00, &
     & 0.3199200E+00, 0.3064100E+00, 0.3006729E+00, 0.3218600E+00, &
     & 0.2938600E+00, 0.2923584E+00, 0.2921466E+00, 0.2934901E+00, &
     & 0.2953865E+00, 0.2973730E+00, 0.2562200E+00, 0.2522400E+00, &
     & 0.2910131E+00, 0.2731595E+00, 0.2269562E+00, 0.2269562E+00 /
      data (ref_adm(17,iz,27, 5),iz = 1,20) / &
     & 0.3383762E+00, 0.3383762E+00, 0.2926804E+00, 0.2906750E+00, &
     & 0.3255600E+00, 0.2992960E+00, 0.3107600E+00, 0.3035800E+00, &
     & 0.2944119E+00, 0.2923584E+00, 0.2921466E+00, 0.2934901E+00, &
     & 0.2953865E+00, 0.2973730E+00, 0.2987148E+00, 0.2724400E+00, &
     & 0.2910131E+00, 0.2731595E+00, 0.2269562E+00, 0.2269562E+00 /
      data (ref_adm(17,iz,28, 5),iz = 1,20) / &
     & 0.3383761E+00, 0.3383761E+00, 0.2926804E+00, 0.2906750E+00, &
     & 0.2929318E+00, 0.2992960E+00, 0.2994000E+00, 0.3215200E+00, &
     & 0.2944120E+00, 0.2923584E+00, 0.2921466E+00, 0.2934901E+00, &
     & 0.3151000E+00, 0.2973730E+00, 0.2987148E+00, 0.2374700E+00, &
     & 0.2910131E+00, 0.2731595E+00, 0.2269562E+00, 0.2269562E+00 /
      data (ref_adm(17,iz,29, 5),iz = 1,20) / &
     & 0.3992300E+00, 0.3992300E+00, 0.2926804E+00, 0.2906750E+00, &
     & 0.2929318E+00, 0.2706000E+00, 0.3006729E+00, 0.2970365E+00, &
     & 0.2944119E+00, 0.2923584E+00, 0.2921466E+00, 0.2934901E+00, &
     & 0.2953865E+00, 0.2329200E+00, 0.2987148E+00, 0.2972195E+00, &
     & 0.2910131E+00, 0.2731595E+00, 0.2269562E+00, 0.2269562E+00 /
      data (ref_adm(17,iz,30, 5),iz = 1,20) / &
     & 0.3383761E+00, 0.3383761E+00, 0.2926804E+00, 0.2906750E+00, &
     & 0.2929318E+00, 0.2992960E+00, 0.3006729E+00, 0.2970365E+00, &
     & 0.2944120E+00, 0.2923584E+00, 0.2921466E+00, 0.2934901E+00, &
     & 0.2953865E+00, 0.2973730E+00, 0.2987148E+00, 0.2972195E+00, &
     & 0.2910131E+00, 0.2731595E+00, 0.2269562E+00, 0.2269562E+00 /
      data (ref_adm(17,iz,31, 5),iz = 1,20) / &
     & 0.2689800E+00, 0.2689800E+00, 0.2885300E+00, 0.3360400E+00, &
     & 0.2929318E+00, 0.2992960E+00, 0.3006729E+00, 0.2970365E+00, &
     & 0.2944119E+00, 0.2923584E+00, 0.2921466E+00, 0.2934901E+00, &
     & 0.2953865E+00, 0.2973730E+00, 0.2987148E+00, 0.2972195E+00, &
     & 0.2910131E+00, 0.2731595E+00, 0.2269562E+00, 0.2269562E+00 /
      data (ref_adm(17,iz,32, 5),iz = 1,20) / &
     & 0.3406100E+00, 0.3406100E+00, 0.2926804E+00, 0.3371900E+00, &
     & 0.2929318E+00, 0.2992960E+00, 0.3006729E+00, 0.2970365E+00, &
     & 0.2944120E+00, 0.2923584E+00, 0.2921466E+00, 0.2934901E+00, &
     & 0.2953865E+00, 0.2973730E+00, 0.2987148E+00, 0.2972195E+00, &
     & 0.2910131E+00, 0.2731595E+00, 0.2269562E+00, 0.2269562E+00 /
      data (ref_adm(17,iz,33, 5),iz = 1,20) / &
     & 0.3193100E+00, 0.3193100E+00, 0.2926804E+00, 0.2906750E+00, &
     & 0.2825500E+00, 0.2992960E+00, 0.2760200E+00, 0.3405100E+00, &
     & 0.3135800E+00, 0.2923584E+00, 0.2921466E+00, 0.2934901E+00, &
     & 0.2953865E+00, 0.2973730E+00, 0.2987148E+00, 0.2972195E+00, &
     & 0.2910131E+00, 0.2731595E+00, 0.2269562E+00, 0.2269562E+00 /
      data (ref_adm(17,iz,34, 5),iz = 1,20) / &
     & 0.3383761E+00, 0.3383761E+00, 0.2926804E+00, 0.2906750E+00, &
     & 0.2929318E+00, 0.2992960E+00, 0.3190200E+00, 0.2900700E+00, &
     & 0.3640300E+00, 0.3243200E+00, 0.2944500E+00, 0.2934901E+00, &
     & 0.2953865E+00, 0.2973730E+00, 0.2987148E+00, 0.2972195E+00, &
     & 0.2910131E+00, 0.2731595E+00, 0.2269562E+00, 0.2269562E+00 /
      data (ref_adm(17,iz,35, 5),iz = 1,20) / &
     & 0.3383762E+00, 0.3383762E+00, 0.2926804E+00, 0.2906750E+00, &
     & 0.2929318E+00, 0.2992960E+00, 0.3006729E+00, 0.2493600E+00, &
     & 0.2944119E+00, 0.2923584E+00, 0.2921466E+00, 0.2934901E+00, &
     & 0.2953865E+00, 0.2973730E+00, 0.2987148E+00, 0.2972195E+00, &
     & 0.2910131E+00, 0.2731595E+00, 0.2269562E+00, 0.2269562E+00 /
      data (ref_adm(17,iz,36, 5),iz = 1,20) / &
     & 0.5076800E+00, 0.5076800E+00, 0.2926804E+00, 0.2906750E+00, &
     & 0.2929318E+00, 0.2992960E+00, 0.4780400E+00, 0.2970365E+00, &
     & 0.2944120E+00, 0.2923584E+00, 0.2921466E+00, 0.2934901E+00, &
     & 0.2953865E+00, 0.2973730E+00, 0.2987148E+00, 0.2972195E+00, &
     & 0.2910131E+00, 0.2731595E+00, 0.2269562E+00, 0.2269562E+00 /
      data (ref_adm(17,iz,37, 5),iz = 1,20) / &
     & 0.3383762E+00, 0.3383762E+00, 0.2926804E+00, 0.2906750E+00, &
     & 0.2929318E+00, 0.2992960E+00, 0.3006729E+00, 0.2970365E+00, &
     & 0.2944119E+00, 0.2923584E+00, 0.2921466E+00, 0.2934901E+00, &
     & 0.2953865E+00, 0.2973730E+00, 0.2987148E+00, 0.2972195E+00, &
     & 0.2910131E+00, 0.2731595E+00, 0.2269562E+00, 0.2269562E+00 /
      data (ref_adm(17,iz,38, 5),iz = 1,20) / &
     & 0.3383762E+00, 0.3383762E+00, 0.2926804E+00, 0.2906750E+00, &
     & 0.2929318E+00, 0.2992960E+00, 0.3006729E+00, 0.2970365E+00, &
     & 0.2944119E+00, 0.2923584E+00, 0.2921466E+00, 0.2934901E+00, &
     & 0.2953865E+00, 0.2973730E+00, 0.2987148E+00, 0.2972195E+00, &
     & 0.2910131E+00, 0.2731595E+00, 0.2269562E+00, 0.2269562E+00 /
! Solar Zenith Angle 25.0 Albedo  0.3103020E+00
      data (ref_adm(17,iz, 1, 6),iz = 1,20) / &
     & 0.3246200E+00, 0.3246200E+00, 0.3140041E+00, 0.3355952E+00, &
     & 0.3081869E+00, 0.2891779E+00, 0.3541000E+00, 0.2733600E+00, &
     & 0.2891662E+00, 0.2921714E+00, 0.2971885E+00, 0.3047453E+00, &
     & 0.3324500E+00, 0.2961500E+00, 0.3235631E+00, 0.2785100E+00, &
     & 0.3191124E+00, 0.3025250E+00, 0.2663071E+00, 0.2663071E+00 /
      data (ref_adm(17,iz, 2, 6),iz = 1,20) / &
     & 0.3246200E+00, 0.3246200E+00, 0.3140041E+00, 0.3355952E+00, &
     & 0.3081869E+00, 0.2891779E+00, 0.3541000E+00, 0.2733600E+00, &
     & 0.2891662E+00, 0.2921714E+00, 0.2971885E+00, 0.3047453E+00, &
     & 0.3324500E+00, 0.2961500E+00, 0.3235631E+00, 0.2785100E+00, &
     & 0.3191124E+00, 0.3025250E+00, 0.2663071E+00, 0.2663071E+00 /
      data (ref_adm(17,iz, 3, 6),iz = 1,20) / &
     & 0.3125733E+00, 0.3125733E+00, 0.2461300E+00, 0.3355062E+00, &
     & 0.3252000E+00, 0.2896000E+00, 0.3006500E+00, 0.2893790E+00, &
     & 0.2892105E+00, 0.2921468E+00, 0.2970831E+00, 0.3045819E+00, &
     & 0.3125178E+00, 0.2456500E+00, 0.3230590E+00, 0.3239176E+00, &
     & 0.3846500E+00, 0.3017138E+00, 0.4087274E-08, 0.4087274E-08 /
      data (ref_adm(17,iz, 4, 6),iz = 1,20) / &
     & 0.3125643E+00, 0.3125643E+00, 0.2790000E+00, 0.4232200E+00, &
     & 0.3101959E+00, 0.2897348E+00, 0.2209100E+00, 0.2895761E+00, &
     & 0.2893468E+00, 0.2920938E+00, 0.2968691E+00, 0.3041671E+00, &
     & 0.3118685E+00, 0.3398400E+00, 0.3219349E+00, 0.3225205E+00, &
     & 0.2590600E+00, 0.2999820E+00, 0.2645442E+00, 0.2645442E+00 /
      data (ref_adm(17,iz, 5, 6),iz = 1,20) / &
     & 0.3465700E+00, 0.3465700E+00, 0.2623200E+00, 0.4397400E+00, &
     & 0.3123107E+00, 0.2903452E+00, 0.2887505E+00, 0.2898419E+00, &
     & 0.2895722E+00, 0.2920168E+00, 0.2965575E+00, 0.3036070E+00, &
     & 0.3219500E+00, 0.3161476E+00, 0.3203156E+00, 0.3204700E+00, &
     & 0.3142745E+00, 0.2974905E+00, 0.2628103E+00, 0.2628103E+00 /
      data (ref_adm(17,iz, 6, 6),iz = 1,20) / &
     & 0.4937800E+00, 0.4937800E+00, 0.3136787E+00, 0.3338806E+00, &
     & 0.3152997E+00, 0.2912113E+00, 0.2890035E+00, 0.2902552E+00, &
     & 0.2898885E+00, 0.2919514E+00, 0.2962261E+00, 0.2787100E+00, &
     & 0.3005600E+00, 0.2443800E+00, 0.3182182E+00, 0.3177895E+00, &
     & 0.3112363E+00, 0.2942036E+00, 0.2605393E+00, 0.2605393E+00 /
      data (ref_adm(17,iz, 7, 6),iz = 1,20) / &
     & 0.3763000E+00, 0.3763000E+00, 0.2913300E+00, 0.3325356E+00, &
     & 0.3190218E+00, 0.3227700E+00, 0.2892444E+00, 0.2906901E+00, &
     & 0.2009800E+00, 0.2919428E+00, 0.2958568E+00, 0.2894000E+00, &
     & 0.3083586E+00, 0.3126595E+00, 0.3157148E+00, 0.3147028E+00, &
     & 0.3076082E+00, 0.2903931E+00, 0.2578853E+00, 0.2578853E+00 /
      data (ref_adm(17,iz, 8, 6),iz = 1,20) / &
     & 0.3125798E+00, 0.3125798E+00, 0.3135581E+00, 0.3305234E+00, &
     & 0.3235898E+00, 0.3304500E+00, 0.2896850E+00, 0.2911544E+00, &
     & 0.2918600E+00, 0.1930200E+00, 0.2954895E+00, 0.2760700E+00, &
     & 0.3067446E+00, 0.3105316E+00, 0.3129264E+00, 0.3111523E+00, &
     & 0.3035572E+00, 0.2861340E+00, 0.2549150E+00, 0.2549150E+00 /
      data (ref_adm(17,iz, 9, 6),iz = 1,20) / &
     & 0.2899400E+00, 0.2899400E+00, 0.3035200E+00, 0.2137900E+00, &
     & 0.2916200E+00, 0.3536400E+00, 0.2902582E+00, 0.2916337E+00, &
     & 0.2917933E+00, 0.2921996E+00, 0.2951070E+00, 0.2648500E+00, &
     & 0.3051351E+00, 0.3083232E+00, 0.3099684E+00, 0.3073946E+00, &
     & 0.2992032E+00, 0.2815959E+00, 0.2517479E+00, 0.2517479E+00 /
      data (ref_adm(17,iz,10, 6),iz = 1,20) / &
     & 0.2862700E+00, 0.2862700E+00, 0.3204200E+00, 0.2896900E+00, &
     & 0.2787900E+00, 0.3151900E+00, 0.2911240E+00, 0.2921048E+00, &
     & 0.2928114E+00, 0.2926026E+00, 0.2948340E+00, 0.2468800E+00, &
     & 0.3035044E+00, 0.3060183E+00, 0.3068849E+00, 0.3034919E+00, &
     & 0.2947359E+00, 0.2769360E+00, 0.2484549E+00, 0.2484549E+00 /
      data (ref_adm(17,iz,11, 6),iz = 1,20) / &
     & 0.3126228E+00, 0.3126228E+00, 0.3730900E+00, 0.3213800E+00, &
     & 0.3376000E+00, 0.3157000E+00, 0.3768800E+00, 0.2855800E+00, &
     & 0.3001600E+00, 0.2932704E+00, 0.2473400E+00, 0.2428700E+00, &
     & 0.3018753E+00, 0.3037350E+00, 0.3037784E+00, 0.2995850E+00, &
     & 0.2902355E+00, 0.2722434E+00, 0.2451748E+00, 0.2451748E+00 /
      data (ref_adm(17,iz,12, 6),iz = 1,20) / &
     & 0.3802700E+00, 0.3802700E+00, 0.3134866E+00, 0.3187385E+00, &
     & 0.4167800E+00, 0.3532800E+00, 0.3652500E+00, 0.3978200E+00, &
     & 0.2819200E+00, 0.1944500E+00, 0.2577800E+00, 0.2872800E+00, &
     & 0.2158800E+00, 0.3016031E+00, 0.3008253E+00, 0.2957940E+00, &
     & 0.2858775E+00, 0.2677002E+00, 0.2419859E+00, 0.2419859E+00 /
      data (ref_adm(17,iz,13, 6),iz = 1,20) / &
     & 0.4189800E+00, 0.4189800E+00, 0.3135983E+00, 0.3168208E+00, &
     & 0.3390755E+00, 0.3220655E+00, 0.3148100E+00, 0.2939679E+00, &
     & 0.2186400E+00, 0.3110700E+00, 0.3177400E+00, 0.3308400E+00, &
     & 0.2507100E+00, 0.2996551E+00, 0.2980897E+00, 0.2921671E+00, &
     & 0.2817051E+00, 0.2633951E+00, 0.2389480E+00, 0.2389480E+00 /
      data (ref_adm(17,iz,14, 6),iz = 1,20) / &
     & 0.3125915E+00, 0.3125915E+00, 0.4605000E+00, 0.3156261E+00, &
     & 0.3343816E+00, 0.3324698E+00, 0.3029364E+00, 0.2953126E+00, &
     & 0.2964119E+00, 0.2531800E+00, 0.2961722E+00, 0.4134000E+00, &
     & 0.2675400E+00, 0.2814100E+00, 0.3188500E+00, 0.2888717E+00, &
     & 0.2778870E+00, 0.2594558E+00, 0.2361735E+00, 0.2361735E+00 /
      data (ref_adm(17,iz,15, 6),iz = 1,20) / &
     & 0.3125787E+00, 0.3125787E+00, 0.3903900E+00, 0.3313900E+00, &
     & 0.2930500E+00, 0.3415883E+00, 0.3107705E+00, 0.2975530E+00, &
     & 0.2971441E+00, 0.2986342E+00, 0.2976533E+00, 0.2968987E+00, &
     & 0.2971496E+00, 0.2633600E+00, 0.3456900E+00, 0.2859764E+00, &
     & 0.2744293E+00, 0.2559116E+00, 0.2336915E+00, 0.2336915E+00 /
      data (ref_adm(17,iz,16, 6),iz = 1,20) / &
     & 0.2840400E+00, 0.2840400E+00, 0.3136221E+00, 0.3004100E+00, &
     & 0.3204300E+00, 0.3044700E+00, 0.3400900E+00, 0.3584600E+00, &
     & 0.3518300E+00, 0.2635500E+00, 0.2995389E+00, 0.2975440E+00, &
     & 0.2967202E+00, 0.2954215E+00, 0.2916858E+00, 0.2834693E+00, &
     & 0.2714979E+00, 0.2528816E+00, 0.2315934E+00, 0.2315934E+00 /
      data (ref_adm(17,iz,17, 6),iz = 1,20) / &
     & 0.3953500E+00, 0.3953500E+00, 0.3136787E+00, 0.3156100E+00, &
     & 0.1940800E+00, 0.3401472E+00, 0.3368355E+00, 0.3083317E+00, &
     & 0.3001404E+00, 0.3007106E+00, 0.2288800E+00, 0.2416100E+00, &
     & 0.2966658E+00, 0.2947643E+00, 0.2903222E+00, 0.2814744E+00, &
     & 0.2690603E+00, 0.2503273E+00, 0.2298764E+00, 0.2298764E+00 /
      data (ref_adm(17,iz,18, 6),iz = 1,20) / &
     & 0.3557169E+00, 0.3557169E+00, 0.3317956E+00, 0.3280738E+00, &
     & 0.3263877E+00, 0.3266173E+00, 0.3246370E+00, 0.3204111E+00, &
     & 0.3165849E+00, 0.2351500E+00, 0.3098807E+00, 0.3066845E+00, &
     & 0.2430400E+00, 0.3015066E+00, 0.2986581E+00, 0.2946345E+00, &
     & 0.2896930E+00, 0.2799419E+00, 0.2506797E+00, 0.2506797E+00 /
      data (ref_adm(17,iz,19, 6),iz = 1,20) / &
     & 0.3557169E+00, 0.3557169E+00, 0.3317956E+00, 0.3280738E+00, &
     & 0.3263877E+00, 0.3266173E+00, 0.3246370E+00, 0.3204111E+00, &
     & 0.3228500E+00, 0.3128884E+00, 0.3098807E+00, 0.3080900E+00, &
     & 0.2526700E+00, 0.3015066E+00, 0.2986581E+00, 0.2946346E+00, &
     & 0.2896930E+00, 0.2799419E+00, 0.2506798E+00, 0.2506798E+00 /
      data (ref_adm(17,iz,20, 6),iz = 1,20) / &
     & 0.3557169E+00, 0.3557169E+00, 0.3317956E+00, 0.3280738E+00, &
     & 0.3263877E+00, 0.3266173E+00, 0.3246370E+00, 0.3204111E+00, &
     & 0.2999600E+00, 0.3128884E+00, 0.3098807E+00, 0.3066845E+00, &
     & 0.3434600E+00, 0.3015066E+00, 0.2986581E+00, 0.2946345E+00, &
     & 0.2896930E+00, 0.2799419E+00, 0.2506797E+00, 0.2506797E+00 /
      data (ref_adm(17,iz,21, 6),iz = 1,20) / &
     & 0.3557169E+00, 0.3557169E+00, 0.3317956E+00, 0.3426800E+00, &
     & 0.3408800E+00, 0.3266173E+00, 0.3246370E+00, 0.3204111E+00, &
     & 0.3165849E+00, 0.3128884E+00, 0.3098807E+00, 0.3066845E+00, &
     & 0.3168300E+00, 0.3540700E+00, 0.2430100E+00, 0.2681800E+00, &
     & 0.2896930E+00, 0.2799419E+00, 0.2506798E+00, 0.2506798E+00 /
      data (ref_adm(17,iz,22, 6),iz = 1,20) / &
     & 0.3918200E+00, 0.3918200E+00, 0.4181100E+00, 0.3406900E+00, &
     & 0.3747600E+00, 0.3358335E+00, 0.3336766E+00, 0.3302091E+00, &
     & 0.3268013E+00, 0.3235169E+00, 0.3206902E+00, 0.3175500E+00, &
     & 0.3145833E+00, 0.3333800E+00, 0.2193700E+00, 0.2706800E+00, &
     & 0.2997730E+00, 0.2897012E+00, 0.2601564E+00, 0.2601564E+00 /
      data (ref_adm(17,iz,23, 6),iz = 1,20) / &
     & 0.3358299E+00, 0.3358299E+00, 0.3360105E+00, 0.3356862E+00, &
     & 0.2652100E+00, 0.3362706E+00, 0.3003700E+00, 0.3315952E+00, &
     & 0.3282989E+00, 0.3246883E+00, 0.4274300E+00, 0.3183475E+00, &
     & 0.3154013E+00, 0.3126447E+00, 0.3093853E+00, 0.2593000E+00, &
     & 0.2994424E+00, 0.2892168E+00, 0.2597029E+00, 0.2597029E+00 /
      data (ref_adm(17,iz,24, 6),iz = 1,20) / &
     & 0.5339900E+00, 0.5339900E+00, 0.4066000E+00, 0.3360664E+00, &
     & 0.3359418E+00, 0.2922300E+00, 0.3360006E+00, 0.3330099E+00, &
     & 0.3296429E+00, 0.3261058E+00, 0.3228521E+00, 0.3192473E+00, &
     & 0.3161013E+00, 0.3132121E+00, 0.3096578E+00, 0.3051454E+00, &
     & 0.2992596E+00, 0.2888232E+00, 0.2593510E+00, 0.2593510E+00 /
      data (ref_adm(17,iz,25, 6),iz = 1,20) / &
     & 0.3361529E+00, 0.3361529E+00, 0.4002700E+00, 0.2309500E+00, &
     & 0.3617800E+00, 0.3530400E+00, 0.3282400E+00, 0.3345546E+00, &
     & 0.3310139E+00, 0.3275489E+00, 0.2974300E+00, 0.3069800E+00, &
     & 0.3168592E+00, 0.3139071E+00, 0.3100565E+00, 0.3051287E+00, &
     & 0.2992240E+00, 0.2885106E+00, 0.2591484E+00, 0.2591484E+00 /
      data (ref_adm(17,iz,26, 6),iz = 1,20) / &
     & 0.5602700E+00, 0.5602700E+00, 0.4386500E+00, 0.3373927E+00, &
     & 0.3365983E+00, 0.4206600E+00, 0.3931700E+00, 0.3649400E+00, &
     & 0.3324327E+00, 0.3289663E+00, 0.3252565E+00, 0.3213001E+00, &
     & 0.3175853E+00, 0.2360100E+00, 0.2438300E+00, 0.3052639E+00, &
     & 0.2992241E+00, 0.2881537E+00, 0.2589450E+00, 0.2589450E+00 /
      data (ref_adm(17,iz,27, 6),iz = 1,20) / &
     & 0.5289000E+00, 0.5289000E+00, 0.3380180E+00, 0.3382124E+00, &
     & 0.3965700E+00, 0.2005000E+00, 0.2234700E+00, 0.3370988E+00, &
     & 0.3339377E+00, 0.3303050E+00, 0.3266027E+00, 0.3223669E+00, &
     & 0.3183972E+00, 0.3155027E+00, 0.2593100E+00, 0.3055053E+00, &
     & 0.2992999E+00, 0.2880612E+00, 0.2589552E+00, 0.2589552E+00 /
      data (ref_adm(17,iz,28, 6),iz = 1,20) / &
     & 0.4131600E+00, 0.4131600E+00, 0.5060500E+00, 0.3390344E+00, &
     & 0.3380697E+00, 0.3373424E+00, 0.3378328E+00, 0.2777000E+00, &
     & 0.2576400E+00, 0.3257100E+00, 0.3278701E+00, 0.3234362E+00, &
     & 0.2940000E+00, 0.3423900E+00, 0.3381500E+00, 0.3057373E+00, &
     & 0.2992627E+00, 0.2878889E+00, 0.2589475E+00, 0.2589475E+00 /
      data (ref_adm(17,iz,29, 6),iz = 1,20) / &
     & 0.4769300E+00, 0.4769300E+00, 0.3921500E+00, 0.3119300E+00, &
     & 0.2678700E+00, 0.3377585E+00, 0.3379782E+00, 0.3386343E+00, &
     & 0.3881700E+00, 0.3632000E+00, 0.3795900E+00, 0.3244233E+00, &
     & 0.3201381E+00, 0.3168721E+00, 0.3123000E+00, 0.3061245E+00, &
     & 0.2993681E+00, 0.2878547E+00, 0.2589934E+00, 0.2589934E+00 /
      data (ref_adm(17,iz,30, 6),iz = 1,20) / &
     & 0.4113000E+00, 0.4113000E+00, 0.3241000E+00, 0.3168500E+00, &
     & 0.2929800E+00, 0.3418800E+00, 0.3804000E+00, 0.3389266E+00, &
     & 0.3377765E+00, 0.3342024E+00, 0.3304022E+00, 0.2960700E+00, &
     & 0.2973700E+00, 0.3173341E+00, 0.2686600E+00, 0.3064631E+00, &
     & 0.2995460E+00, 0.2878295E+00, 0.2590351E+00, 0.2590351E+00 /
      data (ref_adm(17,iz,31, 6),iz = 1,20) / &
     & 0.3099000E+00, 0.3099000E+00, 0.3255000E+00, 0.3222800E+00, &
     & 0.2779900E+00, 0.3173400E+00, 0.4052100E+00, 0.3010300E+00, &
     & 0.3387468E+00, 0.2526300E+00, 0.3315018E+00, 0.2784600E+00, &
     & 0.3016700E+00, 0.3180934E+00, 0.3134706E+00, 0.3068748E+00, &
     & 0.2996309E+00, 0.2878762E+00, 0.2591049E+00, 0.2591049E+00 /
      data (ref_adm(17,iz,32, 6),iz = 1,20) / &
     & 0.3860400E+00, 0.3860400E+00, 0.3408905E+00, 0.3629200E+00, &
     & 0.4044700E+00, 0.2315100E+00, 0.3388742E+00, 0.4068000E+00, &
     & 0.3394509E+00, 0.3254000E+00, 0.3324769E+00, 0.3272618E+00, &
     & 0.3225468E+00, 0.3186802E+00, 0.3140018E+00, 0.3072362E+00, &
     & 0.2998454E+00, 0.2879718E+00, 0.2591962E+00, 0.2591962E+00 /
      data (ref_adm(17,iz,33, 6),iz = 1,20) / &
     & 0.4137000E+00, 0.4137000E+00, 0.1862100E+00, 0.2952200E+00, &
     & 0.3215600E+00, 0.3412414E+00, 0.2504000E+00, 0.3722500E+00, &
     & 0.2920200E+00, 0.2859800E+00, 0.3053000E+00, 0.2800700E+00, &
     & 0.2646900E+00, 0.3384300E+00, 0.3145075E+00, 0.3075912E+00, &
     & 0.3000672E+00, 0.2880890E+00, 0.2593188E+00, 0.2593188E+00 /
      data (ref_adm(17,iz,34, 6),iz = 1,20) / &
     & 0.2853500E+00, 0.2853500E+00, 0.3312600E+00, 0.3630200E+00, &
     & 0.3903800E+00, 0.3422004E+00, 0.3399895E+00, 0.3394693E+00, &
     & 0.3402001E+00, 0.2293100E+00, 0.3379900E+00, 0.2952600E+00, &
     & 0.3237957E+00, 0.3196950E+00, 0.3149132E+00, 0.3079402E+00, &
     & 0.3002916E+00, 0.2881579E+00, 0.2594000E+00, 0.2594000E+00 /
      data (ref_adm(17,iz,35, 6),iz = 1,20) / &
     & 0.2749000E+00, 0.2749000E+00, 0.3425468E+00, 0.3694500E+00, &
     & 0.4034700E+00, 0.3430223E+00, 0.3401704E+00, 0.3396313E+00, &
     & 0.3404098E+00, 0.3386503E+00, 0.3187900E+00, 0.3292644E+00, &
     & 0.3241864E+00, 0.3201384E+00, 0.3151433E+00, 0.3081728E+00, &
     & 0.3003514E+00, 0.2881848E+00, 0.2595224E+00, 0.2595224E+00 /
      data (ref_adm(17,iz,36, 6),iz = 1,20) / &
     & 0.3371716E+00, 0.3371716E+00, 0.3428808E+00, 0.3563673E+00, &
     & 0.3952200E+00, 0.3435885E+00, 0.3406428E+00, 0.4142800E+00, &
     & 0.3406095E+00, 0.2734600E+00, 0.3115600E+00, 0.3296857E+00, &
     & 0.3244477E+00, 0.3204002E+00, 0.3152954E+00, 0.3084045E+00, &
     & 0.3003892E+00, 0.2882237E+00, 0.2595552E+00, 0.2595552E+00 /
      data (ref_adm(17,iz,37, 6),iz = 1,20) / &
     & 0.3371951E+00, 0.3371951E+00, 0.3432187E+00, 0.3630275E+00, &
     & 0.3552966E+00, 0.3524900E+00, 0.3407939E+00, 0.3397925E+00, &
     & 0.3606600E+00, 0.3556600E+00, 0.2952800E+00, 0.3163200E+00, &
     & 0.3003700E+00, 0.3206645E+00, 0.3154983E+00, 0.3084657E+00, &
     & 0.3005107E+00, 0.2882532E+00, 0.2595672E+00, 0.2595672E+00 /
      data (ref_adm(17,iz,38, 6),iz = 1,20) / &
     & 0.3371951E+00, 0.3371951E+00, 0.3432187E+00, 0.3630275E+00, &
     & 0.3552966E+00, 0.3524900E+00, 0.3407939E+00, 0.3397925E+00, &
     & 0.3606600E+00, 0.3556600E+00, 0.2952800E+00, 0.3163200E+00, &
     & 0.3003700E+00, 0.3206645E+00, 0.3154983E+00, 0.3084657E+00, &
     & 0.3005107E+00, 0.2882532E+00, 0.2595672E+00, 0.2595672E+00 /
! Solar Zenith Angle 30.0 Albedo  0.3302688E+00
      data (ref_adm(17,iz, 1, 7),iz = 1,20) / &
     & 0.3605207E+00, 0.3605207E+00, 0.3096500E+00, 0.3112228E+00, &
     & 0.3127747E+00, 0.3845300E+00, 0.3129100E+00, 0.3266200E+00, &
     & 0.2643400E+00, 0.2826800E+00, 0.3104151E+00, 0.3121665E+00, &
     & 0.3152372E+00, 0.3191130E+00, 0.3242773E+00, 0.3294627E+00, &
     & 0.3315800E+00, 0.3224535E+00, 0.2787436E+00, 0.2787436E+00 /
      data (ref_adm(17,iz, 2, 7),iz = 1,20) / &
     & 0.3605207E+00, 0.3605207E+00, 0.3096500E+00, 0.3112228E+00, &
     & 0.3127747E+00, 0.3845300E+00, 0.3129100E+00, 0.3266200E+00, &
     & 0.2643400E+00, 0.2826800E+00, 0.3104151E+00, 0.3121665E+00, &
     & 0.3152372E+00, 0.3191130E+00, 0.3242773E+00, 0.3294627E+00, &
     & 0.3315800E+00, 0.3224535E+00, 0.2787436E+00, 0.2787436E+00 /
      data (ref_adm(17,iz, 3, 7),iz = 1,20) / &
     & 0.3605207E+00, 0.3605207E+00, 0.3264100E+00, 0.2278500E+00, &
     & 0.2280100E+00, 0.3186358E+00, 0.3197065E+00, 0.2400400E+00, &
     & 0.2328400E+00, 0.2846800E+00, 0.3207300E+00, 0.3121665E+00, &
     & 0.3181500E+00, 0.3191130E+00, 0.3242773E+00, 0.3438800E+00, &
     & 0.3315800E+00, 0.3224535E+00, 0.8444650E-01, 0.8444650E-01 /
      data (ref_adm(17,iz, 4, 7),iz = 1,20) / &
     & 0.3605207E+00, 0.3605207E+00, 0.3141199E+00, 0.3112228E+00, &
     & 0.3127747E+00, 0.3186358E+00, 0.3197065E+00, 0.3242500E+00, &
     & 0.3587900E+00, 0.2401300E+00, 0.3104151E+00, 0.3032200E+00, &
     & 0.2490600E+00, 0.2097500E+00, 0.2633000E+00, 0.3335800E+00, &
     & 0.3048300E+00, 0.3611800E+00, 0.2787436E+00, 0.2787436E+00 /
      data (ref_adm(17,iz, 5, 7),iz = 1,20) / &
     & 0.4180000E+00, 0.4180000E+00, 0.4032100E+00, 0.3498100E+00, &
     & 0.4590800E+00, 0.4800100E+00, 0.4207700E+00, 0.3158286E+00, &
     & 0.2798200E+00, 0.2252100E+00, 0.3276700E+00, 0.3121665E+00, &
     & 0.4090900E+00, 0.3191130E+00, 0.2688100E+00, 0.3219900E+00, &
     & 0.3315800E+00, 0.3224535E+00, 0.2787436E+00, 0.2787436E+00 /
      data (ref_adm(17,iz, 6, 7),iz = 1,20) / &
     & 0.3605207E+00, 0.3605207E+00, 0.3141199E+00, 0.2834600E+00, &
     & 0.4169200E+00, 0.3186358E+00, 0.3197065E+00, 0.3080800E+00, &
     & 0.3129743E+00, 0.3106978E+00, 0.3716300E+00, 0.3178400E+00, &
     & 0.3152372E+00, 0.3191130E+00, 0.2891900E+00, 0.3369300E+00, &
     & 0.3595400E+00, 0.2974500E+00, 0.2787436E+00, 0.2787436E+00 /
      data (ref_adm(17,iz, 7, 7),iz = 1,20) / &
     & 0.3605207E+00, 0.3605207E+00, 0.3141199E+00, 0.3074100E+00, &
     & 0.3127747E+00, 0.3186358E+00, 0.2962600E+00, 0.3158286E+00, &
     & 0.3129743E+00, 0.3106977E+00, 0.3581100E+00, 0.4020000E+00, &
     & 0.2300900E+00, 0.2912000E+00, 0.3640000E+00, 0.3427600E+00, &
     & 0.3311800E+00, 0.3224535E+00, 0.2787436E+00, 0.2787436E+00 /
      data (ref_adm(17,iz, 8, 7),iz = 1,20) / &
     & 0.3605207E+00, 0.3605207E+00, 0.3141199E+00, 0.4561300E+00, &
     & 0.3127747E+00, 0.3186358E+00, 0.3250100E+00, 0.3158286E+00, &
     & 0.3129743E+00, 0.3624600E+00, 0.3714900E+00, 0.2967600E+00, &
     & 0.2696900E+00, 0.3167900E+00, 0.3315600E+00, 0.3291700E+00, &
     & 0.3227800E+00, 0.3224535E+00, 0.2787436E+00, 0.2787436E+00 /
      data (ref_adm(17,iz, 9, 7),iz = 1,20) / &
     & 0.3605207E+00, 0.3605207E+00, 0.3141199E+00, 0.3112228E+00, &
     & 0.3106000E+00, 0.1545100E+00, 0.1563800E+00, 0.3158286E+00, &
     & 0.3129743E+00, 0.3622700E+00, 0.3104151E+00, 0.3121665E+00, &
     & 0.3152372E+00, 0.3616200E+00, 0.3177400E+00, 0.3103700E+00, &
     & 0.3315800E+00, 0.3224535E+00, 0.2787436E+00, 0.2787436E+00 /
      data (ref_adm(17,iz,10, 7),iz = 1,20) / &
     & 0.3116400E+00, 0.3116400E+00, 0.3348500E+00, 0.3115200E+00, &
     & 0.4203900E+00, 0.2392900E+00, 0.3197065E+00, 0.2544000E+00, &
     & 0.2425800E+00, 0.3106978E+00, 0.2790500E+00, 0.3121665E+00, &
     & 0.3402500E+00, 0.2505700E+00, 0.3182800E+00, 0.3086000E+00, &
     & 0.3315800E+00, 0.3224535E+00, 0.2787436E+00, 0.2787436E+00 /
      data (ref_adm(17,iz,11, 7),iz = 1,20) / &
     & 0.3067700E+00, 0.3067700E+00, 0.3113900E+00, 0.3565900E+00, &
     & 0.3692100E+00, 0.3386300E+00, 0.3358300E+00, 0.3158200E+00, &
     & 0.2777200E+00, 0.3106977E+00, 0.3104151E+00, 0.3235600E+00, &
     & 0.4401400E+00, 0.2611100E+00, 0.2429100E+00, 0.3294628E+00, &
     & 0.3315800E+00, 0.3224535E+00, 0.2787436E+00, 0.2787436E+00 /
      data (ref_adm(17,iz,12, 7),iz = 1,20) / &
     & 0.3304600E+00, 0.3304600E+00, 0.3193500E+00, 0.2888500E+00, &
     & 0.3450900E+00, 0.3661100E+00, 0.3212300E+00, 0.3604000E+00, &
     & 0.3504900E+00, 0.3040400E+00, 0.2823300E+00, 0.2973000E+00, &
     & 0.3048800E+00, 0.3191130E+00, 0.2216900E+00, 0.3294627E+00, &
     & 0.3315800E+00, 0.3224535E+00, 0.2787436E+00, 0.2787436E+00 /
      data (ref_adm(17,iz,13, 7),iz = 1,20) / &
     & 0.3312100E+00, 0.3312100E+00, 0.3728600E+00, 0.3559200E+00, &
     & 0.3658300E+00, 0.3340700E+00, 0.3239100E+00, 0.2722100E+00, &
     & 0.3349700E+00, 0.3666500E+00, 0.2777500E+00, 0.3200000E+00, &
     & 0.2978800E+00, 0.3068000E+00, 0.3242773E+00, 0.3294628E+00, &
     & 0.3315800E+00, 0.3224535E+00, 0.2787436E+00, 0.2787436E+00 /
      data (ref_adm(17,iz,14, 7),iz = 1,20) / &
     & 0.2671900E+00, 0.2671900E+00, 0.3394700E+00, 0.3119000E+00, &
     & 0.3663700E+00, 0.3195900E+00, 0.3898600E+00, 0.3258400E+00, &
     & 0.3375300E+00, 0.3274700E+00, 0.2888700E+00, 0.2801300E+00, &
     & 0.2760500E+00, 0.2836100E+00, 0.3232100E+00, 0.2586300E+00, &
     & 0.3315800E+00, 0.3224535E+00, 0.2787436E+00, 0.2787436E+00 /
      data (ref_adm(17,iz,15, 7),iz = 1,20) / &
     & 0.3514200E+00, 0.3514200E+00, 0.2991600E+00, 0.3781500E+00, &
     & 0.3676200E+00, 0.3386700E+00, 0.2764100E+00, 0.2883000E+00, &
     & 0.3129743E+00, 0.3106977E+00, 0.3104151E+00, 0.3194800E+00, &
     & 0.2962600E+00, 0.2752900E+00, 0.3242773E+00, 0.2905900E+00, &
     & 0.3315800E+00, 0.3224535E+00, 0.2787436E+00, 0.2787436E+00 /
      data (ref_adm(17,iz,16, 7),iz = 1,20) / &
     & 0.3050600E+00, 0.3050600E+00, 0.3723300E+00, 0.3224100E+00, &
     & 0.2418800E+00, 0.3186358E+00, 0.3599500E+00, 0.2790300E+00, &
     & 0.4113400E+00, 0.3106978E+00, 0.3104151E+00, 0.3715100E+00, &
     & 0.2529200E+00, 0.3191130E+00, 0.3242773E+00, 0.3304000E+00, &
     & 0.3315800E+00, 0.3224535E+00, 0.2787436E+00, 0.2787436E+00 /
      data (ref_adm(17,iz,17, 7),iz = 1,20) / &
     & 0.4039100E+00, 0.4039100E+00, 0.3336900E+00, 0.3757600E+00, &
     & 0.3258500E+00, 0.3643000E+00, 0.2589700E+00, 0.2108800E+00, &
     & 0.3170100E+00, 0.2952300E+00, 0.3104151E+00, 0.4179300E+00, &
     & 0.3089700E+00, 0.3191130E+00, 0.3242773E+00, 0.3169100E+00, &
     & 0.3315800E+00, 0.3224535E+00, 0.2787436E+00, 0.2787436E+00 /
      data (ref_adm(17,iz,18, 7),iz = 1,20) / &
     & 0.3315900E+00, 0.3315900E+00, 0.3404031E+00, 0.3459900E+00, &
     & 0.2907800E+00, 0.3433929E+00, 0.3143200E+00, 0.3206785E+00, &
     & 0.3207756E+00, 0.3733100E+00, 0.2544000E+00, 0.2847600E+00, &
     & 0.2619300E+00, 0.3201300E+00, 0.3697300E+00, 0.3078964E+00, &
     & 0.2949829E+00, 0.2747219E+00, 0.2488352E+00, 0.2488352E+00 /
      data (ref_adm(17,iz,19, 7),iz = 1,20) / &
     & 0.3586600E+00, 0.3586600E+00, 0.3380081E+00, 0.3442400E+00, &
     & 0.3235600E+00, 0.3509728E+00, 0.3387425E+00, 0.3642900E+00, &
     & 0.3224477E+00, 0.3238007E+00, 0.3157400E+00, 0.3239577E+00, &
     & 0.3383100E+00, 0.4133500E+00, 0.3150059E+00, 0.3055412E+00, &
     & 0.2921984E+00, 0.2720129E+00, 0.2472960E+00, 0.2472960E+00 /
      data (ref_adm(17,iz,20, 7),iz = 1,20) / &
     & 0.3336950E+00, 0.3336950E+00, 0.3096200E+00, 0.3356700E+00, &
     & 0.4198200E+00, 0.3543678E+00, 0.2489500E+00, 0.2485100E+00, &
     & 0.3262807E+00, 0.3372500E+00, 0.3265703E+00, 0.3261554E+00, &
     & 0.3222100E+00, 0.2807500E+00, 0.2393600E+00, 0.3040385E+00, &
     & 0.2904144E+00, 0.2702691E+00, 0.2465527E+00, 0.2465527E+00 /
      data (ref_adm(17,iz,21, 7),iz = 1,20) / &
     & 0.4269200E+00, 0.4269200E+00, 0.3344501E+00, 0.3378109E+00, &
     & 0.3345800E+00, 0.3330900E+00, 0.3596288E+00, 0.2830700E+00, &
     & 0.3341660E+00, 0.2006800E+00, 0.3974100E+00, 0.3593800E+00, &
     & 0.2929600E+00, 0.3207220E+00, 0.2265100E+00, 0.3033529E+00, &
     & 0.2894213E+00, 0.2693186E+00, 0.2464553E+00, 0.2464553E+00 /
      data (ref_adm(17,iz,22, 7),iz = 1,20) / &
     & 0.3960900E+00, 0.3960900E+00, 0.5183600E+00, 0.4325500E+00, &
     & 0.3729700E+00, 0.3626271E+00, 0.3650228E+00, 0.3662264E+00, &
     & 0.3799253E+00, 0.3723928E+00, 0.3471450E+00, 0.3959500E+00, &
     & 0.3329791E+00, 0.3248098E+00, 0.2435900E+00, 0.3001387E+00, &
     & 0.2837504E+00, 0.2602283E+00, 0.2282274E+00, 0.2282274E+00 /
      data (ref_adm(17,iz,23, 7),iz = 1,20) / &
     & 0.3342800E+00, 0.3342800E+00, 0.3602977E+00, 0.4145900E+00, &
     & 0.3666900E+00, 0.3522200E+00, 0.2922700E+00, 0.3877600E+00, &
     & 0.3781455E+00, 0.3755940E+00, 0.3485028E+00, 0.3655200E+00, &
     & 0.2083300E+00, 0.3251997E+00, 0.3142731E+00, 0.3093400E+00, &
     & 0.2835624E+00, 0.2600505E+00, 0.2281946E+00, 0.2281946E+00 /
      data (ref_adm(17,iz,24, 7),iz = 1,20) / &
     & 0.3119300E+00, 0.3119300E+00, 0.3218200E+00, 0.2988800E+00, &
     & 0.3327800E+00, 0.2697100E+00, 0.3263100E+00, 0.4752100E+00, &
     & 0.5268800E+00, 0.5459400E+00, 0.3501651E+00, 0.3395434E+00, &
     & 0.3315200E+00, 0.2882600E+00, 0.3198000E+00, 0.3272000E+00, &
     & 0.2835162E+00, 0.2600049E+00, 0.2281757E+00, 0.2281757E+00 /
      data (ref_adm(17,iz,25, 7),iz = 1,20) / &
     & 0.4053600E+00, 0.4053600E+00, 0.3653100E+00, 0.3189600E+00, &
     & 0.2694400E+00, 0.3623134E+00, 0.5459100E+00, 0.3138400E+00, &
     & 0.3743118E+00, 0.3956300E+00, 0.3631900E+00, 0.3319500E+00, &
     & 0.3573500E+00, 0.3295300E+00, 0.3320800E+00, 0.2990400E+00, &
     & 0.2833925E+00, 0.2598849E+00, 0.2281731E+00, 0.2281731E+00 /
      data (ref_adm(17,iz,26, 7),iz = 1,20) / &
     & 0.3363200E+00, 0.3363200E+00, 0.3131100E+00, 0.3593371E+00, &
     & 0.4695000E+00, 0.4009600E+00, 0.3947000E+00, 0.3691200E+00, &
     & 0.2993400E+00, 0.3834636E+00, 0.3012300E+00, 0.2637100E+00, &
     & 0.3304100E+00, 0.3035800E+00, 0.3231400E+00, 0.3064200E+00, &
     & 0.2833638E+00, 0.2598461E+00, 0.2281742E+00, 0.2281742E+00 /
      data (ref_adm(17,iz,27, 7),iz = 1,20) / &
     & 0.3198100E+00, 0.3198100E+00, 0.3509600E+00, 0.3989100E+00, &
     & 0.4224100E+00, 0.3210100E+00, 0.3767500E+00, 0.3829000E+00, &
     & 0.3715151E+00, 0.3849408E+00, 0.2737600E+00, 0.3180500E+00, &
     & 0.3070500E+00, 0.3197000E+00, 0.3149300E+00, 0.3038100E+00, &
     & 0.2832866E+00, 0.2597734E+00, 0.2281927E+00, 0.2281927E+00 /
      data (ref_adm(17,iz,28, 7),iz = 1,20) / &
     & 0.4360800E+00, 0.4360800E+00, 0.3498000E+00, 0.3815700E+00, &
     & 0.3864500E+00, 0.2963800E+00, 0.3765300E+00, 0.3742100E+00, &
     & 0.4224100E+00, 0.3819000E+00, 0.3739100E+00, 0.3297400E+00, &
     & 0.3241800E+00, 0.3271349E+00, 0.3150234E+00, 0.2516900E+00, &
     & 0.2832461E+00, 0.2597614E+00, 0.2282061E+00, 0.2282061E+00 /
      data (ref_adm(17,iz,29, 7),iz = 1,20) / &
     & 0.3697200E+00, 0.3697200E+00, 0.3617900E+00, 0.2728700E+00, &
     & 0.3147000E+00, 0.3271400E+00, 0.3605400E+00, 0.3736800E+00, &
     & 0.3980000E+00, 0.3777900E+00, 0.4073600E+00, 0.3448000E+00, &
     & 0.3476700E+00, 0.3149200E+00, 0.3412800E+00, 0.3074100E+00, &
     & 0.2832310E+00, 0.2597326E+00, 0.2282336E+00, 0.2282336E+00 /
      data (ref_adm(17,iz,30, 7),iz = 1,20) / &
     & 0.3128900E+00, 0.3128900E+00, 0.2848200E+00, 0.2579100E+00, &
     & 0.3437200E+00, 0.2416900E+00, 0.3096200E+00, 0.3266400E+00, &
     & 0.3221900E+00, 0.3568600E+00, 0.3210000E+00, 0.3419339E+00, &
     & 0.3351254E+00, 0.3091000E+00, 0.3284100E+00, 0.2992100E+00, &
     & 0.2832611E+00, 0.2597228E+00, 0.2282655E+00, 0.2282655E+00 /
      data (ref_adm(17,iz,31, 7),iz = 1,20) / &
     & 0.3300200E+00, 0.3300200E+00, 0.4268100E+00, 0.3606560E+00, &
     & 0.3999200E+00, 0.3792600E+00, 0.4847100E+00, 0.2981900E+00, &
     & 0.4206200E+00, 0.3979900E+00, 0.3759500E+00, 0.3260800E+00, &
     & 0.3180200E+00, 0.2923000E+00, 0.3449000E+00, 0.3002511E+00, &
     & 0.2832193E+00, 0.2597128E+00, 0.2282977E+00, 0.2282977E+00 /
      data (ref_adm(17,iz,32, 7),iz = 1,20) / &
     & 0.3774193E+00, 0.3774193E+00, 0.5330800E+00, 0.4871700E+00, &
     & 0.4184000E+00, 0.3414200E+00, 0.4409600E+00, 0.4390900E+00, &
     & 0.4299400E+00, 0.3095500E+00, 0.3658648E+00, 0.3388400E+00, &
     & 0.3973100E+00, 0.2760400E+00, 0.3157317E+00, 0.3002787E+00, &
     & 0.2832224E+00, 0.2596960E+00, 0.2283294E+00, 0.2283294E+00 /
      data (ref_adm(17,iz,33, 7),iz = 1,20) / &
     & 0.3796924E+00, 0.3796924E+00, 0.3563300E+00, 0.3613029E+00, &
     & 0.3599001E+00, 0.3616531E+00, 0.3646405E+00, 0.3176700E+00, &
     & 0.3543900E+00, 0.3854630E+00, 0.3674607E+00, 0.4417500E+00, &
     & 0.2777500E+00, 0.3496000E+00, 0.3158895E+00, 0.3002996E+00, &
     & 0.2832447E+00, 0.2597156E+00, 0.2283565E+00, 0.2283565E+00 /
      data (ref_adm(17,iz,34, 7),iz = 1,20) / &
     & 0.2831800E+00, 0.2831800E+00, 0.3305900E+00, 0.3615567E+00, &
     & 0.2887400E+00, 0.3615959E+00, 0.3646259E+00, 0.3417900E+00, &
     & 0.3872400E+00, 0.2580000E+00, 0.5168200E+00, 0.3435263E+00, &
     & 0.3356002E+00, 0.3156400E+00, 0.3476400E+00, 0.2822800E+00, &
     & 0.2832287E+00, 0.2597021E+00, 0.2283822E+00, 0.2283822E+00 /
      data (ref_adm(17,iz,35, 7),iz = 1,20) / &
     & 0.2928700E+00, 0.2928700E+00, 0.3505200E+00, 0.3617511E+00, &
     & 0.3600462E+00, 0.3615234E+00, 0.3106000E+00, 0.2837100E+00, &
     & 0.5182200E+00, 0.3845571E+00, 0.3037200E+00, 0.3438079E+00, &
     & 0.3356802E+00, 0.3287265E+00, 0.3160495E+00, 0.2832100E+00, &
     & 0.2832398E+00, 0.2597005E+00, 0.2284055E+00, 0.2284055E+00 /
      data (ref_adm(17,iz,36, 7),iz = 1,20) / &
     & 0.4213000E+00, 0.4213000E+00, 0.3506100E+00, 0.3202200E+00, &
     & 0.3259100E+00, 0.3615601E+00, 0.3645868E+00, 0.3669062E+00, &
     & 0.3846100E+00, 0.5054800E+00, 0.3704825E+00, 0.3439902E+00, &
     & 0.3554600E+00, 0.3288262E+00, 0.3161828E+00, 0.3004142E+00, &
     & 0.2832537E+00, 0.2596835E+00, 0.2284185E+00, 0.2284185E+00 /
      data (ref_adm(17,iz,37, 7),iz = 1,20) / &
     & 0.4949100E+00, 0.4949100E+00, 0.3830398E+00, 0.2770100E+00, &
     & 0.3600999E+00, 0.3614853E+00, 0.3646613E+00, 0.3668583E+00, &
     & 0.3682618E+00, 0.5388700E+00, 0.4804800E+00, 0.3439911E+00, &
     & 0.3357546E+00, 0.2802900E+00, 0.3161928E+00, 0.3004069E+00, &
     & 0.2833264E+00, 0.2597339E+00, 0.2284246E+00, 0.2284246E+00 /
      data (ref_adm(17,iz,38, 7),iz = 1,20) / &
     & 0.4949100E+00, 0.4949100E+00, 0.3830398E+00, 0.2770100E+00, &
     & 0.3600999E+00, 0.3614853E+00, 0.3646613E+00, 0.3668583E+00, &
     & 0.3682618E+00, 0.5388700E+00, 0.4804800E+00, 0.3439911E+00, &
     & 0.3357546E+00, 0.2802900E+00, 0.3161928E+00, 0.3004069E+00, &
     & 0.2833264E+00, 0.2597339E+00, 0.2284246E+00, 0.2284246E+00 /
! Solar Zenith Angle 35.0 Albedo  0.3423010E+00
      data (ref_adm(17,iz, 1, 8),iz = 1,20) / &
     & 0.3549800E+00, 0.3549800E+00, 0.3378900E+00, 0.3455200E+00, &
     & 0.4236300E+00, 0.3503700E+00, 0.3456300E+00, 0.2944100E+00, &
     & 0.2512100E+00, 0.3521200E+00, 0.2757200E+00, 0.2950200E+00, &
     & 0.3276100E+00, 0.3250900E+00, 0.3008800E+00, 0.3518200E+00, &
     & 0.3182100E+00, 0.3535977E+00, 0.3000631E+00, 0.3000631E+00 /
      data (ref_adm(17,iz, 2, 8),iz = 1,20) / &
     & 0.3549800E+00, 0.3549800E+00, 0.3378900E+00, 0.3455200E+00, &
     & 0.4236300E+00, 0.3503700E+00, 0.3456300E+00, 0.2944100E+00, &
     & 0.2512100E+00, 0.3521200E+00, 0.2757200E+00, 0.2950200E+00, &
     & 0.3276100E+00, 0.3250900E+00, 0.3008800E+00, 0.3518200E+00, &
     & 0.3182100E+00, 0.3535977E+00, 0.3000631E+00, 0.3000631E+00 /
      data (ref_adm(17,iz, 3, 8),iz = 1,20) / &
     & 0.3285900E+00, 0.3285900E+00, 0.3198600E+00, 0.3562700E+00, &
     & 0.3037500E+00, 0.3357100E+00, 0.2455400E+00, 0.2791100E+00, &
     & 0.3153400E+00, 0.3223600E+00, 0.2713300E+00, 0.3721800E+00, &
     & 0.2903900E+00, 0.3050900E+00, 0.3944800E+00, 0.3547900E+00, &
     & 0.2720000E+00, 0.3529608E+00, 0.3870400E-01, 0.3870400E-01 /
      data (ref_adm(17,iz, 4, 8),iz = 1,20) / &
     & 0.3216500E+00, 0.3216500E+00, 0.3111800E+00, 0.2776600E+00, &
     & 0.2965000E+00, 0.3382200E+00, 0.1975000E+00, 0.2720900E+00, &
     & 0.2929400E+00, 0.2258900E+00, 0.3130700E+00, 0.3176925E+00, &
     & 0.2733400E+00, 0.3132500E+00, 0.3618900E+00, 0.5021200E+00, &
     & 0.3712800E+00, 0.3525361E+00, 0.2994282E+00, 0.2994282E+00 /
      data (ref_adm(17,iz, 5, 8),iz = 1,20) / &
     & 0.3580700E+00, 0.3580700E+00, 0.3378400E+00, 0.3284700E+00, &
     & 0.3061900E+00, 0.3653600E+00, 0.3032000E+00, 0.2572200E+00, &
     & 0.3072866E+00, 0.3332800E+00, 0.2427700E+00, 0.3238100E+00, &
     & 0.3035300E+00, 0.2770700E+00, 0.2449100E+00, 0.4114600E+00, &
     & 0.3497400E+00, 0.3517345E+00, 0.2987909E+00, 0.2987909E+00 /
      data (ref_adm(17,iz, 6, 8),iz = 1,20) / &
     & 0.2713500E+00, 0.2713500E+00, 0.3079200E+00, 0.3535000E+00, &
     & 0.2890700E+00, 0.3015500E+00, 0.3266100E+00, 0.2649700E+00, &
     & 0.3358400E+00, 0.3080783E+00, 0.3106261E+00, 0.3600600E+00, &
     & 0.2814800E+00, 0.2661700E+00, 0.2474600E+00, 0.4492000E+00, &
     & 0.3457800E+00, 0.3504698E+00, 0.2980120E+00, 0.2980120E+00 /
      data (ref_adm(17,iz, 7, 8),iz = 1,20) / &
     & 0.3392300E+00, 0.3392300E+00, 0.2505300E+00, 0.3283100E+00, &
     & 0.2923000E+00, 0.2795600E+00, 0.3024100E+00, 0.2221500E+00, &
     & 0.2707000E+00, 0.2648300E+00, 0.2936800E+00, 0.3281200E+00, &
     & 0.3581600E+00, 0.3346379E+00, 0.2686200E+00, 0.4357400E+00, &
     & 0.4408600E+00, 0.3522600E+00, 0.2969598E+00, 0.2969598E+00 /
      data (ref_adm(17,iz, 8, 8),iz = 1,20) / &
     & 0.3241200E+00, 0.3241200E+00, 0.3566400E+00, 0.3392500E+00, &
     & 0.3345200E+00, 0.3363300E+00, 0.3211200E+00, 0.3175800E+00, &
     & 0.3301300E+00, 0.3126700E+00, 0.3138700E+00, 0.3267800E+00, &
     & 0.3766000E+00, 0.3998500E+00, 0.3790200E+00, 0.3688900E+00, &
     & 0.3317200E+00, 0.2929800E+00, 0.2957631E+00, 0.2957631E+00 /
      data (ref_adm(17,iz, 9, 8),iz = 1,20) / &
     & 0.2954700E+00, 0.2954700E+00, 0.3350500E+00, 0.3515400E+00, &
     & 0.2519600E+00, 0.2468800E+00, 0.2160100E+00, 0.3925700E+00, &
     & 0.3666600E+00, 0.3835100E+00, 0.4005900E+00, 0.4137100E+00, &
     & 0.3507800E+00, 0.3086600E+00, 0.3194700E+00, 0.3361000E+00, &
     & 0.3571500E+00, 0.3462040E+00, 0.2945006E+00, 0.2945006E+00 /
      data (ref_adm(17,iz,10, 8),iz = 1,20) / &
     & 0.2728800E+00, 0.2728800E+00, 0.4793400E+00, 0.4432500E+00, &
     & 0.4384400E+00, 0.3858300E+00, 0.4726500E+00, 0.3552100E+00, &
     & 0.3887400E+00, 0.3130600E+00, 0.3461400E+00, 0.4190700E+00, &
     & 0.3226800E+00, 0.2809100E+00, 0.3182500E+00, 0.3505068E+00, &
     & 0.4175200E+00, 0.3833400E+00, 0.2931274E+00, 0.2931274E+00 /
      data (ref_adm(17,iz,11, 8),iz = 1,20) / &
     & 0.3711100E+00, 0.3711100E+00, 0.3426100E+00, 0.3346900E+00, &
     & 0.3321100E+00, 0.2921800E+00, 0.3386900E+00, 0.5066600E+00, &
     & 0.3821300E+00, 0.2664000E+00, 0.3500200E+00, 0.2949400E+00, &
     & 0.2970200E+00, 0.2831200E+00, 0.3403587E+00, 0.3490562E+00, &
     & 0.3559100E+00, 0.3022300E+00, 0.2914655E+00, 0.2914655E+00 /
      data (ref_adm(17,iz,12, 8),iz = 1,20) / &
     & 0.3388500E+00, 0.3388500E+00, 0.3343600E+00, 0.3462600E+00, &
     & 0.3323700E+00, 0.3196200E+00, 0.3013900E+00, 0.3170200E+00, &
     & 0.2877000E+00, 0.3015300E+00, 0.3159400E+00, 0.2423400E+00, &
     & 0.2890300E+00, 0.3034000E+00, 0.3388586E+00, 0.3472650E+00, &
     & 0.3504936E+00, 0.2127400E+00, 0.2242400E+00, 0.2242400E+00 /
      data (ref_adm(17,iz,13, 8),iz = 1,20) / &
     & 0.3282300E+00, 0.3282300E+00, 0.3421800E+00, 0.3466800E+00, &
     & 0.3192800E+00, 0.2964600E+00, 0.3364600E+00, 0.3072600E+00, &
     & 0.3397600E+00, 0.3077700E+00, 0.3079800E+00, 0.2882400E+00, &
     & 0.3142200E+00, 0.2630500E+00, 0.2036700E+00, 0.3455261E+00, &
     & 0.3487387E+00, 0.3378320E+00, 0.2881240E+00, 0.2881240E+00 /
      data (ref_adm(17,iz,14, 8),iz = 1,20) / &
     & 0.3015900E+00, 0.3015900E+00, 0.3078900E+00, 0.3151300E+00, &
     & 0.3052700E+00, 0.2983400E+00, 0.3121100E+00, 0.3299100E+00, &
     & 0.3348000E+00, 0.3158400E+00, 0.3039400E+00, 0.3199600E+00, &
     & 0.3331500E+00, 0.3029700E+00, 0.3360853E+00, 0.3206800E+00, &
     & 0.3344100E+00, 0.3356865E+00, 0.2862893E+00, 0.2862893E+00 /
      data (ref_adm(17,iz,15, 8),iz = 1,20) / &
     & 0.3148900E+00, 0.3148900E+00, 0.3339500E+00, 0.3048100E+00, &
     & 0.2954500E+00, 0.2187400E+00, 0.2956500E+00, 0.3265500E+00, &
     & 0.2851500E+00, 0.2922800E+00, 0.3213400E+00, 0.3186600E+00, &
     & 0.3289900E+00, 0.3193200E+00, 0.3257200E+00, 0.3158800E+00, &
     & 0.3447092E+00, 0.2249200E+00, 0.2844083E+00, 0.2844083E+00 /
      data (ref_adm(17,iz,16, 8),iz = 1,20) / &
     & 0.3067200E+00, 0.3067200E+00, 0.3455900E+00, 0.2762400E+00, &
     & 0.2409200E+00, 0.2467500E+00, 0.3165000E+00, 0.3030300E+00, &
     & 0.3022900E+00, 0.3138500E+00, 0.3313000E+00, 0.2926900E+00, &
     & 0.2543500E+00, 0.3186100E+00, 0.3592500E+00, 0.3515200E+00, &
     & 0.3154100E+00, 0.3314204E+00, 0.2825935E+00, 0.2825935E+00 /
      data (ref_adm(17,iz,17, 8),iz = 1,20) / &
     & 0.3936700E+00, 0.3936700E+00, 0.4846600E+00, 0.3132700E+00, &
     & 0.3372900E+00, 0.3241965E+00, 0.3084200E+00, 0.2768600E+00, &
     & 0.3151700E+00, 0.2987900E+00, 0.4046500E+00, 0.3178700E+00, &
     & 0.2737100E+00, 0.4508100E+00, 0.3639200E+00, 0.3384935E+00, &
     & 0.3148700E+00, 0.3293424E+00, 0.2809293E+00, 0.2809293E+00 /
      data (ref_adm(17,iz,18, 8),iz = 1,20) / &
     & 0.3080000E+00, 0.3080000E+00, 0.3171500E+00, 0.3531100E+00, &
     & 0.3464989E+00, 0.2515400E+00, 0.2770100E+00, 0.3069200E+00, &
     & 0.3366300E+00, 0.3868300E+00, 0.4254200E+00, 0.3210500E+00, &
     & 0.2820200E+00, 0.2566900E+00, 0.3004200E+00, 0.3136537E+00, &
     & 0.3279300E+00, 0.2809208E+00, 0.2544720E+00, 0.2544720E+00 /
      data (ref_adm(17,iz,19, 8),iz = 1,20) / &
     & 0.3629300E+00, 0.3629300E+00, 0.2888300E+00, 0.3099300E+00, &
     & 0.3720100E+00, 0.3844200E+00, 0.3729000E+00, 0.3079200E+00, &
     & 0.4111900E+00, 0.3523500E+00, 0.3516500E+00, 0.3174100E+00, &
     & 0.3067000E+00, 0.3158500E+00, 0.3633000E+00, 0.3108273E+00, &
     & 0.2978842E+00, 0.2777344E+00, 0.2526836E+00, 0.2526836E+00 /
      data (ref_adm(17,iz,20, 8),iz = 1,20) / &
     & 0.3756300E+00, 0.3756300E+00, 0.3619400E+00, 0.4253600E+00, &
     & 0.4060800E+00, 0.3026600E+00, 0.2981000E+00, 0.3647600E+00, &
     & 0.3773700E+00, 0.3719600E+00, 0.3593400E+00, 0.3037300E+00, &
     & 0.2777400E+00, 0.2464300E+00, 0.3141000E+00, 0.3089997E+00, &
     & 0.2957416E+00, 0.2756989E+00, 0.2518240E+00, 0.2518240E+00 /
      data (ref_adm(17,iz,21, 8),iz = 1,20) / &
     & 0.3660800E+00, 0.3660800E+00, 0.4067900E+00, 0.3409800E+00, &
     & 0.3971800E+00, 0.3872800E+00, 0.3627200E+00, 0.3817900E+00, &
     & 0.3408400E+00, 0.4037100E+00, 0.3427400E+00, 0.3055400E+00, &
     & 0.3586200E+00, 0.3094700E+00, 0.3182738E+00, 0.3081130E+00, &
     & 0.2945359E+00, 0.2745767E+00, 0.2517147E+00, 0.2517147E+00 /
      data (ref_adm(17,iz,22, 8),iz = 1,20) / &
     & 0.2940000E+00, 0.2940000E+00, 0.3590500E+00, 0.3524600E+00, &
     & 0.3649600E+00, 0.3935400E+00, 0.4065400E+00, 0.3971800E+00, &
     & 0.3595700E+00, 0.4142300E+00, 0.3465300E+00, 0.3107100E+00, &
     & 0.3365900E+00, 0.3201500E+00, 0.2679200E+00, 0.3631504E+00, &
     & 0.3544807E+00, 0.3327785E+00, 0.2781259E+00, 0.2781259E+00 /
      data (ref_adm(17,iz,23, 8),iz = 1,20) / &
     & 0.3058600E+00, 0.3058600E+00, 0.3691300E+00, 0.4132900E+00, &
     & 0.2836400E+00, 0.3177500E+00, 0.3101900E+00, 0.4139400E+00, &
     & 0.4245900E+00, 0.3243200E+00, 0.3560400E+00, 0.3475600E+00, &
     & 0.3376900E+00, 0.2392900E+00, 0.3133600E+00, 0.3429500E+00, &
     & 0.3522196E+00, 0.3307201E+00, 0.2770990E+00, 0.2770990E+00 /
      data (ref_adm(17,iz,24, 8),iz = 1,20) / &
     & 0.3211100E+00, 0.3211100E+00, 0.3546291E+00, 0.3728400E+00, &
     & 0.3590917E+00, 0.3816100E+00, 0.3694971E+00, 0.4480000E+00, &
     & 0.3658400E+00, 0.3739700E+00, 0.3427300E+00, 0.3627800E+00, &
     & 0.3695800E+00, 0.3351300E+00, 0.2787900E+00, 0.2869900E+00, &
     & 0.3502465E+00, 0.3287662E+00, 0.2761721E+00, 0.2761721E+00 /
      data (ref_adm(17,iz,25, 8),iz = 1,20) / &
     & 0.3342400E+00, 0.3342400E+00, 0.2753100E+00, 0.3474100E+00, &
     & 0.3733400E+00, 0.3157600E+00, 0.2989900E+00, 0.3543600E+00, &
     & 0.3887500E+00, 0.3001500E+00, 0.4039700E+00, 0.3535000E+00, &
     & 0.3095200E+00, 0.3074600E+00, 0.3597000E+00, 0.3577595E+00, &
     & 0.3008000E+00, 0.3269276E+00, 0.2754453E+00, 0.2754453E+00 /
      data (ref_adm(17,iz,26, 8),iz = 1,20) / &
     & 0.2851500E+00, 0.2851500E+00, 0.4026700E+00, 0.3652900E+00, &
     & 0.3610100E+00, 0.3546600E+00, 0.4844600E+00, 0.3424200E+00, &
     & 0.3243000E+00, 0.3430300E+00, 0.3367600E+00, 0.2680500E+00, &
     & 0.2745000E+00, 0.3727000E+00, 0.4239900E+00, 0.3577800E+00, &
     & 0.3072300E+00, 0.3249815E+00, 0.2746882E+00, 0.2746882E+00 /
      data (ref_adm(17,iz,27, 8),iz = 1,20) / &
     & 0.3397900E+00, 0.3397900E+00, 0.3669400E+00, 0.3607900E+00, &
     & 0.3635800E+00, 0.3527400E+00, 0.3919100E+00, 0.3516300E+00, &
     & 0.3491300E+00, 0.3326300E+00, 0.4592600E+00, 0.3094400E+00, &
     & 0.3479800E+00, 0.3428700E+00, 0.3599657E+00, 0.3199300E+00, &
     & 0.2901100E+00, 0.2671300E+00, 0.2742232E+00, 0.2742232E+00 /
      data (ref_adm(17,iz,28, 8),iz = 1,20) / &
     & 0.3644100E+00, 0.3644100E+00, 0.3642300E+00, 0.3674200E+00, &
     & 0.3442300E+00, 0.3150600E+00, 0.3601100E+00, 0.3790300E+00, &
     & 0.3789700E+00, 0.3544100E+00, 0.4015700E+00, 0.3489900E+00, &
     & 0.2730600E+00, 0.4103200E+00, 0.3948800E+00, 0.3340200E+00, &
     & 0.3438610E+00, 0.2435800E+00, 0.2737211E+00, 0.2737211E+00 /
      data (ref_adm(17,iz,29, 8),iz = 1,20) / &
     & 0.3396900E+00, 0.3396900E+00, 0.3578900E+00, 0.3959800E+00, &
     & 0.3841400E+00, 0.3758700E+00, 0.3904400E+00, 0.4114000E+00, &
     & 0.3583800E+00, 0.3626100E+00, 0.3928500E+00, 0.3885000E+00, &
     & 0.3649700E+00, 0.4196500E+00, 0.3803600E+00, 0.3531269E+00, &
     & 0.3565900E+00, 0.2859900E+00, 0.2447800E+00, 0.2447800E+00 /
      data (ref_adm(17,iz,30, 8),iz = 1,20) / &
     & 0.2703200E+00, 0.2703200E+00, 0.2941900E+00, 0.3202200E+00, &
     & 0.3436000E+00, 0.3636400E+00, 0.3586800E+00, 0.3816800E+00, &
     & 0.3917300E+00, 0.3801400E+00, 0.3748400E+00, 0.3964700E+00, &
     & 0.3742700E+00, 0.3478100E+00, 0.4230600E+00, 0.3280600E+00, &
     & 0.3461700E+00, 0.2950200E+00, 0.2728999E+00, 0.2728999E+00 /
      data (ref_adm(17,iz,31, 8),iz = 1,20) / &
     & 0.2932100E+00, 0.2932100E+00, 0.3007500E+00, 0.2901600E+00, &
     & 0.3195700E+00, 0.2982700E+00, 0.2823400E+00, 0.3709600E+00, &
     & 0.3923200E+00, 0.3493200E+00, 0.4453400E+00, 0.3623400E+00, &
     & 0.3623900E+00, 0.3954200E+00, 0.3122000E+00, 0.3057500E+00, &
     & 0.3473300E+00, 0.3177900E+00, 0.2725703E+00, 0.2725703E+00 /
      data (ref_adm(17,iz,32, 8),iz = 1,20) / &
     & 0.3445000E+00, 0.3445000E+00, 0.3423300E+00, 0.3596648E+00, &
     & 0.3593600E+00, 0.4374900E+00, 0.4384500E+00, 0.5257600E+00, &
     & 0.3903100E+00, 0.4085400E+00, 0.4360500E+00, 0.4338000E+00, &
     & 0.3556300E+00, 0.3801300E+00, 0.3102600E+00, 0.3260500E+00, &
     & 0.3204300E+00, 0.3179766E+00, 0.2723089E+00, 0.2723089E+00 /
      data (ref_adm(17,iz,33, 8),iz = 1,20) / &
     & 0.2706800E+00, 0.2706800E+00, 0.2719200E+00, 0.4081800E+00, &
     & 0.3237600E+00, 0.3558300E+00, 0.4697500E+00, 0.3665213E+00, &
     & 0.2834700E+00, 0.3827200E+00, 0.4556400E+00, 0.4796800E+00, &
     & 0.3401600E+00, 0.4324500E+00, 0.3593709E+00, 0.3980500E+00, &
     & 0.3591400E+00, 0.3174147E+00, 0.2721601E+00, 0.2721601E+00 /
      data (ref_adm(17,iz,34, 8),iz = 1,20) / &
     & 0.3561700E+00, 0.3561700E+00, 0.3521700E+00, 0.4326700E+00, &
     & 0.3915100E+00, 0.4869500E+00, 0.3863200E+00, 0.3453600E+00, &
     & 0.3410300E+00, 0.3196700E+00, 0.3867800E+00, 0.2944500E+00, &
     & 0.3597400E+00, 0.3974400E+00, 0.3593996E+00, 0.3830500E+00, &
     & 0.3389597E+00, 0.3168674E+00, 0.2719973E+00, 0.2719973E+00 /
      data (ref_adm(17,iz,35, 8),iz = 1,20) / &
     & 0.3188800E+00, 0.3188800E+00, 0.3524600E+00, 0.4071600E+00, &
     & 0.4138900E+00, 0.3554300E+00, 0.4507700E+00, 0.3946600E+00, &
     & 0.4000100E+00, 0.3419700E+00, 0.4824300E+00, 0.3913100E+00, &
     & 0.3580400E+00, 0.3961900E+00, 0.3592041E+00, 0.3508725E+00, &
     & 0.4262400E+00, 0.3164006E+00, 0.2719476E+00, 0.2719476E+00 /
      data (ref_adm(17,iz,36, 8),iz = 1,20) / &
     & 0.3541600E+00, 0.3541600E+00, 0.3666500E+00, 0.3776200E+00, &
     & 0.4265400E+00, 0.3608751E+00, 0.3667500E+00, 0.3999300E+00, &
     & 0.3650300E+00, 0.3987500E+00, 0.4812800E+00, 0.3694052E+00, &
     & 0.3805500E+00, 0.4186000E+00, 0.3590535E+00, 0.3509456E+00, &
     & 0.3380480E+00, 0.3161336E+00, 0.2718416E+00, 0.2718416E+00 /
      data (ref_adm(17,iz,37, 8),iz = 1,20) / &
     & 0.3689800E+00, 0.3689800E+00, 0.4470800E+00, 0.5057600E+00, &
     & 0.4320400E+00, 0.4062600E+00, 0.3834300E+00, 0.3711100E+00, &
     & 0.3823800E+00, 0.4198800E+00, 0.3734762E+00, 0.4670800E+00, &
     & 0.3351200E+00, 0.3871800E+00, 0.3205100E+00, 0.3508037E+00, &
     & 0.3381029E+00, 0.3160003E+00, 0.2717729E+00, 0.2717729E+00 /
      data (ref_adm(17,iz,38, 8),iz = 1,20) / &
     & 0.3689800E+00, 0.3689800E+00, 0.4470800E+00, 0.5057600E+00, &
     & 0.4320400E+00, 0.4062600E+00, 0.3834300E+00, 0.3711100E+00, &
     & 0.3823800E+00, 0.4198800E+00, 0.3734762E+00, 0.4670800E+00, &
     & 0.3351200E+00, 0.3871800E+00, 0.3205100E+00, 0.3508037E+00, &
     & 0.3381029E+00, 0.3160003E+00, 0.2717729E+00, 0.2717729E+00 /
! Solar Zenith Angle 40.0 Albedo  0.3299069E+00
      data (ref_adm(17,iz, 1, 9),iz = 1,20) / &
     & 0.3764000E+00, 0.3764000E+00, 0.4237700E+00, 0.3279700E+00, &
     & 0.3073100E+00, 0.3089100E+00, 0.3317600E+00, 0.3198400E+00, &
     & 0.3187700E+00, 0.2949100E+00, 0.2900300E+00, 0.3055900E+00, &
     & 0.2822100E+00, 0.3422900E+00, 0.3246400E+00, 0.3366700E+00, &
     & 0.3209900E+00, 0.3445600E+00, 0.2764579E+00, 0.2764579E+00 /
      data (ref_adm(17,iz, 2, 9),iz = 1,20) / &
     & 0.3764000E+00, 0.3764000E+00, 0.4237700E+00, 0.3279700E+00, &
     & 0.3073100E+00, 0.3089100E+00, 0.3317600E+00, 0.3198400E+00, &
     & 0.3187700E+00, 0.2949100E+00, 0.2900300E+00, 0.3055900E+00, &
     & 0.2822100E+00, 0.3422900E+00, 0.3246400E+00, 0.3366700E+00, &
     & 0.3209900E+00, 0.3445600E+00, 0.2764579E+00, 0.2764579E+00 /
      data (ref_adm(17,iz, 3, 9),iz = 1,20) / &
     & 0.3527200E+00, 0.3527200E+00, 0.3579400E+00, 0.4106200E+00, &
     & 0.3792500E+00, 0.2657200E+00, 0.3282900E+00, 0.3694600E+00, &
     & 0.3678700E+00, 0.3640100E+00, 0.3298800E+00, 0.2871100E+00, &
     & 0.3597400E+00, 0.3236600E+00, 0.3132600E+00, 0.3621800E+00, &
     & 0.3850300E+00, 0.3426700E+00, 0.1489758E+00, 0.1489758E+00 /
      data (ref_adm(17,iz, 4, 9),iz = 1,20) / &
     & 0.3595300E+00, 0.3595300E+00, 0.3116200E+00, 0.3666800E+00, &
     & 0.4250800E+00, 0.4546700E+00, 0.3569600E+00, 0.3632700E+00, &
     & 0.3393000E+00, 0.4039300E+00, 0.3348000E+00, 0.3051800E+00, &
     & 0.3070300E+00, 0.3918000E+00, 0.3342600E+00, 0.3502000E+00, &
     & 0.3235600E+00, 0.3553600E+00, 0.3478200E+00, 0.3478200E+00 /
      data (ref_adm(17,iz, 5, 9),iz = 1,20) / &
     & 0.3229600E+00, 0.3229600E+00, 0.3545800E+00, 0.4150800E+00, &
     & 0.2603600E+00, 0.3340000E+00, 0.2930700E+00, 0.2632800E+00, &
     & 0.2758100E+00, 0.3299100E+00, 0.2628200E+00, 0.3488700E+00, &
     & 0.3231700E+00, 0.3769800E+00, 0.3341200E+00, 0.3330000E+00, &
     & 0.3494100E+00, 0.3247600E+00, 0.3578800E+00, 0.3578800E+00 /
      data (ref_adm(17,iz, 6, 9),iz = 1,20) / &
     & 0.3340200E+00, 0.3340200E+00, 0.3459100E+00, 0.3554800E+00, &
     & 0.3785700E+00, 0.3263900E+00, 0.2964600E+00, 0.2713500E+00, &
     & 0.3284600E+00, 0.2722300E+00, 0.3226700E+00, 0.3234100E+00, &
     & 0.3662800E+00, 0.3243800E+00, 0.3102400E+00, 0.3174300E+00, &
     & 0.4253900E+00, 0.3073381E+00, 0.3558900E+00, 0.3558900E+00 /
      data (ref_adm(17,iz, 7, 9),iz = 1,20) / &
     & 0.3299600E+00, 0.3299600E+00, 0.2907500E+00, 0.3423100E+00, &
     & 0.3216900E+00, 0.3507000E+00, 0.2718900E+00, 0.3039600E+00, &
     & 0.2494700E+00, 0.2945500E+00, 0.2867900E+00, 0.3038400E+00, &
     & 0.2955300E+00, 0.3426400E+00, 0.3169300E+00, 0.3134400E+00, &
     & 0.3138413E+00, 0.3062976E+00, 0.2732687E+00, 0.2732687E+00 /
      data (ref_adm(17,iz, 8, 9),iz = 1,20) / &
     & 0.3476100E+00, 0.3476100E+00, 0.3451100E+00, 0.2953100E+00, &
     & 0.3079000E+00, 0.3098800E+00, 0.3676500E+00, 0.3548000E+00, &
     & 0.3166400E+00, 0.3008500E+00, 0.2426800E+00, 0.2875800E+00, &
     & 0.3234700E+00, 0.3230200E+00, 0.3285300E+00, 0.3579900E+00, &
     & 0.3297900E+00, 0.3051428E+00, 0.3224700E+00, 0.3224700E+00 /
      data (ref_adm(17,iz, 9, 9),iz = 1,20) / &
     & 0.2939700E+00, 0.2939700E+00, 0.2547400E+00, 0.3239900E+00, &
     & 0.2870900E+00, 0.3452300E+00, 0.3184400E+00, 0.3346800E+00, &
     & 0.3189700E+00, 0.2729400E+00, 0.2475400E+00, 0.2563500E+00, &
     & 0.3096800E+00, 0.3038900E+00, 0.2604300E+00, 0.4031900E+00, &
     & 0.3927100E+00, 0.3382200E+00, 0.3251500E+00, 0.3251500E+00 /
      data (ref_adm(17,iz,10, 9),iz = 1,20) / &
     & 0.3022200E+00, 0.3022200E+00, 0.2709000E+00, 0.2591200E+00, &
     & 0.2994700E+00, 0.2703100E+00, 0.2713100E+00, 0.3021700E+00, &
     & 0.3599700E+00, 0.3371600E+00, 0.2701900E+00, 0.3230200E+00, &
     & 0.3013200E+00, 0.2763000E+00, 0.3242400E+00, 0.3371900E+00, &
     & 0.3102516E+00, 0.3199000E+00, 0.2930500E+00, 0.2930500E+00 /
      data (ref_adm(17,iz,11, 9),iz = 1,20) / &
     & 0.3065700E+00, 0.3065700E+00, 0.3259300E+00, 0.2840800E+00, &
     & 0.2747700E+00, 0.3021000E+00, 0.3471100E+00, 0.2868500E+00, &
     & 0.2993400E+00, 0.2583700E+00, 0.2477200E+00, 0.2649000E+00, &
     & 0.2941000E+00, 0.2918200E+00, 0.2650500E+00, 0.3125310E+00, &
     & 0.3202400E+00, 0.2950300E+00, 0.2670113E+00, 0.2670113E+00 /
      data (ref_adm(17,iz,12, 9),iz = 1,20) / &
     & 0.3383300E+00, 0.3383300E+00, 0.3285600E+00, 0.3612200E+00, &
     & 0.3614000E+00, 0.3474200E+00, 0.3191900E+00, 0.3332000E+00, &
     & 0.3297100E+00, 0.2830200E+00, 0.2897600E+00, 0.2591800E+00, &
     & 0.3144900E+00, 0.2893400E+00, 0.3070800E+00, 0.3114448E+00, &
     & 0.3194600E+00, 0.3106700E+00, 0.2653179E+00, 0.2653179E+00 /
      data (ref_adm(17,iz,13, 9),iz = 1,20) / &
     & 0.3109600E+00, 0.3109600E+00, 0.2703800E+00, 0.2657500E+00, &
     & 0.2804000E+00, 0.2606200E+00, 0.2892700E+00, 0.2930700E+00, &
     & 0.3039400E+00, 0.3034400E+00, 0.3026700E+00, 0.3356400E+00, &
     & 0.2903000E+00, 0.3066900E+00, 0.2955600E+00, 0.3103134E+00, &
     & 0.3064272E+00, 0.2595900E+00, 0.2637199E+00, 0.2637199E+00 /
      data (ref_adm(17,iz,14, 9),iz = 1,20) / &
     & 0.3133300E+00, 0.3133300E+00, 0.3314300E+00, 0.3421500E+00, &
     & 0.3142000E+00, 0.3137600E+00, 0.3145500E+00, 0.3065800E+00, &
     & 0.2851700E+00, 0.2949800E+00, 0.2807700E+00, 0.2907400E+00, &
     & 0.2997800E+00, 0.3069400E+00, 0.2859000E+00, 0.2265900E+00, &
     & 0.2661600E+00, 0.3039900E+00, 0.2497200E+00, 0.2497200E+00 /
      data (ref_adm(17,iz,15, 9),iz = 1,20) / &
     & 0.3202000E+00, 0.3202000E+00, 0.2331800E+00, 0.2572900E+00, &
     & 0.2661800E+00, 0.2851300E+00, 0.2927000E+00, 0.3055700E+00, &
     & 0.2924300E+00, 0.3072200E+00, 0.3009700E+00, 0.3003200E+00, &
     & 0.2958700E+00, 0.2840600E+00, 0.3543500E+00, 0.3105600E+00, &
     & 0.3041541E+00, 0.3705800E+00, 0.2603025E+00, 0.2603025E+00 /
      data (ref_adm(17,iz,16, 9),iz = 1,20) / &
     & 0.3096900E+00, 0.3096900E+00, 0.2994300E+00, 0.3237000E+00, &
     & 0.2833800E+00, 0.2876700E+00, 0.2592500E+00, 0.3045700E+00, &
     & 0.3213800E+00, 0.2546100E+00, 0.3329700E+00, 0.3115500E+00, &
     & 0.3056600E+00, 0.2963500E+00, 0.3390200E+00, 0.3238800E+00, &
     & 0.3579900E+00, 0.3190800E+00, 0.2585292E+00, 0.2585292E+00 /
      data (ref_adm(17,iz,17, 9),iz = 1,20) / &
     & 0.3167200E+00, 0.3167200E+00, 0.3453500E+00, 0.3830400E+00, &
     & 0.3593700E+00, 0.2503900E+00, 0.2736700E+00, 0.3112800E+00, &
     & 0.2610200E+00, 0.2958000E+00, 0.3318400E+00, 0.2771100E+00, &
     & 0.3109380E+00, 0.2754300E+00, 0.3208600E+00, 0.3836200E+00, &
     & 0.3382000E+00, 0.3511300E+00, 0.2569838E+00, 0.2569838E+00 /
      data (ref_adm(17,iz,18, 9),iz = 1,20) / &
     & 0.2601900E+00, 0.2601900E+00, 0.3045800E+00, 0.3789800E+00, &
     & 0.3736300E+00, 0.3001600E+00, 0.2258300E+00, 0.2890500E+00, &
     & 0.2687800E+00, 0.2716900E+00, 0.2818500E+00, 0.3094000E+00, &
     & 0.2309400E+00, 0.2690800E+00, 0.3020800E+00, 0.3634600E+00, &
     & 0.3711600E+00, 0.3163807E+00, 0.2904610E+00, 0.2904610E+00 /
      data (ref_adm(17,iz,19, 9),iz = 1,20) / &
     & 0.2847500E+00, 0.2847500E+00, 0.3078000E+00, 0.3521600E+00, &
     & 0.3119200E+00, 0.3041500E+00, 0.2843700E+00, 0.2460500E+00, &
     & 0.2362300E+00, 0.3901800E+00, 0.3045100E+00, 0.2870800E+00, &
     & 0.2547300E+00, 0.3250200E+00, 0.2946400E+00, 0.3244600E+00, &
     & 0.3302200E+00, 0.3015200E+00, 0.2879220E+00, 0.2879220E+00 /
      data (ref_adm(17,iz,20, 9),iz = 1,20) / &
     & 0.3230900E+00, 0.3230900E+00, 0.3004500E+00, 0.2872600E+00, &
     & 0.2748100E+00, 0.3060500E+00, 0.2834300E+00, 0.2800400E+00, &
     & 0.2481600E+00, 0.2901700E+00, 0.3304400E+00, 0.3856100E+00, &
     & 0.3733200E+00, 0.3329800E+00, 0.3775000E+00, 0.2855100E+00, &
     & 0.3166239E+00, 0.3123620E+00, 0.2862605E+00, 0.2862605E+00 /
      data (ref_adm(17,iz,21, 9),iz = 1,20) / &
     & 0.3514700E+00, 0.3514700E+00, 0.3321200E+00, 0.3088400E+00, &
     & 0.3152500E+00, 0.2631500E+00, 0.3155600E+00, 0.3180700E+00, &
     & 0.2842500E+00, 0.3365100E+00, 0.3295500E+00, 0.3420500E+00, &
     & 0.3639000E+00, 0.3257400E+00, 0.3480900E+00, 0.2653200E+00, &
     & 0.3153991E+00, 0.3106805E+00, 0.2850397E+00, 0.2850397E+00 /
      data (ref_adm(17,iz,22, 9),iz = 1,20) / &
     & 0.2908800E+00, 0.2908800E+00, 0.2980900E+00, 0.2761000E+00, &
     & 0.2744200E+00, 0.3308600E+00, 0.3119200E+00, 0.3466900E+00, &
     & 0.2556800E+00, 0.3333900E+00, 0.3067000E+00, 0.3128400E+00, &
     & 0.3515100E+00, 0.3485000E+00, 0.3428400E+00, 0.3728893E+00, &
     & 0.3648132E+00, 0.3452676E+00, 0.2946360E+00, 0.2946360E+00 /
      data (ref_adm(17,iz,23, 9),iz = 1,20) / &
     & 0.3410400E+00, 0.3410400E+00, 0.3525500E+00, 0.2592900E+00, &
     & 0.3591100E+00, 0.3459200E+00, 0.2875500E+00, 0.2781000E+00, &
     & 0.3228300E+00, 0.2784100E+00, 0.3174800E+00, 0.2909100E+00, &
     & 0.3061200E+00, 0.3020800E+00, 0.2807400E+00, 0.3221400E+00, &
     & 0.3612298E+00, 0.3415454E+00, 0.2926234E+00, 0.2926234E+00 /
      data (ref_adm(17,iz,24, 9),iz = 1,20) / &
     & 0.2653600E+00, 0.2653600E+00, 0.3258300E+00, 0.3107400E+00, &
     & 0.3569400E+00, 0.3253700E+00, 0.3663000E+00, 0.2918800E+00, &
     & 0.3634900E+00, 0.3029800E+00, 0.3117900E+00, 0.3346200E+00, &
     & 0.2942200E+00, 0.3247000E+00, 0.2595200E+00, 0.3753100E+00, &
     & 0.3295000E+00, 0.3375327E+00, 0.2910655E+00, 0.2910655E+00 /
      data (ref_adm(17,iz,25, 9),iz = 1,20) / &
     & 0.3060900E+00, 0.3060900E+00, 0.2554500E+00, 0.2565200E+00, &
     & 0.3353800E+00, 0.3239200E+00, 0.3913200E+00, 0.3487400E+00, &
     & 0.2774000E+00, 0.3192900E+00, 0.2843900E+00, 0.3662200E+00, &
     & 0.3378800E+00, 0.3418600E+00, 0.3059400E+00, 0.4129600E+00, &
     & 0.3124100E+00, 0.3341462E+00, 0.2897129E+00, 0.2897129E+00 /
      data (ref_adm(17,iz,26, 9),iz = 1,20) / &
     & 0.3176300E+00, 0.3176300E+00, 0.3316100E+00, 0.3405400E+00, &
     & 0.3407900E+00, 0.3469100E+00, 0.3408500E+00, 0.3394000E+00, &
     & 0.3550600E+00, 0.3260900E+00, 0.2983600E+00, 0.4058500E+00, &
     & 0.3219700E+00, 0.3216400E+00, 0.3187200E+00, 0.4318200E+00, &
     & 0.3102900E+00, 0.3005100E+00, 0.2884602E+00, 0.2884602E+00 /
      data (ref_adm(17,iz,27, 9),iz = 1,20) / &
     & 0.3069100E+00, 0.3069100E+00, 0.3133900E+00, 0.2787200E+00, &
     & 0.3053300E+00, 0.3171200E+00, 0.3526200E+00, 0.3534500E+00, &
     & 0.3535000E+00, 0.3633200E+00, 0.3452400E+00, 0.3770600E+00, &
     & 0.3331100E+00, 0.3373900E+00, 0.3681700E+00, 0.3778700E+00, &
     & 0.3568100E+00, 0.3142000E+00, 0.2873885E+00, 0.2873885E+00 /
      data (ref_adm(17,iz,28, 9),iz = 1,20) / &
     & 0.3320600E+00, 0.3320600E+00, 0.3291900E+00, 0.3580000E+00, &
     & 0.3681400E+00, 0.3408200E+00, 0.3505700E+00, 0.3578600E+00, &
     & 0.3767400E+00, 0.3376700E+00, 0.3639000E+00, 0.4166300E+00, &
     & 0.3925600E+00, 0.3596700E+00, 0.3259200E+00, 0.3733500E+00, &
     & 0.4020900E+00, 0.2920300E+00, 0.2867571E+00, 0.2867571E+00 /
      data (ref_adm(17,iz,29, 9),iz = 1,20) / &
     & 0.3224900E+00, 0.3224900E+00, 0.3278300E+00, 0.3170000E+00, &
     & 0.3331100E+00, 0.2948800E+00, 0.3060300E+00, 0.3629200E+00, &
     & 0.3951900E+00, 0.3738100E+00, 0.4086400E+00, 0.3943400E+00, &
     & 0.4120100E+00, 0.3680000E+00, 0.3560900E+00, 0.4112500E+00, &
     & 0.4743300E+00, 0.3356900E+00, 0.2862732E+00, 0.2862732E+00 /
      data (ref_adm(17,iz,30, 9),iz = 1,20) / &
     & 0.3519400E+00, 0.3519400E+00, 0.3615300E+00, 0.3830200E+00, &
     & 0.2861400E+00, 0.3041300E+00, 0.3035900E+00, 0.3841300E+00, &
     & 0.3535200E+00, 0.3874200E+00, 0.4381200E+00, 0.3700300E+00, &
     & 0.3955000E+00, 0.3887500E+00, 0.3774100E+00, 0.3022000E+00, &
     & 0.2402800E+00, 0.3127800E+00, 0.3148800E+00, 0.3148800E+00 /
      data (ref_adm(17,iz,31, 9),iz = 1,20) / &
     & 0.3839000E+00, 0.3839000E+00, 0.3705400E+00, 0.3563000E+00, &
     & 0.3633500E+00, 0.3679900E+00, 0.3742900E+00, 0.3371700E+00, &
     & 0.3886500E+00, 0.3718500E+00, 0.4857300E+00, 0.3720400E+00, &
     & 0.3176800E+00, 0.3391900E+00, 0.3554400E+00, 0.3409000E+00, &
     & 0.3847800E+00, 0.3297000E+00, 0.2673900E+00, 0.2673900E+00 /
      data (ref_adm(17,iz,32, 9),iz = 1,20) / &
     & 0.3357100E+00, 0.3357100E+00, 0.3531100E+00, 0.3197900E+00, &
     & 0.4060500E+00, 0.3712200E+00, 0.3678500E+00, 0.3334400E+00, &
     & 0.3725100E+00, 0.3376700E+00, 0.3331200E+00, 0.3713500E+00, &
     & 0.3648500E+00, 0.3716900E+00, 0.2995000E+00, 0.3716800E+00, &
     & 0.3806300E+00, 0.3320700E+00, 0.2858512E+00, 0.2858512E+00 /
      data (ref_adm(17,iz,33, 9),iz = 1,20) / &
     & 0.3279000E+00, 0.3279000E+00, 0.2766200E+00, 0.3109900E+00, &
     & 0.3674400E+00, 0.4070500E+00, 0.3570700E+00, 0.3971600E+00, &
     & 0.3743000E+00, 0.3402800E+00, 0.3808300E+00, 0.3692900E+00, &
     & 0.4069800E+00, 0.3123700E+00, 0.3608000E+00, 0.3801900E+00, &
     & 0.5027900E+00, 0.2936000E+00, 0.2858812E+00, 0.2858812E+00 /
      data (ref_adm(17,iz,34, 9),iz = 1,20) / &
     & 0.3581300E+00, 0.3581300E+00, 0.3284600E+00, 0.3404900E+00, &
     & 0.3702300E+00, 0.3977700E+00, 0.3179200E+00, 0.3778600E+00, &
     & 0.3465400E+00, 0.3616700E+00, 0.3776800E+00, 0.3718700E+00, &
     & 0.4029500E+00, 0.3858500E+00, 0.4064600E+00, 0.3474800E+00, &
     & 0.3350200E+00, 0.3193625E+00, 0.2859955E+00, 0.2859955E+00 /
      data (ref_adm(17,iz,35, 9),iz = 1,20) / &
     & 0.3085600E+00, 0.3085600E+00, 0.3470900E+00, 0.3913900E+00, &
     & 0.3808600E+00, 0.4017700E+00, 0.3704600E+00, 0.3532100E+00, &
     & 0.3744400E+00, 0.3730400E+00, 0.4047900E+00, 0.3901000E+00, &
     & 0.3739500E+00, 0.4044000E+00, 0.3752300E+00, 0.3258700E+00, &
     & 0.3369000E+00, 0.3192702E+00, 0.2860945E+00, 0.2860945E+00 /
      data (ref_adm(17,iz,36, 9),iz = 1,20) / &
     & 0.3345900E+00, 0.3345900E+00, 0.3126800E+00, 0.3447900E+00, &
     & 0.3458600E+00, 0.3778900E+00, 0.3739500E+00, 0.3734000E+00, &
     & 0.3620500E+00, 0.3957500E+00, 0.3873600E+00, 0.4258400E+00, &
     & 0.4108400E+00, 0.3802800E+00, 0.4229100E+00, 0.3570621E+00, &
     & 0.3432551E+00, 0.3191826E+00, 0.2862954E+00, 0.2862954E+00 /
      data (ref_adm(17,iz,37, 9),iz = 1,20) / &
     & 0.3473200E+00, 0.3473200E+00, 0.3497200E+00, 0.3551600E+00, &
     & 0.3902000E+00, 0.3875000E+00, 0.3834000E+00, 0.3487600E+00, &
     & 0.3490100E+00, 0.3926900E+00, 0.3981900E+00, 0.5225100E+00, &
     & 0.4271000E+00, 0.4146500E+00, 0.4746300E+00, 0.3572973E+00, &
     & 0.3432777E+00, 0.3191331E+00, 0.2863292E+00, 0.2863292E+00 /
      data (ref_adm(17,iz,38, 9),iz = 1,20) / &
     & 0.3473200E+00, 0.3473200E+00, 0.3497200E+00, 0.3551600E+00, &
     & 0.3902000E+00, 0.3875000E+00, 0.3834000E+00, 0.3487600E+00, &
     & 0.3490100E+00, 0.3926900E+00, 0.3981900E+00, 0.5225100E+00, &
     & 0.4271000E+00, 0.4146500E+00, 0.4746300E+00, 0.3572973E+00, &
     & 0.3432777E+00, 0.3191331E+00, 0.2863292E+00, 0.2863292E+00 /
! Solar Zenith Angle 45.0 Albedo  0.3223398E+00
      data (ref_adm(17,iz, 1,10),iz = 1,20) / &
     & 0.3259000E+00, 0.3259000E+00, 0.2727200E+00, 0.3009800E+00, &
     & 0.2773900E+00, 0.3282200E+00, 0.2196800E+00, 0.2590500E+00, &
     & 0.2602300E+00, 0.2987600E+00, 0.3551600E+00, 0.3460200E+00, &
     & 0.3881100E+00, 0.3425200E+00, 0.3580500E+00, 0.3980000E+00, &
     & 0.4310200E+00, 0.4790700E+00, 0.3956425E+00, 0.3956425E+00 /
      data (ref_adm(17,iz, 2,10),iz = 1,20) / &
     & 0.3259000E+00, 0.3259000E+00, 0.2727200E+00, 0.3009800E+00, &
     & 0.2773900E+00, 0.3282200E+00, 0.2196800E+00, 0.2590500E+00, &
     & 0.2602300E+00, 0.2987600E+00, 0.3551600E+00, 0.3460200E+00, &
     & 0.3881100E+00, 0.3425200E+00, 0.3580500E+00, 0.3980000E+00, &
     & 0.4310200E+00, 0.4790700E+00, 0.3956425E+00, 0.3956425E+00 /
      data (ref_adm(17,iz, 3,10),iz = 1,20) / &
     & 0.2908800E+00, 0.2908800E+00, 0.3214700E+00, 0.2918100E+00, &
     & 0.2992200E+00, 0.3130600E+00, 0.2161700E+00, 0.2607400E+00, &
     & 0.2745100E+00, 0.2380500E+00, 0.2941500E+00, 0.3468200E+00, &
     & 0.3333100E+00, 0.3657400E+00, 0.3604300E+00, 0.4095100E+00, &
     & 0.4565200E+00, 0.4302300E+00, 0.4929000E+00, 0.4929000E+00 /
      data (ref_adm(17,iz, 4,10),iz = 1,20) / &
     & 0.3266700E+00, 0.3266700E+00, 0.3221600E+00, 0.3169100E+00, &
     & 0.2968000E+00, 0.2852900E+00, 0.2901600E+00, 0.3199900E+00, &
     & 0.2872900E+00, 0.2911700E+00, 0.3307600E+00, 0.2953200E+00, &
     & 0.2982300E+00, 0.3247100E+00, 0.3527000E+00, 0.4297300E+00, &
     & 0.4136100E+00, 0.4547900E+00, 0.5078700E+00, 0.5078700E+00 /
      data (ref_adm(17,iz, 5,10),iz = 1,20) / &
     & 0.3562300E+00, 0.3562300E+00, 0.3006400E+00, 0.2906500E+00, &
     & 0.3374100E+00, 0.3129900E+00, 0.2902500E+00, 0.2790200E+00, &
     & 0.2821600E+00, 0.2969800E+00, 0.3083900E+00, 0.2623400E+00, &
     & 0.3003900E+00, 0.4356300E+00, 0.3517300E+00, 0.3631800E+00, &
     & 0.3696900E+00, 0.3952200E+00, 0.3873536E+00, 0.3873536E+00 /
      data (ref_adm(17,iz, 6,10),iz = 1,20) / &
     & 0.2941900E+00, 0.2941900E+00, 0.2985800E+00, 0.3197800E+00, &
     & 0.3177200E+00, 0.2890700E+00, 0.3006400E+00, 0.2706200E+00, &
     & 0.3079500E+00, 0.2603400E+00, 0.3715100E+00, 0.3140600E+00, &
     & 0.2887700E+00, 0.3677500E+00, 0.3439900E+00, 0.4049100E+00, &
     & 0.4140100E+00, 0.4137000E+00, 0.3734300E+00, 0.3734300E+00 /
      data (ref_adm(17,iz, 7,10),iz = 1,20) / &
     & 0.2706300E+00, 0.2706300E+00, 0.3188300E+00, 0.3158800E+00, &
     & 0.2666300E+00, 0.2639300E+00, 0.2636500E+00, 0.2678100E+00, &
     & 0.3222300E+00, 0.3208600E+00, 0.2985700E+00, 0.3214900E+00, &
     & 0.3084000E+00, 0.3507100E+00, 0.3683700E+00, 0.3800600E+00, &
     & 0.4405500E+00, 0.4035900E+00, 0.3899900E+00, 0.3899900E+00 /
      data (ref_adm(17,iz, 8,10),iz = 1,20) / &
     & 0.3717600E+00, 0.3717600E+00, 0.3094800E+00, 0.2636600E+00, &
     & 0.2974700E+00, 0.2833700E+00, 0.2660300E+00, 0.2762300E+00, &
     & 0.2674300E+00, 0.3146300E+00, 0.3242500E+00, 0.3505000E+00, &
     & 0.3521500E+00, 0.3627800E+00, 0.3872100E+00, 0.4052900E+00, &
     & 0.4193400E+00, 0.4060000E+00, 0.3723631E+00, 0.3723631E+00 /
      data (ref_adm(17,iz, 9,10),iz = 1,20) / &
     & 0.2949700E+00, 0.2949700E+00, 0.2579100E+00, 0.2858800E+00, &
     & 0.2734600E+00, 0.2832500E+00, 0.2791800E+00, 0.2743300E+00, &
     & 0.2531900E+00, 0.2887600E+00, 0.2879700E+00, 0.3305100E+00, &
     & 0.3668400E+00, 0.3666000E+00, 0.4251700E+00, 0.4368400E+00, &
     & 0.3834500E+00, 0.3496100E+00, 0.3700400E+00, 0.3700400E+00 /
      data (ref_adm(17,iz,10,10),iz = 1,20) / &
     & 0.3131300E+00, 0.3131300E+00, 0.3266700E+00, 0.2820400E+00, &
     & 0.2621700E+00, 0.2955000E+00, 0.2472000E+00, 0.2615300E+00, &
     & 0.2711900E+00, 0.2994800E+00, 0.2799600E+00, 0.2830500E+00, &
     & 0.3253000E+00, 0.3041300E+00, 0.3754800E+00, 0.4248600E+00, &
     & 0.3821300E+00, 0.3569500E+00, 0.3627364E+00, 0.3627364E+00 /
      data (ref_adm(17,iz,11,10),iz = 1,20) / &
     & 0.3244200E+00, 0.3244200E+00, 0.3045500E+00, 0.2889800E+00, &
     & 0.2813600E+00, 0.2614200E+00, 0.2615600E+00, 0.2501300E+00, &
     & 0.2745000E+00, 0.2721300E+00, 0.2608500E+00, 0.3036200E+00, &
     & 0.3184800E+00, 0.3535000E+00, 0.3185500E+00, 0.3920700E+00, &
     & 0.3980000E+00, 0.2828900E+00, 0.3581192E+00, 0.3581192E+00 /
      data (ref_adm(17,iz,12,10),iz = 1,20) / &
     & 0.2811700E+00, 0.2811700E+00, 0.3101700E+00, 0.3111900E+00, &
     & 0.2945300E+00, 0.2944300E+00, 0.2330100E+00, 0.2895300E+00, &
     & 0.2748600E+00, 0.2759500E+00, 0.2788800E+00, 0.2555400E+00, &
     & 0.2940000E+00, 0.3379000E+00, 0.3475200E+00, 0.3336400E+00, &
     & 0.3657900E+00, 0.3169100E+00, 0.3535732E+00, 0.3535732E+00 /
      data (ref_adm(17,iz,13,10),iz = 1,20) / &
     & 0.3319500E+00, 0.3319500E+00, 0.2992500E+00, 0.2917100E+00, &
     & 0.2899400E+00, 0.2966200E+00, 0.3007100E+00, 0.2960500E+00, &
     & 0.3055200E+00, 0.3020800E+00, 0.3007200E+00, 0.2894900E+00, &
     & 0.2870100E+00, 0.2911000E+00, 0.3364600E+00, 0.3470500E+00, &
     & 0.3188900E+00, 0.2929700E+00, 0.3483540E+00, 0.3483540E+00 /
      data (ref_adm(17,iz,14,10),iz = 1,20) / &
     & 0.2898900E+00, 0.2898900E+00, 0.2931900E+00, 0.2972100E+00, &
     & 0.2724100E+00, 0.2587900E+00, 0.2518500E+00, 0.2809700E+00, &
     & 0.2804100E+00, 0.3022400E+00, 0.3033300E+00, 0.2950400E+00, &
     & 0.3148700E+00, 0.3233600E+00, 0.3808600E+00, 0.3411600E+00, &
     & 0.2834300E+00, 0.3576900E+00, 0.3418067E+00, 0.3418067E+00 /
      data (ref_adm(17,iz,15,10),iz = 1,20) / &
     & 0.3141800E+00, 0.3141800E+00, 0.2896900E+00, 0.2878900E+00, &
     & 0.2656700E+00, 0.2791200E+00, 0.2833700E+00, 0.2938700E+00, &
     & 0.2831700E+00, 0.2890500E+00, 0.2941700E+00, 0.2867900E+00, &
     & 0.2578800E+00, 0.2970300E+00, 0.3278400E+00, 0.2987500E+00, &
     & 0.2331900E+00, 0.3524500E+00, 0.3345744E+00, 0.3345744E+00 /
      data (ref_adm(17,iz,16,10),iz = 1,20) / &
     & 0.2979300E+00, 0.2979300E+00, 0.3003400E+00, 0.2567400E+00, &
     & 0.2649200E+00, 0.2701600E+00, 0.3146200E+00, 0.3043800E+00, &
     & 0.3069900E+00, 0.2566900E+00, 0.2485300E+00, 0.2669900E+00, &
     & 0.2833200E+00, 0.2961400E+00, 0.3072600E+00, 0.3101300E+00, &
     & 0.2864100E+00, 0.3763111E+00, 0.3281871E+00, 0.3281871E+00 /
      data (ref_adm(17,iz,17,10),iz = 1,20) / &
     & 0.3035400E+00, 0.3035400E+00, 0.3288100E+00, 0.3060700E+00, &
     & 0.2809300E+00, 0.2509300E+00, 0.2696500E+00, 0.3003900E+00, &
     & 0.3065800E+00, 0.2605400E+00, 0.3128000E+00, 0.2732200E+00, &
     & 0.3054600E+00, 0.2774700E+00, 0.2785700E+00, 0.3113900E+00, &
     & 0.3313800E+00, 0.3678396E+00, 0.3218838E+00, 0.3218838E+00 /
      data (ref_adm(17,iz,18,10),iz = 1,20) / &
     & 0.3432200E+00, 0.3432200E+00, 0.3068600E+00, 0.2839600E+00, &
     & 0.2934600E+00, 0.2829900E+00, 0.2984700E+00, 0.3159800E+00, &
     & 0.3143000E+00, 0.2629300E+00, 0.2439100E+00, 0.3211700E+00, &
     & 0.3710600E+00, 0.3200700E+00, 0.2991200E+00, 0.3184600E+00, &
     & 0.3788700E+00, 0.3347238E+00, 0.3168248E+00, 0.3168248E+00 /
      data (ref_adm(17,iz,19,10),iz = 1,20) / &
     & 0.3011400E+00, 0.3011400E+00, 0.2996100E+00, 0.2861100E+00, &
     & 0.3156200E+00, 0.2519300E+00, 0.2687200E+00, 0.3172300E+00, &
     & 0.2768000E+00, 0.2573200E+00, 0.3255700E+00, 0.2907300E+00, &
     & 0.3048700E+00, 0.3096400E+00, 0.2965300E+00, 0.3280800E+00, &
     & 0.2933900E+00, 0.3269200E+00, 0.3129801E+00, 0.3129801E+00 /
      data (ref_adm(17,iz,20,10),iz = 1,20) / &
     & 0.2588500E+00, 0.2588500E+00, 0.2414500E+00, 0.2472300E+00, &
     & 0.2639800E+00, 0.2361000E+00, 0.2578500E+00, 0.2634200E+00, &
     & 0.2726900E+00, 0.2859500E+00, 0.2551300E+00, 0.2719300E+00, &
     & 0.3519800E+00, 0.3334900E+00, 0.3057500E+00, 0.3663400E+00, &
     & 0.3301500E+00, 0.3309707E+00, 0.3108906E+00, 0.3108906E+00 /
      data (ref_adm(17,iz,21,10),iz = 1,20) / &
     & 0.2872700E+00, 0.2872700E+00, 0.2790900E+00, 0.2857200E+00, &
     & 0.2596400E+00, 0.2795500E+00, 0.2685900E+00, 0.2888700E+00, &
     & 0.2616800E+00, 0.2758500E+00, 0.2525500E+00, 0.2763000E+00, &
     & 0.2701900E+00, 0.2879900E+00, 0.3431500E+00, 0.4130100E+00, &
     & 0.3279859E+00, 0.3298141E+00, 0.3095180E+00, 0.3095180E+00 /
      data (ref_adm(17,iz,22,10),iz = 1,20) / &
     & 0.2955400E+00, 0.2955400E+00, 0.3099800E+00, 0.3023900E+00, &
     & 0.3031000E+00, 0.2610700E+00, 0.2758300E+00, 0.3202900E+00, &
     & 0.2637100E+00, 0.2744500E+00, 0.2838500E+00, 0.3261300E+00, &
     & 0.3240500E+00, 0.2993200E+00, 0.3090000E+00, 0.4329800E+00, &
     & 0.3356647E+00, 0.3295697E+00, 0.2986694E+00, 0.2986694E+00 /
      data (ref_adm(17,iz,23,10),iz = 1,20) / &
     & 0.2805200E+00, 0.2805200E+00, 0.2874600E+00, 0.2885400E+00, &
     & 0.3044000E+00, 0.2836800E+00, 0.2890300E+00, 0.3057700E+00, &
     & 0.2865000E+00, 0.3040100E+00, 0.3531400E+00, 0.2865900E+00, &
     & 0.3181900E+00, 0.3090200E+00, 0.3017400E+00, 0.3752100E+00, &
     & 0.3366434E+00, 0.3295964E+00, 0.2989261E+00, 0.2989261E+00 /
      data (ref_adm(17,iz,24,10),iz = 1,20) / &
     & 0.2925500E+00, 0.2925500E+00, 0.2757100E+00, 0.3158400E+00, &
     & 0.3074800E+00, 0.3041300E+00, 0.3061800E+00, 0.2967200E+00, &
     & 0.2811000E+00, 0.2822200E+00, 0.3266600E+00, 0.3350400E+00, &
     & 0.3417800E+00, 0.3512200E+00, 0.3261100E+00, 0.3350500E+00, &
     & 0.3561200E+00, 0.3304513E+00, 0.2997615E+00, 0.2997615E+00 /
      data (ref_adm(17,iz,25,10),iz = 1,20) / &
     & 0.2579800E+00, 0.2579800E+00, 0.3057800E+00, 0.2931400E+00, &
     & 0.3021100E+00, 0.2802400E+00, 0.3104200E+00, 0.3337600E+00, &
     & 0.2842700E+00, 0.3377100E+00, 0.3308800E+00, 0.3304100E+00, &
     & 0.3803100E+00, 0.3594400E+00, 0.3306100E+00, 0.3587500E+00, &
     & 0.3553800E+00, 0.3331600E+00, 0.3013749E+00, 0.3013749E+00 /
      data (ref_adm(17,iz,26,10),iz = 1,20) / &
     & 0.3158600E+00, 0.3158600E+00, 0.3099700E+00, 0.3138500E+00, &
     & 0.3037200E+00, 0.3219000E+00, 0.3169700E+00, 0.3290200E+00, &
     & 0.3301300E+00, 0.3364100E+00, 0.3405500E+00, 0.3451100E+00, &
     & 0.3558200E+00, 0.3212700E+00, 0.3525200E+00, 0.3304800E+00, &
     & 0.3553200E+00, 0.3223200E+00, 0.3036977E+00, 0.3036977E+00 /
      data (ref_adm(17,iz,27,10),iz = 1,20) / &
     & 0.2914100E+00, 0.2914100E+00, 0.3131100E+00, 0.3092300E+00, &
     & 0.3170100E+00, 0.3060700E+00, 0.3161200E+00, 0.3129500E+00, &
     & 0.3082600E+00, 0.3091300E+00, 0.3286400E+00, 0.3365200E+00, &
     & 0.3520100E+00, 0.3535200E+00, 0.3711400E+00, 0.3408000E+00, &
     & 0.3375000E+00, 0.3034000E+00, 0.2738000E+00, 0.2738000E+00 /
      data (ref_adm(17,iz,28,10),iz = 1,20) / &
     & 0.3166300E+00, 0.3166300E+00, 0.3464100E+00, 0.3272100E+00, &
     & 0.3418600E+00, 0.3312600E+00, 0.3334400E+00, 0.3333500E+00, &
     & 0.3887400E+00, 0.3449300E+00, 0.3480400E+00, 0.3304700E+00, &
     & 0.3550100E+00, 0.3771400E+00, 0.3426000E+00, 0.2978400E+00, &
     & 0.3733900E+00, 0.3403700E+00, 0.2724500E+00, 0.2724500E+00 /
      data (ref_adm(17,iz,29,10),iz = 1,20) / &
     & 0.3014500E+00, 0.3014500E+00, 0.3406200E+00, 0.3075100E+00, &
     & 0.3441500E+00, 0.2786300E+00, 0.2945800E+00, 0.3346400E+00, &
     & 0.3072000E+00, 0.3297600E+00, 0.3880400E+00, 0.3642800E+00, &
     & 0.3881300E+00, 0.4012200E+00, 0.3694700E+00, 0.3694500E+00, &
     & 0.4478500E+00, 0.3677800E+00, 0.2886400E+00, 0.2886400E+00 /
      data (ref_adm(17,iz,30,10),iz = 1,20) / &
     & 0.3109600E+00, 0.3109600E+00, 0.2979500E+00, 0.3143900E+00, &
     & 0.2911300E+00, 0.3098800E+00, 0.3172700E+00, 0.3259100E+00, &
     & 0.3421500E+00, 0.3523800E+00, 0.3774900E+00, 0.3774300E+00, &
     & 0.3866300E+00, 0.3709400E+00, 0.3513600E+00, 0.3426400E+00, &
     & 0.3359800E+00, 0.3409700E+00, 0.2664200E+00, 0.2664200E+00 /
      data (ref_adm(17,iz,31,10),iz = 1,20) / &
     & 0.2824600E+00, 0.2824600E+00, 0.3000000E+00, 0.3339400E+00, &
     & 0.3002000E+00, 0.2762700E+00, 0.3184900E+00, 0.3076000E+00, &
     & 0.3055300E+00, 0.2977000E+00, 0.3314200E+00, 0.3268900E+00, &
     & 0.3486700E+00, 0.3521900E+00, 0.3610900E+00, 0.3443200E+00, &
     & 0.3566600E+00, 0.3276400E+00, 0.2706700E+00, 0.2706700E+00 /
      data (ref_adm(17,iz,32,10),iz = 1,20) / &
     & 0.3422300E+00, 0.3422300E+00, 0.3308400E+00, 0.3319200E+00, &
     & 0.3517700E+00, 0.3363200E+00, 0.3181100E+00, 0.3089700E+00, &
     & 0.3242100E+00, 0.3239900E+00, 0.3073400E+00, 0.3681800E+00, &
     & 0.3851100E+00, 0.3983600E+00, 0.3952100E+00, 0.4217000E+00, &
     & 0.4157100E+00, 0.3798700E+00, 0.2794200E+00, 0.2794200E+00 /
      data (ref_adm(17,iz,33,10),iz = 1,20) / &
     & 0.3515900E+00, 0.3515900E+00, 0.3488000E+00, 0.3287600E+00, &
     & 0.4368800E+00, 0.3683100E+00, 0.3261400E+00, 0.3427300E+00, &
     & 0.3563300E+00, 0.3684000E+00, 0.4326700E+00, 0.4539200E+00, &
     & 0.3928600E+00, 0.3731900E+00, 0.3767600E+00, 0.3980500E+00, &
     & 0.3341000E+00, 0.3532500E+00, 0.3499500E+00, 0.3499500E+00 /
      data (ref_adm(17,iz,34,10),iz = 1,20) / &
     & 0.3169800E+00, 0.3169800E+00, 0.3381200E+00, 0.3879600E+00, &
     & 0.3806700E+00, 0.3197800E+00, 0.3071100E+00, 0.3330400E+00, &
     & 0.3387700E+00, 0.4128400E+00, 0.3749500E+00, 0.3838700E+00, &
     & 0.3728900E+00, 0.4235300E+00, 0.4015700E+00, 0.4009200E+00, &
     & 0.3180400E+00, 0.3886800E+00, 0.3345794E+00, 0.3345794E+00 /
      data (ref_adm(17,iz,35,10),iz = 1,20) / &
     & 0.3199100E+00, 0.3199100E+00, 0.3157700E+00, 0.3341600E+00, &
     & 0.2926800E+00, 0.3737100E+00, 0.3515800E+00, 0.3554500E+00, &
     & 0.3348500E+00, 0.4040300E+00, 0.3939300E+00, 0.4099400E+00, &
     & 0.4025700E+00, 0.4054000E+00, 0.3896300E+00, 0.3866900E+00, &
     & 0.4283200E+00, 0.3634785E+00, 0.3372777E+00, 0.3372777E+00 /
      data (ref_adm(17,iz,36,10),iz = 1,20) / &
     & 0.3192600E+00, 0.3192600E+00, 0.2684500E+00, 0.3184600E+00, &
     & 0.3393500E+00, 0.3262700E+00, 0.3629400E+00, 0.3425500E+00, &
     & 0.3635300E+00, 0.4093400E+00, 0.3986900E+00, 0.3958200E+00, &
     & 0.3793600E+00, 0.3350500E+00, 0.3807700E+00, 0.3561300E+00, &
     & 0.3767200E+00, 0.3652818E+00, 0.3391036E+00, 0.3391036E+00 /
      data (ref_adm(17,iz,37,10),iz = 1,20) / &
     & 0.3120700E+00, 0.3120700E+00, 0.3629800E+00, 0.4891500E+00, &
     & 0.2959100E+00, 0.3738900E+00, 0.3845700E+00, 0.4032300E+00, &
     & 0.3649100E+00, 0.3340800E+00, 0.3982100E+00, 0.3967800E+00, &
     & 0.4261500E+00, 0.3357800E+00, 0.4038400E+00, 0.4403900E+00, &
     & 0.3964000E+00, 0.3662574E+00, 0.3401390E+00, 0.3401390E+00 /
      data (ref_adm(17,iz,38,10),iz = 1,20) / &
     & 0.3120700E+00, 0.3120700E+00, 0.3629800E+00, 0.4891500E+00, &
     & 0.2959100E+00, 0.3738900E+00, 0.3845700E+00, 0.4032300E+00, &
     & 0.3649100E+00, 0.3340800E+00, 0.3982100E+00, 0.3967800E+00, &
     & 0.4261500E+00, 0.3357800E+00, 0.4038400E+00, 0.4403900E+00, &
     & 0.3964000E+00, 0.3662574E+00, 0.3401390E+00, 0.3401390E+00 /
! Solar Zenith Angle 50.0 Albedo  0.3221344E+00
      data (ref_adm(17,iz, 1,11),iz = 1,20) / &
     & 0.2832000E+00, 0.2832000E+00, 0.2949400E+00, 0.2744700E+00, &
     & 0.2669500E+00, 0.2785900E+00, 0.2710600E+00, 0.3014200E+00, &
     & 0.2868400E+00, 0.3163200E+00, 0.3338100E+00, 0.3892600E+00, &
     & 0.4162200E+00, 0.4008100E+00, 0.3948900E+00, 0.3829400E+00, &
     & 0.4368700E+00, 0.5257300E+00, 0.4374400E+00, 0.4374400E+00 /
      data (ref_adm(17,iz, 2,11),iz = 1,20) / &
     & 0.2832000E+00, 0.2832000E+00, 0.2949400E+00, 0.2744700E+00, &
     & 0.2669500E+00, 0.2785900E+00, 0.2710600E+00, 0.3014200E+00, &
     & 0.2868400E+00, 0.3163200E+00, 0.3338100E+00, 0.3892600E+00, &
     & 0.4162200E+00, 0.4008100E+00, 0.3948900E+00, 0.3829400E+00, &
     & 0.4368700E+00, 0.5257300E+00, 0.4374400E+00, 0.4374400E+00 /
      data (ref_adm(17,iz, 3,11),iz = 1,20) / &
     & 0.2805200E+00, 0.2805200E+00, 0.2660400E+00, 0.2894000E+00, &
     & 0.2674300E+00, 0.2700000E+00, 0.3016400E+00, 0.3009400E+00, &
     & 0.2796000E+00, 0.3321800E+00, 0.3260400E+00, 0.3479700E+00, &
     & 0.3527000E+00, 0.3580900E+00, 0.3925100E+00, 0.3970500E+00, &
     & 0.4434200E+00, 0.4732200E+00, 0.4556100E+00, 0.4556100E+00 /
      data (ref_adm(17,iz, 4,11),iz = 1,20) / &
     & 0.2947800E+00, 0.2947800E+00, 0.2840300E+00, 0.2943600E+00, &
     & 0.2591000E+00, 0.2706300E+00, 0.3016500E+00, 0.2918400E+00, &
     & 0.2985200E+00, 0.3259700E+00, 0.2826200E+00, 0.3226000E+00, &
     & 0.3508300E+00, 0.3331000E+00, 0.3545400E+00, 0.3905400E+00, &
     & 0.4532700E+00, 0.4908100E+00, 0.4932100E+00, 0.4932100E+00 /
      data (ref_adm(17,iz, 5,11),iz = 1,20) / &
     & 0.2965000E+00, 0.2965000E+00, 0.2909500E+00, 0.3433400E+00, &
     & 0.2869300E+00, 0.2835600E+00, 0.2574300E+00, 0.2746600E+00, &
     & 0.3263200E+00, 0.2753400E+00, 0.3229800E+00, 0.3832600E+00, &
     & 0.3295800E+00, 0.3558000E+00, 0.3812200E+00, 0.4198400E+00, &
     & 0.4514600E+00, 0.4711700E+00, 0.3685100E+00, 0.3685100E+00 /
      data (ref_adm(17,iz, 6,11),iz = 1,20) / &
     & 0.3238700E+00, 0.3238700E+00, 0.3081400E+00, 0.2853600E+00, &
     & 0.2684700E+00, 0.2582600E+00, 0.2846000E+00, 0.2652100E+00, &
     & 0.2709400E+00, 0.3018400E+00, 0.3359300E+00, 0.3071200E+00, &
     & 0.3025900E+00, 0.3397500E+00, 0.3615900E+00, 0.3847200E+00, &
     & 0.4166500E+00, 0.4556500E+00, 0.3647100E+00, 0.3647100E+00 /
      data (ref_adm(17,iz, 7,11),iz = 1,20) / &
     & 0.2949800E+00, 0.2949800E+00, 0.2959400E+00, 0.2831000E+00, &
     & 0.2697000E+00, 0.2928900E+00, 0.2989700E+00, 0.2923800E+00, &
     & 0.2898900E+00, 0.3015800E+00, 0.3068400E+00, 0.2953600E+00, &
     & 0.3015800E+00, 0.3091800E+00, 0.3337200E+00, 0.3306600E+00, &
     & 0.3554300E+00, 0.3749200E+00, 0.4077700E+00, 0.4077700E+00 /
      data (ref_adm(17,iz, 8,11),iz = 1,20) / &
     & 0.2940300E+00, 0.2940300E+00, 0.2985700E+00, 0.2723300E+00, &
     & 0.2883400E+00, 0.2952600E+00, 0.3048300E+00, 0.2956700E+00, &
     & 0.2934100E+00, 0.2985800E+00, 0.2950000E+00, 0.2883500E+00, &
     & 0.3135200E+00, 0.3496800E+00, 0.3530500E+00, 0.3798900E+00, &
     & 0.3936300E+00, 0.3966800E+00, 0.4156300E+00, 0.4156300E+00 /
      data (ref_adm(17,iz, 9,11),iz = 1,20) / &
     & 0.3069900E+00, 0.3069900E+00, 0.3000400E+00, 0.2575600E+00, &
     & 0.2792800E+00, 0.2698400E+00, 0.3327500E+00, 0.3069900E+00, &
     & 0.3368600E+00, 0.2954000E+00, 0.2890700E+00, 0.3025200E+00, &
     & 0.3139100E+00, 0.3323700E+00, 0.3622300E+00, 0.4171300E+00, &
     & 0.3992900E+00, 0.3976600E+00, 0.4085200E+00, 0.4085200E+00 /
      data (ref_adm(17,iz,10,11),iz = 1,20) / &
     & 0.2901800E+00, 0.2901800E+00, 0.2991100E+00, 0.3099400E+00, &
     & 0.2893400E+00, 0.2898600E+00, 0.3003100E+00, 0.3135700E+00, &
     & 0.2969000E+00, 0.2960500E+00, 0.2785700E+00, 0.2809400E+00, &
     & 0.3080200E+00, 0.3248600E+00, 0.3157400E+00, 0.3918600E+00, &
     & 0.3797300E+00, 0.3556500E+00, 0.3588700E+00, 0.3588700E+00 /
      data (ref_adm(17,iz,11,11),iz = 1,20) / &
     & 0.2790600E+00, 0.2790600E+00, 0.2756500E+00, 0.2804300E+00, &
     & 0.2744700E+00, 0.3221500E+00, 0.3321700E+00, 0.3059700E+00, &
     & 0.2968700E+00, 0.2894500E+00, 0.2881500E+00, 0.3044700E+00, &
     & 0.2994500E+00, 0.3071000E+00, 0.3412500E+00, 0.3450000E+00, &
     & 0.3798200E+00, 0.3804900E+00, 0.2722000E+00, 0.2722000E+00 /
      data (ref_adm(17,iz,12,11),iz = 1,20) / &
     & 0.3200800E+00, 0.3200800E+00, 0.2968500E+00, 0.2756100E+00, &
     & 0.2949500E+00, 0.3104200E+00, 0.3016800E+00, 0.2720800E+00, &
     & 0.2681800E+00, 0.2690700E+00, 0.2811100E+00, 0.2983700E+00, &
     & 0.3151900E+00, 0.3337400E+00, 0.3535600E+00, 0.3438400E+00, &
     & 0.3438600E+00, 0.3553300E+00, 0.3209300E+00, 0.3209300E+00 /
      data (ref_adm(17,iz,13,11),iz = 1,20) / &
     & 0.3183600E+00, 0.3183600E+00, 0.3097200E+00, 0.2910000E+00, &
     & 0.2976300E+00, 0.3099800E+00, 0.3026100E+00, 0.2889900E+00, &
     & 0.2924300E+00, 0.3016800E+00, 0.3029100E+00, 0.2902800E+00, &
     & 0.3066500E+00, 0.3397900E+00, 0.3648600E+00, 0.3681400E+00, &
     & 0.3307300E+00, 0.3453400E+00, 0.3085100E+00, 0.3085100E+00 /
      data (ref_adm(17,iz,14,11),iz = 1,20) / &
     & 0.2823400E+00, 0.2823400E+00, 0.2591700E+00, 0.2606100E+00, &
     & 0.2528400E+00, 0.2620600E+00, 0.2678900E+00, 0.2685900E+00, &
     & 0.2782200E+00, 0.2748200E+00, 0.2898400E+00, 0.2904000E+00, &
     & 0.3156100E+00, 0.3343800E+00, 0.3439700E+00, 0.3672300E+00, &
     & 0.3309300E+00, 0.3281100E+00, 0.3800300E+00, 0.3800300E+00 /
      data (ref_adm(17,iz,15,11),iz = 1,20) / &
     & 0.2820800E+00, 0.2820800E+00, 0.2963300E+00, 0.2933200E+00, &
     & 0.2812700E+00, 0.2787200E+00, 0.2763700E+00, 0.2840600E+00, &
     & 0.2809300E+00, 0.2876400E+00, 0.2864700E+00, 0.2882800E+00, &
     & 0.2897400E+00, 0.2783100E+00, 0.3110300E+00, 0.2976400E+00, &
     & 0.3155100E+00, 0.3093700E+00, 0.3417765E+00, 0.3417765E+00 /
      data (ref_adm(17,iz,16,11),iz = 1,20) / &
     & 0.2867000E+00, 0.2867000E+00, 0.2621600E+00, 0.2945100E+00, &
     & 0.2856200E+00, 0.2704400E+00, 0.2758200E+00, 0.2926900E+00, &
     & 0.2715000E+00, 0.2622100E+00, 0.2647400E+00, 0.2962800E+00, &
     & 0.2896300E+00, 0.2875900E+00, 0.3209700E+00, 0.3259900E+00, &
     & 0.3154200E+00, 0.3264700E+00, 0.3346600E+00, 0.3346600E+00 /
      data (ref_adm(17,iz,17,11),iz = 1,20) / &
     & 0.2902000E+00, 0.2902000E+00, 0.3044200E+00, 0.3078900E+00, &
     & 0.2954900E+00, 0.2833000E+00, 0.2864100E+00, 0.2979800E+00, &
     & 0.2943900E+00, 0.3103500E+00, 0.2766600E+00, 0.3242000E+00, &
     & 0.3084200E+00, 0.2932200E+00, 0.2816700E+00, 0.3248400E+00, &
     & 0.3574700E+00, 0.3439500E+00, 0.3278677E+00, 0.3278677E+00 /
      data (ref_adm(17,iz,18,11),iz = 1,20) / &
     & 0.3128000E+00, 0.3128000E+00, 0.2892800E+00, 0.2966300E+00, &
     & 0.2675800E+00, 0.2828900E+00, 0.2826200E+00, 0.3106400E+00, &
     & 0.2873800E+00, 0.3007200E+00, 0.2983300E+00, 0.2990000E+00, &
     & 0.3126400E+00, 0.3025600E+00, 0.2965500E+00, 0.3458700E+00, &
     & 0.3353600E+00, 0.2659800E+00, 0.3158103E+00, 0.3158103E+00 /
      data (ref_adm(17,iz,19,11),iz = 1,20) / &
     & 0.3038400E+00, 0.3038400E+00, 0.2727600E+00, 0.2540300E+00, &
     & 0.2578500E+00, 0.2675300E+00, 0.2818200E+00, 0.2857000E+00, &
     & 0.2820700E+00, 0.3147200E+00, 0.3020900E+00, 0.2918400E+00, &
     & 0.3192400E+00, 0.3125500E+00, 0.3023000E+00, 0.2898500E+00, &
     & 0.3275298E+00, 0.3315493E+00, 0.3119779E+00, 0.3119779E+00 /
      data (ref_adm(17,iz,20,11),iz = 1,20) / &
     & 0.2775100E+00, 0.2775100E+00, 0.2823700E+00, 0.2788900E+00, &
     & 0.2667400E+00, 0.2793300E+00, 0.3148500E+00, 0.2740000E+00, &
     & 0.2740000E+00, 0.2947000E+00, 0.3089300E+00, 0.2982100E+00, &
     & 0.3072400E+00, 0.2981300E+00, 0.2996200E+00, 0.3124100E+00, &
     & 0.3269797E+00, 0.3299109E+00, 0.3098951E+00, 0.3098951E+00 /
      data (ref_adm(17,iz,21,11),iz = 1,20) / &
     & 0.2710500E+00, 0.2710500E+00, 0.2829300E+00, 0.3245900E+00, &
     & 0.2800100E+00, 0.2801200E+00, 0.2935800E+00, 0.2848800E+00, &
     & 0.2885100E+00, 0.3204400E+00, 0.2789600E+00, 0.3082300E+00, &
     & 0.2978900E+00, 0.2964600E+00, 0.3011500E+00, 0.3854500E+00, &
     & 0.3269356E+00, 0.3287579E+00, 0.3085268E+00, 0.3085268E+00 /
      data (ref_adm(17,iz,22,11),iz = 1,20) / &
     & 0.2609800E+00, 0.2609800E+00, 0.2585500E+00, 0.2908300E+00, &
     & 0.2576100E+00, 0.2616700E+00, 0.2812200E+00, 0.3040700E+00, &
     & 0.2741200E+00, 0.2725600E+00, 0.2932600E+00, 0.3015100E+00, &
     & 0.3116300E+00, 0.2998600E+00, 0.3505500E+00, 0.3549800E+00, &
     & 0.2913921E+00, 0.2743989E+00, 0.2580030E+00, 0.2580030E+00 /
      data (ref_adm(17,iz,23,11),iz = 1,20) / &
     & 0.2915700E+00, 0.2915700E+00, 0.2759900E+00, 0.3147000E+00, &
     & 0.2730900E+00, 0.2713900E+00, 0.2768600E+00, 0.3144000E+00, &
     & 0.3262600E+00, 0.2993800E+00, 0.3167000E+00, 0.3136600E+00, &
     & 0.3204400E+00, 0.3106600E+00, 0.3252100E+00, 0.3487400E+00, &
     & 0.3826100E+00, 0.2757228E+00, 0.2602943E+00, 0.2602943E+00 /
      data (ref_adm(17,iz,24,11),iz = 1,20) / &
     & 0.2828200E+00, 0.2828200E+00, 0.2741500E+00, 0.2717800E+00, &
     & 0.2775200E+00, 0.2851400E+00, 0.2968000E+00, 0.3042600E+00, &
     & 0.3343600E+00, 0.3282400E+00, 0.3143900E+00, 0.3325000E+00, &
     & 0.3169800E+00, 0.3253300E+00, 0.3228800E+00, 0.3424600E+00, &
     & 0.3716600E+00, 0.2784238E+00, 0.2635700E+00, 0.2635700E+00 /
      data (ref_adm(17,iz,25,11),iz = 1,20) / &
     & 0.2885000E+00, 0.2885000E+00, 0.2997700E+00, 0.3086100E+00, &
     & 0.3051100E+00, 0.3015200E+00, 0.3007100E+00, 0.3088600E+00, &
     & 0.3166000E+00, 0.3339300E+00, 0.3087600E+00, 0.3172700E+00, &
     & 0.3275100E+00, 0.3175600E+00, 0.3065800E+00, 0.3181400E+00, &
     & 0.3333900E+00, 0.3561900E+00, 0.2676765E+00, 0.2676765E+00 /
      data (ref_adm(17,iz,26,11),iz = 1,20) / &
     & 0.2915800E+00, 0.2915800E+00, 0.2708200E+00, 0.2774800E+00, &
     & 0.2824000E+00, 0.2848300E+00, 0.2907000E+00, 0.2955800E+00, &
     & 0.3192000E+00, 0.3284400E+00, 0.3339100E+00, 0.3588000E+00, &
     & 0.3444800E+00, 0.3319800E+00, 0.3237400E+00, 0.3151500E+00, &
     & 0.3532200E+00, 0.3111300E+00, 0.2726209E+00, 0.2726209E+00 /
      data (ref_adm(17,iz,27,11),iz = 1,20) / &
     & 0.3002100E+00, 0.3002100E+00, 0.3086800E+00, 0.3221500E+00, &
     & 0.3397800E+00, 0.3246300E+00, 0.3372200E+00, 0.3396300E+00, &
     & 0.3407200E+00, 0.3342700E+00, 0.3325700E+00, 0.3356500E+00, &
     & 0.3366100E+00, 0.3338000E+00, 0.3328000E+00, 0.3685300E+00, &
     & 0.3593800E+00, 0.3624800E+00, 0.2843900E+00, 0.2843900E+00 /
      data (ref_adm(17,iz,28,11),iz = 1,20) / &
     & 0.2979200E+00, 0.2979200E+00, 0.2985400E+00, 0.2816100E+00, &
     & 0.2965000E+00, 0.3029700E+00, 0.3094300E+00, 0.3318800E+00, &
     & 0.3321000E+00, 0.3441100E+00, 0.3503400E+00, 0.3647900E+00, &
     & 0.3697300E+00, 0.3631300E+00, 0.3522800E+00, 0.3755500E+00, &
     & 0.3681600E+00, 0.3192900E+00, 0.3213100E+00, 0.3213100E+00 /
      data (ref_adm(17,iz,29,11),iz = 1,20) / &
     & 0.3000300E+00, 0.3000300E+00, 0.2948900E+00, 0.2815400E+00, &
     & 0.3064400E+00, 0.3184500E+00, 0.3058900E+00, 0.3282700E+00, &
     & 0.3245700E+00, 0.3085500E+00, 0.3704200E+00, 0.3384700E+00, &
     & 0.3583300E+00, 0.3790700E+00, 0.3859600E+00, 0.3696000E+00, &
     & 0.3928400E+00, 0.3515000E+00, 0.3236900E+00, 0.3236900E+00 /
      data (ref_adm(17,iz,30,11),iz = 1,20) / &
     & 0.2755400E+00, 0.2755400E+00, 0.3017900E+00, 0.3064400E+00, &
     & 0.3022200E+00, 0.3296000E+00, 0.3200800E+00, 0.2925100E+00, &
     & 0.3087200E+00, 0.3361900E+00, 0.3250100E+00, 0.3430700E+00, &
     & 0.3605400E+00, 0.3823400E+00, 0.3718200E+00, 0.3762700E+00, &
     & 0.3814800E+00, 0.3681100E+00, 0.3200100E+00, 0.3200100E+00 /
      data (ref_adm(17,iz,31,11),iz = 1,20) / &
     & 0.3007100E+00, 0.3007100E+00, 0.2969400E+00, 0.3210700E+00, &
     & 0.3122000E+00, 0.2974800E+00, 0.2836300E+00, 0.3098900E+00, &
     & 0.3469100E+00, 0.3490000E+00, 0.3463200E+00, 0.3429800E+00, &
     & 0.3841700E+00, 0.3596200E+00, 0.3533800E+00, 0.3699600E+00, &
     & 0.3838500E+00, 0.3884200E+00, 0.2987400E+00, 0.2987400E+00 /
      data (ref_adm(17,iz,32,11),iz = 1,20) / &
     & 0.2952100E+00, 0.2952100E+00, 0.2900800E+00, 0.3155600E+00, &
     & 0.3255800E+00, 0.3162600E+00, 0.2992700E+00, 0.3147300E+00, &
     & 0.3322800E+00, 0.3302600E+00, 0.3443900E+00, 0.3540300E+00, &
     & 0.3660900E+00, 0.3701900E+00, 0.3890700E+00, 0.3741900E+00, &
     & 0.3744900E+00, 0.3715900E+00, 0.3251300E+00, 0.3251300E+00 /
      data (ref_adm(17,iz,33,11),iz = 1,20) / &
     & 0.3164900E+00, 0.3164900E+00, 0.3059300E+00, 0.3182100E+00, &
     & 0.3340600E+00, 0.3336500E+00, 0.3141700E+00, 0.3179000E+00, &
     & 0.3134700E+00, 0.3347800E+00, 0.3481200E+00, 0.3724800E+00, &
     & 0.4098400E+00, 0.3876500E+00, 0.3680400E+00, 0.3809900E+00, &
     & 0.3799800E+00, 0.3741400E+00, 0.3147800E+00, 0.3147800E+00 /
      data (ref_adm(17,iz,34,11),iz = 1,20) / &
     & 0.3029000E+00, 0.3029000E+00, 0.2955400E+00, 0.2866400E+00, &
     & 0.3295900E+00, 0.3450200E+00, 0.3354300E+00, 0.3407100E+00, &
     & 0.3460800E+00, 0.3449100E+00, 0.3642200E+00, 0.4050900E+00, &
     & 0.3875100E+00, 0.4085600E+00, 0.3871400E+00, 0.3964100E+00, &
     & 0.3957000E+00, 0.3778600E+00, 0.3339400E+00, 0.3339400E+00 /
      data (ref_adm(17,iz,35,11),iz = 1,20) / &
     & 0.2811700E+00, 0.2811700E+00, 0.2928000E+00, 0.2953900E+00, &
     & 0.3206000E+00, 0.3136900E+00, 0.3353500E+00, 0.3452700E+00, &
     & 0.3592800E+00, 0.3820700E+00, 0.4048400E+00, 0.4188800E+00, &
     & 0.3992600E+00, 0.4010700E+00, 0.4082900E+00, 0.4209000E+00, &
     & 0.4191600E+00, 0.3571100E+00, 0.2639600E+00, 0.2639600E+00 /
      data (ref_adm(17,iz,36,11),iz = 1,20) / &
     & 0.2764000E+00, 0.2764000E+00, 0.2917700E+00, 0.2984900E+00, &
     & 0.2904600E+00, 0.2895000E+00, 0.3501900E+00, 0.3711500E+00, &
     & 0.3999600E+00, 0.4048400E+00, 0.3907400E+00, 0.4053400E+00, &
     & 0.4039100E+00, 0.3939200E+00, 0.4048700E+00, 0.4352300E+00, &
     & 0.4348800E+00, 0.4026300E+00, 0.3300509E+00, 0.3300509E+00 /
      data (ref_adm(17,iz,37,11),iz = 1,20) / &
     & 0.2785400E+00, 0.2785400E+00, 0.2844500E+00, 0.3060600E+00, &
     & 0.2953200E+00, 0.3284300E+00, 0.3261200E+00, 0.3314300E+00, &
     & 0.3958700E+00, 0.3854500E+00, 0.4239100E+00, 0.3910800E+00, &
     & 0.4295600E+00, 0.4352800E+00, 0.4203800E+00, 0.4063900E+00, &
     & 0.4225300E+00, 0.3821758E+00, 0.3324533E+00, 0.3324533E+00 /
      data (ref_adm(17,iz,38,11),iz = 1,20) / &
     & 0.2785400E+00, 0.2785400E+00, 0.2844500E+00, 0.3060600E+00, &
     & 0.2953200E+00, 0.3284300E+00, 0.3261200E+00, 0.3314300E+00, &
     & 0.3958700E+00, 0.3854500E+00, 0.4239100E+00, 0.3910800E+00, &
     & 0.4295600E+00, 0.4352800E+00, 0.4203800E+00, 0.4063900E+00, &
     & 0.4225300E+00, 0.3821758E+00, 0.3324533E+00, 0.3324533E+00 /
! Solar Zenith Angle 55.0 Albedo  0.3322582E+00
      data (ref_adm(17,iz, 1,12),iz = 1,20) / &
     & 0.2556700E+00, 0.2556700E+00, 0.2649300E+00, 0.3128700E+00, &
     & 0.2685400E+00, 0.2764400E+00, 0.2820700E+00, 0.2740000E+00, &
     & 0.2878000E+00, 0.2919700E+00, 0.3161100E+00, 0.3487700E+00, &
     & 0.4057600E+00, 0.4709700E+00, 0.4291700E+00, 0.4587000E+00, &
     & 0.5249600E+00, 0.5387600E+00, 0.4109700E+00, 0.4109700E+00 /
      data (ref_adm(17,iz, 2,12),iz = 1,20) / &
     & 0.2556700E+00, 0.2556700E+00, 0.2649300E+00, 0.3128700E+00, &
     & 0.2685400E+00, 0.2764400E+00, 0.2820700E+00, 0.2740000E+00, &
     & 0.2878000E+00, 0.2919700E+00, 0.3161100E+00, 0.3487700E+00, &
     & 0.4057600E+00, 0.4709700E+00, 0.4291700E+00, 0.4587000E+00, &
     & 0.5249600E+00, 0.5387600E+00, 0.4109700E+00, 0.4109700E+00 /
      data (ref_adm(17,iz, 3,12),iz = 1,20) / &
     & 0.3044000E+00, 0.3044000E+00, 0.2539800E+00, 0.2904900E+00, &
     & 0.2808600E+00, 0.2769400E+00, 0.2753000E+00, 0.2899700E+00, &
     & 0.2876700E+00, 0.2980400E+00, 0.3222900E+00, 0.3375400E+00, &
     & 0.3696600E+00, 0.4090600E+00, 0.4220300E+00, 0.4391800E+00, &
     & 0.5360100E+00, 0.5323200E+00, 0.5293900E+00, 0.5293900E+00 /
      data (ref_adm(17,iz, 4,12),iz = 1,20) / &
     & 0.2723900E+00, 0.2723900E+00, 0.2941000E+00, 0.2794100E+00, &
     & 0.2966600E+00, 0.2865500E+00, 0.2858800E+00, 0.2665000E+00, &
     & 0.3070700E+00, 0.2713500E+00, 0.2843600E+00, 0.3217700E+00, &
     & 0.3597300E+00, 0.3503800E+00, 0.4026900E+00, 0.4223700E+00, &
     & 0.4810700E+00, 0.5499900E+00, 0.5347300E+00, 0.5347300E+00 /
      data (ref_adm(17,iz, 5,12),iz = 1,20) / &
     & 0.3059700E+00, 0.3059700E+00, 0.2761000E+00, 0.2888500E+00, &
     & 0.2827700E+00, 0.2681500E+00, 0.2873600E+00, 0.2996600E+00, &
     & 0.2806200E+00, 0.2909100E+00, 0.2927800E+00, 0.3020800E+00, &
     & 0.3181400E+00, 0.3430700E+00, 0.4103100E+00, 0.4500100E+00, &
     & 0.4608400E+00, 0.5506000E+00, 0.5088800E+00, 0.5088800E+00 /
      data (ref_adm(17,iz, 6,12),iz = 1,20) / &
     & 0.2772500E+00, 0.2772500E+00, 0.2784700E+00, 0.2853600E+00, &
     & 0.2599300E+00, 0.2640300E+00, 0.2793300E+00, 0.2998700E+00, &
     & 0.2918200E+00, 0.3003900E+00, 0.3037100E+00, 0.2985800E+00, &
     & 0.3378500E+00, 0.3628000E+00, 0.3596000E+00, 0.3700700E+00, &
     & 0.3931400E+00, 0.5057200E+00, 0.5018700E+00, 0.5018700E+00 /
      data (ref_adm(17,iz, 7,12),iz = 1,20) / &
     & 0.2878000E+00, 0.2878000E+00, 0.2862600E+00, 0.2837600E+00, &
     & 0.2755500E+00, 0.2925500E+00, 0.3054900E+00, 0.3043400E+00, &
     & 0.3141700E+00, 0.3248200E+00, 0.3255300E+00, 0.3176400E+00, &
     & 0.3417700E+00, 0.3532300E+00, 0.3704600E+00, 0.4097800E+00, &
     & 0.4245200E+00, 0.4599200E+00, 0.5354100E+00, 0.5354100E+00 /
      data (ref_adm(17,iz, 8,12),iz = 1,20) / &
     & 0.2910300E+00, 0.2910300E+00, 0.2861800E+00, 0.2874800E+00, &
     & 0.2840000E+00, 0.2885500E+00, 0.3015400E+00, 0.2970700E+00, &
     & 0.3049200E+00, 0.3063800E+00, 0.3217100E+00, 0.3398100E+00, &
     & 0.3569700E+00, 0.3639000E+00, 0.3712700E+00, 0.4107700E+00, &
     & 0.4428800E+00, 0.5104900E+00, 0.4674100E+00, 0.4674100E+00 /
      data (ref_adm(17,iz, 9,12),iz = 1,20) / &
     & 0.2736700E+00, 0.2736700E+00, 0.2754600E+00, 0.2809200E+00, &
     & 0.2781600E+00, 0.2732500E+00, 0.2657800E+00, 0.2695300E+00, &
     & 0.2752400E+00, 0.2956100E+00, 0.3022800E+00, 0.3424100E+00, &
     & 0.3268900E+00, 0.3564100E+00, 0.3746500E+00, 0.3969900E+00, &
     & 0.4130000E+00, 0.4580200E+00, 0.3613600E+00, 0.3613600E+00 /
      data (ref_adm(17,iz,10,12),iz = 1,20) / &
     & 0.2785500E+00, 0.2785500E+00, 0.2742000E+00, 0.2615100E+00, &
     & 0.2709400E+00, 0.2531500E+00, 0.2825200E+00, 0.2787800E+00, &
     & 0.2539200E+00, 0.3012600E+00, 0.2934200E+00, 0.3280900E+00, &
     & 0.3208200E+00, 0.3254800E+00, 0.3358800E+00, 0.3772700E+00, &
     & 0.4071300E+00, 0.4377400E+00, 0.3766000E+00, 0.3766000E+00 /
      data (ref_adm(17,iz,11,12),iz = 1,20) / &
     & 0.2696000E+00, 0.2696000E+00, 0.2670300E+00, 0.2604800E+00, &
     & 0.2729100E+00, 0.2713500E+00, 0.2919300E+00, 0.2899900E+00, &
     & 0.2929800E+00, 0.2796600E+00, 0.2977100E+00, 0.3323400E+00, &
     & 0.3116300E+00, 0.3343500E+00, 0.3264000E+00, 0.3666100E+00, &
     & 0.3923800E+00, 0.4329600E+00, 0.3240200E+00, 0.3240200E+00 /
      data (ref_adm(17,iz,12,12),iz = 1,20) / &
     & 0.2684100E+00, 0.2684100E+00, 0.2995900E+00, 0.2552700E+00, &
     & 0.2980000E+00, 0.3265200E+00, 0.2873100E+00, 0.2622900E+00, &
     & 0.2836200E+00, 0.2825000E+00, 0.3098400E+00, 0.3150200E+00, &
     & 0.3199200E+00, 0.3297200E+00, 0.3132600E+00, 0.3320400E+00, &
     & 0.3753000E+00, 0.4102700E+00, 0.3037000E+00, 0.3037000E+00 /
      data (ref_adm(17,iz,13,12),iz = 1,20) / &
     & 0.3099700E+00, 0.3099700E+00, 0.2939000E+00, 0.2806900E+00, &
     & 0.2853000E+00, 0.2818900E+00, 0.2791500E+00, 0.2802200E+00, &
     & 0.2732000E+00, 0.2976300E+00, 0.3012500E+00, 0.3264400E+00, &
     & 0.3013700E+00, 0.3266800E+00, 0.3322500E+00, 0.3390000E+00, &
     & 0.3954100E+00, 0.4145200E+00, 0.3645600E+00, 0.3645600E+00 /
      data (ref_adm(17,iz,14,12),iz = 1,20) / &
     & 0.2826200E+00, 0.2826200E+00, 0.2839200E+00, 0.2899000E+00, &
     & 0.2885400E+00, 0.2813700E+00, 0.2808700E+00, 0.2906300E+00, &
     & 0.2855500E+00, 0.2859200E+00, 0.2965700E+00, 0.2952400E+00, &
     & 0.3175600E+00, 0.3337200E+00, 0.3576600E+00, 0.3398100E+00, &
     & 0.3524000E+00, 0.3916900E+00, 0.3209300E+00, 0.3209300E+00 /
      data (ref_adm(17,iz,15,12),iz = 1,20) / &
     & 0.2820200E+00, 0.2820200E+00, 0.2889000E+00, 0.2769500E+00, &
     & 0.2873400E+00, 0.2793400E+00, 0.2860000E+00, 0.2858300E+00, &
     & 0.2908600E+00, 0.2931200E+00, 0.2830600E+00, 0.3037300E+00, &
     & 0.3074700E+00, 0.3216300E+00, 0.3506000E+00, 0.3583700E+00, &
     & 0.3722200E+00, 0.3486000E+00, 0.3745700E+00, 0.3745700E+00 /
      data (ref_adm(17,iz,16,12),iz = 1,20) / &
     & 0.2976700E+00, 0.2976700E+00, 0.2957300E+00, 0.2938200E+00, &
     & 0.3005600E+00, 0.2913200E+00, 0.3080500E+00, 0.2728600E+00, &
     & 0.2653400E+00, 0.2705000E+00, 0.2741300E+00, 0.2838500E+00, &
     & 0.2964700E+00, 0.3156700E+00, 0.3209000E+00, 0.3448100E+00, &
     & 0.3396600E+00, 0.3439500E+00, 0.3464813E+00, 0.3464813E+00 /
      data (ref_adm(17,iz,17,12),iz = 1,20) / &
     & 0.2996400E+00, 0.2996400E+00, 0.2540900E+00, 0.2946800E+00, &
     & 0.2932700E+00, 0.3007900E+00, 0.3005100E+00, 0.2776800E+00, &
     & 0.3061800E+00, 0.3093000E+00, 0.3011800E+00, 0.3366200E+00, &
     & 0.3298400E+00, 0.2921900E+00, 0.3457400E+00, 0.4006200E+00, &
     & 0.3769900E+00, 0.2709300E+00, 0.3389393E+00, 0.3389393E+00 /
      data (ref_adm(17,iz,18,12),iz = 1,20) / &
     & 0.3069600E+00, 0.3069600E+00, 0.3059900E+00, 0.3139500E+00, &
     & 0.2902100E+00, 0.2942600E+00, 0.3019100E+00, 0.3169000E+00, &
     & 0.2850000E+00, 0.2976400E+00, 0.3421600E+00, 0.3390200E+00, &
     & 0.3093900E+00, 0.3177900E+00, 0.3492100E+00, 0.3375700E+00, &
     & 0.3657500E+00, 0.3557474E+00, 0.3343267E+00, 0.3343267E+00 /
      data (ref_adm(17,iz,19,12),iz = 1,20) / &
     & 0.3013800E+00, 0.3013800E+00, 0.2738500E+00, 0.2834000E+00, &
     & 0.2846000E+00, 0.3033300E+00, 0.3353300E+00, 0.2928300E+00, &
     & 0.3035500E+00, 0.2876500E+00, 0.3220300E+00, 0.3320500E+00, &
     & 0.3314200E+00, 0.3450900E+00, 0.3515900E+00, 0.3263000E+00, &
     & 0.4195300E+00, 0.3518837E+00, 0.3297042E+00, 0.3297042E+00 /
      data (ref_adm(17,iz,20,12),iz = 1,20) / &
     & 0.3100000E+00, 0.3100000E+00, 0.2902800E+00, 0.2849200E+00, &
     & 0.2837100E+00, 0.2862900E+00, 0.2954400E+00, 0.2880000E+00, &
     & 0.2871800E+00, 0.3048700E+00, 0.3039700E+00, 0.3118200E+00, &
     & 0.3030100E+00, 0.3329800E+00, 0.3437000E+00, 0.3589800E+00, &
     & 0.3461703E+00, 0.3487526E+00, 0.3270356E+00, 0.3270356E+00 /
      data (ref_adm(17,iz,21,12),iz = 1,20) / &
     & 0.2840700E+00, 0.2840700E+00, 0.2604500E+00, 0.2880300E+00, &
     & 0.2961000E+00, 0.3132500E+00, 0.2804100E+00, 0.3042000E+00, &
     & 0.2910800E+00, 0.3114500E+00, 0.3168700E+00, 0.3371900E+00, &
     & 0.3251600E+00, 0.3259500E+00, 0.3541500E+00, 0.3128200E+00, &
     & 0.3442866E+00, 0.3460853E+00, 0.3252455E+00, 0.3252455E+00 /
      data (ref_adm(17,iz,22,12),iz = 1,20) / &
     & 0.2784200E+00, 0.2784200E+00, 0.2860500E+00, 0.3041700E+00, &
     & 0.3167800E+00, 0.2691400E+00, 0.2763000E+00, 0.2939200E+00, &
     & 0.2939900E+00, 0.3488800E+00, 0.2928400E+00, 0.3357900E+00, &
     & 0.3630400E+00, 0.3366300E+00, 0.3458000E+00, 0.3485600E+00, &
     & 0.3975936E+00, 0.3876027E+00, 0.3464022E+00, 0.3464022E+00 /
      data (ref_adm(17,iz,23,12),iz = 1,20) / &
     & 0.2919200E+00, 0.2919200E+00, 0.2952400E+00, 0.3125000E+00, &
     & 0.3217400E+00, 0.2912500E+00, 0.2842200E+00, 0.2782000E+00, &
     & 0.3136700E+00, 0.2964000E+00, 0.2916800E+00, 0.3342600E+00, &
     & 0.3349000E+00, 0.3428300E+00, 0.3667700E+00, 0.3821900E+00, &
     & 0.3907134E+00, 0.3798427E+00, 0.3438599E+00, 0.3438599E+00 /
      data (ref_adm(17,iz,24,12),iz = 1,20) / &
     & 0.2716000E+00, 0.2716000E+00, 0.2670200E+00, 0.2797700E+00, &
     & 0.2785900E+00, 0.2802400E+00, 0.3002900E+00, 0.3003100E+00, &
     & 0.3099400E+00, 0.3105700E+00, 0.3484500E+00, 0.3485000E+00, &
     & 0.3369000E+00, 0.3327700E+00, 0.3496500E+00, 0.3600900E+00, &
     & 0.3206700E+00, 0.3738708E+00, 0.3420576E+00, 0.3420576E+00 /
      data (ref_adm(17,iz,25,12),iz = 1,20) / &
     & 0.2914100E+00, 0.2914100E+00, 0.2887100E+00, 0.3027100E+00, &
     & 0.3053100E+00, 0.3022700E+00, 0.3009600E+00, 0.3146500E+00, &
     & 0.3176500E+00, 0.3297300E+00, 0.3433400E+00, 0.3474900E+00, &
     & 0.3330300E+00, 0.3431800E+00, 0.3501700E+00, 0.3541800E+00, &
     & 0.3426400E+00, 0.3233700E+00, 0.3416132E+00, 0.3416132E+00 /
      data (ref_adm(17,iz,26,12),iz = 1,20) / &
     & 0.2901800E+00, 0.2901800E+00, 0.2905200E+00, 0.2986600E+00, &
     & 0.2952900E+00, 0.2965400E+00, 0.3106300E+00, 0.3124200E+00, &
     & 0.3221600E+00, 0.3124800E+00, 0.3285100E+00, 0.3290200E+00, &
     & 0.3534500E+00, 0.3706000E+00, 0.3538400E+00, 0.3762000E+00, &
     & 0.3998300E+00, 0.3591400E+00, 0.3420383E+00, 0.3420383E+00 /
      data (ref_adm(17,iz,27,12),iz = 1,20) / &
     & 0.2980700E+00, 0.2980700E+00, 0.2901600E+00, 0.2876100E+00, &
     & 0.3255700E+00, 0.3258800E+00, 0.3185900E+00, 0.3274500E+00, &
     & 0.3358100E+00, 0.3485500E+00, 0.3440400E+00, 0.3514800E+00, &
     & 0.3593700E+00, 0.3508300E+00, 0.3501700E+00, 0.3435200E+00, &
     & 0.3662400E+00, 0.3698800E+00, 0.2889300E+00, 0.2889300E+00 /
      data (ref_adm(17,iz,28,12),iz = 1,20) / &
     & 0.2937200E+00, 0.2937200E+00, 0.3083800E+00, 0.3006300E+00, &
     & 0.2950000E+00, 0.2916400E+00, 0.3235500E+00, 0.3360400E+00, &
     & 0.3326400E+00, 0.3537200E+00, 0.3514300E+00, 0.3838600E+00, &
     & 0.3588600E+00, 0.3834100E+00, 0.3714300E+00, 0.3696700E+00, &
     & 0.3636800E+00, 0.3537100E+00, 0.3038700E+00, 0.3038700E+00 /
      data (ref_adm(17,iz,29,12),iz = 1,20) / &
     & 0.2878200E+00, 0.2878200E+00, 0.3097600E+00, 0.2948700E+00, &
     & 0.3130500E+00, 0.3286100E+00, 0.3310300E+00, 0.3296000E+00, &
     & 0.3230500E+00, 0.3358200E+00, 0.3577000E+00, 0.3779400E+00, &
     & 0.3562000E+00, 0.3730100E+00, 0.3744500E+00, 0.3799900E+00, &
     & 0.3951800E+00, 0.3620500E+00, 0.3104700E+00, 0.3104700E+00 /
      data (ref_adm(17,iz,30,12),iz = 1,20) / &
     & 0.2747000E+00, 0.2747000E+00, 0.2839900E+00, 0.3105500E+00, &
     & 0.3152900E+00, 0.3146500E+00, 0.3370600E+00, 0.3190300E+00, &
     & 0.3417200E+00, 0.3570200E+00, 0.3686100E+00, 0.3680900E+00, &
     & 0.3726300E+00, 0.3782100E+00, 0.3945200E+00, 0.4169000E+00, &
     & 0.3881400E+00, 0.3748800E+00, 0.3192700E+00, 0.3192700E+00 /
      data (ref_adm(17,iz,31,12),iz = 1,20) / &
     & 0.2850300E+00, 0.2850300E+00, 0.3055000E+00, 0.3037900E+00, &
     & 0.3237600E+00, 0.3527300E+00, 0.3314600E+00, 0.3163000E+00, &
     & 0.3376700E+00, 0.3462000E+00, 0.3679100E+00, 0.3918900E+00, &
     & 0.3862200E+00, 0.3933800E+00, 0.3936900E+00, 0.4074500E+00, &
     & 0.4184400E+00, 0.4089200E+00, 0.3331400E+00, 0.3331400E+00 /
      data (ref_adm(17,iz,32,12),iz = 1,20) / &
     & 0.2860900E+00, 0.2860900E+00, 0.3111100E+00, 0.3236600E+00, &
     & 0.3426000E+00, 0.3332900E+00, 0.3371900E+00, 0.3586600E+00, &
     & 0.3965400E+00, 0.3751700E+00, 0.3824200E+00, 0.4053600E+00, &
     & 0.4041800E+00, 0.4229000E+00, 0.4100900E+00, 0.4145200E+00, &
     & 0.4054500E+00, 0.3962600E+00, 0.3408500E+00, 0.3408500E+00 /
      data (ref_adm(17,iz,33,12),iz = 1,20) / &
     & 0.2818100E+00, 0.2818100E+00, 0.2850800E+00, 0.3015400E+00, &
     & 0.3034300E+00, 0.3148500E+00, 0.3141700E+00, 0.3474300E+00, &
     & 0.3222700E+00, 0.3461700E+00, 0.3546200E+00, 0.4038300E+00, &
     & 0.4156700E+00, 0.4286100E+00, 0.4361400E+00, 0.4357900E+00, &
     & 0.4258700E+00, 0.4003600E+00, 0.3345900E+00, 0.3345900E+00 /
      data (ref_adm(17,iz,34,12),iz = 1,20) / &
     & 0.2955000E+00, 0.2955000E+00, 0.2848600E+00, 0.3101400E+00, &
     & 0.3245500E+00, 0.3335700E+00, 0.3400200E+00, 0.3286400E+00, &
     & 0.3270100E+00, 0.3687700E+00, 0.3963100E+00, 0.4094400E+00, &
     & 0.4360000E+00, 0.4238100E+00, 0.4128500E+00, 0.4318200E+00, &
     & 0.4311500E+00, 0.4274100E+00, 0.3408600E+00, 0.3408600E+00 /
      data (ref_adm(17,iz,35,12),iz = 1,20) / &
     & 0.2856800E+00, 0.2856800E+00, 0.3261900E+00, 0.3038300E+00, &
     & 0.3156500E+00, 0.3144200E+00, 0.3417900E+00, 0.3159300E+00, &
     & 0.3403300E+00, 0.3486600E+00, 0.3856000E+00, 0.3550100E+00, &
     & 0.4065700E+00, 0.4317700E+00, 0.4375000E+00, 0.4372000E+00, &
     & 0.4383200E+00, 0.4314900E+00, 0.3381100E+00, 0.3381100E+00 /
      data (ref_adm(17,iz,36,12),iz = 1,20) / &
     & 0.2953800E+00, 0.2953800E+00, 0.3002600E+00, 0.3296300E+00, &
     & 0.3200800E+00, 0.3249800E+00, 0.3227900E+00, 0.3369300E+00, &
     & 0.3522700E+00, 0.3693800E+00, 0.3827300E+00, 0.3844200E+00, &
     & 0.4044700E+00, 0.4404400E+00, 0.4404800E+00, 0.4537200E+00, &
     & 0.4232300E+00, 0.4052300E+00, 0.3685200E+00, 0.3685200E+00 /
      data (ref_adm(17,iz,37,12),iz = 1,20) / &
     & 0.2976600E+00, 0.2976600E+00, 0.3159500E+00, 0.3050400E+00, &
     & 0.3307000E+00, 0.3260700E+00, 0.3359800E+00, 0.3520200E+00, &
     & 0.3599700E+00, 0.3581800E+00, 0.3948500E+00, 0.4192200E+00, &
     & 0.4297400E+00, 0.4531900E+00, 0.4744300E+00, 0.4665400E+00, &
     & 0.4473500E+00, 0.4082800E+00, 0.3846511E+00, 0.3846511E+00 /
      data (ref_adm(17,iz,38,12),iz = 1,20) / &
     & 0.2976600E+00, 0.2976600E+00, 0.3159500E+00, 0.3050400E+00, &
     & 0.3307000E+00, 0.3260700E+00, 0.3359800E+00, 0.3520200E+00, &
     & 0.3599700E+00, 0.3581800E+00, 0.3948500E+00, 0.4192200E+00, &
     & 0.4297400E+00, 0.4531900E+00, 0.4744300E+00, 0.4665400E+00, &
     & 0.4473500E+00, 0.4082800E+00, 0.3846511E+00, 0.3846511E+00 /
! Solar Zenith Angle 60.0 Albedo  0.3394608E+00
      data (ref_adm(17,iz, 1,13),iz = 1,20) / &
     & 0.2906100E+00, 0.2906100E+00, 0.2866500E+00, 0.2763500E+00, &
     & 0.2697700E+00, 0.2809600E+00, 0.2883800E+00, 0.2697300E+00, &
     & 0.2757600E+00, 0.2893400E+00, 0.3084200E+00, 0.3473300E+00, &
     & 0.4421400E+00, 0.4483400E+00, 0.5090600E+00, 0.5532700E+00, &
     & 0.6344200E+00, 0.6687800E+00, 0.6969700E+00, 0.6969700E+00 /
      data (ref_adm(17,iz, 2,13),iz = 1,20) / &
     & 0.2906100E+00, 0.2906100E+00, 0.2866500E+00, 0.2763500E+00, &
     & 0.2697700E+00, 0.2809600E+00, 0.2883800E+00, 0.2697300E+00, &
     & 0.2757600E+00, 0.2893400E+00, 0.3084200E+00, 0.3473300E+00, &
     & 0.4421400E+00, 0.4483400E+00, 0.5090600E+00, 0.5532700E+00, &
     & 0.6344200E+00, 0.6687800E+00, 0.6969700E+00, 0.6969700E+00 /
      data (ref_adm(17,iz, 3,13),iz = 1,20) / &
     & 0.2692200E+00, 0.2692200E+00, 0.2606400E+00, 0.2705300E+00, &
     & 0.2697300E+00, 0.2703300E+00, 0.2754200E+00, 0.2824800E+00, &
     & 0.2866400E+00, 0.3103600E+00, 0.3070100E+00, 0.3533100E+00, &
     & 0.3894500E+00, 0.4287700E+00, 0.4575000E+00, 0.4972000E+00, &
     & 0.6173300E+00, 0.6806200E+00, 0.6529400E+00, 0.6529400E+00 /
      data (ref_adm(17,iz, 4,13),iz = 1,20) / &
     & 0.2497000E+00, 0.2497000E+00, 0.2560600E+00, 0.2721300E+00, &
     & 0.2815800E+00, 0.2758200E+00, 0.2710400E+00, 0.3037800E+00, &
     & 0.2938800E+00, 0.2975600E+00, 0.3216300E+00, 0.3424600E+00, &
     & 0.3833900E+00, 0.3796600E+00, 0.4536800E+00, 0.5055000E+00, &
     & 0.5744500E+00, 0.6421500E+00, 0.6791700E+00, 0.6791700E+00 /
      data (ref_adm(17,iz, 5,13),iz = 1,20) / &
     & 0.2734300E+00, 0.2734300E+00, 0.2773900E+00, 0.2606200E+00, &
     & 0.2757600E+00, 0.2813100E+00, 0.2857500E+00, 0.2817100E+00, &
     & 0.2835300E+00, 0.2882400E+00, 0.2986700E+00, 0.3404100E+00, &
     & 0.3672500E+00, 0.4147700E+00, 0.4292600E+00, 0.4579300E+00, &
     & 0.5534300E+00, 0.6207500E+00, 0.5285100E+00, 0.5285100E+00 /
      data (ref_adm(17,iz, 6,13),iz = 1,20) / &
     & 0.2875600E+00, 0.2875600E+00, 0.2856100E+00, 0.2727000E+00, &
     & 0.2762200E+00, 0.2742100E+00, 0.2745800E+00, 0.2927900E+00, &
     & 0.2963100E+00, 0.3070200E+00, 0.3128300E+00, 0.3394700E+00, &
     & 0.3589300E+00, 0.4062500E+00, 0.4564900E+00, 0.5096200E+00, &
     & 0.5971600E+00, 0.6047300E+00, 0.5974500E+00, 0.5974500E+00 /
      data (ref_adm(17,iz, 7,13),iz = 1,20) / &
     & 0.2833500E+00, 0.2833500E+00, 0.2798300E+00, 0.2819800E+00, &
     & 0.3117200E+00, 0.2913900E+00, 0.2964200E+00, 0.3080900E+00, &
     & 0.3016300E+00, 0.3228000E+00, 0.3344200E+00, 0.3531000E+00, &
     & 0.3968400E+00, 0.4135200E+00, 0.4527900E+00, 0.4892700E+00, &
     & 0.5704100E+00, 0.5696700E+00, 0.5658400E+00, 0.5658400E+00 /
      data (ref_adm(17,iz, 8,13),iz = 1,20) / &
     & 0.2954700E+00, 0.2954700E+00, 0.2751500E+00, 0.2697900E+00, &
     & 0.2645300E+00, 0.2802500E+00, 0.2838200E+00, 0.2858800E+00, &
     & 0.2903200E+00, 0.2969200E+00, 0.3097000E+00, 0.3531600E+00, &
     & 0.3610200E+00, 0.4086200E+00, 0.4089400E+00, 0.4668600E+00, &
     & 0.5063400E+00, 0.5553500E+00, 0.5149700E+00, 0.5149700E+00 /
      data (ref_adm(17,iz, 9,13),iz = 1,20) / &
     & 0.2818300E+00, 0.2818300E+00, 0.2823200E+00, 0.2684000E+00, &
     & 0.2624400E+00, 0.2785000E+00, 0.2771600E+00, 0.2874000E+00, &
     & 0.2904400E+00, 0.2901700E+00, 0.3361300E+00, 0.3233200E+00, &
     & 0.3439500E+00, 0.3577700E+00, 0.3969200E+00, 0.4325500E+00, &
     & 0.5002800E+00, 0.5212000E+00, 0.4960400E+00, 0.4960400E+00 /
      data (ref_adm(17,iz,10,13),iz = 1,20) / &
     & 0.2716200E+00, 0.2716200E+00, 0.2620200E+00, 0.2676400E+00, &
     & 0.2699800E+00, 0.2666700E+00, 0.2723000E+00, 0.2928300E+00, &
     & 0.3105500E+00, 0.2965100E+00, 0.3005100E+00, 0.3094100E+00, &
     & 0.3322500E+00, 0.3562400E+00, 0.3765600E+00, 0.3635700E+00, &
     & 0.4443100E+00, 0.4948200E+00, 0.4531000E+00, 0.4531000E+00 /
      data (ref_adm(17,iz,11,13),iz = 1,20) / &
     & 0.2645400E+00, 0.2645400E+00, 0.2686100E+00, 0.2757700E+00, &
     & 0.2687400E+00, 0.2796800E+00, 0.2858200E+00, 0.2861000E+00, &
     & 0.2956600E+00, 0.2962500E+00, 0.3312200E+00, 0.3154000E+00, &
     & 0.3473400E+00, 0.3573300E+00, 0.3835900E+00, 0.3745500E+00, &
     & 0.4298100E+00, 0.4180700E+00, 0.3894000E+00, 0.3894000E+00 /
      data (ref_adm(17,iz,12,13),iz = 1,20) / &
     & 0.2643300E+00, 0.2643300E+00, 0.2554500E+00, 0.2643300E+00, &
     & 0.2765900E+00, 0.2631500E+00, 0.2881300E+00, 0.2957900E+00, &
     & 0.2897900E+00, 0.2959200E+00, 0.3098400E+00, 0.3071600E+00, &
     & 0.3211400E+00, 0.3429000E+00, 0.3340100E+00, 0.3606800E+00, &
     & 0.4117100E+00, 0.4106700E+00, 0.3552000E+00, 0.3552000E+00 /
      data (ref_adm(17,iz,13,13),iz = 1,20) / &
     & 0.2773200E+00, 0.2773200E+00, 0.2622400E+00, 0.2626000E+00, &
     & 0.2779900E+00, 0.2711800E+00, 0.2728100E+00, 0.2911400E+00, &
     & 0.3110600E+00, 0.3056100E+00, 0.3014700E+00, 0.3162100E+00, &
     & 0.3261600E+00, 0.3435800E+00, 0.3593800E+00, 0.3802100E+00, &
     & 0.3935900E+00, 0.3935800E+00, 0.4008100E+00, 0.4008100E+00 /
      data (ref_adm(17,iz,14,13),iz = 1,20) / &
     & 0.2838700E+00, 0.2838700E+00, 0.2848900E+00, 0.2778300E+00, &
     & 0.2821800E+00, 0.2826300E+00, 0.2831000E+00, 0.2847900E+00, &
     & 0.2918800E+00, 0.2961300E+00, 0.3017400E+00, 0.3090300E+00, &
     & 0.3357600E+00, 0.3451600E+00, 0.3762300E+00, 0.3853100E+00, &
     & 0.3938100E+00, 0.4160400E+00, 0.4068700E+00, 0.4068700E+00 /
      data (ref_adm(17,iz,15,13),iz = 1,20) / &
     & 0.2824800E+00, 0.2824800E+00, 0.2722900E+00, 0.2682100E+00, &
     & 0.2690900E+00, 0.2700600E+00, 0.2730200E+00, 0.2813400E+00, &
     & 0.2862300E+00, 0.2921700E+00, 0.3043100E+00, 0.3170500E+00, &
     & 0.3313700E+00, 0.3481200E+00, 0.3639400E+00, 0.3585400E+00, &
     & 0.3931600E+00, 0.3785800E+00, 0.3804300E+00, 0.3804300E+00 /
      data (ref_adm(17,iz,16,13),iz = 1,20) / &
     & 0.2698100E+00, 0.2698100E+00, 0.2819900E+00, 0.2923600E+00, &
     & 0.2851600E+00, 0.2745500E+00, 0.2697300E+00, 0.2582300E+00, &
     & 0.2665400E+00, 0.2718300E+00, 0.2805700E+00, 0.2784500E+00, &
     & 0.2931600E+00, 0.3057400E+00, 0.3619900E+00, 0.3628700E+00, &
     & 0.3775100E+00, 0.3990000E+00, 0.3765870E+00, 0.3765870E+00 /
      data (ref_adm(17,iz,17,13),iz = 1,20) / &
     & 0.2916900E+00, 0.2916900E+00, 0.2864200E+00, 0.2804900E+00, &
     & 0.2857000E+00, 0.2855300E+00, 0.2970300E+00, 0.2748600E+00, &
     & 0.3039200E+00, 0.2930100E+00, 0.2909000E+00, 0.3163200E+00, &
     & 0.3166400E+00, 0.3259500E+00, 0.3807600E+00, 0.3682200E+00, &
     & 0.3582000E+00, 0.4151385E+00, 0.3668887E+00, 0.3668887E+00 /
      data (ref_adm(17,iz,18,13),iz = 1,20) / &
     & 0.2758700E+00, 0.2758700E+00, 0.2807700E+00, 0.2884800E+00, &
     & 0.3024000E+00, 0.3082000E+00, 0.2911400E+00, 0.2845600E+00, &
     & 0.2904500E+00, 0.3056100E+00, 0.2930400E+00, 0.3051300E+00, &
     & 0.3291000E+00, 0.3417400E+00, 0.3630300E+00, 0.3384400E+00, &
     & 0.3868100E+00, 0.3953074E+00, 0.3921961E+00, 0.3921961E+00 /
      data (ref_adm(17,iz,19,13),iz = 1,20) / &
     & 0.2987500E+00, 0.2987500E+00, 0.3030400E+00, 0.2838600E+00, &
     & 0.2937100E+00, 0.2807300E+00, 0.2721200E+00, 0.2816900E+00, &
     & 0.2893500E+00, 0.3061600E+00, 0.3114200E+00, 0.3201800E+00, &
     & 0.3103800E+00, 0.3351000E+00, 0.3513300E+00, 0.3388000E+00, &
     & 0.3790800E+00, 0.3908648E+00, 0.3853960E+00, 0.3853960E+00 /
      data (ref_adm(17,iz,20,13),iz = 1,20) / &
     & 0.2671200E+00, 0.2671200E+00, 0.2620400E+00, 0.2869200E+00, &
     & 0.2826000E+00, 0.3149200E+00, 0.2767000E+00, 0.2875500E+00, &
     & 0.2976000E+00, 0.3081200E+00, 0.3112700E+00, 0.3173200E+00, &
     & 0.3245900E+00, 0.3358900E+00, 0.3494800E+00, 0.3518400E+00, &
     & 0.3719439E+00, 0.3881266E+00, 0.3815787E+00, 0.3815787E+00 /
      data (ref_adm(17,iz,21,13),iz = 1,20) / &
     & 0.2921700E+00, 0.2921700E+00, 0.2879800E+00, 0.2919300E+00, &
     & 0.2920800E+00, 0.3059100E+00, 0.2944700E+00, 0.3008400E+00, &
     & 0.3118200E+00, 0.3262700E+00, 0.3139200E+00, 0.3367300E+00, &
     & 0.3450100E+00, 0.3472400E+00, 0.3623100E+00, 0.3572495E+00, &
     & 0.3713405E+00, 0.3860145E+00, 0.3793843E+00, 0.3793843E+00 /
      data (ref_adm(17,iz,22,13),iz = 1,20) / &
     & 0.2855500E+00, 0.2855500E+00, 0.2796300E+00, 0.2735300E+00, &
     & 0.2835100E+00, 0.2984400E+00, 0.3137100E+00, 0.3075200E+00, &
     & 0.3046400E+00, 0.3185400E+00, 0.3322600E+00, 0.3286800E+00, &
     & 0.3393000E+00, 0.3531600E+00, 0.3702200E+00, 0.3563400E+00, &
     & 0.3311875E+00, 0.3174707E+00, 0.3056101E+00, 0.3056101E+00 /
      data (ref_adm(17,iz,23,13),iz = 1,20) / &
     & 0.2847100E+00, 0.2847100E+00, 0.2693700E+00, 0.2916400E+00, &
     & 0.2926200E+00, 0.2832300E+00, 0.2859400E+00, 0.2948000E+00, &
     & 0.3107700E+00, 0.3456900E+00, 0.3319100E+00, 0.3263500E+00, &
     & 0.3413800E+00, 0.3424600E+00, 0.3622400E+00, 0.3629400E+00, &
     & 0.4124300E+00, 0.3192152E+00, 0.3092623E+00, 0.3092623E+00 /
      data (ref_adm(17,iz,24,13),iz = 1,20) / &
     & 0.2637900E+00, 0.2637900E+00, 0.2614100E+00, 0.2710800E+00, &
     & 0.2750000E+00, 0.2758700E+00, 0.2870800E+00, 0.2938000E+00, &
     & 0.3060200E+00, 0.3175300E+00, 0.3293100E+00, 0.3581700E+00, &
     & 0.3443500E+00, 0.3490800E+00, 0.3641500E+00, 0.3793900E+00, &
     & 0.3949000E+00, 0.3232605E+00, 0.3146612E+00, 0.3146612E+00 /
      data (ref_adm(17,iz,25,13),iz = 1,20) / &
     & 0.2724600E+00, 0.2724600E+00, 0.2926800E+00, 0.2993200E+00, &
     & 0.3003700E+00, 0.3042000E+00, 0.3134100E+00, 0.3081200E+00, &
     & 0.3163400E+00, 0.3184700E+00, 0.3282600E+00, 0.3366600E+00, &
     & 0.3548600E+00, 0.3687000E+00, 0.3766800E+00, 0.3879000E+00, &
     & 0.3982700E+00, 0.3612400E+00, 0.3214962E+00, 0.3214962E+00 /
      data (ref_adm(17,iz,26,13),iz = 1,20) / &
     & 0.2928100E+00, 0.2928100E+00, 0.2949100E+00, 0.2914700E+00, &
     & 0.3074900E+00, 0.3016200E+00, 0.3092100E+00, 0.3140500E+00, &
     & 0.3287400E+00, 0.3338500E+00, 0.3391800E+00, 0.3511500E+00, &
     & 0.3682000E+00, 0.3786700E+00, 0.3741700E+00, 0.3855700E+00, &
     & 0.4327900E+00, 0.4546300E+00, 0.3300304E+00, 0.3300304E+00 /
      data (ref_adm(17,iz,27,13),iz = 1,20) / &
     & 0.2938300E+00, 0.2938300E+00, 0.2757700E+00, 0.2809100E+00, &
     & 0.2775900E+00, 0.2923900E+00, 0.3060400E+00, 0.3007500E+00, &
     & 0.3154900E+00, 0.3531700E+00, 0.3612800E+00, 0.3513400E+00, &
     & 0.3764200E+00, 0.3870900E+00, 0.3758000E+00, 0.3764900E+00, &
     & 0.4277800E+00, 0.4304600E+00, 0.3250300E+00, 0.3250300E+00 /
      data (ref_adm(17,iz,28,13),iz = 1,20) / &
     & 0.2834500E+00, 0.2834500E+00, 0.2689800E+00, 0.2872300E+00, &
     & 0.2890300E+00, 0.3143600E+00, 0.2969800E+00, 0.2924800E+00, &
     & 0.2872400E+00, 0.3263900E+00, 0.3499800E+00, 0.3604400E+00, &
     & 0.3785500E+00, 0.3787900E+00, 0.3736000E+00, 0.3907300E+00, &
     & 0.4058300E+00, 0.4260900E+00, 0.3606500E+00, 0.3606500E+00 /
      data (ref_adm(17,iz,29,13),iz = 1,20) / &
     & 0.2737200E+00, 0.2737200E+00, 0.2696800E+00, 0.2751200E+00, &
     & 0.2929100E+00, 0.2988500E+00, 0.3068200E+00, 0.2916300E+00, &
     & 0.3030700E+00, 0.3161200E+00, 0.3393800E+00, 0.3557100E+00, &
     & 0.3825900E+00, 0.3787300E+00, 0.3873400E+00, 0.4238800E+00, &
     & 0.4338300E+00, 0.4098200E+00, 0.3417300E+00, 0.3417300E+00 /
      data (ref_adm(17,iz,30,13),iz = 1,20) / &
     & 0.2606500E+00, 0.2606500E+00, 0.2574600E+00, 0.2745800E+00, &
     & 0.2925300E+00, 0.2922400E+00, 0.2948700E+00, 0.3150500E+00, &
     & 0.3161900E+00, 0.3357900E+00, 0.3444500E+00, 0.3686000E+00, &
     & 0.3803600E+00, 0.3998200E+00, 0.4009900E+00, 0.4232300E+00, &
     & 0.4393300E+00, 0.4291800E+00, 0.3484800E+00, 0.3484800E+00 /
      data (ref_adm(17,iz,31,13),iz = 1,20) / &
     & 0.2777100E+00, 0.2777100E+00, 0.2931100E+00, 0.2902100E+00, &
     & 0.3169200E+00, 0.3170600E+00, 0.3229700E+00, 0.3389900E+00, &
     & 0.3458700E+00, 0.3422700E+00, 0.3615200E+00, 0.3867000E+00, &
     & 0.4193200E+00, 0.4284400E+00, 0.4362400E+00, 0.4292700E+00, &
     & 0.4427200E+00, 0.4357100E+00, 0.3635900E+00, 0.3635900E+00 /
      data (ref_adm(17,iz,32,13),iz = 1,20) / &
     & 0.2872100E+00, 0.2872100E+00, 0.2918700E+00, 0.3052100E+00, &
     & 0.3118600E+00, 0.3004000E+00, 0.3095400E+00, 0.3132200E+00, &
     & 0.3250300E+00, 0.3238100E+00, 0.3432300E+00, 0.3875300E+00, &
     & 0.3874200E+00, 0.4000000E+00, 0.4181000E+00, 0.4254700E+00, &
     & 0.4434400E+00, 0.4359500E+00, 0.3775000E+00, 0.3775000E+00 /
      data (ref_adm(17,iz,33,13),iz = 1,20) / &
     & 0.3037800E+00, 0.3037800E+00, 0.2831500E+00, 0.2857100E+00, &
     & 0.2959800E+00, 0.3198800E+00, 0.3280400E+00, 0.3411600E+00, &
     & 0.3555700E+00, 0.3694100E+00, 0.3619200E+00, 0.3885800E+00, &
     & 0.4222000E+00, 0.4380700E+00, 0.4619200E+00, 0.4680400E+00, &
     & 0.4602100E+00, 0.4552500E+00, 0.3911500E+00, 0.3911500E+00 /
      data (ref_adm(17,iz,34,13),iz = 1,20) / &
     & 0.2828200E+00, 0.2828200E+00, 0.2945000E+00, 0.3053800E+00, &
     & 0.2970000E+00, 0.3082900E+00, 0.3171300E+00, 0.3224200E+00, &
     & 0.3492800E+00, 0.3658700E+00, 0.3585400E+00, 0.4130000E+00, &
     & 0.4332900E+00, 0.4435900E+00, 0.4626100E+00, 0.4650100E+00, &
     & 0.4806800E+00, 0.4690600E+00, 0.3808200E+00, 0.3808200E+00 /
      data (ref_adm(17,iz,35,13),iz = 1,20) / &
     & 0.2867700E+00, 0.2867700E+00, 0.2913800E+00, 0.2912400E+00, &
     & 0.2993200E+00, 0.3013000E+00, 0.3277100E+00, 0.3410300E+00, &
     & 0.3424900E+00, 0.3798400E+00, 0.3751800E+00, 0.4196300E+00, &
     & 0.4253200E+00, 0.4695900E+00, 0.4699200E+00, 0.4855000E+00, &
     & 0.4900700E+00, 0.4749700E+00, 0.4065000E+00, 0.4065000E+00 /
      data (ref_adm(17,iz,36,13),iz = 1,20) / &
     & 0.2832500E+00, 0.2832500E+00, 0.2848400E+00, 0.3118400E+00, &
     & 0.3178400E+00, 0.3193900E+00, 0.3335700E+00, 0.3379100E+00, &
     & 0.3602800E+00, 0.3803200E+00, 0.4105100E+00, 0.4113200E+00, &
     & 0.4533300E+00, 0.4599600E+00, 0.4690900E+00, 0.4916200E+00, &
     & 0.4985600E+00, 0.4948800E+00, 0.4015600E+00, 0.4015600E+00 /
      data (ref_adm(17,iz,37,13),iz = 1,20) / &
     & 0.2742200E+00, 0.2742200E+00, 0.2914200E+00, 0.3131000E+00, &
     & 0.3154300E+00, 0.3354400E+00, 0.3583100E+00, 0.3310800E+00, &
     & 0.3420500E+00, 0.3758500E+00, 0.3985600E+00, 0.4107100E+00, &
     & 0.4446500E+00, 0.4840700E+00, 0.4959400E+00, 0.5182900E+00, &
     & 0.5205500E+00, 0.4835400E+00, 0.4473000E+00, 0.4473000E+00 /
      data (ref_adm(17,iz,38,13),iz = 1,20) / &
     & 0.2742200E+00, 0.2742200E+00, 0.2914200E+00, 0.3131000E+00, &
     & 0.3154300E+00, 0.3354400E+00, 0.3583100E+00, 0.3310800E+00, &
     & 0.3420500E+00, 0.3758500E+00, 0.3985600E+00, 0.4107100E+00, &
     & 0.4446500E+00, 0.4840700E+00, 0.4959400E+00, 0.5182900E+00, &
     & 0.5205500E+00, 0.4835400E+00, 0.4473000E+00, 0.4473000E+00 /
! Solar Zenith Angle 65.0 Albedo  0.3424369E+00
      data (ref_adm(17,iz, 1,14),iz = 1,20) / &
     & 0.2605400E+00, 0.2605400E+00, 0.2687000E+00, 0.2544000E+00, &
     & 0.2537800E+00, 0.2563300E+00, 0.2833300E+00, 0.2800100E+00, &
     & 0.2942700E+00, 0.3230700E+00, 0.3498700E+00, 0.3753200E+00, &
     & 0.4041000E+00, 0.5327200E+00, 0.6695500E+00, 0.7325200E+00, &
     & 0.8451500E+00, 0.8409700E+00, 0.8337269E+00, 0.8337269E+00 /
      data (ref_adm(17,iz, 2,14),iz = 1,20) / &
     & 0.2605400E+00, 0.2605400E+00, 0.2687000E+00, 0.2544000E+00, &
     & 0.2537800E+00, 0.2563300E+00, 0.2833300E+00, 0.2800100E+00, &
     & 0.2942700E+00, 0.3230700E+00, 0.3498700E+00, 0.3753200E+00, &
     & 0.4041000E+00, 0.5327200E+00, 0.6695500E+00, 0.7325200E+00, &
     & 0.8451500E+00, 0.8409700E+00, 0.8337269E+00, 0.8337269E+00 /
      data (ref_adm(17,iz, 3,14),iz = 1,20) / &
     & 0.2634500E+00, 0.2634500E+00, 0.2584500E+00, 0.2597900E+00, &
     & 0.2633900E+00, 0.2635300E+00, 0.2623200E+00, 0.2710700E+00, &
     & 0.3043700E+00, 0.3322000E+00, 0.3604300E+00, 0.3583500E+00, &
     & 0.4078500E+00, 0.4601000E+00, 0.5400600E+00, 0.6440900E+00, &
     & 0.7001600E+00, 0.7673300E+00, 0.7657634E-01, 0.7657634E-01 /
      data (ref_adm(17,iz, 4,14),iz = 1,20) / &
     & 0.2563100E+00, 0.2563100E+00, 0.2673600E+00, 0.2651900E+00, &
     & 0.2714800E+00, 0.2739200E+00, 0.2742100E+00, 0.2807800E+00, &
     & 0.2939000E+00, 0.3142000E+00, 0.3185500E+00, 0.3538100E+00, &
     & 0.3896500E+00, 0.4408600E+00, 0.4902800E+00, 0.5802800E+00, &
     & 0.7064200E+00, 0.7368700E+00, 0.7633024E+00, 0.7633024E+00 /
      data (ref_adm(17,iz, 5,14),iz = 1,20) / &
     & 0.2731700E+00, 0.2731700E+00, 0.2695800E+00, 0.2715200E+00, &
     & 0.2510100E+00, 0.2829300E+00, 0.2579700E+00, 0.2875500E+00, &
     & 0.2970600E+00, 0.3213300E+00, 0.3430500E+00, 0.3644900E+00, &
     & 0.3915600E+00, 0.4458000E+00, 0.4829900E+00, 0.5506400E+00, &
     & 0.6914800E+00, 0.7340900E+00, 0.7107506E+00, 0.7107506E+00 /
      data (ref_adm(17,iz, 6,14),iz = 1,20) / &
     & 0.2563500E+00, 0.2563500E+00, 0.2567600E+00, 0.2659900E+00, &
     & 0.2686000E+00, 0.2670200E+00, 0.2743600E+00, 0.2813500E+00, &
     & 0.2974600E+00, 0.3136100E+00, 0.3293700E+00, 0.3508700E+00, &
     & 0.3958600E+00, 0.4170800E+00, 0.4781000E+00, 0.5542200E+00, &
     & 0.6337000E+00, 0.6986500E+00, 0.7585100E+00, 0.7585100E+00 /
      data (ref_adm(17,iz, 7,14),iz = 1,20) / &
     & 0.2647000E+00, 0.2647000E+00, 0.2640500E+00, 0.2643300E+00, &
     & 0.2629900E+00, 0.2592200E+00, 0.2729800E+00, 0.2892900E+00, &
     & 0.3062600E+00, 0.3122400E+00, 0.3444500E+00, 0.3528300E+00, &
     & 0.3917700E+00, 0.4058400E+00, 0.4594200E+00, 0.5461800E+00, &
     & 0.6208600E+00, 0.6323000E+00, 0.6274500E+00, 0.6274500E+00 /
      data (ref_adm(17,iz, 8,14),iz = 1,20) / &
     & 0.2591600E+00, 0.2591600E+00, 0.2582300E+00, 0.2676000E+00, &
     & 0.2446700E+00, 0.2669400E+00, 0.2581900E+00, 0.2664900E+00, &
     & 0.2916400E+00, 0.2846100E+00, 0.3307900E+00, 0.3184400E+00, &
     & 0.3747400E+00, 0.3905900E+00, 0.4465300E+00, 0.5967100E+00, &
     & 0.6111500E+00, 0.6095900E+00, 0.5026000E+00, 0.5026000E+00 /
      data (ref_adm(17,iz, 9,14),iz = 1,20) / &
     & 0.2618100E+00, 0.2618100E+00, 0.2685900E+00, 0.2644900E+00, &
     & 0.2550800E+00, 0.2663100E+00, 0.2433500E+00, 0.2721700E+00, &
     & 0.2979400E+00, 0.2986500E+00, 0.3143300E+00, 0.3449300E+00, &
     & 0.3512700E+00, 0.3976200E+00, 0.4498400E+00, 0.5065800E+00, &
     & 0.5968600E+00, 0.5754600E+00, 0.5047700E+00, 0.5047700E+00 /
      data (ref_adm(17,iz,10,14),iz = 1,20) / &
     & 0.2756600E+00, 0.2756600E+00, 0.2526200E+00, 0.2668400E+00, &
     & 0.2514000E+00, 0.2509300E+00, 0.2883200E+00, 0.2948200E+00, &
     & 0.3009900E+00, 0.3098100E+00, 0.3032500E+00, 0.3259500E+00, &
     & 0.3451500E+00, 0.3834700E+00, 0.3987300E+00, 0.4577600E+00, &
     & 0.5266100E+00, 0.5332500E+00, 0.5165700E+00, 0.5165700E+00 /
      data (ref_adm(17,iz,11,14),iz = 1,20) / &
     & 0.2437600E+00, 0.2437600E+00, 0.2723400E+00, 0.2688600E+00, &
     & 0.2585200E+00, 0.2602400E+00, 0.2699800E+00, 0.2750300E+00, &
     & 0.2917900E+00, 0.3166800E+00, 0.3062400E+00, 0.3278800E+00, &
     & 0.3361400E+00, 0.3470400E+00, 0.3946800E+00, 0.4424200E+00, &
     & 0.5042100E+00, 0.5011000E+00, 0.4750300E+00, 0.4750300E+00 /
      data (ref_adm(17,iz,12,14),iz = 1,20) / &
     & 0.2585600E+00, 0.2585600E+00, 0.2592400E+00, 0.2702900E+00, &
     & 0.2643900E+00, 0.2654400E+00, 0.2683900E+00, 0.2702400E+00, &
     & 0.2702800E+00, 0.2980800E+00, 0.2937100E+00, 0.3400100E+00, &
     & 0.3364000E+00, 0.3570200E+00, 0.3927800E+00, 0.4233300E+00, &
     & 0.4545700E+00, 0.4785700E+00, 0.4514200E+00, 0.4514200E+00 /
      data (ref_adm(17,iz,13,14),iz = 1,20) / &
     & 0.2725100E+00, 0.2725100E+00, 0.2425200E+00, 0.2539100E+00, &
     & 0.2747000E+00, 0.2900300E+00, 0.2763300E+00, 0.2705100E+00, &
     & 0.2918400E+00, 0.2836500E+00, 0.2999100E+00, 0.3132700E+00, &
     & 0.3193500E+00, 0.3562800E+00, 0.3884400E+00, 0.4063900E+00, &
     & 0.4516600E+00, 0.4747300E+00, 0.4095500E+00, 0.4095500E+00 /
      data (ref_adm(17,iz,14,14),iz = 1,20) / &
     & 0.2764500E+00, 0.2764500E+00, 0.2758300E+00, 0.2775000E+00, &
     & 0.2751500E+00, 0.2803800E+00, 0.2787000E+00, 0.2875100E+00, &
     & 0.2857700E+00, 0.2942100E+00, 0.3082700E+00, 0.3163700E+00, &
     & 0.3353400E+00, 0.3341000E+00, 0.3537900E+00, 0.4040700E+00, &
     & 0.4355100E+00, 0.4302100E+00, 0.4674054E+00, 0.4674054E+00 /
      data (ref_adm(17,iz,15,14),iz = 1,20) / &
     & 0.2739900E+00, 0.2739900E+00, 0.2649300E+00, 0.2579400E+00, &
     & 0.2514900E+00, 0.2591100E+00, 0.2646500E+00, 0.2723200E+00, &
     & 0.2853300E+00, 0.2883500E+00, 0.3082400E+00, 0.3200000E+00, &
     & 0.3370800E+00, 0.3603600E+00, 0.3504000E+00, 0.3942700E+00, &
     & 0.4178600E+00, 0.4404700E+00, 0.4560358E+00, 0.4560358E+00 /
      data (ref_adm(17,iz,16,14),iz = 1,20) / &
     & 0.2472500E+00, 0.2472500E+00, 0.2314200E+00, 0.2391300E+00, &
     & 0.2436900E+00, 0.2368900E+00, 0.2233600E+00, 0.2359200E+00, &
     & 0.2545100E+00, 0.2567200E+00, 0.2662800E+00, 0.2771800E+00, &
     & 0.2870600E+00, 0.3133100E+00, 0.3471200E+00, 0.3779500E+00, &
     & 0.4728900E+00, 0.4418400E+00, 0.4418923E+00, 0.4418923E+00 /
      data (ref_adm(17,iz,17,14),iz = 1,20) / &
     & 0.2563500E+00, 0.2563500E+00, 0.2733200E+00, 0.2673500E+00, &
     & 0.2556800E+00, 0.2839000E+00, 0.2624000E+00, 0.2724500E+00, &
     & 0.2645200E+00, 0.2798900E+00, 0.2926400E+00, 0.2993000E+00, &
     & 0.3063900E+00, 0.3334200E+00, 0.3614400E+00, 0.3743400E+00, &
     & 0.3873300E+00, 0.4686907E+00, 0.4280363E+00, 0.4280363E+00 /
      data (ref_adm(17,iz,18,14),iz = 1,20) / &
     & 0.2623400E+00, 0.2623400E+00, 0.2656600E+00, 0.2711700E+00, &
     & 0.2629400E+00, 0.2506900E+00, 0.2570100E+00, 0.2825700E+00, &
     & 0.2984000E+00, 0.2919800E+00, 0.2816200E+00, 0.3190800E+00, &
     & 0.2951600E+00, 0.3251600E+00, 0.3439700E+00, 0.3724700E+00, &
     & 0.4142600E+00, 0.4048010E+00, 0.3944624E+00, 0.3944624E+00 /
      data (ref_adm(17,iz,19,14),iz = 1,20) / &
     & 0.2565700E+00, 0.2565700E+00, 0.2683000E+00, 0.2606100E+00, &
     & 0.2710600E+00, 0.2775900E+00, 0.2834100E+00, 0.2823100E+00, &
     & 0.2911100E+00, 0.2795400E+00, 0.3114200E+00, 0.2942300E+00, &
     & 0.3105000E+00, 0.3200300E+00, 0.3469700E+00, 0.3733200E+00, &
     & 0.3815934E+00, 0.3981109E+00, 0.3870756E+00, 0.3870756E+00 /
      data (ref_adm(17,iz,20,14),iz = 1,20) / &
     & 0.2641300E+00, 0.2641300E+00, 0.2599600E+00, 0.2665100E+00, &
     & 0.2709600E+00, 0.2635800E+00, 0.2896900E+00, 0.2809700E+00, &
     & 0.2751000E+00, 0.2820800E+00, 0.3093600E+00, 0.3236500E+00, &
     & 0.3220100E+00, 0.3339700E+00, 0.3600700E+00, 0.3673300E+00, &
     & 0.3771303E+00, 0.3932708E+00, 0.3827217E+00, 0.3827217E+00 /
      data (ref_adm(17,iz,21,14),iz = 1,20) / &
     & 0.2648000E+00, 0.2648000E+00, 0.2630900E+00, 0.2552300E+00, &
     & 0.2899400E+00, 0.2600500E+00, 0.2709700E+00, 0.2888900E+00, &
     & 0.2654400E+00, 0.2980400E+00, 0.2973800E+00, 0.3320700E+00, &
     & 0.3188600E+00, 0.3507500E+00, 0.3714800E+00, 0.3579438E+00, &
     & 0.3737487E+00, 0.3890053E+00, 0.3799843E+00, 0.3799843E+00 /
      data (ref_adm(17,iz,22,14),iz = 1,20) / &
     & 0.2640000E+00, 0.2640000E+00, 0.2788400E+00, 0.2581200E+00, &
     & 0.2866400E+00, 0.2745200E+00, 0.2680900E+00, 0.2907200E+00, &
     & 0.3043100E+00, 0.2991100E+00, 0.2956500E+00, 0.3356700E+00, &
     & 0.3182200E+00, 0.3479700E+00, 0.3490200E+00, 0.3623100E+00, &
     & 0.3473764E+00, 0.3374680E+00, 0.3314523E+00, 0.3314523E+00 /
      data (ref_adm(17,iz,23,14),iz = 1,20) / &
     & 0.2576500E+00, 0.2576500E+00, 0.2613900E+00, 0.2781900E+00, &
     & 0.2859100E+00, 0.2989400E+00, 0.2875100E+00, 0.3002400E+00, &
     & 0.3125300E+00, 0.3181200E+00, 0.3113000E+00, 0.3408300E+00, &
     & 0.3303000E+00, 0.3607200E+00, 0.3591000E+00, 0.3719100E+00, &
     & 0.3487342E+00, 0.3393631E+00, 0.3359205E+00, 0.3359205E+00 /
      data (ref_adm(17,iz,24,14),iz = 1,20) / &
     & 0.2428400E+00, 0.2428400E+00, 0.2445300E+00, 0.2544700E+00, &
     & 0.2567300E+00, 0.2641700E+00, 0.2669000E+00, 0.2746500E+00, &
     & 0.2828100E+00, 0.2923800E+00, 0.2995100E+00, 0.3115300E+00, &
     & 0.3325400E+00, 0.3583000E+00, 0.3552300E+00, 0.3692100E+00, &
     & 0.3635200E+00, 0.3441243E+00, 0.3426220E+00, 0.3426220E+00 /
      data (ref_adm(17,iz,25,14),iz = 1,20) / &
     & 0.2617200E+00, 0.2617200E+00, 0.2785800E+00, 0.2852800E+00, &
     & 0.2913800E+00, 0.2953000E+00, 0.3031900E+00, 0.3173600E+00, &
     & 0.3148200E+00, 0.3259500E+00, 0.3334000E+00, 0.3413300E+00, &
     & 0.3440000E+00, 0.3607300E+00, 0.3657100E+00, 0.4022900E+00, &
     & 0.4306300E+00, 0.3546100E+00, 0.3511739E+00, 0.3511739E+00 /
      data (ref_adm(17,iz,26,14),iz = 1,20) / &
     & 0.2739000E+00, 0.2739000E+00, 0.2852300E+00, 0.2866500E+00, &
     & 0.2962500E+00, 0.3037200E+00, 0.3138400E+00, 0.3168600E+00, &
     & 0.3205700E+00, 0.3280800E+00, 0.3459800E+00, 0.3701500E+00, &
     & 0.3761200E+00, 0.3942800E+00, 0.3873500E+00, 0.3887000E+00, &
     & 0.4271300E+00, 0.4648400E+00, 0.3619964E+00, 0.3619964E+00 /
      data (ref_adm(17,iz,27,14),iz = 1,20) / &
     & 0.2646300E+00, 0.2646300E+00, 0.2769900E+00, 0.2654300E+00, &
     & 0.2660800E+00, 0.2968100E+00, 0.3011400E+00, 0.3023300E+00, &
     & 0.3130700E+00, 0.3116900E+00, 0.3515400E+00, 0.3519800E+00, &
     & 0.3638700E+00, 0.4010100E+00, 0.3920700E+00, 0.4080800E+00, &
     & 0.4281400E+00, 0.4321300E+00, 0.3728400E+00, 0.3728400E+00 /
      data (ref_adm(17,iz,28,14),iz = 1,20) / &
     & 0.2615000E+00, 0.2615000E+00, 0.2747900E+00, 0.2805900E+00, &
     & 0.2841900E+00, 0.2932000E+00, 0.3174300E+00, 0.3337900E+00, &
     & 0.3242600E+00, 0.3107100E+00, 0.3534100E+00, 0.3836400E+00, &
     & 0.3529100E+00, 0.3762500E+00, 0.3960400E+00, 0.4075000E+00, &
     & 0.4347600E+00, 0.4560500E+00, 0.4019400E+00, 0.4019400E+00 /
      data (ref_adm(17,iz,29,14),iz = 1,20) / &
     & 0.2683700E+00, 0.2683700E+00, 0.2786600E+00, 0.2738600E+00, &
     & 0.2773900E+00, 0.2919100E+00, 0.3188100E+00, 0.3061300E+00, &
     & 0.3249500E+00, 0.3253600E+00, 0.3471800E+00, 0.3948000E+00, &
     & 0.3760800E+00, 0.4058500E+00, 0.3896300E+00, 0.4177100E+00, &
     & 0.4522300E+00, 0.4540400E+00, 0.4120900E+00, 0.4120900E+00 /
      data (ref_adm(17,iz,30,14),iz = 1,20) / &
     & 0.2509800E+00, 0.2509800E+00, 0.2676000E+00, 0.2695200E+00, &
     & 0.2735700E+00, 0.2829800E+00, 0.2939900E+00, 0.3085900E+00, &
     & 0.3366900E+00, 0.3330000E+00, 0.3648000E+00, 0.3947900E+00, &
     & 0.3881000E+00, 0.4098600E+00, 0.4265300E+00, 0.4333900E+00, &
     & 0.4614100E+00, 0.4607300E+00, 0.4174800E+00, 0.4174800E+00 /
      data (ref_adm(17,iz,31,14),iz = 1,20) / &
     & 0.2577300E+00, 0.2577300E+00, 0.2661500E+00, 0.2701800E+00, &
     & 0.2879200E+00, 0.2866200E+00, 0.2903000E+00, 0.2905600E+00, &
     & 0.3212000E+00, 0.3360600E+00, 0.3464800E+00, 0.3990900E+00, &
     & 0.4031100E+00, 0.4307100E+00, 0.4422300E+00, 0.4599100E+00, &
     & 0.4511100E+00, 0.4683000E+00, 0.4246100E+00, 0.4246100E+00 /
      data (ref_adm(17,iz,32,14),iz = 1,20) / &
     & 0.2579500E+00, 0.2579500E+00, 0.2834500E+00, 0.2696800E+00, &
     & 0.2839100E+00, 0.2965700E+00, 0.3113300E+00, 0.3296500E+00, &
     & 0.3303400E+00, 0.3443900E+00, 0.3775900E+00, 0.3932700E+00, &
     & 0.4140400E+00, 0.4327800E+00, 0.4578100E+00, 0.4773100E+00, &
     & 0.4942400E+00, 0.4909100E+00, 0.4243900E+00, 0.4243900E+00 /
      data (ref_adm(17,iz,33,14),iz = 1,20) / &
     & 0.2541800E+00, 0.2541800E+00, 0.2684800E+00, 0.2700300E+00, &
     & 0.2852700E+00, 0.2907700E+00, 0.3000900E+00, 0.3141200E+00, &
     & 0.3426300E+00, 0.3454400E+00, 0.3565800E+00, 0.3876000E+00, &
     & 0.4057700E+00, 0.4432400E+00, 0.4686700E+00, 0.4924900E+00, &
     & 0.5248500E+00, 0.5253700E+00, 0.4478000E+00, 0.4478000E+00 /
      data (ref_adm(17,iz,34,14),iz = 1,20) / &
     & 0.2552600E+00, 0.2552600E+00, 0.2575500E+00, 0.2665700E+00, &
     & 0.2885600E+00, 0.3076100E+00, 0.3105500E+00, 0.3266000E+00, &
     & 0.3410400E+00, 0.3544500E+00, 0.3749900E+00, 0.3965500E+00, &
     & 0.4342400E+00, 0.4788000E+00, 0.4852800E+00, 0.4926200E+00, &
     & 0.5297400E+00, 0.5335400E+00, 0.4510200E+00, 0.4510200E+00 /
      data (ref_adm(17,iz,35,14),iz = 1,20) / &
     & 0.2554000E+00, 0.2554000E+00, 0.2752000E+00, 0.2825400E+00, &
     & 0.2785800E+00, 0.3036900E+00, 0.3235900E+00, 0.3328900E+00, &
     & 0.3474400E+00, 0.3767500E+00, 0.3726100E+00, 0.4083600E+00, &
     & 0.4289600E+00, 0.4782600E+00, 0.4944100E+00, 0.5192000E+00, &
     & 0.5355600E+00, 0.5473800E+00, 0.4627900E+00, 0.4627900E+00 /
      data (ref_adm(17,iz,36,14),iz = 1,20) / &
     & 0.2670000E+00, 0.2670000E+00, 0.2888100E+00, 0.2874400E+00, &
     & 0.2937500E+00, 0.3025600E+00, 0.3269500E+00, 0.3233400E+00, &
     & 0.3496500E+00, 0.3799700E+00, 0.3893800E+00, 0.4111000E+00, &
     & 0.4475700E+00, 0.4837400E+00, 0.5071000E+00, 0.5294200E+00, &
     & 0.5425400E+00, 0.5587200E+00, 0.4638900E+00, 0.4638900E+00 /
      data (ref_adm(17,iz,37,14),iz = 1,20) / &
     & 0.2703200E+00, 0.2703200E+00, 0.2837900E+00, 0.2768500E+00, &
     & 0.3006200E+00, 0.2982500E+00, 0.3041600E+00, 0.3205100E+00, &
     & 0.3382500E+00, 0.3610600E+00, 0.3902400E+00, 0.4104200E+00, &
     & 0.4463400E+00, 0.4958700E+00, 0.5251100E+00, 0.5490700E+00, &
     & 0.5584300E+00, 0.5495600E+00, 0.4414700E+00, 0.4414700E+00 /
      data (ref_adm(17,iz,38,14),iz = 1,20) / &
     & 0.2703200E+00, 0.2703200E+00, 0.2837900E+00, 0.2768500E+00, &
     & 0.3006200E+00, 0.2982500E+00, 0.3041600E+00, 0.3205100E+00, &
     & 0.3382500E+00, 0.3610600E+00, 0.3902400E+00, 0.4104200E+00, &
     & 0.4463400E+00, 0.4958700E+00, 0.5251100E+00, 0.5490700E+00, &
     & 0.5584300E+00, 0.5495600E+00, 0.4414700E+00, 0.4414700E+00 /
! Solar Zenith Angle 70.0 Albedo  0.3406112E+00
      data (ref_adm(17,iz, 1,15),iz = 1,20) / &
     & 0.2611300E+00, 0.2611300E+00, 0.2495200E+00, 0.2487300E+00, &
     & 0.2753400E+00, 0.2644100E+00, 0.2644700E+00, 0.2884600E+00, &
     & 0.2876200E+00, 0.3053200E+00, 0.3505300E+00, 0.3907900E+00, &
     & 0.4679000E+00, 0.6008600E+00, 0.6904000E+00, 0.7463300E+00, &
     & 0.7440145E+00, 0.9021442E+00, 0.9571357E+00, 0.9571357E+00 /
      data (ref_adm(17,iz, 2,15),iz = 1,20) / &
     & 0.2611300E+00, 0.2611300E+00, 0.2495200E+00, 0.2487300E+00, &
     & 0.2753400E+00, 0.2644100E+00, 0.2644700E+00, 0.2884600E+00, &
     & 0.2876200E+00, 0.3053200E+00, 0.3505300E+00, 0.3907900E+00, &
     & 0.4679000E+00, 0.6008600E+00, 0.6904000E+00, 0.7463300E+00, &
     & 0.7440145E+00, 0.9021442E+00, 0.9571357E+00, 0.9571357E+00 /
      data (ref_adm(17,iz, 3,15),iz = 1,20) / &
     & 0.2520300E+00, 0.2520300E+00, 0.2569500E+00, 0.2561600E+00, &
     & 0.2528600E+00, 0.2626200E+00, 0.2666300E+00, 0.2789700E+00, &
     & 0.3055400E+00, 0.3106300E+00, 0.3298200E+00, 0.3652700E+00, &
     & 0.4394700E+00, 0.5058100E+00, 0.5925400E+00, 0.6940700E+00, &
     & 0.7385568E+00, 0.8790169E+00, 0.7938027E-01, 0.7938027E-01 /
      data (ref_adm(17,iz, 4,15),iz = 1,20) / &
     & 0.2393500E+00, 0.2393500E+00, 0.2392000E+00, 0.2497200E+00, &
     & 0.2533200E+00, 0.2675300E+00, 0.2692400E+00, 0.2848600E+00, &
     & 0.2997700E+00, 0.3086800E+00, 0.3410800E+00, 0.3756400E+00, &
     & 0.4377600E+00, 0.4835900E+00, 0.5322500E+00, 0.6266200E+00, &
     & 0.6941500E+00, 0.8374751E+00, 0.8561152E+00, 0.8561152E+00 /
      data (ref_adm(17,iz, 5,15),iz = 1,20) / &
     & 0.2646400E+00, 0.2646400E+00, 0.2543700E+00, 0.2592800E+00, &
     & 0.2643500E+00, 0.2682500E+00, 0.2734900E+00, 0.2702500E+00, &
     & 0.2987400E+00, 0.3090100E+00, 0.3369900E+00, 0.3546200E+00, &
     & 0.4270200E+00, 0.4797600E+00, 0.5166500E+00, 0.6393300E+00, &
     & 0.6865600E+00, 0.7949949E+00, 0.7795944E+00, 0.7795944E+00 /
      data (ref_adm(17,iz, 6,15),iz = 1,20) / &
     & 0.2519400E+00, 0.2519400E+00, 0.2624300E+00, 0.2637300E+00, &
     & 0.2520100E+00, 0.2566000E+00, 0.2702400E+00, 0.2794500E+00, &
     & 0.2848200E+00, 0.3082100E+00, 0.3330300E+00, 0.3620100E+00, &
     & 0.3954500E+00, 0.4507500E+00, 0.5194800E+00, 0.6152400E+00, &
     & 0.7494600E+00, 0.8519600E+00, 0.1042000E+01, 0.1042000E+01 /
      data (ref_adm(17,iz, 7,15),iz = 1,20) / &
     & 0.2414300E+00, 0.2414300E+00, 0.2482000E+00, 0.2451500E+00, &
     & 0.2414100E+00, 0.2538900E+00, 0.2493400E+00, 0.2688300E+00, &
     & 0.2852800E+00, 0.3021400E+00, 0.3138500E+00, 0.3474200E+00, &
     & 0.3607500E+00, 0.4104300E+00, 0.4727100E+00, 0.5596900E+00, &
     & 0.6497600E+00, 0.7221800E+00, 0.7146300E+00, 0.7146300E+00 /
      data (ref_adm(17,iz, 8,15),iz = 1,20) / &
     & 0.2610900E+00, 0.2610900E+00, 0.2416900E+00, 0.2548200E+00, &
     & 0.2460900E+00, 0.2500300E+00, 0.2585500E+00, 0.2661900E+00, &
     & 0.2709200E+00, 0.2928300E+00, 0.3101200E+00, 0.3353300E+00, &
     & 0.3631200E+00, 0.3950800E+00, 0.4419200E+00, 0.5507700E+00, &
     & 0.6828500E+00, 0.6683300E+00, 0.6763900E+00, 0.6763900E+00 /
      data (ref_adm(17,iz, 9,15),iz = 1,20) / &
     & 0.2386700E+00, 0.2386700E+00, 0.2444200E+00, 0.2422900E+00, &
     & 0.2658000E+00, 0.2348700E+00, 0.2617300E+00, 0.2820200E+00, &
     & 0.2684300E+00, 0.2830800E+00, 0.2999900E+00, 0.3164400E+00, &
     & 0.3653200E+00, 0.3786500E+00, 0.4368900E+00, 0.5030400E+00, &
     & 0.6112800E+00, 0.6442500E+00, 0.5784900E+00, 0.5784900E+00 /
      data (ref_adm(17,iz,10,15),iz = 1,20) / &
     & 0.2355400E+00, 0.2355400E+00, 0.2326200E+00, 0.2546700E+00, &
     & 0.2395100E+00, 0.2556900E+00, 0.2714300E+00, 0.2561100E+00, &
     & 0.2619400E+00, 0.2704800E+00, 0.2926700E+00, 0.3075600E+00, &
     & 0.3470300E+00, 0.3787800E+00, 0.4284500E+00, 0.4980900E+00, &
     & 0.5530600E+00, 0.5834500E+00, 0.5636158E+00, 0.5636158E+00 /
      data (ref_adm(17,iz,11,15),iz = 1,20) / &
     & 0.2478700E+00, 0.2478700E+00, 0.2497400E+00, 0.2268300E+00, &
     & 0.2405300E+00, 0.2518500E+00, 0.2573000E+00, 0.2719200E+00, &
     & 0.2531600E+00, 0.2591900E+00, 0.2746400E+00, 0.3072700E+00, &
     & 0.3218900E+00, 0.3668900E+00, 0.4071300E+00, 0.4827700E+00, &
     & 0.5224800E+00, 0.5433200E+00, 0.5304456E+00, 0.5304456E+00 /
      data (ref_adm(17,iz,12,15),iz = 1,20) / &
     & 0.2537400E+00, 0.2537400E+00, 0.2392200E+00, 0.2500300E+00, &
     & 0.2422900E+00, 0.2427300E+00, 0.2676000E+00, 0.2646500E+00, &
     & 0.2539500E+00, 0.2660900E+00, 0.2914500E+00, 0.3108800E+00, &
     & 0.3294100E+00, 0.3609400E+00, 0.3939400E+00, 0.4463300E+00, &
     & 0.5084200E+00, 0.5176100E+00, 0.5177900E+00, 0.5177900E+00 /
      data (ref_adm(17,iz,13,15),iz = 1,20) / &
     & 0.2493800E+00, 0.2493800E+00, 0.2491600E+00, 0.2350100E+00, &
     & 0.2464200E+00, 0.2564200E+00, 0.2503700E+00, 0.2621000E+00, &
     & 0.2677000E+00, 0.2794100E+00, 0.2873400E+00, 0.3014900E+00, &
     & 0.3283800E+00, 0.3500700E+00, 0.3827500E+00, 0.4278600E+00, &
     & 0.4763300E+00, 0.4940300E+00, 0.4909825E+00, 0.4909825E+00 /
      data (ref_adm(17,iz,14,15),iz = 1,20) / &
     & 0.2511200E+00, 0.2511200E+00, 0.2587200E+00, 0.2626600E+00, &
     & 0.2667700E+00, 0.2617900E+00, 0.2643600E+00, 0.2741000E+00, &
     & 0.2913300E+00, 0.2815500E+00, 0.2910300E+00, 0.3125900E+00, &
     & 0.3416700E+00, 0.3541800E+00, 0.3726600E+00, 0.4099100E+00, &
     & 0.4752900E+00, 0.4704700E+00, 0.4780208E+00, 0.4780208E+00 /
      data (ref_adm(17,iz,15,15),iz = 1,20) / &
     & 0.2571500E+00, 0.2571500E+00, 0.2489000E+00, 0.2459700E+00, &
     & 0.2498700E+00, 0.2549600E+00, 0.2591600E+00, 0.2625800E+00, &
     & 0.2678000E+00, 0.2801800E+00, 0.2943100E+00, 0.3052500E+00, &
     & 0.3285400E+00, 0.3557500E+00, 0.3619700E+00, 0.3865200E+00, &
     & 0.4468100E+00, 0.4973300E+00, 0.4661019E+00, 0.4661019E+00 /
      data (ref_adm(17,iz,16,15),iz = 1,20) / &
     & 0.2425400E+00, 0.2425400E+00, 0.2271800E+00, 0.2339000E+00, &
     & 0.2340500E+00, 0.2443500E+00, 0.2426400E+00, 0.2518400E+00, &
     & 0.2530800E+00, 0.2519200E+00, 0.2611200E+00, 0.2705200E+00, &
     & 0.2825900E+00, 0.2993500E+00, 0.3521800E+00, 0.3897600E+00, &
     & 0.4640800E+00, 0.4903418E+00, 0.4515332E+00, 0.4515332E+00 /
      data (ref_adm(17,iz,17,15),iz = 1,20) / &
     & 0.2398400E+00, 0.2398400E+00, 0.2507800E+00, 0.2505000E+00, &
     & 0.2438600E+00, 0.2439600E+00, 0.2511800E+00, 0.2823700E+00, &
     & 0.2647700E+00, 0.2950800E+00, 0.3003000E+00, 0.3140100E+00, &
     & 0.3272200E+00, 0.3382600E+00, 0.3857500E+00, 0.4127800E+00, &
     & 0.3808600E+00, 0.4733481E+00, 0.4366624E+00, 0.4366624E+00 /
      data (ref_adm(17,iz,18,15),iz = 1,20) / &
     & 0.2500600E+00, 0.2500600E+00, 0.2431800E+00, 0.2363100E+00, &
     & 0.2566200E+00, 0.2343300E+00, 0.2499800E+00, 0.2665100E+00, &
     & 0.2720900E+00, 0.2923800E+00, 0.2991500E+00, 0.3131200E+00, &
     & 0.3191300E+00, 0.3339400E+00, 0.3835800E+00, 0.4229900E+00, &
     & 0.4205709E+00, 0.4576545E+00, 0.4708942E+00, 0.4708942E+00 /
      data (ref_adm(17,iz,19,15),iz = 1,20) / &
     & 0.2502600E+00, 0.2502600E+00, 0.2326500E+00, 0.2433900E+00, &
     & 0.2526300E+00, 0.2562100E+00, 0.2655800E+00, 0.2667700E+00, &
     & 0.2641500E+00, 0.2815600E+00, 0.2823500E+00, 0.2994100E+00, &
     & 0.3385800E+00, 0.3322300E+00, 0.3613700E+00, 0.3875200E+00, &
     & 0.4145127E+00, 0.4489849E+00, 0.4604535E+00, 0.4604535E+00 /
      data (ref_adm(17,iz,20,15),iz = 1,20) / &
     & 0.2478200E+00, 0.2478200E+00, 0.2336500E+00, 0.2565100E+00, &
     & 0.2537600E+00, 0.2583100E+00, 0.2627100E+00, 0.2571800E+00, &
     & 0.2704900E+00, 0.2945500E+00, 0.2814700E+00, 0.3063500E+00, &
     & 0.3310200E+00, 0.3343800E+00, 0.3683500E+00, 0.3826564E+00, &
     & 0.4102227E+00, 0.4432956E+00, 0.4544373E+00, 0.4544373E+00 /
      data (ref_adm(17,iz,21,15),iz = 1,20) / &
     & 0.2381200E+00, 0.2381200E+00, 0.2602400E+00, 0.2540000E+00, &
     & 0.2724700E+00, 0.2493400E+00, 0.2565500E+00, 0.2732700E+00, &
     & 0.2737200E+00, 0.2981000E+00, 0.2835200E+00, 0.3016100E+00, &
     & 0.3264800E+00, 0.3458000E+00, 0.3750200E+00, 0.3420000E+00, &
     & 0.4066512E+00, 0.4385431E+00, 0.4505823E+00, 0.4505823E+00 /
      data (ref_adm(17,iz,22,15),iz = 1,20) / &
     & 0.2498500E+00, 0.2498500E+00, 0.2551300E+00, 0.2414100E+00, &
     & 0.2552800E+00, 0.2531100E+00, 0.2742400E+00, 0.2710500E+00, &
     & 0.2859500E+00, 0.3017300E+00, 0.2895400E+00, 0.3182800E+00, &
     & 0.3285800E+00, 0.3698900E+00, 0.3881200E+00, 0.4211400E+00, &
     & 0.4121243E+00, 0.4354613E+00, 0.4384928E+00, 0.4384928E+00 /
      data (ref_adm(17,iz,23,15),iz = 1,20) / &
     & 0.2383900E+00, 0.2383900E+00, 0.2452000E+00, 0.2486100E+00, &
     & 0.2443300E+00, 0.2515900E+00, 0.2748400E+00, 0.2664600E+00, &
     & 0.2845200E+00, 0.2981900E+00, 0.2918800E+00, 0.2993000E+00, &
     & 0.3395300E+00, 0.3570700E+00, 0.3700900E+00, 0.3814500E+00, &
     & 0.4111782E+00, 0.4336584E+00, 0.4393784E+00, 0.4393784E+00 /
      data (ref_adm(17,iz,24,15),iz = 1,20) / &
     & 0.2354000E+00, 0.2354000E+00, 0.2386100E+00, 0.2431100E+00, &
     & 0.2474800E+00, 0.2534400E+00, 0.2596800E+00, 0.2659700E+00, &
     & 0.2739700E+00, 0.2861300E+00, 0.2959100E+00, 0.3075000E+00, &
     & 0.3160900E+00, 0.3329400E+00, 0.3564300E+00, 0.3925100E+00, &
     & 0.4310200E+00, 0.4344350E+00, 0.4432041E+00, 0.4432041E+00 /
      data (ref_adm(17,iz,25,15),iz = 1,20) / &
     & 0.2481400E+00, 0.2481400E+00, 0.2629900E+00, 0.2629500E+00, &
     & 0.2719800E+00, 0.2829800E+00, 0.2940800E+00, 0.3042300E+00, &
     & 0.3131100E+00, 0.3217100E+00, 0.3378600E+00, 0.3553500E+00, &
     & 0.3721100E+00, 0.3891400E+00, 0.3840900E+00, 0.3906800E+00, &
     & 0.4329200E+00, 0.3897900E+00, 0.4488411E+00, 0.4488411E+00 /
      data (ref_adm(17,iz,26,15),iz = 1,20) / &
     & 0.2589400E+00, 0.2589400E+00, 0.2676200E+00, 0.2555600E+00, &
     & 0.2750900E+00, 0.2628500E+00, 0.2867600E+00, 0.3019500E+00, &
     & 0.2995700E+00, 0.3296600E+00, 0.3420200E+00, 0.3470000E+00, &
     & 0.3799700E+00, 0.4022600E+00, 0.4011800E+00, 0.3948000E+00, &
     & 0.4526600E+00, 0.5032500E+00, 0.4582775E+00, 0.4582775E+00 /
      data (ref_adm(17,iz,27,15),iz = 1,20) / &
     & 0.2536800E+00, 0.2536800E+00, 0.2466000E+00, 0.2596200E+00, &
     & 0.2594200E+00, 0.2628900E+00, 0.2672200E+00, 0.2910200E+00, &
     & 0.2891800E+00, 0.2979700E+00, 0.3267600E+00, 0.3273700E+00, &
     & 0.3689400E+00, 0.3810400E+00, 0.3948700E+00, 0.4178900E+00, &
     & 0.4373400E+00, 0.4701800E+00, 0.4705935E+00, 0.4705935E+00 /
      data (ref_adm(17,iz,28,15),iz = 1,20) / &
     & 0.2471200E+00, 0.2471200E+00, 0.2528600E+00, 0.2411900E+00, &
     & 0.2569300E+00, 0.2777400E+00, 0.2693200E+00, 0.2853900E+00, &
     & 0.3010900E+00, 0.3186900E+00, 0.3325400E+00, 0.3522700E+00, &
     & 0.3555000E+00, 0.3850900E+00, 0.4166100E+00, 0.4343000E+00, &
     & 0.4484400E+00, 0.4704000E+00, 0.4358700E+00, 0.4358700E+00 /
      data (ref_adm(17,iz,29,15),iz = 1,20) / &
     & 0.2530500E+00, 0.2530500E+00, 0.2431200E+00, 0.2611400E+00, &
     & 0.2506900E+00, 0.2706900E+00, 0.2689600E+00, 0.2920600E+00, &
     & 0.3091100E+00, 0.3196100E+00, 0.3419500E+00, 0.3535000E+00, &
     & 0.3910500E+00, 0.4004900E+00, 0.4195900E+00, 0.4373600E+00, &
     & 0.4707800E+00, 0.5068400E+00, 0.4592300E+00, 0.4592300E+00 /
      data (ref_adm(17,iz,30,15),iz = 1,20) / &
     & 0.2529000E+00, 0.2529000E+00, 0.2495500E+00, 0.2544700E+00, &
     & 0.2697600E+00, 0.2713300E+00, 0.2873600E+00, 0.2874100E+00, &
     & 0.3090500E+00, 0.3168800E+00, 0.3483300E+00, 0.3648800E+00, &
     & 0.3894900E+00, 0.4143900E+00, 0.4264400E+00, 0.4539600E+00, &
     & 0.4886500E+00, 0.5084600E+00, 0.4594100E+00, 0.4594100E+00 /
      data (ref_adm(17,iz,31,15),iz = 1,20) / &
     & 0.2552100E+00, 0.2552100E+00, 0.2537400E+00, 0.2695500E+00, &
     & 0.2728800E+00, 0.2855800E+00, 0.2885800E+00, 0.3138000E+00, &
     & 0.3104700E+00, 0.3253100E+00, 0.3461900E+00, 0.3774300E+00, &
     & 0.4028100E+00, 0.4377500E+00, 0.4459100E+00, 0.4754900E+00, &
     & 0.5167700E+00, 0.5200400E+00, 0.4696100E+00, 0.4696100E+00 /
      data (ref_adm(17,iz,32,15),iz = 1,20) / &
     & 0.2461700E+00, 0.2461700E+00, 0.2456200E+00, 0.2659300E+00, &
     & 0.2673800E+00, 0.2807600E+00, 0.2959300E+00, 0.2956000E+00, &
     & 0.3292500E+00, 0.3296400E+00, 0.3543600E+00, 0.3727200E+00, &
     & 0.3983100E+00, 0.4488900E+00, 0.4691400E+00, 0.5068900E+00, &
     & 0.5464800E+00, 0.5502600E+00, 0.4863200E+00, 0.4863200E+00 /
      data (ref_adm(17,iz,33,15),iz = 1,20) / &
     & 0.2592600E+00, 0.2592600E+00, 0.2536700E+00, 0.2578600E+00, &
     & 0.2727400E+00, 0.2932500E+00, 0.2932600E+00, 0.3013800E+00, &
     & 0.3143100E+00, 0.3313100E+00, 0.3500100E+00, 0.3732100E+00, &
     & 0.4003300E+00, 0.4389700E+00, 0.4685800E+00, 0.5000500E+00, &
     & 0.5317800E+00, 0.5596600E+00, 0.4843900E+00, 0.4843900E+00 /
      data (ref_adm(17,iz,34,15),iz = 1,20) / &
     & 0.2495000E+00, 0.2495000E+00, 0.2567600E+00, 0.2548200E+00, &
     & 0.2628800E+00, 0.2962800E+00, 0.3070900E+00, 0.3262500E+00, &
     & 0.3391600E+00, 0.3401200E+00, 0.3655700E+00, 0.3960000E+00, &
     & 0.4315100E+00, 0.4676800E+00, 0.4947000E+00, 0.5211500E+00, &
     & 0.5637200E+00, 0.5620400E+00, 0.4963700E+00, 0.4963700E+00 /
      data (ref_adm(17,iz,35,15),iz = 1,20) / &
     & 0.2684700E+00, 0.2684700E+00, 0.2784400E+00, 0.2563600E+00, &
     & 0.2809500E+00, 0.2933000E+00, 0.2951000E+00, 0.3101600E+00, &
     & 0.3437900E+00, 0.3560300E+00, 0.3675900E+00, 0.4119600E+00, &
     & 0.4372900E+00, 0.4704200E+00, 0.5159000E+00, 0.5540800E+00, &
     & 0.5829500E+00, 0.5832800E+00, 0.5156400E+00, 0.5156400E+00 /
      data (ref_adm(17,iz,36,15),iz = 1,20) / &
     & 0.2693700E+00, 0.2693700E+00, 0.2761400E+00, 0.2729000E+00, &
     & 0.2701400E+00, 0.2899700E+00, 0.2973300E+00, 0.3050100E+00, &
     & 0.3376400E+00, 0.3656800E+00, 0.3746000E+00, 0.4170000E+00, &
     & 0.4453000E+00, 0.4884600E+00, 0.5269500E+00, 0.5686000E+00, &
     & 0.6012100E+00, 0.6194700E+00, 0.5368100E+00, 0.5368100E+00 /
      data (ref_adm(17,iz,37,15),iz = 1,20) / &
     & 0.2555100E+00, 0.2555100E+00, 0.2642800E+00, 0.2678300E+00, &
     & 0.2655200E+00, 0.2840200E+00, 0.3260100E+00, 0.3255600E+00, &
     & 0.3378700E+00, 0.3665300E+00, 0.3719100E+00, 0.4058400E+00, &
     & 0.4372600E+00, 0.4977200E+00, 0.5282100E+00, 0.5977700E+00, &
     & 0.6204500E+00, 0.6353900E+00, 0.5521300E+00, 0.5521300E+00 /
      data (ref_adm(17,iz,38,15),iz = 1,20) / &
     & 0.2555100E+00, 0.2555100E+00, 0.2642800E+00, 0.2678300E+00, &
     & 0.2655200E+00, 0.2840200E+00, 0.3260100E+00, 0.3255600E+00, &
     & 0.3378700E+00, 0.3665300E+00, 0.3719100E+00, 0.4058400E+00, &
     & 0.4372600E+00, 0.4977200E+00, 0.5282100E+00, 0.5977700E+00, &
     & 0.6204500E+00, 0.6353900E+00, 0.5521300E+00, 0.5521300E+00 /
! Solar Zenith Angle 75.0 Albedo  0.3825191E+00
      data (ref_adm(17,iz, 1,16),iz = 1,20) / &
     & 0.2626500E+00, 0.2626500E+00, 0.2831600E+00, 0.2540100E+00, &
     & 0.2400400E+00, 0.2455600E+00, 0.2580800E+00, 0.2969000E+00, &
     & 0.3146500E+00, 0.3430400E+00, 0.4110600E+00, 0.4419200E+00, &
     & 0.5179400E+00, 0.6934200E+00, 0.1017626E+01, 0.1921352E+01, &
     & 0.2087191E+01, 0.2290051E+01, 0.5281222E+01, 0.5281222E+01 /
      data (ref_adm(17,iz, 2,16),iz = 1,20) / &
     & 0.2626500E+00, 0.2626500E+00, 0.2831600E+00, 0.2540100E+00, &
     & 0.2400400E+00, 0.2455600E+00, 0.2580800E+00, 0.2969000E+00, &
     & 0.3146500E+00, 0.3430400E+00, 0.4110600E+00, 0.4419200E+00, &
     & 0.5179400E+00, 0.6934200E+00, 0.1017626E+01, 0.1921352E+01, &
     & 0.2087191E+01, 0.2290051E+01, 0.5281222E+01, 0.5281222E+01 /
      data (ref_adm(17,iz, 3,16),iz = 1,20) / &
     & 0.2469800E+00, 0.2469800E+00, 0.2550200E+00, 0.2413700E+00, &
     & 0.2365900E+00, 0.2634200E+00, 0.2768900E+00, 0.2766100E+00, &
     & 0.3112000E+00, 0.3368300E+00, 0.3771700E+00, 0.4217100E+00, &
     & 0.4965000E+00, 0.7278600E+00, 0.9630971E+00, 0.1889153E+01, &
     & 0.2197804E+01, 0.2276151E+01, 0.3361915E+00, 0.3361915E+00 /
      data (ref_adm(17,iz, 4,16),iz = 1,20) / &
     & 0.2247300E+00, 0.2247300E+00, 0.2342900E+00, 0.2368900E+00, &
     & 0.2566300E+00, 0.2644000E+00, 0.2613200E+00, 0.2772700E+00, &
     & 0.3068800E+00, 0.3536500E+00, 0.3659800E+00, 0.4116300E+00, &
     & 0.4855300E+00, 0.5087900E+00, 0.8681067E+00, 0.1620400E+01, &
     & 0.2474163E+01, 0.2644269E+01, 0.3388471E+01, 0.3388471E+01 /
      data (ref_adm(17,iz, 5,16),iz = 1,20) / &
     & 0.2579400E+00, 0.2579400E+00, 0.2522200E+00, 0.2499800E+00, &
     & 0.2505000E+00, 0.2527300E+00, 0.2654400E+00, 0.2746900E+00, &
     & 0.3058800E+00, 0.3361500E+00, 0.3421500E+00, 0.4001500E+00, &
     & 0.4760700E+00, 0.5142300E+00, 0.7715128E+00, 0.1242338E+01, &
     & 0.2313570E+01, 0.3668606E+01, 0.4066858E+01, 0.4066858E+01 /
      data (ref_adm(17,iz, 6,16),iz = 1,20) / &
     & 0.2434700E+00, 0.2434700E+00, 0.2462900E+00, 0.2432800E+00, &
     & 0.2536000E+00, 0.2659300E+00, 0.2763300E+00, 0.2989300E+00, &
     & 0.3141900E+00, 0.3372000E+00, 0.3797100E+00, 0.4222100E+00, &
     & 0.4825800E+00, 0.5810400E+00, 0.6915000E+00, 0.8410900E+00, &
     & 0.9889100E+00, 0.1130900E+01, 0.5714978E+01, 0.5714978E+01 /
      data (ref_adm(17,iz, 7,16),iz = 1,20) / &
     & 0.2857600E+00, 0.2857600E+00, 0.2628600E+00, 0.2642700E+00, &
     & 0.2759100E+00, 0.2802000E+00, 0.2633900E+00, 0.2879100E+00, &
     & 0.2972700E+00, 0.3347600E+00, 0.3637100E+00, 0.3972500E+00, &
     & 0.4401800E+00, 0.5163700E+00, 0.6226400E+00, 0.7100800E+00, &
     & 0.8684400E+00, 0.1047900E+01, 0.9022700E+00, 0.9022700E+00 /
      data (ref_adm(17,iz, 8,16),iz = 1,20) / &
     & 0.2395700E+00, 0.2395700E+00, 0.2665300E+00, 0.2460700E+00, &
     & 0.2375300E+00, 0.2605200E+00, 0.2664600E+00, 0.2924800E+00, &
     & 0.2814500E+00, 0.3026400E+00, 0.3554500E+00, 0.3724500E+00, &
     & 0.4265600E+00, 0.4543800E+00, 0.6034300E+00, 0.7030100E+00, &
     & 0.8079100E+00, 0.9155900E+00, 0.7867400E+00, 0.7867400E+00 /
      data (ref_adm(17,iz, 9,16),iz = 1,20) / &
     & 0.2317500E+00, 0.2317500E+00, 0.2252400E+00, 0.2429400E+00, &
     & 0.2339200E+00, 0.2394000E+00, 0.2750400E+00, 0.2697200E+00, &
     & 0.2765400E+00, 0.2980100E+00, 0.3475600E+00, 0.3300000E+00, &
     & 0.4013700E+00, 0.4404300E+00, 0.5200800E+00, 0.6363800E+00, &
     & 0.7469500E+00, 0.7875600E+00, 0.2000437E+01, 0.2000437E+01 /
      data (ref_adm(17,iz,10,16),iz = 1,20) / &
     & 0.2488200E+00, 0.2488200E+00, 0.2508200E+00, 0.2451200E+00, &
     & 0.2461300E+00, 0.2656200E+00, 0.2779000E+00, 0.2665100E+00, &
     & 0.2564300E+00, 0.3101500E+00, 0.3375600E+00, 0.3465700E+00, &
     & 0.3732800E+00, 0.4248700E+00, 0.5100100E+00, 0.6206800E+00, &
     & 0.7210400E+00, 0.7171600E+00, 0.1819091E+01, 0.1819091E+01 /
      data (ref_adm(17,iz,11,16),iz = 1,20) / &
     & 0.2460000E+00, 0.2460000E+00, 0.2397700E+00, 0.2286700E+00, &
     & 0.2541400E+00, 0.2584400E+00, 0.2717900E+00, 0.2852000E+00, &
     & 0.2500300E+00, 0.2986800E+00, 0.3192200E+00, 0.3413400E+00, &
     & 0.3710200E+00, 0.4047200E+00, 0.4692900E+00, 0.5423600E+00, &
     & 0.6105900E+00, 0.6330000E+00, 0.6082200E+00, 0.6082200E+00 /
      data (ref_adm(17,iz,12,16),iz = 1,20) / &
     & 0.2398200E+00, 0.2398200E+00, 0.2453400E+00, 0.2286500E+00, &
     & 0.2509400E+00, 0.2422500E+00, 0.2417600E+00, 0.2607800E+00, &
     & 0.2794600E+00, 0.3045200E+00, 0.3079000E+00, 0.3301000E+00, &
     & 0.3601000E+00, 0.4012300E+00, 0.4205600E+00, 0.5341500E+00, &
     & 0.5713600E+00, 0.5730100E+00, 0.1533879E+01, 0.1533879E+01 /
      data (ref_adm(17,iz,13,16),iz = 1,20) / &
     & 0.2292300E+00, 0.2292300E+00, 0.2349800E+00, 0.2321800E+00, &
     & 0.2404800E+00, 0.2360700E+00, 0.2355700E+00, 0.2556200E+00, &
     & 0.2657600E+00, 0.3068800E+00, 0.2989800E+00, 0.3147000E+00, &
     & 0.3550600E+00, 0.3726200E+00, 0.4183800E+00, 0.4644600E+00, &
     & 0.5222500E+00, 0.5605700E+00, 0.1429435E+01, 0.1429435E+01 /
      data (ref_adm(17,iz,14,16),iz = 1,20) / &
     & 0.2389400E+00, 0.2389400E+00, 0.2510600E+00, 0.2722500E+00, &
     & 0.2613800E+00, 0.2718300E+00, 0.2573400E+00, 0.2629700E+00, &
     & 0.2764300E+00, 0.2896700E+00, 0.3369600E+00, 0.3227800E+00, &
     & 0.3417900E+00, 0.3787500E+00, 0.3918100E+00, 0.4416600E+00, &
     & 0.4806500E+00, 0.4890500E+00, 0.1358971E+01, 0.1358971E+01 /
      data (ref_adm(17,iz,15,16),iz = 1,20) / &
     & 0.2452500E+00, 0.2452500E+00, 0.2472000E+00, 0.2453600E+00, &
     & 0.2466800E+00, 0.2559800E+00, 0.2611200E+00, 0.2668700E+00, &
     & 0.2740000E+00, 0.2837600E+00, 0.2991500E+00, 0.3079200E+00, &
     & 0.3451700E+00, 0.3664200E+00, 0.3785800E+00, 0.4456900E+00, &
     & 0.4598300E+00, 0.5992300E+00, 0.1304796E+01, 0.1304796E+01 /
      data (ref_adm(17,iz,16,16),iz = 1,20) / &
     & 0.2463900E+00, 0.2463900E+00, 0.2337400E+00, 0.2330900E+00, &
     & 0.2358400E+00, 0.2412600E+00, 0.2380000E+00, 0.2414700E+00, &
     & 0.2537700E+00, 0.2606100E+00, 0.2634800E+00, 0.2828700E+00, &
     & 0.3004100E+00, 0.3320100E+00, 0.3899700E+00, 0.4240800E+00, &
     & 0.5172400E+00, 0.8455042E+00, 0.1258054E+01, 0.1258054E+01 /
      data (ref_adm(17,iz,17,16),iz = 1,20) / &
     & 0.2442400E+00, 0.2442400E+00, 0.2470600E+00, 0.2376500E+00, &
     & 0.2440700E+00, 0.2754800E+00, 0.2641400E+00, 0.2539300E+00, &
     & 0.3004100E+00, 0.2853400E+00, 0.3034300E+00, 0.2985600E+00, &
     & 0.3053400E+00, 0.3515300E+00, 0.3714900E+00, 0.4113700E+00, &
     & 0.5272900E+00, 0.8149204E+00, 0.1205210E+01, 0.1205210E+01 /
      data (ref_adm(17,iz,18,16),iz = 1,20) / &
     & 0.2414000E+00, 0.2414000E+00, 0.2361600E+00, 0.2535000E+00, &
     & 0.2594400E+00, 0.2635300E+00, 0.2542000E+00, 0.2547000E+00, &
     & 0.2874300E+00, 0.2976800E+00, 0.3014700E+00, 0.2955200E+00, &
     & 0.3322300E+00, 0.3460100E+00, 0.3669900E+00, 0.4158700E+00, &
     & 0.4651882E+00, 0.5373891E+00, 0.6094260E+00, 0.6094260E+00 /
      data (ref_adm(17,iz,19,16),iz = 1,20) / &
     & 0.2419600E+00, 0.2419600E+00, 0.2286100E+00, 0.2369400E+00, &
     & 0.2379500E+00, 0.2661900E+00, 0.2402700E+00, 0.2529800E+00, &
     & 0.2661800E+00, 0.2914900E+00, 0.3005200E+00, 0.3181500E+00, &
     & 0.3256300E+00, 0.3428200E+00, 0.3862100E+00, 0.4737700E+00, &
     & 0.4586376E+00, 0.5266057E+00, 0.5943109E+00, 0.5943109E+00 /
      data (ref_adm(17,iz,20,16),iz = 1,20) / &
     & 0.2430900E+00, 0.2430900E+00, 0.2587100E+00, 0.2551500E+00, &
     & 0.2585900E+00, 0.2637700E+00, 0.2439700E+00, 0.2612600E+00, &
     & 0.2616300E+00, 0.2770300E+00, 0.3134100E+00, 0.3108600E+00, &
     & 0.3194200E+00, 0.3363200E+00, 0.3518900E+00, 0.4103765E+00, &
     & 0.4547317E+00, 0.5201966E+00, 0.5855703E+00, 0.5855703E+00 /
      data (ref_adm(17,iz,21,16),iz = 1,20) / &
     & 0.2602500E+00, 0.2602500E+00, 0.2666700E+00, 0.2556100E+00, &
     & 0.2501600E+00, 0.2570400E+00, 0.2572800E+00, 0.2761600E+00, &
     & 0.2601200E+00, 0.2639700E+00, 0.3226000E+00, 0.3207100E+00, &
     & 0.3240800E+00, 0.3596600E+00, 0.3751000E+00, 0.4088169E+00, &
     & 0.4521697E+00, 0.5155083E+00, 0.5806298E+00, 0.5806298E+00 /
      data (ref_adm(17,iz,22,16),iz = 1,20) / &
     & 0.2409600E+00, 0.2409600E+00, 0.2691800E+00, 0.2451700E+00, &
     & 0.2629500E+00, 0.2699200E+00, 0.2699000E+00, 0.2612800E+00, &
     & 0.2914900E+00, 0.2788600E+00, 0.3299300E+00, 0.3279200E+00, &
     & 0.3263800E+00, 0.3593700E+00, 0.3666500E+00, 0.4117600E+00, &
     & 0.4526770E+00, 0.4913042E+00, 0.5152363E+00, 0.5152363E+00 /
      data (ref_adm(17,iz,23,16),iz = 1,20) / &
     & 0.2265700E+00, 0.2265700E+00, 0.2257100E+00, 0.2398800E+00, &
     & 0.2440600E+00, 0.2500000E+00, 0.2480800E+00, 0.2707400E+00, &
     & 0.2771900E+00, 0.2891500E+00, 0.3005600E+00, 0.3133600E+00, &
     & 0.3479000E+00, 0.3514700E+00, 0.3723600E+00, 0.3869100E+00, &
     & 0.4512428E+00, 0.4890918E+00, 0.5165343E+00, 0.5165343E+00 /
      data (ref_adm(17,iz,24,16),iz = 1,20) / &
     & 0.2421100E+00, 0.2421100E+00, 0.2409400E+00, 0.2431500E+00, &
     & 0.2589100E+00, 0.2650600E+00, 0.2622800E+00, 0.2735200E+00, &
     & 0.2854000E+00, 0.2855900E+00, 0.2986000E+00, 0.3071500E+00, &
     & 0.3275700E+00, 0.3539900E+00, 0.3791800E+00, 0.4091900E+00, &
     & 0.4419200E+00, 0.4898817E+00, 0.5218076E+00, 0.5218076E+00 /
      data (ref_adm(17,iz,25,16),iz = 1,20) / &
     & 0.2504300E+00, 0.2504300E+00, 0.2604000E+00, 0.2640300E+00, &
     & 0.2637200E+00, 0.2692400E+00, 0.2657100E+00, 0.2822500E+00, &
     & 0.2923100E+00, 0.3093300E+00, 0.3216900E+00, 0.3418000E+00, &
     & 0.3582500E+00, 0.3834800E+00, 0.4008200E+00, 0.4357300E+00, &
     & 0.5268300E+00, 0.5385300E+00, 0.5296480E+00, 0.5296480E+00 /
      data (ref_adm(17,iz,26,16),iz = 1,20) / &
     & 0.2583100E+00, 0.2583100E+00, 0.2490700E+00, 0.2723600E+00, &
     & 0.2659400E+00, 0.2743300E+00, 0.2635700E+00, 0.2844700E+00, &
     & 0.2791200E+00, 0.2992100E+00, 0.3115700E+00, 0.3423900E+00, &
     & 0.3833700E+00, 0.3825700E+00, 0.4164000E+00, 0.4614200E+00, &
     & 0.5111600E+00, 0.5261300E+00, 0.5428020E+00, 0.5428020E+00 /
      data (ref_adm(17,iz,27,16),iz = 1,20) / &
     & 0.2516500E+00, 0.2516500E+00, 0.2571600E+00, 0.2369600E+00, &
     & 0.2523600E+00, 0.2730300E+00, 0.2852000E+00, 0.2903500E+00, &
     & 0.3108900E+00, 0.3251600E+00, 0.3171400E+00, 0.3401400E+00, &
     & 0.3629000E+00, 0.3916700E+00, 0.4311300E+00, 0.4858100E+00, &
     & 0.4821600E+00, 0.5614100E+00, 0.5809600E+00, 0.5809600E+00 /
      data (ref_adm(17,iz,28,16),iz = 1,20) / &
     & 0.2519000E+00, 0.2519000E+00, 0.2417900E+00, 0.2667500E+00, &
     & 0.2439300E+00, 0.2784400E+00, 0.2844300E+00, 0.2927500E+00, &
     & 0.2804100E+00, 0.3310100E+00, 0.3302700E+00, 0.3535600E+00, &
     & 0.3528000E+00, 0.3944800E+00, 0.4226000E+00, 0.4855500E+00, &
     & 0.5278900E+00, 0.5841300E+00, 0.5653100E+00, 0.5653100E+00 /
      data (ref_adm(17,iz,29,16),iz = 1,20) / &
     & 0.2579400E+00, 0.2579400E+00, 0.2675500E+00, 0.2546200E+00, &
     & 0.2541000E+00, 0.2722900E+00, 0.2682000E+00, 0.2953500E+00, &
     & 0.3055800E+00, 0.3140400E+00, 0.3446700E+00, 0.3654200E+00, &
     & 0.3735000E+00, 0.4131700E+00, 0.4457000E+00, 0.4913300E+00, &
     & 0.5299600E+00, 0.5950200E+00, 0.5697300E+00, 0.5697300E+00 /
      data (ref_adm(17,iz,30,16),iz = 1,20) / &
     & 0.2507400E+00, 0.2507400E+00, 0.2619100E+00, 0.2699300E+00, &
     & 0.2567800E+00, 0.2845400E+00, 0.2810400E+00, 0.3004500E+00, &
     & 0.3199100E+00, 0.3357700E+00, 0.3514300E+00, 0.3711300E+00, &
     & 0.3769200E+00, 0.4170300E+00, 0.4674300E+00, 0.5051000E+00, &
     & 0.5557600E+00, 0.6124500E+00, 0.5602600E+00, 0.5602600E+00 /
      data (ref_adm(17,iz,31,16),iz = 1,20) / &
     & 0.2461400E+00, 0.2461400E+00, 0.2683800E+00, 0.2557000E+00, &
     & 0.2620400E+00, 0.2728300E+00, 0.2888800E+00, 0.2996100E+00, &
     & 0.3109300E+00, 0.3432100E+00, 0.3506400E+00, 0.4050400E+00, &
     & 0.3897200E+00, 0.4526400E+00, 0.4845500E+00, 0.5411400E+00, &
     & 0.6151000E+00, 0.6151700E+00, 0.5666000E+00, 0.5666000E+00 /
      data (ref_adm(17,iz,32,16),iz = 1,20) / &
     & 0.2457900E+00, 0.2457900E+00, 0.2765600E+00, 0.2521400E+00, &
     & 0.2706600E+00, 0.2906700E+00, 0.3010400E+00, 0.2949000E+00, &
     & 0.3333200E+00, 0.3402300E+00, 0.3669800E+00, 0.3968900E+00, &
     & 0.4218600E+00, 0.4467700E+00, 0.4905900E+00, 0.5522500E+00, &
     & 0.6170700E+00, 0.6564000E+00, 0.6005300E+00, 0.6005300E+00 /
      data (ref_adm(17,iz,33,16),iz = 1,20) / &
     & 0.2569100E+00, 0.2569100E+00, 0.2560600E+00, 0.2556000E+00, &
     & 0.2828200E+00, 0.2911900E+00, 0.2966700E+00, 0.2979900E+00, &
     & 0.3132500E+00, 0.3469100E+00, 0.3736500E+00, 0.4061800E+00, &
     & 0.4333200E+00, 0.4723300E+00, 0.5155100E+00, 0.5716100E+00, &
     & 0.6187300E+00, 0.6747800E+00, 0.5885300E+00, 0.5885300E+00 /
      data (ref_adm(17,iz,34,16),iz = 1,20) / &
     & 0.2530800E+00, 0.2530800E+00, 0.2605100E+00, 0.2669000E+00, &
     & 0.2770200E+00, 0.2823100E+00, 0.2995100E+00, 0.3090700E+00, &
     & 0.3257700E+00, 0.3468800E+00, 0.3636900E+00, 0.3877600E+00, &
     & 0.4319900E+00, 0.4702800E+00, 0.5110600E+00, 0.5611100E+00, &
     & 0.6787900E+00, 0.7102700E+00, 0.6262400E+00, 0.6262400E+00 /
      data (ref_adm(17,iz,35,16),iz = 1,20) / &
     & 0.2551200E+00, 0.2551200E+00, 0.2519800E+00, 0.2781100E+00, &
     & 0.2598700E+00, 0.2793100E+00, 0.3184800E+00, 0.3188000E+00, &
     & 0.3345400E+00, 0.3332400E+00, 0.3928000E+00, 0.3990900E+00, &
     & 0.4275000E+00, 0.4835900E+00, 0.5251500E+00, 0.5936000E+00, &
     & 0.6595900E+00, 0.7167000E+00, 0.6163900E+00, 0.6163900E+00 /
      data (ref_adm(17,iz,36,16),iz = 1,20) / &
     & 0.2372500E+00, 0.2372500E+00, 0.2537600E+00, 0.2743300E+00, &
     & 0.2760400E+00, 0.2780600E+00, 0.3100100E+00, 0.3188100E+00, &
     & 0.3384000E+00, 0.3543100E+00, 0.3697400E+00, 0.4092000E+00, &
     & 0.4361300E+00, 0.4942200E+00, 0.5257100E+00, 0.6154000E+00, &
     & 0.6860400E+00, 0.7403600E+00, 0.6200900E+00, 0.6200900E+00 /
      data (ref_adm(17,iz,37,16),iz = 1,20) / &
     & 0.2772700E+00, 0.2772700E+00, 0.2740600E+00, 0.2719200E+00, &
     & 0.2822400E+00, 0.2933700E+00, 0.3144000E+00, 0.3335100E+00, &
     & 0.3458200E+00, 0.3600400E+00, 0.3804500E+00, 0.4227500E+00, &
     & 0.4303900E+00, 0.5002600E+00, 0.5448300E+00, 0.6350900E+00, &
     & 0.7272500E+00, 0.7489200E+00, 0.6641300E+00, 0.6641300E+00 /
      data (ref_adm(17,iz,38,16),iz = 1,20) / &
     & 0.2772700E+00, 0.2772700E+00, 0.2740600E+00, 0.2719200E+00, &
     & 0.2822400E+00, 0.2933700E+00, 0.3144000E+00, 0.3335100E+00, &
     & 0.3458200E+00, 0.3600400E+00, 0.3804500E+00, 0.4227500E+00, &
     & 0.4303900E+00, 0.5002600E+00, 0.5448300E+00, 0.6350900E+00, &
     & 0.7272500E+00, 0.7489200E+00, 0.6641300E+00, 0.6641300E+00 /
! Solar Zenith Angle 80.0 Albedo  0.4029543E+00
      data (ref_adm(17,iz, 1,17),iz = 1,20) / &
     & 0.2367000E+00, 0.2367000E+00, 0.2632000E+00, 0.2500000E+00, &
     & 0.2550100E+00, 0.2683600E+00, 0.2563500E+00, 0.2709200E+00, &
     & 0.3719300E+00, 0.3852100E+00, 0.4313300E+00, 0.5128700E+00, &
     & 0.5633954E+00, 0.7468081E+00, 0.1267846E+01, 0.2487077E+01, &
     & 0.1708824E+01, 0.2645062E+01, 0.7179966E+01, 0.7179966E+01 /
      data (ref_adm(17,iz, 2,17),iz = 1,20) / &
     & 0.2367000E+00, 0.2367000E+00, 0.2632000E+00, 0.2500000E+00, &
     & 0.2550100E+00, 0.2683600E+00, 0.2563500E+00, 0.2709200E+00, &
     & 0.3719300E+00, 0.3852100E+00, 0.4313300E+00, 0.5128700E+00, &
     & 0.5633954E+00, 0.7468081E+00, 0.1267846E+01, 0.2487077E+01, &
     & 0.1708824E+01, 0.2645062E+01, 0.7179966E+01, 0.7179966E+01 /
      data (ref_adm(17,iz, 3,17),iz = 1,20) / &
     & 0.2808600E+00, 0.2808600E+00, 0.2816200E+00, 0.2651000E+00, &
     & 0.2489700E+00, 0.2527600E+00, 0.2998300E+00, 0.3439000E+00, &
     & 0.3073500E+00, 0.3928700E+00, 0.4333900E+00, 0.4744400E+00, &
     & 0.5532585E+00, 0.7242687E+00, 0.1182478E+01, 0.2503701E+01, &
     & 0.1928001E+01, 0.2459026E+01, 0.8289086E+00, 0.8289086E+00 /
      data (ref_adm(17,iz, 4,17),iz = 1,20) / &
     & 0.2394900E+00, 0.2394900E+00, 0.2662700E+00, 0.2675500E+00, &
     & 0.2710600E+00, 0.2697700E+00, 0.2789000E+00, 0.3293600E+00, &
     & 0.3432100E+00, 0.3750000E+00, 0.4349600E+00, 0.4552800E+00, &
     & 0.5348039E+00, 0.6830823E+00, 0.1034826E+01, 0.2121684E+01, &
     & 0.2861098E+01, 0.2423525E+01, 0.4006287E+01, 0.4006287E+01 /
      data (ref_adm(17,iz, 5,17),iz = 1,20) / &
     & 0.2183400E+00, 0.2183400E+00, 0.2591700E+00, 0.2666200E+00, &
     & 0.2295600E+00, 0.2948300E+00, 0.2910200E+00, 0.2997400E+00, &
     & 0.3445900E+00, 0.3765200E+00, 0.4068800E+00, 0.4562200E+00, &
     & 0.5152053E+00, 0.6325585E+00, 0.8916892E+00, 0.1532064E+01, &
     & 0.3033976E+01, 0.3901969E+01, 0.4029338E+01, 0.4029338E+01 /
      data (ref_adm(17,iz, 6,17),iz = 1,20) / &
     & 0.2331800E+00, 0.2331800E+00, 0.2422900E+00, 0.2362500E+00, &
     & 0.2697400E+00, 0.2810300E+00, 0.3018900E+00, 0.3089300E+00, &
     & 0.3468700E+00, 0.3599400E+00, 0.3979100E+00, 0.4613700E+00, &
     & 0.5176600E+00, 0.5893700E+00, 0.7669200E+00, 0.9220900E+00, &
     & 0.1135100E+01, 0.1351100E+01, 0.6834036E+01, 0.6834036E+01 /
      data (ref_adm(17,iz, 7,17),iz = 1,20) / &
     & 0.2440500E+00, 0.2440500E+00, 0.2317700E+00, 0.2607900E+00, &
     & 0.2482700E+00, 0.2608400E+00, 0.2748500E+00, 0.2738300E+00, &
     & 0.3000100E+00, 0.3293200E+00, 0.3668900E+00, 0.3957700E+00, &
     & 0.5514100E+00, 0.6334200E+00, 0.6838200E+00, 0.9886100E+00, &
     & 0.1238300E+01, 0.1297200E+01, 0.1214800E+01, 0.1214800E+01 /
      data (ref_adm(17,iz, 8,17),iz = 1,20) / &
     & 0.2358800E+00, 0.2358800E+00, 0.2209300E+00, 0.2206100E+00, &
     & 0.2464300E+00, 0.2722800E+00, 0.2703700E+00, 0.2703700E+00, &
     & 0.3104600E+00, 0.3427100E+00, 0.3915500E+00, 0.4582000E+00, &
     & 0.5385500E+00, 0.5616300E+00, 0.7099900E+00, 0.8723500E+00, &
     & 0.1135500E+01, 0.1202000E+01, 0.1297500E+01, 0.1297500E+01 /
      data (ref_adm(17,iz, 9,17),iz = 1,20) / &
     & 0.2428300E+00, 0.2428300E+00, 0.2473900E+00, 0.2473800E+00, &
     & 0.2557200E+00, 0.2488600E+00, 0.2485400E+00, 0.2697300E+00, &
     & 0.3399800E+00, 0.3210900E+00, 0.3754300E+00, 0.3918800E+00, &
     & 0.4987900E+00, 0.5289900E+00, 0.6675900E+00, 0.7616000E+00, &
     & 0.9666700E+00, 0.1095700E+01, 0.1153500E+01, 0.1153500E+01 /
      data (ref_adm(17,iz,10,17),iz = 1,20) / &
     & 0.2387100E+00, 0.2387100E+00, 0.2642200E+00, 0.2526500E+00, &
     & 0.2540900E+00, 0.2478700E+00, 0.2819600E+00, 0.2835200E+00, &
     & 0.3005300E+00, 0.3234100E+00, 0.3375200E+00, 0.3284500E+00, &
     & 0.4352300E+00, 0.4438100E+00, 0.6041600E+00, 0.7050800E+00, &
     & 0.8636300E+00, 0.9589000E+00, 0.9088200E+00, 0.9088200E+00 /
      data (ref_adm(17,iz,11,17),iz = 1,20) / &
     & 0.2218500E+00, 0.2218500E+00, 0.2713500E+00, 0.2674200E+00, &
     & 0.2598500E+00, 0.2524100E+00, 0.2337100E+00, 0.2876000E+00, &
     & 0.3095500E+00, 0.3094100E+00, 0.3702800E+00, 0.3599000E+00, &
     & 0.3996000E+00, 0.4671800E+00, 0.5725600E+00, 0.6241100E+00, &
     & 0.7519800E+00, 0.8512200E+00, 0.7995100E+00, 0.7995100E+00 /
      data (ref_adm(17,iz,12,17),iz = 1,20) / &
     & 0.2540700E+00, 0.2540700E+00, 0.2194100E+00, 0.2438600E+00, &
     & 0.2406900E+00, 0.2479100E+00, 0.2944700E+00, 0.2819400E+00, &
     & 0.2968600E+00, 0.2902500E+00, 0.3367200E+00, 0.3631300E+00, &
     & 0.3638200E+00, 0.3976400E+00, 0.5375100E+00, 0.5674300E+00, &
     & 0.6708400E+00, 0.6632200E+00, 0.1807166E+01, 0.1807166E+01 /
      data (ref_adm(17,iz,13,17),iz = 1,20) / &
     & 0.2536700E+00, 0.2536700E+00, 0.2329600E+00, 0.2106300E+00, &
     & 0.2706600E+00, 0.2717100E+00, 0.2585500E+00, 0.2803400E+00, &
     & 0.2584900E+00, 0.2931800E+00, 0.3524000E+00, 0.3824600E+00, &
     & 0.3607300E+00, 0.3515600E+00, 0.4557900E+00, 0.5537800E+00, &
     & 0.6188400E+00, 0.7649700E+00, 0.1679631E+01, 0.1679631E+01 /
      data (ref_adm(17,iz,14,17),iz = 1,20) / &
     & 0.2142200E+00, 0.2142200E+00, 0.2677300E+00, 0.2402400E+00, &
     & 0.2553200E+00, 0.2524800E+00, 0.2657100E+00, 0.2791600E+00, &
     & 0.2831900E+00, 0.3261400E+00, 0.2935200E+00, 0.3023600E+00, &
     & 0.3359100E+00, 0.3641300E+00, 0.4753600E+00, 0.4896600E+00, &
     & 0.6120800E+00, 0.9777036E+00, 0.1593382E+01, 0.1593382E+01 /
      data (ref_adm(17,iz,15,17),iz = 1,20) / &
     & 0.2402000E+00, 0.2402000E+00, 0.2426000E+00, 0.2483300E+00, &
     & 0.2536700E+00, 0.2517900E+00, 0.2588600E+00, 0.2640200E+00, &
     & 0.2916000E+00, 0.2895000E+00, 0.2969000E+00, 0.3121800E+00, &
     & 0.3325900E+00, 0.3520100E+00, 0.4310800E+00, 0.5076200E+00, &
     & 0.5634800E+00, 0.9445861E+00, 0.1527247E+01, 0.1527247E+01 /
      data (ref_adm(17,iz,16,17),iz = 1,20) / &
     & 0.2420800E+00, 0.2420800E+00, 0.2199500E+00, 0.2170600E+00, &
     & 0.2235800E+00, 0.2300100E+00, 0.2340700E+00, 0.2430700E+00, &
     & 0.2537300E+00, 0.2694100E+00, 0.2704200E+00, 0.2844400E+00, &
     & 0.2924800E+00, 0.3277700E+00, 0.3924500E+00, 0.4632000E+00, &
     & 0.4281900E+00, 0.9153633E+00, 0.1470271E+01, 0.1470271E+01 /
      data (ref_adm(17,iz,17,17),iz = 1,20) / &
     & 0.2542200E+00, 0.2542200E+00, 0.2402700E+00, 0.2363300E+00, &
     & 0.2706800E+00, 0.2403300E+00, 0.2705400E+00, 0.2724800E+00, &
     & 0.3104700E+00, 0.3206000E+00, 0.2996100E+00, 0.3015500E+00, &
     & 0.3257000E+00, 0.3205300E+00, 0.3771900E+00, 0.3696600E+00, &
     & 0.6533696E+00, 0.8802688E+00, 0.1407172E+01, 0.1407172E+01 /
      data (ref_adm(17,iz,18,17),iz = 1,20) / &
     & 0.2556000E+00, 0.2556000E+00, 0.2707700E+00, 0.2445500E+00, &
     & 0.2372500E+00, 0.2569500E+00, 0.2296300E+00, 0.2830100E+00, &
     & 0.2693400E+00, 0.2709400E+00, 0.2796600E+00, 0.3055500E+00, &
     & 0.2914300E+00, 0.3401000E+00, 0.4008600E+00, 0.4102000E+00, &
     & 0.4835483E+00, 0.5676544E+00, 0.6606889E+00, 0.6606889E+00 /
      data (ref_adm(17,iz,19,17),iz = 1,20) / &
     & 0.2420500E+00, 0.2420500E+00, 0.2689400E+00, 0.2554800E+00, &
     & 0.2392200E+00, 0.2549000E+00, 0.2432600E+00, 0.2835800E+00, &
     & 0.2786200E+00, 0.3120500E+00, 0.3237200E+00, 0.2965500E+00, &
     & 0.3110300E+00, 0.3439400E+00, 0.3604900E+00, 0.4136500E+00, &
     & 0.4759551E+00, 0.5554626E+00, 0.6437088E+00, 0.6437088E+00 /
      data (ref_adm(17,iz,20,17),iz = 1,20) / &
     & 0.2580600E+00, 0.2580600E+00, 0.2539700E+00, 0.2615700E+00, &
     & 0.2204400E+00, 0.2534000E+00, 0.2681700E+00, 0.2609700E+00, &
     & 0.2873700E+00, 0.2893100E+00, 0.3205000E+00, 0.2915800E+00, &
     & 0.3180100E+00, 0.3383700E+00, 0.3887000E+00, 0.4210692E+00, &
     & 0.4714149E+00, 0.5481154E+00, 0.6338063E+00, 0.6338063E+00 /
      data (ref_adm(17,iz,21,17),iz = 1,20) / &
     & 0.2458500E+00, 0.2458500E+00, 0.2613700E+00, 0.2576700E+00, &
     & 0.2767600E+00, 0.2691800E+00, 0.2678800E+00, 0.2625900E+00, &
     & 0.2818700E+00, 0.2666900E+00, 0.3133200E+00, 0.3245600E+00, &
     & 0.3140100E+00, 0.3335000E+00, 0.3583100E+00, 0.4189950E+00, &
     & 0.4683761E+00, 0.5427351E+00, 0.6282711E+00, 0.6282711E+00 /
      data (ref_adm(17,iz,22,17),iz = 1,20) / &
     & 0.2395400E+00, 0.2395400E+00, 0.2571000E+00, 0.2851200E+00, &
     & 0.2750600E+00, 0.2573800E+00, 0.2682400E+00, 0.2446600E+00, &
     & 0.3013900E+00, 0.2775200E+00, 0.2785800E+00, 0.3142700E+00, &
     & 0.3099500E+00, 0.3299800E+00, 0.3329900E+00, 0.3620000E+00, &
     & 0.4892928E+00, 0.5508149E+00, 0.6148332E+00, 0.6148332E+00 /
      data (ref_adm(17,iz,23,17),iz = 1,20) / &
     & 0.2138700E+00, 0.2138700E+00, 0.2254000E+00, 0.2326100E+00, &
     & 0.2248000E+00, 0.2247500E+00, 0.2336100E+00, 0.2494200E+00, &
     & 0.2451200E+00, 0.2681200E+00, 0.2845500E+00, 0.2699900E+00, &
     & 0.3148800E+00, 0.3691100E+00, 0.3553900E+00, 0.3857100E+00, &
     & 0.4872964E+00, 0.5478843E+00, 0.6167194E+00, 0.6167194E+00 /
      data (ref_adm(17,iz,24,17),iz = 1,20) / &
     & 0.2400700E+00, 0.2400700E+00, 0.2423800E+00, 0.2421000E+00, &
     & 0.2454900E+00, 0.2511600E+00, 0.2602300E+00, 0.2632100E+00, &
     & 0.2727900E+00, 0.2949200E+00, 0.3016900E+00, 0.3143700E+00, &
     & 0.3411700E+00, 0.3705800E+00, 0.3852600E+00, 0.4421100E+00, &
     & 0.4845400E+00, 0.5491050E+00, 0.6241918E+00, 0.6241918E+00 /
      data (ref_adm(17,iz,25,17),iz = 1,20) / &
     & 0.2577000E+00, 0.2577000E+00, 0.2582800E+00, 0.2497700E+00, &
     & 0.2681900E+00, 0.2759400E+00, 0.2758900E+00, 0.2903100E+00, &
     & 0.2896800E+00, 0.3069100E+00, 0.3039200E+00, 0.3434800E+00, &
     & 0.3626100E+00, 0.3820700E+00, 0.4086200E+00, 0.4501700E+00, &
     & 0.5306400E+00, 0.5529820E+00, 0.6350779E+00, 0.6350779E+00 /
      data (ref_adm(17,iz,26,17),iz = 1,20) / &
     & 0.2636200E+00, 0.2636200E+00, 0.2751700E+00, 0.2431800E+00, &
     & 0.2716500E+00, 0.2334100E+00, 0.2505500E+00, 0.2672300E+00, &
     & 0.2676600E+00, 0.2723500E+00, 0.2982300E+00, 0.3238700E+00, &
     & 0.3607900E+00, 0.3764500E+00, 0.4196400E+00, 0.4738200E+00, &
     & 0.5460500E+00, 0.5851200E+00, 0.6529602E+00, 0.6529602E+00 /
      data (ref_adm(17,iz,27,17),iz = 1,20) / &
     & 0.2526700E+00, 0.2526700E+00, 0.2505600E+00, 0.2586200E+00, &
     & 0.2416900E+00, 0.2443000E+00, 0.2568900E+00, 0.2602100E+00, &
     & 0.3093100E+00, 0.2779000E+00, 0.2953500E+00, 0.3401300E+00, &
     & 0.3475000E+00, 0.3980500E+00, 0.4316400E+00, 0.4989900E+00, &
     & 0.5742300E+00, 0.6377300E+00, 0.6753787E+00, 0.6753787E+00 /
      data (ref_adm(17,iz,28,17),iz = 1,20) / &
     & 0.2417200E+00, 0.2417200E+00, 0.2674600E+00, 0.2387200E+00, &
     & 0.2536000E+00, 0.2640700E+00, 0.2753500E+00, 0.3058900E+00, &
     & 0.2983100E+00, 0.3242500E+00, 0.3551600E+00, 0.3805700E+00, &
     & 0.3524800E+00, 0.4009500E+00, 0.4661900E+00, 0.4658400E+00, &
     & 0.5720400E+00, 0.6483300E+00, 0.6564300E+00, 0.6564300E+00 /
      data (ref_adm(17,iz,29,17),iz = 1,20) / &
     & 0.2347600E+00, 0.2347600E+00, 0.2324600E+00, 0.2353700E+00, &
     & 0.2358500E+00, 0.2899000E+00, 0.2636500E+00, 0.2628200E+00, &
     & 0.2711000E+00, 0.3227400E+00, 0.3328000E+00, 0.3590800E+00, &
     & 0.3890600E+00, 0.4122600E+00, 0.4864700E+00, 0.5407700E+00, &
     & 0.5955100E+00, 0.7143200E+00, 0.7335400E+00, 0.7335400E+00 /
      data (ref_adm(17,iz,30,17),iz = 1,20) / &
     & 0.2446500E+00, 0.2446500E+00, 0.2692600E+00, 0.2606300E+00, &
     & 0.2378200E+00, 0.2575400E+00, 0.3139500E+00, 0.3004000E+00, &
     & 0.2992300E+00, 0.3148700E+00, 0.3232900E+00, 0.3601500E+00, &
     & 0.4182000E+00, 0.4605600E+00, 0.5107000E+00, 0.5462700E+00, &
     & 0.6242400E+00, 0.7396300E+00, 0.7755400E+00, 0.7755400E+00 /
      data (ref_adm(17,iz,31,17),iz = 1,20) / &
     & 0.2384300E+00, 0.2384300E+00, 0.2451300E+00, 0.2460600E+00, &
     & 0.2456400E+00, 0.2569800E+00, 0.2787800E+00, 0.3235600E+00, &
     & 0.3233300E+00, 0.3133700E+00, 0.3266000E+00, 0.3585600E+00, &
     & 0.3991000E+00, 0.4604100E+00, 0.5157600E+00, 0.5917500E+00, &
     & 0.6618000E+00, 0.7734600E+00, 0.7654100E+00, 0.7654100E+00 /
      data (ref_adm(17,iz,32,17),iz = 1,20) / &
     & 0.2308200E+00, 0.2308200E+00, 0.2416500E+00, 0.2423300E+00, &
     & 0.2249400E+00, 0.2307300E+00, 0.2422300E+00, 0.2747300E+00, &
     & 0.2857900E+00, 0.3122700E+00, 0.3483900E+00, 0.3525700E+00, &
     & 0.4197800E+00, 0.4546400E+00, 0.5106100E+00, 0.5592300E+00, &
     & 0.7393500E+00, 0.8253700E+00, 0.8235800E+00, 0.8235800E+00 /
      data (ref_adm(17,iz,33,17),iz = 1,20) / &
     & 0.2581900E+00, 0.2581900E+00, 0.2592400E+00, 0.2568200E+00, &
     & 0.2604200E+00, 0.2694100E+00, 0.2807600E+00, 0.3112000E+00, &
     & 0.3375000E+00, 0.3459000E+00, 0.3764500E+00, 0.3987200E+00, &
     & 0.4492100E+00, 0.4891700E+00, 0.5359400E+00, 0.6446000E+00, &
     & 0.7342700E+00, 0.8238300E+00, 0.7947600E+00, 0.7947600E+00 /
      data (ref_adm(17,iz,34,17),iz = 1,20) / &
     & 0.2299600E+00, 0.2299600E+00, 0.2477000E+00, 0.2267200E+00, &
     & 0.2242600E+00, 0.2414100E+00, 0.2785600E+00, 0.2924000E+00, &
     & 0.3149200E+00, 0.3448100E+00, 0.3709500E+00, 0.3816400E+00, &
     & 0.4280100E+00, 0.4579300E+00, 0.5295700E+00, 0.6146100E+00, &
     & 0.7219700E+00, 0.8554100E+00, 0.8663900E+00, 0.8663900E+00 /
      data (ref_adm(17,iz,35,17),iz = 1,20) / &
     & 0.2533600E+00, 0.2533600E+00, 0.2516900E+00, 0.2258800E+00, &
     & 0.2872300E+00, 0.2751100E+00, 0.2850500E+00, 0.3025400E+00, &
     & 0.3295300E+00, 0.3459500E+00, 0.3403200E+00, 0.3975100E+00, &
     & 0.4161800E+00, 0.4975800E+00, 0.5705000E+00, 0.6502500E+00, &
     & 0.7347200E+00, 0.8829300E+00, 0.8443700E+00, 0.8443700E+00 /
      data (ref_adm(17,iz,36,17),iz = 1,20) / &
     & 0.2425200E+00, 0.2425200E+00, 0.2796300E+00, 0.2559700E+00, &
     & 0.2661900E+00, 0.2424700E+00, 0.2940400E+00, 0.3018900E+00, &
     & 0.3346200E+00, 0.3611900E+00, 0.3636700E+00, 0.4137100E+00, &
     & 0.4570400E+00, 0.4794600E+00, 0.5606400E+00, 0.6366000E+00, &
     & 0.7496400E+00, 0.8753200E+00, 0.8454800E+00, 0.8454800E+00 /
      data (ref_adm(17,iz,37,17),iz = 1,20) / &
     & 0.2320400E+00, 0.2320400E+00, 0.2334200E+00, 0.2571000E+00, &
     & 0.2592100E+00, 0.2824300E+00, 0.2891600E+00, 0.3123500E+00, &
     & 0.3210800E+00, 0.3513100E+00, 0.3939200E+00, 0.4498600E+00, &
     & 0.4414000E+00, 0.5056400E+00, 0.5687000E+00, 0.6358400E+00, &
     & 0.7873500E+00, 0.9237100E+00, 0.9043800E+00, 0.9043800E+00 /
      data (ref_adm(17,iz,38,17),iz = 1,20) / &
     & 0.2320400E+00, 0.2320400E+00, 0.2334200E+00, 0.2571000E+00, &
     & 0.2592100E+00, 0.2824300E+00, 0.2891600E+00, 0.3123500E+00, &
     & 0.3210800E+00, 0.3513100E+00, 0.3939200E+00, 0.4498600E+00, &
     & 0.4414000E+00, 0.5056400E+00, 0.5687000E+00, 0.6358400E+00, &
     & 0.7873500E+00, 0.9237100E+00, 0.9043800E+00, 0.9043800E+00 /
! Solar Zenith Angle 85.0 Albedo  0.5476419E+00
      data (ref_adm(17,iz, 1,18),iz = 1,20) / &
     & 0.2453600E+00, 0.2453600E+00, 0.2130400E+00, 0.2146400E+00, &
     & 0.3451600E+00, 0.3238810E+00, 0.4495200E+00, 0.4401100E+00, &
     & 0.4263600E+00, 0.4570003E+00, 0.5458862E+00, 0.7338000E+00, &
     & 0.8728802E+00, 0.1234576E+01, 0.2268499E+01, 0.4602875E+01, &
     & 0.3032035E+01, 0.4492196E+01, 0.9217184E+01, 0.9217184E+01 /
      data (ref_adm(17,iz, 2,18),iz = 1,20) / &
     & 0.2453600E+00, 0.2453600E+00, 0.2130400E+00, 0.2146400E+00, &
     & 0.3451600E+00, 0.3238810E+00, 0.4495200E+00, 0.4401100E+00, &
     & 0.4263600E+00, 0.4570003E+00, 0.5458862E+00, 0.7338000E+00, &
     & 0.8728802E+00, 0.1234576E+01, 0.2268499E+01, 0.4602875E+01, &
     & 0.3032035E+01, 0.4492196E+01, 0.9217184E+01, 0.9217184E+01 /
      data (ref_adm(17,iz, 3,18),iz = 1,20) / &
     & 0.2099100E+00, 0.2099100E+00, 0.2736229E+00, 0.2872913E+00, &
     & 0.3038405E+00, 0.2315900E+00, 0.3875800E+00, 0.5508200E+00, &
     & 0.4025848E+00, 0.4223300E+00, 0.6595100E+00, 0.6506653E+00, &
     & 0.8514477E+00, 0.1187387E+01, 0.2093806E+01, 0.4633000E+01, &
     & 0.3410066E+01, 0.4106336E+01, 0.9824911E+00, 0.9824911E+00 /
      data (ref_adm(17,iz, 4,18),iz = 1,20) / &
     & 0.3180500E+00, 0.3180500E+00, 0.2794600E+00, 0.3401500E+00, &
     & 0.3203700E+00, 0.3031700E+00, 0.3045400E+00, 0.3659503E+00, &
     & 0.3676500E+00, 0.4360500E+00, 0.4936500E+00, 0.7230300E+00, &
     & 0.8122759E+00, 0.1101232E+01, 0.1790302E+01, 0.3888324E+01, &
     & 0.5119588E+01, 0.3950636E+01, 0.5065640E+01, 0.5065640E+01 /
      data (ref_adm(17,iz, 5,18),iz = 1,20) / &
     & 0.2540700E+00, 0.2540700E+00, 0.2731617E+00, 0.3907500E+00, &
     & 0.3022594E+00, 0.3223934E+00, 0.2830300E+00, 0.3478500E+00, &
     & 0.4693300E+00, 0.4309500E+00, 0.5138044E+00, 0.7388700E+00, &
     & 0.7706087E+00, 0.9952928E+00, 0.1494657E+01, 0.2711779E+01, &
     & 0.5449671E+01, 0.6431607E+01, 0.5067506E+01, 0.5067506E+01 /
      data (ref_adm(17,iz, 6,18),iz = 1,20) / &
     & 0.2636900E+00, 0.2636900E+00, 0.2456100E+00, 0.2776700E+00, &
     & 0.3271800E+00, 0.2744200E+00, 0.3309800E+00, 0.4265200E+00, &
     & 0.4602400E+00, 0.5774600E+00, 0.5696500E+00, 0.7265300E+00, &
     & 0.7364790E+00, 0.8956969E+00, 0.1255642E+01, 0.1981042E+01, &
     & 0.2471200E+01, 0.6638883E+01, 0.8829240E+01, 0.8829240E+01 /
      data (ref_adm(17,iz, 7,18),iz = 1,20) / &
     & 0.2618952E+00, 0.2618952E+00, 0.2721266E+00, 0.2843759E+00, &
     & 0.2995800E+00, 0.3185940E+00, 0.3384712E+00, 0.3612800E+00, &
     & 0.3939800E+00, 0.3996700E+00, 0.3985600E+00, 0.6090700E+00, &
     & 0.7201906E+00, 0.8291116E+00, 0.1070173E+01, 0.1570000E+01, &
     & 0.2246274E+01, 0.3714505E+01, 0.5425534E+01, 0.5425534E+01 /
      data (ref_adm(17,iz, 8,18),iz = 1,20) / &
     & 0.2619036E+00, 0.2619036E+00, 0.2714803E+00, 0.2831600E+00, &
     & 0.2978882E+00, 0.3158883E+00, 0.2915300E+00, 0.3575791E+00, &
     & 0.4006300E+00, 0.3952800E+00, 0.4320400E+00, 0.5537876E+00, &
     & 0.6858121E+00, 0.8017234E+00, 0.1041500E+01, 0.1396000E+01, &
     & 0.1566800E+01, 0.1935800E+01, 0.3650718E+01, 0.3650718E+01 /
      data (ref_adm(17,iz, 9,18),iz = 1,20) / &
     & 0.2615317E+00, 0.2615317E+00, 0.3677900E+00, 0.2822407E+00, &
     & 0.2957714E+00, 0.4324000E+00, 0.3149600E+00, 0.3544675E+00, &
     & 0.3079500E+00, 0.4265300E+00, 0.4398900E+00, 0.4675700E+00, &
     & 0.6314344E+00, 0.7248700E+00, 0.7251000E+00, 0.1137065E+01, &
     & 0.1324100E+01, 0.1984917E+01, 0.2832882E+01, 0.2832882E+01 /
      data (ref_adm(17,iz,10,18),iz = 1,20) / &
     & 0.3543000E+00, 0.3543000E+00, 0.2700435E+00, 0.2804846E+00, &
     & 0.2940360E+00, 0.3098734E+00, 0.3301075E+00, 0.3515913E+00, &
     & 0.3745977E+00, 0.4025546E+00, 0.3465500E+00, 0.5024790E+00, &
     & 0.7756500E+00, 0.6679400E+00, 0.9123700E+00, 0.1137600E+01, &
     & 0.1288100E+01, 0.1439000E+01, 0.2523072E+01, 0.2523072E+01 /
      data (ref_adm(17,iz,11,18),iz = 1,20) / &
     & 0.2693600E+00, 0.2693600E+00, 0.2812100E+00, 0.2789038E+00, &
     & 0.2916560E+00, 0.3066105E+00, 0.3253613E+00, 0.3475360E+00, &
     & 0.3704607E+00, 0.3519600E+00, 0.3488300E+00, 0.4860744E+00, &
     & 0.5598693E+00, 0.9483200E+00, 0.7077800E+00, 0.8806500E+00, &
     & 0.1083000E+01, 0.1266200E+01, 0.2343452E+01, 0.2343452E+01 /
      data (ref_adm(17,iz,12,18),iz = 1,20) / &
     & 0.3295000E+00, 0.3295000E+00, 0.2683777E+00, 0.2589700E+00, &
     & 0.2292100E+00, 0.3049200E+00, 0.3201476E+00, 0.3415816E+00, &
     & 0.3709300E+00, 0.3340100E+00, 0.3714000E+00, 0.4731848E+00, &
     & 0.5392711E+00, 0.6074579E+00, 0.8193500E+00, 0.8735291E+00, &
     & 0.9798900E+00, 0.1428124E+01, 0.2083972E+01, 0.2083972E+01 /
      data (ref_adm(17,iz,13,18),iz = 1,20) / &
     & 0.2768900E+00, 0.2768900E+00, 0.4684700E+00, 0.5270200E+00, &
     & 0.2860926E+00, 0.3786200E+00, 0.3157278E+00, 0.2981500E+00, &
     & 0.3583293E+00, 0.4563800E+00, 0.4156501E+00, 0.4150200E+00, &
     & 0.4934000E+00, 0.5917500E+00, 0.7281300E+00, 0.6911500E+00, &
     & 0.8624500E+00, 0.1305039E+01, 0.1919080E+01, 0.1919080E+01 /
      data (ref_adm(17,iz,14,18),iz = 1,20) / &
     & 0.2790500E+00, 0.2790500E+00, 0.3726300E+00, 0.3573300E+00, &
     & 0.4008500E+00, 0.3623600E+00, 0.3377800E+00, 0.2960000E+00, &
     & 0.3612000E+00, 0.3480700E+00, 0.3571100E+00, 0.3720400E+00, &
     & 0.3852700E+00, 0.4729800E+00, 0.8687700E+00, 0.7117100E+00, &
     & 0.6926800E+00, 0.1231451E+01, 0.1811546E+01, 0.1811546E+01 /
      data (ref_adm(17,iz,15,18),iz = 1,20) / &
     & 0.2539100E+00, 0.2539100E+00, 0.2555000E+00, 0.2829100E+00, &
     & 0.2957500E+00, 0.2896100E+00, 0.2981600E+00, 0.2949500E+00, &
     & 0.3280600E+00, 0.3495200E+00, 0.3474700E+00, 0.3491600E+00, &
     & 0.3405900E+00, 0.3557100E+00, 0.4680400E+00, 0.5118100E+00, &
     & 0.9104819E+00, 0.1178433E+01, 0.1731816E+01, 0.1731816E+01 /
      data (ref_adm(17,iz,16,18),iz = 1,20) / &
     & 0.3017700E+00, 0.3017700E+00, 0.2779700E+00, 0.3004700E+00, &
     & 0.2580900E+00, 0.2490300E+00, 0.2956900E+00, 0.2897500E+00, &
     & 0.2994700E+00, 0.3439200E+00, 0.3595500E+00, 0.3593500E+00, &
     & 0.3762000E+00, 0.3754600E+00, 0.5651500E+00, 0.5757100E+00, &
     & 0.8751311E+00, 0.1132720E+01, 0.1663654E+01, 0.1663654E+01 /
      data (ref_adm(17,iz,17,18),iz = 1,20) / &
     & 0.2754400E+00, 0.2754400E+00, 0.2654700E+00, 0.2419900E+00, &
     & 0.2825900E+00, 0.2569000E+00, 0.2621900E+00, 0.2669600E+00, &
     & 0.2753600E+00, 0.3846700E+00, 0.2789000E+00, 0.4136751E+00, &
     & 0.4629458E+00, 0.5107849E+00, 0.5850734E+00, 0.6945670E+00, &
     & 0.8332078E+00, 0.1075822E+01, 0.1585451E+01, 0.1585451E+01 /
      data (ref_adm(17,iz,18,18),iz = 1,20) / &
     & 0.2877800E+00, 0.2877800E+00, 0.2544800E+00, 0.2691176E+00, &
     & 0.2746583E+00, 0.2486200E+00, 0.2357600E+00, 0.3096400E+00, &
     & 0.2753900E+00, 0.2757800E+00, 0.3531716E+00, 0.3785442E+00, &
     & 0.4051031E+00, 0.4262338E+00, 0.4748200E+00, 0.4734860E+00, &
     & 0.4871291E+00, 0.4892241E+00, 0.4841235E+00, 0.4841235E+00 /
      data (ref_adm(17,iz,19,18),iz = 1,20) / &
     & 0.3056900E+00, 0.3056900E+00, 0.2805200E+00, 0.2311500E+00, &
     & 0.3232000E+00, 0.2819329E+00, 0.2684400E+00, 0.2721100E+00, &
     & 0.2908500E+00, 0.2969300E+00, 0.4386800E+00, 0.4154600E+00, &
     & 0.3946058E+00, 0.4133008E+00, 0.4344147E+00, 0.4542860E+00, &
     & 0.4658739E+00, 0.4684493E+00, 0.4727594E+00, 0.4727594E+00 /
      data (ref_adm(17,iz,20,18),iz = 1,20) / &
     & 0.2214600E+00, 0.2214600E+00, 0.2901100E+00, 0.2785200E+00, &
     & 0.2749893E+00, 0.2821159E+00, 0.2432600E+00, 0.1894500E+00, &
     & 0.2451900E+00, 0.2805400E+00, 0.4557300E+00, 0.3658583E+00, &
     & 0.3692800E+00, 0.4533600E+00, 0.4236231E+00, 0.4412922E+00, &
     & 0.4516763E+00, 0.4551190E+00, 0.4671965E+00, 0.4671965E+00 /
      data (ref_adm(17,iz,21,18),iz = 1,20) / &
     & 0.2504300E+00, 0.2504300E+00, 0.2663274E+00, 0.2737500E+00, &
     & 0.2865600E+00, 0.2827747E+00, 0.2426100E+00, 0.3290700E+00, &
     & 0.3258900E+00, 0.3281052E+00, 0.3794400E+00, 0.3632408E+00, &
     & 0.4066800E+00, 0.3994562E+00, 0.4170275E+00, 0.4332984E+00, &
     & 0.4429983E+00, 0.4475730E+00, 0.4663526E+00, 0.4663526E+00 /
      data (ref_adm(17,iz,22,18),iz = 1,20) / &
     & 0.2672500E+00, 0.2672500E+00, 0.2904427E+00, 0.2287500E+00, &
     & 0.2986800E+00, 0.2157400E+00, 0.2944500E+00, 0.3193500E+00, &
     & 0.3354800E+00, 0.3407700E+00, 0.3772600E+00, 0.4034517E+00, &
     & 0.3920000E+00, 0.4690920E+00, 0.5158831E+00, 0.5835907E+00, &
     & 0.6688788E+00, 0.8274347E+00, 0.1346459E+01, 0.1346459E+01 /
      data (ref_adm(17,iz,23,18),iz = 1,20) / &
     & 0.2508600E+00, 0.2508600E+00, 0.2169800E+00, 0.2407600E+00, &
     & 0.2012800E+00, 0.2579600E+00, 0.2126800E+00, 0.2740500E+00, &
     & 0.3428800E+00, 0.2667300E+00, 0.3495000E+00, 0.3262200E+00, &
     & 0.3859300E+00, 0.3805200E+00, 0.3666900E+00, 0.5847263E+00, &
     & 0.6708962E+00, 0.8331921E+00, 0.1377676E+01, 0.1377676E+01 /
      data (ref_adm(17,iz,24,18),iz = 1,20) / &
     & 0.2847300E+00, 0.2847300E+00, 0.3003300E+00, 0.3056100E+00, &
     & 0.2859500E+00, 0.2819600E+00, 0.2914200E+00, 0.3223300E+00, &
     & 0.3303300E+00, 0.3392300E+00, 0.3735600E+00, 0.3792100E+00, &
     & 0.4111900E+00, 0.4224500E+00, 0.4492900E+00, 0.5913561E+00, &
     & 0.6802861E+00, 0.8486308E+00, 0.1424862E+01, 0.1424862E+01 /
      data (ref_adm(17,iz,25,18),iz = 1,20) / &
     & 0.3076600E+00, 0.3076600E+00, 0.3106500E+00, 0.2959900E+00, &
     & 0.3544500E+00, 0.3948300E+00, 0.4061000E+00, 0.3009800E+00, &
     & 0.3024700E+00, 0.3959500E+00, 0.4590500E+00, 0.4264400E+00, &
     & 0.4084400E+00, 0.4309900E+00, 0.4438300E+00, 0.6032932E+00, &
     & 0.6965964E+00, 0.8737549E+00, 0.1485597E+01, 0.1485597E+01 /
      data (ref_adm(17,iz,26,18),iz = 1,20) / &
     & 0.2997200E+00, 0.2997200E+00, 0.3797300E+00, 0.2414900E+00, &
     & 0.3051900E+00, 0.3006100E+00, 0.3165869E+00, 0.3356500E+00, &
     & 0.3586900E+00, 0.3145100E+00, 0.3971500E+00, 0.4170804E+00, &
     & 0.4773000E+00, 0.4805300E+00, 0.5449947E+00, 0.6228143E+00, &
     & 0.7221352E+00, 0.9111992E+00, 0.1561807E+01, 0.1561807E+01 /
      data (ref_adm(17,iz,27,18),iz = 1,20) / &
     & 0.2995700E+00, 0.2995700E+00, 0.2918200E+00, 0.2334800E+00, &
     & 0.3788600E+00, 0.3072625E+00, 0.3180299E+00, 0.3313497E+00, &
     & 0.3533200E+00, 0.3675130E+00, 0.5860900E+00, 0.3786900E+00, &
     & 0.4704100E+00, 0.4869800E+00, 0.5424900E+00, 0.6432489E+00, &
     & 0.7336600E+00, 0.9497120E+00, 0.1644009E+01, 0.1644009E+01 /
      data (ref_adm(17,iz,28,18),iz = 1,20) / &
     & 0.2514300E+00, 0.2514300E+00, 0.2972200E+00, 0.2935761E+00, &
     & 0.3710400E+00, 0.3082937E+00, 0.3548900E+00, 0.3343900E+00, &
     & 0.3115100E+00, 0.3608800E+00, 0.4934200E+00, 0.4586900E+00, &
     & 0.5013200E+00, 0.4770000E+00, 0.5887700E+00, 0.6729600E+00, &
     & 0.7810557E+00, 0.9986623E+00, 0.1737862E+01, 0.1737862E+01 /
      data (ref_adm(17,iz,29,18),iz = 1,20) / &
     & 0.2550000E+00, 0.2550000E+00, 0.2868300E+00, 0.4363600E+00, &
     & 0.3907000E+00, 0.3094128E+00, 0.3213974E+00, 0.4066300E+00, &
     & 0.2493200E+00, 0.3801074E+00, 0.4060988E+00, 0.4597400E+00, &
     & 0.5352100E+00, 0.4929900E+00, 0.7103300E+00, 0.7138528E+00, &
     & 0.1147100E+01, 0.1096720E+01, 0.1867601E+01, 0.1867601E+01 /
      data (ref_adm(17,iz,30,18),iz = 1,20) / &
     & 0.3229900E+00, 0.3229900E+00, 0.3149900E+00, 0.3368600E+00, &
     & 0.3088700E+00, 0.3622900E+00, 0.3235393E+00, 0.3489000E+00, &
     & 0.3666000E+00, 0.3721400E+00, 0.3508900E+00, 0.5104200E+00, &
     & 0.5155800E+00, 0.5723100E+00, 0.7451400E+00, 0.7825177E+00, &
     & 0.1210300E+01, 0.1186521E+01, 0.1991421E+01, 0.1991421E+01 /
      data (ref_adm(17,iz,31,18),iz = 1,20) / &
     & 0.2670200E+00, 0.2670200E+00, 0.4151500E+00, 0.2940672E+00, &
     & 0.3302700E+00, 0.3613200E+00, 0.3258316E+00, 0.3464700E+00, &
     & 0.4270600E+00, 0.3418900E+00, 0.4167500E+00, 0.3247900E+00, &
     & 0.5893400E+00, 0.5569700E+00, 0.7325300E+00, 0.9074700E+00, &
     & 0.1039400E+01, 0.1064900E+01, 0.2029834E+01, 0.2029834E+01 /
      data (ref_adm(17,iz,32,18),iz = 1,20) / &
     & 0.2953000E+00, 0.2953000E+00, 0.2898266E+00, 0.3119700E+00, &
     & 0.3020248E+00, 0.3128364E+00, 0.3718100E+00, 0.3643100E+00, &
     & 0.3879800E+00, 0.3612600E+00, 0.2833000E+00, 0.5548300E+00, &
     & 0.5310300E+00, 0.6045400E+00, 0.7780700E+00, 0.8923900E+00, &
     & 0.9221016E+00, 0.1196096E+01, 0.2096859E+01, 0.2096859E+01 /
      data (ref_adm(17,iz,33,18),iz = 1,20) / &
     & 0.2794700E+00, 0.2794700E+00, 0.2257500E+00, 0.2617300E+00, &
     & 0.2733600E+00, 0.3268600E+00, 0.3302520E+00, 0.3628200E+00, &
     & 0.3634000E+00, 0.4292500E+00, 0.3876300E+00, 0.5373400E+00, &
     & 0.6010300E+00, 0.7206600E+00, 0.8164500E+00, 0.8796100E+00, &
     & 0.1295000E+01, 0.1313500E+01, 0.1612900E+01, 0.1612900E+01 /
      data (ref_adm(17,iz,34,18),iz = 1,20) / &
     & 0.2281100E+00, 0.2281100E+00, 0.2550600E+00, 0.2947928E+00, &
     & 0.2402700E+00, 0.3150596E+00, 0.3431000E+00, 0.3535600E+00, &
     & 0.3397200E+00, 0.4536000E+00, 0.4678200E+00, 0.5662300E+00, &
     & 0.5411700E+00, 0.6714300E+00, 0.9486700E+00, 0.8441300E+00, &
     & 0.1063500E+01, 0.1356200E+01, 0.2199387E+01, 0.2199387E+01 /
      data (ref_adm(17,iz,35,18),iz = 1,20) / &
     & 0.2464900E+00, 0.2464900E+00, 0.2484800E+00, 0.2949427E+00, &
     & 0.3034146E+00, 0.2835600E+00, 0.3106100E+00, 0.3514000E+00, &
     & 0.3795667E+00, 0.4204389E+00, 0.4247300E+00, 0.4388900E+00, &
     & 0.5363200E+00, 0.6164476E+00, 0.6984100E+00, 0.8827400E+00, &
     & 0.9480319E+00, 0.1290400E+01, 0.2239146E+01, 0.2239146E+01 /
      data (ref_adm(17,iz,36,18),iz = 1,20) / &
     & 0.2627000E+00, 0.2627000E+00, 0.2899987E+00, 0.2355400E+00, &
     & 0.3036502E+00, 0.3164759E+00, 0.3409300E+00, 0.3132400E+00, &
     & 0.4104000E+00, 0.4360400E+00, 0.4744900E+00, 0.5814700E+00, &
     & 0.5659300E+00, 0.5836800E+00, 0.6843700E+00, 0.8016300E+00, &
     & 0.1056800E+01, 0.1335200E+01, 0.2281115E+01, 0.2281115E+01 /
      data (ref_adm(17,iz,37,18),iz = 1,20) / &
     & 0.2721800E+00, 0.2721800E+00, 0.2347000E+00, 0.2729900E+00, &
     & 0.3038577E+00, 0.2786400E+00, 0.3107700E+00, 0.3262400E+00, &
     & 0.3362400E+00, 0.4293000E+00, 0.4746300E+00, 0.5265000E+00, &
     & 0.4838500E+00, 0.5952800E+00, 0.6883500E+00, 0.8910300E+00, &
     & 0.1244900E+01, 0.1513800E+01, 0.2362652E+01, 0.2362652E+01 /
      data (ref_adm(17,iz,38,18),iz = 1,20) / &
     & 0.2721800E+00, 0.2721800E+00, 0.2347000E+00, 0.2729900E+00, &
     & 0.3038577E+00, 0.2786400E+00, 0.3107700E+00, 0.3262400E+00, &
     & 0.3362400E+00, 0.4293000E+00, 0.4746300E+00, 0.5265000E+00, &
     & 0.4838500E+00, 0.5952800E+00, 0.6883500E+00, 0.8910300E+00, &
     & 0.1244900E+01, 0.1513800E+01, 0.2362652E+01, 0.2362652E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(18,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(18,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(18,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.4448160E+04
      data (ref_adm(18,iz, 1, 4),iz = 1,20) / &
     & 0.2301372E+00, 0.2301372E+00, 0.2260189E+00, 0.2245922E+00, &
     & 0.2234646E+00, 0.2226934E+00, 0.2213341E+00, 0.2190182E+00, &
     & 0.2160437E+00, 0.2124819E+00, 0.2086079E+00, 0.2032296E+00, &
     & 0.1969521E+00, 0.1910407E+00, 0.1825516E+00, 0.1713724E+00, &
     & 0.1598391E+00, 0.1447490E+00, 0.1181039E+00, 0.1181039E+00 /
      data (ref_adm(18,iz, 2, 4),iz = 1,20) / &
     & 0.2301372E+00, 0.2301372E+00, 0.2260189E+00, 0.2245922E+00, &
     & 0.2234646E+00, 0.2226934E+00, 0.2213341E+00, 0.2190182E+00, &
     & 0.2160437E+00, 0.2124819E+00, 0.2086079E+00, 0.2032296E+00, &
     & 0.1969521E+00, 0.1910407E+00, 0.1825516E+00, 0.1713724E+00, &
     & 0.1598391E+00, 0.1447490E+00, 0.1181039E+00, 0.1181039E+00 /
      data (ref_adm(18,iz, 3, 4),iz = 1,20) / &
     & 0.2301372E+00, 0.2301372E+00, 0.2260189E+00, 0.2245923E+00, &
     & 0.2234646E+00, 0.2226934E+00, 0.2213341E+00, 0.1854400E+00, &
     & 0.2160437E+00, 0.2124819E+00, 0.2086079E+00, 0.2032296E+00, &
     & 0.1969521E+00, 0.1910407E+00, 0.1825516E+00, 0.1713724E+00, &
     & 0.1598391E+00, 0.1447490E+00, 0.1181039E+00, 0.1181039E+00 /
      data (ref_adm(18,iz, 4, 4),iz = 1,20) / &
     & 0.2301372E+00, 0.2301372E+00, 0.2260189E+00, 0.2245922E+00, &
     & 0.2234646E+00, 0.2226934E+00, 0.2213341E+00, 0.2190182E+00, &
     & 0.2160437E+00, 0.2124819E+00, 0.2086079E+00, 0.2032296E+00, &
     & 0.1969521E+00, 0.1910407E+00, 0.1825516E+00, 0.1713724E+00, &
     & 0.1598391E+00, 0.1447490E+00, 0.1181039E+00, 0.1181039E+00 /
      data (ref_adm(18,iz, 5, 4),iz = 1,20) / &
     & 0.2301372E+00, 0.2301372E+00, 0.2260189E+00, 0.2245923E+00, &
     & 0.2234646E+00, 0.2226934E+00, 0.2213341E+00, 0.2190182E+00, &
     & 0.2160437E+00, 0.1769800E+00, 0.1980100E+00, 0.2032296E+00, &
     & 0.1969521E+00, 0.1910407E+00, 0.1825516E+00, 0.1713724E+00, &
     & 0.1598391E+00, 0.1447490E+00, 0.1181039E+00, 0.1181039E+00 /
      data (ref_adm(18,iz, 6, 4),iz = 1,20) / &
     & 0.2301372E+00, 0.2301372E+00, 0.2260189E+00, 0.2245922E+00, &
     & 0.2234646E+00, 0.2226934E+00, 0.2213341E+00, 0.2190182E+00, &
     & 0.2160437E+00, 0.2124819E+00, 0.2086079E+00, 0.2032296E+00, &
     & 0.1969521E+00, 0.1910407E+00, 0.1825516E+00, 0.1713724E+00, &
     & 0.1598391E+00, 0.1447490E+00, 0.1181039E+00, 0.1181039E+00 /
      data (ref_adm(18,iz, 7, 4),iz = 1,20) / &
     & 0.2301372E+00, 0.2301372E+00, 0.2260189E+00, 0.2245923E+00, &
     & 0.2416000E+00, 0.2226934E+00, 0.2213341E+00, 0.2190182E+00, &
     & 0.2160437E+00, 0.2124819E+00, 0.2086079E+00, 0.2032296E+00, &
     & 0.1969521E+00, 0.1910407E+00, 0.1825516E+00, 0.1713724E+00, &
     & 0.1598391E+00, 0.1447490E+00, 0.1181039E+00, 0.1181039E+00 /
      data (ref_adm(18,iz, 8, 4),iz = 1,20) / &
     & 0.2301372E+00, 0.2301372E+00, 0.2260189E+00, 0.2293700E+00, &
     & 0.2234646E+00, 0.2226934E+00, 0.2213341E+00, 0.2190182E+00, &
     & 0.2160437E+00, 0.2124819E+00, 0.2086079E+00, 0.2032296E+00, &
     & 0.1969521E+00, 0.1910407E+00, 0.1825516E+00, 0.1713724E+00, &
     & 0.1598391E+00, 0.1447490E+00, 0.1181039E+00, 0.1181039E+00 /
      data (ref_adm(18,iz, 9, 4),iz = 1,20) / &
     & 0.2301372E+00, 0.2301372E+00, 0.2260189E+00, 0.2245923E+00, &
     & 0.2234646E+00, 0.2226934E+00, 0.2752100E+00, 0.2190182E+00, &
     & 0.1832300E+00, 0.2153900E+00, 0.1847700E+00, 0.1644300E+00, &
     & 0.1969521E+00, 0.1910407E+00, 0.1825516E+00, 0.1713724E+00, &
     & 0.1598391E+00, 0.1447490E+00, 0.1181039E+00, 0.1181039E+00 /
      data (ref_adm(18,iz,10, 4),iz = 1,20) / &
     & 0.2301372E+00, 0.2301372E+00, 0.2260189E+00, 0.2245922E+00, &
     & 0.2234646E+00, 0.2226934E+00, 0.2213341E+00, 0.2190182E+00, &
     & 0.2160437E+00, 0.2834500E+00, 0.2341600E+00, 0.2032296E+00, &
     & 0.1969521E+00, 0.1910407E+00, 0.1825516E+00, 0.1713724E+00, &
     & 0.1598391E+00, 0.1447490E+00, 0.1181039E+00, 0.1181039E+00 /
      data (ref_adm(18,iz,11, 4),iz = 1,20) / &
     & 0.2301372E+00, 0.2301372E+00, 0.2260189E+00, 0.2245923E+00, &
     & 0.2234646E+00, 0.2226934E+00, 0.2213341E+00, 0.2190182E+00, &
     & 0.2160437E+00, 0.2124819E+00, 0.2086079E+00, 0.2032296E+00, &
     & 0.1969521E+00, 0.1910407E+00, 0.1825516E+00, 0.1713724E+00, &
     & 0.1598391E+00, 0.1447490E+00, 0.1181039E+00, 0.1181039E+00 /
      data (ref_adm(18,iz,12, 4),iz = 1,20) / &
     & 0.2301372E+00, 0.2301372E+00, 0.2260189E+00, 0.2245922E+00, &
     & 0.2234646E+00, 0.2226934E+00, 0.2213341E+00, 0.2190182E+00, &
     & 0.2160437E+00, 0.2124819E+00, 0.2086079E+00, 0.2032296E+00, &
     & 0.1969521E+00, 0.1910407E+00, 0.1825516E+00, 0.1713724E+00, &
     & 0.1598391E+00, 0.1447490E+00, 0.1181039E+00, 0.1181039E+00 /
      data (ref_adm(18,iz,13, 4),iz = 1,20) / &
     & 0.2301372E+00, 0.2301372E+00, 0.2260189E+00, 0.2245923E+00, &
     & 0.2234646E+00, 0.2226934E+00, 0.2213341E+00, 0.2190182E+00, &
     & 0.2160437E+00, 0.2124819E+00, 0.2086079E+00, 0.2032296E+00, &
     & 0.1969521E+00, 0.1910407E+00, 0.1825516E+00, 0.1713724E+00, &
     & 0.1598391E+00, 0.1447490E+00, 0.1181039E+00, 0.1181039E+00 /
      data (ref_adm(18,iz,14, 4),iz = 1,20) / &
     & 0.2301372E+00, 0.2301372E+00, 0.2260189E+00, 0.2245922E+00, &
     & 0.2234646E+00, 0.2226934E+00, 0.2213341E+00, 0.2190182E+00, &
     & 0.2160437E+00, 0.2124819E+00, 0.2086079E+00, 0.2032296E+00, &
     & 0.1969521E+00, 0.1910407E+00, 0.1825516E+00, 0.1713724E+00, &
     & 0.1598391E+00, 0.1447490E+00, 0.1181039E+00, 0.1181039E+00 /
      data (ref_adm(18,iz,15, 4),iz = 1,20) / &
     & 0.2301372E+00, 0.2301372E+00, 0.2260189E+00, 0.2245923E+00, &
     & 0.2234646E+00, 0.2226934E+00, 0.2213341E+00, 0.2190182E+00, &
     & 0.2160437E+00, 0.2124819E+00, 0.2086079E+00, 0.2032296E+00, &
     & 0.1969521E+00, 0.1910407E+00, 0.1825516E+00, 0.1713724E+00, &
     & 0.1598391E+00, 0.1447490E+00, 0.1181039E+00, 0.1181039E+00 /
      data (ref_adm(18,iz,16, 4),iz = 1,20) / &
     & 0.2301372E+00, 0.2301372E+00, 0.2260189E+00, 0.2245922E+00, &
     & 0.2234646E+00, 0.2226934E+00, 0.2213341E+00, 0.2190182E+00, &
     & 0.2160437E+00, 0.2124819E+00, 0.2086079E+00, 0.2032296E+00, &
     & 0.1969521E+00, 0.1910407E+00, 0.1825516E+00, 0.1713724E+00, &
     & 0.1598391E+00, 0.1447490E+00, 0.1181039E+00, 0.1181039E+00 /
      data (ref_adm(18,iz,17, 4),iz = 1,20) / &
     & 0.2301372E+00, 0.2301372E+00, 0.2260189E+00, 0.2245923E+00, &
     & 0.2234646E+00, 0.2226934E+00, 0.2213341E+00, 0.2190182E+00, &
     & 0.2160437E+00, 0.2124819E+00, 0.2086079E+00, 0.2057200E+00, &
     & 0.1969521E+00, 0.1910407E+00, 0.1825516E+00, 0.1713724E+00, &
     & 0.1598391E+00, 0.1447490E+00, 0.1181039E+00, 0.1181039E+00 /
      data (ref_adm(18,iz,18, 4),iz = 1,20) / &
     & 0.2849317E+00, 0.2849317E+00, 0.2798329E+00, 0.2780666E+00, &
     & 0.2766705E+00, 0.2757156E+00, 0.2740327E+00, 0.2711655E+00, &
     & 0.2674827E+00, 0.2630728E+00, 0.2582766E+00, 0.2516177E+00, &
     & 0.2438455E+00, 0.2365266E+00, 0.2260163E+00, 0.2121754E+00, &
     & 0.1978961E+00, 0.1792130E+00, 0.1462239E+00, 0.1462239E+00 /
      data (ref_adm(18,iz,19, 4),iz = 1,20) / &
     & 0.2849317E+00, 0.2849317E+00, 0.2798329E+00, 0.2780666E+00, &
     & 0.2766705E+00, 0.2757156E+00, 0.2740327E+00, 0.2711654E+00, &
     & 0.2674827E+00, 0.3110600E+00, 0.2582765E+00, 0.2516177E+00, &
     & 0.2438455E+00, 0.2365266E+00, 0.2260163E+00, 0.2121754E+00, &
     & 0.1978961E+00, 0.1792130E+00, 0.1462239E+00, 0.1462239E+00 /
      data (ref_adm(18,iz,20, 4),iz = 1,20) / &
     & 0.2849317E+00, 0.2849317E+00, 0.2798329E+00, 0.2780666E+00, &
     & 0.2766705E+00, 0.2757156E+00, 0.2740327E+00, 0.2711655E+00, &
     & 0.2674827E+00, 0.2630728E+00, 0.2582766E+00, 0.2516177E+00, &
     & 0.2438455E+00, 0.2365266E+00, 0.2260163E+00, 0.2121754E+00, &
     & 0.1978961E+00, 0.1792130E+00, 0.1462239E+00, 0.1462239E+00 /
      data (ref_adm(18,iz,21, 4),iz = 1,20) / &
     & 0.2849317E+00, 0.2849317E+00, 0.2798329E+00, 0.2780666E+00, &
     & 0.2766705E+00, 0.2757156E+00, 0.2740327E+00, 0.2711654E+00, &
     & 0.2674827E+00, 0.2630728E+00, 0.2582765E+00, 0.2516177E+00, &
     & 0.2438455E+00, 0.2365266E+00, 0.2260163E+00, 0.2121754E+00, &
     & 0.1978961E+00, 0.1792130E+00, 0.1462239E+00, 0.1462239E+00 /
      data (ref_adm(18,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(18,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo  0.2467399E+00
      data (ref_adm(18,iz, 1, 5),iz = 1,20) / &
     & 0.2701210E+00, 0.2701210E+00, 0.2652872E+00, 0.2636127E+00, &
     & 0.2622891E+00, 0.2613840E+00, 0.2597884E+00, 0.2570703E+00, &
     & 0.2535789E+00, 0.2493983E+00, 0.2448513E+00, 0.2385386E+00, &
     & 0.2311704E+00, 0.2242319E+00, 0.2142680E+00, 0.2011465E+00, &
     & 0.1876094E+00, 0.1698975E+00, 0.1386232E+00, 0.1386232E+00 /
      data (ref_adm(18,iz, 2, 5),iz = 1,20) / &
     & 0.2701210E+00, 0.2701210E+00, 0.2652872E+00, 0.2636127E+00, &
     & 0.2622891E+00, 0.2613840E+00, 0.2597884E+00, 0.2570703E+00, &
     & 0.2535789E+00, 0.2493983E+00, 0.2448513E+00, 0.2385386E+00, &
     & 0.2311704E+00, 0.2242319E+00, 0.2142680E+00, 0.2011465E+00, &
     & 0.1876094E+00, 0.1698975E+00, 0.1386232E+00, 0.1386232E+00 /
      data (ref_adm(18,iz, 3, 5),iz = 1,20) / &
     & 0.2701210E+00, 0.2701210E+00, 0.2652872E+00, 0.2636127E+00, &
     & 0.2622891E+00, 0.2613840E+00, 0.2597884E+00, 0.2570702E+00, &
     & 0.2535789E+00, 0.2493983E+00, 0.2448513E+00, 0.2385386E+00, &
     & 0.2311704E+00, 0.2242319E+00, 0.2142680E+00, 0.2011465E+00, &
     & 0.1876094E+00, 0.1698975E+00, 0.1386232E+00, 0.1386232E+00 /
      data (ref_adm(18,iz, 4, 5),iz = 1,20) / &
     & 0.2701210E+00, 0.2701210E+00, 0.2652872E+00, 0.2636127E+00, &
     & 0.2622891E+00, 0.2613840E+00, 0.2597884E+00, 0.2570703E+00, &
     & 0.2535789E+00, 0.2493983E+00, 0.2448513E+00, 0.3203100E+00, &
     & 0.2311704E+00, 0.2242319E+00, 0.2142680E+00, 0.2011465E+00, &
     & 0.1876094E+00, 0.1698975E+00, 0.1386232E+00, 0.1386232E+00 /
      data (ref_adm(18,iz, 5, 5),iz = 1,20) / &
     & 0.2701210E+00, 0.2701210E+00, 0.2652872E+00, 0.2636127E+00, &
     & 0.2622891E+00, 0.2978900E+00, 0.2455500E+00, 0.1644200E+00, &
     & 0.2535789E+00, 0.2320800E+00, 0.2448513E+00, 0.2385386E+00, &
     & 0.2311704E+00, 0.2733600E+00, 0.2142680E+00, 0.2011465E+00, &
     & 0.1876094E+00, 0.1698975E+00, 0.1386232E+00, 0.1386232E+00 /
      data (ref_adm(18,iz, 6, 5),iz = 1,20) / &
     & 0.2701210E+00, 0.2701210E+00, 0.2652872E+00, 0.2636127E+00, &
     & 0.2622891E+00, 0.2613840E+00, 0.2597884E+00, 0.2570703E+00, &
     & 0.2535789E+00, 0.2820400E+00, 0.2448513E+00, 0.2385386E+00, &
     & 0.2311704E+00, 0.2242319E+00, 0.2142680E+00, 0.2011465E+00, &
     & 0.1876094E+00, 0.1698975E+00, 0.1386232E+00, 0.1386232E+00 /
      data (ref_adm(18,iz, 7, 5),iz = 1,20) / &
     & 0.2701210E+00, 0.2701210E+00, 0.2338200E+00, 0.1972500E+00, &
     & 0.2622891E+00, 0.2613840E+00, 0.2597884E+00, 0.2570702E+00, &
     & 0.2535789E+00, 0.2493983E+00, 0.2448513E+00, 0.2385386E+00, &
     & 0.2311704E+00, 0.2242319E+00, 0.2142680E+00, 0.2011465E+00, &
     & 0.1876094E+00, 0.1698975E+00, 0.1386232E+00, 0.1386232E+00 /
      data (ref_adm(18,iz, 8, 5),iz = 1,20) / &
     & 0.2701210E+00, 0.2701210E+00, 0.2210400E+00, 0.2640600E+00, &
     & 0.2095500E+00, 0.2613840E+00, 0.2597884E+00, 0.2570703E+00, &
     & 0.2535789E+00, 0.2493983E+00, 0.2448513E+00, 0.2385386E+00, &
     & 0.2311704E+00, 0.2242319E+00, 0.2142680E+00, 0.2011465E+00, &
     & 0.1876094E+00, 0.1698975E+00, 0.1386232E+00, 0.1386232E+00 /
      data (ref_adm(18,iz, 9, 5),iz = 1,20) / &
     & 0.3509200E+00, 0.3509200E+00, 0.2444000E+00, 0.2636127E+00, &
     & 0.2362200E+00, 0.2575100E+00, 0.2404000E+00, 0.2356500E+00, &
     & 0.2535789E+00, 0.2493983E+00, 0.2448513E+00, 0.2385386E+00, &
     & 0.2311704E+00, 0.2242319E+00, 0.2142680E+00, 0.2011465E+00, &
     & 0.1876094E+00, 0.1698975E+00, 0.1386232E+00, 0.1386232E+00 /
      data (ref_adm(18,iz,10, 5),iz = 1,20) / &
     & 0.2701210E+00, 0.2701210E+00, 0.2652872E+00, 0.2636127E+00, &
     & 0.2622891E+00, 0.2613840E+00, 0.2597884E+00, 0.2570703E+00, &
     & 0.2227600E+00, 0.2493983E+00, 0.3304500E+00, 0.2385386E+00, &
     & 0.1810900E+00, 0.2242319E+00, 0.2142680E+00, 0.2011465E+00, &
     & 0.1876094E+00, 0.1698975E+00, 0.1386232E+00, 0.1386232E+00 /
      data (ref_adm(18,iz,11, 5),iz = 1,20) / &
     & 0.2701210E+00, 0.2701210E+00, 0.2652872E+00, 0.2636127E+00, &
     & 0.2622891E+00, 0.2502900E+00, 0.2512500E+00, 0.2192300E+00, &
     & 0.2477600E+00, 0.2493983E+00, 0.2822000E+00, 0.1485600E+00, &
     & 0.1645900E+00, 0.2242319E+00, 0.2142680E+00, 0.2011465E+00, &
     & 0.1876094E+00, 0.1698975E+00, 0.1386232E+00, 0.1386232E+00 /
      data (ref_adm(18,iz,12, 5),iz = 1,20) / &
     & 0.2701210E+00, 0.2701210E+00, 0.2652872E+00, 0.2636127E+00, &
     & 0.2622891E+00, 0.2613840E+00, 0.2597884E+00, 0.2570703E+00, &
     & 0.2535789E+00, 0.2493983E+00, 0.2448513E+00, 0.1714300E+00, &
     & 0.2037300E+00, 0.2242319E+00, 0.2142680E+00, 0.2011465E+00, &
     & 0.1876094E+00, 0.1698975E+00, 0.1386232E+00, 0.1386232E+00 /
      data (ref_adm(18,iz,13, 5),iz = 1,20) / &
     & 0.4093500E+00, 0.4093500E+00, 0.2652872E+00, 0.2636127E+00, &
     & 0.2622891E+00, 0.2613840E+00, 0.2597884E+00, 0.2570702E+00, &
     & 0.2535789E+00, 0.2493983E+00, 0.2916700E+00, 0.3217900E+00, &
     & 0.2266500E+00, 0.2258100E+00, 0.2142680E+00, 0.2011465E+00, &
     & 0.1876094E+00, 0.1698975E+00, 0.1386232E+00, 0.1386232E+00 /
      data (ref_adm(18,iz,14, 5),iz = 1,20) / &
     & 0.2701210E+00, 0.2701210E+00, 0.2652872E+00, 0.2636127E+00, &
     & 0.2622891E+00, 0.2613840E+00, 0.2597884E+00, 0.2570703E+00, &
     & 0.2535789E+00, 0.2493983E+00, 0.2448513E+00, 0.2385386E+00, &
     & 0.2311704E+00, 0.2242319E+00, 0.2142680E+00, 0.2011465E+00, &
     & 0.1876094E+00, 0.1698975E+00, 0.1386232E+00, 0.1386232E+00 /
      data (ref_adm(18,iz,15, 5),iz = 1,20) / &
     & 0.2701210E+00, 0.2701210E+00, 0.2652872E+00, 0.2636127E+00, &
     & 0.2622891E+00, 0.2613840E+00, 0.2597884E+00, 0.2570702E+00, &
     & 0.2535789E+00, 0.2493983E+00, 0.2448513E+00, 0.2385386E+00, &
     & 0.2726100E+00, 0.2242319E+00, 0.2142680E+00, 0.2011465E+00, &
     & 0.1876094E+00, 0.1698975E+00, 0.1386232E+00, 0.1386232E+00 /
      data (ref_adm(18,iz,16, 5),iz = 1,20) / &
     & 0.2701210E+00, 0.2701210E+00, 0.2652872E+00, 0.2636127E+00, &
     & 0.2622891E+00, 0.2613840E+00, 0.2597884E+00, 0.3330700E+00, &
     & 0.2535789E+00, 0.2493983E+00, 0.2448513E+00, 0.2385386E+00, &
     & 0.2311704E+00, 0.2242319E+00, 0.2142680E+00, 0.2011465E+00, &
     & 0.1876094E+00, 0.1698975E+00, 0.1386232E+00, 0.1386232E+00 /
      data (ref_adm(18,iz,17, 5),iz = 1,20) / &
     & 0.2701210E+00, 0.2701210E+00, 0.2652872E+00, 0.2636127E+00, &
     & 0.2622891E+00, 0.2613840E+00, 0.2597884E+00, 0.2748700E+00, &
     & 0.2535789E+00, 0.2493983E+00, 0.2448513E+00, 0.2385386E+00, &
     & 0.2311704E+00, 0.2242319E+00, 0.2142680E+00, 0.2011465E+00, &
     & 0.1876094E+00, 0.1698975E+00, 0.1386232E+00, 0.1386232E+00 /
      data (ref_adm(18,iz,18, 5),iz = 1,20) / &
     & 0.3255199E+00, 0.3255199E+00, 0.2838470E+00, 0.2821310E+00, &
     & 0.2834841E+00, 0.2858221E+00, 0.2888309E+00, 0.2921453E+00, &
     & 0.3136012E+00, 0.2959020E+00, 0.2722269E+00, 0.4148000E+00, &
     & 0.2617618E+00, 0.2545428E+00, 0.2457128E+00, 0.2342474E+00, &
     & 0.2213558E+00, 0.2045706E+00, 0.1891119E+00, 0.1891119E+00 /
      data (ref_adm(18,iz,19, 5),iz = 1,20) / &
     & 0.3255199E+00, 0.3255199E+00, 0.2838470E+00, 0.2821310E+00, &
     & 0.2834841E+00, 0.2858221E+00, 0.2888309E+00, 0.2921453E+00, &
     & 0.3136012E+00, 0.2959020E+00, 0.2722269E+00, 0.2666232E+00, &
     & 0.3158100E+00, 0.2545429E+00, 0.2457128E+00, 0.2342474E+00, &
     & 0.2213558E+00, 0.2045706E+00, 0.1891119E+00, 0.1891119E+00 /
      data (ref_adm(18,iz,20, 5),iz = 1,20) / &
     & 0.3255199E+00, 0.3255199E+00, 0.2838470E+00, 0.2821310E+00, &
     & 0.2834841E+00, 0.2858221E+00, 0.2888309E+00, 0.2921453E+00, &
     & 0.3136012E+00, 0.2959020E+00, 0.2722269E+00, 0.2666232E+00, &
     & 0.2617618E+00, 0.1860600E+00, 0.1730900E+00, 0.2342474E+00, &
     & 0.2213558E+00, 0.2045706E+00, 0.1891119E+00, 0.1891119E+00 /
      data (ref_adm(18,iz,21, 5),iz = 1,20) / &
     & 0.3255199E+00, 0.3255199E+00, 0.2838470E+00, 0.2821310E+00, &
     & 0.2834841E+00, 0.2858221E+00, 0.2888309E+00, 0.2921453E+00, &
     & 0.3136012E+00, 0.2959020E+00, 0.2722269E+00, 0.2481100E+00, &
     & 0.2617618E+00, 0.2545429E+00, 0.1841400E+00, 0.2342474E+00, &
     & 0.2213558E+00, 0.2045706E+00, 0.1891119E+00, 0.1891119E+00 /
      data (ref_adm(18,iz,22, 5),iz = 1,20) / &
     & 0.2793499E+00, 0.2793499E+00, 0.2743510E+00, 0.2726193E+00, &
     & 0.2712505E+00, 0.2703143E+00, 0.2686644E+00, 0.2658533E+00, &
     & 0.2622427E+00, 0.2579192E+00, 0.2532169E+00, 0.2466884E+00, &
     & 0.2390685E+00, 0.2318930E+00, 0.2215886E+00, 0.2080188E+00, &
     & 0.1940193E+00, 0.1757022E+00, 0.1433594E+00, 0.1433594E+00 /
      data (ref_adm(18,iz,23, 5),iz = 1,20) / &
     & 0.2793499E+00, 0.2793499E+00, 0.2743510E+00, 0.2726193E+00, &
     & 0.2712505E+00, 0.2703143E+00, 0.2686644E+00, 0.2658533E+00, &
     & 0.2622427E+00, 0.2579192E+00, 0.2532169E+00, 0.2466884E+00, &
     & 0.2390685E+00, 0.2318930E+00, 0.2215886E+00, 0.2080188E+00, &
     & 0.1940193E+00, 0.1757022E+00, 0.1433594E+00, 0.1433594E+00 /
      data (ref_adm(18,iz,24, 5),iz = 1,20) / &
     & 0.2793499E+00, 0.2793499E+00, 0.2743510E+00, 0.2726193E+00, &
     & 0.2712505E+00, 0.2703143E+00, 0.2686644E+00, 0.2658533E+00, &
     & 0.2622427E+00, 0.2579192E+00, 0.2532169E+00, 0.2466884E+00, &
     & 0.2390685E+00, 0.2318930E+00, 0.2215886E+00, 0.2080188E+00, &
     & 0.1940193E+00, 0.1757022E+00, 0.1433594E+00, 0.1433594E+00 /
      data (ref_adm(18,iz,25, 5),iz = 1,20) / &
     & 0.2793499E+00, 0.2793499E+00, 0.2743510E+00, 0.2726193E+00, &
     & 0.2712505E+00, 0.2703143E+00, 0.2686644E+00, 0.2658533E+00, &
     & 0.2622427E+00, 0.2579192E+00, 0.2532169E+00, 0.2466884E+00, &
     & 0.2390685E+00, 0.2318930E+00, 0.2215886E+00, 0.2080188E+00, &
     & 0.1940193E+00, 0.1757022E+00, 0.1433594E+00, 0.1433594E+00 /
      data (ref_adm(18,iz,26, 5),iz = 1,20) / &
     & 0.2793499E+00, 0.2793499E+00, 0.2743510E+00, 0.2726193E+00, &
     & 0.2712505E+00, 0.2703143E+00, 0.2686644E+00, 0.2658533E+00, &
     & 0.2622427E+00, 0.2579192E+00, 0.2532169E+00, 0.2466884E+00, &
     & 0.2390685E+00, 0.2318930E+00, 0.2252800E+00, 0.2080188E+00, &
     & 0.1940193E+00, 0.1757022E+00, 0.1433594E+00, 0.1433594E+00 /
      data (ref_adm(18,iz,27, 5),iz = 1,20) / &
     & 0.2793499E+00, 0.2793499E+00, 0.2743510E+00, 0.2726193E+00, &
     & 0.2712505E+00, 0.2703143E+00, 0.2686644E+00, 0.2658533E+00, &
     & 0.2622427E+00, 0.2579192E+00, 0.2532169E+00, 0.2466884E+00, &
     & 0.2390685E+00, 0.2318930E+00, 0.2215886E+00, 0.2080188E+00, &
     & 0.1940193E+00, 0.1757022E+00, 0.1433594E+00, 0.1433594E+00 /
      data (ref_adm(18,iz,28, 5),iz = 1,20) / &
     & 0.2793499E+00, 0.2793499E+00, 0.2743510E+00, 0.2726193E+00, &
     & 0.2712505E+00, 0.2703143E+00, 0.2686644E+00, 0.2658533E+00, &
     & 0.2622427E+00, 0.2579192E+00, 0.2532169E+00, 0.2466884E+00, &
     & 0.2390685E+00, 0.2318930E+00, 0.2215886E+00, 0.2080188E+00, &
     & 0.1940193E+00, 0.1757022E+00, 0.1433594E+00, 0.1433594E+00 /
      data (ref_adm(18,iz,29, 5),iz = 1,20) / &
     & 0.2793499E+00, 0.2793499E+00, 0.2743510E+00, 0.2726193E+00, &
     & 0.2712505E+00, 0.2703143E+00, 0.2686644E+00, 0.2658533E+00, &
     & 0.2622427E+00, 0.2579192E+00, 0.2532169E+00, 0.2466884E+00, &
     & 0.2390685E+00, 0.2280300E+00, 0.2215886E+00, 0.2080188E+00, &
     & 0.1940193E+00, 0.1757022E+00, 0.1433594E+00, 0.1433594E+00 /
      data (ref_adm(18,iz,30, 5),iz = 1,20) / &
     & 0.2793499E+00, 0.2793499E+00, 0.2743510E+00, 0.2726193E+00, &
     & 0.2712505E+00, 0.2703143E+00, 0.2686644E+00, 0.2658533E+00, &
     & 0.2622427E+00, 0.2579192E+00, 0.2532169E+00, 0.2466884E+00, &
     & 0.2390685E+00, 0.2318930E+00, 0.2215886E+00, 0.2080188E+00, &
     & 0.1940193E+00, 0.1757022E+00, 0.1433594E+00, 0.1433594E+00 /
      data (ref_adm(18,iz,31, 5),iz = 1,20) / &
     & 0.2793499E+00, 0.2793499E+00, 0.2743510E+00, 0.2726193E+00, &
     & 0.2712505E+00, 0.2703143E+00, 0.2686644E+00, 0.2658533E+00, &
     & 0.2622427E+00, 0.2579192E+00, 0.2532169E+00, 0.2466884E+00, &
     & 0.2390685E+00, 0.2318930E+00, 0.2215886E+00, 0.2080188E+00, &
     & 0.1940193E+00, 0.1757022E+00, 0.1433594E+00, 0.1433594E+00 /
      data (ref_adm(18,iz,32, 5),iz = 1,20) / &
     & 0.2793499E+00, 0.2793499E+00, 0.2743510E+00, 0.2726193E+00, &
     & 0.2712505E+00, 0.2703143E+00, 0.2686644E+00, 0.2658533E+00, &
     & 0.2622427E+00, 0.2579192E+00, 0.2532169E+00, 0.2466884E+00, &
     & 0.2390685E+00, 0.2318930E+00, 0.2215886E+00, 0.2080188E+00, &
     & 0.1940193E+00, 0.1757022E+00, 0.1433594E+00, 0.1433594E+00 /
      data (ref_adm(18,iz,33, 5),iz = 1,20) / &
     & 0.2793499E+00, 0.2793499E+00, 0.2743510E+00, 0.2726193E+00, &
     & 0.2712505E+00, 0.2703143E+00, 0.2686644E+00, 0.2658533E+00, &
     & 0.2622427E+00, 0.2579192E+00, 0.2532169E+00, 0.2466884E+00, &
     & 0.2390685E+00, 0.2318930E+00, 0.2215886E+00, 0.2080188E+00, &
     & 0.1940193E+00, 0.1757022E+00, 0.1433594E+00, 0.1433594E+00 /
      data (ref_adm(18,iz,34, 5),iz = 1,20) / &
     & 0.2793499E+00, 0.2793499E+00, 0.2743510E+00, 0.2726193E+00, &
     & 0.2712505E+00, 0.2703143E+00, 0.2686644E+00, 0.2658533E+00, &
     & 0.2622427E+00, 0.2579192E+00, 0.2532169E+00, 0.2466884E+00, &
     & 0.2390685E+00, 0.2318930E+00, 0.2215886E+00, 0.2080188E+00, &
     & 0.1940193E+00, 0.1757022E+00, 0.1433594E+00, 0.1433594E+00 /
      data (ref_adm(18,iz,35, 5),iz = 1,20) / &
     & 0.2793499E+00, 0.2793499E+00, 0.2743510E+00, 0.2726193E+00, &
     & 0.2712505E+00, 0.2703143E+00, 0.2686644E+00, 0.2658533E+00, &
     & 0.2622427E+00, 0.2579192E+00, 0.2532169E+00, 0.2466884E+00, &
     & 0.2390685E+00, 0.2318930E+00, 0.2215886E+00, 0.2080188E+00, &
     & 0.1940193E+00, 0.1757022E+00, 0.1433594E+00, 0.1433594E+00 /
      data (ref_adm(18,iz,36, 5),iz = 1,20) / &
     & 0.2793499E+00, 0.2793499E+00, 0.2743510E+00, 0.2726193E+00, &
     & 0.2712505E+00, 0.2703143E+00, 0.2686644E+00, 0.2658533E+00, &
     & 0.2622427E+00, 0.2579192E+00, 0.2532169E+00, 0.2466884E+00, &
     & 0.2390685E+00, 0.2318930E+00, 0.2215886E+00, 0.2080188E+00, &
     & 0.1940193E+00, 0.1757022E+00, 0.1433594E+00, 0.1433594E+00 /
      data (ref_adm(18,iz,37, 5),iz = 1,20) / &
     & 0.2793499E+00, 0.2793499E+00, 0.2743510E+00, 0.2726193E+00, &
     & 0.2712505E+00, 0.2703143E+00, 0.2686644E+00, 0.2658533E+00, &
     & 0.2622427E+00, 0.2579192E+00, 0.2532169E+00, 0.2466884E+00, &
     & 0.2390685E+00, 0.2318930E+00, 0.2215886E+00, 0.2080188E+00, &
     & 0.1940193E+00, 0.1757022E+00, 0.1433594E+00, 0.1433594E+00 /
      data (ref_adm(18,iz,38, 5),iz = 1,20) / &
     & 0.2793499E+00, 0.2793499E+00, 0.2743510E+00, 0.2726193E+00, &
     & 0.2712505E+00, 0.2703143E+00, 0.2686644E+00, 0.2658533E+00, &
     & 0.2622427E+00, 0.2579192E+00, 0.2532169E+00, 0.2466884E+00, &
     & 0.2390685E+00, 0.2318930E+00, 0.2215886E+00, 0.2080188E+00, &
     & 0.1940193E+00, 0.1757022E+00, 0.1433594E+00, 0.1433594E+00 /
! Solar Zenith Angle 25.0 Albedo  0.2495306E+00
      data (ref_adm(18,iz, 1, 6),iz = 1,20) / &
     & 0.2433249E+00, 0.2433249E+00, 0.2394473E+00, 0.2367879E+00, &
     & 0.2347018E+00, 0.2333894E+00, 0.3440600E+00, 0.2338645E+00, &
     & 0.2356752E+00, 0.2381361E+00, 0.2412271E+00, 0.2459460E+00, &
     & 0.2517324E+00, 0.2571777E+00, 0.2646332E+00, 0.2742096E+00, &
     & 0.2733700E+00, 0.2957702E+00, 0.2937806E+00, 0.2937806E+00 /
      data (ref_adm(18,iz, 2, 6),iz = 1,20) / &
     & 0.2433249E+00, 0.2433249E+00, 0.2394473E+00, 0.2367879E+00, &
     & 0.2347018E+00, 0.2333894E+00, 0.3440600E+00, 0.2338645E+00, &
     & 0.2356752E+00, 0.2381361E+00, 0.2412271E+00, 0.2459460E+00, &
     & 0.2517324E+00, 0.2571777E+00, 0.2646332E+00, 0.2742096E+00, &
     & 0.2733700E+00, 0.2957702E+00, 0.2937806E+00, 0.2937806E+00 /
      data (ref_adm(18,iz, 3, 6),iz = 1,20) / &
     & 0.2433281E+00, 0.2433281E+00, 0.2394753E+00, 0.2368294E+00, &
     & 0.2347441E+00, 0.2334560E+00, 0.2331147E+00, 0.2338756E+00, &
     & 0.2356337E+00, 0.2381306E+00, 0.2411740E+00, 0.2459154E+00, &
     & 0.2516330E+00, 0.2570203E+00, 0.2644856E+00, 0.2739987E+00, &
     & 0.2641000E+00, 0.2953866E+00, 0.8222185E-01, 0.8222185E-01 /
      data (ref_adm(18,iz, 4, 6),iz = 1,20) / &
     & 0.2433407E+00, 0.2433407E+00, 0.2395639E+00, 0.2369376E+00, &
     & 0.2348491E+00, 0.1975800E+00, 0.1686500E+00, 0.2339389E+00, &
     & 0.2356511E+00, 0.1957900E+00, 0.2411012E+00, 0.2457748E+00, &
     & 0.2514312E+00, 0.2567177E+00, 0.2090300E+00, 0.2734420E+00, &
     & 0.2831059E+00, 0.2947622E+00, 0.3137700E+00, 0.3137700E+00 /
      data (ref_adm(18,iz, 5, 6),iz = 1,20) / &
     & 0.2433977E+00, 0.2433977E+00, 0.2396632E+00, 0.2370737E+00, &
     & 0.2349850E+00, 0.2337148E+00, 0.2333682E+00, 0.1545900E+00, &
     & 0.2356657E+00, 0.2380365E+00, 0.2409947E+00, 0.2455580E+00, &
     & 0.2511009E+00, 0.2562659E+00, 0.2634570E+00, 0.2727011E+00, &
     & 0.2822438E+00, 0.2938561E+00, 0.2915345E+00, 0.2915345E+00 /
      data (ref_adm(18,iz, 6, 6),iz = 1,20) / &
     & 0.2434263E+00, 0.2434263E+00, 0.2398193E+00, 0.2372582E+00, &
     & 0.2351935E+00, 0.2339204E+00, 0.2335706E+00, 0.1550900E+00, &
     & 0.1609000E+00, 0.2379805E+00, 0.2408337E+00, 0.2452725E+00, &
     & 0.2506644E+00, 0.2556796E+00, 0.2626547E+00, 0.2716077E+00, &
     & 0.2809373E+00, 0.2416200E+00, 0.2901247E+00, 0.2901247E+00 /
      data (ref_adm(18,iz, 7, 6),iz = 1,20) / &
     & 0.2291600E+00, 0.2291600E+00, 0.2399731E+00, 0.2374741E+00, &
     & 0.2354809E+00, 0.2342058E+00, 0.2338012E+00, 0.2343302E+00, &
     & 0.1710700E+00, 0.2379503E+00, 0.2406666E+00, 0.2449553E+00, &
     & 0.2502046E+00, 0.2550386E+00, 0.2617217E+00, 0.2704301E+00, &
     & 0.2795660E+00, 0.2910201E+00, 0.2884314E+00, 0.2884314E+00 /
      data (ref_adm(18,iz, 8, 6),iz = 1,20) / &
     & 0.2435413E+00, 0.2435413E+00, 0.2401608E+00, 0.2377543E+00, &
     & 0.2357816E+00, 0.2345190E+00, 0.2340853E+00, 0.2345515E+00, &
     & 0.2358403E+00, 0.2378728E+00, 0.2404871E+00, 0.2445947E+00, &
     & 0.2495950E+00, 0.2542225E+00, 0.2606159E+00, 0.2690410E+00, &
     & 0.2777979E+00, 0.2891329E+00, 0.2864756E+00, 0.2864756E+00 /
      data (ref_adm(18,iz, 9, 6),iz = 1,20) / &
     & 0.2436048E+00, 0.2436048E+00, 0.2403878E+00, 0.2380594E+00, &
     & 0.2361437E+00, 0.2348969E+00, 0.2344478E+00, 0.2348372E+00, &
     & 0.2359541E+00, 0.2378671E+00, 0.2403571E+00, 0.2442508E+00, &
     & 0.2489748E+00, 0.2534402E+00, 0.2595510E+00, 0.2675409E+00, &
     & 0.2759391E+00, 0.2869953E+00, 0.2843976E+00, 0.2843976E+00 /
      data (ref_adm(18,iz,10, 6),iz = 1,20) / &
     & 0.2436871E+00, 0.2436871E+00, 0.2619100E+00, 0.2383980E+00, &
     & 0.3256200E+00, 0.2353244E+00, 0.2348579E+00, 0.2351548E+00, &
     & 0.2361809E+00, 0.2379125E+00, 0.2401964E+00, 0.2438718E+00, &
     & 0.2484142E+00, 0.2525838E+00, 0.2583449E+00, 0.2658873E+00, &
     & 0.2739778E+00, 0.2845649E+00, 0.2818210E+00, 0.2818210E+00 /
      data (ref_adm(18,iz,11, 6),iz = 1,20) / &
     & 0.2008800E+00, 0.2008800E+00, 0.3080300E+00, 0.2942100E+00, &
     & 0.2707000E+00, 0.3016400E+00, 0.2007300E+00, 0.2245700E+00, &
     & 0.1862600E+00, 0.2379481E+00, 0.2400980E+00, 0.2435576E+00, &
     & 0.2477895E+00, 0.2517292E+00, 0.2571738E+00, 0.2642592E+00, &
     & 0.2719728E+00, 0.2819242E+00, 0.2791133E+00, 0.2791133E+00 /
      data (ref_adm(18,iz,12, 6),iz = 1,20) / &
     & 0.2438710E+00, 0.2438710E+00, 0.2412624E+00, 0.2392695E+00, &
     & 0.2375908E+00, 0.2363773E+00, 0.2358673E+00, 0.1859900E+00, &
     & 0.2005000E+00, 0.2028300E+00, 0.2104400E+00, 0.2528100E+00, &
     & 0.1970200E+00, 0.2509407E+00, 0.2560388E+00, 0.2626740E+00, &
     & 0.2698364E+00, 0.2793545E+00, 0.2759843E+00, 0.2759843E+00 /
      data (ref_adm(18,iz,13, 6),iz = 1,20) / &
     & 0.2439564E+00, 0.2439564E+00, 0.2416116E+00, 0.2397604E+00, &
     & 0.2381705E+00, 0.2370444E+00, 0.2364402E+00, 0.2365077E+00, &
     & 0.1567200E+00, 0.2456800E+00, 0.2215700E+00, 0.2254700E+00, &
     & 0.2075400E+00, 0.2262300E+00, 0.2549906E+00, 0.2611604E+00, &
     & 0.2678033E+00, 0.2766818E+00, 0.2726300E+00, 0.2726300E+00 /
      data (ref_adm(18,iz,14, 6),iz = 1,20) / &
     & 0.2440596E+00, 0.2440596E+00, 0.4120000E+00, 0.3891700E+00, &
     & 0.2388056E+00, 0.2377070E+00, 0.2371274E+00, 0.2371041E+00, &
     & 0.2376519E+00, 0.2386546E+00, 0.2402039E+00, 0.1580300E+00, &
     & 0.2234500E+00, 0.2896200E+00, 0.2539893E+00, 0.2597868E+00, &
     & 0.2658835E+00, 0.2740314E+00, 0.2693465E+00, 0.2693465E+00 /
      data (ref_adm(18,iz,15, 6),iz = 1,20) / &
     & 0.2441668E+00, 0.2441668E+00, 0.2424035E+00, 0.4283200E+00, &
     & 0.2395361E+00, 0.2385139E+00, 0.2378984E+00, 0.2377851E+00, &
     & 0.2382712E+00, 0.2390935E+00, 0.2404642E+00, 0.2429596E+00, &
     & 0.2460319E+00, 0.2489761E+00, 0.2531402E+00, 0.2586100E+00, &
     & 0.2641715E+00, 0.2715039E+00, 0.2663538E+00, 0.2663538E+00 /
      data (ref_adm(18,iz,16, 6),iz = 1,20) / &
     & 0.2442912E+00, 0.2442912E+00, 0.2672000E+00, 0.3169100E+00, &
     & 0.3231900E+00, 0.2393395E+00, 0.2387465E+00, 0.2385979E+00, &
     & 0.2389517E+00, 0.2397045E+00, 0.2408601E+00, 0.2430761E+00, &
     & 0.2459458E+00, 0.2486168E+00, 0.2524648E+00, 0.2574311E+00, &
     & 0.2627012E+00, 0.2692596E+00, 0.2634948E+00, 0.2634948E+00 /
      data (ref_adm(18,iz,17, 6),iz = 1,20) / &
     & 0.2444081E+00, 0.2444081E+00, 0.2432804E+00, 0.2421818E+00, &
     & 0.2411543E+00, 0.2402791E+00, 0.2397309E+00, 0.2395360E+00, &
     & 0.2397860E+00, 0.2404226E+00, 0.2414018E+00, 0.2433581E+00, &
     & 0.2459642E+00, 0.2483995E+00, 0.2519214E+00, 0.2565176E+00, &
     & 0.2614353E+00, 0.2672615E+00, 0.2607047E+00, 0.2607047E+00 /
      data (ref_adm(18,iz,18, 6),iz = 1,20) / &
     & 0.3271219E+00, 0.3271219E+00, 0.3157562E+00, 0.3118314E+00, &
     & 0.3090327E+00, 0.3073863E+00, 0.3052095E+00, 0.3021272E+00, &
     & 0.2989385E+00, 0.1668100E+00, 0.2927367E+00, 0.2894212E+00, &
     & 0.2860841E+00, 0.2833081E+00, 0.2795879E+00, 0.2751144E+00, &
     & 0.2711022E+00, 0.2658186E+00, 0.2461121E+00, 0.2461121E+00 /
      data (ref_adm(18,iz,19, 6),iz = 1,20) / &
     & 0.3271219E+00, 0.3271219E+00, 0.3157562E+00, 0.3118315E+00, &
     & 0.3090327E+00, 0.3073863E+00, 0.3052095E+00, 0.3021272E+00, &
     & 0.2989385E+00, 0.2956750E+00, 0.2927367E+00, 0.2894212E+00, &
     & 0.2860841E+00, 0.2833081E+00, 0.2795879E+00, 0.2751144E+00, &
     & 0.2711022E+00, 0.2658186E+00, 0.2461121E+00, 0.2461121E+00 /
      data (ref_adm(18,iz,20, 6),iz = 1,20) / &
     & 0.3271219E+00, 0.3271219E+00, 0.3157562E+00, 0.3118314E+00, &
     & 0.3090327E+00, 0.3073863E+00, 0.3052095E+00, 0.3021272E+00, &
     & 0.2752000E+00, 0.2956750E+00, 0.2927367E+00, 0.2894212E+00, &
     & 0.3488900E+00, 0.2833081E+00, 0.2795879E+00, 0.2751144E+00, &
     & 0.2711022E+00, 0.2658186E+00, 0.2461121E+00, 0.2461121E+00 /
      data (ref_adm(18,iz,21, 6),iz = 1,20) / &
     & 0.3271219E+00, 0.3271219E+00, 0.3157562E+00, 0.3118315E+00, &
     & 0.3090327E+00, 0.3073863E+00, 0.3052095E+00, 0.3021272E+00, &
     & 0.2989385E+00, 0.2956750E+00, 0.2927367E+00, 0.2894212E+00, &
     & 0.2705900E+00, 0.2833081E+00, 0.2795879E+00, 0.2751144E+00, &
     & 0.2711022E+00, 0.2658186E+00, 0.2461121E+00, 0.2461121E+00 /
      data (ref_adm(18,iz,22, 6),iz = 1,20) / &
     & 0.2766222E+00, 0.2766222E+00, 0.3011200E+00, 0.2699573E+00, &
     & 0.2686019E+00, 0.2676747E+00, 0.2660409E+00, 0.2632573E+00, &
     & 0.2596820E+00, 0.2554007E+00, 0.2507443E+00, 0.2442796E+00, &
     & 0.2336600E+00, 0.2296287E+00, 0.2194249E+00, 0.2059876E+00, &
     & 0.1921247E+00, 0.1739865E+00, 0.1419595E+00, 0.1419595E+00 /
      data (ref_adm(18,iz,23, 6),iz = 1,20) / &
     & 0.2766222E+00, 0.2766222E+00, 0.2716720E+00, 0.2699573E+00, &
     & 0.2686019E+00, 0.2676747E+00, 0.2660409E+00, 0.2632572E+00, &
     & 0.2596820E+00, 0.2554007E+00, 0.2507443E+00, 0.2442796E+00, &
     & 0.2367340E+00, 0.2296287E+00, 0.1990400E+00, 0.2163100E+00, &
     & 0.2541600E+00, 0.1739865E+00, 0.1419595E+00, 0.1419595E+00 /
      data (ref_adm(18,iz,24, 6),iz = 1,20) / &
     & 0.2766222E+00, 0.2766222E+00, 0.5344700E+00, 0.2699573E+00, &
     & 0.2686019E+00, 0.2676747E+00, 0.2660409E+00, 0.2632573E+00, &
     & 0.2596820E+00, 0.2554007E+00, 0.2507443E+00, 0.2442796E+00, &
     & 0.2367340E+00, 0.2296287E+00, 0.2194249E+00, 0.2277200E+00, &
     & 0.1921247E+00, 0.1739865E+00, 0.1419595E+00, 0.1419595E+00 /
      data (ref_adm(18,iz,25, 6),iz = 1,20) / &
     & 0.2766222E+00, 0.2766222E+00, 0.2716720E+00, 0.2699573E+00, &
     & 0.2686019E+00, 0.3587200E+00, 0.3883300E+00, 0.2632572E+00, &
     & 0.2596820E+00, 0.2554007E+00, 0.2507443E+00, 0.2442796E+00, &
     & 0.2367340E+00, 0.2296287E+00, 0.2194249E+00, 0.2059876E+00, &
     & 0.1921247E+00, 0.1739865E+00, 0.1419595E+00, 0.1419595E+00 /
      data (ref_adm(18,iz,26, 6),iz = 1,20) / &
     & 0.2766222E+00, 0.2766222E+00, 0.2716720E+00, 0.2699573E+00, &
     & 0.2686019E+00, 0.2676747E+00, 0.2660409E+00, 0.2632573E+00, &
     & 0.2596820E+00, 0.2554007E+00, 0.2507443E+00, 0.2442796E+00, &
     & 0.2367340E+00, 0.2122700E+00, 0.2430300E+00, 0.2059876E+00, &
     & 0.1921247E+00, 0.1739865E+00, 0.1419595E+00, 0.1419595E+00 /
      data (ref_adm(18,iz,27, 6),iz = 1,20) / &
     & 0.2766222E+00, 0.2766222E+00, 0.2716720E+00, 0.2699573E+00, &
     & 0.2686019E+00, 0.2676747E+00, 0.2006200E+00, 0.2009600E+00, &
     & 0.2596820E+00, 0.2554007E+00, 0.2507443E+00, 0.2442796E+00, &
     & 0.2367340E+00, 0.2296287E+00, 0.2194249E+00, 0.2059876E+00, &
     & 0.1921247E+00, 0.1739865E+00, 0.1419595E+00, 0.1419595E+00 /
      data (ref_adm(18,iz,28, 6),iz = 1,20) / &
     & 0.2766222E+00, 0.2766222E+00, 0.2716720E+00, 0.2699573E+00, &
     & 0.2686019E+00, 0.2354400E+00, 0.2287800E+00, 0.2326100E+00, &
     & 0.2540500E+00, 0.2554007E+00, 0.2507443E+00, 0.2442796E+00, &
     & 0.2367340E+00, 0.2296287E+00, 0.2194249E+00, 0.2059876E+00, &
     & 0.1921247E+00, 0.1739865E+00, 0.1419595E+00, 0.1419595E+00 /
      data (ref_adm(18,iz,29, 6),iz = 1,20) / &
     & 0.2766222E+00, 0.2766222E+00, 0.2716720E+00, 0.2699573E+00, &
     & 0.2404600E+00, 0.2534000E+00, 0.2660409E+00, 0.2632572E+00, &
     & 0.2596820E+00, 0.2813200E+00, 0.2507443E+00, 0.2442796E+00, &
     & 0.2367340E+00, 0.2296287E+00, 0.2194249E+00, 0.2059876E+00, &
     & 0.1921247E+00, 0.1739865E+00, 0.1419595E+00, 0.1419595E+00 /
      data (ref_adm(18,iz,30, 6),iz = 1,20) / &
     & 0.2463900E+00, 0.2463900E+00, 0.2364000E+00, 0.2387100E+00, &
     & 0.2297300E+00, 0.2676747E+00, 0.2660409E+00, 0.2632573E+00, &
     & 0.2596820E+00, 0.2554007E+00, 0.2507443E+00, 0.2442796E+00, &
     & 0.2367340E+00, 0.2296287E+00, 0.2194249E+00, 0.2059876E+00, &
     & 0.1921247E+00, 0.1739865E+00, 0.1419595E+00, 0.1419595E+00 /
      data (ref_adm(18,iz,31, 6),iz = 1,20) / &
     & 0.2037700E+00, 0.2037700E+00, 0.2096400E+00, 0.2285100E+00, &
     & 0.2319800E+00, 0.2676747E+00, 0.1998000E+00, 0.2632572E+00, &
     & 0.3017200E+00, 0.2554007E+00, 0.2507443E+00, 0.2442796E+00, &
     & 0.2367340E+00, 0.2296287E+00, 0.2194249E+00, 0.2059876E+00, &
     & 0.1921247E+00, 0.1739865E+00, 0.1419595E+00, 0.1419595E+00 /
      data (ref_adm(18,iz,32, 6),iz = 1,20) / &
     & 0.2143500E+00, 0.2143500E+00, 0.2667000E+00, 0.2889400E+00, &
     & 0.2686019E+00, 0.2676747E+00, 0.2660409E+00, 0.2632573E+00, &
     & 0.2596820E+00, 0.2558600E+00, 0.2507443E+00, 0.2442796E+00, &
     & 0.2367340E+00, 0.2296287E+00, 0.2194249E+00, 0.2059876E+00, &
     & 0.1921247E+00, 0.1739865E+00, 0.1419595E+00, 0.1419595E+00 /
      data (ref_adm(18,iz,33, 6),iz = 1,20) / &
     & 0.2080500E+00, 0.2080500E+00, 0.1946200E+00, 0.2699573E+00, &
     & 0.2686019E+00, 0.2676747E+00, 0.2660409E+00, 0.2632572E+00, &
     & 0.2596820E+00, 0.2605200E+00, 0.2507443E+00, 0.2442796E+00, &
     & 0.2367340E+00, 0.2296287E+00, 0.2194249E+00, 0.2059876E+00, &
     & 0.1921247E+00, 0.1739865E+00, 0.1419595E+00, 0.1419595E+00 /
      data (ref_adm(18,iz,34, 6),iz = 1,20) / &
     & 0.2708300E+00, 0.2708300E+00, 0.3030400E+00, 0.2699573E+00, &
     & 0.2686019E+00, 0.2676747E+00, 0.2660409E+00, 0.2632573E+00, &
     & 0.2596820E+00, 0.2836800E+00, 0.2507443E+00, 0.3063900E+00, &
     & 0.2367340E+00, 0.2296287E+00, 0.2194249E+00, 0.2059876E+00, &
     & 0.1921247E+00, 0.1739865E+00, 0.1419595E+00, 0.1419595E+00 /
      data (ref_adm(18,iz,35, 6),iz = 1,20) / &
     & 0.2852800E+00, 0.2852800E+00, 0.2716720E+00, 0.2699573E+00, &
     & 0.2686019E+00, 0.2676747E+00, 0.2660409E+00, 0.2632572E+00, &
     & 0.2596820E+00, 0.2554007E+00, 0.3053700E+00, 0.2442796E+00, &
     & 0.2367340E+00, 0.2296287E+00, 0.2194249E+00, 0.2059876E+00, &
     & 0.1921247E+00, 0.1739865E+00, 0.1419595E+00, 0.1419595E+00 /
      data (ref_adm(18,iz,36, 6),iz = 1,20) / &
     & 0.2766222E+00, 0.2766222E+00, 0.2716720E+00, 0.2699573E+00, &
     & 0.2686019E+00, 0.2676747E+00, 0.2660409E+00, 0.2632573E+00, &
     & 0.2596820E+00, 0.2554007E+00, 0.2507443E+00, 0.2442796E+00, &
     & 0.2367340E+00, 0.2296287E+00, 0.2194249E+00, 0.2059876E+00, &
     & 0.1921247E+00, 0.1739865E+00, 0.1419595E+00, 0.1419595E+00 /
      data (ref_adm(18,iz,37, 6),iz = 1,20) / &
     & 0.2766222E+00, 0.2766222E+00, 0.2716720E+00, 0.2699573E+00, &
     & 0.2686019E+00, 0.2676747E+00, 0.2660409E+00, 0.2632573E+00, &
     & 0.2596820E+00, 0.2554007E+00, 0.2507443E+00, 0.2442796E+00, &
     & 0.2367340E+00, 0.2296287E+00, 0.2194249E+00, 0.2059876E+00, &
     & 0.1921247E+00, 0.1739865E+00, 0.1419595E+00, 0.1419595E+00 /
      data (ref_adm(18,iz,38, 6),iz = 1,20) / &
     & 0.2766222E+00, 0.2766222E+00, 0.2716720E+00, 0.2699573E+00, &
     & 0.2686019E+00, 0.2676747E+00, 0.2660409E+00, 0.2632573E+00, &
     & 0.2596820E+00, 0.2554007E+00, 0.2507443E+00, 0.2442796E+00, &
     & 0.2367340E+00, 0.2296287E+00, 0.2194249E+00, 0.2059876E+00, &
     & 0.1921247E+00, 0.1739865E+00, 0.1419595E+00, 0.1419595E+00 /
! Solar Zenith Angle 30.0 Albedo  0.2478588E+00
      data (ref_adm(18,iz, 1, 7),iz = 1,20) / &
     & 0.2273788E+00, 0.2273788E+00, 0.2245020E+00, 0.2269919E+00, &
     & 0.2387800E+00, 0.2281747E+00, 0.2259207E+00, 0.2346800E+00, &
     & 0.1607100E+00, 0.2256659E+00, 0.1704500E+00, 0.2218700E+00, &
     & 0.2452562E+00, 0.2543992E+00, 0.2661335E+00, 0.2796928E+00, &
     & 0.2898279E+00, 0.2911511E+00, 0.2580588E+00, 0.2580588E+00 /
      data (ref_adm(18,iz, 2, 7),iz = 1,20) / &
     & 0.2273788E+00, 0.2273788E+00, 0.2245020E+00, 0.2269919E+00, &
     & 0.2387800E+00, 0.2281747E+00, 0.2259207E+00, 0.2346800E+00, &
     & 0.1607100E+00, 0.2256659E+00, 0.1704500E+00, 0.2218700E+00, &
     & 0.2452562E+00, 0.2543992E+00, 0.2661335E+00, 0.2796928E+00, &
     & 0.2898279E+00, 0.2911511E+00, 0.2580588E+00, 0.2580588E+00 /
      data (ref_adm(18,iz, 3, 7),iz = 1,20) / &
     & 0.2273684E+00, 0.2273684E+00, 0.2245312E+00, 0.2270045E+00, &
     & 0.2295104E+00, 0.2282530E+00, 0.2259759E+00, 0.2244613E+00, &
     & 0.2202800E+00, 0.2256761E+00, 0.1393300E+00, 0.2356997E+00, &
     & 0.2452738E+00, 0.2540126E+00, 0.2660901E+00, 0.2795093E+00, &
     & 0.2893700E+00, 0.2908165E+00, 0.3611987E-01, 0.3611987E-01 /
      data (ref_adm(18,iz, 4, 7),iz = 1,20) / &
     & 0.2273390E+00, 0.2273390E+00, 0.2245827E+00, 0.2270521E+00, &
     & 0.2532100E+00, 0.2284771E+00, 0.2259728E+00, 0.2244555E+00, &
     & 0.2620300E+00, 0.2257795E+00, 0.2290325E+00, 0.2357823E+00, &
     & 0.2452383E+00, 0.2539430E+00, 0.2282100E+00, 0.2868400E+00, &
     & 0.2893158E+00, 0.2904713E+00, 0.2578354E+00, 0.2578354E+00 /
      data (ref_adm(18,iz, 5, 7),iz = 1,20) / &
     & 0.2274487E+00, 0.2274487E+00, 0.2809100E+00, 0.2270709E+00, &
     & 0.1883800E+00, 0.1764400E+00, 0.2262545E+00, 0.2244811E+00, &
     & 0.2241596E+00, 0.2486300E+00, 0.2291071E+00, 0.2356514E+00, &
     & 0.2451100E+00, 0.2496200E+00, 0.2373600E+00, 0.2793442E+00, &
     & 0.2274000E+00, 0.2903085E+00, 0.2575555E+00, 0.2575555E+00 /
      data (ref_adm(18,iz, 6, 7),iz = 1,20) / &
     & 0.2276459E+00, 0.2276459E+00, 0.2247049E+00, 0.2270351E+00, &
     & 0.2297138E+00, 0.2287547E+00, 0.2264215E+00, 0.1478400E+00, &
     & 0.1629100E+00, 0.2259246E+00, 0.2291639E+00, 0.2356827E+00, &
     & 0.2449794E+00, 0.2032000E+00, 0.2627500E+00, 0.2730000E+00, &
     & 0.2888872E+00, 0.2898349E+00, 0.2572620E+00, 0.2572620E+00 /
      data (ref_adm(18,iz, 7, 7),iz = 1,20) / &
     & 0.2275174E+00, 0.2275174E+00, 0.1136200E+00, 0.2269511E+00, &
     & 0.2297250E+00, 0.2290819E+00, 0.2265662E+00, 0.2249933E+00, &
     & 0.1609100E+00, 0.1828200E+00, 0.2292508E+00, 0.2357647E+00, &
     & 0.2447312E+00, 0.2348200E+00, 0.2655000E+00, 0.2736600E+00, &
     & 0.2576000E+00, 0.3200300E+00, 0.2568079E+00, 0.2568079E+00 /
      data (ref_adm(18,iz, 8, 7),iz = 1,20) / &
     & 0.1880100E+00, 0.1880100E+00, 0.2246728E+00, 0.2268795E+00, &
     & 0.2297925E+00, 0.2292932E+00, 0.2269675E+00, 0.2251641E+00, &
     & 0.1779000E+00, 0.1689600E+00, 0.2292446E+00, 0.3066800E+00, &
     & 0.2445018E+00, 0.2534787E+00, 0.2350500E+00, 0.2858400E+00, &
     & 0.2760600E+00, 0.2787600E+00, 0.2562991E+00, 0.2562991E+00 /
      data (ref_adm(18,iz, 9, 7),iz = 1,20) / &
     & 0.2278117E+00, 0.2278117E+00, 0.2246756E+00, 0.2266659E+00, &
     & 0.2298230E+00, 0.2296335E+00, 0.2272774E+00, 0.2254361E+00, &
     & 0.2249923E+00, 0.2262484E+00, 0.2293669E+00, 0.2356118E+00, &
     & 0.2443175E+00, 0.2532068E+00, 0.2862700E+00, 0.2470500E+00, &
     & 0.2914900E+00, 0.2879151E+00, 0.2557185E+00, 0.2557185E+00 /
      data (ref_adm(18,iz,10, 7),iz = 1,20) / &
     & 0.2288100E+00, 0.2288100E+00, 0.2089700E+00, 0.2732600E+00, &
     & 0.2300583E+00, 0.2299555E+00, 0.2278184E+00, 0.2258401E+00, &
     & 0.2252597E+00, 0.2263312E+00, 0.2295662E+00, 0.3146500E+00, &
     & 0.2441524E+00, 0.1765900E+00, 0.2797900E+00, 0.2648700E+00, &
     & 0.2864918E+00, 0.2872825E+00, 0.2550737E+00, 0.2550737E+00 /
      data (ref_adm(18,iz,11, 7),iz = 1,20) / &
     & 0.2726900E+00, 0.2726900E+00, 0.3197300E+00, 0.2518900E+00, &
     & 0.2297400E+00, 0.2205400E+00, 0.2383100E+00, 0.2441500E+00, &
     & 0.1998200E+00, 0.2672900E+00, 0.2295314E+00, 0.2355500E+00, &
     & 0.2438129E+00, 0.2401800E+00, 0.2341700E+00, 0.2764977E+00, &
     & 0.2858573E+00, 0.2865411E+00, 0.2544225E+00, 0.2544225E+00 /
      data (ref_adm(18,iz,12, 7),iz = 1,20) / &
     & 0.2588100E+00, 0.2588100E+00, 0.3125200E+00, 0.2263643E+00, &
     & 0.1969500E+00, 0.3821800E+00, 0.2286000E+00, 0.2781700E+00, &
     & 0.2042300E+00, 0.2434800E+00, 0.1933200E+00, 0.2722600E+00, &
     & 0.2436822E+00, 0.2520395E+00, 0.2629555E+00, 0.2756372E+00, &
     & 0.2849991E+00, 0.2857136E+00, 0.2536497E+00, 0.2536497E+00 /
      data (ref_adm(18,iz,13, 7),iz = 1,20) / &
     & 0.2501800E+00, 0.2501800E+00, 0.2248193E+00, 0.2373600E+00, &
     & 0.2877400E+00, 0.3300500E+00, 0.2095100E+00, 0.2172800E+00, &
     & 0.1844400E+00, 0.2669800E+00, 0.2379600E+00, 0.1748100E+00, &
     & 0.2018800E+00, 0.1873500E+00, 0.2623923E+00, 0.2749240E+00, &
     & 0.2840370E+00, 0.2847999E+00, 0.2528925E+00, 0.2528925E+00 /
      data (ref_adm(18,iz,14, 7),iz = 1,20) / &
     & 0.2079500E+00, 0.2079500E+00, 0.2249118E+00, 0.2859900E+00, &
     & 0.2598600E+00, 0.2596800E+00, 0.2159300E+00, 0.2053600E+00, &
     & 0.2259200E+00, 0.2443900E+00, 0.2527700E+00, 0.2121000E+00, &
     & 0.1700400E+00, 0.2207300E+00, 0.2618766E+00, 0.2740626E+00, &
     & 0.2832510E+00, 0.2838338E+00, 0.2521296E+00, 0.2521296E+00 /
      data (ref_adm(18,iz,15, 7),iz = 1,20) / &
     & 0.2367500E+00, 0.2367500E+00, 0.1895300E+00, 0.2257190E+00, &
     & 0.2454300E+00, 0.2563400E+00, 0.2186400E+00, 0.2243600E+00, &
     & 0.2271527E+00, 0.2278983E+00, 0.2301918E+00, 0.2388300E+00, &
     & 0.2493700E+00, 0.2262300E+00, 0.2612203E+00, 0.2731946E+00, &
     & 0.2821805E+00, 0.2828191E+00, 0.2513848E+00, 0.2513848E+00 /
      data (ref_adm(18,iz,16, 7),iz = 1,20) / &
     & 0.2552700E+00, 0.2552700E+00, 0.2251830E+00, 0.2723700E+00, &
     & 0.2427000E+00, 0.2300100E+00, 0.2861700E+00, 0.2289269E+00, &
     & 0.2277522E+00, 0.2283217E+00, 0.2303696E+00, 0.2358648E+00, &
     & 0.3074900E+00, 0.2502993E+00, 0.2607428E+00, 0.2724961E+00, &
     & 0.2813241E+00, 0.2818972E+00, 0.2506329E+00, 0.2506329E+00 /
      data (ref_adm(18,iz,17, 7),iz = 1,20) / &
     & 0.2331600E+00, 0.2331600E+00, 0.3038400E+00, 0.2389600E+00, &
     & 0.2761200E+00, 0.2478600E+00, 0.2333900E+00, 0.1609900E+00, &
     & 0.2281948E+00, 0.2287273E+00, 0.2307374E+00, 0.2850700E+00, &
     & 0.2542700E+00, 0.2497358E+00, 0.2600964E+00, 0.2715496E+00, &
     & 0.2803040E+00, 0.2807155E+00, 0.2499406E+00, 0.2499406E+00 /
      data (ref_adm(18,iz,18, 7),iz = 1,20) / &
     & 0.2596340E+00, 0.2596340E+00, 0.2342700E+00, 0.2873600E+00, &
     & 0.2896500E+00, 0.2529346E+00, 0.2505653E+00, 0.1787200E+00, &
     & 0.2455899E+00, 0.2439390E+00, 0.2428913E+00, 0.2426585E+00, &
     & 0.2427923E+00, 0.2434975E+00, 0.2448053E+00, 0.2461912E+00, &
     & 0.2472694E+00, 0.2463724E+00, 0.2307265E+00, 0.2307265E+00 /
      data (ref_adm(18,iz,19, 7),iz = 1,20) / &
     & 0.2598237E+00, 0.2598237E+00, 0.2567557E+00, 0.2654600E+00, &
     & 0.2706400E+00, 0.2261000E+00, 0.2742700E+00, 0.2485926E+00, &
     & 0.1870600E+00, 0.2444708E+00, 0.3170300E+00, 0.2430690E+00, &
     & 0.2431033E+00, 0.2436810E+00, 0.2449252E+00, 0.2461688E+00, &
     & 0.2471567E+00, 0.2461701E+00, 0.2304067E+00, 0.2304067E+00 /
      data (ref_adm(18,iz,20, 7),iz = 1,20) / &
     & 0.4102500E+00, 0.4102500E+00, 0.2571090E+00, 0.2548066E+00, &
     & 0.2539226E+00, 0.2537340E+00, 0.2519197E+00, 0.2791100E+00, &
     & 0.2468821E+00, 0.2333500E+00, 0.2439201E+00, 0.2434612E+00, &
     & 0.2434414E+00, 0.1992600E+00, 0.2450119E+00, 0.2461650E+00, &
     & 0.2469802E+00, 0.2458396E+00, 0.2301380E+00, 0.2301380E+00 /
      data (ref_adm(18,iz,21, 7),iz = 1,20) / &
     & 0.3135700E+00, 0.3135700E+00, 0.2575251E+00, 0.2552302E+00, &
     & 0.2540811E+00, 0.3700800E+00, 0.3167200E+00, 0.2498481E+00, &
     & 0.2475989E+00, 0.2111000E+00, 0.2445050E+00, 0.2525500E+00, &
     & 0.2438021E+00, 0.2442106E+00, 0.1924900E+00, 0.2462023E+00, &
     & 0.2469579E+00, 0.2455667E+00, 0.2298675E+00, 0.2298675E+00 /
      data (ref_adm(18,iz,22, 7),iz = 1,20) / &
     & 0.2407200E+00, 0.2407200E+00, 0.2849830E+00, 0.3188300E+00, &
     & 0.2536000E+00, 0.3127600E+00, 0.2790761E+00, 0.2761561E+00, &
     & 0.2724055E+00, 0.1452300E+00, 0.1858700E+00, 0.2562485E+00, &
     & 0.2483333E+00, 0.2408797E+00, 0.2301760E+00, 0.2160803E+00, &
     & 0.2015382E+00, 0.1825113E+00, 0.1489151E+00, 0.1489151E+00 /
      data (ref_adm(18,iz,23, 7),iz = 1,20) / &
     & 0.2901758E+00, 0.2901758E+00, 0.2284800E+00, 0.2831843E+00, &
     & 0.2817625E+00, 0.2807899E+00, 0.2736600E+00, 0.2761561E+00, &
     & 0.2724055E+00, 0.2679145E+00, 0.2084500E+00, 0.2391100E+00, &
     & 0.2839600E+00, 0.2339900E+00, 0.2301760E+00, 0.2160803E+00, &
     & 0.2015382E+00, 0.1825113E+00, 0.1489151E+00, 0.1489151E+00 /
      data (ref_adm(18,iz,24, 7),iz = 1,20) / &
     & 0.2901758E+00, 0.2901758E+00, 0.2026500E+00, 0.2831842E+00, &
     & 0.2508000E+00, 0.2807899E+00, 0.2790761E+00, 0.2447100E+00, &
     & 0.2724055E+00, 0.2679145E+00, 0.2370800E+00, 0.2791800E+00, &
     & 0.2551700E+00, 0.2275400E+00, 0.2739600E+00, 0.2160803E+00, &
     & 0.2015382E+00, 0.1825113E+00, 0.1489151E+00, 0.1489151E+00 /
      data (ref_adm(18,iz,25, 7),iz = 1,20) / &
     & 0.2901758E+00, 0.2901758E+00, 0.3556400E+00, 0.2685000E+00, &
     & 0.2600400E+00, 0.2807899E+00, 0.2790761E+00, 0.2972000E+00, &
     & 0.2724055E+00, 0.2679145E+00, 0.2484100E+00, 0.2474200E+00, &
     & 0.2483333E+00, 0.2281500E+00, 0.2404300E+00, 0.2348500E+00, &
     & 0.2015382E+00, 0.1825113E+00, 0.1489151E+00, 0.1489151E+00 /
      data (ref_adm(18,iz,26, 7),iz = 1,20) / &
     & 0.2300300E+00, 0.2300300E+00, 0.2849830E+00, 0.2831842E+00, &
     & 0.2923000E+00, 0.2945500E+00, 0.2859400E+00, 0.2761561E+00, &
     & 0.2724055E+00, 0.2679145E+00, 0.2534900E+00, 0.2635500E+00, &
     & 0.2962400E+00, 0.2420400E+00, 0.2346600E+00, 0.2160803E+00, &
     & 0.2015382E+00, 0.1825113E+00, 0.1489151E+00, 0.1489151E+00 /
      data (ref_adm(18,iz,27, 7),iz = 1,20) / &
     & 0.2327200E+00, 0.2327200E+00, 0.2218300E+00, 0.2947000E+00, &
     & 0.3057900E+00, 0.2588300E+00, 0.2873500E+00, 0.2761561E+00, &
     & 0.2724055E+00, 0.2679145E+00, 0.2630300E+00, 0.2629200E+00, &
     & 0.1905600E+00, 0.2408797E+00, 0.2909000E+00, 0.2440900E+00, &
     & 0.2015382E+00, 0.1825113E+00, 0.1489151E+00, 0.1489151E+00 /
      data (ref_adm(18,iz,28, 7),iz = 1,20) / &
     & 0.2478200E+00, 0.2478200E+00, 0.2064300E+00, 0.2801500E+00, &
     & 0.3121300E+00, 0.2672800E+00, 0.2790761E+00, 0.2761561E+00, &
     & 0.2724055E+00, 0.2679145E+00, 0.2630300E+00, 0.2562485E+00, &
     & 0.2483333E+00, 0.2408797E+00, 0.2301760E+00, 0.2449100E+00, &
     & 0.2015382E+00, 0.1825113E+00, 0.1489151E+00, 0.1489151E+00 /
      data (ref_adm(18,iz,29, 7),iz = 1,20) / &
     & 0.2901758E+00, 0.2901758E+00, 0.2598100E+00, 0.2367100E+00, &
     & 0.2796900E+00, 0.2567700E+00, 0.2609600E+00, 0.3236800E+00, &
     & 0.2724055E+00, 0.2679145E+00, 0.2630300E+00, 0.2562485E+00, &
     & 0.2483333E+00, 0.2408797E+00, 0.2513800E+00, 0.3090000E+00, &
     & 0.2763800E+00, 0.1825113E+00, 0.1489151E+00, 0.1489151E+00 /
      data (ref_adm(18,iz,30, 7),iz = 1,20) / &
     & 0.2773000E+00, 0.2773000E+00, 0.2849830E+00, 0.3195200E+00, &
     & 0.2733300E+00, 0.2483700E+00, 0.2953700E+00, 0.2700400E+00, &
     & 0.2657100E+00, 0.2679145E+00, 0.2630300E+00, 0.2562485E+00, &
     & 0.2483333E+00, 0.2408797E+00, 0.2852900E+00, 0.2160803E+00, &
     & 0.2015382E+00, 0.1825113E+00, 0.1489151E+00, 0.1489151E+00 /
      data (ref_adm(18,iz,31, 7),iz = 1,20) / &
     & 0.2901758E+00, 0.2901758E+00, 0.2849830E+00, 0.2831843E+00, &
     & 0.2817625E+00, 0.2807899E+00, 0.2790761E+00, 0.3361100E+00, &
     & 0.3247100E+00, 0.2679145E+00, 0.2630300E+00, 0.3343800E+00, &
     & 0.2483333E+00, 0.2408797E+00, 0.2301760E+00, 0.2160803E+00, &
     & 0.2015382E+00, 0.1825113E+00, 0.1489151E+00, 0.1489151E+00 /
      data (ref_adm(18,iz,32, 7),iz = 1,20) / &
     & 0.2901758E+00, 0.2901758E+00, 0.2849830E+00, 0.2831842E+00, &
     & 0.2817625E+00, 0.2807899E+00, 0.2790761E+00, 0.3578000E+00, &
     & 0.2724055E+00, 0.2679145E+00, 0.2630300E+00, 0.2562485E+00, &
     & 0.2483333E+00, 0.2662200E+00, 0.2301760E+00, 0.2160803E+00, &
     & 0.2015382E+00, 0.1825113E+00, 0.1489151E+00, 0.1489151E+00 /
      data (ref_adm(18,iz,33, 7),iz = 1,20) / &
     & 0.2901758E+00, 0.2901758E+00, 0.2849830E+00, 0.2831843E+00, &
     & 0.2817625E+00, 0.2807899E+00, 0.2790761E+00, 0.2761561E+00, &
     & 0.2724055E+00, 0.2679145E+00, 0.2630300E+00, 0.2562485E+00, &
     & 0.2483333E+00, 0.2408797E+00, 0.2301760E+00, 0.2160803E+00, &
     & 0.2015382E+00, 0.1825113E+00, 0.1489151E+00, 0.1489151E+00 /
      data (ref_adm(18,iz,34, 7),iz = 1,20) / &
     & 0.2585400E+00, 0.2585400E+00, 0.2849830E+00, 0.2831842E+00, &
     & 0.2817625E+00, 0.2652000E+00, 0.2790761E+00, 0.2761561E+00, &
     & 0.2724055E+00, 0.2679145E+00, 0.2630300E+00, 0.2562485E+00, &
     & 0.2483333E+00, 0.2408797E+00, 0.2301760E+00, 0.2160803E+00, &
     & 0.2015382E+00, 0.1825113E+00, 0.1489151E+00, 0.1489151E+00 /
      data (ref_adm(18,iz,35, 7),iz = 1,20) / &
     & 0.2798300E+00, 0.2798300E+00, 0.2849830E+00, 0.2831843E+00, &
     & 0.2817625E+00, 0.2807899E+00, 0.2790761E+00, 0.2761561E+00, &
     & 0.2724055E+00, 0.2679145E+00, 0.2630300E+00, 0.2562485E+00, &
     & 0.2483333E+00, 0.2408797E+00, 0.2301760E+00, 0.2160803E+00, &
     & 0.2015382E+00, 0.1825113E+00, 0.1489151E+00, 0.1489151E+00 /
      data (ref_adm(18,iz,36, 7),iz = 1,20) / &
     & 0.2901758E+00, 0.2901758E+00, 0.2849830E+00, 0.2831842E+00, &
     & 0.2817625E+00, 0.2807899E+00, 0.2790761E+00, 0.2761561E+00, &
     & 0.2724055E+00, 0.2679145E+00, 0.2630300E+00, 0.2562485E+00, &
     & 0.2483333E+00, 0.2408797E+00, 0.2301760E+00, 0.2160803E+00, &
     & 0.2015382E+00, 0.1825113E+00, 0.1489151E+00, 0.1489151E+00 /
      data (ref_adm(18,iz,37, 7),iz = 1,20) / &
     & 0.2901758E+00, 0.2901758E+00, 0.2849830E+00, 0.2831842E+00, &
     & 0.2817625E+00, 0.2807899E+00, 0.2790761E+00, 0.2761561E+00, &
     & 0.2333700E+00, 0.2679145E+00, 0.2630300E+00, 0.2562485E+00, &
     & 0.2483333E+00, 0.2408797E+00, 0.2301760E+00, 0.2160803E+00, &
     & 0.2015382E+00, 0.1825113E+00, 0.1489151E+00, 0.1489151E+00 /
      data (ref_adm(18,iz,38, 7),iz = 1,20) / &
     & 0.2901758E+00, 0.2901758E+00, 0.2849830E+00, 0.2831842E+00, &
     & 0.2817625E+00, 0.2807899E+00, 0.2790761E+00, 0.2761561E+00, &
     & 0.2333700E+00, 0.2679145E+00, 0.2630300E+00, 0.2562485E+00, &
     & 0.2483333E+00, 0.2408797E+00, 0.2301760E+00, 0.2160803E+00, &
     & 0.2015382E+00, 0.1825113E+00, 0.1489151E+00, 0.1489151E+00 /
! Solar Zenith Angle 35.0 Albedo  0.2616071E+00
      data (ref_adm(18,iz, 1, 8),iz = 1,20) / &
     & 0.2625000E+00, 0.2625000E+00, 0.2509400E+00, 0.2556400E+00, &
     & 0.2265800E+00, 0.3293600E+00, 0.2411261E+00, 0.2386062E+00, &
     & 0.1458600E+00, 0.2379745E+00, 0.2408659E+00, 0.2579800E+00, &
     & 0.1919900E+00, 0.2499500E+00, 0.2700400E+00, 0.2995000E+00, &
     & 0.2795500E+00, 0.2904212E+00, 0.2553653E+00, 0.2553653E+00 /
      data (ref_adm(18,iz, 2, 8),iz = 1,20) / &
     & 0.2625000E+00, 0.2625000E+00, 0.2509400E+00, 0.2556400E+00, &
     & 0.2265800E+00, 0.3293600E+00, 0.2411261E+00, 0.2386062E+00, &
     & 0.1458600E+00, 0.2379745E+00, 0.2408659E+00, 0.2579800E+00, &
     & 0.1919900E+00, 0.2499500E+00, 0.2700400E+00, 0.2995000E+00, &
     & 0.2795500E+00, 0.2904212E+00, 0.2553653E+00, 0.2553653E+00 /
      data (ref_adm(18,iz, 3, 8),iz = 1,20) / &
     & 0.1909900E+00, 0.1909900E+00, 0.2507900E+00, 0.2512000E+00, &
     & 0.2914700E+00, 0.1920800E+00, 0.2412225E+00, 0.2388623E+00, &
     & 0.2375822E+00, 0.2379798E+00, 0.2409215E+00, 0.2369400E+00, &
     & 0.1756900E+00, 0.2471000E+00, 0.2600200E+00, 0.3781800E+00, &
     & 0.2574200E+00, 0.2902632E+00, 0.4044393E-01, 0.4044393E-01 /
      data (ref_adm(18,iz, 4, 8),iz = 1,20) / &
     & 0.2499500E+00, 0.2499500E+00, 0.2436600E+00, 0.1937900E+00, &
     & 0.3111300E+00, 0.2443325E+00, 0.1763800E+00, 0.2390708E+00, &
     & 0.2374721E+00, 0.2381418E+00, 0.2408339E+00, 0.1872300E+00, &
     & 0.2538444E+00, 0.2604700E+00, 0.2723401E+00, 0.2497700E+00, &
     & 0.2915913E+00, 0.2897968E+00, 0.2552701E+00, 0.2552701E+00 /
      data (ref_adm(18,iz, 5, 8),iz = 1,20) / &
     & 0.2801100E+00, 0.2801100E+00, 0.2373795E+00, 0.1631600E+00, &
     & 0.2706700E+00, 0.2442681E+00, 0.2500900E+00, 0.1772200E+00, &
     & 0.2375864E+00, 0.2381603E+00, 0.2409493E+00, 0.1791900E+00, &
     & 0.1665500E+00, 0.2442100E+00, 0.2265700E+00, 0.2836228E+00, &
     & 0.2917323E+00, 0.2899126E+00, 0.2551073E+00, 0.2551073E+00 /
      data (ref_adm(18,iz, 6, 8),iz = 1,20) / &
     & 0.1784100E+00, 0.1784100E+00, 0.3031400E+00, 0.1974400E+00, &
     & 0.2772500E+00, 0.2444495E+00, 0.2415231E+00, 0.2182600E+00, &
     & 0.1557700E+00, 0.2383846E+00, 0.1518000E+00, 0.1902100E+00, &
     & 0.1824300E+00, 0.2616206E+00, 0.2156800E+00, 0.3178400E+00, &
     & 0.2840500E+00, 0.2895644E+00, 0.2549427E+00, 0.2549427E+00 /
      data (ref_adm(18,iz, 7, 8),iz = 1,20) / &
     & 0.2430889E+00, 0.2430889E+00, 0.2376274E+00, 0.2386518E+00, &
     & 0.2432367E+00, 0.1675200E+00, 0.2417140E+00, 0.3133900E+00, &
     & 0.1438100E+00, 0.2385349E+00, 0.1710200E+00, 0.2184500E+00, &
     & 0.3047000E+00, 0.1672700E+00, 0.2179200E+00, 0.2386800E+00, &
     & 0.3236200E+00, 0.3579900E+00, 0.2547185E+00, 0.2547185E+00 /
      data (ref_adm(18,iz, 8, 8),iz = 1,20) / &
     & 0.2750600E+00, 0.2750600E+00, 0.3107900E+00, 0.3218000E+00, &
     & 0.3246600E+00, 0.3192800E+00, 0.3485800E+00, 0.3105800E+00, &
     & 0.2873100E+00, 0.3021000E+00, 0.2157500E+00, 0.2966300E+00, &
     & 0.2980900E+00, 0.3014900E+00, 0.2659000E+00, 0.3551400E+00, &
     & 0.3474500E+00, 0.2889517E+00, 0.2543343E+00, 0.2543343E+00 /
      data (ref_adm(18,iz, 9, 8),iz = 1,20) / &
     & 0.2876800E+00, 0.2876800E+00, 0.2684400E+00, 0.3346900E+00, &
     & 0.2429714E+00, 0.2451257E+00, 0.2422167E+00, 0.2398969E+00, &
     & 0.2384214E+00, 0.2387911E+00, 0.1830800E+00, 0.2411900E+00, &
     & 0.1955400E+00, 0.2611432E+00, 0.2877300E+00, 0.2827500E+00, &
     & 0.2856200E+00, 0.2884878E+00, 0.2540590E+00, 0.2540590E+00 /
      data (ref_adm(18,iz,10, 8),iz = 1,20) / &
     & 0.3536400E+00, 0.3536400E+00, 0.3161100E+00, 0.3125000E+00, &
     & 0.3090800E+00, 0.2452630E+00, 0.1957700E+00, 0.2374200E+00, &
     & 0.2386587E+00, 0.1655100E+00, 0.2471200E+00, 0.2451400E+00, &
     & 0.2321400E+00, 0.2694900E+00, 0.3043100E+00, 0.2478200E+00, &
     & 0.2897483E+00, 0.3320200E+00, 0.2537133E+00, 0.2537133E+00 /
      data (ref_adm(18,iz,11, 8),iz = 1,20) / &
     & 0.3341600E+00, 0.3341600E+00, 0.2388200E+00, 0.2710100E+00, &
     & 0.4271500E+00, 0.3419000E+00, 0.2428345E+00, 0.2535200E+00, &
     & 0.2386937E+00, 0.1665000E+00, 0.1849200E+00, 0.2447500E+00, &
     & 0.2227200E+00, 0.2608247E+00, 0.2707115E+00, 0.2818933E+00, &
     & 0.2892724E+00, 0.3349300E+00, 0.2533255E+00, 0.2533255E+00 /
      data (ref_adm(18,iz,12, 8),iz = 1,20) / &
     & 0.2513800E+00, 0.2513800E+00, 0.2754900E+00, 0.2549800E+00, &
     & 0.2504800E+00, 0.2601400E+00, 0.2317800E+00, 0.2591100E+00, &
     & 0.2062700E+00, 0.2012200E+00, 0.2370600E+00, 0.2431500E+00, &
     & 0.2779900E+00, 0.2364500E+00, 0.2704442E+00, 0.2813769E+00, &
     & 0.2887286E+00, 0.2871373E+00, 0.2528986E+00, 0.2528986E+00 /
      data (ref_adm(18,iz,13, 8),iz = 1,20) / &
     & 0.2528200E+00, 0.2528200E+00, 0.2765200E+00, 0.2794100E+00, &
     & 0.2612400E+00, 0.2122500E+00, 0.2064800E+00, 0.2395300E+00, &
     & 0.2245500E+00, 0.1944200E+00, 0.2223700E+00, 0.2363200E+00, &
     & 0.2093500E+00, 0.1983300E+00, 0.2796500E+00, 0.2809271E+00, &
     & 0.2881967E+00, 0.2864181E+00, 0.2524625E+00, 0.2524625E+00 /
      data (ref_adm(18,iz,14, 8),iz = 1,20) / &
     & 0.2531700E+00, 0.2531700E+00, 0.2594400E+00, 0.2138000E+00, &
     & 0.2546100E+00, 0.2416300E+00, 0.2537300E+00, 0.2216700E+00, &
     & 0.2387000E+00, 0.2655000E+00, 0.2673500E+00, 0.2182700E+00, &
     & 0.2146900E+00, 0.2037700E+00, 0.2524000E+00, 0.2940500E+00, &
     & 0.3013200E+00, 0.2858839E+00, 0.2520853E+00, 0.2520853E+00 /
      data (ref_adm(18,iz,15, 8),iz = 1,20) / &
     & 0.2625900E+00, 0.2625900E+00, 0.2917100E+00, 0.2152200E+00, &
     & 0.2419408E+00, 0.2462781E+00, 0.1800700E+00, 0.2164700E+00, &
     & 0.2165900E+00, 0.2676300E+00, 0.3256800E+00, 0.2323500E+00, &
     & 0.2668200E+00, 0.2569600E+00, 0.2693578E+00, 0.2795757E+00, &
     & 0.2869083E+00, 0.2851242E+00, 0.2516300E+00, 0.2516300E+00 /
      data (ref_adm(18,iz,16, 8),iz = 1,20) / &
     & 0.2401100E+00, 0.2401100E+00, 0.1705600E+00, 0.2379859E+00, &
     & 0.2296800E+00, 0.2461377E+00, 0.2450150E+00, 0.2426244E+00, &
     & 0.2114300E+00, 0.2093400E+00, 0.2412100E+00, 0.1923900E+00, &
     & 0.2140500E+00, 0.2814500E+00, 0.1861800E+00, 0.2793008E+00, &
     & 0.2865666E+00, 0.2846224E+00, 0.2511844E+00, 0.2511844E+00 /
      data (ref_adm(18,iz,17, 8),iz = 1,20) / &
     & 0.2444774E+00, 0.2444774E+00, 0.2388238E+00, 0.2382734E+00, &
     & 0.1869900E+00, 0.2694600E+00, 0.2457535E+00, 0.2256100E+00, &
     & 0.2955400E+00, 0.2486800E+00, 0.3073200E+00, 0.3637800E+00, &
     & 0.2014100E+00, 0.1933700E+00, 0.2722700E+00, 0.2787536E+00, &
     & 0.2856829E+00, 0.2837689E+00, 0.2507498E+00, 0.2507498E+00 /
      data (ref_adm(18,iz,18, 8),iz = 1,20) / &
     & 0.2568053E+00, 0.2568053E+00, 0.2710600E+00, 0.2022700E+00, &
     & 0.2881500E+00, 0.2532059E+00, 0.2510441E+00, 0.2771900E+00, &
     & 0.4208200E+00, 0.2275300E+00, 0.3958600E+00, 0.3350500E+00, &
     & 0.1746200E+00, 0.1803300E+00, 0.2520000E+00, 0.2543374E+00, &
     & 0.2659000E+00, 0.2561078E+00, 0.2405382E+00, 0.2405382E+00 /
      data (ref_adm(18,iz,19, 8),iz = 1,20) / &
     & 0.2568680E+00, 0.2568680E+00, 0.3855700E+00, 0.2565015E+00, &
     & 0.2952200E+00, 0.2998200E+00, 0.3531100E+00, 0.2375000E+00, &
     & 0.2005100E+00, 0.2179400E+00, 0.2855200E+00, 0.3153100E+00, &
     & 0.2134100E+00, 0.2501749E+00, 0.3145000E+00, 0.2541539E+00, &
     & 0.2557196E+00, 0.2553880E+00, 0.2396473E+00, 0.2396473E+00 /
      data (ref_adm(18,iz,20, 8),iz = 1,20) / &
     & 0.3613200E+00, 0.3613200E+00, 0.2568844E+00, 0.2724600E+00, &
     & 0.2567978E+00, 0.2323300E+00, 0.2536335E+00, 0.2772300E+00, &
     & 0.2636400E+00, 0.2097500E+00, 0.2624500E+00, 0.2299800E+00, &
     & 0.2240500E+00, 0.2193500E+00, 0.2523040E+00, 0.2540801E+00, &
     & 0.2554272E+00, 0.2547550E+00, 0.2389592E+00, 0.2389592E+00 /
      data (ref_adm(18,iz,21, 8),iz = 1,20) / &
     & 0.1863600E+00, 0.1863600E+00, 0.2571858E+00, 0.1944300E+00, &
     & 0.2091100E+00, 0.2655700E+00, 0.2550683E+00, 0.2115800E+00, &
     & 0.2516603E+00, 0.2505145E+00, 0.2460300E+00, 0.2213700E+00, &
     & 0.1919100E+00, 0.2139300E+00, 0.2669300E+00, 0.2540978E+00, &
     & 0.2551935E+00, 0.2541974E+00, 0.2383619E+00, 0.2383619E+00 /
      data (ref_adm(18,iz,22, 8),iz = 1,20) / &
     & 0.1752700E+00, 0.1752700E+00, 0.2488400E+00, 0.2728541E+00, &
     & 0.3290100E+00, 0.2593500E+00, 0.2077900E+00, 0.2269500E+00, &
     & 0.2744053E+00, 0.2439000E+00, 0.2712381E+00, 0.2890900E+00, &
     & 0.2108100E+00, 0.2158500E+00, 0.2037000E+00, 0.2823124E+00, &
     & 0.2823180E+00, 0.2729367E+00, 0.2357739E+00, 0.2357739E+00 /
      data (ref_adm(18,iz,23, 8),iz = 1,20) / &
     & 0.2478200E+00, 0.2478200E+00, 0.3234000E+00, 0.2722096E+00, &
     & 0.2642300E+00, 0.2883800E+00, 0.2814407E+00, 0.2787344E+00, &
     & 0.2762631E+00, 0.2465600E+00, 0.2352800E+00, 0.1906300E+00, &
     & 0.1884600E+00, 0.2433700E+00, 0.3044800E+00, 0.2811748E+00, &
     & 0.2804478E+00, 0.2710885E+00, 0.2347633E+00, 0.2347633E+00 /
      data (ref_adm(18,iz,24, 8),iz = 1,20) / &
     & 0.2705755E+00, 0.2705755E+00, 0.2917400E+00, 0.2794300E+00, &
     & 0.2641000E+00, 0.2791940E+00, 0.1393100E+00, 0.2803239E+00, &
     & 0.2840700E+00, 0.2574600E+00, 0.2733017E+00, 0.2405100E+00, &
     & 0.2240800E+00, 0.2069600E+00, 0.2837200E+00, 0.3127900E+00, &
     & 0.2788394E+00, 0.2693310E+00, 0.2338457E+00, 0.2338457E+00 /
      data (ref_adm(18,iz,25, 8),iz = 1,20) / &
     & 0.2266600E+00, 0.2266600E+00, 0.2635200E+00, 0.2719263E+00, &
     & 0.2736509E+00, 0.2780726E+00, 0.2825142E+00, 0.3982700E+00, &
     & 0.2792932E+00, 0.2440200E+00, 0.2746727E+00, 0.2736973E+00, &
     & 0.3198400E+00, 0.2795400E+00, 0.2767261E+00, 0.2784312E+00, &
     & 0.2774986E+00, 0.2676775E+00, 0.2331217E+00, 0.2331217E+00 /
      data (ref_adm(18,iz,26, 8),iz = 1,20) / &
     & 0.2712300E+00, 0.2712300E+00, 0.3130100E+00, 0.2344600E+00, &
     & 0.2069700E+00, 0.1941300E+00, 0.2765500E+00, 0.2679400E+00, &
     & 0.2808996E+00, 0.2423400E+00, 0.1878200E+00, 0.2092200E+00, &
     & 0.2746973E+00, 0.2786700E+00, 0.3163600E+00, 0.3076200E+00, &
     & 0.2237200E+00, 0.1907000E+00, 0.2323567E+00, 0.2323567E+00 /
      data (ref_adm(18,iz,27, 8),iz = 1,20) / &
     & 0.2721500E+00, 0.2721500E+00, 0.2736300E+00, 0.2836500E+00, &
     & 0.2404100E+00, 0.2855400E+00, 0.3486600E+00, 0.3405300E+00, &
     & 0.2416700E+00, 0.2680400E+00, 0.2773482E+00, 0.2283000E+00, &
     & 0.2500200E+00, 0.2096600E+00, 0.3035200E+00, 0.2424000E+00, &
     & 0.1972300E+00, 0.2646584E+00, 0.2318886E+00, 0.2318886E+00 /
      data (ref_adm(18,iz,28, 8),iz = 1,20) / &
     & 0.2617700E+00, 0.2617700E+00, 0.2587100E+00, 0.2215300E+00, &
     & 0.2607000E+00, 0.3128000E+00, 0.3044900E+00, 0.2906700E+00, &
     & 0.2996600E+00, 0.3007800E+00, 0.3207700E+00, 0.2960900E+00, &
     & 0.2789400E+00, 0.2370400E+00, 0.2762803E+00, 0.2757712E+00, &
     & 0.2736856E+00, 0.2632527E+00, 0.2313701E+00, 0.2313701E+00 /
      data (ref_adm(18,iz,29, 8),iz = 1,20) / &
     & 0.2856100E+00, 0.2856100E+00, 0.2761300E+00, 0.4232800E+00, &
     & 0.2976300E+00, 0.2743100E+00, 0.2631900E+00, 0.2496900E+00, &
     & 0.3007200E+00, 0.2767400E+00, 0.2874400E+00, 0.3034300E+00, &
     & 0.2779800E+00, 0.2100900E+00, 0.2763827E+00, 0.2753350E+00, &
     & 0.2310600E+00, 0.2411700E+00, 0.2309503E+00, 0.2309503E+00 /
      data (ref_adm(18,iz,30, 8),iz = 1,20) / &
     & 0.3092500E+00, 0.3092500E+00, 0.3084600E+00, 0.2843600E+00, &
     & 0.2741115E+00, 0.2746199E+00, 0.2990100E+00, 0.2405600E+00, &
     & 0.2801800E+00, 0.2759600E+00, 0.2783800E+00, 0.3167600E+00, &
     & 0.2806600E+00, 0.2763888E+00, 0.2764399E+00, 0.2800600E+00, &
     & 0.3065100E+00, 0.2835000E+00, 0.2385800E+00, 0.2385800E+00 /
      data (ref_adm(18,iz,31, 8),iz = 1,20) / &
     & 0.2392500E+00, 0.2392500E+00, 0.2734529E+00, 0.2601100E+00, &
     & 0.2748979E+00, 0.2857600E+00, 0.2124800E+00, 0.2612400E+00, &
     & 0.2406300E+00, 0.2843200E+00, 0.2724000E+00, 0.3296700E+00, &
     & 0.3094500E+00, 0.2579000E+00, 0.2766411E+00, 0.3304900E+00, &
     & 0.2898000E+00, 0.2602898E+00, 0.1578600E+00, 0.1578600E+00 /
      data (ref_adm(18,iz,32, 8),iz = 1,20) / &
     & 0.2711872E+00, 0.2711872E+00, 0.2737224E+00, 0.2758288E+00, &
     & 0.2678600E+00, 0.2943000E+00, 0.2766885E+00, 0.2825066E+00, &
     & 0.2878494E+00, 0.3101000E+00, 0.2840467E+00, 0.2934400E+00, &
     & 0.3781600E+00, 0.2772654E+00, 0.2768272E+00, 0.2725500E+00, &
     & 0.2768900E+00, 0.2596157E+00, 0.2298823E+00, 0.2298823E+00 /
      data (ref_adm(18,iz,33, 8),iz = 1,20) / &
     & 0.2449700E+00, 0.2449700E+00, 0.2742082E+00, 0.2352300E+00, &
     & 0.2750900E+00, 0.2910400E+00, 0.2767267E+00, 0.2815413E+00, &
     & 0.2878184E+00, 0.2637900E+00, 0.2848716E+00, 0.3197000E+00, &
     & 0.3394100E+00, 0.2774639E+00, 0.2770624E+00, 0.2742894E+00, &
     & 0.3179700E+00, 0.2591263E+00, 0.2297145E+00, 0.2297145E+00 /
      data (ref_adm(18,iz,34, 8),iz = 1,20) / &
     & 0.2455000E+00, 0.2455000E+00, 0.2469400E+00, 0.2793900E+00, &
     & 0.2797731E+00, 0.2783200E+00, 0.2947600E+00, 0.3452000E+00, &
     & 0.2875856E+00, 0.2661200E+00, 0.2782600E+00, 0.2922900E+00, &
     & 0.3285100E+00, 0.2779112E+00, 0.2772435E+00, 0.2743198E+00, &
     & 0.2698473E+00, 0.2586333E+00, 0.2295353E+00, 0.2295353E+00 /
      data (ref_adm(18,iz,35, 8),iz = 1,20) / &
     & 0.2537100E+00, 0.2537100E+00, 0.2850000E+00, 0.2886419E+00, &
     & 0.2837681E+00, 0.2769983E+00, 0.2762647E+00, 0.3037200E+00, &
     & 0.3476200E+00, 0.2892192E+00, 0.3158200E+00, 0.2825671E+00, &
     & 0.3163200E+00, 0.2783329E+00, 0.2771907E+00, 0.2742368E+00, &
     & 0.2693863E+00, 0.2582065E+00, 0.2294738E+00, 0.2294738E+00 /
      data (ref_adm(18,iz,36, 8),iz = 1,20) / &
     & 0.2874800E+00, 0.2874800E+00, 0.2803000E+00, 0.3955000E+00, &
     & 0.3454500E+00, 0.2774023E+00, 0.3209300E+00, 0.3162700E+00, &
     & 0.2873215E+00, 0.3794800E+00, 0.2868046E+00, 0.2831047E+00, &
     & 0.3291000E+00, 0.2785322E+00, 0.2987300E+00, 0.2743660E+00, &
     & 0.2690895E+00, 0.2579708E+00, 0.2293581E+00, 0.2293581E+00 /
      data (ref_adm(18,iz,37, 8),iz = 1,20) / &
     & 0.3517600E+00, 0.3517600E+00, 0.2367700E+00, 0.3105286E+00, &
     & 0.3852500E+00, 0.3048100E+00, 0.3597700E+00, 0.3726900E+00, &
     & 0.3439200E+00, 0.2898138E+00, 0.2537600E+00, 0.2831868E+00, &
     & 0.3248100E+00, 0.3194100E+00, 0.2773758E+00, 0.2742779E+00, &
     & 0.2691594E+00, 0.2578525E+00, 0.2292836E+00, 0.2292836E+00 /
      data (ref_adm(18,iz,38, 8),iz = 1,20) / &
     & 0.3517600E+00, 0.3517600E+00, 0.2367700E+00, 0.3105286E+00, &
     & 0.3852500E+00, 0.3048100E+00, 0.3597700E+00, 0.3726900E+00, &
     & 0.3439200E+00, 0.2898138E+00, 0.2537600E+00, 0.2831868E+00, &
     & 0.3248100E+00, 0.3194100E+00, 0.2773758E+00, 0.2742779E+00, &
     & 0.2691594E+00, 0.2578525E+00, 0.2292836E+00, 0.2292836E+00 /
! Solar Zenith Angle 40.0 Albedo  0.2505788E+00
      data (ref_adm(18,iz, 1, 9),iz = 1,20) / &
     & 0.2740900E+00, 0.2740900E+00, 0.2280600E+00, 0.1915500E+00, &
     & 0.1990000E+00, 0.1848900E+00, 0.1911700E+00, 0.2104310E+00, &
     & 0.2427200E+00, 0.1814900E+00, 0.1725800E+00, 0.2076400E+00, &
     & 0.2418212E+00, 0.2710000E+00, 0.2530200E+00, 0.2759500E+00, &
     & 0.2922210E+00, 0.3566900E+00, 0.2629575E+00, 0.2629575E+00 /
      data (ref_adm(18,iz, 2, 9),iz = 1,20) / &
     & 0.2740900E+00, 0.2740900E+00, 0.2280600E+00, 0.1915500E+00, &
     & 0.1990000E+00, 0.1848900E+00, 0.1911700E+00, 0.2104310E+00, &
     & 0.2427200E+00, 0.1814900E+00, 0.1725800E+00, 0.2076400E+00, &
     & 0.2418212E+00, 0.2710000E+00, 0.2530200E+00, 0.2759500E+00, &
     & 0.2922210E+00, 0.3566900E+00, 0.2629575E+00, 0.2629575E+00 /
      data (ref_adm(18,iz, 3, 9),iz = 1,20) / &
     & 0.2181800E+00, 0.2181800E+00, 0.2427700E+00, 0.1919000E+00, &
     & 0.1940900E+00, 0.1908300E+00, 0.1953600E+00, 0.1958600E+00, &
     & 0.2569500E+00, 0.1881000E+00, 0.2337200E+00, 0.2077700E+00, &
     & 0.2381100E+00, 0.2530800E+00, 0.2879100E+00, 0.2441200E+00, &
     & 0.2465100E+00, 0.2818300E+00, 0.3495275E-01, 0.3495275E-01 /
      data (ref_adm(18,iz, 4, 9),iz = 1,20) / &
     & 0.2480900E+00, 0.2480900E+00, 0.2212300E+00, 0.2283000E+00, &
     & 0.2643500E+00, 0.1761200E+00, 0.1950900E+00, 0.2037500E+00, &
     & 0.2105300E+00, 0.2677400E+00, 0.2899800E+00, 0.1989500E+00, &
     & 0.1371800E+00, 0.2919400E+00, 0.2318800E+00, 0.2803055E+00, &
     & 0.3587000E+00, 0.3040700E+00, 0.2623459E+00, 0.2623459E+00 /
      data (ref_adm(18,iz, 5, 9),iz = 1,20) / &
     & 0.2240700E+00, 0.2240700E+00, 0.2452900E+00, 0.2851800E+00, &
     & 0.2430300E+00, 0.1671400E+00, 0.1922400E+00, 0.2116900E+00, &
     & 0.1787100E+00, 0.1913000E+00, 0.1889600E+00, 0.2354500E+00, &
     & 0.2337500E+00, 0.2054300E+00, 0.2331800E+00, 0.3115800E+00, &
     & 0.3097800E+00, 0.2945917E+00, 0.2617316E+00, 0.2617316E+00 /
      data (ref_adm(18,iz, 6, 9),iz = 1,20) / &
     & 0.2139300E+00, 0.2139300E+00, 0.3372000E+00, 0.1612500E+00, &
     & 0.2039800E+00, 0.2407700E+00, 0.1800300E+00, 0.1833500E+00, &
     & 0.2317100E+00, 0.2311300E+00, 0.1692900E+00, 0.2057500E+00, &
     & 0.2460600E+00, 0.2467700E+00, 0.2443200E+00, 0.2324600E+00, &
     & 0.2324500E+00, 0.2343100E+00, 0.2609802E+00, 0.2609802E+00 /
      data (ref_adm(18,iz, 7, 9),iz = 1,20) / &
     & 0.2085600E+00, 0.2085600E+00, 0.2056700E+00, 0.1778700E+00, &
     & 0.1606300E+00, 0.1797600E+00, 0.1655000E+00, 0.2113133E+00, &
     & 0.1804700E+00, 0.2728900E+00, 0.1870600E+00, 0.2310300E+00, &
     & 0.2239000E+00, 0.2766200E+00, 0.2521100E+00, 0.2765000E+00, &
     & 0.2475700E+00, 0.2922884E+00, 0.2599655E+00, 0.2599655E+00 /
      data (ref_adm(18,iz, 8, 9),iz = 1,20) / &
     & 0.2462200E+00, 0.2462200E+00, 0.2478600E+00, 0.2836700E+00, &
     & 0.2287300E+00, 0.2307600E+00, 0.2442900E+00, 0.3460000E+00, &
     & 0.2966600E+00, 0.2536400E+00, 0.1679600E+00, 0.1787700E+00, &
     & 0.2395700E+00, 0.2433600E+00, 0.2624800E+00, 0.2928800E+00, &
     & 0.2877266E+00, 0.2909897E+00, 0.2588120E+00, 0.2588120E+00 /
      data (ref_adm(18,iz, 9, 9),iz = 1,20) / &
     & 0.2144716E+00, 0.2144716E+00, 0.2532100E+00, 0.2714800E+00, &
     & 0.2157230E+00, 0.2134819E+00, 0.2117668E+00, 0.2516700E+00, &
     & 0.1807600E+00, 0.2207600E+00, 0.1992700E+00, 0.3275400E+00, &
     & 0.1728400E+00, 0.2541400E+00, 0.2384600E+00, 0.3379200E+00, &
     & 0.4176700E+00, 0.2893509E+00, 0.2575957E+00, 0.2575957E+00 /
      data (ref_adm(18,iz,10, 9),iz = 1,20) / &
     & 0.2284100E+00, 0.2284100E+00, 0.2091900E+00, 0.2433400E+00, &
     & 0.2495700E+00, 0.2140981E+00, 0.2121890E+00, 0.1824400E+00, &
     & 0.1524000E+00, 0.2653000E+00, 0.2196700E+00, 0.2214500E+00, &
     & 0.1680300E+00, 0.2314400E+00, 0.1986000E+00, 0.2333600E+00, &
     & 0.2120800E+00, 0.2875710E+00, 0.3040500E+00, 0.3040500E+00 /
      data (ref_adm(18,iz,11, 9),iz = 1,20) / &
     & 0.2176800E+00, 0.2176800E+00, 0.1752100E+00, 0.1952800E+00, &
     & 0.1893000E+00, 0.1919800E+00, 0.2129392E+00, 0.2593700E+00, &
     & 0.2398900E+00, 0.3194900E+00, 0.2686800E+00, 0.2316900E+00, &
     & 0.1687400E+00, 0.2499500E+00, 0.2282500E+00, 0.2738594E+00, &
     & 0.2839584E+00, 0.2853595E+00, 0.2546760E+00, 0.2546760E+00 /
      data (ref_adm(18,iz,12, 9),iz = 1,20) / &
     & 0.2291600E+00, 0.2291600E+00, 0.2207100E+00, 0.2283400E+00, &
     & 0.2279300E+00, 0.2287700E+00, 0.2020000E+00, 0.2233700E+00, &
     & 0.1937700E+00, 0.1989400E+00, 0.3239500E+00, 0.2139800E+00, &
     & 0.2238500E+00, 0.3092500E+00, 0.2403100E+00, 0.2722315E+00, &
     & 0.2821701E+00, 0.2833646E+00, 0.2530508E+00, 0.2530508E+00 /
      data (ref_adm(18,iz,13, 9),iz = 1,20) / &
     & 0.2210100E+00, 0.2210100E+00, 0.2246200E+00, 0.2285700E+00, &
     & 0.2090900E+00, 0.2037800E+00, 0.1904200E+00, 0.1909300E+00, &
     & 0.2139700E+00, 0.2066500E+00, 0.2062200E+00, 0.2027000E+00, &
     & 0.1984700E+00, 0.1879600E+00, 0.2577321E+00, 0.2706490E+00, &
     & 0.2946000E+00, 0.2814470E+00, 0.2514655E+00, 0.2514655E+00 /
      data (ref_adm(18,iz,14, 9),iz = 1,20) / &
     & 0.2348500E+00, 0.2348500E+00, 0.2318800E+00, 0.2551100E+00, &
     & 0.2652200E+00, 0.2426100E+00, 0.2251800E+00, 0.2286400E+00, &
     & 0.2135700E+00, 0.1983500E+00, 0.2123300E+00, 0.2145600E+00, &
     & 0.2236500E+00, 0.2214000E+00, 0.2566100E+00, 0.2328700E+00, &
     & 0.2675800E+00, 0.2794296E+00, 0.2281800E+00, 0.2281800E+00 /
      data (ref_adm(18,iz,15, 9),iz = 1,20) / &
     & 0.2265400E+00, 0.2265400E+00, 0.2234700E+00, 0.2280500E+00, &
     & 0.2288200E+00, 0.2046300E+00, 0.1749500E+00, 0.2904600E+00, &
     & 0.2286000E+00, 0.2597400E+00, 0.2265600E+00, 0.2196400E+00, &
     & 0.2146400E+00, 0.2064000E+00, 0.2684500E+00, 0.2704800E+00, &
     & 0.3049300E+00, 0.3083000E+00, 0.3187900E+00, 0.3187900E+00 /
      data (ref_adm(18,iz,16, 9),iz = 1,20) / &
     & 0.2723800E+00, 0.2723800E+00, 0.2037500E+00, 0.1933000E+00, &
     & 0.1870600E+00, 0.2099800E+00, 0.2074500E+00, 0.2217100E+00, &
     & 0.2193800E+00, 0.2207000E+00, 0.2434600E+00, 0.1927600E+00, &
     & 0.1944900E+00, 0.2359800E+00, 0.1784700E+00, 0.2660050E+00, &
     & 0.3317600E+00, 0.3631000E+00, 0.2461562E+00, 0.2461562E+00 /
      data (ref_adm(18,iz,17, 9),iz = 1,20) / &
     & 0.2033000E+00, 0.2033000E+00, 0.2154685E+00, 0.1818800E+00, &
     & 0.2209559E+00, 0.1972500E+00, 0.2036300E+00, 0.1669300E+00, &
     & 0.2639400E+00, 0.2058700E+00, 0.2609500E+00, 0.2289100E+00, &
     & 0.2192200E+00, 0.1939200E+00, 0.2524961E+00, 0.2642860E+00, &
     & 0.2727500E+00, 0.2734980E+00, 0.2445606E+00, 0.2445606E+00 /
      data (ref_adm(18,iz,18, 9),iz = 1,20) / &
     & 0.1719900E+00, 0.1719900E+00, 0.4068400E+00, 0.3724400E+00, &
     & 0.2244736E+00, 0.1957000E+00, 0.2822400E+00, 0.3011900E+00, &
     & 0.2276200E+00, 0.2124800E+00, 0.2140500E+00, 0.1689000E+00, &
     & 0.1782700E+00, 0.1876300E+00, 0.2599300E+00, 0.2695828E+00, &
     & 0.2874200E+00, 0.2984500E+00, 0.2500188E+00, 0.2500188E+00 /
      data (ref_adm(18,iz,19, 9),iz = 1,20) / &
     & 0.2179200E+00, 0.2179200E+00, 0.2867100E+00, 0.3209900E+00, &
     & 0.2441700E+00, 0.2036100E+00, 0.2581000E+00, 0.2223261E+00, &
     & 0.1941700E+00, 0.2216800E+00, 0.2077000E+00, 0.2161400E+00, &
     & 0.2599500E+00, 0.2594700E+00, 0.1937600E+00, 0.2675245E+00, &
     & 0.2759342E+00, 0.2545700E+00, 0.2484351E+00, 0.2484351E+00 /
      data (ref_adm(18,iz,20, 9),iz = 1,20) / &
     & 0.2072500E+00, 0.2072500E+00, 0.2273500E+00, 0.2445300E+00, &
     & 0.3514800E+00, 0.1815000E+00, 0.2109600E+00, 0.1953300E+00, &
     & 0.2051900E+00, 0.2330200E+00, 0.2126900E+00, 0.1980700E+00, &
     & 0.2068900E+00, 0.2719600E+00, 0.2184100E+00, 0.2655703E+00, &
     & 0.2736513E+00, 0.2740222E+00, 0.2470533E+00, 0.2470533E+00 /
      data (ref_adm(18,iz,21, 9),iz = 1,20) / &
     & 0.1979900E+00, 0.1979900E+00, 0.2110000E+00, 0.1637400E+00, &
     & 0.2243600E+00, 0.1840200E+00, 0.2262445E+00, 0.2255350E+00, &
     & 0.2595100E+00, 0.2256466E+00, 0.2353500E+00, 0.2010900E+00, &
     & 0.2096800E+00, 0.2690500E+00, 0.1844000E+00, 0.2637149E+00, &
     & 0.2713609E+00, 0.2715534E+00, 0.2457311E+00, 0.2457311E+00 /
      data (ref_adm(18,iz,22, 9),iz = 1,20) / &
     & 0.2450100E+00, 0.2450100E+00, 0.1951400E+00, 0.1874400E+00, &
     & 0.2729100E+00, 0.2432435E+00, 0.1841600E+00, 0.1569600E+00, &
     & 0.2508700E+00, 0.2540400E+00, 0.2381100E+00, 0.2487500E+00, &
     & 0.2175900E+00, 0.3014700E+00, 0.2084200E+00, 0.2051400E+00, &
     & 0.2790249E+00, 0.2824023E+00, 0.2696626E+00, 0.2696626E+00 /
      data (ref_adm(18,iz,23, 9),iz = 1,20) / &
     & 0.1730100E+00, 0.1730100E+00, 0.1776700E+00, 0.2140800E+00, &
     & 0.2311200E+00, 0.3010000E+00, 0.2923100E+00, 0.2648700E+00, &
     & 0.2500717E+00, 0.2348100E+00, 0.2588500E+00, 0.2604700E+00, &
     & 0.2620626E+00, 0.2959000E+00, 0.1958500E+00, 0.2260100E+00, &
     & 0.2779000E+00, 0.2818411E+00, 0.2695648E+00, 0.2695648E+00 /
      data (ref_adm(18,iz,24, 9),iz = 1,20) / &
     & 0.2137800E+00, 0.2137800E+00, 0.2333400E+00, 0.2204900E+00, &
     & 0.2149400E+00, 0.2033700E+00, 0.1944300E+00, 0.3077400E+00, &
     & 0.2017900E+00, 0.2554900E+00, 0.2227500E+00, 0.2661900E+00, &
     & 0.3122000E+00, 0.1955400E+00, 0.2063000E+00, 0.2704800E+00, &
     & 0.2382300E+00, 0.2822024E+00, 0.2700128E+00, 0.2700128E+00 /
      data (ref_adm(18,iz,25, 9),iz = 1,20) / &
     & 0.1679500E+00, 0.1679500E+00, 0.1781900E+00, 0.2124400E+00, &
     & 0.1983100E+00, 0.1952400E+00, 0.2403300E+00, 0.3580600E+00, &
     & 0.2138300E+00, 0.1772300E+00, 0.2001800E+00, 0.3117900E+00, &
     & 0.2840300E+00, 0.2953700E+00, 0.2477100E+00, 0.2930200E+00, &
     & 0.2413100E+00, 0.2569500E+00, 0.2712510E+00, 0.2712510E+00 /
      data (ref_adm(18,iz,26, 9),iz = 1,20) / &
     & 0.2471700E+00, 0.2471700E+00, 0.2505500E+00, 0.2387100E+00, &
     & 0.2271400E+00, 0.2676400E+00, 0.2301600E+00, 0.2421300E+00, &
     & 0.2502400E+00, 0.2594200E+00, 0.2631072E+00, 0.2665173E+00, &
     & 0.2802700E+00, 0.2568100E+00, 0.2345400E+00, 0.2665100E+00, &
     & 0.2881100E+00, 0.2844718E+00, 0.2732090E+00, 0.2732090E+00 /
      data (ref_adm(18,iz,27, 9),iz = 1,20) / &
     & 0.2273600E+00, 0.2273600E+00, 0.2437300E+00, 0.2220200E+00, &
     & 0.2215600E+00, 0.2369800E+00, 0.2611900E+00, 0.2654200E+00, &
     & 0.2098900E+00, 0.2752700E+00, 0.2533400E+00, 0.2751600E+00, &
     & 0.2790300E+00, 0.2523400E+00, 0.3044300E+00, 0.2514300E+00, &
     & 0.2915500E+00, 0.2868694E+00, 0.2755911E+00, 0.2755911E+00 /
      data (ref_adm(18,iz,28, 9),iz = 1,20) / &
     & 0.2242600E+00, 0.2242600E+00, 0.2142200E+00, 0.2132900E+00, &
     & 0.2678400E+00, 0.2565800E+00, 0.2432100E+00, 0.2652600E+00, &
     & 0.2664500E+00, 0.2546700E+00, 0.2748300E+00, 0.2829600E+00, &
     & 0.2844700E+00, 0.2765100E+00, 0.3378300E+00, 0.3056700E+00, &
     & 0.3632400E+00, 0.2900259E+00, 0.2789584E+00, 0.2789584E+00 /
      data (ref_adm(18,iz,29, 9),iz = 1,20) / &
     & 0.2347900E+00, 0.2347900E+00, 0.1992300E+00, 0.2058000E+00, &
     & 0.1885500E+00, 0.2115700E+00, 0.2246200E+00, 0.2110000E+00, &
     & 0.2697300E+00, 0.3021600E+00, 0.2979700E+00, 0.2797900E+00, &
     & 0.3165500E+00, 0.2761500E+00, 0.2908700E+00, 0.3371000E+00, &
     & 0.2209400E+00, 0.2984900E+00, 0.2829374E+00, 0.2829374E+00 /
      data (ref_adm(18,iz,30, 9),iz = 1,20) / &
     & 0.1897700E+00, 0.1897700E+00, 0.2076100E+00, 0.2479400E+00, &
     & 0.2280800E+00, 0.2464000E+00, 0.2642800E+00, 0.2931900E+00, &
     & 0.2497000E+00, 0.2510600E+00, 0.2456300E+00, 0.2724000E+00, &
     & 0.2816600E+00, 0.2670800E+00, 0.2567700E+00, 0.2459300E+00, &
     & 0.2405100E+00, 0.3381400E+00, 0.1772200E+00, 0.1772200E+00 /
      data (ref_adm(18,iz,31, 9),iz = 1,20) / &
     & 0.2406700E+00, 0.2406700E+00, 0.2655300E+00, 0.2859900E+00, &
     & 0.3010000E+00, 0.3836600E+00, 0.2922700E+00, 0.3075100E+00, &
     & 0.3036500E+00, 0.3066400E+00, 0.2812751E+00, 0.2869899E+00, &
     & 0.3781100E+00, 0.3626300E+00, 0.2969775E+00, 0.3060700E+00, &
     & 0.3113200E+00, 0.3009807E+00, 0.2914502E+00, 0.2914502E+00 /
      data (ref_adm(18,iz,32, 9),iz = 1,20) / &
     & 0.1715200E+00, 0.1715200E+00, 0.2607000E+00, 0.2325400E+00, &
     & 0.2537900E+00, 0.2599458E+00, 0.2640737E+00, 0.3261400E+00, &
     & 0.2725122E+00, 0.2466100E+00, 0.2887000E+00, 0.3334200E+00, &
     & 0.3483700E+00, 0.3862000E+00, 0.3013300E+00, 0.3272500E+00, &
     & 0.3056693E+00, 0.2406500E+00, 0.2953935E+00, 0.2953935E+00 /
      data (ref_adm(18,iz,33, 9),iz = 1,20) / &
     & 0.1908500E+00, 0.1908500E+00, 0.2340100E+00, 0.3079500E+00, &
     & 0.2450900E+00, 0.2605964E+00, 0.2914500E+00, 0.3008400E+00, &
     & 0.2738900E+00, 0.3203200E+00, 0.3497600E+00, 0.3567700E+00, &
     & 0.2857700E+00, 0.3270700E+00, 0.2645500E+00, 0.3080971E+00, &
     & 0.3050200E+00, 0.3084112E+00, 0.2990529E+00, 0.2990529E+00 /
      data (ref_adm(18,iz,34, 9),iz = 1,20) / &
     & 0.2055300E+00, 0.2055300E+00, 0.1968600E+00, 0.3082600E+00, &
     & 0.2956900E+00, 0.2731800E+00, 0.2652061E+00, 0.2703878E+00, &
     & 0.3043600E+00, 0.2496800E+00, 0.3703200E+00, 0.2512400E+00, &
     & 0.2984287E+00, 0.3763200E+00, 0.3435000E+00, 0.3103100E+00, &
     & 0.3623700E+00, 0.3115719E+00, 0.3023301E+00, 0.3023301E+00 /
      data (ref_adm(18,iz,35, 9),iz = 1,20) / &
     & 0.2201300E+00, 0.2201300E+00, 0.2376900E+00, 0.2001900E+00, &
     & 0.2577300E+00, 0.4098800E+00, 0.3062100E+00, 0.2810000E+00, &
     & 0.4221600E+00, 0.3174800E+00, 0.3413600E+00, 0.2933576E+00, &
     & 0.3340900E+00, 0.3305900E+00, 0.3409100E+00, 0.3065500E+00, &
     & 0.3740700E+00, 0.3142718E+00, 0.3049549E+00, 0.3049549E+00 /
      data (ref_adm(18,iz,36, 9),iz = 1,20) / &
     & 0.2092100E+00, 0.2092100E+00, 0.2384300E+00, 0.2267400E+00, &
     & 0.1934100E+00, 0.5654200E+00, 0.3745900E+00, 0.2698600E+00, &
     & 0.3599700E+00, 0.3453500E+00, 0.2921627E+00, 0.2673700E+00, &
     & 0.3245700E+00, 0.3237300E+00, 0.3432800E+00, 0.3107800E+00, &
     & 0.3177813E+00, 0.3161667E+00, 0.3067327E+00, 0.3067327E+00 /
      data (ref_adm(18,iz,37, 9),iz = 1,20) / &
     & 0.2146500E+00, 0.2146500E+00, 0.2569700E+00, 0.2943500E+00, &
     & 0.2681100E+00, 0.3081300E+00, 0.2684800E+00, 0.2744414E+00, &
     & 0.3072200E+00, 0.3125600E+00, 0.3523000E+00, 0.2970040E+00, &
     & 0.3092700E+00, 0.3113800E+00, 0.3415100E+00, 0.3175707E+00, &
     & 0.3189380E+00, 0.3172106E+00, 0.3077519E+00, 0.3077519E+00 /
      data (ref_adm(18,iz,38, 9),iz = 1,20) / &
     & 0.2146500E+00, 0.2146500E+00, 0.2569700E+00, 0.2943500E+00, &
     & 0.2681100E+00, 0.3081300E+00, 0.2684800E+00, 0.2744414E+00, &
     & 0.3072200E+00, 0.3125600E+00, 0.3523000E+00, 0.2970040E+00, &
     & 0.3092700E+00, 0.3113800E+00, 0.3415100E+00, 0.3175707E+00, &
     & 0.3189380E+00, 0.3172106E+00, 0.3077519E+00, 0.3077519E+00 /
! Solar Zenith Angle 45.0 Albedo  0.2519429E+00
      data (ref_adm(18,iz, 1,10),iz = 1,20) / &
     & 0.2075500E+00, 0.2075500E+00, 0.1720900E+00, 0.1758500E+00, &
     & 0.2350900E+00, 0.1869200E+00, 0.1772200E+00, 0.2121200E+00, &
     & 0.2233900E+00, 0.1908000E+00, 0.2285200E+00, 0.2772200E+00, &
     & 0.2551400E+00, 0.2607700E+00, 0.2620000E+00, 0.3340600E+00, &
     & 0.3423500E+00, 0.3504200E+00, 0.2593767E+00, 0.2593767E+00 /
      data (ref_adm(18,iz, 2,10),iz = 1,20) / &
     & 0.2075500E+00, 0.2075500E+00, 0.1720900E+00, 0.1758500E+00, &
     & 0.2350900E+00, 0.1869200E+00, 0.1772200E+00, 0.2121200E+00, &
     & 0.2233900E+00, 0.1908000E+00, 0.2285200E+00, 0.2772200E+00, &
     & 0.2551400E+00, 0.2607700E+00, 0.2620000E+00, 0.3340600E+00, &
     & 0.3423500E+00, 0.3504200E+00, 0.2593767E+00, 0.2593767E+00 /
      data (ref_adm(18,iz, 3,10),iz = 1,20) / &
     & 0.2444700E+00, 0.2444700E+00, 0.1833600E+00, 0.2455100E+00, &
     & 0.2292700E+00, 0.2730700E+00, 0.2298100E+00, 0.1751300E+00, &
     & 0.1881100E+00, 0.1862100E+00, 0.2580400E+00, 0.2118000E+00, &
     & 0.2102800E+00, 0.2449300E+00, 0.2801000E+00, 0.2766000E+00, &
     & 0.2817300E+00, 0.3000200E+00, 0.3726800E+00, 0.3726800E+00 /
      data (ref_adm(18,iz, 4,10),iz = 1,20) / &
     & 0.2682500E+00, 0.2682500E+00, 0.2378100E+00, 0.1893700E+00, &
     & 0.2807800E+00, 0.1971000E+00, 0.1734600E+00, 0.1816200E+00, &
     & 0.2167800E+00, 0.1735400E+00, 0.2506800E+00, 0.1659000E+00, &
     & 0.2239600E+00, 0.2299200E+00, 0.2568600E+00, 0.2949800E+00, &
     & 0.2775500E+00, 0.3379300E+00, 0.4770400E+00, 0.4770400E+00 /
      data (ref_adm(18,iz, 5,10),iz = 1,20) / &
     & 0.2672000E+00, 0.2672000E+00, 0.2514600E+00, 0.2758900E+00, &
     & 0.2573400E+00, 0.1840700E+00, 0.2231500E+00, 0.2579900E+00, &
     & 0.1896700E+00, 0.2885600E+00, 0.2063400E+00, 0.2016000E+00, &
     & 0.2169700E+00, 0.2352500E+00, 0.2679300E+00, 0.2962200E+00, &
     & 0.2865100E+00, 0.3140100E+00, 0.2586161E+00, 0.2586161E+00 /
      data (ref_adm(18,iz, 6,10),iz = 1,20) / &
     & 0.2153200E+00, 0.2153200E+00, 0.2841500E+00, 0.2292000E+00, &
     & 0.2403300E+00, 0.1971100E+00, 0.1984900E+00, 0.1962700E+00, &
     & 0.1778000E+00, 0.2069000E+00, 0.2077000E+00, 0.2014700E+00, &
     & 0.2540400E+00, 0.2321500E+00, 0.2282300E+00, 0.2655300E+00, &
     & 0.3038800E+00, 0.3266400E+00, 0.2581815E+00, 0.2581815E+00 /
      data (ref_adm(18,iz, 7,10),iz = 1,20) / &
     & 0.2778300E+00, 0.2778300E+00, 0.1975100E+00, 0.2641600E+00, &
     & 0.2613700E+00, 0.2397200E+00, 0.1949800E+00, 0.1845500E+00, &
     & 0.2208200E+00, 0.2703900E+00, 0.3031100E+00, 0.2364500E+00, &
     & 0.2444300E+00, 0.2581700E+00, 0.2372900E+00, 0.3254100E+00, &
     & 0.3341000E+00, 0.3197200E+00, 0.3253600E+00, 0.3253600E+00 /
      data (ref_adm(18,iz, 8,10),iz = 1,20) / &
     & 0.2529100E+00, 0.2529100E+00, 0.2717700E+00, 0.2068300E+00, &
     & 0.1962800E+00, 0.2078400E+00, 0.1905100E+00, 0.1788300E+00, &
     & 0.1930200E+00, 0.1886600E+00, 0.1926700E+00, 0.2196800E+00, &
     & 0.2375200E+00, 0.2694500E+00, 0.2806600E+00, 0.2763100E+00, &
     & 0.3250000E+00, 0.3191600E+00, 0.3742300E+00, 0.3742300E+00 /
      data (ref_adm(18,iz, 9,10),iz = 1,20) / &
     & 0.2199500E+00, 0.2199500E+00, 0.2703500E+00, 0.1855400E+00, &
     & 0.2308700E+00, 0.1848300E+00, 0.1846800E+00, 0.1947100E+00, &
     & 0.1922800E+00, 0.2007100E+00, 0.1964300E+00, 0.2464800E+00, &
     & 0.2398900E+00, 0.2920700E+00, 0.2875600E+00, 0.3369400E+00, &
     & 0.3441400E+00, 0.2895900E+00, 0.2559352E+00, 0.2559352E+00 /
      data (ref_adm(18,iz,10,10),iz = 1,20) / &
     & 0.1988400E+00, 0.1988400E+00, 0.2252200E+00, 0.2780400E+00, &
     & 0.2424000E+00, 0.2264800E+00, 0.2221500E+00, 0.2155700E+00, &
     & 0.1559600E+00, 0.2154400E+00, 0.2682900E+00, 0.2260900E+00, &
     & 0.2311200E+00, 0.2669900E+00, 0.2908200E+00, 0.3162300E+00, &
     & 0.3895200E+00, 0.2591700E+00, 0.2549702E+00, 0.2549702E+00 /
      data (ref_adm(18,iz,11,10),iz = 1,20) / &
     & 0.2411700E+00, 0.2411700E+00, 0.2324100E+00, 0.1938400E+00, &
     & 0.2170900E+00, 0.2318600E+00, 0.2171400E+00, 0.2168800E+00, &
     & 0.2220000E+00, 0.1880200E+00, 0.2221900E+00, 0.2154300E+00, &
     & 0.2289300E+00, 0.2539600E+00, 0.2350200E+00, 0.3028600E+00, &
     & 0.4218500E+00, 0.2782000E+00, 0.2801100E+00, 0.2801100E+00 /
      data (ref_adm(18,iz,12,10),iz = 1,20) / &
     & 0.1931000E+00, 0.1931000E+00, 0.2006400E+00, 0.2011300E+00, &
     & 0.2241300E+00, 0.2152000E+00, 0.1965200E+00, 0.1888900E+00, &
     & 0.2054700E+00, 0.1868900E+00, 0.2049700E+00, 0.2258800E+00, &
     & 0.2895700E+00, 0.2414200E+00, 0.2496000E+00, 0.2909236E+00, &
     & 0.2970722E+00, 0.2242400E+00, 0.2113800E+00, 0.2113800E+00 /
      data (ref_adm(18,iz,13,10),iz = 1,20) / &
     & 0.2461100E+00, 0.2461100E+00, 0.2268000E+00, 0.2243700E+00, &
     & 0.2159500E+00, 0.2259100E+00, 0.2297300E+00, 0.2105700E+00, &
     & 0.2131300E+00, 0.2052300E+00, 0.2287100E+00, 0.2325800E+00, &
     & 0.2248500E+00, 0.2261800E+00, 0.2150100E+00, 0.2713700E+00, &
     & 0.2488800E+00, 0.2579100E+00, 0.2517762E+00, 0.2517762E+00 /
      data (ref_adm(18,iz,14,10),iz = 1,20) / &
     & 0.2315800E+00, 0.2315800E+00, 0.2083100E+00, 0.2285700E+00, &
     & 0.2388500E+00, 0.2217700E+00, 0.2032900E+00, 0.2126300E+00, &
     & 0.2286000E+00, 0.2137400E+00, 0.2112600E+00, 0.2255200E+00, &
     & 0.2290800E+00, 0.2442500E+00, 0.2671900E+00, 0.2758400E+00, &
     & 0.2302800E+00, 0.2389900E+00, 0.2505920E+00, 0.2505920E+00 /
      data (ref_adm(18,iz,15,10),iz = 1,20) / &
     & 0.2256000E+00, 0.2256000E+00, 0.2353700E+00, 0.2111000E+00, &
     & 0.2219900E+00, 0.2141000E+00, 0.2113400E+00, 0.2207400E+00, &
     & 0.2161800E+00, 0.2223200E+00, 0.1996100E+00, 0.2261900E+00, &
     & 0.2034300E+00, 0.2197500E+00, 0.2512500E+00, 0.2059400E+00, &
     & 0.2138700E+00, 0.2863399E+00, 0.2434900E+00, 0.2434900E+00 /
      data (ref_adm(18,iz,16,10),iz = 1,20) / &
     & 0.2352700E+00, 0.2352700E+00, 0.2390700E+00, 0.2400600E+00, &
     & 0.2427600E+00, 0.2177500E+00, 0.2705700E+00, 0.2174600E+00, &
     & 0.2066600E+00, 0.1911600E+00, 0.1878100E+00, 0.2043700E+00, &
     & 0.1982600E+00, 0.2057700E+00, 0.3208600E+00, 0.2932200E+00, &
     & 0.2909166E+00, 0.2848617E+00, 0.2116300E+00, 0.2116300E+00 /
      data (ref_adm(18,iz,17,10),iz = 1,20) / &
     & 0.3121400E+00, 0.3121400E+00, 0.2227700E+00, 0.2367500E+00, &
     & 0.2187000E+00, 0.2218600E+00, 0.2091700E+00, 0.2237000E+00, &
     & 0.2125200E+00, 0.1922400E+00, 0.2218000E+00, 0.2118800E+00, &
     & 0.1938500E+00, 0.2325600E+00, 0.2603100E+00, 0.2663500E+00, &
     & 0.2758400E+00, 0.2832038E+00, 0.2474267E+00, 0.2474267E+00 /
      data (ref_adm(18,iz,18,10),iz = 1,20) / &
     & 0.2789000E+00, 0.2789000E+00, 0.2482200E+00, 0.2201800E+00, &
     & 0.2263900E+00, 0.1949600E+00, 0.2353000E+00, 0.2557700E+00, &
     & 0.2067000E+00, 0.1932500E+00, 0.1858500E+00, 0.1978200E+00, &
     & 0.2102700E+00, 0.2007300E+00, 0.2072300E+00, 0.2817600E+00, &
     & 0.2497195E+00, 0.2537402E+00, 0.2421473E+00, 0.2421473E+00 /
      data (ref_adm(18,iz,19,10),iz = 1,20) / &
     & 0.2431800E+00, 0.2431800E+00, 0.2553200E+00, 0.2046400E+00, &
     & 0.2151100E+00, 0.2447000E+00, 0.2459900E+00, 0.2887100E+00, &
     & 0.2111500E+00, 0.2197100E+00, 0.1895400E+00, 0.2295800E+00, &
     & 0.2134700E+00, 0.1820500E+00, 0.1975300E+00, 0.2902800E+00, &
     & 0.2646700E+00, 0.3259200E+00, 0.2406416E+00, 0.2406416E+00 /
      data (ref_adm(18,iz,20,10),iz = 1,20) / &
     & 0.1942000E+00, 0.1942000E+00, 0.1877500E+00, 0.2007300E+00, &
     & 0.2039000E+00, 0.2053700E+00, 0.1989000E+00, 0.2113700E+00, &
     & 0.2063200E+00, 0.2328100E+00, 0.1948800E+00, 0.2081700E+00, &
     & 0.2090100E+00, 0.2406600E+00, 0.2614800E+00, 0.3088600E+00, &
     & 0.2986800E+00, 0.2516470E+00, 0.2396173E+00, 0.2396173E+00 /
      data (ref_adm(18,iz,21,10),iz = 1,20) / &
     & 0.2600900E+00, 0.2600900E+00, 0.2032700E+00, 0.2291600E+00, &
     & 0.2312800E+00, 0.2226700E+00, 0.2100100E+00, 0.2177300E+00, &
     & 0.2039700E+00, 0.2442800E+00, 0.2170600E+00, 0.2328200E+00, &
     & 0.2398400E+00, 0.2137400E+00, 0.2413200E+00, 0.2572600E+00, &
     & 0.2482150E+00, 0.2509062E+00, 0.2387524E+00, 0.2387524E+00 /
      data (ref_adm(18,iz,22,10),iz = 1,20) / &
     & 0.2558200E+00, 0.2558200E+00, 0.2509500E+00, 0.2310300E+00, &
     & 0.2688400E+00, 0.2579400E+00, 0.2364000E+00, 0.2373700E+00, &
     & 0.2060900E+00, 0.2062000E+00, 0.2205100E+00, 0.2765900E+00, &
     & 0.2261200E+00, 0.2183600E+00, 0.2330100E+00, 0.2951900E+00, &
     & 0.2920843E+00, 0.2979599E+00, 0.2900290E+00, 0.2900290E+00 /
      data (ref_adm(18,iz,23,10),iz = 1,20) / &
     & 0.2501500E+00, 0.2501500E+00, 0.2536600E+00, 0.2742500E+00, &
     & 0.3167300E+00, 0.3394700E+00, 0.2552200E+00, 0.2735800E+00, &
     & 0.2336100E+00, 0.2171500E+00, 0.2341600E+00, 0.2364700E+00, &
     & 0.2327800E+00, 0.2322600E+00, 0.2334100E+00, 0.2684200E+00, &
     & 0.2918882E+00, 0.2971161E+00, 0.2901430E+00, 0.2901430E+00 /
      data (ref_adm(18,iz,24,10),iz = 1,20) / &
     & 0.2766500E+00, 0.2766500E+00, 0.2422200E+00, 0.2383200E+00, &
     & 0.2287300E+00, 0.3058600E+00, 0.2934000E+00, 0.3137700E+00, &
     & 0.1969400E+00, 0.2466600E+00, 0.2527900E+00, 0.2703058E+00, &
     & 0.2337800E+00, 0.2617800E+00, 0.2379100E+00, 0.2628500E+00, &
     & 0.2922279E+00, 0.2974071E+00, 0.2910178E+00, 0.2910178E+00 /
      data (ref_adm(18,iz,25,10),iz = 1,20) / &
     & 0.2246200E+00, 0.2246200E+00, 0.2315700E+00, 0.2081000E+00, &
     & 0.2242000E+00, 0.2325200E+00, 0.2454200E+00, 0.3402900E+00, &
     & 0.2913800E+00, 0.2363600E+00, 0.3095200E+00, 0.2552100E+00, &
     & 0.2620600E+00, 0.2341300E+00, 0.2749600E+00, 0.2412500E+00, &
     & 0.2351700E+00, 0.2463100E+00, 0.2929977E+00, 0.2929977E+00 /
      data (ref_adm(18,iz,26,10),iz = 1,20) / &
     & 0.2306400E+00, 0.2306400E+00, 0.2279600E+00, 0.2399000E+00, &
     & 0.2261100E+00, 0.2484600E+00, 0.2606200E+00, 0.2707300E+00, &
     & 0.2767800E+00, 0.2453300E+00, 0.2701000E+00, 0.2837900E+00, &
     & 0.2894200E+00, 0.2942400E+00, 0.2617100E+00, 0.2598600E+00, &
     & 0.2315800E+00, 0.3001259E+00, 0.2956987E+00, 0.2956987E+00 /
      data (ref_adm(18,iz,27,10),iz = 1,20) / &
     & 0.2414200E+00, 0.2414200E+00, 0.2616200E+00, 0.2464300E+00, &
     & 0.2714300E+00, 0.2485400E+00, 0.2569200E+00, 0.2625300E+00, &
     & 0.2488000E+00, 0.2468400E+00, 0.2519900E+00, 0.2486700E+00, &
     & 0.2942000E+00, 0.2772200E+00, 0.2741200E+00, 0.2625000E+00, &
     & 0.2675000E+00, 0.2778100E+00, 0.2995055E+00, 0.2995055E+00 /
      data (ref_adm(18,iz,28,10),iz = 1,20) / &
     & 0.2382700E+00, 0.2382700E+00, 0.2542400E+00, 0.2910300E+00, &
     & 0.2669100E+00, 0.2396100E+00, 0.2488000E+00, 0.2437700E+00, &
     & 0.2931900E+00, 0.2636100E+00, 0.2751900E+00, 0.2676600E+00, &
     & 0.2858700E+00, 0.2887800E+00, 0.2949200E+00, 0.2670400E+00, &
     & 0.3008700E+00, 0.2166100E+00, 0.3044701E+00, 0.3044701E+00 /
      data (ref_adm(18,iz,29,10),iz = 1,20) / &
     & 0.2392500E+00, 0.2392500E+00, 0.2773100E+00, 0.3104000E+00, &
     & 0.2765500E+00, 0.2773500E+00, 0.2405600E+00, 0.3139300E+00, &
     & 0.2599700E+00, 0.2713000E+00, 0.3119100E+00, 0.2968700E+00, &
     & 0.2941800E+00, 0.2963100E+00, 0.3265400E+00, 0.2833100E+00, &
     & 0.3634300E+00, 0.2357400E+00, 0.3100782E+00, 0.3100782E+00 /
      data (ref_adm(18,iz,30,10),iz = 1,20) / &
     & 0.2448900E+00, 0.2448900E+00, 0.2507600E+00, 0.3482700E+00, &
     & 0.2943600E+00, 0.2775900E+00, 0.2354400E+00, 0.2749400E+00, &
     & 0.2490300E+00, 0.2384700E+00, 0.2650900E+00, 0.3004300E+00, &
     & 0.2814700E+00, 0.3152900E+00, 0.2934500E+00, 0.2812300E+00, &
     & 0.2905500E+00, 0.2968800E+00, 0.2405200E+00, 0.2405200E+00 /
      data (ref_adm(18,iz,31,10),iz = 1,20) / &
     & 0.2350000E+00, 0.2350000E+00, 0.2238400E+00, 0.2166000E+00, &
     & 0.2140000E+00, 0.2217500E+00, 0.2161100E+00, 0.2263000E+00, &
     & 0.2311800E+00, 0.2401600E+00, 0.2364400E+00, 0.2659700E+00, &
     & 0.2680500E+00, 0.2765000E+00, 0.2620100E+00, 0.2647100E+00, &
     & 0.2821800E+00, 0.2876400E+00, 0.2168600E+00, 0.2168600E+00 /
      data (ref_adm(18,iz,32,10),iz = 1,20) / &
     & 0.2531000E+00, 0.2531000E+00, 0.2155000E+00, 0.2272600E+00, &
     & 0.2568300E+00, 0.2442100E+00, 0.2512900E+00, 0.2868400E+00, &
     & 0.3320800E+00, 0.3242900E+00, 0.3258600E+00, 0.3483300E+00, &
     & 0.2933300E+00, 0.3904200E+00, 0.3578700E+00, 0.3466700E+00, &
     & 0.3212300E+00, 0.3044900E+00, 0.2892500E+00, 0.2892500E+00 /
      data (ref_adm(18,iz,33,10),iz = 1,20) / &
     & 0.2206700E+00, 0.2206700E+00, 0.3232100E+00, 0.2346300E+00, &
     & 0.3030900E+00, 0.2475600E+00, 0.2155500E+00, 0.2170700E+00, &
     & 0.2966300E+00, 0.2830200E+00, 0.3610400E+00, 0.3089000E+00, &
     & 0.3267800E+00, 0.3895600E+00, 0.3954200E+00, 0.3258000E+00, &
     & 0.2728200E+00, 0.3030800E+00, 0.3319842E+00, 0.3319842E+00 /
      data (ref_adm(18,iz,34,10),iz = 1,20) / &
     & 0.2818000E+00, 0.2818000E+00, 0.2433600E+00, 0.2557200E+00, &
     & 0.2551300E+00, 0.2454300E+00, 0.2322200E+00, 0.2096300E+00, &
     & 0.2706000E+00, 0.3015800E+00, 0.3150400E+00, 0.3979700E+00, &
     & 0.3285300E+00, 0.4165600E+00, 0.3204700E+00, 0.3320400E+00, &
     & 0.3392700E+00, 0.3930200E+00, 0.3365076E+00, 0.3365076E+00 /
      data (ref_adm(18,iz,35,10),iz = 1,20) / &
     & 0.2475200E+00, 0.2475200E+00, 0.2835900E+00, 0.2464300E+00, &
     & 0.2508800E+00, 0.2433000E+00, 0.2656800E+00, 0.2634900E+00, &
     & 0.2496200E+00, 0.2932400E+00, 0.3299100E+00, 0.3726300E+00, &
     & 0.3214100E+00, 0.3009800E+00, 0.3139400E+00, 0.3244820E+00, &
     & 0.3617800E+00, 0.3372057E+00, 0.3402694E+00, 0.3402694E+00 /
      data (ref_adm(18,iz,36,10),iz = 1,20) / &
     & 0.2611300E+00, 0.2611300E+00, 0.2697100E+00, 0.2738200E+00, &
     & 0.2762900E+00, 0.2883000E+00, 0.2995800E+00, 0.3381800E+00, &
     & 0.2547000E+00, 0.3028300E+00, 0.3304400E+00, 0.3367500E+00, &
     & 0.2702900E+00, 0.2976800E+00, 0.3308000E+00, 0.3743600E+00, &
     & 0.4471500E+00, 0.3395908E+00, 0.3428168E+00, 0.3428168E+00 /
      data (ref_adm(18,iz,37,10),iz = 1,20) / &
     & 0.2358100E+00, 0.2358100E+00, 0.2438600E+00, 0.4549700E+00, &
     & 0.3678900E+00, 0.3157800E+00, 0.2751000E+00, 0.3515900E+00, &
     & 0.2929300E+00, 0.2678600E+00, 0.3569400E+00, 0.3335400E+00, &
     & 0.3332100E+00, 0.3339900E+00, 0.3637100E+00, 0.3278700E+00, &
     & 0.3727800E+00, 0.3409761E+00, 0.3442557E+00, 0.3442557E+00 /
      data (ref_adm(18,iz,38,10),iz = 1,20) / &
     & 0.2358100E+00, 0.2358100E+00, 0.2438600E+00, 0.4549700E+00, &
     & 0.3678900E+00, 0.3157800E+00, 0.2751000E+00, 0.3515900E+00, &
     & 0.2929300E+00, 0.2678600E+00, 0.3569400E+00, 0.3335400E+00, &
     & 0.3332100E+00, 0.3339900E+00, 0.3637100E+00, 0.3278700E+00, &
     & 0.3727800E+00, 0.3409761E+00, 0.3442557E+00, 0.3442557E+00 /
! Solar Zenith Angle 50.0 Albedo  0.2535090E+00
      data (ref_adm(18,iz, 1,11),iz = 1,20) / &
     & 0.2112500E+00, 0.2112500E+00, 0.1986300E+00, 0.1948600E+00, &
     & 0.2443000E+00, 0.2249500E+00, 0.2650100E+00, 0.2220800E+00, &
     & 0.2143800E+00, 0.2367900E+00, 0.2790400E+00, 0.2938200E+00, &
     & 0.3127000E+00, 0.2471600E+00, 0.2956900E+00, 0.2847100E+00, &
     & 0.3431900E+00, 0.3716300E+00, 0.2758394E+00, 0.2758394E+00 /
      data (ref_adm(18,iz, 2,11),iz = 1,20) / &
     & 0.2112500E+00, 0.2112500E+00, 0.1986300E+00, 0.1948600E+00, &
     & 0.2443000E+00, 0.2249500E+00, 0.2650100E+00, 0.2220800E+00, &
     & 0.2143800E+00, 0.2367900E+00, 0.2790400E+00, 0.2938200E+00, &
     & 0.3127000E+00, 0.2471600E+00, 0.2956900E+00, 0.2847100E+00, &
     & 0.3431900E+00, 0.3716300E+00, 0.2758394E+00, 0.2758394E+00 /
      data (ref_adm(18,iz, 3,11),iz = 1,20) / &
     & 0.2201800E+00, 0.2201800E+00, 0.2011900E+00, 0.1941600E+00, &
     & 0.1988900E+00, 0.2151300E+00, 0.2265600E+00, 0.2196600E+00, &
     & 0.2303400E+00, 0.2397900E+00, 0.2410300E+00, 0.2557600E+00, &
     & 0.2762900E+00, 0.2298500E+00, 0.2714500E+00, 0.2873600E+00, &
     & 0.3607400E+00, 0.3802300E+00, 0.3947000E+00, 0.3947000E+00 /
      data (ref_adm(18,iz, 4,11),iz = 1,20) / &
     & 0.2158300E+00, 0.2158300E+00, 0.2171200E+00, 0.2227300E+00, &
     & 0.1964800E+00, 0.1929800E+00, 0.2112700E+00, 0.2321300E+00, &
     & 0.1999800E+00, 0.2083100E+00, 0.2687100E+00, 0.3063000E+00, &
     & 0.2297400E+00, 0.2546200E+00, 0.2426900E+00, 0.2874600E+00, &
     & 0.3270600E+00, 0.3523600E+00, 0.3962600E+00, 0.3962600E+00 /
      data (ref_adm(18,iz, 5,11),iz = 1,20) / &
     & 0.2521400E+00, 0.2521400E+00, 0.2701400E+00, 0.2426800E+00, &
     & 0.2337500E+00, 0.2276900E+00, 0.2260600E+00, 0.2685600E+00, &
     & 0.2180100E+00, 0.2178300E+00, 0.2488900E+00, 0.2469800E+00, &
     & 0.2235200E+00, 0.2683200E+00, 0.2787000E+00, 0.3987300E+00, &
     & 0.3509500E+00, 0.3380400E+00, 0.4356800E+00, 0.4356800E+00 /
      data (ref_adm(18,iz, 6,11),iz = 1,20) / &
     & 0.2245100E+00, 0.2245100E+00, 0.2178600E+00, 0.2023500E+00, &
     & 0.2129400E+00, 0.2106400E+00, 0.1968400E+00, 0.1928900E+00, &
     & 0.2071300E+00, 0.2176600E+00, 0.1987000E+00, 0.2034800E+00, &
     & 0.2077700E+00, 0.2110300E+00, 0.2300100E+00, 0.2396000E+00, &
     & 0.2562300E+00, 0.2842100E+00, 0.2742900E+00, 0.2742900E+00 /
      data (ref_adm(18,iz, 7,11),iz = 1,20) / &
     & 0.2220500E+00, 0.2220500E+00, 0.2275600E+00, 0.2172000E+00, &
     & 0.2195500E+00, 0.2187600E+00, 0.2190100E+00, 0.2136400E+00, &
     & 0.2271800E+00, 0.2170100E+00, 0.2062500E+00, 0.2222500E+00, &
     & 0.2213300E+00, 0.2619600E+00, 0.2209800E+00, 0.2152300E+00, &
     & 0.2609300E+00, 0.3044700E+00, 0.2721825E+00, 0.2721825E+00 /
      data (ref_adm(18,iz, 8,11),iz = 1,20) / &
     & 0.1901700E+00, 0.1901700E+00, 0.2045400E+00, 0.1850300E+00, &
     & 0.1972900E+00, 0.2089500E+00, 0.2071600E+00, 0.2052400E+00, &
     & 0.2408300E+00, 0.1981400E+00, 0.2209400E+00, 0.2220800E+00, &
     & 0.2204500E+00, 0.2694000E+00, 0.2656900E+00, 0.2765500E+00, &
     & 0.3346300E+00, 0.3377000E+00, 0.4372900E+00, 0.4372900E+00 /
      data (ref_adm(18,iz, 9,11),iz = 1,20) / &
     & 0.1962900E+00, 0.1962900E+00, 0.2312100E+00, 0.2430600E+00, &
     & 0.2483400E+00, 0.2127200E+00, 0.2286600E+00, 0.2397500E+00, &
     & 0.2755300E+00, 0.2216900E+00, 0.2131300E+00, 0.2304800E+00, &
     & 0.2316400E+00, 0.2454900E+00, 0.2655400E+00, 0.3230500E+00, &
     & 0.2982100E+00, 0.3399300E+00, 0.2690387E+00, 0.2690387E+00 /
      data (ref_adm(18,iz,10,11),iz = 1,20) / &
     & 0.2051600E+00, 0.2051600E+00, 0.1946600E+00, 0.2291300E+00, &
     & 0.2022300E+00, 0.1956300E+00, 0.2755800E+00, 0.2159100E+00, &
     & 0.2429400E+00, 0.2275700E+00, 0.2120600E+00, 0.2128600E+00, &
     & 0.2231000E+00, 0.2538600E+00, 0.2541700E+00, 0.2979400E+00, &
     & 0.3042900E+00, 0.3324100E+00, 0.2671138E+00, 0.2671138E+00 /
      data (ref_adm(18,iz,11,11),iz = 1,20) / &
     & 0.2188000E+00, 0.2188000E+00, 0.2220600E+00, 0.2305800E+00, &
     & 0.2167200E+00, 0.2240200E+00, 0.2253100E+00, 0.2496400E+00, &
     & 0.2146600E+00, 0.2134700E+00, 0.2165500E+00, 0.2209900E+00, &
     & 0.2240100E+00, 0.2189600E+00, 0.2595200E+00, 0.2812800E+00, &
     & 0.3183500E+00, 0.3279500E+00, 0.2650312E+00, 0.2650312E+00 /
      data (ref_adm(18,iz,12,11),iz = 1,20) / &
     & 0.2097200E+00, 0.2097200E+00, 0.2176300E+00, 0.2177400E+00, &
     & 0.2322900E+00, 0.2356700E+00, 0.1880200E+00, 0.2697800E+00, &
     & 0.2186400E+00, 0.2003600E+00, 0.2085900E+00, 0.2119800E+00, &
     & 0.2163900E+00, 0.2168100E+00, 0.2544900E+00, 0.3210400E+00, &
     & 0.3151200E+00, 0.2820900E+00, 0.2443300E+00, 0.2443300E+00 /
      data (ref_adm(18,iz,13,11),iz = 1,20) / &
     & 0.2129500E+00, 0.2129500E+00, 0.2208900E+00, 0.2349500E+00, &
     & 0.2167200E+00, 0.2295700E+00, 0.2218300E+00, 0.2133200E+00, &
     & 0.2169600E+00, 0.2201000E+00, 0.2276600E+00, 0.2117500E+00, &
     & 0.2159400E+00, 0.2200300E+00, 0.2945700E+00, 0.3225100E+00, &
     & 0.3087400E+00, 0.2830000E+00, 0.2595800E+00, 0.2595800E+00 /
      data (ref_adm(18,iz,14,11),iz = 1,20) / &
     & 0.2237700E+00, 0.2237700E+00, 0.1999800E+00, 0.1978000E+00, &
     & 0.2073700E+00, 0.2092100E+00, 0.2169700E+00, 0.2188500E+00, &
     & 0.2171800E+00, 0.2127400E+00, 0.2112700E+00, 0.2081200E+00, &
     & 0.2218800E+00, 0.2327200E+00, 0.2593900E+00, 0.2445800E+00, &
     & 0.3131000E+00, 0.2865700E+00, 0.2586680E+00, 0.2586680E+00 /
      data (ref_adm(18,iz,15,11),iz = 1,20) / &
     & 0.2131200E+00, 0.2131200E+00, 0.2248500E+00, 0.2110300E+00, &
     & 0.2156900E+00, 0.2069800E+00, 0.2149300E+00, 0.2055900E+00, &
     & 0.2076500E+00, 0.2183000E+00, 0.2108800E+00, 0.2108100E+00, &
     & 0.2073100E+00, 0.2208300E+00, 0.2281400E+00, 0.2859600E+00, &
     & 0.2825700E+00, 0.2507800E+00, 0.2564071E+00, 0.2564071E+00 /
      data (ref_adm(18,iz,16,11),iz = 1,20) / &
     & 0.2019900E+00, 0.2019900E+00, 0.2195600E+00, 0.2797700E+00, &
     & 0.2066800E+00, 0.2063100E+00, 0.2013300E+00, 0.2144500E+00, &
     & 0.1959500E+00, 0.1913200E+00, 0.2180200E+00, 0.2214300E+00, &
     & 0.2240000E+00, 0.2161500E+00, 0.2206400E+00, 0.2190800E+00, &
     & 0.2655300E+00, 0.2913246E+00, 0.2540128E+00, 0.2540128E+00 /
      data (ref_adm(18,iz,17,11),iz = 1,20) / &
     & 0.2324900E+00, 0.2324900E+00, 0.2589100E+00, 0.2735500E+00, &
     & 0.2669900E+00, 0.2014900E+00, 0.1984000E+00, 0.2324100E+00, &
     & 0.2243900E+00, 0.2367400E+00, 0.2038300E+00, 0.2157500E+00, &
     & 0.2038100E+00, 0.2287800E+00, 0.2133200E+00, 0.2367000E+00, &
     & 0.3808700E+00, 0.2665400E+00, 0.2518544E+00, 0.2518544E+00 /
      data (ref_adm(18,iz,18,11),iz = 1,20) / &
     & 0.2078800E+00, 0.2078800E+00, 0.2054300E+00, 0.2075700E+00, &
     & 0.2275000E+00, 0.2217900E+00, 0.2163900E+00, 0.2197700E+00, &
     & 0.2094700E+00, 0.2124700E+00, 0.2072100E+00, 0.2270500E+00, &
     & 0.2086700E+00, 0.2244400E+00, 0.2287600E+00, 0.2536100E+00, &
     & 0.3015300E+00, 0.2723881E+00, 0.2439486E+00, 0.2439486E+00 /
      data (ref_adm(18,iz,19,11),iz = 1,20) / &
     & 0.2177700E+00, 0.2177700E+00, 0.2486800E+00, 0.2047700E+00, &
     & 0.2187100E+00, 0.2191200E+00, 0.2067300E+00, 0.1900200E+00, &
     & 0.2155300E+00, 0.2188600E+00, 0.2202000E+00, 0.2196800E+00, &
     & 0.2209400E+00, 0.2273200E+00, 0.2327600E+00, 0.2390700E+00, &
     & 0.2240200E+00, 0.2706195E+00, 0.2428862E+00, 0.2428862E+00 /
      data (ref_adm(18,iz,20,11),iz = 1,20) / &
     & 0.2349800E+00, 0.2349800E+00, 0.2032300E+00, 0.2336300E+00, &
     & 0.2096600E+00, 0.2118300E+00, 0.2280000E+00, 0.2222900E+00, &
     & 0.2154100E+00, 0.2221800E+00, 0.2215200E+00, 0.2389500E+00, &
     & 0.2418200E+00, 0.2378900E+00, 0.2198100E+00, 0.2219200E+00, &
     & 0.2686664E+00, 0.2688248E+00, 0.2419448E+00, 0.2419448E+00 /
      data (ref_adm(18,iz,21,11),iz = 1,20) / &
     & 0.2323300E+00, 0.2323300E+00, 0.2553000E+00, 0.2367000E+00, &
     & 0.2096300E+00, 0.1984700E+00, 0.1993900E+00, 0.2332700E+00, &
     & 0.2256100E+00, 0.2203600E+00, 0.2329400E+00, 0.2316200E+00, &
     & 0.2433900E+00, 0.2845000E+00, 0.2263700E+00, 0.2295900E+00, &
     & 0.2670963E+00, 0.2670351E+00, 0.2409518E+00, 0.2409518E+00 /
      data (ref_adm(18,iz,22,11),iz = 1,20) / &
     & 0.2442800E+00, 0.2442800E+00, 0.2571700E+00, 0.2416600E+00, &
     & 0.2287600E+00, 0.2386100E+00, 0.2398200E+00, 0.2233800E+00, &
     & 0.2354900E+00, 0.2339700E+00, 0.2299400E+00, 0.2449900E+00, &
     & 0.2489800E+00, 0.2471600E+00, 0.2556900E+00, 0.2956300E+00, &
     & 0.3440838E+00, 0.3407771E+00, 0.3116271E+00, 0.3116271E+00 /
      data (ref_adm(18,iz,23,11),iz = 1,20) / &
     & 0.2184900E+00, 0.2184900E+00, 0.2204300E+00, 0.2026800E+00, &
     & 0.2272900E+00, 0.2193500E+00, 0.2358400E+00, 0.2191400E+00, &
     & 0.2244400E+00, 0.2462000E+00, 0.2665900E+00, 0.2704100E+00, &
     & 0.2502900E+00, 0.2421300E+00, 0.2568200E+00, 0.2517800E+00, &
     & 0.2650100E+00, 0.3331608E+00, 0.3087029E+00, 0.3087029E+00 /
      data (ref_adm(18,iz,24,11),iz = 1,20) / &
     & 0.2157000E+00, 0.2157000E+00, 0.2151300E+00, 0.2188100E+00, &
     & 0.2443600E+00, 0.2507400E+00, 0.2860700E+00, 0.2483500E+00, &
     & 0.2586500E+00, 0.2493800E+00, 0.2737000E+00, 0.2436600E+00, &
     & 0.2343800E+00, 0.2427000E+00, 0.2494000E+00, 0.2332800E+00, &
     & 0.2233000E+00, 0.3270329E+00, 0.3062728E+00, 0.3062728E+00 /
      data (ref_adm(18,iz,25,11),iz = 1,20) / &
     & 0.2169200E+00, 0.2169200E+00, 0.2299400E+00, 0.2411200E+00, &
     & 0.2463700E+00, 0.2335900E+00, 0.2279100E+00, 0.2509700E+00, &
     & 0.2633300E+00, 0.2424400E+00, 0.2403300E+00, 0.2620600E+00, &
     & 0.2498700E+00, 0.2490400E+00, 0.2396600E+00, 0.2878000E+00, &
     & 0.2895000E+00, 0.3215932E+00, 0.3051074E+00, 0.3051074E+00 /
      data (ref_adm(18,iz,26,11),iz = 1,20) / &
     & 0.2186700E+00, 0.2186700E+00, 0.2356400E+00, 0.2298700E+00, &
     & 0.2233900E+00, 0.2371700E+00, 0.2458700E+00, 0.2591200E+00, &
     & 0.2632100E+00, 0.2699000E+00, 0.2581500E+00, 0.2772800E+00, &
     & 0.2671900E+00, 0.3016900E+00, 0.2716300E+00, 0.2980700E+00, &
     & 0.2915400E+00, 0.2859400E+00, 0.3047923E+00, 0.3047923E+00 /
      data (ref_adm(18,iz,27,11),iz = 1,20) / &
     & 0.2309300E+00, 0.2309300E+00, 0.2655000E+00, 0.2407700E+00, &
     & 0.2633600E+00, 0.2590200E+00, 0.2913700E+00, 0.2814100E+00, &
     & 0.2668600E+00, 0.2704700E+00, 0.2640900E+00, 0.2693000E+00, &
     & 0.2645300E+00, 0.2771000E+00, 0.2775300E+00, 0.2907000E+00, &
     & 0.3056500E+00, 0.3122100E+00, 0.2259900E+00, 0.2259900E+00 /
      data (ref_adm(18,iz,28,11),iz = 1,20) / &
     & 0.2272800E+00, 0.2272800E+00, 0.2203800E+00, 0.2022700E+00, &
     & 0.2500100E+00, 0.2535000E+00, 0.2342200E+00, 0.2664700E+00, &
     & 0.2562800E+00, 0.2859600E+00, 0.2794300E+00, 0.2758200E+00, &
     & 0.2845700E+00, 0.3097000E+00, 0.2971600E+00, 0.2800900E+00, &
     & 0.3073200E+00, 0.3157000E+00, 0.2793100E+00, 0.2793100E+00 /
      data (ref_adm(18,iz,29,11),iz = 1,20) / &
     & 0.2206400E+00, 0.2206400E+00, 0.2228500E+00, 0.2124500E+00, &
     & 0.2644200E+00, 0.2535400E+00, 0.2487600E+00, 0.2245900E+00, &
     & 0.2254500E+00, 0.2180000E+00, 0.2894900E+00, 0.2867600E+00, &
     & 0.3099100E+00, 0.3127500E+00, 0.2929100E+00, 0.2864900E+00, &
     & 0.3050400E+00, 0.2983200E+00, 0.2513000E+00, 0.2513000E+00 /
      data (ref_adm(18,iz,30,11),iz = 1,20) / &
     & 0.2230000E+00, 0.2230000E+00, 0.2602900E+00, 0.2640500E+00, &
     & 0.2324600E+00, 0.2210700E+00, 0.2236200E+00, 0.2532000E+00, &
     & 0.2805200E+00, 0.2668500E+00, 0.2929000E+00, 0.2896100E+00, &
     & 0.3140300E+00, 0.3152400E+00, 0.3137000E+00, 0.3280500E+00, &
     & 0.3193800E+00, 0.3006900E+00, 0.2619500E+00, 0.2619500E+00 /
      data (ref_adm(18,iz,31,11),iz = 1,20) / &
     & 0.1782500E+00, 0.1782500E+00, 0.2316200E+00, 0.2101700E+00, &
     & 0.3049100E+00, 0.2807300E+00, 0.2578100E+00, 0.2923900E+00, &
     & 0.3265300E+00, 0.3247300E+00, 0.3621300E+00, 0.3154100E+00, &
     & 0.3176900E+00, 0.3117200E+00, 0.3169600E+00, 0.3255900E+00, &
     & 0.3519900E+00, 0.3424400E+00, 0.2766600E+00, 0.2766600E+00 /
      data (ref_adm(18,iz,32,11),iz = 1,20) / &
     & 0.2188100E+00, 0.2188100E+00, 0.2397300E+00, 0.2568900E+00, &
     & 0.2426100E+00, 0.2276000E+00, 0.2460500E+00, 0.2430800E+00, &
     & 0.2551000E+00, 0.2916600E+00, 0.3061100E+00, 0.3251000E+00, &
     & 0.3093100E+00, 0.3163000E+00, 0.3133700E+00, 0.3326700E+00, &
     & 0.3315000E+00, 0.3387900E+00, 0.3258600E+00, 0.3258600E+00 /
      data (ref_adm(18,iz,33,11),iz = 1,20) / &
     & 0.2299300E+00, 0.2299300E+00, 0.1994300E+00, 0.2175300E+00, &
     & 0.2230000E+00, 0.2214700E+00, 0.2356400E+00, 0.2541000E+00, &
     & 0.2619400E+00, 0.2915100E+00, 0.3434200E+00, 0.3222300E+00, &
     & 0.3493100E+00, 0.3375700E+00, 0.3692900E+00, 0.3568300E+00, &
     & 0.3368000E+00, 0.3616900E+00, 0.2998300E+00, 0.2998300E+00 /
      data (ref_adm(18,iz,34,11),iz = 1,20) / &
     & 0.2293500E+00, 0.2293500E+00, 0.2414400E+00, 0.2420600E+00, &
     & 0.2124100E+00, 0.2362800E+00, 0.2675400E+00, 0.2717100E+00, &
     & 0.2649300E+00, 0.2937800E+00, 0.3089700E+00, 0.3220700E+00, &
     & 0.3390600E+00, 0.3118100E+00, 0.3705200E+00, 0.3956200E+00, &
     & 0.3442200E+00, 0.3574100E+00, 0.2557300E+00, 0.2557300E+00 /
      data (ref_adm(18,iz,35,11),iz = 1,20) / &
     & 0.2248600E+00, 0.2248600E+00, 0.2914900E+00, 0.2089100E+00, &
     & 0.2373200E+00, 0.2484000E+00, 0.2706100E+00, 0.3092300E+00, &
     & 0.2977700E+00, 0.3163100E+00, 0.3004600E+00, 0.3248600E+00, &
     & 0.3401300E+00, 0.3840500E+00, 0.3654400E+00, 0.3378900E+00, &
     & 0.3516800E+00, 0.3355500E+00, 0.3336134E+00, 0.3336134E+00 /
      data (ref_adm(18,iz,36,11),iz = 1,20) / &
     & 0.2254500E+00, 0.2254500E+00, 0.1898900E+00, 0.2188500E+00, &
     & 0.2755100E+00, 0.2210900E+00, 0.2803100E+00, 0.2652700E+00, &
     & 0.2847500E+00, 0.3231900E+00, 0.3053100E+00, 0.3431900E+00, &
     & 0.3333800E+00, 0.3288200E+00, 0.3681100E+00, 0.3515800E+00, &
     & 0.3777700E+00, 0.2951800E+00, 0.3355318E+00, 0.3355318E+00 /
      data (ref_adm(18,iz,37,11),iz = 1,20) / &
     & 0.2577000E+00, 0.2577000E+00, 0.2284500E+00, 0.2315300E+00, &
     & 0.2869400E+00, 0.2409600E+00, 0.2475400E+00, 0.2631000E+00, &
     & 0.2864600E+00, 0.3347000E+00, 0.3657200E+00, 0.3325300E+00, &
     & 0.3700300E+00, 0.3822300E+00, 0.3856200E+00, 0.3920500E+00, &
     & 0.3239600E+00, 0.3379044E+00, 0.3366534E+00, 0.3366534E+00 /
      data (ref_adm(18,iz,38,11),iz = 1,20) / &
     & 0.2577000E+00, 0.2577000E+00, 0.2284500E+00, 0.2315300E+00, &
     & 0.2869400E+00, 0.2409600E+00, 0.2475400E+00, 0.2631000E+00, &
     & 0.2864600E+00, 0.3347000E+00, 0.3657200E+00, 0.3325300E+00, &
     & 0.3700300E+00, 0.3822300E+00, 0.3856200E+00, 0.3920500E+00, &
     & 0.3239600E+00, 0.3379044E+00, 0.3366534E+00, 0.3366534E+00 /
! Solar Zenith Angle 55.0 Albedo  0.2585113E+00
      data (ref_adm(18,iz, 1,12),iz = 1,20) / &
     & 0.2028100E+00, 0.2028100E+00, 0.1970600E+00, 0.2006800E+00, &
     & 0.2044500E+00, 0.1960400E+00, 0.2287200E+00, 0.2090600E+00, &
     & 0.2102900E+00, 0.2322100E+00, 0.2378500E+00, 0.2453800E+00, &
     & 0.3005500E+00, 0.2898900E+00, 0.3507200E+00, 0.3631700E+00, &
     & 0.3809500E+00, 0.4154100E+00, 0.2920364E+00, 0.2920364E+00 /
      data (ref_adm(18,iz, 2,12),iz = 1,20) / &
     & 0.2028100E+00, 0.2028100E+00, 0.1970600E+00, 0.2006800E+00, &
     & 0.2044500E+00, 0.1960400E+00, 0.2287200E+00, 0.2090600E+00, &
     & 0.2102900E+00, 0.2322100E+00, 0.2378500E+00, 0.2453800E+00, &
     & 0.3005500E+00, 0.2898900E+00, 0.3507200E+00, 0.3631700E+00, &
     & 0.3809500E+00, 0.4154100E+00, 0.2920364E+00, 0.2920364E+00 /
      data (ref_adm(18,iz, 3,12),iz = 1,20) / &
     & 0.2444700E+00, 0.2444700E+00, 0.2195600E+00, 0.2032700E+00, &
     & 0.2135100E+00, 0.2429000E+00, 0.2111900E+00, 0.2193400E+00, &
     & 0.2308800E+00, 0.2329100E+00, 0.2552100E+00, 0.2589400E+00, &
     & 0.2379500E+00, 0.2960800E+00, 0.3012100E+00, 0.3343400E+00, &
     & 0.3541000E+00, 0.4513300E+00, 0.4241200E+00, 0.4241200E+00 /
      data (ref_adm(18,iz, 4,12),iz = 1,20) / &
     & 0.2246700E+00, 0.2246700E+00, 0.2406100E+00, 0.2253700E+00, &
     & 0.2098900E+00, 0.2125600E+00, 0.2214400E+00, 0.2060800E+00, &
     & 0.2378800E+00, 0.2293600E+00, 0.2232600E+00, 0.2245400E+00, &
     & 0.2483200E+00, 0.2632000E+00, 0.2955900E+00, 0.2966400E+00, &
     & 0.3493300E+00, 0.4160000E+00, 0.4168800E+00, 0.4168800E+00 /
      data (ref_adm(18,iz, 5,12),iz = 1,20) / &
     & 0.2137400E+00, 0.2137400E+00, 0.2141600E+00, 0.1964100E+00, &
     & 0.2151700E+00, 0.2057600E+00, 0.2300100E+00, 0.2265300E+00, &
     & 0.2287200E+00, 0.2199900E+00, 0.2213200E+00, 0.2369100E+00, &
     & 0.2529600E+00, 0.2603900E+00, 0.2629400E+00, 0.3263300E+00, &
     & 0.3396100E+00, 0.4107400E+00, 0.4481000E+00, 0.4481000E+00 /
      data (ref_adm(18,iz, 6,12),iz = 1,20) / &
     & 0.2139800E+00, 0.2139800E+00, 0.2171500E+00, 0.2120200E+00, &
     & 0.2147800E+00, 0.2402300E+00, 0.2242400E+00, 0.2224000E+00, &
     & 0.2198500E+00, 0.2169100E+00, 0.2102500E+00, 0.2318200E+00, &
     & 0.2516600E+00, 0.2488600E+00, 0.2587000E+00, 0.2830800E+00, &
     & 0.3380400E+00, 0.3840400E+00, 0.3810200E+00, 0.3810200E+00 /
      data (ref_adm(18,iz, 7,12),iz = 1,20) / &
     & 0.2219600E+00, 0.2219600E+00, 0.2332900E+00, 0.2342000E+00, &
     & 0.2360700E+00, 0.2305100E+00, 0.2283600E+00, 0.2205900E+00, &
     & 0.2327200E+00, 0.2362300E+00, 0.2304300E+00, 0.2314500E+00, &
     & 0.2394000E+00, 0.2516200E+00, 0.2968600E+00, 0.3101800E+00, &
     & 0.4039800E+00, 0.4152600E+00, 0.3850300E+00, 0.3850300E+00 /
      data (ref_adm(18,iz, 8,12),iz = 1,20) / &
     & 0.2350600E+00, 0.2350600E+00, 0.2069800E+00, 0.2192000E+00, &
     & 0.2404800E+00, 0.2339700E+00, 0.2197200E+00, 0.2164600E+00, &
     & 0.2172700E+00, 0.2531600E+00, 0.2798800E+00, 0.2379600E+00, &
     & 0.2813100E+00, 0.2968000E+00, 0.3211400E+00, 0.3433300E+00, &
     & 0.3560500E+00, 0.4057900E+00, 0.3246300E+00, 0.3246300E+00 /
      data (ref_adm(18,iz, 9,12),iz = 1,20) / &
     & 0.1939000E+00, 0.1939000E+00, 0.2004900E+00, 0.2054400E+00, &
     & 0.2256300E+00, 0.2123500E+00, 0.2078500E+00, 0.2070400E+00, &
     & 0.1914100E+00, 0.1983500E+00, 0.2388400E+00, 0.2289700E+00, &
     & 0.2225200E+00, 0.2625200E+00, 0.2850900E+00, 0.3300800E+00, &
     & 0.3453800E+00, 0.3392400E+00, 0.3566500E+00, 0.3566500E+00 /
      data (ref_adm(18,iz,10,12),iz = 1,20) / &
     & 0.2045800E+00, 0.2045800E+00, 0.2026000E+00, 0.1991200E+00, &
     & 0.2115400E+00, 0.2113100E+00, 0.1922400E+00, 0.2029400E+00, &
     & 0.2050000E+00, 0.2162700E+00, 0.2090800E+00, 0.2215400E+00, &
     & 0.2383200E+00, 0.2427300E+00, 0.2462000E+00, 0.2692800E+00, &
     & 0.3323600E+00, 0.2882300E+00, 0.3912200E+00, 0.3912200E+00 /
      data (ref_adm(18,iz,11,12),iz = 1,20) / &
     & 0.2322300E+00, 0.2322300E+00, 0.2015300E+00, 0.1969700E+00, &
     & 0.2160400E+00, 0.2192200E+00, 0.2150400E+00, 0.2020100E+00, &
     & 0.2077900E+00, 0.2268000E+00, 0.2323700E+00, 0.2239000E+00, &
     & 0.2188600E+00, 0.2409400E+00, 0.2439900E+00, 0.2571000E+00, &
     & 0.2934800E+00, 0.2509700E+00, 0.3867800E+00, 0.3867800E+00 /
      data (ref_adm(18,iz,12,12),iz = 1,20) / &
     & 0.2312300E+00, 0.2312300E+00, 0.2130800E+00, 0.2083800E+00, &
     & 0.1978900E+00, 0.2238000E+00, 0.2144200E+00, 0.1965900E+00, &
     & 0.2183000E+00, 0.2292200E+00, 0.2349400E+00, 0.2408700E+00, &
     & 0.2263500E+00, 0.2470400E+00, 0.2472900E+00, 0.2716100E+00, &
     & 0.2871600E+00, 0.2585400E+00, 0.3169000E+00, 0.3169000E+00 /
      data (ref_adm(18,iz,13,12),iz = 1,20) / &
     & 0.2544800E+00, 0.2544800E+00, 0.2185000E+00, 0.2185900E+00, &
     & 0.2194500E+00, 0.2089600E+00, 0.2149500E+00, 0.2065800E+00, &
     & 0.2081900E+00, 0.2406300E+00, 0.2424000E+00, 0.2210700E+00, &
     & 0.2326700E+00, 0.2479200E+00, 0.2364500E+00, 0.2627100E+00, &
     & 0.2868200E+00, 0.2790700E+00, 0.2723653E+00, 0.2723653E+00 /
      data (ref_adm(18,iz,14,12),iz = 1,20) / &
     & 0.2229900E+00, 0.2229900E+00, 0.2131200E+00, 0.2217600E+00, &
     & 0.2181600E+00, 0.2161900E+00, 0.2079500E+00, 0.2133600E+00, &
     & 0.2152900E+00, 0.2167400E+00, 0.2189100E+00, 0.2148500E+00, &
     & 0.2314200E+00, 0.2386700E+00, 0.2607500E+00, 0.2520800E+00, &
     & 0.2736100E+00, 0.3155600E+00, 0.2979500E+00, 0.2979500E+00 /
      data (ref_adm(18,iz,15,12),iz = 1,20) / &
     & 0.2155300E+00, 0.2155300E+00, 0.2064800E+00, 0.2104000E+00, &
     & 0.2080900E+00, 0.2125900E+00, 0.2209800E+00, 0.2096400E+00, &
     & 0.2064300E+00, 0.2200400E+00, 0.2223800E+00, 0.2300700E+00, &
     & 0.2388700E+00, 0.2448200E+00, 0.2365400E+00, 0.2602200E+00, &
     & 0.3219000E+00, 0.3004700E+00, 0.2662387E+00, 0.2662387E+00 /
      data (ref_adm(18,iz,16,12),iz = 1,20) / &
     & 0.2200000E+00, 0.2200000E+00, 0.2076600E+00, 0.1978000E+00, &
     & 0.2174600E+00, 0.2153600E+00, 0.2460400E+00, 0.2101400E+00, &
     & 0.2080700E+00, 0.2111400E+00, 0.2192200E+00, 0.2211600E+00, &
     & 0.2182900E+00, 0.2378100E+00, 0.2249800E+00, 0.2630900E+00, &
     & 0.2991600E+00, 0.3143100E+00, 0.2629713E+00, 0.2629713E+00 /
      data (ref_adm(18,iz,17,12),iz = 1,20) / &
     & 0.2022100E+00, 0.2022100E+00, 0.1671400E+00, 0.2094700E+00, &
     & 0.2075500E+00, 0.2258000E+00, 0.2459400E+00, 0.2327900E+00, &
     & 0.2228000E+00, 0.2230100E+00, 0.2416900E+00, 0.2187600E+00, &
     & 0.2315100E+00, 0.2470500E+00, 0.2703200E+00, 0.2466200E+00, &
     & 0.3322200E+00, 0.2979621E+00, 0.2599151E+00, 0.2599151E+00 /
      data (ref_adm(18,iz,18,12),iz = 1,20) / &
     & 0.2077600E+00, 0.2077600E+00, 0.2266800E+00, 0.2244800E+00, &
     & 0.1963100E+00, 0.2203600E+00, 0.1931400E+00, 0.2195800E+00, &
     & 0.2220800E+00, 0.2431400E+00, 0.2403500E+00, 0.2227500E+00, &
     & 0.2574000E+00, 0.2551000E+00, 0.2774900E+00, 0.2531900E+00, &
     & 0.3076900E+00, 0.2834662E+00, 0.2483197E+00, 0.2483197E+00 /
      data (ref_adm(18,iz,19,12),iz = 1,20) / &
     & 0.2156800E+00, 0.2156800E+00, 0.2307900E+00, 0.2198500E+00, &
     & 0.2358000E+00, 0.2297400E+00, 0.2122500E+00, 0.2390200E+00, &
     & 0.2234300E+00, 0.2220200E+00, 0.2208500E+00, 0.2261000E+00, &
     & 0.2534900E+00, 0.2396700E+00, 0.2596300E+00, 0.2742900E+00, &
     & 0.2892233E+00, 0.2828858E+00, 0.2478649E+00, 0.2478649E+00 /
      data (ref_adm(18,iz,20,12),iz = 1,20) / &
     & 0.2196700E+00, 0.2196700E+00, 0.2152000E+00, 0.2028700E+00, &
     & 0.2143200E+00, 0.2029900E+00, 0.2318200E+00, 0.2355200E+00, &
     & 0.2107800E+00, 0.2283600E+00, 0.2196600E+00, 0.2585600E+00, &
     & 0.2440000E+00, 0.2647000E+00, 0.2957500E+00, 0.3110200E+00, &
     & 0.2879083E+00, 0.2817938E+00, 0.2473893E+00, 0.2473893E+00 /
      data (ref_adm(18,iz,21,12),iz = 1,20) / &
     & 0.2213200E+00, 0.2213200E+00, 0.2081900E+00, 0.2252200E+00, &
     & 0.2207900E+00, 0.2338500E+00, 0.2254700E+00, 0.2233800E+00, &
     & 0.2336100E+00, 0.2114100E+00, 0.2148400E+00, 0.2305100E+00, &
     & 0.2780000E+00, 0.2584500E+00, 0.2613000E+00, 0.3368900E+00, &
     & 0.2873017E+00, 0.2808934E+00, 0.2470286E+00, 0.2470286E+00 /
      data (ref_adm(18,iz,22,12),iz = 1,20) / &
     & 0.2185800E+00, 0.2185800E+00, 0.2141300E+00, 0.2124000E+00, &
     & 0.2202500E+00, 0.2165600E+00, 0.2215100E+00, 0.2290400E+00, &
     & 0.2343200E+00, 0.2087900E+00, 0.2216000E+00, 0.2279700E+00, &
     & 0.2464400E+00, 0.2751500E+00, 0.2963300E+00, 0.2849100E+00, &
     & 0.3187090E+00, 0.3328107E+00, 0.3289067E+00, 0.3289067E+00 /
      data (ref_adm(18,iz,23,12),iz = 1,20) / &
     & 0.2109000E+00, 0.2109000E+00, 0.2141600E+00, 0.2006700E+00, &
     & 0.2408800E+00, 0.2187700E+00, 0.2509700E+00, 0.2342200E+00, &
     & 0.2350500E+00, 0.2160800E+00, 0.2226100E+00, 0.2473200E+00, &
     & 0.2610900E+00, 0.2835600E+00, 0.3012500E+00, 0.3212400E+00, &
     & 0.3192011E+00, 0.3320173E+00, 0.3292501E+00, 0.3292501E+00 /
      data (ref_adm(18,iz,24,12),iz = 1,20) / &
     & 0.2002700E+00, 0.2002700E+00, 0.2068600E+00, 0.2156500E+00, &
     & 0.2212200E+00, 0.2242900E+00, 0.2236000E+00, 0.2550100E+00, &
     & 0.2274900E+00, 0.2331100E+00, 0.2221700E+00, 0.2386300E+00, &
     & 0.2656400E+00, 0.2787900E+00, 0.2705700E+00, 0.2802800E+00, &
     & 0.2965300E+00, 0.3329209E+00, 0.3309898E+00, 0.3309898E+00 /
      data (ref_adm(18,iz,25,12),iz = 1,20) / &
     & 0.2054200E+00, 0.2054200E+00, 0.2171400E+00, 0.2214800E+00, &
     & 0.2267800E+00, 0.2303400E+00, 0.2293400E+00, 0.2399000E+00, &
     & 0.2464700E+00, 0.2586300E+00, 0.2625200E+00, 0.2729800E+00, &
     & 0.2815400E+00, 0.3021400E+00, 0.2688800E+00, 0.3168800E+00, &
     & 0.2961800E+00, 0.3346685E+00, 0.3340760E+00, 0.3340760E+00 /
      data (ref_adm(18,iz,26,12),iz = 1,20) / &
     & 0.2160100E+00, 0.2160100E+00, 0.2361000E+00, 0.2306400E+00, &
     & 0.2348800E+00, 0.2441200E+00, 0.2562200E+00, 0.2601900E+00, &
     & 0.2619900E+00, 0.2562500E+00, 0.2515000E+00, 0.2563500E+00, &
     & 0.2794200E+00, 0.2871400E+00, 0.2975000E+00, 0.2949900E+00, &
     & 0.3144400E+00, 0.3350100E+00, 0.3385471E+00, 0.3385471E+00 /
      data (ref_adm(18,iz,27,12),iz = 1,20) / &
     & 0.2232500E+00, 0.2232500E+00, 0.2283700E+00, 0.2280600E+00, &
     & 0.2244300E+00, 0.2619700E+00, 0.2511500E+00, 0.2673000E+00, &
     & 0.2683000E+00, 0.2640900E+00, 0.2836400E+00, 0.2896800E+00, &
     & 0.2858900E+00, 0.2811800E+00, 0.2863800E+00, 0.2982300E+00, &
     & 0.2956800E+00, 0.3023200E+00, 0.2632800E+00, 0.2632800E+00 /
      data (ref_adm(18,iz,28,12),iz = 1,20) / &
     & 0.2200300E+00, 0.2200300E+00, 0.2429800E+00, 0.2129700E+00, &
     & 0.2164100E+00, 0.2268200E+00, 0.2273300E+00, 0.2394700E+00, &
     & 0.2578700E+00, 0.2802200E+00, 0.2832000E+00, 0.2553600E+00, &
     & 0.2794100E+00, 0.3147400E+00, 0.3014700E+00, 0.3194900E+00, &
     & 0.3161600E+00, 0.3198000E+00, 0.2938800E+00, 0.2938800E+00 /
      data (ref_adm(18,iz,29,12),iz = 1,20) / &
     & 0.2172900E+00, 0.2172900E+00, 0.2301000E+00, 0.2371500E+00, &
     & 0.2335300E+00, 0.2222800E+00, 0.2634300E+00, 0.2583900E+00, &
     & 0.2389600E+00, 0.2680700E+00, 0.2838600E+00, 0.2810800E+00, &
     & 0.2683200E+00, 0.2967200E+00, 0.3009500E+00, 0.3229300E+00, &
     & 0.3078700E+00, 0.3398700E+00, 0.2801000E+00, 0.2801000E+00 /
      data (ref_adm(18,iz,30,12),iz = 1,20) / &
     & 0.2243900E+00, 0.2243900E+00, 0.2390100E+00, 0.2482600E+00, &
     & 0.2219900E+00, 0.2824400E+00, 0.2563300E+00, 0.2792300E+00, &
     & 0.2842100E+00, 0.2598200E+00, 0.2923900E+00, 0.2865800E+00, &
     & 0.2926300E+00, 0.3009400E+00, 0.2991100E+00, 0.3203300E+00, &
     & 0.3384800E+00, 0.3413200E+00, 0.2706900E+00, 0.2706900E+00 /
      data (ref_adm(18,iz,31,12),iz = 1,20) / &
     & 0.2124500E+00, 0.2124500E+00, 0.2468800E+00, 0.2850300E+00, &
     & 0.2703100E+00, 0.2530700E+00, 0.2952500E+00, 0.2831300E+00, &
     & 0.2809100E+00, 0.2911600E+00, 0.3094200E+00, 0.2983200E+00, &
     & 0.2940000E+00, 0.3109400E+00, 0.3102100E+00, 0.3245900E+00, &
     & 0.3454200E+00, 0.3330400E+00, 0.2765400E+00, 0.2765400E+00 /
      data (ref_adm(18,iz,32,12),iz = 1,20) / &
     & 0.2189700E+00, 0.2189700E+00, 0.2196500E+00, 0.2315900E+00, &
     & 0.2395000E+00, 0.2438500E+00, 0.2602400E+00, 0.2706600E+00, &
     & 0.2742100E+00, 0.2863700E+00, 0.2849200E+00, 0.3044900E+00, &
     & 0.3078700E+00, 0.3366000E+00, 0.3437000E+00, 0.3728400E+00, &
     & 0.3814400E+00, 0.3695200E+00, 0.3232000E+00, 0.3232000E+00 /
      data (ref_adm(18,iz,33,12),iz = 1,20) / &
     & 0.2206000E+00, 0.2206000E+00, 0.2270800E+00, 0.2335100E+00, &
     & 0.2476600E+00, 0.2475500E+00, 0.2636500E+00, 0.2648300E+00, &
     & 0.2653100E+00, 0.2862200E+00, 0.2924600E+00, 0.3130900E+00, &
     & 0.3164800E+00, 0.3181900E+00, 0.3593700E+00, 0.4040500E+00, &
     & 0.3790900E+00, 0.3856700E+00, 0.3212800E+00, 0.3212800E+00 /
      data (ref_adm(18,iz,34,12),iz = 1,20) / &
     & 0.2356900E+00, 0.2356900E+00, 0.2239800E+00, 0.2312600E+00, &
     & 0.2532700E+00, 0.2766300E+00, 0.2546100E+00, 0.2961700E+00, &
     & 0.2976800E+00, 0.2961000E+00, 0.3174400E+00, 0.3329600E+00, &
     & 0.3161400E+00, 0.3500600E+00, 0.3599800E+00, 0.3658400E+00, &
     & 0.3945300E+00, 0.4069600E+00, 0.4044446E+00, 0.4044446E+00 /
      data (ref_adm(18,iz,35,12),iz = 1,20) / &
     & 0.2237500E+00, 0.2237500E+00, 0.2458500E+00, 0.2337100E+00, &
     & 0.2633400E+00, 0.2532300E+00, 0.2534800E+00, 0.2736100E+00, &
     & 0.2907400E+00, 0.2879700E+00, 0.3128500E+00, 0.3277700E+00, &
     & 0.3473400E+00, 0.3595700E+00, 0.3658800E+00, 0.4008200E+00, &
     & 0.4039800E+00, 0.4177700E+00, 0.4105267E+00, 0.4105267E+00 /
      data (ref_adm(18,iz,36,12),iz = 1,20) / &
     & 0.2397900E+00, 0.2397900E+00, 0.2253700E+00, 0.2410700E+00, &
     & 0.2742600E+00, 0.2675000E+00, 0.2667100E+00, 0.2497100E+00, &
     & 0.2876200E+00, 0.3118200E+00, 0.3304600E+00, 0.3344500E+00, &
     & 0.3744100E+00, 0.3589600E+00, 0.3957000E+00, 0.3822500E+00, &
     & 0.3918200E+00, 0.4168400E+00, 0.4145114E+00, 0.4145114E+00 /
      data (ref_adm(18,iz,37,12),iz = 1,20) / &
     & 0.2568100E+00, 0.2568100E+00, 0.2336300E+00, 0.2262600E+00, &
     & 0.2557500E+00, 0.2906900E+00, 0.2775800E+00, 0.2693700E+00, &
     & 0.3019300E+00, 0.3181000E+00, 0.3208400E+00, 0.3487400E+00, &
     & 0.3701100E+00, 0.3823700E+00, 0.3993800E+00, 0.4189700E+00, &
     & 0.4181400E+00, 0.4763200E+00, 0.4167014E+00, 0.4167014E+00 /
      data (ref_adm(18,iz,38,12),iz = 1,20) / &
     & 0.2568100E+00, 0.2568100E+00, 0.2336300E+00, 0.2262600E+00, &
     & 0.2557500E+00, 0.2906900E+00, 0.2775800E+00, 0.2693700E+00, &
     & 0.3019300E+00, 0.3181000E+00, 0.3208400E+00, 0.3487400E+00, &
     & 0.3701100E+00, 0.3823700E+00, 0.3993800E+00, 0.4189700E+00, &
     & 0.4181400E+00, 0.4763200E+00, 0.4167014E+00, 0.4167014E+00 /
! Solar Zenith Angle 60.0 Albedo  0.2645858E+00
      data (ref_adm(18,iz, 1,13),iz = 1,20) / &
     & 0.2324800E+00, 0.2324800E+00, 0.2264500E+00, 0.2130700E+00, &
     & 0.2002500E+00, 0.2086900E+00, 0.2016700E+00, 0.2097500E+00, &
     & 0.2368100E+00, 0.2425900E+00, 0.2408300E+00, 0.2566300E+00, &
     & 0.3236100E+00, 0.3928500E+00, 0.4469800E+00, 0.4679000E+00, &
     & 0.5152800E+00, 0.5514000E+00, 0.5063100E+00, 0.5063100E+00 /
      data (ref_adm(18,iz, 2,13),iz = 1,20) / &
     & 0.2324800E+00, 0.2324800E+00, 0.2264500E+00, 0.2130700E+00, &
     & 0.2002500E+00, 0.2086900E+00, 0.2016700E+00, 0.2097500E+00, &
     & 0.2368100E+00, 0.2425900E+00, 0.2408300E+00, 0.2566300E+00, &
     & 0.3236100E+00, 0.3928500E+00, 0.4469800E+00, 0.4679000E+00, &
     & 0.5152800E+00, 0.5514000E+00, 0.5063100E+00, 0.5063100E+00 /
      data (ref_adm(18,iz, 3,13),iz = 1,20) / &
     & 0.2176600E+00, 0.2176600E+00, 0.2095900E+00, 0.2136900E+00, &
     & 0.2075100E+00, 0.1957500E+00, 0.2311500E+00, 0.2192100E+00, &
     & 0.2142800E+00, 0.2356200E+00, 0.2334600E+00, 0.2496200E+00, &
     & 0.2686600E+00, 0.3439100E+00, 0.3377400E+00, 0.4195500E+00, &
     & 0.4254000E+00, 0.5373800E+00, 0.7489961E-08, 0.7489961E-08 /
      data (ref_adm(18,iz, 4,13),iz = 1,20) / &
     & 0.1984200E+00, 0.1984200E+00, 0.2080400E+00, 0.2110800E+00, &
     & 0.1970000E+00, 0.2063600E+00, 0.2055600E+00, 0.2233300E+00, &
     & 0.2178900E+00, 0.2234600E+00, 0.2391700E+00, 0.2435400E+00, &
     & 0.2591700E+00, 0.2963800E+00, 0.3269000E+00, 0.3593600E+00, &
     & 0.4305200E+00, 0.4971600E+00, 0.4794987E+00, 0.4794987E+00 /
      data (ref_adm(18,iz, 5,13),iz = 1,20) / &
     & 0.2094000E+00, 0.2094000E+00, 0.2040500E+00, 0.2129600E+00, &
     & 0.2088800E+00, 0.2049300E+00, 0.2068200E+00, 0.2298400E+00, &
     & 0.2353700E+00, 0.2216800E+00, 0.2349300E+00, 0.2446100E+00, &
     & 0.2591600E+00, 0.2770200E+00, 0.2941500E+00, 0.3654700E+00, &
     & 0.4426100E+00, 0.5189700E+00, 0.5360700E+00, 0.5360700E+00 /
      data (ref_adm(18,iz, 6,13),iz = 1,20) / &
     & 0.2104900E+00, 0.2104900E+00, 0.2002500E+00, 0.1961800E+00, &
     & 0.2016800E+00, 0.2051200E+00, 0.2057700E+00, 0.2086400E+00, &
     & 0.2091700E+00, 0.2172600E+00, 0.2386100E+00, 0.2438900E+00, &
     & 0.2686100E+00, 0.2817500E+00, 0.3141300E+00, 0.3568900E+00, &
     & 0.4459100E+00, 0.4696200E+00, 0.4890000E+00, 0.4890000E+00 /
      data (ref_adm(18,iz, 7,13),iz = 1,20) / &
     & 0.2082100E+00, 0.2082100E+00, 0.2102600E+00, 0.2031500E+00, &
     & 0.2109800E+00, 0.2072900E+00, 0.2068100E+00, 0.2069100E+00, &
     & 0.2151900E+00, 0.2253500E+00, 0.2227500E+00, 0.2402600E+00, &
     & 0.2560800E+00, 0.2614200E+00, 0.2908500E+00, 0.3444400E+00, &
     & 0.3933900E+00, 0.4566000E+00, 0.4921300E+00, 0.4921300E+00 /
      data (ref_adm(18,iz, 8,13),iz = 1,20) / &
     & 0.2096400E+00, 0.2096400E+00, 0.2085100E+00, 0.2182600E+00, &
     & 0.2194800E+00, 0.2030600E+00, 0.2058200E+00, 0.2073500E+00, &
     & 0.2204600E+00, 0.2159600E+00, 0.2075700E+00, 0.2385600E+00, &
     & 0.2431600E+00, 0.2481700E+00, 0.2712900E+00, 0.3255000E+00, &
     & 0.3370300E+00, 0.3886400E+00, 0.3856900E+00, 0.3856900E+00 /
      data (ref_adm(18,iz, 9,13),iz = 1,20) / &
     & 0.2172400E+00, 0.2172400E+00, 0.2017200E+00, 0.2129900E+00, &
     & 0.2177900E+00, 0.1955400E+00, 0.1956400E+00, 0.2024700E+00, &
     & 0.2136900E+00, 0.2293100E+00, 0.2119800E+00, 0.2329200E+00, &
     & 0.2557100E+00, 0.2755700E+00, 0.2929400E+00, 0.3309200E+00, &
     & 0.3428800E+00, 0.3955200E+00, 0.4159300E+00, 0.4159300E+00 /
      data (ref_adm(18,iz,10,13),iz = 1,20) / &
     & 0.2118800E+00, 0.2118800E+00, 0.2130200E+00, 0.2082700E+00, &
     & 0.2202100E+00, 0.2100300E+00, 0.1911800E+00, 0.2125900E+00, &
     & 0.2244700E+00, 0.2312600E+00, 0.2242700E+00, 0.2335300E+00, &
     & 0.2727100E+00, 0.2810200E+00, 0.2779000E+00, 0.3065900E+00, &
     & 0.3625700E+00, 0.3813000E+00, 0.4063700E+00, 0.4063700E+00 /
      data (ref_adm(18,iz,11,13),iz = 1,20) / &
     & 0.2214600E+00, 0.2214600E+00, 0.2071100E+00, 0.2094600E+00, &
     & 0.2147000E+00, 0.1987500E+00, 0.1964300E+00, 0.2114500E+00, &
     & 0.2027600E+00, 0.2222000E+00, 0.2363300E+00, 0.2424000E+00, &
     & 0.2630300E+00, 0.2422300E+00, 0.2676200E+00, 0.3022900E+00, &
     & 0.3279500E+00, 0.3573700E+00, 0.3466200E+00, 0.3466200E+00 /
      data (ref_adm(18,iz,12,13),iz = 1,20) / &
     & 0.2050300E+00, 0.2050300E+00, 0.1967600E+00, 0.2098300E+00, &
     & 0.2020100E+00, 0.1845600E+00, 0.2026700E+00, 0.2006000E+00, &
     & 0.2197400E+00, 0.2129600E+00, 0.2289400E+00, 0.2316300E+00, &
     & 0.2605900E+00, 0.2604700E+00, 0.2539500E+00, 0.2781500E+00, &
     & 0.2971700E+00, 0.3628800E+00, 0.3434000E+00, 0.3434000E+00 /
      data (ref_adm(18,iz,13,13),iz = 1,20) / &
     & 0.2087900E+00, 0.2087900E+00, 0.2124600E+00, 0.2000200E+00, &
     & 0.1978300E+00, 0.2015100E+00, 0.1973100E+00, 0.2194800E+00, &
     & 0.2265400E+00, 0.2079400E+00, 0.2250800E+00, 0.2393800E+00, &
     & 0.2497400E+00, 0.2607600E+00, 0.2584900E+00, 0.2770000E+00, &
     & 0.3172000E+00, 0.3448800E+00, 0.3396700E+00, 0.3396700E+00 /
      data (ref_adm(18,iz,14,13),iz = 1,20) / &
     & 0.2196400E+00, 0.2196400E+00, 0.2190000E+00, 0.2137300E+00, &
     & 0.2108700E+00, 0.2129300E+00, 0.2114900E+00, 0.2137000E+00, &
     & 0.2168800E+00, 0.2243100E+00, 0.2244100E+00, 0.2305000E+00, &
     & 0.2376900E+00, 0.2462900E+00, 0.2587700E+00, 0.2626700E+00, &
     & 0.3180300E+00, 0.3306400E+00, 0.3172500E+00, 0.3172500E+00 /
      data (ref_adm(18,iz,15,13),iz = 1,20) / &
     & 0.2124300E+00, 0.2124300E+00, 0.2071800E+00, 0.2052300E+00, &
     & 0.2008400E+00, 0.2030900E+00, 0.2057600E+00, 0.2143300E+00, &
     & 0.2192500E+00, 0.2185200E+00, 0.2205400E+00, 0.2321300E+00, &
     & 0.2478500E+00, 0.2548200E+00, 0.2673800E+00, 0.3038000E+00, &
     & 0.3046100E+00, 0.3892921E+00, 0.3542151E+00, 0.3542151E+00 /
      data (ref_adm(18,iz,16,13),iz = 1,20) / &
     & 0.2032300E+00, 0.2032300E+00, 0.2243100E+00, 0.2066600E+00, &
     & 0.1999200E+00, 0.2085900E+00, 0.2015800E+00, 0.2004800E+00, &
     & 0.2037400E+00, 0.2088800E+00, 0.2157700E+00, 0.2226500E+00, &
     & 0.2289000E+00, 0.2459500E+00, 0.2865100E+00, 0.2941800E+00, &
     & 0.3208400E+00, 0.2892900E+00, 0.3440436E+00, 0.3440436E+00 /
      data (ref_adm(18,iz,17,13),iz = 1,20) / &
     & 0.2122400E+00, 0.2122400E+00, 0.2069600E+00, 0.2286700E+00, &
     & 0.2208200E+00, 0.2321600E+00, 0.2081100E+00, 0.1999800E+00, &
     & 0.2233200E+00, 0.2087100E+00, 0.2249800E+00, 0.2321500E+00, &
     & 0.2251600E+00, 0.2453300E+00, 0.3012200E+00, 0.2929300E+00, &
     & 0.3049900E+00, 0.3662475E+00, 0.3351013E+00, 0.3351013E+00 /
      data (ref_adm(18,iz,18,13),iz = 1,20) / &
     & 0.2075600E+00, 0.2075600E+00, 0.2153500E+00, 0.2216700E+00, &
     & 0.2424600E+00, 0.2294400E+00, 0.2097600E+00, 0.2077800E+00, &
     & 0.2293100E+00, 0.2375100E+00, 0.2284000E+00, 0.2310900E+00, &
     & 0.2222500E+00, 0.2633200E+00, 0.2900600E+00, 0.3197300E+00, &
     & 0.2505700E+00, 0.2943904E+00, 0.2573743E+00, 0.2573743E+00 /
      data (ref_adm(18,iz,19,13),iz = 1,20) / &
     & 0.2122300E+00, 0.2122300E+00, 0.2041600E+00, 0.2137500E+00, &
     & 0.2115300E+00, 0.2153100E+00, 0.2097300E+00, 0.2128200E+00, &
     & 0.2346700E+00, 0.2332400E+00, 0.2309000E+00, 0.2300400E+00, &
     & 0.2450700E+00, 0.2427900E+00, 0.2695200E+00, 0.3148800E+00, &
     & 0.2980661E+00, 0.2917419E+00, 0.2558724E+00, 0.2558724E+00 /
      data (ref_adm(18,iz,20,13),iz = 1,20) / &
     & 0.2371800E+00, 0.2371800E+00, 0.2223100E+00, 0.2076500E+00, &
     & 0.2309000E+00, 0.2317800E+00, 0.2016700E+00, 0.2295000E+00, &
     & 0.2407600E+00, 0.2588000E+00, 0.2351800E+00, 0.2479400E+00, &
     & 0.2556900E+00, 0.2453700E+00, 0.2596700E+00, 0.2822500E+00, &
     & 0.2955535E+00, 0.2892582E+00, 0.2545633E+00, 0.2545633E+00 /
      data (ref_adm(18,iz,21,13),iz = 1,20) / &
     & 0.2237400E+00, 0.2237400E+00, 0.2027000E+00, 0.2384200E+00, &
     & 0.2269900E+00, 0.2130100E+00, 0.2130500E+00, 0.2233900E+00, &
     & 0.2524900E+00, 0.2667300E+00, 0.2467000E+00, 0.2527500E+00, &
     & 0.2618700E+00, 0.2707700E+00, 0.2667100E+00, 0.3154600E+00, &
     & 0.2928855E+00, 0.2867460E+00, 0.2532418E+00, 0.2532418E+00 /
      data (ref_adm(18,iz,22,13),iz = 1,20) / &
     & 0.2182200E+00, 0.2182200E+00, 0.2224200E+00, 0.2429500E+00, &
     & 0.2209100E+00, 0.2328100E+00, 0.2437900E+00, 0.2419400E+00, &
     & 0.2591900E+00, 0.2514400E+00, 0.2497400E+00, 0.2470900E+00, &
     & 0.2864800E+00, 0.2630900E+00, 0.2794200E+00, 0.2813900E+00, &
     & 0.3763073E+00, 0.3776762E+00, 0.3513281E+00, 0.3513281E+00 /
      data (ref_adm(18,iz,23,13),iz = 1,20) / &
     & 0.2104200E+00, 0.2104200E+00, 0.2355600E+00, 0.2154800E+00, &
     & 0.2061200E+00, 0.2350700E+00, 0.2231300E+00, 0.2303300E+00, &
     & 0.2535400E+00, 0.2494200E+00, 0.2387900E+00, 0.2476200E+00, &
     & 0.2712300E+00, 0.2721900E+00, 0.2793800E+00, 0.3114000E+00, &
     & 0.3681122E+00, 0.3676288E+00, 0.3477694E+00, 0.3477694E+00 /
      data (ref_adm(18,iz,24,13),iz = 1,20) / &
     & 0.2062400E+00, 0.2062400E+00, 0.2053900E+00, 0.2081800E+00, &
     & 0.2128900E+00, 0.2173200E+00, 0.2255000E+00, 0.2258900E+00, &
     & 0.2358800E+00, 0.2494500E+00, 0.2622300E+00, 0.2709800E+00, &
     & 0.2785600E+00, 0.2727600E+00, 0.2922200E+00, 0.3175100E+00, &
     & 0.2962500E+00, 0.3599772E+00, 0.3456422E+00, 0.3456422E+00 /
      data (ref_adm(18,iz,25,13),iz = 1,20) / &
     & 0.2121900E+00, 0.2121900E+00, 0.2226200E+00, 0.2220100E+00, &
     & 0.2322100E+00, 0.2365400E+00, 0.2414800E+00, 0.2391600E+00, &
     & 0.2449700E+00, 0.2522900E+00, 0.2596000E+00, 0.2708800E+00, &
     & 0.2833500E+00, 0.2964500E+00, 0.3033600E+00, 0.3195500E+00, &
     & 0.3323200E+00, 0.3533294E+00, 0.3449330E+00, 0.3449330E+00 /
      data (ref_adm(18,iz,26,13),iz = 1,20) / &
     & 0.2195000E+00, 0.2195000E+00, 0.2256000E+00, 0.2253500E+00, &
     & 0.2436000E+00, 0.2361300E+00, 0.2504100E+00, 0.2474500E+00, &
     & 0.2575000E+00, 0.2608700E+00, 0.2736600E+00, 0.2787000E+00, &
     & 0.2818300E+00, 0.3078500E+00, 0.3088500E+00, 0.3123400E+00, &
     & 0.3523500E+00, 0.2637800E+00, 0.3458739E+00, 0.3458739E+00 /
      data (ref_adm(18,iz,27,13),iz = 1,20) / &
     & 0.2125500E+00, 0.2125500E+00, 0.2199000E+00, 0.2099900E+00, &
     & 0.2305800E+00, 0.2168100E+00, 0.2495400E+00, 0.2386900E+00, &
     & 0.2568500E+00, 0.2654100E+00, 0.2840100E+00, 0.2852200E+00, &
     & 0.2921900E+00, 0.3130900E+00, 0.3102800E+00, 0.3247000E+00, &
     & 0.3705800E+00, 0.3603800E+00, 0.2693100E+00, 0.2693100E+00 /
      data (ref_adm(18,iz,28,13),iz = 1,20) / &
     & 0.2115000E+00, 0.2115000E+00, 0.2032500E+00, 0.2036200E+00, &
     & 0.2252500E+00, 0.2260900E+00, 0.2440700E+00, 0.2425800E+00, &
     & 0.2291300E+00, 0.2618300E+00, 0.2585700E+00, 0.2787100E+00, &
     & 0.2734900E+00, 0.2918700E+00, 0.3036800E+00, 0.3420000E+00, &
     & 0.3460900E+00, 0.3777600E+00, 0.3072300E+00, 0.3072300E+00 /
      data (ref_adm(18,iz,29,13),iz = 1,20) / &
     & 0.2134500E+00, 0.2134500E+00, 0.2221900E+00, 0.2050800E+00, &
     & 0.2163100E+00, 0.2341200E+00, 0.2273400E+00, 0.2579000E+00, &
     & 0.2528500E+00, 0.2589100E+00, 0.2847600E+00, 0.2888600E+00, &
     & 0.2952700E+00, 0.3102300E+00, 0.3132100E+00, 0.3578200E+00, &
     & 0.3473800E+00, 0.3821000E+00, 0.3220400E+00, 0.3220400E+00 /
      data (ref_adm(18,iz,30,13),iz = 1,20) / &
     & 0.2130400E+00, 0.2130400E+00, 0.2131600E+00, 0.2188000E+00, &
     & 0.2221400E+00, 0.2326300E+00, 0.2353700E+00, 0.2528100E+00, &
     & 0.2483500E+00, 0.2551000E+00, 0.2696600E+00, 0.2853400E+00, &
     & 0.3168600E+00, 0.3408500E+00, 0.3156300E+00, 0.3492700E+00, &
     & 0.3620200E+00, 0.3716000E+00, 0.3368700E+00, 0.3368700E+00 /
      data (ref_adm(18,iz,31,13),iz = 1,20) / &
     & 0.2092800E+00, 0.2092800E+00, 0.2220800E+00, 0.2303500E+00, &
     & 0.2317000E+00, 0.2355700E+00, 0.2570300E+00, 0.2666400E+00, &
     & 0.2730800E+00, 0.2611500E+00, 0.2750900E+00, 0.2835300E+00, &
     & 0.3387400E+00, 0.3465800E+00, 0.3510200E+00, 0.3553400E+00, &
     & 0.3813600E+00, 0.3904800E+00, 0.3316800E+00, 0.3316800E+00 /
      data (ref_adm(18,iz,32,13),iz = 1,20) / &
     & 0.2114600E+00, 0.2114600E+00, 0.2048000E+00, 0.2154200E+00, &
     & 0.2292900E+00, 0.2332000E+00, 0.2480300E+00, 0.2654100E+00, &
     & 0.2594800E+00, 0.2784000E+00, 0.2964700E+00, 0.3079700E+00, &
     & 0.3459600E+00, 0.3643800E+00, 0.3735700E+00, 0.3762400E+00, &
     & 0.3830200E+00, 0.4129800E+00, 0.3745400E+00, 0.3745400E+00 /
      data (ref_adm(18,iz,33,13),iz = 1,20) / &
     & 0.2156000E+00, 0.2156000E+00, 0.2241600E+00, 0.2173000E+00, &
     & 0.2378800E+00, 0.2474900E+00, 0.2541800E+00, 0.2669000E+00, &
     & 0.2803800E+00, 0.3015400E+00, 0.3089200E+00, 0.3314800E+00, &
     & 0.3541600E+00, 0.3973800E+00, 0.4102700E+00, 0.4371700E+00, &
     & 0.4410800E+00, 0.4389800E+00, 0.3818300E+00, 0.3818300E+00 /
      data (ref_adm(18,iz,34,13),iz = 1,20) / &
     & 0.2216500E+00, 0.2216500E+00, 0.2466000E+00, 0.2626200E+00, &
     & 0.2474400E+00, 0.2374900E+00, 0.2548600E+00, 0.2741200E+00, &
     & 0.2804600E+00, 0.2779400E+00, 0.3176300E+00, 0.3180800E+00, &
     & 0.3494000E+00, 0.3775400E+00, 0.3949300E+00, 0.4105700E+00, &
     & 0.4229700E+00, 0.4441800E+00, 0.3790600E+00, 0.3790600E+00 /
      data (ref_adm(18,iz,35,13),iz = 1,20) / &
     & 0.2242800E+00, 0.2242800E+00, 0.2422400E+00, 0.2575100E+00, &
     & 0.2532400E+00, 0.2512000E+00, 0.2696200E+00, 0.2818400E+00, &
     & 0.2968000E+00, 0.3015000E+00, 0.3228000E+00, 0.3317000E+00, &
     & 0.3655500E+00, 0.3739500E+00, 0.4028200E+00, 0.4160500E+00, &
     & 0.4442800E+00, 0.4518800E+00, 0.3812500E+00, 0.3812500E+00 /
      data (ref_adm(18,iz,36,13),iz = 1,20) / &
     & 0.2328500E+00, 0.2328500E+00, 0.2247200E+00, 0.2334700E+00, &
     & 0.2520200E+00, 0.2600400E+00, 0.2390900E+00, 0.2871600E+00, &
     & 0.2880400E+00, 0.3009300E+00, 0.3266900E+00, 0.3406500E+00, &
     & 0.3739700E+00, 0.4044200E+00, 0.4064200E+00, 0.4230300E+00, &
     & 0.4678900E+00, 0.4477100E+00, 0.4043100E+00, 0.4043100E+00 /
      data (ref_adm(18,iz,37,13),iz = 1,20) / &
     & 0.2228700E+00, 0.2228700E+00, 0.2168900E+00, 0.2426500E+00, &
     & 0.2462300E+00, 0.2581200E+00, 0.2785900E+00, 0.2713800E+00, &
     & 0.2726100E+00, 0.3320800E+00, 0.3299800E+00, 0.3437300E+00, &
     & 0.3793300E+00, 0.4027200E+00, 0.4273500E+00, 0.4360400E+00, &
     & 0.4764200E+00, 0.4851900E+00, 0.4141400E+00, 0.4141400E+00 /
      data (ref_adm(18,iz,38,13),iz = 1,20) / &
     & 0.2228700E+00, 0.2228700E+00, 0.2168900E+00, 0.2426500E+00, &
     & 0.2462300E+00, 0.2581200E+00, 0.2785900E+00, 0.2713800E+00, &
     & 0.2726100E+00, 0.3320800E+00, 0.3299800E+00, 0.3437300E+00, &
     & 0.3793300E+00, 0.4027200E+00, 0.4273500E+00, 0.4360400E+00, &
     & 0.4764200E+00, 0.4851900E+00, 0.4141400E+00, 0.4141400E+00 /
! Solar Zenith Angle 65.0 Albedo  0.2689310E+00
      data (ref_adm(18,iz, 1,14),iz = 1,20) / &
     & 0.2192600E+00, 0.2192600E+00, 0.1889200E+00, 0.2064500E+00, &
     & 0.1871400E+00, 0.1961500E+00, 0.2007700E+00, 0.2124300E+00, &
     & 0.2097300E+00, 0.2216100E+00, 0.2466000E+00, 0.2607100E+00, &
     & 0.3233000E+00, 0.3779800E+00, 0.6094000E+00, 0.5511900E+00, &
     & 0.6332000E+00, 0.7249700E+00, 0.5115179E+00, 0.5115179E+00 /
      data (ref_adm(18,iz, 2,14),iz = 1,20) / &
     & 0.2192600E+00, 0.2192600E+00, 0.1889200E+00, 0.2064500E+00, &
     & 0.1871400E+00, 0.1961500E+00, 0.2007700E+00, 0.2124300E+00, &
     & 0.2097300E+00, 0.2216100E+00, 0.2466000E+00, 0.2607100E+00, &
     & 0.3233000E+00, 0.3779800E+00, 0.6094000E+00, 0.5511900E+00, &
     & 0.6332000E+00, 0.7249700E+00, 0.5115179E+00, 0.5115179E+00 /
      data (ref_adm(18,iz, 3,14),iz = 1,20) / &
     & 0.1959000E+00, 0.1959000E+00, 0.1974900E+00, 0.2066800E+00, &
     & 0.1967100E+00, 0.1944400E+00, 0.2015100E+00, 0.2043700E+00, &
     & 0.2075900E+00, 0.2279100E+00, 0.2497700E+00, 0.2508400E+00, &
     & 0.2898300E+00, 0.3592100E+00, 0.3791400E+00, 0.4373400E+00, &
     & 0.5378500E+00, 0.5196900E+00, 0.7864117E-08, 0.7864117E-08 /
      data (ref_adm(18,iz, 4,14),iz = 1,20) / &
     & 0.2093400E+00, 0.2093400E+00, 0.1993200E+00, 0.1985300E+00, &
     & 0.1976900E+00, 0.1888700E+00, 0.2168900E+00, 0.2094600E+00, &
     & 0.2105300E+00, 0.2291600E+00, 0.2427100E+00, 0.2608400E+00, &
     & 0.2671800E+00, 0.3185800E+00, 0.3589300E+00, 0.4104900E+00, &
     & 0.4977900E+00, 0.5954700E+00, 0.5069197E+00, 0.5069197E+00 /
      data (ref_adm(18,iz, 5,14),iz = 1,20) / &
     & 0.2143400E+00, 0.2143400E+00, 0.2177000E+00, 0.2087500E+00, &
     & 0.2032300E+00, 0.1947200E+00, 0.1985000E+00, 0.1971600E+00, &
     & 0.2142100E+00, 0.2347300E+00, 0.2431000E+00, 0.2614200E+00, &
     & 0.2797400E+00, 0.3014500E+00, 0.3373200E+00, 0.4263600E+00, &
     & 0.5071500E+00, 0.5166000E+00, 0.5050286E+00, 0.5050286E+00 /
      data (ref_adm(18,iz, 6,14),iz = 1,20) / &
     & 0.2038000E+00, 0.2038000E+00, 0.2066500E+00, 0.1958400E+00, &
     & 0.2006100E+00, 0.2000300E+00, 0.2064500E+00, 0.2180100E+00, &
     & 0.2198300E+00, 0.2284400E+00, 0.2404900E+00, 0.2497300E+00, &
     & 0.2809600E+00, 0.3071400E+00, 0.3459700E+00, 0.4041000E+00, &
     & 0.5090800E+00, 0.5498400E+00, 0.5435700E+00, 0.5435700E+00 /
      data (ref_adm(18,iz, 7,14),iz = 1,20) / &
     & 0.2085300E+00, 0.2085300E+00, 0.2095100E+00, 0.2015500E+00, &
     & 0.2051500E+00, 0.2069800E+00, 0.2114800E+00, 0.2112000E+00, &
     & 0.2247100E+00, 0.2221300E+00, 0.2195400E+00, 0.2501300E+00, &
     & 0.2580100E+00, 0.2713300E+00, 0.3017000E+00, 0.3510000E+00, &
     & 0.4380800E+00, 0.4769000E+00, 0.5338100E+00, 0.5338100E+00 /
      data (ref_adm(18,iz, 8,14),iz = 1,20) / &
     & 0.1937600E+00, 0.1937600E+00, 0.1934200E+00, 0.1912300E+00, &
     & 0.1944600E+00, 0.1848800E+00, 0.1901400E+00, 0.1911900E+00, &
     & 0.2175200E+00, 0.2238600E+00, 0.2117900E+00, 0.2391600E+00, &
     & 0.2721500E+00, 0.2958200E+00, 0.2950700E+00, 0.3481100E+00, &
     & 0.4432200E+00, 0.4907300E+00, 0.5034700E+00, 0.5034700E+00 /
      data (ref_adm(18,iz, 9,14),iz = 1,20) / &
     & 0.1966100E+00, 0.1966100E+00, 0.1983000E+00, 0.1960400E+00, &
     & 0.1987200E+00, 0.1883100E+00, 0.2028100E+00, 0.2284100E+00, &
     & 0.2167400E+00, 0.2254400E+00, 0.2256900E+00, 0.2384300E+00, &
     & 0.2703100E+00, 0.2833000E+00, 0.2848800E+00, 0.3716900E+00, &
     & 0.4129600E+00, 0.4662000E+00, 0.4709300E+00, 0.4709300E+00 /
      data (ref_adm(18,iz,10,14),iz = 1,20) / &
     & 0.2090800E+00, 0.2090800E+00, 0.1930800E+00, 0.2000000E+00, &
     & 0.1936400E+00, 0.1900200E+00, 0.2023200E+00, 0.2133700E+00, &
     & 0.2211500E+00, 0.2252800E+00, 0.2359000E+00, 0.2469400E+00, &
     & 0.2642200E+00, 0.2761900E+00, 0.3086800E+00, 0.3298900E+00, &
     & 0.3776500E+00, 0.4420200E+00, 0.4982500E+00, 0.4982500E+00 /
      data (ref_adm(18,iz,11,14),iz = 1,20) / &
     & 0.2006900E+00, 0.2006900E+00, 0.1932000E+00, 0.1964200E+00, &
     & 0.1888200E+00, 0.2079700E+00, 0.2036800E+00, 0.2001300E+00, &
     & 0.2156600E+00, 0.2437500E+00, 0.2322800E+00, 0.2382200E+00, &
     & 0.2868800E+00, 0.2929700E+00, 0.2964000E+00, 0.3148300E+00, &
     & 0.3643500E+00, 0.3948600E+00, 0.4317800E+00, 0.4317800E+00 /
      data (ref_adm(18,iz,12,14),iz = 1,20) / &
     & 0.2017200E+00, 0.2017200E+00, 0.2014300E+00, 0.1939400E+00, &
     & 0.2001300E+00, 0.2086400E+00, 0.1968700E+00, 0.1995600E+00, &
     & 0.2004700E+00, 0.2146400E+00, 0.2295700E+00, 0.2322200E+00, &
     & 0.2590800E+00, 0.2917900E+00, 0.2952800E+00, 0.3015500E+00, &
     & 0.3893400E+00, 0.3881700E+00, 0.4178200E+00, 0.4178200E+00 /
      data (ref_adm(18,iz,13,14),iz = 1,20) / &
     & 0.2112300E+00, 0.2112300E+00, 0.1870300E+00, 0.2032400E+00, &
     & 0.2130900E+00, 0.1903900E+00, 0.1876800E+00, 0.2028100E+00, &
     & 0.2146300E+00, 0.2260400E+00, 0.2218300E+00, 0.2230100E+00, &
     & 0.2681200E+00, 0.2689500E+00, 0.2927600E+00, 0.3124500E+00, &
     & 0.3787600E+00, 0.4051200E+00, 0.3602600E+00, 0.3602600E+00 /
      data (ref_adm(18,iz,14,14),iz = 1,20) / &
     & 0.2149600E+00, 0.2149600E+00, 0.2134500E+00, 0.2087000E+00, &
     & 0.2048200E+00, 0.2067300E+00, 0.2134900E+00, 0.2072500E+00, &
     & 0.2137400E+00, 0.2253800E+00, 0.2272600E+00, 0.2290400E+00, &
     & 0.2424600E+00, 0.2585400E+00, 0.2695200E+00, 0.3080900E+00, &
     & 0.3558600E+00, 0.3913900E+00, 0.3735504E+00, 0.3735504E+00 /
      data (ref_adm(18,iz,15,14),iz = 1,20) / &
     & 0.2127200E+00, 0.2127200E+00, 0.1990600E+00, 0.1983300E+00, &
     & 0.1927200E+00, 0.1992600E+00, 0.2035800E+00, 0.2074200E+00, &
     & 0.2117000E+00, 0.2207200E+00, 0.2235400E+00, 0.2331600E+00, &
     & 0.2431000E+00, 0.2616700E+00, 0.2923500E+00, 0.2868300E+00, &
     & 0.3607400E+00, 0.3598900E+00, 0.3647489E+00, 0.3647489E+00 /
      data (ref_adm(18,iz,16,14),iz = 1,20) / &
     & 0.1936800E+00, 0.1936800E+00, 0.1883000E+00, 0.1811300E+00, &
     & 0.1842500E+00, 0.1827700E+00, 0.1880300E+00, 0.1929700E+00, &
     & 0.1924000E+00, 0.2052900E+00, 0.2115800E+00, 0.2180500E+00, &
     & 0.2296400E+00, 0.2434100E+00, 0.2733800E+00, 0.2936800E+00, &
     & 0.3613900E+00, 0.3734800E+00, 0.3536115E+00, 0.3536115E+00 /
      data (ref_adm(18,iz,17,14),iz = 1,20) / &
     & 0.1974500E+00, 0.1974500E+00, 0.2004800E+00, 0.2105700E+00, &
     & 0.2431500E+00, 0.2085100E+00, 0.1970000E+00, 0.2125000E+00, &
     & 0.2204900E+00, 0.2285100E+00, 0.2155300E+00, 0.2182700E+00, &
     & 0.2584400E+00, 0.2476800E+00, 0.2711000E+00, 0.2948600E+00, &
     & 0.3091600E+00, 0.3756163E+00, 0.3439892E+00, 0.3439892E+00 /
      data (ref_adm(18,iz,18,14),iz = 1,20) / &
     & 0.1993000E+00, 0.1993000E+00, 0.2159800E+00, 0.2201000E+00, &
     & 0.2104200E+00, 0.2047700E+00, 0.2087900E+00, 0.2323300E+00, &
     & 0.2295100E+00, 0.2210800E+00, 0.2143900E+00, 0.2386900E+00, &
     & 0.2603800E+00, 0.2520500E+00, 0.2804900E+00, 0.3316900E+00, &
     & 0.3187998E+00, 0.3441596E+00, 0.3529735E+00, 0.3529735E+00 /
      data (ref_adm(18,iz,19,14),iz = 1,20) / &
     & 0.1955300E+00, 0.1955300E+00, 0.1987400E+00, 0.2095200E+00, &
     & 0.1981700E+00, 0.1960500E+00, 0.2018900E+00, 0.2233000E+00, &
     & 0.2196500E+00, 0.2280300E+00, 0.2182500E+00, 0.2326100E+00, &
     & 0.2535400E+00, 0.2534900E+00, 0.2711600E+00, 0.2809500E+00, &
     & 0.3162079E+00, 0.3398587E+00, 0.3464282E+00, 0.3464282E+00 /
      data (ref_adm(18,iz,20,14),iz = 1,20) / &
     & 0.2053700E+00, 0.2053700E+00, 0.2121900E+00, 0.1913600E+00, &
     & 0.1961800E+00, 0.2077200E+00, 0.2059900E+00, 0.2115900E+00, &
     & 0.2114200E+00, 0.2146400E+00, 0.2228400E+00, 0.2422200E+00, &
     & 0.2479100E+00, 0.2661300E+00, 0.2689400E+00, 0.2866000E+00, &
     & 0.3143101E+00, 0.3369849E+00, 0.3426074E+00, 0.3426074E+00 /
      data (ref_adm(18,iz,21,14),iz = 1,20) / &
     & 0.2110600E+00, 0.2110600E+00, 0.2087000E+00, 0.2059200E+00, &
     & 0.2088700E+00, 0.2259500E+00, 0.2190000E+00, 0.2049400E+00, &
     & 0.2042600E+00, 0.2208700E+00, 0.2337100E+00, 0.2557200E+00, &
     & 0.2376700E+00, 0.2529200E+00, 0.2669600E+00, 0.2419100E+00, &
     & 0.3133231E+00, 0.3346486E+00, 0.3402501E+00, 0.3402501E+00 /
      data (ref_adm(18,iz,22,14),iz = 1,20) / &
     & 0.2044000E+00, 0.2044000E+00, 0.2096500E+00, 0.2182400E+00, &
     & 0.2048900E+00, 0.2165200E+00, 0.2294500E+00, 0.2191100E+00, &
     & 0.2320800E+00, 0.2199100E+00, 0.2278500E+00, 0.2617000E+00, &
     & 0.2596400E+00, 0.2793500E+00, 0.2857800E+00, 0.3219200E+00, &
     & 0.3534209E+00, 0.3786625E+00, 0.3871871E+00, 0.3871871E+00 /
      data (ref_adm(18,iz,23,14),iz = 1,20) / &
     & 0.2050900E+00, 0.2050900E+00, 0.2026400E+00, 0.2192800E+00, &
     & 0.2295200E+00, 0.2143300E+00, 0.2255800E+00, 0.2436700E+00, &
     & 0.2230300E+00, 0.2386100E+00, 0.2361200E+00, 0.2647700E+00, &
     & 0.2693100E+00, 0.2677500E+00, 0.2868000E+00, 0.2946000E+00, &
     & 0.3534613E+00, 0.3776303E+00, 0.3877002E+00, 0.3877002E+00 /
      data (ref_adm(18,iz,24,14),iz = 1,20) / &
     & 0.1922000E+00, 0.1922000E+00, 0.1970100E+00, 0.2002600E+00, &
     & 0.2082200E+00, 0.2108800E+00, 0.2170100E+00, 0.2234900E+00, &
     & 0.2272600E+00, 0.2320700E+00, 0.2374200E+00, 0.2429300E+00, &
     & 0.2718000E+00, 0.2853500E+00, 0.2939100E+00, 0.3276800E+00, &
     & 0.2923700E+00, 0.3788649E+00, 0.3906801E+00, 0.3906801E+00 /
      data (ref_adm(18,iz,25,14),iz = 1,20) / &
     & 0.2018400E+00, 0.2018400E+00, 0.2245100E+00, 0.2217200E+00, &
     & 0.2290400E+00, 0.2323400E+00, 0.2382400E+00, 0.2441000E+00, &
     & 0.2557700E+00, 0.2538200E+00, 0.2650800E+00, 0.2760000E+00, &
     & 0.2803500E+00, 0.3000200E+00, 0.3027500E+00, 0.3183500E+00, &
     & 0.3648100E+00, 0.3813261E+00, 0.3953055E+00, 0.3953055E+00 /
      data (ref_adm(18,iz,26,14),iz = 1,20) / &
     & 0.2067500E+00, 0.2067500E+00, 0.2323300E+00, 0.2245900E+00, &
     & 0.2304300E+00, 0.2327400E+00, 0.2474500E+00, 0.2442200E+00, &
     & 0.2519800E+00, 0.2591700E+00, 0.2681200E+00, 0.2896200E+00, &
     & 0.3002800E+00, 0.3201600E+00, 0.3191800E+00, 0.3429300E+00, &
     & 0.3604000E+00, 0.3781700E+00, 0.4030639E+00, 0.4030639E+00 /
      data (ref_adm(18,iz,27,14),iz = 1,20) / &
     & 0.2055500E+00, 0.2055500E+00, 0.2064300E+00, 0.2124300E+00, &
     & 0.2037800E+00, 0.2218200E+00, 0.2343100E+00, 0.2366500E+00, &
     & 0.2512500E+00, 0.2457700E+00, 0.2822800E+00, 0.2802900E+00, &
     & 0.2924400E+00, 0.3137500E+00, 0.3293200E+00, 0.3238600E+00, &
     & 0.3709800E+00, 0.3780800E+00, 0.4133843E+00, 0.4133843E+00 /
      data (ref_adm(18,iz,28,14),iz = 1,20) / &
     & 0.1997300E+00, 0.1997300E+00, 0.2128900E+00, 0.2095900E+00, &
     & 0.2169500E+00, 0.2253500E+00, 0.2308300E+00, 0.2465000E+00, &
     & 0.2603500E+00, 0.2571800E+00, 0.2760300E+00, 0.2880800E+00, &
     & 0.2964000E+00, 0.3077400E+00, 0.3468600E+00, 0.3621200E+00, &
     & 0.3775100E+00, 0.4083700E+00, 0.3807300E+00, 0.3807300E+00 /
      data (ref_adm(18,iz,29,14),iz = 1,20) / &
     & 0.2026900E+00, 0.2026900E+00, 0.2128500E+00, 0.2192700E+00, &
     & 0.2186800E+00, 0.2228700E+00, 0.2326300E+00, 0.2486000E+00, &
     & 0.2752500E+00, 0.2769300E+00, 0.2740700E+00, 0.3058900E+00, &
     & 0.3113900E+00, 0.3285600E+00, 0.3336800E+00, 0.3470500E+00, &
     & 0.3932700E+00, 0.4003200E+00, 0.3343700E+00, 0.3343700E+00 /
      data (ref_adm(18,iz,30,14),iz = 1,20) / &
     & 0.2002000E+00, 0.2002000E+00, 0.2180100E+00, 0.2165900E+00, &
     & 0.2242100E+00, 0.2210700E+00, 0.2358200E+00, 0.2593800E+00, &
     & 0.2791700E+00, 0.2774900E+00, 0.2852700E+00, 0.3200400E+00, &
     & 0.3339500E+00, 0.3419600E+00, 0.3487100E+00, 0.3689100E+00, &
     & 0.3873800E+00, 0.4200300E+00, 0.3832300E+00, 0.3832300E+00 /
      data (ref_adm(18,iz,31,14),iz = 1,20) / &
     & 0.2058400E+00, 0.2058400E+00, 0.2059200E+00, 0.2129800E+00, &
     & 0.2188100E+00, 0.2278100E+00, 0.2487200E+00, 0.2548900E+00, &
     & 0.2683400E+00, 0.2839300E+00, 0.2942700E+00, 0.3247500E+00, &
     & 0.3379200E+00, 0.3724100E+00, 0.3691900E+00, 0.3774600E+00, &
     & 0.3933000E+00, 0.4291100E+00, 0.3906000E+00, 0.3906000E+00 /
      data (ref_adm(18,iz,32,14),iz = 1,20) / &
     & 0.2019200E+00, 0.2019200E+00, 0.2293600E+00, 0.2191200E+00, &
     & 0.2259800E+00, 0.2288100E+00, 0.2455600E+00, 0.2674700E+00, &
     & 0.2777000E+00, 0.2873500E+00, 0.2955000E+00, 0.3296400E+00, &
     & 0.3532700E+00, 0.3727900E+00, 0.3973900E+00, 0.4243100E+00, &
     & 0.4535400E+00, 0.4606800E+00, 0.3872400E+00, 0.3872400E+00 /
      data (ref_adm(18,iz,33,14),iz = 1,20) / &
     & 0.2132200E+00, 0.2132200E+00, 0.2213000E+00, 0.2269300E+00, &
     & 0.2293100E+00, 0.2325700E+00, 0.2476300E+00, 0.2618700E+00, &
     & 0.2780900E+00, 0.2964800E+00, 0.3044900E+00, 0.3218800E+00, &
     & 0.3429200E+00, 0.3680200E+00, 0.3917400E+00, 0.4225100E+00, &
     & 0.4625000E+00, 0.4827300E+00, 0.4185700E+00, 0.4185700E+00 /
      data (ref_adm(18,iz,34,14),iz = 1,20) / &
     & 0.2042400E+00, 0.2042400E+00, 0.2146000E+00, 0.2189300E+00, &
     & 0.2238400E+00, 0.2513600E+00, 0.2469100E+00, 0.2683000E+00, &
     & 0.2843200E+00, 0.3091700E+00, 0.3277600E+00, 0.3305100E+00, &
     & 0.3524800E+00, 0.3825500E+00, 0.4093100E+00, 0.4424200E+00, &
     & 0.4931800E+00, 0.4876400E+00, 0.4024000E+00, 0.4024000E+00 /
      data (ref_adm(18,iz,35,14),iz = 1,20) / &
     & 0.2070600E+00, 0.2070600E+00, 0.2230900E+00, 0.2300600E+00, &
     & 0.2260700E+00, 0.2464500E+00, 0.2549200E+00, 0.2665900E+00, &
     & 0.2843100E+00, 0.2978500E+00, 0.3213100E+00, 0.3416800E+00, &
     & 0.3576200E+00, 0.4036500E+00, 0.4153000E+00, 0.4799900E+00, &
     & 0.5220800E+00, 0.5099900E+00, 0.4184500E+00, 0.4184500E+00 /
      data (ref_adm(18,iz,36,14),iz = 1,20) / &
     & 0.2177700E+00, 0.2177700E+00, 0.2221200E+00, 0.2170100E+00, &
     & 0.2393600E+00, 0.2415400E+00, 0.2621100E+00, 0.2711500E+00, &
     & 0.2845300E+00, 0.3161000E+00, 0.3311900E+00, 0.3503100E+00, &
     & 0.3766900E+00, 0.4076400E+00, 0.4382200E+00, 0.4711000E+00, &
     & 0.5133600E+00, 0.5353600E+00, 0.4264800E+00, 0.4264800E+00 /
      data (ref_adm(18,iz,37,14),iz = 1,20) / &
     & 0.2049600E+00, 0.2049600E+00, 0.2094100E+00, 0.2234000E+00, &
     & 0.2153300E+00, 0.2492200E+00, 0.2651000E+00, 0.2690700E+00, &
     & 0.2801500E+00, 0.2905200E+00, 0.3265700E+00, 0.3826600E+00, &
     & 0.3941200E+00, 0.4167100E+00, 0.4748100E+00, 0.5059500E+00, &
     & 0.5159900E+00, 0.5005900E+00, 0.5077200E+00, 0.5077200E+00 /
      data (ref_adm(18,iz,38,14),iz = 1,20) / &
     & 0.2049600E+00, 0.2049600E+00, 0.2094100E+00, 0.2234000E+00, &
     & 0.2153300E+00, 0.2492200E+00, 0.2651000E+00, 0.2690700E+00, &
     & 0.2801500E+00, 0.2905200E+00, 0.3265700E+00, 0.3826600E+00, &
     & 0.3941200E+00, 0.4167100E+00, 0.4748100E+00, 0.5059500E+00, &
     & 0.5159900E+00, 0.5005900E+00, 0.5077200E+00, 0.5077200E+00 /
! Solar Zenith Angle 70.0 Albedo  0.2746678E+00
      data (ref_adm(18,iz, 1,15),iz = 1,20) / &
     & 0.1911100E+00, 0.1911100E+00, 0.2092700E+00, 0.2147600E+00, &
     & 0.1952900E+00, 0.2241800E+00, 0.2141800E+00, 0.2117000E+00, &
     & 0.2281500E+00, 0.2317000E+00, 0.2522200E+00, 0.2959600E+00, &
     & 0.4024500E+00, 0.3986300E+00, 0.5888500E+00, 0.7055000E+00, &
     & 0.6563739E+00, 0.1083567E+01, 0.1853067E+01, 0.1853067E+01 /
      data (ref_adm(18,iz, 2,15),iz = 1,20) / &
     & 0.1911100E+00, 0.1911100E+00, 0.2092700E+00, 0.2147600E+00, &
     & 0.1952900E+00, 0.2241800E+00, 0.2141800E+00, 0.2117000E+00, &
     & 0.2281500E+00, 0.2317000E+00, 0.2522200E+00, 0.2959600E+00, &
     & 0.4024500E+00, 0.3986300E+00, 0.5888500E+00, 0.7055000E+00, &
     & 0.6563739E+00, 0.1083567E+01, 0.1853067E+01, 0.1853067E+01 /
      data (ref_adm(18,iz, 3,15),iz = 1,20) / &
     & 0.2141400E+00, 0.2141400E+00, 0.1974800E+00, 0.1988000E+00, &
     & 0.2136300E+00, 0.2092400E+00, 0.2271100E+00, 0.2220200E+00, &
     & 0.2171300E+00, 0.2377900E+00, 0.2433000E+00, 0.3021800E+00, &
     & 0.3211800E+00, 0.3812600E+00, 0.4725500E+00, 0.5274400E+00, &
     & 0.6411318E+00, 0.1018535E+01, 0.1739911E+00, 0.1739911E+00 /
      data (ref_adm(18,iz, 4,15),iz = 1,20) / &
     & 0.1961000E+00, 0.1961000E+00, 0.2021300E+00, 0.1943400E+00, &
     & 0.1971200E+00, 0.1954500E+00, 0.2156400E+00, 0.2094000E+00, &
     & 0.2138300E+00, 0.2329800E+00, 0.2479900E+00, 0.2951300E+00, &
     & 0.3162100E+00, 0.3590000E+00, 0.4132500E+00, 0.4667000E+00, &
     & 0.6127545E+00, 0.9105502E+00, 0.1582229E+01, 0.1582229E+01 /
      data (ref_adm(18,iz, 5,15),iz = 1,20) / &
     & 0.2037200E+00, 0.2037200E+00, 0.2216400E+00, 0.1975900E+00, &
     & 0.1989300E+00, 0.1967000E+00, 0.2063300E+00, 0.2068200E+00, &
     & 0.2185900E+00, 0.2268200E+00, 0.2478200E+00, 0.2743100E+00, &
     & 0.2760900E+00, 0.3520400E+00, 0.3836300E+00, 0.4284200E+00, &
     & 0.4662700E+00, 0.8006263E+00, 0.1211250E+01, 0.1211250E+01 /
      data (ref_adm(18,iz, 6,15),iz = 1,20) / &
     & 0.1903700E+00, 0.1903700E+00, 0.1999600E+00, 0.2016600E+00, &
     & 0.1995400E+00, 0.2002700E+00, 0.1996200E+00, 0.2066200E+00, &
     & 0.2060800E+00, 0.2210800E+00, 0.2388000E+00, 0.2570100E+00, &
     & 0.2850100E+00, 0.3187900E+00, 0.3549100E+00, 0.3845400E+00, &
     & 0.4852000E+00, 0.6152500E+00, 0.8301200E+00, 0.8301200E+00 /
      data (ref_adm(18,iz, 7,15),iz = 1,20) / &
     & 0.1896400E+00, 0.1896400E+00, 0.1869500E+00, 0.1872800E+00, &
     & 0.1893300E+00, 0.1967900E+00, 0.2085000E+00, 0.2046900E+00, &
     & 0.2037000E+00, 0.2459500E+00, 0.2353600E+00, 0.2595800E+00, &
     & 0.2742300E+00, 0.3030300E+00, 0.3448800E+00, 0.3888700E+00, &
     & 0.5001600E+00, 0.5806700E+00, 0.8117552E+00, 0.8117552E+00 /
      data (ref_adm(18,iz, 8,15),iz = 1,20) / &
     & 0.1878400E+00, 0.1878400E+00, 0.1820600E+00, 0.1982000E+00, &
     & 0.1963800E+00, 0.1933400E+00, 0.1928100E+00, 0.2003200E+00, &
     & 0.2202100E+00, 0.2255600E+00, 0.2287000E+00, 0.2633500E+00, &
     & 0.2613100E+00, 0.3102100E+00, 0.3318800E+00, 0.3365000E+00, &
     & 0.4584900E+00, 0.4998300E+00, 0.4865700E+00, 0.4865700E+00 /
      data (ref_adm(18,iz, 9,15),iz = 1,20) / &
     & 0.1922900E+00, 0.1922900E+00, 0.1911900E+00, 0.1913200E+00, &
     & 0.1904300E+00, 0.1772200E+00, 0.1839300E+00, 0.2051400E+00, &
     & 0.2075500E+00, 0.2321600E+00, 0.2277000E+00, 0.2406800E+00, &
     & 0.2839100E+00, 0.3027900E+00, 0.3071200E+00, 0.3783300E+00, &
     & 0.4387100E+00, 0.4802700E+00, 0.6756338E+00, 0.6756338E+00 /
      data (ref_adm(18,iz,10,15),iz = 1,20) / &
     & 0.2017200E+00, 0.2017200E+00, 0.2011800E+00, 0.1957300E+00, &
     & 0.1856200E+00, 0.1927400E+00, 0.1850600E+00, 0.2043100E+00, &
     & 0.2078100E+00, 0.2410900E+00, 0.2261500E+00, 0.2495000E+00, &
     & 0.2685300E+00, 0.2969400E+00, 0.3184800E+00, 0.3597300E+00, &
     & 0.4153700E+00, 0.4485900E+00, 0.6407129E+00, 0.6407129E+00 /
      data (ref_adm(18,iz,11,15),iz = 1,20) / &
     & 0.2009600E+00, 0.2009600E+00, 0.1983400E+00, 0.2096900E+00, &
     & 0.1996200E+00, 0.1918800E+00, 0.1984100E+00, 0.2031300E+00, &
     & 0.2032100E+00, 0.2243000E+00, 0.2187800E+00, 0.2307800E+00, &
     & 0.2621800E+00, 0.2831400E+00, 0.2948100E+00, 0.3795900E+00, &
     & 0.4392400E+00, 0.4615100E+00, 0.5904380E+00, 0.5904380E+00 /
      data (ref_adm(18,iz,12,15),iz = 1,20) / &
     & 0.1982200E+00, 0.1982200E+00, 0.1850300E+00, 0.1928200E+00, &
     & 0.2036600E+00, 0.2124800E+00, 0.2091700E+00, 0.2022800E+00, &
     & 0.2084600E+00, 0.2142000E+00, 0.2134700E+00, 0.2371200E+00, &
     & 0.2436500E+00, 0.2876000E+00, 0.3029100E+00, 0.3331300E+00, &
     & 0.4407700E+00, 0.4400200E+00, 0.5568725E+00, 0.5568725E+00 /
      data (ref_adm(18,iz,13,15),iz = 1,20) / &
     & 0.1995000E+00, 0.1995000E+00, 0.1927200E+00, 0.1935600E+00, &
     & 0.2057900E+00, 0.2029700E+00, 0.2175500E+00, 0.2128700E+00, &
     & 0.1953500E+00, 0.2054400E+00, 0.2242300E+00, 0.2241700E+00, &
     & 0.2458300E+00, 0.2727900E+00, 0.2994800E+00, 0.3522500E+00, &
     & 0.4289000E+00, 0.4177300E+00, 0.5326014E+00, 0.5326014E+00 /
      data (ref_adm(18,iz,14,15),iz = 1,20) / &
     & 0.2012400E+00, 0.2012400E+00, 0.1991600E+00, 0.2083400E+00, &
     & 0.2004400E+00, 0.2047900E+00, 0.2079400E+00, 0.2078000E+00, &
     & 0.2083300E+00, 0.2147400E+00, 0.2218400E+00, 0.2355300E+00, &
     & 0.2610400E+00, 0.2697600E+00, 0.2692400E+00, 0.2983200E+00, &
     & 0.3932500E+00, 0.4394200E+00, 0.5146610E+00, 0.5146610E+00 /
      data (ref_adm(18,iz,15,15),iz = 1,20) / &
     & 0.2052800E+00, 0.2052800E+00, 0.1992600E+00, 0.1970800E+00, &
     & 0.1980700E+00, 0.1945300E+00, 0.1966600E+00, 0.2006400E+00, &
     & 0.2062600E+00, 0.2120500E+00, 0.2249400E+00, 0.2322100E+00, &
     & 0.2522500E+00, 0.2692700E+00, 0.2742800E+00, 0.3047400E+00, &
     & 0.3830200E+00, 0.4434700E+00, 0.4996618E+00, 0.4996618E+00 /
      data (ref_adm(18,iz,16,15),iz = 1,20) / &
     & 0.1950200E+00, 0.1950200E+00, 0.1923700E+00, 0.1934200E+00, &
     & 0.1896600E+00, 0.1833300E+00, 0.1915300E+00, 0.1971200E+00, &
     & 0.2032300E+00, 0.2074000E+00, 0.2062600E+00, 0.2183300E+00, &
     & 0.2294800E+00, 0.2510600E+00, 0.2964500E+00, 0.3067200E+00, &
     & 0.3960000E+00, 0.4365160E+00, 0.4845580E+00, 0.4845580E+00 /
      data (ref_adm(18,iz,17,15),iz = 1,20) / &
     & 0.1983000E+00, 0.1983000E+00, 0.2079600E+00, 0.2048500E+00, &
     & 0.1879300E+00, 0.1912200E+00, 0.1928000E+00, 0.1930500E+00, &
     & 0.2143700E+00, 0.2237100E+00, 0.2253000E+00, 0.2370800E+00, &
     & 0.2513600E+00, 0.2574000E+00, 0.2919100E+00, 0.3076000E+00, &
     & 0.3624700E+00, 0.4246532E+00, 0.4684004E+00, 0.4684004E+00 /
      data (ref_adm(18,iz,18,15),iz = 1,20) / &
     & 0.2052200E+00, 0.2052200E+00, 0.1963400E+00, 0.1964000E+00, &
     & 0.2042700E+00, 0.1940400E+00, 0.1879000E+00, 0.1994900E+00, &
     & 0.2106200E+00, 0.2320100E+00, 0.2348600E+00, 0.2274100E+00, &
     & 0.2401900E+00, 0.2503700E+00, 0.2756800E+00, 0.4006600E+00, &
     & 0.3459389E+00, 0.3866844E+00, 0.4138525E+00, 0.4138525E+00 /
      data (ref_adm(18,iz,19,15),iz = 1,20) / &
     & 0.2024600E+00, 0.2024600E+00, 0.1952400E+00, 0.2053800E+00, &
     & 0.2122100E+00, 0.1976400E+00, 0.1921800E+00, 0.2124500E+00, &
     & 0.2106700E+00, 0.2165500E+00, 0.2182700E+00, 0.2276500E+00, &
     & 0.2425400E+00, 0.2761900E+00, 0.2771100E+00, 0.2456600E+00, &
     & 0.3428503E+00, 0.3808995E+00, 0.4049322E+00, 0.4049322E+00 /
      data (ref_adm(18,iz,20,15),iz = 1,20) / &
     & 0.1911200E+00, 0.1911200E+00, 0.2012500E+00, 0.2154700E+00, &
     & 0.2202700E+00, 0.2021900E+00, 0.2109400E+00, 0.2101900E+00, &
     & 0.2192900E+00, 0.2103200E+00, 0.2175800E+00, 0.2338800E+00, &
     & 0.2575200E+00, 0.2723600E+00, 0.2914600E+00, 0.3132539E+00, &
     & 0.3410765E+00, 0.3775236E+00, 0.3998582E+00, 0.3998582E+00 /
      data (ref_adm(18,iz,21,15),iz = 1,20) / &
     & 0.1912200E+00, 0.1912200E+00, 0.2006100E+00, 0.2051600E+00, &
     & 0.1999200E+00, 0.2085500E+00, 0.2047000E+00, 0.2262000E+00, &
     & 0.2117700E+00, 0.2272100E+00, 0.2172800E+00, 0.2434400E+00, &
     & 0.2713900E+00, 0.2736600E+00, 0.2725700E+00, 0.2900500E+00, &
     & 0.3402684E+00, 0.3750612E+00, 0.3967285E+00, 0.3967285E+00 /
      data (ref_adm(18,iz,22,15),iz = 1,20) / &
     & 0.2073000E+00, 0.2073000E+00, 0.1979800E+00, 0.1998800E+00, &
     & 0.1960700E+00, 0.2291900E+00, 0.2316600E+00, 0.2134900E+00, &
     & 0.2230000E+00, 0.2353100E+00, 0.2341200E+00, 0.2487700E+00, &
     & 0.2614200E+00, 0.2839200E+00, 0.2806200E+00, 0.2953100E+00, &
     & 0.3647363E+00, 0.3953081E+00, 0.4101581E+00, 0.4101581E+00 /
      data (ref_adm(18,iz,23,15),iz = 1,20) / &
     & 0.1970600E+00, 0.1970600E+00, 0.2075500E+00, 0.1963500E+00, &
     & 0.1943600E+00, 0.2028900E+00, 0.2145000E+00, 0.2053300E+00, &
     & 0.2238700E+00, 0.2422100E+00, 0.2426800E+00, 0.2375200E+00, &
     & 0.2806300E+00, 0.2937000E+00, 0.2930400E+00, 0.2877500E+00, &
     & 0.3646315E+00, 0.3941571E+00, 0.4107938E+00, 0.4107938E+00 /
      data (ref_adm(18,iz,24,15),iz = 1,20) / &
     & 0.1951600E+00, 0.1951600E+00, 0.1926600E+00, 0.1954300E+00, &
     & 0.2013400E+00, 0.2067600E+00, 0.2107200E+00, 0.2191000E+00, &
     & 0.2261900E+00, 0.2328800E+00, 0.2454700E+00, 0.2535200E+00, &
     & 0.2639700E+00, 0.2807300E+00, 0.2860700E+00, 0.3077700E+00, &
     & 0.3658729E+00, 0.3954605E+00, 0.4142970E+00, 0.4142970E+00 /
      data (ref_adm(18,iz,25,15),iz = 1,20) / &
     & 0.1992500E+00, 0.1992500E+00, 0.2016500E+00, 0.2087300E+00, &
     & 0.2125300E+00, 0.2219600E+00, 0.2306800E+00, 0.2410700E+00, &
     & 0.2557200E+00, 0.2587200E+00, 0.2655300E+00, 0.2794600E+00, &
     & 0.2944000E+00, 0.3222000E+00, 0.3197300E+00, 0.3305000E+00, &
     & 0.3632500E+00, 0.3982712E+00, 0.4195433E+00, 0.4195433E+00 /
      data (ref_adm(18,iz,26,15),iz = 1,20) / &
     & 0.2023600E+00, 0.2023600E+00, 0.2152600E+00, 0.1989200E+00, &
     & 0.2088000E+00, 0.2306900E+00, 0.2155400E+00, 0.2333800E+00, &
     & 0.2467900E+00, 0.2557100E+00, 0.2844700E+00, 0.2800900E+00, &
     & 0.3039100E+00, 0.3285700E+00, 0.3214900E+00, 0.3476100E+00, &
     & 0.3530000E+00, 0.4098700E+00, 0.4285472E+00, 0.4285472E+00 /
      data (ref_adm(18,iz,27,15),iz = 1,20) / &
     & 0.1975100E+00, 0.1975100E+00, 0.2068800E+00, 0.2067000E+00, &
     & 0.2031300E+00, 0.2177900E+00, 0.2195900E+00, 0.2509300E+00, &
     & 0.2332000E+00, 0.2549400E+00, 0.2731100E+00, 0.2829700E+00, &
     & 0.2865300E+00, 0.3215300E+00, 0.3404200E+00, 0.3505000E+00, &
     & 0.3878800E+00, 0.4239800E+00, 0.3803900E+00, 0.3803900E+00 /
      data (ref_adm(18,iz,28,15),iz = 1,20) / &
     & 0.1957800E+00, 0.1957800E+00, 0.1937700E+00, 0.1991600E+00, &
     & 0.2144700E+00, 0.2111300E+00, 0.2268900E+00, 0.2547800E+00, &
     & 0.2503500E+00, 0.2648400E+00, 0.2717400E+00, 0.2791500E+00, &
     & 0.2904800E+00, 0.3386400E+00, 0.3566300E+00, 0.3804600E+00, &
     & 0.3903600E+00, 0.4310000E+00, 0.4535339E+00, 0.4535339E+00 /
      data (ref_adm(18,iz,29,15),iz = 1,20) / &
     & 0.1863200E+00, 0.1863200E+00, 0.2076700E+00, 0.2146300E+00, &
     & 0.2174300E+00, 0.2198700E+00, 0.2304000E+00, 0.2491300E+00, &
     & 0.2510000E+00, 0.2728000E+00, 0.2844700E+00, 0.2902900E+00, &
     & 0.3049500E+00, 0.3617700E+00, 0.3834700E+00, 0.3879700E+00, &
     & 0.3983200E+00, 0.4456700E+00, 0.3973300E+00, 0.3973300E+00 /
      data (ref_adm(18,iz,30,15),iz = 1,20) / &
     & 0.1857400E+00, 0.1857400E+00, 0.1938300E+00, 0.1998500E+00, &
     & 0.2057200E+00, 0.2124400E+00, 0.2436400E+00, 0.2544200E+00, &
     & 0.2616700E+00, 0.2730300E+00, 0.2922200E+00, 0.3006200E+00, &
     & 0.3202100E+00, 0.3542700E+00, 0.3696700E+00, 0.3858700E+00, &
     & 0.4314800E+00, 0.4332200E+00, 0.3939200E+00, 0.3939200E+00 /
      data (ref_adm(18,iz,31,15),iz = 1,20) / &
     & 0.2080000E+00, 0.2080000E+00, 0.2139100E+00, 0.2149700E+00, &
     & 0.2292200E+00, 0.2294900E+00, 0.2398300E+00, 0.2477800E+00, &
     & 0.2556900E+00, 0.2648400E+00, 0.3023200E+00, 0.3161900E+00, &
     & 0.3346300E+00, 0.3747800E+00, 0.3902300E+00, 0.4441400E+00, &
     & 0.4703100E+00, 0.4804600E+00, 0.4473300E+00, 0.4473300E+00 /
      data (ref_adm(18,iz,32,15),iz = 1,20) / &
     & 0.1959100E+00, 0.1959100E+00, 0.2029100E+00, 0.2137500E+00, &
     & 0.2235000E+00, 0.2341600E+00, 0.2427800E+00, 0.2426500E+00, &
     & 0.2634800E+00, 0.2802500E+00, 0.2970400E+00, 0.3134500E+00, &
     & 0.3383600E+00, 0.3928700E+00, 0.4077400E+00, 0.4429000E+00, &
     & 0.4934800E+00, 0.5098700E+00, 0.4747100E+00, 0.4747100E+00 /
      data (ref_adm(18,iz,33,15),iz = 1,20) / &
     & 0.1988800E+00, 0.1988800E+00, 0.2043900E+00, 0.2119500E+00, &
     & 0.2257500E+00, 0.2292500E+00, 0.2425300E+00, 0.2503900E+00, &
     & 0.2655300E+00, 0.2740200E+00, 0.2986200E+00, 0.3298200E+00, &
     & 0.3443900E+00, 0.3779700E+00, 0.4079800E+00, 0.4379700E+00, &
     & 0.4811500E+00, 0.5340700E+00, 0.4726800E+00, 0.4726800E+00 /
      data (ref_adm(18,iz,34,15),iz = 1,20) / &
     & 0.2044500E+00, 0.2044500E+00, 0.2028500E+00, 0.2132100E+00, &
     & 0.2450800E+00, 0.2379700E+00, 0.2415500E+00, 0.2595400E+00, &
     & 0.2612900E+00, 0.2944300E+00, 0.3010700E+00, 0.3516400E+00, &
     & 0.3590400E+00, 0.3959700E+00, 0.4553700E+00, 0.4830000E+00, &
     & 0.5033000E+00, 0.4989600E+00, 0.4695200E+00, 0.4695200E+00 /
      data (ref_adm(18,iz,35,15),iz = 1,20) / &
     & 0.1967500E+00, 0.1967500E+00, 0.2310800E+00, 0.2220800E+00, &
     & 0.2113400E+00, 0.2364600E+00, 0.2385200E+00, 0.2709500E+00, &
     & 0.2617200E+00, 0.2866900E+00, 0.3135000E+00, 0.3422300E+00, &
     & 0.3797300E+00, 0.4002300E+00, 0.4438500E+00, 0.4746300E+00, &
     & 0.5083500E+00, 0.5432900E+00, 0.4851500E+00, 0.4851500E+00 /
      data (ref_adm(18,iz,36,15),iz = 1,20) / &
     & 0.2021300E+00, 0.2021300E+00, 0.2021600E+00, 0.2259500E+00, &
     & 0.2283600E+00, 0.2326800E+00, 0.2489600E+00, 0.2610600E+00, &
     & 0.2607500E+00, 0.2909400E+00, 0.3289800E+00, 0.3365800E+00, &
     & 0.3750100E+00, 0.4122400E+00, 0.4493400E+00, 0.4782400E+00, &
     & 0.5432900E+00, 0.5958600E+00, 0.5410100E+00, 0.5410100E+00 /
      data (ref_adm(18,iz,37,15),iz = 1,20) / &
     & 0.2004900E+00, 0.2004900E+00, 0.1944500E+00, 0.2139200E+00, &
     & 0.2225400E+00, 0.2260000E+00, 0.2462200E+00, 0.2619800E+00, &
     & 0.2832600E+00, 0.2813400E+00, 0.3077300E+00, 0.3464400E+00, &
     & 0.3829300E+00, 0.4258900E+00, 0.4660400E+00, 0.5296800E+00, &
     & 0.5746300E+00, 0.5872400E+00, 0.5568900E+00, 0.5568900E+00 /
      data (ref_adm(18,iz,38,15),iz = 1,20) / &
     & 0.2004900E+00, 0.2004900E+00, 0.1944500E+00, 0.2139200E+00, &
     & 0.2225400E+00, 0.2260000E+00, 0.2462200E+00, 0.2619800E+00, &
     & 0.2832600E+00, 0.2813400E+00, 0.3077300E+00, 0.3464400E+00, &
     & 0.3829300E+00, 0.4258900E+00, 0.4660400E+00, 0.5296800E+00, &
     & 0.5746300E+00, 0.5872400E+00, 0.5568900E+00, 0.5568900E+00 /
! Solar Zenith Angle 75.0 Albedo  0.2914365E+00
      data (ref_adm(18,iz, 1,16),iz = 1,20) / &
     & 0.2158500E+00, 0.2158500E+00, 0.1961000E+00, 0.1999000E+00, &
     & 0.2205300E+00, 0.1966100E+00, 0.2069300E+00, 0.2425000E+00, &
     & 0.2129000E+00, 0.2705800E+00, 0.3031900E+00, 0.2978600E+00, &
     & 0.4400100E+00, 0.4000700E+00, 0.4512492E+00, 0.5436320E+00, &
     & 0.6945175E+00, 0.1141988E+01, 0.1946444E+01, 0.1946444E+01 /
      data (ref_adm(18,iz, 2,16),iz = 1,20) / &
     & 0.2158500E+00, 0.2158500E+00, 0.1961000E+00, 0.1999000E+00, &
     & 0.2205300E+00, 0.1966100E+00, 0.2069300E+00, 0.2425000E+00, &
     & 0.2129000E+00, 0.2705800E+00, 0.3031900E+00, 0.2978600E+00, &
     & 0.4400100E+00, 0.4000700E+00, 0.4512492E+00, 0.5436320E+00, &
     & 0.6945175E+00, 0.1141988E+01, 0.1946444E+01, 0.1946444E+01 /
      data (ref_adm(18,iz, 3,16),iz = 1,20) / &
     & 0.1887900E+00, 0.1887900E+00, 0.2078900E+00, 0.2134000E+00, &
     & 0.2006400E+00, 0.2266900E+00, 0.2100300E+00, 0.2193500E+00, &
     & 0.2400600E+00, 0.2750600E+00, 0.2947900E+00, 0.3031900E+00, &
     & 0.3272400E+00, 0.3886288E+00, 0.4486287E+00, 0.5375257E+00, &
     & 0.6784350E+00, 0.1073656E+01, 0.1848032E+00, 0.1848032E+00 /
      data (ref_adm(18,iz, 4,16),iz = 1,20) / &
     & 0.2030500E+00, 0.2030500E+00, 0.2013600E+00, 0.2116800E+00, &
     & 0.2050100E+00, 0.2139400E+00, 0.2043000E+00, 0.2202900E+00, &
     & 0.2430300E+00, 0.2535500E+00, 0.2681400E+00, 0.3251100E+00, &
     & 0.3530800E+00, 0.3835590E+00, 0.4427632E+00, 0.5260478E+00, &
     & 0.6484779E+00, 0.9601581E+00, 0.1662218E+01, 0.1662218E+01 /
      data (ref_adm(18,iz, 5,16),iz = 1,20) / &
     & 0.2065800E+00, 0.2065800E+00, 0.1896100E+00, 0.1927200E+00, &
     & 0.1998900E+00, 0.2082700E+00, 0.2003300E+00, 0.2220200E+00, &
     & 0.2275200E+00, 0.2516000E+00, 0.2976600E+00, 0.3024400E+00, &
     & 0.3291400E+00, 0.3824400E+00, 0.4348012E+00, 0.5119842E+00, &
     & 0.6141300E+00, 0.8445725E+00, 0.1272944E+01, 0.1272944E+01 /
      data (ref_adm(18,iz, 6,16),iz = 1,20) / &
     & 0.1946900E+00, 0.1946900E+00, 0.2065800E+00, 0.1981500E+00, &
     & 0.2162700E+00, 0.2210200E+00, 0.2256900E+00, 0.2327100E+00, &
     & 0.2339700E+00, 0.2538300E+00, 0.2990400E+00, 0.3146300E+00, &
     & 0.3286500E+00, 0.3975400E+00, 0.4890700E+00, 0.5129000E+00, &
     & 0.5740200E+00, 0.7932200E+00, 0.1017805E+01, 0.1017805E+01 /
      data (ref_adm(18,iz, 7,16),iz = 1,20) / &
     & 0.2074000E+00, 0.2074000E+00, 0.2126900E+00, 0.2110900E+00, &
     & 0.1971600E+00, 0.2211600E+00, 0.2333400E+00, 0.2483900E+00, &
     & 0.2503500E+00, 0.2499800E+00, 0.2924500E+00, 0.2958200E+00, &
     & 0.3250400E+00, 0.3474800E+00, 0.4974200E+00, 0.5386400E+00, &
     & 0.6428300E+00, 0.7097100E+00, 0.7588700E+00, 0.7588700E+00 /
      data (ref_adm(18,iz, 8,16),iz = 1,20) / &
     & 0.2034100E+00, 0.2034100E+00, 0.2047200E+00, 0.1851400E+00, &
     & 0.1997900E+00, 0.2124700E+00, 0.2203900E+00, 0.2338800E+00, &
     & 0.2259400E+00, 0.2607100E+00, 0.2652400E+00, 0.2744300E+00, &
     & 0.3039400E+00, 0.3326100E+00, 0.4192800E+00, 0.4856200E+00, &
     & 0.6036300E+00, 0.6618900E+00, 0.6748100E+00, 0.6748100E+00 /
      data (ref_adm(18,iz, 9,16),iz = 1,20) / &
     & 0.1854300E+00, 0.1854300E+00, 0.1950100E+00, 0.2026600E+00, &
     & 0.1934500E+00, 0.1979300E+00, 0.1959900E+00, 0.2153500E+00, &
     & 0.2139900E+00, 0.2390000E+00, 0.2590600E+00, 0.2623600E+00, &
     & 0.2781000E+00, 0.3293600E+00, 0.3866700E+00, 0.4786100E+00, &
     & 0.5389100E+00, 0.5864200E+00, 0.7107494E+00, 0.7107494E+00 /
      data (ref_adm(18,iz,10,16),iz = 1,20) / &
     & 0.1916100E+00, 0.1916100E+00, 0.1944800E+00, 0.1953000E+00, &
     & 0.1857000E+00, 0.1930500E+00, 0.2052500E+00, 0.2037300E+00, &
     & 0.2122000E+00, 0.2375300E+00, 0.2493300E+00, 0.2566300E+00, &
     & 0.3059600E+00, 0.3359300E+00, 0.3682500E+00, 0.4840000E+00, &
     & 0.5038400E+00, 0.5237000E+00, 0.6740598E+00, 0.6740598E+00 /
      data (ref_adm(18,iz,11,16),iz = 1,20) / &
     & 0.2162100E+00, 0.2162100E+00, 0.1838500E+00, 0.1901400E+00, &
     & 0.2065200E+00, 0.2157100E+00, 0.1895500E+00, 0.1986600E+00, &
     & 0.2182300E+00, 0.2268800E+00, 0.2238700E+00, 0.2294000E+00, &
     & 0.2914600E+00, 0.3568400E+00, 0.3546900E+00, 0.4012700E+00, &
     & 0.4808100E+00, 0.5378000E+00, 0.3740700E+00, 0.3740700E+00 /
      data (ref_adm(18,iz,12,16),iz = 1,20) / &
     & 0.1982800E+00, 0.1982800E+00, 0.2077800E+00, 0.1930200E+00, &
     & 0.1972300E+00, 0.1873400E+00, 0.1965700E+00, 0.1957000E+00, &
     & 0.2159700E+00, 0.2268700E+00, 0.2253300E+00, 0.2595400E+00, &
     & 0.2869300E+00, 0.3488700E+00, 0.3291400E+00, 0.3603500E+00, &
     & 0.4335500E+00, 0.4393600E+00, 0.5860091E+00, 0.5860091E+00 /
      data (ref_adm(18,iz,13,16),iz = 1,20) / &
     & 0.1988300E+00, 0.1988300E+00, 0.2023400E+00, 0.2078900E+00, &
     & 0.1903300E+00, 0.1906900E+00, 0.1987500E+00, 0.2138400E+00, &
     & 0.2096100E+00, 0.2604600E+00, 0.2571400E+00, 0.2446400E+00, &
     & 0.2972900E+00, 0.3000300E+00, 0.3083900E+00, 0.3722500E+00, &
     & 0.4059500E+00, 0.4310300E+00, 0.5605065E+00, 0.5605065E+00 /
      data (ref_adm(18,iz,14,16),iz = 1,20) / &
     & 0.2076700E+00, 0.2076700E+00, 0.1992500E+00, 0.2022900E+00, &
     & 0.2002800E+00, 0.1970300E+00, 0.2104300E+00, 0.1994700E+00, &
     & 0.2330300E+00, 0.2381500E+00, 0.2599300E+00, 0.2576500E+00, &
     & 0.2646900E+00, 0.2766600E+00, 0.3235700E+00, 0.3664100E+00, &
     & 0.3492900E+00, 0.4869771E+00, 0.5416509E+00, 0.5416509E+00 /
      data (ref_adm(18,iz,15,16),iz = 1,20) / &
     & 0.1997900E+00, 0.1997900E+00, 0.1994000E+00, 0.1989600E+00, &
     & 0.2009200E+00, 0.2026100E+00, 0.2083700E+00, 0.2094000E+00, &
     & 0.2204100E+00, 0.2325200E+00, 0.2434600E+00, 0.2473600E+00, &
     & 0.2602100E+00, 0.2844000E+00, 0.3112200E+00, 0.3655400E+00, &
     & 0.3856400E+00, 0.4745828E+00, 0.5258843E+00, 0.5258843E+00 /
      data (ref_adm(18,iz,16,16),iz = 1,20) / &
     & 0.1944600E+00, 0.1944600E+00, 0.1854800E+00, 0.1913800E+00, &
     & 0.1906800E+00, 0.1908500E+00, 0.1994200E+00, 0.2020400E+00, &
     & 0.2103000E+00, 0.2158100E+00, 0.2276100E+00, 0.2419000E+00, &
     & 0.2535200E+00, 0.2693100E+00, 0.3084800E+00, 0.2874900E+00, &
     & 0.3651000E+00, 0.4605837E+00, 0.5100116E+00, 0.5100116E+00 /
      data (ref_adm(18,iz,17,16),iz = 1,20) / &
     & 0.2022100E+00, 0.2022100E+00, 0.2069600E+00, 0.2012300E+00, &
     & 0.2048000E+00, 0.1933200E+00, 0.2257300E+00, 0.2121100E+00, &
     & 0.2348400E+00, 0.2231100E+00, 0.2403300E+00, 0.2331100E+00, &
     & 0.2541300E+00, 0.2894500E+00, 0.2832600E+00, 0.3033800E+00, &
     & 0.3922927E+00, 0.4480630E+00, 0.4930361E+00, 0.4930361E+00 /
      data (ref_adm(18,iz,18,16),iz = 1,20) / &
     & 0.1938200E+00, 0.1938200E+00, 0.1964100E+00, 0.1912500E+00, &
     & 0.1867200E+00, 0.1974100E+00, 0.1941800E+00, 0.2003100E+00, &
     & 0.2732400E+00, 0.2403700E+00, 0.2444300E+00, 0.2471200E+00, &
     & 0.2809400E+00, 0.2635700E+00, 0.3046000E+00, 0.3403100E+00, &
     & 0.3680739E+00, 0.4151351E+00, 0.4493401E+00, 0.4493401E+00 /
      data (ref_adm(18,iz,19,16),iz = 1,20) / &
     & 0.2009100E+00, 0.2009100E+00, 0.1760400E+00, 0.1973400E+00, &
     & 0.1837800E+00, 0.1977200E+00, 0.1955700E+00, 0.2133900E+00, &
     & 0.2455800E+00, 0.2438400E+00, 0.2408600E+00, 0.2354600E+00, &
     & 0.2709900E+00, 0.2766000E+00, 0.3146600E+00, 0.3031300E+00, &
     & 0.3643929E+00, 0.4084520E+00, 0.4392047E+00, 0.4392047E+00 /
      data (ref_adm(18,iz,20,16),iz = 1,20) / &
     & 0.1892200E+00, 0.1892200E+00, 0.1770700E+00, 0.1983400E+00, &
     & 0.1819400E+00, 0.2045100E+00, 0.1996600E+00, 0.2014800E+00, &
     & 0.2472400E+00, 0.2725600E+00, 0.2685900E+00, 0.2558000E+00, &
     & 0.2767300E+00, 0.2700400E+00, 0.2662100E+00, 0.3307396E+00, &
     & 0.3623956E+00, 0.4045637E+00, 0.4334710E+00, 0.4334710E+00 /
      data (ref_adm(18,iz,21,16),iz = 1,20) / &
     & 0.1880000E+00, 0.1880000E+00, 0.2018500E+00, 0.2182200E+00, &
     & 0.2164300E+00, 0.2016200E+00, 0.1870300E+00, 0.2067900E+00, &
     & 0.2134500E+00, 0.2339300E+00, 0.2456000E+00, 0.2566000E+00, &
     & 0.2861100E+00, 0.2918200E+00, 0.3147000E+00, 0.3306461E+00, &
     & 0.3612374E+00, 0.4017146E+00, 0.4298890E+00, 0.4298890E+00 /
      data (ref_adm(18,iz,22,16),iz = 1,20) / &
     & 0.1991200E+00, 0.1991200E+00, 0.1907600E+00, 0.1966900E+00, &
     & 0.2084600E+00, 0.1994600E+00, 0.2057800E+00, 0.2122400E+00, &
     & 0.2349300E+00, 0.2385800E+00, 0.2447400E+00, 0.2559200E+00, &
     & 0.2852500E+00, 0.2867800E+00, 0.3035000E+00, 0.3811900E+00, &
     & 0.4035616E+00, 0.4484917E+00, 0.4832153E+00, 0.4832153E+00 /
      data (ref_adm(18,iz,23,16),iz = 1,20) / &
     & 0.1927700E+00, 0.1927700E+00, 0.1879000E+00, 0.1944700E+00, &
     & 0.2018500E+00, 0.2039900E+00, 0.2055600E+00, 0.2257300E+00, &
     & 0.2520900E+00, 0.2349600E+00, 0.2574000E+00, 0.2570100E+00, &
     & 0.2867300E+00, 0.3095700E+00, 0.3140500E+00, 0.3470500E+00, &
     & 0.4030799E+00, 0.4470143E+00, 0.4841502E+00, 0.4841502E+00 /
      data (ref_adm(18,iz,24,16),iz = 1,20) / &
     & 0.1965700E+00, 0.1965700E+00, 0.1932900E+00, 0.1949900E+00, &
     & 0.2032500E+00, 0.2106200E+00, 0.2228100E+00, 0.2300900E+00, &
     & 0.2413100E+00, 0.2419500E+00, 0.2547000E+00, 0.2557400E+00, &
     & 0.2872600E+00, 0.3087800E+00, 0.3316400E+00, 0.3613400E+00, &
     & 0.4281100E+00, 0.4483830E+00, 0.4889493E+00, 0.4889493E+00 /
      data (ref_adm(18,iz,25,16),iz = 1,20) / &
     & 0.2014800E+00, 0.2014800E+00, 0.2140900E+00, 0.2121000E+00, &
     & 0.2098100E+00, 0.2180100E+00, 0.2304800E+00, 0.2381800E+00, &
     & 0.2494100E+00, 0.2556500E+00, 0.2681700E+00, 0.2824100E+00, &
     & 0.3022300E+00, 0.3216300E+00, 0.3349900E+00, 0.4017000E+00, &
     & 0.4258200E+00, 0.4520062E+00, 0.4962093E+00, 0.4962093E+00 /
      data (ref_adm(18,iz,26,16),iz = 1,20) / &
     & 0.2074100E+00, 0.2074100E+00, 0.1887700E+00, 0.2107300E+00, &
     & 0.2006900E+00, 0.2383000E+00, 0.2399600E+00, 0.2345900E+00, &
     & 0.2485500E+00, 0.2511100E+00, 0.2624200E+00, 0.2916000E+00, &
     & 0.3030100E+00, 0.3293300E+00, 0.3634100E+00, 0.4123500E+00, &
     & 0.4503400E+00, 0.4596145E+00, 0.5087224E+00, 0.5087224E+00 /
      data (ref_adm(18,iz,27,16),iz = 1,20) / &
     & 0.1993300E+00, 0.1993300E+00, 0.2033300E+00, 0.2007700E+00, &
     & 0.2104600E+00, 0.2123700E+00, 0.2273600E+00, 0.2585200E+00, &
     & 0.2349100E+00, 0.2489600E+00, 0.2519300E+00, 0.2752100E+00, &
     & 0.3127600E+00, 0.3220200E+00, 0.3637000E+00, 0.3884100E+00, &
     & 0.4371900E+00, 0.4952400E+00, 0.5244799E+00, 0.5244799E+00 /
      data (ref_adm(18,iz,28,16),iz = 1,20) / &
     & 0.2049500E+00, 0.2049500E+00, 0.1943900E+00, 0.2035000E+00, &
     & 0.2144200E+00, 0.2154500E+00, 0.2320900E+00, 0.2598400E+00, &
     & 0.2797800E+00, 0.2740300E+00, 0.2679500E+00, 0.2940600E+00, &
     & 0.3265300E+00, 0.3524700E+00, 0.3628200E+00, 0.3978100E+00, &
     & 0.4422900E+00, 0.4962500E+00, 0.4694800E+00, 0.4694800E+00 /
      data (ref_adm(18,iz,29,16),iz = 1,20) / &
     & 0.2106200E+00, 0.2106200E+00, 0.2131700E+00, 0.2025700E+00, &
     & 0.2180600E+00, 0.2139800E+00, 0.2228400E+00, 0.2289800E+00, &
     & 0.2615600E+00, 0.2633800E+00, 0.2925800E+00, 0.2950000E+00, &
     & 0.3462000E+00, 0.3531800E+00, 0.3848800E+00, 0.4390200E+00, &
     & 0.4692900E+00, 0.4969400E+00, 0.5614655E+00, 0.5614655E+00 /
      data (ref_adm(18,iz,30,16),iz = 1,20) / &
     & 0.1896500E+00, 0.1896500E+00, 0.1998800E+00, 0.2122700E+00, &
     & 0.2095000E+00, 0.2294200E+00, 0.2384300E+00, 0.2370000E+00, &
     & 0.2698100E+00, 0.2780800E+00, 0.3083800E+00, 0.3245600E+00, &
     & 0.3443600E+00, 0.3782000E+00, 0.3926000E+00, 0.4187100E+00, &
     & 0.4802400E+00, 0.5456100E+00, 0.5470700E+00, 0.5470700E+00 /
      data (ref_adm(18,iz,31,16),iz = 1,20) / &
     & 0.1933300E+00, 0.1933300E+00, 0.1982400E+00, 0.2146500E+00, &
     & 0.2182500E+00, 0.2263000E+00, 0.2508600E+00, 0.2540100E+00, &
     & 0.2425000E+00, 0.3100200E+00, 0.2884000E+00, 0.3396200E+00, &
     & 0.3212100E+00, 0.3692400E+00, 0.3924900E+00, 0.4717600E+00, &
     & 0.5223100E+00, 0.5631500E+00, 0.5474300E+00, 0.5474300E+00 /
      data (ref_adm(18,iz,32,16),iz = 1,20) / &
     & 0.2027300E+00, 0.2027300E+00, 0.2095800E+00, 0.2179900E+00, &
     & 0.2098500E+00, 0.2302400E+00, 0.2403500E+00, 0.2552200E+00, &
     & 0.2733900E+00, 0.3061700E+00, 0.3154300E+00, 0.3410200E+00, &
     & 0.3517600E+00, 0.3899600E+00, 0.4131900E+00, 0.4871900E+00, &
     & 0.5842600E+00, 0.6194400E+00, 0.5014600E+00, 0.5014600E+00 /
      data (ref_adm(18,iz,33,16),iz = 1,20) / &
     & 0.1994200E+00, 0.1994200E+00, 0.2000800E+00, 0.2041200E+00, &
     & 0.2133100E+00, 0.2310900E+00, 0.2436400E+00, 0.2599700E+00, &
     & 0.2661600E+00, 0.2916400E+00, 0.3049700E+00, 0.3337500E+00, &
     & 0.3554900E+00, 0.3812300E+00, 0.4321000E+00, 0.4902100E+00, &
     & 0.5827100E+00, 0.5932400E+00, 0.5686700E+00, 0.5686700E+00 /
      data (ref_adm(18,iz,34,16),iz = 1,20) / &
     & 0.2022300E+00, 0.2022300E+00, 0.1963300E+00, 0.2155700E+00, &
     & 0.2195800E+00, 0.2272300E+00, 0.2359000E+00, 0.2432500E+00, &
     & 0.2779800E+00, 0.2864700E+00, 0.3275600E+00, 0.3480600E+00, &
     & 0.3559700E+00, 0.4197500E+00, 0.4327700E+00, 0.5031200E+00, &
     & 0.5675100E+00, 0.6402400E+00, 0.6597577E+00, 0.6597577E+00 /
      data (ref_adm(18,iz,35,16),iz = 1,20) / &
     & 0.1933300E+00, 0.1933300E+00, 0.2123500E+00, 0.2179200E+00, &
     & 0.2026700E+00, 0.2196500E+00, 0.2470600E+00, 0.2445900E+00, &
     & 0.2827300E+00, 0.3057300E+00, 0.3105800E+00, 0.3746300E+00, &
     & 0.3841000E+00, 0.4145800E+00, 0.4571900E+00, 0.5026600E+00, &
     & 0.5752300E+00, 0.6545100E+00, 0.6653364E+00, 0.6653364E+00 /
      data (ref_adm(18,iz,36,16),iz = 1,20) / &
     & 0.1899400E+00, 0.1899400E+00, 0.1986600E+00, 0.2130500E+00, &
     & 0.2181200E+00, 0.2213600E+00, 0.2341000E+00, 0.2551000E+00, &
     & 0.2579600E+00, 0.2979700E+00, 0.3225600E+00, 0.3510100E+00, &
     & 0.4062100E+00, 0.4338300E+00, 0.4866900E+00, 0.5827300E+00, &
     & 0.6297500E+00, 0.6672000E+00, 0.6399600E+00, 0.6399600E+00 /
      data (ref_adm(18,iz,37,16),iz = 1,20) / &
     & 0.2372700E+00, 0.2372700E+00, 0.2265100E+00, 0.2197100E+00, &
     & 0.2060800E+00, 0.2743100E+00, 0.2297900E+00, 0.2554800E+00, &
     & 0.2596300E+00, 0.2820600E+00, 0.3286700E+00, 0.3411600E+00, &
     & 0.3872600E+00, 0.4550600E+00, 0.4900000E+00, 0.5525000E+00, &
     & 0.6636600E+00, 0.6947800E+00, 0.6085600E+00, 0.6085600E+00 /
      data (ref_adm(18,iz,38,16),iz = 1,20) / &
     & 0.2372700E+00, 0.2372700E+00, 0.2265100E+00, 0.2197100E+00, &
     & 0.2060800E+00, 0.2743100E+00, 0.2297900E+00, 0.2554800E+00, &
     & 0.2596300E+00, 0.2820600E+00, 0.3286700E+00, 0.3411600E+00, &
     & 0.3872600E+00, 0.4550600E+00, 0.4900000E+00, 0.5525000E+00, &
     & 0.6636600E+00, 0.6947800E+00, 0.6085600E+00, 0.6085600E+00 /
! Solar Zenith Angle 80.0 Albedo  0.3387324E+00
      data (ref_adm(18,iz, 1,17),iz = 1,20) / &
     & 0.1898500E+00, 0.1898500E+00, 0.1887600E+00, 0.2642500E+00, &
     & 0.2413800E+00, 0.2132100E+00, 0.2472900E+00, 0.2681100E+00, &
     & 0.2757900E+00, 0.3094200E+00, 0.3650300E+00, 0.3918000E+00, &
     & 0.4588893E+00, 0.5857853E+00, 0.9264764E+00, 0.1758698E+01, &
     & 0.1904614E+01, 0.2135373E+01, 0.5168378E+01, 0.5168378E+01 /
      data (ref_adm(18,iz, 2,17),iz = 1,20) / &
     & 0.1898500E+00, 0.1898500E+00, 0.1887600E+00, 0.2642500E+00, &
     & 0.2413800E+00, 0.2132100E+00, 0.2472900E+00, 0.2681100E+00, &
     & 0.2757900E+00, 0.3094200E+00, 0.3650300E+00, 0.3918000E+00, &
     & 0.4588893E+00, 0.5857853E+00, 0.9264764E+00, 0.1758698E+01, &
     & 0.1904614E+01, 0.2135373E+01, 0.5168378E+01, 0.5168378E+01 /
      data (ref_adm(18,iz, 3,17),iz = 1,20) / &
     & 0.1851000E+00, 0.1851000E+00, 0.1888800E+00, 0.2025600E+00, &
     & 0.1764800E+00, 0.2193100E+00, 0.2264000E+00, 0.2941400E+00, &
     & 0.2289500E+00, 0.2841900E+00, 0.3511400E+00, 0.4019100E+00, &
     & 0.4532158E+00, 0.5718786E+00, 0.8764616E+00, 0.1731976E+01, &
     & 0.2008599E+01, 0.2117598E+01, 0.6108397E-07, 0.6108397E-07 /
      data (ref_adm(18,iz, 4,17),iz = 1,20) / &
     & 0.2231900E+00, 0.2231900E+00, 0.2043700E+00, 0.1903000E+00, &
     & 0.1867000E+00, 0.1993400E+00, 0.2413700E+00, 0.2223600E+00, &
     & 0.2394700E+00, 0.2518700E+00, 0.3258300E+00, 0.3587600E+00, &
     & 0.4430623E+00, 0.5463253E+00, 0.7893219E+00, 0.1487524E+01, &
     & 0.2274327E+01, 0.2453345E+01, 0.3273037E+01, 0.3273037E+01 /
      data (ref_adm(18,iz, 5,17),iz = 1,20) / &
     & 0.1888200E+00, 0.1888200E+00, 0.2006500E+00, 0.2117000E+00, &
     & 0.2168100E+00, 0.2473100E+00, 0.2485600E+00, 0.2621000E+00, &
     & 0.2677200E+00, 0.2969300E+00, 0.3085300E+00, 0.3760000E+00, &
     & 0.4322353E+00, 0.5157843E+00, 0.7008913E+00, 0.1138413E+01, &
     & 0.2140081E+01, 0.3422724E+01, 0.3930368E+01, 0.3930368E+01 /
      data (ref_adm(18,iz, 6,17),iz = 1,20) / &
     & 0.1913200E+00, 0.1913200E+00, 0.2161900E+00, 0.2081400E+00, &
     & 0.2343600E+00, 0.2385600E+00, 0.2284600E+00, 0.2456800E+00, &
     & 0.2565700E+00, 0.2859900E+00, 0.3142000E+00, 0.3873700E+00, &
     & 0.3413500E+00, 0.4509600E+00, 0.5204800E+00, 0.6558800E+00, &
     & 0.7179400E+00, 0.2995575E+01, 0.5589306E+01, 0.5589306E+01 /
      data (ref_adm(18,iz, 7,17),iz = 1,20) / &
     & 0.1894800E+00, 0.1894800E+00, 0.1772200E+00, 0.1792200E+00, &
     & 0.1965400E+00, 0.2135800E+00, 0.2243800E+00, 0.2194600E+00, &
     & 0.2572100E+00, 0.3060100E+00, 0.3053500E+00, 0.3691800E+00, &
     & 0.3488000E+00, 0.4220900E+00, 0.5734488E+00, 0.8467700E+00, &
     & 0.9765400E+00, 0.8672800E+00, 0.3425091E+01, 0.3425091E+01 /
      data (ref_adm(18,iz, 8,17),iz = 1,20) / &
     & 0.1802500E+00, 0.1802500E+00, 0.2174800E+00, 0.1782000E+00, &
     & 0.2133700E+00, 0.1871000E+00, 0.2030300E+00, 0.2216500E+00, &
     & 0.3239200E+00, 0.2594700E+00, 0.3063400E+00, 0.3119900E+00, &
     & 0.3015600E+00, 0.4486600E+00, 0.6320300E+00, 0.7535300E+00, &
     & 0.6618600E+00, 0.8808600E+00, 0.2397142E+01, 0.2397142E+01 /
      data (ref_adm(18,iz, 9,17),iz = 1,20) / &
     & 0.1660300E+00, 0.1660300E+00, 0.2365400E+00, 0.2297700E+00, &
     & 0.2237200E+00, 0.1985000E+00, 0.2146900E+00, 0.2306000E+00, &
     & 0.1963600E+00, 0.2505000E+00, 0.2518200E+00, 0.3117000E+00, &
     & 0.3716700E+00, 0.3898900E+00, 0.4828200E+00, 0.5245200E+00, &
     & 0.9603200E+00, 0.8366900E+00, 0.1911480E+01, 0.1911480E+01 /
      data (ref_adm(18,iz,10,17),iz = 1,20) / &
     & 0.2003300E+00, 0.2003300E+00, 0.2017100E+00, 0.2131800E+00, &
     & 0.2577500E+00, 0.2140700E+00, 0.1980200E+00, 0.2235400E+00, &
     & 0.1932500E+00, 0.2723200E+00, 0.2833800E+00, 0.2924800E+00, &
     & 0.3391400E+00, 0.3126200E+00, 0.4152700E+00, 0.5028400E+00, &
     & 0.5237400E+00, 0.1087649E+01, 0.1734433E+01, 0.1734433E+01 /
      data (ref_adm(18,iz,11,17),iz = 1,20) / &
     & 0.1703600E+00, 0.1703600E+00, 0.1673100E+00, 0.2602500E+00, &
     & 0.2050300E+00, 0.2230900E+00, 0.1992300E+00, 0.2146400E+00, &
     & 0.2230700E+00, 0.2375200E+00, 0.2596600E+00, 0.2719300E+00, &
     & 0.3130900E+00, 0.3604400E+00, 0.3966800E+00, 0.5306500E+00, &
     & 0.5362800E+00, 0.1015714E+01, 0.1618181E+01, 0.1618181E+01 /
      data (ref_adm(18,iz,12,17),iz = 1,20) / &
     & 0.2026300E+00, 0.2026300E+00, 0.1860800E+00, 0.2398500E+00, &
     & 0.2027000E+00, 0.2190000E+00, 0.2099700E+00, 0.1933300E+00, &
     & 0.2184300E+00, 0.2418600E+00, 0.2661700E+00, 0.3344600E+00, &
     & 0.2905000E+00, 0.3189800E+00, 0.3722900E+00, 0.4269500E+00, &
     & 0.6538700E+00, 0.9304237E+00, 0.1459180E+01, 0.1459180E+01 /
      data (ref_adm(18,iz,13,17),iz = 1,20) / &
     & 0.1773700E+00, 0.1773700E+00, 0.2335600E+00, 0.1698400E+00, &
     & 0.2097500E+00, 0.1981100E+00, 0.2418100E+00, 0.2046800E+00, &
     & 0.2279200E+00, 0.2510000E+00, 0.2466900E+00, 0.2748700E+00, &
     & 0.3337800E+00, 0.3758259E+00, 0.3107500E+00, 0.3720800E+00, &
     & 0.5516800E+00, 0.8766888E+00, 0.1358724E+01, 0.1358724E+01 /
      data (ref_adm(18,iz,14,17),iz = 1,20) / &
     & 0.1801900E+00, 0.1801900E+00, 0.1911000E+00, 0.2044500E+00, &
     & 0.2350000E+00, 0.1944200E+00, 0.2092900E+00, 0.2128000E+00, &
     & 0.2512900E+00, 0.2427700E+00, 0.3359800E+00, 0.2300600E+00, &
     & 0.2799700E+00, 0.3120200E+00, 0.3249200E+00, 0.3711000E+00, &
     & 0.5221200E+00, 0.8423737E+00, 0.1291685E+01, 0.1291685E+01 /
      data (ref_adm(18,iz,15,17),iz = 1,20) / &
     & 0.1904600E+00, 0.1904600E+00, 0.1917300E+00, 0.2070700E+00, &
     & 0.2041200E+00, 0.2043500E+00, 0.1975700E+00, 0.2190000E+00, &
     & 0.2333400E+00, 0.2491100E+00, 0.2678200E+00, 0.2660500E+00, &
     & 0.2683200E+00, 0.2826000E+00, 0.3223300E+00, 0.4087300E+00, &
     & 0.4894700E+00, 0.8161216E+00, 0.1240450E+01, 0.1240450E+01 /
      data (ref_adm(18,iz,16,17),iz = 1,20) / &
     & 0.1998500E+00, 0.1998500E+00, 0.2045900E+00, 0.1813800E+00, &
     & 0.1803000E+00, 0.1888400E+00, 0.1975200E+00, 0.2065600E+00, &
     & 0.1978300E+00, 0.2388900E+00, 0.2213300E+00, 0.2413200E+00, &
     & 0.2541900E+00, 0.2775600E+00, 0.3322800E+00, 0.4083800E+00, &
     & 0.4923800E+00, 0.7919153E+00, 0.1196145E+01, 0.1196145E+01 /
      data (ref_adm(18,iz,17,17),iz = 1,20) / &
     & 0.1937900E+00, 0.1937900E+00, 0.1769800E+00, 0.1864600E+00, &
     & 0.1860900E+00, 0.1835500E+00, 0.2146600E+00, 0.2207300E+00, &
     & 0.2007700E+00, 0.2415100E+00, 0.2348700E+00, 0.2616800E+00, &
     & 0.2714800E+00, 0.2762200E+00, 0.3252800E+00, 0.3348900E+00, &
     & 0.5739698E+00, 0.7633878E+00, 0.1145359E+01, 0.1145359E+01 /
      data (ref_adm(18,iz,18,17),iz = 1,20) / &
     & 0.2029500E+00, 0.2029500E+00, 0.1681600E+00, 0.1638900E+00, &
     & 0.2437100E+00, 0.1712200E+00, 0.1801500E+00, 0.2186300E+00, &
     & 0.2053700E+00, 0.2275700E+00, 0.2369800E+00, 0.2668000E+00, &
     & 0.2578900E+00, 0.2797600E+00, 0.3494100E+00, 0.3596700E+00, &
     & 0.4101095E+00, 0.4731883E+00, 0.5261252E+00, 0.5261252E+00 /
      data (ref_adm(18,iz,19,17),iz = 1,20) / &
     & 0.1700600E+00, 0.1700600E+00, 0.1681500E+00, 0.1885500E+00, &
     & 0.2019000E+00, 0.2278100E+00, 0.2194600E+00, 0.2268200E+00, &
     & 0.2683500E+00, 0.2452500E+00, 0.2638200E+00, 0.2524700E+00, &
     & 0.2623200E+00, 0.2987200E+00, 0.3213100E+00, 0.3624607E+00, &
     & 0.4042921E+00, 0.4636675E+00, 0.5130469E+00, 0.5130469E+00 /
      data (ref_adm(18,iz,20,17),iz = 1,20) / &
     & 0.2115800E+00, 0.2115800E+00, 0.2090400E+00, 0.1925200E+00, &
     & 0.1804300E+00, 0.2131500E+00, 0.2338600E+00, 0.2219900E+00, &
     & 0.2110700E+00, 0.2611500E+00, 0.2308300E+00, 0.2637700E+00, &
     & 0.2487900E+00, 0.2734600E+00, 0.3321500E+00, 0.3596555E+00, &
     & 0.4006908E+00, 0.4579779E+00, 0.5054359E+00, 0.5054359E+00 /
      data (ref_adm(18,iz,21,17),iz = 1,20) / &
     & 0.1849800E+00, 0.1849800E+00, 0.2460300E+00, 0.2363600E+00, &
     & 0.2127000E+00, 0.2247300E+00, 0.1928800E+00, 0.2250200E+00, &
     & 0.2707900E+00, 0.2652000E+00, 0.2717200E+00, 0.3149400E+00, &
     & 0.2418300E+00, 0.2829100E+00, 0.3327400E+00, 0.3582785E+00, &
     & 0.3982524E+00, 0.4537191E+00, 0.5008899E+00, 0.5008899E+00 /
      data (ref_adm(18,iz,22,17),iz = 1,20) / &
     & 0.1828100E+00, 0.1828100E+00, 0.2308900E+00, 0.1971700E+00, &
     & 0.1943900E+00, 0.2035900E+00, 0.2094800E+00, 0.2454000E+00, &
     & 0.2251200E+00, 0.2278700E+00, 0.2744900E+00, 0.2653000E+00, &
     & 0.2833000E+00, 0.3354800E+00, 0.3326000E+00, 0.4214081E+00, &
     & 0.4840013E+00, 0.5808441E+00, 0.7146041E+00, 0.7146041E+00 /
      data (ref_adm(18,iz,23,17),iz = 1,20) / &
     & 0.1791600E+00, 0.1791600E+00, 0.1815400E+00, 0.1789700E+00, &
     & 0.2061800E+00, 0.1949300E+00, 0.2045700E+00, 0.2133900E+00, &
     & 0.2108700E+00, 0.2471900E+00, 0.2572400E+00, 0.2745500E+00, &
     & 0.2679300E+00, 0.3089100E+00, 0.3071200E+00, 0.3386800E+00, &
     & 0.4837421E+00, 0.5793297E+00, 0.7165464E+00, 0.7165464E+00 /
      data (ref_adm(18,iz,24,17),iz = 1,20) / &
     & 0.1895000E+00, 0.1895000E+00, 0.2009900E+00, 0.2012700E+00, &
     & 0.1999500E+00, 0.2099200E+00, 0.2126800E+00, 0.2258700E+00, &
     & 0.2332200E+00, 0.2597200E+00, 0.2732900E+00, 0.2815300E+00, &
     & 0.3034400E+00, 0.3282300E+00, 0.3660800E+00, 0.3903400E+00, &
     & 0.4865817E+00, 0.5823769E+00, 0.7253072E+00, 0.7253072E+00 /
      data (ref_adm(18,iz,25,17),iz = 1,20) / &
     & 0.2076700E+00, 0.2076700E+00, 0.2337300E+00, 0.1950400E+00, &
     & 0.2180300E+00, 0.2189700E+00, 0.2300200E+00, 0.2278200E+00, &
     & 0.2475000E+00, 0.2511500E+00, 0.2652600E+00, 0.2998400E+00, &
     & 0.3183400E+00, 0.3458500E+00, 0.3532600E+00, 0.3816500E+00, &
     & 0.5573800E+00, 0.5885118E+00, 0.7387319E+00, 0.7387319E+00 /
      data (ref_adm(18,iz,26,17),iz = 1,20) / &
     & 0.2118600E+00, 0.2118600E+00, 0.1905000E+00, 0.1713300E+00, &
     & 0.2071800E+00, 0.2166400E+00, 0.2416400E+00, 0.2136300E+00, &
     & 0.2699400E+00, 0.2324800E+00, 0.2715200E+00, 0.2782300E+00, &
     & 0.2830800E+00, 0.4230900E+00, 0.4561800E+00, 0.4373900E+00, &
     & 0.5236200E+00, 0.5574700E+00, 0.7614412E+00, 0.7614412E+00 /
      data (ref_adm(18,iz,27,17),iz = 1,20) / &
     & 0.2111300E+00, 0.2111300E+00, 0.1638600E+00, 0.1930500E+00, &
     & 0.2155500E+00, 0.1744300E+00, 0.2059000E+00, 0.2240800E+00, &
     & 0.2274000E+00, 0.2428800E+00, 0.2575100E+00, 0.3235200E+00, &
     & 0.3367300E+00, 0.3643200E+00, 0.3663800E+00, 0.4578400E+00, &
     & 0.5140263E+00, 0.5386100E+00, 0.7897153E+00, 0.7897153E+00 /
      data (ref_adm(18,iz,28,17),iz = 1,20) / &
     & 0.2089400E+00, 0.2089400E+00, 0.1724900E+00, 0.2355500E+00, &
     & 0.2195600E+00, 0.2396100E+00, 0.2182500E+00, 0.2503100E+00, &
     & 0.2493700E+00, 0.3340700E+00, 0.2786900E+00, 0.2957800E+00, &
     & 0.3103300E+00, 0.3492000E+00, 0.3822400E+00, 0.3896100E+00, &
     & 0.5143000E+00, 0.5751200E+00, 0.8201759E+00, 0.8201759E+00 /
      data (ref_adm(18,iz,29,17),iz = 1,20) / &
     & 0.1920900E+00, 0.1920900E+00, 0.1759500E+00, 0.1381400E+00, &
     & 0.2541000E+00, 0.2347400E+00, 0.2667700E+00, 0.2296800E+00, &
     & 0.2404400E+00, 0.2744400E+00, 0.2736000E+00, 0.3044400E+00, &
     & 0.3381900E+00, 0.3649300E+00, 0.4373100E+00, 0.4984000E+00, &
     & 0.5482300E+00, 0.6191700E+00, 0.8556761E+00, 0.8556761E+00 /
      data (ref_adm(18,iz,30,17),iz = 1,20) / &
     & 0.1681100E+00, 0.1681100E+00, 0.2189500E+00, 0.1964500E+00, &
     & 0.2434600E+00, 0.2384700E+00, 0.2324200E+00, 0.2736900E+00, &
     & 0.2464700E+00, 0.2422500E+00, 0.2309800E+00, 0.3034900E+00, &
     & 0.3656200E+00, 0.3876800E+00, 0.4414900E+00, 0.4719100E+00, &
     & 0.5402400E+00, 0.6196500E+00, 0.8938368E+00, 0.8938368E+00 /
      data (ref_adm(18,iz,31,17),iz = 1,20) / &
     & 0.1578300E+00, 0.1578300E+00, 0.1751100E+00, 0.1961300E+00, &
     & 0.2327800E+00, 0.1976000E+00, 0.2293100E+00, 0.2381000E+00, &
     & 0.2677900E+00, 0.2383500E+00, 0.2917500E+00, 0.3059100E+00, &
     & 0.3459300E+00, 0.3801900E+00, 0.4443000E+00, 0.4753800E+00, &
     & 0.6230700E+00, 0.7089655E+00, 0.7540000E+00, 0.7540000E+00 /
      data (ref_adm(18,iz,32,17),iz = 1,20) / &
     & 0.1767500E+00, 0.1767500E+00, 0.1834600E+00, 0.1791400E+00, &
     & 0.2493800E+00, 0.2243700E+00, 0.2077900E+00, 0.2800800E+00, &
     & 0.2648300E+00, 0.3066700E+00, 0.2947800E+00, 0.3350500E+00, &
     & 0.3519900E+00, 0.4040300E+00, 0.4538300E+00, 0.4911100E+00, &
     & 0.6049500E+00, 0.7200600E+00, 0.8488300E+00, 0.8488300E+00 /
      data (ref_adm(18,iz,33,17),iz = 1,20) / &
     & 0.1920200E+00, 0.1920200E+00, 0.1977300E+00, 0.2135100E+00, &
     & 0.2367000E+00, 0.2546700E+00, 0.2400800E+00, 0.2487400E+00, &
     & 0.2907600E+00, 0.3138800E+00, 0.3032100E+00, 0.3418500E+00, &
     & 0.3915000E+00, 0.4465000E+00, 0.4762900E+00, 0.5862800E+00, &
     & 0.6311700E+00, 0.9579400E+00, 0.7356000E+00, 0.7356000E+00 /
      data (ref_adm(18,iz,34,17),iz = 1,20) / &
     & 0.1830000E+00, 0.1830000E+00, 0.2030900E+00, 0.1917700E+00, &
     & 0.2148600E+00, 0.2313600E+00, 0.2571200E+00, 0.2746200E+00, &
     & 0.2913600E+00, 0.2871500E+00, 0.2960600E+00, 0.3553100E+00, &
     & 0.3679500E+00, 0.4097400E+00, 0.4637600E+00, 0.5348400E+00, &
     & 0.6090700E+00, 0.7481189E+00, 0.1010649E+01, 0.1010649E+01 /
      data (ref_adm(18,iz,35,17),iz = 1,20) / &
     & 0.1921800E+00, 0.1921800E+00, 0.1864700E+00, 0.2120100E+00, &
     & 0.1928900E+00, 0.2104500E+00, 0.2482100E+00, 0.2663000E+00, &
     & 0.2615100E+00, 0.2825300E+00, 0.3517500E+00, 0.3670700E+00, &
     & 0.4003200E+00, 0.4399500E+00, 0.5139600E+00, 0.5719100E+00, &
     & 0.6746900E+00, 0.7603100E+00, 0.1013543E+01, 0.1013543E+01 /
      data (ref_adm(18,iz,36,17),iz = 1,20) / &
     & 0.1706300E+00, 0.1706300E+00, 0.1924100E+00, 0.2018000E+00, &
     & 0.1913700E+00, 0.2287400E+00, 0.2236300E+00, 0.2498400E+00, &
     & 0.2578200E+00, 0.2948500E+00, 0.3717900E+00, 0.3856300E+00, &
     & 0.3783900E+00, 0.4267800E+00, 0.4744800E+00, 0.5692900E+00, &
     & 0.6568800E+00, 0.7502900E+00, 0.1021475E+01, 0.1021475E+01 /
      data (ref_adm(18,iz,37,17),iz = 1,20) / &
     & 0.2476700E+00, 0.2476700E+00, 0.2211300E+00, 0.1926800E+00, &
     & 0.2436000E+00, 0.2560900E+00, 0.2298700E+00, 0.2354600E+00, &
     & 0.2599500E+00, 0.2766900E+00, 0.3128900E+00, 0.3860300E+00, &
     & 0.3686800E+00, 0.4343600E+00, 0.5162100E+00, 0.6003300E+00, &
     & 0.6988100E+00, 0.8934200E+00, 0.1028921E+01, 0.1028921E+01 /
      data (ref_adm(18,iz,38,17),iz = 1,20) / &
     & 0.2476700E+00, 0.2476700E+00, 0.2211300E+00, 0.1926800E+00, &
     & 0.2436000E+00, 0.2560900E+00, 0.2298700E+00, 0.2354600E+00, &
     & 0.2599500E+00, 0.2766900E+00, 0.3128900E+00, 0.3860300E+00, &
     & 0.3686800E+00, 0.4343600E+00, 0.5162100E+00, 0.6003300E+00, &
     & 0.6988100E+00, 0.8934200E+00, 0.1028921E+01, 0.1028921E+01 /
! Solar Zenith Angle 85.0 Albedo  0.3815537E+00
      data (ref_adm(18,iz, 1,18),iz = 1,20) / &
     & 0.2158020E+00, 0.2158020E+00, 0.2212628E+00, 0.2280281E+00, &
     & 0.2369988E+00, 0.2478725E+00, 0.2615950E+00, 0.2780801E+00, &
     & 0.2977211E+00, 0.3203171E+00, 0.3464973E+00, 0.3852072E+00, &
     & 0.4375949E+00, 0.4947848E+00, 0.5890990E+00, 0.7051176E+00, &
     & 0.8344609E+00, 0.1109095E+01, 0.1294002E+01, 0.1294002E+01 /
      data (ref_adm(18,iz, 2,18),iz = 1,20) / &
     & 0.2158020E+00, 0.2158020E+00, 0.2212628E+00, 0.2280281E+00, &
     & 0.2369988E+00, 0.2478725E+00, 0.2615950E+00, 0.2780801E+00, &
     & 0.2977211E+00, 0.3203171E+00, 0.3464973E+00, 0.3852072E+00, &
     & 0.4375949E+00, 0.4947848E+00, 0.5890990E+00, 0.7051176E+00, &
     & 0.8344609E+00, 0.1109095E+01, 0.1294002E+01, 0.1294002E+01 /
      data (ref_adm(18,iz, 3,18),iz = 1,20) / &
     & 0.2157548E+00, 0.2157548E+00, 0.2212200E+00, 0.2279702E+00, &
     & 0.2369812E+00, 0.2953100E+00, 0.2611991E+00, 0.2775906E+00, &
     & 0.2969249E+00, 0.3200175E+00, 0.3460571E+00, 0.3845709E+00, &
     & 0.4359923E+00, 0.4911586E+00, 0.5843451E+00, 0.6996367E+00, &
     & 0.8203400E+00, 0.1067048E+01, 0.1007863E+00, 0.1007863E+00 /
      data (ref_adm(18,iz, 4,18),iz = 1,20) / &
     & 0.2257400E+00, 0.2257400E+00, 0.2211875E+00, 0.2279354E+00, &
     & 0.2365787E+00, 0.2473407E+00, 0.2604117E+00, 0.2770478E+00, &
     & 0.2961355E+00, 0.3550800E+00, 0.3447217E+00, 0.3826965E+00, &
     & 0.4314989E+00, 0.4844742E+00, 0.5727120E+00, 0.6871331E+00, &
     & 0.7957945E+00, 0.9911726E+00, 0.1069183E+01, 0.1069183E+01 /
      data (ref_adm(18,iz, 5,18),iz = 1,20) / &
     & 0.2159144E+00, 0.2159144E+00, 0.2211861E+00, 0.2275801E+00, &
     & 0.2362104E+00, 0.2468074E+00, 0.2598050E+00, 0.2758139E+00, &
     & 0.2947247E+00, 0.3171368E+00, 0.3428732E+00, 0.3796553E+00, &
     & 0.4266540E+00, 0.4760037E+00, 0.5560337E+00, 0.6701423E+00, &
     & 0.7697666E+00, 0.9081957E+00, 0.9248466E+00, 0.9248466E+00 /
      data (ref_adm(18,iz, 6,18),iz = 1,20) / &
     & 0.2157205E+00, 0.2157205E+00, 0.2208457E+00, 0.2283000E+00, &
     & 0.2358446E+00, 0.2460742E+00, 0.2587976E+00, 0.3351800E+00, &
     & 0.4362900E+00, 0.3147959E+00, 0.3399907E+00, 0.3763910E+00, &
     & 0.4207112E+00, 0.4655182E+00, 0.5368623E+00, 0.6442203E+00, &
     & 0.7413990E+00, 0.8354261E+00, 0.8096015E+00, 0.8096015E+00 /
      data (ref_adm(18,iz, 7,18),iz = 1,20) / &
     & 0.2155565E+00, 0.2155565E+00, 0.2205771E+00, 0.2267354E+00, &
     & 0.2350418E+00, 0.2451589E+00, 0.2576097E+00, 0.2725887E+00, &
     & 0.2905926E+00, 0.3118772E+00, 0.3369164E+00, 0.3726237E+00, &
     & 0.4142926E+00, 0.4555266E+00, 0.5172921E+00, 0.6109571E+00, &
     & 0.7109553E+00, 0.7849379E+00, 0.7217924E+00, 0.7217924E+00 /
      data (ref_adm(18,iz, 8,18),iz = 1,20) / &
     & 0.2156764E+00, 0.2156764E+00, 0.2201433E+00, 0.2263615E+00, &
     & 0.2341371E+00, 0.2440687E+00, 0.2561037E+00, 0.2704723E+00, &
     & 0.2879350E+00, 0.3084896E+00, 0.3780900E+00, 0.3678721E+00, &
     & 0.4074722E+00, 0.4447114E+00, 0.5000110E+00, 0.5780533E+00, &
     & 0.6659923E+00, 0.7486038E+00, 0.6757783E+00, 0.6757783E+00 /
      data (ref_adm(18,iz, 9,18),iz = 1,20) / &
     & 0.2154731E+00, 0.2154731E+00, 0.1759000E+00, 0.2258379E+00, &
     & 0.2332188E+00, 0.2429041E+00, 0.2543417E+00, 0.2681135E+00, &
     & 0.2850260E+00, 0.3324300E+00, 0.3859600E+00, 0.3625600E+00, &
     & 0.4013269E+00, 0.4356206E+00, 0.4849429E+00, 0.5507451E+00, &
     & 0.6206494E+00, 0.6971040E+00, 0.6478118E+00, 0.6478118E+00 /
      data (ref_adm(18,iz,10,18),iz = 1,20) / &
     & 0.2155011E+00, 0.2155011E+00, 0.2195990E+00, 0.2250709E+00, &
     & 0.2321502E+00, 0.2413914E+00, 0.2525901E+00, 0.2657815E+00, &
     & 0.2815532E+00, 0.2641200E+00, 0.3308000E+00, 0.3564548E+00, &
     & 0.3944292E+00, 0.4270282E+00, 0.4709812E+00, 0.5283682E+00, &
     & 0.5857418E+00, 0.6406798E+00, 0.5992886E+00, 0.5992886E+00 /
      data (ref_adm(18,iz,11,18),iz = 1,20) / &
     & 0.2152737E+00, 0.2152737E+00, 0.2190946E+00, 0.2243700E+00, &
     & 0.2312475E+00, 0.2399894E+00, 0.2506343E+00, 0.2633696E+00, &
     & 0.2781663E+00, 0.2999400E+00, 0.3177023E+00, 0.3495877E+00, &
     & 0.3865350E+00, 0.4190606E+00, 0.4601662E+00, 0.5106267E+00, &
     & 0.5587611E+00, 0.5995875E+00, 0.5563517E+00, 0.5563517E+00 /
      data (ref_adm(18,iz,12,18),iz = 1,20) / &
     & 0.3535500E+00, 0.3535500E+00, 0.2189042E+00, 0.2235942E+00, &
     & 0.2300279E+00, 0.2452000E+00, 0.2484299E+00, 0.2606230E+00, &
     & 0.2076500E+00, 0.2920824E+00, 0.3122683E+00, 0.3424930E+00, &
     & 0.3775727E+00, 0.4087478E+00, 0.4498037E+00, 0.4975585E+00, &
     & 0.5394735E+00, 0.5720782E+00, 0.5284687E+00, 0.5284687E+00 /
      data (ref_adm(18,iz,13,18),iz = 1,20) / &
     & 0.2068300E+00, 0.2068300E+00, 0.2185559E+00, 0.2228554E+00, &
     & 0.2288315E+00, 0.2365904E+00, 0.2462929E+00, 0.2576100E+00, &
     & 0.2715049E+00, 0.2873108E+00, 0.3064238E+00, 0.3350352E+00, &
     & 0.3684225E+00, 0.3983711E+00, 0.4384262E+00, 0.4851871E+00, &
     & 0.5246286E+00, 0.5522419E+00, 0.5082568E+00, 0.5082568E+00 /
      data (ref_adm(18,iz,14,18),iz = 1,20) / &
     & 0.2149818E+00, 0.2149818E+00, 0.2181287E+00, 0.2219548E+00, &
     & 0.2276656E+00, 0.2348983E+00, 0.2235900E+00, 0.2125300E+00, &
     & 0.2681461E+00, 0.2832078E+00, 0.3010385E+00, 0.3281028E+00, &
     & 0.3596524E+00, 0.3877948E+00, 0.4252220E+00, 0.4707845E+00, &
     & 0.5105814E+00, 0.5374773E+00, 0.4932245E+00, 0.4932245E+00 /
      data (ref_adm(18,iz,15,18),iz = 1,20) / &
     & 0.2383300E+00, 0.2383300E+00, 0.2116900E+00, 0.2180500E+00, &
     & 0.2284700E+00, 0.2223400E+00, 0.2637800E+00, 0.2503600E+00, &
     & 0.2594100E+00, 0.2924500E+00, 0.2910300E+00, 0.2624800E+00, &
     & 0.2925200E+00, 0.3572800E+00, 0.4125628E+00, 0.4549200E+00, &
     & 0.4931855E+00, 0.5220007E+00, 0.4800607E+00, 0.4800607E+00 /
      data (ref_adm(18,iz,16,18),iz = 1,20) / &
     & 0.2267100E+00, 0.2267100E+00, 0.2161700E+00, 0.2128100E+00, &
     & 0.2377900E+00, 0.1820600E+00, 0.1952200E+00, 0.2264600E+00, &
     & 0.2242900E+00, 0.2612200E+00, 0.2106800E+00, 0.3145866E+00, &
     & 0.3419085E+00, 0.3666368E+00, 0.4001188E+00, 0.4403033E+00, &
     & 0.4759534E+00, 0.5020567E+00, 0.4648472E+00, 0.4648472E+00 /
      data (ref_adm(18,iz,17,18),iz = 1,20) / &
     & 0.2147470E+00, 0.2147470E+00, 0.2168631E+00, 0.2197858E+00, &
     & 0.2239743E+00, 0.1916300E+00, 0.2374714E+00, 0.2464603E+00, &
     & 0.2573521E+00, 0.2705729E+00, 0.2855459E+00, 0.3085282E+00, &
     & 0.3343563E+00, 0.3577472E+00, 0.3883720E+00, 0.4254623E+00, &
     & 0.4587118E+00, 0.4836972E+00, 0.4486915E+00, 0.4486915E+00 /
      data (ref_adm(18,iz,18,18),iz = 1,20) / &
     & 0.2165241E+00, 0.2165241E+00, 0.2180580E+00, 0.2207571E+00, &
     & 0.2247295E+00, 0.2301951E+00, 0.2372620E+00, 0.2461707E+00, &
     & 0.2568011E+00, 0.2696911E+00, 0.2852637E+00, 0.3095349E+00, &
     & 0.3392333E+00, 0.3683422E+00, 0.4124364E+00, 0.4787998E+00, &
     & 0.5623785E+00, 0.7031347E+00, 0.9123720E+00, 0.9123720E+00 /
      data (ref_adm(18,iz,19,18),iz = 1,20) / &
     & 0.2164737E+00, 0.2164737E+00, 0.2178833E+00, 0.2205768E+00, &
     & 0.2244981E+00, 0.2297373E+00, 0.2367427E+00, 0.2452202E+00, &
     & 0.2556448E+00, 0.2682066E+00, 0.2836466E+00, 0.3071375E+00, &
     & 0.3361161E+00, 0.3641547E+00, 0.4068827E+00, 0.4704896E+00, &
     & 0.5508910E+00, 0.6856866E+00, 0.8858284E+00, 0.8858284E+00 /
      data (ref_adm(18,iz,20,18),iz = 1,20) / &
     & 0.2164840E+00, 0.2164840E+00, 0.2179068E+00, 0.2203862E+00, &
     & 0.2242631E+00, 0.2294870E+00, 0.2362031E+00, 0.2446561E+00, &
     & 0.2548898E+00, 0.2673661E+00, 0.2823661E+00, 0.3054157E+00, &
     & 0.3338850E+00, 0.3614503E+00, 0.4034082E+00, 0.4657620E+00, &
     & 0.5440794E+00, 0.6740764E+00, 0.8703527E+00, 0.8703527E+00 /
      data (ref_adm(18,iz,21,18),iz = 1,20) / &
     & 0.2836400E+00, 0.2836400E+00, 0.2177688E+00, 0.1598700E+00, &
     & 0.2240129E+00, 0.2293617E+00, 0.2360811E+00, 0.2444451E+00, &
     & 0.2547447E+00, 0.2669596E+00, 0.2817055E+00, 0.3046329E+00, &
     & 0.3325683E+00, 0.3599376E+00, 0.4011630E+00, 0.4623979E+00, &
     & 0.5393919E+00, 0.6667709E+00, 0.8615762E+00, 0.8615762E+00 /
      data (ref_adm(18,iz,22,18),iz = 1,20) / &
     & 0.2489100E+00, 0.2489100E+00, 0.2269056E+00, 0.2308552E+00, &
     & 0.2367258E+00, 0.2446270E+00, 0.2546983E+00, 0.2671336E+00, &
     & 0.2821562E+00, 0.2999220E+00, 0.3206424E+00, 0.3511063E+00, &
     & 0.3865210E+00, 0.4192387E+00, 0.4664340E+00, 0.5335716E+00, &
     & 0.6168693E+00, 0.7722401E+00, 0.1323875E+01, 0.1323875E+01 /
      data (ref_adm(18,iz,23,18),iz = 1,20) / &
     & 0.2504600E+00, 0.2504600E+00, 0.2053600E+00, 0.1778600E+00, &
     & 0.2073900E+00, 0.2195300E+00, 0.2202300E+00, 0.3267100E+00, &
     & 0.2835760E+00, 0.3016451E+00, 0.3226615E+00, 0.2819800E+00, &
     & 0.3893935E+00, 0.4225426E+00, 0.4704370E+00, 0.5388433E+00, &
     & 0.6241865E+00, 0.7848397E+00, 0.1361662E+01, 0.1361662E+01 /
      data (ref_adm(18,iz,24,18),iz = 1,20) / &
     & 0.2077800E+00, 0.2077800E+00, 0.2501400E+00, 0.2466900E+00, &
     & 0.2268000E+00, 0.2638300E+00, 0.2467300E+00, 0.2463700E+00, &
     & 0.2896000E+00, 0.3110300E+00, 0.3014500E+00, 0.3074000E+00, &
     & 0.3512400E+00, 0.4368500E+00, 0.4792504E+00, 0.5503107E+00, &
     & 0.6394788E+00, 0.8083006E+00, 0.1416343E+01, 0.1416343E+01 /
      data (ref_adm(18,iz,25,18),iz = 1,20) / &
     & 0.2343000E+00, 0.2343000E+00, 0.1801700E+00, 0.1970200E+00, &
     & 0.2109700E+00, 0.2408300E+00, 0.2586595E+00, 0.2725380E+00, &
     & 0.3343900E+00, 0.3089142E+00, 0.3317772E+00, 0.3554600E+00, &
     & 0.3400800E+00, 0.4320400E+00, 0.4928823E+00, 0.5681455E+00, &
     & 0.6629485E+00, 0.8426658E+00, 0.1485686E+01, 0.1485686E+01 /
      data (ref_adm(18,iz,26,18),iz = 1,20) / &
     & 0.2247348E+00, 0.2247348E+00, 0.2272930E+00, 0.2321474E+00, &
     & 0.2393345E+00, 0.2487923E+00, 0.2608278E+00, 0.2755971E+00, &
     & 0.2933263E+00, 0.3144064E+00, 0.3390296E+00, 0.3753144E+00, &
     & 0.4174574E+00, 0.4564243E+00, 0.5127366E+00, 0.5938409E+00, &
     & 0.6961184E+00, 0.8897127E+00, 0.1570136E+01, 0.1570136E+01 /
      data (ref_adm(18,iz,27,18),iz = 1,20) / &
     & 0.2244100E+00, 0.2244100E+00, 0.2274610E+00, 0.2327238E+00, &
     & 0.2402891E+00, 0.2504310E+00, 0.2632664E+00, 0.2790628E+00, &
     & 0.2983451E+00, 0.3213440E+00, 0.3483424E+00, 0.3876295E+00, &
     & 0.3331700E+00, 0.4733743E+00, 0.5328094E+00, 0.6187592E+00, &
     & 0.7278849E+00, 0.9352757E+00, 0.1659065E+01, 0.1659065E+01 /
      data (ref_adm(18,iz,28,18),iz = 1,20) / &
     & 0.2247671E+00, 0.2247671E+00, 0.2276697E+00, 0.2332736E+00, &
     & 0.2413765E+00, 0.3941100E+00, 0.2659485E+00, 0.2831717E+00, &
     & 0.3043893E+00, 0.3297082E+00, 0.3584557E+00, 0.3991139E+00, &
     & 0.3689400E+00, 0.4888731E+00, 0.5530170E+00, 0.6473211E+00, &
     & 0.7676230E+00, 0.9940341E+00, 0.1762888E+01, 0.1762888E+01 /
      data (ref_adm(18,iz,29,18),iz = 1,20) / &
     & 0.2247939E+00, 0.2247939E+00, 0.2279456E+00, 0.2338677E+00, &
     & 0.2425311E+00, 0.3423200E+00, 0.2688871E+00, 0.2877940E+00, &
     & 0.3111387E+00, 0.3378229E+00, 0.3672462E+00, 0.4096866E+00, &
     & 0.4610410E+00, 0.5117835E+00, 0.5905064E+00, 0.7088543E+00, &
     & 0.8572517E+00, 0.1121945E+01, 0.1916869E+01, 0.1916869E+01 /
      data (ref_adm(18,iz,30,18),iz = 1,20) / &
     & 0.2248089E+00, 0.2248089E+00, 0.2281639E+00, 0.2344278E+00, &
     & 0.2436490E+00, 0.2559538E+00, 0.2720593E+00, 0.2927867E+00, &
     & 0.3174402E+00, 0.3446851E+00, 0.3755393E+00, 0.4250808E+00, &
     & 0.4926385E+00, 0.5647457E+00, 0.6689504E+00, 0.8011261E+00, &
     & 0.9530848E+00, 0.1234916E+01, 0.2059619E+01, 0.2059619E+01 /
      data (ref_adm(18,iz,31,18),iz = 1,20) / &
     & 0.2248191E+00, 0.2248191E+00, 0.2006400E+00, 0.2349845E+00, &
     & 0.2447440E+00, 0.2578436E+00, 0.3291400E+00, 0.3237100E+00, &
     & 0.3228523E+00, 0.3509601E+00, 0.3861094E+00, 0.4520995E+00, &
     & 0.5472981E+00, 0.6210633E+00, 0.6862234E+00, 0.7780335E+00, &
     & 0.7055900E+00, 0.8446500E+00, 0.2077033E+01, 0.2077033E+01 /
      data (ref_adm(18,iz,32,18),iz = 1,20) / &
     & 0.2248255E+00, 0.2248255E+00, 0.2285698E+00, 0.2300000E+00, &
     & 0.2457867E+00, 0.2596636E+00, 0.2765800E+00, 0.3507900E+00, &
     & 0.3273771E+00, 0.3581284E+00, 0.4026589E+00, 0.4916928E+00, &
     & 0.5671644E+00, 0.5993702E+00, 0.6628630E+00, 0.7747824E+00, &
     & 0.9232908E+00, 0.1207020E+01, 0.2137017E+01, 0.2137017E+01 /
      data (ref_adm(18,iz,33,18),iz = 1,20) / &
     & 0.2248407E+00, 0.2248407E+00, 0.2287672E+00, 0.2359799E+00, &
     & 0.2466923E+00, 0.2613995E+00, 0.2813914E+00, 0.3051761E+00, &
     & 0.3315046E+00, 0.3670423E+00, 0.4262890E+00, 0.5135276E+00, &
     & 0.5462635E+00, 0.5899721E+00, 0.6681269E+00, 0.7844943E+00, &
     & 0.9360186E+00, 0.1226983E+01, 0.2197204E+01, 0.2197204E+01 /
      data (ref_adm(18,iz,34,18),iz = 1,20) / &
     & 0.2248478E+00, 0.2248478E+00, 0.2289135E+00, 0.2363953E+00, &
     & 0.2474559E+00, 0.2628889E+00, 0.2838311E+00, 0.3029500E+00, &
     & 0.4207900E+00, 0.3779526E+00, 0.9352300E+00, 0.5073639E+00, &
     & 0.5422622E+00, 0.5950087E+00, 0.6741182E+00, 0.7919798E+00, &
     & 0.9465564E+00, 0.1244563E+01, 0.2247893E+01, 0.2247893E+01 /
      data (ref_adm(18,iz,35,18),iz = 1,20) / &
     & 0.2248483E+00, 0.2248483E+00, 0.2290462E+00, 0.2367450E+00, &
     & 0.2481005E+00, 0.2640979E+00, 0.2856746E+00, 0.3489400E+00, &
     & 0.3393984E+00, 0.3896720E+00, 0.4680270E+00, 0.4983242E+00, &
     & 0.5453511E+00, 0.5987765E+00, 0.6784512E+00, 0.7989269E+00, &
     & 0.9573979E+00, 0.1263802E+01, 0.2293570E+01, 0.2293570E+01 /
      data (ref_adm(18,iz,36,18),iz = 1,20) / &
     & 0.2248662E+00, 0.2248662E+00, 0.2291152E+00, 0.2369724E+00, &
     & 0.2485299E+00, 0.2649415E+00, 0.2370500E+00, 0.3112230E+00, &
     & 0.3309800E+00, 0.3994207E+00, 0.4723320E+00, 0.4947467E+00, &
     & 0.5476242E+00, 0.6012512E+00, 0.6817600E+00, 0.8049094E+00, &
     & 0.9705105E+00, 0.1294429E+01, 0.2340195E+01, 0.2340195E+01 /
      data (ref_adm(18,iz,37,18),iz = 1,20) / &
     & 0.2248684E+00, 0.2248684E+00, 0.2291610E+00, 0.2370951E+00, &
     & 0.2487901E+00, 0.2654248E+00, 0.2875652E+00, 0.3120202E+00, &
     & 0.3443654E+00, 0.3170200E+00, 0.4522000E+00, 0.4937544E+00, &
     & 0.5488245E+00, 0.6025493E+00, 0.6838170E+00, 0.8094615E+00, &
     & 0.9841039E+00, 0.1386988E+01, 0.2426674E+01, 0.2426674E+01 /
      data (ref_adm(18,iz,38,18),iz = 1,20) / &
     & 0.2248684E+00, 0.2248684E+00, 0.2291610E+00, 0.2370951E+00, &
     & 0.2487901E+00, 0.2654248E+00, 0.2875652E+00, 0.3120202E+00, &
     & 0.3443654E+00, 0.3170200E+00, 0.4522000E+00, 0.4937544E+00, &
     & 0.5488245E+00, 0.6025493E+00, 0.6838170E+00, 0.8094615E+00, &
     & 0.9841039E+00, 0.1386988E+01, 0.2426674E+01, 0.2426674E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(19,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(19,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(19,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9999000E+04
      data (ref_adm(19,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.9999000E+04
      data (ref_adm(19,iz, 1, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 2, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 3, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 4, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 5, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 6, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 7, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 8, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 9, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,10, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,11, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,12, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,13, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,14, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,15, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,16, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,17, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,22, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,23, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,24, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,25, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,26, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,27, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,28, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,29, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,30, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,31, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,32, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,33, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,34, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,35, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,36, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,37, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,38, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 25.0 Albedo -0.9999000E+04
      data (ref_adm(19,iz, 1, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 2, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 3, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 4, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 5, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 6, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 7, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 8, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz, 9, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,10, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,11, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,12, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,13, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,14, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,15, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,16, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,17, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,18, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,19, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,20, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,21, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,22, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,23, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,24, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,25, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,26, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,27, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,28, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,29, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,30, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,31, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,32, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,33, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,34, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,35, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,36, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,37, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,38, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 30.0 Albedo  0.1966865E+00
      data (ref_adm(19,iz, 1, 7),iz = 1,20) / &
     & 0.2143128E+00, 0.2143128E+00, 0.2104777E+00, 0.2091492E+00, &
     & 0.2080991E+00, 0.2073809E+00, 0.2061150E+00, 0.2039585E+00, &
     & 0.2011884E+00, 0.1978715E+00, 0.1942640E+00, 0.1892554E+00, &
     & 0.1834096E+00, 0.1779047E+00, 0.1699993E+00, 0.1595888E+00, &
     & 0.1488485E+00, 0.1347959E+00, 0.1099830E+00, 0.1099830E+00 /
      data (ref_adm(19,iz, 2, 7),iz = 1,20) / &
     & 0.2143128E+00, 0.2143128E+00, 0.2104777E+00, 0.2091492E+00, &
     & 0.2080991E+00, 0.2073809E+00, 0.2061150E+00, 0.2039585E+00, &
     & 0.2011884E+00, 0.1978715E+00, 0.1942640E+00, 0.1892554E+00, &
     & 0.1834096E+00, 0.1779047E+00, 0.1699993E+00, 0.1595888E+00, &
     & 0.1488485E+00, 0.1347959E+00, 0.1099830E+00, 0.1099830E+00 /
      data (ref_adm(19,iz, 3, 7),iz = 1,20) / &
     & 0.2143128E+00, 0.2143128E+00, 0.2104777E+00, 0.2091492E+00, &
     & 0.2080991E+00, 0.2073809E+00, 0.2061150E+00, 0.2039584E+00, &
     & 0.2011884E+00, 0.1978715E+00, 0.1942640E+00, 0.1892554E+00, &
     & 0.1834096E+00, 0.1779047E+00, 0.1699993E+00, 0.1595888E+00, &
     & 0.1488485E+00, 0.1347959E+00, 0.1099830E+00, 0.1099830E+00 /
      data (ref_adm(19,iz, 4, 7),iz = 1,20) / &
     & 0.2143128E+00, 0.2143128E+00, 0.2104777E+00, 0.2091492E+00, &
     & 0.2080991E+00, 0.2073809E+00, 0.2061150E+00, 0.2039585E+00, &
     & 0.2011884E+00, 0.1978715E+00, 0.1942640E+00, 0.1892554E+00, &
     & 0.1834096E+00, 0.1779047E+00, 0.1699993E+00, 0.1595888E+00, &
     & 0.1488485E+00, 0.1347959E+00, 0.1099830E+00, 0.1099830E+00 /
      data (ref_adm(19,iz, 5, 7),iz = 1,20) / &
     & 0.2143128E+00, 0.2143128E+00, 0.2104777E+00, 0.2091492E+00, &
     & 0.2080991E+00, 0.2073809E+00, 0.2061150E+00, 0.2039584E+00, &
     & 0.2011884E+00, 0.1978715E+00, 0.1942640E+00, 0.1892554E+00, &
     & 0.1834096E+00, 0.1779047E+00, 0.1699993E+00, 0.1595888E+00, &
     & 0.1488485E+00, 0.1347959E+00, 0.1099830E+00, 0.1099830E+00 /
      data (ref_adm(19,iz, 6, 7),iz = 1,20) / &
     & 0.2143128E+00, 0.2143128E+00, 0.2104777E+00, 0.2091492E+00, &
     & 0.2080991E+00, 0.2073809E+00, 0.2061150E+00, 0.2039585E+00, &
     & 0.2011884E+00, 0.1978715E+00, 0.1942640E+00, 0.1892554E+00, &
     & 0.1834096E+00, 0.1779047E+00, 0.1699993E+00, 0.1595888E+00, &
     & 0.1488485E+00, 0.1347959E+00, 0.1099830E+00, 0.1099830E+00 /
      data (ref_adm(19,iz, 7, 7),iz = 1,20) / &
     & 0.2143128E+00, 0.2143128E+00, 0.2104777E+00, 0.2091492E+00, &
     & 0.2080991E+00, 0.2073809E+00, 0.2061150E+00, 0.2039584E+00, &
     & 0.2011884E+00, 0.1978715E+00, 0.1942640E+00, 0.1892554E+00, &
     & 0.1834096E+00, 0.1779047E+00, 0.1699993E+00, 0.1595888E+00, &
     & 0.1488485E+00, 0.1347959E+00, 0.1099830E+00, 0.1099830E+00 /
      data (ref_adm(19,iz, 8, 7),iz = 1,20) / &
     & 0.2143128E+00, 0.2143128E+00, 0.2104777E+00, 0.2091492E+00, &
     & 0.2080991E+00, 0.2073809E+00, 0.2061150E+00, 0.2039585E+00, &
     & 0.2011884E+00, 0.1978715E+00, 0.1942640E+00, 0.1892554E+00, &
     & 0.1834096E+00, 0.1779047E+00, 0.1699993E+00, 0.1595888E+00, &
     & 0.1488485E+00, 0.1347959E+00, 0.1099830E+00, 0.1099830E+00 /
      data (ref_adm(19,iz, 9, 7),iz = 1,20) / &
     & 0.2143128E+00, 0.2143128E+00, 0.2104777E+00, 0.2091492E+00, &
     & 0.2080991E+00, 0.2073809E+00, 0.2061150E+00, 0.2039584E+00, &
     & 0.2011884E+00, 0.1978715E+00, 0.1942640E+00, 0.1892554E+00, &
     & 0.1834096E+00, 0.1779047E+00, 0.1699993E+00, 0.1595888E+00, &
     & 0.1488485E+00, 0.1347959E+00, 0.1099830E+00, 0.1099830E+00 /
      data (ref_adm(19,iz,10, 7),iz = 1,20) / &
     & 0.2143128E+00, 0.2143128E+00, 0.2104777E+00, 0.2091492E+00, &
     & 0.2080991E+00, 0.2073809E+00, 0.2061150E+00, 0.2039585E+00, &
     & 0.2011884E+00, 0.1978715E+00, 0.1942640E+00, 0.1892554E+00, &
     & 0.1834096E+00, 0.1779047E+00, 0.1699993E+00, 0.1595888E+00, &
     & 0.1488485E+00, 0.1347959E+00, 0.1099830E+00, 0.1099830E+00 /
      data (ref_adm(19,iz,11, 7),iz = 1,20) / &
     & 0.2143128E+00, 0.2143128E+00, 0.2104777E+00, 0.2091492E+00, &
     & 0.2334100E+00, 0.2073809E+00, 0.2048500E+00, 0.2039584E+00, &
     & 0.2011884E+00, 0.1978715E+00, 0.1942640E+00, 0.1892554E+00, &
     & 0.1834096E+00, 0.1779047E+00, 0.1699993E+00, 0.1595888E+00, &
     & 0.1488485E+00, 0.1347959E+00, 0.1099830E+00, 0.1099830E+00 /
      data (ref_adm(19,iz,12, 7),iz = 1,20) / &
     & 0.2143128E+00, 0.2143128E+00, 0.2104777E+00, 0.2091492E+00, &
     & 0.2080991E+00, 0.2073809E+00, 0.2061150E+00, 0.2039585E+00, &
     & 0.2011884E+00, 0.1978715E+00, 0.1727500E+00, 0.1892554E+00, &
     & 0.1834096E+00, 0.1779047E+00, 0.1699993E+00, 0.1595888E+00, &
     & 0.1488485E+00, 0.1347959E+00, 0.1099830E+00, 0.1099830E+00 /
      data (ref_adm(19,iz,13, 7),iz = 1,20) / &
     & 0.2143128E+00, 0.2143128E+00, 0.2104777E+00, 0.2091492E+00, &
     & 0.2080991E+00, 0.2073809E+00, 0.2061150E+00, 0.2039584E+00, &
     & 0.2011884E+00, 0.1833400E+00, 0.1942640E+00, 0.1892554E+00, &
     & 0.1834096E+00, 0.1779047E+00, 0.1699993E+00, 0.1595888E+00, &
     & 0.1488485E+00, 0.1347959E+00, 0.1099830E+00, 0.1099830E+00 /
      data (ref_adm(19,iz,14, 7),iz = 1,20) / &
     & 0.2143128E+00, 0.2143128E+00, 0.2104777E+00, 0.2091492E+00, &
     & 0.2080991E+00, 0.2608200E+00, 0.2061150E+00, 0.2039585E+00, &
     & 0.2011884E+00, 0.1978715E+00, 0.1942640E+00, 0.1892554E+00, &
     & 0.1834096E+00, 0.1779047E+00, 0.1699993E+00, 0.1595888E+00, &
     & 0.1488485E+00, 0.1347959E+00, 0.1099830E+00, 0.1099830E+00 /
      data (ref_adm(19,iz,15, 7),iz = 1,20) / &
     & 0.2143128E+00, 0.2143128E+00, 0.2104777E+00, 0.2091492E+00, &
     & 0.2080991E+00, 0.2073809E+00, 0.2061150E+00, 0.2039584E+00, &
     & 0.2011884E+00, 0.1978715E+00, 0.1942640E+00, 0.1892554E+00, &
     & 0.1834096E+00, 0.1779047E+00, 0.1699993E+00, 0.1595888E+00, &
     & 0.1488485E+00, 0.1347959E+00, 0.1099830E+00, 0.1099830E+00 /
      data (ref_adm(19,iz,16, 7),iz = 1,20) / &
     & 0.2143128E+00, 0.2143128E+00, 0.2104777E+00, 0.2091492E+00, &
     & 0.2080991E+00, 0.2387900E+00, 0.2061150E+00, 0.1726100E+00, &
     & 0.2011884E+00, 0.1978715E+00, 0.1942640E+00, 0.1892554E+00, &
     & 0.1834096E+00, 0.1779047E+00, 0.1699993E+00, 0.1595888E+00, &
     & 0.1488485E+00, 0.1347959E+00, 0.1099830E+00, 0.1099830E+00 /
      data (ref_adm(19,iz,17, 7),iz = 1,20) / &
     & 0.2143128E+00, 0.2143128E+00, 0.2104777E+00, 0.2091492E+00, &
     & 0.2080991E+00, 0.2073809E+00, 0.1923000E+00, 0.1795400E+00, &
     & 0.2011884E+00, 0.1978715E+00, 0.1942640E+00, 0.1892554E+00, &
     & 0.1834096E+00, 0.1779047E+00, 0.1699993E+00, 0.1595888E+00, &
     & 0.1488485E+00, 0.1347959E+00, 0.1099830E+00, 0.1099830E+00 /
      data (ref_adm(19,iz,18, 7),iz = 1,20) / &
     & 0.2331492E+00, 0.2331492E+00, 0.2177670E+00, 0.2140269E+00, &
     & 0.2117814E+00, 0.2109644E+00, 0.2093813E+00, 0.2056900E+00, &
     & 0.2051692E+00, 0.2038269E+00, 0.2032872E+00, 0.2035911E+00, &
     & 0.2046922E+00, 0.2063208E+00, 0.2089971E+00, 0.2128359E+00, &
     & 0.2170973E+00, 0.2215333E+00, 0.2154687E+00, 0.2154687E+00 /
      data (ref_adm(19,iz,19, 7),iz = 1,20) / &
     & 0.2331492E+00, 0.2331492E+00, 0.2177670E+00, 0.2140269E+00, &
     & 0.2117814E+00, 0.2109644E+00, 0.2093813E+00, 0.2069805E+00, &
     & 0.2051692E+00, 0.2038269E+00, 0.2032872E+00, 0.2035911E+00, &
     & 0.2046922E+00, 0.2063208E+00, 0.2089971E+00, 0.2128359E+00, &
     & 0.2170973E+00, 0.2215333E+00, 0.2154688E+00, 0.2154688E+00 /
      data (ref_adm(19,iz,20, 7),iz = 1,20) / &
     & 0.2331492E+00, 0.2331492E+00, 0.2177670E+00, 0.2140269E+00, &
     & 0.2117814E+00, 0.2109644E+00, 0.2093813E+00, 0.2069805E+00, &
     & 0.2051692E+00, 0.2038269E+00, 0.2032872E+00, 0.2035911E+00, &
     & 0.2046922E+00, 0.2063208E+00, 0.2089971E+00, 0.2128359E+00, &
     & 0.2170973E+00, 0.2215333E+00, 0.2154687E+00, 0.2154687E+00 /
      data (ref_adm(19,iz,21, 7),iz = 1,20) / &
     & 0.2331492E+00, 0.2331492E+00, 0.2177670E+00, 0.2140269E+00, &
     & 0.2117814E+00, 0.2109644E+00, 0.2093813E+00, 0.2069805E+00, &
     & 0.2051692E+00, 0.2038269E+00, 0.2032872E+00, 0.2035911E+00, &
     & 0.2046922E+00, 0.2063208E+00, 0.2089971E+00, 0.2128359E+00, &
     & 0.2170973E+00, 0.2215333E+00, 0.2154688E+00, 0.2154688E+00 /
      data (ref_adm(19,iz,22, 7),iz = 1,20) / &
     & 0.2263113E+00, 0.2263113E+00, 0.2222615E+00, 0.2208586E+00, &
     & 0.2197497E+00, 0.2189913E+00, 0.2176546E+00, 0.2153772E+00, &
     & 0.2124521E+00, 0.2089495E+00, 0.2304700E+00, 0.1998511E+00, &
     & 0.1936779E+00, 0.1878648E+00, 0.1795168E+00, 0.1685235E+00, &
     & 0.1571819E+00, 0.1423426E+00, 0.1161405E+00, 0.1161405E+00 /
      data (ref_adm(19,iz,23, 7),iz = 1,20) / &
     & 0.2263113E+00, 0.2263113E+00, 0.2222615E+00, 0.2208586E+00, &
     & 0.2197497E+00, 0.2189913E+00, 0.2176546E+00, 0.2153772E+00, &
     & 0.2124521E+00, 0.2089495E+00, 0.1798100E+00, 0.1998511E+00, &
     & 0.1936779E+00, 0.1878648E+00, 0.1795168E+00, 0.1685235E+00, &
     & 0.1571819E+00, 0.1423426E+00, 0.1161405E+00, 0.1161405E+00 /
      data (ref_adm(19,iz,24, 7),iz = 1,20) / &
     & 0.2263113E+00, 0.2263113E+00, 0.2222615E+00, 0.2208586E+00, &
     & 0.2197497E+00, 0.2189913E+00, 0.2176546E+00, 0.2153772E+00, &
     & 0.2124521E+00, 0.2089495E+00, 0.2051400E+00, 0.1998511E+00, &
     & 0.1936779E+00, 0.1878648E+00, 0.1795168E+00, 0.1685235E+00, &
     & 0.1571819E+00, 0.1423426E+00, 0.1161405E+00, 0.1161405E+00 /
      data (ref_adm(19,iz,25, 7),iz = 1,20) / &
     & 0.2263113E+00, 0.2263113E+00, 0.2222615E+00, 0.2208586E+00, &
     & 0.2197497E+00, 0.2189913E+00, 0.2176546E+00, 0.2153772E+00, &
     & 0.2124521E+00, 0.2089495E+00, 0.2051400E+00, 0.1998511E+00, &
     & 0.1936779E+00, 0.1878648E+00, 0.1795168E+00, 0.1685235E+00, &
     & 0.1571819E+00, 0.1423426E+00, 0.1161405E+00, 0.1161405E+00 /
      data (ref_adm(19,iz,26, 7),iz = 1,20) / &
     & 0.2263113E+00, 0.2263113E+00, 0.2222615E+00, 0.2208586E+00, &
     & 0.2197497E+00, 0.2189913E+00, 0.2176546E+00, 0.2153772E+00, &
     & 0.2124521E+00, 0.2089495E+00, 0.2051400E+00, 0.1998511E+00, &
     & 0.1936779E+00, 0.1878648E+00, 0.1795168E+00, 0.1685235E+00, &
     & 0.1571819E+00, 0.1423426E+00, 0.1161405E+00, 0.1161405E+00 /
      data (ref_adm(19,iz,27, 7),iz = 1,20) / &
     & 0.2263113E+00, 0.2263113E+00, 0.2222615E+00, 0.2208586E+00, &
     & 0.2197497E+00, 0.2189913E+00, 0.2176546E+00, 0.2153772E+00, &
     & 0.2124521E+00, 0.2089495E+00, 0.2051400E+00, 0.1998511E+00, &
     & 0.1936779E+00, 0.1878648E+00, 0.1795168E+00, 0.1685235E+00, &
     & 0.1571819E+00, 0.1423426E+00, 0.1161405E+00, 0.1161405E+00 /
      data (ref_adm(19,iz,28, 7),iz = 1,20) / &
     & 0.2263113E+00, 0.2263113E+00, 0.2222615E+00, 0.2208586E+00, &
     & 0.2197497E+00, 0.2189913E+00, 0.2176546E+00, 0.2153772E+00, &
     & 0.2124521E+00, 0.2089495E+00, 0.2051400E+00, 0.1998511E+00, &
     & 0.1936779E+00, 0.1878648E+00, 0.1795168E+00, 0.1685235E+00, &
     & 0.1571819E+00, 0.1423426E+00, 0.1161405E+00, 0.1161405E+00 /
      data (ref_adm(19,iz,29, 7),iz = 1,20) / &
     & 0.2263113E+00, 0.2263113E+00, 0.2222615E+00, 0.2208586E+00, &
     & 0.2197497E+00, 0.2189913E+00, 0.2176546E+00, 0.2153772E+00, &
     & 0.2124521E+00, 0.2089495E+00, 0.2051400E+00, 0.1998511E+00, &
     & 0.1936779E+00, 0.1878648E+00, 0.1795168E+00, 0.1685235E+00, &
     & 0.1571819E+00, 0.1423426E+00, 0.1161405E+00, 0.1161405E+00 /
      data (ref_adm(19,iz,30, 7),iz = 1,20) / &
     & 0.2263113E+00, 0.2263113E+00, 0.2222615E+00, 0.2208586E+00, &
     & 0.2197497E+00, 0.2189913E+00, 0.2176546E+00, 0.2153772E+00, &
     & 0.2124521E+00, 0.2089495E+00, 0.2051400E+00, 0.1998511E+00, &
     & 0.1936779E+00, 0.1878648E+00, 0.1795168E+00, 0.1685235E+00, &
     & 0.1571819E+00, 0.1423426E+00, 0.1161405E+00, 0.1161405E+00 /
      data (ref_adm(19,iz,31, 7),iz = 1,20) / &
     & 0.2263113E+00, 0.2263113E+00, 0.2222615E+00, 0.2208586E+00, &
     & 0.2197497E+00, 0.2189913E+00, 0.2176546E+00, 0.2153772E+00, &
     & 0.2124521E+00, 0.2089495E+00, 0.2051400E+00, 0.1998511E+00, &
     & 0.1936779E+00, 0.1878648E+00, 0.1795168E+00, 0.1685235E+00, &
     & 0.1571819E+00, 0.1423426E+00, 0.1161405E+00, 0.1161405E+00 /
      data (ref_adm(19,iz,32, 7),iz = 1,20) / &
     & 0.2263113E+00, 0.2263113E+00, 0.2222615E+00, 0.2208586E+00, &
     & 0.2197497E+00, 0.2189913E+00, 0.2176546E+00, 0.2153772E+00, &
     & 0.2124521E+00, 0.2089495E+00, 0.2051400E+00, 0.1998511E+00, &
     & 0.1936779E+00, 0.1878648E+00, 0.1795168E+00, 0.1685235E+00, &
     & 0.1571819E+00, 0.1423426E+00, 0.1161405E+00, 0.1161405E+00 /
      data (ref_adm(19,iz,33, 7),iz = 1,20) / &
     & 0.2263113E+00, 0.2263113E+00, 0.2222615E+00, 0.2208586E+00, &
     & 0.2197497E+00, 0.2189913E+00, 0.2176546E+00, 0.2153772E+00, &
     & 0.2124521E+00, 0.2089495E+00, 0.2051400E+00, 0.1998511E+00, &
     & 0.1936779E+00, 0.1878648E+00, 0.1795168E+00, 0.1685235E+00, &
     & 0.1571819E+00, 0.1423426E+00, 0.1161405E+00, 0.1161405E+00 /
      data (ref_adm(19,iz,34, 7),iz = 1,20) / &
     & 0.2263113E+00, 0.2263113E+00, 0.2222615E+00, 0.2208586E+00, &
     & 0.2197497E+00, 0.2189913E+00, 0.2176546E+00, 0.2153772E+00, &
     & 0.2124521E+00, 0.2089495E+00, 0.2051400E+00, 0.1998511E+00, &
     & 0.1936779E+00, 0.1878648E+00, 0.1795168E+00, 0.1685235E+00, &
     & 0.1571819E+00, 0.1423426E+00, 0.1161405E+00, 0.1161405E+00 /
      data (ref_adm(19,iz,35, 7),iz = 1,20) / &
     & 0.2263113E+00, 0.2263113E+00, 0.2222615E+00, 0.2208586E+00, &
     & 0.2197497E+00, 0.2189913E+00, 0.2176546E+00, 0.2153772E+00, &
     & 0.2124521E+00, 0.2089495E+00, 0.2051400E+00, 0.1998511E+00, &
     & 0.1936779E+00, 0.1878648E+00, 0.1795168E+00, 0.1685235E+00, &
     & 0.1571819E+00, 0.1423426E+00, 0.1161405E+00, 0.1161405E+00 /
      data (ref_adm(19,iz,36, 7),iz = 1,20) / &
     & 0.2263113E+00, 0.2263113E+00, 0.2222615E+00, 0.2208586E+00, &
     & 0.2197497E+00, 0.2189913E+00, 0.2176546E+00, 0.2153772E+00, &
     & 0.2124521E+00, 0.2089495E+00, 0.2051400E+00, 0.1998511E+00, &
     & 0.1936779E+00, 0.1878648E+00, 0.1795168E+00, 0.1685235E+00, &
     & 0.1571819E+00, 0.1423426E+00, 0.1161405E+00, 0.1161405E+00 /
      data (ref_adm(19,iz,37, 7),iz = 1,20) / &
     & 0.2263113E+00, 0.2263113E+00, 0.2222615E+00, 0.2208586E+00, &
     & 0.2197497E+00, 0.2189913E+00, 0.2176546E+00, 0.2153772E+00, &
     & 0.2124521E+00, 0.2089495E+00, 0.2051400E+00, 0.1998511E+00, &
     & 0.1936779E+00, 0.1878648E+00, 0.1795168E+00, 0.1685235E+00, &
     & 0.1571819E+00, 0.1423426E+00, 0.1161405E+00, 0.1161405E+00 /
      data (ref_adm(19,iz,38, 7),iz = 1,20) / &
     & 0.2263113E+00, 0.2263113E+00, 0.2222615E+00, 0.2208586E+00, &
     & 0.2197497E+00, 0.2189913E+00, 0.2176546E+00, 0.2153772E+00, &
     & 0.2124521E+00, 0.2089495E+00, 0.2051400E+00, 0.1998511E+00, &
     & 0.1936779E+00, 0.1878648E+00, 0.1795168E+00, 0.1685235E+00, &
     & 0.1571819E+00, 0.1423426E+00, 0.1161405E+00, 0.1161405E+00 /
! Solar Zenith Angle 35.0 Albedo -0.4448191E+04
      data (ref_adm(19,iz, 1, 8),iz = 1,20) / &
     & 0.1737368E+00, 0.1737368E+00, 0.1706277E+00, 0.1695507E+00, &
     & 0.1686995E+00, 0.1681173E+00, 0.1670911E+00, 0.1653428E+00, &
     & 0.1630972E+00, 0.1604083E+00, 0.1574838E+00, 0.1534235E+00, &
     & 0.1486844E+00, 0.1442218E+00, 0.1378131E+00, 0.1293736E+00, &
     & 0.1206669E+00, 0.1092749E+00, 0.8915983E-01, 0.8915983E-01 /
      data (ref_adm(19,iz, 2, 8),iz = 1,20) / &
     & 0.1737368E+00, 0.1737368E+00, 0.1706277E+00, 0.1695507E+00, &
     & 0.1686995E+00, 0.1681173E+00, 0.1670911E+00, 0.1653428E+00, &
     & 0.1630972E+00, 0.1604083E+00, 0.1574838E+00, 0.1534235E+00, &
     & 0.1486844E+00, 0.1442218E+00, 0.1378131E+00, 0.1293736E+00, &
     & 0.1206669E+00, 0.1092749E+00, 0.8915983E-01, 0.8915983E-01 /
      data (ref_adm(19,iz, 3, 8),iz = 1,20) / &
     & 0.1737368E+00, 0.1737368E+00, 0.1706277E+00, 0.1695508E+00, &
     & 0.1686995E+00, 0.1681173E+00, 0.1670911E+00, 0.1653427E+00, &
     & 0.1630972E+00, 0.1604083E+00, 0.1574838E+00, 0.1534235E+00, &
     & 0.1486844E+00, 0.1442218E+00, 0.1378131E+00, 0.1293736E+00, &
     & 0.1206669E+00, 0.1092749E+00, 0.8915983E-01, 0.8915983E-01 /
      data (ref_adm(19,iz, 4, 8),iz = 1,20) / &
     & 0.1737368E+00, 0.1737368E+00, 0.1706277E+00, 0.1695507E+00, &
     & 0.1686995E+00, 0.1681173E+00, 0.1670911E+00, 0.1653428E+00, &
     & 0.1630972E+00, 0.1604083E+00, 0.1574838E+00, 0.1534235E+00, &
     & 0.1486844E+00, 0.1442218E+00, 0.1378131E+00, 0.1293736E+00, &
     & 0.1206669E+00, 0.1092749E+00, 0.8915983E-01, 0.8915983E-01 /
      data (ref_adm(19,iz, 5, 8),iz = 1,20) / &
     & 0.1737368E+00, 0.1737368E+00, 0.1706277E+00, 0.1695508E+00, &
     & 0.1686995E+00, 0.1681173E+00, 0.1670911E+00, 0.1653427E+00, &
     & 0.1630972E+00, 0.1604083E+00, 0.1574838E+00, 0.1534235E+00, &
     & 0.1486844E+00, 0.1442218E+00, 0.1378131E+00, 0.1293736E+00, &
     & 0.1206669E+00, 0.1092749E+00, 0.8915983E-01, 0.8915983E-01 /
      data (ref_adm(19,iz, 6, 8),iz = 1,20) / &
     & 0.1737368E+00, 0.1737368E+00, 0.1706277E+00, 0.1695507E+00, &
     & 0.1686995E+00, 0.1681173E+00, 0.1670911E+00, 0.1653428E+00, &
     & 0.1630972E+00, 0.1604083E+00, 0.1574838E+00, 0.1534235E+00, &
     & 0.1486844E+00, 0.1442218E+00, 0.1378131E+00, 0.1293736E+00, &
     & 0.1206669E+00, 0.1092749E+00, 0.8915983E-01, 0.8915983E-01 /
      data (ref_adm(19,iz, 7, 8),iz = 1,20) / &
     & 0.1737368E+00, 0.1737368E+00, 0.1706277E+00, 0.1695508E+00, &
     & 0.1686995E+00, 0.1681173E+00, 0.1670911E+00, 0.1653427E+00, &
     & 0.1630972E+00, 0.1604083E+00, 0.1574838E+00, 0.1534235E+00, &
     & 0.1486844E+00, 0.1475200E+00, 0.1378131E+00, 0.1293736E+00, &
     & 0.1206669E+00, 0.1092749E+00, 0.8915983E-01, 0.8915983E-01 /
      data (ref_adm(19,iz, 8, 8),iz = 1,20) / &
     & 0.1737368E+00, 0.1737368E+00, 0.1706277E+00, 0.1695507E+00, &
     & 0.1686995E+00, 0.1681173E+00, 0.1670911E+00, 0.1653428E+00, &
     & 0.1630972E+00, 0.1604083E+00, 0.1574838E+00, 0.1534235E+00, &
     & 0.1486844E+00, 0.1442218E+00, 0.1378131E+00, 0.1293736E+00, &
     & 0.1206669E+00, 0.1092749E+00, 0.8915983E-01, 0.8915983E-01 /
      data (ref_adm(19,iz, 9, 8),iz = 1,20) / &
     & 0.1737368E+00, 0.1737368E+00, 0.1706277E+00, 0.1695508E+00, &
     & 0.1686995E+00, 0.1681173E+00, 0.1670911E+00, 0.1653427E+00, &
     & 0.1630972E+00, 0.1604083E+00, 0.1574838E+00, 0.1534235E+00, &
     & 0.1486844E+00, 0.1442218E+00, 0.1378131E+00, 0.1293736E+00, &
     & 0.1206669E+00, 0.1092749E+00, 0.8915983E-01, 0.8915983E-01 /
      data (ref_adm(19,iz,10, 8),iz = 1,20) / &
     & 0.1737368E+00, 0.1737368E+00, 0.1706277E+00, 0.1695507E+00, &
     & 0.1686995E+00, 0.1681173E+00, 0.1670911E+00, 0.1653428E+00, &
     & 0.1630972E+00, 0.1604083E+00, 0.1574838E+00, 0.1534235E+00, &
     & 0.1486844E+00, 0.1442218E+00, 0.1378131E+00, 0.1293736E+00, &
     & 0.1206669E+00, 0.1092749E+00, 0.8915983E-01, 0.8915983E-01 /
      data (ref_adm(19,iz,11, 8),iz = 1,20) / &
     & 0.1737368E+00, 0.1737368E+00, 0.1706277E+00, 0.1695508E+00, &
     & 0.1686995E+00, 0.1681173E+00, 0.1670911E+00, 0.1653427E+00, &
     & 0.1630972E+00, 0.1604083E+00, 0.1574838E+00, 0.1534235E+00, &
     & 0.1486844E+00, 0.1442218E+00, 0.1378131E+00, 0.1293736E+00, &
     & 0.1206669E+00, 0.1092749E+00, 0.8915983E-01, 0.8915983E-01 /
      data (ref_adm(19,iz,12, 8),iz = 1,20) / &
     & 0.1737368E+00, 0.1737368E+00, 0.1706277E+00, 0.1695507E+00, &
     & 0.1686995E+00, 0.1681173E+00, 0.1670911E+00, 0.1653428E+00, &
     & 0.1630972E+00, 0.1604083E+00, 0.1574838E+00, 0.1534235E+00, &
     & 0.1486844E+00, 0.1442218E+00, 0.1378131E+00, 0.1293736E+00, &
     & 0.1206669E+00, 0.1092749E+00, 0.8915983E-01, 0.8915983E-01 /
      data (ref_adm(19,iz,13, 8),iz = 1,20) / &
     & 0.1737368E+00, 0.1737368E+00, 0.1706277E+00, 0.1695508E+00, &
     & 0.1686995E+00, 0.1681173E+00, 0.1670911E+00, 0.1653427E+00, &
     & 0.1630972E+00, 0.1504100E+00, 0.1574838E+00, 0.1534235E+00, &
     & 0.1352500E+00, 0.1442218E+00, 0.1378131E+00, 0.1293736E+00, &
     & 0.1206669E+00, 0.1092749E+00, 0.8915983E-01, 0.8915983E-01 /
      data (ref_adm(19,iz,14, 8),iz = 1,20) / &
     & 0.1737368E+00, 0.1737368E+00, 0.1706277E+00, 0.1695507E+00, &
     & 0.1686995E+00, 0.1681173E+00, 0.1670911E+00, 0.1653428E+00, &
     & 0.1630972E+00, 0.1604083E+00, 0.1686100E+00, 0.1534235E+00, &
     & 0.1621000E+00, 0.1442218E+00, 0.1378131E+00, 0.1293736E+00, &
     & 0.1206669E+00, 0.1092749E+00, 0.8915983E-01, 0.8915983E-01 /
      data (ref_adm(19,iz,15, 8),iz = 1,20) / &
     & 0.1737368E+00, 0.1737368E+00, 0.1706277E+00, 0.1695508E+00, &
     & 0.1813300E+00, 0.1681173E+00, 0.1670911E+00, 0.1653427E+00, &
     & 0.1630972E+00, 0.1604083E+00, 0.1574838E+00, 0.1534235E+00, &
     & 0.1486844E+00, 0.1442218E+00, 0.1378131E+00, 0.1293736E+00, &
     & 0.1206669E+00, 0.1092749E+00, 0.8915983E-01, 0.8915983E-01 /
      data (ref_adm(19,iz,16, 8),iz = 1,20) / &
     & 0.1737368E+00, 0.1737368E+00, 0.1706277E+00, 0.1695507E+00, &
     & 0.1686995E+00, 0.1681173E+00, 0.1670911E+00, 0.1653428E+00, &
     & 0.1630972E+00, 0.1604083E+00, 0.1574838E+00, 0.1534235E+00, &
     & 0.1486844E+00, 0.1442218E+00, 0.1378131E+00, 0.1293736E+00, &
     & 0.1206669E+00, 0.1092749E+00, 0.8915983E-01, 0.8915983E-01 /
      data (ref_adm(19,iz,17, 8),iz = 1,20) / &
     & 0.1737368E+00, 0.1737368E+00, 0.1706277E+00, 0.1695508E+00, &
     & 0.1686995E+00, 0.1681173E+00, 0.1670911E+00, 0.1653427E+00, &
     & 0.1458200E+00, 0.1604083E+00, 0.1574838E+00, 0.1534235E+00, &
     & 0.1486844E+00, 0.1442218E+00, 0.1378131E+00, 0.1293736E+00, &
     & 0.1206669E+00, 0.1092749E+00, 0.8915983E-01, 0.8915983E-01 /
      data (ref_adm(19,iz,18, 8),iz = 1,20) / &
     & 0.1501100E+00, 0.1501100E+00, 0.1496793E+00, 0.1497894E+00, &
     & 0.1503396E+00, 0.1514224E+00, 0.1531306E+00, 0.1555181E+00, &
     & 0.1586067E+00, 0.1626187E+00, 0.1675905E+00, 0.1754301E+00, &
     & 0.1847565E+00, 0.1935551E+00, 0.2061024E+00, 0.2229532E+00, &
     & 0.2412709E+00, 0.2650006E+00, 0.2799583E+00, 0.2799583E+00 /
      data (ref_adm(19,iz,19, 8),iz = 1,20) / &
     & 0.1502694E+00, 0.1502694E+00, 0.1503299E+00, 0.1507806E+00, &
     & 0.1515987E+00, 0.1529407E+00, 0.1548068E+00, 0.1573151E+00, &
     & 0.1604700E+00, 0.1644424E+00, 0.1693440E+00, 0.1769150E+00, &
     & 0.1860714E+00, 0.1945701E+00, 0.2066548E+00, 0.2229053E+00, &
     & 0.2405208E+00, 0.2631280E+00, 0.2760028E+00, 0.2760028E+00 /
      data (ref_adm(19,iz,20, 8),iz = 1,20) / &
     & 0.1504480E+00, 0.1504480E+00, 0.1510046E+00, 0.1518048E+00, &
     & 0.1529472E+00, 0.1545384E+00, 0.1566463E+00, 0.1592836E+00, &
     & 0.1625897E+00, 0.1665995E+00, 0.1714057E+00, 0.1788066E+00, &
     & 0.1877529E+00, 0.1960973E+00, 0.2077591E+00, 0.2235249E+00, &
     & 0.2404072E+00, 0.2618496E+00, 0.2737237E+00, 0.2737237E+00 /
      data (ref_adm(19,iz,21, 8),iz = 1,20) / &
     & 0.1506253E+00, 0.1506253E+00, 0.1516717E+00, 0.1528879E+00, &
     & 0.1544138E+00, 0.1562825E+00, 0.1586233E+00, 0.1614563E+00, &
     & 0.1648937E+00, 0.1690020E+00, 0.1738620E+00, 0.1811413E+00, &
     & 0.1898428E+00, 0.1820100E+00, 0.2093670E+00, 0.2244821E+00, &
     & 0.2407954E+00, 0.2610157E+00, 0.2721370E+00, 0.2721370E+00 /
      data (ref_adm(19,iz,22, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,23, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,24, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,25, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,26, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,27, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,28, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,29, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,30, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,31, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,32, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,33, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,34, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,35, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,36, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,37, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(19,iz,38, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 40.0 Albedo  0.1695550E+00
      data (ref_adm(19,iz, 1, 9),iz = 1,20) / &
     & 0.1742324E+00, 0.1742324E+00, 0.1629924E+00, 0.1591170E+00, &
     & 0.1434600E+00, 0.1551064E+00, 0.2038200E+00, 0.1522723E+00, &
     & 0.1515518E+00, 0.1515068E+00, 0.1491500E+00, 0.1512000E+00, &
     & 0.1581452E+00, 0.1619608E+00, 0.1678331E+00, 0.2033000E+00, &
     & 0.1857068E+00, 0.1981045E+00, 0.2047031E+00, 0.2047031E+00 /
      data (ref_adm(19,iz, 2, 9),iz = 1,20) / &
     & 0.1742324E+00, 0.1742324E+00, 0.1629924E+00, 0.1591170E+00, &
     & 0.1434600E+00, 0.1551064E+00, 0.2038200E+00, 0.1522723E+00, &
     & 0.1515518E+00, 0.1515068E+00, 0.1491500E+00, 0.1512000E+00, &
     & 0.1581452E+00, 0.1619608E+00, 0.1678331E+00, 0.2033000E+00, &
     & 0.1857068E+00, 0.1981045E+00, 0.2047031E+00, 0.2047031E+00 /
      data (ref_adm(19,iz, 3, 9),iz = 1,20) / &
     & 0.1742324E+00, 0.1742324E+00, 0.1629924E+00, 0.1591170E+00, &
     & 0.1565010E+00, 0.1551064E+00, 0.1537168E+00, 0.1522723E+00, &
     & 0.1515518E+00, 0.1515068E+00, 0.1451200E+00, 0.1546663E+00, &
     & 0.1581452E+00, 0.1619608E+00, 0.1678331E+00, 0.1761934E+00, &
     & 0.1857068E+00, 0.1981045E+00, 0.3164977E-08, 0.3164977E-08 /
      data (ref_adm(19,iz, 4, 9),iz = 1,20) / &
     & 0.1742324E+00, 0.1742324E+00, 0.1594800E+00, 0.1591170E+00, &
     & 0.1565010E+00, 0.1551064E+00, 0.1537168E+00, 0.1522723E+00, &
     & 0.1515518E+00, 0.1515068E+00, 0.1523584E+00, 0.1546663E+00, &
     & 0.1581452E+00, 0.1619608E+00, 0.1678331E+00, 0.1761934E+00, &
     & 0.1857068E+00, 0.1981045E+00, 0.2047031E+00, 0.2047031E+00 /
      data (ref_adm(19,iz, 5, 9),iz = 1,20) / &
     & 0.1742324E+00, 0.1742324E+00, 0.1629924E+00, 0.2333000E+00, &
     & 0.1565010E+00, 0.1551064E+00, 0.1537168E+00, 0.1522723E+00, &
     & 0.1515518E+00, 0.1515068E+00, 0.1523584E+00, 0.1546663E+00, &
     & 0.1581452E+00, 0.1619608E+00, 0.1678331E+00, 0.1761934E+00, &
     & 0.1857068E+00, 0.1981045E+00, 0.2047031E+00, 0.2047031E+00 /
      data (ref_adm(19,iz, 6, 9),iz = 1,20) / &
     & 0.1742324E+00, 0.1742324E+00, 0.1629924E+00, 0.1591170E+00, &
     & 0.1565010E+00, 0.1551064E+00, 0.1537168E+00, 0.1522723E+00, &
     & 0.1515518E+00, 0.1515068E+00, 0.1523584E+00, 0.1546663E+00, &
     & 0.1581452E+00, 0.1619608E+00, 0.1678331E+00, 0.1761934E+00, &
     & 0.1857068E+00, 0.1981045E+00, 0.2047031E+00, 0.2047031E+00 /
      data (ref_adm(19,iz, 7, 9),iz = 1,20) / &
     & 0.1742324E+00, 0.1742324E+00, 0.1629924E+00, 0.1591170E+00, &
     & 0.1565010E+00, 0.1551064E+00, 0.1537168E+00, 0.1522723E+00, &
     & 0.1515518E+00, 0.1515068E+00, 0.1523584E+00, 0.1546663E+00, &
     & 0.1581452E+00, 0.1434500E+00, 0.1678331E+00, 0.1761934E+00, &
     & 0.1857068E+00, 0.1981045E+00, 0.2047031E+00, 0.2047031E+00 /
      data (ref_adm(19,iz, 8, 9),iz = 1,20) / &
     & 0.1742324E+00, 0.1742324E+00, 0.1629924E+00, 0.1591170E+00, &
     & 0.1565010E+00, 0.1551064E+00, 0.1537168E+00, 0.1522723E+00, &
     & 0.1515518E+00, 0.1515068E+00, 0.1523584E+00, 0.1546663E+00, &
     & 0.1581452E+00, 0.1619608E+00, 0.1678331E+00, 0.1761934E+00, &
     & 0.1857068E+00, 0.1981045E+00, 0.2047031E+00, 0.2047031E+00 /
      data (ref_adm(19,iz, 9, 9),iz = 1,20) / &
     & 0.1742324E+00, 0.1742324E+00, 0.1629924E+00, 0.1591170E+00, &
     & 0.1565010E+00, 0.1551064E+00, 0.1537168E+00, 0.1522723E+00, &
     & 0.1515518E+00, 0.1515068E+00, 0.1523584E+00, 0.1546663E+00, &
     & 0.1581452E+00, 0.1619608E+00, 0.1678331E+00, 0.1761934E+00, &
     & 0.1857068E+00, 0.1981045E+00, 0.2047031E+00, 0.2047031E+00 /
      data (ref_adm(19,iz,10, 9),iz = 1,20) / &
     & 0.1445900E+00, 0.1445900E+00, 0.1629924E+00, 0.1591170E+00, &
     & 0.1565010E+00, 0.1551064E+00, 0.1537168E+00, 0.1522723E+00, &
     & 0.1218700E+00, 0.1515068E+00, 0.1523584E+00, 0.1546663E+00, &
     & 0.1581452E+00, 0.1619608E+00, 0.1678331E+00, 0.1761934E+00, &
     & 0.1857068E+00, 0.1981045E+00, 0.2047031E+00, 0.2047031E+00 /
      data (ref_adm(19,iz,11, 9),iz = 1,20) / &
     & 0.2308500E+00, 0.2308500E+00, 0.1629924E+00, 0.1591170E+00, &
     & 0.1565010E+00, 0.1551064E+00, 0.1537168E+00, 0.1522723E+00, &
     & 0.1515518E+00, 0.1515068E+00, 0.1523584E+00, 0.1546663E+00, &
     & 0.1581452E+00, 0.1619608E+00, 0.1678331E+00, 0.1761934E+00, &
     & 0.1857068E+00, 0.1981045E+00, 0.2047031E+00, 0.2047031E+00 /
      data (ref_adm(19,iz,12, 9),iz = 1,20) / &
     & 0.1692200E+00, 0.1692200E+00, 0.1629924E+00, 0.1513600E+00, &
     & 0.1565010E+00, 0.1551064E+00, 0.1537168E+00, 0.1522723E+00, &
     & 0.1515518E+00, 0.1515068E+00, 0.1523584E+00, 0.1546663E+00, &
     & 0.1581452E+00, 0.1619608E+00, 0.1678331E+00, 0.1761934E+00, &
     & 0.1857068E+00, 0.1981045E+00, 0.2047031E+00, 0.2047031E+00 /
      data (ref_adm(19,iz,13, 9),iz = 1,20) / &
     & 0.1532500E+00, 0.1532500E+00, 0.1605300E+00, 0.1591170E+00, &
     & 0.1385900E+00, 0.1557000E+00, 0.1396900E+00, 0.1555800E+00, &
     & 0.1515518E+00, 0.1515068E+00, 0.1597100E+00, 0.1546663E+00, &
     & 0.1510000E+00, 0.1442800E+00, 0.1678331E+00, 0.1761934E+00, &
     & 0.1857068E+00, 0.1981045E+00, 0.2047031E+00, 0.2047031E+00 /
      data (ref_adm(19,iz,14, 9),iz = 1,20) / &
     & 0.1742324E+00, 0.1742324E+00, 0.1526100E+00, 0.1390300E+00, &
     & 0.1565010E+00, 0.1603300E+00, 0.1439300E+00, 0.1496300E+00, &
     & 0.1445200E+00, 0.1515068E+00, 0.1521400E+00, 0.1488200E+00, &
     & 0.1581452E+00, 0.1435200E+00, 0.1678331E+00, 0.1761934E+00, &
     & 0.1857068E+00, 0.1981045E+00, 0.2047031E+00, 0.2047031E+00 /
      data (ref_adm(19,iz,15, 9),iz = 1,20) / &
     & 0.1742324E+00, 0.1742324E+00, 0.1629924E+00, 0.1591170E+00, &
     & 0.1565010E+00, 0.1551064E+00, 0.1537168E+00, 0.1522723E+00, &
     & 0.1515518E+00, 0.1515068E+00, 0.1523584E+00, 0.1546663E+00, &
     & 0.1581452E+00, 0.1934000E+00, 0.1678331E+00, 0.1761934E+00, &
     & 0.1857068E+00, 0.1981045E+00, 0.2047031E+00, 0.2047031E+00 /
      data (ref_adm(19,iz,16, 9),iz = 1,20) / &
     & 0.1742324E+00, 0.1742324E+00, 0.1629924E+00, 0.1591170E+00, &
     & 0.1565010E+00, 0.1551064E+00, 0.1537168E+00, 0.1522723E+00, &
     & 0.1515518E+00, 0.1515068E+00, 0.1523584E+00, 0.1546663E+00, &
     & 0.1581452E+00, 0.1857900E+00, 0.1678331E+00, 0.1761934E+00, &
     & 0.1857068E+00, 0.1981045E+00, 0.2047031E+00, 0.2047031E+00 /
      data (ref_adm(19,iz,17, 9),iz = 1,20) / &
     & 0.1742324E+00, 0.1742324E+00, 0.1629924E+00, 0.1591170E+00, &
     & 0.1565010E+00, 0.1551064E+00, 0.1537168E+00, 0.1522723E+00, &
     & 0.1515518E+00, 0.1515068E+00, 0.1523584E+00, 0.1546663E+00, &
     & 0.1581452E+00, 0.1619608E+00, 0.1678331E+00, 0.1761934E+00, &
     & 0.1857068E+00, 0.1981045E+00, 0.2047031E+00, 0.2047031E+00 /
      data (ref_adm(19,iz,18, 9),iz = 1,20) / &
     & 0.1630000E+00, 0.1630000E+00, 0.1517115E+00, 0.1518230E+00, &
     & 0.1523807E+00, 0.1534782E+00, 0.1552096E+00, 0.1576295E+00, &
     & 0.1607601E+00, 0.1648265E+00, 0.1698658E+00, 0.1778119E+00, &
     & 0.1872649E+00, 0.1961830E+00, 0.2089006E+00, 0.2259802E+00, &
     & 0.2445466E+00, 0.2685984E+00, 0.2837592E+00, 0.2837592E+00 /
      data (ref_adm(19,iz,19, 9),iz = 1,20) / &
     & 0.1523096E+00, 0.1523096E+00, 0.1523708E+00, 0.1528277E+00, &
     & 0.1536569E+00, 0.1546900E+00, 0.1569085E+00, 0.1594509E+00, &
     & 0.1626487E+00, 0.1666749E+00, 0.1716431E+00, 0.1793170E+00, &
     & 0.1885977E+00, 0.1972118E+00, 0.2094605E+00, 0.2259316E+00, &
     & 0.2437864E+00, 0.2667005E+00, 0.2797500E+00, 0.2797500E+00 /
      data (ref_adm(19,iz,20, 9),iz = 1,20) / &
     & 0.1524906E+00, 0.1524906E+00, 0.1530547E+00, 0.1538658E+00, &
     & 0.1550237E+00, 0.1566365E+00, 0.1587730E+00, 0.1614462E+00, &
     & 0.1647971E+00, 0.1688613E+00, 0.1737329E+00, 0.1812342E+00, &
     & 0.1903019E+00, 0.1987597E+00, 0.2105798E+00, 0.2265596E+00, &
     & 0.2436711E+00, 0.2654046E+00, 0.2774400E+00, 0.2774400E+00 /
      data (ref_adm(19,iz,21, 9),iz = 1,20) / &
     & 0.1526703E+00, 0.1526703E+00, 0.1537309E+00, 0.1549636E+00, &
     & 0.1843000E+00, 0.1753800E+00, 0.1607769E+00, 0.1636484E+00, &
     & 0.1671324E+00, 0.1712965E+00, 0.1762225E+00, 0.1836006E+00, &
     & 0.1924203E+00, 0.2005410E+00, 0.1864300E+00, 0.2275299E+00, &
     & 0.2440646E+00, 0.2645594E+00, 0.2758317E+00, 0.2758317E+00 /
      data (ref_adm(19,iz,22, 9),iz = 1,20) / &
     & 0.1991207E+00, 0.1991207E+00, 0.1955574E+00, 0.1850400E+00, &
     & 0.1933474E+00, 0.1926801E+00, 0.1915040E+00, 0.1895003E+00, &
     & 0.1869266E+00, 0.1838449E+00, 0.2056100E+00, 0.1758396E+00, &
     & 0.1704081E+00, 0.1652934E+00, 0.1579484E+00, 0.1482759E+00, &
     & 0.1382969E+00, 0.1252406E+00, 0.1021866E+00, 0.1021866E+00 /
      data (ref_adm(19,iz,23, 9),iz = 1,20) / &
     & 0.1991207E+00, 0.1991207E+00, 0.1955574E+00, 0.1943231E+00, &
     & 0.1933474E+00, 0.1926801E+00, 0.1915040E+00, 0.1895003E+00, &
     & 0.1869266E+00, 0.1838449E+00, 0.1804930E+00, 0.1758396E+00, &
     & 0.1704081E+00, 0.1652934E+00, 0.1579484E+00, 0.1482759E+00, &
     & 0.1382969E+00, 0.1252406E+00, 0.1021866E+00, 0.1021866E+00 /
      data (ref_adm(19,iz,24, 9),iz = 1,20) / &
     & 0.1991207E+00, 0.1991207E+00, 0.1955574E+00, 0.1943231E+00, &
     & 0.1933474E+00, 0.1926801E+00, 0.1915040E+00, 0.1895003E+00, &
     & 0.1869266E+00, 0.1838449E+00, 0.1804930E+00, 0.1758396E+00, &
     & 0.1704081E+00, 0.1652934E+00, 0.1579484E+00, 0.1482759E+00, &
     & 0.1382969E+00, 0.1252406E+00, 0.1021866E+00, 0.1021866E+00 /
      data (ref_adm(19,iz,25, 9),iz = 1,20) / &
     & 0.1991207E+00, 0.1991207E+00, 0.1955574E+00, 0.1505100E+00, &
     & 0.1848000E+00, 0.1926801E+00, 0.1915040E+00, 0.1895003E+00, &
     & 0.1869266E+00, 0.1838449E+00, 0.1804930E+00, 0.1758396E+00, &
     & 0.1704081E+00, 0.1652934E+00, 0.1579484E+00, 0.1482759E+00, &
     & 0.1382969E+00, 0.1252406E+00, 0.1021866E+00, 0.1021866E+00 /
      data (ref_adm(19,iz,26, 9),iz = 1,20) / &
     & 0.1991207E+00, 0.1991207E+00, 0.1955574E+00, 0.1943231E+00, &
     & 0.1933474E+00, 0.1865400E+00, 0.2005400E+00, 0.1895003E+00, &
     & 0.1869266E+00, 0.1838449E+00, 0.1804930E+00, 0.1758396E+00, &
     & 0.1704081E+00, 0.1652934E+00, 0.1579484E+00, 0.1482759E+00, &
     & 0.1382969E+00, 0.1252406E+00, 0.1021866E+00, 0.1021866E+00 /
      data (ref_adm(19,iz,27, 9),iz = 1,20) / &
     & 0.1991207E+00, 0.1991207E+00, 0.1809500E+00, 0.1943231E+00, &
     & 0.2717100E+00, 0.1790900E+00, 0.1875900E+00, 0.1895003E+00, &
     & 0.1869266E+00, 0.1838449E+00, 0.1804930E+00, 0.1758396E+00, &
     & 0.1704081E+00, 0.1652934E+00, 0.1579484E+00, 0.1482759E+00, &
     & 0.1382969E+00, 0.1252406E+00, 0.1021866E+00, 0.1021866E+00 /
      data (ref_adm(19,iz,28, 9),iz = 1,20) / &
     & 0.1991207E+00, 0.1991207E+00, 0.1436800E+00, 0.1852600E+00, &
     & 0.1898700E+00, 0.1926801E+00, 0.1915040E+00, 0.1895003E+00, &
     & 0.1869266E+00, 0.1838449E+00, 0.1804930E+00, 0.1758396E+00, &
     & 0.1704081E+00, 0.1652934E+00, 0.1579484E+00, 0.1482759E+00, &
     & 0.1382969E+00, 0.1252406E+00, 0.1021866E+00, 0.1021866E+00 /
      data (ref_adm(19,iz,29, 9),iz = 1,20) / &
     & 0.1991207E+00, 0.1991207E+00, 0.1955574E+00, 0.1943231E+00, &
     & 0.1933474E+00, 0.1926801E+00, 0.1932700E+00, 0.1564600E+00, &
     & 0.2073100E+00, 0.1838449E+00, 0.1804930E+00, 0.1758396E+00, &
     & 0.1704081E+00, 0.1652934E+00, 0.1579484E+00, 0.1482759E+00, &
     & 0.1382969E+00, 0.1252406E+00, 0.1021866E+00, 0.1021866E+00 /
      data (ref_adm(19,iz,30, 9),iz = 1,20) / &
     & 0.1991207E+00, 0.1991207E+00, 0.1955574E+00, 0.1943231E+00, &
     & 0.1933474E+00, 0.1926801E+00, 0.1915040E+00, 0.1895003E+00, &
     & 0.1869266E+00, 0.1838449E+00, 0.1804930E+00, 0.1758396E+00, &
     & 0.1704081E+00, 0.2293200E+00, 0.1579484E+00, 0.1482759E+00, &
     & 0.1382969E+00, 0.1252406E+00, 0.1021866E+00, 0.1021866E+00 /
      data (ref_adm(19,iz,31, 9),iz = 1,20) / &
     & 0.1991207E+00, 0.1991207E+00, 0.1955574E+00, 0.1943231E+00, &
     & 0.1933474E+00, 0.1926801E+00, 0.1915040E+00, 0.1895003E+00, &
     & 0.1869266E+00, 0.1838449E+00, 0.1804930E+00, 0.1758396E+00, &
     & 0.1704081E+00, 0.1652934E+00, 0.1579484E+00, 0.1482759E+00, &
     & 0.1382969E+00, 0.1252406E+00, 0.1021866E+00, 0.1021866E+00 /
      data (ref_adm(19,iz,32, 9),iz = 1,20) / &
     & 0.1991207E+00, 0.1991207E+00, 0.1955574E+00, 0.1943231E+00, &
     & 0.1933474E+00, 0.1926801E+00, 0.1915040E+00, 0.1895003E+00, &
     & 0.1869266E+00, 0.1838449E+00, 0.1804930E+00, 0.1758396E+00, &
     & 0.1704081E+00, 0.1652934E+00, 0.1579484E+00, 0.1482759E+00, &
     & 0.1382969E+00, 0.1252406E+00, 0.1021866E+00, 0.1021866E+00 /
      data (ref_adm(19,iz,33, 9),iz = 1,20) / &
     & 0.1991207E+00, 0.1991207E+00, 0.1955574E+00, 0.1943231E+00, &
     & 0.1933474E+00, 0.1926801E+00, 0.1915040E+00, 0.1895003E+00, &
     & 0.1869266E+00, 0.2038400E+00, 0.1804930E+00, 0.1758396E+00, &
     & 0.1704081E+00, 0.1652934E+00, 0.1579484E+00, 0.1482759E+00, &
     & 0.1382969E+00, 0.1252406E+00, 0.1021866E+00, 0.1021866E+00 /
      data (ref_adm(19,iz,34, 9),iz = 1,20) / &
     & 0.1991207E+00, 0.1991207E+00, 0.1955574E+00, 0.1943231E+00, &
     & 0.1933474E+00, 0.1926801E+00, 0.1915040E+00, 0.1895003E+00, &
     & 0.1869266E+00, 0.1838449E+00, 0.1804930E+00, 0.1758396E+00, &
     & 0.1704081E+00, 0.1652934E+00, 0.1579484E+00, 0.1482759E+00, &
     & 0.1382969E+00, 0.1252406E+00, 0.1021866E+00, 0.1021866E+00 /
      data (ref_adm(19,iz,35, 9),iz = 1,20) / &
     & 0.1991207E+00, 0.1991207E+00, 0.1955574E+00, 0.1943231E+00, &
     & 0.1933474E+00, 0.1926801E+00, 0.1915040E+00, 0.1895003E+00, &
     & 0.1869266E+00, 0.1838449E+00, 0.1804930E+00, 0.1758396E+00, &
     & 0.1704081E+00, 0.1652934E+00, 0.1579484E+00, 0.1482759E+00, &
     & 0.1382969E+00, 0.1252406E+00, 0.1021866E+00, 0.1021866E+00 /
      data (ref_adm(19,iz,36, 9),iz = 1,20) / &
     & 0.1860500E+00, 0.1860500E+00, 0.1955574E+00, 0.1943231E+00, &
     & 0.1933474E+00, 0.1926801E+00, 0.1915040E+00, 0.1895003E+00, &
     & 0.1869266E+00, 0.1838449E+00, 0.1804930E+00, 0.1758396E+00, &
     & 0.1704081E+00, 0.1652934E+00, 0.1579484E+00, 0.1482759E+00, &
     & 0.1382969E+00, 0.1252406E+00, 0.1021866E+00, 0.1021866E+00 /
      data (ref_adm(19,iz,37, 9),iz = 1,20) / &
     & 0.1750000E+00, 0.1750000E+00, 0.1955574E+00, 0.1943231E+00, &
     & 0.1933474E+00, 0.1926801E+00, 0.1915040E+00, 0.1895003E+00, &
     & 0.1869266E+00, 0.1838449E+00, 0.1804930E+00, 0.1758396E+00, &
     & 0.1704081E+00, 0.1652934E+00, 0.1579484E+00, 0.1482759E+00, &
     & 0.1382969E+00, 0.1252406E+00, 0.1021866E+00, 0.1021866E+00 /
      data (ref_adm(19,iz,38, 9),iz = 1,20) / &
     & 0.1750000E+00, 0.1750000E+00, 0.1955574E+00, 0.1943231E+00, &
     & 0.1933474E+00, 0.1926801E+00, 0.1915040E+00, 0.1895003E+00, &
     & 0.1869266E+00, 0.1838449E+00, 0.1804930E+00, 0.1758396E+00, &
     & 0.1704081E+00, 0.1652934E+00, 0.1579484E+00, 0.1482759E+00, &
     & 0.1382969E+00, 0.1252406E+00, 0.1021866E+00, 0.1021866E+00 /
! Solar Zenith Angle 45.0 Albedo  0.2748641E+00
      data (ref_adm(19,iz, 1,10),iz = 1,20) / &
     & 0.1570700E+00, 0.1570700E+00, 0.1641100E+00, 0.1695700E+00, &
     & 0.1579300E+00, 0.1543800E+00, 0.2199068E+00, 0.2217303E+00, &
     & 0.1600800E+00, 0.2304007E+00, 0.2382929E+00, 0.2503878E+00, &
     & 0.2657917E+00, 0.2792369E+00, 0.2955999E+00, 0.3145463E+00, &
     & 0.3305277E+00, 0.3352290E+00, 0.2952582E+00, 0.2952582E+00 /
      data (ref_adm(19,iz, 2,10),iz = 1,20) / &
     & 0.1570700E+00, 0.1570700E+00, 0.1641100E+00, 0.1695700E+00, &
     & 0.1579300E+00, 0.1543800E+00, 0.2199068E+00, 0.2217303E+00, &
     & 0.1600800E+00, 0.2304007E+00, 0.2382929E+00, 0.2503878E+00, &
     & 0.2657917E+00, 0.2792369E+00, 0.2955999E+00, 0.3145463E+00, &
     & 0.3305277E+00, 0.3352290E+00, 0.2952582E+00, 0.2952582E+00 /
      data (ref_adm(19,iz, 3,10),iz = 1,20) / &
     & 0.2308410E+00, 0.2308410E+00, 0.2851400E+00, 0.2087100E+00, &
     & 0.2218836E+00, 0.2199595E+00, 0.2196798E+00, 0.2218563E+00, &
     & 0.2248928E+00, 0.2287600E+00, 0.2381181E+00, 0.2505548E+00, &
     & 0.2657002E+00, 0.2788373E+00, 0.2957080E+00, 0.3143992E+00, &
     & 0.3298513E+00, 0.3346560E+00, 0.4002198E-01, 0.4002198E-01 /
      data (ref_adm(19,iz, 4,10),iz = 1,20) / &
     & 0.2308116E+00, 0.2308116E+00, 0.5730700E+00, 0.1560400E+00, &
     & 0.2222590E+00, 0.1640400E+00, 0.1383500E+00, 0.2218671E+00, &
     & 0.2251231E+00, 0.2301818E+00, 0.2380988E+00, 0.2503735E+00, &
     & 0.2653168E+00, 0.2784435E+00, 0.2953166E+00, 0.3138130E+00, &
     & 0.3293114E+00, 0.3340081E+00, 0.2944896E+00, 0.2944896E+00 /
      data (ref_adm(19,iz, 5,10),iz = 1,20) / &
     & 0.5684100E+00, 0.5684100E+00, 0.1574400E+00, 0.2219200E+00, &
     & 0.2226861E+00, 0.2201284E+00, 0.1541300E+00, 0.2221272E+00, &
     & 0.1545800E+00, 0.1597800E+00, 0.1565200E+00, 0.2499372E+00, &
     & 0.2649795E+00, 0.2775997E+00, 0.2948435E+00, 0.3131526E+00, &
     & 0.3281509E+00, 0.3330092E+00, 0.2935529E+00, 0.2935529E+00 /
      data (ref_adm(19,iz, 6,10),iz = 1,20) / &
     & 0.5745800E+00, 0.5745800E+00, 0.2309978E+00, 0.2266052E+00, &
     & 0.2229915E+00, 0.1370900E+00, 0.2201482E+00, 0.1656100E+00, &
     & 0.1423000E+00, 0.1600100E+00, 0.1536000E+00, 0.2494905E+00, &
     & 0.2645029E+00, 0.2770327E+00, 0.2939495E+00, 0.3120579E+00, &
     & 0.3268745E+00, 0.3313438E+00, 0.2925085E+00, 0.2925085E+00 /
      data (ref_adm(19,iz, 7,10),iz = 1,20) / &
     & 0.2308109E+00, 0.2308109E+00, 0.2311534E+00, 0.1723400E+00, &
     & 0.2235231E+00, 0.2212103E+00, 0.2207314E+00, 0.1640300E+00, &
     & 0.1356300E+00, 0.5904700E+00, 0.3835200E+00, 0.2491760E+00, &
     & 0.2635776E+00, 0.2764927E+00, 0.2928037E+00, 0.3105080E+00, &
     & 0.3251487E+00, 0.3295538E+00, 0.2909624E+00, 0.2909624E+00 /
      data (ref_adm(19,iz, 8,10),iz = 1,20) / &
     & 0.1768100E+00, 0.1768100E+00, 0.1663900E+00, 0.1729400E+00, &
     & 0.2240276E+00, 0.2073300E+00, 0.1369100E+00, 0.1488500E+00, &
     & 0.1428500E+00, 0.1435800E+00, 0.5889300E+00, 0.2486054E+00, &
     & 0.2628013E+00, 0.2753896E+00, 0.2915567E+00, 0.3090450E+00, &
     & 0.3228962E+00, 0.3275517E+00, 0.2892112E+00, 0.2892112E+00 /
      data (ref_adm(19,iz, 9,10),iz = 1,20) / &
     & 0.1543000E+00, 0.1543000E+00, 0.2318622E+00, 0.2278888E+00, &
     & 0.2248762E+00, 0.2218175E+00, 0.2216204E+00, 0.1498000E+00, &
     & 0.2256909E+00, 0.2297676E+00, 0.2363520E+00, 0.2480673E+00, &
     & 0.2619837E+00, 0.2744115E+00, 0.2903268E+00, 0.3075418E+00, &
     & 0.3206684E+00, 0.3254038E+00, 0.2870805E+00, 0.2870805E+00 /
      data (ref_adm(19,iz,10,10),iz = 1,20) / &
     & 0.2305765E+00, 0.2305765E+00, 0.2319507E+00, 0.2283131E+00, &
     & 0.2252973E+00, 0.2227407E+00, 0.2870200E+00, 0.2227857E+00, &
     & 0.2258358E+00, 0.2297058E+00, 0.2361773E+00, 0.2473350E+00, &
     & 0.2605428E+00, 0.2729416E+00, 0.2886524E+00, 0.3056299E+00, &
     & 0.3183021E+00, 0.3224479E+00, 0.2845831E+00, 0.2845831E+00 /
      data (ref_adm(19,iz,11,10),iz = 1,20) / &
     & 0.2304922E+00, 0.2304922E+00, 0.2323424E+00, 0.3567700E+00, &
     & 0.2260675E+00, 0.2235621E+00, 0.1662200E+00, 0.1373200E+00, &
     & 0.2257830E+00, 0.2299505E+00, 0.2358827E+00, 0.2466098E+00, &
     & 0.2598856E+00, 0.2719168E+00, 0.2868218E+00, 0.3038163E+00, &
     & 0.3158377E+00, 0.3195787E+00, 0.2820669E+00, 0.2820669E+00 /
      data (ref_adm(19,iz,12,10),iz = 1,20) / &
     & 0.2305111E+00, 0.2305111E+00, 0.2325379E+00, 0.2300569E+00, &
     & 0.2270931E+00, 0.1772200E+00, 0.2031100E+00, 0.2238222E+00, &
     & 0.3452300E+00, 0.2298740E+00, 0.2354563E+00, 0.2458948E+00, &
     & 0.2585273E+00, 0.1873800E+00, 0.2851001E+00, 0.3016575E+00, &
     & 0.3133700E+00, 0.3163652E+00, 0.2796017E+00, 0.2796017E+00 /
      data (ref_adm(19,iz,13,10),iz = 1,20) / &
     & 0.2276800E+00, 0.2276800E+00, 0.2064700E+00, 0.2209300E+00, &
     & 0.2083500E+00, 0.1827700E+00, 0.2038500E+00, 0.1799100E+00, &
     & 0.1265200E+00, 0.2035700E+00, 0.2593800E+00, 0.2451167E+00, &
     & 0.1647500E+00, 0.2685301E+00, 0.2831481E+00, 0.2993346E+00, &
     & 0.3106474E+00, 0.3127845E+00, 0.2772641E+00, 0.2772641E+00 /
      data (ref_adm(19,iz,14,10),iz = 1,20) / &
     & 0.2912600E+00, 0.2912600E+00, 0.3654900E+00, 0.3318300E+00, &
     & 0.3271900E+00, 0.2888400E+00, 0.2427300E+00, 0.2091100E+00, &
     & 0.2071500E+00, 0.2020800E+00, 0.2113300E+00, 0.1957400E+00, &
     & 0.1807900E+00, 0.1697800E+00, 0.2816674E+00, 0.2970553E+00, &
     & 0.3084369E+00, 0.3096030E+00, 0.2745529E+00, 0.2745529E+00 /
      data (ref_adm(19,iz,15,10),iz = 1,20) / &
     & 0.2829800E+00, 0.2829800E+00, 0.3054800E+00, 0.5915100E+00, &
     & 0.2298196E+00, 0.2278863E+00, 0.2262158E+00, 0.1039600E+00, &
     & 0.2274003E+00, 0.1892300E+00, 0.2353803E+00, 0.1754200E+00, &
     & 0.2006100E+00, 0.1801900E+00, 0.1946400E+00, 0.2946865E+00, &
     & 0.3057578E+00, 0.3063195E+00, 0.2719540E+00, 0.2719540E+00 /
      data (ref_adm(19,iz,16,10),iz = 1,20) / &
     & 0.4815400E+00, 0.4815400E+00, 0.1684100E+00, 0.3488100E+00, &
     & 0.4326300E+00, 0.2292285E+00, 0.2274723E+00, 0.2270509E+00, &
     & 0.2282836E+00, 0.2311976E+00, 0.2357160E+00, 0.1646400E+00, &
     & 0.1604600E+00, 0.1743500E+00, 0.2775015E+00, 0.2918452E+00, &
     & 0.3027344E+00, 0.3031574E+00, 0.2690414E+00, 0.2690414E+00 /
      data (ref_adm(19,iz,17,10),iz = 1,20) / &
     & 0.1581800E+00, 0.1581800E+00, 0.3409100E+00, 0.2340263E+00, &
     & 0.3695100E+00, 0.2303316E+00, 0.2290769E+00, 0.2283086E+00, &
     & 0.2609000E+00, 0.2315633E+00, 0.2360384E+00, 0.2025600E+00, &
     & 0.2530805E+00, 0.2629570E+00, 0.2750940E+00, 0.2899502E+00, &
     & 0.2999660E+00, 0.3003536E+00, 0.2664699E+00, 0.2664699E+00 /
      data (ref_adm(19,iz,18,10),iz = 1,20) / &
     & 0.2873900E+00, 0.2873900E+00, 0.2444600E+00, 0.2550494E+00, &
     & 0.2118000E+00, 0.2508597E+00, 0.2489908E+00, 0.2465105E+00, &
     & 0.1992300E+00, 0.1596500E+00, 0.2403804E+00, 0.2389398E+00, &
     & 0.1834100E+00, 0.2372499E+00, 0.2366769E+00, 0.2364009E+00, &
     & 0.2367937E+00, 0.2372697E+00, 0.2264450E+00, 0.2264450E+00 /
      data (ref_adm(19,iz,19,10),iz = 1,20) / &
     & 0.2254700E+00, 0.2254700E+00, 0.4441500E+00, 0.2367300E+00, &
     & 0.2523827E+00, 0.2508597E+00, 0.1763100E+00, 0.2100300E+00, &
     & 0.2441906E+00, 0.2420364E+00, 0.1659700E+00, 0.2389398E+00, &
     & 0.2378574E+00, 0.2372499E+00, 0.1916600E+00, 0.2364009E+00, &
     & 0.2367937E+00, 0.2372697E+00, 0.2264450E+00, 0.2264450E+00 /
      data (ref_adm(19,iz,20,10),iz = 1,20) / &
     & 0.2904900E+00, 0.2904900E+00, 0.4951100E+00, 0.3127900E+00, &
     & 0.2523827E+00, 0.2508597E+00, 0.1800600E+00, 0.2002800E+00, &
     & 0.2441906E+00, 0.2420364E+00, 0.1797100E+00, 0.1897700E+00, &
     & 0.1832300E+00, 0.2372499E+00, 0.2366769E+00, 0.2364009E+00, &
     & 0.2367937E+00, 0.2372697E+00, 0.2264450E+00, 0.2264450E+00 /
      data (ref_adm(19,iz,21,10),iz = 1,20) / &
     & 0.2698800E+00, 0.2698800E+00, 0.2588547E+00, 0.4058900E+00, &
     & 0.3293600E+00, 0.4793800E+00, 0.2176100E+00, 0.2465105E+00, &
     & 0.2441906E+00, 0.2420364E+00, 0.2403804E+00, 0.2389398E+00, &
     & 0.2378574E+00, 0.1780500E+00, 0.1891800E+00, 0.2364009E+00, &
     & 0.2367937E+00, 0.2372697E+00, 0.2264450E+00, 0.2264450E+00 /
      data (ref_adm(19,iz,22,10),iz = 1,20) / &
     & 0.2097724E+00, 0.2097724E+00, 0.1369800E+00, 0.2114556E+00, &
     & 0.2144958E+00, 0.2518100E+00, 0.2270294E+00, 0.2364440E+00, &
     & 0.2481189E+00, 0.1765900E+00, 0.2889700E+00, 0.2847400E+00, &
     & 0.2366100E+00, 0.3791634E+00, 0.4328940E+00, 0.5125086E+00, &
     & 0.6138570E+00, 0.7926604E+00, 0.1253660E+01, 0.1253660E+01 /
      data (ref_adm(19,iz,23,10),iz = 1,20) / &
     & 0.3114000E+00, 0.3114000E+00, 0.2412200E+00, 0.2099050E+00, &
     & 0.2125835E+00, 0.2171527E+00, 0.3347100E+00, 0.3456400E+00, &
     & 0.1679100E+00, 0.1750700E+00, 0.1712700E+00, 0.3004532E+00, &
     & 0.2370500E+00, 0.3688322E+00, 0.4202313E+00, 0.4970687E+00, &
     & 0.5936986E+00, 0.7680703E+00, 0.1245514E+01, 0.1245514E+01 /
      data (ref_adm(19,iz,24,10),iz = 1,20) / &
     & 0.4152800E+00, 0.4152800E+00, 0.2678700E+00, 0.1351700E+00, &
     & 0.3397200E+00, 0.2820700E+00, 0.2674500E+00, 0.3872700E+00, &
     & 0.2310800E+00, 0.2092900E+00, 0.1850100E+00, 0.2950206E+00, &
     & 0.3279704E+00, 0.3609836E+00, 0.2305000E+00, 0.4859994E+00, &
     & 0.5806605E+00, 0.7505795E+00, 0.1250957E+01, 0.1250957E+01 /
      data (ref_adm(19,iz,25,10),iz = 1,20) / &
     & 0.2089142E+00, 0.2089142E+00, 0.1581100E+00, 0.3283000E+00, &
     & 0.1725200E+00, 0.2122895E+00, 0.1434700E+00, 0.2254647E+00, &
     & 0.3524700E+00, 0.2399500E+00, 0.1994600E+00, 0.1676100E+00, &
     & 0.1998200E+00, 0.3545139E+00, 0.4035252E+00, 0.4776168E+00, &
     & 0.5713978E+00, 0.7402830E+00, 0.1267146E+01, 0.1267146E+01 /
      data (ref_adm(19,iz,26,10),iz = 1,20) / &
     & 0.2338400E+00, 0.2338400E+00, 0.2021200E+00, 0.1832100E+00, &
     & 0.2266000E+00, 0.1874000E+00, 0.2154637E+00, 0.1887600E+00, &
     & 0.2330738E+00, 0.2455012E+00, 0.2610376E+00, 0.2873092E+00, &
     & 0.3201757E+00, 0.3528947E+00, 0.4028157E+00, 0.4772885E+00, &
     & 0.5715221E+00, 0.7436292E+00, 0.1305578E+01, 0.1305578E+01 /
      data (ref_adm(19,iz,27,10),iz = 1,20) / &
     & 0.2230400E+00, 0.2230400E+00, 0.2192900E+00, 0.2210600E+00, &
     & 0.1760400E+00, 0.4417400E+00, 0.3171600E+00, 0.2778000E+00, &
     & 0.2121100E+00, 0.2103700E+00, 0.1980800E+00, 0.1850900E+00, &
     & 0.3217380E+00, 0.2283700E+00, 0.2606400E+00, 0.4826681E+00, &
     & 0.5789765E+00, 0.7554568E+00, 0.1355355E+01, 0.1355355E+01 /
      data (ref_adm(19,iz,28,10),iz = 1,20) / &
     & 0.1907900E+00, 0.1907900E+00, 0.2491800E+00, 0.1855400E+00, &
     & 0.2038146E+00, 0.2067435E+00, 0.2119623E+00, 0.2895500E+00, &
     & 0.2553800E+00, 0.2429927E+00, 0.2610520E+00, 0.2156100E+00, &
     & 0.2149400E+00, 0.3588901E+00, 0.4115827E+00, 0.4899831E+00, &
     & 0.5891720E+00, 0.7734433E+00, 0.1411139E+01, 0.1411139E+01 /
      data (ref_adm(19,iz,29,10),iz = 1,20) / &
     & 0.2083485E+00, 0.2083485E+00, 0.2041959E+00, 0.2985900E+00, &
     & 0.3586500E+00, 0.1945300E+00, 0.2102314E+00, 0.2182545E+00, &
     & 0.2295524E+00, 0.2445899E+00, 0.2631030E+00, 0.2916409E+00, &
     & 0.3592200E+00, 0.3656470E+00, 0.4213179E+00, 0.5034176E+00, &
     & 0.6071110E+00, 0.8029169E+00, 0.1478282E+01, 0.1478282E+01 /
      data (ref_adm(19,iz,30,10),iz = 1,20) / &
     & 0.2713500E+00, 0.2713500E+00, 0.2032837E+00, 0.2014360E+00, &
     & 0.2016021E+00, 0.2043883E+00, 0.2093051E+00, 0.2180960E+00, &
     & 0.2302843E+00, 0.2458871E+00, 0.2650735E+00, 0.2958150E+00, &
     & 0.3358586E+00, 0.2500100E+00, 0.4332275E+00, 0.5210109E+00, &
     & 0.6328506E+00, 0.8411630E+00, 0.1556830E+01, 0.1556830E+01 /
      data (ref_adm(19,iz,31,10),iz = 1,20) / &
     & 0.1821200E+00, 0.1821200E+00, 0.1805300E+00, 0.1680800E+00, &
     & 0.1661400E+00, 0.1704300E+00, 0.1747500E+00, 0.1777200E+00, &
     & 0.1808900E+00, 0.1837700E+00, 0.1880100E+00, 0.3015605E+00, &
     & 0.3429678E+00, 0.3851115E+00, 0.4498291E+00, 0.5424465E+00, &
     & 0.6608433E+00, 0.8814338E+00, 0.1633128E+01, 0.1633128E+01 /
      data (ref_adm(19,iz,32,10),iz = 1,20) / &
     & 0.1431500E+00, 0.1431500E+00, 0.1677900E+00, 0.1745700E+00, &
     & 0.1787600E+00, 0.2024654E+00, 0.2087291E+00, 0.2187467E+00, &
     & 0.2324049E+00, 0.2492276E+00, 0.2715512E+00, 0.3073667E+00, &
     & 0.3530001E+00, 0.3976495E+00, 0.4647942E+00, 0.5643148E+00, &
     & 0.6909364E+00, 0.9261478E+00, 0.1715971E+01, 0.1715971E+01 /
      data (ref_adm(19,iz,33,10),iz = 1,20) / &
     & 0.2077571E+00, 0.2077571E+00, 0.2018286E+00, 0.1992459E+00, &
     & 0.1994055E+00, 0.2017456E+00, 0.1846800E+00, 0.2196822E+00, &
     & 0.2332105E+00, 0.2517473E+00, 0.2753298E+00, 0.3136694E+00, &
     & 0.3629419E+00, 0.4092848E+00, 0.4812766E+00, 0.5830508E+00, &
     & 0.7047185E+00, 0.9372071E+00, 0.1760901E+01, 0.1760901E+01 /
      data (ref_adm(19,iz,34,10),iz = 1,20) / &
     & 0.2075441E+00, 0.2075441E+00, 0.2015025E+00, 0.1987841E+00, &
     & 0.1862100E+00, 0.2001200E+00, 0.2087110E+00, 0.2201473E+00, &
     & 0.2342941E+00, 0.2538961E+00, 0.2784967E+00, 0.2608100E+00, &
     & 0.3704728E+00, 0.4207036E+00, 0.4890917E+00, 0.5754220E+00, &
     & 0.6847920E+00, 0.9068182E+00, 0.1751586E+01, 0.1751586E+01 /
      data (ref_adm(19,iz,35,10),iz = 1,20) / &
     & 0.2075204E+00, 0.2075204E+00, 0.2176700E+00, 0.2244600E+00, &
     & 0.1985960E+00, 0.2016301E+00, 0.2090768E+00, 0.2205877E+00, &
     & 0.2415700E+00, 0.2557165E+00, 0.2819849E+00, 0.3249854E+00, &
     & 0.3779381E+00, 0.4272118E+00, 0.4840913E+00, 0.5600876E+00, &
     & 0.6713684E+00, 0.8968731E+00, 0.1757746E+01, 0.1757746E+01 /
      data (ref_adm(19,iz,36,10),iz = 1,20) / &
     & 0.3889800E+00, 0.3889800E+00, 0.2011935E+00, 0.1979353E+00, &
     & 0.1982478E+00, 0.2012796E+00, 0.2093110E+00, 0.2210354E+00, &
     & 0.2933100E+00, 0.2570349E+00, 0.2839909E+00, 0.3287478E+00, &
     & 0.3833217E+00, 0.4277796E+00, 0.4764835E+00, 0.5545832E+00, &
     & 0.6752668E+00, 0.9167680E+00, 0.1790038E+01, 0.1790038E+01 /
      data (ref_adm(19,iz,37,10),iz = 1,20) / &
     & 0.1493300E+00, 0.1493300E+00, 0.2009656E+00, 0.1978097E+00, &
     & 0.1983679E+00, 0.2012411E+00, 0.2094157E+00, 0.2211410E+00, &
     & 0.2364184E+00, 0.2576384E+00, 0.2853753E+00, 0.3302785E+00, &
     & 0.3858148E+00, 0.4270242E+00, 0.4716820E+00, 0.5554481E+00, &
     & 0.6844231E+00, 0.1014170E+01, 0.1875233E+01, 0.1875233E+01 /
      data (ref_adm(19,iz,38,10),iz = 1,20) / &
     & 0.1493300E+00, 0.1493300E+00, 0.2009656E+00, 0.1978097E+00, &
     & 0.1983679E+00, 0.2012411E+00, 0.2094157E+00, 0.2211410E+00, &
     & 0.2364184E+00, 0.2576384E+00, 0.2853753E+00, 0.3302785E+00, &
     & 0.3858148E+00, 0.4270242E+00, 0.4716820E+00, 0.5554481E+00, &
     & 0.6844231E+00, 0.1014170E+01, 0.1875233E+01, 0.1875233E+01 /
! Solar Zenith Angle 50.0 Albedo  0.2117511E+00
      data (ref_adm(19,iz, 1,11),iz = 1,20) / &
     & 0.1778900E+00, 0.1778900E+00, 0.1689600E+00, 0.2094400E+00, &
     & 0.1822100E+00, 0.1760306E+00, 0.2936200E+00, 0.1754400E+00, &
     & 0.1851700E+00, 0.1974700E+00, 0.2009474E+00, 0.2131021E+00, &
     & 0.1785000E+00, 0.2958600E+00, 0.2601012E+00, 0.2872055E+00, &
     & 0.3548200E+00, 0.3805985E+00, 0.4285643E+00, 0.4285643E+00 /
      data (ref_adm(19,iz, 2,11),iz = 1,20) / &
     & 0.1778900E+00, 0.1778900E+00, 0.1689600E+00, 0.2094400E+00, &
     & 0.1822100E+00, 0.1760306E+00, 0.2936200E+00, 0.1754400E+00, &
     & 0.1851700E+00, 0.1974700E+00, 0.2009474E+00, 0.2131021E+00, &
     & 0.1785000E+00, 0.2958600E+00, 0.2601012E+00, 0.2872055E+00, &
     & 0.3548200E+00, 0.3805985E+00, 0.4285643E+00, 0.4285643E+00 /
      data (ref_adm(19,iz, 3,11),iz = 1,20) / &
     & 0.1837300E+00, 0.1837300E+00, 0.3201600E+00, 0.1532200E+00, &
     & 0.1749698E+00, 0.1760810E+00, 0.2257900E+00, 0.1777900E+00, &
     & 0.1935100E+00, 0.2422700E+00, 0.2007747E+00, 0.2467600E+00, &
     & 0.2276568E+00, 0.2409660E+00, 0.2596968E+00, 0.2865395E+00, &
     & 0.3198065E+00, 0.3787040E+00, 0.5377818E-01, 0.5377818E-01 /
      data (ref_adm(19,iz, 4,11),iz = 1,20) / &
     & 0.1791119E+00, 0.1791119E+00, 0.1536900E+00, 0.1550600E+00, &
     & 0.1658500E+00, 0.1688000E+00, 0.1784861E+00, 0.1819872E+00, &
     & 0.1298500E+00, 0.1928307E+00, 0.2005425E+00, 0.2126131E+00, &
     & 0.2127200E+00, 0.1989700E+00, 0.2590215E+00, 0.2854251E+00, &
     & 0.3179938E+00, 0.3742374E+00, 0.4245096E+00, 0.4245096E+00 /
      data (ref_adm(19,iz, 5,11),iz = 1,20) / &
     & 0.1445200E+00, 0.1445200E+00, 0.2180700E+00, 0.1630800E+00, &
     & 0.1669100E+00, 0.1593200E+00, 0.1785875E+00, 0.1819680E+00, &
     & 0.1866657E+00, 0.1926564E+00, 0.1937600E+00, 0.2121580E+00, &
     & 0.2078600E+00, 0.2396763E+00, 0.2579185E+00, 0.2837005E+00, &
     & 0.3146637E+00, 0.3673101E+00, 0.4226269E+00, 0.4226269E+00 /
      data (ref_adm(19,iz, 6,11),iz = 1,20) / &
     & 0.1513000E+00, 0.1513000E+00, 0.1675600E+00, 0.1571500E+00, &
     & 0.2345000E+00, 0.3946700E+00, 0.1786058E+00, 0.1177900E+00, &
     & 0.2874000E+00, 0.1923964E+00, 0.1881400E+00, 0.2091500E+00, &
     & 0.2045500E+00, 0.1751700E+00, 0.2567899E+00, 0.2172900E+00, &
     & 0.3109378E+00, 0.3585306E+00, 0.4146370E+00, 0.4146370E+00 /
      data (ref_adm(19,iz, 7,11),iz = 1,20) / &
     & 0.1654300E+00, 0.1654300E+00, 0.1680500E+00, 0.1754021E+00, &
     & 0.1087100E+00, 0.1764942E+00, 0.1787046E+00, 0.1335000E+00, &
     & 0.1487900E+00, 0.1922238E+00, 0.4008600E+00, 0.2313900E+00, &
     & 0.2244980E+00, 0.1929800E+00, 0.1995900E+00, 0.2299500E+00, &
     & 0.3068512E+00, 0.3498443E+00, 0.3980199E+00, 0.3980199E+00 /
      data (ref_adm(19,iz, 8,11),iz = 1,20) / &
     & 0.1575900E+00, 0.1575900E+00, 0.1631100E+00, 0.1756411E+00, &
     & 0.1756476E+00, 0.2451500E+00, 0.2685800E+00, 0.1644800E+00, &
     & 0.1663700E+00, 0.1748400E+00, 0.1706100E+00, 0.1818300E+00, &
     & 0.1939300E+00, 0.1979500E+00, 0.2110800E+00, 0.2766924E+00, &
     & 0.3030931E+00, 0.2472000E+00, 0.3805710E+00, 0.3805710E+00 /
      data (ref_adm(19,iz, 9,11),iz = 1,20) / &
     & 0.2100000E+00, 0.2100000E+00, 0.1769296E+00, 0.1759059E+00, &
     & 0.1759369E+00, 0.3320200E+00, 0.1789861E+00, 0.1318100E+00, &
     & 0.1863691E+00, 0.1881500E+00, 0.2139100E+00, 0.2091004E+00, &
     & 0.1821500E+00, 0.1952800E+00, 0.2177400E+00, 0.2740813E+00, &
     & 0.2990556E+00, 0.3347315E+00, 0.3665929E+00, 0.3665929E+00 /
      data (ref_adm(19,iz,10,11),iz = 1,20) / &
     & 0.1794333E+00, 0.1794333E+00, 0.1547800E+00, 0.1797900E+00, &
     & 0.1714600E+00, 0.1787400E+00, 0.1792400E+00, 0.1822968E+00, &
     & 0.1631900E+00, 0.1675700E+00, 0.1980615E+00, 0.1567300E+00, &
     & 0.1834700E+00, 0.2110400E+00, 0.2491618E+00, 0.2715603E+00, &
     & 0.2956611E+00, 0.3286915E+00, 0.3548937E+00, 0.3548937E+00 /
      data (ref_adm(19,iz,11,11),iz = 1,20) / &
     & 0.4076500E+00, 0.4076500E+00, 0.2788200E+00, 0.1624000E+00, &
     & 0.1550500E+00, 0.1776430E+00, 0.1741700E+00, 0.1824931E+00, &
     & 0.1682700E+00, 0.2030600E+00, 0.1844000E+00, 0.1423100E+00, &
     & 0.1867900E+00, 0.2306396E+00, 0.2467503E+00, 0.2688025E+00, &
     & 0.2919908E+00, 0.3231303E+00, 0.3453774E+00, 0.3453774E+00 /
      data (ref_adm(19,iz,12,11),iz = 1,20) / &
     & 0.2259000E+00, 0.2259000E+00, 0.1763000E+00, 0.1585100E+00, &
     & 0.1821100E+00, 0.1792800E+00, 0.1799751E+00, 0.3190000E+00, &
     & 0.1625300E+00, 0.1561700E+00, 0.1720000E+00, 0.1854600E+00, &
     & 0.1781300E+00, 0.2450700E+00, 0.2443898E+00, 0.2655443E+00, &
     & 0.2886268E+00, 0.3183736E+00, 0.3373227E+00, 0.3373227E+00 /
      data (ref_adm(19,iz,13,11),iz = 1,20) / &
     & 0.1682600E+00, 0.1682600E+00, 0.1642900E+00, 0.1844600E+00, &
     & 0.1915000E+00, 0.1782000E+00, 0.1672200E+00, 0.1936100E+00, &
     & 0.2207700E+00, 0.1666600E+00, 0.1973470E+00, 0.1712300E+00, &
     & 0.1715400E+00, 0.2314400E+00, 0.2421511E+00, 0.2622015E+00, &
     & 0.2846216E+00, 0.3137512E+00, 0.3304822E+00, 0.3304822E+00 /
      data (ref_adm(19,iz,14,11),iz = 1,20) / &
     & 0.1955100E+00, 0.1955100E+00, 0.2161500E+00, 0.2147700E+00, &
     & 0.2157200E+00, 0.1909600E+00, 0.1836700E+00, 0.1861900E+00, &
     & 0.1782900E+00, 0.1777800E+00, 0.1790100E+00, 0.1851600E+00, &
     & 0.1836500E+00, 0.1966700E+00, 0.2401548E+00, 0.2593137E+00, &
     & 0.2803400E+00, 0.3085837E+00, 0.3238963E+00, 0.3238963E+00 /
      data (ref_adm(19,iz,15,11),iz = 1,20) / &
     & 0.1836000E+00, 0.1836000E+00, 0.1509200E+00, 0.1546900E+00, &
     & 0.1575900E+00, 0.1513300E+00, 0.2433900E+00, 0.1637200E+00, &
     & 0.1620400E+00, 0.1827000E+00, 0.1866500E+00, 0.1778600E+00, &
     & 0.1745200E+00, 0.1826200E+00, 0.2384433E+00, 0.2567022E+00, &
     & 0.2764884E+00, 0.3028319E+00, 0.3170637E+00, 0.3170637E+00 /
      data (ref_adm(19,iz,16,11),iz = 1,20) / &
     & 0.1626500E+00, 0.1626500E+00, 0.1967900E+00, 0.1499800E+00, &
     & 0.1795944E+00, 0.1602900E+00, 0.1686500E+00, 0.1676700E+00, &
     & 0.1797300E+00, 0.1927700E+00, 0.1705000E+00, 0.1715200E+00, &
     & 0.1844500E+00, 0.1847800E+00, 0.2373119E+00, 0.2542468E+00, &
     & 0.2732267E+00, 0.2976103E+00, 0.3090122E+00, 0.3090122E+00 /
      data (ref_adm(19,iz,17,11),iz = 1,20) / &
     & 0.1755000E+00, 0.1755000E+00, 0.1840100E+00, 0.2916100E+00, &
     & 0.2424900E+00, 0.1810300E+00, 0.1620000E+00, 0.1721300E+00, &
     & 0.2097800E+00, 0.1935656E+00, 0.1985979E+00, 0.1940600E+00, &
     & 0.1778900E+00, 0.2243457E+00, 0.2364815E+00, 0.2527012E+00, &
     & 0.2701577E+00, 0.2929640E+00, 0.3022849E+00, 0.3022849E+00 /
      data (ref_adm(19,iz,18,11),iz = 1,20) / &
     & 0.1552800E+00, 0.1552800E+00, 0.1444600E+00, 0.1350800E+00, &
     & 0.1535700E+00, 0.1876365E+00, 0.1425400E+00, 0.1867614E+00, &
     & 0.1796200E+00, 0.1881105E+00, 0.1898078E+00, 0.1783700E+00, &
     & 0.1907200E+00, 0.2307100E+00, 0.2068884E+00, 0.2148537E+00, &
     & 0.2229301E+00, 0.2322600E+00, 0.2304717E+00, 0.2304717E+00 /
      data (ref_adm(19,iz,19,11),iz = 1,20) / &
     & 0.2385500E+00, 0.2385500E+00, 0.1913272E+00, 0.2239900E+00, &
     & 0.1897054E+00, 0.1890009E+00, 0.2086600E+00, 0.1674500E+00, &
     & 0.1874400E+00, 0.1894111E+00, 0.1910686E+00, 0.1608500E+00, &
     & 0.1755900E+00, 0.2016243E+00, 0.2000600E+00, 0.2148626E+00, &
     & 0.2226840E+00, 0.2315347E+00, 0.2289706E+00, 0.2289706E+00 /
      data (ref_adm(19,iz,20,11),iz = 1,20) / &
     & 0.1817200E+00, 0.1817200E+00, 0.1919201E+00, 0.1947500E+00, &
     & 0.1761300E+00, 0.2298800E+00, 0.1900415E+00, 0.1800300E+00, &
     & 0.1901583E+00, 0.1786200E+00, 0.1577900E+00, 0.1952119E+00, &
     & 0.1987315E+00, 0.1953700E+00, 0.2285200E+00, 0.2149787E+00, &
     & 0.2224369E+00, 0.2306833E+00, 0.2279628E+00, 0.2279628E+00 /
      data (ref_adm(19,iz,21,11),iz = 1,20) / &
     & 0.2731900E+00, 0.2731900E+00, 0.1725900E+00, 0.1926048E+00, &
     & 0.1601000E+00, 0.2116300E+00, 0.2285300E+00, 0.1916684E+00, &
     & 0.1798200E+00, 0.1993600E+00, 0.1939798E+00, 0.1966641E+00, &
     & 0.1969900E+00, 0.2025500E+00, 0.2085394E+00, 0.2153404E+00, &
     & 0.2225193E+00, 0.2302081E+00, 0.2271153E+00, 0.2271153E+00 /
      data (ref_adm(19,iz,22,11),iz = 1,20) / &
     & 0.2202700E+00, 0.2202700E+00, 0.1663100E+00, 0.1915464E+00, &
     & 0.1690400E+00, 0.5685600E+00, 0.1559500E+00, 0.2077853E+00, &
     & 0.1861800E+00, 0.1965500E+00, 0.2133728E+00, 0.2890800E+00, &
     & 0.2554200E+00, 0.2157600E+00, 0.1986100E+00, 0.2565979E+00, &
     & 0.2609449E+00, 0.2553389E+00, 0.2254429E+00, 0.2254429E+00 /
      data (ref_adm(19,iz,23,11),iz = 1,20) / &
     & 0.1618300E+00, 0.1618300E+00, 0.1912334E+00, 0.1454500E+00, &
     & 0.2057900E+00, 0.2038400E+00, 0.2087241E+00, 0.1726600E+00, &
     & 0.2092465E+00, 0.2227500E+00, 0.2029300E+00, 0.2204082E+00, &
     & 0.2289845E+00, 0.2358942E+00, 0.2220100E+00, 0.2553518E+00, &
     & 0.2591605E+00, 0.2539316E+00, 0.2247504E+00, 0.2247504E+00 /
      data (ref_adm(19,iz,24,11),iz = 1,20) / &
     & 0.1633900E+00, 0.1633900E+00, 0.2093800E+00, 0.2305900E+00, &
     & 0.2284300E+00, 0.2257300E+00, 0.2089239E+00, 0.2257000E+00, &
     & 0.1829400E+00, 0.1895300E+00, 0.2233900E+00, 0.1983600E+00, &
     & 0.2290844E+00, 0.2222300E+00, 0.2449053E+00, 0.2543108E+00, &
     & 0.2580024E+00, 0.2524456E+00, 0.2239392E+00, 0.2239392E+00 /
      data (ref_adm(19,iz,25,11),iz = 1,20) / &
     & 0.1541100E+00, 0.1541100E+00, 0.1325900E+00, 0.2007600E+00, &
     & 0.1578700E+00, 0.1941100E+00, 0.1727300E+00, 0.1873000E+00, &
     & 0.1898900E+00, 0.2120914E+00, 0.1964000E+00, 0.2069300E+00, &
     & 0.1986900E+00, 0.2096700E+00, 0.2441277E+00, 0.2532301E+00, &
     & 0.2564151E+00, 0.2512059E+00, 0.2232784E+00, 0.2232784E+00 /
      data (ref_adm(19,iz,26,11),iz = 1,20) / &
     & 0.2362200E+00, 0.2362200E+00, 0.1823300E+00, 0.1925700E+00, &
     & 0.1697200E+00, 0.2624700E+00, 0.1939200E+00, 0.2094200E+00, &
     & 0.1937400E+00, 0.1853600E+00, 0.1922200E+00, 0.2484500E+00, &
     & 0.2339900E+00, 0.1632400E+00, 0.2435101E+00, 0.2520897E+00, &
     & 0.2554027E+00, 0.2498427E+00, 0.2226164E+00, 0.2226164E+00 /
      data (ref_adm(19,iz,27,11),iz = 1,20) / &
     & 0.1925800E+00, 0.1925800E+00, 0.2162900E+00, 0.2017900E+00, &
     & 0.2659500E+00, 0.2457100E+00, 0.2393600E+00, 0.2585700E+00, &
     & 0.2260300E+00, 0.3638900E+00, 0.2043600E+00, 0.2188200E+00, &
     & 0.2247500E+00, 0.2137300E+00, 0.2429374E+00, 0.2511662E+00, &
     & 0.2543098E+00, 0.2487355E+00, 0.2220483E+00, 0.2220483E+00 /
      data (ref_adm(19,iz,28,11),iz = 1,20) / &
     & 0.1752500E+00, 0.1752500E+00, 0.1884000E+00, 0.1797900E+00, &
     & 0.1819200E+00, 0.1983220E+00, 0.2074090E+00, 0.2134669E+00, &
     & 0.2138991E+00, 0.1921900E+00, 0.2164977E+00, 0.2216928E+00, &
     & 0.1872000E+00, 0.2441300E+00, 0.2230300E+00, 0.2501347E+00, &
     & 0.2533658E+00, 0.2476105E+00, 0.2214904E+00, 0.2214904E+00 /
      data (ref_adm(19,iz,29,11),iz = 1,20) / &
     & 0.1697300E+00, 0.1697300E+00, 0.1916100E+00, 0.1777500E+00, &
     & 0.2208000E+00, 0.1752200E+00, 0.1727600E+00, 0.1732300E+00, &
     & 0.1926100E+00, 0.1945700E+00, 0.2172331E+00, 0.2220557E+00, &
     & 0.2286101E+00, 0.2193500E+00, 0.2419739E+00, 0.2492572E+00, &
     & 0.2523704E+00, 0.2464259E+00, 0.2209529E+00, 0.2209529E+00 /
      data (ref_adm(19,iz,30,11),iz = 1,20) / &
     & 0.1601700E+00, 0.1601700E+00, 0.1961700E+00, 0.2067700E+00, &
     & 0.1800200E+00, 0.1764100E+00, 0.1937700E+00, 0.1866000E+00, &
     & 0.1917700E+00, 0.1984300E+00, 0.2180511E+00, 0.2224005E+00, &
     & 0.2286649E+00, 0.2348832E+00, 0.2576600E+00, 0.2488090E+00, &
     & 0.2517897E+00, 0.2458263E+00, 0.2206206E+00, 0.2206206E+00 /
      data (ref_adm(19,iz,31,11),iz = 1,20) / &
     & 0.2255000E+00, 0.2255000E+00, 0.1628000E+00, 0.1665100E+00, &
     & 0.1697200E+00, 0.1764100E+00, 0.2402900E+00, 0.2139195E+00, &
     & 0.2165097E+00, 0.2234400E+00, 0.2275200E+00, 0.2326400E+00, &
     & 0.2388800E+00, 0.2388300E+00, 0.2339300E+00, 0.2481467E+00, &
     & 0.2511640E+00, 0.2448012E+00, 0.2203094E+00, 0.2203094E+00 /
      data (ref_adm(19,iz,32,11),iz = 1,20) / &
     & 0.1606800E+00, 0.1606800E+00, 0.1667700E+00, 0.1730100E+00, &
     & 0.1718200E+00, 0.1811100E+00, 0.1845600E+00, 0.2138240E+00, &
     & 0.2172322E+00, 0.2332700E+00, 0.2192658E+00, 0.2228912E+00, &
     & 0.2288635E+00, 0.2642400E+00, 0.2414081E+00, 0.2477187E+00, &
     & 0.2504964E+00, 0.2441803E+00, 0.2199458E+00, 0.2199458E+00 /
      data (ref_adm(19,iz,33,11),iz = 1,20) / &
     & 0.2141500E+00, 0.2141500E+00, 0.1722700E+00, 0.1729600E+00, &
     & 0.1798600E+00, 0.1847500E+00, 0.1917800E+00, 0.2034000E+00, &
     & 0.2179455E+00, 0.2554600E+00, 0.2196728E+00, 0.2232913E+00, &
     & 0.2287808E+00, 0.2351221E+00, 0.2411123E+00, 0.2469371E+00, &
     & 0.2499365E+00, 0.2434611E+00, 0.2197910E+00, 0.2197910E+00 /
      data (ref_adm(19,iz,34,11),iz = 1,20) / &
     & 0.1790900E+00, 0.1790900E+00, 0.1662000E+00, 0.1706300E+00, &
     & 0.1834800E+00, 0.1794700E+00, 0.2030272E+00, 0.2132619E+00, &
     & 0.2183549E+00, 0.2459700E+00, 0.2203147E+00, 0.2316800E+00, &
     & 0.2290283E+00, 0.2349689E+00, 0.2411222E+00, 0.2469513E+00, &
     & 0.2493350E+00, 0.2429131E+00, 0.2195237E+00, 0.2195237E+00 /
      data (ref_adm(19,iz,35,11),iz = 1,20) / &
     & 0.1658500E+00, 0.1658500E+00, 0.5873800E+00, 0.1790500E+00, &
     & 0.1814300E+00, 0.1873900E+00, 0.2025300E+00, 0.2131276E+00, &
     & 0.2185092E+00, 0.2734100E+00, 0.2204736E+00, 0.2238533E+00, &
     & 0.2291716E+00, 0.2716800E+00, 0.3286700E+00, 0.2466886E+00, &
     & 0.2487928E+00, 0.2425266E+00, 0.2193864E+00, 0.2193864E+00 /
      data (ref_adm(19,iz,36,11),iz = 1,20) / &
     & 0.2049300E+00, 0.2049300E+00, 0.2263280E+00, 0.1713200E+00, &
     & 0.1966528E+00, 0.1875100E+00, 0.2022885E+00, 0.2131704E+00, &
     & 0.2186897E+00, 0.2195399E+00, 0.2207612E+00, 0.2240270E+00, &
     & 0.2292437E+00, 0.2829200E+00, 0.2409289E+00, 0.2464846E+00, &
     & 0.2486350E+00, 0.2423561E+00, 0.2193408E+00, 0.2193408E+00 /
      data (ref_adm(19,iz,37,11),iz = 1,20) / &
     & 0.1514500E+00, 0.1514500E+00, 0.2370957E+00, 0.2162969E+00, &
     & 0.1587600E+00, 0.1868700E+00, 0.2022719E+00, 0.2326100E+00, &
     & 0.2186813E+00, 0.2197846E+00, 0.2208820E+00, 0.2238888E+00, &
     & 0.2532700E+00, 0.2660700E+00, 0.3085500E+00, 0.2464644E+00, &
     & 0.2487632E+00, 0.2424013E+00, 0.2192595E+00, 0.2192595E+00 /
      data (ref_adm(19,iz,38,11),iz = 1,20) / &
     & 0.1514500E+00, 0.1514500E+00, 0.2370957E+00, 0.2162969E+00, &
     & 0.1587600E+00, 0.1868700E+00, 0.2022719E+00, 0.2326100E+00, &
     & 0.2186813E+00, 0.2197846E+00, 0.2208820E+00, 0.2238888E+00, &
     & 0.2532700E+00, 0.2660700E+00, 0.3085500E+00, 0.2464644E+00, &
     & 0.2487632E+00, 0.2424013E+00, 0.2192595E+00, 0.2192595E+00 /
! Solar Zenith Angle 55.0 Albedo  0.2140368E+00
      data (ref_adm(19,iz, 1,12),iz = 1,20) / &
     & 0.1665000E+00, 0.1665000E+00, 0.1544600E+00, 0.1478700E+00, &
     & 0.2151600E+00, 0.1594400E+00, 0.1615300E+00, 0.1541500E+00, &
     & 0.1754400E+00, 0.1804200E+00, 0.1918277E+00, 0.1734400E+00, &
     & 0.3240700E+00, 0.2735000E+00, 0.2528300E+00, 0.3421400E+00, &
     & 0.3133336E+00, 0.4517900E+00, 0.2881839E+00, 0.2881839E+00 /
      data (ref_adm(19,iz, 2,12),iz = 1,20) / &
     & 0.1665000E+00, 0.1665000E+00, 0.1544600E+00, 0.1478700E+00, &
     & 0.2151600E+00, 0.1594400E+00, 0.1615300E+00, 0.1541500E+00, &
     & 0.1754400E+00, 0.1804200E+00, 0.1918277E+00, 0.1734400E+00, &
     & 0.3240700E+00, 0.2735000E+00, 0.2528300E+00, 0.3421400E+00, &
     & 0.3133336E+00, 0.4517900E+00, 0.2881839E+00, 0.2881839E+00 /
      data (ref_adm(19,iz, 3,12),iz = 1,20) / &
     & 0.1587300E+00, 0.1587300E+00, 0.1618500E+00, 0.1607500E+00, &
     & 0.1609035E+00, 0.1537700E+00, 0.1521000E+00, 0.1532300E+00, &
     & 0.1609000E+00, 0.1958400E+00, 0.1813100E+00, 0.1708800E+00, &
     & 0.2259521E+00, 0.2403500E+00, 0.3047700E+00, 0.2553500E+00, &
     & 0.3126324E+00, 0.3304200E+00, 0.4440162E-08, 0.4440162E-08 /
      data (ref_adm(19,iz, 4,12),iz = 1,20) / &
     & 0.2237200E+00, 0.2237200E+00, 0.1793900E+00, 0.1999300E+00, &
     & 0.1616700E+00, 0.1517100E+00, 0.1526700E+00, 0.1384100E+00, &
     & 0.1567900E+00, 0.1621500E+00, 0.1904900E+00, 0.1671900E+00, &
     & 0.1914600E+00, 0.2382200E+00, 0.2611300E+00, 0.2838900E+00, &
     & 0.3116246E+00, 0.3219725E+00, 0.2870509E+00, 0.2870509E+00 /
      data (ref_adm(19,iz, 5,12),iz = 1,20) / &
     & 0.1425300E+00, 0.1425300E+00, 0.1708200E+00, 0.1547700E+00, &
     & 0.1583200E+00, 0.1491000E+00, 0.1637900E+00, 0.1558200E+00, &
     & 0.1707200E+00, 0.1595300E+00, 0.1668600E+00, 0.1806900E+00, &
     & 0.1944800E+00, 0.2181700E+00, 0.2440700E+00, 0.2440600E+00, &
     & 0.3104149E+00, 0.3208818E+00, 0.2859394E+00, 0.2859394E+00 /
      data (ref_adm(19,iz, 6,12),iz = 1,20) / &
     & 0.1687000E+00, 0.1687000E+00, 0.1559900E+00, 0.1662800E+00, &
     & 0.1982000E+00, 0.1521000E+00, 0.1484600E+00, 0.1668241E+00, &
     & 0.1587500E+00, 0.1650900E+00, 0.1832300E+00, 0.2046000E+00, &
     & 0.1529000E+00, 0.1768900E+00, 0.1848300E+00, 0.2868112E+00, &
     & 0.3081915E+00, 0.3192483E+00, 0.2845306E+00, 0.2845306E+00 /
      data (ref_adm(19,iz, 7,12),iz = 1,20) / &
     & 0.2033300E+00, 0.2033300E+00, 0.2189300E+00, 0.1683600E+00, &
     & 0.1853100E+00, 0.1681600E+00, 0.1694000E+00, 0.1570700E+00, &
     & 0.1710000E+00, 0.1804132E+00, 0.1641500E+00, 0.2047600E+00, &
     & 0.3079100E+00, 0.2419700E+00, 0.3752800E+00, 0.3279800E+00, &
     & 0.3061558E+00, 0.3364100E+00, 0.3525700E+00, 0.3525700E+00 /
      data (ref_adm(19,iz, 8,12),iz = 1,20) / &
     & 0.2361100E+00, 0.2361100E+00, 0.1901400E+00, 0.2378400E+00, &
     & 0.2409200E+00, 0.2541700E+00, 0.2251200E+00, 0.1932900E+00, &
     & 0.2605000E+00, 0.2441800E+00, 0.1547600E+00, 0.2175400E+00, &
     & 0.1831300E+00, 0.2070400E+00, 0.1858500E+00, 0.1947600E+00, &
     & 0.2508500E+00, 0.2618400E+00, 0.2808969E+00, 0.2808969E+00 /
      data (ref_adm(19,iz, 9,12),iz = 1,20) / &
     & 0.1671600E+00, 0.1671600E+00, 0.1671600E+00, 0.1865000E+00, &
     & 0.1551500E+00, 0.1793400E+00, 0.1545400E+00, 0.1571000E+00, &
     & 0.1692900E+00, 0.1546000E+00, 0.1660700E+00, 0.1765700E+00, &
     & 0.1978400E+00, 0.1892800E+00, 0.1961600E+00, 0.2296000E+00, &
     & 0.2998953E+00, 0.3113330E+00, 0.2787994E+00, 0.2787994E+00 /
      data (ref_adm(19,iz,10,12),iz = 1,20) / &
     & 0.1986600E+00, 0.1986600E+00, 0.2006200E+00, 0.2118400E+00, &
     & 0.1725600E+00, 0.1581600E+00, 0.1573500E+00, 0.1498200E+00, &
     & 0.1633300E+00, 0.1681400E+00, 0.1594200E+00, 0.1904600E+00, &
     & 0.2196010E+00, 0.2344229E+00, 0.1995800E+00, 0.2061200E+00, &
     & 0.2964253E+00, 0.3074986E+00, 0.2759627E+00, 0.2759627E+00 /
      data (ref_adm(19,iz,11,12),iz = 1,20) / &
     & 0.1755200E+00, 0.1755200E+00, 0.1831400E+00, 0.1761800E+00, &
     & 0.1716400E+00, 0.1595300E+00, 0.1621700E+00, 0.1594100E+00, &
     & 0.1469700E+00, 0.1640200E+00, 0.1171400E+00, 0.2014973E+00, &
     & 0.2179779E+00, 0.2371100E+00, 0.2006900E+00, 0.2736594E+00, &
     & 0.2362600E+00, 0.3031443E+00, 0.2729240E+00, 0.2729240E+00 /
      data (ref_adm(19,iz,12,12),iz = 1,20) / &
     & 0.1829600E+00, 0.1829600E+00, 0.1673000E+00, 0.1564300E+00, &
     & 0.1677600E+00, 0.1772000E+00, 0.1720900E+00, 0.1624400E+00, &
     & 0.1803900E+00, 0.1792800E+00, 0.1640400E+00, 0.1585400E+00, &
     & 0.1854600E+00, 0.2363000E+00, 0.2463900E+00, 0.2704701E+00, &
     & 0.2885416E+00, 0.2989127E+00, 0.2692284E+00, 0.2692284E+00 /
      data (ref_adm(19,iz,13,12),iz = 1,20) / &
     & 0.1710500E+00, 0.1710500E+00, 0.2135700E+00, 0.1793700E+00, &
     & 0.1677400E+00, 0.1699700E+00, 0.1717800E+00, 0.1804100E+00, &
     & 0.1664100E+00, 0.1720400E+00, 0.1618600E+00, 0.1874200E+00, &
     & 0.1941400E+00, 0.2036000E+00, 0.2390200E+00, 0.2173700E+00, &
     & 0.2844154E+00, 0.2941827E+00, 0.2651887E+00, 0.2651887E+00 /
      data (ref_adm(19,iz,14,12),iz = 1,20) / &
     & 0.2026100E+00, 0.2026100E+00, 0.1747400E+00, 0.1649200E+00, &
     & 0.1690200E+00, 0.1710500E+00, 0.1753800E+00, 0.1713700E+00, &
     & 0.1777900E+00, 0.1724600E+00, 0.1794200E+00, 0.1751200E+00, &
     & 0.1814500E+00, 0.2105700E+00, 0.2439562E+00, 0.2641026E+00, &
     & 0.2802486E+00, 0.2891729E+00, 0.2610970E+00, 0.2610970E+00 /
      data (ref_adm(19,iz,15,12),iz = 1,20) / &
     & 0.1688100E+00, 0.1688100E+00, 0.1661200E+00, 0.1683400E+00, &
     & 0.1548900E+00, 0.1619300E+00, 0.1640100E+00, 0.1650500E+00, &
     & 0.1679700E+00, 0.1771300E+00, 0.1951400E+00, 0.1787300E+00, &
     & 0.1964200E+00, 0.2021100E+00, 0.2413504E+00, 0.2612082E+00, &
     & 0.2763268E+00, 0.2841628E+00, 0.2572840E+00, 0.2572840E+00 /
      data (ref_adm(19,iz,16,12),iz = 1,20) / &
     & 0.1733400E+00, 0.1733400E+00, 0.1578100E+00, 0.1702200E+00, &
     & 0.1550400E+00, 0.1569300E+00, 0.3335400E+00, 0.2675900E+00, &
     & 0.1872700E+00, 0.2249000E+00, 0.1885600E+00, 0.1857700E+00, &
     & 0.1924900E+00, 0.1968100E+00, 0.2387730E+00, 0.2575833E+00, &
     & 0.2725715E+00, 0.2794586E+00, 0.2534482E+00, 0.2534482E+00 /
      data (ref_adm(19,iz,17,12),iz = 1,20) / &
     & 0.1621500E+00, 0.1621500E+00, 0.1710000E+00, 0.1629100E+00, &
     & 0.1516900E+00, 0.1819100E+00, 0.1697600E+00, 0.1713351E+00, &
     & 0.1612700E+00, 0.2395300E+00, 0.1694000E+00, 0.1952212E+00, &
     & 0.1962600E+00, 0.2472700E+00, 0.2360778E+00, 0.2543345E+00, &
     & 0.2688931E+00, 0.2748740E+00, 0.2495649E+00, 0.2495649E+00 /
      data (ref_adm(19,iz,18,12),iz = 1,20) / &
     & 0.1699100E+00, 0.1699100E+00, 0.1665900E+00, 0.1685500E+00, &
     & 0.1691100E+00, 0.1806800E+00, 0.1905300E+00, 0.1853700E+00, &
     & 0.2454400E+00, 0.1795400E+00, 0.1794800E+00, 0.2885100E+00, &
     & 0.1924200E+00, 0.2113100E+00, 0.2144043E+00, 0.2245539E+00, &
     & 0.2354902E+00, 0.2491386E+00, 0.2526484E+00, 0.2526484E+00 /
      data (ref_adm(19,iz,19,12),iz = 1,20) / &
     & 0.1612100E+00, 0.1612100E+00, 0.1639700E+00, 0.1646200E+00, &
     & 0.1576800E+00, 0.1665700E+00, 0.1656100E+00, 0.2114600E+00, &
     & 0.1847700E+00, 0.1854100E+00, 0.1727100E+00, 0.1924700E+00, &
     & 0.1939600E+00, 0.1933500E+00, 0.2264500E+00, 0.2241447E+00, &
     & 0.2344849E+00, 0.2474292E+00, 0.2497826E+00, 0.2497826E+00 /
      data (ref_adm(19,iz,20,12),iz = 1,20) / &
     & 0.2070100E+00, 0.2070100E+00, 0.3522700E+00, 0.1818035E+00, &
     & 0.1887000E+00, 0.1770000E+00, 0.1925500E+00, 0.3501000E+00, &
     & 0.2239900E+00, 0.1820100E+00, 0.1801300E+00, 0.1988500E+00, &
     & 0.2196600E+00, 0.2221000E+00, 0.1891400E+00, 0.2240726E+00, &
     & 0.2339845E+00, 0.2461982E+00, 0.2479950E+00, 0.2479950E+00 /
      data (ref_adm(19,iz,21,12),iz = 1,20) / &
     & 0.1632700E+00, 0.1632700E+00, 0.1535900E+00, 0.1818100E+00, &
     & 0.1681000E+00, 0.1567700E+00, 0.2135600E+00, 0.1453000E+00, &
     & 0.1716000E+00, 0.1917586E+00, 0.1866400E+00, 0.1845900E+00, &
     & 0.2383800E+00, 0.2384000E+00, 0.2156171E+00, 0.2244144E+00, &
     & 0.2338336E+00, 0.2452368E+00, 0.2467230E+00, 0.2467230E+00 /
      data (ref_adm(19,iz,22,12),iz = 1,20) / &
     & 0.1538000E+00, 0.1538000E+00, 0.1686500E+00, 0.1734500E+00, &
     & 0.1901000E+00, 0.1812500E+00, 0.1730300E+00, 0.1602100E+00, &
     & 0.1573200E+00, 0.2041700E+00, 0.1947000E+00, 0.1844200E+00, &
     & 0.2212800E+00, 0.2021000E+00, 0.2657358E+00, 0.2844396E+00, &
     & 0.2986956E+00, 0.3067037E+00, 0.2909420E+00, 0.2909420E+00 /
      data (ref_adm(19,iz,23,12),iz = 1,20) / &
     & 0.1447400E+00, 0.1447400E+00, 0.1754800E+00, 0.1690400E+00, &
     & 0.1851000E+00, 0.1787800E+00, 0.2124300E+00, 0.2463000E+00, &
     & 0.2037300E+00, 0.2052925E+00, 0.1922900E+00, 0.1842700E+00, &
     & 0.2367426E+00, 0.2055800E+00, 0.2285500E+00, 0.2374900E+00, &
     & 0.2935739E+00, 0.3000594E+00, 0.2883577E+00, 0.2883577E+00 /
      data (ref_adm(19,iz,24,12),iz = 1,20) / &
     & 0.1696700E+00, 0.1696700E+00, 0.1719900E+00, 0.1721500E+00, &
     & 0.1831200E+00, 0.1684800E+00, 0.1916894E+00, 0.2396500E+00, &
     & 0.2019082E+00, 0.2079665E+00, 0.1957000E+00, 0.2099000E+00, &
     & 0.2155600E+00, 0.2163400E+00, 0.2210100E+00, 0.2762729E+00, &
     & 0.2887428E+00, 0.2948529E+00, 0.2862623E+00, 0.2862623E+00 /
      data (ref_adm(19,iz,25,12),iz = 1,20) / &
     & 0.1685500E+00, 0.1685500E+00, 0.1701100E+00, 0.1691400E+00, &
     & 0.1715900E+00, 0.1777700E+00, 0.1885100E+00, 0.1961600E+00, &
     & 0.1908300E+00, 0.1945800E+00, 0.2046000E+00, 0.2240300E+00, &
     & 0.2058100E+00, 0.2267900E+00, 0.2316700E+00, 0.2322400E+00, &
     & 0.2852196E+00, 0.2902940E+00, 0.2854247E+00, 0.2854247E+00 /
      data (ref_adm(19,iz,26,12),iz = 1,20) / &
     & 0.1815400E+00, 0.1815400E+00, 0.1757800E+00, 0.1808500E+00, &
     & 0.1776600E+00, 0.2036800E+00, 0.1948300E+00, 0.2029400E+00, &
     & 0.2248100E+00, 0.2069800E+00, 0.2005600E+00, 0.2144400E+00, &
     & 0.2399600E+00, 0.2487800E+00, 0.2342300E+00, 0.2750773E+00, &
     & 0.2838925E+00, 0.2871863E+00, 0.2854222E+00, 0.2854222E+00 /
      data (ref_adm(19,iz,27,12),iz = 1,20) / &
     & 0.1791400E+00, 0.1791400E+00, 0.1759500E+00, 0.1916100E+00, &
     & 0.1754600E+00, 0.2261600E+00, 0.1962400E+00, 0.2899000E+00, &
     & 0.2003600E+00, 0.2125800E+00, 0.2268700E+00, 0.2227400E+00, &
     & 0.2479100E+00, 0.2371600E+00, 0.2515500E+00, 0.2763669E+00, &
     & 0.2844191E+00, 0.2666800E+00, 0.2864037E+00, 0.2864037E+00 /
      data (ref_adm(19,iz,28,12),iz = 1,20) / &
     & 0.1723000E+00, 0.1723000E+00, 0.1516100E+00, 0.1567500E+00, &
     & 0.2029600E+00, 0.1897000E+00, 0.1927000E+00, 0.2104401E+00, &
     & 0.2049000E+00, 0.2240951E+00, 0.2277200E+00, 0.2311600E+00, &
     & 0.2284600E+00, 0.2632600E+00, 0.2393500E+00, 0.2412700E+00, &
     & 0.2722000E+00, 0.2747500E+00, 0.2890715E+00, 0.2890715E+00 /
      data (ref_adm(19,iz,29,12),iz = 1,20) / &
     & 0.1818600E+00, 0.1818600E+00, 0.1984900E+00, 0.1718500E+00, &
     & 0.1556500E+00, 0.1708100E+00, 0.4427400E+00, 0.2112400E+00, &
     & 0.2012000E+00, 0.2197600E+00, 0.2118600E+00, 0.2465182E+00, &
     & 0.2569177E+00, 0.2584700E+00, 0.2546700E+00, 0.2824575E+00, &
     & 0.2875232E+00, 0.2885237E+00, 0.2928366E+00, 0.2928366E+00 /
      data (ref_adm(19,iz,30,12),iz = 1,20) / &
     & 0.2001700E+00, 0.2001700E+00, 0.3234900E+00, 0.1908000E+00, &
     & 0.1723400E+00, 0.2023368E+00, 0.1806400E+00, 0.2477000E+00, &
     & 0.1904800E+00, 0.1914800E+00, 0.2301200E+00, 0.2666600E+00, &
     & 0.2050300E+00, 0.2704145E+00, 0.2623200E+00, 0.2912700E+00, &
     & 0.2912415E+00, 0.2900110E+00, 0.2971180E+00, 0.2971180E+00 /
      data (ref_adm(19,iz,31,12),iz = 1,20) / &
     & 0.3506900E+00, 0.3506900E+00, 0.2268100E+00, 0.1716900E+00, &
     & 0.1972000E+00, 0.1715400E+00, 0.1897800E+00, 0.2054800E+00, &
     & 0.2018200E+00, 0.2114700E+00, 0.2244600E+00, 0.2466900E+00, &
     & 0.2520800E+00, 0.2715500E+00, 0.2837400E+00, 0.2856500E+00, &
     & 0.2896600E+00, 0.2932046E+00, 0.3011295E+00, 0.3011295E+00 /
      data (ref_adm(19,iz,32,12),iz = 1,20) / &
     & 0.1985400E+00, 0.1985400E+00, 0.1772500E+00, 0.1754500E+00, &
     & 0.1873000E+00, 0.1954600E+00, 0.2080100E+00, 0.2098700E+00, &
     & 0.2052300E+00, 0.2289552E+00, 0.3015500E+00, 0.2538300E+00, &
     & 0.2886400E+00, 0.2740900E+00, 0.2910027E+00, 0.2979330E+00, &
     & 0.2995889E+00, 0.2968534E+00, 0.3050573E+00, 0.3050573E+00 /
      data (ref_adm(19,iz,33,12),iz = 1,20) / &
     & 0.1791300E+00, 0.1791300E+00, 0.2320000E+00, 0.1952300E+00, &
     & 0.2000700E+00, 0.2040800E+00, 0.2187300E+00, 0.2120600E+00, &
     & 0.2642200E+00, 0.2452800E+00, 0.2362833E+00, 0.2371700E+00, &
     & 0.2702298E+00, 0.2855488E+00, 0.2966921E+00, 0.3031906E+00, &
     & 0.3075200E+00, 0.3008255E+00, 0.3091065E+00, 0.3091065E+00 /
      data (ref_adm(19,iz,34,12),iz = 1,20) / &
     & 0.1622500E+00, 0.1622500E+00, 0.1666900E+00, 0.1717100E+00, &
     & 0.1815600E+00, 0.1980200E+00, 0.2503000E+00, 0.2522000E+00, &
     & 0.2561900E+00, 0.2483800E+00, 0.2943400E+00, 0.2489945E+00, &
     & 0.2739900E+00, 0.2832852E+00, 0.3002112E+00, 0.3081498E+00, &
     & 0.3100791E+00, 0.3041717E+00, 0.3131436E+00, 0.3131436E+00 /
      data (ref_adm(19,iz,35,12),iz = 1,20) / &
     & 0.1772900E+00, 0.1772900E+00, 0.1835800E+00, 0.1788700E+00, &
     & 0.2327700E+00, 0.1944000E+00, 0.1993900E+00, 0.2026500E+00, &
     & 0.2893100E+00, 0.2453300E+00, 0.2534700E+00, 0.2497232E+00, &
     & 0.2490800E+00, 0.2915500E+00, 0.2801400E+00, 0.3120303E+00, &
     & 0.3134079E+00, 0.3076410E+00, 0.3161710E+00, 0.3161710E+00 /
      data (ref_adm(19,iz,36,12),iz = 1,20) / &
     & 0.1944700E+00, 0.1944700E+00, 0.2132600E+00, 0.1924141E+00, &
     & 0.2153700E+00, 0.1964300E+00, 0.1983700E+00, 0.2098500E+00, &
     & 0.2350500E+00, 0.2423900E+00, 0.2427900E+00, 0.2574300E+00, &
     & 0.2626579E+00, 0.2862500E+00, 0.2996146E+00, 0.3665700E+00, &
     & 0.3160602E+00, 0.3102856E+00, 0.3181627E+00, 0.3181627E+00 /
      data (ref_adm(19,iz,37,12),iz = 1,20) / &
     & 0.1740300E+00, 0.1740300E+00, 0.1586900E+00, 0.2143700E+00, &
     & 0.3175200E+00, 0.2314500E+00, 0.2078400E+00, 0.1918800E+00, &
     & 0.2198600E+00, 0.2813500E+00, 0.3236600E+00, 0.2546055E+00, &
     & 0.3338500E+00, 0.2935500E+00, 0.2984580E+00, 0.3164494E+00, &
     & 0.3174450E+00, 0.3117355E+00, 0.3193257E+00, 0.3193257E+00 /
      data (ref_adm(19,iz,38,12),iz = 1,20) / &
     & 0.1740300E+00, 0.1740300E+00, 0.1586900E+00, 0.2143700E+00, &
     & 0.3175200E+00, 0.2314500E+00, 0.2078400E+00, 0.1918800E+00, &
     & 0.2198600E+00, 0.2813500E+00, 0.3236600E+00, 0.2546055E+00, &
     & 0.3338500E+00, 0.2935500E+00, 0.2984580E+00, 0.3164494E+00, &
     & 0.3174450E+00, 0.3117355E+00, 0.3193257E+00, 0.3193257E+00 /
! Solar Zenith Angle 60.0 Albedo  0.2188953E+00
      data (ref_adm(19,iz, 1,13),iz = 1,20) / &
     & 0.1554800E+00, 0.1554800E+00, 0.1417600E+00, 0.1638600E+00, &
     & 0.1700600E+00, 0.1578400E+00, 0.1767500E+00, 0.1691300E+00, &
     & 0.1838700E+00, 0.1747000E+00, 0.1766600E+00, 0.2090000E+00, &
     & 0.2332700E+00, 0.2795500E+00, 0.3440000E+00, 0.3500235E+00, &
     & 0.4104655E+00, 0.5187013E+00, 0.7176285E+00, 0.7176285E+00 /
      data (ref_adm(19,iz, 2,13),iz = 1,20) / &
     & 0.1554800E+00, 0.1554800E+00, 0.1417600E+00, 0.1638600E+00, &
     & 0.1700600E+00, 0.1578400E+00, 0.1767500E+00, 0.1691300E+00, &
     & 0.1838700E+00, 0.1747000E+00, 0.1766600E+00, 0.2090000E+00, &
     & 0.2332700E+00, 0.2795500E+00, 0.3440000E+00, 0.3500235E+00, &
     & 0.4104655E+00, 0.5187013E+00, 0.7176285E+00, 0.7176285E+00 /
      data (ref_adm(19,iz, 3,13),iz = 1,20) / &
     & 0.1729300E+00, 0.1729300E+00, 0.1485300E+00, 0.1630000E+00, &
     & 0.1711700E+00, 0.1696700E+00, 0.1681900E+00, 0.1787600E+00, &
     & 0.1702700E+00, 0.1626700E+00, 0.1807600E+00, 0.1891800E+00, &
     & 0.2180900E+00, 0.2821600E+00, 0.2336600E+00, 0.3439000E+00, &
     & 0.4093100E+00, 0.5123033E+00, 0.1079793E-07, 0.1079793E-07 /
      data (ref_adm(19,iz, 4,13),iz = 1,20) / &
     & 0.1619000E+00, 0.1619000E+00, 0.1555400E+00, 0.1562000E+00, &
     & 0.1551400E+00, 0.1571800E+00, 0.1616000E+00, 0.1544900E+00, &
     & 0.1795000E+00, 0.1723800E+00, 0.1975300E+00, 0.1963700E+00, &
     & 0.1948500E+00, 0.2405800E+00, 0.2638000E+00, 0.3237300E+00, &
     & 0.3784300E+00, 0.5009998E+00, 0.6606550E+00, 0.6606550E+00 /
      data (ref_adm(19,iz, 5,13),iz = 1,20) / &
     & 0.1676300E+00, 0.1676300E+00, 0.1797800E+00, 0.1638700E+00, &
     & 0.1643200E+00, 0.1424700E+00, 0.1925400E+00, 0.1781100E+00, &
     & 0.1573600E+00, 0.1504200E+00, 0.1892100E+00, 0.2017700E+00, &
     & 0.2388800E+00, 0.2160200E+00, 0.2607200E+00, 0.2751100E+00, &
     & 0.4091700E+00, 0.4894429E+00, 0.6180938E+00, 0.6180938E+00 /
      data (ref_adm(19,iz, 6,13),iz = 1,20) / &
     & 0.1758600E+00, 0.1758600E+00, 0.1647100E+00, 0.1575800E+00, &
     & 0.1510700E+00, 0.1754300E+00, 0.1688900E+00, 0.1647900E+00, &
     & 0.1540800E+00, 0.1890500E+00, 0.1891600E+00, 0.2205700E+00, &
     & 0.2457200E+00, 0.2489000E+00, 0.2484600E+00, 0.3339171E+00, &
     & 0.3915661E+00, 0.3686900E+00, 0.5807557E+00, 0.5807557E+00 /
      data (ref_adm(19,iz, 7,13),iz = 1,20) / &
     & 0.1785300E+00, 0.1785300E+00, 0.1642200E+00, 0.1687600E+00, &
     & 0.1857300E+00, 0.1685900E+00, 0.1678600E+00, 0.1761300E+00, &
     & 0.1854100E+00, 0.1827700E+00, 0.1731700E+00, 0.1605400E+00, &
     & 0.1668400E+00, 0.2188800E+00, 0.2528300E+00, 0.2391300E+00, &
     & 0.3808763E+00, 0.4661436E+00, 0.5562113E+00, 0.5562113E+00 /
      data (ref_adm(19,iz, 8,13),iz = 1,20) / &
     & 0.2193200E+00, 0.2193200E+00, 0.2185600E+00, 0.2044700E+00, &
     & 0.1923500E+00, 0.1721200E+00, 0.1562600E+00, 0.1550100E+00, &
     & 0.1469700E+00, 0.1798100E+00, 0.1747400E+00, 0.1666400E+00, &
     & 0.1992000E+00, 0.2070500E+00, 0.2351100E+00, 0.3218712E+00, &
     & 0.3700806E+00, 0.4493375E+00, 0.5378792E+00, 0.5378792E+00 /
      data (ref_adm(19,iz, 9,13),iz = 1,20) / &
     & 0.2036700E+00, 0.2036700E+00, 0.2145200E+00, 0.1965500E+00, &
     & 0.2083200E+00, 0.1832000E+00, 0.1836900E+00, 0.1687200E+00, &
     & 0.1842100E+00, 0.1596200E+00, 0.1708000E+00, 0.1755500E+00, &
     & 0.1820600E+00, 0.1982200E+00, 0.2423400E+00, 0.3162460E+00, &
     & 0.3605747E+00, 0.4297666E+00, 0.5104149E+00, 0.5104149E+00 /
      data (ref_adm(19,iz,10,13),iz = 1,20) / &
     & 0.2013100E+00, 0.2013100E+00, 0.1830600E+00, 0.1831500E+00, &
     & 0.1830200E+00, 0.1983600E+00, 0.1652400E+00, 0.1795200E+00, &
     & 0.1778300E+00, 0.1991300E+00, 0.1839700E+00, 0.1936800E+00, &
     & 0.2301445E+00, 0.1864200E+00, 0.2476100E+00, 0.2316900E+00, &
     & 0.2455500E+00, 0.4142038E+00, 0.4797020E+00, 0.4797020E+00 /
      data (ref_adm(19,iz,11,13),iz = 1,20) / &
     & 0.1681700E+00, 0.1681700E+00, 0.1767100E+00, 0.1719500E+00, &
     & 0.1974500E+00, 0.2054100E+00, 0.1678500E+00, 0.1770900E+00, &
     & 0.1850500E+00, 0.2003300E+00, 0.1935400E+00, 0.1970300E+00, &
     & 0.2046800E+00, 0.2247100E+00, 0.2549100E+00, 0.3061773E+00, &
     & 0.2326700E+00, 0.4018925E+00, 0.4569596E+00, 0.4569596E+00 /
      data (ref_adm(19,iz,12,13),iz = 1,20) / &
     & 0.1784100E+00, 0.1784100E+00, 0.1602000E+00, 0.1709900E+00, &
     & 0.2446900E+00, 0.1753200E+00, 0.1572100E+00, 0.1744800E+00, &
     & 0.1695500E+00, 0.2026300E+00, 0.1927900E+00, 0.1839000E+00, &
     & 0.2022900E+00, 0.2106800E+00, 0.2246500E+00, 0.2083700E+00, &
     & 0.2193100E+00, 0.3923021E+00, 0.4406977E+00, 0.4406977E+00 /
      data (ref_adm(19,iz,13,13),iz = 1,20) / &
     & 0.1642900E+00, 0.1642900E+00, 0.1576400E+00, 0.1405000E+00, &
     & 0.1514300E+00, 0.1579700E+00, 0.1610100E+00, 0.1654100E+00, &
     & 0.1917000E+00, 0.1978000E+00, 0.1845800E+00, 0.1714300E+00, &
     & 0.2199000E+00, 0.2155100E+00, 0.2544800E+00, 0.2395300E+00, &
     & 0.3336017E+00, 0.3841752E+00, 0.4276442E+00, 0.4276442E+00 /
      data (ref_adm(19,iz,14,13),iz = 1,20) / &
     & 0.1694300E+00, 0.1694300E+00, 0.1803700E+00, 0.1704000E+00, &
     & 0.1701400E+00, 0.1682500E+00, 0.1643900E+00, 0.1754100E+00, &
     & 0.1724700E+00, 0.1759400E+00, 0.1775000E+00, 0.1751200E+00, &
     & 0.1941100E+00, 0.1924200E+00, 0.2380000E+00, 0.2348900E+00, &
     & 0.2622200E+00, 0.3769174E+00, 0.4170263E+00, 0.4170263E+00 /
      data (ref_adm(19,iz,15,13),iz = 1,20) / &
     & 0.1753000E+00, 0.1753000E+00, 0.1699000E+00, 0.1696800E+00, &
     & 0.1625100E+00, 0.1649900E+00, 0.1624000E+00, 0.1662300E+00, &
     & 0.1815300E+00, 0.1802700E+00, 0.1814300E+00, 0.1911800E+00, &
     & 0.1985000E+00, 0.2094700E+00, 0.2566150E+00, 0.2869011E+00, &
     & 0.3208589E+00, 0.3687582E+00, 0.4070014E+00, 0.4070014E+00 /
      data (ref_adm(19,iz,16,13),iz = 1,20) / &
     & 0.1743800E+00, 0.1743800E+00, 0.1908000E+00, 0.1640900E+00, &
     & 0.1729400E+00, 0.1409100E+00, 0.1661100E+00, 0.1668800E+00, &
     & 0.1701400E+00, 0.1781000E+00, 0.1814300E+00, 0.1894600E+00, &
     & 0.2017900E+00, 0.2065900E+00, 0.2097200E+00, 0.2828463E+00, &
     & 0.3154168E+00, 0.3602515E+00, 0.3953213E+00, 0.3953213E+00 /
      data (ref_adm(19,iz,17,13),iz = 1,20) / &
     & 0.1725000E+00, 0.1725000E+00, 0.1644300E+00, 0.2310800E+00, &
     & 0.2040100E+00, 0.1673500E+00, 0.1893200E+00, 0.1636600E+00, &
     & 0.1794600E+00, 0.1786700E+00, 0.1951400E+00, 0.1941900E+00, &
     & 0.1736400E+00, 0.2014900E+00, 0.2119300E+00, 0.2795645E+00, &
     & 0.3104070E+00, 0.3528366E+00, 0.3841525E+00, 0.3841525E+00 /
      data (ref_adm(19,iz,18,13),iz = 1,20) / &
     & 0.1766600E+00, 0.1766600E+00, 0.1546700E+00, 0.1906500E+00, &
     & 0.1854800E+00, 0.1910400E+00, 0.1680700E+00, 0.1677400E+00, &
     & 0.1811300E+00, 0.1859200E+00, 0.1910300E+00, 0.1757700E+00, &
     & 0.1908200E+00, 0.2183600E+00, 0.2275602E+00, 0.2434494E+00, &
     & 0.2562563E+00, 0.2613613E+00, 0.2372878E+00, 0.2372878E+00 /
      data (ref_adm(19,iz,19,13),iz = 1,20) / &
     & 0.1641300E+00, 0.1641300E+00, 0.1820500E+00, 0.1757000E+00, &
     & 0.1719100E+00, 0.1776000E+00, 0.1908800E+00, 0.1606400E+00, &
     & 0.1625300E+00, 0.1899100E+00, 0.1939800E+00, 0.2385300E+00, &
     & 0.2034600E+00, 0.2043400E+00, 0.2038000E+00, 0.2414363E+00, &
     & 0.2538717E+00, 0.2587656E+00, 0.2356503E+00, 0.2356503E+00 /
      data (ref_adm(19,iz,20,13),iz = 1,20) / &
     & 0.1676200E+00, 0.1676200E+00, 0.1713400E+00, 0.1406100E+00, &
     & 0.1609400E+00, 0.1854300E+00, 0.1899900E+00, 0.1634100E+00, &
     & 0.1646300E+00, 0.1985000E+00, 0.1840800E+00, 0.2103200E+00, &
     & 0.1809900E+00, 0.2115800E+00, 0.2110400E+00, 0.2395245E+00, &
     & 0.2515845E+00, 0.2561959E+00, 0.2342152E+00, 0.2342152E+00 /
      data (ref_adm(19,iz,21,13),iz = 1,20) / &
     & 0.1671300E+00, 0.1671300E+00, 0.1651000E+00, 0.1574100E+00, &
     & 0.1761500E+00, 0.1997200E+00, 0.1889300E+00, 0.1870100E+00, &
     & 0.1936600E+00, 0.1925300E+00, 0.1995500E+00, 0.1902600E+00, &
     & 0.2032908E+00, 0.2156900E+00, 0.2258500E+00, 0.2377096E+00, &
     & 0.2492779E+00, 0.2536639E+00, 0.2328351E+00, 0.2328351E+00 /
      data (ref_adm(19,iz,22,13),iz = 1,20) / &
     & 0.1770400E+00, 0.1770400E+00, 0.1662800E+00, 0.1717400E+00, &
     & 0.1826100E+00, 0.1697800E+00, 0.2011100E+00, 0.1828200E+00, &
     & 0.1872500E+00, 0.2121600E+00, 0.1896900E+00, 0.1988700E+00, &
     & 0.2193500E+00, 0.2343100E+00, 0.2659400E+00, 0.2708363E+00, &
     & 0.2902534E+00, 0.3148882E+00, 0.3280074E+00, 0.3280074E+00 /
      data (ref_adm(19,iz,23,13),iz = 1,20) / &
     & 0.1856200E+00, 0.1856200E+00, 0.1929100E+00, 0.1685800E+00, &
     & 0.1683300E+00, 0.1816000E+00, 0.1875258E+00, 0.1820700E+00, &
     & 0.1896600E+00, 0.2021000E+00, 0.2087400E+00, 0.2126300E+00, &
     & 0.2265800E+00, 0.2149900E+00, 0.2270800E+00, 0.2769000E+00, &
     & 0.2915134E+00, 0.3149106E+00, 0.3284281E+00, 0.3284281E+00 /
      data (ref_adm(19,iz,24,13),iz = 1,20) / &
     & 0.1675900E+00, 0.1675900E+00, 0.1697900E+00, 0.1715200E+00, &
     & 0.1862600E+00, 0.1749000E+00, 0.1877600E+00, 0.1912500E+00, &
     & 0.1940600E+00, 0.2049800E+00, 0.2083700E+00, 0.2121800E+00, &
     & 0.2266900E+00, 0.2554700E+00, 0.2568774E+00, 0.2746703E+00, &
     & 0.2538000E+00, 0.3167215E+00, 0.3305541E+00, 0.3305541E+00 /
      data (ref_adm(19,iz,25,13),iz = 1,20) / &
     & 0.1787100E+00, 0.1787100E+00, 0.1778900E+00, 0.1784200E+00, &
     & 0.1842600E+00, 0.1817400E+00, 0.1850100E+00, 0.1851200E+00, &
     & 0.1911700E+00, 0.1959000E+00, 0.2140200E+00, 0.2182000E+00, &
     & 0.2260400E+00, 0.2513200E+00, 0.2553200E+00, 0.2783018E+00, &
     & 0.2970031E+00, 0.3194097E+00, 0.3341254E+00, 0.3341254E+00 /
      data (ref_adm(19,iz,26,13),iz = 1,20) / &
     & 0.1840400E+00, 0.1840400E+00, 0.1730900E+00, 0.1732400E+00, &
     & 0.1778800E+00, 0.1973700E+00, 0.1926100E+00, 0.1957100E+00, &
     & 0.2008000E+00, 0.2127300E+00, 0.2199000E+00, 0.2155900E+00, &
     & 0.2377100E+00, 0.2522600E+00, 0.2562800E+00, 0.2832040E+00, &
     & 0.3020265E+00, 0.3242216E+00, 0.3396116E+00, 0.3396116E+00 /
      data (ref_adm(19,iz,27,13),iz = 1,20) / &
     & 0.1759700E+00, 0.1759700E+00, 0.1647800E+00, 0.1861900E+00, &
     & 0.2026600E+00, 0.1851800E+00, 0.1938800E+00, 0.1979100E+00, &
     & 0.1855600E+00, 0.2109500E+00, 0.2406200E+00, 0.2417800E+00, &
     & 0.2462300E+00, 0.2684500E+00, 0.2713500E+00, 0.2644100E+00, &
     & 0.3079000E+00, 0.3305263E+00, 0.3472471E+00, 0.3472471E+00 /
      data (ref_adm(19,iz,28,13),iz = 1,20) / &
     & 0.1660600E+00, 0.1660600E+00, 0.1679400E+00, 0.1683000E+00, &
     & 0.1843700E+00, 0.1871100E+00, 0.2460500E+00, 0.2013600E+00, &
     & 0.1893400E+00, 0.2112900E+00, 0.1996300E+00, 0.2310100E+00, &
     & 0.2398300E+00, 0.2615500E+00, 0.2899000E+00, 0.2907500E+00, &
     & 0.3024300E+00, 0.3147900E+00, 0.3565451E+00, 0.3565451E+00 /
      data (ref_adm(19,iz,29,13),iz = 1,20) / &
     & 0.1663700E+00, 0.1663700E+00, 0.1927300E+00, 0.1864800E+00, &
     & 0.1814000E+00, 0.1816100E+00, 0.1938900E+00, 0.1993700E+00, &
     & 0.1937600E+00, 0.2196200E+00, 0.2443900E+00, 0.2569600E+00, &
     & 0.2416200E+00, 0.2326800E+00, 0.2627100E+00, 0.2671000E+00, &
     & 0.2772500E+00, 0.3455990E+00, 0.3659917E+00, 0.3659917E+00 /
      data (ref_adm(19,iz,30,13),iz = 1,20) / &
     & 0.1732700E+00, 0.1732700E+00, 0.2089400E+00, 0.1899400E+00, &
     & 0.1835600E+00, 0.1887200E+00, 0.2153900E+00, 0.2378200E+00, &
     & 0.2244700E+00, 0.2060700E+00, 0.2060400E+00, 0.2479500E+00, &
     & 0.2609300E+00, 0.2780300E+00, 0.2875200E+00, 0.2840400E+00, &
     & 0.3129000E+00, 0.3544559E+00, 0.3763772E+00, 0.3763772E+00 /
      data (ref_adm(19,iz,31,13),iz = 1,20) / &
     & 0.1793000E+00, 0.1793000E+00, 0.1842600E+00, 0.1916900E+00, &
     & 0.1829800E+00, 0.1828900E+00, 0.1944900E+00, 0.2095800E+00, &
     & 0.2018700E+00, 0.2166500E+00, 0.2134800E+00, 0.2402300E+00, &
     & 0.2431300E+00, 0.2803841E+00, 0.2750400E+00, 0.3176531E+00, &
     & 0.3213500E+00, 0.3636909E+00, 0.3870374E+00, 0.3870374E+00 /
      data (ref_adm(19,iz,32,13),iz = 1,20) / &
     & 0.1717400E+00, 0.1717400E+00, 0.1936600E+00, 0.2162700E+00, &
     & 0.1929400E+00, 0.2024400E+00, 0.2081600E+00, 0.2092300E+00, &
     & 0.2400500E+00, 0.2963300E+00, 0.2279300E+00, 0.2298300E+00, &
     & 0.2662100E+00, 0.2857539E+00, 0.3034936E+00, 0.3253309E+00, &
     & 0.3472876E+00, 0.3731078E+00, 0.3974641E+00, 0.3974641E+00 /
      data (ref_adm(19,iz,33,13),iz = 1,20) / &
     & 0.1535700E+00, 0.1535700E+00, 0.1720500E+00, 0.1782200E+00, &
     & 0.1832600E+00, 0.1996500E+00, 0.2167600E+00, 0.2153700E+00, &
     & 0.2370100E+00, 0.2302700E+00, 0.2336400E+00, 0.2554600E+00, &
     & 0.2854600E+00, 0.3449000E+00, 0.3217500E+00, 0.3368000E+00, &
     & 0.3297300E+00, 0.3818898E+00, 0.4074399E+00, 0.4074399E+00 /
      data (ref_adm(19,iz,34,13),iz = 1,20) / &
     & 0.1732400E+00, 0.1732400E+00, 0.1655000E+00, 0.2046000E+00, &
     & 0.1793600E+00, 0.2012700E+00, 0.2051700E+00, 0.2243000E+00, &
     & 0.2317700E+00, 0.2395900E+00, 0.2545200E+00, 0.2675100E+00, &
     & 0.2754900E+00, 0.3229100E+00, 0.3305500E+00, 0.3260100E+00, &
     & 0.3190900E+00, 0.3895710E+00, 0.4159797E+00, 0.4159797E+00 /
      data (ref_adm(19,iz,35,13),iz = 1,20) / &
     & 0.1665200E+00, 0.1665200E+00, 0.1799100E+00, 0.2107000E+00, &
     & 0.2287400E+00, 0.1846000E+00, 0.2034800E+00, 0.2298700E+00, &
     & 0.2480200E+00, 0.2372300E+00, 0.2337400E+00, 0.2882500E+00, &
     & 0.2868200E+00, 0.2958249E+00, 0.3058900E+00, 0.3374105E+00, &
     & 0.3640492E+00, 0.3953025E+00, 0.4229747E+00, 0.4229747E+00 /
      data (ref_adm(19,iz,36,13),iz = 1,20) / &
     & 0.1725700E+00, 0.1725700E+00, 0.1929900E+00, 0.1771000E+00, &
     & 0.2228700E+00, 0.1905600E+00, 0.1911700E+00, 0.2500700E+00, &
     & 0.2604000E+00, 0.2591600E+00, 0.2775900E+00, 0.2792800E+00, &
     & 0.3303600E+00, 0.3379500E+00, 0.3180600E+00, 0.3393582E+00, &
     & 0.3655460E+00, 0.3985028E+00, 0.4277787E+00, 0.4277787E+00 /
      data (ref_adm(19,iz,37,13),iz = 1,20) / &
     & 0.1916900E+00, 0.1916900E+00, 0.1835900E+00, 0.1891700E+00, &
     & 0.1796700E+00, 0.1944700E+00, 0.2017000E+00, 0.2181535E+00, &
     & 0.2374500E+00, 0.2640200E+00, 0.2724600E+00, 0.2781800E+00, &
     & 0.3582700E+00, 0.3248000E+00, 0.3491600E+00, 0.3409114E+00, &
     & 0.3664480E+00, 0.3999664E+00, 0.4305764E+00, 0.4305764E+00 /
      data (ref_adm(19,iz,38,13),iz = 1,20) / &
     & 0.1916900E+00, 0.1916900E+00, 0.1835900E+00, 0.1891700E+00, &
     & 0.1796700E+00, 0.1944700E+00, 0.2017000E+00, 0.2181535E+00, &
     & 0.2374500E+00, 0.2640200E+00, 0.2724600E+00, 0.2781800E+00, &
     & 0.3582700E+00, 0.3248000E+00, 0.3491600E+00, 0.3409114E+00, &
     & 0.3664480E+00, 0.3999664E+00, 0.4305764E+00, 0.4305764E+00 /
! Solar Zenith Angle 65.0 Albedo  0.2346436E+00
      data (ref_adm(19,iz, 1,14),iz = 1,20) / &
     & 0.1840400E+00, 0.1840400E+00, 0.1730700E+00, 0.1976500E+00, &
     & 0.1731500E+00, 0.1773700E+00, 0.1830400E+00, 0.1867600E+00, &
     & 0.1846000E+00, 0.1872100E+00, 0.2056800E+00, 0.2252200E+00, &
     & 0.3009800E+00, 0.2937500E+00, 0.4017800E+00, 0.4243200E+00, &
     & 0.5047373E+00, 0.7677565E+00, 0.1424169E+01, 0.1424169E+01 /
      data (ref_adm(19,iz, 2,14),iz = 1,20) / &
     & 0.1840400E+00, 0.1840400E+00, 0.1730700E+00, 0.1976500E+00, &
     & 0.1731500E+00, 0.1773700E+00, 0.1830400E+00, 0.1867600E+00, &
     & 0.1846000E+00, 0.1872100E+00, 0.2056800E+00, 0.2252200E+00, &
     & 0.3009800E+00, 0.2937500E+00, 0.4017800E+00, 0.4243200E+00, &
     & 0.5047373E+00, 0.7677565E+00, 0.1424169E+01, 0.1424169E+01 /
      data (ref_adm(19,iz, 3,14),iz = 1,20) / &
     & 0.1713400E+00, 0.1713400E+00, 0.1731600E+00, 0.1678700E+00, &
     & 0.1864500E+00, 0.1722800E+00, 0.1728400E+00, 0.1727800E+00, &
     & 0.1756100E+00, 0.1845000E+00, 0.1921000E+00, 0.2030300E+00, &
     & 0.2308700E+00, 0.2776400E+00, 0.2904700E+00, 0.4075400E+00, &
     & 0.5206100E+00, 0.7412084E+00, 0.2035651E-07, 0.2035651E-07 /
      data (ref_adm(19,iz, 4,14),iz = 1,20) / &
     & 0.1820600E+00, 0.1820600E+00, 0.1803700E+00, 0.1726800E+00, &
     & 0.1961400E+00, 0.1736900E+00, 0.1939900E+00, 0.2118500E+00, &
     & 0.1723400E+00, 0.1967900E+00, 0.1892900E+00, 0.2121800E+00, &
     & 0.2377500E+00, 0.2553200E+00, 0.3136200E+00, 0.2926800E+00, &
     & 0.4606500E+00, 0.6933545E+00, 0.1131723E+01, 0.1131723E+01 /
      data (ref_adm(19,iz, 5,14),iz = 1,20) / &
     & 0.1651100E+00, 0.1651100E+00, 0.1707200E+00, 0.1657000E+00, &
     & 0.1685900E+00, 0.1775200E+00, 0.1854400E+00, 0.2044600E+00, &
     & 0.1765600E+00, 0.1811400E+00, 0.1921600E+00, 0.2092800E+00, &
     & 0.2226200E+00, 0.2049900E+00, 0.2584300E+00, 0.2708300E+00, &
     & 0.4706803E+00, 0.6400980E+00, 0.9536451E+00, 0.9536451E+00 /
      data (ref_adm(19,iz, 6,14),iz = 1,20) / &
     & 0.1743900E+00, 0.1743900E+00, 0.1650800E+00, 0.1633900E+00, &
     & 0.1648400E+00, 0.1694900E+00, 0.1701900E+00, 0.1773600E+00, &
     & 0.1805000E+00, 0.1872900E+00, 0.2031900E+00, 0.2280000E+00, &
     & 0.2543500E+00, 0.2458400E+00, 0.2815200E+00, 0.3337100E+00, &
     & 0.4596535E+00, 0.5913753E+00, 0.8196191E+00, 0.8196191E+00 /
      data (ref_adm(19,iz, 7,14),iz = 1,20) / &
     & 0.1682200E+00, 0.1682200E+00, 0.1587400E+00, 0.1602800E+00, &
     & 0.1601100E+00, 0.1673300E+00, 0.1855200E+00, 0.1940100E+00, &
     & 0.1710900E+00, 0.1889800E+00, 0.1992800E+00, 0.2362900E+00, &
     & 0.2393400E+00, 0.2420100E+00, 0.2818800E+00, 0.3220500E+00, &
     & 0.3256800E+00, 0.3453200E+00, 0.7160294E+00, 0.7160294E+00 /
      data (ref_adm(19,iz, 8,14),iz = 1,20) / &
     & 0.1679800E+00, 0.1679800E+00, 0.1540200E+00, 0.1579600E+00, &
     & 0.1555600E+00, 0.1470700E+00, 0.1949700E+00, 0.1726600E+00, &
     & 0.1796600E+00, 0.1884700E+00, 0.2248300E+00, 0.2394100E+00, &
     & 0.2424000E+00, 0.2388200E+00, 0.2591400E+00, 0.2406900E+00, &
     & 0.4362033E+00, 0.5405746E+00, 0.6559533E+00, 0.6559533E+00 /
      data (ref_adm(19,iz, 9,14),iz = 1,20) / &
     & 0.1641300E+00, 0.1641300E+00, 0.1626800E+00, 0.1551000E+00, &
     & 0.1581500E+00, 0.1794700E+00, 0.1817500E+00, 0.1742100E+00, &
     & 0.1895500E+00, 0.1798400E+00, 0.1942300E+00, 0.1957800E+00, &
     & 0.2252200E+00, 0.2577400E+00, 0.2686700E+00, 0.2646100E+00, &
     & 0.4171241E+00, 0.5203652E+00, 0.6349051E+00, 0.6349051E+00 /
      data (ref_adm(19,iz,10,14),iz = 1,20) / &
     & 0.1748200E+00, 0.1748200E+00, 0.1698400E+00, 0.1592100E+00, &
     & 0.1817200E+00, 0.1691300E+00, 0.1625800E+00, 0.1742200E+00, &
     & 0.1683400E+00, 0.1783400E+00, 0.2095000E+00, 0.1915800E+00, &
     & 0.2220300E+00, 0.2738900E+00, 0.2848900E+00, 0.2516700E+00, &
     & 0.4020521E+00, 0.3699700E+00, 0.5934401E+00, 0.5934401E+00 /
      data (ref_adm(19,iz,11,14),iz = 1,20) / &
     & 0.1608200E+00, 0.1608200E+00, 0.1625100E+00, 0.2179700E+00, &
     & 0.1715600E+00, 0.1803000E+00, 0.2153400E+00, 0.2152400E+00, &
     & 0.1655700E+00, 0.1949000E+00, 0.2002800E+00, 0.1766000E+00, &
     & 0.2063800E+00, 0.2956800E+00, 0.2706300E+00, 0.2694500E+00, &
     & 0.3896332E+00, 0.4663554E+00, 0.5497020E+00, 0.5497020E+00 /
      data (ref_adm(19,iz,12,14),iz = 1,20) / &
     & 0.1832300E+00, 0.1832300E+00, 0.1688900E+00, 0.1618600E+00, &
     & 0.1721300E+00, 0.1877500E+00, 0.1891300E+00, 0.1790000E+00, &
     & 0.1795500E+00, 0.1831100E+00, 0.1974100E+00, 0.1948900E+00, &
     & 0.1973000E+00, 0.2092700E+00, 0.2523200E+00, 0.2940000E+00, &
     & 0.3801023E+00, 0.4501012E+00, 0.5217384E+00, 0.5217384E+00 /
      data (ref_adm(19,iz,13,14),iz = 1,20) / &
     & 0.1643400E+00, 0.1643400E+00, 0.1558700E+00, 0.1659200E+00, &
     & 0.2022300E+00, 0.2118700E+00, 0.1642300E+00, 0.1765500E+00, &
     & 0.1691600E+00, 0.1896300E+00, 0.1997900E+00, 0.1866100E+00, &
     & 0.3034700E+00, 0.2118500E+00, 0.2868822E+00, 0.3020900E+00, &
     & 0.3720959E+00, 0.4373987E+00, 0.5011661E+00, 0.5011661E+00 /
      data (ref_adm(19,iz,14,14),iz = 1,20) / &
     & 0.1762600E+00, 0.1762600E+00, 0.1787000E+00, 0.1797000E+00, &
     & 0.1722100E+00, 0.1667500E+00, 0.1652200E+00, 0.1705700E+00, &
     & 0.1774900E+00, 0.1799300E+00, 0.1885500E+00, 0.1816800E+00, &
     & 0.2012000E+00, 0.2316900E+00, 0.2324000E+00, 0.2610200E+00, &
     & 0.3646240E+00, 0.4275666E+00, 0.4856126E+00, 0.4856126E+00 /
      data (ref_adm(19,iz,15,14),iz = 1,20) / &
     & 0.1794600E+00, 0.1794600E+00, 0.1703800E+00, 0.1656100E+00, &
     & 0.1652400E+00, 0.1659300E+00, 0.1657500E+00, 0.1758800E+00, &
     & 0.1780100E+00, 0.1835500E+00, 0.1914300E+00, 0.1973000E+00, &
     & 0.2029800E+00, 0.2225300E+00, 0.2408400E+00, 0.2117300E+00, &
     & 0.3566597E+00, 0.4181441E+00, 0.4723624E+00, 0.4723624E+00 /
      data (ref_adm(19,iz,16,14),iz = 1,20) / &
     & 0.1682200E+00, 0.1682200E+00, 0.1621800E+00, 0.1634800E+00, &
     & 0.1614200E+00, 0.1601600E+00, 0.1648000E+00, 0.1728000E+00, &
     & 0.1760400E+00, 0.1806000E+00, 0.1826600E+00, 0.1917200E+00, &
     & 0.2077800E+00, 0.2141300E+00, 0.2001200E+00, 0.2136800E+00, &
     & 0.3488829E+00, 0.4069917E+00, 0.4583456E+00, 0.4583456E+00 /
      data (ref_adm(19,iz,17,14),iz = 1,20) / &
     & 0.1704900E+00, 0.1704900E+00, 0.1599700E+00, 0.1692000E+00, &
     & 0.1765600E+00, 0.1625300E+00, 0.1887500E+00, 0.1772200E+00, &
     & 0.1818400E+00, 0.1859500E+00, 0.1931900E+00, 0.1904400E+00, &
     & 0.2094300E+00, 0.2437200E+00, 0.2754600E+00, 0.3033056E+00, &
     & 0.3422699E+00, 0.3973648E+00, 0.4434471E+00, 0.4434471E+00 /
      data (ref_adm(19,iz,18,14),iz = 1,20) / &
     & 0.1640300E+00, 0.1640300E+00, 0.1620800E+00, 0.1636900E+00, &
     & 0.1710700E+00, 0.1948800E+00, 0.1890500E+00, 0.1904800E+00, &
     & 0.1781700E+00, 0.1824300E+00, 0.1839900E+00, 0.1785900E+00, &
     & 0.2018200E+00, 0.2320800E+00, 0.2544800E+00, 0.2482700E+00, &
     & 0.2701894E+00, 0.2761358E+00, 0.2512108E+00, 0.2512108E+00 /
      data (ref_adm(19,iz,19,14),iz = 1,20) / &
     & 0.1696400E+00, 0.1696400E+00, 0.1612400E+00, 0.1598500E+00, &
     & 0.1595400E+00, 0.1628000E+00, 0.1759100E+00, 0.1723300E+00, &
     & 0.1820500E+00, 0.2008800E+00, 0.1832900E+00, 0.1841500E+00, &
     & 0.2038700E+00, 0.2217100E+00, 0.2340100E+00, 0.2530457E+00, &
     & 0.2664576E+00, 0.2724387E+00, 0.2482821E+00, 0.2482821E+00 /
      data (ref_adm(19,iz,20,14),iz = 1,20) / &
     & 0.1892600E+00, 0.1892600E+00, 0.1556300E+00, 0.1592200E+00, &
     & 0.1638500E+00, 0.1752900E+00, 0.1767900E+00, 0.1663900E+00, &
     & 0.1731500E+00, 0.1909700E+00, 0.1975800E+00, 0.1802100E+00, &
     & 0.2141500E+00, 0.2135900E+00, 0.2385900E+00, 0.2496852E+00, &
     & 0.2627394E+00, 0.2681212E+00, 0.2459743E+00, 0.2459743E+00 /
      data (ref_adm(19,iz,21,14),iz = 1,20) / &
     & 0.1652700E+00, 0.1652700E+00, 0.1543100E+00, 0.1833300E+00, &
     & 0.1639700E+00, 0.1675000E+00, 0.1696300E+00, 0.1815700E+00, &
     & 0.1845100E+00, 0.1845800E+00, 0.2155700E+00, 0.2125300E+00, &
     & 0.2015600E+00, 0.2213000E+00, 0.2462600E+00, 0.2467764E+00, &
     & 0.2592327E+00, 0.2642045E+00, 0.2438133E+00, 0.2438133E+00 /
      data (ref_adm(19,iz,22,14),iz = 1,20) / &
     & 0.1662900E+00, 0.1662900E+00, 0.1703700E+00, 0.2002700E+00, &
     & 0.1574300E+00, 0.1958300E+00, 0.2191700E+00, 0.1790200E+00, &
     & 0.1926700E+00, 0.1937200E+00, 0.2082500E+00, 0.2149900E+00, &
     & 0.2238000E+00, 0.2342900E+00, 0.2331800E+00, 0.2772300E+00, &
     & 0.3457767E+00, 0.3892205E+00, 0.4263070E+00, 0.4263070E+00 /
      data (ref_adm(19,iz,23,14),iz = 1,20) / &
     & 0.1697300E+00, 0.1697300E+00, 0.1838800E+00, 0.1646400E+00, &
     & 0.1614200E+00, 0.1613200E+00, 0.1714300E+00, 0.1947400E+00, &
     & 0.1973500E+00, 0.2072600E+00, 0.2041000E+00, 0.2075700E+00, &
     & 0.2239000E+00, 0.2436200E+00, 0.2436000E+00, 0.3060700E+00, &
     & 0.3467288E+00, 0.3890408E+00, 0.4271047E+00, 0.4271047E+00 /
      data (ref_adm(19,iz,24,14),iz = 1,20) / &
     & 0.1658500E+00, 0.1658500E+00, 0.1700700E+00, 0.1736100E+00, &
     & 0.1711300E+00, 0.1771100E+00, 0.1889200E+00, 0.2023700E+00, &
     & 0.2013100E+00, 0.2023700E+00, 0.2040700E+00, 0.2231700E+00, &
     & 0.2410500E+00, 0.2680745E+00, 0.2954000E+00, 0.3174185E+00, &
     & 0.3491797E+00, 0.3913738E+00, 0.4312102E+00, 0.4312102E+00 /
      data (ref_adm(19,iz,25,14),iz = 1,20) / &
     & 0.1668400E+00, 0.1668400E+00, 0.1713400E+00, 0.1832600E+00, &
     & 0.1844900E+00, 0.1885700E+00, 0.2007100E+00, 0.2111700E+00, &
     & 0.2342400E+00, 0.2100000E+00, 0.2225400E+00, 0.2362700E+00, &
     & 0.2345700E+00, 0.2444900E+00, 0.2736300E+00, 0.2728700E+00, &
     & 0.3536434E+00, 0.3954706E+00, 0.4373704E+00, 0.4373704E+00 /
      data (ref_adm(19,iz,26,14),iz = 1,20) / &
     & 0.1719300E+00, 0.1719300E+00, 0.1889200E+00, 0.1796400E+00, &
     & 0.1998300E+00, 0.1979300E+00, 0.1953900E+00, 0.1946300E+00, &
     & 0.2143200E+00, 0.2303500E+00, 0.2246100E+00, 0.2270800E+00, &
     & 0.2449100E+00, 0.2638300E+00, 0.3034000E+00, 0.3278235E+00, &
     & 0.3602619E+00, 0.4027625E+00, 0.4479650E+00, 0.4479650E+00 /
      data (ref_adm(19,iz,27,14),iz = 1,20) / &
     & 0.1672900E+00, 0.1672900E+00, 0.1828300E+00, 0.1753100E+00, &
     & 0.1886200E+00, 0.1818800E+00, 0.2097400E+00, 0.1896700E+00, &
     & 0.2184200E+00, 0.2087400E+00, 0.2246900E+00, 0.2407000E+00, &
     & 0.2637700E+00, 0.3234100E+00, 0.3043773E+00, 0.3346661E+00, &
     & 0.3681540E+00, 0.4123873E+00, 0.4615908E+00, 0.4615908E+00 /
      data (ref_adm(19,iz,28,14),iz = 1,20) / &
     & 0.1673800E+00, 0.1673800E+00, 0.1813200E+00, 0.1783200E+00, &
     & 0.1839900E+00, 0.1941200E+00, 0.1931900E+00, 0.2003100E+00, &
     & 0.2076000E+00, 0.2116500E+00, 0.2125800E+00, 0.2435700E+00, &
     & 0.2806300E+00, 0.2805100E+00, 0.2849800E+00, 0.2684900E+00, &
     & 0.3775299E+00, 0.4229035E+00, 0.3091800E+00, 0.3091800E+00 /
      data (ref_adm(19,iz,29,14),iz = 1,20) / &
     & 0.1728200E+00, 0.1728200E+00, 0.1718600E+00, 0.1771500E+00, &
     & 0.1865300E+00, 0.1966200E+00, 0.2152200E+00, 0.2125300E+00, &
     & 0.2139700E+00, 0.2344200E+00, 0.2303800E+00, 0.2250600E+00, &
     & 0.2810500E+00, 0.3014300E+00, 0.3380100E+00, 0.3522910E+00, &
     & 0.3580900E+00, 0.4357289E+00, 0.4933518E+00, 0.4933518E+00 /
      data (ref_adm(19,iz,30,14),iz = 1,20) / &
     & 0.1932800E+00, 0.1932800E+00, 0.1713600E+00, 0.1885000E+00, &
     & 0.2004600E+00, 0.1868000E+00, 0.2057600E+00, 0.2168000E+00, &
     & 0.2328600E+00, 0.2475600E+00, 0.2294200E+00, 0.2555400E+00, &
     & 0.2770200E+00, 0.2928200E+00, 0.3622700E+00, 0.3605900E+00, &
     & 0.4002726E+00, 0.4496503E+00, 0.5112657E+00, 0.5112657E+00 /
      data (ref_adm(19,iz,31,14),iz = 1,20) / &
     & 0.1760800E+00, 0.1760800E+00, 0.1828200E+00, 0.1996800E+00, &
     & 0.1956200E+00, 0.1871100E+00, 0.2106500E+00, 0.2155400E+00, &
     & 0.2140200E+00, 0.2395900E+00, 0.2457300E+00, 0.2661400E+00, &
     & 0.2659900E+00, 0.2838000E+00, 0.2911000E+00, 0.3561100E+00, &
     & 0.3264600E+00, 0.4646257E+00, 0.5302658E+00, 0.5302658E+00 /
      data (ref_adm(19,iz,32,14),iz = 1,20) / &
     & 0.1683800E+00, 0.1683800E+00, 0.1816000E+00, 0.1807500E+00, &
     & 0.1892500E+00, 0.1963400E+00, 0.2064900E+00, 0.2101600E+00, &
     & 0.2221800E+00, 0.2400500E+00, 0.2674400E+00, 0.2813700E+00, &
     & 0.3100500E+00, 0.3270900E+00, 0.3165200E+00, 0.3356600E+00, &
     & 0.4244398E+00, 0.4791397E+00, 0.5485491E+00, 0.5485491E+00 /
      data (ref_adm(19,iz,33,14),iz = 1,20) / &
     & 0.1843900E+00, 0.1843900E+00, 0.1788800E+00, 0.1955500E+00, &
     & 0.1977200E+00, 0.2098300E+00, 0.2151900E+00, 0.2263000E+00, &
     & 0.2394700E+00, 0.2493300E+00, 0.2529900E+00, 0.2982000E+00, &
     & 0.3229100E+00, 0.3427500E+00, 0.3500100E+00, 0.3966300E+00, &
     & 0.4327491E+00, 0.4922656E+00, 0.5654794E+00, 0.5654794E+00 /
      data (ref_adm(19,iz,34,14),iz = 1,20) / &
     & 0.1733100E+00, 0.1733100E+00, 0.1961900E+00, 0.1917300E+00, &
     & 0.2006100E+00, 0.1993700E+00, 0.2072100E+00, 0.2329100E+00, &
     & 0.2157600E+00, 0.2471500E+00, 0.2632600E+00, 0.2912100E+00, &
     & 0.3366700E+00, 0.3496500E+00, 0.3429800E+00, 0.4126500E+00, &
     & 0.4353182E+00, 0.4981596E+00, 0.5792418E+00, 0.5792418E+00 /
      data (ref_adm(19,iz,35,14),iz = 1,20) / &
     & 0.1705400E+00, 0.1705400E+00, 0.2043200E+00, 0.1963300E+00, &
     & 0.2147200E+00, 0.2056800E+00, 0.1977700E+00, 0.2198600E+00, &
     & 0.2431900E+00, 0.2447200E+00, 0.2919400E+00, 0.3141900E+00, &
     & 0.3212600E+00, 0.3375300E+00, 0.4113900E+00, 0.3864000E+00, &
     & 0.4379583E+00, 0.4996166E+00, 0.5868805E+00, 0.5868805E+00 /
      data (ref_adm(19,iz,36,14),iz = 1,20) / &
     & 0.1744500E+00, 0.1744500E+00, 0.1720400E+00, 0.1830400E+00, &
     & 0.1949800E+00, 0.1964500E+00, 0.2292000E+00, 0.2195300E+00, &
     & 0.2411200E+00, 0.2436200E+00, 0.2926800E+00, 0.3163300E+00, &
     & 0.3388700E+00, 0.4101900E+00, 0.3920700E+00, 0.4193000E+00, &
     & 0.4422653E+00, 0.5009109E+00, 0.5893806E+00, 0.5893806E+00 /
      data (ref_adm(19,iz,37,14),iz = 1,20) / &
     & 0.1688700E+00, 0.1688700E+00, 0.1645900E+00, 0.1900900E+00, &
     & 0.1817900E+00, 0.2003000E+00, 0.2173100E+00, 0.2332700E+00, &
     & 0.2333300E+00, 0.2740200E+00, 0.3045700E+00, 0.3301400E+00, &
     & 0.3183900E+00, 0.3666300E+00, 0.4358500E+00, 0.4721100E+00, &
     & 0.4457700E+00, 0.5025482E+00, 0.5903782E+00, 0.5903782E+00 /
      data (ref_adm(19,iz,38,14),iz = 1,20) / &
     & 0.1688700E+00, 0.1688700E+00, 0.1645900E+00, 0.1900900E+00, &
     & 0.1817900E+00, 0.2003000E+00, 0.2173100E+00, 0.2332700E+00, &
     & 0.2333300E+00, 0.2740200E+00, 0.3045700E+00, 0.3301400E+00, &
     & 0.3183900E+00, 0.3666300E+00, 0.4358500E+00, 0.4721100E+00, &
     & 0.4457700E+00, 0.5025482E+00, 0.5903782E+00, 0.5903782E+00 /
! Solar Zenith Angle 70.0 Albedo  0.2441238E+00
      data (ref_adm(19,iz, 1,15),iz = 1,20) / &
     & 0.1801400E+00, 0.1801400E+00, 0.1742200E+00, 0.1693700E+00, &
     & 0.1667600E+00, 0.1616500E+00, 0.1771600E+00, 0.1822200E+00, &
     & 0.1987000E+00, 0.2115800E+00, 0.2198000E+00, 0.2102400E+00, &
     & 0.5451000E+00, 0.3502700E+00, 0.3955953E+00, 0.5296875E+00, &
     & 0.8217700E+00, 0.1597616E+01, 0.1911102E+01, 0.1911102E+01 /
      data (ref_adm(19,iz, 2,15),iz = 1,20) / &
     & 0.1801400E+00, 0.1801400E+00, 0.1742200E+00, 0.1693700E+00, &
     & 0.1667600E+00, 0.1616500E+00, 0.1771600E+00, 0.1822200E+00, &
     & 0.1987000E+00, 0.2115800E+00, 0.2198000E+00, 0.2102400E+00, &
     & 0.5451000E+00, 0.3502700E+00, 0.3955953E+00, 0.5296875E+00, &
     & 0.8217700E+00, 0.1597616E+01, 0.1911102E+01, 0.1911102E+01 /
      data (ref_adm(19,iz, 3,15),iz = 1,20) / &
     & 0.1707200E+00, 0.1707200E+00, 0.1691400E+00, 0.1575500E+00, &
     & 0.1521800E+00, 0.1594000E+00, 0.2025100E+00, 0.1793000E+00, &
     & 0.1927700E+00, 0.1978900E+00, 0.2218100E+00, 0.2213600E+00, &
     & 0.2649300E+00, 0.3127000E+00, 0.4844200E+00, 0.5186684E+00, &
     & 0.7800310E+00, 0.1608334E+01, 0.3121279E-07, 0.3121279E-07 /
      data (ref_adm(19,iz, 4,15),iz = 1,20) / &
     & 0.1679000E+00, 0.1679000E+00, 0.1597500E+00, 0.1464100E+00, &
     & 0.1685300E+00, 0.1775900E+00, 0.1697400E+00, 0.1791500E+00, &
     & 0.1832600E+00, 0.1895800E+00, 0.1939400E+00, 0.2034200E+00, &
     & 0.2523400E+00, 0.3280549E+00, 0.3644500E+00, 0.7384000E+00, &
     & 0.7073290E+00, 0.1434965E+01, 0.2203737E+01, 0.2203737E+01 /
      data (ref_adm(19,iz, 5,15),iz = 1,20) / &
     & 0.1659300E+00, 0.1659300E+00, 0.1656100E+00, 0.1630100E+00, &
     & 0.1710500E+00, 0.1764500E+00, 0.1789900E+00, 0.1820500E+00, &
     & 0.1864800E+00, 0.1869400E+00, 0.1935500E+00, 0.2338500E+00, &
     & 0.2854778E+00, 0.2119800E+00, 0.2982900E+00, 0.4719277E+00, &
     & 0.6350883E+00, 0.1100409E+01, 0.2175997E+01, 0.2175997E+01 /
      data (ref_adm(19,iz, 6,15),iz = 1,20) / &
     & 0.1714500E+00, 0.1714500E+00, 0.1673000E+00, 0.1661900E+00, &
     & 0.1686500E+00, 0.1763300E+00, 0.1659400E+00, 0.1690100E+00, &
     & 0.1809900E+00, 0.1894600E+00, 0.2011100E+00, 0.2264400E+00, &
     & 0.2265500E+00, 0.2724800E+00, 0.2366000E+00, 0.3048700E+00, &
     & 0.5761729E+00, 0.8782290E+00, 0.1469411E+01, 0.1469411E+01 /
      data (ref_adm(19,iz, 7,15),iz = 1,20) / &
     & 0.1678200E+00, 0.1678200E+00, 0.1631100E+00, 0.1654600E+00, &
     & 0.1646000E+00, 0.1700900E+00, 0.1706900E+00, 0.1602400E+00, &
     & 0.1766200E+00, 0.1811300E+00, 0.2112800E+00, 0.3100100E+00, &
     & 0.2311200E+00, 0.2251700E+00, 0.3616788E+00, 0.2702900E+00, &
     & 0.5302180E+00, 0.7396960E+00, 0.1086938E+01, 0.1086938E+01 /
      data (ref_adm(19,iz, 8,15),iz = 1,20) / &
     & 0.1607400E+00, 0.1607400E+00, 0.1524800E+00, 0.1477300E+00, &
     & 0.1444400E+00, 0.1804700E+00, 0.1670200E+00, 0.1618600E+00, &
     & 0.1534100E+00, 0.1754300E+00, 0.2109600E+00, 0.2428300E+00, &
     & 0.2363800E+00, 0.2056100E+00, 0.2580400E+00, 0.3389700E+00, &
     & 0.5067587E+00, 0.6587546E+00, 0.8959555E+00, 0.8959555E+00 /
      data (ref_adm(19,iz, 9,15),iz = 1,20) / &
     & 0.1733600E+00, 0.1733600E+00, 0.1691200E+00, 0.1525400E+00, &
     & 0.1568800E+00, 0.1544000E+00, 0.1604800E+00, 0.1506400E+00, &
     & 0.1755600E+00, 0.1903700E+00, 0.1753900E+00, 0.2063800E+00, &
     & 0.2232400E+00, 0.2638400E+00, 0.2433400E+00, 0.4047905E+00, &
     & 0.4905728E+00, 0.6207622E+00, 0.7941582E+00, 0.7941582E+00 /
      data (ref_adm(19,iz,10,15),iz = 1,20) / &
     & 0.1702400E+00, 0.1702400E+00, 0.1717300E+00, 0.1653300E+00, &
     & 0.1615500E+00, 0.1624400E+00, 0.1532600E+00, 0.1640100E+00, &
     & 0.1654600E+00, 0.1820700E+00, 0.1741100E+00, 0.2046100E+00, &
     & 0.2443600E+00, 0.2528700E+00, 0.2641300E+00, 0.3118100E+00, &
     & 0.4636783E+00, 0.5925612E+00, 0.7576857E+00, 0.7576857E+00 /
      data (ref_adm(19,iz,11,15),iz = 1,20) / &
     & 0.1530100E+00, 0.1530100E+00, 0.1632900E+00, 0.1655000E+00, &
     & 0.1599200E+00, 0.1931400E+00, 0.1485100E+00, 0.1730400E+00, &
     & 0.1830500E+00, 0.1787100E+00, 0.1904700E+00, 0.2052700E+00, &
     & 0.2192400E+00, 0.2561900E+00, 0.3016000E+00, 0.3730733E+00, &
     & 0.4409471E+00, 0.5518189E+00, 0.6954544E+00, 0.6954544E+00 /
      data (ref_adm(19,iz,12,15),iz = 1,20) / &
     & 0.1599200E+00, 0.1599200E+00, 0.1621700E+00, 0.1590800E+00, &
     & 0.1674200E+00, 0.1790400E+00, 0.1661200E+00, 0.1748300E+00, &
     & 0.1814300E+00, 0.1684400E+00, 0.1950000E+00, 0.2041500E+00, &
     & 0.2228200E+00, 0.2122600E+00, 0.3112276E+00, 0.2591300E+00, &
     & 0.4248152E+00, 0.5234035E+00, 0.6457419E+00, 0.6457419E+00 /
      data (ref_adm(19,iz,13,15),iz = 1,20) / &
     & 0.1628900E+00, 0.1628900E+00, 0.1412500E+00, 0.1449300E+00, &
     & 0.1604500E+00, 0.1636000E+00, 0.1729800E+00, 0.1830600E+00, &
     & 0.1819400E+00, 0.1991200E+00, 0.1982000E+00, 0.2053800E+00, &
     & 0.2284500E+00, 0.2360200E+00, 0.2287100E+00, 0.3539265E+00, &
     & 0.4124822E+00, 0.5031229E+00, 0.6122482E+00, 0.6122482E+00 /
      data (ref_adm(19,iz,14,15),iz = 1,20) / &
     & 0.1533100E+00, 0.1533100E+00, 0.1743000E+00, 0.1846200E+00, &
     & 0.1704800E+00, 0.1742500E+00, 0.1580400E+00, 0.1699600E+00, &
     & 0.1823700E+00, 0.1906700E+00, 0.1870300E+00, 0.1975200E+00, &
     & 0.2155700E+00, 0.2318000E+00, 0.2376600E+00, 0.2503800E+00, &
     & 0.4028145E+00, 0.4889877E+00, 0.5886427E+00, 0.5886427E+00 /
      data (ref_adm(19,iz,15,15),iz = 1,20) / &
     & 0.1657600E+00, 0.1657600E+00, 0.1725500E+00, 0.1679600E+00, &
     & 0.1637600E+00, 0.1725900E+00, 0.1699900E+00, 0.1720300E+00, &
     & 0.1758200E+00, 0.1898900E+00, 0.2040600E+00, 0.2072500E+00, &
     & 0.2303900E+00, 0.2376000E+00, 0.2685400E+00, 0.2668800E+00, &
     & 0.2655200E+00, 0.4770310E+00, 0.5697806E+00, 0.5697806E+00 /
      data (ref_adm(19,iz,16,15),iz = 1,20) / &
     & 0.1726500E+00, 0.1726500E+00, 0.1692100E+00, 0.1590400E+00, &
     & 0.1560500E+00, 0.1600100E+00, 0.1552100E+00, 0.1655700E+00, &
     & 0.1768200E+00, 0.1889100E+00, 0.1838100E+00, 0.1920200E+00, &
     & 0.2115700E+00, 0.2146600E+00, 0.2895300E+00, 0.2619200E+00, &
     & 0.3832786E+00, 0.4636524E+00, 0.5517031E+00, 0.5517031E+00 /
      data (ref_adm(19,iz,17,15),iz = 1,20) / &
     & 0.1644000E+00, 0.1644000E+00, 0.1682300E+00, 0.1679600E+00, &
     & 0.1614100E+00, 0.1677400E+00, 0.1682300E+00, 0.1807300E+00, &
     & 0.1883300E+00, 0.2072800E+00, 0.1962500E+00, 0.2025400E+00, &
     & 0.2489300E+00, 0.2359300E+00, 0.2559300E+00, 0.3243086E+00, &
     & 0.3744404E+00, 0.4503296E+00, 0.5317447E+00, 0.5317447E+00 /
      data (ref_adm(19,iz,18,15),iz = 1,20) / &
     & 0.1693200E+00, 0.1693200E+00, 0.1475200E+00, 0.1821000E+00, &
     & 0.1592000E+00, 0.1769000E+00, 0.1632100E+00, 0.1685000E+00, &
     & 0.1837600E+00, 0.2008800E+00, 0.1938300E+00, 0.2109300E+00, &
     & 0.2060900E+00, 0.2151700E+00, 0.2560300E+00, 0.2674833E+00, &
     & 0.2828053E+00, 0.2894566E+00, 0.2636587E+00, 0.2636587E+00 /
      data (ref_adm(19,iz,19,15),iz = 1,20) / &
     & 0.1544500E+00, 0.1544500E+00, 0.1604800E+00, 0.1633900E+00, &
     & 0.1593100E+00, 0.1668400E+00, 0.1679300E+00, 0.1620200E+00, &
     & 0.1796800E+00, 0.2005800E+00, 0.1957800E+00, 0.2122100E+00, &
     & 0.2294700E+00, 0.2499600E+00, 0.2450597E+00, 0.2636443E+00, &
     & 0.2780359E+00, 0.2846501E+00, 0.2599432E+00, 0.2599432E+00 /
      data (ref_adm(19,iz,20,15),iz = 1,20) / &
     & 0.1590400E+00, 0.1590400E+00, 0.1725500E+00, 0.2166500E+00, &
     & 0.1652200E+00, 0.1709100E+00, 0.1898000E+00, 0.1818100E+00, &
     & 0.1823200E+00, 0.1920900E+00, 0.1641700E+00, 0.2144400E+00, &
     & 0.2282900E+00, 0.2393600E+00, 0.2566500E+00, 0.2594696E+00, &
     & 0.2735446E+00, 0.2796180E+00, 0.2570515E+00, 0.2570515E+00 /
      data (ref_adm(19,iz,21,15),iz = 1,20) / &
     & 0.1579100E+00, 0.1579100E+00, 0.1640600E+00, 0.1752900E+00, &
     & 0.2048000E+00, 0.1893100E+00, 0.1837600E+00, 0.1984500E+00, &
     & 0.1792800E+00, 0.2118000E+00, 0.1977500E+00, 0.2114800E+00, &
     & 0.2336100E+00, 0.2433800E+00, 0.2187600E+00, 0.2559617E+00, &
     & 0.2689398E+00, 0.2745884E+00, 0.2544299E+00, 0.2544299E+00 /
      data (ref_adm(19,iz,22,15),iz = 1,20) / &
     & 0.1910400E+00, 0.1910400E+00, 0.1662500E+00, 0.1629800E+00, &
     & 0.1849400E+00, 0.1765300E+00, 0.1967100E+00, 0.2001400E+00, &
     & 0.1877000E+00, 0.1941500E+00, 0.1988300E+00, 0.2090900E+00, &
     & 0.2133600E+00, 0.2505300E+00, 0.2787047E+00, 0.3042206E+00, &
     & 0.3323200E+00, 0.3693539E+00, 0.3970456E+00, 0.3970456E+00 /
      data (ref_adm(19,iz,23,15),iz = 1,20) / &
     & 0.1687600E+00, 0.1687600E+00, 0.1755800E+00, 0.1617700E+00, &
     & 0.1739300E+00, 0.1601600E+00, 0.1804600E+00, 0.1825400E+00, &
     & 0.1923100E+00, 0.1964200E+00, 0.2101500E+00, 0.2085500E+00, &
     & 0.2290300E+00, 0.3018200E+00, 0.2800764E+00, 0.3054754E+00, &
     & 0.3334014E+00, 0.3692709E+00, 0.3977248E+00, 0.3977248E+00 /
      data (ref_adm(19,iz,24,15),iz = 1,20) / &
     & 0.1579000E+00, 0.1579000E+00, 0.1649200E+00, 0.1666100E+00, &
     & 0.1704100E+00, 0.1795100E+00, 0.1889700E+00, 0.2076100E+00, &
     & 0.1958400E+00, 0.1976000E+00, 0.2125800E+00, 0.2294500E+00, &
     & 0.2434500E+00, 0.2441700E+00, 0.2649700E+00, 0.2900700E+00, &
     & 0.3358409E+00, 0.3715438E+00, 0.4012663E+00, 0.4012663E+00 /
      data (ref_adm(19,iz,25,15),iz = 1,20) / &
     & 0.1690800E+00, 0.1690800E+00, 0.1727900E+00, 0.1731000E+00, &
     & 0.1920600E+00, 0.1810100E+00, 0.1887700E+00, 0.2087500E+00, &
     & 0.2104400E+00, 0.2172400E+00, 0.2292000E+00, 0.2336000E+00, &
     & 0.2674500E+00, 0.2646800E+00, 0.2621300E+00, 0.3122092E+00, &
     & 0.3400605E+00, 0.3752609E+00, 0.4065407E+00, 0.4065407E+00 /
      data (ref_adm(19,iz,26,15),iz = 1,20) / &
     & 0.1641300E+00, 0.1641300E+00, 0.1689000E+00, 0.1697400E+00, &
     & 0.1906600E+00, 0.1963300E+00, 0.1801700E+00, 0.1910300E+00, &
     & 0.1976500E+00, 0.2290400E+00, 0.2748500E+00, 0.2597400E+00, &
     & 0.2553700E+00, 0.2673000E+00, 0.2533000E+00, 0.3180913E+00, &
     & 0.3463407E+00, 0.3818766E+00, 0.4155679E+00, 0.4155679E+00 /
      data (ref_adm(19,iz,27,15),iz = 1,20) / &
     & 0.1608400E+00, 0.1608400E+00, 0.1740500E+00, 0.1624800E+00, &
     & 0.1624300E+00, 0.1821100E+00, 0.1830800E+00, 0.2024800E+00, &
     & 0.2026900E+00, 0.2242000E+00, 0.2306900E+00, 0.2623900E+00, &
     & 0.2236300E+00, 0.2776048E+00, 0.2978555E+00, 0.3246510E+00, &
     & 0.3807500E+00, 0.3907056E+00, 0.4275067E+00, 0.4275067E+00 /
      data (ref_adm(19,iz,28,15),iz = 1,20) / &
     & 0.1664600E+00, 0.1664600E+00, 0.1690800E+00, 0.1506300E+00, &
     & 0.2428100E+00, 0.1818600E+00, 0.1876000E+00, 0.2012700E+00, &
     & 0.2218700E+00, 0.2310900E+00, 0.2581300E+00, 0.2579100E+00, &
     & 0.2685063E+00, 0.3169500E+00, 0.3049199E+00, 0.3326972E+00, &
     & 0.3623683E+00, 0.4485900E+00, 0.4406710E+00, 0.4406710E+00 /
      data (ref_adm(19,iz,29,15),iz = 1,20) / &
     & 0.1594600E+00, 0.1594600E+00, 0.1750400E+00, 0.1630700E+00, &
     & 0.1867700E+00, 0.1867700E+00, 0.1940600E+00, 0.2061800E+00, &
     & 0.2414200E+00, 0.2488300E+00, 0.2372200E+00, 0.2482200E+00, &
     & 0.2764700E+00, 0.3020500E+00, 0.3127223E+00, 0.3413633E+00, &
     & 0.3722293E+00, 0.4117892E+00, 0.4550308E+00, 0.4550308E+00 /
      data (ref_adm(19,iz,30,15),iz = 1,20) / &
     & 0.1595700E+00, 0.1595700E+00, 0.1789500E+00, 0.1728000E+00, &
     & 0.1711000E+00, 0.1863200E+00, 0.2094700E+00, 0.2368200E+00, &
     & 0.2532200E+00, 0.2192000E+00, 0.2611700E+00, 0.3008600E+00, &
     & 0.2842100E+00, 0.3299300E+00, 0.3212411E+00, 0.3443300E+00, &
     & 0.3834646E+00, 0.4242364E+00, 0.4707208E+00, 0.4707208E+00 /
      data (ref_adm(19,iz,31,15),iz = 1,20) / &
     & 0.1795500E+00, 0.1795500E+00, 0.1761000E+00, 0.1798600E+00, &
     & 0.1659600E+00, 0.1993900E+00, 0.1994200E+00, 0.2126500E+00, &
     & 0.2373600E+00, 0.2411600E+00, 0.2381800E+00, 0.3405500E+00, &
     & 0.2697300E+00, 0.3122100E+00, 0.3756700E+00, 0.3611440E+00, &
     & 0.4359600E+00, 0.4376974E+00, 0.4870089E+00, 0.4870089E+00 /
      data (ref_adm(19,iz,32,15),iz = 1,20) / &
     & 0.1662700E+00, 0.1662700E+00, 0.1696900E+00, 0.1781700E+00, &
     & 0.1847400E+00, 0.1999200E+00, 0.2069600E+00, 0.2270400E+00, &
     & 0.2341000E+00, 0.2524300E+00, 0.2617600E+00, 0.3038600E+00, &
     & 0.3401800E+00, 0.3745400E+00, 0.4017900E+00, 0.4444000E+00, &
     & 0.4597800E+00, 0.4507415E+00, 0.5032469E+00, 0.5032469E+00 /
      data (ref_adm(19,iz,33,15),iz = 1,20) / &
     & 0.1665200E+00, 0.1665200E+00, 0.1718300E+00, 0.1716000E+00, &
     & 0.1762100E+00, 0.1847000E+00, 0.1997100E+00, 0.2103100E+00, &
     & 0.2247800E+00, 0.2433600E+00, 0.2568600E+00, 0.2875100E+00, &
     & 0.2924400E+00, 0.3124400E+00, 0.3259500E+00, 0.3762940E+00, &
     & 0.4146013E+00, 0.4633133E+00, 0.5175945E+00, 0.5175945E+00 /
      data (ref_adm(19,iz,34,15),iz = 1,20) / &
     & 0.1710600E+00, 0.1710600E+00, 0.1777900E+00, 0.1678100E+00, &
     & 0.1715900E+00, 0.1945100E+00, 0.2030000E+00, 0.2214900E+00, &
     & 0.2354100E+00, 0.2340100E+00, 0.3020300E+00, 0.2813800E+00, &
     & 0.2983000E+00, 0.3232100E+00, 0.3438244E+00, 0.4853000E+00, &
     & 0.4180551E+00, 0.4712917E+00, 0.5309263E+00, 0.5309263E+00 /
      data (ref_adm(19,iz,35,15),iz = 1,20) / &
     & 0.1684100E+00, 0.1684100E+00, 0.1922800E+00, 0.1785700E+00, &
     & 0.1929900E+00, 0.2101400E+00, 0.2027400E+00, 0.2093400E+00, &
     & 0.2353000E+00, 0.2766300E+00, 0.2947700E+00, 0.2883400E+00, &
     & 0.3007600E+00, 0.3276400E+00, 0.3563800E+00, 0.3871900E+00, &
     & 0.4197700E+00, 0.4740224E+00, 0.5408457E+00, 0.5408457E+00 /
      data (ref_adm(19,iz,36,15),iz = 1,20) / &
     & 0.1778600E+00, 0.1778600E+00, 0.1886700E+00, 0.1796000E+00, &
     & 0.1785100E+00, 0.2033100E+00, 0.2231600E+00, 0.2246500E+00, &
     & 0.2335800E+00, 0.2445700E+00, 0.2640900E+00, 0.2742400E+00, &
     & 0.3305600E+00, 0.3916200E+00, 0.3545321E+00, 0.4228700E+00, &
     & 0.4684700E+00, 0.4744368E+00, 0.5452931E+00, 0.5452931E+00 /
      data (ref_adm(19,iz,37,15),iz = 1,20) / &
     & 0.1702400E+00, 0.1702400E+00, 0.1823400E+00, 0.2049700E+00, &
     & 0.2011400E+00, 0.2023000E+00, 0.2233100E+00, 0.2334700E+00, &
     & 0.2366400E+00, 0.2457600E+00, 0.2709800E+00, 0.2927000E+00, &
     & 0.3316000E+00, 0.3673200E+00, 0.4227400E+00, 0.3909996E+00, &
     & 0.4251618E+00, 0.4749028E+00, 0.5470099E+00, 0.5470099E+00 /
      data (ref_adm(19,iz,38,15),iz = 1,20) / &
     & 0.1702400E+00, 0.1702400E+00, 0.1823400E+00, 0.2049700E+00, &
     & 0.2011400E+00, 0.2023000E+00, 0.2233100E+00, 0.2334700E+00, &
     & 0.2366400E+00, 0.2457600E+00, 0.2709800E+00, 0.2927000E+00, &
     & 0.3316000E+00, 0.3673200E+00, 0.4227400E+00, 0.3909996E+00, &
     & 0.4251618E+00, 0.4749028E+00, 0.5470099E+00, 0.5470099E+00 /
! Solar Zenith Angle 75.0 Albedo  0.2494600E+00
      data (ref_adm(19,iz, 1,16),iz = 1,20) / &
     & 0.1796400E+00, 0.1796400E+00, 0.1474200E+00, 0.1513100E+00, &
     & 0.1839500E+00, 0.1601500E+00, 0.1703700E+00, 0.1972400E+00, &
     & 0.1874400E+00, 0.1953400E+00, 0.2393300E+00, 0.1995700E+00, &
     & 0.2590902E+00, 0.2808712E+00, 0.3081114E+00, 0.3414144E+00, &
     & 0.3649683E+00, 0.3761885E+00, 0.3418680E+00, 0.3418680E+00 /
      data (ref_adm(19,iz, 2,16),iz = 1,20) / &
     & 0.1796400E+00, 0.1796400E+00, 0.1474200E+00, 0.1513100E+00, &
     & 0.1839500E+00, 0.1601500E+00, 0.1703700E+00, 0.1972400E+00, &
     & 0.1874400E+00, 0.1953400E+00, 0.2393300E+00, 0.1995700E+00, &
     & 0.2590902E+00, 0.2808712E+00, 0.3081114E+00, 0.3414144E+00, &
     & 0.3649683E+00, 0.3761885E+00, 0.3418680E+00, 0.3418680E+00 /
      data (ref_adm(19,iz, 3,16),iz = 1,20) / &
     & 0.2382200E+00, 0.2382200E+00, 0.2028400E+00, 0.1546800E+00, &
     & 0.1673200E+00, 0.1707500E+00, 0.1757100E+00, 0.1643600E+00, &
     & 0.1675200E+00, 0.1629600E+00, 0.2181000E+00, 0.2436500E+00, &
     & 0.2588826E+00, 0.2803097E+00, 0.3079288E+00, 0.3412031E+00, &
     & 0.3643587E+00, 0.3757852E+00, 0.5259531E-08, 0.5259531E-08 /
      data (ref_adm(19,iz, 4,16),iz = 1,20) / &
     & 0.1822900E+00, 0.1822900E+00, 0.2041400E+00, 0.1564700E+00, &
     & 0.1615600E+00, 0.1619400E+00, 0.1694500E+00, 0.1781900E+00, &
     & 0.1960400E+00, 0.2264800E+00, 0.2366100E+00, 0.2956900E+00, &
     & 0.2582810E+00, 0.2790571E+00, 0.3068345E+00, 0.3397836E+00, &
     & 0.3634720E+00, 0.3741736E+00, 0.3391147E+00, 0.3391147E+00 /
      data (ref_adm(19,iz, 5,16),iz = 1,20) / &
     & 0.1748900E+00, 0.1748900E+00, 0.1597700E+00, 0.2264400E+00, &
     & 0.1857100E+00, 0.1561100E+00, 0.1588500E+00, 0.1826131E+00, &
     & 0.1954800E+00, 0.2393000E+00, 0.2498000E+00, 0.2694500E+00, &
     & 0.2440300E+00, 0.2781039E+00, 0.3053815E+00, 0.3379245E+00, &
     & 0.3616865E+00, 0.3724316E+00, 0.3368697E+00, 0.3368697E+00 /
      data (ref_adm(19,iz, 6,16),iz = 1,20) / &
     & 0.1358900E+00, 0.1358900E+00, 0.1442600E+00, 0.1616500E+00, &
     & 0.1451500E+00, 0.1477000E+00, 0.1273000E+00, 0.1395700E+00, &
     & 0.1662800E+00, 0.1676500E+00, 0.2013000E+00, 0.2193100E+00, &
     & 0.2428100E+00, 0.2349500E+00, 0.3034644E+00, 0.3354105E+00, &
     & 0.3598699E+00, 0.3699072E+00, 0.3334852E+00, 0.3334852E+00 /
      data (ref_adm(19,iz, 7,16),iz = 1,20) / &
     & 0.1660900E+00, 0.1660900E+00, 0.1737800E+00, 0.1581700E+00, &
     & 0.1404600E+00, 0.1919300E+00, 0.2444800E+00, 0.1563100E+00, &
     & 0.1761600E+00, 0.1860200E+00, 0.2310400E+00, 0.2670800E+00, &
     & 0.2415200E+00, 0.2641000E+00, 0.5380400E+00, 0.3320338E+00, &
     & 0.3576716E+00, 0.3670149E+00, 0.3301453E+00, 0.3301453E+00 /
      data (ref_adm(19,iz, 8,16),iz = 1,20) / &
     & 0.1687100E+00, 0.1687100E+00, 0.1597900E+00, 0.1783700E+00, &
     & 0.1968500E+00, 0.1772300E+00, 0.2810500E+00, 0.2088300E+00, &
     & 0.2130400E+00, 0.1954500E+00, 0.2080700E+00, 0.2431200E+00, &
     & 0.3273900E+00, 0.3103800E+00, 0.5121000E+00, 0.3282203E+00, &
     & 0.3543414E+00, 0.3643330E+00, 0.3263431E+00, 0.3263431E+00 /
      data (ref_adm(19,iz, 9,16),iz = 1,20) / &
     & 0.1870500E+00, 0.1870500E+00, 0.1433900E+00, 0.1640300E+00, &
     & 0.1666000E+00, 0.1555900E+00, 0.1708300E+00, 0.1750800E+00, &
     & 0.1918800E+00, 0.1932500E+00, 0.1802200E+00, 0.2640400E+00, &
     & 0.2509405E+00, 0.2336800E+00, 0.4736000E+00, 0.3240422E+00, &
     & 0.3496806E+00, 0.3613524E+00, 0.3225470E+00, 0.3225470E+00 /
      data (ref_adm(19,iz,10,16),iz = 1,20) / &
     & 0.1632600E+00, 0.1632600E+00, 0.1523900E+00, 0.1285500E+00, &
     & 0.1552600E+00, 0.1401900E+00, 0.2263600E+00, 0.1610300E+00, &
     & 0.2102600E+00, 0.1868400E+00, 0.1997000E+00, 0.2514300E+00, &
     & 0.3172100E+00, 0.2664943E+00, 0.2908545E+00, 0.2927400E+00, &
     & 0.4428500E+00, 0.3572455E+00, 0.3190414E+00, 0.3190414E+00 /
      data (ref_adm(19,iz,11,16),iz = 1,20) / &
     & 0.1645300E+00, 0.1645300E+00, 0.1581000E+00, 0.1557000E+00, &
     & 0.1429600E+00, 0.1588700E+00, 0.1803100E+00, 0.1693900E+00, &
     & 0.1794000E+00, 0.2047000E+00, 0.1794000E+00, 0.1877200E+00, &
     & 0.2338400E+00, 0.2639011E+00, 0.3250200E+00, 0.3207900E+00, &
     & 0.3381218E+00, 0.3525281E+00, 0.3151684E+00, 0.3151684E+00 /
      data (ref_adm(19,iz,12,16),iz = 1,20) / &
     & 0.1678300E+00, 0.1678300E+00, 0.1566800E+00, 0.1951400E+00, &
     & 0.1433400E+00, 0.1463100E+00, 0.1871900E+00, 0.1716100E+00, &
     & 0.1843900E+00, 0.1973700E+00, 0.1867600E+00, 0.2555000E+00, &
     & 0.2437918E+00, 0.2526800E+00, 0.2797200E+00, 0.3453500E+00, &
     & 0.3328261E+00, 0.3460502E+00, 0.3110735E+00, 0.3110735E+00 /
      data (ref_adm(19,iz,13,16),iz = 1,20) / &
     & 0.1585500E+00, 0.1585500E+00, 0.1699400E+00, 0.1745200E+00, &
     & 0.1655400E+00, 0.1883900E+00, 0.1688500E+00, 0.1728200E+00, &
     & 0.1712600E+00, 0.1959000E+00, 0.2086700E+00, 0.2222925E+00, &
     & 0.2234000E+00, 0.2575600E+00, 0.2556700E+00, 0.3044121E+00, &
     & 0.3268424E+00, 0.3387375E+00, 0.3060065E+00, 0.3060065E+00 /
      data (ref_adm(19,iz,14,16),iz = 1,20) / &
     & 0.1735300E+00, 0.1735300E+00, 0.1698300E+00, 0.1742300E+00, &
     & 0.1650700E+00, 0.1915000E+00, 0.1726500E+00, 0.1806400E+00, &
     & 0.1990300E+00, 0.1984500E+00, 0.2674600E+00, 0.2215400E+00, &
     & 0.2386462E+00, 0.2652000E+00, 0.2729000E+00, 0.2993702E+00, &
     & 0.3200524E+00, 0.3316661E+00, 0.2998669E+00, 0.2998669E+00 /
      data (ref_adm(19,iz,15,16),iz = 1,20) / &
     & 0.1743700E+00, 0.1743700E+00, 0.1735900E+00, 0.1775300E+00, &
     & 0.1793100E+00, 0.1806600E+00, 0.1848300E+00, 0.1865300E+00, &
     & 0.1991300E+00, 0.2049000E+00, 0.2388600E+00, 0.2291700E+00, &
     & 0.2128100E+00, 0.2435900E+00, 0.2717019E+00, 0.2945618E+00, &
     & 0.3138068E+00, 0.3249035E+00, 0.2935114E+00, 0.2935114E+00 /
      data (ref_adm(19,iz,16,16),iz = 1,20) / &
     & 0.1651300E+00, 0.1651300E+00, 0.1792800E+00, 0.1543000E+00, &
     & 0.1755500E+00, 0.1739400E+00, 0.1882800E+00, 0.1775900E+00, &
     & 0.1763400E+00, 0.1973900E+00, 0.1964800E+00, 0.2111800E+00, &
     & 0.2190800E+00, 0.2418400E+00, 0.2364300E+00, 0.2901400E+00, &
     & 0.3076601E+00, 0.3171602E+00, 0.2880427E+00, 0.2880427E+00 /
      data (ref_adm(19,iz,17,16),iz = 1,20) / &
     & 0.1582800E+00, 0.1582800E+00, 0.2359200E+00, 0.1552500E+00, &
     & 0.1592900E+00, 0.1675700E+00, 0.1727200E+00, 0.1803500E+00, &
     & 0.1715200E+00, 0.1861400E+00, 0.1697300E+00, 0.1979400E+00, &
     & 0.1684200E+00, 0.2387300E+00, 0.2639798E+00, 0.2854347E+00, &
     & 0.3022660E+00, 0.3100780E+00, 0.2824225E+00, 0.2824225E+00 /
      data (ref_adm(19,iz,18,16),iz = 1,20) / &
     & 0.1750700E+00, 0.1750700E+00, 0.1474300E+00, 0.1718200E+00, &
     & 0.1574300E+00, 0.1600300E+00, 0.1643400E+00, 0.1722700E+00, &
     & 0.2180900E+00, 0.2088500E+00, 0.1702000E+00, 0.2070500E+00, &
     & 0.2372000E+00, 0.1961200E+00, 0.2431800E+00, 0.3315072E+00, &
     & 0.3751609E+00, 0.4379205E+00, 0.4938164E+00, 0.4938164E+00 /
      data (ref_adm(19,iz,19,16),iz = 1,20) / &
     & 0.1658700E+00, 0.1658700E+00, 0.1608200E+00, 0.1452400E+00, &
     & 0.1592000E+00, 0.1794100E+00, 0.1879400E+00, 0.1875400E+00, &
     & 0.2068900E+00, 0.1861300E+00, 0.1961400E+00, 0.1988700E+00, &
     & 0.2008500E+00, 0.1849100E+00, 0.2456400E+00, 0.3287953E+00, &
     & 0.3706732E+00, 0.4299445E+00, 0.4816090E+00, 0.4816090E+00 /
      data (ref_adm(19,iz,20,16),iz = 1,20) / &
     & 0.1542400E+00, 0.1542400E+00, 0.1580400E+00, 0.1647800E+00, &
     & 0.1683200E+00, 0.1754200E+00, 0.1795200E+00, 0.2159200E+00, &
     & 0.1883600E+00, 0.1970100E+00, 0.2079200E+00, 0.2179200E+00, &
     & 0.2188400E+00, 0.2652158E+00, 0.2910719E+00, 0.3271066E+00, &
     & 0.3682144E+00, 0.4253573E+00, 0.4745393E+00, 0.4745393E+00 /
      data (ref_adm(19,iz,21,16),iz = 1,20) / &
     & 0.1552900E+00, 0.1552900E+00, 0.1970200E+00, 0.2033600E+00, &
     & 0.1632600E+00, 0.1812800E+00, 0.1842400E+00, 0.2012000E+00, &
     & 0.1806700E+00, 0.1876000E+00, 0.1831500E+00, 0.2370300E+00, &
     & 0.2372000E+00, 0.2663300E+00, 0.2914249E+00, 0.3268119E+00, &
     & 0.3668517E+00, 0.4220985E+00, 0.4701532E+00, 0.4701532E+00 /
      data (ref_adm(19,iz,22,16),iz = 1,20) / &
     & 0.1665200E+00, 0.1665200E+00, 0.1712800E+00, 0.1685300E+00, &
     & 0.1724000E+00, 0.1946400E+00, 0.1919600E+00, 0.1842100E+00, &
     & 0.2015500E+00, 0.2056100E+00, 0.2191300E+00, 0.2196800E+00, &
     & 0.2120900E+00, 0.2596800E+00, 0.2626600E+00, 0.3671691E+00, &
     & 0.4168262E+00, 0.4901405E+00, 0.5761892E+00, 0.5761892E+00 /
      data (ref_adm(19,iz,23,16),iz = 1,20) / &
     & 0.1691200E+00, 0.1691200E+00, 0.1774100E+00, 0.1778900E+00, &
     & 0.1793100E+00, 0.1828400E+00, 0.1875600E+00, 0.1919100E+00, &
     & 0.2107900E+00, 0.2108500E+00, 0.2219200E+00, 0.2382000E+00, &
     & 0.2450700E+00, 0.2730400E+00, 0.3260992E+00, 0.3680220E+00, &
     & 0.4172680E+00, 0.4892921E+00, 0.5774882E+00, 0.5774882E+00 /
      data (ref_adm(19,iz,24,16),iz = 1,20) / &
     & 0.1634800E+00, 0.1634800E+00, 0.1725600E+00, 0.1789600E+00, &
     & 0.1812900E+00, 0.1801300E+00, 0.1926600E+00, 0.2122000E+00, &
     & 0.2264700E+00, 0.2260900E+00, 0.2265300E+00, 0.2559400E+00, &
     & 0.2600600E+00, 0.2981300E+00, 0.3029800E+00, 0.3286000E+00, &
     & 0.4199092E+00, 0.4922673E+00, 0.5843298E+00, 0.5843298E+00 /
      data (ref_adm(19,iz,25,16),iz = 1,20) / &
     & 0.1761600E+00, 0.1761600E+00, 0.1714200E+00, 0.1709600E+00, &
     & 0.1742900E+00, 0.1705800E+00, 0.2096300E+00, 0.2153300E+00, &
     & 0.2089900E+00, 0.2513100E+00, 0.2527100E+00, 0.2841600E+00, &
     & 0.2870300E+00, 0.3128900E+00, 0.3171000E+00, 0.3328100E+00, &
     & 0.4250995E+00, 0.4976847E+00, 0.5944266E+00, 0.5944266E+00 /
      data (ref_adm(19,iz,26,16),iz = 1,20) / &
     & 0.1758800E+00, 0.1758800E+00, 0.1688400E+00, 0.1881200E+00, &
     & 0.1811300E+00, 0.1868000E+00, 0.1967800E+00, 0.1950600E+00, &
     & 0.2374100E+00, 0.2327500E+00, 0.2400300E+00, 0.2197400E+00, &
     & 0.2799300E+00, 0.3002700E+00, 0.3203100E+00, 0.3824586E+00, &
     & 0.4718100E+00, 0.5079145E+00, 0.6115677E+00, 0.6115677E+00 /
      data (ref_adm(19,iz,27,16),iz = 1,20) / &
     & 0.1734700E+00, 0.1734700E+00, 0.1761100E+00, 0.2685500E+00, &
     & 0.1929700E+00, 0.2464000E+00, 0.1853300E+00, 0.1872000E+00, &
     & 0.2428900E+00, 0.2270900E+00, 0.2210400E+00, 0.2669221E+00, &
     & 0.3012800E+00, 0.3131569E+00, 0.3625500E+00, 0.3907464E+00, &
     & 0.4438009E+00, 0.5210106E+00, 0.6333286E+00, 0.6333286E+00 /
      data (ref_adm(19,iz,28,16),iz = 1,20) / &
     & 0.1824100E+00, 0.1824100E+00, 0.2219600E+00, 0.2205100E+00, &
     & 0.1839200E+00, 0.2258200E+00, 0.1905000E+00, 0.2136200E+00, &
     & 0.3192000E+00, 0.2206400E+00, 0.2400200E+00, 0.2525600E+00, &
     & 0.2967906E+00, 0.3033100E+00, 0.3818000E+00, 0.3828200E+00, &
     & 0.4560350E+00, 0.5361220E+00, 0.6564963E+00, 0.6564963E+00 /
      data (ref_adm(19,iz,29,16),iz = 1,20) / &
     & 0.1601900E+00, 0.1601900E+00, 0.1705400E+00, 0.1801800E+00, &
     & 0.1735000E+00, 0.1809000E+00, 0.2104900E+00, 0.1896800E+00, &
     & 0.2069400E+00, 0.2289700E+00, 0.2448500E+00, 0.2642400E+00, &
     & 0.4060400E+00, 0.3001400E+00, 0.3752500E+00, 0.4126333E+00, &
     & 0.4699699E+00, 0.5540344E+00, 0.6835887E+00, 0.6835887E+00 /
      data (ref_adm(19,iz,30,16),iz = 1,20) / &
     & 0.1675200E+00, 0.1675200E+00, 0.1709500E+00, 0.1673600E+00, &
     & 0.2402500E+00, 0.2006300E+00, 0.2073300E+00, 0.2105200E+00, &
     & 0.2616300E+00, 0.2541000E+00, 0.2467500E+00, 0.2524900E+00, &
     & 0.3108003E+00, 0.3282500E+00, 0.3391000E+00, 0.4257936E+00, &
     & 0.4861465E+00, 0.5744262E+00, 0.7123592E+00, 0.7123592E+00 /
      data (ref_adm(19,iz,31,16),iz = 1,20) / &
     & 0.1545600E+00, 0.1545600E+00, 0.1586400E+00, 0.1682100E+00, &
     & 0.2120100E+00, 0.2140700E+00, 0.2189800E+00, 0.2025400E+00, &
     & 0.2224100E+00, 0.2256600E+00, 0.2584300E+00, 0.2718400E+00, &
     & 0.3326800E+00, 0.3452852E+00, 0.3692000E+00, 0.4386818E+00, &
     & 0.5020320E+00, 0.5955502E+00, 0.7428228E+00, 0.7428228E+00 /
      data (ref_adm(19,iz,32,16),iz = 1,20) / &
     & 0.1553500E+00, 0.1553500E+00, 0.1600200E+00, 0.1653500E+00, &
     & 0.1919100E+00, 0.2175000E+00, 0.2021800E+00, 0.2590300E+00, &
     & 0.2575600E+00, 0.2338000E+00, 0.2841500E+00, 0.2910900E+00, &
     & 0.3543100E+00, 0.3538738E+00, 0.3948027E+00, 0.4513606E+00, &
     & 0.5177283E+00, 0.6164225E+00, 0.7713884E+00, 0.7713884E+00 /
      data (ref_adm(19,iz,33,16),iz = 1,20) / &
     & 0.1577300E+00, 0.1577300E+00, 0.1645400E+00, 0.1756100E+00, &
     & 0.1842300E+00, 0.1805500E+00, 0.1954800E+00, 0.2161300E+00, &
     & 0.2059400E+00, 0.2388100E+00, 0.2507900E+00, 0.2718800E+00, &
     & 0.3306300E+00, 0.3755300E+00, 0.3801100E+00, 0.4576275E+00, &
     & 0.5255923E+00, 0.6297718E+00, 0.7979497E+00, 0.7979497E+00 /
      data (ref_adm(19,iz,34,16),iz = 1,20) / &
     & 0.1598000E+00, 0.1598000E+00, 0.1643700E+00, 0.1964400E+00, &
     & 0.1821300E+00, 0.2397500E+00, 0.2672900E+00, 0.2619000E+00, &
     & 0.2481100E+00, 0.2648400E+00, 0.2645000E+00, 0.2987000E+00, &
     & 0.3471100E+00, 0.4556400E+00, 0.4024822E+00, 0.4591504E+00, &
     & 0.5267670E+00, 0.6305885E+00, 0.8077740E+00, 0.8077740E+00 /
      data (ref_adm(19,iz,35,16),iz = 1,20) / &
     & 0.1858300E+00, 0.1858300E+00, 0.1814500E+00, 0.1845500E+00, &
     & 0.2207800E+00, 0.2191500E+00, 0.2477600E+00, 0.2879100E+00, &
     & 0.2625800E+00, 0.2674500E+00, 0.2480200E+00, 0.3307000E+00, &
     & 0.3462000E+00, 0.4041000E+00, 0.5050600E+00, 0.4636888E+00, &
     & 0.5316725E+00, 0.6320471E+00, 0.8091401E+00, 0.8091401E+00 /
      data (ref_adm(19,iz,36,16),iz = 1,20) / &
     & 0.2096500E+00, 0.2096500E+00, 0.1857100E+00, 0.2033100E+00, &
     & 0.2145300E+00, 0.1956900E+00, 0.2116900E+00, 0.2467600E+00, &
     & 0.2683900E+00, 0.2973500E+00, 0.2849200E+00, 0.3226700E+00, &
     & 0.3567000E+00, 0.4208200E+00, 0.4091189E+00, 0.4707970E+00, &
     & 0.5403688E+00, 0.6390111E+00, 0.8120883E+00, 0.8120883E+00 /
      data (ref_adm(19,iz,37,16),iz = 1,20) / &
     & 0.2118700E+00, 0.2118700E+00, 0.2029200E+00, 0.2007100E+00, &
     & 0.1986200E+00, 0.1831000E+00, 0.2052000E+00, 0.2516200E+00, &
     & 0.2616900E+00, 0.3150000E+00, 0.2990700E+00, 0.3249200E+00, &
     & 0.3377959E+00, 0.3827900E+00, 0.4124489E+00, 0.5265600E+00, &
     & 0.5633653E+00, 0.6459993E+00, 0.8154641E+00, 0.8154641E+00 /
      data (ref_adm(19,iz,38,16),iz = 1,20) / &
     & 0.2118700E+00, 0.2118700E+00, 0.2029200E+00, 0.2007100E+00, &
     & 0.1986200E+00, 0.1831000E+00, 0.2052000E+00, 0.2516200E+00, &
     & 0.2616900E+00, 0.3150000E+00, 0.2990700E+00, 0.3249200E+00, &
     & 0.3377959E+00, 0.3827900E+00, 0.4124489E+00, 0.5265600E+00, &
     & 0.5633653E+00, 0.6459993E+00, 0.8154641E+00, 0.8154641E+00 /
! Solar Zenith Angle 80.0 Albedo  0.2724657E+00
      data (ref_adm(19,iz, 1,17),iz = 1,20) / &
     & 0.1850331E+00, 0.1850331E+00, 0.1822150E+00, 0.1577200E+00, &
     & 0.1793800E+00, 0.1938000E+00, 0.2026400E+00, 0.2066955E+00, &
     & 0.2185825E+00, 0.2324781E+00, 0.2287900E+00, 0.2745428E+00, &
     & 0.3045332E+00, 0.3314154E+00, 0.3646611E+00, 0.4023677E+00, &
     & 0.4371144E+00, 0.4697558E+00, 0.4432878E+00, 0.4432878E+00 /
      data (ref_adm(19,iz, 2,17),iz = 1,20) / &
     & 0.1850331E+00, 0.1850331E+00, 0.1822150E+00, 0.1577200E+00, &
     & 0.1793800E+00, 0.1938000E+00, 0.2026400E+00, 0.2066955E+00, &
     & 0.2185825E+00, 0.2324781E+00, 0.2287900E+00, 0.2745428E+00, &
     & 0.3045332E+00, 0.3314154E+00, 0.3646611E+00, 0.4023677E+00, &
     & 0.4371144E+00, 0.4697558E+00, 0.4432878E+00, 0.4432878E+00 /
      data (ref_adm(19,iz, 3,17),iz = 1,20) / &
     & 0.1850114E+00, 0.1850114E+00, 0.1632500E+00, 0.1715700E+00, &
     & 0.1784800E+00, 0.1897422E+00, 0.2023300E+00, 0.1554400E+00, &
     & 0.3001300E+00, 0.2324448E+00, 0.2488701E+00, 0.2268200E+00, &
     & 0.3041475E+00, 0.3312529E+00, 0.3639769E+00, 0.4014180E+00, &
     & 0.4358835E+00, 0.4668168E+00, 0.6795476E-08, 0.6795476E-08 /
      data (ref_adm(19,iz, 4,17),iz = 1,20) / &
     & 0.1681300E+00, 0.1681300E+00, 0.1822358E+00, 0.1822860E+00, &
     & 0.1689700E+00, 0.1895951E+00, 0.2049300E+00, 0.2338200E+00, &
     & 0.2178411E+00, 0.1846000E+00, 0.2871200E+00, 0.2735821E+00, &
     & 0.3031437E+00, 0.3296258E+00, 0.3629268E+00, 0.3999908E+00, &
     & 0.4332577E+00, 0.4617325E+00, 0.4334577E+00, 0.4334577E+00 /
      data (ref_adm(19,iz, 5,17),iz = 1,20) / &
     & 0.1894100E+00, 0.1894100E+00, 0.1822315E+00, 0.1822911E+00, &
     & 0.1844120E+00, 0.3268200E+00, 0.1399600E+00, 0.2085900E+00, &
     & 0.2173049E+00, 0.2507500E+00, 0.2305400E+00, 0.3018900E+00, &
     & 0.3013257E+00, 0.3274245E+00, 0.3608953E+00, 0.3976512E+00, &
     & 0.4297177E+00, 0.4551095E+00, 0.4245363E+00, 0.4245363E+00 /
      data (ref_adm(19,iz, 6,17),iz = 1,20) / &
     & 0.1726200E+00, 0.1726200E+00, 0.2446400E+00, 0.2677800E+00, &
     & 0.2184000E+00, 0.2137100E+00, 0.2138300E+00, 0.1848500E+00, &
     & 0.2166031E+00, 0.2098300E+00, 0.2490800E+00, 0.2707138E+00, &
     & 0.2994821E+00, 0.3251944E+00, 0.3585977E+00, 0.3951573E+00, &
     & 0.4253823E+00, 0.4475802E+00, 0.4140141E+00, 0.4140141E+00 /
      data (ref_adm(19,iz, 7,17),iz = 1,20) / &
     & 0.1850601E+00, 0.1850601E+00, 0.1634500E+00, 0.2099300E+00, &
     & 0.1725800E+00, 0.1834300E+00, 0.1927300E+00, 0.1950000E+00, &
     & 0.2159700E+00, 0.2290570E+00, 0.2448620E+00, 0.3274500E+00, &
     & 0.2969328E+00, 0.3721000E+00, 0.3552565E+00, 0.3913173E+00, &
     & 0.4203709E+00, 0.4388335E+00, 0.4035952E+00, 0.4035952E+00 /
      data (ref_adm(19,iz, 8,17),iz = 1,20) / &
     & 0.1564500E+00, 0.1564500E+00, 0.1725300E+00, 0.1725600E+00, &
     & 0.1710200E+00, 0.1794700E+00, 0.1583800E+00, 0.1939600E+00, &
     & 0.1944300E+00, 0.2059600E+00, 0.2433220E+00, 0.2885700E+00, &
     & 0.3325100E+00, 0.3370200E+00, 0.3509634E+00, 0.3878179E+00, &
     & 0.4157091E+00, 0.4315711E+00, 0.3940178E+00, 0.3940178E+00 /
      data (ref_adm(19,iz, 9,17),iz = 1,20) / &
     & 0.1655500E+00, 0.1655500E+00, 0.1893300E+00, 0.3249600E+00, &
     & 0.1845773E+00, 0.1881214E+00, 0.3390800E+00, 0.2281300E+00, &
     & 0.1711800E+00, 0.1590900E+00, 0.2490800E+00, 0.2483500E+00, &
     & 0.2906162E+00, 0.3629700E+00, 0.3462398E+00, 0.3831299E+00, &
     & 0.4111378E+00, 0.4249246E+00, 0.3852219E+00, 0.3852219E+00 /
      data (ref_adm(19,iz,10,17),iz = 1,20) / &
     & 0.1703300E+00, 0.1703300E+00, 0.1829281E+00, 0.2560900E+00, &
     & 0.1658600E+00, 0.1882482E+00, 0.2563500E+00, 0.1985500E+00, &
     & 0.1922200E+00, 0.2011300E+00, 0.2379900E+00, 0.2759200E+00, &
     & 0.4442700E+00, 0.3571600E+00, 0.3408377E+00, 0.3769046E+00, &
     & 0.4058341E+00, 0.4189077E+00, 0.3776434E+00, 0.3776434E+00 /
      data (ref_adm(19,iz,11,17),iz = 1,20) / &
     & 0.1490700E+00, 0.1490700E+00, 0.1487400E+00, 0.1839400E+00, &
     & 0.3361900E+00, 0.1760000E+00, 0.1936008E+00, 0.2013467E+00, &
     & 0.1894300E+00, 0.2327700E+00, 0.2514900E+00, 0.2668400E+00, &
     & 0.2833570E+00, 0.3055657E+00, 0.3353334E+00, 0.3699275E+00, &
     & 0.3992860E+00, 0.4129433E+00, 0.3707806E+00, 0.3707806E+00 /
      data (ref_adm(19,iz,12,17),iz = 1,20) / &
     & 0.1449800E+00, 0.1449800E+00, 0.1165600E+00, 0.1190600E+00, &
     & 0.1703200E+00, 0.1802900E+00, 0.2208300E+00, 0.1823200E+00, &
     & 0.2230900E+00, 0.2279900E+00, 0.2632700E+00, 0.2315500E+00, &
     & 0.2266400E+00, 0.3106100E+00, 0.2645700E+00, 0.3624423E+00, &
     & 0.3907117E+00, 0.4067223E+00, 0.3647700E+00, 0.3647700E+00 /
      data (ref_adm(19,iz,13,17),iz = 1,20) / &
     & 0.1857259E+00, 0.1857259E+00, 0.1838531E+00, 0.1527900E+00, &
     & 0.1589100E+00, 0.1765900E+00, 0.1891200E+00, 0.1928900E+00, &
     & 0.2176500E+00, 0.1994600E+00, 0.2522800E+00, 0.2321300E+00, &
     & 0.2759170E+00, 0.2959499E+00, 0.3256900E+00, 0.3549550E+00, &
     & 0.3823414E+00, 0.3986073E+00, 0.3587486E+00, 0.3587486E+00 /
      data (ref_adm(19,iz,14,17),iz = 1,20) / &
     & 0.1534900E+00, 0.1534900E+00, 0.2508300E+00, 0.2009400E+00, &
     & 0.1667500E+00, 0.1778500E+00, 0.1793200E+00, 0.2055400E+00, &
     & 0.2038500E+00, 0.2224100E+00, 0.2375600E+00, 0.2187200E+00, &
     & 0.2719876E+00, 0.2915947E+00, 0.3168775E+00, 0.3473704E+00, &
     & 0.3732179E+00, 0.3885024E+00, 0.3516714E+00, 0.3516714E+00 /
      data (ref_adm(19,iz,15,17),iz = 1,20) / &
     & 0.1558200E+00, 0.1558200E+00, 0.1682600E+00, 0.1689000E+00, &
     & 0.1767400E+00, 0.1806100E+00, 0.1990600E+00, 0.1802000E+00, &
     & 0.2000500E+00, 0.2038100E+00, 0.2363200E+00, 0.2331300E+00, &
     & 0.2444500E+00, 0.2769700E+00, 0.3112868E+00, 0.3395250E+00, &
     & 0.3640132E+00, 0.3784207E+00, 0.3430446E+00, 0.3430446E+00 /
      data (ref_adm(19,iz,16,17),iz = 1,20) / &
     & 0.1800200E+00, 0.1800200E+00, 0.2091000E+00, 0.1513800E+00, &
     & 0.1883100E+00, 0.1753300E+00, 0.1867700E+00, 0.1670300E+00, &
     & 0.1749300E+00, 0.2099800E+00, 0.2520200E+00, 0.2254000E+00, &
     & 0.2279200E+00, 0.2418000E+00, 0.3058098E+00, 0.2783700E+00, &
     & 0.3545049E+00, 0.3683919E+00, 0.3345983E+00, 0.3345983E+00 /
      data (ref_adm(19,iz,17,17),iz = 1,20) / &
     & 0.1658100E+00, 0.1658100E+00, 0.1800100E+00, 0.1859389E+00, &
     & 0.1843100E+00, 0.1699100E+00, 0.2248900E+00, 0.1989200E+00, &
     & 0.2094800E+00, 0.2136071E+00, 0.2247027E+00, 0.2205500E+00, &
     & 0.2604907E+00, 0.2779082E+00, 0.3001798E+00, 0.3258930E+00, &
     & 0.3463222E+00, 0.3579248E+00, 0.3268094E+00, 0.3268094E+00 /
      data (ref_adm(19,iz,18,17),iz = 1,20) / &
     & 0.1954100E+00, 0.1954100E+00, 0.1883200E+00, 0.1834900E+00, &
     & 0.1655500E+00, 0.1828500E+00, 0.1895700E+00, 0.2032600E+00, &
     & 0.3145700E+00, 0.2153369E+00, 0.2243154E+00, 0.2427800E+00, &
     & 0.2534074E+00, 0.2678705E+00, 0.2881453E+00, 0.3153881E+00, &
     & 0.3453418E+00, 0.3852346E+00, 0.4092217E+00, 0.4092217E+00 /
      data (ref_adm(19,iz,19,17),iz = 1,20) / &
     & 0.1596600E+00, 0.1596600E+00, 0.1812200E+00, 0.1841700E+00, &
     & 0.1640000E+00, 0.1730400E+00, 0.1992200E+00, 0.2108400E+00, &
     & 0.1738000E+00, 0.2153265E+00, 0.2373100E+00, 0.2449400E+00, &
     & 0.2522245E+00, 0.2849700E+00, 0.2858539E+00, 0.3122751E+00, &
     & 0.3411108E+00, 0.3786118E+00, 0.4001870E+00, 0.4001870E+00 /
      data (ref_adm(19,iz,20,17),iz = 1,20) / &
     & 0.1719100E+00, 0.1719100E+00, 0.1866200E+00, 0.1762400E+00, &
     & 0.1754800E+00, 0.1987800E+00, 0.2027600E+00, 0.2040800E+00, &
     & 0.2179400E+00, 0.2317700E+00, 0.2556300E+00, 0.2491100E+00, &
     & 0.2267900E+00, 0.2489300E+00, 0.2844770E+00, 0.3101163E+00, &
     & 0.3382483E+00, 0.3744558E+00, 0.3949693E+00, 0.3949693E+00 /
      data (ref_adm(19,iz,21,17),iz = 1,20) / &
     & 0.1626000E+00, 0.1626000E+00, 0.1536000E+00, 0.1876774E+00, &
     & 0.1660000E+00, 0.1927200E+00, 0.1907900E+00, 0.1920700E+00, &
     & 0.2092614E+00, 0.2872500E+00, 0.3030100E+00, 0.3640600E+00, &
     & 0.2410300E+00, 0.2653183E+00, 0.2838979E+00, 0.3090944E+00, &
     & 0.3363838E+00, 0.3711998E+00, 0.3916683E+00, 0.3916683E+00 /
      data (ref_adm(19,iz,22,17),iz = 1,20) / &
     & 0.2589200E+00, 0.2589200E+00, 0.1536800E+00, 0.1796998E+00, &
     & 0.1835903E+00, 0.1456600E+00, 0.1691100E+00, 0.1680500E+00, &
     & 0.2141127E+00, 0.2114100E+00, 0.2716300E+00, 0.2625425E+00, &
     & 0.2892461E+00, 0.3148423E+00, 0.3530982E+00, 0.4088445E+00, &
     & 0.4767756E+00, 0.5832784E+00, 0.7318466E+00, 0.7318466E+00 /
      data (ref_adm(19,iz,23,17),iz = 1,20) / &
     & 0.1634300E+00, 0.1634300E+00, 0.1572900E+00, 0.1691500E+00, &
     & 0.1713700E+00, 0.1765900E+00, 0.1845000E+00, 0.1798800E+00, &
     & 0.1704600E+00, 0.2197800E+00, 0.2523600E+00, 0.2641892E+00, &
     & 0.2909968E+00, 0.3167683E+00, 0.3549922E+00, 0.4105311E+00, &
     & 0.4779473E+00, 0.5829524E+00, 0.7336308E+00, 0.7336308E+00 /
      data (ref_adm(19,iz,24,17),iz = 1,20) / &
     & 0.1858000E+00, 0.1858000E+00, 0.2009800E+00, 0.1860900E+00, &
     & 0.1869300E+00, 0.1867600E+00, 0.1951400E+00, 0.2046300E+00, &
     & 0.2073500E+00, 0.2531300E+00, 0.2769800E+00, 0.2750900E+00, &
     & 0.2789000E+00, 0.3399300E+00, 0.3674000E+00, 0.4144109E+00, &
     & 0.4822225E+00, 0.5872391E+00, 0.7425128E+00, 0.7425128E+00 /
      data (ref_adm(19,iz,25,17),iz = 1,20) / &
     & 0.1957300E+00, 0.1957300E+00, 0.2469700E+00, 0.1673000E+00, &
     & 0.1799800E+00, 0.1781900E+00, 0.1701300E+00, 0.1965900E+00, &
     & 0.2298000E+00, 0.1968800E+00, 0.3788300E+00, 0.3068200E+00, &
     & 0.3217300E+00, 0.3536400E+00, 0.2978800E+00, 0.4205057E+00, &
     & 0.4891135E+00, 0.5946456E+00, 0.7562124E+00, 0.7562124E+00 /
      data (ref_adm(19,iz,26,17),iz = 1,20) / &
     & 0.1784600E+00, 0.1784600E+00, 0.1357300E+00, 0.1779500E+00, &
     & 0.1703900E+00, 0.1867800E+00, 0.1990913E+00, 0.2182000E+00, &
     & 0.2317200E+00, 0.2338223E+00, 0.2380800E+00, 0.2743175E+00, &
     & 0.3027500E+00, 0.3128800E+00, 0.3300200E+00, 0.4298126E+00, &
     & 0.4759900E+00, 0.6081966E+00, 0.7796729E+00, 0.7796729E+00 /
      data (ref_adm(19,iz,27,17),iz = 1,20) / &
     & 0.1801100E+00, 0.1801100E+00, 0.1656100E+00, 0.1706200E+00, &
     & 0.1687100E+00, 0.1830900E+00, 0.1841400E+00, 0.2105298E+00, &
     & 0.2333800E+00, 0.2366500E+00, 0.2542400E+00, 0.2796234E+00, &
     & 0.2885400E+00, 0.3383460E+00, 0.3804695E+00, 0.4407096E+00, &
     & 0.5134014E+00, 0.6253005E+00, 0.8090003E+00, 0.8090003E+00 /
      data (ref_adm(19,iz,28,17),iz = 1,20) / &
     & 0.1621800E+00, 0.1621800E+00, 0.2118900E+00, 0.2002500E+00, &
     & 0.1862269E+00, 0.1690200E+00, 0.2325000E+00, 0.1826100E+00, &
     & 0.2359800E+00, 0.2011500E+00, 0.2257900E+00, 0.3035800E+00, &
     & 0.2427800E+00, 0.3056800E+00, 0.3906939E+00, 0.4535209E+00, &
     & 0.5289351E+00, 0.6450351E+00, 0.8405828E+00, 0.8405828E+00 /
      data (ref_adm(19,iz,29,17),iz = 1,20) / &
     & 0.1623200E+00, 0.1623200E+00, 0.1690100E+00, 0.1814082E+00, &
     & 0.1868197E+00, 0.3836300E+00, 0.2034842E+00, 0.2228400E+00, &
     & 0.1968400E+00, 0.2446680E+00, 0.2231200E+00, 0.3236300E+00, &
     & 0.3249873E+00, 0.3451200E+00, 0.4998200E+00, 0.4679064E+00, &
     & 0.5467324E+00, 0.6680313E+00, 0.8775231E+00, 0.8775231E+00 /
      data (ref_adm(19,iz,30,17),iz = 1,20) / &
     & 0.1727600E+00, 0.1727600E+00, 0.1708600E+00, 0.1817192E+00, &
     & 0.1874147E+00, 0.1951796E+00, 0.2051749E+00, 0.2173149E+00, &
     & 0.2316701E+00, 0.2318800E+00, 0.2390400E+00, 0.2474700E+00, &
     & 0.3336383E+00, 0.3572400E+00, 0.4150759E+00, 0.4840423E+00, &
     & 0.5666960E+00, 0.6945511E+00, 0.9173069E+00, 0.9173069E+00 /
      data (ref_adm(19,iz,31,17),iz = 1,20) / &
     & 0.1632600E+00, 0.1632600E+00, 0.1844100E+00, 0.1819988E+00, &
     & 0.2148300E+00, 0.1962191E+00, 0.2067944E+00, 0.1986000E+00, &
     & 0.2207500E+00, 0.2526155E+00, 0.2736884E+00, 0.3051535E+00, &
     & 0.3425649E+00, 0.3774244E+00, 0.4282262E+00, 0.5002134E+00, &
     & 0.5870991E+00, 0.7217538E+00, 0.9587582E+00, 0.9587582E+00 /
      data (ref_adm(19,iz,32,17),iz = 1,20) / &
     & 0.2172300E+00, 0.2172300E+00, 0.1582200E+00, 0.1831400E+00, &
     & 0.1903400E+00, 0.1972279E+00, 0.2082409E+00, 0.2370100E+00, &
     & 0.2374661E+00, 0.2460000E+00, 0.2250100E+00, 0.3119741E+00, &
     & 0.3739400E+00, 0.3258200E+00, 0.4406854E+00, 0.5161402E+00, &
     & 0.6066319E+00, 0.7485875E+00, 0.9982459E+00, 0.9982459E+00 /
      data (ref_adm(19,iz,33,17),iz = 1,20) / &
     & 0.1718700E+00, 0.1718700E+00, 0.1792800E+00, 0.1884600E+00, &
     & 0.1788700E+00, 0.1981544E+00, 0.1468500E+00, 0.2698400E+00, &
     & 0.2518700E+00, 0.2600455E+00, 0.2833912E+00, 0.3220900E+00, &
     & 0.3818700E+00, 0.3966224E+00, 0.4499322E+00, 0.5252894E+00, &
     & 0.6168596E+00, 0.7638785E+00, 0.1030737E+01, 0.1030737E+01 /
      data (ref_adm(19,iz,34,17),iz = 1,20) / &
     & 0.1644000E+00, 0.1644000E+00, 0.1781900E+00, 0.1696200E+00, &
     & 0.1895135E+00, 0.1988918E+00, 0.3516500E+00, 0.2308600E+00, &
     & 0.2424728E+00, 0.2631756E+00, 0.2874561E+00, 0.3234390E+00, &
     & 0.4043100E+00, 0.4012313E+00, 0.4529508E+00, 0.5102500E+00, &
     & 0.6179803E+00, 0.7637612E+00, 0.1038893E+01, 0.1038893E+01 /
      data (ref_adm(19,iz,35,17),iz = 1,20) / &
     & 0.1751200E+00, 0.1751200E+00, 0.1682300E+00, 0.1844800E+00, &
     & 0.1792500E+00, 0.1995632E+00, 0.2116453E+00, 0.2243200E+00, &
     & 0.2525600E+00, 0.2744600E+00, 0.3352100E+00, 0.3273425E+00, &
     & 0.3676824E+00, 0.4384900E+00, 0.4547738E+00, 0.5495400E+00, &
     & 0.6236116E+00, 0.7672098E+00, 0.1041432E+01, 0.1041432E+01 /
      data (ref_adm(19,iz,36,17),iz = 1,20) / &
     & 0.1989200E+00, 0.1989200E+00, 0.1783592E+00, 0.1512200E+00, &
     & 0.1900837E+00, 0.1999585E+00, 0.2122739E+00, 0.2272624E+00, &
     & 0.1457800E+00, 0.2511200E+00, 0.3008900E+00, 0.3296211E+00, &
     & 0.3718600E+00, 0.4043703E+00, 0.4407200E+00, 0.5506200E+00, &
     & 0.6338489E+00, 0.7782753E+00, 0.1049528E+01, 0.1049528E+01 /
      data (ref_adm(19,iz,37,17),iz = 1,20) / &
     & 0.1711200E+00, 0.1711200E+00, 0.2141500E+00, 0.1831161E+00, &
     & 0.1902620E+00, 0.2001534E+00, 0.2126809E+00, 0.2278333E+00, &
     & 0.2571600E+00, 0.2733300E+00, 0.3049700E+00, 0.3306903E+00, &
     & 0.3697449E+00, 0.4053937E+00, 0.4612231E+00, 0.5498931E+00, &
     & 0.6596165E+00, 0.8007632E+00, 0.1057201E+01, 0.1057201E+01 /
      data (ref_adm(19,iz,38,17),iz = 1,20) / &
     & 0.1711200E+00, 0.1711200E+00, 0.2141500E+00, 0.1831161E+00, &
     & 0.1902620E+00, 0.2001534E+00, 0.2126809E+00, 0.2278333E+00, &
     & 0.2571600E+00, 0.2733300E+00, 0.3049700E+00, 0.3306903E+00, &
     & 0.3697449E+00, 0.4053937E+00, 0.4612231E+00, 0.5498931E+00, &
     & 0.6596165E+00, 0.8007632E+00, 0.1057201E+01, 0.1057201E+01 /
! Solar Zenith Angle 85.0 Albedo  0.2159955E+00
      data (ref_adm(19,iz, 1,18),iz = 1,20) / &
     & 0.2161922E+00, 0.2161922E+00, 0.2123234E+00, 0.2109832E+00, &
     & 0.2099239E+00, 0.2091994E+00, 0.2079225E+00, 0.2057470E+00, &
     & 0.2029527E+00, 0.1996067E+00, 0.1959675E+00, 0.1909151E+00, &
     & 0.1850179E+00, 0.1794647E+00, 0.1714900E+00, 0.1609882E+00, &
     & 0.1501538E+00, 0.1359780E+00, 0.1109475E+00, 0.1109475E+00 /
      data (ref_adm(19,iz, 2,18),iz = 1,20) / &
     & 0.2161922E+00, 0.2161922E+00, 0.2123234E+00, 0.2109832E+00, &
     & 0.2099239E+00, 0.2091994E+00, 0.2079225E+00, 0.2057470E+00, &
     & 0.2029527E+00, 0.1996067E+00, 0.1959675E+00, 0.1909151E+00, &
     & 0.1850179E+00, 0.1794647E+00, 0.1714900E+00, 0.1609882E+00, &
     & 0.1501538E+00, 0.1359780E+00, 0.1109475E+00, 0.1109475E+00 /
      data (ref_adm(19,iz, 3,18),iz = 1,20) / &
     & 0.2161922E+00, 0.2161922E+00, 0.2123234E+00, 0.2109833E+00, &
     & 0.2099239E+00, 0.2091994E+00, 0.2079225E+00, 0.2057469E+00, &
     & 0.2029527E+00, 0.1996067E+00, 0.1959675E+00, 0.1909151E+00, &
     & 0.1850179E+00, 0.1794647E+00, 0.1714900E+00, 0.1609882E+00, &
     & 0.1501538E+00, 0.1359780E+00, 0.1109475E+00, 0.1109475E+00 /
      data (ref_adm(19,iz, 4,18),iz = 1,20) / &
     & 0.2161922E+00, 0.2161922E+00, 0.2123234E+00, 0.2109832E+00, &
     & 0.2099239E+00, 0.2091994E+00, 0.2079225E+00, 0.2057470E+00, &
     & 0.2029527E+00, 0.1996067E+00, 0.1959675E+00, 0.1909151E+00, &
     & 0.1850179E+00, 0.1794647E+00, 0.1714900E+00, 0.1609882E+00, &
     & 0.1501538E+00, 0.1359780E+00, 0.1109475E+00, 0.1109475E+00 /
      data (ref_adm(19,iz, 5,18),iz = 1,20) / &
     & 0.2161922E+00, 0.2161922E+00, 0.2123234E+00, 0.2109833E+00, &
     & 0.2099239E+00, 0.2091994E+00, 0.2079225E+00, 0.2057469E+00, &
     & 0.2029527E+00, 0.1996067E+00, 0.1959675E+00, 0.1909151E+00, &
     & 0.1850179E+00, 0.1794647E+00, 0.1714900E+00, 0.1609882E+00, &
     & 0.1501538E+00, 0.1359780E+00, 0.1109475E+00, 0.1109475E+00 /
      data (ref_adm(19,iz, 6,18),iz = 1,20) / &
     & 0.2161922E+00, 0.2161922E+00, 0.2123234E+00, 0.2109832E+00, &
     & 0.2099239E+00, 0.2091994E+00, 0.2079225E+00, 0.2057470E+00, &
     & 0.2029527E+00, 0.1996067E+00, 0.1959675E+00, 0.1909151E+00, &
     & 0.1850179E+00, 0.1794647E+00, 0.1714900E+00, 0.1609882E+00, &
     & 0.1501538E+00, 0.1359780E+00, 0.1109475E+00, 0.1109475E+00 /
      data (ref_adm(19,iz, 7,18),iz = 1,20) / &
     & 0.2161922E+00, 0.2161922E+00, 0.2123234E+00, 0.2109833E+00, &
     & 0.2099239E+00, 0.2091994E+00, 0.2079225E+00, 0.2057469E+00, &
     & 0.2029527E+00, 0.1996067E+00, 0.1959675E+00, 0.1909151E+00, &
     & 0.1850179E+00, 0.1794647E+00, 0.1714900E+00, 0.1609882E+00, &
     & 0.1501538E+00, 0.1359780E+00, 0.1109475E+00, 0.1109475E+00 /
      data (ref_adm(19,iz, 8,18),iz = 1,20) / &
     & 0.2161922E+00, 0.2161922E+00, 0.2123234E+00, 0.2109832E+00, &
     & 0.2099239E+00, 0.2091994E+00, 0.2079225E+00, 0.2057470E+00, &
     & 0.2029527E+00, 0.1996067E+00, 0.1959675E+00, 0.1909151E+00, &
     & 0.1850179E+00, 0.1794647E+00, 0.1714900E+00, 0.1609882E+00, &
     & 0.1501538E+00, 0.1359780E+00, 0.1109475E+00, 0.1109475E+00 /
      data (ref_adm(19,iz, 9,18),iz = 1,20) / &
     & 0.2161922E+00, 0.2161922E+00, 0.2123234E+00, 0.2109833E+00, &
     & 0.2099239E+00, 0.2091994E+00, 0.2079225E+00, 0.2057469E+00, &
     & 0.2029527E+00, 0.1996067E+00, 0.1959675E+00, 0.1909151E+00, &
     & 0.1850179E+00, 0.1794647E+00, 0.1714900E+00, 0.1609882E+00, &
     & 0.1501538E+00, 0.1359780E+00, 0.1109475E+00, 0.1109475E+00 /
      data (ref_adm(19,iz,10,18),iz = 1,20) / &
     & 0.2161922E+00, 0.2161922E+00, 0.2123234E+00, 0.2109832E+00, &
     & 0.2099239E+00, 0.2091994E+00, 0.2079225E+00, 0.2057470E+00, &
     & 0.2029527E+00, 0.1996067E+00, 0.1959675E+00, 0.1909151E+00, &
     & 0.1850179E+00, 0.1794647E+00, 0.1714900E+00, 0.1609882E+00, &
     & 0.1501538E+00, 0.1359780E+00, 0.1109475E+00, 0.1109475E+00 /
      data (ref_adm(19,iz,11,18),iz = 1,20) / &
     & 0.2161922E+00, 0.2161922E+00, 0.2123234E+00, 0.2109833E+00, &
     & 0.2099239E+00, 0.2091994E+00, 0.2079225E+00, 0.2057469E+00, &
     & 0.2029527E+00, 0.1996067E+00, 0.1959675E+00, 0.1909151E+00, &
     & 0.1850179E+00, 0.1794647E+00, 0.1714900E+00, 0.1609882E+00, &
     & 0.1501538E+00, 0.1359780E+00, 0.1109475E+00, 0.1109475E+00 /
      data (ref_adm(19,iz,12,18),iz = 1,20) / &
     & 0.2161922E+00, 0.2161922E+00, 0.2123234E+00, 0.2109832E+00, &
     & 0.2099239E+00, 0.2091994E+00, 0.2079225E+00, 0.2057470E+00, &
     & 0.2029527E+00, 0.1996067E+00, 0.1959675E+00, 0.1909151E+00, &
     & 0.1850179E+00, 0.1794647E+00, 0.1714900E+00, 0.1609882E+00, &
     & 0.1501538E+00, 0.1359780E+00, 0.1109475E+00, 0.1109475E+00 /
      data (ref_adm(19,iz,13,18),iz = 1,20) / &
     & 0.2161922E+00, 0.2161922E+00, 0.2123234E+00, 0.2109833E+00, &
     & 0.2099239E+00, 0.2091994E+00, 0.2079225E+00, 0.2057469E+00, &
     & 0.2029527E+00, 0.1996067E+00, 0.1959675E+00, 0.1909151E+00, &
     & 0.1850179E+00, 0.1794647E+00, 0.1714900E+00, 0.1609882E+00, &
     & 0.1501538E+00, 0.1359780E+00, 0.1109475E+00, 0.1109475E+00 /
      data (ref_adm(19,iz,14,18),iz = 1,20) / &
     & 0.2161922E+00, 0.2161922E+00, 0.2123234E+00, 0.2109832E+00, &
     & 0.2099239E+00, 0.2091994E+00, 0.2079225E+00, 0.2057470E+00, &
     & 0.2029527E+00, 0.1996067E+00, 0.1959675E+00, 0.1909151E+00, &
     & 0.1850179E+00, 0.1794647E+00, 0.1714900E+00, 0.1609882E+00, &
     & 0.1501538E+00, 0.1359780E+00, 0.1109475E+00, 0.1109475E+00 /
      data (ref_adm(19,iz,15,18),iz = 1,20) / &
     & 0.2161922E+00, 0.2161922E+00, 0.1541000E+00, 0.2087100E+00, &
     & 0.2184300E+00, 0.2190900E+00, 0.2191900E+00, 0.2351700E+00, &
     & 0.2029527E+00, 0.1996067E+00, 0.1959675E+00, 0.1909151E+00, &
     & 0.1850179E+00, 0.1794647E+00, 0.1714900E+00, 0.1609882E+00, &
     & 0.1501538E+00, 0.1359780E+00, 0.1109475E+00, 0.1109475E+00 /
      data (ref_adm(19,iz,16,18),iz = 1,20) / &
     & 0.2161922E+00, 0.2161922E+00, 0.2123234E+00, 0.2109832E+00, &
     & 0.2099239E+00, 0.2091994E+00, 0.2079225E+00, 0.2057470E+00, &
     & 0.2029527E+00, 0.1996067E+00, 0.1959675E+00, 0.1909151E+00, &
     & 0.1850179E+00, 0.1794647E+00, 0.1714900E+00, 0.1609882E+00, &
     & 0.1501538E+00, 0.1359780E+00, 0.1109475E+00, 0.1109475E+00 /
      data (ref_adm(19,iz,17,18),iz = 1,20) / &
     & 0.2161922E+00, 0.2161922E+00, 0.2123234E+00, 0.2109833E+00, &
     & 0.2099239E+00, 0.2091994E+00, 0.2079225E+00, 0.2057469E+00, &
     & 0.2029527E+00, 0.1996067E+00, 0.1959675E+00, 0.1909151E+00, &
     & 0.1850179E+00, 0.1794647E+00, 0.1714900E+00, 0.1609882E+00, &
     & 0.1501538E+00, 0.1359780E+00, 0.1109475E+00, 0.1109475E+00 /
      data (ref_adm(19,iz,18,18),iz = 1,20) / &
     & 0.2700287E+00, 0.2700287E+00, 0.2156288E+00, 0.2140917E+00, &
     & 0.2182562E+00, 0.2279571E+00, 0.2322427E+00, 0.2309693E+00, &
     & 0.2313811E+00, 0.2329771E+00, 0.2373816E+00, 0.2458105E+00, &
     & 0.2559781E+00, 0.2656243E+00, 0.2773418E+00, 0.2886479E+00, &
     & 0.2943356E+00, 0.2879680E+00, 0.2523999E+00, 0.2523999E+00 /
      data (ref_adm(19,iz,19,18),iz = 1,20) / &
     & 0.2700287E+00, 0.2700287E+00, 0.2156288E+00, 0.2140917E+00, &
     & 0.2182562E+00, 0.2279571E+00, 0.2322427E+00, 0.2309693E+00, &
     & 0.2313810E+00, 0.2329771E+00, 0.2373816E+00, 0.2458104E+00, &
     & 0.2559781E+00, 0.2656243E+00, 0.2773418E+00, 0.2886479E+00, &
     & 0.2943356E+00, 0.2879680E+00, 0.2523999E+00, 0.2523999E+00 /
      data (ref_adm(19,iz,20,18),iz = 1,20) / &
     & 0.2700287E+00, 0.2700287E+00, 0.2156288E+00, 0.2140917E+00, &
     & 0.2182562E+00, 0.2279571E+00, 0.2322427E+00, 0.2309693E+00, &
     & 0.2313811E+00, 0.2329771E+00, 0.2373816E+00, 0.2458105E+00, &
     & 0.2559781E+00, 0.2656243E+00, 0.2773418E+00, 0.2886479E+00, &
     & 0.2943356E+00, 0.2879680E+00, 0.2523999E+00, 0.2523999E+00 /
      data (ref_adm(19,iz,21,18),iz = 1,20) / &
     & 0.2700287E+00, 0.2700287E+00, 0.2156288E+00, 0.2140917E+00, &
     & 0.2182562E+00, 0.2279571E+00, 0.2322427E+00, 0.2309693E+00, &
     & 0.2313810E+00, 0.2329771E+00, 0.2373816E+00, 0.2458104E+00, &
     & 0.2559781E+00, 0.2656243E+00, 0.2773418E+00, 0.2886479E+00, &
     & 0.2943356E+00, 0.2879680E+00, 0.2523999E+00, 0.2523999E+00 /
      data (ref_adm(19,iz,22,18),iz = 1,20) / &
     & 0.2624792E+00, 0.2624792E+00, 0.2577822E+00, 0.2561550E+00, &
     & 0.2548690E+00, 0.2539893E+00, 0.2524390E+00, 0.2497977E+00, &
     & 0.2464051E+00, 0.2423427E+00, 0.2379244E+00, 0.2317902E+00, &
     & 0.2246305E+00, 0.2178884E+00, 0.2082063E+00, 0.1954560E+00, &
     & 0.1823019E+00, 0.1650911E+00, 0.1347015E+00, 0.1347015E+00 /
      data (ref_adm(19,iz,23,18),iz = 1,20) / &
     & 0.2624792E+00, 0.2624792E+00, 0.2577822E+00, 0.2561551E+00, &
     & 0.2548689E+00, 0.2539893E+00, 0.2524390E+00, 0.2497977E+00, &
     & 0.2464051E+00, 0.2423427E+00, 0.2379244E+00, 0.2317902E+00, &
     & 0.2246305E+00, 0.2178884E+00, 0.2082063E+00, 0.1954560E+00, &
     & 0.1823019E+00, 0.1650911E+00, 0.1347015E+00, 0.1347015E+00 /
      data (ref_adm(19,iz,24,18),iz = 1,20) / &
     & 0.2624792E+00, 0.2624792E+00, 0.2577822E+00, 0.2274200E+00, &
     & 0.2519600E+00, 0.2539893E+00, 0.2524390E+00, 0.2497977E+00, &
     & 0.2464051E+00, 0.2423427E+00, 0.2379244E+00, 0.2317902E+00, &
     & 0.2246305E+00, 0.2178884E+00, 0.2082063E+00, 0.1954560E+00, &
     & 0.1823019E+00, 0.1650911E+00, 0.1347015E+00, 0.1347015E+00 /
      data (ref_adm(19,iz,25,18),iz = 1,20) / &
     & 0.3091600E+00, 0.3091600E+00, 0.1732000E+00, 0.2561551E+00, &
     & 0.2666600E+00, 0.2539893E+00, 0.2524390E+00, 0.2497977E+00, &
     & 0.2464051E+00, 0.2423427E+00, 0.2379244E+00, 0.2317902E+00, &
     & 0.2246305E+00, 0.2178884E+00, 0.2082063E+00, 0.1954560E+00, &
     & 0.1823019E+00, 0.1650911E+00, 0.1347015E+00, 0.1347015E+00 /
      data (ref_adm(19,iz,26,18),iz = 1,20) / &
     & 0.2624792E+00, 0.2624792E+00, 0.2577822E+00, 0.2561550E+00, &
     & 0.2548690E+00, 0.2539893E+00, 0.2524390E+00, 0.2497977E+00, &
     & 0.2464051E+00, 0.2423427E+00, 0.2379244E+00, 0.2317902E+00, &
     & 0.2246305E+00, 0.2178884E+00, 0.2082063E+00, 0.1954560E+00, &
     & 0.1823019E+00, 0.1650911E+00, 0.1347015E+00, 0.1347015E+00 /
      data (ref_adm(19,iz,27,18),iz = 1,20) / &
     & 0.2624792E+00, 0.2624792E+00, 0.2577822E+00, 0.2561551E+00, &
     & 0.2548689E+00, 0.2539893E+00, 0.2524390E+00, 0.2497977E+00, &
     & 0.2464051E+00, 0.2423427E+00, 0.2379244E+00, 0.2317902E+00, &
     & 0.2246305E+00, 0.2178884E+00, 0.2082063E+00, 0.1954560E+00, &
     & 0.1823019E+00, 0.1650911E+00, 0.1347015E+00, 0.1347015E+00 /
      data (ref_adm(19,iz,28,18),iz = 1,20) / &
     & 0.2624792E+00, 0.2624792E+00, 0.2577822E+00, 0.2561550E+00, &
     & 0.2548690E+00, 0.2539893E+00, 0.2524390E+00, 0.2497977E+00, &
     & 0.2464051E+00, 0.2423427E+00, 0.2379244E+00, 0.2317902E+00, &
     & 0.2246305E+00, 0.2178884E+00, 0.2082063E+00, 0.1954560E+00, &
     & 0.1823019E+00, 0.1650911E+00, 0.1347015E+00, 0.1347015E+00 /
      data (ref_adm(19,iz,29,18),iz = 1,20) / &
     & 0.2624792E+00, 0.2624792E+00, 0.2577822E+00, 0.2561551E+00, &
     & 0.2548689E+00, 0.2539893E+00, 0.2524390E+00, 0.2497977E+00, &
     & 0.2464051E+00, 0.2423427E+00, 0.2379244E+00, 0.2317902E+00, &
     & 0.2246305E+00, 0.2178884E+00, 0.2082063E+00, 0.1954560E+00, &
     & 0.1823019E+00, 0.1650911E+00, 0.1347015E+00, 0.1347015E+00 /
      data (ref_adm(19,iz,30,18),iz = 1,20) / &
     & 0.2624792E+00, 0.2624792E+00, 0.2577822E+00, 0.2561550E+00, &
     & 0.2548690E+00, 0.2539893E+00, 0.2524390E+00, 0.2497977E+00, &
     & 0.2464051E+00, 0.2423427E+00, 0.2379244E+00, 0.2317902E+00, &
     & 0.2246305E+00, 0.2178884E+00, 0.2082063E+00, 0.1954560E+00, &
     & 0.1823019E+00, 0.1650911E+00, 0.1347015E+00, 0.1347015E+00 /
      data (ref_adm(19,iz,31,18),iz = 1,20) / &
     & 0.2624792E+00, 0.2624792E+00, 0.2577822E+00, 0.2561551E+00, &
     & 0.2548689E+00, 0.2617200E+00, 0.3022100E+00, 0.2497977E+00, &
     & 0.2464051E+00, 0.2423427E+00, 0.2379244E+00, 0.2317902E+00, &
     & 0.2246305E+00, 0.2178884E+00, 0.2082063E+00, 0.1954560E+00, &
     & 0.1823019E+00, 0.1650911E+00, 0.1347015E+00, 0.1347015E+00 /
      data (ref_adm(19,iz,32,18),iz = 1,20) / &
     & 0.2624792E+00, 0.2624792E+00, 0.2577822E+00, 0.2561550E+00, &
     & 0.2548690E+00, 0.2539893E+00, 0.2524390E+00, 0.2497977E+00, &
     & 0.2464051E+00, 0.2423427E+00, 0.2379244E+00, 0.2317902E+00, &
     & 0.2246305E+00, 0.2178884E+00, 0.2082063E+00, 0.1954560E+00, &
     & 0.1823019E+00, 0.1650911E+00, 0.1347015E+00, 0.1347015E+00 /
      data (ref_adm(19,iz,33,18),iz = 1,20) / &
     & 0.2624792E+00, 0.2624792E+00, 0.2577822E+00, 0.2561551E+00, &
     & 0.2548689E+00, 0.2539893E+00, 0.2524390E+00, 0.2497977E+00, &
     & 0.2464051E+00, 0.2423427E+00, 0.2379244E+00, 0.2317902E+00, &
     & 0.2246305E+00, 0.2178884E+00, 0.2082063E+00, 0.1954560E+00, &
     & 0.1823019E+00, 0.1650911E+00, 0.1347015E+00, 0.1347015E+00 /
      data (ref_adm(19,iz,34,18),iz = 1,20) / &
     & 0.2624792E+00, 0.2624792E+00, 0.2577822E+00, 0.2561550E+00, &
     & 0.2548690E+00, 0.2539893E+00, 0.2524390E+00, 0.2497977E+00, &
     & 0.2464051E+00, 0.2423427E+00, 0.2379244E+00, 0.2317902E+00, &
     & 0.2246305E+00, 0.2178884E+00, 0.2082063E+00, 0.1954560E+00, &
     & 0.1823019E+00, 0.1650911E+00, 0.1347015E+00, 0.1347015E+00 /
      data (ref_adm(19,iz,35,18),iz = 1,20) / &
     & 0.2624792E+00, 0.2624792E+00, 0.2577822E+00, 0.2561551E+00, &
     & 0.2548689E+00, 0.2539893E+00, 0.2524390E+00, 0.2497977E+00, &
     & 0.2464051E+00, 0.2423427E+00, 0.2379244E+00, 0.2317902E+00, &
     & 0.2246305E+00, 0.2178884E+00, 0.2082063E+00, 0.1954560E+00, &
     & 0.1823019E+00, 0.1650911E+00, 0.1347015E+00, 0.1347015E+00 /
      data (ref_adm(19,iz,36,18),iz = 1,20) / &
     & 0.2624792E+00, 0.2624792E+00, 0.2577822E+00, 0.2561550E+00, &
     & 0.2548690E+00, 0.2539893E+00, 0.2524390E+00, 0.2497977E+00, &
     & 0.2464051E+00, 0.2423427E+00, 0.2379244E+00, 0.2317902E+00, &
     & 0.2246305E+00, 0.2178884E+00, 0.2082063E+00, 0.1954560E+00, &
     & 0.1823019E+00, 0.1650911E+00, 0.1347015E+00, 0.1347015E+00 /
      data (ref_adm(19,iz,37,18),iz = 1,20) / &
     & 0.2624792E+00, 0.2624792E+00, 0.2577822E+00, 0.2561550E+00, &
     & 0.2548690E+00, 0.2539893E+00, 0.2524390E+00, 0.2497977E+00, &
     & 0.2464051E+00, 0.2423427E+00, 0.2379244E+00, 0.2317902E+00, &
     & 0.2246305E+00, 0.2178884E+00, 0.2082063E+00, 0.1954560E+00, &
     & 0.1823019E+00, 0.1650911E+00, 0.1347015E+00, 0.1347015E+00 /
      data (ref_adm(19,iz,38,18),iz = 1,20) / &
     & 0.2624792E+00, 0.2624792E+00, 0.2577822E+00, 0.2561550E+00, &
     & 0.2548690E+00, 0.2539893E+00, 0.2524390E+00, 0.2497977E+00, &
     & 0.2464051E+00, 0.2423427E+00, 0.2379244E+00, 0.2317902E+00, &
     & 0.2246305E+00, 0.2178884E+00, 0.2082063E+00, 0.1954560E+00, &
     & 0.1823019E+00, 0.1650911E+00, 0.1347015E+00, 0.1347015E+00 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(20,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(20,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(20,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.5550490E+04
      data (ref_adm(20,iz, 1, 4),iz = 1,20) / &
     & 0.5858276E+00, 0.5858276E+00, 0.5753443E+00, 0.5717127E+00, &
     & 0.5688422E+00, 0.5668790E+00, 0.5634188E+00, 0.5575237E+00, &
     & 0.5499518E+00, 0.5408850E+00, 0.5310237E+00, 0.5173329E+00, &
     & 0.5013530E+00, 0.4863053E+00, 0.4646957E+00, 0.4362384E+00, &
     & 0.4068798E+00, 0.3684669E+00, 0.3006404E+00, 0.3006404E+00 /
      data (ref_adm(20,iz, 2, 4),iz = 1,20) / &
     & 0.5858276E+00, 0.5858276E+00, 0.5753443E+00, 0.5717127E+00, &
     & 0.5688422E+00, 0.5668790E+00, 0.5634188E+00, 0.5575237E+00, &
     & 0.5499518E+00, 0.5408850E+00, 0.5310237E+00, 0.5173329E+00, &
     & 0.5013530E+00, 0.4863053E+00, 0.4646957E+00, 0.4362384E+00, &
     & 0.4068798E+00, 0.3684669E+00, 0.3006404E+00, 0.3006404E+00 /
      data (ref_adm(20,iz, 3, 4),iz = 1,20) / &
     & 0.5858276E+00, 0.5858276E+00, 0.5753443E+00, 0.5717127E+00, &
     & 0.5688422E+00, 0.5668790E+00, 0.5634188E+00, 0.5575236E+00, &
     & 0.5499518E+00, 0.5408850E+00, 0.5310237E+00, 0.5173329E+00, &
     & 0.5013530E+00, 0.4863053E+00, 0.4646957E+00, 0.4362384E+00, &
     & 0.4068798E+00, 0.3684669E+00, 0.3006404E+00, 0.3006404E+00 /
      data (ref_adm(20,iz, 4, 4),iz = 1,20) / &
     & 0.5858276E+00, 0.5858276E+00, 0.5753443E+00, 0.5717127E+00, &
     & 0.5688422E+00, 0.5668790E+00, 0.5634188E+00, 0.5575237E+00, &
     & 0.5499518E+00, 0.5408850E+00, 0.5310237E+00, 0.5173329E+00, &
     & 0.5013530E+00, 0.4863053E+00, 0.4646957E+00, 0.4362384E+00, &
     & 0.4068798E+00, 0.3684669E+00, 0.3006404E+00, 0.3006404E+00 /
      data (ref_adm(20,iz, 5, 4),iz = 1,20) / &
     & 0.5858276E+00, 0.5858276E+00, 0.5753443E+00, 0.5717127E+00, &
     & 0.5688422E+00, 0.5668790E+00, 0.5634188E+00, 0.5575236E+00, &
     & 0.5499518E+00, 0.5408850E+00, 0.5310237E+00, 0.5173329E+00, &
     & 0.5013530E+00, 0.4863053E+00, 0.4646957E+00, 0.4362384E+00, &
     & 0.4068798E+00, 0.3684669E+00, 0.3006404E+00, 0.3006404E+00 /
      data (ref_adm(20,iz, 6, 4),iz = 1,20) / &
     & 0.5858276E+00, 0.5858276E+00, 0.5753443E+00, 0.5717127E+00, &
     & 0.5688422E+00, 0.5668790E+00, 0.5634188E+00, 0.5575237E+00, &
     & 0.5499518E+00, 0.5408850E+00, 0.5310237E+00, 0.5173329E+00, &
     & 0.5013530E+00, 0.4863053E+00, 0.4646957E+00, 0.4362384E+00, &
     & 0.4068798E+00, 0.3684669E+00, 0.3006404E+00, 0.3006404E+00 /
      data (ref_adm(20,iz, 7, 4),iz = 1,20) / &
     & 0.5858276E+00, 0.5858276E+00, 0.5753443E+00, 0.5717127E+00, &
     & 0.5688422E+00, 0.5668790E+00, 0.5634188E+00, 0.5575236E+00, &
     & 0.5499518E+00, 0.5408850E+00, 0.5310237E+00, 0.5173329E+00, &
     & 0.5013530E+00, 0.4863053E+00, 0.4646957E+00, 0.4362384E+00, &
     & 0.4068798E+00, 0.3684669E+00, 0.3006404E+00, 0.3006404E+00 /
      data (ref_adm(20,iz, 8, 4),iz = 1,20) / &
     & 0.5858276E+00, 0.5858276E+00, 0.5753443E+00, 0.5717127E+00, &
     & 0.5688422E+00, 0.5668790E+00, 0.5578800E+00, 0.5342400E+00, &
     & 0.5499518E+00, 0.5408850E+00, 0.5310237E+00, 0.5173329E+00, &
     & 0.5013530E+00, 0.4863053E+00, 0.4646957E+00, 0.4362384E+00, &
     & 0.4068798E+00, 0.3684669E+00, 0.3006404E+00, 0.3006404E+00 /
      data (ref_adm(20,iz, 9, 4),iz = 1,20) / &
     & 0.5858276E+00, 0.5858276E+00, 0.5753443E+00, 0.5717127E+00, &
     & 0.5688422E+00, 0.5668790E+00, 0.5634188E+00, 0.5575236E+00, &
     & 0.5499518E+00, 0.5032400E+00, 0.5310237E+00, 0.5173329E+00, &
     & 0.5013530E+00, 0.4863053E+00, 0.4646957E+00, 0.4362384E+00, &
     & 0.4068798E+00, 0.3684669E+00, 0.3006404E+00, 0.3006404E+00 /
      data (ref_adm(20,iz,10, 4),iz = 1,20) / &
     & 0.5858276E+00, 0.5858276E+00, 0.5753443E+00, 0.5717127E+00, &
     & 0.5688422E+00, 0.5668790E+00, 0.5634188E+00, 0.5575237E+00, &
     & 0.5499518E+00, 0.5408850E+00, 0.5470700E+00, 0.5173329E+00, &
     & 0.5013530E+00, 0.4863053E+00, 0.4646957E+00, 0.4362384E+00, &
     & 0.4068798E+00, 0.3684669E+00, 0.3006404E+00, 0.3006404E+00 /
      data (ref_adm(20,iz,11, 4),iz = 1,20) / &
     & 0.5858276E+00, 0.5858276E+00, 0.5753443E+00, 0.5717127E+00, &
     & 0.5688422E+00, 0.5668790E+00, 0.5634188E+00, 0.5575236E+00, &
     & 0.5499518E+00, 0.5408850E+00, 0.5310237E+00, 0.5420600E+00, &
     & 0.5230000E+00, 0.4863053E+00, 0.4646957E+00, 0.4362384E+00, &
     & 0.4068798E+00, 0.3684669E+00, 0.3006404E+00, 0.3006404E+00 /
      data (ref_adm(20,iz,12, 4),iz = 1,20) / &
     & 0.5858276E+00, 0.5858276E+00, 0.5753443E+00, 0.5717127E+00, &
     & 0.5688422E+00, 0.5668790E+00, 0.5634188E+00, 0.5575237E+00, &
     & 0.5499518E+00, 0.5408850E+00, 0.5310237E+00, 0.5173329E+00, &
     & 0.5013530E+00, 0.4863053E+00, 0.4646957E+00, 0.4362384E+00, &
     & 0.4068798E+00, 0.3684669E+00, 0.3006404E+00, 0.3006404E+00 /
      data (ref_adm(20,iz,13, 4),iz = 1,20) / &
     & 0.5858276E+00, 0.5858276E+00, 0.5753443E+00, 0.5717127E+00, &
     & 0.5688422E+00, 0.5668790E+00, 0.5634188E+00, 0.5575236E+00, &
     & 0.5499518E+00, 0.5408850E+00, 0.5310237E+00, 0.5173329E+00, &
     & 0.5013530E+00, 0.4863053E+00, 0.4646957E+00, 0.4362384E+00, &
     & 0.4068798E+00, 0.3684669E+00, 0.3006404E+00, 0.3006404E+00 /
      data (ref_adm(20,iz,14, 4),iz = 1,20) / &
     & 0.5858276E+00, 0.5858276E+00, 0.5753443E+00, 0.5717127E+00, &
     & 0.5688422E+00, 0.5668790E+00, 0.5634188E+00, 0.5575237E+00, &
     & 0.5499518E+00, 0.5408850E+00, 0.5310237E+00, 0.5173329E+00, &
     & 0.5013530E+00, 0.4863053E+00, 0.4646957E+00, 0.4362384E+00, &
     & 0.4068798E+00, 0.3684669E+00, 0.3006404E+00, 0.3006404E+00 /
      data (ref_adm(20,iz,15, 4),iz = 1,20) / &
     & 0.5858276E+00, 0.5858276E+00, 0.5753443E+00, 0.5717127E+00, &
     & 0.5688422E+00, 0.5668790E+00, 0.5634188E+00, 0.5575236E+00, &
     & 0.5499518E+00, 0.5408850E+00, 0.5310237E+00, 0.5173329E+00, &
     & 0.5013530E+00, 0.4863053E+00, 0.4646957E+00, 0.4362384E+00, &
     & 0.4068798E+00, 0.3684669E+00, 0.3006404E+00, 0.3006404E+00 /
      data (ref_adm(20,iz,16, 4),iz = 1,20) / &
     & 0.5858276E+00, 0.5858276E+00, 0.5753443E+00, 0.5717127E+00, &
     & 0.5688422E+00, 0.5668790E+00, 0.5634188E+00, 0.5575237E+00, &
     & 0.5499518E+00, 0.5408850E+00, 0.5310237E+00, 0.5173329E+00, &
     & 0.5013530E+00, 0.4863053E+00, 0.4646957E+00, 0.4362384E+00, &
     & 0.4068798E+00, 0.3684669E+00, 0.3006404E+00, 0.3006404E+00 /
      data (ref_adm(20,iz,17, 4),iz = 1,20) / &
     & 0.5858276E+00, 0.5858276E+00, 0.5753443E+00, 0.5717127E+00, &
     & 0.5688422E+00, 0.5668790E+00, 0.5634188E+00, 0.5575236E+00, &
     & 0.5499518E+00, 0.5408850E+00, 0.5310237E+00, 0.5173329E+00, &
     & 0.5013530E+00, 0.4863053E+00, 0.4646957E+00, 0.4362384E+00, &
     & 0.4068798E+00, 0.3684669E+00, 0.3006404E+00, 0.3006404E+00 /
      data (ref_adm(20,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(20,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo  0.5238209E+00
      data (ref_adm(20,iz, 1, 5),iz = 1,20) / &
     & 0.5327250E+00, 0.5327250E+00, 0.5278274E+00, 0.5303320E+00, &
     & 0.5376294E+00, 0.5381518E+00, 0.5329788E+00, 0.5274751E+00, &
     & 0.5225277E+00, 0.5184485E+00, 0.5156064E+00, 0.5109585E+00, &
     & 0.5061691E+00, 0.5016847E+00, 0.4919169E+00, 0.4756548E+00, &
     & 0.4526266E+00, 0.4114720E+00, 0.3248645E+00, 0.3248645E+00 /
      data (ref_adm(20,iz, 2, 5),iz = 1,20) / &
     & 0.5327250E+00, 0.5327250E+00, 0.5278274E+00, 0.5303320E+00, &
     & 0.5376294E+00, 0.5381518E+00, 0.5329788E+00, 0.5274751E+00, &
     & 0.5225277E+00, 0.5184485E+00, 0.5156064E+00, 0.5109585E+00, &
     & 0.5061691E+00, 0.5016847E+00, 0.4919169E+00, 0.4756548E+00, &
     & 0.4526266E+00, 0.4114720E+00, 0.3248645E+00, 0.3248645E+00 /
      data (ref_adm(20,iz, 3, 5),iz = 1,20) / &
     & 0.5327210E+00, 0.5327210E+00, 0.5278341E+00, 0.5303347E+00, &
     & 0.5375799E+00, 0.5381516E+00, 0.5330833E+00, 0.5277773E+00, &
     & 0.5227167E+00, 0.5184362E+00, 0.5156555E+00, 0.5110688E+00, &
     & 0.5061375E+00, 0.5013489E+00, 0.4918442E+00, 0.4754463E+00, &
     & 0.4525224E+00, 0.4113499E+00, 0.2424310E+00, 0.2424310E+00 /
      data (ref_adm(20,iz, 4, 5),iz = 1,20) / &
     & 0.5326805E+00, 0.5326805E+00, 0.5278520E+00, 0.5785800E+00, &
     & 0.5903400E+00, 0.5871500E+00, 0.5329336E+00, 0.5279993E+00, &
     & 0.5225433E+00, 0.5185918E+00, 0.5155117E+00, 0.5113573E+00, &
     & 0.5061238E+00, 0.5010194E+00, 0.4920118E+00, 0.4754896E+00, &
     & 0.4522036E+00, 0.4109763E+00, 0.3247827E+00, 0.3247827E+00 /
      data (ref_adm(20,iz, 5, 5),iz = 1,20) / &
     & 0.5327711E+00, 0.5327711E+00, 0.5279150E+00, 0.5304887E+00, &
     & 0.5376162E+00, 0.5382102E+00, 0.5333098E+00, 0.5277987E+00, &
     & 0.5226186E+00, 0.5185623E+00, 0.5155864E+00, 0.5109555E+00, &
     & 0.5060678E+00, 0.5012751E+00, 0.4916757E+00, 0.4751650E+00, &
     & 0.4522810E+00, 0.4110267E+00, 0.3246665E+00, 0.3246665E+00 /
      data (ref_adm(20,iz, 6, 5),iz = 1,20) / &
     & 0.5332144E+00, 0.5332144E+00, 0.5278158E+00, 0.5304933E+00, &
     & 0.5374392E+00, 0.5383710E+00, 0.5332816E+00, 0.5280505E+00, &
     & 0.5227565E+00, 0.5187470E+00, 0.5155653E+00, 0.5111120E+00, &
     & 0.5060001E+00, 0.5009032E+00, 0.4915847E+00, 0.4748248E+00, &
     & 0.4519248E+00, 0.4107386E+00, 0.3245392E+00, 0.3245392E+00 /
      data (ref_adm(20,iz, 7, 5),iz = 1,20) / &
     & 0.5330618E+00, 0.5330618E+00, 0.5281339E+00, 0.5306448E+00, &
     & 0.5371119E+00, 0.5385192E+00, 0.5334318E+00, 0.5282827E+00, &
     & 0.5229493E+00, 0.5188392E+00, 0.5155088E+00, 0.5111784E+00, &
     & 0.5057209E+00, 0.5006309E+00, 0.4912229E+00, 0.4747635E+00, &
     & 0.4516089E+00, 0.4105328E+00, 0.3243700E+00, 0.3243700E+00 /
      data (ref_adm(20,iz, 8, 5),iz = 1,20) / &
     & 0.5330958E+00, 0.5330958E+00, 0.5281511E+00, 0.5421000E+00, &
     & 0.5366855E+00, 0.5386549E+00, 0.5337732E+00, 0.5281331E+00, &
     & 0.5230771E+00, 0.5189421E+00, 0.5154133E+00, 0.5109352E+00, &
     & 0.5054366E+00, 0.5004193E+00, 0.4907477E+00, 0.4743848E+00, &
     & 0.4511917E+00, 0.4101914E+00, 0.3240953E+00, 0.3240953E+00 /
      data (ref_adm(20,iz, 9, 5),iz = 1,20) / &
     & 0.5333598E+00, 0.5333598E+00, 0.5282218E+00, 0.4783200E+00, &
     & 0.5365735E+00, 0.5389414E+00, 0.5651000E+00, 0.5285231E+00, &
     & 0.5231968E+00, 0.5188963E+00, 0.5152540E+00, 0.5107857E+00, &
     & 0.5053104E+00, 0.5000715E+00, 0.4904714E+00, 0.4739106E+00, &
     & 0.4507354E+00, 0.4097743E+00, 0.3238775E+00, 0.3238775E+00 /
      data (ref_adm(20,iz,10, 5),iz = 1,20) / &
     & 0.5335048E+00, 0.5335048E+00, 0.5286056E+00, 0.5296146E+00, &
     & 0.5364682E+00, 0.5389740E+00, 0.5342284E+00, 0.5287412E+00, &
     & 0.5233384E+00, 0.5189351E+00, 0.5152919E+00, 0.5107983E+00, &
     & 0.5051093E+00, 0.4997592E+00, 0.4900973E+00, 0.4734429E+00, &
     & 0.4502547E+00, 0.4093978E+00, 0.3236237E+00, 0.3236237E+00 /
      data (ref_adm(20,iz,11, 5),iz = 1,20) / &
     & 0.5337247E+00, 0.5337247E+00, 0.5285987E+00, 0.5295012E+00, &
     & 0.5361686E+00, 0.5390704E+00, 0.5342892E+00, 0.5282800E+00, &
     & 0.5231997E+00, 0.5192505E+00, 0.5153006E+00, 0.5107226E+00, &
     & 0.4715900E+00, 0.4994319E+00, 0.4897090E+00, 0.4730489E+00, &
     & 0.4497623E+00, 0.4089798E+00, 0.3233385E+00, 0.3233385E+00 /
      data (ref_adm(20,iz,12, 5),iz = 1,20) / &
     & 0.5335131E+00, 0.5335131E+00, 0.5287736E+00, 0.5294638E+00, &
     & 0.5356452E+00, 0.5392472E+00, 0.5345652E+00, 0.5294854E+00, &
     & 0.5234720E+00, 0.5193537E+00, 0.5269900E+00, 0.5144500E+00, &
     & 0.5046146E+00, 0.4989246E+00, 0.4892878E+00, 0.4724395E+00, &
     & 0.4491849E+00, 0.4085526E+00, 0.3230195E+00, 0.3230195E+00 /
      data (ref_adm(20,iz,13, 5),iz = 1,20) / &
     & 0.5335129E+00, 0.5335129E+00, 0.5286884E+00, 0.5289385E+00, &
     & 0.5353514E+00, 0.5392229E+00, 0.5347306E+00, 0.5294182E+00, &
     & 0.5235268E+00, 0.5193965E+00, 0.5152466E+00, 0.5106168E+00, &
     & 0.4473200E+00, 0.4980821E+00, 0.4889094E+00, 0.4718806E+00, &
     & 0.4486234E+00, 0.4079092E+00, 0.3227022E+00, 0.3227022E+00 /
      data (ref_adm(20,iz,14, 5),iz = 1,20) / &
     & 0.5335568E+00, 0.5335568E+00, 0.5285491E+00, 0.5287641E+00, &
     & 0.5348387E+00, 0.5391789E+00, 0.5352835E+00, 0.5297326E+00, &
     & 0.5240805E+00, 0.5194388E+00, 0.5152512E+00, 0.5104371E+00, &
     & 0.5040955E+00, 0.4413700E+00, 0.4882187E+00, 0.4711058E+00, &
     & 0.4481442E+00, 0.4074229E+00, 0.3224206E+00, 0.3224206E+00 /
      data (ref_adm(20,iz,15, 5),iz = 1,20) / &
     & 0.5341524E+00, 0.5341524E+00, 0.5287475E+00, 0.5283672E+00, &
     & 0.5343077E+00, 0.5393885E+00, 0.5359490E+00, 0.5303704E+00, &
     & 0.5244020E+00, 0.5198286E+00, 0.5150900E+00, 0.5102207E+00, &
     & 0.5036586E+00, 0.4973485E+00, 0.4876804E+00, 0.4703412E+00, &
     & 0.4473117E+00, 0.4067763E+00, 0.3220848E+00, 0.3220848E+00 /
      data (ref_adm(20,iz,16, 5),iz = 1,20) / &
     & 0.5340884E+00, 0.5340884E+00, 0.5288575E+00, 0.5286208E+00, &
     & 0.5339625E+00, 0.5389918E+00, 0.5360169E+00, 0.5305079E+00, &
     & 0.5247808E+00, 0.5199235E+00, 0.5151945E+00, 0.5103347E+00, &
     & 0.5032705E+00, 0.4971395E+00, 0.4872562E+00, 0.4699309E+00, &
     & 0.4468875E+00, 0.4062929E+00, 0.3217668E+00, 0.3217668E+00 /
      data (ref_adm(20,iz,17, 5),iz = 1,20) / &
     & 0.5344175E+00, 0.5344175E+00, 0.5285606E+00, 0.5288137E+00, &
     & 0.5333943E+00, 0.5392721E+00, 0.5367174E+00, 0.5311685E+00, &
     & 0.5250169E+00, 0.5199991E+00, 0.5155140E+00, 0.5099781E+00, &
     & 0.5031164E+00, 0.4965441E+00, 0.4866068E+00, 0.4692659E+00, &
     & 0.4460077E+00, 0.4055451E+00, 0.3214501E+00, 0.3214501E+00 /
      data (ref_adm(20,iz,18, 5),iz = 1,20) / &
     & 0.5769400E+00, 0.5769400E+00, 0.5258064E+00, 0.5226336E+00, &
     & 0.5236834E+00, 0.5287261E+00, 0.5273618E+00, 0.5195276E+00, &
     & 0.5119998E+00, 0.5041884E+00, 0.4975814E+00, 0.4900545E+00, &
     & 0.4823386E+00, 0.4763797E+00, 0.4678063E+00, 0.4547640E+00, &
     & 0.4373866E+00, 0.4029984E+00, 0.3257329E+00, 0.3257329E+00 /
      data (ref_adm(20,iz,19, 5),iz = 1,20) / &
     & 0.5775190E+00, 0.5775190E+00, 0.5258064E+00, 0.5226336E+00, &
     & 0.5236835E+00, 0.5287261E+00, 0.5273618E+00, 0.5195276E+00, &
     & 0.5119998E+00, 0.5041884E+00, 0.4975814E+00, 0.4900545E+00, &
     & 0.4823386E+00, 0.4763797E+00, 0.4678063E+00, 0.4560900E+00, &
     & 0.4373866E+00, 0.4029984E+00, 0.3257329E+00, 0.3257329E+00 /
      data (ref_adm(20,iz,20, 5),iz = 1,20) / &
     & 0.5775190E+00, 0.5775190E+00, 0.5258064E+00, 0.5226336E+00, &
     & 0.5236834E+00, 0.5287261E+00, 0.5273618E+00, 0.5195276E+00, &
     & 0.5119998E+00, 0.5041884E+00, 0.4975814E+00, 0.4900545E+00, &
     & 0.4802200E+00, 0.5007200E+00, 0.4678063E+00, 0.4547640E+00, &
     & 0.4373866E+00, 0.4029984E+00, 0.3257329E+00, 0.3257329E+00 /
      data (ref_adm(20,iz,21, 5),iz = 1,20) / &
     & 0.5775190E+00, 0.5775190E+00, 0.5258064E+00, 0.5226336E+00, &
     & 0.5236835E+00, 0.5287261E+00, 0.5273618E+00, 0.5195276E+00, &
     & 0.5119998E+00, 0.5041884E+00, 0.4975814E+00, 0.4900545E+00, &
     & 0.4823386E+00, 0.4763797E+00, 0.4678063E+00, 0.4547640E+00, &
     & 0.4373866E+00, 0.4029984E+00, 0.3257329E+00, 0.3257329E+00 /
      data (ref_adm(20,iz,22, 5),iz = 1,20) / &
     & 0.6142964E+00, 0.6142964E+00, 0.6033036E+00, 0.5994956E+00, &
     & 0.5964857E+00, 0.5944270E+00, 0.5907986E+00, 0.5846171E+00, &
     & 0.5766772E+00, 0.5671698E+00, 0.5568293E+00, 0.5424731E+00, &
     & 0.5257167E+00, 0.5099378E+00, 0.4681600E+00, 0.4574379E+00, &
     & 0.4266525E+00, 0.3863729E+00, 0.3152503E+00, 0.3152503E+00 /
      data (ref_adm(20,iz,23, 5),iz = 1,20) / &
     & 0.6142964E+00, 0.6142964E+00, 0.6033036E+00, 0.5994956E+00, &
     & 0.5964857E+00, 0.5944270E+00, 0.5907986E+00, 0.5846169E+00, &
     & 0.5766772E+00, 0.5671698E+00, 0.5568293E+00, 0.5424731E+00, &
     & 0.5257167E+00, 0.5099378E+00, 0.4790900E+00, 0.4574379E+00, &
     & 0.4266525E+00, 0.3863729E+00, 0.3152503E+00, 0.3152503E+00 /
      data (ref_adm(20,iz,24, 5),iz = 1,20) / &
     & 0.6142964E+00, 0.6142964E+00, 0.6033036E+00, 0.5994956E+00, &
     & 0.5964857E+00, 0.5944270E+00, 0.5907986E+00, 0.5846171E+00, &
     & 0.5766772E+00, 0.5671698E+00, 0.5568293E+00, 0.5424731E+00, &
     & 0.5257167E+00, 0.5099378E+00, 0.4872781E+00, 0.4574379E+00, &
     & 0.4266525E+00, 0.3863729E+00, 0.3152503E+00, 0.3152503E+00 /
      data (ref_adm(20,iz,25, 5),iz = 1,20) / &
     & 0.6142964E+00, 0.6142964E+00, 0.6033036E+00, 0.5994956E+00, &
     & 0.5964857E+00, 0.5944270E+00, 0.5907986E+00, 0.5846169E+00, &
     & 0.5766772E+00, 0.5671698E+00, 0.5568293E+00, 0.5424731E+00, &
     & 0.5257167E+00, 0.5099378E+00, 0.4872781E+00, 0.4574379E+00, &
     & 0.4266525E+00, 0.3863729E+00, 0.3152503E+00, 0.3152503E+00 /
      data (ref_adm(20,iz,26, 5),iz = 1,20) / &
     & 0.6142964E+00, 0.6142964E+00, 0.6033036E+00, 0.5994956E+00, &
     & 0.5964857E+00, 0.5944270E+00, 0.5907986E+00, 0.5846171E+00, &
     & 0.5766772E+00, 0.5671698E+00, 0.5568293E+00, 0.5424731E+00, &
     & 0.5257167E+00, 0.5099378E+00, 0.4872781E+00, 0.4574379E+00, &
     & 0.4266525E+00, 0.3863729E+00, 0.3152503E+00, 0.3152503E+00 /
      data (ref_adm(20,iz,27, 5),iz = 1,20) / &
     & 0.6142964E+00, 0.6142964E+00, 0.6033036E+00, 0.5994956E+00, &
     & 0.5964857E+00, 0.5944270E+00, 0.5907986E+00, 0.5846169E+00, &
     & 0.5766772E+00, 0.5671698E+00, 0.5568293E+00, 0.5424731E+00, &
     & 0.5257167E+00, 0.5099378E+00, 0.4987400E+00, 0.4574379E+00, &
     & 0.4266525E+00, 0.3863729E+00, 0.3152503E+00, 0.3152503E+00 /
      data (ref_adm(20,iz,28, 5),iz = 1,20) / &
     & 0.6142964E+00, 0.6142964E+00, 0.6033036E+00, 0.5994956E+00, &
     & 0.5964857E+00, 0.5944270E+00, 0.5907986E+00, 0.5846171E+00, &
     & 0.5766772E+00, 0.5671698E+00, 0.5568293E+00, 0.5424731E+00, &
     & 0.5257167E+00, 0.5099378E+00, 0.4872781E+00, 0.4574379E+00, &
     & 0.4266525E+00, 0.3863729E+00, 0.3152503E+00, 0.3152503E+00 /
      data (ref_adm(20,iz,29, 5),iz = 1,20) / &
     & 0.6142964E+00, 0.6142964E+00, 0.6033036E+00, 0.5994956E+00, &
     & 0.5964857E+00, 0.5944270E+00, 0.5907986E+00, 0.5846169E+00, &
     & 0.5766772E+00, 0.5671698E+00, 0.5568293E+00, 0.5424731E+00, &
     & 0.5257167E+00, 0.5099378E+00, 0.4872781E+00, 0.4574379E+00, &
     & 0.4266525E+00, 0.3863729E+00, 0.3152503E+00, 0.3152503E+00 /
      data (ref_adm(20,iz,30, 5),iz = 1,20) / &
     & 0.6142964E+00, 0.6142964E+00, 0.6033036E+00, 0.5994956E+00, &
     & 0.5964857E+00, 0.5944270E+00, 0.5907986E+00, 0.5846171E+00, &
     & 0.5766772E+00, 0.5671698E+00, 0.5568293E+00, 0.5424731E+00, &
     & 0.5257167E+00, 0.5099378E+00, 0.4872781E+00, 0.4574379E+00, &
     & 0.4266525E+00, 0.3863729E+00, 0.3152503E+00, 0.3152503E+00 /
      data (ref_adm(20,iz,31, 5),iz = 1,20) / &
     & 0.6142964E+00, 0.6142964E+00, 0.6033036E+00, 0.5994956E+00, &
     & 0.5964857E+00, 0.5944270E+00, 0.5907986E+00, 0.5846169E+00, &
     & 0.5766772E+00, 0.5671698E+00, 0.5568293E+00, 0.5424731E+00, &
     & 0.5257167E+00, 0.5099378E+00, 0.4872781E+00, 0.4574379E+00, &
     & 0.4266525E+00, 0.3863729E+00, 0.3152503E+00, 0.3152503E+00 /
      data (ref_adm(20,iz,32, 5),iz = 1,20) / &
     & 0.6142964E+00, 0.6142964E+00, 0.6033036E+00, 0.5994956E+00, &
     & 0.5964857E+00, 0.5944270E+00, 0.5907986E+00, 0.5846171E+00, &
     & 0.5766772E+00, 0.5671698E+00, 0.5568293E+00, 0.5424731E+00, &
     & 0.5257167E+00, 0.5099378E+00, 0.4872781E+00, 0.4574379E+00, &
     & 0.4266525E+00, 0.3863729E+00, 0.3152503E+00, 0.3152503E+00 /
      data (ref_adm(20,iz,33, 5),iz = 1,20) / &
     & 0.6142964E+00, 0.6142964E+00, 0.6033036E+00, 0.5994956E+00, &
     & 0.5964857E+00, 0.5944270E+00, 0.5623100E+00, 0.6216500E+00, &
     & 0.5766772E+00, 0.5671698E+00, 0.5568293E+00, 0.5424731E+00, &
     & 0.5257167E+00, 0.5099378E+00, 0.4872781E+00, 0.4574379E+00, &
     & 0.4266525E+00, 0.3863729E+00, 0.3152503E+00, 0.3152503E+00 /
      data (ref_adm(20,iz,34, 5),iz = 1,20) / &
     & 0.5723300E+00, 0.5723300E+00, 0.6033036E+00, 0.5994956E+00, &
     & 0.5964857E+00, 0.5944270E+00, 0.6078700E+00, 0.6178300E+00, &
     & 0.5766772E+00, 0.5671698E+00, 0.5568293E+00, 0.5424731E+00, &
     & 0.5257167E+00, 0.5099378E+00, 0.4872781E+00, 0.4574379E+00, &
     & 0.4266525E+00, 0.3863729E+00, 0.3152503E+00, 0.3152503E+00 /
      data (ref_adm(20,iz,35, 5),iz = 1,20) / &
     & 0.6142964E+00, 0.6142964E+00, 0.6033036E+00, 0.5994956E+00, &
     & 0.5964857E+00, 0.5944270E+00, 0.5907986E+00, 0.5846169E+00, &
     & 0.5766772E+00, 0.5671698E+00, 0.5568293E+00, 0.5424731E+00, &
     & 0.5257167E+00, 0.5099378E+00, 0.4872781E+00, 0.4574379E+00, &
     & 0.4266525E+00, 0.3863729E+00, 0.3152503E+00, 0.3152503E+00 /
      data (ref_adm(20,iz,36, 5),iz = 1,20) / &
     & 0.6142964E+00, 0.6142964E+00, 0.6033036E+00, 0.5994956E+00, &
     & 0.5964857E+00, 0.5944270E+00, 0.5907986E+00, 0.5846171E+00, &
     & 0.5766772E+00, 0.5671698E+00, 0.5568293E+00, 0.5424731E+00, &
     & 0.5257167E+00, 0.5099378E+00, 0.4872781E+00, 0.4574379E+00, &
     & 0.4266525E+00, 0.3863729E+00, 0.3152503E+00, 0.3152503E+00 /
      data (ref_adm(20,iz,37, 5),iz = 1,20) / &
     & 0.6142964E+00, 0.6142964E+00, 0.6033036E+00, 0.5994956E+00, &
     & 0.5964857E+00, 0.5944270E+00, 0.5907986E+00, 0.5846171E+00, &
     & 0.5766772E+00, 0.5671698E+00, 0.5568293E+00, 0.5424731E+00, &
     & 0.5257167E+00, 0.5099378E+00, 0.4872781E+00, 0.4574379E+00, &
     & 0.4266525E+00, 0.3863729E+00, 0.3152503E+00, 0.3152503E+00 /
      data (ref_adm(20,iz,38, 5),iz = 1,20) / &
     & 0.6142964E+00, 0.6142964E+00, 0.6033036E+00, 0.5994956E+00, &
     & 0.5964857E+00, 0.5944270E+00, 0.5907986E+00, 0.5846171E+00, &
     & 0.5766772E+00, 0.5671698E+00, 0.5568293E+00, 0.5424731E+00, &
     & 0.5257167E+00, 0.5099378E+00, 0.4872781E+00, 0.4574379E+00, &
     & 0.4266525E+00, 0.3863729E+00, 0.3152503E+00, 0.3152503E+00 /
! Solar Zenith Angle 25.0 Albedo  0.5274762E+00
      data (ref_adm(20,iz, 1, 6),iz = 1,20) / &
     & 0.6061281E+00, 0.6061281E+00, 0.5457375E+00, 0.5434717E+00, &
     & 0.5467364E+00, 0.5551736E+00, 0.5565211E+00, 0.5506891E+00, &
     & 0.5455535E+00, 0.5403000E+00, 0.5364021E+00, 0.5318593E+00, &
     & 0.5378900E+00, 0.5208424E+00, 0.5113904E+00, 0.4978800E+00, &
     & 0.4728635E+00, 0.4321892E+00, 0.3467987E+00, 0.3467987E+00 /
      data (ref_adm(20,iz, 2, 6),iz = 1,20) / &
     & 0.6061281E+00, 0.6061281E+00, 0.5457375E+00, 0.5434717E+00, &
     & 0.5467364E+00, 0.5551736E+00, 0.5565211E+00, 0.5506891E+00, &
     & 0.5455535E+00, 0.5403000E+00, 0.5364021E+00, 0.5318593E+00, &
     & 0.5378900E+00, 0.5208424E+00, 0.5113904E+00, 0.4978800E+00, &
     & 0.4728635E+00, 0.4321892E+00, 0.3467987E+00, 0.3467987E+00 /
      data (ref_adm(20,iz, 3, 6),iz = 1,20) / &
     & 0.6284300E+00, 0.6284300E+00, 0.5256700E+00, 0.5434717E+00, &
     & 0.5467364E+00, 0.5551736E+00, 0.5565211E+00, 0.5506890E+00, &
     & 0.5455536E+00, 0.5403000E+00, 0.5364021E+00, 0.5318593E+00, &
     & 0.5340900E+00, 0.5208424E+00, 0.5113904E+00, 0.4927100E+00, &
     & 0.4728635E+00, 0.4321892E+00, 0.1985074E+00, 0.1985074E+00 /
      data (ref_adm(20,iz, 4, 6),iz = 1,20) / &
     & 0.6061281E+00, 0.6061281E+00, 0.5457375E+00, 0.5434717E+00, &
     & 0.4629900E+00, 0.5551736E+00, 0.5565211E+00, 0.5506891E+00, &
     & 0.5455535E+00, 0.5403000E+00, 0.5364021E+00, 0.5318593E+00, &
     & 0.5477900E+00, 0.5208424E+00, 0.5113904E+00, 0.5187000E+00, &
     & 0.4728635E+00, 0.4321892E+00, 0.3467987E+00, 0.3467987E+00 /
      data (ref_adm(20,iz, 5, 6),iz = 1,20) / &
     & 0.6373700E+00, 0.6373700E+00, 0.5457376E+00, 0.5434717E+00, &
     & 0.5467364E+00, 0.5551736E+00, 0.5565211E+00, 0.5506890E+00, &
     & 0.5455536E+00, 0.5403000E+00, 0.5364021E+00, 0.5318593E+00, &
     & 0.5108000E+00, 0.5208424E+00, 0.5310800E+00, 0.5373100E+00, &
     & 0.4626100E+00, 0.4321892E+00, 0.3467987E+00, 0.3467987E+00 /
      data (ref_adm(20,iz, 6, 6),iz = 1,20) / &
     & 0.6061281E+00, 0.6061281E+00, 0.5457375E+00, 0.5434717E+00, &
     & 0.5467364E+00, 0.5551736E+00, 0.5565211E+00, 0.5506891E+00, &
     & 0.5455535E+00, 0.5403000E+00, 0.5364021E+00, 0.5318593E+00, &
     & 0.5261795E+00, 0.5208424E+00, 0.5113904E+00, 0.5196200E+00, &
     & 0.5490500E+00, 0.4321892E+00, 0.3467987E+00, 0.3467987E+00 /
      data (ref_adm(20,iz, 7, 6),iz = 1,20) / &
     & 0.6061281E+00, 0.6061281E+00, 0.5457376E+00, 0.5434717E+00, &
     & 0.5467364E+00, 0.5551736E+00, 0.5565211E+00, 0.5506890E+00, &
     & 0.5455536E+00, 0.5403000E+00, 0.5364021E+00, 0.5318593E+00, &
     & 0.5261795E+00, 0.5208424E+00, 0.5113904E+00, 0.4951078E+00, &
     & 0.4728635E+00, 0.4321892E+00, 0.3467987E+00, 0.3467987E+00 /
      data (ref_adm(20,iz, 8, 6),iz = 1,20) / &
     & 0.6061281E+00, 0.6061281E+00, 0.5457375E+00, 0.5434717E+00, &
     & 0.5467364E+00, 0.5551736E+00, 0.5565211E+00, 0.5506891E+00, &
     & 0.5455535E+00, 0.5403000E+00, 0.5364021E+00, 0.5318593E+00, &
     & 0.5261795E+00, 0.5208424E+00, 0.5113904E+00, 0.5161900E+00, &
     & 0.4728635E+00, 0.4321892E+00, 0.3467987E+00, 0.3467987E+00 /
      data (ref_adm(20,iz, 9, 6),iz = 1,20) / &
     & 0.6061281E+00, 0.6061281E+00, 0.5457376E+00, 0.5434717E+00, &
     & 0.5467364E+00, 0.5551736E+00, 0.5565211E+00, 0.5506890E+00, &
     & 0.5455536E+00, 0.5403000E+00, 0.5364021E+00, 0.5318593E+00, &
     & 0.5261795E+00, 0.5208424E+00, 0.5113904E+00, 0.4951078E+00, &
     & 0.4728635E+00, 0.4321892E+00, 0.3467987E+00, 0.3467987E+00 /
      data (ref_adm(20,iz,10, 6),iz = 1,20) / &
     & 0.6061281E+00, 0.6061281E+00, 0.5457375E+00, 0.5434717E+00, &
     & 0.5467364E+00, 0.5551736E+00, 0.5565211E+00, 0.5506891E+00, &
     & 0.5455535E+00, 0.5149500E+00, 0.4922600E+00, 0.5318593E+00, &
     & 0.5261795E+00, 0.5208424E+00, 0.5113904E+00, 0.4951078E+00, &
     & 0.4728635E+00, 0.4321892E+00, 0.3467987E+00, 0.3467987E+00 /
      data (ref_adm(20,iz,11, 6),iz = 1,20) / &
     & 0.6061281E+00, 0.6061281E+00, 0.5457376E+00, 0.5434717E+00, &
     & 0.5450200E+00, 0.4919500E+00, 0.5565211E+00, 0.5506890E+00, &
     & 0.4620200E+00, 0.5407000E+00, 0.5391700E+00, 0.5061600E+00, &
     & 0.5261795E+00, 0.5208424E+00, 0.5113904E+00, 0.4951078E+00, &
     & 0.4728635E+00, 0.4321892E+00, 0.3467987E+00, 0.3467987E+00 /
      data (ref_adm(20,iz,12, 6),iz = 1,20) / &
     & 0.6061281E+00, 0.6061281E+00, 0.5457375E+00, 0.5434717E+00, &
     & 0.5467364E+00, 0.5551736E+00, 0.5333000E+00, 0.5506891E+00, &
     & 0.5455535E+00, 0.4966100E+00, 0.5402100E+00, 0.5456900E+00, &
     & 0.5261795E+00, 0.5902900E+00, 0.5113904E+00, 0.4951078E+00, &
     & 0.4728635E+00, 0.4321892E+00, 0.3467987E+00, 0.3467987E+00 /
      data (ref_adm(20,iz,13, 6),iz = 1,20) / &
     & 0.6061281E+00, 0.6061281E+00, 0.5457376E+00, 0.5434717E+00, &
     & 0.5467364E+00, 0.5551736E+00, 0.5565211E+00, 0.5506890E+00, &
     & 0.5455536E+00, 0.5238000E+00, 0.5538900E+00, 0.5388000E+00, &
     & 0.4701500E+00, 0.5344100E+00, 0.5113904E+00, 0.4951078E+00, &
     & 0.4728635E+00, 0.4321892E+00, 0.3467987E+00, 0.3467987E+00 /
      data (ref_adm(20,iz,14, 6),iz = 1,20) / &
     & 0.6061281E+00, 0.6061281E+00, 0.5457375E+00, 0.5434717E+00, &
     & 0.5467364E+00, 0.5551736E+00, 0.5565211E+00, 0.5506891E+00, &
     & 0.5455535E+00, 0.5403000E+00, 0.5480800E+00, 0.5496100E+00, &
     & 0.5261795E+00, 0.5208424E+00, 0.5113904E+00, 0.4951078E+00, &
     & 0.4728635E+00, 0.4321892E+00, 0.3467987E+00, 0.3467987E+00 /
      data (ref_adm(20,iz,15, 6),iz = 1,20) / &
     & 0.6061281E+00, 0.6061281E+00, 0.5457376E+00, 0.5434717E+00, &
     & 0.5467364E+00, 0.5551736E+00, 0.5565211E+00, 0.5506890E+00, &
     & 0.5455536E+00, 0.5403000E+00, 0.5364021E+00, 0.5518600E+00, &
     & 0.5261795E+00, 0.5208424E+00, 0.5113904E+00, 0.4951078E+00, &
     & 0.4728635E+00, 0.4321892E+00, 0.3467987E+00, 0.3467987E+00 /
      data (ref_adm(20,iz,16, 6),iz = 1,20) / &
     & 0.6061281E+00, 0.6061281E+00, 0.5457375E+00, 0.5434717E+00, &
     & 0.5467364E+00, 0.5551736E+00, 0.5565211E+00, 0.5506891E+00, &
     & 0.5455535E+00, 0.5403000E+00, 0.5364021E+00, 0.5496300E+00, &
     & 0.5261795E+00, 0.5208424E+00, 0.5113904E+00, 0.4951078E+00, &
     & 0.4728635E+00, 0.4321892E+00, 0.3467987E+00, 0.3467987E+00 /
      data (ref_adm(20,iz,17, 6),iz = 1,20) / &
     & 0.6061281E+00, 0.6061281E+00, 0.5457376E+00, 0.5434717E+00, &
     & 0.5467364E+00, 0.5551736E+00, 0.5565211E+00, 0.5506890E+00, &
     & 0.5455536E+00, 0.5403000E+00, 0.5364021E+00, 0.5243500E+00, &
     & 0.5261795E+00, 0.5208424E+00, 0.5113904E+00, 0.4951078E+00, &
     & 0.4728635E+00, 0.4321892E+00, 0.3467987E+00, 0.3467987E+00 /
      data (ref_adm(20,iz,18, 6),iz = 1,20) / &
     & 0.5122533E+00, 0.5122533E+00, 0.5121032E+00, 0.5126660E+00, &
     & 0.5138683E+00, 0.5156052E+00, 0.5174645E+00, 0.5191101E+00, &
     & 0.5204324E+00, 0.5217147E+00, 0.5227439E+00, 0.5230280E+00, &
     & 0.5211762E+00, 0.5177497E+00, 0.5100111E+00, 0.4957913E+00, &
     & 0.4763364E+00, 0.4453558E+00, 0.3823739E+00, 0.3823739E+00 /
      data (ref_adm(20,iz,19, 6),iz = 1,20) / &
     & 0.5123466E+00, 0.5123466E+00, 0.5123214E+00, 0.5126495E+00, &
     & 0.5100800E+00, 0.5145566E+00, 0.5160547E+00, 0.5174140E+00, &
     & 0.5183973E+00, 0.5189405E+00, 0.5190715E+00, 0.5318300E+00, &
     & 0.5351300E+00, 0.5109708E+00, 0.5024613E+00, 0.4874618E+00, &
     & 0.4681528E+00, 0.4382356E+00, 0.3781821E+00, 0.3781821E+00 /
      data (ref_adm(20,iz,20, 6),iz = 1,20) / &
     & 0.5124639E+00, 0.5124639E+00, 0.5126480E+00, 0.5128813E+00, &
     & 0.5132229E+00, 0.5138108E+00, 0.5147396E+00, 0.5157562E+00, &
     & 0.5164977E+00, 0.5166755E+00, 0.5160396E+00, 0.4839500E+00, &
     & 0.5269900E+00, 0.5052905E+00, 0.4959526E+00, 0.4807415E+00, &
     & 0.4612409E+00, 0.4322106E+00, 0.3757296E+00, 0.3757296E+00 /
      data (ref_adm(20,iz,21, 6),iz = 1,20) / &
     & 0.5125922E+00, 0.5125922E+00, 0.5131502E+00, 0.5134143E+00, &
     & 0.5135757E+00, 0.5136878E+00, 0.5138596E+00, 0.5142202E+00, &
     & 0.5146733E+00, 0.5145713E+00, 0.5135920E+00, 0.5107332E+00, &
     & 0.4826100E+00, 0.5002496E+00, 0.4905967E+00, 0.4747642E+00, &
     & 0.4554802E+00, 0.4271753E+00, 0.3742307E+00, 0.3742307E+00 /
      data (ref_adm(20,iz,22, 6),iz = 1,20) / &
     & 0.5976139E+00, 0.5976139E+00, 0.5869195E+00, 0.5832149E+00, &
     & 0.5802868E+00, 0.5782840E+00, 0.5747541E+00, 0.5687405E+00, &
     & 0.5610163E+00, 0.5517671E+00, 0.5417073E+00, 0.5277410E+00, &
     & 0.5114397E+00, 0.4960892E+00, 0.4740449E+00, 0.4450151E+00, &
     & 0.4150658E+00, 0.3758801E+00, 0.3066890E+00, 0.3066890E+00 /
      data (ref_adm(20,iz,23, 6),iz = 1,20) / &
     & 0.5976139E+00, 0.5976139E+00, 0.5869195E+00, 0.5832149E+00, &
     & 0.5802867E+00, 0.5782840E+00, 0.5747541E+00, 0.5687404E+00, &
     & 0.5610163E+00, 0.5517671E+00, 0.5417073E+00, 0.5277410E+00, &
     & 0.5260500E+00, 0.4960892E+00, 0.4740449E+00, 0.4450151E+00, &
     & 0.4055000E+00, 0.3758801E+00, 0.3066890E+00, 0.3066890E+00 /
      data (ref_adm(20,iz,24, 6),iz = 1,20) / &
     & 0.5976139E+00, 0.5976139E+00, 0.5869195E+00, 0.5832149E+00, &
     & 0.5802868E+00, 0.5782840E+00, 0.5747541E+00, 0.5687405E+00, &
     & 0.5610163E+00, 0.5517671E+00, 0.5417073E+00, 0.5277410E+00, &
     & 0.5114397E+00, 0.4960892E+00, 0.4740449E+00, 0.4450151E+00, &
     & 0.4150658E+00, 0.3758801E+00, 0.3066890E+00, 0.3066890E+00 /
      data (ref_adm(20,iz,25, 6),iz = 1,20) / &
     & 0.5976139E+00, 0.5976139E+00, 0.5869195E+00, 0.5832149E+00, &
     & 0.5802867E+00, 0.5782840E+00, 0.5747541E+00, 0.5687404E+00, &
     & 0.5610163E+00, 0.5517671E+00, 0.5417073E+00, 0.5277410E+00, &
     & 0.5114397E+00, 0.4960892E+00, 0.4740449E+00, 0.4450151E+00, &
     & 0.4150658E+00, 0.3758801E+00, 0.3066890E+00, 0.3066890E+00 /
      data (ref_adm(20,iz,26, 6),iz = 1,20) / &
     & 0.5976139E+00, 0.5976139E+00, 0.5869195E+00, 0.5832149E+00, &
     & 0.5802868E+00, 0.5782840E+00, 0.5747541E+00, 0.5687405E+00, &
     & 0.5610163E+00, 0.5517671E+00, 0.5417073E+00, 0.5277410E+00, &
     & 0.5114397E+00, 0.4960892E+00, 0.4740449E+00, 0.4450151E+00, &
     & 0.4150658E+00, 0.3758801E+00, 0.3066890E+00, 0.3066890E+00 /
      data (ref_adm(20,iz,27, 6),iz = 1,20) / &
     & 0.5976139E+00, 0.5976139E+00, 0.5869195E+00, 0.5832149E+00, &
     & 0.5802867E+00, 0.5782840E+00, 0.5747541E+00, 0.5687404E+00, &
     & 0.5610163E+00, 0.5517671E+00, 0.5417073E+00, 0.5277410E+00, &
     & 0.5329300E+00, 0.4960892E+00, 0.4740449E+00, 0.4450151E+00, &
     & 0.4150658E+00, 0.3758801E+00, 0.3066890E+00, 0.3066890E+00 /
      data (ref_adm(20,iz,28, 6),iz = 1,20) / &
     & 0.5976139E+00, 0.5976139E+00, 0.5869195E+00, 0.5832149E+00, &
     & 0.5802868E+00, 0.5782840E+00, 0.5747541E+00, 0.5687405E+00, &
     & 0.5610163E+00, 0.5517671E+00, 0.5417073E+00, 0.5277410E+00, &
     & 0.5114397E+00, 0.4960892E+00, 0.4740449E+00, 0.4450151E+00, &
     & 0.4150658E+00, 0.3758801E+00, 0.3066890E+00, 0.3066890E+00 /
      data (ref_adm(20,iz,29, 6),iz = 1,20) / &
     & 0.5976139E+00, 0.5976139E+00, 0.5869195E+00, 0.5832149E+00, &
     & 0.5802867E+00, 0.5782840E+00, 0.5747541E+00, 0.5687404E+00, &
     & 0.5610163E+00, 0.5517671E+00, 0.5417073E+00, 0.5277410E+00, &
     & 0.5114397E+00, 0.4960892E+00, 0.4740449E+00, 0.4450151E+00, &
     & 0.4150658E+00, 0.3758801E+00, 0.3066890E+00, 0.3066890E+00 /
      data (ref_adm(20,iz,30, 6),iz = 1,20) / &
     & 0.5976139E+00, 0.5976139E+00, 0.4675400E+00, 0.5240000E+00, &
     & 0.5306600E+00, 0.5782840E+00, 0.5747541E+00, 0.5687405E+00, &
     & 0.5610163E+00, 0.5517671E+00, 0.5417073E+00, 0.5277410E+00, &
     & 0.5114397E+00, 0.4960892E+00, 0.4740449E+00, 0.4450151E+00, &
     & 0.4150658E+00, 0.3758801E+00, 0.3066890E+00, 0.3066890E+00 /
      data (ref_adm(20,iz,31, 6),iz = 1,20) / &
     & 0.6994300E+00, 0.6994300E+00, 0.6644400E+00, 0.5832149E+00, &
     & 0.5802867E+00, 0.5782840E+00, 0.5747541E+00, 0.5687404E+00, &
     & 0.5610163E+00, 0.5517671E+00, 0.5417073E+00, 0.5277410E+00, &
     & 0.5114397E+00, 0.4960892E+00, 0.4805000E+00, 0.4450151E+00, &
     & 0.4150658E+00, 0.3758801E+00, 0.3066890E+00, 0.3066890E+00 /
      data (ref_adm(20,iz,32, 6),iz = 1,20) / &
     & 0.5976139E+00, 0.5976139E+00, 0.5869195E+00, 0.5832149E+00, &
     & 0.5802868E+00, 0.5782840E+00, 0.5747541E+00, 0.5687405E+00, &
     & 0.5610163E+00, 0.5517671E+00, 0.5417073E+00, 0.5277410E+00, &
     & 0.5114397E+00, 0.4960892E+00, 0.4740449E+00, 0.4450151E+00, &
     & 0.4150658E+00, 0.3758801E+00, 0.3066890E+00, 0.3066890E+00 /
      data (ref_adm(20,iz,33, 6),iz = 1,20) / &
     & 0.5976139E+00, 0.5976139E+00, 0.5869195E+00, 0.5832149E+00, &
     & 0.5802867E+00, 0.5782840E+00, 0.5747541E+00, 0.5687404E+00, &
     & 0.5610163E+00, 0.5517671E+00, 0.5417073E+00, 0.5277410E+00, &
     & 0.5114397E+00, 0.4960892E+00, 0.4740449E+00, 0.4450151E+00, &
     & 0.4150658E+00, 0.3758801E+00, 0.3066890E+00, 0.3066890E+00 /
      data (ref_adm(20,iz,34, 6),iz = 1,20) / &
     & 0.5976139E+00, 0.5976139E+00, 0.5869195E+00, 0.5832149E+00, &
     & 0.5802868E+00, 0.5782840E+00, 0.5747541E+00, 0.5687405E+00, &
     & 0.5610163E+00, 0.5517671E+00, 0.5417073E+00, 0.5396000E+00, &
     & 0.5114397E+00, 0.4960892E+00, 0.4740449E+00, 0.4450151E+00, &
     & 0.4150658E+00, 0.3758801E+00, 0.3066890E+00, 0.3066890E+00 /
      data (ref_adm(20,iz,35, 6),iz = 1,20) / &
     & 0.5976139E+00, 0.5976139E+00, 0.5869195E+00, 0.5832149E+00, &
     & 0.5802867E+00, 0.5782840E+00, 0.5747541E+00, 0.5687404E+00, &
     & 0.5610163E+00, 0.5517671E+00, 0.5417073E+00, 0.5277410E+00, &
     & 0.5114397E+00, 0.4960892E+00, 0.4740449E+00, 0.4450151E+00, &
     & 0.4150658E+00, 0.3758801E+00, 0.3066890E+00, 0.3066890E+00 /
      data (ref_adm(20,iz,36, 6),iz = 1,20) / &
     & 0.5976139E+00, 0.5976139E+00, 0.6589600E+00, 0.5141800E+00, &
     & 0.5802868E+00, 0.5782840E+00, 0.5747541E+00, 0.5687405E+00, &
     & 0.5610163E+00, 0.5517671E+00, 0.5417073E+00, 0.5277410E+00, &
     & 0.5114397E+00, 0.4960892E+00, 0.4740449E+00, 0.4450151E+00, &
     & 0.4150658E+00, 0.3758801E+00, 0.3066890E+00, 0.3066890E+00 /
      data (ref_adm(20,iz,37, 6),iz = 1,20) / &
     & 0.5976139E+00, 0.5976139E+00, 0.5869195E+00, 0.5832149E+00, &
     & 0.5802868E+00, 0.5782840E+00, 0.5747541E+00, 0.5687405E+00, &
     & 0.5610163E+00, 0.5517671E+00, 0.5417073E+00, 0.5277410E+00, &
     & 0.5114397E+00, 0.4960892E+00, 0.4740449E+00, 0.4450151E+00, &
     & 0.4150658E+00, 0.3758801E+00, 0.3066890E+00, 0.3066890E+00 /
      data (ref_adm(20,iz,38, 6),iz = 1,20) / &
     & 0.5976139E+00, 0.5976139E+00, 0.5869195E+00, 0.5832149E+00, &
     & 0.5802868E+00, 0.5782840E+00, 0.5747541E+00, 0.5687405E+00, &
     & 0.5610163E+00, 0.5517671E+00, 0.5417073E+00, 0.5277410E+00, &
     & 0.5114397E+00, 0.4960892E+00, 0.4740449E+00, 0.4450151E+00, &
     & 0.4150658E+00, 0.3758801E+00, 0.3066890E+00, 0.3066890E+00 /
! Solar Zenith Angle 30.0 Albedo  0.5974142E+00
      data (ref_adm(20,iz, 1, 7),iz = 1,20) / &
     & 0.5876312E+00, 0.5876312E+00, 0.5854521E+00, 0.5844638E+00, &
     & 0.5846363E+00, 0.5857340E+00, 0.6487000E+00, 0.5906300E+00, &
     & 0.5940958E+00, 0.5982769E+00, 0.6039094E+00, 0.6124573E+00, &
     & 0.6226335E+00, 0.6306614E+00, 0.6393480E+00, 0.7048400E+00, &
     & 0.6684100E+00, 0.6659566E+00, 0.5582145E+00, 0.5582145E+00 /
      data (ref_adm(20,iz, 2, 7),iz = 1,20) / &
     & 0.5876312E+00, 0.5876312E+00, 0.5854521E+00, 0.5844638E+00, &
     & 0.5846363E+00, 0.5857340E+00, 0.6487000E+00, 0.5906300E+00, &
     & 0.5940958E+00, 0.5982769E+00, 0.6039094E+00, 0.6124573E+00, &
     & 0.6226335E+00, 0.6306614E+00, 0.6393480E+00, 0.7048400E+00, &
     & 0.6684100E+00, 0.6659566E+00, 0.5582145E+00, 0.5582145E+00 /
      data (ref_adm(20,iz, 3, 7),iz = 1,20) / &
     & 0.5876188E+00, 0.5876188E+00, 0.5854588E+00, 0.5844530E+00, &
     & 0.5846492E+00, 0.5857970E+00, 0.6201400E+00, 0.6298100E+00, &
     & 0.5938905E+00, 0.5981501E+00, 0.4542100E+00, 0.4767700E+00, &
     & 0.6219801E+00, 0.6302395E+00, 0.6383309E+00, 0.6887600E+00, &
     & 0.6574962E+00, 0.6620505E+00, 0.5029254E+00, 0.5029254E+00 /
      data (ref_adm(20,iz, 4, 7),iz = 1,20) / &
     & 0.5876125E+00, 0.5876125E+00, 0.5854984E+00, 0.5845260E+00, &
     & 0.5845869E+00, 0.5857239E+00, 0.6119900E+00, 0.6309600E+00, &
     & 0.6639900E+00, 0.5976642E+00, 0.5377600E+00, 0.6112254E+00, &
     & 0.6209173E+00, 0.6286036E+00, 0.6366295E+00, 0.6452302E+00, &
     & 0.6533008E+00, 0.6281700E+00, 0.5513582E+00, 0.5513582E+00 /
      data (ref_adm(20,iz, 5, 7),iz = 1,20) / &
     & 0.7056700E+00, 0.7056700E+00, 0.5855477E+00, 0.5844867E+00, &
     & 0.5845655E+00, 0.5855874E+00, 0.5874328E+00, 0.5899374E+00, &
     & 0.5930673E+00, 0.5969541E+00, 0.6020020E+00, 0.6099314E+00, &
     & 0.6191924E+00, 0.7106300E+00, 0.6339478E+00, 0.6412599E+00, &
     & 0.6465436E+00, 0.6432057E+00, 0.5448604E+00, 0.5448604E+00 /
      data (ref_adm(20,iz, 6, 7),iz = 1,20) / &
     & 0.5876403E+00, 0.5876403E+00, 0.5855070E+00, 0.5844986E+00, &
     & 0.5843312E+00, 0.5853354E+00, 0.5870332E+00, 0.5894296E+00, &
     & 0.5924500E+00, 0.5960392E+00, 0.6006285E+00, 0.6081824E+00, &
     & 0.6167305E+00, 0.6238559E+00, 0.6311121E+00, 0.6362010E+00, &
     & 0.6387634E+00, 0.6297411E+00, 0.5341159E+00, 0.5341159E+00 /
      data (ref_adm(20,iz, 7, 7),iz = 1,20) / &
     & 0.5876050E+00, 0.5876050E+00, 0.5856627E+00, 0.5845538E+00, &
     & 0.5192400E+00, 0.5850939E+00, 0.5982100E+00, 0.5888157E+00, &
     & 0.5918316E+00, 0.5951713E+00, 0.5993115E+00, 0.6061100E+00, &
     & 0.6140075E+00, 0.6205997E+00, 0.6272190E+00, 0.6309385E+00, &
     & 0.6301374E+00, 0.6158020E+00, 0.5207697E+00, 0.5207697E+00 /
      data (ref_adm(20,iz, 8, 7),iz = 1,20) / &
     & 0.5312800E+00, 0.5312800E+00, 0.5450400E+00, 0.6098000E+00, &
     & 0.5843003E+00, 0.5849419E+00, 0.5862176E+00, 0.5881287E+00, &
     & 0.5908040E+00, 0.5938534E+00, 0.5976743E+00, 0.6038110E+00, &
     & 0.6108856E+00, 0.6167579E+00, 0.6227445E+00, 0.6251364E+00, &
     & 0.6218264E+00, 0.6029300E+00, 0.5074794E+00, 0.5074794E+00 /
      data (ref_adm(20,iz, 9, 7),iz = 1,20) / &
     & 0.5877230E+00, 0.5877230E+00, 0.5858296E+00, 0.5847291E+00, &
     & 0.5842850E+00, 0.5845966E+00, 0.5858068E+00, 0.5875493E+00, &
     & 0.5898732E+00, 0.5926155E+00, 0.5959377E+00, 0.6011906E+00, &
     & 0.6074693E+00, 0.6123243E+00, 0.6178281E+00, 0.6191689E+00, &
     & 0.6137477E+00, 0.5911942E+00, 0.4955232E+00, 0.4955232E+00 /
      data (ref_adm(20,iz,10, 7),iz = 1,20) / &
     & 0.5487400E+00, 0.5487400E+00, 0.5858732E+00, 0.5848806E+00, &
     & 0.5841553E+00, 0.5845446E+00, 0.5854141E+00, 0.5868505E+00, &
     & 0.5887890E+00, 0.5912706E+00, 0.5941972E+00, 0.5985284E+00, &
     & 0.6039151E+00, 0.6079690E+00, 0.6119539E+00, 0.6131312E+00, &
     & 0.6063986E+00, 0.5807226E+00, 0.4846604E+00, 0.4846604E+00 /
      data (ref_adm(20,iz,11, 7),iz = 1,20) / &
     & 0.5661700E+00, 0.5661700E+00, 0.5804400E+00, 0.5753200E+00, &
     & 0.5312000E+00, 0.6210100E+00, 0.6366100E+00, 0.6426100E+00, &
     & 0.5876976E+00, 0.5898104E+00, 0.5923114E+00, 0.5958337E+00, &
     & 0.6000506E+00, 0.6033634E+00, 0.6062604E+00, 0.6164000E+00, &
     & 0.5988726E+00, 0.5713332E+00, 0.4748353E+00, 0.4748353E+00 /
      data (ref_adm(20,iz,12, 7),iz = 1,20) / &
     & 0.5878955E+00, 0.5878955E+00, 0.5862244E+00, 0.5851947E+00, &
     & 0.5843300E+00, 0.5841370E+00, 0.5845468E+00, 0.5798900E+00, &
     & 0.6215100E+00, 0.5637600E+00, 0.5904114E+00, 0.4674500E+00, &
     & 0.5962949E+00, 0.6033000E+00, 0.6003442E+00, 0.6165200E+00, &
     & 0.5912473E+00, 0.5629358E+00, 0.4660181E+00, 0.4660181E+00 /
      data (ref_adm(20,iz,13, 7),iz = 1,20) / &
     & 0.5880072E+00, 0.5880072E+00, 0.5863037E+00, 0.5853014E+00, &
     & 0.5845527E+00, 0.5840004E+00, 0.5841634E+00, 0.5847264E+00, &
     & 0.5856864E+00, 0.6201200E+00, 0.6376800E+00, 0.6516400E+00, &
     & 0.5612600E+00, 0.5942400E+00, 0.5944263E+00, 0.5913451E+00, &
     & 0.5828126E+00, 0.5546710E+00, 0.4579637E+00, 0.4579637E+00 /
      data (ref_adm(20,iz,14, 7),iz = 1,20) / &
     & 0.5880317E+00, 0.5880317E+00, 0.5865018E+00, 0.5856276E+00, &
     & 0.5847176E+00, 0.5840213E+00, 0.5838983E+00, 0.5841600E+00, &
     & 0.5846639E+00, 0.5855547E+00, 0.5866873E+00, 0.5882669E+00, &
     & 0.6504400E+00, 0.6405000E+00, 0.5888311E+00, 0.5844125E+00, &
     & 0.5739132E+00, 0.5454242E+00, 0.4502976E+00, 0.4502976E+00 /
      data (ref_adm(20,iz,15, 7),iz = 1,20) / &
     & 0.5881260E+00, 0.5881260E+00, 0.5867411E+00, 0.5858372E+00, &
     & 0.5850414E+00, 0.5841538E+00, 0.5836722E+00, 0.5836854E+00, &
     & 0.5838580E+00, 0.5843390E+00, 0.5849428E+00, 0.5858623E+00, &
     & 0.5865319E+00, 0.5860205E+00, 0.5837003E+00, 0.5775992E+00, &
     & 0.5656846E+00, 0.5356438E+00, 0.4424518E+00, 0.4424518E+00 /
      data (ref_adm(20,iz,16, 7),iz = 1,20) / &
     & 0.5882518E+00, 0.5882518E+00, 0.5870486E+00, 0.5860564E+00, &
     & 0.5852739E+00, 0.5844585E+00, 0.5836877E+00, 0.5832922E+00, &
     & 0.5831665E+00, 0.5831702E+00, 0.5832835E+00, 0.5836388E+00, &
     & 0.5834481E+00, 0.5824534E+00, 0.5025000E+00, 0.5709755E+00, &
     & 0.5578697E+00, 0.5267674E+00, 0.4347089E+00, 0.4347089E+00 /
      data (ref_adm(20,iz,17, 7),iz = 1,20) / &
     & 0.5883752E+00, 0.5883752E+00, 0.5873510E+00, 0.5865091E+00, &
     & 0.5857119E+00, 0.5848860E+00, 0.5839511E+00, 0.5831650E+00, &
     & 0.5826241E+00, 0.5823283E+00, 0.5246600E+00, 0.5815991E+00, &
     & 0.5807467E+00, 0.5791028E+00, 0.4920300E+00, 0.5657867E+00, &
     & 0.5506052E+00, 0.5182369E+00, 0.4282045E+00, 0.4282045E+00 /
      data (ref_adm(20,iz,18, 7),iz = 1,20) / &
     & 0.6204437E+00, 0.6204437E+00, 0.6196820E+00, 0.6187739E+00, &
     & 0.6175776E+00, 0.6161244E+00, 0.6144404E+00, 0.6124793E+00, &
     & 0.6101383E+00, 0.6075926E+00, 0.5650400E+00, 0.5189100E+00, &
     & 0.5955102E+00, 0.5903352E+00, 0.5818668E+00, 0.5678234E+00, &
     & 0.5479206E+00, 0.5076043E+00, 0.4108334E+00, 0.4108334E+00 /
      data (ref_adm(20,iz,19, 7),iz = 1,20) / &
     & 0.6204966E+00, 0.6204966E+00, 0.6199630E+00, 0.6191880E+00, &
     & 0.6180668E+00, 0.6167334E+00, 0.6150727E+00, 0.6131445E+00, &
     & 0.6108204E+00, 0.5752900E+00, 0.6146100E+00, 0.6008554E+00, &
     & 0.5955979E+00, 0.5901601E+00, 0.5813069E+00, 0.5668203E+00, &
     & 0.5464107E+00, 0.5053854E+00, 0.4079734E+00, 0.4079734E+00 /
      data (ref_adm(20,iz,20, 7),iz = 1,20) / &
     & 0.6205752E+00, 0.6205752E+00, 0.6202589E+00, 0.6196003E+00, &
     & 0.6186068E+00, 0.6173391E+00, 0.6157932E+00, 0.6138657E+00, &
     & 0.5490200E+00, 0.6013400E+00, 0.6273300E+00, 0.6012753E+00, &
     & 0.5958172E+00, 0.5903060E+00, 0.5810928E+00, 0.5662824E+00, &
     & 0.5453076E+00, 0.5035146E+00, 0.4064753E+00, 0.4064753E+00 /
      data (ref_adm(20,iz,21, 7),iz = 1,20) / &
     & 0.6206499E+00, 0.6206499E+00, 0.6205269E+00, 0.6200693E+00, &
     & 0.6192564E+00, 0.6180651E+00, 0.6165820E+00, 0.6147177E+00, &
     & 0.5829200E+00, 0.6243700E+00, 0.6279100E+00, 0.6020464E+00, &
     & 0.5962849E+00, 0.5904129E+00, 0.5812014E+00, 0.5658292E+00, &
     & 0.5445172E+00, 0.5019245E+00, 0.4056641E+00, 0.4056641E+00 /
      data (ref_adm(20,iz,22, 7),iz = 1,20) / &
     & 0.6397523E+00, 0.6397523E+00, 0.6385691E+00, 0.6376559E+00, &
     & 0.6396252E+00, 0.6443542E+00, 0.6429119E+00, 0.5900800E+00, &
     & 0.6387100E+00, 0.6405300E+00, 0.6093857E+00, 0.5981937E+00, &
     & 0.6186300E+00, 0.5742109E+00, 0.5576413E+00, 0.5334182E+00, &
     & 0.5032277E+00, 0.4538868E+00, 0.3580449E+00, 0.3580449E+00 /
      data (ref_adm(20,iz,23, 7),iz = 1,20) / &
     & 0.6398597E+00, 0.6398597E+00, 0.6391582E+00, 0.6373797E+00, &
     & 0.6386444E+00, 0.6430726E+00, 0.5556500E+00, 0.6497500E+00, &
     & 0.6697400E+00, 0.6659100E+00, 0.6094241E+00, 0.6203500E+00, &
     & 0.6253700E+00, 0.5731978E+00, 0.5917900E+00, 0.5321996E+00, &
     & 0.5016162E+00, 0.4527048E+00, 0.3576090E+00, 0.3576090E+00 /
      data (ref_adm(20,iz,24, 7),iz = 1,20) / &
     & 0.6397184E+00, 0.6397184E+00, 0.6392535E+00, 0.6375249E+00, &
     & 0.6376180E+00, 0.6417940E+00, 0.6176800E+00, 0.6803900E+00, &
     & 0.6852700E+00, 0.6192659E+00, 0.6100956E+00, 0.5980580E+00, &
     & 0.5854978E+00, 0.5729150E+00, 0.5556316E+00, 0.5813800E+00, &
     & 0.5683000E+00, 0.4515061E+00, 0.3571121E+00, 0.3571121E+00 /
      data (ref_adm(20,iz,25, 7),iz = 1,20) / &
     & 0.6401721E+00, 0.6401721E+00, 0.6393786E+00, 0.6378117E+00, &
     & 0.6369100E+00, 0.6407031E+00, 0.6079800E+00, 0.6228500E+00, &
     & 0.6296794E+00, 0.6199505E+00, 0.6105045E+00, 0.5981039E+00, &
     & 0.5853926E+00, 0.5724586E+00, 0.5548000E+00, 0.5301128E+00, &
     & 0.4991403E+00, 0.4505002E+00, 0.3567315E+00, 0.3567315E+00 /
      data (ref_adm(20,iz,26, 7),iz = 1,20) / &
     & 0.6401914E+00, 0.6401914E+00, 0.6399624E+00, 0.6381134E+00, &
     & 0.6364086E+00, 0.6391060E+00, 0.6429709E+00, 0.6391830E+00, &
     & 0.6302031E+00, 0.6208750E+00, 0.6108276E+00, 0.5981969E+00, &
     & 0.5849722E+00, 0.5722899E+00, 0.5541195E+00, 0.5290025E+00, &
     & 0.4982281E+00, 0.4494004E+00, 0.3563604E+00, 0.3563604E+00 /
      data (ref_adm(20,iz,27, 7),iz = 1,20) / &
     & 0.6405166E+00, 0.6405166E+00, 0.6402675E+00, 0.6379796E+00, &
     & 0.6362703E+00, 0.6376299E+00, 0.6422538E+00, 0.6398600E+00, &
     & 0.6313033E+00, 0.6216791E+00, 0.6114116E+00, 0.5984474E+00, &
     & 0.5849432E+00, 0.5719778E+00, 0.5535114E+00, 0.5281187E+00, &
     & 0.4972463E+00, 0.4484977E+00, 0.3560636E+00, 0.3560636E+00 /
      data (ref_adm(20,iz,28, 7),iz = 1,20) / &
     & 0.6406986E+00, 0.6406986E+00, 0.6412512E+00, 0.6387764E+00, &
     & 0.6361022E+00, 0.6368297E+00, 0.6412169E+00, 0.6405643E+00, &
     & 0.6320382E+00, 0.6226547E+00, 0.6116891E+00, 0.5986701E+00, &
     & 0.5846361E+00, 0.5718322E+00, 0.5528640E+00, 0.5271062E+00, &
     & 0.4964153E+00, 0.4476182E+00, 0.3557809E+00, 0.3557809E+00 /
      data (ref_adm(20,iz,29, 7),iz = 1,20) / &
     & 0.6788100E+00, 0.6788100E+00, 0.7130200E+00, 0.5618200E+00, &
     & 0.4704100E+00, 0.6359400E+00, 0.6401370E+00, 0.6408697E+00, &
     & 0.6327229E+00, 0.6232918E+00, 0.6123258E+00, 0.7006500E+00, &
     & 0.6841600E+00, 0.5720167E+00, 0.5021800E+00, 0.5262781E+00, &
     & 0.4955535E+00, 0.4466717E+00, 0.3555046E+00, 0.3555046E+00 /
      data (ref_adm(20,iz,30, 7),iz = 1,20) / &
     & 0.5370800E+00, 0.5370800E+00, 0.6439311E+00, 0.6399532E+00, &
     & 0.6366232E+00, 0.5964400E+00, 0.6516200E+00, 0.6762700E+00, &
     & 0.6899400E+00, 0.6240341E+00, 0.6130715E+00, 0.5991725E+00, &
     & 0.5843285E+00, 0.5715119E+00, 0.5743700E+00, 0.5304400E+00, &
     & 0.4950339E+00, 0.4462087E+00, 0.3553872E+00, 0.3553872E+00 /
      data (ref_adm(20,iz,31, 7),iz = 1,20) / &
     & 0.5990000E+00, 0.5990000E+00, 0.6451430E+00, 0.6408343E+00, &
     & 0.6367359E+00, 0.6345224E+00, 0.6382773E+00, 0.6406947E+00, &
     & 0.6345164E+00, 0.6246255E+00, 0.6134941E+00, 0.5993190E+00, &
     & 0.5843456E+00, 0.5713958E+00, 0.5561200E+00, 0.5252014E+00, &
     & 0.4944645E+00, 0.4454029E+00, 0.3552784E+00, 0.3552784E+00 /
      data (ref_adm(20,iz,32, 7),iz = 1,20) / &
     & 0.6413448E+00, 0.6413448E+00, 0.6491925E+00, 0.6429719E+00, &
     & 0.6369883E+00, 0.6347177E+00, 0.6368383E+00, 0.6404787E+00, &
     & 0.6352118E+00, 0.6252878E+00, 0.6141391E+00, 0.5994731E+00, &
     & 0.5843635E+00, 0.5712574E+00, 0.5478800E+00, 0.5247885E+00, &
     & 0.4939079E+00, 0.4449206E+00, 0.3551047E+00, 0.3551047E+00 /
      data (ref_adm(20,iz,33, 7),iz = 1,20) / &
     & 0.5878900E+00, 0.5878900E+00, 0.6541730E+00, 0.5604000E+00, &
     & 0.5971900E+00, 0.6344243E+00, 0.6359619E+00, 0.6401353E+00, &
     & 0.6359125E+00, 0.6255139E+00, 0.6144866E+00, 0.5998232E+00, &
     & 0.5154600E+00, 0.4960200E+00, 0.5515193E+00, 0.5240613E+00, &
     & 0.4934303E+00, 0.4443767E+00, 0.3550735E+00, 0.3550735E+00 /
      data (ref_adm(20,iz,34, 7),iz = 1,20) / &
     & 0.5271000E+00, 0.5271000E+00, 0.6605460E+00, 0.6495748E+00, &
     & 0.6380128E+00, 0.6342636E+00, 0.6355868E+00, 0.6397029E+00, &
     & 0.6362898E+00, 0.6259038E+00, 0.6150982E+00, 0.6002415E+00, &
     & 0.5844318E+00, 0.5713630E+00, 0.5515043E+00, 0.5240772E+00, &
     & 0.4928907E+00, 0.4439486E+00, 0.3549609E+00, 0.3549609E+00 /
      data (ref_adm(20,iz,35, 7),iz = 1,20) / &
     & 0.5914100E+00, 0.5914100E+00, 0.6782700E+00, 0.6549111E+00, &
     & 0.6384315E+00, 0.6340078E+00, 0.6349791E+00, 0.6394979E+00, &
     & 0.6364029E+00, 0.6263565E+00, 0.6152057E+00, 0.6002895E+00, &
     & 0.5845417E+00, 0.5712448E+00, 0.5513172E+00, 0.5238275E+00, &
     & 0.4924150E+00, 0.4436488E+00, 0.3549209E+00, 0.3549209E+00 /
      data (ref_adm(20,iz,36, 7),iz = 1,20) / &
     & 0.7406800E+00, 0.7406800E+00, 0.7295200E+00, 0.7074700E+00, &
     & 0.6384122E+00, 0.6344413E+00, 0.6346688E+00, 0.6394978E+00, &
     & 0.6365612E+00, 0.6267110E+00, 0.6154748E+00, 0.6004353E+00, &
     & 0.5845901E+00, 0.5712197E+00, 0.5512848E+00, 0.5236418E+00, &
     & 0.4922785E+00, 0.4435207E+00, 0.3549300E+00, 0.3549300E+00 /
      data (ref_adm(20,iz,37, 7),iz = 1,20) / &
     & 0.6422914E+00, 0.6422914E+00, 0.6906067E+00, 0.6640005E+00, &
     & 0.6385283E+00, 0.6341640E+00, 0.6346892E+00, 0.6390700E+00, &
     & 0.6365677E+00, 0.6269494E+00, 0.6156173E+00, 0.6002572E+00, &
     & 0.5845794E+00, 0.5714980E+00, 0.5512382E+00, 0.5235892E+00, &
     & 0.4923933E+00, 0.4435664E+00, 0.3548904E+00, 0.3548904E+00 /
      data (ref_adm(20,iz,38, 7),iz = 1,20) / &
     & 0.6422914E+00, 0.6422914E+00, 0.6906067E+00, 0.6640005E+00, &
     & 0.6385283E+00, 0.6341640E+00, 0.6346892E+00, 0.6390700E+00, &
     & 0.6365677E+00, 0.6269494E+00, 0.6156173E+00, 0.6002572E+00, &
     & 0.5845794E+00, 0.5714980E+00, 0.5512382E+00, 0.5235892E+00, &
     & 0.4923933E+00, 0.4435664E+00, 0.3548904E+00, 0.3548904E+00 /
! Solar Zenith Angle 35.0 Albedo  0.6118110E+00
      data (ref_adm(20,iz, 1, 8),iz = 1,20) / &
     & 0.5879022E+00, 0.5879022E+00, 0.5033400E+00, 0.4797200E+00, &
     & 0.6011525E+00, 0.6068871E+00, 0.6135333E+00, 0.6209144E+00, &
     & 0.6303335E+00, 0.6409907E+00, 0.6452400E+00, 0.6832200E+00, &
     & 0.6764061E+00, 0.6828499E+00, 0.6729500E+00, 0.6729300E+00, &
     & 0.6581588E+00, 0.6078234E+00, 0.4928817E+00, 0.4928817E+00 /
      data (ref_adm(20,iz, 2, 8),iz = 1,20) / &
     & 0.5879022E+00, 0.5879022E+00, 0.5033400E+00, 0.4797200E+00, &
     & 0.6011525E+00, 0.6068871E+00, 0.6135333E+00, 0.6209144E+00, &
     & 0.6303335E+00, 0.6409907E+00, 0.6452400E+00, 0.6832200E+00, &
     & 0.6764061E+00, 0.6828499E+00, 0.6729500E+00, 0.6729300E+00, &
     & 0.6581588E+00, 0.6078234E+00, 0.4928817E+00, 0.4928817E+00 /
      data (ref_adm(20,iz, 3, 8),iz = 1,20) / &
     & 0.5878857E+00, 0.5878857E+00, 0.5912061E+00, 0.5079100E+00, &
     & 0.5272900E+00, 0.6505900E+00, 0.6211600E+00, 0.6205709E+00, &
     & 0.6297706E+00, 0.6404815E+00, 0.6816000E+00, 0.6902600E+00, &
     & 0.6539300E+00, 0.6818605E+00, 0.6851795E+00, 0.6781833E+00, &
     & 0.6000600E+00, 0.6060073E+00, 0.3956515E+00, 0.3956515E+00 /
      data (ref_adm(20,iz, 4, 8),iz = 1,20) / &
     & 0.6684100E+00, 0.6684100E+00, 0.5910890E+00, 0.5980300E+00, &
     & 0.5863600E+00, 0.6036200E+00, 0.6421900E+00, 0.6199419E+00, &
     & 0.6288696E+00, 0.6327400E+00, 0.7138400E+00, 0.6635600E+00, &
     & 0.6734528E+00, 0.6792136E+00, 0.6769500E+00, 0.6500000E+00, &
     & 0.6417100E+00, 0.6016312E+00, 0.4879531E+00, 0.4879531E+00 /
      data (ref_adm(20,iz, 5, 8),iz = 1,20) / &
     & 0.5879503E+00, 0.5879503E+00, 0.5908981E+00, 0.5953587E+00, &
     & 0.6002232E+00, 0.6032300E+00, 0.6164600E+00, 0.6449700E+00, &
     & 0.6275577E+00, 0.6690800E+00, 0.7236100E+00, 0.6599393E+00, &
     & 0.5973200E+00, 0.6754672E+00, 0.6779612E+00, 0.6801700E+00, &
     & 0.6490600E+00, 0.5959992E+00, 0.4833917E+00, 0.4833917E+00 /
      data (ref_adm(20,iz, 6, 8),iz = 1,20) / &
     & 0.5878791E+00, 0.5878791E+00, 0.5907109E+00, 0.5950128E+00, &
     & 0.5997968E+00, 0.6047887E+00, 0.6087900E+00, 0.6415400E+00, &
     & 0.6380700E+00, 0.6929400E+00, 0.6451617E+00, 0.6564825E+00, &
     & 0.5949500E+00, 0.6709273E+00, 0.6721856E+00, 0.6636773E+00, &
     & 0.6401628E+00, 0.5893789E+00, 0.4779561E+00, 0.4779561E+00 /
      data (ref_adm(20,iz, 7, 8),iz = 1,20) / &
     & 0.5877910E+00, 0.5877910E+00, 0.5905051E+00, 0.5944968E+00, &
     & 0.5990445E+00, 0.5500700E+00, 0.5842100E+00, 0.6160127E+00, &
     & 0.6605500E+00, 0.7146000E+00, 0.6417357E+00, 0.6523635E+00, &
     & 0.6085300E+00, 0.5914100E+00, 0.6651489E+00, 0.5671400E+00, &
     & 0.6322171E+00, 0.5815609E+00, 0.4718620E+00, 0.4718620E+00 /
      data (ref_adm(20,iz, 8, 8),iz = 1,20) / &
     & 0.6311500E+00, 0.6311500E+00, 0.5903128E+00, 0.5939885E+00, &
     & 0.5982598E+00, 0.5920500E+00, 0.5798200E+00, 0.6141730E+00, &
     & 0.6594200E+00, 0.7304500E+00, 0.5752200E+00, 0.6269500E+00, &
     & 0.6091200E+00, 0.5676700E+00, 0.5958300E+00, 0.6475939E+00, &
     & 0.6240291E+00, 0.5735167E+00, 0.4657330E+00, 0.4657330E+00 /
      data (ref_adm(20,iz, 9, 8),iz = 1,20) / &
     & 0.5877142E+00, 0.5877142E+00, 0.4916000E+00, 0.5144500E+00, &
     & 0.5348800E+00, 0.5693300E+00, 0.5866700E+00, 0.6055000E+00, &
     & 0.6292700E+00, 0.6219900E+00, 0.6360100E+00, 0.6452800E+00, &
     & 0.6415900E+00, 0.6616400E+00, 0.5742200E+00, 0.6382445E+00, &
     & 0.6148577E+00, 0.5654329E+00, 0.4595397E+00, 0.4595397E+00 /
      data (ref_adm(20,iz,10, 8),iz = 1,20) / &
     & 0.5877064E+00, 0.5877064E+00, 0.5897706E+00, 0.5571400E+00, &
     & 0.5041500E+00, 0.4994000E+00, 0.6046562E+00, 0.6137500E+00, &
     & 0.6806200E+00, 0.6734400E+00, 0.6291798E+00, 0.6366479E+00, &
     & 0.6193400E+00, 0.6429877E+00, 0.6400464E+00, 0.6277028E+00, &
     & 0.6052188E+00, 0.5576837E+00, 0.4534253E+00, 0.4534253E+00 /
      data (ref_adm(20,iz,11, 8),iz = 1,20) / &
     & 0.5876442E+00, 0.5876442E+00, 0.5304300E+00, 0.5460700E+00, &
     & 0.5412500E+00, 0.5766200E+00, 0.6027586E+00, 0.6205100E+00, &
     & 0.6127531E+00, 0.6342200E+00, 0.6244086E+00, 0.6305969E+00, &
     & 0.6344267E+00, 0.6345829E+00, 0.6304413E+00, 0.6727700E+00, &
     & 0.5946657E+00, 0.5494274E+00, 0.4475586E+00, 0.4475586E+00 /
      data (ref_adm(20,iz,12, 8),iz = 1,20) / &
     & 0.6276300E+00, 0.6276300E+00, 0.5918200E+00, 0.6323200E+00, &
     & 0.5938600E+00, 0.5828400E+00, 0.5772200E+00, 0.5928700E+00, &
     & 0.5369200E+00, 0.5301500E+00, 0.6195649E+00, 0.6243064E+00, &
     & 0.6269407E+00, 0.5737400E+00, 0.6206684E+00, 0.6869500E+00, &
     & 0.6563200E+00, 0.5411145E+00, 0.4419167E+00, 0.4419167E+00 /
      data (ref_adm(20,iz,13, 8),iz = 1,20) / &
     & 0.6216000E+00, 0.6216000E+00, 0.5539000E+00, 0.5906506E+00, &
     & 0.6326800E+00, 0.6316600E+00, 0.5417500E+00, 0.6427800E+00, &
     & 0.6545500E+00, 0.6300600E+00, 0.6411700E+00, 0.5972700E+00, &
     & 0.5510900E+00, 0.6286700E+00, 0.6106489E+00, 0.5961366E+00, &
     & 0.5730003E+00, 0.5314769E+00, 0.4362064E+00, 0.4362064E+00 /
      data (ref_adm(20,iz,14, 8),iz = 1,20) / &
     & 0.6101800E+00, 0.6101800E+00, 0.6420100E+00, 0.6480000E+00, &
     & 0.6364900E+00, 0.5946391E+00, 0.6701300E+00, 0.5997674E+00, &
     & 0.6029669E+00, 0.6651000E+00, 0.6645000E+00, 0.6552200E+00, &
     & 0.6439600E+00, 0.6197500E+00, 0.6014340E+00, 0.5856118E+00, &
     & 0.5624683E+00, 0.5215163E+00, 0.4297346E+00, 0.4297346E+00 /
      data (ref_adm(20,iz,15, 8),iz = 1,20) / &
     & 0.7050600E+00, 0.7050600E+00, 0.6213500E+00, 0.6295000E+00, &
     & 0.6125400E+00, 0.5932108E+00, 0.6137200E+00, 0.5570600E+00, &
     & 0.5997079E+00, 0.6022584E+00, 0.6043570E+00, 0.6033100E+00, &
     & 0.6044182E+00, 0.6042700E+00, 0.6316000E+00, 0.5753735E+00, &
     & 0.5518866E+00, 0.5121736E+00, 0.4227878E+00, 0.4227878E+00 /
      data (ref_adm(20,iz,16, 8),iz = 1,20) / &
     & 0.5874211E+00, 0.5874211E+00, 0.5880703E+00, 0.5634600E+00, &
     & 0.6037600E+00, 0.6797800E+00, 0.6670800E+00, 0.5949067E+00, &
     & 0.5964785E+00, 0.5982101E+00, 0.5995190E+00, 0.5994334E+00, &
     & 0.5972272E+00, 0.5666700E+00, 0.6192200E+00, 0.5659664E+00, &
     & 0.5417092E+00, 0.5028231E+00, 0.4166357E+00, 0.4166357E+00 /
      data (ref_adm(20,iz,17, 8),iz = 1,20) / &
     & 0.6550800E+00, 0.6550800E+00, 0.5877834E+00, 0.5846300E+00, &
     & 0.6073100E+00, 0.6102300E+00, 0.6147300E+00, 0.5591300E+00, &
     & 0.6940200E+00, 0.5415700E+00, 0.5947593E+00, 0.5937079E+00, &
     & 0.5903633E+00, 0.5679300E+00, 0.5503600E+00, 0.5571267E+00, &
     & 0.5325914E+00, 0.4937772E+00, 0.4109727E+00, 0.4109727E+00 /
      data (ref_adm(20,iz,18, 8),iz = 1,20) / &
     & 0.6213194E+00, 0.6213194E+00, 0.5990600E+00, 0.6343500E+00, &
     & 0.6608500E+00, 0.6099200E+00, 0.5990600E+00, 0.6072699E+00, &
     & 0.4731800E+00, 0.5264200E+00, 0.5251100E+00, 0.5950575E+00, &
     & 0.5909395E+00, 0.5859076E+00, 0.5772500E+00, 0.4843900E+00, &
     & 0.5373749E+00, 0.4926501E+00, 0.3918666E+00, 0.3918666E+00 /
      data (ref_adm(20,iz,19, 8),iz = 1,20) / &
     & 0.6749300E+00, 0.6749300E+00, 0.6201869E+00, 0.6184131E+00, &
     & 0.6161022E+00, 0.6132535E+00, 0.5968700E+00, 0.6071005E+00, &
     & 0.5872500E+00, 0.6008064E+00, 0.5972916E+00, 0.5922134E+00, &
     & 0.5868975E+00, 0.6766500E+00, 0.5758100E+00, 0.5555523E+00, &
     & 0.5319785E+00, 0.4881264E+00, 0.3891606E+00, 0.3891606E+00 /
      data (ref_adm(20,iz,20, 8),iz = 1,20) / &
     & 0.6216589E+00, 0.6216589E+00, 0.5833500E+00, 0.6224200E+00, &
     & 0.6169187E+00, 0.6139544E+00, 0.6106353E+00, 0.5403800E+00, &
     & 0.6035408E+00, 0.5997077E+00, 0.5959759E+00, 0.5899193E+00, &
     & 0.5833247E+00, 0.5773010E+00, 0.5587500E+00, 0.5501460E+00, &
     & 0.5269428E+00, 0.4835053E+00, 0.3872095E+00, 0.3872095E+00 /
      data (ref_adm(20,iz,21, 8),iz = 1,20) / &
     & 0.6218563E+00, 0.6218563E+00, 0.6211942E+00, 0.5960800E+00, &
     & 0.6176484E+00, 0.6150244E+00, 0.6114967E+00, 0.6075386E+00, &
     & 0.5573900E+00, 0.5990498E+00, 0.5945078E+00, 0.5882385E+00, &
     & 0.5805264E+00, 0.5732919E+00, 0.5629587E+00, 0.5454195E+00, &
     & 0.5219292E+00, 0.4790133E+00, 0.3856061E+00, 0.3856061E+00 /
      data (ref_adm(20,iz,22, 8),iz = 1,20) / &
     & 0.6807100E+00, 0.6807100E+00, 0.6555994E+00, 0.6570323E+00, &
     & 0.6596993E+00, 0.6605731E+00, 0.6559215E+00, 0.6486410E+00, &
     & 0.5560100E+00, 0.5549400E+00, 0.6239166E+00, 0.6127191E+00, &
     & 0.6001415E+00, 0.5880981E+00, 0.4712800E+00, 0.5335500E+00, &
     & 0.5150102E+00, 0.4648820E+00, 0.3677659E+00, 0.3677659E+00 /
      data (ref_adm(20,iz,23, 8),iz = 1,20) / &
     & 0.6766900E+00, 0.6766900E+00, 0.6551085E+00, 0.6556244E+00, &
     & 0.6580458E+00, 0.6600197E+00, 0.6575894E+00, 0.6501434E+00, &
     & 0.6423604E+00, 0.6331873E+00, 0.4483900E+00, 0.6124992E+00, &
     & 0.5998860E+00, 0.5871604E+00, 0.5090000E+00, 0.5188300E+00, &
     & 0.5126973E+00, 0.4628341E+00, 0.3670186E+00, 0.3670186E+00 /
      data (ref_adm(20,iz,24, 8),iz = 1,20) / &
     & 0.6553869E+00, 0.6553869E+00, 0.6542471E+00, 0.6543340E+00, &
     & 0.6559995E+00, 0.6587963E+00, 0.6582919E+00, 0.6517688E+00, &
     & 0.6438954E+00, 0.6346951E+00, 0.6251932E+00, 0.6127012E+00, &
     & 0.5878600E+00, 0.5865108E+00, 0.5737900E+00, 0.5739900E+00, &
     & 0.5107430E+00, 0.4609155E+00, 0.3663639E+00, 0.3663639E+00 /
      data (ref_adm(20,iz,25, 8),iz = 1,20) / &
     & 0.6430700E+00, 0.6430700E+00, 0.6541542E+00, 0.6533397E+00, &
     & 0.6542106E+00, 0.6569158E+00, 0.6584843E+00, 0.6536101E+00, &
     & 0.6453294E+00, 0.6362664E+00, 0.5443400E+00, 0.6131535E+00, &
     & 0.5991252E+00, 0.6383800E+00, 0.6555200E+00, 0.5837000E+00, &
     & 0.5090567E+00, 0.4590669E+00, 0.3659994E+00, 0.3659994E+00 /
      data (ref_adm(20,iz,26, 8),iz = 1,20) / &
     & 0.6553584E+00, 0.6553584E+00, 0.6535166E+00, 0.6526997E+00, &
     & 0.6525542E+00, 0.6547036E+00, 0.6574956E+00, 0.6551608E+00, &
     & 0.6470101E+00, 0.6379372E+00, 0.5963400E+00, 0.6275600E+00, &
     & 0.5989239E+00, 0.5925800E+00, 0.6192800E+00, 0.5387616E+00, &
     & 0.5072671E+00, 0.4573065E+00, 0.3656140E+00, 0.3656140E+00 /
      data (ref_adm(20,iz,27, 8),iz = 1,20) / &
     & 0.5917600E+00, 0.5917600E+00, 0.6535057E+00, 0.6526332E+00, &
     & 0.6514632E+00, 0.6522728E+00, 0.6557049E+00, 0.6558442E+00, &
     & 0.6488248E+00, 0.6393423E+00, 0.6286899E+00, 0.6159800E+00, &
     & 0.5720300E+00, 0.5372700E+00, 0.5349400E+00, 0.5505500E+00, &
     & 0.5512500E+00, 0.4575000E+00, 0.3823700E+00, 0.3823700E+00 /
      data (ref_adm(20,iz,28, 8),iz = 1,20) / &
     & 0.6333100E+00, 0.6333100E+00, 0.6430300E+00, 0.6542000E+00, &
     & 0.6522100E+00, 0.6106100E+00, 0.6534495E+00, 0.6554420E+00, &
     & 0.6505584E+00, 0.5586200E+00, 0.5763300E+00, 0.6151607E+00, &
     & 0.5681900E+00, 0.6473600E+00, 0.5703600E+00, 0.5002300E+00, &
     & 0.5689700E+00, 0.4547761E+00, 0.3652061E+00, 0.3652061E+00 /
      data (ref_adm(20,iz,29, 8),iz = 1,20) / &
     & 0.6339700E+00, 0.6339700E+00, 0.6145000E+00, 0.6178200E+00, &
     & 0.6045800E+00, 0.5874700E+00, 0.6127500E+00, 0.6685200E+00, &
     & 0.6156300E+00, 0.6426575E+00, 0.6582600E+00, 0.6313900E+00, &
     & 0.5998995E+00, 0.5855026E+00, 0.5651668E+00, 0.5360160E+00, &
     & 0.5031435E+00, 0.4536690E+00, 0.3651453E+00, 0.3651453E+00 /
      data (ref_adm(20,iz,30, 8),iz = 1,20) / &
     & 0.6548396E+00, 0.6548396E+00, 0.6534245E+00, 0.6528640E+00, &
     & 0.6512035E+00, 0.6491154E+00, 0.6490858E+00, 0.6522828E+00, &
     & 0.6517810E+00, 0.5798100E+00, 0.5949600E+00, 0.6719700E+00, &
     & 0.6695400E+00, 0.5855502E+00, 0.5651233E+00, 0.5355948E+00, &
     & 0.5022852E+00, 0.4527459E+00, 0.3650931E+00, 0.3650931E+00 /
      data (ref_adm(20,iz,31, 8),iz = 1,20) / &
     & 0.6550505E+00, 0.6550505E+00, 0.6537095E+00, 0.6533654E+00, &
     & 0.6519169E+00, 0.6491861E+00, 0.6479694E+00, 0.6505012E+00, &
     & 0.6515581E+00, 0.6454834E+00, 0.6912500E+00, 0.6813000E+00, &
     & 0.6468600E+00, 0.5781500E+00, 0.5800000E+00, 0.5353384E+00, &
     & 0.5015837E+00, 0.4518664E+00, 0.3651542E+00, 0.3651542E+00 /
      data (ref_adm(20,iz,32, 8),iz = 1,20) / &
     & 0.6548607E+00, 0.6548607E+00, 0.6539102E+00, 0.6541347E+00, &
     & 0.6526171E+00, 0.6449700E+00, 0.6473035E+00, 0.6486228E+00, &
     & 0.6506268E+00, 0.6998500E+00, 0.6899200E+00, 0.5865800E+00, &
     & 0.6016055E+00, 0.5863280E+00, 0.5331400E+00, 0.5351243E+00, &
     & 0.5010181E+00, 0.4512893E+00, 0.3652735E+00, 0.3652735E+00 /
      data (ref_adm(20,iz,33, 8),iz = 1,20) / &
     & 0.6550317E+00, 0.6550317E+00, 0.6540380E+00, 0.6557142E+00, &
     & 0.6107100E+00, 0.6052100E+00, 0.6424300E+00, 0.6176300E+00, &
     & 0.6493580E+00, 0.6976600E+00, 0.6365156E+00, 0.6078500E+00, &
     & 0.6025438E+00, 0.5867001E+00, 0.5651109E+00, 0.5351040E+00, &
     & 0.5006876E+00, 0.4508793E+00, 0.3654037E+00, 0.3654037E+00 /
      data (ref_adm(20,iz,34, 8),iz = 1,20) / &
     & 0.6548813E+00, 0.6548813E+00, 0.6548536E+00, 0.6935800E+00, &
     & 0.5571200E+00, 0.6517948E+00, 0.6226900E+00, 0.7130800E+00, &
     & 0.6483524E+00, 0.6465239E+00, 0.6302800E+00, 0.6572200E+00, &
     & 0.6029487E+00, 0.5869565E+00, 0.5651650E+00, 0.5349945E+00, &
     & 0.5004284E+00, 0.4503741E+00, 0.3655088E+00, 0.3655088E+00 /
      data (ref_adm(20,iz,35, 8),iz = 1,20) / &
     & 0.6546547E+00, 0.6546547E+00, 0.6550023E+00, 0.6607600E+00, &
     & 0.7037300E+00, 0.6539681E+00, 0.5735000E+00, 0.6552700E+00, &
     & 0.7035700E+00, 0.6464005E+00, 0.6380100E+00, 0.6216651E+00, &
     & 0.6033707E+00, 0.5873227E+00, 0.5652947E+00, 0.5348907E+00, &
     & 0.5001774E+00, 0.4501122E+00, 0.3656253E+00, 0.3656253E+00 /
      data (ref_adm(20,iz,36, 8),iz = 1,20) / &
     & 0.7067200E+00, 0.7067200E+00, 0.6810700E+00, 0.7133600E+00, &
     & 0.7044000E+00, 0.7039300E+00, 0.6480587E+00, 0.5416900E+00, &
     & 0.7410300E+00, 0.6945800E+00, 0.7048500E+00, 0.6222548E+00, &
     & 0.6036522E+00, 0.5875264E+00, 0.5652895E+00, 0.5349916E+00, &
     & 0.5001073E+00, 0.4500258E+00, 0.3656785E+00, 0.3656785E+00 /
      data (ref_adm(20,iz,37, 8),iz = 1,20) / &
     & 0.7257100E+00, 0.7257100E+00, 0.6555938E+00, 0.6793272E+00, &
     & 0.7047000E+00, 0.7094000E+00, 0.6483793E+00, 0.6599300E+00, &
     & 0.6462124E+00, 0.7073400E+00, 0.6853200E+00, 0.6222225E+00, &
     & 0.6039331E+00, 0.5879481E+00, 0.5655231E+00, 0.5350012E+00, &
     & 0.5000456E+00, 0.4499345E+00, 0.3656941E+00, 0.3656941E+00 /
      data (ref_adm(20,iz,38, 8),iz = 1,20) / &
     & 0.7257100E+00, 0.7257100E+00, 0.6555938E+00, 0.6793272E+00, &
     & 0.7047000E+00, 0.7094000E+00, 0.6483793E+00, 0.6599300E+00, &
     & 0.6462124E+00, 0.7073400E+00, 0.6853200E+00, 0.6222225E+00, &
     & 0.6039331E+00, 0.5879481E+00, 0.5655231E+00, 0.5350012E+00, &
     & 0.5000456E+00, 0.4499345E+00, 0.3656941E+00, 0.3656941E+00 /
! Solar Zenith Angle 40.0 Albedo  0.6107781E+00
      data (ref_adm(20,iz, 1, 9),iz = 1,20) / &
     & 0.5578700E+00, 0.5578700E+00, 0.5368900E+00, 0.5669506E+00, &
     & 0.4985100E+00, 0.5538300E+00, 0.5828900E+00, 0.5798400E+00, &
     & 0.5848800E+00, 0.6603200E+00, 0.6071600E+00, 0.6283400E+00, &
     & 0.5951600E+00, 0.6389800E+00, 0.7473000E+00, 0.7078845E+00, &
     & 0.7101186E+00, 0.6477000E+00, 0.5783836E+00, 0.5783836E+00 /
      data (ref_adm(20,iz, 2, 9),iz = 1,20) / &
     & 0.5578700E+00, 0.5578700E+00, 0.5368900E+00, 0.5669506E+00, &
     & 0.4985100E+00, 0.5538300E+00, 0.5828900E+00, 0.5798400E+00, &
     & 0.5848800E+00, 0.6603200E+00, 0.6071600E+00, 0.6283400E+00, &
     & 0.5951600E+00, 0.6389800E+00, 0.7473000E+00, 0.7078845E+00, &
     & 0.7101186E+00, 0.6477000E+00, 0.5783836E+00, 0.5783836E+00 /
      data (ref_adm(20,iz, 3, 9),iz = 1,20) / &
     & 0.5629000E+00, 0.5629000E+00, 0.5434100E+00, 0.5668653E+00, &
     & 0.5645700E+00, 0.5772700E+00, 0.5831700E+00, 0.5930600E+00, &
     & 0.5965300E+00, 0.5807900E+00, 0.6902100E+00, 0.6589857E+00, &
     & 0.6819300E+00, 0.6568000E+00, 0.6421600E+00, 0.7058728E+00, &
     & 0.7070607E+00, 0.6947068E+00, 0.5343730E+00, 0.5343730E+00 /
      data (ref_adm(20,iz, 4, 9),iz = 1,20) / &
     & 0.5625319E+00, 0.5625319E+00, 0.5636571E+00, 0.5898700E+00, &
     & 0.5951200E+00, 0.5880600E+00, 0.5338800E+00, 0.5922700E+00, &
     & 0.5885300E+00, 0.6061900E+00, 0.6744400E+00, 0.6575123E+00, &
     & 0.6678500E+00, 0.6864400E+00, 0.6469700E+00, 0.7028057E+00, &
     & 0.7352000E+00, 0.6867916E+00, 0.5718086E+00, 0.5718086E+00 /
      data (ref_adm(20,iz, 5, 9),iz = 1,20) / &
     & 0.4581900E+00, 0.4581900E+00, 0.5544700E+00, 0.6280900E+00, &
     & 0.5723280E+00, 0.5432600E+00, 0.6212500E+00, 0.6209000E+00, &
     & 0.6557200E+00, 0.6566700E+00, 0.6660300E+00, 0.5767000E+00, &
     & 0.6494800E+00, 0.6277000E+00, 0.6493200E+00, 0.6978000E+00, &
     & 0.7234200E+00, 0.6753358E+00, 0.5658245E+00, 0.5658245E+00 /
      data (ref_adm(20,iz, 6, 9),iz = 1,20) / &
     & 0.5625001E+00, 0.5625001E+00, 0.5878400E+00, 0.5810100E+00, &
     & 0.5054500E+00, 0.5866400E+00, 0.6594600E+00, 0.6707900E+00, &
     & 0.5899800E+00, 0.6594300E+00, 0.6717300E+00, 0.6521105E+00, &
     & 0.6332400E+00, 0.6143600E+00, 0.6906778E+00, 0.6994100E+00, &
     & 0.7120200E+00, 0.6614550E+00, 0.5550873E+00, 0.5550873E+00 /
      data (ref_adm(20,iz, 7, 9),iz = 1,20) / &
     & 0.5585300E+00, 0.5585300E+00, 0.5896900E+00, 0.5852000E+00, &
     & 0.5724000E+00, 0.5780620E+00, 0.6511300E+00, 0.6808700E+00, &
     & 0.6484900E+00, 0.5405000E+00, 0.6522200E+00, 0.5812400E+00, &
     & 0.6526000E+00, 0.6019900E+00, 0.6225200E+00, 0.6912400E+00, &
     & 0.6652500E+00, 0.6472521E+00, 0.5410481E+00, 0.5410481E+00 /
      data (ref_adm(20,iz, 8, 9),iz = 1,20) / &
     & 0.5642800E+00, 0.5642800E+00, 0.5953300E+00, 0.5404900E+00, &
     & 0.5130700E+00, 0.5587600E+00, 0.5794500E+00, 0.5218400E+00, &
     & 0.5115500E+00, 0.5503800E+00, 0.4922800E+00, 0.6180400E+00, &
     & 0.6359200E+00, 0.6616800E+00, 0.6399100E+00, 0.7228500E+00, &
     & 0.7228100E+00, 0.6345556E+00, 0.5271940E+00, 0.5271940E+00 /
      data (ref_adm(20,iz, 9, 9),iz = 1,20) / &
     & 0.5551400E+00, 0.5551400E+00, 0.5725600E+00, 0.5559300E+00, &
     & 0.5481300E+00, 0.5677100E+00, 0.5942900E+00, 0.5842300E+00, &
     & 0.5697400E+00, 0.5846400E+00, 0.6125900E+00, 0.6119000E+00, &
     & 0.5971500E+00, 0.6943200E+00, 0.6732981E+00, 0.6727800E+00, &
     & 0.6597774E+00, 0.6232696E+00, 0.5151445E+00, 0.5151445E+00 /
      data (ref_adm(20,iz,10, 9),iz = 1,20) / &
     & 0.6084300E+00, 0.6084300E+00, 0.5630179E+00, 0.4853600E+00, &
     & 0.5687393E+00, 0.5748166E+00, 0.5348100E+00, 0.5939200E+00, &
     & 0.5995329E+00, 0.5506500E+00, 0.5591300E+00, 0.5550000E+00, &
     & 0.5951400E+00, 0.6675700E+00, 0.6746100E+00, 0.6656345E+00, &
     & 0.6521774E+00, 0.6133676E+00, 0.5044878E+00, 0.5044878E+00 /
      data (ref_adm(20,iz,11, 9),iz = 1,20) / &
     & 0.5172700E+00, 0.5172700E+00, 0.5631057E+00, 0.5632700E+00, &
     & 0.5671200E+00, 0.5732735E+00, 0.5461700E+00, 0.5973500E+00, &
     & 0.5964063E+00, 0.5854000E+00, 0.6042000E+00, 0.4819900E+00, &
     & 0.5973800E+00, 0.6366600E+00, 0.6260600E+00, 0.6571687E+00, &
     & 0.6440955E+00, 0.6045611E+00, 0.4950418E+00, 0.4950418E+00 /
      data (ref_adm(20,iz,12, 9),iz = 1,20) / &
     & 0.5585500E+00, 0.5585500E+00, 0.6362700E+00, 0.6030700E+00, &
     & 0.6160900E+00, 0.6227200E+00, 0.6485900E+00, 0.6570400E+00, &
     & 0.6345300E+00, 0.5634400E+00, 0.6662700E+00, 0.6232311E+00, &
     & 0.6341525E+00, 0.5988200E+00, 0.6479208E+00, 0.6472742E+00, &
     & 0.5998500E+00, 0.5503700E+00, 0.4866484E+00, 0.4866484E+00 /
      data (ref_adm(20,iz,13, 9),iz = 1,20) / &
     & 0.6044100E+00, 0.6044100E+00, 0.6200600E+00, 0.6093000E+00, &
     & 0.5952900E+00, 0.5886200E+00, 0.5815800E+00, 0.6109000E+00, &
     & 0.6504600E+00, 0.6335700E+00, 0.6555100E+00, 0.6612300E+00, &
     & 0.6609600E+00, 0.5670200E+00, 0.6528900E+00, 0.6370043E+00, &
     & 0.6254187E+00, 0.5883591E+00, 0.4789683E+00, 0.4789683E+00 /
      data (ref_adm(20,iz,14, 9),iz = 1,20) / &
     & 0.5958000E+00, 0.5958000E+00, 0.5626695E+00, 0.5459500E+00, &
     & 0.5995900E+00, 0.5943400E+00, 0.5899600E+00, 0.5818900E+00, &
     & 0.6070500E+00, 0.6051900E+00, 0.5888100E+00, 0.6082900E+00, &
     & 0.6111400E+00, 0.6143800E+00, 0.6295859E+00, 0.6271717E+00, &
     & 0.6358600E+00, 0.5783850E+00, 0.4714193E+00, 0.4714193E+00 /
      data (ref_adm(20,iz,15, 9),iz = 1,20) / &
     & 0.5805000E+00, 0.5805000E+00, 0.5923400E+00, 0.5791300E+00, &
     & 0.6239200E+00, 0.5444500E+00, 0.6042700E+00, 0.5774238E+00, &
     & 0.5662100E+00, 0.6313700E+00, 0.6617800E+00, 0.6629500E+00, &
     & 0.5956700E+00, 0.6210300E+00, 0.6080600E+00, 0.6170993E+00, &
     & 0.6035733E+00, 0.5673416E+00, 0.4632982E+00, 0.4632982E+00 /
      data (ref_adm(20,iz,16, 9),iz = 1,20) / &
     & 0.6219100E+00, 0.6219100E+00, 0.5769000E+00, 0.6128700E+00, &
     & 0.6167900E+00, 0.5655700E+00, 0.5162900E+00, 0.5748426E+00, &
     & 0.6524400E+00, 0.6611700E+00, 0.5919842E+00, 0.6222200E+00, &
     & 0.6817900E+00, 0.6083600E+00, 0.5785400E+00, 0.6068431E+00, &
     & 0.5929839E+00, 0.5569662E+00, 0.4548444E+00, 0.4548444E+00 /
      data (ref_adm(20,iz,17, 9),iz = 1,20) / &
     & 0.5779900E+00, 0.5779900E+00, 0.5628356E+00, 0.5635061E+00, &
     & 0.6664200E+00, 0.6311600E+00, 0.5691559E+00, 0.6440600E+00, &
     & 0.6567700E+00, 0.5821647E+00, 0.5876123E+00, 0.5609700E+00, &
     & 0.6591300E+00, 0.5641400E+00, 0.6046203E+00, 0.5983447E+00, &
     & 0.5827529E+00, 0.5466307E+00, 0.4476051E+00, 0.4476051E+00 /
      data (ref_adm(20,iz,18, 9),iz = 1,20) / &
     & 0.5703000E+00, 0.5703000E+00, 0.5916500E+00, 0.6596900E+00, &
     & 0.6519000E+00, 0.6273400E+00, 0.6561200E+00, 0.6646600E+00, &
     & 0.6029679E+00, 0.6042823E+00, 0.6141800E+00, 0.6015000E+00, &
     & 0.6199500E+00, 0.4930800E+00, 0.5537300E+00, 0.5902157E+00, &
     & 0.5710667E+00, 0.5323963E+00, 0.4397652E+00, 0.4397652E+00 /
      data (ref_adm(20,iz,19, 9),iz = 1,20) / &
     & 0.6403800E+00, 0.6403800E+00, 0.5523700E+00, 0.6025900E+00, &
     & 0.6679900E+00, 0.6656000E+00, 0.6395700E+00, 0.6015777E+00, &
     & 0.6016724E+00, 0.5652800E+00, 0.6029217E+00, 0.6721400E+00, &
     & 0.6027698E+00, 0.6313400E+00, 0.5730300E+00, 0.5832525E+00, &
     & 0.5642735E+00, 0.5259325E+00, 0.4350776E+00, 0.4350776E+00 /
      data (ref_adm(20,iz,20, 9),iz = 1,20) / &
     & 0.6331700E+00, 0.6331700E+00, 0.5329700E+00, 0.6019326E+00, &
     & 0.5974500E+00, 0.6641400E+00, 0.6341400E+00, 0.5715800E+00, &
     & 0.5155700E+00, 0.4857300E+00, 0.6021800E+00, 0.5998885E+00, &
     & 0.5988499E+00, 0.6291700E+00, 0.6642300E+00, 0.5774084E+00, &
     & 0.5578137E+00, 0.5200813E+00, 0.4322960E+00, 0.4322960E+00 /
      data (ref_adm(20,iz,21, 9),iz = 1,20) / &
     & 0.5590400E+00, 0.5590400E+00, 0.6022868E+00, 0.6022337E+00, &
     & 0.6020120E+00, 0.6356700E+00, 0.6912900E+00, 0.6170500E+00, &
     & 0.5450000E+00, 0.6000721E+00, 0.5689500E+00, 0.5974921E+00, &
     & 0.5564300E+00, 0.6037400E+00, 0.6181300E+00, 0.5714561E+00, &
     & 0.5521683E+00, 0.5145796E+00, 0.4304311E+00, 0.4304311E+00 /
      data (ref_adm(20,iz,22, 9),iz = 1,20) / &
     & 0.6324900E+00, 0.6324900E+00, 0.6412500E+00, 0.6100100E+00, &
     & 0.5797500E+00, 0.5851200E+00, 0.6036200E+00, 0.6552400E+00, &
     & 0.5238100E+00, 0.5976200E+00, 0.6065393E+00, 0.5864100E+00, &
     & 0.6245738E+00, 0.6315192E+00, 0.5640700E+00, 0.6397984E+00, &
     & 0.6349179E+00, 0.6135198E+00, 0.5443858E+00, 0.5443858E+00 /
      data (ref_adm(20,iz,23, 9),iz = 1,20) / &
     & 0.6457900E+00, 0.6457900E+00, 0.6195400E+00, 0.5734200E+00, &
     & 0.5896000E+00, 0.5955700E+00, 0.6120100E+00, 0.6573400E+00, &
     & 0.6125800E+00, 0.5349500E+00, 0.6026354E+00, 0.6101882E+00, &
     & 0.5268200E+00, 0.5238500E+00, 0.6050900E+00, 0.5137200E+00, &
     & 0.6256317E+00, 0.6044027E+00, 0.5444361E+00, 0.5444361E+00 /
      data (ref_adm(20,iz,24, 9),iz = 1,20) / &
     & 0.5720900E+00, 0.5720900E+00, 0.5318400E+00, 0.5767363E+00, &
     & 0.5778515E+00, 0.5797137E+00, 0.5354400E+00, 0.6015600E+00, &
     & 0.6527000E+00, 0.5737700E+00, 0.5978000E+00, 0.6074314E+00, &
     & 0.6141995E+00, 0.6634900E+00, 0.6361600E+00, 0.5464400E+00, &
     & 0.5327800E+00, 0.5984548E+00, 0.5475207E+00, 0.5475207E+00 /
      data (ref_adm(20,iz,25, 9),iz = 1,20) / &
     & 0.6442400E+00, 0.6442400E+00, 0.5758378E+00, 0.5760422E+00, &
     & 0.5767121E+00, 0.5790812E+00, 0.5822348E+00, 0.5639500E+00, &
     & 0.5856100E+00, 0.6739100E+00, 0.6216300E+00, 0.5010100E+00, &
     & 0.6132687E+00, 0.6976900E+00, 0.6376100E+00, 0.5853400E+00, &
     & 0.4873000E+00, 0.4764500E+00, 0.5524980E+00, 0.5524980E+00 /
      data (ref_adm(20,iz,26, 9),iz = 1,20) / &
     & 0.5907100E+00, 0.5907100E+00, 0.5643900E+00, 0.5765500E+00, &
     & 0.6599500E+00, 0.6385200E+00, 0.6747900E+00, 0.5735800E+00, &
     & 0.5188700E+00, 0.6405900E+00, 0.6935500E+00, 0.6087700E+00, &
     & 0.6192700E+00, 0.6255300E+00, 0.6525700E+00, 0.6200374E+00, &
     & 0.6139861E+00, 0.5955752E+00, 0.5613694E+00, 0.5613694E+00 /
      data (ref_adm(20,iz,27, 9),iz = 1,20) / &
     & 0.5940500E+00, 0.5940500E+00, 0.5739600E+00, 0.6119700E+00, &
     & 0.6365100E+00, 0.6565800E+00, 0.5995500E+00, 0.6270700E+00, &
     & 0.6889800E+00, 0.6577000E+00, 0.6578400E+00, 0.6206800E+00, &
     & 0.5859800E+00, 0.6397700E+00, 0.5881100E+00, 0.5943600E+00, &
     & 0.5151100E+00, 0.5280100E+00, 0.5730580E+00, 0.5730580E+00 /
      data (ref_adm(20,iz,28, 9),iz = 1,20) / &
     & 0.5904000E+00, 0.5904000E+00, 0.6680600E+00, 0.6213300E+00, &
     & 0.6153800E+00, 0.6632500E+00, 0.6609300E+00, 0.6744700E+00, &
     & 0.6860200E+00, 0.6792300E+00, 0.6947800E+00, 0.6781400E+00, &
     & 0.6394700E+00, 0.6491300E+00, 0.5839000E+00, 0.5218000E+00, &
     & 0.4792400E+00, 0.4748500E+00, 0.5859199E+00, 0.5859199E+00 /
      data (ref_adm(20,iz,29, 9),iz = 1,20) / &
     & 0.5853100E+00, 0.5853100E+00, 0.5742958E+00, 0.4219200E+00, &
     & 0.5634900E+00, 0.5936300E+00, 0.5745300E+00, 0.5523000E+00, &
     & 0.6095300E+00, 0.6084200E+00, 0.6083127E+00, 0.6310000E+00, &
     & 0.6570200E+00, 0.6018700E+00, 0.5420700E+00, 0.5243700E+00, &
     & 0.5164800E+00, 0.6158243E+00, 0.6001022E+00, 0.6001022E+00 /
      data (ref_adm(20,iz,30, 9),iz = 1,20) / &
     & 0.6179500E+00, 0.6179500E+00, 0.6038400E+00, 0.5746530E+00, &
     & 0.5139100E+00, 0.6976700E+00, 0.5855500E+00, 0.5600600E+00, &
     & 0.5970020E+00, 0.6565000E+00, 0.5786400E+00, 0.6272300E+00, &
     & 0.5840800E+00, 0.6005100E+00, 0.5494000E+00, 0.4917800E+00, &
     & 0.5228400E+00, 0.6274025E+00, 0.6153865E+00, 0.6153865E+00 /
      data (ref_adm(20,iz,31, 9),iz = 1,20) / &
     & 0.5492600E+00, 0.5492600E+00, 0.5418800E+00, 0.5455400E+00, &
     & 0.5578400E+00, 0.5699400E+00, 0.5761200E+00, 0.5932700E+00, &
     & 0.5908700E+00, 0.5820200E+00, 0.5728500E+00, 0.5687900E+00, &
     & 0.5785200E+00, 0.6489623E+00, 0.5817800E+00, 0.4812900E+00, &
     & 0.6540503E+00, 0.4963300E+00, 0.6312921E+00, 0.6312921E+00 /
      data (ref_adm(20,iz,32, 9),iz = 1,20) / &
     & 0.5777600E+00, 0.5777600E+00, 0.5589100E+00, 0.5746384E+00, &
     & 0.6012600E+00, 0.6223300E+00, 0.5865597E+00, 0.5310600E+00, &
     & 0.6044539E+00, 0.6142912E+00, 0.6251917E+00, 0.6379328E+00, &
     & 0.6480967E+00, 0.6555716E+00, 0.6632094E+00, 0.5482100E+00, &
     & 0.6672237E+00, 0.6552988E+00, 0.6469118E+00, 0.6469118E+00 /
      data (ref_adm(20,iz,33, 9),iz = 1,20) / &
     & 0.5236800E+00, 0.5236800E+00, 0.6053600E+00, 0.6128400E+00, &
     & 0.5761000E+00, 0.5813692E+00, 0.5430500E+00, 0.5757000E+00, &
     & 0.6207900E+00, 0.5478500E+00, 0.6298804E+00, 0.6369407E+00, &
     & 0.6432695E+00, 0.6514700E+00, 0.6571909E+00, 0.6683229E+00, &
     & 0.4857900E+00, 0.6694039E+00, 0.6608114E+00, 0.6608114E+00 /
      data (ref_adm(20,iz,34, 9),iz = 1,20) / &
     & 0.5764535E+00, 0.5764535E+00, 0.5736581E+00, 0.5914800E+00, &
     & 0.5416600E+00, 0.5818490E+00, 0.5407800E+00, 0.6505400E+00, &
     & 0.6696200E+00, 0.6348500E+00, 0.6156200E+00, 0.5909300E+00, &
     & 0.6845700E+00, 0.6402204E+00, 0.5915600E+00, 0.6577396E+00, &
     & 0.6687043E+00, 0.6752264E+00, 0.6737104E+00, 0.6737104E+00 /
      data (ref_adm(20,iz,35, 9),iz = 1,20) / &
     & 0.5764328E+00, 0.5764328E+00, 0.5738206E+00, 0.5743768E+00, &
     & 0.5768479E+00, 0.5820623E+00, 0.5907989E+00, 0.7245100E+00, &
     & 0.6130011E+00, 0.7002800E+00, 0.7294700E+00, 0.7155600E+00, &
     & 0.6951400E+00, 0.6400056E+00, 0.6475633E+00, 0.6531457E+00, &
     & 0.6597331E+00, 0.6719000E+00, 0.6829419E+00, 0.6829419E+00 /
      data (ref_adm(20,iz,36, 9),iz = 1,20) / &
     & 0.5766012E+00, 0.5766012E+00, 0.5735123E+00, 0.5744083E+00, &
     & 0.5770172E+00, 0.5827639E+00, 0.6165700E+00, 0.6977700E+00, &
     & 0.7209000E+00, 0.6992200E+00, 0.6820400E+00, 0.6800600E+00, &
     & 0.6111500E+00, 0.6454740E+00, 0.6541196E+00, 0.6564692E+00, &
     & 0.6584580E+00, 0.6666763E+00, 0.6869057E+00, 0.6869057E+00 /
      data (ref_adm(20,iz,37, 9),iz = 1,20) / &
     & 0.6037900E+00, 0.6037900E+00, 0.5733879E+00, 0.5743421E+00, &
     & 0.5775088E+00, 0.6550800E+00, 0.5839700E+00, 0.6098200E+00, &
     & 0.6732900E+00, 0.7268700E+00, 0.6554800E+00, 0.6437400E+00, &
     & 0.6390598E+00, 0.6771182E+00, 0.7104923E+00, 0.6614974E+00, &
     & 0.6591269E+00, 0.6641170E+00, 0.6884863E+00, 0.6884863E+00 /
      data (ref_adm(20,iz,38, 9),iz = 1,20) / &
     & 0.6037900E+00, 0.6037900E+00, 0.5733879E+00, 0.5743421E+00, &
     & 0.5775088E+00, 0.6550800E+00, 0.5839700E+00, 0.6098200E+00, &
     & 0.6732900E+00, 0.7268700E+00, 0.6554800E+00, 0.6437400E+00, &
     & 0.6390598E+00, 0.6771182E+00, 0.7104923E+00, 0.6614974E+00, &
     & 0.6591269E+00, 0.6641170E+00, 0.6884863E+00, 0.6884863E+00 /
! Solar Zenith Angle 45.0 Albedo  0.6221891E+00
      data (ref_adm(20,iz, 1,10),iz = 1,20) / &
     & 0.6522100E+00, 0.6522100E+00, 0.5711300E+00, 0.5984500E+00, &
     & 0.6169100E+00, 0.6618000E+00, 0.6749600E+00, 0.6387800E+00, &
     & 0.6461600E+00, 0.6551400E+00, 0.6687900E+00, 0.6644800E+00, &
     & 0.6957100E+00, 0.7564500E+00, 0.7497800E+00, 0.7742400E+00, &
     & 0.7856100E+00, 0.7464000E+00, 0.6428480E+00, 0.6428480E+00 /
      data (ref_adm(20,iz, 2,10),iz = 1,20) / &
     & 0.6522100E+00, 0.6522100E+00, 0.5711300E+00, 0.5984500E+00, &
     & 0.6169100E+00, 0.6618000E+00, 0.6749600E+00, 0.6387800E+00, &
     & 0.6461600E+00, 0.6551400E+00, 0.6687900E+00, 0.6644800E+00, &
     & 0.6957100E+00, 0.7564500E+00, 0.7497800E+00, 0.7742400E+00, &
     & 0.7856100E+00, 0.7464000E+00, 0.6428480E+00, 0.6428480E+00 /
      data (ref_adm(20,iz, 3,10),iz = 1,20) / &
     & 0.5937500E+00, 0.5937500E+00, 0.5800600E+00, 0.5857900E+00, &
     & 0.5796500E+00, 0.6002600E+00, 0.6417500E+00, 0.6501200E+00, &
     & 0.6558000E+00, 0.6596000E+00, 0.6696800E+00, 0.6976100E+00, &
     & 0.6705900E+00, 0.7505900E+00, 0.7478000E+00, 0.7821900E+00, &
     & 0.7819700E+00, 0.7684800E+00, 0.5425949E+00, 0.5425949E+00 /
      data (ref_adm(20,iz, 4,10),iz = 1,20) / &
     & 0.5846900E+00, 0.5846900E+00, 0.5795100E+00, 0.6013900E+00, &
     & 0.5943900E+00, 0.5993900E+00, 0.5857300E+00, 0.6592000E+00, &
     & 0.6454000E+00, 0.6491300E+00, 0.6610800E+00, 0.6766800E+00, &
     & 0.6652100E+00, 0.7161600E+00, 0.7503100E+00, 0.7655800E+00, &
     & 0.7899300E+00, 0.7490800E+00, 0.6294435E+00, 0.6294435E+00 /
      data (ref_adm(20,iz, 5,10),iz = 1,20) / &
     & 0.5666200E+00, 0.5666200E+00, 0.5887400E+00, 0.5645800E+00, &
     & 0.5922600E+00, 0.6168500E+00, 0.6370700E+00, 0.6254700E+00, &
     & 0.6481800E+00, 0.6218200E+00, 0.6691000E+00, 0.6580700E+00, &
     & 0.6863300E+00, 0.7195900E+00, 0.7591000E+00, 0.7584000E+00, &
     & 0.7589200E+00, 0.5791800E+00, 0.6193303E+00, 0.6193303E+00 /
      data (ref_adm(20,iz, 6,10),iz = 1,20) / &
     & 0.5762500E+00, 0.5762500E+00, 0.5939900E+00, 0.5847600E+00, &
     & 0.6246200E+00, 0.6288100E+00, 0.6294200E+00, 0.6233200E+00, &
     & 0.6205100E+00, 0.6575700E+00, 0.6662600E+00, 0.6859100E+00, &
     & 0.7206400E+00, 0.7325300E+00, 0.7363300E+00, 0.7639400E+00, &
     & 0.7334700E+00, 0.6994000E+00, 0.6075994E+00, 0.6075994E+00 /
      data (ref_adm(20,iz, 7,10),iz = 1,20) / &
     & 0.6035200E+00, 0.6035200E+00, 0.6219200E+00, 0.6293200E+00, &
     & 0.6263200E+00, 0.6242400E+00, 0.6058000E+00, 0.6015700E+00, &
     & 0.6161700E+00, 0.6257900E+00, 0.6352800E+00, 0.6524400E+00, &
     & 0.6925400E+00, 0.7060900E+00, 0.7186100E+00, 0.7323500E+00, &
     & 0.7433800E+00, 0.6901000E+00, 0.5950193E+00, 0.5950193E+00 /
      data (ref_adm(20,iz, 8,10),iz = 1,20) / &
     & 0.5963700E+00, 0.5963700E+00, 0.5699800E+00, 0.5855800E+00, &
     & 0.5886700E+00, 0.5943600E+00, 0.5774800E+00, 0.5614300E+00, &
     & 0.5971500E+00, 0.6134100E+00, 0.6126000E+00, 0.6218000E+00, &
     & 0.6471700E+00, 0.6492100E+00, 0.6738500E+00, 0.7017400E+00, &
     & 0.7175200E+00, 0.5799200E+00, 0.5755507E+00, 0.5755507E+00 /
      data (ref_adm(20,iz, 9,10),iz = 1,20) / &
     & 0.5607600E+00, 0.5607600E+00, 0.5887900E+00, 0.5720600E+00, &
     & 0.6110500E+00, 0.6169200E+00, 0.6266400E+00, 0.6331200E+00, &
     & 0.6134300E+00, 0.6426200E+00, 0.6246300E+00, 0.6281000E+00, &
     & 0.6738100E+00, 0.6392200E+00, 0.6888400E+00, 0.6509300E+00, &
     & 0.7154100E+00, 0.6550033E+00, 0.5551991E+00, 0.5551991E+00 /
      data (ref_adm(20,iz,10,10),iz = 1,20) / &
     & 0.5934500E+00, 0.5934500E+00, 0.5553900E+00, 0.6013100E+00, &
     & 0.6180100E+00, 0.5832500E+00, 0.5904300E+00, 0.6077100E+00, &
     & 0.5891400E+00, 0.6202300E+00, 0.6084000E+00, 0.6168200E+00, &
     & 0.6416400E+00, 0.6267300E+00, 0.6533900E+00, 0.6887000E+00, &
     & 0.6901700E+00, 0.6394257E+00, 0.5387644E+00, 0.5387644E+00 /
      data (ref_adm(20,iz,11,10),iz = 1,20) / &
     & 0.5778400E+00, 0.5778400E+00, 0.5843400E+00, 0.5963200E+00, &
     & 0.5883600E+00, 0.5633000E+00, 0.5661100E+00, 0.6010000E+00, &
     & 0.6043300E+00, 0.5928800E+00, 0.5876000E+00, 0.6302800E+00, &
     & 0.6570400E+00, 0.6588900E+00, 0.6514100E+00, 0.6614600E+00, &
     & 0.6499800E+00, 0.5322800E+00, 0.5251662E+00, 0.5251662E+00 /
      data (ref_adm(20,iz,12,10),iz = 1,20) / &
     & 0.5882600E+00, 0.5882600E+00, 0.5994500E+00, 0.6311100E+00, &
     & 0.6547600E+00, 0.6025900E+00, 0.5777300E+00, 0.5930100E+00, &
     & 0.5882500E+00, 0.5923100E+00, 0.6206900E+00, 0.6595900E+00, &
     & 0.6530200E+00, 0.6341800E+00, 0.6413500E+00, 0.6359300E+00, &
     & 0.6067200E+00, 0.6168100E+00, 0.5140889E+00, 0.5140889E+00 /
      data (ref_adm(20,iz,13,10),iz = 1,20) / &
     & 0.5952800E+00, 0.5952800E+00, 0.5909000E+00, 0.6043700E+00, &
     & 0.6097700E+00, 0.6049100E+00, 0.5964600E+00, 0.5857600E+00, &
     & 0.6088800E+00, 0.6249200E+00, 0.6443800E+00, 0.6569000E+00, &
     & 0.6416500E+00, 0.6775800E+00, 0.6059600E+00, 0.6221400E+00, &
     & 0.6060300E+00, 0.5441300E+00, 0.4345200E+00, 0.4345200E+00 /
      data (ref_adm(20,iz,14,10),iz = 1,20) / &
     & 0.5840000E+00, 0.5840000E+00, 0.5878300E+00, 0.5969800E+00, &
     & 0.6027000E+00, 0.5971900E+00, 0.6059600E+00, 0.5917600E+00, &
     & 0.5947500E+00, 0.5959700E+00, 0.5988200E+00, 0.6198100E+00, &
     & 0.6524800E+00, 0.6708300E+00, 0.5949500E+00, 0.6173800E+00, &
     & 0.6187000E+00, 0.5169500E+00, 0.4956080E+00, 0.4956080E+00 /
      data (ref_adm(20,iz,15,10),iz = 1,20) / &
     & 0.5811500E+00, 0.5811500E+00, 0.5527400E+00, 0.5986800E+00, &
     & 0.5641400E+00, 0.5802600E+00, 0.5731300E+00, 0.5735200E+00, &
     & 0.6085200E+00, 0.5496500E+00, 0.5769900E+00, 0.6056000E+00, &
     & 0.6115900E+00, 0.6297300E+00, 0.5731500E+00, 0.6005100E+00, &
     & 0.6175983E+00, 0.5854321E+00, 0.4867622E+00, 0.4867622E+00 /
      data (ref_adm(20,iz,16,10),iz = 1,20) / &
     & 0.5849400E+00, 0.5849400E+00, 0.5765500E+00, 0.6123300E+00, &
     & 0.5965900E+00, 0.5915000E+00, 0.5892700E+00, 0.5966400E+00, &
     & 0.6200000E+00, 0.6115000E+00, 0.5581600E+00, 0.5783700E+00, &
     & 0.6088200E+00, 0.5664500E+00, 0.6262300E+00, 0.6165300E+00, &
     & 0.6340100E+00, 0.6316100E+00, 0.4768840E+00, 0.4768840E+00 /
      data (ref_adm(20,iz,17,10),iz = 1,20) / &
     & 0.5840100E+00, 0.5840100E+00, 0.5668900E+00, 0.6006800E+00, &
     & 0.6204700E+00, 0.5791900E+00, 0.5852100E+00, 0.5789000E+00, &
     & 0.5976400E+00, 0.6106100E+00, 0.5914900E+00, 0.5991600E+00, &
     & 0.6040300E+00, 0.5751400E+00, 0.5802100E+00, 0.6090910E+00, &
     & 0.6028500E+00, 0.5259600E+00, 0.4682858E+00, 0.4682858E+00 /
      data (ref_adm(20,iz,18,10),iz = 1,20) / &
     & 0.5307500E+00, 0.5307500E+00, 0.5488200E+00, 0.6049100E+00, &
     & 0.6148000E+00, 0.6019500E+00, 0.6051700E+00, 0.6340000E+00, &
     & 0.5664900E+00, 0.6174100E+00, 0.6021400E+00, 0.5791400E+00, &
     & 0.6228700E+00, 0.6219100E+00, 0.6381400E+00, 0.5903619E+00, &
     & 0.5564100E+00, 0.5585145E+00, 0.4850725E+00, 0.4850725E+00 /
      data (ref_adm(20,iz,19,10),iz = 1,20) / &
     & 0.6047800E+00, 0.6047800E+00, 0.6285400E+00, 0.6219600E+00, &
     & 0.5785100E+00, 0.5734800E+00, 0.5859800E+00, 0.6027800E+00, &
     & 0.6102700E+00, 0.6117900E+00, 0.6350500E+00, 0.6047600E+00, &
     & 0.6210000E+00, 0.6034600E+00, 0.6037400E+00, 0.5881435E+00, &
     & 0.5778253E+00, 0.5536042E+00, 0.4793417E+00, 0.4793417E+00 /
      data (ref_adm(20,iz,20,10),iz = 1,20) / &
     & 0.6382600E+00, 0.6382600E+00, 0.6093600E+00, 0.5781800E+00, &
     & 0.6184900E+00, 0.5983600E+00, 0.5971900E+00, 0.5749200E+00, &
     & 0.6293500E+00, 0.6199300E+00, 0.6399900E+00, 0.6317500E+00, &
     & 0.6238400E+00, 0.5593000E+00, 0.5584500E+00, 0.5865917E+00, &
     & 0.5753986E+00, 0.5502971E+00, 0.4764292E+00, 0.4764292E+00 /
      data (ref_adm(20,iz,21,10),iz = 1,20) / &
     & 0.6199200E+00, 0.6199200E+00, 0.6062000E+00, 0.6294600E+00, &
     & 0.6281900E+00, 0.5896400E+00, 0.5911000E+00, 0.6081400E+00, &
     & 0.6318600E+00, 0.6178700E+00, 0.6211600E+00, 0.6123300E+00, &
     & 0.5974700E+00, 0.6162600E+00, 0.5624800E+00, 0.6335600E+00, &
     & 0.5737521E+00, 0.5474170E+00, 0.4751650E+00, 0.4751650E+00 /
      data (ref_adm(20,iz,22,10),iz = 1,20) / &
     & 0.6276300E+00, 0.6276300E+00, 0.6276100E+00, 0.6199200E+00, &
     & 0.6369000E+00, 0.6199400E+00, 0.6212600E+00, 0.5966900E+00, &
     & 0.6134000E+00, 0.6141400E+00, 0.6061300E+00, 0.6016100E+00, &
     & 0.5986700E+00, 0.6529800E+00, 0.6508600E+00, 0.6237600E+00, &
     & 0.5581134E+00, 0.5149461E+00, 0.4248953E+00, 0.4248953E+00 /
      data (ref_adm(20,iz,23,10),iz = 1,20) / &
     & 0.6046300E+00, 0.6046300E+00, 0.6220900E+00, 0.6146300E+00, &
     & 0.6077600E+00, 0.6496500E+00, 0.5469200E+00, 0.6092600E+00, &
     & 0.6183800E+00, 0.6093700E+00, 0.6164200E+00, 0.6386200E+00, &
     & 0.5934400E+00, 0.6345500E+00, 0.5821200E+00, 0.6072800E+00, &
     & 0.5524699E+00, 0.5091066E+00, 0.4237348E+00, 0.4237348E+00 /
      data (ref_adm(20,iz,24,10),iz = 1,20) / &
     & 0.6276000E+00, 0.6276000E+00, 0.6394200E+00, 0.5852500E+00, &
     & 0.5254200E+00, 0.6085600E+00, 0.6894500E+00, 0.6610500E+00, &
     & 0.5953700E+00, 0.6261300E+00, 0.6400300E+00, 0.6448800E+00, &
     & 0.5838500E+00, 0.6152700E+00, 0.5394800E+00, 0.5578600E+00, &
     & 0.6029700E+00, 0.5047278E+00, 0.4232001E+00, 0.4232001E+00 /
      data (ref_adm(20,iz,25,10),iz = 1,20) / &
     & 0.6072900E+00, 0.6072900E+00, 0.5871200E+00, 0.5991600E+00, &
     & 0.5646400E+00, 0.6058600E+00, 0.6765000E+00, 0.6739400E+00, &
     & 0.6704800E+00, 0.6123700E+00, 0.6353600E+00, 0.6432100E+00, &
     & 0.5753800E+00, 0.5886900E+00, 0.6087400E+00, 0.5733200E+00, &
     & 0.5949900E+00, 0.5698000E+00, 0.4236026E+00, 0.4236026E+00 /
      data (ref_adm(20,iz,26,10),iz = 1,20) / &
     & 0.5787100E+00, 0.5787100E+00, 0.5848600E+00, 0.5978300E+00, &
     & 0.6084500E+00, 0.6188700E+00, 0.6226300E+00, 0.6376400E+00, &
     & 0.6596800E+00, 0.6105200E+00, 0.6364200E+00, 0.6531100E+00, &
     & 0.5960800E+00, 0.6184800E+00, 0.5642600E+00, 0.5414600E+00, &
     & 0.5390900E+00, 0.4819700E+00, 0.4248711E+00, 0.4248711E+00 /
      data (ref_adm(20,iz,27,10),iz = 1,20) / &
     & 0.5876100E+00, 0.5876100E+00, 0.6164800E+00, 0.6208200E+00, &
     & 0.6277100E+00, 0.6272700E+00, 0.6220100E+00, 0.6361300E+00, &
     & 0.6321300E+00, 0.6461000E+00, 0.6578900E+00, 0.6499400E+00, &
     & 0.6454700E+00, 0.6402300E+00, 0.5778900E+00, 0.5354800E+00, &
     & 0.5314200E+00, 0.4990900E+00, 0.4421700E+00, 0.4421700E+00 /
      data (ref_adm(20,iz,28,10),iz = 1,20) / &
     & 0.5978900E+00, 0.5978900E+00, 0.5861900E+00, 0.5924500E+00, &
     & 0.6119600E+00, 0.6297700E+00, 0.6659500E+00, 0.6594800E+00, &
     & 0.6566800E+00, 0.6660800E+00, 0.6653000E+00, 0.6495100E+00, &
     & 0.6412800E+00, 0.6331600E+00, 0.6009000E+00, 0.5594400E+00, &
     & 0.4999000E+00, 0.4558000E+00, 0.4001100E+00, 0.4001100E+00 /
      data (ref_adm(20,iz,29,10),iz = 1,20) / &
     & 0.5838900E+00, 0.5838900E+00, 0.5846900E+00, 0.6423200E+00, &
     & 0.6344800E+00, 0.6119800E+00, 0.6363300E+00, 0.6610200E+00, &
     & 0.6353800E+00, 0.6467600E+00, 0.6723900E+00, 0.6239500E+00, &
     & 0.6635700E+00, 0.6352300E+00, 0.6294500E+00, 0.5988500E+00, &
     & 0.5416300E+00, 0.4598200E+00, 0.3812000E+00, 0.3812000E+00 /
      data (ref_adm(20,iz,30,10),iz = 1,20) / &
     & 0.5726400E+00, 0.5726400E+00, 0.6152200E+00, 0.6161200E+00, &
     & 0.5940300E+00, 0.6258100E+00, 0.6183400E+00, 0.6421500E+00, &
     & 0.6483500E+00, 0.6262700E+00, 0.6389000E+00, 0.6299700E+00, &
     & 0.6340400E+00, 0.6087800E+00, 0.6237900E+00, 0.5885700E+00, &
     & 0.5470200E+00, 0.4707400E+00, 0.4378609E+00, 0.4378609E+00 /
      data (ref_adm(20,iz,31,10),iz = 1,20) / &
     & 0.5799700E+00, 0.5799700E+00, 0.5681400E+00, 0.5675900E+00, &
     & 0.5763900E+00, 0.5830100E+00, 0.5956200E+00, 0.6135500E+00, &
     & 0.6271000E+00, 0.6264400E+00, 0.6143600E+00, 0.6230800E+00, &
     & 0.6105300E+00, 0.6208900E+00, 0.6103500E+00, 0.6028400E+00, &
     & 0.5620400E+00, 0.5030000E+00, 0.4100300E+00, 0.4100300E+00 /
      data (ref_adm(20,iz,32,10),iz = 1,20) / &
     & 0.5934300E+00, 0.5934300E+00, 0.6059100E+00, 0.5947500E+00, &
     & 0.6151700E+00, 0.6341400E+00, 0.6522600E+00, 0.6323000E+00, &
     & 0.6285200E+00, 0.6752400E+00, 0.6266700E+00, 0.6439800E+00, &
     & 0.6217000E+00, 0.6513800E+00, 0.5909700E+00, 0.5469000E+00, &
     & 0.5418300E+00, 0.5001800E+00, 0.4460077E+00, 0.4460077E+00 /
      data (ref_adm(20,iz,33,10),iz = 1,20) / &
     & 0.5744400E+00, 0.5744400E+00, 0.5777000E+00, 0.6298500E+00, &
     & 0.6135800E+00, 0.6154300E+00, 0.5871800E+00, 0.6088000E+00, &
     & 0.6026900E+00, 0.6473400E+00, 0.7123700E+00, 0.6781800E+00, &
     & 0.6550900E+00, 0.6577100E+00, 0.5906000E+00, 0.6107300E+00, &
     & 0.5715100E+00, 0.5096068E+00, 0.4497141E+00, 0.4497141E+00 /
      data (ref_adm(20,iz,34,10),iz = 1,20) / &
     & 0.5789000E+00, 0.5789000E+00, 0.5964600E+00, 0.6501100E+00, &
     & 0.6698700E+00, 0.6413000E+00, 0.5653200E+00, 0.5780600E+00, &
     & 0.6217600E+00, 0.6157400E+00, 0.6490700E+00, 0.6451200E+00, &
     & 0.6274773E+00, 0.6914700E+00, 0.6336900E+00, 0.6003300E+00, &
     & 0.5997400E+00, 0.4991100E+00, 0.4038100E+00, 0.4038100E+00 /
      data (ref_adm(20,iz,35,10),iz = 1,20) / &
     & 0.5773200E+00, 0.5773200E+00, 0.6365100E+00, 0.6867500E+00, &
     & 0.6822200E+00, 0.6723900E+00, 0.6469500E+00, 0.6071900E+00, &
     & 0.6062300E+00, 0.5971100E+00, 0.6077000E+00, 0.6347600E+00, &
     & 0.6309400E+00, 0.6888700E+00, 0.6590200E+00, 0.6391600E+00, &
     & 0.5581900E+00, 0.5081800E+00, 0.4557944E+00, 0.4557944E+00 /
      data (ref_adm(20,iz,36,10),iz = 1,20) / &
     & 0.5862700E+00, 0.5862700E+00, 0.6531800E+00, 0.7054800E+00, &
     & 0.5924700E+00, 0.6260500E+00, 0.6288200E+00, 0.6277700E+00, &
     & 0.6431800E+00, 0.6636700E+00, 0.6396100E+00, 0.6349600E+00, &
     & 0.6637300E+00, 0.6842700E+00, 0.6230800E+00, 0.6150400E+00, &
     & 0.5640156E+00, 0.5170239E+00, 0.4576253E+00, 0.4576253E+00 /
      data (ref_adm(20,iz,37,10),iz = 1,20) / &
     & 0.6153400E+00, 0.6153400E+00, 0.6156500E+00, 0.5238500E+00, &
     & 0.5762300E+00, 0.5957000E+00, 0.5845900E+00, 0.6317800E+00, &
     & 0.6689800E+00, 0.6659700E+00, 0.6529300E+00, 0.6105700E+00, &
     & 0.6361700E+00, 0.6193300E+00, 0.6130100E+00, 0.5837600E+00, &
     & 0.5654073E+00, 0.5181091E+00, 0.4587204E+00, 0.4587204E+00 /
      data (ref_adm(20,iz,38,10),iz = 1,20) / &
     & 0.6153400E+00, 0.6153400E+00, 0.6156500E+00, 0.5238500E+00, &
     & 0.5762300E+00, 0.5957000E+00, 0.5845900E+00, 0.6317800E+00, &
     & 0.6689800E+00, 0.6659700E+00, 0.6529300E+00, 0.6105700E+00, &
     & 0.6361700E+00, 0.6193300E+00, 0.6130100E+00, 0.5837600E+00, &
     & 0.5654073E+00, 0.5181091E+00, 0.4587204E+00, 0.4587204E+00 /
! Solar Zenith Angle 50.0 Albedo  0.6253671E+00
      data (ref_adm(20,iz, 1,11),iz = 1,20) / &
     & 0.5593600E+00, 0.5593600E+00, 0.5461900E+00, 0.5536400E+00, &
     & 0.5777500E+00, 0.6049200E+00, 0.6121100E+00, 0.6441300E+00, &
     & 0.6423800E+00, 0.6715000E+00, 0.7214500E+00, 0.7215000E+00, &
     & 0.7549100E+00, 0.7903400E+00, 0.8068300E+00, 0.7951400E+00, &
     & 0.8481700E+00, 0.8544300E+00, 0.6981851E+00, 0.6981851E+00 /
      data (ref_adm(20,iz, 2,11),iz = 1,20) / &
     & 0.5593600E+00, 0.5593600E+00, 0.5461900E+00, 0.5536400E+00, &
     & 0.5777500E+00, 0.6049200E+00, 0.6121100E+00, 0.6441300E+00, &
     & 0.6423800E+00, 0.6715000E+00, 0.7214500E+00, 0.7215000E+00, &
     & 0.7549100E+00, 0.7903400E+00, 0.8068300E+00, 0.7951400E+00, &
     & 0.8481700E+00, 0.8544300E+00, 0.6981851E+00, 0.6981851E+00 /
      data (ref_adm(20,iz, 3,11),iz = 1,20) / &
     & 0.5593700E+00, 0.5593700E+00, 0.5483600E+00, 0.5530700E+00, &
     & 0.5809500E+00, 0.6049800E+00, 0.5976300E+00, 0.6171200E+00, &
     & 0.6380300E+00, 0.6603000E+00, 0.7062600E+00, 0.7120900E+00, &
     & 0.7579300E+00, 0.7846500E+00, 0.7940900E+00, 0.8390500E+00, &
     & 0.8852100E+00, 0.8393600E+00, 0.6904206E+00, 0.6904206E+00 /
      data (ref_adm(20,iz, 4,11),iz = 1,20) / &
     & 0.5517000E+00, 0.5517000E+00, 0.5546100E+00, 0.5567700E+00, &
     & 0.5843600E+00, 0.6022500E+00, 0.5997200E+00, 0.5897100E+00, &
     & 0.6382900E+00, 0.6712900E+00, 0.6792700E+00, 0.6998000E+00, &
     & 0.7520100E+00, 0.7879700E+00, 0.7925200E+00, 0.8140900E+00, &
     & 0.8557800E+00, 0.8277500E+00, 0.6863500E+00, 0.6863500E+00 /
      data (ref_adm(20,iz, 5,11),iz = 1,20) / &
     & 0.5589300E+00, 0.5589300E+00, 0.5537800E+00, 0.5695800E+00, &
     & 0.5717300E+00, 0.5820500E+00, 0.6025400E+00, 0.6035700E+00, &
     & 0.6518800E+00, 0.6545900E+00, 0.6857900E+00, 0.7220300E+00, &
     & 0.7285800E+00, 0.7693900E+00, 0.7753800E+00, 0.8149800E+00, &
     & 0.9002400E+00, 0.8165400E+00, 0.6593676E+00, 0.6593676E+00 /
      data (ref_adm(20,iz, 6,11),iz = 1,20) / &
     & 0.5596100E+00, 0.5596100E+00, 0.5761600E+00, 0.5694200E+00, &
     & 0.5759300E+00, 0.5768000E+00, 0.5866400E+00, 0.6257400E+00, &
     & 0.6271200E+00, 0.6435300E+00, 0.6501200E+00, 0.7073500E+00, &
     & 0.7365700E+00, 0.7586900E+00, 0.7614500E+00, 0.8047000E+00, &
     & 0.7962200E+00, 0.7580800E+00, 0.5991800E+00, 0.5991800E+00 /
      data (ref_adm(20,iz, 7,11),iz = 1,20) / &
     & 0.5846000E+00, 0.5846000E+00, 0.5851000E+00, 0.5811100E+00, &
     & 0.5677200E+00, 0.5716800E+00, 0.5868300E+00, 0.6034000E+00, &
     & 0.6040000E+00, 0.6316100E+00, 0.6596300E+00, 0.6879800E+00, &
     & 0.7082500E+00, 0.7374200E+00, 0.7636300E+00, 0.7629400E+00, &
     & 0.7635900E+00, 0.7598200E+00, 0.6387291E+00, 0.6387291E+00 /
      data (ref_adm(20,iz, 8,11),iz = 1,20) / &
     & 0.5939500E+00, 0.5939500E+00, 0.5892200E+00, 0.5919600E+00, &
     & 0.5912700E+00, 0.5958600E+00, 0.6063200E+00, 0.6157300E+00, &
     & 0.6221300E+00, 0.6407700E+00, 0.6594700E+00, 0.6829300E+00, &
     & 0.7079700E+00, 0.7327200E+00, 0.7526000E+00, 0.7850300E+00, &
     & 0.7641800E+00, 0.7069800E+00, 0.6378100E+00, 0.6378100E+00 /
      data (ref_adm(20,iz, 9,11),iz = 1,20) / &
     & 0.5863700E+00, 0.5863700E+00, 0.5714900E+00, 0.5773300E+00, &
     & 0.5910500E+00, 0.5800200E+00, 0.5846400E+00, 0.5917300E+00, &
     & 0.6216200E+00, 0.6521200E+00, 0.6453100E+00, 0.6689900E+00, &
     & 0.6879700E+00, 0.7218600E+00, 0.7203500E+00, 0.7839000E+00, &
     & 0.7467700E+00, 0.7126147E+00, 0.5897422E+00, 0.5897422E+00 /
      data (ref_adm(20,iz,10,11),iz = 1,20) / &
     & 0.5790400E+00, 0.5790400E+00, 0.5796400E+00, 0.5795500E+00, &
     & 0.5608500E+00, 0.5956500E+00, 0.5764300E+00, 0.5916800E+00, &
     & 0.5997000E+00, 0.6682400E+00, 0.6551000E+00, 0.6774800E+00, &
     & 0.6886000E+00, 0.6878600E+00, 0.6931600E+00, 0.7390200E+00, &
     & 0.7333200E+00, 0.6895741E+00, 0.5691499E+00, 0.5691499E+00 /
      data (ref_adm(20,iz,11,11),iz = 1,20) / &
     & 0.6037500E+00, 0.6037500E+00, 0.5760000E+00, 0.5709600E+00, &
     & 0.5696700E+00, 0.5765500E+00, 0.5513500E+00, 0.5736300E+00, &
     & 0.6125000E+00, 0.6725000E+00, 0.6573200E+00, 0.6695200E+00, &
     & 0.6640000E+00, 0.6661600E+00, 0.6990500E+00, 0.7226300E+00, &
     & 0.7088500E+00, 0.6717479E+00, 0.5521054E+00, 0.5521054E+00 /
      data (ref_adm(20,iz,12,11),iz = 1,20) / &
     & 0.5902300E+00, 0.5902300E+00, 0.5749900E+00, 0.5874600E+00, &
     & 0.5947200E+00, 0.5851900E+00, 0.5549500E+00, 0.5696300E+00, &
     & 0.5968200E+00, 0.6214500E+00, 0.6352200E+00, 0.6557900E+00, &
     & 0.6666200E+00, 0.6670000E+00, 0.6692800E+00, 0.6959000E+00, &
     & 0.6635500E+00, 0.5642100E+00, 0.5386307E+00, 0.5386307E+00 /
      data (ref_adm(20,iz,13,11),iz = 1,20) / &
     & 0.5919200E+00, 0.5919200E+00, 0.5928300E+00, 0.5927100E+00, &
     & 0.5927500E+00, 0.6109700E+00, 0.6016500E+00, 0.5986200E+00, &
     & 0.6252500E+00, 0.6502400E+00, 0.6309300E+00, 0.6369500E+00, &
     & 0.6622500E+00, 0.6405900E+00, 0.6412900E+00, 0.6726900E+00, &
     & 0.6283300E+00, 0.5487200E+00, 0.5267798E+00, 0.5267798E+00 /
      data (ref_adm(20,iz,14,11),iz = 1,20) / &
     & 0.5784900E+00, 0.5784900E+00, 0.5815700E+00, 0.5840700E+00, &
     & 0.5901800E+00, 0.5895700E+00, 0.5931900E+00, 0.5999400E+00, &
     & 0.6086300E+00, 0.6167800E+00, 0.6177700E+00, 0.6336800E+00, &
     & 0.6380200E+00, 0.6495200E+00, 0.6385500E+00, 0.6233000E+00, &
     & 0.6023300E+00, 0.5818500E+00, 0.4398300E+00, 0.4398300E+00 /
      data (ref_adm(20,iz,15,11),iz = 1,20) / &
     & 0.5771800E+00, 0.5771800E+00, 0.5796100E+00, 0.5804000E+00, &
     & 0.5799100E+00, 0.5982600E+00, 0.5818900E+00, 0.5952400E+00, &
     & 0.6010800E+00, 0.6201900E+00, 0.6223900E+00, 0.6259400E+00, &
     & 0.6357100E+00, 0.6245600E+00, 0.6123300E+00, 0.6081400E+00, &
     & 0.6066800E+00, 0.4098900E+00, 0.4565800E+00, 0.4565800E+00 /
      data (ref_adm(20,iz,16,11),iz = 1,20) / &
     & 0.5933100E+00, 0.5933100E+00, 0.6052500E+00, 0.5799300E+00, &
     & 0.5914400E+00, 0.6063100E+00, 0.6028500E+00, 0.6102000E+00, &
     & 0.5769700E+00, 0.5927000E+00, 0.6025400E+00, 0.6279100E+00, &
     & 0.6534800E+00, 0.5742100E+00, 0.5929000E+00, 0.5764900E+00, &
     & 0.6202400E+00, 0.3840300E+00, 0.4950928E+00, 0.4950928E+00 /
      data (ref_adm(20,iz,17,11),iz = 1,20) / &
     & 0.5933500E+00, 0.5933500E+00, 0.5893000E+00, 0.5764300E+00, &
     & 0.5966800E+00, 0.5985500E+00, 0.5890900E+00, 0.5735400E+00, &
     & 0.5937300E+00, 0.5860700E+00, 0.6081600E+00, 0.6063300E+00, &
     & 0.5798400E+00, 0.5804600E+00, 0.5476200E+00, 0.6175900E+00, &
     & 0.5152600E+00, 0.5891957E+00, 0.4851426E+00, 0.4851426E+00 /
      data (ref_adm(20,iz,18,11),iz = 1,20) / &
     & 0.5924300E+00, 0.5924300E+00, 0.6017400E+00, 0.5726200E+00, &
     & 0.5974100E+00, 0.6139500E+00, 0.5903300E+00, 0.5835600E+00, &
     & 0.5716200E+00, 0.6035600E+00, 0.6123100E+00, 0.6005900E+00, &
     & 0.6120600E+00, 0.5794800E+00, 0.5638500E+00, 0.5927300E+00, &
     & 0.5857700E+00, 0.5079603E+00, 0.4156752E+00, 0.4156752E+00 /
      data (ref_adm(20,iz,19,11),iz = 1,20) / &
     & 0.5833800E+00, 0.5833800E+00, 0.5881900E+00, 0.5918800E+00, &
     & 0.6005500E+00, 0.5780300E+00, 0.5904000E+00, 0.5914500E+00, &
     & 0.5804600E+00, 0.5858900E+00, 0.6073000E+00, 0.6061000E+00, &
     & 0.6052300E+00, 0.6046600E+00, 0.5665000E+00, 0.5282200E+00, &
     & 0.5559600E+00, 0.5012615E+00, 0.4115436E+00, 0.4115436E+00 /
      data (ref_adm(20,iz,20,11),iz = 1,20) / &
     & 0.5990900E+00, 0.5990900E+00, 0.6085800E+00, 0.5932800E+00, &
     & 0.5894000E+00, 0.5917500E+00, 0.5777700E+00, 0.5629900E+00, &
     & 0.5903900E+00, 0.6066400E+00, 0.6074200E+00, 0.6052700E+00, &
     & 0.6668200E+00, 0.5815100E+00, 0.5731500E+00, 0.5088700E+00, &
     & 0.5387726E+00, 0.4952767E+00, 0.4091647E+00, 0.4091647E+00 /
      data (ref_adm(20,iz,21,11),iz = 1,20) / &
     & 0.5950100E+00, 0.5950100E+00, 0.5990100E+00, 0.6021400E+00, &
     & 0.6049600E+00, 0.5933900E+00, 0.5897600E+00, 0.5740900E+00, &
     & 0.6208000E+00, 0.6073700E+00, 0.5862300E+00, 0.6101400E+00, &
     & 0.6209700E+00, 0.5868800E+00, 0.5846900E+00, 0.5717700E+00, &
     & 0.5330984E+00, 0.4900937E+00, 0.4077240E+00, 0.4077240E+00 /
      data (ref_adm(20,iz,22,11),iz = 1,20) / &
     & 0.6071700E+00, 0.6071700E+00, 0.6092600E+00, 0.6000700E+00, &
     & 0.6088000E+00, 0.6102500E+00, 0.5981300E+00, 0.5832900E+00, &
     & 0.5968400E+00, 0.6197500E+00, 0.6128000E+00, 0.6340000E+00, &
     & 0.6523000E+00, 0.6174500E+00, 0.5691200E+00, 0.5699700E+00, &
     & 0.5595205E+00, 0.5221367E+00, 0.4465720E+00, 0.4465720E+00 /
      data (ref_adm(20,iz,23,11),iz = 1,20) / &
     & 0.5968900E+00, 0.5968900E+00, 0.5934500E+00, 0.5948300E+00, &
     & 0.5866400E+00, 0.6099800E+00, 0.6104300E+00, 0.6022400E+00, &
     & 0.5975900E+00, 0.6166400E+00, 0.6107600E+00, 0.6182800E+00, &
     & 0.6205800E+00, 0.5843700E+00, 0.5661300E+00, 0.5830600E+00, &
     & 0.5555695E+00, 0.5181744E+00, 0.4477822E+00, 0.4477822E+00 /
      data (ref_adm(20,iz,24,11),iz = 1,20) / &
     & 0.5835000E+00, 0.5835000E+00, 0.5964000E+00, 0.5848500E+00, &
     & 0.5839900E+00, 0.6079500E+00, 0.6223200E+00, 0.6356600E+00, &
     & 0.6092300E+00, 0.6049200E+00, 0.6140900E+00, 0.5904800E+00, &
     & 0.5972300E+00, 0.5737000E+00, 0.5722900E+00, 0.5564800E+00, &
     & 0.5524188E+00, 0.5164416E+00, 0.4505373E+00, 0.4505373E+00 /
      data (ref_adm(20,iz,25,11),iz = 1,20) / &
     & 0.5926900E+00, 0.5926900E+00, 0.5743600E+00, 0.5822900E+00, &
     & 0.6028500E+00, 0.6044800E+00, 0.6458800E+00, 0.6198300E+00, &
     & 0.6373900E+00, 0.5989100E+00, 0.6060700E+00, 0.6249100E+00, &
     & 0.6299600E+00, 0.5850700E+00, 0.5643700E+00, 0.5391100E+00, &
     & 0.5231400E+00, 0.5159379E+00, 0.4547234E+00, 0.4547234E+00 /
      data (ref_adm(20,iz,26,11),iz = 1,20) / &
     & 0.5872600E+00, 0.5872600E+00, 0.5843100E+00, 0.5942600E+00, &
     & 0.6035300E+00, 0.6063000E+00, 0.6034300E+00, 0.6117000E+00, &
     & 0.6253300E+00, 0.6276900E+00, 0.6109600E+00, 0.6211400E+00, &
     & 0.6112900E+00, 0.5932100E+00, 0.5618200E+00, 0.6008800E+00, &
     & 0.5461300E+00, 0.4590000E+00, 0.4603979E+00, 0.4603979E+00 /
      data (ref_adm(20,iz,27,11),iz = 1,20) / &
     & 0.5843400E+00, 0.5843400E+00, 0.5880500E+00, 0.5900900E+00, &
     & 0.6188200E+00, 0.6275800E+00, 0.6247900E+00, 0.6390800E+00, &
     & 0.6422600E+00, 0.6443100E+00, 0.6379500E+00, 0.6327900E+00, &
     & 0.6196000E+00, 0.6023700E+00, 0.6011200E+00, 0.5555300E+00, &
     & 0.5350800E+00, 0.4756600E+00, 0.4360300E+00, 0.4360300E+00 /
      data (ref_adm(20,iz,28,11),iz = 1,20) / &
     & 0.5964100E+00, 0.5964100E+00, 0.6165700E+00, 0.6124800E+00, &
     & 0.5964900E+00, 0.6170700E+00, 0.5987100E+00, 0.6397300E+00, &
     & 0.6556300E+00, 0.6642000E+00, 0.6404500E+00, 0.6555900E+00, &
     & 0.6464000E+00, 0.6306700E+00, 0.6091100E+00, 0.5499000E+00, &
     & 0.5298400E+00, 0.5094600E+00, 0.4458600E+00, 0.4458600E+00 /
      data (ref_adm(20,iz,29,11),iz = 1,20) / &
     & 0.5971600E+00, 0.5971600E+00, 0.6122100E+00, 0.6300100E+00, &
     & 0.6340200E+00, 0.6220800E+00, 0.6015200E+00, 0.6243200E+00, &
     & 0.6369900E+00, 0.6456600E+00, 0.6411300E+00, 0.6352200E+00, &
     & 0.6388300E+00, 0.6360700E+00, 0.6051900E+00, 0.5822900E+00, &
     & 0.5602000E+00, 0.4950000E+00, 0.4107500E+00, 0.4107500E+00 /
      data (ref_adm(20,iz,30,11),iz = 1,20) / &
     & 0.5819500E+00, 0.5819500E+00, 0.5987200E+00, 0.6106700E+00, &
     & 0.6610600E+00, 0.6443800E+00, 0.6204900E+00, 0.6411900E+00, &
     & 0.6303000E+00, 0.6395800E+00, 0.6310400E+00, 0.6284100E+00, &
     & 0.6251800E+00, 0.6203400E+00, 0.6131200E+00, 0.5969700E+00, &
     & 0.5606300E+00, 0.5134900E+00, 0.3942600E+00, 0.3942600E+00 /
      data (ref_adm(20,iz,31,11),iz = 1,20) / &
     & 0.5921500E+00, 0.5921500E+00, 0.5953500E+00, 0.6199100E+00, &
     & 0.6186800E+00, 0.6258000E+00, 0.6378700E+00, 0.6451100E+00, &
     & 0.6502500E+00, 0.6560100E+00, 0.6577800E+00, 0.6572400E+00, &
     & 0.6562900E+00, 0.6477300E+00, 0.6424500E+00, 0.6192600E+00, &
     & 0.5849600E+00, 0.4964600E+00, 0.4077800E+00, 0.4077800E+00 /
      data (ref_adm(20,iz,32,11),iz = 1,20) / &
     & 0.5948100E+00, 0.5948100E+00, 0.6058600E+00, 0.6078700E+00, &
     & 0.6193700E+00, 0.6203300E+00, 0.6284700E+00, 0.6384300E+00, &
     & 0.6434700E+00, 0.6481400E+00, 0.6514000E+00, 0.6567700E+00, &
     & 0.6506500E+00, 0.6425200E+00, 0.6321900E+00, 0.6216800E+00, &
     & 0.5986600E+00, 0.5155600E+00, 0.4105300E+00, 0.4105300E+00 /
      data (ref_adm(20,iz,33,11),iz = 1,20) / &
     & 0.5747700E+00, 0.5747700E+00, 0.5683400E+00, 0.5776100E+00, &
     & 0.6030800E+00, 0.5830800E+00, 0.6080700E+00, 0.5888300E+00, &
     & 0.5948900E+00, 0.5884600E+00, 0.6321400E+00, 0.6297300E+00, &
     & 0.6480600E+00, 0.6452600E+00, 0.6351700E+00, 0.6122400E+00, &
     & 0.5858100E+00, 0.5579400E+00, 0.4289300E+00, 0.4289300E+00 /
      data (ref_adm(20,iz,34,11),iz = 1,20) / &
     & 0.5746200E+00, 0.5746200E+00, 0.5561000E+00, 0.6078000E+00, &
     & 0.6137000E+00, 0.6243500E+00, 0.5837600E+00, 0.5745100E+00, &
     & 0.5893900E+00, 0.5932800E+00, 0.6642800E+00, 0.6368200E+00, &
     & 0.6269400E+00, 0.6516200E+00, 0.6346800E+00, 0.6099600E+00, &
     & 0.5904200E+00, 0.5527800E+00, 0.5334491E+00, 0.5334491E+00 /
      data (ref_adm(20,iz,35,11),iz = 1,20) / &
     & 0.5719800E+00, 0.5719800E+00, 0.5806500E+00, 0.5948500E+00, &
     & 0.5402900E+00, 0.6044900E+00, 0.6106500E+00, 0.6376800E+00, &
     & 0.6426300E+00, 0.6378400E+00, 0.6333900E+00, 0.6568700E+00, &
     & 0.6492300E+00, 0.6570100E+00, 0.6275300E+00, 0.5919200E+00, &
     & 0.5704200E+00, 0.5048400E+00, 0.5384192E+00, 0.5384192E+00 /
      data (ref_adm(20,iz,36,11),iz = 1,20) / &
     & 0.5854000E+00, 0.5854000E+00, 0.5761300E+00, 0.5730100E+00, &
     & 0.5788900E+00, 0.5729600E+00, 0.6362200E+00, 0.6313700E+00, &
     & 0.6535000E+00, 0.6401200E+00, 0.6372400E+00, 0.6852900E+00, &
     & 0.6659800E+00, 0.6593800E+00, 0.6402400E+00, 0.6167500E+00, &
     & 0.5881900E+00, 0.5092000E+00, 0.5413883E+00, 0.5413883E+00 /
      data (ref_adm(20,iz,37,11),iz = 1,20) / &
     & 0.5778300E+00, 0.5778300E+00, 0.5836600E+00, 0.5796600E+00, &
     & 0.5891600E+00, 0.6066700E+00, 0.6371200E+00, 0.6364700E+00, &
     & 0.6531300E+00, 0.6504000E+00, 0.6642900E+00, 0.6897600E+00, &
     & 0.6982700E+00, 0.6780300E+00, 0.6439200E+00, 0.6374100E+00, &
     & 0.6179578E+00, 0.5896242E+00, 0.5430608E+00, 0.5430608E+00 /
      data (ref_adm(20,iz,38,11),iz = 1,20) / &
     & 0.5778300E+00, 0.5778300E+00, 0.5836600E+00, 0.5796600E+00, &
     & 0.5891600E+00, 0.6066700E+00, 0.6371200E+00, 0.6364700E+00, &
     & 0.6531300E+00, 0.6504000E+00, 0.6642900E+00, 0.6897600E+00, &
     & 0.6982700E+00, 0.6780300E+00, 0.6439200E+00, 0.6374100E+00, &
     & 0.6179578E+00, 0.5896242E+00, 0.5430608E+00, 0.5430608E+00 /
! Solar Zenith Angle 55.0 Albedo  0.6214459E+00
      data (ref_adm(20,iz, 1,12),iz = 1,20) / &
     & 0.5368400E+00, 0.5368400E+00, 0.5251100E+00, 0.5161000E+00, &
     & 0.5481700E+00, 0.5662200E+00, 0.5892500E+00, 0.6193500E+00, &
     & 0.6423000E+00, 0.6560500E+00, 0.7055700E+00, 0.7747300E+00, &
     & 0.8356100E+00, 0.8971400E+00, 0.9110900E+00, 0.9642200E+00, &
     & 0.9969900E+00, 0.1012500E+01, 0.9972200E+00, 0.9972200E+00 /
      data (ref_adm(20,iz, 2,12),iz = 1,20) / &
     & 0.5368400E+00, 0.5368400E+00, 0.5251100E+00, 0.5161000E+00, &
     & 0.5481700E+00, 0.5662200E+00, 0.5892500E+00, 0.6193500E+00, &
     & 0.6423000E+00, 0.6560500E+00, 0.7055700E+00, 0.7747300E+00, &
     & 0.8356100E+00, 0.8971400E+00, 0.9110900E+00, 0.9642200E+00, &
     & 0.9969900E+00, 0.1012500E+01, 0.9972200E+00, 0.9972200E+00 /
      data (ref_adm(20,iz, 3,12),iz = 1,20) / &
     & 0.5445500E+00, 0.5445500E+00, 0.5400100E+00, 0.5231700E+00, &
     & 0.5531400E+00, 0.5834300E+00, 0.6137000E+00, 0.6125400E+00, &
     & 0.6582800E+00, 0.6758100E+00, 0.7046100E+00, 0.7536400E+00, &
     & 0.8323900E+00, 0.8501300E+00, 0.9193900E+00, 0.9854000E+00, &
     & 0.9943800E+00, 0.1049100E+01, 0.8286500E+00, 0.8286500E+00 /
      data (ref_adm(20,iz, 4,12),iz = 1,20) / &
     & 0.5277900E+00, 0.5277900E+00, 0.5707500E+00, 0.5503900E+00, &
     & 0.5540700E+00, 0.5945100E+00, 0.5955800E+00, 0.6102500E+00, &
     & 0.6409900E+00, 0.6639200E+00, 0.6829500E+00, 0.7365600E+00, &
     & 0.7973400E+00, 0.8365400E+00, 0.9240800E+00, 0.9521600E+00, &
     & 0.9941700E+00, 0.9517000E+00, 0.8504435E+00, 0.8504435E+00 /
      data (ref_adm(20,iz, 5,12),iz = 1,20) / &
     & 0.5110100E+00, 0.5110100E+00, 0.5320100E+00, 0.5642000E+00, &
     & 0.5811900E+00, 0.5747100E+00, 0.5915700E+00, 0.6048400E+00, &
     & 0.6330600E+00, 0.6748500E+00, 0.7048500E+00, 0.7313200E+00, &
     & 0.7722700E+00, 0.8452100E+00, 0.8912900E+00, 0.9209000E+00, &
     & 0.9462100E+00, 0.9282900E+00, 0.8006735E+00, 0.8006735E+00 /
      data (ref_adm(20,iz, 6,12),iz = 1,20) / &
     & 0.5535700E+00, 0.5535700E+00, 0.5469400E+00, 0.5645400E+00, &
     & 0.5607700E+00, 0.5532000E+00, 0.5617800E+00, 0.5563400E+00, &
     & 0.5856700E+00, 0.6248500E+00, 0.6674900E+00, 0.7018200E+00, &
     & 0.7401800E+00, 0.8003100E+00, 0.8256100E+00, 0.8590500E+00, &
     & 0.8916200E+00, 0.8930900E+00, 0.7550180E+00, 0.7550180E+00 /
      data (ref_adm(20,iz, 7,12),iz = 1,20) / &
     & 0.5557600E+00, 0.5557600E+00, 0.5698300E+00, 0.5588600E+00, &
     & 0.5595800E+00, 0.5607100E+00, 0.5679000E+00, 0.5753800E+00, &
     & 0.6147700E+00, 0.6319300E+00, 0.6670100E+00, 0.6905700E+00, &
     & 0.7168500E+00, 0.7794700E+00, 0.8035400E+00, 0.8658100E+00, &
     & 0.8540800E+00, 0.8917397E+00, 0.7204338E+00, 0.7204338E+00 /
      data (ref_adm(20,iz, 8,12),iz = 1,20) / &
     & 0.5737600E+00, 0.5737600E+00, 0.5728900E+00, 0.5678900E+00, &
     & 0.5787000E+00, 0.5841700E+00, 0.5864200E+00, 0.5943400E+00, &
     & 0.6097800E+00, 0.6316200E+00, 0.6564800E+00, 0.6957700E+00, &
     & 0.7247000E+00, 0.7581300E+00, 0.7905600E+00, 0.8154700E+00, &
     & 0.8096400E+00, 0.8502560E+00, 0.7037189E+00, 0.7037189E+00 /
      data (ref_adm(20,iz, 9,12),iz = 1,20) / &
     & 0.5710600E+00, 0.5710600E+00, 0.5761000E+00, 0.5741000E+00, &
     & 0.5797000E+00, 0.5915500E+00, 0.5846800E+00, 0.6059000E+00, &
     & 0.6285500E+00, 0.6160700E+00, 0.6465400E+00, 0.6792600E+00, &
     & 0.6989100E+00, 0.7582200E+00, 0.7651200E+00, 0.7693600E+00, &
     & 0.7800100E+00, 0.7520700E+00, 0.6750054E+00, 0.6750054E+00 /
      data (ref_adm(20,iz,10,12),iz = 1,20) / &
     & 0.5528400E+00, 0.5528400E+00, 0.5724200E+00, 0.5857700E+00, &
     & 0.5496300E+00, 0.5701000E+00, 0.5748400E+00, 0.5951500E+00, &
     & 0.5844800E+00, 0.6144100E+00, 0.6431200E+00, 0.6467200E+00, &
     & 0.6984200E+00, 0.7178900E+00, 0.7402500E+00, 0.7557800E+00, &
     & 0.7935200E+00, 0.6526100E+00, 0.6394796E+00, 0.6394796E+00 /
      data (ref_adm(20,iz,11,12),iz = 1,20) / &
     & 0.5641700E+00, 0.5641700E+00, 0.5691400E+00, 0.5776200E+00, &
     & 0.5839200E+00, 0.5654200E+00, 0.5968000E+00, 0.5826400E+00, &
     & 0.6011800E+00, 0.6180700E+00, 0.6343700E+00, 0.6499800E+00, &
     & 0.6783300E+00, 0.7065900E+00, 0.7239300E+00, 0.7313300E+00, &
     & 0.7088900E+00, 0.6877400E+00, 0.6124551E+00, 0.6124551E+00 /
      data (ref_adm(20,iz,12,12),iz = 1,20) / &
     & 0.5806900E+00, 0.5806900E+00, 0.5706200E+00, 0.5530000E+00, &
     & 0.5859700E+00, 0.5798900E+00, 0.5860900E+00, 0.5924700E+00, &
     & 0.5920900E+00, 0.6230400E+00, 0.6311900E+00, 0.6489900E+00, &
     & 0.6629700E+00, 0.6926900E+00, 0.6829400E+00, 0.7061000E+00, &
     & 0.7206900E+00, 0.6388400E+00, 0.5918217E+00, 0.5918217E+00 /
      data (ref_adm(20,iz,13,12),iz = 1,20) / &
     & 0.5690200E+00, 0.5690200E+00, 0.5710300E+00, 0.5841000E+00, &
     & 0.5868100E+00, 0.5937500E+00, 0.5782800E+00, 0.5781800E+00, &
     & 0.5916700E+00, 0.6186000E+00, 0.6104100E+00, 0.6429600E+00, &
     & 0.6611600E+00, 0.6826900E+00, 0.6748300E+00, 0.6828800E+00, &
     & 0.6698200E+00, 0.5975200E+00, 0.5747787E+00, 0.5747787E+00 /
      data (ref_adm(20,iz,14,12),iz = 1,20) / &
     & 0.5661200E+00, 0.5661200E+00, 0.5634800E+00, 0.5680500E+00, &
     & 0.5703200E+00, 0.5772100E+00, 0.5869900E+00, 0.5898900E+00, &
     & 0.5939400E+00, 0.6078600E+00, 0.6210900E+00, 0.6262200E+00, &
     & 0.6409000E+00, 0.6470100E+00, 0.6365600E+00, 0.6692900E+00, &
     & 0.6388700E+00, 0.5652500E+00, 0.5607058E+00, 0.5607058E+00 /
      data (ref_adm(20,iz,15,12),iz = 1,20) / &
     & 0.5473400E+00, 0.5473400E+00, 0.5270500E+00, 0.5242000E+00, &
     & 0.5343900E+00, 0.5394100E+00, 0.5651400E+00, 0.5541700E+00, &
     & 0.5841600E+00, 0.6110900E+00, 0.6177000E+00, 0.6246600E+00, &
     & 0.6443900E+00, 0.6445300E+00, 0.6182400E+00, 0.6456200E+00, &
     & 0.6215500E+00, 0.5567500E+00, 0.5478765E+00, 0.5478765E+00 /
      data (ref_adm(20,iz,16,12),iz = 1,20) / &
     & 0.5360700E+00, 0.5360700E+00, 0.5452900E+00, 0.5387300E+00, &
     & 0.5279300E+00, 0.5771300E+00, 0.5876500E+00, 0.5654500E+00, &
     & 0.6120700E+00, 0.5724700E+00, 0.6055800E+00, 0.5986600E+00, &
     & 0.6687000E+00, 0.6080700E+00, 0.6167400E+00, 0.6252300E+00, &
     & 0.5881500E+00, 0.5372200E+00, 0.5342903E+00, 0.5342903E+00 /
      data (ref_adm(20,iz,17,12),iz = 1,20) / &
     & 0.5663400E+00, 0.5663400E+00, 0.5733300E+00, 0.5719200E+00, &
     & 0.5746400E+00, 0.5919200E+00, 0.5690000E+00, 0.5892400E+00, &
     & 0.5739500E+00, 0.6571400E+00, 0.5286100E+00, 0.6136100E+00, &
     & 0.6141500E+00, 0.5790300E+00, 0.6111400E+00, 0.5995900E+00, &
     & 0.6005500E+00, 0.6034712E+00, 0.5214713E+00, 0.5214713E+00 /
      data (ref_adm(20,iz,18,12),iz = 1,20) / &
     & 0.5623700E+00, 0.5623700E+00, 0.5643800E+00, 0.5777300E+00, &
     & 0.5789200E+00, 0.5866100E+00, 0.5815200E+00, 0.5880000E+00, &
     & 0.5880500E+00, 0.5861500E+00, 0.5585500E+00, 0.6038200E+00, &
     & 0.6062500E+00, 0.5982700E+00, 0.6114600E+00, 0.6087100E+00, &
     & 0.5416500E+00, 0.5468864E+00, 0.4530557E+00, 0.4530557E+00 /
      data (ref_adm(20,iz,19,12),iz = 1,20) / &
     & 0.5703200E+00, 0.5703200E+00, 0.5772100E+00, 0.5717700E+00, &
     & 0.5625700E+00, 0.5551500E+00, 0.5901300E+00, 0.5797100E+00, &
     & 0.5481100E+00, 0.5701700E+00, 0.5805200E+00, 0.5837200E+00, &
     & 0.5756100E+00, 0.6047100E+00, 0.5909100E+00, 0.5757400E+00, &
     & 0.6112100E+00, 0.5376326E+00, 0.4474038E+00, 0.4474038E+00 /
      data (ref_adm(20,iz,20,12),iz = 1,20) / &
     & 0.5699300E+00, 0.5699300E+00, 0.5560800E+00, 0.5532400E+00, &
     & 0.5462900E+00, 0.5476100E+00, 0.5676600E+00, 0.5709400E+00, &
     & 0.5819700E+00, 0.5747800E+00, 0.6007200E+00, 0.5795600E+00, &
     & 0.5631700E+00, 0.6023100E+00, 0.6059000E+00, 0.5743400E+00, &
     & 0.5670545E+00, 0.5300841E+00, 0.4441478E+00, 0.4441478E+00 /
      data (ref_adm(20,iz,21,12),iz = 1,20) / &
     & 0.5711300E+00, 0.5711300E+00, 0.5690100E+00, 0.5697300E+00, &
     & 0.5532000E+00, 0.5570400E+00, 0.5738600E+00, 0.5958600E+00, &
     & 0.5826900E+00, 0.5543900E+00, 0.5966300E+00, 0.5529500E+00, &
     & 0.5628100E+00, 0.5766200E+00, 0.5697400E+00, 0.6586400E+00, &
     & 0.5596987E+00, 0.5232549E+00, 0.4423469E+00, 0.4423469E+00 /
      data (ref_adm(20,iz,22,12),iz = 1,20) / &
     & 0.5686100E+00, 0.5686100E+00, 0.5649000E+00, 0.5469400E+00, &
     & 0.5783600E+00, 0.5768200E+00, 0.5758000E+00, 0.6232100E+00, &
     & 0.5843500E+00, 0.5663800E+00, 0.5765900E+00, 0.6006400E+00, &
     & 0.5580900E+00, 0.5762600E+00, 0.5618500E+00, 0.6040300E+00, &
     & 0.5688986E+00, 0.5312471E+00, 0.4443380E+00, 0.4443380E+00 /
      data (ref_adm(20,iz,23,12),iz = 1,20) / &
     & 0.5661200E+00, 0.5661200E+00, 0.5557700E+00, 0.5566700E+00, &
     & 0.5733300E+00, 0.5776500E+00, 0.5789300E+00, 0.5805300E+00, &
     & 0.5668700E+00, 0.5844200E+00, 0.5869400E+00, 0.5769000E+00, &
     & 0.5920700E+00, 0.5861500E+00, 0.5862700E+00, 0.5479900E+00, &
     & 0.5627484E+00, 0.5249543E+00, 0.4439249E+00, 0.4439249E+00 /
      data (ref_adm(20,iz,24,12),iz = 1,20) / &
     & 0.5680200E+00, 0.5680200E+00, 0.5543500E+00, 0.5435500E+00, &
     & 0.5691500E+00, 0.5512100E+00, 0.5876400E+00, 0.5672700E+00, &
     & 0.5825800E+00, 0.5796200E+00, 0.5804000E+00, 0.5543500E+00, &
     & 0.5757000E+00, 0.5892200E+00, 0.5755800E+00, 0.5520000E+00, &
     & 0.5316600E+00, 0.5206586E+00, 0.4446119E+00, 0.4446119E+00 /
      data (ref_adm(20,iz,25,12),iz = 1,20) / &
     & 0.5545500E+00, 0.5545500E+00, 0.5596600E+00, 0.5505400E+00, &
     & 0.5609700E+00, 0.5617900E+00, 0.5869600E+00, 0.5880700E+00, &
     & 0.6040300E+00, 0.6099600E+00, 0.5784200E+00, 0.5970500E+00, &
     & 0.5865200E+00, 0.5952400E+00, 0.5668500E+00, 0.5710000E+00, &
     & 0.5608100E+00, 0.5647500E+00, 0.4466375E+00, 0.4466375E+00 /
      data (ref_adm(20,iz,26,12),iz = 1,20) / &
     & 0.5659500E+00, 0.5659500E+00, 0.5696300E+00, 0.5719700E+00, &
     & 0.5704500E+00, 0.5724300E+00, 0.5778700E+00, 0.5915700E+00, &
     & 0.6057500E+00, 0.6065600E+00, 0.6144700E+00, 0.6201600E+00, &
     & 0.6184700E+00, 0.5908300E+00, 0.5992600E+00, 0.6031000E+00, &
     & 0.5841100E+00, 0.5060200E+00, 0.4496584E+00, 0.4496584E+00 /
      data (ref_adm(20,iz,27,12),iz = 1,20) / &
     & 0.5646200E+00, 0.5646200E+00, 0.5751300E+00, 0.5717400E+00, &
     & 0.5965400E+00, 0.6016700E+00, 0.6062200E+00, 0.6079600E+00, &
     & 0.6105400E+00, 0.6167300E+00, 0.6158100E+00, 0.6266900E+00, &
     & 0.6238400E+00, 0.6171800E+00, 0.6055600E+00, 0.5859100E+00, &
     & 0.5923200E+00, 0.4939700E+00, 0.4228200E+00, 0.4228200E+00 /
      data (ref_adm(20,iz,28,12),iz = 1,20) / &
     & 0.5644700E+00, 0.5644700E+00, 0.5688400E+00, 0.5772400E+00, &
     & 0.5693700E+00, 0.5889700E+00, 0.5853000E+00, 0.5662200E+00, &
     & 0.5707200E+00, 0.5916400E+00, 0.5882500E+00, 0.6113500E+00, &
     & 0.6506700E+00, 0.6448500E+00, 0.6417900E+00, 0.6096500E+00, &
     & 0.5917000E+00, 0.4581700E+00, 0.4877000E+00, 0.4877000E+00 /
      data (ref_adm(20,iz,29,12),iz = 1,20) / &
     & 0.5657500E+00, 0.5657500E+00, 0.5479900E+00, 0.5688300E+00, &
     & 0.5767000E+00, 0.5764200E+00, 0.6162100E+00, 0.5986800E+00, &
     & 0.5812500E+00, 0.6128700E+00, 0.6266800E+00, 0.5963700E+00, &
     & 0.6391800E+00, 0.6355200E+00, 0.6440400E+00, 0.6188200E+00, &
     & 0.5826400E+00, 0.6262100E+00, 0.4312800E+00, 0.4312800E+00 /
      data (ref_adm(20,iz,30,12),iz = 1,20) / &
     & 0.5504300E+00, 0.5504300E+00, 0.5561200E+00, 0.5693800E+00, &
     & 0.5855800E+00, 0.5770100E+00, 0.5913700E+00, 0.5654800E+00, &
     & 0.6091300E+00, 0.6087200E+00, 0.6425400E+00, 0.6399400E+00, &
     & 0.6312600E+00, 0.6278400E+00, 0.6243300E+00, 0.6264600E+00, &
     & 0.6172100E+00, 0.5615300E+00, 0.4393800E+00, 0.4393800E+00 /
      data (ref_adm(20,iz,31,12),iz = 1,20) / &
     & 0.5651700E+00, 0.5651700E+00, 0.5697300E+00, 0.5890100E+00, &
     & 0.6041200E+00, 0.6102200E+00, 0.6079000E+00, 0.6169100E+00, &
     & 0.6304900E+00, 0.6378800E+00, 0.6404200E+00, 0.6418300E+00, &
     & 0.6366700E+00, 0.6262000E+00, 0.6197700E+00, 0.6266100E+00, &
     & 0.6097000E+00, 0.5538700E+00, 0.4331600E+00, 0.4331600E+00 /
      data (ref_adm(20,iz,32,12),iz = 1,20) / &
     & 0.5621100E+00, 0.5621100E+00, 0.5678000E+00, 0.5486200E+00, &
     & 0.5675800E+00, 0.5868800E+00, 0.6033700E+00, 0.6164500E+00, &
     & 0.6137300E+00, 0.6221700E+00, 0.6169400E+00, 0.6273000E+00, &
     & 0.6361300E+00, 0.6393300E+00, 0.6383600E+00, 0.6557400E+00, &
     & 0.5916500E+00, 0.5703400E+00, 0.4638000E+00, 0.4638000E+00 /
      data (ref_adm(20,iz,33,12),iz = 1,20) / &
     & 0.5505400E+00, 0.5505400E+00, 0.5428900E+00, 0.5568500E+00, &
     & 0.5723300E+00, 0.5932900E+00, 0.5767800E+00, 0.5910300E+00, &
     & 0.5983500E+00, 0.5784600E+00, 0.5893400E+00, 0.6028700E+00, &
     & 0.6035800E+00, 0.6189900E+00, 0.6386000E+00, 0.6379100E+00, &
     & 0.6059100E+00, 0.5787600E+00, 0.5034400E+00, 0.5034400E+00 /
      data (ref_adm(20,iz,34,12),iz = 1,20) / &
     & 0.5668900E+00, 0.5668900E+00, 0.5733100E+00, 0.5793700E+00, &
     & 0.6016200E+00, 0.6075400E+00, 0.6191500E+00, 0.6101900E+00, &
     & 0.5942800E+00, 0.5849600E+00, 0.6041900E+00, 0.6232600E+00, &
     & 0.6398700E+00, 0.6510700E+00, 0.6641800E+00, 0.6312700E+00, &
     & 0.5962400E+00, 0.5722000E+00, 0.4960300E+00, 0.4960300E+00 /
      data (ref_adm(20,iz,35,12),iz = 1,20) / &
     & 0.5463800E+00, 0.5463800E+00, 0.5618900E+00, 0.5893200E+00, &
     & 0.5940400E+00, 0.5967900E+00, 0.6001700E+00, 0.6018700E+00, &
     & 0.6038500E+00, 0.6186600E+00, 0.6303800E+00, 0.6098000E+00, &
     & 0.6429500E+00, 0.6124600E+00, 0.6583000E+00, 0.6490400E+00, &
     & 0.6077300E+00, 0.5718000E+00, 0.4543800E+00, 0.4543800E+00 /
      data (ref_adm(20,iz,36,12),iz = 1,20) / &
     & 0.5572300E+00, 0.5572300E+00, 0.5811500E+00, 0.5829100E+00, &
     & 0.6048600E+00, 0.6014000E+00, 0.6037700E+00, 0.6103800E+00, &
     & 0.6031700E+00, 0.6234200E+00, 0.6320500E+00, 0.6468400E+00, &
     & 0.6234000E+00, 0.6453600E+00, 0.6715800E+00, 0.6497500E+00, &
     & 0.6215900E+00, 0.5790500E+00, 0.4275200E+00, 0.4275200E+00 /
      data (ref_adm(20,iz,37,12),iz = 1,20) / &
     & 0.5727300E+00, 0.5727300E+00, 0.5970800E+00, 0.5882900E+00, &
     & 0.5889200E+00, 0.6042200E+00, 0.6003500E+00, 0.6050000E+00, &
     & 0.6072000E+00, 0.6124300E+00, 0.6328300E+00, 0.6495600E+00, &
     & 0.6525800E+00, 0.6627100E+00, 0.6594000E+00, 0.6464100E+00, &
     & 0.6433800E+00, 0.5601466E+00, 0.5092915E+00, 0.5092915E+00 /
      data (ref_adm(20,iz,38,12),iz = 1,20) / &
     & 0.5727300E+00, 0.5727300E+00, 0.5970800E+00, 0.5882900E+00, &
     & 0.5889200E+00, 0.6042200E+00, 0.6003500E+00, 0.6050000E+00, &
     & 0.6072000E+00, 0.6124300E+00, 0.6328300E+00, 0.6495600E+00, &
     & 0.6525800E+00, 0.6627100E+00, 0.6594000E+00, 0.6464100E+00, &
     & 0.6433800E+00, 0.5601466E+00, 0.5092915E+00, 0.5092915E+00 /
! Solar Zenith Angle 60.0 Albedo  0.6319356E+00
      data (ref_adm(20,iz, 1,13),iz = 1,20) / &
     & 0.5504900E+00, 0.5504900E+00, 0.5605300E+00, 0.5635200E+00, &
     & 0.5724400E+00, 0.5896100E+00, 0.5891100E+00, 0.6127500E+00, &
     & 0.6511000E+00, 0.6852100E+00, 0.7405200E+00, 0.8090500E+00, &
     & 0.8707700E+00, 0.9783000E+00, 0.1035200E+01, 0.1128600E+01, &
     & 0.1235500E+01, 0.1275900E+01, 0.1160505E+01, 0.1160505E+01 /
      data (ref_adm(20,iz, 2,13),iz = 1,20) / &
     & 0.5504900E+00, 0.5504900E+00, 0.5605300E+00, 0.5635200E+00, &
     & 0.5724400E+00, 0.5896100E+00, 0.5891100E+00, 0.6127500E+00, &
     & 0.6511000E+00, 0.6852100E+00, 0.7405200E+00, 0.8090500E+00, &
     & 0.8707700E+00, 0.9783000E+00, 0.1035200E+01, 0.1128600E+01, &
     & 0.1235500E+01, 0.1275900E+01, 0.1160505E+01, 0.1160505E+01 /
      data (ref_adm(20,iz, 3,13),iz = 1,20) / &
     & 0.5473700E+00, 0.5473700E+00, 0.5526400E+00, 0.5584400E+00, &
     & 0.5676200E+00, 0.5800200E+00, 0.6026000E+00, 0.6201200E+00, &
     & 0.6621000E+00, 0.6825500E+00, 0.7326600E+00, 0.7978400E+00, &
     & 0.8359000E+00, 0.9318700E+00, 0.1039800E+01, 0.1113400E+01, &
     & 0.1220300E+01, 0.1302500E+01, 0.1062300E+01, 0.1062300E+01 /
      data (ref_adm(20,iz, 4,13),iz = 1,20) / &
     & 0.5518200E+00, 0.5518200E+00, 0.5398000E+00, 0.5525700E+00, &
     & 0.5638500E+00, 0.5882600E+00, 0.6062300E+00, 0.6225300E+00, &
     & 0.6533700E+00, 0.6816800E+00, 0.7310100E+00, 0.7779400E+00, &
     & 0.8440000E+00, 0.9231900E+00, 0.1019400E+01, 0.1113600E+01, &
     & 0.1181200E+01, 0.1217800E+01, 0.1064100E+01, 0.1064100E+01 /
      data (ref_adm(20,iz, 5,13),iz = 1,20) / &
     & 0.5464600E+00, 0.5464600E+00, 0.5369700E+00, 0.5407000E+00, &
     & 0.5742600E+00, 0.5833500E+00, 0.5977600E+00, 0.6218500E+00, &
     & 0.6524000E+00, 0.6731100E+00, 0.7066500E+00, 0.7606800E+00, &
     & 0.8222500E+00, 0.9017300E+00, 0.9973200E+00, 0.1020100E+01, &
     & 0.1123300E+01, 0.1095600E+01, 0.9516600E+00, 0.9516600E+00 /
      data (ref_adm(20,iz, 6,13),iz = 1,20) / &
     & 0.5420700E+00, 0.5420700E+00, 0.5544900E+00, 0.5541600E+00, &
     & 0.5550800E+00, 0.5583700E+00, 0.5827300E+00, 0.6088700E+00, &
     & 0.6337900E+00, 0.6686500E+00, 0.6974400E+00, 0.7356600E+00, &
     & 0.7914500E+00, 0.8598100E+00, 0.9562200E+00, 0.1002500E+01, &
     & 0.1046800E+01, 0.1044600E+01, 0.8906000E+00, 0.8906000E+00 /
      data (ref_adm(20,iz, 7,13),iz = 1,20) / &
     & 0.5491900E+00, 0.5491900E+00, 0.5532800E+00, 0.5566200E+00, &
     & 0.5565700E+00, 0.5594800E+00, 0.5776400E+00, 0.5989300E+00, &
     & 0.6203400E+00, 0.6602100E+00, 0.6962900E+00, 0.7342400E+00, &
     & 0.7937000E+00, 0.8583700E+00, 0.9300900E+00, 0.9904900E+00, &
     & 0.1029600E+01, 0.1028500E+01, 0.9624400E+00, 0.9624400E+00 /
      data (ref_adm(20,iz, 8,13),iz = 1,20) / &
     & 0.5595500E+00, 0.5595500E+00, 0.5590800E+00, 0.5584100E+00, &
     & 0.5755500E+00, 0.5643700E+00, 0.5926700E+00, 0.6091000E+00, &
     & 0.6259200E+00, 0.6547000E+00, 0.6909900E+00, 0.7254800E+00, &
     & 0.7728600E+00, 0.8389700E+00, 0.8709900E+00, 0.9139700E+00, &
     & 0.9785900E+00, 0.9408600E+00, 0.7453400E+00, 0.7453400E+00 /
      data (ref_adm(20,iz, 9,13),iz = 1,20) / &
     & 0.5601900E+00, 0.5601900E+00, 0.5601800E+00, 0.5674200E+00, &
     & 0.5707900E+00, 0.5821000E+00, 0.5792400E+00, 0.6066700E+00, &
     & 0.6337200E+00, 0.6526900E+00, 0.6690100E+00, 0.7194300E+00, &
     & 0.7509000E+00, 0.8032000E+00, 0.8427800E+00, 0.8550600E+00, &
     & 0.9078800E+00, 0.8786500E+00, 0.7355200E+00, 0.7355200E+00 /
      data (ref_adm(20,iz,10,13),iz = 1,20) / &
     & 0.5451100E+00, 0.5451100E+00, 0.5528200E+00, 0.5666400E+00, &
     & 0.5762900E+00, 0.5784500E+00, 0.6003000E+00, 0.5963300E+00, &
     & 0.6161900E+00, 0.6501700E+00, 0.6592100E+00, 0.7049000E+00, &
     & 0.7150300E+00, 0.7687700E+00, 0.7836000E+00, 0.8307500E+00, &
     & 0.8463100E+00, 0.8082900E+00, 0.6598000E+00, 0.6598000E+00 /
      data (ref_adm(20,iz,11,13),iz = 1,20) / &
     & 0.5437500E+00, 0.5437500E+00, 0.5406400E+00, 0.5373100E+00, &
     & 0.5659500E+00, 0.5845800E+00, 0.5990100E+00, 0.5922900E+00, &
     & 0.6173300E+00, 0.6184000E+00, 0.6347400E+00, 0.6787600E+00, &
     & 0.7134400E+00, 0.7573400E+00, 0.7515000E+00, 0.8003500E+00, &
     & 0.7843000E+00, 0.7703300E+00, 0.6216600E+00, 0.6216600E+00 /
      data (ref_adm(20,iz,12,13),iz = 1,20) / &
     & 0.5400900E+00, 0.5400900E+00, 0.5437600E+00, 0.5385700E+00, &
     & 0.5416400E+00, 0.5681100E+00, 0.5693100E+00, 0.5744800E+00, &
     & 0.6034600E+00, 0.6105100E+00, 0.6325800E+00, 0.6549700E+00, &
     & 0.6886400E+00, 0.7249200E+00, 0.7418900E+00, 0.7441600E+00, &
     & 0.7530600E+00, 0.6848300E+00, 0.6341976E+00, 0.6341976E+00 /
      data (ref_adm(20,iz,13,13),iz = 1,20) / &
     & 0.5517500E+00, 0.5517500E+00, 0.5474100E+00, 0.5405600E+00, &
     & 0.5398100E+00, 0.5568200E+00, 0.5504600E+00, 0.5651300E+00, &
     & 0.5925900E+00, 0.6077700E+00, 0.6384700E+00, 0.6483400E+00, &
     & 0.6656800E+00, 0.7022800E+00, 0.6749000E+00, 0.7230300E+00, &
     & 0.7240300E+00, 0.6716700E+00, 0.6120071E+00, 0.6120071E+00 /
      data (ref_adm(20,iz,14,13),iz = 1,20) / &
     & 0.5445500E+00, 0.5445500E+00, 0.5518000E+00, 0.5617200E+00, &
     & 0.5633500E+00, 0.5672000E+00, 0.5738200E+00, 0.5834800E+00, &
     & 0.5977800E+00, 0.6109800E+00, 0.6287500E+00, 0.6353800E+00, &
     & 0.6508300E+00, 0.6739600E+00, 0.6522200E+00, 0.6750800E+00, &
     & 0.6787700E+00, 0.6623600E+00, 0.5939396E+00, 0.5939396E+00 /
      data (ref_adm(20,iz,15,13),iz = 1,20) / &
     & 0.5428800E+00, 0.5428800E+00, 0.5387800E+00, 0.5350900E+00, &
     & 0.5348400E+00, 0.5410700E+00, 0.5575600E+00, 0.5743000E+00, &
     & 0.5903400E+00, 0.6126300E+00, 0.6327400E+00, 0.6465900E+00, &
     & 0.6606600E+00, 0.6653500E+00, 0.6815100E+00, 0.6566600E+00, &
     & 0.6508900E+00, 0.5931300E+00, 0.5780444E+00, 0.5780444E+00 /
      data (ref_adm(20,iz,16,13),iz = 1,20) / &
     & 0.5369400E+00, 0.5369400E+00, 0.5403700E+00, 0.5451000E+00, &
     & 0.5328200E+00, 0.5523900E+00, 0.5636100E+00, 0.5709800E+00, &
     & 0.5558300E+00, 0.5695300E+00, 0.5955600E+00, 0.5994300E+00, &
     & 0.6067300E+00, 0.6269500E+00, 0.6263800E+00, 0.6279300E+00, &
     & 0.6161700E+00, 0.6047900E+00, 0.5624521E+00, 0.5624521E+00 /
      data (ref_adm(20,iz,17,13),iz = 1,20) / &
     & 0.5391500E+00, 0.5391500E+00, 0.5227700E+00, 0.5578200E+00, &
     & 0.5644400E+00, 0.5537100E+00, 0.5545900E+00, 0.5658300E+00, &
     & 0.5643400E+00, 0.5865800E+00, 0.6073500E+00, 0.6294600E+00, &
     & 0.6223300E+00, 0.6097300E+00, 0.5896300E+00, 0.6155900E+00, &
     & 0.6257800E+00, 0.6383650E+00, 0.5477508E+00, 0.5477508E+00 /
      data (ref_adm(20,iz,18,13),iz = 1,20) / &
     & 0.5440700E+00, 0.5440700E+00, 0.5471200E+00, 0.5475800E+00, &
     & 0.5628800E+00, 0.5639900E+00, 0.5541500E+00, 0.5519600E+00, &
     & 0.5830000E+00, 0.6030600E+00, 0.5987200E+00, 0.6186500E+00, &
     & 0.6208000E+00, 0.5956800E+00, 0.5858000E+00, 0.6274500E+00, &
     & 0.6476600E+00, 0.5788279E+00, 0.4869825E+00, 0.4869825E+00 /
      data (ref_adm(20,iz,19,13),iz = 1,20) / &
     & 0.5372500E+00, 0.5372500E+00, 0.5525400E+00, 0.5595200E+00, &
     & 0.5440100E+00, 0.5573300E+00, 0.5741800E+00, 0.5731300E+00, &
     & 0.5820700E+00, 0.5817400E+00, 0.5963500E+00, 0.6057400E+00, &
     & 0.5993900E+00, 0.5920100E+00, 0.6033600E+00, 0.5870300E+00, &
     & 0.6003982E+00, 0.5672103E+00, 0.4798984E+00, 0.4798984E+00 /
      data (ref_adm(20,iz,20,13),iz = 1,20) / &
     & 0.5554900E+00, 0.5554900E+00, 0.5610800E+00, 0.5492200E+00, &
     & 0.5330700E+00, 0.5170800E+00, 0.5584000E+00, 0.5548900E+00, &
     & 0.5761200E+00, 0.5834400E+00, 0.5930300E+00, 0.5950000E+00, &
     & 0.6053200E+00, 0.6106700E+00, 0.6079500E+00, 0.6184500E+00, &
     & 0.5899217E+00, 0.5581249E+00, 0.4758613E+00, 0.4758613E+00 /
      data (ref_adm(20,iz,21,13),iz = 1,20) / &
     & 0.5512900E+00, 0.5512900E+00, 0.5539000E+00, 0.5517800E+00, &
     & 0.5357700E+00, 0.5355900E+00, 0.5509100E+00, 0.5668500E+00, &
     & 0.5855800E+00, 0.5847400E+00, 0.5854100E+00, 0.6121600E+00, &
     & 0.5971100E+00, 0.6052000E+00, 0.5965800E+00, 0.5963600E+00, &
     & 0.5810686E+00, 0.5499608E+00, 0.4737113E+00, 0.4737113E+00 /
      data (ref_adm(20,iz,22,13),iz = 1,20) / &
     & 0.5458400E+00, 0.5458400E+00, 0.5469700E+00, 0.5353800E+00, &
     & 0.5489300E+00, 0.5377800E+00, 0.5514800E+00, 0.5641400E+00, &
     & 0.5715500E+00, 0.5773600E+00, 0.5924500E+00, 0.6005300E+00, &
     & 0.5839700E+00, 0.5763500E+00, 0.5869400E+00, 0.6048000E+00, &
     & 0.5659671E+00, 0.5346978E+00, 0.4674814E+00, 0.4674814E+00 /
      data (ref_adm(20,iz,23,13),iz = 1,20) / &
     & 0.5529000E+00, 0.5529000E+00, 0.5336000E+00, 0.5468400E+00, &
     & 0.5429200E+00, 0.5583700E+00, 0.5474800E+00, 0.5659600E+00, &
     & 0.5601400E+00, 0.5617600E+00, 0.5884800E+00, 0.5998100E+00, &
     & 0.6085900E+00, 0.5825500E+00, 0.5913100E+00, 0.6009800E+00, &
     & 0.5617978E+00, 0.5307745E+00, 0.4694888E+00, 0.4694888E+00 /
      data (ref_adm(20,iz,24,13),iz = 1,20) / &
     & 0.5503400E+00, 0.5503400E+00, 0.5246900E+00, 0.5140700E+00, &
     & 0.5243000E+00, 0.5334600E+00, 0.5396400E+00, 0.5583100E+00, &
     & 0.5521800E+00, 0.5735600E+00, 0.5944700E+00, 0.6026100E+00, &
     & 0.5978000E+00, 0.6012800E+00, 0.5784500E+00, 0.5906300E+00, &
     & 0.5741500E+00, 0.5295247E+00, 0.4736245E+00, 0.4736245E+00 /
      data (ref_adm(20,iz,25,13),iz = 1,20) / &
     & 0.5426000E+00, 0.5426000E+00, 0.5525900E+00, 0.5623400E+00, &
     & 0.5628500E+00, 0.5637300E+00, 0.5650000E+00, 0.5674400E+00, &
     & 0.5661200E+00, 0.5708400E+00, 0.5711600E+00, 0.5798700E+00, &
     & 0.5697600E+00, 0.5865500E+00, 0.5898500E+00, 0.5853700E+00, &
     & 0.5699800E+00, 0.5891100E+00, 0.4794347E+00, 0.4794347E+00 /
      data (ref_adm(20,iz,26,13),iz = 1,20) / &
     & 0.5488200E+00, 0.5488200E+00, 0.5475400E+00, 0.5515700E+00, &
     & 0.5517000E+00, 0.5560500E+00, 0.5628100E+00, 0.5689700E+00, &
     & 0.5793900E+00, 0.5911900E+00, 0.5954900E+00, 0.6035500E+00, &
     & 0.6058100E+00, 0.6088200E+00, 0.6152500E+00, 0.6081900E+00, &
     & 0.5802000E+00, 0.5697800E+00, 0.4874775E+00, 0.4874775E+00 /
      data (ref_adm(20,iz,27,13),iz = 1,20) / &
     & 0.5475100E+00, 0.5475100E+00, 0.5213800E+00, 0.5390800E+00, &
     & 0.5428800E+00, 0.5398300E+00, 0.5587100E+00, 0.5656500E+00, &
     & 0.5631200E+00, 0.5943500E+00, 0.6025000E+00, 0.6112900E+00, &
     & 0.6112300E+00, 0.6230600E+00, 0.6245500E+00, 0.6011200E+00, &
     & 0.5845300E+00, 0.5490700E+00, 0.4937600E+00, 0.4937600E+00 /
      data (ref_adm(20,iz,28,13),iz = 1,20) / &
     & 0.5405900E+00, 0.5405900E+00, 0.5433000E+00, 0.5563000E+00, &
     & 0.5446000E+00, 0.5477300E+00, 0.5543700E+00, 0.5658500E+00, &
     & 0.5778000E+00, 0.6101800E+00, 0.6193900E+00, 0.6202500E+00, &
     & 0.6101900E+00, 0.6257000E+00, 0.6288100E+00, 0.6116500E+00, &
     & 0.5914900E+00, 0.5871900E+00, 0.4848000E+00, 0.4848000E+00 /
      data (ref_adm(20,iz,29,13),iz = 1,20) / &
     & 0.5433800E+00, 0.5433800E+00, 0.5397200E+00, 0.5376700E+00, &
     & 0.5573200E+00, 0.5462800E+00, 0.5576000E+00, 0.5708000E+00, &
     & 0.5818800E+00, 0.6024400E+00, 0.6279700E+00, 0.6179500E+00, &
     & 0.6357600E+00, 0.6437500E+00, 0.6390200E+00, 0.6301700E+00, &
     & 0.6186100E+00, 0.5963900E+00, 0.4915800E+00, 0.4915800E+00 /
      data (ref_adm(20,iz,30,13),iz = 1,20) / &
     & 0.5440500E+00, 0.5440500E+00, 0.5510900E+00, 0.5555500E+00, &
     & 0.5505500E+00, 0.5464100E+00, 0.5685500E+00, 0.5708200E+00, &
     & 0.5966500E+00, 0.5997400E+00, 0.6147200E+00, 0.6252100E+00, &
     & 0.6259400E+00, 0.6308100E+00, 0.6302900E+00, 0.6389900E+00, &
     & 0.6207800E+00, 0.5992500E+00, 0.4753300E+00, 0.4753300E+00 /
      data (ref_adm(20,iz,31,13),iz = 1,20) / &
     & 0.5453300E+00, 0.5453300E+00, 0.5501000E+00, 0.5618400E+00, &
     & 0.5533700E+00, 0.5518000E+00, 0.5784400E+00, 0.5697100E+00, &
     & 0.5739200E+00, 0.5927400E+00, 0.5913800E+00, 0.6185500E+00, &
     & 0.6303700E+00, 0.6159300E+00, 0.6365100E+00, 0.6266700E+00, &
     & 0.6359900E+00, 0.5919500E+00, 0.4941600E+00, 0.4941600E+00 /
      data (ref_adm(20,iz,32,13),iz = 1,20) / &
     & 0.5653900E+00, 0.5653900E+00, 0.5669600E+00, 0.5582300E+00, &
     & 0.5744800E+00, 0.5919900E+00, 0.6084500E+00, 0.6129100E+00, &
     & 0.6086100E+00, 0.6270500E+00, 0.6230100E+00, 0.6348100E+00, &
     & 0.6567800E+00, 0.6449400E+00, 0.6558600E+00, 0.6398600E+00, &
     & 0.6271200E+00, 0.5903800E+00, 0.4862400E+00, 0.4862400E+00 /
      data (ref_adm(20,iz,33,13),iz = 1,20) / &
     & 0.5512700E+00, 0.5512700E+00, 0.5538200E+00, 0.5675600E+00, &
     & 0.5786100E+00, 0.5973700E+00, 0.6147800E+00, 0.6153500E+00, &
     & 0.5957300E+00, 0.5931000E+00, 0.5937200E+00, 0.6162000E+00, &
     & 0.6257900E+00, 0.6090300E+00, 0.6175400E+00, 0.6399500E+00, &
     & 0.6413600E+00, 0.6081700E+00, 0.4843500E+00, 0.4843500E+00 /
      data (ref_adm(20,iz,34,13),iz = 1,20) / &
     & 0.5492400E+00, 0.5492400E+00, 0.5630800E+00, 0.5757000E+00, &
     & 0.5808600E+00, 0.5943400E+00, 0.6229700E+00, 0.6069000E+00, &
     & 0.6142000E+00, 0.6080100E+00, 0.6219700E+00, 0.6253100E+00, &
     & 0.6300800E+00, 0.6361400E+00, 0.6468100E+00, 0.6261000E+00, &
     & 0.6393100E+00, 0.6015200E+00, 0.4852900E+00, 0.4852900E+00 /
      data (ref_adm(20,iz,35,13),iz = 1,20) / &
     & 0.5512300E+00, 0.5512300E+00, 0.5601100E+00, 0.5739800E+00, &
     & 0.5800600E+00, 0.5847900E+00, 0.6101900E+00, 0.6100200E+00, &
     & 0.6160000E+00, 0.6265300E+00, 0.6325600E+00, 0.6340900E+00, &
     & 0.6416100E+00, 0.6645000E+00, 0.6748800E+00, 0.6726300E+00, &
     & 0.6112700E+00, 0.5911100E+00, 0.5009300E+00, 0.5009300E+00 /
      data (ref_adm(20,iz,36,13),iz = 1,20) / &
     & 0.5556400E+00, 0.5556400E+00, 0.5658600E+00, 0.5692900E+00, &
     & 0.5706200E+00, 0.5812500E+00, 0.5991700E+00, 0.6088500E+00, &
     & 0.6145300E+00, 0.6288500E+00, 0.6302900E+00, 0.6389700E+00, &
     & 0.6684800E+00, 0.6734000E+00, 0.6714300E+00, 0.6676200E+00, &
     & 0.6385500E+00, 0.6064600E+00, 0.4980900E+00, 0.4980900E+00 /
      data (ref_adm(20,iz,37,13),iz = 1,20) / &
     & 0.5548500E+00, 0.5548500E+00, 0.5664400E+00, 0.5492300E+00, &
     & 0.5272400E+00, 0.5844800E+00, 0.5909300E+00, 0.6097700E+00, &
     & 0.6098500E+00, 0.6356100E+00, 0.6306200E+00, 0.6350300E+00, &
     & 0.6623700E+00, 0.7015900E+00, 0.6863500E+00, 0.6849700E+00, &
     & 0.6626900E+00, 0.6137700E+00, 0.5898918E+00, 0.5898918E+00 /
      data (ref_adm(20,iz,38,13),iz = 1,20) / &
     & 0.5548500E+00, 0.5548500E+00, 0.5664400E+00, 0.5492300E+00, &
     & 0.5272400E+00, 0.5844800E+00, 0.5909300E+00, 0.6097700E+00, &
     & 0.6098500E+00, 0.6356100E+00, 0.6306200E+00, 0.6350300E+00, &
     & 0.6623700E+00, 0.7015900E+00, 0.6863500E+00, 0.6849700E+00, &
     & 0.6626900E+00, 0.6137700E+00, 0.5898918E+00, 0.5898918E+00 /
! Solar Zenith Angle 65.0 Albedo  0.6348654E+00
      data (ref_adm(20,iz, 1,14),iz = 1,20) / &
     & 0.5239500E+00, 0.5239500E+00, 0.5263200E+00, 0.5307300E+00, &
     & 0.5229700E+00, 0.5430200E+00, 0.5769500E+00, 0.6046200E+00, &
     & 0.6570600E+00, 0.7143100E+00, 0.7595800E+00, 0.8297700E+00, &
     & 0.9021100E+00, 0.1076000E+01, 0.1268200E+01, 0.1361000E+01, &
     & 0.1474000E+01, 0.1496700E+01, 0.1394056E+01, 0.1394056E+01 /
      data (ref_adm(20,iz, 2,14),iz = 1,20) / &
     & 0.5239500E+00, 0.5239500E+00, 0.5263200E+00, 0.5307300E+00, &
     & 0.5229700E+00, 0.5430200E+00, 0.5769500E+00, 0.6046200E+00, &
     & 0.6570600E+00, 0.7143100E+00, 0.7595800E+00, 0.8297700E+00, &
     & 0.9021100E+00, 0.1076000E+01, 0.1268200E+01, 0.1361000E+01, &
     & 0.1474000E+01, 0.1496700E+01, 0.1394056E+01, 0.1394056E+01 /
      data (ref_adm(20,iz, 3,14),iz = 1,20) / &
     & 0.5278600E+00, 0.5278600E+00, 0.5222200E+00, 0.5401600E+00, &
     & 0.5369900E+00, 0.5477500E+00, 0.5761600E+00, 0.6102800E+00, &
     & 0.6516100E+00, 0.6987400E+00, 0.7522900E+00, 0.8221900E+00, &
     & 0.9175700E+00, 0.1051800E+01, 0.1201900E+01, 0.1343700E+01, &
     & 0.1477000E+01, 0.1529000E+01, 0.1193128E+01, 0.1193128E+01 /
      data (ref_adm(20,iz, 4,14),iz = 1,20) / &
     & 0.5216700E+00, 0.5216700E+00, 0.5283600E+00, 0.5312100E+00, &
     & 0.5366100E+00, 0.5548100E+00, 0.5804900E+00, 0.6167500E+00, &
     & 0.6369600E+00, 0.6860800E+00, 0.7489300E+00, 0.8220800E+00, &
     & 0.9013200E+00, 0.1038600E+01, 0.1164200E+01, 0.1255900E+01, &
     & 0.1380100E+01, 0.1412400E+01, 0.1201364E+01, 0.1201364E+01 /
      data (ref_adm(20,iz, 5,14),iz = 1,20) / &
     & 0.5250600E+00, 0.5250600E+00, 0.5327000E+00, 0.5423600E+00, &
     & 0.5434500E+00, 0.5558800E+00, 0.5868700E+00, 0.6170000E+00, &
     & 0.6363700E+00, 0.6863900E+00, 0.7418300E+00, 0.7970100E+00, &
     & 0.8832500E+00, 0.9961500E+00, 0.1112600E+01, 0.1263400E+01, &
     & 0.1360200E+01, 0.1271100E+01, 0.1078654E+01, 0.1078654E+01 /
      data (ref_adm(20,iz, 6,14),iz = 1,20) / &
     & 0.5218200E+00, 0.5218200E+00, 0.5302700E+00, 0.5213500E+00, &
     & 0.5437200E+00, 0.5609600E+00, 0.5791100E+00, 0.5978100E+00, &
     & 0.6234700E+00, 0.6605600E+00, 0.7170900E+00, 0.7873400E+00, &
     & 0.8706500E+00, 0.9740100E+00, 0.1082300E+01, 0.1206900E+01, &
     & 0.1362700E+01, 0.1358100E+01, 0.1100300E+01, 0.1100300E+01 /
      data (ref_adm(20,iz, 7,14),iz = 1,20) / &
     & 0.5154100E+00, 0.5154100E+00, 0.5281300E+00, 0.5380000E+00, &
     & 0.5551000E+00, 0.5691300E+00, 0.5798800E+00, 0.6004500E+00, &
     & 0.6310900E+00, 0.6645400E+00, 0.7159600E+00, 0.7635400E+00, &
     & 0.8465000E+00, 0.9339100E+00, 0.9999500E+00, 0.1077800E+01, &
     & 0.1161200E+01, 0.1143900E+01, 0.1101400E+01, 0.1101400E+01 /
      data (ref_adm(20,iz, 8,14),iz = 1,20) / &
     & 0.5313600E+00, 0.5313600E+00, 0.5258700E+00, 0.5455300E+00, &
     & 0.5644400E+00, 0.5728900E+00, 0.5901400E+00, 0.6065900E+00, &
     & 0.6143300E+00, 0.6587200E+00, 0.6957500E+00, 0.7394600E+00, &
     & 0.8055400E+00, 0.8788500E+00, 0.9317100E+00, 0.1009500E+01, &
     & 0.1103300E+01, 0.1065800E+01, 0.8345071E+00, 0.8345071E+00 /
      data (ref_adm(20,iz, 9,14),iz = 1,20) / &
     & 0.5239500E+00, 0.5239500E+00, 0.5324700E+00, 0.5403500E+00, &
     & 0.5429600E+00, 0.5620500E+00, 0.5741800E+00, 0.5819600E+00, &
     & 0.6125400E+00, 0.6448200E+00, 0.6809500E+00, 0.7280000E+00, &
     & 0.7818800E+00, 0.8323400E+00, 0.8957000E+00, 0.9222400E+00, &
     & 0.9968400E+00, 0.9349200E+00, 0.8903000E+00, 0.8903000E+00 /
      data (ref_adm(20,iz,10,14),iz = 1,20) / &
     & 0.5277900E+00, 0.5277900E+00, 0.5386700E+00, 0.5436400E+00, &
     & 0.5528700E+00, 0.5620000E+00, 0.5758600E+00, 0.5793800E+00, &
     & 0.6082100E+00, 0.6406700E+00, 0.6562500E+00, 0.7061100E+00, &
     & 0.7596300E+00, 0.7970700E+00, 0.8407800E+00, 0.9053200E+00, &
     & 0.9414700E+00, 0.9136600E+00, 0.7547800E+00, 0.7547800E+00 /
      data (ref_adm(20,iz,11,14),iz = 1,20) / &
     & 0.5387800E+00, 0.5387800E+00, 0.5270400E+00, 0.5413100E+00, &
     & 0.5549300E+00, 0.5692500E+00, 0.5646100E+00, 0.5756300E+00, &
     & 0.5957000E+00, 0.6314300E+00, 0.6658300E+00, 0.6968500E+00, &
     & 0.7367500E+00, 0.7750100E+00, 0.8035200E+00, 0.8497100E+00, &
     & 0.8882300E+00, 0.8714600E+00, 0.6465500E+00, 0.6465500E+00 /
      data (ref_adm(20,iz,12,14),iz = 1,20) / &
     & 0.5254200E+00, 0.5254200E+00, 0.5290200E+00, 0.5371800E+00, &
     & 0.5343900E+00, 0.5433100E+00, 0.5556100E+00, 0.5595100E+00, &
     & 0.5738500E+00, 0.6076200E+00, 0.6345800E+00, 0.6745300E+00, &
     & 0.7066600E+00, 0.7459800E+00, 0.7674000E+00, 0.8183700E+00, &
     & 0.8371700E+00, 0.7273600E+00, 0.6945300E+00, 0.6945300E+00 /
      data (ref_adm(20,iz,13,14),iz = 1,20) / &
     & 0.5267000E+00, 0.5267000E+00, 0.5389500E+00, 0.5296100E+00, &
     & 0.5355800E+00, 0.5415800E+00, 0.5530400E+00, 0.5710600E+00, &
     & 0.5781200E+00, 0.6041800E+00, 0.6108100E+00, 0.6458600E+00, &
     & 0.6930800E+00, 0.7018500E+00, 0.7241400E+00, 0.7567400E+00, &
     & 0.7559300E+00, 0.7539900E+00, 0.6466740E+00, 0.6466740E+00 /
      data (ref_adm(20,iz,14,14),iz = 1,20) / &
     & 0.5323300E+00, 0.5323300E+00, 0.5331400E+00, 0.5404700E+00, &
     & 0.5464000E+00, 0.5545900E+00, 0.5634700E+00, 0.5757400E+00, &
     & 0.5861800E+00, 0.6052700E+00, 0.6213500E+00, 0.6420900E+00, &
     & 0.6662500E+00, 0.6966500E+00, 0.6745300E+00, 0.7065600E+00, &
     & 0.7225500E+00, 0.6703400E+00, 0.6243436E+00, 0.6243436E+00 /
      data (ref_adm(20,iz,15,14),iz = 1,20) / &
     & 0.5312600E+00, 0.5312600E+00, 0.5247300E+00, 0.5219900E+00, &
     & 0.5219600E+00, 0.5302600E+00, 0.5445400E+00, 0.5615000E+00, &
     & 0.5821500E+00, 0.6043300E+00, 0.6198900E+00, 0.6371200E+00, &
     & 0.6598400E+00, 0.6769300E+00, 0.6701300E+00, 0.7007500E+00, &
     & 0.6921800E+00, 0.7286600E+00, 0.6050549E+00, 0.6050549E+00 /
      data (ref_adm(20,iz,16,14),iz = 1,20) / &
     & 0.5086400E+00, 0.5086400E+00, 0.5068100E+00, 0.5095400E+00, &
     & 0.5337500E+00, 0.5175700E+00, 0.5292300E+00, 0.5396600E+00, &
     & 0.5506000E+00, 0.5668000E+00, 0.5751600E+00, 0.5922100E+00, &
     & 0.6058800E+00, 0.6209900E+00, 0.6403400E+00, 0.6527100E+00, &
     & 0.6681400E+00, 0.6614671E+00, 0.5870888E+00, 0.5870888E+00 /
      data (ref_adm(20,iz,17,14),iz = 1,20) / &
     & 0.5200400E+00, 0.5200400E+00, 0.5250900E+00, 0.5177800E+00, &
     & 0.5322400E+00, 0.5342300E+00, 0.5423700E+00, 0.5666400E+00, &
     & 0.5702900E+00, 0.5786600E+00, 0.5747600E+00, 0.5825000E+00, &
     & 0.5998500E+00, 0.6314600E+00, 0.6234400E+00, 0.6276500E+00, &
     & 0.6266500E+00, 0.6365902E+00, 0.5702080E+00, 0.5702080E+00 /
      data (ref_adm(20,iz,18,14),iz = 1,20) / &
     & 0.5098500E+00, 0.5098500E+00, 0.5187400E+00, 0.5144100E+00, &
     & 0.5247800E+00, 0.5326700E+00, 0.5394100E+00, 0.5667400E+00, &
     & 0.5638100E+00, 0.5636500E+00, 0.5731200E+00, 0.5816200E+00, &
     & 0.5963000E+00, 0.6028200E+00, 0.6013400E+00, 0.6249500E+00, &
     & 0.5679100E+00, 0.6092649E+00, 0.5283673E+00, 0.5283673E+00 /
      data (ref_adm(20,iz,19,14),iz = 1,20) / &
     & 0.4995500E+00, 0.4995500E+00, 0.5057200E+00, 0.5156600E+00, &
     & 0.5210400E+00, 0.5263300E+00, 0.5410100E+00, 0.5428600E+00, &
     & 0.5515700E+00, 0.5606400E+00, 0.5589600E+00, 0.5688200E+00, &
     & 0.5899100E+00, 0.5910900E+00, 0.5934200E+00, 0.5933800E+00, &
     & 0.6187003E+00, 0.5942478E+00, 0.5193527E+00, 0.5193527E+00 /
      data (ref_adm(20,iz,20,14),iz = 1,20) / &
     & 0.5069300E+00, 0.5069300E+00, 0.5185500E+00, 0.5142400E+00, &
     & 0.5221100E+00, 0.5210300E+00, 0.5260700E+00, 0.5465500E+00, &
     & 0.5525700E+00, 0.5598300E+00, 0.5687800E+00, 0.5820500E+00, &
     & 0.5826400E+00, 0.5868300E+00, 0.5943300E+00, 0.6275200E+00, &
     & 0.6065031E+00, 0.5831752E+00, 0.5143641E+00, 0.5143641E+00 /
      data (ref_adm(20,iz,21,14),iz = 1,20) / &
     & 0.5042200E+00, 0.5042200E+00, 0.5184500E+00, 0.5207000E+00, &
     & 0.5404200E+00, 0.5355400E+00, 0.5373900E+00, 0.5329400E+00, &
     & 0.5385500E+00, 0.5491100E+00, 0.5644400E+00, 0.5776600E+00, &
     & 0.5966200E+00, 0.6027200E+00, 0.5975600E+00, 0.6247100E+00, &
     & 0.5961652E+00, 0.5737578E+00, 0.5119512E+00, 0.5119512E+00 /
      data (ref_adm(20,iz,22,14),iz = 1,20) / &
     & 0.5196200E+00, 0.5196200E+00, 0.5289500E+00, 0.5132900E+00, &
     & 0.5287200E+00, 0.5387600E+00, 0.5320000E+00, 0.5370300E+00, &
     & 0.5382400E+00, 0.5511000E+00, 0.5584500E+00, 0.5732500E+00, &
     & 0.5731500E+00, 0.5974200E+00, 0.5929600E+00, 0.6007700E+00, &
     & 0.5784531E+00, 0.5519229E+00, 0.4888783E+00, 0.4888783E+00 /
      data (ref_adm(20,iz,23,14),iz = 1,20) / &
     & 0.5180100E+00, 0.5180100E+00, 0.5202000E+00, 0.5241600E+00, &
     & 0.5236300E+00, 0.5287100E+00, 0.5361100E+00, 0.5496100E+00, &
     & 0.5488700E+00, 0.5665600E+00, 0.5638300E+00, 0.5706600E+00, &
     & 0.5881800E+00, 0.5888700E+00, 0.5801000E+00, 0.5911400E+00, &
     & 0.6648200E+00, 0.5470191E+00, 0.4907202E+00, 0.4907202E+00 /
      data (ref_adm(20,iz,24,14),iz = 1,20) / &
     & 0.5020300E+00, 0.5020300E+00, 0.5012200E+00, 0.4960800E+00, &
     & 0.5032000E+00, 0.5028500E+00, 0.5052100E+00, 0.5174300E+00, &
     & 0.5256100E+00, 0.5378800E+00, 0.5518500E+00, 0.5613400E+00, &
     & 0.5812600E+00, 0.5796300E+00, 0.5728100E+00, 0.5911500E+00, &
     & 0.6590200E+00, 0.5452129E+00, 0.4950733E+00, 0.4950733E+00 /
      data (ref_adm(20,iz,25,14),iz = 1,20) / &
     & 0.5239500E+00, 0.5239500E+00, 0.5401100E+00, 0.5419800E+00, &
     & 0.5435300E+00, 0.5497100E+00, 0.5579800E+00, 0.5618700E+00, &
     & 0.5666600E+00, 0.5715300E+00, 0.5728200E+00, 0.5770800E+00, &
     & 0.5846300E+00, 0.5858500E+00, 0.5917400E+00, 0.6023300E+00, &
     & 0.5768300E+00, 0.5452822E+00, 0.5013022E+00, 0.5013022E+00 /
      data (ref_adm(20,iz,26,14),iz = 1,20) / &
     & 0.5267500E+00, 0.5267500E+00, 0.5216700E+00, 0.5254100E+00, &
     & 0.5389600E+00, 0.5417300E+00, 0.5462800E+00, 0.5546300E+00, &
     & 0.5655300E+00, 0.5734500E+00, 0.5817700E+00, 0.5899500E+00, &
     & 0.5973900E+00, 0.6107000E+00, 0.6089200E+00, 0.5993400E+00, &
     & 0.5890900E+00, 0.5890100E+00, 0.5103368E+00, 0.5103368E+00 /
      data (ref_adm(20,iz,27,14),iz = 1,20) / &
     & 0.5220800E+00, 0.5220800E+00, 0.5428400E+00, 0.5303000E+00, &
     & 0.5456400E+00, 0.5507700E+00, 0.5343600E+00, 0.5456900E+00, &
     & 0.5677600E+00, 0.5680500E+00, 0.5676800E+00, 0.5795900E+00, &
     & 0.6027800E+00, 0.6081600E+00, 0.6141300E+00, 0.6217300E+00, &
     & 0.6159500E+00, 0.5850000E+00, 0.4858000E+00, 0.4858000E+00 /
      data (ref_adm(20,iz,28,14),iz = 1,20) / &
     & 0.5270100E+00, 0.5270100E+00, 0.5274600E+00, 0.5264500E+00, &
     & 0.5384900E+00, 0.5465200E+00, 0.5444800E+00, 0.5580900E+00, &
     & 0.5795500E+00, 0.5834500E+00, 0.5955800E+00, 0.6087400E+00, &
     & 0.6195200E+00, 0.6277400E+00, 0.6391500E+00, 0.6471400E+00, &
     & 0.6382300E+00, 0.6245300E+00, 0.5051400E+00, 0.5051400E+00 /
      data (ref_adm(20,iz,29,14),iz = 1,20) / &
     & 0.5280300E+00, 0.5280300E+00, 0.5379800E+00, 0.5406100E+00, &
     & 0.5401900E+00, 0.5482200E+00, 0.5561400E+00, 0.5560700E+00, &
     & 0.5725000E+00, 0.5910500E+00, 0.6178100E+00, 0.6229100E+00, &
     & 0.6213200E+00, 0.6529700E+00, 0.6503100E+00, 0.6593400E+00, &
     & 0.6428800E+00, 0.6233800E+00, 0.5334600E+00, 0.5334600E+00 /
      data (ref_adm(20,iz,30,14),iz = 1,20) / &
     & 0.5306300E+00, 0.5306300E+00, 0.5293300E+00, 0.5302700E+00, &
     & 0.5365600E+00, 0.5403200E+00, 0.5490200E+00, 0.5594900E+00, &
     & 0.5836100E+00, 0.6120000E+00, 0.6158100E+00, 0.6284700E+00, &
     & 0.6224600E+00, 0.6360100E+00, 0.6542200E+00, 0.6659700E+00, &
     & 0.6730100E+00, 0.6375600E+00, 0.5503200E+00, 0.5503200E+00 /
      data (ref_adm(20,iz,31,14),iz = 1,20) / &
     & 0.5219000E+00, 0.5219000E+00, 0.5124800E+00, 0.5238900E+00, &
     & 0.5294700E+00, 0.5452700E+00, 0.5551500E+00, 0.5614400E+00, &
     & 0.5798100E+00, 0.6078200E+00, 0.6161900E+00, 0.6208500E+00, &
     & 0.6188800E+00, 0.6301300E+00, 0.6452300E+00, 0.6592900E+00, &
     & 0.6674300E+00, 0.6443000E+00, 0.5422800E+00, 0.5422800E+00 /
      data (ref_adm(20,iz,32,14),iz = 1,20) / &
     & 0.5229400E+00, 0.5229400E+00, 0.5256000E+00, 0.5299800E+00, &
     & 0.5367200E+00, 0.5520400E+00, 0.5699900E+00, 0.5888900E+00, &
     & 0.5975400E+00, 0.6008000E+00, 0.6165900E+00, 0.6308000E+00, &
     & 0.6356300E+00, 0.6513200E+00, 0.6612500E+00, 0.6733000E+00, &
     & 0.6794900E+00, 0.6523600E+00, 0.5389600E+00, 0.5389600E+00 /
      data (ref_adm(20,iz,33,14),iz = 1,20) / &
     & 0.5214700E+00, 0.5214700E+00, 0.5172000E+00, 0.5279200E+00, &
     & 0.5373000E+00, 0.5400600E+00, 0.5626700E+00, 0.5806200E+00, &
     & 0.5799900E+00, 0.5872400E+00, 0.5992400E+00, 0.6170100E+00, &
     & 0.6330100E+00, 0.6521400E+00, 0.6585600E+00, 0.6720700E+00, &
     & 0.6807500E+00, 0.6500900E+00, 0.5580200E+00, 0.5580200E+00 /
      data (ref_adm(20,iz,34,14),iz = 1,20) / &
     & 0.5195800E+00, 0.5195800E+00, 0.5257700E+00, 0.5352400E+00, &
     & 0.5340800E+00, 0.5426200E+00, 0.5671600E+00, 0.5771000E+00, &
     & 0.5774200E+00, 0.5880900E+00, 0.6090600E+00, 0.6188700E+00, &
     & 0.6422300E+00, 0.6475900E+00, 0.6439800E+00, 0.6643200E+00, &
     & 0.6641500E+00, 0.6378300E+00, 0.5327800E+00, 0.5327800E+00 /
      data (ref_adm(20,iz,35,14),iz = 1,20) / &
     & 0.5162600E+00, 0.5162600E+00, 0.5318300E+00, 0.5269400E+00, &
     & 0.5377400E+00, 0.5540000E+00, 0.5652000E+00, 0.5769200E+00, &
     & 0.5976300E+00, 0.5954200E+00, 0.6088600E+00, 0.6273700E+00, &
     & 0.6380800E+00, 0.6631700E+00, 0.6539000E+00, 0.6796500E+00, &
     & 0.6786800E+00, 0.6539100E+00, 0.5402300E+00, 0.5402300E+00 /
      data (ref_adm(20,iz,36,14),iz = 1,20) / &
     & 0.5265500E+00, 0.5265500E+00, 0.5221400E+00, 0.5263900E+00, &
     & 0.5300100E+00, 0.5470600E+00, 0.5654900E+00, 0.5830000E+00, &
     & 0.5945500E+00, 0.5902700E+00, 0.6059100E+00, 0.6224700E+00, &
     & 0.6485300E+00, 0.6806100E+00, 0.6861900E+00, 0.7011300E+00, &
     & 0.6832000E+00, 0.6624200E+00, 0.5279700E+00, 0.5279700E+00 /
      data (ref_adm(20,iz,37,14),iz = 1,20) / &
     & 0.5324600E+00, 0.5324600E+00, 0.5263200E+00, 0.5260100E+00, &
     & 0.5283500E+00, 0.5445800E+00, 0.5634900E+00, 0.5845300E+00, &
     & 0.5916600E+00, 0.5950600E+00, 0.6067300E+00, 0.6202500E+00, &
     & 0.6678100E+00, 0.7041900E+00, 0.7245700E+00, 0.7086400E+00, &
     & 0.6928600E+00, 0.6528500E+00, 0.5032600E+00, 0.5032600E+00 /
      data (ref_adm(20,iz,38,14),iz = 1,20) / &
     & 0.5324600E+00, 0.5324600E+00, 0.5263200E+00, 0.5260100E+00, &
     & 0.5283500E+00, 0.5445800E+00, 0.5634900E+00, 0.5845300E+00, &
     & 0.5916600E+00, 0.5950600E+00, 0.6067300E+00, 0.6202500E+00, &
     & 0.6678100E+00, 0.7041900E+00, 0.7245700E+00, 0.7086400E+00, &
     & 0.6928600E+00, 0.6528500E+00, 0.5032600E+00, 0.5032600E+00 /
! Solar Zenith Angle 70.0 Albedo  0.6474291E+00
      data (ref_adm(20,iz, 1,15),iz = 1,20) / &
     & 0.5030800E+00, 0.5030800E+00, 0.4988600E+00, 0.5031700E+00, &
     & 0.5294200E+00, 0.5660100E+00, 0.5759000E+00, 0.6028300E+00, &
     & 0.6614100E+00, 0.7188400E+00, 0.7888700E+00, 0.8937000E+00, &
     & 0.1018800E+01, 0.1220800E+01, 0.1375000E+01, 0.1518300E+01, &
     & 0.1831069E+01, 0.2522106E+01, 0.2448223E+01, 0.2448223E+01 /
      data (ref_adm(20,iz, 2,15),iz = 1,20) / &
     & 0.5030800E+00, 0.5030800E+00, 0.4988600E+00, 0.5031700E+00, &
     & 0.5294200E+00, 0.5660100E+00, 0.5759000E+00, 0.6028300E+00, &
     & 0.6614100E+00, 0.7188400E+00, 0.7888700E+00, 0.8937000E+00, &
     & 0.1018800E+01, 0.1220800E+01, 0.1375000E+01, 0.1518300E+01, &
     & 0.1831069E+01, 0.2522106E+01, 0.2448223E+01, 0.2448223E+01 /
      data (ref_adm(20,iz, 3,15),iz = 1,20) / &
     & 0.5013000E+00, 0.5013000E+00, 0.5021500E+00, 0.5174700E+00, &
     & 0.5294600E+00, 0.5352600E+00, 0.5710900E+00, 0.6088400E+00, &
     & 0.6545500E+00, 0.7070000E+00, 0.7899500E+00, 0.8859100E+00, &
     & 0.1008600E+01, 0.1198500E+01, 0.1369300E+01, 0.1487700E+01, &
     & 0.1775000E+01, 0.2354280E+01, 0.2242190E+01, 0.2242190E+01 /
      data (ref_adm(20,iz, 4,15),iz = 1,20) / &
     & 0.4930200E+00, 0.4930200E+00, 0.4952600E+00, 0.5104600E+00, &
     & 0.5343000E+00, 0.5303100E+00, 0.5647600E+00, 0.6040400E+00, &
     & 0.6450200E+00, 0.6976100E+00, 0.7762400E+00, 0.8780600E+00, &
     & 0.9808000E+00, 0.1155400E+01, 0.1293100E+01, 0.1365200E+01, &
     & 0.1555600E+01, 0.2074550E+01, 0.2045466E+01, 0.2045466E+01 /
      data (ref_adm(20,iz, 5,15),iz = 1,20) / &
     & 0.5099500E+00, 0.5099500E+00, 0.5066700E+00, 0.5171000E+00, &
     & 0.5209700E+00, 0.5544000E+00, 0.5770800E+00, 0.6099900E+00, &
     & 0.6570300E+00, 0.7010200E+00, 0.7593900E+00, 0.8516500E+00, &
     & 0.9612900E+00, 0.1116200E+01, 0.1248600E+01, 0.1367500E+01, &
     & 0.1480100E+01, 0.1789847E+01, 0.1619058E+01, 0.1619058E+01 /
      data (ref_adm(20,iz, 6,15),iz = 1,20) / &
     & 0.5104400E+00, 0.5104400E+00, 0.5136000E+00, 0.5243100E+00, &
     & 0.5313600E+00, 0.5467800E+00, 0.5700400E+00, 0.5980000E+00, &
     & 0.6341600E+00, 0.6833700E+00, 0.7481300E+00, 0.8218500E+00, &
     & 0.9178800E+00, 0.1047800E+01, 0.1175500E+01, 0.1304900E+01, &
     & 0.1558500E+01, 0.1684000E+01, 0.1553700E+01, 0.1553700E+01 /
      data (ref_adm(20,iz, 7,15),iz = 1,20) / &
     & 0.5156700E+00, 0.5156700E+00, 0.5211200E+00, 0.5296100E+00, &
     & 0.5334600E+00, 0.5499100E+00, 0.5594800E+00, 0.6036300E+00, &
     & 0.6416600E+00, 0.6845400E+00, 0.7424300E+00, 0.8231200E+00, &
     & 0.9140600E+00, 0.1038500E+01, 0.1172200E+01, 0.1325000E+01, &
     & 0.1560600E+01, 0.1534000E+01, 0.1175900E+01, 0.1175900E+01 /
      data (ref_adm(20,iz, 8,15),iz = 1,20) / &
     & 0.5050800E+00, 0.5050800E+00, 0.5064600E+00, 0.5088900E+00, &
     & 0.5258900E+00, 0.5353800E+00, 0.5527100E+00, 0.5848400E+00, &
     & 0.6273900E+00, 0.6694200E+00, 0.7187500E+00, 0.7793800E+00, &
     & 0.8584800E+00, 0.9561400E+00, 0.1049700E+01, 0.1178100E+01, &
     & 0.1325200E+01, 0.1295900E+01, 0.1132800E+01, 0.1132800E+01 /
      data (ref_adm(20,iz, 9,15),iz = 1,20) / &
     & 0.5009600E+00, 0.5009600E+00, 0.4990600E+00, 0.5135500E+00, &
     & 0.5204300E+00, 0.5377500E+00, 0.5562000E+00, 0.5807000E+00, &
     & 0.6161700E+00, 0.6485200E+00, 0.6980400E+00, 0.7579700E+00, &
     & 0.8312800E+00, 0.9130600E+00, 0.1003000E+01, 0.1098500E+01, &
     & 0.1227400E+01, 0.1109500E+01, 0.9314800E+00, 0.9314800E+00 /
      data (ref_adm(20,iz,10,15),iz = 1,20) / &
     & 0.4975000E+00, 0.4975000E+00, 0.5009100E+00, 0.5131300E+00, &
     & 0.5338200E+00, 0.5418000E+00, 0.5567100E+00, 0.5748500E+00, &
     & 0.6204800E+00, 0.6393500E+00, 0.6758700E+00, 0.7373500E+00, &
     & 0.7908200E+00, 0.8596200E+00, 0.9395000E+00, 0.1015000E+01, &
     & 0.1090300E+01, 0.1014400E+01, 0.8559800E+00, 0.8559800E+00 /
      data (ref_adm(20,iz,11,15),iz = 1,20) / &
     & 0.5010400E+00, 0.5010400E+00, 0.5069300E+00, 0.5181200E+00, &
     & 0.5159000E+00, 0.5288700E+00, 0.5471200E+00, 0.5802300E+00, &
     & 0.6035200E+00, 0.6238100E+00, 0.6594200E+00, 0.7081800E+00, &
     & 0.7577600E+00, 0.8113500E+00, 0.8696400E+00, 0.9480500E+00, &
     & 0.1000200E+01, 0.9371300E+00, 0.8005700E+00, 0.8005700E+00 /
      data (ref_adm(20,iz,12,15),iz = 1,20) / &
     & 0.5021800E+00, 0.5021800E+00, 0.5030200E+00, 0.5070100E+00, &
     & 0.5081200E+00, 0.5207500E+00, 0.5439800E+00, 0.5684700E+00, &
     & 0.5901400E+00, 0.6073000E+00, 0.6420200E+00, 0.6774400E+00, &
     & 0.7209500E+00, 0.7649200E+00, 0.8132400E+00, 0.8895800E+00, &
     & 0.9159500E+00, 0.8672500E+00, 0.7334200E+00, 0.7334200E+00 /
      data (ref_adm(20,iz,13,15),iz = 1,20) / &
     & 0.5081800E+00, 0.5081800E+00, 0.5056600E+00, 0.5051400E+00, &
     & 0.5223400E+00, 0.5242600E+00, 0.5411600E+00, 0.5505100E+00, &
     & 0.5716400E+00, 0.5909500E+00, 0.6278300E+00, 0.6495200E+00, &
     & 0.6864400E+00, 0.7442900E+00, 0.7867100E+00, 0.8256400E+00, &
     & 0.8666800E+00, 0.8089300E+00, 0.6580000E+00, 0.6580000E+00 /
      data (ref_adm(20,iz,14,15),iz = 1,20) / &
     & 0.5143300E+00, 0.5143300E+00, 0.5213400E+00, 0.5243700E+00, &
     & 0.5346300E+00, 0.5419400E+00, 0.5510500E+00, 0.5621300E+00, &
     & 0.5814500E+00, 0.6019100E+00, 0.6167100E+00, 0.6391000E+00, &
     & 0.6670300E+00, 0.6972000E+00, 0.7418500E+00, 0.7589400E+00, &
     & 0.8091700E+00, 0.7763500E+00, 0.7345026E+00, 0.7345026E+00 /
      data (ref_adm(20,iz,15,15),iz = 1,20) / &
     & 0.5165800E+00, 0.5165800E+00, 0.5065500E+00, 0.5108000E+00, &
     & 0.5156800E+00, 0.5230100E+00, 0.5386900E+00, 0.5564400E+00, &
     & 0.5741500E+00, 0.5937700E+00, 0.6195800E+00, 0.6395800E+00, &
     & 0.6622700E+00, 0.6944500E+00, 0.6906400E+00, 0.7109200E+00, &
     & 0.7419700E+00, 0.7281200E+00, 0.7097875E+00, 0.7097875E+00 /
      data (ref_adm(20,iz,16,15),iz = 1,20) / &
     & 0.4895300E+00, 0.4895300E+00, 0.4802400E+00, 0.4897300E+00, &
     & 0.4961100E+00, 0.4976700E+00, 0.5119400E+00, 0.5233000E+00, &
     & 0.5383300E+00, 0.5550000E+00, 0.5722200E+00, 0.5952700E+00, &
     & 0.6186900E+00, 0.6521000E+00, 0.6585500E+00, 0.6715000E+00, &
     & 0.7175100E+00, 0.7578680E+00, 0.6873458E+00, 0.6873458E+00 /
      data (ref_adm(20,iz,17,15),iz = 1,20) / &
     & 0.5009500E+00, 0.5009500E+00, 0.5105000E+00, 0.5054600E+00, &
     & 0.5140900E+00, 0.5226900E+00, 0.5275500E+00, 0.5361800E+00, &
     & 0.5423900E+00, 0.5634900E+00, 0.5756700E+00, 0.5922400E+00, &
     & 0.6060800E+00, 0.6228600E+00, 0.6418900E+00, 0.6500100E+00, &
     & 0.6736600E+00, 0.7283126E+00, 0.6654791E+00, 0.6654791E+00 /
      data (ref_adm(20,iz,18,15),iz = 1,20) / &
     & 0.5016600E+00, 0.5016600E+00, 0.5086700E+00, 0.5070200E+00, &
     & 0.5104100E+00, 0.5166200E+00, 0.5231800E+00, 0.5389400E+00, &
     & 0.5417800E+00, 0.5489500E+00, 0.5674800E+00, 0.5839100E+00, &
     & 0.6156000E+00, 0.6096000E+00, 0.6262400E+00, 0.6511800E+00, &
     & 0.6699738E+00, 0.6599561E+00, 0.5928462E+00, 0.5928462E+00 /
      data (ref_adm(20,iz,19,15),iz = 1,20) / &
     & 0.5009100E+00, 0.5009100E+00, 0.5099300E+00, 0.5052000E+00, &
     & 0.5006700E+00, 0.5070300E+00, 0.5104100E+00, 0.5250600E+00, &
     & 0.5220000E+00, 0.5407600E+00, 0.5591200E+00, 0.5640100E+00, &
     & 0.5921900E+00, 0.5906000E+00, 0.6186400E+00, 0.6309500E+00, &
     & 0.6519523E+00, 0.6411354E+00, 0.5812690E+00, 0.5812690E+00 /
      data (ref_adm(20,iz,20,15),iz = 1,20) / &
     & 0.5026100E+00, 0.5026100E+00, 0.4989900E+00, 0.4939900E+00, &
     & 0.5023000E+00, 0.5073300E+00, 0.5121900E+00, 0.5232500E+00, &
     & 0.5364600E+00, 0.5476800E+00, 0.5657700E+00, 0.5795100E+00, &
     & 0.5842300E+00, 0.5813300E+00, 0.6212800E+00, 0.6036800E+00, &
     & 0.6377416E+00, 0.6276309E+00, 0.5749058E+00, 0.5749058E+00 /
      data (ref_adm(20,iz,21,15),iz = 1,20) / &
     & 0.5106800E+00, 0.5106800E+00, 0.5070800E+00, 0.5047400E+00, &
     & 0.5145000E+00, 0.5201300E+00, 0.5232300E+00, 0.5301600E+00, &
     & 0.5366300E+00, 0.5462700E+00, 0.5542300E+00, 0.5734800E+00, &
     & 0.5790500E+00, 0.5827800E+00, 0.6096700E+00, 0.5793500E+00, &
     & 0.6254729E+00, 0.6163959E+00, 0.5719647E+00, 0.5719647E+00 /
      data (ref_adm(20,iz,22,15),iz = 1,20) / &
     & 0.5038900E+00, 0.5038900E+00, 0.5156800E+00, 0.5133500E+00, &
     & 0.5092000E+00, 0.5147800E+00, 0.5236900E+00, 0.5278800E+00, &
     & 0.5314600E+00, 0.5447900E+00, 0.5562500E+00, 0.5776300E+00, &
     & 0.5821300E+00, 0.5888800E+00, 0.5937600E+00, 0.5888100E+00, &
     & 0.6053731E+00, 0.5889259E+00, 0.5391555E+00, 0.5391555E+00 /
      data (ref_adm(20,iz,23,15),iz = 1,20) / &
     & 0.5013300E+00, 0.5013300E+00, 0.5076000E+00, 0.5077200E+00, &
     & 0.5040500E+00, 0.5113000E+00, 0.5158200E+00, 0.5209200E+00, &
     & 0.5368700E+00, 0.5338200E+00, 0.5500800E+00, 0.5667900E+00, &
     & 0.5673200E+00, 0.5768600E+00, 0.5841900E+00, 0.6074100E+00, &
     & 0.5991291E+00, 0.5832658E+00, 0.5417209E+00, 0.5417209E+00 /
      data (ref_adm(20,iz,24,15),iz = 1,20) / &
     & 0.4854300E+00, 0.4854300E+00, 0.4822800E+00, 0.4862200E+00, &
     & 0.4887100E+00, 0.4913400E+00, 0.4982300E+00, 0.5064800E+00, &
     & 0.5160900E+00, 0.5228300E+00, 0.5365200E+00, 0.5481900E+00, &
     & 0.5575100E+00, 0.5697300E+00, 0.5890600E+00, 0.6329500E+00, &
     & 0.6589800E+00, 0.5812588E+00, 0.5476261E+00, 0.5476261E+00 /
      data (ref_adm(20,iz,25,15),iz = 1,20) / &
     & 0.5116900E+00, 0.5116900E+00, 0.5181200E+00, 0.5169700E+00, &
     & 0.5190100E+00, 0.5224200E+00, 0.5285100E+00, 0.5399300E+00, &
     & 0.5512400E+00, 0.5604400E+00, 0.5728000E+00, 0.5803700E+00, &
     & 0.5854400E+00, 0.5922500E+00, 0.6065700E+00, 0.6099400E+00, &
     & 0.6240600E+00, 0.5821184E+00, 0.5558783E+00, 0.5558783E+00 /
      data (ref_adm(20,iz,26,15),iz = 1,20) / &
     & 0.5111600E+00, 0.5111600E+00, 0.5088400E+00, 0.5066400E+00, &
     & 0.5170700E+00, 0.5195500E+00, 0.5342700E+00, 0.5421700E+00, &
     & 0.5531100E+00, 0.5598000E+00, 0.5676500E+00, 0.5771500E+00, &
     & 0.5934900E+00, 0.6086500E+00, 0.6166300E+00, 0.6251400E+00, &
     & 0.6157900E+00, 0.5983000E+00, 0.5680891E+00, 0.5680891E+00 /
      data (ref_adm(20,iz,27,15),iz = 1,20) / &
     & 0.5062200E+00, 0.5062200E+00, 0.5104100E+00, 0.5028600E+00, &
     & 0.5200100E+00, 0.5311000E+00, 0.5242200E+00, 0.5362400E+00, &
     & 0.5499300E+00, 0.5540800E+00, 0.5657900E+00, 0.5728300E+00, &
     & 0.5997900E+00, 0.6062000E+00, 0.6226200E+00, 0.6386700E+00, &
     & 0.6445100E+00, 0.6321600E+00, 0.5491400E+00, 0.5491400E+00 /
      data (ref_adm(20,iz,28,15),iz = 1,20) / &
     & 0.5024500E+00, 0.5024500E+00, 0.5020700E+00, 0.5121200E+00, &
     & 0.5197900E+00, 0.5235900E+00, 0.5363300E+00, 0.5391800E+00, &
     & 0.5502300E+00, 0.5643800E+00, 0.5778700E+00, 0.5904700E+00, &
     & 0.6079000E+00, 0.6237500E+00, 0.6375600E+00, 0.6524000E+00, &
     & 0.6565900E+00, 0.6582600E+00, 0.5776200E+00, 0.5776200E+00 /
      data (ref_adm(20,iz,29,15),iz = 1,20) / &
     & 0.5042700E+00, 0.5042700E+00, 0.5014600E+00, 0.5076600E+00, &
     & 0.5204900E+00, 0.5207000E+00, 0.5319000E+00, 0.5425600E+00, &
     & 0.5548300E+00, 0.5637600E+00, 0.5833700E+00, 0.6059200E+00, &
     & 0.6270400E+00, 0.6428400E+00, 0.6664100E+00, 0.6842200E+00, &
     & 0.6979100E+00, 0.6802900E+00, 0.5861800E+00, 0.5861800E+00 /
      data (ref_adm(20,iz,30,15),iz = 1,20) / &
     & 0.5036300E+00, 0.5036300E+00, 0.5020900E+00, 0.5049600E+00, &
     & 0.5146400E+00, 0.5282000E+00, 0.5285900E+00, 0.5407800E+00, &
     & 0.5599500E+00, 0.5804800E+00, 0.5990400E+00, 0.6200100E+00, &
     & 0.6396600E+00, 0.6532900E+00, 0.6721500E+00, 0.6901700E+00, &
     & 0.7001100E+00, 0.6943800E+00, 0.5989800E+00, 0.5989800E+00 /
      data (ref_adm(20,iz,31,15),iz = 1,20) / &
     & 0.5019000E+00, 0.5019000E+00, 0.5010100E+00, 0.5090500E+00, &
     & 0.5128700E+00, 0.5181600E+00, 0.5310600E+00, 0.5443700E+00, &
     & 0.5678200E+00, 0.5945900E+00, 0.6041700E+00, 0.6227700E+00, &
     & 0.6368300E+00, 0.6528500E+00, 0.6706000E+00, 0.7076000E+00, &
     & 0.7165700E+00, 0.6927100E+00, 0.6080900E+00, 0.6080900E+00 /
      data (ref_adm(20,iz,32,15),iz = 1,20) / &
     & 0.5057000E+00, 0.5057000E+00, 0.5149400E+00, 0.5181400E+00, &
     & 0.5191200E+00, 0.5253600E+00, 0.5376500E+00, 0.5553200E+00, &
     & 0.5800200E+00, 0.6049900E+00, 0.6166600E+00, 0.6258900E+00, &
     & 0.6431500E+00, 0.6643700E+00, 0.6803700E+00, 0.7007200E+00, &
     & 0.7175200E+00, 0.7108100E+00, 0.6128100E+00, 0.6128100E+00 /
      data (ref_adm(20,iz,33,15),iz = 1,20) / &
     & 0.5096200E+00, 0.5096200E+00, 0.5052700E+00, 0.5007600E+00, &
     & 0.5072900E+00, 0.5205300E+00, 0.5329600E+00, 0.5531700E+00, &
     & 0.5767300E+00, 0.5882700E+00, 0.6019200E+00, 0.6154400E+00, &
     & 0.6275600E+00, 0.6501000E+00, 0.6736100E+00, 0.6900200E+00, &
     & 0.7047300E+00, 0.7187900E+00, 0.6042400E+00, 0.6042400E+00 /
      data (ref_adm(20,iz,34,15),iz = 1,20) / &
     & 0.5084600E+00, 0.5084600E+00, 0.5019200E+00, 0.5125800E+00, &
     & 0.5197800E+00, 0.5194700E+00, 0.5347300E+00, 0.5590500E+00, &
     & 0.5827800E+00, 0.5924700E+00, 0.6043200E+00, 0.6279200E+00, &
     & 0.6401400E+00, 0.6752400E+00, 0.6835000E+00, 0.7135600E+00, &
     & 0.7356400E+00, 0.7480600E+00, 0.5936700E+00, 0.5936700E+00 /
      data (ref_adm(20,iz,35,15),iz = 1,20) / &
     & 0.5067800E+00, 0.5067800E+00, 0.5115900E+00, 0.5162700E+00, &
     & 0.5082500E+00, 0.5239900E+00, 0.5356300E+00, 0.5643800E+00, &
     & 0.5843800E+00, 0.5970300E+00, 0.6115600E+00, 0.6284500E+00, &
     & 0.6492200E+00, 0.6768200E+00, 0.6995600E+00, 0.7224700E+00, &
     & 0.7375400E+00, 0.7157300E+00, 0.6207200E+00, 0.6207200E+00 /
      data (ref_adm(20,iz,36,15),iz = 1,20) / &
     & 0.4949400E+00, 0.4949400E+00, 0.5070800E+00, 0.5035100E+00, &
     & 0.5121900E+00, 0.5228600E+00, 0.5329200E+00, 0.5645100E+00, &
     & 0.5877400E+00, 0.5972200E+00, 0.6138300E+00, 0.6313600E+00, &
     & 0.6511700E+00, 0.6775300E+00, 0.7137100E+00, 0.7401300E+00, &
     & 0.7494700E+00, 0.7251400E+00, 0.6180900E+00, 0.6180900E+00 /
      data (ref_adm(20,iz,37,15),iz = 1,20) / &
     & 0.5034300E+00, 0.5034300E+00, 0.5051100E+00, 0.5090600E+00, &
     & 0.4991100E+00, 0.5163100E+00, 0.5411800E+00, 0.5609700E+00, &
     & 0.5726500E+00, 0.5963000E+00, 0.6071000E+00, 0.6316000E+00, &
     & 0.6549400E+00, 0.6923600E+00, 0.7268400E+00, 0.7758200E+00, &
     & 0.7822200E+00, 0.7353700E+00, 0.6224100E+00, 0.6224100E+00 /
      data (ref_adm(20,iz,38,15),iz = 1,20) / &
     & 0.5034300E+00, 0.5034300E+00, 0.5051100E+00, 0.5090600E+00, &
     & 0.4991100E+00, 0.5163100E+00, 0.5411800E+00, 0.5609700E+00, &
     & 0.5726500E+00, 0.5963000E+00, 0.6071000E+00, 0.6316000E+00, &
     & 0.6549400E+00, 0.6923600E+00, 0.7268400E+00, 0.7758200E+00, &
     & 0.7822200E+00, 0.7353700E+00, 0.6224100E+00, 0.6224100E+00 /
! Solar Zenith Angle 75.0 Albedo  0.6663363E+00
      data (ref_adm(20,iz, 1,16),iz = 1,20) / &
     & 0.4934700E+00, 0.4934700E+00, 0.5112400E+00, 0.5178900E+00, &
     & 0.5296800E+00, 0.5559000E+00, 0.5836400E+00, 0.6157600E+00, &
     & 0.6552200E+00, 0.7198400E+00, 0.8201500E+00, 0.9532000E+00, &
     & 0.1117000E+01, 0.1249000E+01, 0.1506985E+01, 0.2027826E+01, &
     & 0.2856107E+01, 0.4068194E+01, 0.1986018E+01, 0.1986018E+01 /
      data (ref_adm(20,iz, 2,16),iz = 1,20) / &
     & 0.4934700E+00, 0.4934700E+00, 0.5112400E+00, 0.5178900E+00, &
     & 0.5296800E+00, 0.5559000E+00, 0.5836400E+00, 0.6157600E+00, &
     & 0.6552200E+00, 0.7198400E+00, 0.8201500E+00, 0.9532000E+00, &
     & 0.1117000E+01, 0.1249000E+01, 0.1506985E+01, 0.2027826E+01, &
     & 0.2856107E+01, 0.4068194E+01, 0.1986018E+01, 0.1986018E+01 /
      data (ref_adm(20,iz, 3,16),iz = 1,20) / &
     & 0.4867300E+00, 0.4867300E+00, 0.5027700E+00, 0.5090200E+00, &
     & 0.5327200E+00, 0.5595800E+00, 0.5809100E+00, 0.6117500E+00, &
     & 0.6575800E+00, 0.7192600E+00, 0.8178700E+00, 0.9543200E+00, &
     & 0.1090000E+01, 0.1216800E+01, 0.1478546E+01, 0.1966368E+01, &
     & 0.2699686E+01, 0.4109611E+01, 0.2067861E+01, 0.2067861E+01 /
      data (ref_adm(20,iz, 4,16),iz = 1,20) / &
     & 0.4922500E+00, 0.4922500E+00, 0.5014600E+00, 0.5105700E+00, &
     & 0.5223400E+00, 0.5480200E+00, 0.5720500E+00, 0.6021700E+00, &
     & 0.6616200E+00, 0.7224400E+00, 0.8137600E+00, 0.9274500E+00, &
     & 0.1070500E+01, 0.1099900E+01, 0.1421602E+01, 0.1843065E+01, &
     & 0.2418794E+01, 0.3641867E+01, 0.2732619E+01, 0.2732619E+01 /
      data (ref_adm(20,iz, 5,16),iz = 1,20) / &
     & 0.4890200E+00, 0.4890200E+00, 0.5031100E+00, 0.5134900E+00, &
     & 0.5244800E+00, 0.5339800E+00, 0.5672100E+00, 0.6139000E+00, &
     & 0.6589300E+00, 0.7111500E+00, 0.7878800E+00, 0.8985900E+00, &
     & 0.1017700E+01, 0.1119100E+01, 0.1351269E+01, 0.1692359E+01, &
     & 0.2120440E+01, 0.2800542E+01, 0.2869096E+01, 0.2869096E+01 /
      data (ref_adm(20,iz, 6,16),iz = 1,20) / &
     & 0.4812200E+00, 0.4812200E+00, 0.4910700E+00, 0.5002600E+00, &
     & 0.5131100E+00, 0.5327400E+00, 0.5600400E+00, 0.5931000E+00, &
     & 0.6396300E+00, 0.6964200E+00, 0.7665600E+00, 0.8621700E+00, &
     & 0.9661000E+00, 0.1124100E+01, 0.1356200E+01, 0.1632600E+01, &
     & 0.1814100E+01, 0.1927100E+01, 0.2022127E+01, 0.2022127E+01 /
      data (ref_adm(20,iz, 7,16),iz = 1,20) / &
     & 0.4947600E+00, 0.4947600E+00, 0.5043500E+00, 0.5096300E+00, &
     & 0.5199700E+00, 0.5443600E+00, 0.5673300E+00, 0.6019500E+00, &
     & 0.6445800E+00, 0.6914500E+00, 0.7552500E+00, 0.8419900E+00, &
     & 0.9618100E+00, 0.1096100E+01, 0.1252300E+01, 0.1497800E+01, &
     & 0.1689000E+01, 0.1723800E+01, 0.1570814E+01, 0.1570814E+01 /
      data (ref_adm(20,iz, 8,16),iz = 1,20) / &
     & 0.4914100E+00, 0.4914100E+00, 0.5024600E+00, 0.5106000E+00, &
     & 0.5191900E+00, 0.5340300E+00, 0.5686100E+00, 0.5861400E+00, &
     & 0.6364600E+00, 0.6798100E+00, 0.7285600E+00, 0.8101400E+00, &
     & 0.9087000E+00, 0.1047500E+01, 0.1173900E+01, 0.1391900E+01, &
     & 0.1540300E+01, 0.1513800E+01, 0.1221700E+01, 0.1221700E+01 /
      data (ref_adm(20,iz, 9,16),iz = 1,20) / &
     & 0.4971800E+00, 0.4971800E+00, 0.4973000E+00, 0.5042600E+00, &
     & 0.5118300E+00, 0.5303700E+00, 0.5631300E+00, 0.5867800E+00, &
     & 0.6141100E+00, 0.6563700E+00, 0.7083100E+00, 0.7770200E+00, &
     & 0.8624400E+00, 0.9721800E+00, 0.1109400E+01, 0.1274800E+01, &
     & 0.1407700E+01, 0.1407200E+01, 0.1255200E+01, 0.1255200E+01 /
      data (ref_adm(20,iz,10,16),iz = 1,20) / &
     & 0.4901900E+00, 0.4901900E+00, 0.4978400E+00, 0.5075400E+00, &
     & 0.5062400E+00, 0.5315900E+00, 0.5446800E+00, 0.5794600E+00, &
     & 0.6171100E+00, 0.6489300E+00, 0.6926900E+00, 0.7558200E+00, &
     & 0.8233900E+00, 0.9217600E+00, 0.1016800E+01, 0.1130900E+01, &
     & 0.1283100E+01, 0.1200900E+01, 0.1105800E+01, 0.1105800E+01 /
      data (ref_adm(20,iz,11,16),iz = 1,20) / &
     & 0.4956600E+00, 0.4956600E+00, 0.4990800E+00, 0.5041100E+00, &
     & 0.5114500E+00, 0.5290000E+00, 0.5518100E+00, 0.5678500E+00, &
     & 0.6026000E+00, 0.6379800E+00, 0.6750900E+00, 0.7292500E+00, &
     & 0.7956100E+00, 0.8690400E+00, 0.9435900E+00, 0.1045500E+01, &
     & 0.1124700E+01, 0.1064900E+01, 0.1055049E+01, 0.1055049E+01 /
      data (ref_adm(20,iz,12,16),iz = 1,20) / &
     & 0.4938100E+00, 0.4938100E+00, 0.4950200E+00, 0.5007400E+00, &
     & 0.5163000E+00, 0.5260700E+00, 0.5326700E+00, 0.5537400E+00, &
     & 0.5809500E+00, 0.6201600E+00, 0.6493300E+00, 0.6886700E+00, &
     & 0.7483500E+00, 0.8167700E+00, 0.8912700E+00, 0.9624400E+00, &
     & 0.1041000E+01, 0.9795400E+00, 0.9841745E+00, 0.9841745E+00 /
      data (ref_adm(20,iz,13,16),iz = 1,20) / &
     & 0.4907300E+00, 0.4907300E+00, 0.4933600E+00, 0.5064800E+00, &
     & 0.5125000E+00, 0.5308100E+00, 0.5456400E+00, 0.5470600E+00, &
     & 0.5783600E+00, 0.5998500E+00, 0.6372100E+00, 0.6626800E+00, &
     & 0.7277100E+00, 0.7712300E+00, 0.8308600E+00, 0.8911700E+00, &
     & 0.9482200E+00, 0.8908000E+00, 0.8270200E+00, 0.8270200E+00 /
      data (ref_adm(20,iz,14,16),iz = 1,20) / &
     & 0.5028700E+00, 0.5028700E+00, 0.5094500E+00, 0.5123900E+00, &
     & 0.5223600E+00, 0.5313700E+00, 0.5467300E+00, 0.5637400E+00, &
     & 0.5796200E+00, 0.5998600E+00, 0.6272800E+00, 0.6596300E+00, &
     & 0.6893200E+00, 0.7406200E+00, 0.7747400E+00, 0.8435000E+00, &
     & 0.8854200E+00, 0.8505700E+00, 0.8919085E+00, 0.8919085E+00 /
      data (ref_adm(20,iz,15,16),iz = 1,20) / &
     & 0.4991500E+00, 0.4991500E+00, 0.4870600E+00, 0.4911400E+00, &
     & 0.4973700E+00, 0.5093200E+00, 0.5239100E+00, 0.5379600E+00, &
     & 0.5590800E+00, 0.5833300E+00, 0.6054500E+00, 0.6365000E+00, &
     & 0.6702500E+00, 0.7140200E+00, 0.7346800E+00, 0.7854000E+00, &
     & 0.8030100E+00, 0.8332700E+00, 0.8590237E+00, 0.8590237E+00 /
      data (ref_adm(20,iz,16,16),iz = 1,20) / &
     & 0.4774800E+00, 0.4774800E+00, 0.4734900E+00, 0.4784300E+00, &
     & 0.4831300E+00, 0.4977400E+00, 0.5131900E+00, 0.5229300E+00, &
     & 0.5444000E+00, 0.5547700E+00, 0.5787700E+00, 0.6015400E+00, &
     & 0.6292400E+00, 0.6659800E+00, 0.7078500E+00, 0.7482000E+00, &
     & 0.7889100E+00, 0.8449709E+00, 0.8296733E+00, 0.8296733E+00 /
      data (ref_adm(20,iz,17,16),iz = 1,20) / &
     & 0.4833400E+00, 0.4833400E+00, 0.4863100E+00, 0.4952000E+00, &
     & 0.4928200E+00, 0.5059200E+00, 0.5170000E+00, 0.5372800E+00, &
     & 0.5412300E+00, 0.5473100E+00, 0.5739100E+00, 0.5882700E+00, &
     & 0.6254100E+00, 0.6607400E+00, 0.6836900E+00, 0.7019800E+00, &
     & 0.6689900E+00, 0.8069246E+00, 0.8009532E+00, 0.8009532E+00 /
      data (ref_adm(20,iz,18,16),iz = 1,20) / &
     & 0.4813500E+00, 0.4813500E+00, 0.4805200E+00, 0.4882600E+00, &
     & 0.4862100E+00, 0.5087800E+00, 0.5169000E+00, 0.5346000E+00, &
     & 0.5275900E+00, 0.5489100E+00, 0.5593900E+00, 0.5894200E+00, &
     & 0.6071400E+00, 0.6221400E+00, 0.6414400E+00, 0.6826900E+00, &
     & 0.7242947E+00, 0.7383370E+00, 0.7003388E+00, 0.7003388E+00 /
      data (ref_adm(20,iz,19,16),iz = 1,20) / &
     & 0.4860600E+00, 0.4860600E+00, 0.4836400E+00, 0.4924400E+00, &
     & 0.4924200E+00, 0.4985400E+00, 0.5121300E+00, 0.5191000E+00, &
     & 0.5264200E+00, 0.5411200E+00, 0.5454700E+00, 0.5814300E+00, &
     & 0.6115900E+00, 0.6144900E+00, 0.6363000E+00, 0.6659800E+00, &
     & 0.7015984E+00, 0.7138246E+00, 0.6844135E+00, 0.6844135E+00 /
      data (ref_adm(20,iz,20,16),iz = 1,20) / &
     & 0.4834400E+00, 0.4834400E+00, 0.4918700E+00, 0.4897800E+00, &
     & 0.4873300E+00, 0.4880700E+00, 0.4923600E+00, 0.4971800E+00, &
     & 0.5180500E+00, 0.5269700E+00, 0.5414600E+00, 0.5629200E+00, &
     & 0.5905900E+00, 0.5984900E+00, 0.6355300E+00, 0.7028300E+00, &
     & 0.6840951E+00, 0.6963487E+00, 0.6753960E+00, 0.6753960E+00 /
      data (ref_adm(20,iz,21,16),iz = 1,20) / &
     & 0.4980100E+00, 0.4980100E+00, 0.4982700E+00, 0.4898700E+00, &
     & 0.4866100E+00, 0.4874800E+00, 0.4941000E+00, 0.5003500E+00, &
     & 0.5129400E+00, 0.5236100E+00, 0.5413000E+00, 0.5627200E+00, &
     & 0.5765200E+00, 0.6051300E+00, 0.6177200E+00, 0.7218200E+00, &
     & 0.6691449E+00, 0.6819420E+00, 0.6711444E+00, 0.6711444E+00 /
      data (ref_adm(20,iz,22,16),iz = 1,20) / &
     & 0.4960500E+00, 0.4960500E+00, 0.4871900E+00, 0.4827400E+00, &
     & 0.4825300E+00, 0.4841500E+00, 0.4939600E+00, 0.4993100E+00, &
     & 0.5179200E+00, 0.5345900E+00, 0.5453200E+00, 0.5566000E+00, &
     & 0.5685400E+00, 0.5807100E+00, 0.6069400E+00, 0.6493600E+00, &
     & 0.6320506E+00, 0.6308209E+00, 0.6055825E+00, 0.6055825E+00 /
      data (ref_adm(20,iz,23,16),iz = 1,20) / &
     & 0.4808800E+00, 0.4808800E+00, 0.4849800E+00, 0.4968200E+00, &
     & 0.4904200E+00, 0.4937700E+00, 0.4997700E+00, 0.5170500E+00, &
     & 0.5245200E+00, 0.5321700E+00, 0.5450500E+00, 0.5513500E+00, &
     & 0.5679500E+00, 0.5878400E+00, 0.6061100E+00, 0.6152200E+00, &
     & 0.6255373E+00, 0.6253285E+00, 0.6099063E+00, 0.6099063E+00 /
      data (ref_adm(20,iz,24,16),iz = 1,20) / &
     & 0.4721200E+00, 0.4721200E+00, 0.4738700E+00, 0.4773500E+00, &
     & 0.4778400E+00, 0.4840600E+00, 0.4880000E+00, 0.4961000E+00, &
     & 0.5075900E+00, 0.5167600E+00, 0.5345200E+00, 0.5501300E+00, &
     & 0.5653400E+00, 0.5787500E+00, 0.5894900E+00, 0.6017600E+00, &
     & 0.6111700E+00, 0.6240297E+00, 0.6185584E+00, 0.6185584E+00 /
      data (ref_adm(20,iz,25,16),iz = 1,20) / &
     & 0.4943000E+00, 0.4943000E+00, 0.4983800E+00, 0.4994000E+00, &
     & 0.5048800E+00, 0.5109600E+00, 0.5149000E+00, 0.5186300E+00, &
     & 0.5324700E+00, 0.5413300E+00, 0.5499300E+00, 0.5668600E+00, &
     & 0.5832000E+00, 0.6125700E+00, 0.6225300E+00, 0.6326100E+00, &
     & 0.6570200E+00, 0.6266429E+00, 0.6304395E+00, 0.6304395E+00 /
      data (ref_adm(20,iz,26,16),iz = 1,20) / &
     & 0.4932500E+00, 0.4932500E+00, 0.4830900E+00, 0.4892000E+00, &
     & 0.4913000E+00, 0.4924800E+00, 0.5002300E+00, 0.5153400E+00, &
     & 0.5266600E+00, 0.5342300E+00, 0.5517800E+00, 0.5661400E+00, &
     & 0.5859600E+00, 0.6072300E+00, 0.6234100E+00, 0.6419200E+00, &
     & 0.6607200E+00, 0.6892500E+00, 0.6473464E+00, 0.6473464E+00 /
      data (ref_adm(20,iz,27,16),iz = 1,20) / &
     & 0.4874500E+00, 0.4874500E+00, 0.4842700E+00, 0.4838700E+00, &
     & 0.4924700E+00, 0.5001900E+00, 0.5016600E+00, 0.5166500E+00, &
     & 0.5180400E+00, 0.5350800E+00, 0.5466400E+00, 0.5673000E+00, &
     & 0.5885000E+00, 0.6251300E+00, 0.6404100E+00, 0.6678200E+00, &
     & 0.6891500E+00, 0.7090600E+00, 0.6465300E+00, 0.6465300E+00 /
      data (ref_adm(20,iz,28,16),iz = 1,20) / &
     & 0.4896200E+00, 0.4896200E+00, 0.4839700E+00, 0.4966800E+00, &
     & 0.4904400E+00, 0.4984200E+00, 0.5014400E+00, 0.5078400E+00, &
     & 0.5248200E+00, 0.5418800E+00, 0.5530500E+00, 0.5731200E+00, &
     & 0.6011700E+00, 0.6310500E+00, 0.6465100E+00, 0.6926100E+00, &
     & 0.7075100E+00, 0.7158100E+00, 0.6518100E+00, 0.6518100E+00 /
      data (ref_adm(20,iz,29,16),iz = 1,20) / &
     & 0.4861000E+00, 0.4861000E+00, 0.4898500E+00, 0.4899500E+00, &
     & 0.5020100E+00, 0.5023000E+00, 0.5045200E+00, 0.5142500E+00, &
     & 0.5165700E+00, 0.5373500E+00, 0.5696200E+00, 0.5870000E+00, &
     & 0.6199700E+00, 0.6554800E+00, 0.6763100E+00, 0.7135600E+00, &
     & 0.7393000E+00, 0.7547200E+00, 0.6455700E+00, 0.6455700E+00 /
      data (ref_adm(20,iz,30,16),iz = 1,20) / &
     & 0.4891500E+00, 0.4891500E+00, 0.4895800E+00, 0.4894400E+00, &
     & 0.4850200E+00, 0.5072700E+00, 0.4991400E+00, 0.5110100E+00, &
     & 0.5318000E+00, 0.5445500E+00, 0.5759900E+00, 0.6075800E+00, &
     & 0.6359700E+00, 0.6746000E+00, 0.6992400E+00, 0.7290200E+00, &
     & 0.7577400E+00, 0.7735700E+00, 0.6688200E+00, 0.6688200E+00 /
      data (ref_adm(20,iz,31,16),iz = 1,20) / &
     & 0.4898600E+00, 0.4898600E+00, 0.4954100E+00, 0.4903800E+00, &
     & 0.4961200E+00, 0.4991800E+00, 0.5064400E+00, 0.5065400E+00, &
     & 0.5304400E+00, 0.5523800E+00, 0.5842600E+00, 0.6179900E+00, &
     & 0.6359000E+00, 0.6793100E+00, 0.6889800E+00, 0.7140700E+00, &
     & 0.7569600E+00, 0.7957400E+00, 0.7395600E+00, 0.7395600E+00 /
      data (ref_adm(20,iz,32,16),iz = 1,20) / &
     & 0.4851400E+00, 0.4851400E+00, 0.4923600E+00, 0.4933400E+00, &
     & 0.4945800E+00, 0.5012900E+00, 0.5117900E+00, 0.5237100E+00, &
     & 0.5447800E+00, 0.5775600E+00, 0.6062700E+00, 0.6262600E+00, &
     & 0.6457900E+00, 0.6734200E+00, 0.6976400E+00, 0.7388700E+00, &
     & 0.7747700E+00, 0.8093600E+00, 0.7130700E+00, 0.7130700E+00 /
      data (ref_adm(20,iz,33,16),iz = 1,20) / &
     & 0.4891100E+00, 0.4891100E+00, 0.4844100E+00, 0.4889200E+00, &
     & 0.4920400E+00, 0.4994800E+00, 0.5086200E+00, 0.5291200E+00, &
     & 0.5425400E+00, 0.5678900E+00, 0.5883300E+00, 0.6081500E+00, &
     & 0.6311300E+00, 0.6668700E+00, 0.6989500E+00, 0.7330400E+00, &
     & 0.7799200E+00, 0.8081900E+00, 0.7164100E+00, 0.7164100E+00 /
      data (ref_adm(20,iz,34,16),iz = 1,20) / &
     & 0.4866500E+00, 0.4866500E+00, 0.4819700E+00, 0.4850900E+00, &
     & 0.4895800E+00, 0.4897100E+00, 0.5042300E+00, 0.5226300E+00, &
     & 0.5467700E+00, 0.5764500E+00, 0.5917100E+00, 0.6185100E+00, &
     & 0.6369700E+00, 0.6723600E+00, 0.7132500E+00, 0.7449900E+00, &
     & 0.7954700E+00, 0.8316300E+00, 0.7198300E+00, 0.7198300E+00 /
      data (ref_adm(20,iz,35,16),iz = 1,20) / &
     & 0.4886300E+00, 0.4886300E+00, 0.4859000E+00, 0.4871000E+00, &
     & 0.4917700E+00, 0.4981400E+00, 0.5066900E+00, 0.5268100E+00, &
     & 0.5530900E+00, 0.5775200E+00, 0.5998800E+00, 0.6210200E+00, &
     & 0.6426900E+00, 0.6897300E+00, 0.7192300E+00, 0.7733600E+00, &
     & 0.8121800E+00, 0.8364600E+00, 0.7307500E+00, 0.7307500E+00 /
      data (ref_adm(20,iz,36,16),iz = 1,20) / &
     & 0.4820200E+00, 0.4820200E+00, 0.4832500E+00, 0.4850000E+00, &
     & 0.4931300E+00, 0.5003000E+00, 0.5094500E+00, 0.5249000E+00, &
     & 0.5525900E+00, 0.5731600E+00, 0.5876800E+00, 0.6187300E+00, &
     & 0.6537800E+00, 0.6830100E+00, 0.7331900E+00, 0.7876300E+00, &
     & 0.8431400E+00, 0.8518400E+00, 0.7433000E+00, 0.7433000E+00 /
      data (ref_adm(20,iz,37,16),iz = 1,20) / &
     & 0.4862900E+00, 0.4862900E+00, 0.4921200E+00, 0.4895000E+00, &
     & 0.4860900E+00, 0.4906100E+00, 0.5088000E+00, 0.5263000E+00, &
     & 0.5582800E+00, 0.5765600E+00, 0.5914800E+00, 0.6216100E+00, &
     & 0.6522000E+00, 0.6887700E+00, 0.7386500E+00, 0.8164500E+00, &
     & 0.8848100E+00, 0.8899600E+00, 0.7657900E+00, 0.7657900E+00 /
      data (ref_adm(20,iz,38,16),iz = 1,20) / &
     & 0.4862900E+00, 0.4862900E+00, 0.4921200E+00, 0.4895000E+00, &
     & 0.4860900E+00, 0.4906100E+00, 0.5088000E+00, 0.5263000E+00, &
     & 0.5582800E+00, 0.5765600E+00, 0.5914800E+00, 0.6216100E+00, &
     & 0.6522000E+00, 0.6887700E+00, 0.7386500E+00, 0.8164500E+00, &
     & 0.8848100E+00, 0.8899600E+00, 0.7657900E+00, 0.7657900E+00 /
! Solar Zenith Angle 80.0 Albedo  0.6645298E+00
      data (ref_adm(20,iz, 1,17),iz = 1,20) / &
     & 0.4731100E+00, 0.4731100E+00, 0.4637900E+00, 0.4894500E+00, &
     & 0.5028200E+00, 0.5319000E+00, 0.5766000E+00, 0.6109600E+00, &
     & 0.6533300E+00, 0.7230200E+00, 0.8294600E+00, 0.9551000E+00, &
     & 0.1070231E+01, 0.1227005E+01, 0.1514056E+01, 0.2037343E+01, &
     & 0.2869511E+01, 0.4087286E+01, 0.1995339E+01, 0.1995339E+01 /
      data (ref_adm(20,iz, 2,17),iz = 1,20) / &
     & 0.4731100E+00, 0.4731100E+00, 0.4637900E+00, 0.4894500E+00, &
     & 0.5028200E+00, 0.5319000E+00, 0.5766000E+00, 0.6109600E+00, &
     & 0.6533300E+00, 0.7230200E+00, 0.8294600E+00, 0.9551000E+00, &
     & 0.1070231E+01, 0.1227005E+01, 0.1514056E+01, 0.2037343E+01, &
     & 0.2869511E+01, 0.4087286E+01, 0.1995339E+01, 0.1995339E+01 /
      data (ref_adm(20,iz, 3,17),iz = 1,20) / &
     & 0.4719800E+00, 0.4719800E+00, 0.4852900E+00, 0.4871800E+00, &
     & 0.4982900E+00, 0.5500700E+00, 0.5778900E+00, 0.6000600E+00, &
     & 0.6545500E+00, 0.7134400E+00, 0.8227200E+00, 0.9543400E+00, &
     & 0.1060449E+01, 0.1214002E+01, 0.1485484E+01, 0.1975595E+01, &
     & 0.2712354E+01, 0.4128895E+01, 0.2077566E+01, 0.2077566E+01 /
      data (ref_adm(20,iz, 4,17),iz = 1,20) / &
     & 0.4771000E+00, 0.4771000E+00, 0.4810600E+00, 0.4977700E+00, &
     & 0.5115900E+00, 0.5303700E+00, 0.5743600E+00, 0.6138800E+00, &
     & 0.6437600E+00, 0.7227400E+00, 0.8167300E+00, 0.9360000E+00, &
     & 0.1039130E+01, 0.1187899E+01, 0.1428274E+01, 0.1851715E+01, &
     & 0.2430146E+01, 0.3658956E+01, 0.2745444E+01, 0.2745444E+01 /
      data (ref_adm(20,iz, 5,17),iz = 1,20) / &
     & 0.4746300E+00, 0.4746300E+00, 0.4835400E+00, 0.4866200E+00, &
     & 0.5171100E+00, 0.5298700E+00, 0.5578800E+00, 0.6125000E+00, &
     & 0.6477600E+00, 0.7029700E+00, 0.7854600E+00, 0.8985900E+00, &
     & 0.1009360E+01, 0.1152274E+01, 0.1357610E+01, 0.1700301E+01, &
     & 0.2130391E+01, 0.2813683E+01, 0.2882560E+01, 0.2882560E+01 /
      data (ref_adm(20,iz, 6,17),iz = 1,20) / &
     & 0.4696500E+00, 0.4696500E+00, 0.4777100E+00, 0.4895600E+00, &
     & 0.4998300E+00, 0.5143300E+00, 0.5432400E+00, 0.5808000E+00, &
     & 0.6336000E+00, 0.6894900E+00, 0.7712900E+00, 0.8788800E+00, &
     & 0.1050000E+01, 0.1326300E+01, 0.1645800E+01, 0.2034800E+01, &
     & 0.2254100E+01, 0.2219814E+01, 0.2031617E+01, 0.2031617E+01 /
      data (ref_adm(20,iz, 7,17),iz = 1,20) / &
     & 0.4628600E+00, 0.4628600E+00, 0.4762000E+00, 0.4915500E+00, &
     & 0.5099200E+00, 0.5250200E+00, 0.5585000E+00, 0.5966100E+00, &
     & 0.6240700E+00, 0.6763500E+00, 0.7520500E+00, 0.8270200E+00, &
     & 0.9185700E+00, 0.1150100E+01, 0.1314500E+01, 0.1558800E+01, &
     & 0.1950500E+01, 0.2028400E+01, 0.1972700E+01, 0.1972700E+01 /
      data (ref_adm(20,iz, 8,17),iz = 1,20) / &
     & 0.4667600E+00, 0.4667600E+00, 0.4846100E+00, 0.4870100E+00, &
     & 0.4860600E+00, 0.5095600E+00, 0.5609900E+00, 0.5844500E+00, &
     & 0.6129000E+00, 0.6726700E+00, 0.7433600E+00, 0.8100500E+00, &
     & 0.9505900E+00, 0.1083000E+01, 0.1243200E+01, 0.1431900E+01, &
     & 0.1696000E+01, 0.1784400E+01, 0.1527200E+01, 0.1527200E+01 /
      data (ref_adm(20,iz, 9,17),iz = 1,20) / &
     & 0.4903800E+00, 0.4903800E+00, 0.4840200E+00, 0.4847200E+00, &
     & 0.4868900E+00, 0.5155500E+00, 0.5423200E+00, 0.5731500E+00, &
     & 0.6076900E+00, 0.6507100E+00, 0.7285900E+00, 0.7887400E+00, &
     & 0.8790200E+00, 0.1002100E+01, 0.1110500E+01, 0.1321700E+01, &
     & 0.1532000E+01, 0.1680600E+01, 0.1609800E+01, 0.1609800E+01 /
      data (ref_adm(20,iz,10,17),iz = 1,20) / &
     & 0.4745600E+00, 0.4745600E+00, 0.4899500E+00, 0.4947400E+00, &
     & 0.5008200E+00, 0.5157300E+00, 0.5322200E+00, 0.5520800E+00, &
     & 0.5872200E+00, 0.6511900E+00, 0.6839800E+00, 0.7486800E+00, &
     & 0.8297900E+00, 0.9528700E+00, 0.1035500E+01, 0.1227500E+01, &
     & 0.1408300E+01, 0.1407500E+01, 0.1143826E+01, 0.1143826E+01 /
      data (ref_adm(20,iz,11,17),iz = 1,20) / &
     & 0.4808200E+00, 0.4808200E+00, 0.4853000E+00, 0.4963900E+00, &
     & 0.5113500E+00, 0.5197800E+00, 0.5151800E+00, 0.5426500E+00, &
     & 0.5805600E+00, 0.6182300E+00, 0.6538800E+00, 0.6964700E+00, &
     & 0.7842100E+00, 0.8894500E+00, 0.9764000E+00, 0.1156700E+01, &
     & 0.1253100E+01, 0.1295500E+01, 0.1122600E+01, 0.1122600E+01 /
      data (ref_adm(20,iz,12,17),iz = 1,20) / &
     & 0.4800100E+00, 0.4800100E+00, 0.4770800E+00, 0.4868300E+00, &
     & 0.4964000E+00, 0.4996200E+00, 0.5224500E+00, 0.5483900E+00, &
     & 0.5763200E+00, 0.6117600E+00, 0.6322200E+00, 0.6713800E+00, &
     & 0.7540000E+00, 0.8417900E+00, 0.9200100E+00, 0.1047500E+01, &
     & 0.1134400E+01, 0.1109200E+01, 0.1002800E+01, 0.1002800E+01 /
      data (ref_adm(20,iz,13,17),iz = 1,20) / &
     & 0.4735900E+00, 0.4735900E+00, 0.4825400E+00, 0.4819800E+00, &
     & 0.4816200E+00, 0.4886300E+00, 0.5084600E+00, 0.5359900E+00, &
     & 0.5559200E+00, 0.5814600E+00, 0.6008200E+00, 0.6448900E+00, &
     & 0.7164900E+00, 0.7911600E+00, 0.8611600E+00, 0.9730700E+00, &
     & 0.1003100E+01, 0.1059200E+01, 0.8908100E+00, 0.8908100E+00 /
      data (ref_adm(20,iz,14,17),iz = 1,20) / &
     & 0.4898100E+00, 0.4898100E+00, 0.4934500E+00, 0.5008600E+00, &
     & 0.5087800E+00, 0.5135200E+00, 0.5308900E+00, 0.5564600E+00, &
     & 0.5752200E+00, 0.5898100E+00, 0.6192800E+00, 0.6545900E+00, &
     & 0.6989300E+00, 0.7380300E+00, 0.8021800E+00, 0.8651600E+00, &
     & 0.9639600E+00, 0.8816500E+00, 0.8960939E+00, 0.8960939E+00 /
      data (ref_adm(20,iz,15,17),iz = 1,20) / &
     & 0.4823200E+00, 0.4823200E+00, 0.4676300E+00, 0.4747900E+00, &
     & 0.4856400E+00, 0.4954500E+00, 0.5056400E+00, 0.5219600E+00, &
     & 0.5407600E+00, 0.5574900E+00, 0.5802400E+00, 0.6198000E+00, &
     & 0.6624200E+00, 0.7126000E+00, 0.7381800E+00, 0.8125500E+00, &
     & 0.8520100E+00, 0.8890954E+00, 0.8630549E+00, 0.8630549E+00 /
      data (ref_adm(20,iz,16,17),iz = 1,20) / &
     & 0.4658300E+00, 0.4658300E+00, 0.4668000E+00, 0.4678500E+00, &
     & 0.4729500E+00, 0.4790700E+00, 0.4897500E+00, 0.5067600E+00, &
     & 0.5230400E+00, 0.5411600E+00, 0.5659300E+00, 0.5934500E+00, &
     & 0.6246100E+00, 0.6628600E+00, 0.7131800E+00, 0.7636600E+00, &
     & 0.7840400E+00, 0.8489363E+00, 0.8335667E+00, 0.8335667E+00 /
      data (ref_adm(20,iz,17,17),iz = 1,20) / &
     & 0.4681400E+00, 0.4681400E+00, 0.4842500E+00, 0.4899800E+00, &
     & 0.4957600E+00, 0.4957900E+00, 0.4944300E+00, 0.5006900E+00, &
     & 0.5181500E+00, 0.5397200E+00, 0.5588400E+00, 0.5878400E+00, &
     & 0.6160000E+00, 0.6737000E+00, 0.6769800E+00, 0.7323500E+00, &
     & 0.7977800E+00, 0.8107114E+00, 0.8047119E+00, 0.8047119E+00 /
      data (ref_adm(20,iz,18,17),iz = 1,20) / &
     & 0.4733000E+00, 0.4733000E+00, 0.4757700E+00, 0.4813400E+00, &
     & 0.4943900E+00, 0.4906600E+00, 0.4949400E+00, 0.5110000E+00, &
     & 0.5159700E+00, 0.5330700E+00, 0.5550900E+00, 0.5713700E+00, &
     & 0.6035200E+00, 0.6285600E+00, 0.6395600E+00, 0.7260000E+00, &
     & 0.7427127E+00, 0.7713804E+00, 0.7552466E+00, 0.7552466E+00 /
      data (ref_adm(20,iz,19,17),iz = 1,20) / &
     & 0.4674400E+00, 0.4674400E+00, 0.4537900E+00, 0.4590600E+00, &
     & 0.4619900E+00, 0.4628600E+00, 0.4931100E+00, 0.4858300E+00, &
     & 0.5002500E+00, 0.5226700E+00, 0.5473000E+00, 0.5662200E+00, &
     & 0.5767900E+00, 0.5934300E+00, 0.6331900E+00, 0.6740400E+00, &
     & 0.7180862E+00, 0.7444385E+00, 0.7372689E+00, 0.7372689E+00 /
      data (ref_adm(20,iz,20,17),iz = 1,20) / &
     & 0.4557700E+00, 0.4557700E+00, 0.4597000E+00, 0.4593100E+00, &
     & 0.4608400E+00, 0.4667400E+00, 0.4957600E+00, 0.4938700E+00, &
     & 0.5005500E+00, 0.5176800E+00, 0.5419300E+00, 0.5584800E+00, &
     & 0.5720300E+00, 0.5872500E+00, 0.6231300E+00, 0.6707915E+00, &
     & 0.6994025E+00, 0.7253060E+00, 0.7270835E+00, 0.7270835E+00 /
      data (ref_adm(20,iz,21,17),iz = 1,20) / &
     & 0.4551500E+00, 0.4551500E+00, 0.4601500E+00, 0.4655400E+00, &
     & 0.4851900E+00, 0.4754100E+00, 0.4901100E+00, 0.5093200E+00, &
     & 0.5039200E+00, 0.5093400E+00, 0.5485700E+00, 0.5550100E+00, &
     & 0.5571400E+00, 0.5726900E+00, 0.6079500E+00, 0.6180100E+00, &
     & 0.6835727E+00, 0.7096915E+00, 0.7224454E+00, 0.7224454E+00 /
      data (ref_adm(20,iz,22,17),iz = 1,20) / &
     & 0.4590600E+00, 0.4590600E+00, 0.4610500E+00, 0.4604300E+00, &
     & 0.4811300E+00, 0.4763200E+00, 0.4878000E+00, 0.5007200E+00, &
     & 0.5176000E+00, 0.5046500E+00, 0.5381500E+00, 0.5473900E+00, &
     & 0.5653200E+00, 0.5643700E+00, 0.5838900E+00, 0.6275700E+00, &
     & 0.6785893E+00, 0.7052440E+00, 0.7292051E+00, 0.7292051E+00 /
      data (ref_adm(20,iz,23,17),iz = 1,20) / &
     & 0.4722800E+00, 0.4722800E+00, 0.4761600E+00, 0.4806700E+00, &
     & 0.4824000E+00, 0.4721200E+00, 0.4854900E+00, 0.4873900E+00, &
     & 0.5161800E+00, 0.5028200E+00, 0.5373100E+00, 0.5574700E+00, &
     & 0.5685600E+00, 0.5967800E+00, 0.5899100E+00, 0.6200000E+00, &
     & 0.6702827E+00, 0.6977505E+00, 0.7347657E+00, 0.7347657E+00 /
      data (ref_adm(20,iz,24,17),iz = 1,20) / &
     & 0.4594100E+00, 0.4594100E+00, 0.4559000E+00, 0.4599200E+00, &
     & 0.4639100E+00, 0.4679800E+00, 0.4749400E+00, 0.4856800E+00, &
     & 0.4945700E+00, 0.5050700E+00, 0.5223800E+00, 0.5392200E+00, &
     & 0.5621200E+00, 0.5794400E+00, 0.5924400E+00, 0.6107100E+00, &
     & 0.6988800E+00, 0.6961437E+00, 0.7465009E+00, 0.7465009E+00 /
      data (ref_adm(20,iz,25,17),iz = 1,20) / &
     & 0.4760100E+00, 0.4760100E+00, 0.4821100E+00, 0.4889400E+00, &
     & 0.4942800E+00, 0.4997700E+00, 0.5018600E+00, 0.5082700E+00, &
     & 0.5094100E+00, 0.5238700E+00, 0.5362300E+00, 0.5535600E+00, &
     & 0.5811400E+00, 0.6038900E+00, 0.6179200E+00, 0.6497300E+00, &
     & 0.6816800E+00, 0.7564600E+00, 0.7628006E+00, 0.7628006E+00 /
      data (ref_adm(20,iz,26,17),iz = 1,20) / &
     & 0.4808200E+00, 0.4808200E+00, 0.4789600E+00, 0.4832700E+00, &
     & 0.4949400E+00, 0.4947400E+00, 0.4736800E+00, 0.4857000E+00, &
     & 0.4968600E+00, 0.5142900E+00, 0.5326400E+00, 0.5513000E+00, &
     & 0.5885200E+00, 0.6198800E+00, 0.6223500E+00, 0.6689400E+00, &
     & 0.7176900E+00, 0.7930500E+00, 0.7861060E+00, 0.7861060E+00 /
      data (ref_adm(20,iz,27,17),iz = 1,20) / &
     & 0.4754900E+00, 0.4754900E+00, 0.4748600E+00, 0.4651900E+00, &
     & 0.4692100E+00, 0.4970900E+00, 0.4982000E+00, 0.5123600E+00, &
     & 0.5014200E+00, 0.5090900E+00, 0.5286400E+00, 0.5548300E+00, &
     & 0.5804700E+00, 0.6178200E+00, 0.6439400E+00, 0.6811400E+00, &
     & 0.7248500E+00, 0.7538700E+00, 0.7510500E+00, 0.7510500E+00 /
      data (ref_adm(20,iz,28,17),iz = 1,20) / &
     & 0.4687700E+00, 0.4687700E+00, 0.4662100E+00, 0.4824300E+00, &
     & 0.4777200E+00, 0.4910200E+00, 0.4930300E+00, 0.5042300E+00, &
     & 0.5176200E+00, 0.5184000E+00, 0.5380100E+00, 0.5660300E+00, &
     & 0.5902700E+00, 0.6268500E+00, 0.6522800E+00, 0.6995800E+00, &
     & 0.7543200E+00, 0.8113100E+00, 0.7809300E+00, 0.7809300E+00 /
      data (ref_adm(20,iz,29,17),iz = 1,20) / &
     & 0.4745800E+00, 0.4745800E+00, 0.4722500E+00, 0.4740900E+00, &
     & 0.4806300E+00, 0.4794300E+00, 0.4867100E+00, 0.5107600E+00, &
     & 0.5195400E+00, 0.5237300E+00, 0.5337000E+00, 0.5711900E+00, &
     & 0.6000100E+00, 0.6387800E+00, 0.6596300E+00, 0.7145500E+00, &
     & 0.8145900E+00, 0.8715300E+00, 0.7390900E+00, 0.7390900E+00 /
      data (ref_adm(20,iz,30,17),iz = 1,20) / &
     & 0.4792700E+00, 0.4792700E+00, 0.4748100E+00, 0.4695700E+00, &
     & 0.4606500E+00, 0.4772500E+00, 0.4845900E+00, 0.5082500E+00, &
     & 0.5282500E+00, 0.5251600E+00, 0.5329300E+00, 0.5855500E+00, &
     & 0.6188500E+00, 0.6599400E+00, 0.6949000E+00, 0.7546500E+00, &
     & 0.8022300E+00, 0.8602400E+00, 0.9224308E+00, 0.9224308E+00 /
      data (ref_adm(20,iz,31,17),iz = 1,20) / &
     & 0.4734400E+00, 0.4734400E+00, 0.4785700E+00, 0.4688600E+00, &
     & 0.4711400E+00, 0.4812100E+00, 0.4861600E+00, 0.4981000E+00, &
     & 0.5190400E+00, 0.5385200E+00, 0.5544900E+00, 0.5976600E+00, &
     & 0.6322200E+00, 0.6823300E+00, 0.7080800E+00, 0.7435700E+00, &
     & 0.8174200E+00, 0.9201100E+00, 0.8749400E+00, 0.8749400E+00 /
      data (ref_adm(20,iz,32,17),iz = 1,20) / &
     & 0.4742900E+00, 0.4742900E+00, 0.4878500E+00, 0.4865600E+00, &
     & 0.4846700E+00, 0.4846600E+00, 0.4862300E+00, 0.5025500E+00, &
     & 0.5207700E+00, 0.5352500E+00, 0.5648800E+00, 0.5984000E+00, &
     & 0.6387500E+00, 0.6811600E+00, 0.6961100E+00, 0.7406700E+00, &
     & 0.8053300E+00, 0.8665500E+00, 0.8730800E+00, 0.8730800E+00 /
      data (ref_adm(20,iz,33,17),iz = 1,20) / &
     & 0.4718600E+00, 0.4718600E+00, 0.4631700E+00, 0.4668900E+00, &
     & 0.4704900E+00, 0.4719900E+00, 0.4823400E+00, 0.5049100E+00, &
     & 0.5236900E+00, 0.5338100E+00, 0.5625300E+00, 0.5894600E+00, &
     & 0.6326400E+00, 0.6704600E+00, 0.7154700E+00, 0.7777300E+00, &
     & 0.8854000E+00, 0.9810000E+00, 0.9245200E+00, 0.9245200E+00 /
      data (ref_adm(20,iz,34,17),iz = 1,20) / &
     & 0.4713900E+00, 0.4713900E+00, 0.4623400E+00, 0.4656600E+00, &
     & 0.4814500E+00, 0.4777000E+00, 0.4888800E+00, 0.4987900E+00, &
     & 0.5101500E+00, 0.5363200E+00, 0.5611800E+00, 0.5824000E+00, &
     & 0.6221800E+00, 0.6565900E+00, 0.7004200E+00, 0.7558100E+00, &
     & 0.8068000E+00, 0.9021900E+00, 0.8935300E+00, 0.8935300E+00 /
      data (ref_adm(20,iz,35,17),iz = 1,20) / &
     & 0.4581100E+00, 0.4581100E+00, 0.4591700E+00, 0.4625500E+00, &
     & 0.4645800E+00, 0.4741900E+00, 0.4892600E+00, 0.5048900E+00, &
     & 0.5128300E+00, 0.5480300E+00, 0.5816700E+00, 0.5918100E+00, &
     & 0.6343000E+00, 0.6728900E+00, 0.7077300E+00, 0.7681100E+00, &
     & 0.8627400E+00, 0.8754600E+00, 0.1020601E+01, 0.1020601E+01 /
      data (ref_adm(20,iz,36,17),iz = 1,20) / &
     & 0.4650500E+00, 0.4650500E+00, 0.4501900E+00, 0.4477500E+00, &
     & 0.4620300E+00, 0.4738300E+00, 0.4763400E+00, 0.5001000E+00, &
     & 0.5207500E+00, 0.5564200E+00, 0.5700800E+00, 0.5869800E+00, &
     & 0.6240900E+00, 0.6646600E+00, 0.7258900E+00, 0.7942800E+00, &
     & 0.9061200E+00, 0.9636100E+00, 0.9128700E+00, 0.9128700E+00 /
      data (ref_adm(20,iz,37,17),iz = 1,20) / &
     & 0.4758400E+00, 0.4758400E+00, 0.4623000E+00, 0.4526700E+00, &
     & 0.4532500E+00, 0.4546200E+00, 0.4827800E+00, 0.5108000E+00, &
     & 0.5362700E+00, 0.5507700E+00, 0.5719100E+00, 0.5957800E+00, &
     & 0.6332500E+00, 0.6631700E+00, 0.7205900E+00, 0.7969600E+00, &
     & 0.9050800E+00, 0.1031200E+01, 0.9833900E+00, 0.9833900E+00 /
      data (ref_adm(20,iz,38,17),iz = 1,20) / &
     & 0.4758400E+00, 0.4758400E+00, 0.4623000E+00, 0.4526700E+00, &
     & 0.4532500E+00, 0.4546200E+00, 0.4827800E+00, 0.5108000E+00, &
     & 0.5362700E+00, 0.5507700E+00, 0.5719100E+00, 0.5957800E+00, &
     & 0.6332500E+00, 0.6631700E+00, 0.7205900E+00, 0.7969600E+00, &
     & 0.9050800E+00, 0.1031200E+01, 0.9833900E+00, 0.9833900E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6862267E+00
      data (ref_adm(20,iz, 1,18),iz = 1,20) / &
     & 0.4695100E+00, 0.4695100E+00, 0.4834700E+00, 0.4723300E+00, &
     & 0.4905300E+00, 0.5806000E+00, 0.5838600E+00, 0.5985500E+00, &
     & 0.6411500E+00, 0.7290700E+00, 0.8061200E+00, 0.9436500E+00, &
     & 0.1080950E+01, 0.1270409E+01, 0.1646590E+01, 0.2427537E+01, &
     & 0.3751684E+01, 0.4087866E+01, 0.2486289E+01, 0.2486289E+01 /
      data (ref_adm(20,iz, 2,18),iz = 1,20) / &
     & 0.4695100E+00, 0.4695100E+00, 0.4834700E+00, 0.4723300E+00, &
     & 0.4905300E+00, 0.5806000E+00, 0.5838600E+00, 0.5985500E+00, &
     & 0.6411500E+00, 0.7290700E+00, 0.8061200E+00, 0.9436500E+00, &
     & 0.1080950E+01, 0.1270409E+01, 0.1646590E+01, 0.2427537E+01, &
     & 0.3751684E+01, 0.4087866E+01, 0.2486289E+01, 0.2486289E+01 /
      data (ref_adm(20,iz, 3,18),iz = 1,20) / &
     & 0.4628600E+00, 0.4628600E+00, 0.5028200E+00, 0.5246700E+00, &
     & 0.5381600E+00, 0.5179200E+00, 0.5851100E+00, 0.5831800E+00, &
     & 0.6152500E+00, 0.7029200E+00, 0.8007700E+00, 0.9789900E+00, &
     & 0.1070838E+01, 0.1252534E+01, 0.1606078E+01, 0.2317520E+01, &
     & 0.3608454E+01, 0.4127585E+01, 0.2451075E+01, 0.2451075E+01 /
      data (ref_adm(20,iz, 4,18),iz = 1,20) / &
     & 0.4845400E+00, 0.4845400E+00, 0.5106700E+00, 0.5008200E+00, &
     & 0.5034300E+00, 0.5316700E+00, 0.5316500E+00, 0.5819700E+00, &
     & 0.6187600E+00, 0.7021300E+00, 0.7637500E+00, 0.9141500E+00, &
     & 0.1049920E+01, 0.1216921E+01, 0.1527589E+01, 0.2114184E+01, &
     & 0.3113723E+01, 0.4196067E+01, 0.2731056E+01, 0.2731056E+01 /
      data (ref_adm(20,iz, 5,18),iz = 1,20) / &
     & 0.4583900E+00, 0.4583900E+00, 0.4729200E+00, 0.4887000E+00, &
     & 0.5356000E+00, 0.5214600E+00, 0.5600300E+00, 0.5722900E+00, &
     & 0.6452500E+00, 0.6755300E+00, 0.8073300E+00, 0.8820900E+00, &
     & 0.1021597E+01, 0.1171479E+01, 0.1430372E+01, 0.1887765E+01, &
     & 0.2551505E+01, 0.3847105E+01, 0.3330303E+01, 0.3330303E+01 /
      data (ref_adm(20,iz, 6,18),iz = 1,20) / &
     & 0.4472900E+00, 0.4472900E+00, 0.4411900E+00, 0.4748500E+00, &
     & 0.5135400E+00, 0.5382800E+00, 0.5556800E+00, 0.5879400E+00, &
     & 0.6398900E+00, 0.6640200E+00, 0.7897500E+00, 0.9066500E+00, &
     & 0.9849647E+00, 0.1120281E+01, 0.1332080E+01, 0.1678538E+01, &
     & 0.2123393E+01, 0.2792811E+01, 0.2804358E+01, 0.2804358E+01 /
      data (ref_adm(20,iz, 7,18),iz = 1,20) / &
     & 0.4554300E+00, 0.4554300E+00, 0.4622700E+00, 0.5044900E+00, &
     & 0.4716200E+00, 0.5196700E+00, 0.5596900E+00, 0.5593800E+00, &
     & 0.6131600E+00, 0.6684600E+00, 0.7355300E+00, 0.8952600E+00, &
     & 0.1002900E+01, 0.1065807E+01, 0.1557900E+01, 0.1779800E+01, &
     & 0.1798983E+01, 0.2147476E+01, 0.1995078E+01, 0.1995078E+01 /
      data (ref_adm(20,iz, 8,18),iz = 1,20) / &
     & 0.4657600E+00, 0.4657600E+00, 0.4606400E+00, 0.4913200E+00, &
     & 0.5082600E+00, 0.5185400E+00, 0.5291200E+00, 0.5721800E+00, &
     & 0.5625900E+00, 0.6743300E+00, 0.7115600E+00, 0.8879800E+00, &
     & 0.1011100E+01, 0.1036700E+01, 0.1279200E+01, 0.1734700E+01, &
     & 0.1570634E+01, 0.1775856E+01, 0.1640136E+01, 0.1640136E+01 /
      data (ref_adm(20,iz, 9,18),iz = 1,20) / &
     & 0.4695300E+00, 0.4695300E+00, 0.4674900E+00, 0.4536700E+00, &
     & 0.5148500E+00, 0.5056600E+00, 0.5293100E+00, 0.5653400E+00, &
     & 0.6037200E+00, 0.6728100E+00, 0.7090700E+00, 0.7793500E+00, &
     & 0.8742800E+00, 0.1050600E+01, 0.1197200E+01, 0.1257460E+01, &
     & 0.1418028E+01, 0.1541984E+01, 0.1436893E+01, 0.1436893E+01 /
      data (ref_adm(20,iz,10,18),iz = 1,20) / &
     & 0.4548400E+00, 0.4548400E+00, 0.4803500E+00, 0.4872100E+00, &
     & 0.4673600E+00, 0.5100700E+00, 0.5261600E+00, 0.5692900E+00, &
     & 0.5957400E+00, 0.6151300E+00, 0.6697500E+00, 0.7596100E+00, &
     & 0.8813800E+00, 0.1009300E+01, 0.1054100E+01, 0.1330900E+01, &
     & 0.1530700E+01, 0.1412823E+01, 0.1347117E+01, 0.1347117E+01 /
      data (ref_adm(20,iz,11,18),iz = 1,20) / &
     & 0.4573000E+00, 0.4573000E+00, 0.4529700E+00, 0.4531900E+00, &
     & 0.4854100E+00, 0.5154400E+00, 0.5195500E+00, 0.5678600E+00, &
     & 0.5903400E+00, 0.5850300E+00, 0.6726000E+00, 0.7689900E+00, &
     & 0.7934600E+00, 0.8976700E+00, 0.9777400E+00, 0.1050500E+01, &
     & 0.1165093E+01, 0.1269873E+01, 0.1249624E+01, 0.1249624E+01 /
      data (ref_adm(20,iz,12,18),iz = 1,20) / &
     & 0.4509700E+00, 0.4509700E+00, 0.4314000E+00, 0.4767300E+00, &
     & 0.5119300E+00, 0.5437700E+00, 0.5331100E+00, 0.5478000E+00, &
     & 0.5652100E+00, 0.6158000E+00, 0.5978300E+00, 0.6712100E+00, &
     & 0.7774000E+00, 0.8473000E+00, 0.8818238E+00, 0.1112700E+01, &
     & 0.1071182E+01, 0.1157143E+01, 0.1157148E+01, 0.1157148E+01 /
      data (ref_adm(20,iz,13,18),iz = 1,20) / &
     & 0.4529900E+00, 0.4529900E+00, 0.4712600E+00, 0.4461100E+00, &
     & 0.4809300E+00, 0.5310400E+00, 0.4990900E+00, 0.5205600E+00, &
     & 0.5491700E+00, 0.6030200E+00, 0.6015700E+00, 0.6381900E+00, &
     & 0.7320800E+00, 0.7725500E+00, 0.8911500E+00, 0.1019600E+01, &
     & 0.9973498E+00, 0.1074138E+01, 0.1090766E+01, 0.1090766E+01 /
      data (ref_adm(20,iz,14,18),iz = 1,20) / &
     & 0.4617700E+00, 0.4617700E+00, 0.4707200E+00, 0.4901600E+00, &
     & 0.4971800E+00, 0.5031200E+00, 0.5129300E+00, 0.5273800E+00, &
     & 0.5555800E+00, 0.5539800E+00, 0.5847200E+00, 0.6313700E+00, &
     & 0.6947500E+00, 0.7744900E+00, 0.8750700E+00, 0.9908200E+00, &
     & 0.9398379E+00, 0.1012909E+01, 0.1040485E+01, 0.1040485E+01 /
      data (ref_adm(20,iz,15,18),iz = 1,20) / &
     & 0.4679100E+00, 0.4679100E+00, 0.4728200E+00, 0.4717700E+00, &
     & 0.4816800E+00, 0.5004800E+00, 0.5144200E+00, 0.5131400E+00, &
     & 0.5338800E+00, 0.5510900E+00, 0.5610700E+00, 0.6000800E+00, &
     & 0.6552500E+00, 0.6931300E+00, 0.8174700E+00, 0.9565400E+00, &
     & 0.8915799E+00, 0.9637205E+00, 0.9993610E+00, 0.9993610E+00 /
      data (ref_adm(20,iz,16,18),iz = 1,20) / &
     & 0.4576700E+00, 0.4576700E+00, 0.4589600E+00, 0.4652900E+00, &
     & 0.4736100E+00, 0.4763000E+00, 0.4931500E+00, 0.5168100E+00, &
     & 0.5247900E+00, 0.5322700E+00, 0.5601800E+00, 0.5948200E+00, &
     & 0.6486400E+00, 0.6840500E+00, 0.8115700E+00, 0.9228700E+00, &
     & 0.8481223E+00, 0.9199205E+00, 0.9637741E+00, 0.9637741E+00 /
      data (ref_adm(20,iz,17,18),iz = 1,20) / &
     & 0.4550500E+00, 0.4550500E+00, 0.4443900E+00, 0.4603600E+00, &
     & 0.4933500E+00, 0.4714000E+00, 0.4883000E+00, 0.5017300E+00, &
     & 0.4949200E+00, 0.5035000E+00, 0.5554000E+00, 0.5722600E+00, &
     & 0.6751300E+00, 0.7017900E+00, 0.7644500E+00, 0.8565700E+00, &
     & 0.8085417E+00, 0.8774881E+00, 0.9284177E+00, 0.9284177E+00 /
      data (ref_adm(20,iz,18,18),iz = 1,20) / &
     & 0.4621800E+00, 0.4621800E+00, 0.4896900E+00, 0.4656800E+00, &
     & 0.4754000E+00, 0.5121500E+00, 0.4873900E+00, 0.4728000E+00, &
     & 0.4986300E+00, 0.5331200E+00, 0.5317600E+00, 0.5892300E+00, &
     & 0.6329100E+00, 0.6938700E+00, 0.7248200E+00, 0.8169323E+00, &
     & 0.9285570E+00, 0.1127231E+01, 0.1574066E+01, 0.1574066E+01 /
      data (ref_adm(20,iz,19,18),iz = 1,20) / &
     & 0.4054800E+00, 0.4054800E+00, 0.4328800E+00, 0.4681800E+00, &
     & 0.4728000E+00, 0.4849800E+00, 0.5234900E+00, 0.5527700E+00, &
     & 0.4854300E+00, 0.5097900E+00, 0.5233600E+00, 0.6331000E+00, &
     & 0.5954900E+00, 0.6539461E+00, 0.7094080E+00, 0.7923543E+00, &
     & 0.8972626E+00, 0.1086639E+01, 0.1529227E+01, 0.1529227E+01 /
      data (ref_adm(20,iz,20,18),iz = 1,20) / &
     & 0.4277900E+00, 0.4277900E+00, 0.4763300E+00, 0.4631400E+00, &
     & 0.4600800E+00, 0.4732200E+00, 0.4949100E+00, 0.5066000E+00, &
     & 0.4816600E+00, 0.5053500E+00, 0.5355800E+00, 0.6124200E+00, &
     & 0.6285800E+00, 0.6595900E+00, 0.6646100E+00, 0.7743002E+00, &
     & 0.8748047E+00, 0.1057159E+01, 0.1504777E+01, 0.1504777E+01 /
      data (ref_adm(20,iz,21,18),iz = 1,20) / &
     & 0.4512100E+00, 0.4512100E+00, 0.4492200E+00, 0.4713800E+00, &
     & 0.4591100E+00, 0.4802800E+00, 0.4674200E+00, 0.4745300E+00, &
     & 0.4945600E+00, 0.5401700E+00, 0.5400700E+00, 0.5769600E+00, &
     & 0.5971900E+00, 0.6085600E+00, 0.6582000E+00, 0.7580109E+00, &
     & 0.8554249E+00, 0.1034043E+01, 0.1493183E+01, 0.1493183E+01 /
      data (ref_adm(20,iz,22,18),iz = 1,20) / &
     & 0.4717400E+00, 0.4717400E+00, 0.5097000E+00, 0.4623000E+00, &
     & 0.4570800E+00, 0.4740700E+00, 0.4626800E+00, 0.4747900E+00, &
     & 0.5252500E+00, 0.5489600E+00, 0.5488300E+00, 0.5825500E+00, &
     & 0.5970800E+00, 0.5821000E+00, 0.5940700E+00, 0.7216474E+00, &
     & 0.7940934E+00, 0.9175796E+00, 0.1230791E+01, 0.1230791E+01 /
      data (ref_adm(20,iz,23,18),iz = 1,20) / &
     & 0.4775300E+00, 0.4775300E+00, 0.4529400E+00, 0.4652200E+00, &
     & 0.4321700E+00, 0.4518200E+00, 0.4860200E+00, 0.5275100E+00, &
     & 0.5462000E+00, 0.5520800E+00, 0.5607800E+00, 0.5753800E+00, &
     & 0.6047100E+00, 0.6302100E+00, 0.6628100E+00, 0.7134271E+00, &
     & 0.7846223E+00, 0.9091470E+00, 0.1245175E+01, 0.1245175E+01 /
      data (ref_adm(20,iz,24,18),iz = 1,20) / &
     & 0.4585700E+00, 0.4585700E+00, 0.4607600E+00, 0.4625400E+00, &
     & 0.4639400E+00, 0.4694100E+00, 0.4771000E+00, 0.4879300E+00, &
     & 0.5063000E+00, 0.5075000E+00, 0.5319700E+00, 0.5548000E+00, &
     & 0.5704200E+00, 0.6222900E+00, 0.6439000E+00, 0.7656200E+00, &
     & 0.7817756E+00, 0.9085245E+00, 0.1271804E+01, 0.1271804E+01 /
      data (ref_adm(20,iz,25,18),iz = 1,20) / &
     & 0.4638200E+00, 0.4638200E+00, 0.4635400E+00, 0.4668200E+00, &
     & 0.4804200E+00, 0.4832200E+00, 0.4853600E+00, 0.4882900E+00, &
     & 0.5016400E+00, 0.5190400E+00, 0.5466000E+00, 0.5750200E+00, &
     & 0.5965900E+00, 0.6355400E+00, 0.6544300E+00, 0.7410700E+00, &
     & 0.7839499E+00, 0.9150035E+00, 0.1308308E+01, 0.1308308E+01 /
      data (ref_adm(20,iz,26,18),iz = 1,20) / &
     & 0.4670100E+00, 0.4670100E+00, 0.4953400E+00, 0.5062400E+00, &
     & 0.4749600E+00, 0.4553000E+00, 0.4870500E+00, 0.4819100E+00, &
     & 0.4693800E+00, 0.5389300E+00, 0.5588100E+00, 0.5726800E+00, &
     & 0.6129200E+00, 0.6175100E+00, 0.6513000E+00, 0.7404400E+00, &
     & 0.7950757E+00, 0.9334399E+00, 0.1359028E+01, 0.1359028E+01 /
      data (ref_adm(20,iz,27,18),iz = 1,20) / &
     & 0.4570700E+00, 0.4570700E+00, 0.4954200E+00, 0.4872500E+00, &
     & 0.4870700E+00, 0.4688900E+00, 0.4843300E+00, 0.4767600E+00, &
     & 0.4864400E+00, 0.5305100E+00, 0.5749300E+00, 0.5783700E+00, &
     & 0.6081500E+00, 0.6303500E+00, 0.7011600E+00, 0.7298318E+00, &
     & 0.8102735E+00, 0.9566466E+00, 0.1416987E+01, 0.1416987E+01 /
      data (ref_adm(20,iz,28,18),iz = 1,20) / &
     & 0.4494700E+00, 0.4494700E+00, 0.4544400E+00, 0.4506100E+00, &
     & 0.4854200E+00, 0.4675200E+00, 0.4954400E+00, 0.4898400E+00, &
     & 0.4647100E+00, 0.5071100E+00, 0.5469300E+00, 0.5958100E+00, &
     & 0.6113500E+00, 0.6620100E+00, 0.6729200E+00, 0.7321400E+00, &
     & 0.8303345E+00, 0.9863874E+00, 0.1480632E+01, 0.1480632E+01 /
      data (ref_adm(20,iz,29,18),iz = 1,20) / &
     & 0.5183800E+00, 0.5183800E+00, 0.5023200E+00, 0.4860400E+00, &
     & 0.4633200E+00, 0.4682500E+00, 0.4863000E+00, 0.4869900E+00, &
     & 0.5048100E+00, 0.5287900E+00, 0.5504900E+00, 0.5886600E+00, &
     & 0.5894000E+00, 0.6562000E+00, 0.6962900E+00, 0.8115100E+00, &
     & 0.8658292E+00, 0.1034799E+01, 0.1557235E+01, 0.1557235E+01 /
      data (ref_adm(20,iz,30,18),iz = 1,20) / &
     & 0.4568400E+00, 0.4568400E+00, 0.4970800E+00, 0.4750700E+00, &
     & 0.4594700E+00, 0.4730600E+00, 0.5033700E+00, 0.5231900E+00, &
     & 0.5174800E+00, 0.5000300E+00, 0.5239100E+00, 0.5868500E+00, &
     & 0.6491300E+00, 0.6842700E+00, 0.7310100E+00, 0.7874100E+00, &
     & 0.9029164E+00, 0.1085325E+01, 0.1636916E+01, 0.1636916E+01 /
      data (ref_adm(20,iz,31,18),iz = 1,20) / &
     & 0.4532500E+00, 0.4532500E+00, 0.4506400E+00, 0.4712600E+00, &
     & 0.4716000E+00, 0.4706000E+00, 0.5003600E+00, 0.5029900E+00, &
     & 0.5032300E+00, 0.5240300E+00, 0.5366700E+00, 0.5978600E+00, &
     & 0.6453200E+00, 0.6988000E+00, 0.7613700E+00, 0.8147286E+00, &
     & 0.9185532E+00, 0.1108560E+01, 0.1694935E+01, 0.1694935E+01 /
      data (ref_adm(20,iz,32,18),iz = 1,20) / &
     & 0.4628600E+00, 0.4628600E+00, 0.4612700E+00, 0.4490200E+00, &
     & 0.4694700E+00, 0.4791200E+00, 0.5086700E+00, 0.4972000E+00, &
     & 0.5106500E+00, 0.5318400E+00, 0.5387800E+00, 0.5941300E+00, &
     & 0.6561600E+00, 0.6787200E+00, 0.7591800E+00, 0.8336328E+00, &
     & 0.9440442E+00, 0.1145366E+01, 0.1758801E+01, 0.1758801E+01 /
      data (ref_adm(20,iz,33,18),iz = 1,20) / &
     & 0.4572300E+00, 0.4572300E+00, 0.5039700E+00, 0.4692200E+00, &
     & 0.4416600E+00, 0.4635600E+00, 0.5015700E+00, 0.4875900E+00, &
     & 0.5172800E+00, 0.5327700E+00, 0.5413800E+00, 0.5997400E+00, &
     & 0.6240700E+00, 0.6919900E+00, 0.7293000E+00, 0.8129400E+00, &
     & 0.9410900E+00, 0.1162528E+01, 0.1808138E+01, 0.1808138E+01 /
      data (ref_adm(20,iz,34,18),iz = 1,20) / &
     & 0.4436100E+00, 0.4436100E+00, 0.4462300E+00, 0.4522900E+00, &
     & 0.4618200E+00, 0.4822800E+00, 0.4772100E+00, 0.5314500E+00, &
     & 0.5002100E+00, 0.5093600E+00, 0.5462200E+00, 0.5556800E+00, &
     & 0.6291600E+00, 0.6925200E+00, 0.7329400E+00, 0.8858400E+00, &
     & 0.9485832E+00, 0.1154634E+01, 0.1830508E+01, 0.1830508E+01 /
      data (ref_adm(20,iz,35,18),iz = 1,20) / &
     & 0.4788700E+00, 0.4788700E+00, 0.4229700E+00, 0.4381400E+00, &
     & 0.4880400E+00, 0.4548200E+00, 0.4671300E+00, 0.4756800E+00, &
     & 0.5178100E+00, 0.5365300E+00, 0.5620400E+00, 0.5669700E+00, &
     & 0.6309700E+00, 0.7554800E+00, 0.7729800E+00, 0.8096800E+00, &
     & 0.9474708E+00, 0.1157318E+01, 0.1852492E+01, 0.1852492E+01 /
      data (ref_adm(20,iz,36,18),iz = 1,20) / &
     & 0.4409700E+00, 0.4409700E+00, 0.4746600E+00, 0.4586700E+00, &
     & 0.4577500E+00, 0.4578000E+00, 0.4407600E+00, 0.4866800E+00, &
     & 0.5131700E+00, 0.5514400E+00, 0.5742500E+00, 0.5940700E+00, &
     & 0.6251100E+00, 0.7174300E+00, 0.7586600E+00, 0.8455600E+00, &
     & 0.9577597E+00, 0.1176578E+01, 0.1879200E+01, 0.1879200E+01 /
      data (ref_adm(20,iz,37,18),iz = 1,20) / &
     & 0.4583600E+00, 0.4583600E+00, 0.4285700E+00, 0.4410300E+00, &
     & 0.4358800E+00, 0.4708500E+00, 0.4642500E+00, 0.4682900E+00, &
     & 0.5352000E+00, 0.5874900E+00, 0.5497800E+00, 0.6243100E+00, &
     & 0.6312200E+00, 0.6831800E+00, 0.7269900E+00, 0.8357200E+00, &
     & 0.9953564E+00, 0.1275129E+01, 0.1928136E+01, 0.1928136E+01 /
      data (ref_adm(20,iz,38,18),iz = 1,20) / &
     & 0.4583600E+00, 0.4583600E+00, 0.4285700E+00, 0.4410300E+00, &
     & 0.4358800E+00, 0.4708500E+00, 0.4642500E+00, 0.4682900E+00, &
     & 0.5352000E+00, 0.5874900E+00, 0.5497800E+00, 0.6243100E+00, &
     & 0.6312200E+00, 0.6831800E+00, 0.7269900E+00, 0.8357200E+00, &
     & 0.9953564E+00, 0.1275129E+01, 0.1928136E+01, 0.1928136E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 25.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 30.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 35.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 40.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 45.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 50.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 55.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 60.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 65.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 70.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 75.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 80.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 85.0 Albedo -0.9999000E+04
      data (ref_adm(21,iz, 1,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 2,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 3,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 4,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 5,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 6,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 7,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 8,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz, 9,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,10,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,11,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,12,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,13,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,14,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,15,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,16,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,17,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,18,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,19,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,20,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,21,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,22,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,23,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,24,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,25,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,26,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,27,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,28,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,29,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,30,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,31,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,32,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,33,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,34,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,35,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,36,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,37,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(21,iz,38,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 25.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 30.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 35.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 40.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 45.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 50.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 55.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 60.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 65.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 70.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 75.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 80.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 85.0 Albedo -0.9999000E+04
      data (ref_adm(22,iz, 1,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 2,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 3,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 4,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 5,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 6,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 7,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 8,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz, 9,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,10,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,11,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,12,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,13,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,14,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,15,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,16,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,17,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,18,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,19,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,20,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,21,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,22,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,23,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,24,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,25,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,26,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,27,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,28,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,29,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,30,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,31,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,32,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,33,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,34,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,35,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,36,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,37,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(22,iz,38,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(23,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(23,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(23,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9999000E+04
      data (ref_adm(23,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(23,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo  0.4122729E+00
      data (ref_adm(23,iz, 1, 5),iz = 1,20) / &
     & 0.5388180E+00, 0.5388180E+00, 0.5291759E+00, 0.5258358E+00, &
     & 0.5231956E+00, 0.5213898E+00, 0.5182074E+00, 0.5127853E+00, &
     & 0.5058210E+00, 0.4974818E+00, 0.4884118E+00, 0.4758195E+00, &
     & 0.4611221E+00, 0.4472818E+00, 0.4274063E+00, 0.4012326E+00, &
     & 0.3742298E+00, 0.3388994E+00, 0.2765156E+00, 0.2765156E+00 /
      data (ref_adm(23,iz, 2, 5),iz = 1,20) / &
     & 0.5388180E+00, 0.5388180E+00, 0.5291759E+00, 0.5258358E+00, &
     & 0.5231956E+00, 0.5213898E+00, 0.5182074E+00, 0.5127853E+00, &
     & 0.5058210E+00, 0.4974818E+00, 0.4884118E+00, 0.4758195E+00, &
     & 0.4611221E+00, 0.4472818E+00, 0.4274063E+00, 0.4012326E+00, &
     & 0.3742298E+00, 0.3388994E+00, 0.2765156E+00, 0.2765156E+00 /
      data (ref_adm(23,iz, 3, 5),iz = 1,20) / &
     & 0.5388180E+00, 0.5388180E+00, 0.5291759E+00, 0.5258358E+00, &
     & 0.5231956E+00, 0.5213898E+00, 0.5182074E+00, 0.5127852E+00, &
     & 0.5058210E+00, 0.4974818E+00, 0.4884118E+00, 0.4758195E+00, &
     & 0.4611221E+00, 0.4472818E+00, 0.4274063E+00, 0.4012326E+00, &
     & 0.3742298E+00, 0.3388994E+00, 0.2765156E+00, 0.2765156E+00 /
      data (ref_adm(23,iz, 4, 5),iz = 1,20) / &
     & 0.5388180E+00, 0.5388180E+00, 0.5291759E+00, 0.5258358E+00, &
     & 0.5231956E+00, 0.5213898E+00, 0.5182074E+00, 0.5127853E+00, &
     & 0.5058210E+00, 0.4974818E+00, 0.4884118E+00, 0.4758195E+00, &
     & 0.4611221E+00, 0.4472818E+00, 0.4274063E+00, 0.4012326E+00, &
     & 0.3742298E+00, 0.3388994E+00, 0.2765156E+00, 0.2765156E+00 /
      data (ref_adm(23,iz, 5, 5),iz = 1,20) / &
     & 0.5388180E+00, 0.5388180E+00, 0.5291759E+00, 0.5258358E+00, &
     & 0.5231956E+00, 0.5213898E+00, 0.5182074E+00, 0.5127852E+00, &
     & 0.5058210E+00, 0.4974818E+00, 0.4884118E+00, 0.4758195E+00, &
     & 0.4611221E+00, 0.4472818E+00, 0.4274063E+00, 0.4012326E+00, &
     & 0.3742298E+00, 0.3388994E+00, 0.2765156E+00, 0.2765156E+00 /
      data (ref_adm(23,iz, 6, 5),iz = 1,20) / &
     & 0.5388180E+00, 0.5388180E+00, 0.5291759E+00, 0.5258358E+00, &
     & 0.5231956E+00, 0.5213898E+00, 0.5182074E+00, 0.5127853E+00, &
     & 0.5058210E+00, 0.4974818E+00, 0.4884118E+00, 0.4758195E+00, &
     & 0.4611221E+00, 0.4472818E+00, 0.4274063E+00, 0.4012326E+00, &
     & 0.3742298E+00, 0.3388994E+00, 0.2765156E+00, 0.2765156E+00 /
      data (ref_adm(23,iz, 7, 5),iz = 1,20) / &
     & 0.5388180E+00, 0.5388180E+00, 0.5743000E+00, 0.5391500E+00, &
     & 0.5231956E+00, 0.5213898E+00, 0.5182074E+00, 0.5127852E+00, &
     & 0.5058210E+00, 0.4974818E+00, 0.4884118E+00, 0.4758195E+00, &
     & 0.4611221E+00, 0.4472818E+00, 0.4274063E+00, 0.4012326E+00, &
     & 0.3742298E+00, 0.3388994E+00, 0.2765156E+00, 0.2765156E+00 /
      data (ref_adm(23,iz, 8, 5),iz = 1,20) / &
     & 0.5388180E+00, 0.5388180E+00, 0.5291759E+00, 0.5258358E+00, &
     & 0.5231956E+00, 0.5213898E+00, 0.5182074E+00, 0.5127853E+00, &
     & 0.5058210E+00, 0.4974818E+00, 0.4884118E+00, 0.4758195E+00, &
     & 0.4611221E+00, 0.4472818E+00, 0.4274063E+00, 0.4012326E+00, &
     & 0.3742298E+00, 0.3388994E+00, 0.2765156E+00, 0.2765156E+00 /
      data (ref_adm(23,iz, 9, 5),iz = 1,20) / &
     & 0.5388180E+00, 0.5388180E+00, 0.5291759E+00, 0.5258358E+00, &
     & 0.5231956E+00, 0.5213898E+00, 0.5182074E+00, 0.4602900E+00, &
     & 0.5058210E+00, 0.4974818E+00, 0.4884118E+00, 0.4758195E+00, &
     & 0.4611221E+00, 0.4472818E+00, 0.4274063E+00, 0.4012326E+00, &
     & 0.3742298E+00, 0.3388994E+00, 0.2765156E+00, 0.2765156E+00 /
      data (ref_adm(23,iz,10, 5),iz = 1,20) / &
     & 0.5388180E+00, 0.5388180E+00, 0.5291759E+00, 0.5258358E+00, &
     & 0.5231956E+00, 0.5213898E+00, 0.5182074E+00, 0.5127853E+00, &
     & 0.5058210E+00, 0.4974818E+00, 0.4884118E+00, 0.4758195E+00, &
     & 0.4611221E+00, 0.4472818E+00, 0.4274063E+00, 0.4012326E+00, &
     & 0.3742298E+00, 0.3388994E+00, 0.2765156E+00, 0.2765156E+00 /
      data (ref_adm(23,iz,11, 5),iz = 1,20) / &
     & 0.5388180E+00, 0.5388180E+00, 0.5291759E+00, 0.5258358E+00, &
     & 0.5231956E+00, 0.5213898E+00, 0.5182074E+00, 0.5127852E+00, &
     & 0.5058210E+00, 0.4974818E+00, 0.4884118E+00, 0.4758195E+00, &
     & 0.4611221E+00, 0.4472818E+00, 0.4274063E+00, 0.4012326E+00, &
     & 0.3742298E+00, 0.3388994E+00, 0.2765156E+00, 0.2765156E+00 /
      data (ref_adm(23,iz,12, 5),iz = 1,20) / &
     & 0.5388180E+00, 0.5388180E+00, 0.5291759E+00, 0.6408500E+00, &
     & 0.5231956E+00, 0.5213898E+00, 0.5182074E+00, 0.5127853E+00, &
     & 0.5058210E+00, 0.3845800E+00, 0.4884118E+00, 0.4758195E+00, &
     & 0.4611221E+00, 0.4472818E+00, 0.4274063E+00, 0.4012326E+00, &
     & 0.3742298E+00, 0.3388994E+00, 0.2765156E+00, 0.2765156E+00 /
      data (ref_adm(23,iz,13, 5),iz = 1,20) / &
     & 0.5388180E+00, 0.5388180E+00, 0.5291759E+00, 0.5258358E+00, &
     & 0.5231956E+00, 0.5213898E+00, 0.5182074E+00, 0.5127852E+00, &
     & 0.5058210E+00, 0.4974818E+00, 0.4884118E+00, 0.4758195E+00, &
     & 0.4611221E+00, 0.4472818E+00, 0.4274063E+00, 0.4012326E+00, &
     & 0.3742298E+00, 0.3388994E+00, 0.2765156E+00, 0.2765156E+00 /
      data (ref_adm(23,iz,14, 5),iz = 1,20) / &
     & 0.5388180E+00, 0.5388180E+00, 0.5291759E+00, 0.5258358E+00, &
     & 0.5231956E+00, 0.5213898E+00, 0.5182074E+00, 0.5127853E+00, &
     & 0.5058210E+00, 0.4974818E+00, 0.4884118E+00, 0.4758195E+00, &
     & 0.4611221E+00, 0.4472818E+00, 0.4274063E+00, 0.4012326E+00, &
     & 0.3742298E+00, 0.3388994E+00, 0.2765156E+00, 0.2765156E+00 /
      data (ref_adm(23,iz,15, 5),iz = 1,20) / &
     & 0.5388180E+00, 0.5388180E+00, 0.5291759E+00, 0.5258358E+00, &
     & 0.5231956E+00, 0.5213898E+00, 0.5182074E+00, 0.5127852E+00, &
     & 0.5058210E+00, 0.4974818E+00, 0.4884118E+00, 0.4758195E+00, &
     & 0.4611221E+00, 0.4472818E+00, 0.4274063E+00, 0.4012326E+00, &
     & 0.3742298E+00, 0.3388994E+00, 0.2765156E+00, 0.2765156E+00 /
      data (ref_adm(23,iz,16, 5),iz = 1,20) / &
     & 0.5388180E+00, 0.5388180E+00, 0.5291759E+00, 0.5258358E+00, &
     & 0.5231956E+00, 0.5213898E+00, 0.5182074E+00, 0.5127853E+00, &
     & 0.5058210E+00, 0.4974818E+00, 0.4884118E+00, 0.4758195E+00, &
     & 0.4611221E+00, 0.4472818E+00, 0.4274063E+00, 0.4012326E+00, &
     & 0.3742298E+00, 0.3388994E+00, 0.2765156E+00, 0.2765156E+00 /
      data (ref_adm(23,iz,17, 5),iz = 1,20) / &
     & 0.5388180E+00, 0.5388180E+00, 0.5291759E+00, 0.5258358E+00, &
     & 0.5231956E+00, 0.5213898E+00, 0.5182074E+00, 0.5127852E+00, &
     & 0.5058210E+00, 0.4974818E+00, 0.4884118E+00, 0.4758195E+00, &
     & 0.4611221E+00, 0.4472818E+00, 0.4274063E+00, 0.4012326E+00, &
     & 0.3742298E+00, 0.3388994E+00, 0.2765156E+00, 0.2765156E+00 /
      data (ref_adm(23,iz,18, 5),iz = 1,20) / &
     & 0.2713113E+00, 0.2713113E+00, 0.2723311E+00, 0.2750690E+00, &
     & 0.2795586E+00, 0.2859298E+00, 0.2943009E+00, 0.3046660E+00, &
     & 0.3170328E+00, 0.3311985E+00, 0.3469298E+00, 0.3681006E+00, &
     & 0.3896607E+00, 0.4061003E+00, 0.4236372E+00, 0.4380949E+00, &
     & 0.4429356E+00, 0.4347366E+00, 0.4158830E+00, 0.4158830E+00 /
      data (ref_adm(23,iz,19, 5),iz = 1,20) / &
     & 0.2714899E+00, 0.2714899E+00, 0.2728761E+00, 0.2757424E+00, &
     & 0.2802208E+00, 0.2863620E+00, 0.2942727E+00, 0.3040268E+00, &
     & 0.3155145E+00, 0.3285713E+00, 0.3429842E+00, 0.3621070E+00, &
     & 0.3813390E+00, 0.3957454E+00, 0.4108055E+00, 0.4226869E+00, &
     & 0.4260661E+00, 0.4186097E+00, 0.4073059E+00, 0.4073059E+00 /
      data (ref_adm(23,iz,20, 5),iz = 1,20) / &
     & 0.2716860E+00, 0.2716860E+00, 0.2735714E+00, 0.2767029E+00, &
     & 0.2812895E+00, 0.2873840E+00, 0.2950757E+00, 0.3043567E+00, &
     & 0.3152027E+00, 0.3274672E+00, 0.3408576E+00, 0.3584834E+00, &
     & 0.3760030E+00, 0.3889441E+00, 0.4022432E+00, 0.4123193E+00, &
     & 0.4148263E+00, 0.4082541E+00, 0.4031179E+00, 0.4031179E+00 /
      data (ref_adm(23,iz,21, 5),iz = 1,20) / &
     & 0.2719104E+00, 0.2719104E+00, 0.2743667E+00, 0.2779328E+00, &
     & 0.2828647E+00, 0.2891127E+00, 0.2967438E+00, 0.3057740E+00, &
     & 0.3161612E+00, 0.3278368E+00, 0.3404294E+00, 0.3569495E+00, &
     & 0.3732156E+00, 0.3850466E+00, 0.3970553E+00, 0.4060400E+00, &
     & 0.4080410E+00, 0.4024334E+00, 0.4025185E+00, 0.4025185E+00 /
      data (ref_adm(23,iz,22, 5),iz = 1,20) / &
     & 0.4122377E+00, 0.4122377E+00, 0.4048607E+00, 0.4023053E+00, &
     & 0.4002854E+00, 0.3989039E+00, 0.3964690E+00, 0.3923207E+00, &
     & 0.3869925E+00, 0.3806123E+00, 0.3736731E+00, 0.3640390E+00, &
     & 0.3527943E+00, 0.3422054E+00, 0.3269991E+00, 0.3069742E+00, &
     & 0.2863150E+00, 0.2592844E+00, 0.2115560E+00, 0.2115560E+00 /
      data (ref_adm(23,iz,23, 5),iz = 1,20) / &
     & 0.4122377E+00, 0.4122377E+00, 0.4048607E+00, 0.4023053E+00, &
     & 0.4002854E+00, 0.3989039E+00, 0.3964690E+00, 0.3923206E+00, &
     & 0.3869925E+00, 0.3292100E+00, 0.3736731E+00, 0.3640390E+00, &
     & 0.3527943E+00, 0.3422054E+00, 0.3269991E+00, 0.3069742E+00, &
     & 0.2863150E+00, 0.2592844E+00, 0.2115560E+00, 0.2115560E+00 /
      data (ref_adm(23,iz,24, 5),iz = 1,20) / &
     & 0.4122377E+00, 0.4122377E+00, 0.4048607E+00, 0.4023053E+00, &
     & 0.4002854E+00, 0.3989039E+00, 0.3964690E+00, 0.3923207E+00, &
     & 0.3281700E+00, 0.3453000E+00, 0.3736731E+00, 0.3640390E+00, &
     & 0.3527943E+00, 0.3422054E+00, 0.3269991E+00, 0.3069742E+00, &
     & 0.2863150E+00, 0.2592844E+00, 0.2115560E+00, 0.2115560E+00 /
      data (ref_adm(23,iz,25, 5),iz = 1,20) / &
     & 0.4122377E+00, 0.4122377E+00, 0.4048607E+00, 0.4023053E+00, &
     & 0.4002854E+00, 0.3989039E+00, 0.3964690E+00, 0.3923206E+00, &
     & 0.3869925E+00, 0.3806123E+00, 0.3736731E+00, 0.3640390E+00, &
     & 0.3527943E+00, 0.3422054E+00, 0.3269991E+00, 0.3069742E+00, &
     & 0.2863150E+00, 0.2592844E+00, 0.2115560E+00, 0.2115560E+00 /
      data (ref_adm(23,iz,26, 5),iz = 1,20) / &
     & 0.4122377E+00, 0.4122377E+00, 0.4048607E+00, 0.4023053E+00, &
     & 0.4002854E+00, 0.3989039E+00, 0.3964690E+00, 0.3923207E+00, &
     & 0.3869925E+00, 0.3806123E+00, 0.3736731E+00, 0.3640390E+00, &
     & 0.3527943E+00, 0.3422054E+00, 0.3269991E+00, 0.3069742E+00, &
     & 0.2863150E+00, 0.2592844E+00, 0.2115560E+00, 0.2115560E+00 /
      data (ref_adm(23,iz,27, 5),iz = 1,20) / &
     & 0.4122377E+00, 0.4122377E+00, 0.4048607E+00, 0.4023053E+00, &
     & 0.4002854E+00, 0.3989039E+00, 0.3964690E+00, 0.3396000E+00, &
     & 0.3869925E+00, 0.3806123E+00, 0.3736731E+00, 0.3640390E+00, &
     & 0.3527943E+00, 0.3422054E+00, 0.3269991E+00, 0.3069742E+00, &
     & 0.2863150E+00, 0.2592844E+00, 0.2115560E+00, 0.2115560E+00 /
      data (ref_adm(23,iz,28, 5),iz = 1,20) / &
     & 0.4122377E+00, 0.4122377E+00, 0.4048607E+00, 0.4023053E+00, &
     & 0.4002854E+00, 0.3989039E+00, 0.3964690E+00, 0.3923207E+00, &
     & 0.3869925E+00, 0.3806123E+00, 0.3736731E+00, 0.3640390E+00, &
     & 0.3527943E+00, 0.3422054E+00, 0.3269991E+00, 0.3069742E+00, &
     & 0.2863150E+00, 0.2592844E+00, 0.2115560E+00, 0.2115560E+00 /
      data (ref_adm(23,iz,29, 5),iz = 1,20) / &
     & 0.5681400E+00, 0.5681400E+00, 0.4048607E+00, 0.4023053E+00, &
     & 0.4002854E+00, 0.3989039E+00, 0.3964690E+00, 0.3923206E+00, &
     & 0.3869925E+00, 0.3806123E+00, 0.3736731E+00, 0.3640390E+00, &
     & 0.3527943E+00, 0.3422054E+00, 0.3269991E+00, 0.3069742E+00, &
     & 0.2863150E+00, 0.2592844E+00, 0.2115560E+00, 0.2115560E+00 /
      data (ref_adm(23,iz,30, 5),iz = 1,20) / &
     & 0.4122377E+00, 0.4122377E+00, 0.4048607E+00, 0.4023053E+00, &
     & 0.4002854E+00, 0.3989039E+00, 0.3964690E+00, 0.3923207E+00, &
     & 0.3869925E+00, 0.3806123E+00, 0.3736731E+00, 0.3640390E+00, &
     & 0.3527943E+00, 0.3422054E+00, 0.3269991E+00, 0.3069742E+00, &
     & 0.2863150E+00, 0.2592844E+00, 0.2115560E+00, 0.2115560E+00 /
      data (ref_adm(23,iz,31, 5),iz = 1,20) / &
     & 0.4122377E+00, 0.4122377E+00, 0.4048607E+00, 0.4023053E+00, &
     & 0.4002854E+00, 0.3989039E+00, 0.3964690E+00, 0.3923206E+00, &
     & 0.3869925E+00, 0.3806123E+00, 0.3736731E+00, 0.3640390E+00, &
     & 0.3527943E+00, 0.3422054E+00, 0.3269991E+00, 0.3069742E+00, &
     & 0.2863150E+00, 0.2592844E+00, 0.2115560E+00, 0.2115560E+00 /
      data (ref_adm(23,iz,32, 5),iz = 1,20) / &
     & 0.4122377E+00, 0.4122377E+00, 0.4048607E+00, 0.4023053E+00, &
     & 0.3257600E+00, 0.3989039E+00, 0.3964690E+00, 0.3923207E+00, &
     & 0.3869925E+00, 0.3806123E+00, 0.3736731E+00, 0.3640390E+00, &
     & 0.3527943E+00, 0.3422054E+00, 0.3269991E+00, 0.3069742E+00, &
     & 0.2863150E+00, 0.2592844E+00, 0.2115560E+00, 0.2115560E+00 /
      data (ref_adm(23,iz,33, 5),iz = 1,20) / &
     & 0.4122377E+00, 0.4122377E+00, 0.4048607E+00, 0.4023053E+00, &
     & 0.4002854E+00, 0.3989039E+00, 0.3964690E+00, 0.3691600E+00, &
     & 0.3869925E+00, 0.3806123E+00, 0.3736731E+00, 0.3640390E+00, &
     & 0.3527943E+00, 0.3422054E+00, 0.3269991E+00, 0.3069742E+00, &
     & 0.2863150E+00, 0.2592844E+00, 0.2115560E+00, 0.2115560E+00 /
      data (ref_adm(23,iz,34, 5),iz = 1,20) / &
     & 0.5034200E+00, 0.5034200E+00, 0.4048607E+00, 0.4023053E+00, &
     & 0.4002854E+00, 0.3989039E+00, 0.3964690E+00, 0.3923207E+00, &
     & 0.3869925E+00, 0.4415300E+00, 0.3736731E+00, 0.3640390E+00, &
     & 0.3527943E+00, 0.3422054E+00, 0.3269991E+00, 0.3069742E+00, &
     & 0.2863150E+00, 0.2592844E+00, 0.2115560E+00, 0.2115560E+00 /
      data (ref_adm(23,iz,35, 5),iz = 1,20) / &
     & 0.4122377E+00, 0.4122377E+00, 0.4048607E+00, 0.4023053E+00, &
     & 0.4002854E+00, 0.3989039E+00, 0.3964690E+00, 0.3923206E+00, &
     & 0.3869925E+00, 0.3806123E+00, 0.3736731E+00, 0.3640390E+00, &
     & 0.3527943E+00, 0.3422054E+00, 0.3269991E+00, 0.3069742E+00, &
     & 0.2863150E+00, 0.2592844E+00, 0.2115560E+00, 0.2115560E+00 /
      data (ref_adm(23,iz,36, 5),iz = 1,20) / &
     & 0.4122377E+00, 0.4122377E+00, 0.4048607E+00, 0.4023053E+00, &
     & 0.4002854E+00, 0.3989039E+00, 0.3964690E+00, 0.3923207E+00, &
     & 0.3869925E+00, 0.3806123E+00, 0.3736731E+00, 0.3640390E+00, &
     & 0.3527943E+00, 0.3422054E+00, 0.3269991E+00, 0.3069742E+00, &
     & 0.2863150E+00, 0.2592844E+00, 0.2115560E+00, 0.2115560E+00 /
      data (ref_adm(23,iz,37, 5),iz = 1,20) / &
     & 0.4122377E+00, 0.4122377E+00, 0.4048607E+00, 0.4023053E+00, &
     & 0.4002854E+00, 0.3989039E+00, 0.3964690E+00, 0.3923207E+00, &
     & 0.3869925E+00, 0.3806123E+00, 0.3736731E+00, 0.3640390E+00, &
     & 0.3527943E+00, 0.3422054E+00, 0.3269991E+00, 0.3069742E+00, &
     & 0.2863150E+00, 0.2592844E+00, 0.2115560E+00, 0.2115560E+00 /
      data (ref_adm(23,iz,38, 5),iz = 1,20) / &
     & 0.4122377E+00, 0.4122377E+00, 0.4048607E+00, 0.4023053E+00, &
     & 0.4002854E+00, 0.3989039E+00, 0.3964690E+00, 0.3923207E+00, &
     & 0.3869925E+00, 0.3806123E+00, 0.3736731E+00, 0.3640390E+00, &
     & 0.3527943E+00, 0.3422054E+00, 0.3269991E+00, 0.3069742E+00, &
     & 0.2863150E+00, 0.2592844E+00, 0.2115560E+00, 0.2115560E+00 /
! Solar Zenith Angle 25.0 Albedo  0.4077923E+00
      data (ref_adm(23,iz, 1, 6),iz = 1,20) / &
     & 0.4194945E+00, 0.4194945E+00, 0.4165623E+00, 0.4181889E+00, &
     & 0.4203086E+00, 0.4209475E+00, 0.4274292E+00, 0.4244407E+00, &
     & 0.4075081E+00, 0.3964099E+00, 0.3921290E+00, 0.3858056E+00, &
     & 0.3786443E+00, 0.3724256E+00, 0.3624969E+00, 0.3998500E+00, &
     & 0.3281325E+00, 0.2989423E+00, 0.2530589E+00, 0.2530589E+00 /
      data (ref_adm(23,iz, 2, 6),iz = 1,20) / &
     & 0.4194945E+00, 0.4194945E+00, 0.4165623E+00, 0.4181889E+00, &
     & 0.4203086E+00, 0.4209475E+00, 0.4274292E+00, 0.4244407E+00, &
     & 0.4075081E+00, 0.3964099E+00, 0.3921290E+00, 0.3858056E+00, &
     & 0.3786443E+00, 0.3724256E+00, 0.3624969E+00, 0.3998500E+00, &
     & 0.3281325E+00, 0.2989423E+00, 0.2530589E+00, 0.2530589E+00 /
      data (ref_adm(23,iz, 3, 6),iz = 1,20) / &
     & 0.4194936E+00, 0.4194936E+00, 0.4165778E+00, 0.4181927E+00, &
     & 0.4202944E+00, 0.4209580E+00, 0.4274000E+00, 0.4246711E+00, &
     & 0.4076963E+00, 0.3964355E+00, 0.3921488E+00, 0.3859043E+00, &
     & 0.3786485E+00, 0.3398000E+00, 0.3624567E+00, 0.3470940E+00, &
     & 0.3280284E+00, 0.2988374E+00, 0.1140114E+00, 0.1140114E+00 /
      data (ref_adm(23,iz, 4, 6),iz = 1,20) / &
     & 0.4194843E+00, 0.4194843E+00, 0.4166027E+00, 0.4941800E+00, &
     & 0.4203141E+00, 0.4210216E+00, 0.4272507E+00, 0.4249278E+00, &
     & 0.4079184E+00, 0.3965420E+00, 0.3921570E+00, 0.3859918E+00, &
     & 0.3591600E+00, 0.3577200E+00, 0.3624413E+00, 0.3470278E+00, &
     & 0.3278808E+00, 0.2986618E+00, 0.2529142E+00, 0.2529142E+00 /
      data (ref_adm(23,iz, 5, 6),iz = 1,20) / &
     & 0.4195472E+00, 0.4195472E+00, 0.4166368E+00, 0.4182214E+00, &
     & 0.4203303E+00, 0.4210372E+00, 0.4271558E+00, 0.4253117E+00, &
     & 0.4083588E+00, 0.3966399E+00, 0.3922405E+00, 0.3642800E+00, &
     & 0.3786008E+00, 0.3689100E+00, 0.3622927E+00, 0.3468777E+00, &
     & 0.3277567E+00, 0.2984876E+00, 0.2527663E+00, 0.2527663E+00 /
      data (ref_adm(23,iz, 6, 6),iz = 1,20) / &
     & 0.4196638E+00, 0.4196638E+00, 0.4166652E+00, 0.4182093E+00, &
     & 0.4203670E+00, 0.4210444E+00, 0.4269033E+00, 0.4259686E+00, &
     & 0.4090147E+00, 0.3968169E+00, 0.3923304E+00, 0.3861054E+00, &
     & 0.3603300E+00, 0.3720906E+00, 0.3621401E+00, 0.3466328E+00, &
     & 0.3274741E+00, 0.2982105E+00, 0.2525840E+00, 0.2525840E+00 /
      data (ref_adm(23,iz, 7, 6),iz = 1,20) / &
     & 0.4196154E+00, 0.4196154E+00, 0.4167036E+00, 0.4181862E+00, &
     & 0.4203791E+00, 0.3797300E+00, 0.4265233E+00, 0.4266795E+00, &
     & 0.4098818E+00, 0.3970344E+00, 0.3924543E+00, 0.3862461E+00, &
     & 0.3785210E+00, 0.3719392E+00, 0.3619668E+00, 0.3464126E+00, &
     & 0.3271657E+00, 0.2979111E+00, 0.2523468E+00, 0.2523468E+00 /
      data (ref_adm(23,iz, 8, 6),iz = 1,20) / &
     & 0.4196799E+00, 0.4196799E+00, 0.4167268E+00, 0.4181693E+00, &
     & 0.4204117E+00, 0.4153600E+00, 0.4260652E+00, 0.4275002E+00, &
     & 0.4109031E+00, 0.3973374E+00, 0.3925572E+00, 0.3863247E+00, &
     & 0.3784833E+00, 0.3719007E+00, 0.3616726E+00, 0.3460435E+00, &
     & 0.3267757E+00, 0.2975104E+00, 0.2520814E+00, 0.2520814E+00 /
      data (ref_adm(23,iz, 9, 6),iz = 1,20) / &
     & 0.4198213E+00, 0.4198213E+00, 0.4167759E+00, 0.4180872E+00, &
     & 0.3887900E+00, 0.4212777E+00, 0.4254513E+00, 0.4284161E+00, &
     & 0.4120907E+00, 0.3977074E+00, 0.3927372E+00, 0.3865262E+00, &
     & 0.3784782E+00, 0.3717633E+00, 0.3614025E+00, 0.3456933E+00, &
     & 0.3264184E+00, 0.2970948E+00, 0.2517824E+00, 0.2517824E+00 /
      data (ref_adm(23,iz,10, 6),iz = 1,20) / &
     & 0.5403100E+00, 0.5403100E+00, 0.3643500E+00, 0.4290500E+00, &
     & 0.3829100E+00, 0.4213433E+00, 0.4247594E+00, 0.4294288E+00, &
     & 0.4136065E+00, 0.3980983E+00, 0.3929513E+00, 0.3867400E+00, &
     & 0.3785020E+00, 0.3716297E+00, 0.3611336E+00, 0.3453517E+00, &
     & 0.3259532E+00, 0.2966714E+00, 0.2514665E+00, 0.2514665E+00 /
      data (ref_adm(23,iz,11, 6),iz = 1,20) / &
     & 0.4200504E+00, 0.4200504E+00, 0.4599300E+00, 0.5173400E+00, &
     & 0.4061600E+00, 0.3923600E+00, 0.5247900E+00, 0.4208800E+00, &
     & 0.4153001E+00, 0.3986756E+00, 0.4117400E+00, 0.3869376E+00, &
     & 0.3784813E+00, 0.3714368E+00, 0.3609003E+00, 0.3450200E+00, &
     & 0.3255374E+00, 0.2962323E+00, 0.2511468E+00, 0.2511468E+00 /
      data (ref_adm(23,iz,12, 6),iz = 1,20) / &
     & 0.4200702E+00, 0.4200702E+00, 0.4169990E+00, 0.4179624E+00, &
     & 0.4203813E+00, 0.4215818E+00, 0.4401300E+00, 0.4798900E+00, &
     & 0.2366500E+00, 0.3558100E+00, 0.3524600E+00, 0.3491200E+00, &
     & 0.3425200E+00, 0.3713120E+00, 0.3606050E+00, 0.3445711E+00, &
     & 0.3250615E+00, 0.2957644E+00, 0.2508058E+00, 0.2508058E+00 /
      data (ref_adm(23,iz,13, 6),iz = 1,20) / &
     & 0.4201704E+00, 0.4201704E+00, 0.4170242E+00, 0.4178461E+00, &
     & 0.4203809E+00, 0.4217485E+00, 0.4224149E+00, 0.4310522E+00, &
     & 0.4197896E+00, 0.4003065E+00, 0.3935155E+00, 0.3728200E+00, &
     & 0.3787094E+00, 0.3711214E+00, 0.3603331E+00, 0.3441938E+00, &
     & 0.3245587E+00, 0.2952831E+00, 0.2504796E+00, 0.2504796E+00 /
      data (ref_adm(23,iz,14, 6),iz = 1,20) / &
     & 0.5277600E+00, 0.5277600E+00, 0.4794500E+00, 0.4178122E+00, &
     & 0.4203013E+00, 0.4218167E+00, 0.4220565E+00, 0.4306599E+00, &
     & 0.4225188E+00, 0.4014048E+00, 0.3937968E+00, 0.3878229E+00, &
     & 0.3788859E+00, 0.4251000E+00, 0.3600891E+00, 0.3437746E+00, &
     & 0.3241307E+00, 0.2948106E+00, 0.2501613E+00, 0.2501613E+00 /
      data (ref_adm(23,iz,15, 6),iz = 1,20) / &
     & 0.4204405E+00, 0.4204405E+00, 0.4172158E+00, 0.4177208E+00, &
     & 0.4202019E+00, 0.4219884E+00, 0.4218439E+00, 0.4298169E+00, &
     & 0.4254808E+00, 0.4028054E+00, 0.3940687E+00, 0.3881154E+00, &
     & 0.3790902E+00, 0.3709708E+00, 0.3598334E+00, 0.3433710E+00, &
     & 0.3236351E+00, 0.2943511E+00, 0.2498634E+00, 0.2498634E+00 /
      data (ref_adm(23,iz,16, 6),iz = 1,20) / &
     & 0.4205609E+00, 0.4205609E+00, 0.4173868E+00, 0.4557800E+00, &
     & 0.4200822E+00, 0.3612000E+00, 0.3693700E+00, 0.3837000E+00, &
     & 0.4285414E+00, 0.4045433E+00, 0.3944994E+00, 0.3884703E+00, &
     & 0.3793656E+00, 0.3710092E+00, 0.3596563E+00, 0.3430312E+00, &
     & 0.3232219E+00, 0.2939276E+00, 0.2495926E+00, 0.2495926E+00 /
      data (ref_adm(23,iz,17, 6),iz = 1,20) / &
     & 0.4207143E+00, 0.4207143E+00, 0.4174390E+00, 0.4177300E+00, &
     & 0.4199641E+00, 0.4221638E+00, 0.4220972E+00, 0.4266846E+00, &
     & 0.4313853E+00, 0.4066321E+00, 0.3950299E+00, 0.3887405E+00, &
     & 0.3797839E+00, 0.3709767E+00, 0.3594518E+00, 0.3426600E+00, &
     & 0.3228001E+00, 0.2934749E+00, 0.2493525E+00, 0.2493525E+00 /
      data (ref_adm(23,iz,18, 6),iz = 1,20) / &
     & 0.4841641E+00, 0.4841641E+00, 0.4258561E+00, 0.4230890E+00, &
     & 0.4256099E+00, 0.4332060E+00, 0.4342543E+00, 0.4287343E+00, &
     & 0.4243175E+00, 0.4204029E+00, 0.4185965E+00, 0.4180342E+00, &
     & 0.4178344E+00, 0.4180270E+00, 0.4166053E+00, 0.4107719E+00, &
     & 0.3989124E+00, 0.3710470E+00, 0.3048694E+00, 0.3048694E+00 /
      data (ref_adm(23,iz,19, 6),iz = 1,20) / &
     & 0.4841642E+00, 0.4841642E+00, 0.4258561E+00, 0.4230890E+00, &
     & 0.4256099E+00, 0.4332060E+00, 0.4342543E+00, 0.4287343E+00, &
     & 0.4243175E+00, 0.4204028E+00, 0.4185965E+00, 0.4180342E+00, &
     & 0.4178344E+00, 0.4180270E+00, 0.4166053E+00, 0.4107720E+00, &
     & 0.3989124E+00, 0.3710471E+00, 0.3048693E+00, 0.3048693E+00 /
      data (ref_adm(23,iz,20, 6),iz = 1,20) / &
     & 0.4841641E+00, 0.4841641E+00, 0.4258561E+00, 0.4230890E+00, &
     & 0.4256099E+00, 0.4332060E+00, 0.4342543E+00, 0.4287343E+00, &
     & 0.4243175E+00, 0.4204029E+00, 0.4185965E+00, 0.4180342E+00, &
     & 0.4178344E+00, 0.4180270E+00, 0.4166053E+00, 0.4107719E+00, &
     & 0.3989124E+00, 0.3710470E+00, 0.3048694E+00, 0.3048694E+00 /
      data (ref_adm(23,iz,21, 6),iz = 1,20) / &
     & 0.4841642E+00, 0.4841642E+00, 0.4258561E+00, 0.4230890E+00, &
     & 0.3815800E+00, 0.4332060E+00, 0.4342543E+00, 0.4287343E+00, &
     & 0.4243175E+00, 0.4204028E+00, 0.4185965E+00, 0.4180342E+00, &
     & 0.4178344E+00, 0.4180270E+00, 0.4166053E+00, 0.4107720E+00, &
     & 0.3989124E+00, 0.3710471E+00, 0.3048693E+00, 0.3048693E+00 /
      data (ref_adm(23,iz,22, 6),iz = 1,20) / &
     & 0.4776145E+00, 0.4776145E+00, 0.3868000E+00, 0.4661069E+00, &
     & 0.4637667E+00, 0.4621661E+00, 0.4593450E+00, 0.4545389E+00, &
     & 0.4483657E+00, 0.4409737E+00, 0.4329340E+00, 0.4217720E+00, &
     & 0.4087439E+00, 0.3964758E+00, 0.3788579E+00, 0.3556572E+00, &
     & 0.3317216E+00, 0.3004043E+00, 0.2451066E+00, 0.2451066E+00 /
      data (ref_adm(23,iz,23, 6),iz = 1,20) / &
     & 0.4776145E+00, 0.4776145E+00, 0.4631400E+00, 0.4661069E+00, &
     & 0.4637667E+00, 0.4621661E+00, 0.4593450E+00, 0.4545388E+00, &
     & 0.4483657E+00, 0.4409737E+00, 0.4329340E+00, 0.4217720E+00, &
     & 0.4087439E+00, 0.3964758E+00, 0.3788579E+00, 0.3937400E+00, &
     & 0.3872600E+00, 0.3004043E+00, 0.2451066E+00, 0.2451066E+00 /
      data (ref_adm(23,iz,24, 6),iz = 1,20) / &
     & 0.4776145E+00, 0.4776145E+00, 0.4350200E+00, 0.4661069E+00, &
     & 0.4637667E+00, 0.4621661E+00, 0.4593450E+00, 0.4545389E+00, &
     & 0.4483657E+00, 0.4409737E+00, 0.4329340E+00, 0.4217720E+00, &
     & 0.4087439E+00, 0.3964758E+00, 0.3788579E+00, 0.3556572E+00, &
     & 0.3317216E+00, 0.3004043E+00, 0.2451066E+00, 0.2451066E+00 /
      data (ref_adm(23,iz,25, 6),iz = 1,20) / &
     & 0.5376800E+00, 0.5376800E+00, 0.4926200E+00, 0.4661069E+00, &
     & 0.4383800E+00, 0.4202300E+00, 0.4593450E+00, 0.4545388E+00, &
     & 0.4483657E+00, 0.4409737E+00, 0.4329340E+00, 0.4217720E+00, &
     & 0.4087439E+00, 0.3964758E+00, 0.3788579E+00, 0.3556572E+00, &
     & 0.3317216E+00, 0.3004043E+00, 0.2451066E+00, 0.2451066E+00 /
      data (ref_adm(23,iz,26, 6),iz = 1,20) / &
     & 0.5207300E+00, 0.5207300E+00, 0.5097600E+00, 0.4661069E+00, &
     & 0.4637667E+00, 0.4699500E+00, 0.4670600E+00, 0.4545389E+00, &
     & 0.4483657E+00, 0.4409737E+00, 0.4329340E+00, 0.4217720E+00, &
     & 0.4087439E+00, 0.3964758E+00, 0.3788579E+00, 0.3556572E+00, &
     & 0.3317216E+00, 0.3004043E+00, 0.2451066E+00, 0.2451066E+00 /
      data (ref_adm(23,iz,27, 6),iz = 1,20) / &
     & 0.5594900E+00, 0.5594900E+00, 0.4690676E+00, 0.4661069E+00, &
     & 0.4637667E+00, 0.4621661E+00, 0.4593450E+00, 0.4545388E+00, &
     & 0.4483657E+00, 0.4409737E+00, 0.4329340E+00, 0.4217720E+00, &
     & 0.4087439E+00, 0.3964758E+00, 0.3788579E+00, 0.3556572E+00, &
     & 0.3317216E+00, 0.3004043E+00, 0.2451066E+00, 0.2451066E+00 /
      data (ref_adm(23,iz,28, 6),iz = 1,20) / &
     & 0.5038700E+00, 0.5038700E+00, 0.4887600E+00, 0.4661069E+00, &
     & 0.4637667E+00, 0.4621661E+00, 0.4593450E+00, 0.4545389E+00, &
     & 0.4483657E+00, 0.4409737E+00, 0.4329340E+00, 0.4217720E+00, &
     & 0.4087439E+00, 0.3964758E+00, 0.3788579E+00, 0.3556572E+00, &
     & 0.3317216E+00, 0.3004043E+00, 0.2451066E+00, 0.2451066E+00 /
      data (ref_adm(23,iz,29, 6),iz = 1,20) / &
     & 0.4926400E+00, 0.4926400E+00, 0.5001000E+00, 0.4661069E+00, &
     & 0.4637667E+00, 0.4621661E+00, 0.4593450E+00, 0.4545388E+00, &
     & 0.4483657E+00, 0.4409737E+00, 0.4329340E+00, 0.4217720E+00, &
     & 0.4087439E+00, 0.3964758E+00, 0.3788579E+00, 0.3556572E+00, &
     & 0.3317216E+00, 0.3004043E+00, 0.2451066E+00, 0.2451066E+00 /
      data (ref_adm(23,iz,30, 6),iz = 1,20) / &
     & 0.4687500E+00, 0.4687500E+00, 0.5369100E+00, 0.4661069E+00, &
     & 0.2881400E+00, 0.4621661E+00, 0.5028600E+00, 0.4545389E+00, &
     & 0.4483657E+00, 0.4409737E+00, 0.4329340E+00, 0.4217720E+00, &
     & 0.4087439E+00, 0.3964758E+00, 0.3788579E+00, 0.3556572E+00, &
     & 0.3317216E+00, 0.3004043E+00, 0.2451066E+00, 0.2451066E+00 /
      data (ref_adm(23,iz,31, 6),iz = 1,20) / &
     & 0.4731700E+00, 0.4731700E+00, 0.4450400E+00, 0.4661069E+00, &
     & 0.4225200E+00, 0.4621661E+00, 0.5255300E+00, 0.4545388E+00, &
     & 0.4651000E+00, 0.3485700E+00, 0.4329340E+00, 0.4217720E+00, &
     & 0.4087439E+00, 0.3964758E+00, 0.3788579E+00, 0.3556572E+00, &
     & 0.3317216E+00, 0.3004043E+00, 0.2451066E+00, 0.2451066E+00 /
      data (ref_adm(23,iz,32, 6),iz = 1,20) / &
     & 0.4776145E+00, 0.4776145E+00, 0.4690676E+00, 0.4682400E+00, &
     & 0.4922800E+00, 0.4621661E+00, 0.4593450E+00, 0.4545389E+00, &
     & 0.4483657E+00, 0.4409737E+00, 0.4329340E+00, 0.4217720E+00, &
     & 0.4087439E+00, 0.3964758E+00, 0.3788579E+00, 0.3556572E+00, &
     & 0.3317216E+00, 0.3004043E+00, 0.2451066E+00, 0.2451066E+00 /
      data (ref_adm(23,iz,33, 6),iz = 1,20) / &
     & 0.4776145E+00, 0.4776145E+00, 0.4690676E+00, 0.4661069E+00, &
     & 0.4902500E+00, 0.4621661E+00, 0.4593450E+00, 0.4545388E+00, &
     & 0.4483657E+00, 0.4409737E+00, 0.4329340E+00, 0.4217720E+00, &
     & 0.4087439E+00, 0.3964758E+00, 0.3788579E+00, 0.3556572E+00, &
     & 0.3317216E+00, 0.3004043E+00, 0.2451066E+00, 0.2451066E+00 /
      data (ref_adm(23,iz,34, 6),iz = 1,20) / &
     & 0.4776145E+00, 0.4776145E+00, 0.4690676E+00, 0.4661069E+00, &
     & 0.4319500E+00, 0.4621661E+00, 0.4593450E+00, 0.4545389E+00, &
     & 0.3244100E+00, 0.4409737E+00, 0.4329340E+00, 0.4217720E+00, &
     & 0.4087439E+00, 0.3964758E+00, 0.3788579E+00, 0.3556572E+00, &
     & 0.3317216E+00, 0.3004043E+00, 0.2451066E+00, 0.2451066E+00 /
      data (ref_adm(23,iz,35, 6),iz = 1,20) / &
     & 0.4776145E+00, 0.4776145E+00, 0.4690676E+00, 0.4661069E+00, &
     & 0.4637667E+00, 0.4621661E+00, 0.4593450E+00, 0.4545388E+00, &
     & 0.4483657E+00, 0.4409737E+00, 0.4329340E+00, 0.4217720E+00, &
     & 0.4087439E+00, 0.3964758E+00, 0.3788579E+00, 0.3556572E+00, &
     & 0.3317216E+00, 0.3004043E+00, 0.2451066E+00, 0.2451066E+00 /
      data (ref_adm(23,iz,36, 6),iz = 1,20) / &
     & 0.4776145E+00, 0.4776145E+00, 0.4690676E+00, 0.4364400E+00, &
     & 0.4637667E+00, 0.4621661E+00, 0.4593450E+00, 0.4545389E+00, &
     & 0.4483657E+00, 0.4409737E+00, 0.4329340E+00, 0.4217720E+00, &
     & 0.4087439E+00, 0.3964758E+00, 0.3788579E+00, 0.3556572E+00, &
     & 0.3317216E+00, 0.3004043E+00, 0.2451066E+00, 0.2451066E+00 /
      data (ref_adm(23,iz,37, 6),iz = 1,20) / &
     & 0.4776145E+00, 0.4776145E+00, 0.4690676E+00, 0.4661069E+00, &
     & 0.4637667E+00, 0.4621661E+00, 0.4593450E+00, 0.4545389E+00, &
     & 0.4483657E+00, 0.4409737E+00, 0.4329340E+00, 0.4217720E+00, &
     & 0.4087439E+00, 0.3964758E+00, 0.3788579E+00, 0.3556572E+00, &
     & 0.3317216E+00, 0.3004043E+00, 0.2451066E+00, 0.2451066E+00 /
      data (ref_adm(23,iz,38, 6),iz = 1,20) / &
     & 0.4776145E+00, 0.4776145E+00, 0.4690676E+00, 0.4661069E+00, &
     & 0.4637667E+00, 0.4621661E+00, 0.4593450E+00, 0.4545389E+00, &
     & 0.4483657E+00, 0.4409737E+00, 0.4329340E+00, 0.4217720E+00, &
     & 0.4087439E+00, 0.3964758E+00, 0.3788579E+00, 0.3556572E+00, &
     & 0.3317216E+00, 0.3004043E+00, 0.2451066E+00, 0.2451066E+00 /
! Solar Zenith Angle 30.0 Albedo  0.4525155E+00
      data (ref_adm(23,iz, 1, 7),iz = 1,20) / &
     & 0.4430855E+00, 0.4430855E+00, 0.4451295E+00, 0.5394200E+00, &
     & 0.3281500E+00, 0.4932100E+00, 0.4312000E+00, 0.3734000E+00, &
     & 0.4211331E+00, 0.4185640E+00, 0.4146344E+00, 0.4113772E+00, &
     & 0.4082335E+00, 0.4045773E+00, 0.3968628E+00, 0.4163400E+00, &
     & 0.3644735E+00, 0.3340294E+00, 0.2812043E+00, 0.2812043E+00 /
      data (ref_adm(23,iz, 2, 7),iz = 1,20) / &
     & 0.4430855E+00, 0.4430855E+00, 0.4451295E+00, 0.5394200E+00, &
     & 0.3281500E+00, 0.4932100E+00, 0.4312000E+00, 0.3734000E+00, &
     & 0.4211331E+00, 0.4185640E+00, 0.4146344E+00, 0.4113772E+00, &
     & 0.4082335E+00, 0.4045773E+00, 0.3968628E+00, 0.4163400E+00, &
     & 0.3644735E+00, 0.3340294E+00, 0.2812043E+00, 0.2812043E+00 /
      data (ref_adm(23,iz, 3, 7),iz = 1,20) / &
     & 0.4430757E+00, 0.4430757E+00, 0.4036600E+00, 0.4001700E+00, &
     & 0.4454736E+00, 0.4591245E+00, 0.4401154E+00, 0.4648600E+00, &
     & 0.4211553E+00, 0.3142700E+00, 0.4146267E+00, 0.4114970E+00, &
     & 0.4081585E+00, 0.4043433E+00, 0.3968000E+00, 0.4061800E+00, &
     & 0.3641455E+00, 0.3337248E+00, 0.1252379E+00, 0.1252379E+00 /
      data (ref_adm(23,iz, 4, 7),iz = 1,20) / &
     & 0.4430504E+00, 0.4430504E+00, 0.4451680E+00, 0.5207900E+00, &
     & 0.4491800E+00, 0.5184700E+00, 0.4410201E+00, 0.4245261E+00, &
     & 0.4431300E+00, 0.4187548E+00, 0.5216300E+00, 0.3542800E+00, &
     & 0.3226800E+00, 0.4042215E+00, 0.3964466E+00, 0.3541900E+00, &
     & 0.3637604E+00, 0.3332729E+00, 0.2806914E+00, 0.2806914E+00 /
      data (ref_adm(23,iz, 5, 7),iz = 1,20) / &
     & 0.5284600E+00, 0.5284600E+00, 0.4690700E+00, 0.4458892E+00, &
     & 0.4747400E+00, 0.4812100E+00, 0.5333200E+00, 0.4815200E+00, &
     & 0.3296100E+00, 0.4188324E+00, 0.3997700E+00, 0.4112367E+00, &
     & 0.4694900E+00, 0.4037461E+00, 0.3959982E+00, 0.3241300E+00, &
     & 0.3630463E+00, 0.3325634E+00, 0.2801774E+00, 0.2801774E+00 /
      data (ref_adm(23,iz, 6, 7),iz = 1,20) / &
     & 0.4354200E+00, 0.4354200E+00, 0.5648400E+00, 0.4736300E+00, &
     & 0.3808100E+00, 0.4580469E+00, 0.6137600E+00, 0.4254379E+00, &
     & 0.4213425E+00, 0.4190310E+00, 0.4148984E+00, 0.4111519E+00, &
     & 0.4073471E+00, 0.4034116E+00, 0.3838800E+00, 0.3812375E+00, &
     & 0.3622518E+00, 0.3316082E+00, 0.2795117E+00, 0.2795117E+00 /
      data (ref_adm(23,iz, 7, 7),iz = 1,20) / &
     & 0.4431213E+00, 0.4431213E+00, 0.4450215E+00, 0.4461225E+00, &
     & 0.4457410E+00, 0.5168600E+00, 0.4470319E+00, 0.4263869E+00, &
     & 0.4213639E+00, 0.4192280E+00, 0.4151792E+00, 0.4776900E+00, &
     & 0.4069885E+00, 0.4028548E+00, 0.3530800E+00, 0.3302000E+00, &
     & 0.3611459E+00, 0.3305246E+00, 0.2787016E+00, 0.2787016E+00 /
      data (ref_adm(23,iz, 8, 7),iz = 1,20) / &
     & 0.4431076E+00, 0.4431076E+00, 0.4450348E+00, 0.4462925E+00, &
     & 0.4458825E+00, 0.4557477E+00, 0.4499150E+00, 0.4274508E+00, &
     & 0.4215955E+00, 0.4194593E+00, 0.4153473E+00, 0.4107482E+00, &
     & 0.4066285E+00, 0.3753700E+00, 0.3938022E+00, 0.3793698E+00, &
     & 0.3600107E+00, 0.3292959E+00, 0.2777810E+00, 0.2777810E+00 /
      data (ref_adm(23,iz, 9, 7),iz = 1,20) / &
     & 0.4430398E+00, 0.4430398E+00, 0.4449443E+00, 0.4464304E+00, &
     & 0.4459232E+00, 0.4540968E+00, 0.4532868E+00, 0.4289017E+00, &
     & 0.4218937E+00, 0.4196930E+00, 0.4156723E+00, 0.4106366E+00, &
     & 0.4061964E+00, 0.4013886E+00, 0.3928520E+00, 0.3782245E+00, &
     & 0.3587386E+00, 0.3279091E+00, 0.2767915E+00, 0.2767915E+00 /
      data (ref_adm(23,iz,10, 7),iz = 1,20) / &
     & 0.2980600E+00, 0.2980600E+00, 0.4003800E+00, 0.4500600E+00, &
     & 0.4596500E+00, 0.4604800E+00, 0.4554800E+00, 0.4309916E+00, &
     & 0.4222971E+00, 0.4199381E+00, 0.4160894E+00, 0.4105314E+00, &
     & 0.4057611E+00, 0.4006644E+00, 0.3918926E+00, 0.3770079E+00, &
     & 0.3573385E+00, 0.3264288E+00, 0.2757423E+00, 0.2757423E+00 /
      data (ref_adm(23,iz,11, 7),iz = 1,20) / &
     & 0.4295200E+00, 0.4295200E+00, 0.5038200E+00, 0.4807300E+00, &
     & 0.4158700E+00, 0.4404200E+00, 0.4269100E+00, 0.4413100E+00, &
     & 0.3566800E+00, 0.4201978E+00, 0.4165841E+00, 0.4105385E+00, &
     & 0.4053205E+00, 0.3998883E+00, 0.3909157E+00, 0.3757210E+00, &
     & 0.3560390E+00, 0.3248338E+00, 0.2746336E+00, 0.2746336E+00 /
      data (ref_adm(23,iz,12, 7),iz = 1,20) / &
     & 0.4469300E+00, 0.4469300E+00, 0.4017200E+00, 0.4568400E+00, &
     & 0.4843000E+00, 0.4731100E+00, 0.4592300E+00, 0.3824300E+00, &
     & 0.4308000E+00, 0.4203700E+00, 0.4473400E+00, 0.3743200E+00, &
     & 0.4049116E+00, 0.3992377E+00, 0.3898556E+00, 0.3744004E+00, &
     & 0.3545522E+00, 0.3233102E+00, 0.2735228E+00, 0.2735228E+00 /
      data (ref_adm(23,iz,13, 7),iz = 1,20) / &
     & 0.5425200E+00, 0.5425200E+00, 0.4444162E+00, 0.4500500E+00, &
     & 0.4283900E+00, 0.5148200E+00, 0.4507800E+00, 0.4185400E+00, &
     & 0.5078200E+00, 0.4855900E+00, 0.3937200E+00, 0.4715600E+00, &
     & 0.3992600E+00, 0.4996800E+00, 0.3888941E+00, 0.3730943E+00, &
     & 0.3531489E+00, 0.3218209E+00, 0.2724531E+00, 0.2724531E+00 /
      data (ref_adm(23,iz,14, 7),iz = 1,20) / &
     & 0.5014000E+00, 0.5014000E+00, 0.4443872E+00, 0.4465960E+00, &
     & 0.4474878E+00, 0.5212100E+00, 0.4657300E+00, 0.3887800E+00, &
     & 0.4272619E+00, 0.4401100E+00, 0.4575300E+00, 0.4113852E+00, &
     & 0.4041863E+00, 0.4319300E+00, 0.3879130E+00, 0.3719688E+00, &
     & 0.3517117E+00, 0.3203949E+00, 0.2714139E+00, 0.2714139E+00 /
      data (ref_adm(23,iz,15, 7),iz = 1,20) / &
     & 0.4430519E+00, 0.4430519E+00, 0.4442117E+00, 0.4135200E+00, &
     & 0.3803100E+00, 0.4475624E+00, 0.4562846E+00, 0.4084600E+00, &
     & 0.4301275E+00, 0.4609100E+00, 0.4185683E+00, 0.4119956E+00, &
     & 0.3792700E+00, 0.2815400E+00, 0.3870617E+00, 0.3707905E+00, &
     & 0.3504252E+00, 0.3190601E+00, 0.2704452E+00, 0.2704452E+00 /
      data (ref_adm(23,iz,16, 7),iz = 1,20) / &
     & 0.4430156E+00, 0.4430156E+00, 0.4440309E+00, 0.4463616E+00, &
     & 0.4479483E+00, 0.4476320E+00, 0.4525224E+00, 0.3693800E+00, &
     & 0.4452700E+00, 0.4227436E+00, 0.3521000E+00, 0.3846000E+00, &
     & 0.4040460E+00, 0.3971183E+00, 0.3862588E+00, 0.3697366E+00, &
     & 0.3491124E+00, 0.3178077E+00, 0.2695777E+00, 0.2695777E+00 /
      data (ref_adm(23,iz,17, 7),iz = 1,20) / &
     & 0.4430231E+00, 0.4430231E+00, 0.4108600E+00, 0.4460812E+00, &
     & 0.3441800E+00, 0.3387100E+00, 0.4499093E+00, 0.4629734E+00, &
     & 0.4027500E+00, 0.4242450E+00, 0.4194210E+00, 0.4134529E+00, &
     & 0.4043179E+00, 0.3967345E+00, 0.3856187E+00, 0.3687591E+00, &
     & 0.3479501E+00, 0.3166992E+00, 0.2688383E+00, 0.2688383E+00 /
      data (ref_adm(23,iz,18, 7),iz = 1,20) / &
     & 0.4221800E+00, 0.4221800E+00, 0.3917100E+00, 0.3831300E+00, &
     & 0.4222100E+00, 0.4253471E+00, 0.4268200E+00, 0.4263615E+00, &
     & 0.4394034E+00, 0.4229877E+00, 0.3510700E+00, 0.3940280E+00, &
     & 0.3857853E+00, 0.3763275E+00, 0.3637790E+00, 0.3466105E+00, &
     & 0.3266840E+00, 0.2973619E+00, 0.2535280E+00, 0.2535280E+00 /
      data (ref_adm(23,iz,19, 7),iz = 1,20) / &
     & 0.4708751E+00, 0.4708751E+00, 0.4233076E+00, 0.4209808E+00, &
     & 0.4222100E+00, 0.3782600E+00, 0.4268201E+00, 0.4263615E+00, &
     & 0.4394033E+00, 0.4144600E+00, 0.4022592E+00, 0.3940281E+00, &
     & 0.3857854E+00, 0.4170900E+00, 0.3637791E+00, 0.3466105E+00, &
     & 0.3266840E+00, 0.2973619E+00, 0.2535280E+00, 0.2535280E+00 /
      data (ref_adm(23,iz,20, 7),iz = 1,20) / &
     & 0.4753500E+00, 0.4753500E+00, 0.4233076E+00, 0.4042100E+00, &
     & 0.3928100E+00, 0.4253471E+00, 0.4268200E+00, 0.4263615E+00, &
     & 0.4394034E+00, 0.4229877E+00, 0.4056400E+00, 0.3940280E+00, &
     & 0.3857853E+00, 0.2881900E+00, 0.2676000E+00, 0.3466105E+00, &
     & 0.3266840E+00, 0.2973619E+00, 0.2535280E+00, 0.2535280E+00 /
      data (ref_adm(23,iz,21, 7),iz = 1,20) / &
     & 0.5053000E+00, 0.5053000E+00, 0.4994800E+00, 0.4209808E+00, &
     & 0.4222100E+00, 0.4253471E+00, 0.4268201E+00, 0.4263615E+00, &
     & 0.4394033E+00, 0.4319300E+00, 0.3853500E+00, 0.4656500E+00, &
     & 0.3857854E+00, 0.3763276E+00, 0.3637791E+00, 0.3466105E+00, &
     & 0.3266840E+00, 0.2973619E+00, 0.2535280E+00, 0.2535280E+00 /
      data (ref_adm(23,iz,22, 7),iz = 1,20) / &
     & 0.5080700E+00, 0.5080700E+00, 0.4283963E+00, 0.4302358E+00, &
     & 0.4467500E+00, 0.3612100E+00, 0.4446650E+00, 0.4524069E+00, &
     & 0.4614171E+00, 0.4719601E+00, 0.4842103E+00, 0.4046200E+00, &
     & 0.5200233E+00, 0.5353305E+00, 0.5540304E+00, 0.5738101E+00, &
     & 0.5882825E+00, 0.5949426E+00, 0.5794339E+00, 0.5794339E+00 /
      data (ref_adm(23,iz,23, 7),iz = 1,20) / &
     & 0.4433700E+00, 0.4433700E+00, 0.5074700E+00, 0.4881000E+00, &
     & 0.5350600E+00, 0.5219900E+00, 0.3758400E+00, 0.4502009E+00, &
     & 0.4589047E+00, 0.4690235E+00, 0.4807201E+00, 0.4971378E+00, &
     & 0.5147927E+00, 0.5295683E+00, 0.5475703E+00, 0.5671074E+00, &
     & 0.5811619E+00, 0.5887143E+00, 0.5830411E+00, 0.5830411E+00 /
      data (ref_adm(23,iz,24, 7),iz = 1,20) / &
     & 0.4276708E+00, 0.4276708E+00, 0.4454800E+00, 0.4627500E+00, &
     & 0.4630200E+00, 0.4360391E+00, 0.3352500E+00, 0.4493832E+00, &
     & 0.4583068E+00, 0.4684022E+00, 0.4797628E+00, 0.4958023E+00, &
     & 0.5129608E+00, 0.5272492E+00, 0.3470200E+00, 0.3521300E+00, &
     & 0.5771144E+00, 0.5866542E+00, 0.5909541E+00, 0.5909541E+00 /
      data (ref_adm(23,iz,25, 7),iz = 1,20) / &
     & 0.4274361E+00, 0.4274361E+00, 0.4266651E+00, 0.4278058E+00, &
     & 0.3883800E+00, 0.4188900E+00, 0.5329400E+00, 0.4916800E+00, &
     & 0.4584113E+00, 0.4687391E+00, 0.4804773E+00, 0.4968284E+00, &
     & 0.5140149E+00, 0.3953000E+00, 0.3764500E+00, 0.5638655E+00, &
     & 0.5782675E+00, 0.5884798E+00, 0.6020384E+00, 0.6020384E+00 /
      data (ref_adm(23,iz,26, 7),iz = 1,20) / &
     & 0.4311700E+00, 0.4311700E+00, 0.4262567E+00, 0.4273950E+00, &
     & 0.4894100E+00, 0.5291800E+00, 0.4421485E+00, 0.4145100E+00, &
     & 0.4597325E+00, 0.4701699E+00, 0.4821311E+00, 0.4984872E+00, &
     & 0.5162963E+00, 0.3387800E+00, 0.3825600E+00, 0.5685880E+00, &
     & 0.5839996E+00, 0.5966064E+00, 0.6182489E+00, 0.6182489E+00 /
      data (ref_adm(23,iz,27, 7),iz = 1,20) / &
     & 0.4272509E+00, 0.4272509E+00, 0.4258448E+00, 0.5031800E+00, &
     & 0.4732800E+00, 0.4359364E+00, 0.4175100E+00, 0.3738500E+00, &
     & 0.4604536E+00, 0.4711220E+00, 0.4836695E+00, 0.5007556E+00, &
     & 0.5197101E+00, 0.5348737E+00, 0.5535464E+00, 0.5737385E+00, &
     & 0.5909539E+00, 0.6070730E+00, 0.6372024E+00, 0.6372024E+00 /
      data (ref_adm(23,iz,28, 7),iz = 1,20) / &
     & 0.4372200E+00, 0.4372200E+00, 0.5091300E+00, 0.4637500E+00, &
     & 0.4633100E+00, 0.4708100E+00, 0.4399600E+00, 0.4804900E+00, &
     & 0.4285000E+00, 0.4206000E+00, 0.4171600E+00, 0.5097223E+00, &
     & 0.5312319E+00, 0.5479698E+00, 0.5676776E+00, 0.5881296E+00, &
     & 0.6042905E+00, 0.6202849E+00, 0.6574996E+00, 0.6574996E+00 /
      data (ref_adm(23,iz,29, 7),iz = 1,20) / &
     & 0.4681200E+00, 0.4681200E+00, 0.4611500E+00, 0.4759900E+00, &
     & 0.4729200E+00, 0.5260000E+00, 0.4655800E+00, 0.4531467E+00, &
     & 0.4543200E+00, 0.4396200E+00, 0.4138900E+00, 0.5277642E+00, &
     & 0.5535023E+00, 0.5732955E+00, 0.3384300E+00, 0.6180202E+00, &
     & 0.6343427E+00, 0.6464634E+00, 0.6823034E+00, 0.6823034E+00 /
      data (ref_adm(23,iz,30, 7),iz = 1,20) / &
     & 0.4646300E+00, 0.4646300E+00, 0.4249915E+00, 0.4267851E+00, &
     & 0.4313726E+00, 0.4375112E+00, 0.4450927E+00, 0.4566770E+00, &
     & 0.4397300E+00, 0.4952252E+00, 0.5165280E+00, 0.5368339E+00, &
     & 0.5569996E+00, 0.5751508E+00, 0.5989275E+00, 0.6277145E+00, &
     & 0.6547878E+00, 0.6799762E+00, 0.7131688E+00, 0.7131688E+00 /
      data (ref_adm(23,iz,31, 7),iz = 1,20) / &
     & 0.4656900E+00, 0.4656900E+00, 0.4248288E+00, 0.4269980E+00, &
     & 0.4317748E+00, 0.4377009E+00, 0.4466374E+00, 0.4616305E+00, &
     & 0.4694800E+00, 0.5048140E+00, 0.5158406E+00, 0.5343681E+00, &
     & 0.5578770E+00, 0.5778586E+00, 0.6030701E+00, 0.6312426E+00, &
     & 0.6566597E+00, 0.6856227E+00, 0.7363392E+00, 0.7363392E+00 /
      data (ref_adm(23,iz,32, 7),iz = 1,20) / &
     & 0.4266936E+00, 0.4266936E+00, 0.4985100E+00, 0.4818200E+00, &
     & 0.4592600E+00, 0.4468600E+00, 0.4955000E+00, 0.4687273E+00, &
     & 0.4894900E+00, 0.5023172E+00, 0.5157883E+00, 0.5393177E+00, &
     & 0.5649984E+00, 0.5856533E+00, 0.6117033E+00, 0.6421286E+00, &
     & 0.6699306E+00, 0.6983719E+00, 0.7511706E+00, 0.7511706E+00 /
      data (ref_adm(23,iz,33, 7),iz = 1,20) / &
     & 0.4266041E+00, 0.4266041E+00, 0.4246511E+00, 0.4760700E+00, &
     & 0.4323164E+00, 0.4391478E+00, 0.4522693E+00, 0.4757869E+00, &
     & 0.5096200E+00, 0.5016577E+00, 0.5194569E+00, 0.5443341E+00, &
     & 0.5671784E+00, 0.5851061E+00, 0.6096156E+00, 0.6413650E+00, &
     & 0.6740464E+00, 0.7110187E+00, 0.7692980E+00, 0.7692980E+00 /
      data (ref_adm(23,iz,34, 7),iz = 1,20) / &
     & 0.4265269E+00, 0.4265269E+00, 0.4244602E+00, 0.4271303E+00, &
     & 0.4324572E+00, 0.4398394E+00, 0.4557142E+00, 0.4806820E+00, &
     & 0.4918400E+00, 0.5039749E+00, 0.5231273E+00, 0.5438933E+00, &
     & 0.5620376E+00, 0.5791211E+00, 0.6030933E+00, 0.6343475E+00, &
     & 0.6667863E+00, 0.7102504E+00, 0.7832065E+00, 0.7832065E+00 /
      data (ref_adm(23,iz,35, 7),iz = 1,20) / &
     & 0.3696500E+00, 0.3696500E+00, 0.4025500E+00, 0.4274742E+00, &
     & 0.4327453E+00, 0.4406023E+00, 0.4586889E+00, 0.4822473E+00, &
     & 0.5066200E+00, 0.5064612E+00, 0.5245450E+00, 0.5408487E+00, &
     & 0.5579050E+00, 0.5771357E+00, 0.6036508E+00, 0.6350716E+00, &
     & 0.6648498E+00, 0.7054699E+00, 0.7904219E+00, 0.7904219E+00 /
      data (ref_adm(23,iz,36, 7),iz = 1,20) / &
     & 0.4551300E+00, 0.4551300E+00, 0.4243820E+00, 0.4275010E+00, &
     & 0.4326468E+00, 0.4412330E+00, 0.4610650E+00, 0.4820761E+00, &
     & 0.4900531E+00, 0.5080897E+00, 0.5240448E+00, 0.5383694E+00, &
     & 0.5579320E+00, 0.5796800E+00, 0.6107262E+00, 0.6430957E+00, &
     & 0.6698059E+00, 0.7053648E+00, 0.7935744E+00, 0.7935744E+00 /
      data (ref_adm(23,iz,37, 7),iz = 1,20) / &
     & 0.5033500E+00, 0.5033500E+00, 0.4708800E+00, 0.4273989E+00, &
     & 0.4327729E+00, 0.4418876E+00, 0.4626902E+00, 0.4817896E+00, &
     & 0.4908164E+00, 0.5088477E+00, 0.5235789E+00, 0.5369693E+00, &
     & 0.5594845E+00, 0.5838778E+00, 0.6471828E+00, 0.6945348E+00, &
     & 0.6770586E+00, 0.7077553E+00, 0.7955356E+00, 0.7955356E+00 /
      data (ref_adm(23,iz,38, 7),iz = 1,20) / &
     & 0.5033500E+00, 0.5033500E+00, 0.4708800E+00, 0.4273989E+00, &
     & 0.4327729E+00, 0.4418876E+00, 0.4626902E+00, 0.4817896E+00, &
     & 0.4908164E+00, 0.5088477E+00, 0.5235789E+00, 0.5369693E+00, &
     & 0.5594845E+00, 0.5838778E+00, 0.6471828E+00, 0.6945348E+00, &
     & 0.6770586E+00, 0.7077553E+00, 0.7955356E+00, 0.7955356E+00 /
! Solar Zenith Angle 35.0 Albedo  0.4570622E+00
      data (ref_adm(23,iz, 1, 8),iz = 1,20) / &
     & 0.4993200E+00, 0.4993200E+00, 0.4463500E+00, 0.4019900E+00, &
     & 0.4409000E+00, 0.4290985E+00, 0.4276431E+00, 0.4236900E+00, &
     & 0.4277174E+00, 0.4299411E+00, 0.4335492E+00, 0.5082900E+00, &
     & 0.4112000E+00, 0.3676100E+00, 0.4136100E+00, 0.4579600E+00, &
     & 0.4530923E+00, 0.4299513E+00, 0.3503674E+00, 0.3503674E+00 /
      data (ref_adm(23,iz, 2, 8),iz = 1,20) / &
     & 0.4993200E+00, 0.4993200E+00, 0.4463500E+00, 0.4019900E+00, &
     & 0.4409000E+00, 0.4290985E+00, 0.4276431E+00, 0.4236900E+00, &
     & 0.4277174E+00, 0.4299411E+00, 0.4335492E+00, 0.5082900E+00, &
     & 0.4112000E+00, 0.3676100E+00, 0.4136100E+00, 0.4579600E+00, &
     & 0.4530923E+00, 0.4299513E+00, 0.3503674E+00, 0.3503674E+00 /
      data (ref_adm(23,iz, 3, 8),iz = 1,20) / &
     & 0.4778900E+00, 0.4778900E+00, 0.4532600E+00, 0.4301200E+00, &
     & 0.5190600E+00, 0.5699500E+00, 0.4273296E+00, 0.2413000E+00, &
     & 0.4274608E+00, 0.3323800E+00, 0.4333155E+00, 0.3677800E+00, &
     & 0.5063900E+00, 0.4517200E+00, 0.4401300E+00, 0.4574094E+00, &
     & 0.4524235E+00, 0.4294146E+00, 0.1667840E+00, 0.1667840E+00 /
      data (ref_adm(23,iz, 4, 8),iz = 1,20) / &
     & 0.5160900E+00, 0.5160900E+00, 0.4159900E+00, 0.5256600E+00, &
     & 0.4904900E+00, 0.4293400E+00, 0.4275742E+00, 0.4269902E+00, &
     & 0.3930500E+00, 0.2725100E+00, 0.4332392E+00, 0.4385200E+00, &
     & 0.5116400E+00, 0.5516800E+00, 0.5407400E+00, 0.5711100E+00, &
     & 0.4515991E+00, 0.4287823E+00, 0.3495307E+00, 0.3495307E+00 /
      data (ref_adm(23,iz, 5, 8),iz = 1,20) / &
     & 0.4693200E+00, 0.4693200E+00, 0.5111900E+00, 0.4522600E+00, &
     & 0.4483600E+00, 0.4255500E+00, 0.4622800E+00, 0.4889500E+00, &
     & 0.4183600E+00, 0.3357900E+00, 0.4327609E+00, 0.4431800E+00, &
     & 0.3696300E+00, 0.3899800E+00, 0.4542369E+00, 0.4984800E+00, &
     & 0.4504478E+00, 0.4276101E+00, 0.3487017E+00, 0.3487017E+00 /
      data (ref_adm(23,iz, 6, 8),iz = 1,20) / &
     & 0.4588000E+00, 0.4588000E+00, 0.4621300E+00, 0.4775100E+00, &
     & 0.4322900E+00, 0.4993600E+00, 0.3671200E+00, 0.3361500E+00, &
     & 0.4274953E+00, 0.4291695E+00, 0.3343300E+00, 0.4278600E+00, &
     & 0.4443049E+00, 0.4487644E+00, 0.4530389E+00, 0.4578000E+00, &
     & 0.4488447E+00, 0.4259019E+00, 0.3475935E+00, 0.3475935E+00 /
      data (ref_adm(23,iz, 7, 8),iz = 1,20) / &
     & 0.3809900E+00, 0.3809900E+00, 0.2714300E+00, 0.5494300E+00, &
     & 0.4343593E+00, 0.3519200E+00, 0.3183100E+00, 0.3211700E+00, &
     & 0.4273736E+00, 0.2991400E+00, 0.3806400E+00, 0.4088400E+00, &
     & 0.2512900E+00, 0.4478889E+00, 0.4516096E+00, 0.4576900E+00, &
     & 0.4470554E+00, 0.4238723E+00, 0.3461663E+00, 0.3461663E+00 /
      data (ref_adm(23,iz, 8, 8),iz = 1,20) / &
     & 0.4085300E+00, 0.4085300E+00, 0.3755200E+00, 0.3624600E+00, &
     & 0.3782300E+00, 0.3835500E+00, 0.4074900E+00, 0.4337200E+00, &
     & 0.4485700E+00, 0.4636100E+00, 0.4303100E+00, 0.4191000E+00, &
     & 0.4657400E+00, 0.4462749E+00, 0.3558000E+00, 0.3349100E+00, &
     & 0.4445129E+00, 0.4214551E+00, 0.3444996E+00, 0.3444996E+00 /
      data (ref_adm(23,iz, 9, 8),iz = 1,20) / &
     & 0.4343800E+00, 0.4343800E+00, 0.4838100E+00, 0.4761800E+00, &
     & 0.3309600E+00, 0.4768000E+00, 0.5544700E+00, 0.5272900E+00, &
     & 0.3415400E+00, 0.3713700E+00, 0.4700500E+00, 0.3849400E+00, &
     & 0.4407566E+00, 0.4449237E+00, 0.3649200E+00, 0.3833400E+00, &
     & 0.4418778E+00, 0.4187728E+00, 0.3425399E+00, 0.3425399E+00 /
      data (ref_adm(23,iz,10, 8),iz = 1,20) / &
     & 0.5061500E+00, 0.5061500E+00, 0.4346600E+00, 0.4863200E+00, &
     & 0.5228400E+00, 0.5189900E+00, 0.5266400E+00, 0.4580400E+00, &
     & 0.4273288E+00, 0.4190700E+00, 0.4638500E+00, 0.4602000E+00, &
     & 0.3751000E+00, 0.4111200E+00, 0.4462767E+00, 0.3739200E+00, &
     & 0.4448400E+00, 0.4156764E+00, 0.3399814E+00, 0.3399814E+00 /
      data (ref_adm(23,iz,11, 8),iz = 1,20) / &
     & 0.3974400E+00, 0.3974400E+00, 0.5173400E+00, 0.5071300E+00, &
     & 0.4458700E+00, 0.4673700E+00, 0.5068800E+00, 0.5416800E+00, &
     & 0.5146800E+00, 0.4614600E+00, 0.4531200E+00, 0.5151200E+00, &
     & 0.4397800E+00, 0.4414030E+00, 0.4439213E+00, 0.4432586E+00, &
     & 0.4231200E+00, 0.4124137E+00, 0.3373695E+00, 0.3373695E+00 /
      data (ref_adm(23,iz,12, 8),iz = 1,20) / &
     & 0.4956700E+00, 0.4956700E+00, 0.4672700E+00, 0.4576700E+00, &
     & 0.4728700E+00, 0.4926500E+00, 0.4745900E+00, 0.4397200E+00, &
     & 0.4537500E+00, 0.4301000E+00, 0.4107300E+00, 0.4320246E+00, &
     & 0.4232000E+00, 0.4393368E+00, 0.4415502E+00, 0.4405871E+00, &
     & 0.4326553E+00, 0.4089628E+00, 0.3346249E+00, 0.3346249E+00 /
      data (ref_adm(23,iz,13, 8),iz = 1,20) / &
     & 0.4981400E+00, 0.4981400E+00, 0.4569500E+00, 0.4161900E+00, &
     & 0.4417100E+00, 0.4345500E+00, 0.4910400E+00, 0.4514900E+00, &
     & 0.4929900E+00, 0.4269700E+00, 0.4244700E+00, 0.4040400E+00, &
     & 0.3566200E+00, 0.3505600E+00, 0.3986200E+00, 0.4376630E+00, &
     & 0.4292982E+00, 0.4051697E+00, 0.3318905E+00, 0.3318905E+00 /
      data (ref_adm(23,iz,14, 8),iz = 1,20) / &
     & 0.4415700E+00, 0.4415700E+00, 0.4002700E+00, 0.3348700E+00, &
     & 0.4021900E+00, 0.4239700E+00, 0.4399100E+00, 0.4234300E+00, &
     & 0.5167100E+00, 0.4049500E+00, 0.4341500E+00, 0.4224100E+00, &
     & 0.4538100E+00, 0.4721700E+00, 0.4368719E+00, 0.4348044E+00, &
     & 0.4262833E+00, 0.4014412E+00, 0.3290776E+00, 0.3290776E+00 /
      data (ref_adm(23,iz,15, 8),iz = 1,20) / &
     & 0.4548600E+00, 0.4548600E+00, 0.4599300E+00, 0.4382500E+00, &
     & 0.3957100E+00, 0.4370941E+00, 0.4466400E+00, 0.4309000E+00, &
     & 0.4581400E+00, 0.4472300E+00, 0.4202900E+00, 0.3958700E+00, &
     & 0.3152200E+00, 0.5220200E+00, 0.4341862E+00, 0.4320180E+00, &
     & 0.4231327E+00, 0.3976424E+00, 0.3263991E+00, 0.3263991E+00 /
      data (ref_adm(23,iz,16, 8),iz = 1,20) / &
     & 0.5492100E+00, 0.5492100E+00, 0.4478464E+00, 0.4352000E+00, &
     & 0.3677300E+00, 0.4383675E+00, 0.4342401E+00, 0.4309445E+00, &
     & 0.4296700E+00, 0.5210800E+00, 0.4659400E+00, 0.4801200E+00, &
     & 0.4296057E+00, 0.4309268E+00, 0.4316465E+00, 0.4285073E+00, &
     & 0.4197367E+00, 0.3942214E+00, 0.3235398E+00, 0.3235398E+00 /
      data (ref_adm(23,iz,17, 8),iz = 1,20) / &
     & 0.4470188E+00, 0.4470188E+00, 0.4481137E+00, 0.4470825E+00, &
     & 0.4661500E+00, 0.4397720E+00, 0.4357371E+00, 0.4321585E+00, &
     & 0.4121200E+00, 0.4507500E+00, 0.4835600E+00, 0.4502100E+00, &
     & 0.4277178E+00, 0.4288478E+00, 0.4286318E+00, 0.4257933E+00, &
     & 0.4164375E+00, 0.3909885E+00, 0.3208933E+00, 0.3208933E+00 /
      data (ref_adm(23,iz,18, 8),iz = 1,20) / &
     & 0.4809100E+00, 0.4809100E+00, 0.3567400E+00, 0.3099400E+00, &
     & 0.2349700E+00, 0.4424800E+00, 0.3658900E+00, 0.4760100E+00, &
     & 0.4690300E+00, 0.4498300E+00, 0.4548800E+00, 0.4655800E+00, &
     & 0.2685500E+00, 0.4545281E+00, 0.4508246E+00, 0.4402460E+00, &
     & 0.4229151E+00, 0.3904956E+00, 0.3315498E+00, 0.3315498E+00 /
      data (ref_adm(23,iz,19, 8),iz = 1,20) / &
     & 0.5757500E+00, 0.5757500E+00, 0.6120100E+00, 0.3222000E+00, &
     & 0.3634600E+00, 0.4682700E+00, 0.3274600E+00, 0.4763900E+00, &
     & 0.4956200E+00, 0.4411400E+00, 0.4561500E+00, 0.3673400E+00, &
     & 0.4872000E+00, 0.4496100E+00, 0.4464662E+00, 0.4353336E+00, &
     & 0.4174855E+00, 0.3856494E+00, 0.3287725E+00, 0.3287725E+00 /
      data (ref_adm(23,iz,20, 8),iz = 1,20) / &
     & 0.5588000E+00, 0.5588000E+00, 0.5195600E+00, 0.4867700E+00, &
     & 0.4739800E+00, 0.5176100E+00, 0.5052500E+00, 0.5368300E+00, &
     & 0.5065900E+00, 0.4948300E+00, 0.3533800E+00, 0.3976400E+00, &
     & 0.3342600E+00, 0.4492940E+00, 0.4022500E+00, 0.4314958E+00, &
     & 0.4134597E+00, 0.3819798E+00, 0.3272627E+00, 0.3272627E+00 /
      data (ref_adm(23,iz,21, 8),iz = 1,20) / &
     & 0.4933000E+00, 0.4933000E+00, 0.4592300E+00, 0.4721906E+00, &
     & 0.4677965E+00, 0.5843000E+00, 0.4653600E+00, 0.4782400E+00, &
     & 0.5217000E+00, 0.4170600E+00, 0.4730300E+00, 0.5249700E+00, &
     & 0.4305300E+00, 0.4207600E+00, 0.4413267E+00, 0.4285553E+00, &
     & 0.4103708E+00, 0.3791773E+00, 0.3266528E+00, 0.3266528E+00 /
      data (ref_adm(23,iz,22, 8),iz = 1,20) / &
     & 0.4869700E+00, 0.4869700E+00, 0.3301000E+00, 0.3725800E+00, &
     & 0.4565700E+00, 0.5155600E+00, 0.4948900E+00, 0.4970212E+00, &
     & 0.5358400E+00, 0.5162100E+00, 0.4728000E+00, 0.4610300E+00, &
     & 0.3523100E+00, 0.4798811E+00, 0.4727599E+00, 0.4600498E+00, &
     & 0.4402463E+00, 0.4051120E+00, 0.3303619E+00, 0.3303619E+00 /
      data (ref_adm(23,iz,23, 8),iz = 1,20) / &
     & 0.5129000E+00, 0.5129000E+00, 0.4911957E+00, 0.4934412E+00, &
     & 0.4826700E+00, 0.4671400E+00, 0.5753500E+00, 0.5931600E+00, &
     & 0.5909700E+00, 0.4308600E+00, 0.4576500E+00, 0.4314800E+00, &
     & 0.4520900E+00, 0.4535400E+00, 0.4487600E+00, 0.4676100E+00, &
     & 0.5106000E+00, 0.4024236E+00, 0.3292716E+00, 0.3292716E+00 /
      data (ref_adm(23,iz,24, 8),iz = 1,20) / &
     & 0.4302700E+00, 0.4302700E+00, 0.4334600E+00, 0.5538700E+00, &
     & 0.5102900E+00, 0.4945800E+00, 0.5098500E+00, 0.5492400E+00, &
     & 0.4866300E+00, 0.3922900E+00, 0.4539200E+00, 0.3988900E+00, &
     & 0.4995600E+00, 0.4363800E+00, 0.4690951E+00, 0.4576400E+00, &
     & 0.4349861E+00, 0.3998871E+00, 0.3282447E+00, 0.3282447E+00 /
      data (ref_adm(23,iz,25, 8),iz = 1,20) / &
     & 0.5517900E+00, 0.5517900E+00, 0.5985300E+00, 0.6078200E+00, &
     & 0.5255100E+00, 0.3984100E+00, 0.5819600E+00, 0.4509800E+00, &
     & 0.4408100E+00, 0.4758400E+00, 0.4366900E+00, 0.4966900E+00, &
     & 0.4541800E+00, 0.4633500E+00, 0.4501700E+00, 0.4527951E+00, &
     & 0.4328684E+00, 0.3973657E+00, 0.3276711E+00, 0.3276711E+00 /
      data (ref_adm(23,iz,26, 8),iz = 1,20) / &
     & 0.5800900E+00, 0.5800900E+00, 0.4991200E+00, 0.5243100E+00, &
     & 0.4655500E+00, 0.4654900E+00, 0.5437500E+00, 0.5702100E+00, &
     & 0.5105000E+00, 0.5146000E+00, 0.4258200E+00, 0.4885860E+00, &
     & 0.4825490E+00, 0.4646600E+00, 0.4736600E+00, 0.4505690E+00, &
     & 0.4304417E+00, 0.3951375E+00, 0.3270261E+00, 0.3270261E+00 /
      data (ref_adm(23,iz,27, 8),iz = 1,20) / &
     & 0.4988400E+00, 0.4988400E+00, 0.4633500E+00, 0.4508000E+00, &
     & 0.4501900E+00, 0.5350200E+00, 0.4486200E+00, 0.5174500E+00, &
     & 0.4254700E+00, 0.5606700E+00, 0.4688100E+00, 0.5572300E+00, &
     & 0.4202900E+00, 0.4500300E+00, 0.4074700E+00, 0.4492010E+00, &
     & 0.4283098E+00, 0.3933086E+00, 0.3265451E+00, 0.3265451E+00 /
      data (ref_adm(23,iz,28, 8),iz = 1,20) / &
     & 0.5046900E+00, 0.5046900E+00, 0.4922800E+00, 0.4894400E+00, &
     & 0.4447500E+00, 0.4545500E+00, 0.4624300E+00, 0.4613600E+00, &
     & 0.5068300E+00, 0.5769500E+00, 0.4945500E+00, 0.5241200E+00, &
     & 0.4679300E+00, 0.4475100E+00, 0.4333400E+00, 0.4483572E+00, &
     & 0.4266989E+00, 0.3919249E+00, 0.3260506E+00, 0.3260506E+00 /
      data (ref_adm(23,iz,29, 8),iz = 1,20) / &
     & 0.4986800E+00, 0.4986800E+00, 0.5148000E+00, 0.4998300E+00, &
     & 0.5161300E+00, 0.5261700E+00, 0.5472200E+00, 0.5384200E+00, &
     & 0.4838400E+00, 0.5268600E+00, 0.5491600E+00, 0.5488100E+00, &
     & 0.4364000E+00, 0.4764987E+00, 0.4566300E+00, 0.4474982E+00, &
     & 0.4253815E+00, 0.3904203E+00, 0.3258060E+00, 0.3258060E+00 /
      data (ref_adm(23,iz,30, 8),iz = 1,20) / &
     & 0.5161100E+00, 0.5161100E+00, 0.5071800E+00, 0.2844300E+00, &
     & 0.4058300E+00, 0.4003800E+00, 0.4924442E+00, 0.4699000E+00, &
     & 0.4807100E+00, 0.5135800E+00, 0.5297200E+00, 0.4882200E+00, &
     & 0.4649700E+00, 0.5560700E+00, 0.4658424E+00, 0.4472396E+00, &
     & 0.4243598E+00, 0.3892460E+00, 0.3256212E+00, 0.3256212E+00 /
      data (ref_adm(23,iz,31, 8),iz = 1,20) / &
     & 0.4184500E+00, 0.4184500E+00, 0.3754100E+00, 0.3558400E+00, &
     & 0.3544100E+00, 0.4897705E+00, 0.5746100E+00, 0.5633900E+00, &
     & 0.5438200E+00, 0.5441900E+00, 0.4923200E+00, 0.5129300E+00, &
     & 0.5236500E+00, 0.5115300E+00, 0.4654996E+00, 0.4470483E+00, &
     & 0.4237901E+00, 0.3879898E+00, 0.3256299E+00, 0.3256299E+00 /
      data (ref_adm(23,iz,32, 8),iz = 1,20) / &
     & 0.3526500E+00, 0.3526500E+00, 0.4866377E+00, 0.4880591E+00, &
     & 0.6771800E+00, 0.5264200E+00, 0.5245400E+00, 0.5333500E+00, &
     & 0.5101600E+00, 0.5722900E+00, 0.5033700E+00, 0.5495900E+00, &
     & 0.4664300E+00, 0.3714500E+00, 0.3595300E+00, 0.5574200E+00, &
     & 0.4230906E+00, 0.3872224E+00, 0.3257686E+00, 0.3257686E+00 /
      data (ref_adm(23,iz,33, 8),iz = 1,20) / &
     & 0.4310000E+00, 0.4310000E+00, 0.4863464E+00, 0.4552900E+00, &
     & 0.5252500E+00, 0.4788900E+00, 0.4671200E+00, 0.5166200E+00, &
     & 0.4724900E+00, 0.4008400E+00, 0.5615300E+00, 0.5590100E+00, &
     & 0.3965100E+00, 0.4816100E+00, 0.4657270E+00, 0.4470659E+00, &
     & 0.4227487E+00, 0.3867030E+00, 0.3258639E+00, 0.3258639E+00 /
      data (ref_adm(23,iz,34, 8),iz = 1,20) / &
     & 0.4443600E+00, 0.4443600E+00, 0.5473200E+00, 0.5240300E+00, &
     & 0.5704200E+00, 0.5676700E+00, 0.5285600E+00, 0.4847300E+00, &
     & 0.3871700E+00, 0.3926700E+00, 0.5517800E+00, 0.4665600E+00, &
     & 0.4883617E+00, 0.5272900E+00, 0.4657763E+00, 0.4468388E+00, &
     & 0.4223987E+00, 0.3859426E+00, 0.3259688E+00, 0.3259688E+00 /
      data (ref_adm(23,iz,35, 8),iz = 1,20) / &
     & 0.4887300E+00, 0.4887300E+00, 0.4685500E+00, 0.4730500E+00, &
     & 0.5369300E+00, 0.4680700E+00, 0.5554200E+00, 0.6224800E+00, &
     & 0.4928800E+00, 0.5060139E+00, 0.5862900E+00, 0.5598600E+00, &
     & 0.5515600E+00, 0.4340500E+00, 0.4662103E+00, 0.4467390E+00, &
     & 0.4223008E+00, 0.3856911E+00, 0.3260642E+00, 0.3260642E+00 /
      data (ref_adm(23,iz,36, 8),iz = 1,20) / &
     & 0.5126100E+00, 0.5126100E+00, 0.4587500E+00, 0.5098400E+00, &
     & 0.5330400E+00, 0.5375600E+00, 0.5004000E+00, 0.5630000E+00, &
     & 0.5856400E+00, 0.5050846E+00, 0.6124300E+00, 0.5502100E+00, &
     & 0.5570400E+00, 0.4263000E+00, 0.4679100E+00, 0.4468434E+00, &
     & 0.4224536E+00, 0.3856858E+00, 0.3261317E+00, 0.3261317E+00 /
      data (ref_adm(23,iz,37, 8),iz = 1,20) / &
     & 0.4702700E+00, 0.4702700E+00, 0.5176200E+00, 0.5214300E+00, &
     & 0.5569400E+00, 0.4625200E+00, 0.4462400E+00, 0.4923487E+00, &
     & 0.4787400E+00, 0.5282400E+00, 0.5078402E+00, 0.6085800E+00, &
     & 0.5877900E+00, 0.4430800E+00, 0.4903400E+00, 0.4470211E+00, &
     & 0.4221987E+00, 0.3855554E+00, 0.3261465E+00, 0.3261465E+00 /
      data (ref_adm(23,iz,38, 8),iz = 1,20) / &
     & 0.4702700E+00, 0.4702700E+00, 0.5176200E+00, 0.5214300E+00, &
     & 0.5569400E+00, 0.4625200E+00, 0.4462400E+00, 0.4923487E+00, &
     & 0.4787400E+00, 0.5282400E+00, 0.5078402E+00, 0.6085800E+00, &
     & 0.5877900E+00, 0.4430800E+00, 0.4903400E+00, 0.4470211E+00, &
     & 0.4221987E+00, 0.3855554E+00, 0.3261465E+00, 0.3261465E+00 /
! Solar Zenith Angle 40.0 Albedo  0.4526635E+00
      data (ref_adm(23,iz, 1, 9),iz = 1,20) / &
     & 0.5243300E+00, 0.5243300E+00, 0.5374800E+00, 0.5209600E+00, &
     & 0.5104300E+00, 0.4907700E+00, 0.5695100E+00, 0.5871100E+00, &
     & 0.4192800E+00, 0.4092300E+00, 0.4125800E+00, 0.5088400E+00, &
     & 0.4031300E+00, 0.4706300E+00, 0.4080800E+00, 0.3845600E+00, &
     & 0.6501800E+00, 0.3778393E+00, 0.3047499E+00, 0.3047499E+00 /
      data (ref_adm(23,iz, 2, 9),iz = 1,20) / &
     & 0.5243300E+00, 0.5243300E+00, 0.5374800E+00, 0.5209600E+00, &
     & 0.5104300E+00, 0.4907700E+00, 0.5695100E+00, 0.5871100E+00, &
     & 0.4192800E+00, 0.4092300E+00, 0.4125800E+00, 0.5088400E+00, &
     & 0.4031300E+00, 0.4706300E+00, 0.4080800E+00, 0.3845600E+00, &
     & 0.6501800E+00, 0.3778393E+00, 0.3047499E+00, 0.3047499E+00 /
      data (ref_adm(23,iz, 3, 9),iz = 1,20) / &
     & 0.5140100E+00, 0.5140100E+00, 0.4957500E+00, 0.5577900E+00, &
     & 0.5106600E+00, 0.5264600E+00, 0.5090300E+00, 0.5096800E+00, &
     & 0.4788600E+00, 0.4293300E+00, 0.4797100E+00, 0.3848000E+00, &
     & 0.4537200E+00, 0.4886200E+00, 0.3707300E+00, 0.4520200E+00, &
     & 0.5117000E+00, 0.3775685E+00, 0.1802951E+00, 0.1802951E+00 /
      data (ref_adm(23,iz, 4, 9),iz = 1,20) / &
     & 0.4791600E+00, 0.4791600E+00, 0.4879400E+00, 0.4656000E+00, &
     & 0.5043200E+00, 0.4927400E+00, 0.5107900E+00, 0.4629500E+00, &
     & 0.4642400E+00, 0.4657600E+00, 0.4289900E+00, 0.3432600E+00, &
     & 0.5160000E+00, 0.4752400E+00, 0.4193200E+00, 0.4011800E+00, &
     & 0.4827700E+00, 0.3772684E+00, 0.3045597E+00, 0.3045597E+00 /
      data (ref_adm(23,iz, 5, 9),iz = 1,20) / &
     & 0.4078600E+00, 0.4078600E+00, 0.4177800E+00, 0.4954900E+00, &
     & 0.5070000E+00, 0.4283400E+00, 0.4615500E+00, 0.4527900E+00, &
     & 0.4043900E+00, 0.4900700E+00, 0.4774200E+00, 0.4436200E+00, &
     & 0.4145000E+00, 0.4514800E+00, 0.4595100E+00, 0.4878800E+00, &
     & 0.4066511E+00, 0.3771070E+00, 0.3043365E+00, 0.3043365E+00 /
      data (ref_adm(23,iz, 6, 9),iz = 1,20) / &
     & 0.3993300E+00, 0.3993300E+00, 0.4993200E+00, 0.5047600E+00, &
     & 0.5064700E+00, 0.4523500E+00, 0.3943200E+00, 0.3806100E+00, &
     & 0.4447962E+00, 0.3838600E+00, 0.4912200E+00, 0.4960500E+00, &
     & 0.4649600E+00, 0.4252000E+00, 0.5861500E+00, 0.4195895E+00, &
     & 0.4072200E+00, 0.3766968E+00, 0.3040966E+00, 0.3040966E+00 /
      data (ref_adm(23,iz, 7, 9),iz = 1,20) / &
     & 0.4514600E+00, 0.4514600E+00, 0.4854700E+00, 0.5104600E+00, &
     & 0.4564700E+00, 0.4987200E+00, 0.5840000E+00, 0.4311300E+00, &
     & 0.4033000E+00, 0.3982700E+00, 0.4498400E+00, 0.4796300E+00, &
     & 0.4988900E+00, 0.4066600E+00, 0.4879200E+00, 0.4258900E+00, &
     & 0.4058218E+00, 0.3763158E+00, 0.3037291E+00, 0.3037291E+00 /
      data (ref_adm(23,iz, 8, 9),iz = 1,20) / &
     & 0.4512100E+00, 0.4512100E+00, 0.4761700E+00, 0.4003900E+00, &
     & 0.4277700E+00, 0.4747400E+00, 0.5327900E+00, 0.5012800E+00, &
     & 0.5043900E+00, 0.3888700E+00, 0.2878600E+00, 0.3739800E+00, &
     & 0.4114400E+00, 0.3832400E+00, 0.4372600E+00, 0.4211600E+00, &
     & 0.4111800E+00, 0.3756362E+00, 0.3033218E+00, 0.3033218E+00 /
      data (ref_adm(23,iz, 9, 9),iz = 1,20) / &
     & 0.4707300E+00, 0.4707300E+00, 0.4447300E+00, 0.4735800E+00, &
     & 0.3739900E+00, 0.4519000E+00, 0.3588600E+00, 0.4448500E+00, &
     & 0.4989200E+00, 0.4751600E+00, 0.4112400E+00, 0.4594700E+00, &
     & 0.5018500E+00, 0.3920500E+00, 0.4716400E+00, 0.4897900E+00, &
     & 0.4958500E+00, 0.3215900E+00, 0.3028515E+00, 0.3028515E+00 /
      data (ref_adm(23,iz,10, 9),iz = 1,20) / &
     & 0.4912700E+00, 0.4912700E+00, 0.4669900E+00, 0.5265400E+00, &
     & 0.4442800E+00, 0.4995700E+00, 0.4831400E+00, 0.4554500E+00, &
     & 0.4146100E+00, 0.5207600E+00, 0.4712500E+00, 0.4847400E+00, &
     & 0.4585800E+00, 0.2463300E+00, 0.4433800E+00, 0.4907500E+00, &
     & 0.4039310E+00, 0.3339700E+00, 0.3023390E+00, 0.3023390E+00 /
      data (ref_adm(23,iz,11, 9),iz = 1,20) / &
     & 0.4950800E+00, 0.4950800E+00, 0.5138500E+00, 0.4356400E+00, &
     & 0.4734500E+00, 0.4424100E+00, 0.4950000E+00, 0.4110300E+00, &
     & 0.4472200E+00, 0.4309500E+00, 0.2071400E+00, 0.4804300E+00, &
     & 0.4457800E+00, 0.5777100E+00, 0.5393600E+00, 0.4170427E+00, &
     & 0.4772000E+00, 0.3737857E+00, 0.3018195E+00, 0.3018195E+00 /
      data (ref_adm(23,iz,12, 9),iz = 1,20) / &
     & 0.4656500E+00, 0.4656500E+00, 0.4720000E+00, 0.4733800E+00, &
     & 0.4932600E+00, 0.4825400E+00, 0.4748900E+00, 0.4700900E+00, &
     & 0.4832600E+00, 0.4002000E+00, 0.4271700E+00, 0.3909400E+00, &
     & 0.4610700E+00, 0.4365000E+00, 0.3396100E+00, 0.4161555E+00, &
     & 0.4024755E+00, 0.3730570E+00, 0.3012066E+00, 0.3012066E+00 /
      data (ref_adm(23,iz,13, 9),iz = 1,20) / &
     & 0.4372500E+00, 0.4372500E+00, 0.4155400E+00, 0.4390900E+00, &
     & 0.4148700E+00, 0.4271100E+00, 0.4156400E+00, 0.4532800E+00, &
     & 0.4503200E+00, 0.4374900E+00, 0.4473800E+00, 0.4397600E+00, &
     & 0.4394700E+00, 0.4268300E+00, 0.3650700E+00, 0.4154058E+00, &
     & 0.4015496E+00, 0.3722460E+00, 0.3006130E+00, 0.3006130E+00 /
      data (ref_adm(23,iz,14, 9),iz = 1,20) / &
     & 0.4112700E+00, 0.4112700E+00, 0.4411800E+00, 0.4183200E+00, &
     & 0.4237300E+00, 0.4531900E+00, 0.4339800E+00, 0.4488500E+00, &
     & 0.4128400E+00, 0.3976400E+00, 0.4058000E+00, 0.4345400E+00, &
     & 0.4290000E+00, 0.4395900E+00, 0.4232696E+00, 0.3273200E+00, &
     & 0.4007794E+00, 0.3713979E+00, 0.3000124E+00, 0.3000124E+00 /
      data (ref_adm(23,iz,15, 9),iz = 1,20) / &
     & 0.4056500E+00, 0.4056500E+00, 0.4459700E+00, 0.3266600E+00, &
     & 0.3100300E+00, 0.3947600E+00, 0.4130700E+00, 0.4265900E+00, &
     & 0.4389300E+00, 0.4105100E+00, 0.4389900E+00, 0.4341000E+00, &
     & 0.3967000E+00, 0.4199800E+00, 0.4186900E+00, 0.4654800E+00, &
     & 0.3997557E+00, 0.3705137E+00, 0.2994272E+00, 0.2994272E+00 /
      data (ref_adm(23,iz,16, 9),iz = 1,20) / &
     & 0.4138100E+00, 0.4138100E+00, 0.3597200E+00, 0.2997600E+00, &
     & 0.3854100E+00, 0.4043800E+00, 0.3589900E+00, 0.4232100E+00, &
     & 0.3729500E+00, 0.3680400E+00, 0.4553400E+00, 0.4227900E+00, &
     & 0.3324300E+00, 0.3793900E+00, 0.4219599E+00, 0.4128642E+00, &
     & 0.3980300E+00, 0.3696932E+00, 0.2988470E+00, 0.2988470E+00 /
      data (ref_adm(23,iz,17, 9),iz = 1,20) / &
     & 0.4312800E+00, 0.4312800E+00, 0.4256500E+00, 0.4470200E+00, &
     & 0.2641200E+00, 0.4056100E+00, 0.3001500E+00, 0.5023800E+00, &
     & 0.4733700E+00, 0.3891700E+00, 0.4099900E+00, 0.4692500E+00, &
     & 0.3952900E+00, 0.4474900E+00, 0.3748500E+00, 0.4118778E+00, &
     & 0.3979254E+00, 0.3686644E+00, 0.2983085E+00, 0.2983085E+00 /
      data (ref_adm(23,iz,18, 9),iz = 1,20) / &
     & 0.4146800E+00, 0.4146800E+00, 0.4384900E+00, 0.4438900E+00, &
     & 0.3967500E+00, 0.4924000E+00, 0.4584400E+00, 0.4420435E+00, &
     & 0.4772200E+00, 0.4260393E+00, 0.3492200E+00, 0.3900800E+00, &
     & 0.4801500E+00, 0.4221600E+00, 0.3984700E+00, 0.3736603E+00, &
     & 0.3417600E+00, 0.3227476E+00, 0.2675632E+00, 0.2675632E+00 /
      data (ref_adm(23,iz,19, 9),iz = 1,20) / &
     & 0.4820400E+00, 0.4820400E+00, 0.3822800E+00, 0.3398100E+00, &
     & 0.3771200E+00, 0.3871000E+00, 0.4159100E+00, 0.4094500E+00, &
     & 0.5023900E+00, 0.5180300E+00, 0.3320200E+00, 0.3822900E+00, &
     & 0.4499400E+00, 0.2625900E+00, 0.3467100E+00, 0.3736122E+00, &
     & 0.3544454E+00, 0.3224744E+00, 0.2673489E+00, 0.2673489E+00 /
      data (ref_adm(23,iz,20, 9),iz = 1,20) / &
     & 0.3769600E+00, 0.3769600E+00, 0.3800700E+00, 0.4174700E+00, &
     & 0.4038700E+00, 0.4234600E+00, 0.3871100E+00, 0.3508100E+00, &
     & 0.4140000E+00, 0.5111100E+00, 0.5496800E+00, 0.3427800E+00, &
     & 0.4897100E+00, 0.4269300E+00, 0.4656100E+00, 0.3736065E+00, &
     & 0.3543248E+00, 0.3222261E+00, 0.2671994E+00, 0.2671994E+00 /
      data (ref_adm(23,iz,21, 9),iz = 1,20) / &
     & 0.4228300E+00, 0.4228300E+00, 0.4498600E+00, 0.4069100E+00, &
     & 0.3683100E+00, 0.4672300E+00, 0.4129000E+00, 0.3971200E+00, &
     & 0.5047500E+00, 0.5723700E+00, 0.5428200E+00, 0.4374200E+00, &
     & 0.4083400E+00, 0.4274100E+00, 0.4453400E+00, 0.3737119E+00, &
     & 0.3543100E+00, 0.3220294E+00, 0.2670762E+00, 0.2670762E+00 /
      data (ref_adm(23,iz,22, 9),iz = 1,20) / &
     & 0.4264200E+00, 0.4264200E+00, 0.4697200E+00, 0.4129800E+00, &
     & 0.4276700E+00, 0.4683400E+00, 0.4870300E+00, 0.4614000E+00, &
     & 0.4747400E+00, 0.5243300E+00, 0.5427500E+00, 0.4017000E+00, &
     & 0.4398200E+00, 0.4455200E+00, 0.4056300E+00, 0.5057939E+00, &
     & 0.5033674E+00, 0.4881392E+00, 0.4294944E+00, 0.4294944E+00 /
      data (ref_adm(23,iz,23, 9),iz = 1,20) / &
     & 0.4694500E+00, 0.4694500E+00, 0.4172300E+00, 0.3928900E+00, &
     & 0.4808900E+00, 0.4574600E+00, 0.3946200E+00, 0.4585800E+00, &
     & 0.4460200E+00, 0.4897100E+00, 0.4234900E+00, 0.4814100E+00, &
     & 0.4493100E+00, 0.4073500E+00, 0.2685000E+00, 0.4976232E+00, &
     & 0.4960273E+00, 0.4801578E+00, 0.4284701E+00, 0.4284701E+00 /
      data (ref_adm(23,iz,24, 9),iz = 1,20) / &
     & 0.5089900E+00, 0.5089900E+00, 0.4793000E+00, 0.4495700E+00, &
     & 0.4700200E+00, 0.4999600E+00, 0.4163400E+00, 0.3885700E+00, &
     & 0.4312500E+00, 0.4643700E+00, 0.4332700E+00, 0.4673800E+00, &
     & 0.4086500E+00, 0.4164300E+00, 0.3278600E+00, 0.3606400E+00, &
     & 0.4883308E+00, 0.4744848E+00, 0.4290553E+00, 0.4290553E+00 /
      data (ref_adm(23,iz,25, 9),iz = 1,20) / &
     & 0.4424400E+00, 0.4424400E+00, 0.4959200E+00, 0.4086500E+00, &
     & 0.4549000E+00, 0.4430600E+00, 0.5001200E+00, 0.4769700E+00, &
     & 0.4452000E+00, 0.4660800E+00, 0.4593700E+00, 0.4569200E+00, &
     & 0.4363100E+00, 0.4657700E+00, 0.3675800E+00, 0.3757700E+00, &
     & 0.3104100E+00, 0.4698469E+00, 0.4310814E+00, 0.4310814E+00 /
      data (ref_adm(23,iz,26, 9),iz = 1,20) / &
     & 0.4518500E+00, 0.4518500E+00, 0.3948400E+00, 0.4404800E+00, &
     & 0.4677300E+00, 0.4489500E+00, 0.4642400E+00, 0.4330200E+00, &
     & 0.4317300E+00, 0.4318800E+00, 0.4487600E+00, 0.5459600E+00, &
     & 0.5130900E+00, 0.4884400E+00, 0.4861938E+00, 0.4424200E+00, &
     & 0.4613400E+00, 0.4693100E+00, 0.4347812E+00, 0.4347812E+00 /
      data (ref_adm(23,iz,27, 9),iz = 1,20) / &
     & 0.4335600E+00, 0.4335600E+00, 0.4422900E+00, 0.4095800E+00, &
     & 0.4310300E+00, 0.4290200E+00, 0.4242800E+00, 0.4152400E+00, &
     & 0.5016700E+00, 0.4316600E+00, 0.4705800E+00, 0.5433900E+00, &
     & 0.3684800E+00, 0.4515000E+00, 0.4764700E+00, 0.4798100E+00, &
     & 0.4627200E+00, 0.4701405E+00, 0.4407930E+00, 0.4407930E+00 /
      data (ref_adm(23,iz,28, 9),iz = 1,20) / &
     & 0.4457400E+00, 0.4457400E+00, 0.4483600E+00, 0.4699300E+00, &
     & 0.4848900E+00, 0.4545900E+00, 0.4937700E+00, 0.4915500E+00, &
     & 0.4946000E+00, 0.4653600E+00, 0.5136800E+00, 0.5347000E+00, &
     & 0.5256700E+00, 0.5160900E+00, 0.5721300E+00, 0.4705400E+00, &
     & 0.4853399E+00, 0.4730480E+00, 0.4485914E+00, 0.4485914E+00 /
      data (ref_adm(23,iz,29, 9),iz = 1,20) / &
     & 0.4373000E+00, 0.4373000E+00, 0.3940500E+00, 0.4183100E+00, &
     & 0.4127700E+00, 0.3482700E+00, 0.4525300E+00, 0.5048800E+00, &
     & 0.5268400E+00, 0.5556100E+00, 0.5382500E+00, 0.5164200E+00, &
     & 0.5419300E+00, 0.5139700E+00, 0.4383000E+00, 0.5413300E+00, &
     & 0.5418200E+00, 0.4770264E+00, 0.4566661E+00, 0.4566661E+00 /
      data (ref_adm(23,iz,30, 9),iz = 1,20) / &
     & 0.4550500E+00, 0.4550500E+00, 0.4574700E+00, 0.4001500E+00, &
     & 0.3907000E+00, 0.4691400E+00, 0.5282700E+00, 0.5399800E+00, &
     & 0.6092800E+00, 0.4093400E+00, 0.4807500E+00, 0.5049700E+00, &
     & 0.4758600E+00, 0.5198200E+00, 0.6054900E+00, 0.5434100E+00, &
     & 0.4955136E+00, 0.4834750E+00, 0.4652283E+00, 0.4652283E+00 /
      data (ref_adm(23,iz,31, 9),iz = 1,20) / &
     & 0.4469300E+00, 0.4469300E+00, 0.4854000E+00, 0.4141300E+00, &
     & 0.4646600E+00, 0.4867700E+00, 0.4989900E+00, 0.5338500E+00, &
     & 0.5727000E+00, 0.4789355E+00, 0.4712800E+00, 0.6037500E+00, &
     & 0.4519900E+00, 0.4382700E+00, 0.5075718E+00, 0.5079511E+00, &
     & 0.5039685E+00, 0.4905395E+00, 0.4745956E+00, 0.4745956E+00 /
      data (ref_adm(23,iz,32, 9),iz = 1,20) / &
     & 0.4497200E+00, 0.4497200E+00, 0.3924400E+00, 0.4829300E+00, &
     & 0.4865800E+00, 0.4795000E+00, 0.5203000E+00, 0.5297500E+00, &
     & 0.5053100E+00, 0.5143800E+00, 0.5174200E+00, 0.5016100E+00, &
     & 0.5213800E+00, 0.3645400E+00, 0.5138429E+00, 0.4073100E+00, &
     & 0.5492600E+00, 0.4990852E+00, 0.4833262E+00, 0.4833262E+00 /
      data (ref_adm(23,iz,33, 9),iz = 1,20) / &
     & 0.4392900E+00, 0.4392900E+00, 0.3935000E+00, 0.4262400E+00, &
     & 0.4523700E+00, 0.4737800E+00, 0.4850700E+00, 0.4811700E+00, &
     & 0.5084300E+00, 0.5155500E+00, 0.4634100E+00, 0.4655700E+00, &
     & 0.4814100E+00, 0.5007700E+00, 0.4881000E+00, 0.4175300E+00, &
     & 0.4529000E+00, 0.4904700E+00, 0.4919890E+00, 0.4919890E+00 /
      data (ref_adm(23,iz,34, 9),iz = 1,20) / &
     & 0.4482000E+00, 0.4482000E+00, 0.4962600E+00, 0.4982200E+00, &
     & 0.5053000E+00, 0.4842200E+00, 0.4649100E+00, 0.5042500E+00, &
     & 0.4827200E+00, 0.3871500E+00, 0.4242900E+00, 0.4434400E+00, &
     & 0.5835000E+00, 0.6542000E+00, 0.6073600E+00, 0.4601300E+00, &
     & 0.4596500E+00, 0.5145113E+00, 0.4998128E+00, 0.4998128E+00 /
      data (ref_adm(23,iz,35, 9),iz = 1,20) / &
     & 0.4509000E+00, 0.4509000E+00, 0.4865600E+00, 0.5334000E+00, &
     & 0.4973200E+00, 0.4546100E+00, 0.4642500E+00, 0.4623500E+00, &
     & 0.3350700E+00, 0.5347200E+00, 0.4385200E+00, 0.4478300E+00, &
     & 0.5548400E+00, 0.3985300E+00, 0.4625400E+00, 0.5163962E+00, &
     & 0.5286092E+00, 0.5207683E+00, 0.5059803E+00, 0.5059803E+00 /
      data (ref_adm(23,iz,36, 9),iz = 1,20) / &
     & 0.4504800E+00, 0.4504800E+00, 0.5155800E+00, 0.4229200E+00, &
     & 0.4752700E+00, 0.4938900E+00, 0.4890500E+00, 0.4979000E+00, &
     & 0.5404000E+00, 0.3815800E+00, 0.3897700E+00, 0.4539800E+00, &
     & 0.5887300E+00, 0.5656500E+00, 0.5360200E+00, 0.5114701E+00, &
     & 0.5272014E+00, 0.5250757E+00, 0.5099694E+00, 0.5099694E+00 /
      data (ref_adm(23,iz,37, 9),iz = 1,20) / &
     & 0.4857100E+00, 0.4857100E+00, 0.4426800E+00, 0.4072600E+00, &
     & 0.4551400E+00, 0.5184900E+00, 0.4654600E+00, 0.4601200E+00, &
     & 0.3926500E+00, 0.5040200E+00, 0.5502800E+00, 0.5304100E+00, &
     & 0.5470800E+00, 0.5397800E+00, 0.5450800E+00, 0.5614200E+00, &
     & 0.5253137E+00, 0.5270995E+00, 0.5122519E+00, 0.5122519E+00 /
      data (ref_adm(23,iz,38, 9),iz = 1,20) / &
     & 0.4857100E+00, 0.4857100E+00, 0.4426800E+00, 0.4072600E+00, &
     & 0.4551400E+00, 0.5184900E+00, 0.4654600E+00, 0.4601200E+00, &
     & 0.3926500E+00, 0.5040200E+00, 0.5502800E+00, 0.5304100E+00, &
     & 0.5470800E+00, 0.5397800E+00, 0.5450800E+00, 0.5614200E+00, &
     & 0.5253137E+00, 0.5270995E+00, 0.5122519E+00, 0.5122519E+00 /
! Solar Zenith Angle 45.0 Albedo  0.4398101E+00
      data (ref_adm(23,iz, 1,10),iz = 1,20) / &
     & 0.4323900E+00, 0.4323900E+00, 0.3773100E+00, 0.4472800E+00, &
     & 0.3982500E+00, 0.4309900E+00, 0.4110900E+00, 0.4074600E+00, &
     & 0.4418200E+00, 0.4742500E+00, 0.4289500E+00, 0.4478600E+00, &
     & 0.4808600E+00, 0.5278200E+00, 0.5166200E+00, 0.5580400E+00, &
     & 0.5617300E+00, 0.5138400E+00, 0.4175451E+00, 0.4175451E+00 /
      data (ref_adm(23,iz, 2,10),iz = 1,20) / &
     & 0.4323900E+00, 0.4323900E+00, 0.3773100E+00, 0.4472800E+00, &
     & 0.3982500E+00, 0.4309900E+00, 0.4110900E+00, 0.4074600E+00, &
     & 0.4418200E+00, 0.4742500E+00, 0.4289500E+00, 0.4478600E+00, &
     & 0.4808600E+00, 0.5278200E+00, 0.5166200E+00, 0.5580400E+00, &
     & 0.5617300E+00, 0.5138400E+00, 0.4175451E+00, 0.4175451E+00 /
      data (ref_adm(23,iz, 3,10),iz = 1,20) / &
     & 0.4331100E+00, 0.4331100E+00, 0.4166700E+00, 0.3855900E+00, &
     & 0.4449600E+00, 0.3944200E+00, 0.4477400E+00, 0.4774800E+00, &
     & 0.4356600E+00, 0.4046700E+00, 0.5103300E+00, 0.4803100E+00, &
     & 0.4884300E+00, 0.4889100E+00, 0.4942600E+00, 0.5502600E+00, &
     & 0.5500200E+00, 0.5199700E+00, 0.1865444E+00, 0.1865444E+00 /
      data (ref_adm(23,iz, 4,10),iz = 1,20) / &
     & 0.4477200E+00, 0.4477200E+00, 0.4492600E+00, 0.4412900E+00, &
     & 0.4335800E+00, 0.4640000E+00, 0.4420800E+00, 0.4709300E+00, &
     & 0.4013900E+00, 0.4126000E+00, 0.4818300E+00, 0.4812800E+00, &
     & 0.4520300E+00, 0.4621300E+00, 0.4634000E+00, 0.5660600E+00, &
     & 0.5350500E+00, 0.5030814E+00, 0.4115629E+00, 0.4115629E+00 /
      data (ref_adm(23,iz, 5,10),iz = 1,20) / &
     & 0.4897500E+00, 0.4897500E+00, 0.4509600E+00, 0.4413300E+00, &
     & 0.3845600E+00, 0.3922700E+00, 0.4282300E+00, 0.4157600E+00, &
     & 0.4563400E+00, 0.4841000E+00, 0.5178500E+00, 0.4609300E+00, &
     & 0.4683200E+00, 0.5006200E+00, 0.4989800E+00, 0.5010600E+00, &
     & 0.5286000E+00, 0.5545400E+00, 0.4289900E+00, 0.4289900E+00 /
      data (ref_adm(23,iz, 6,10),iz = 1,20) / &
     & 0.4458700E+00, 0.4458700E+00, 0.4378400E+00, 0.4420300E+00, &
     & 0.4555000E+00, 0.4387600E+00, 0.4413300E+00, 0.3925300E+00, &
     & 0.4262900E+00, 0.4907100E+00, 0.4879100E+00, 0.4594500E+00, &
     & 0.5006300E+00, 0.4529600E+00, 0.4718700E+00, 0.4956800E+00, &
     & 0.4790800E+00, 0.4012700E+00, 0.3787300E+00, 0.3787300E+00 /
      data (ref_adm(23,iz, 7,10),iz = 1,20) / &
     & 0.4132700E+00, 0.4132700E+00, 0.3770600E+00, 0.4819700E+00, &
     & 0.4320300E+00, 0.3990800E+00, 0.3471200E+00, 0.4144000E+00, &
     & 0.4005700E+00, 0.4639100E+00, 0.4352300E+00, 0.4718600E+00, &
     & 0.4794500E+00, 0.4469000E+00, 0.4171000E+00, 0.4956500E+00, &
     & 0.4820100E+00, 0.3781000E+00, 0.3905976E+00, 0.3905976E+00 /
      data (ref_adm(23,iz, 8,10),iz = 1,20) / &
     & 0.4186600E+00, 0.4186600E+00, 0.3952500E+00, 0.4158800E+00, &
     & 0.4059900E+00, 0.3949900E+00, 0.3789600E+00, 0.3810100E+00, &
     & 0.4111600E+00, 0.4260700E+00, 0.4234000E+00, 0.4819800E+00, &
     & 0.4736300E+00, 0.4960800E+00, 0.4651600E+00, 0.4683700E+00, &
     & 0.4775700E+00, 0.3793400E+00, 0.3819788E+00, 0.3819788E+00 /
      data (ref_adm(23,iz, 9,10),iz = 1,20) / &
     & 0.4499500E+00, 0.4499500E+00, 0.4012000E+00, 0.4056600E+00, &
     & 0.4185000E+00, 0.4169200E+00, 0.3727500E+00, 0.3801400E+00, &
     & 0.3878900E+00, 0.4251500E+00, 0.4190400E+00, 0.4094200E+00, &
     & 0.4353200E+00, 0.4870800E+00, 0.4806200E+00, 0.4823100E+00, &
     & 0.5996900E+00, 0.4499650E+00, 0.3731443E+00, 0.3731443E+00 /
      data (ref_adm(23,iz,10,10),iz = 1,20) / &
     & 0.4343400E+00, 0.4343400E+00, 0.4403700E+00, 0.4154500E+00, &
     & 0.3678900E+00, 0.3565700E+00, 0.3306900E+00, 0.3778000E+00, &
     & 0.3884100E+00, 0.4268100E+00, 0.3827500E+00, 0.4489500E+00, &
     & 0.4510500E+00, 0.4737800E+00, 0.4715800E+00, 0.4984300E+00, &
     & 0.5153400E+00, 0.4380736E+00, 0.3643880E+00, 0.3643880E+00 /
      data (ref_adm(23,iz,11,10),iz = 1,20) / &
     & 0.4430700E+00, 0.4430700E+00, 0.4087000E+00, 0.3464900E+00, &
     & 0.3551800E+00, 0.3929800E+00, 0.3827800E+00, 0.3987600E+00, &
     & 0.3808800E+00, 0.3906600E+00, 0.4097100E+00, 0.4096900E+00, &
     & 0.4224300E+00, 0.4671500E+00, 0.4847200E+00, 0.4935500E+00, &
     & 0.4508695E+00, 0.4263212E+00, 0.3559493E+00, 0.3559493E+00 /
      data (ref_adm(23,iz,12,10),iz = 1,20) / &
     & 0.4287700E+00, 0.4287700E+00, 0.4375400E+00, 0.4174500E+00, &
     & 0.3937600E+00, 0.3956800E+00, 0.4377400E+00, 0.3874000E+00, &
     & 0.4184800E+00, 0.4470900E+00, 0.3779200E+00, 0.4522800E+00, &
     & 0.4443500E+00, 0.4549000E+00, 0.4681500E+00, 0.4230100E+00, &
     & 0.4445200E+00, 0.4152185E+00, 0.3480085E+00, 0.3480085E+00 /
      data (ref_adm(23,iz,13,10),iz = 1,20) / &
     & 0.4271400E+00, 0.4271400E+00, 0.4303300E+00, 0.4206800E+00, &
     & 0.4363700E+00, 0.4089800E+00, 0.4033900E+00, 0.4158200E+00, &
     & 0.4226300E+00, 0.4317100E+00, 0.4404300E+00, 0.4238300E+00, &
     & 0.4317600E+00, 0.4830300E+00, 0.4072600E+00, 0.4840000E+00, &
     & 0.2516200E+00, 0.4043237E+00, 0.3405481E+00, 0.3405481E+00 /
      data (ref_adm(23,iz,14,10),iz = 1,20) / &
     & 0.4051500E+00, 0.4051500E+00, 0.3953300E+00, 0.3631500E+00, &
     & 0.3791100E+00, 0.3786500E+00, 0.3915900E+00, 0.3975400E+00, &
     & 0.4224100E+00, 0.4143600E+00, 0.4445300E+00, 0.4522700E+00, &
     & 0.4682200E+00, 0.4632700E+00, 0.4387200E+00, 0.3082700E+00, &
     & 0.4201359E+00, 0.3942714E+00, 0.3335047E+00, 0.3335047E+00 /
      data (ref_adm(23,iz,15,10),iz = 1,20) / &
     & 0.4041000E+00, 0.4041000E+00, 0.3953900E+00, 0.4108400E+00, &
     & 0.3918500E+00, 0.4348800E+00, 0.4244100E+00, 0.4316400E+00, &
     & 0.4387300E+00, 0.4231600E+00, 0.4105900E+00, 0.3983000E+00, &
     & 0.4173800E+00, 0.4362800E+00, 0.3998400E+00, 0.4973400E+00, &
     & 0.4114894E+00, 0.3853517E+00, 0.3269812E+00, 0.3269812E+00 /
      data (ref_adm(23,iz,16,10),iz = 1,20) / &
     & 0.4157700E+00, 0.4157700E+00, 0.3946900E+00, 0.3841000E+00, &
     & 0.3487400E+00, 0.4494500E+00, 0.4127300E+00, 0.3893800E+00, &
     & 0.4261300E+00, 0.3638300E+00, 0.4163500E+00, 0.4587100E+00, &
     & 0.4330000E+00, 0.3833600E+00, 0.4257400E+00, 0.4260800E+00, &
     & 0.3351700E+00, 0.3774941E+00, 0.3214979E+00, 0.3214979E+00 /
      data (ref_adm(23,iz,17,10),iz = 1,20) / &
     & 0.4312600E+00, 0.4312600E+00, 0.3843800E+00, 0.3863500E+00, &
     & 0.4448900E+00, 0.4288300E+00, 0.3757700E+00, 0.4138800E+00, &
     & 0.4084500E+00, 0.4295800E+00, 0.3902300E+00, 0.4871000E+00, &
     & 0.3594300E+00, 0.4011000E+00, 0.3754800E+00, 0.3711800E+00, &
     & 0.4368000E+00, 0.3706497E+00, 0.3168846E+00, 0.3168846E+00 /
      data (ref_adm(23,iz,18,10),iz = 1,20) / &
     & 0.3988300E+00, 0.3988300E+00, 0.4181800E+00, 0.3573200E+00, &
     & 0.4222400E+00, 0.4506300E+00, 0.3654300E+00, 0.4222600E+00, &
     & 0.4253500E+00, 0.4640000E+00, 0.4933200E+00, 0.4616000E+00, &
     & 0.4143500E+00, 0.4538800E+00, 0.4693400E+00, 0.4306400E+00, &
     & 0.4028500E+00, 0.4306600E+00, 0.3339475E+00, 0.3339475E+00 /
      data (ref_adm(23,iz,19,10),iz = 1,20) / &
     & 0.3737300E+00, 0.3737300E+00, 0.3860100E+00, 0.3830500E+00, &
     & 0.3585600E+00, 0.4446100E+00, 0.4024700E+00, 0.4084400E+00, &
     & 0.4246300E+00, 0.4518300E+00, 0.4694400E+00, 0.4387500E+00, &
     & 0.4474800E+00, 0.4359400E+00, 0.4492600E+00, 0.4384325E+00, &
     & 0.3574000E+00, 0.4010707E+00, 0.3313463E+00, 0.3313463E+00 /
      data (ref_adm(23,iz,20,10),iz = 1,20) / &
     & 0.3898700E+00, 0.3898700E+00, 0.3208800E+00, 0.3240100E+00, &
     & 0.3325300E+00, 0.3399900E+00, 0.3545400E+00, 0.3702600E+00, &
     & 0.3908700E+00, 0.3776000E+00, 0.4527100E+00, 0.4829300E+00, &
     & 0.4592000E+00, 0.4607500E+00, 0.4460500E+00, 0.4185600E+00, &
     & 0.4124000E+00, 0.3968126E+00, 0.3292697E+00, 0.3292697E+00 /
      data (ref_adm(23,iz,21,10),iz = 1,20) / &
     & 0.4132100E+00, 0.4132100E+00, 0.3982800E+00, 0.4204000E+00, &
     & 0.3608600E+00, 0.3386300E+00, 0.3608800E+00, 0.3733300E+00, &
     & 0.4134100E+00, 0.4061000E+00, 0.4559000E+00, 0.4130300E+00, &
     & 0.4133100E+00, 0.4703400E+00, 0.4623100E+00, 0.4851500E+00, &
     & 0.3804200E+00, 0.3931905E+00, 0.3272933E+00, 0.3272933E+00 /
      data (ref_adm(23,iz,22,10),iz = 1,20) / &
     & 0.3966300E+00, 0.3966300E+00, 0.4315300E+00, 0.4261500E+00, &
     & 0.3688400E+00, 0.4206900E+00, 0.4114200E+00, 0.4106000E+00, &
     & 0.4067400E+00, 0.4289800E+00, 0.3946500E+00, 0.4676200E+00, &
     & 0.4638400E+00, 0.4770500E+00, 0.4242500E+00, 0.4803400E+00, &
     & 0.4188872E+00, 0.4023731E+00, 0.3626892E+00, 0.3626892E+00 /
      data (ref_adm(23,iz,23,10),iz = 1,20) / &
     & 0.4375400E+00, 0.4375400E+00, 0.4422000E+00, 0.4374200E+00, &
     & 0.3743200E+00, 0.3398400E+00, 0.4246700E+00, 0.4664500E+00, &
     & 0.4312400E+00, 0.4040800E+00, 0.3861900E+00, 0.4359800E+00, &
     & 0.4557000E+00, 0.5005500E+00, 0.4546500E+00, 0.4785100E+00, &
     & 0.4158528E+00, 0.3994682E+00, 0.3627848E+00, 0.3627848E+00 /
      data (ref_adm(23,iz,24,10),iz = 1,20) / &
     & 0.4275300E+00, 0.4275300E+00, 0.4004100E+00, 0.4277400E+00, &
     & 0.4274100E+00, 0.3782100E+00, 0.4069500E+00, 0.4059000E+00, &
     & 0.3788900E+00, 0.3780100E+00, 0.4434200E+00, 0.4949500E+00, &
     & 0.4666900E+00, 0.4797400E+00, 0.4635700E+00, 0.4587000E+00, &
     & 0.5305900E+00, 0.3978250E+00, 0.3637447E+00, 0.3637447E+00 /
      data (ref_adm(23,iz,25,10),iz = 1,20) / &
     & 0.3861600E+00, 0.3861600E+00, 0.4249500E+00, 0.4299700E+00, &
     & 0.4502600E+00, 0.3894400E+00, 0.3981400E+00, 0.4367500E+00, &
     & 0.4584800E+00, 0.4964200E+00, 0.4934300E+00, 0.4806200E+00, &
     & 0.4586100E+00, 0.4442900E+00, 0.4227300E+00, 0.4529100E+00, &
     & 0.4284800E+00, 0.3967616E+00, 0.3658185E+00, 0.3658185E+00 /
      data (ref_adm(23,iz,26,10),iz = 1,20) / &
     & 0.4168400E+00, 0.4168400E+00, 0.4148700E+00, 0.4159400E+00, &
     & 0.4232900E+00, 0.4024800E+00, 0.3991000E+00, 0.4101000E+00, &
     & 0.4196900E+00, 0.4474100E+00, 0.4816400E+00, 0.4502800E+00, &
     & 0.4525800E+00, 0.4538200E+00, 0.4405500E+00, 0.4432000E+00, &
     & 0.4473800E+00, 0.3705000E+00, 0.3686832E+00, 0.3686832E+00 /
      data (ref_adm(23,iz,27,10),iz = 1,20) / &
     & 0.4163500E+00, 0.4163500E+00, 0.4379900E+00, 0.4557800E+00, &
     & 0.4421500E+00, 0.4362900E+00, 0.4326500E+00, 0.4194000E+00, &
     & 0.4143100E+00, 0.4048400E+00, 0.4487400E+00, 0.4448100E+00, &
     & 0.4517400E+00, 0.4509200E+00, 0.3869900E+00, 0.3831100E+00, &
     & 0.4482700E+00, 0.3751900E+00, 0.3833700E+00, 0.3833700E+00 /
      data (ref_adm(23,iz,28,10),iz = 1,20) / &
     & 0.4514500E+00, 0.4514500E+00, 0.4907900E+00, 0.4603900E+00, &
     & 0.4949900E+00, 0.4916500E+00, 0.4907300E+00, 0.5066500E+00, &
     & 0.4890500E+00, 0.4894500E+00, 0.5083900E+00, 0.5193600E+00, &
     & 0.4861500E+00, 0.4867800E+00, 0.4539700E+00, 0.4757600E+00, &
     & 0.4336200E+00, 0.3993300E+00, 0.3077800E+00, 0.3077800E+00 /
      data (ref_adm(23,iz,29,10),iz = 1,20) / &
     & 0.4323100E+00, 0.4323100E+00, 0.4410000E+00, 0.4560300E+00, &
     & 0.4586900E+00, 0.4030900E+00, 0.4567700E+00, 0.4273500E+00, &
     & 0.4624600E+00, 0.5153300E+00, 0.5072500E+00, 0.5157100E+00, &
     & 0.5306100E+00, 0.5158000E+00, 0.4651000E+00, 0.4773700E+00, &
     & 0.4650800E+00, 0.3743800E+00, 0.3835269E+00, 0.3835269E+00 /
      data (ref_adm(23,iz,30,10),iz = 1,20) / &
     & 0.4690100E+00, 0.4690100E+00, 0.4981800E+00, 0.4832300E+00, &
     & 0.4314800E+00, 0.4087000E+00, 0.4103500E+00, 0.4151700E+00, &
     & 0.4165900E+00, 0.4420300E+00, 0.4325100E+00, 0.4467400E+00, &
     & 0.4525600E+00, 0.4144000E+00, 0.4229400E+00, 0.4693700E+00, &
     & 0.4598500E+00, 0.3731300E+00, 0.2862600E+00, 0.2862600E+00 /
      data (ref_adm(23,iz,31,10),iz = 1,20) / &
     & 0.4359000E+00, 0.4359000E+00, 0.4475200E+00, 0.4371000E+00, &
     & 0.4417600E+00, 0.4378300E+00, 0.4317200E+00, 0.4142600E+00, &
     & 0.4223600E+00, 0.4189400E+00, 0.3986400E+00, 0.4150000E+00, &
     & 0.4298000E+00, 0.4228800E+00, 0.4284900E+00, 0.4380600E+00, &
     & 0.4083900E+00, 0.3846700E+00, 0.3241400E+00, 0.3241400E+00 /
      data (ref_adm(23,iz,32,10),iz = 1,20) / &
     & 0.4743700E+00, 0.4743700E+00, 0.4688200E+00, 0.4621700E+00, &
     & 0.4529500E+00, 0.4320400E+00, 0.4531800E+00, 0.4073500E+00, &
     & 0.4659500E+00, 0.4702400E+00, 0.4495400E+00, 0.4816500E+00, &
     & 0.4666700E+00, 0.4749000E+00, 0.4215100E+00, 0.4748500E+00, &
     & 0.3683500E+00, 0.3165200E+00, 0.2462400E+00, 0.2462400E+00 /
      data (ref_adm(23,iz,33,10),iz = 1,20) / &
     & 0.4411100E+00, 0.4411100E+00, 0.4534800E+00, 0.4459500E+00, &
     & 0.4610500E+00, 0.5360800E+00, 0.5236700E+00, 0.4812600E+00, &
     & 0.4340800E+00, 0.4883700E+00, 0.5801800E+00, 0.5696200E+00, &
     & 0.4808200E+00, 0.4754900E+00, 0.4509000E+00, 0.3814300E+00, &
     & 0.3616700E+00, 0.3469900E+00, 0.2682500E+00, 0.2682500E+00 /
      data (ref_adm(23,iz,34,10),iz = 1,20) / &
     & 0.4618900E+00, 0.4618900E+00, 0.4412900E+00, 0.4527400E+00, &
     & 0.4462700E+00, 0.5304700E+00, 0.4804300E+00, 0.5379500E+00, &
     & 0.5061500E+00, 0.4687800E+00, 0.4293700E+00, 0.4986200E+00, &
     & 0.4582700E+00, 0.5119000E+00, 0.4201000E+00, 0.4187200E+00, &
     & 0.4495900E+00, 0.4346500E+00, 0.4104266E+00, 0.4104266E+00 /
      data (ref_adm(23,iz,35,10),iz = 1,20) / &
     & 0.4688300E+00, 0.4688300E+00, 0.4370000E+00, 0.4634800E+00, &
     & 0.4793300E+00, 0.4612500E+00, 0.5269200E+00, 0.5746100E+00, &
     & 0.5518300E+00, 0.4847000E+00, 0.5090100E+00, 0.5061400E+00, &
     & 0.4308200E+00, 0.3957000E+00, 0.5027000E+00, 0.4639000E+00, &
     & 0.4928700E+00, 0.4255569E+00, 0.4142069E+00, 0.4142069E+00 /
      data (ref_adm(23,iz,36,10),iz = 1,20) / &
     & 0.4564300E+00, 0.4564300E+00, 0.4217300E+00, 0.4632800E+00, &
     & 0.4978100E+00, 0.5102500E+00, 0.4678800E+00, 0.5595000E+00, &
     & 0.4528400E+00, 0.4775500E+00, 0.4388800E+00, 0.4846800E+00, &
     & 0.4286000E+00, 0.3887700E+00, 0.5077400E+00, 0.4163700E+00, &
     & 0.4822400E+00, 0.4276192E+00, 0.4167483E+00, 0.4167483E+00 /
      data (ref_adm(23,iz,37,10),iz = 1,20) / &
     & 0.4139400E+00, 0.4139400E+00, 0.4584200E+00, 0.4322900E+00, &
     & 0.5130100E+00, 0.4873300E+00, 0.5441200E+00, 0.5245300E+00, &
     & 0.4683800E+00, 0.4511200E+00, 0.4445500E+00, 0.3973000E+00, &
     & 0.4424400E+00, 0.3681700E+00, 0.5072700E+00, 0.5283200E+00, &
     & 0.4371247E+00, 0.4288651E+00, 0.4182281E+00, 0.4182281E+00 /
      data (ref_adm(23,iz,38,10),iz = 1,20) / &
     & 0.4139400E+00, 0.4139400E+00, 0.4584200E+00, 0.4322900E+00, &
     & 0.5130100E+00, 0.4873300E+00, 0.5441200E+00, 0.5245300E+00, &
     & 0.4683800E+00, 0.4511200E+00, 0.4445500E+00, 0.3973000E+00, &
     & 0.4424400E+00, 0.3681700E+00, 0.5072700E+00, 0.5283200E+00, &
     & 0.4371247E+00, 0.4288651E+00, 0.4182281E+00, 0.4182281E+00 /
! Solar Zenith Angle 50.0 Albedo  0.4319059E+00
      data (ref_adm(23,iz, 1,11),iz = 1,20) / &
     & 0.3724900E+00, 0.3724900E+00, 0.3602100E+00, 0.3512900E+00, &
     & 0.3902000E+00, 0.4033400E+00, 0.4086200E+00, 0.4166400E+00, &
     & 0.4415600E+00, 0.4518400E+00, 0.4959900E+00, 0.4950500E+00, &
     & 0.5112600E+00, 0.4941800E+00, 0.5195700E+00, 0.5393200E+00, &
     & 0.5983300E+00, 0.5433200E+00, 0.4746765E+00, 0.4746765E+00 /
      data (ref_adm(23,iz, 2,11),iz = 1,20) / &
     & 0.3724900E+00, 0.3724900E+00, 0.3602100E+00, 0.3512900E+00, &
     & 0.3902000E+00, 0.4033400E+00, 0.4086200E+00, 0.4166400E+00, &
     & 0.4415600E+00, 0.4518400E+00, 0.4959900E+00, 0.4950500E+00, &
     & 0.5112600E+00, 0.4941800E+00, 0.5195700E+00, 0.5393200E+00, &
     & 0.5983300E+00, 0.5433200E+00, 0.4746765E+00, 0.4746765E+00 /
      data (ref_adm(23,iz, 3,11),iz = 1,20) / &
     & 0.3946400E+00, 0.3946400E+00, 0.3866800E+00, 0.3976700E+00, &
     & 0.3908200E+00, 0.3888800E+00, 0.3937100E+00, 0.4119100E+00, &
     & 0.4448600E+00, 0.4458200E+00, 0.4714500E+00, 0.4978800E+00, &
     & 0.4956600E+00, 0.5271300E+00, 0.5172800E+00, 0.5395500E+00, &
     & 0.5596900E+00, 0.5925400E+00, 0.5272800E+00, 0.5272800E+00 /
      data (ref_adm(23,iz, 4,11),iz = 1,20) / &
     & 0.3986300E+00, 0.3986300E+00, 0.3927300E+00, 0.3600100E+00, &
     & 0.3780000E+00, 0.3831400E+00, 0.4161800E+00, 0.4345700E+00, &
     & 0.4535600E+00, 0.4644800E+00, 0.4576200E+00, 0.4730400E+00, &
     & 0.4893000E+00, 0.4813900E+00, 0.5256200E+00, 0.5387100E+00, &
     & 0.5670400E+00, 0.5606200E+00, 0.4961700E+00, 0.4961700E+00 /
      data (ref_adm(23,iz, 5,11),iz = 1,20) / &
     & 0.3934200E+00, 0.3934200E+00, 0.4076700E+00, 0.3815800E+00, &
     & 0.4010900E+00, 0.3858300E+00, 0.4044800E+00, 0.4402500E+00, &
     & 0.4285900E+00, 0.4311800E+00, 0.4720400E+00, 0.4656300E+00, &
     & 0.5081500E+00, 0.4937600E+00, 0.5444000E+00, 0.5621600E+00, &
     & 0.5710700E+00, 0.5055900E+00, 0.4978600E+00, 0.4978600E+00 /
      data (ref_adm(23,iz, 6,11),iz = 1,20) / &
     & 0.4101100E+00, 0.4101100E+00, 0.4253300E+00, 0.3803800E+00, &
     & 0.3878700E+00, 0.4050100E+00, 0.4325400E+00, 0.3978200E+00, &
     & 0.4066800E+00, 0.4048700E+00, 0.4078000E+00, 0.5087400E+00, &
     & 0.4926300E+00, 0.5154500E+00, 0.5333800E+00, 0.5429600E+00, &
     & 0.5344500E+00, 0.5080300E+00, 0.4562393E+00, 0.4562393E+00 /
      data (ref_adm(23,iz, 7,11),iz = 1,20) / &
     & 0.4079300E+00, 0.4079300E+00, 0.3961100E+00, 0.3781000E+00, &
     & 0.4282000E+00, 0.4039200E+00, 0.4306100E+00, 0.4252300E+00, &
     & 0.4239900E+00, 0.4100300E+00, 0.4022600E+00, 0.4374900E+00, &
     & 0.4501200E+00, 0.4560500E+00, 0.4485800E+00, 0.5139400E+00, &
     & 0.5011000E+00, 0.4501300E+00, 0.4491563E+00, 0.4491563E+00 /
      data (ref_adm(23,iz, 8,11),iz = 1,20) / &
     & 0.4182200E+00, 0.4182200E+00, 0.3953200E+00, 0.4038900E+00, &
     & 0.3916800E+00, 0.3921500E+00, 0.4026800E+00, 0.4123900E+00, &
     & 0.4128500E+00, 0.4300800E+00, 0.4343300E+00, 0.4577100E+00, &
     & 0.4405100E+00, 0.4765900E+00, 0.4869900E+00, 0.4781400E+00, &
     & 0.5009400E+00, 0.4781200E+00, 0.4632300E+00, 0.4632300E+00 /
      data (ref_adm(23,iz, 9,11),iz = 1,20) / &
     & 0.4272200E+00, 0.4272200E+00, 0.4252400E+00, 0.4188600E+00, &
     & 0.4255700E+00, 0.4034900E+00, 0.4150900E+00, 0.4230100E+00, &
     & 0.4154800E+00, 0.4231900E+00, 0.4638900E+00, 0.4484600E+00, &
     & 0.4234500E+00, 0.4321500E+00, 0.4600000E+00, 0.4992000E+00, &
     & 0.4744400E+00, 0.4738500E+00, 0.3298300E+00, 0.3298300E+00 /
      data (ref_adm(23,iz,10,11),iz = 1,20) / &
     & 0.4168800E+00, 0.4168800E+00, 0.3831400E+00, 0.3792200E+00, &
     & 0.4085800E+00, 0.4282200E+00, 0.4233700E+00, 0.4114100E+00, &
     & 0.4261400E+00, 0.3652400E+00, 0.4460400E+00, 0.4117600E+00, &
     & 0.4086900E+00, 0.4599300E+00, 0.4852400E+00, 0.4919300E+00, &
     & 0.4628800E+00, 0.4367000E+00, 0.4463400E+00, 0.4463400E+00 /
      data (ref_adm(23,iz,11,11),iz = 1,20) / &
     & 0.4121900E+00, 0.4121900E+00, 0.3906000E+00, 0.3950500E+00, &
     & 0.4262000E+00, 0.4176900E+00, 0.4336000E+00, 0.4049000E+00, &
     & 0.3877000E+00, 0.4003000E+00, 0.4292600E+00, 0.3887200E+00, &
     & 0.4145000E+00, 0.4384800E+00, 0.4638000E+00, 0.4964600E+00, &
     & 0.4611600E+00, 0.4237300E+00, 0.3387200E+00, 0.3387200E+00 /
      data (ref_adm(23,iz,12,11),iz = 1,20) / &
     & 0.4077300E+00, 0.4077300E+00, 0.4066800E+00, 0.4137400E+00, &
     & 0.4350000E+00, 0.4380500E+00, 0.4161600E+00, 0.3772000E+00, &
     & 0.3616700E+00, 0.4002500E+00, 0.4097600E+00, 0.4233000E+00, &
     & 0.4464800E+00, 0.4587600E+00, 0.4585600E+00, 0.4760800E+00, &
     & 0.4669500E+00, 0.4062800E+00, 0.4191896E+00, 0.4191896E+00 /
      data (ref_adm(23,iz,13,11),iz = 1,20) / &
     & 0.4391100E+00, 0.4391100E+00, 0.4294500E+00, 0.4221800E+00, &
     & 0.4283300E+00, 0.4261100E+00, 0.4261400E+00, 0.4287300E+00, &
     & 0.4182000E+00, 0.4285900E+00, 0.4127800E+00, 0.4164100E+00, &
     & 0.4156200E+00, 0.4651900E+00, 0.4893500E+00, 0.4627600E+00, &
     & 0.4081000E+00, 0.3766600E+00, 0.4135366E+00, 0.4135366E+00 /
      data (ref_adm(23,iz,14,11),iz = 1,20) / &
     & 0.4041200E+00, 0.4041200E+00, 0.3862000E+00, 0.3780600E+00, &
     & 0.3983100E+00, 0.3931300E+00, 0.3925100E+00, 0.3939300E+00, &
     & 0.4033600E+00, 0.4079200E+00, 0.4339400E+00, 0.4313300E+00, &
     & 0.4627000E+00, 0.4568800E+00, 0.4469800E+00, 0.4357000E+00, &
     & 0.3794400E+00, 0.3307000E+00, 0.4062465E+00, 0.4062465E+00 /
      data (ref_adm(23,iz,15,11),iz = 1,20) / &
     & 0.4060500E+00, 0.4060500E+00, 0.4074300E+00, 0.4035000E+00, &
     & 0.3919500E+00, 0.3986700E+00, 0.4145200E+00, 0.4046100E+00, &
     & 0.4075900E+00, 0.3954200E+00, 0.4020200E+00, 0.3844400E+00, &
     & 0.3921800E+00, 0.4195500E+00, 0.4080700E+00, 0.3950200E+00, &
     & 0.3907100E+00, 0.2995800E+00, 0.3977580E+00, 0.3977580E+00 /
      data (ref_adm(23,iz,16,11),iz = 1,20) / &
     & 0.4080100E+00, 0.4080100E+00, 0.4122400E+00, 0.3954200E+00, &
     & 0.3940900E+00, 0.4042800E+00, 0.3945000E+00, 0.3985000E+00, &
     & 0.3981400E+00, 0.4046300E+00, 0.3684700E+00, 0.4079800E+00, &
     & 0.3973400E+00, 0.4061400E+00, 0.3730300E+00, 0.3981500E+00, &
     & 0.3932200E+00, 0.3346700E+00, 0.3900691E+00, 0.3900691E+00 /
      data (ref_adm(23,iz,17,11),iz = 1,20) / &
     & 0.3949300E+00, 0.3949300E+00, 0.4050000E+00, 0.3994900E+00, &
     & 0.3805000E+00, 0.3969700E+00, 0.3992100E+00, 0.4131700E+00, &
     & 0.4316200E+00, 0.4074600E+00, 0.4157000E+00, 0.4280300E+00, &
     & 0.3952900E+00, 0.4096000E+00, 0.3733800E+00, 0.4048700E+00, &
     & 0.4180200E+00, 0.4154500E+00, 0.3826939E+00, 0.3826939E+00 /
      data (ref_adm(23,iz,18,11),iz = 1,20) / &
     & 0.3921300E+00, 0.3921300E+00, 0.3799700E+00, 0.4111900E+00, &
     & 0.3824700E+00, 0.3872000E+00, 0.3968200E+00, 0.3679800E+00, &
     & 0.4245100E+00, 0.4283100E+00, 0.4170800E+00, 0.4037400E+00, &
     & 0.4326300E+00, 0.4099100E+00, 0.3865500E+00, 0.4926200E+00, &
     & 0.4281900E+00, 0.3763177E+00, 0.3090863E+00, 0.3090863E+00 /
      data (ref_adm(23,iz,19,11),iz = 1,20) / &
     & 0.3687200E+00, 0.3687200E+00, 0.3913500E+00, 0.4154700E+00, &
     & 0.3848500E+00, 0.3845200E+00, 0.3867500E+00, 0.4155600E+00, &
     & 0.4299600E+00, 0.4117100E+00, 0.4072000E+00, 0.4137700E+00, &
     & 0.4109300E+00, 0.3824600E+00, 0.4240900E+00, 0.4406800E+00, &
     & 0.3836100E+00, 0.3757660E+00, 0.3086681E+00, 0.3086681E+00 /
      data (ref_adm(23,iz,20,11),iz = 1,20) / &
     & 0.3891800E+00, 0.3891800E+00, 0.4111500E+00, 0.4419300E+00, &
     & 0.4013700E+00, 0.4032000E+00, 0.4010100E+00, 0.4114100E+00, &
     & 0.4158200E+00, 0.3992300E+00, 0.4112600E+00, 0.4059200E+00, &
     & 0.3991900E+00, 0.4118700E+00, 0.3947400E+00, 0.4070600E+00, &
     & 0.4026146E+00, 0.3747478E+00, 0.3082258E+00, 0.3082258E+00 /
      data (ref_adm(23,iz,21,11),iz = 1,20) / &
     & 0.3737800E+00, 0.3737800E+00, 0.4229500E+00, 0.3944200E+00, &
     & 0.4182700E+00, 0.4384700E+00, 0.4315000E+00, 0.4220300E+00, &
     & 0.4621000E+00, 0.4363400E+00, 0.4359700E+00, 0.4162700E+00, &
     & 0.4344500E+00, 0.4041400E+00, 0.4186500E+00, 0.4182100E+00, &
     & 0.4020369E+00, 0.3739054E+00, 0.3078951E+00, 0.3078951E+00 /
      data (ref_adm(23,iz,22,11),iz = 1,20) / &
     & 0.3809600E+00, 0.3809600E+00, 0.3934000E+00, 0.4130500E+00, &
     & 0.4529600E+00, 0.4112900E+00, 0.4289600E+00, 0.4241800E+00, &
     & 0.4357400E+00, 0.4411200E+00, 0.4095100E+00, 0.3846800E+00, &
     & 0.4157100E+00, 0.4349700E+00, 0.4187000E+00, 0.4046700E+00, &
     & 0.3820766E+00, 0.3563372E+00, 0.3160722E+00, 0.3160722E+00 /
      data (ref_adm(23,iz,23,11),iz = 1,20) / &
     & 0.3911800E+00, 0.3911800E+00, 0.4194300E+00, 0.4329900E+00, &
     & 0.4317000E+00, 0.4360700E+00, 0.4378900E+00, 0.4056500E+00, &
     & 0.4713600E+00, 0.4799800E+00, 0.4315100E+00, 0.4068300E+00, &
     & 0.4181400E+00, 0.4158000E+00, 0.4240800E+00, 0.4225300E+00, &
     & 0.3816059E+00, 0.3558680E+00, 0.3176657E+00, 0.3176657E+00 /
      data (ref_adm(23,iz,24,11),iz = 1,20) / &
     & 0.4032400E+00, 0.4032400E+00, 0.3766500E+00, 0.3890200E+00, &
     & 0.3936800E+00, 0.4264600E+00, 0.4368700E+00, 0.4161700E+00, &
     & 0.4329700E+00, 0.4288700E+00, 0.4403100E+00, 0.4256200E+00, &
     & 0.4474700E+00, 0.3979600E+00, 0.4130300E+00, 0.4207100E+00, &
     & 0.4783900E+00, 0.3568255E+00, 0.3201905E+00, 0.3201905E+00 /
      data (ref_adm(23,iz,25,11),iz = 1,20) / &
     & 0.4119300E+00, 0.4119300E+00, 0.4120600E+00, 0.4357200E+00, &
     & 0.4388100E+00, 0.4273000E+00, 0.4099800E+00, 0.4298700E+00, &
     & 0.4108500E+00, 0.4168100E+00, 0.4208200E+00, 0.4363800E+00, &
     & 0.4547600E+00, 0.4213000E+00, 0.4067500E+00, 0.4193000E+00, &
     & 0.4125600E+00, 0.4304400E+00, 0.3235925E+00, 0.3235925E+00 /
      data (ref_adm(23,iz,26,11),iz = 1,20) / &
     & 0.3861500E+00, 0.3861500E+00, 0.4010200E+00, 0.3980000E+00, &
     & 0.4033500E+00, 0.4028100E+00, 0.4156900E+00, 0.4236200E+00, &
     & 0.4201400E+00, 0.4299700E+00, 0.4272200E+00, 0.4306900E+00, &
     & 0.4519900E+00, 0.4325400E+00, 0.4325500E+00, 0.4351200E+00, &
     & 0.4217800E+00, 0.4062400E+00, 0.3278569E+00, 0.3278569E+00 /
      data (ref_adm(23,iz,27,11),iz = 1,20) / &
     & 0.4175200E+00, 0.4175200E+00, 0.4322300E+00, 0.4441200E+00, &
     & 0.4420800E+00, 0.4349200E+00, 0.4474300E+00, 0.4532700E+00, &
     & 0.4485100E+00, 0.4584000E+00, 0.4449800E+00, 0.4517100E+00, &
     & 0.4567800E+00, 0.4469600E+00, 0.4356900E+00, 0.4494100E+00, &
     & 0.4036600E+00, 0.3510900E+00, 0.3328321E+00, 0.3328321E+00 /
      data (ref_adm(23,iz,28,11),iz = 1,20) / &
     & 0.4247900E+00, 0.4247900E+00, 0.4198600E+00, 0.4356100E+00, &
     & 0.4370500E+00, 0.4364200E+00, 0.4185800E+00, 0.4452100E+00, &
     & 0.4529600E+00, 0.4542900E+00, 0.4691800E+00, 0.4621900E+00, &
     & 0.4908300E+00, 0.5021500E+00, 0.4812300E+00, 0.4457700E+00, &
     & 0.4076900E+00, 0.3752100E+00, 0.3134400E+00, 0.3134400E+00 /
      data (ref_adm(23,iz,29,11),iz = 1,20) / &
     & 0.4113500E+00, 0.4113500E+00, 0.4148100E+00, 0.4129400E+00, &
     & 0.4439600E+00, 0.4226800E+00, 0.4529700E+00, 0.4339600E+00, &
     & 0.4432800E+00, 0.4406100E+00, 0.4540100E+00, 0.4939300E+00, &
     & 0.4831800E+00, 0.5077500E+00, 0.4978600E+00, 0.4481000E+00, &
     & 0.4297200E+00, 0.4084100E+00, 0.2954200E+00, 0.2954200E+00 /
      data (ref_adm(23,iz,30,11),iz = 1,20) / &
     & 0.4275400E+00, 0.4275400E+00, 0.4277200E+00, 0.4375700E+00, &
     & 0.4396700E+00, 0.4322600E+00, 0.4461900E+00, 0.4426200E+00, &
     & 0.4375300E+00, 0.4493800E+00, 0.4469600E+00, 0.4645300E+00, &
     & 0.4640500E+00, 0.4544400E+00, 0.4500400E+00, 0.4514200E+00, &
     & 0.4376900E+00, 0.3746200E+00, 0.3276200E+00, 0.3276200E+00 /
      data (ref_adm(23,iz,31,11),iz = 1,20) / &
     & 0.4332200E+00, 0.4332200E+00, 0.4342700E+00, 0.4171700E+00, &
     & 0.4309700E+00, 0.4209600E+00, 0.4280900E+00, 0.4329300E+00, &
     & 0.4427800E+00, 0.4339200E+00, 0.4296900E+00, 0.4203300E+00, &
     & 0.4342200E+00, 0.4404100E+00, 0.4273200E+00, 0.4208700E+00, &
     & 0.4004700E+00, 0.3702000E+00, 0.3181600E+00, 0.3181600E+00 /
      data (ref_adm(23,iz,32,11),iz = 1,20) / &
     & 0.4249500E+00, 0.4249500E+00, 0.4192000E+00, 0.4200900E+00, &
     & 0.4043600E+00, 0.4171200E+00, 0.4102800E+00, 0.4218900E+00, &
     & 0.3914900E+00, 0.4033300E+00, 0.3850100E+00, 0.4040000E+00, &
     & 0.4347700E+00, 0.4306200E+00, 0.4364200E+00, 0.3936400E+00, &
     & 0.3855300E+00, 0.3639900E+00, 0.3002800E+00, 0.3002800E+00 /
      data (ref_adm(23,iz,33,11),iz = 1,20) / &
     & 0.4231600E+00, 0.4231600E+00, 0.4187700E+00, 0.3801100E+00, &
     & 0.4254000E+00, 0.4056600E+00, 0.4375300E+00, 0.4270600E+00, &
     & 0.3915600E+00, 0.4017200E+00, 0.4363300E+00, 0.4468800E+00, &
     & 0.4823000E+00, 0.4844700E+00, 0.4788800E+00, 0.4630100E+00, &
     & 0.4487800E+00, 0.4110500E+00, 0.3157500E+00, 0.3157500E+00 /
      data (ref_adm(23,iz,34,11),iz = 1,20) / &
     & 0.4098500E+00, 0.4098500E+00, 0.3967500E+00, 0.4301500E+00, &
     & 0.3967600E+00, 0.4379200E+00, 0.4476100E+00, 0.4267900E+00, &
     & 0.4212000E+00, 0.4409000E+00, 0.4767100E+00, 0.4742500E+00, &
     & 0.4693500E+00, 0.4799500E+00, 0.4990200E+00, 0.4669400E+00, &
     & 0.4651900E+00, 0.3775600E+00, 0.3015700E+00, 0.3015700E+00 /
      data (ref_adm(23,iz,35,11),iz = 1,20) / &
     & 0.3998100E+00, 0.3998100E+00, 0.3896600E+00, 0.3930200E+00, &
     & 0.4022100E+00, 0.4195600E+00, 0.3962900E+00, 0.4188200E+00, &
     & 0.4563500E+00, 0.4389400E+00, 0.4515300E+00, 0.5021000E+00, &
     & 0.5151300E+00, 0.4769000E+00, 0.4931600E+00, 0.4556800E+00, &
     & 0.4754800E+00, 0.4124100E+00, 0.3079000E+00, 0.3079000E+00 /
      data (ref_adm(23,iz,36,11),iz = 1,20) / &
     & 0.4104500E+00, 0.4104500E+00, 0.3624500E+00, 0.4109000E+00, &
     & 0.4138100E+00, 0.3943500E+00, 0.3836000E+00, 0.4157500E+00, &
     & 0.4701600E+00, 0.4862700E+00, 0.4875300E+00, 0.5209800E+00, &
     & 0.5109400E+00, 0.4876400E+00, 0.4765500E+00, 0.4618600E+00, &
     & 0.5151600E+00, 0.4581800E+00, 0.3810034E+00, 0.3810034E+00 /
      data (ref_adm(23,iz,37,11),iz = 1,20) / &
     & 0.4179300E+00, 0.4179300E+00, 0.4277500E+00, 0.3899700E+00, &
     & 0.3905400E+00, 0.4178300E+00, 0.4068800E+00, 0.4266400E+00, &
     & 0.4473500E+00, 0.4842800E+00, 0.4894400E+00, 0.5128100E+00, &
     & 0.4790700E+00, 0.4796800E+00, 0.4782500E+00, 0.5007700E+00, &
     & 0.5261900E+00, 0.4388111E+00, 0.3831187E+00, 0.3831187E+00 /
      data (ref_adm(23,iz,38,11),iz = 1,20) / &
     & 0.4179300E+00, 0.4179300E+00, 0.4277500E+00, 0.3899700E+00, &
     & 0.3905400E+00, 0.4178300E+00, 0.4068800E+00, 0.4266400E+00, &
     & 0.4473500E+00, 0.4842800E+00, 0.4894400E+00, 0.5128100E+00, &
     & 0.4790700E+00, 0.4796800E+00, 0.4782500E+00, 0.5007700E+00, &
     & 0.5261900E+00, 0.4388111E+00, 0.3831187E+00, 0.3831187E+00 /
! Solar Zenith Angle 55.0 Albedo  0.4341492E+00
      data (ref_adm(23,iz, 1,12),iz = 1,20) / &
     & 0.4058000E+00, 0.4058000E+00, 0.4069500E+00, 0.4102500E+00, &
     & 0.3900700E+00, 0.3879700E+00, 0.4023500E+00, 0.4094800E+00, &
     & 0.4276500E+00, 0.4439100E+00, 0.4497400E+00, 0.4692600E+00, &
     & 0.5292900E+00, 0.5141300E+00, 0.5505500E+00, 0.6319200E+00, &
     & 0.6475400E+00, 0.6632200E+00, 0.6810700E+00, 0.6810700E+00 /
      data (ref_adm(23,iz, 2,12),iz = 1,20) / &
     & 0.4058000E+00, 0.4058000E+00, 0.4069500E+00, 0.4102500E+00, &
     & 0.3900700E+00, 0.3879700E+00, 0.4023500E+00, 0.4094800E+00, &
     & 0.4276500E+00, 0.4439100E+00, 0.4497400E+00, 0.4692600E+00, &
     & 0.5292900E+00, 0.5141300E+00, 0.5505500E+00, 0.6319200E+00, &
     & 0.6475400E+00, 0.6632200E+00, 0.6810700E+00, 0.6810700E+00 /
      data (ref_adm(23,iz, 3,12),iz = 1,20) / &
     & 0.4046700E+00, 0.4046700E+00, 0.4118100E+00, 0.4174700E+00, &
     & 0.4238900E+00, 0.4004800E+00, 0.4168800E+00, 0.4273100E+00, &
     & 0.4325100E+00, 0.4175900E+00, 0.4240300E+00, 0.4583800E+00, &
     & 0.5066000E+00, 0.5265900E+00, 0.5245000E+00, 0.5615200E+00, &
     & 0.6240300E+00, 0.6231900E+00, 0.2928096E+00, 0.2928096E+00 /
      data (ref_adm(23,iz, 4,12),iz = 1,20) / &
     & 0.4039500E+00, 0.4039500E+00, 0.3992900E+00, 0.3718600E+00, &
     & 0.3829000E+00, 0.4237000E+00, 0.4050600E+00, 0.4055700E+00, &
     & 0.3958200E+00, 0.4348100E+00, 0.4366300E+00, 0.4511400E+00, &
     & 0.4629700E+00, 0.4818400E+00, 0.5090000E+00, 0.5557600E+00, &
     & 0.6228600E+00, 0.5982000E+00, 0.5016200E+00, 0.5016200E+00 /
      data (ref_adm(23,iz, 5,12),iz = 1,20) / &
     & 0.4180300E+00, 0.4180300E+00, 0.4099600E+00, 0.4105900E+00, &
     & 0.4084000E+00, 0.4125000E+00, 0.4223200E+00, 0.4164100E+00, &
     & 0.4126700E+00, 0.4029000E+00, 0.4480100E+00, 0.4676600E+00, &
     & 0.4714100E+00, 0.4828200E+00, 0.4910400E+00, 0.5755800E+00, &
     & 0.6229400E+00, 0.6237500E+00, 0.6194900E+00, 0.6194900E+00 /
      data (ref_adm(23,iz, 6,12),iz = 1,20) / &
     & 0.4073800E+00, 0.4073800E+00, 0.4281900E+00, 0.4152300E+00, &
     & 0.4143900E+00, 0.3945400E+00, 0.3913800E+00, 0.4212100E+00, &
     & 0.4103400E+00, 0.4428800E+00, 0.4546600E+00, 0.4534700E+00, &
     & 0.4742500E+00, 0.4956200E+00, 0.4730100E+00, 0.5075600E+00, &
     & 0.5555900E+00, 0.5894900E+00, 0.5503355E+00, 0.5503355E+00 /
      data (ref_adm(23,iz, 7,12),iz = 1,20) / &
     & 0.4065600E+00, 0.4065600E+00, 0.3998100E+00, 0.4079900E+00, &
     & 0.3973900E+00, 0.3909600E+00, 0.3947800E+00, 0.4055200E+00, &
     & 0.3920900E+00, 0.4161200E+00, 0.4196000E+00, 0.4225000E+00, &
     & 0.4516200E+00, 0.4665200E+00, 0.4786400E+00, 0.4790500E+00, &
     & 0.5199300E+00, 0.5339600E+00, 0.5595800E+00, 0.5595800E+00 /
      data (ref_adm(23,iz, 8,12),iz = 1,20) / &
     & 0.4177000E+00, 0.4177000E+00, 0.4088800E+00, 0.4152500E+00, &
     & 0.4121300E+00, 0.4156800E+00, 0.4325800E+00, 0.4419000E+00, &
     & 0.4402100E+00, 0.4696600E+00, 0.4914700E+00, 0.5113400E+00, &
     & 0.5263400E+00, 0.5203500E+00, 0.5350900E+00, 0.5533100E+00, &
     & 0.5777100E+00, 0.5609600E+00, 0.3834300E+00, 0.3834300E+00 /
      data (ref_adm(23,iz, 9,12),iz = 1,20) / &
     & 0.3883400E+00, 0.3883400E+00, 0.3885300E+00, 0.3757300E+00, &
     & 0.3981300E+00, 0.3775100E+00, 0.3897600E+00, 0.3806100E+00, &
     & 0.4173000E+00, 0.4507100E+00, 0.4601100E+00, 0.4617600E+00, &
     & 0.4788900E+00, 0.4579400E+00, 0.4733600E+00, 0.4774400E+00, &
     & 0.4926500E+00, 0.5324700E+00, 0.4938685E+00, 0.4938685E+00 /
      data (ref_adm(23,iz,10,12),iz = 1,20) / &
     & 0.3991500E+00, 0.3991500E+00, 0.3932600E+00, 0.3803400E+00, &
     & 0.4005400E+00, 0.3786200E+00, 0.3820800E+00, 0.3656600E+00, &
     & 0.4005100E+00, 0.3925300E+00, 0.4255600E+00, 0.4395900E+00, &
     & 0.4595600E+00, 0.4640600E+00, 0.4628700E+00, 0.4695400E+00, &
     & 0.4666100E+00, 0.4855500E+00, 0.4307200E+00, 0.4307200E+00 /
      data (ref_adm(23,iz,11,12),iz = 1,20) / &
     & 0.4046500E+00, 0.4046500E+00, 0.3892800E+00, 0.3741100E+00, &
     & 0.3706300E+00, 0.3800800E+00, 0.3777800E+00, 0.3976800E+00, &
     & 0.3730600E+00, 0.3880100E+00, 0.4333800E+00, 0.4004200E+00, &
     & 0.4469800E+00, 0.4680000E+00, 0.4291200E+00, 0.4448300E+00, &
     & 0.4732400E+00, 0.4399400E+00, 0.4621613E+00, 0.4621613E+00 /
      data (ref_adm(23,iz,12,12),iz = 1,20) / &
     & 0.3834600E+00, 0.3834600E+00, 0.3892000E+00, 0.3936200E+00, &
     & 0.3849500E+00, 0.3786000E+00, 0.3913600E+00, 0.3838600E+00, &
     & 0.3943300E+00, 0.3777500E+00, 0.4228300E+00, 0.4270600E+00, &
     & 0.4372900E+00, 0.4428900E+00, 0.4170000E+00, 0.4847700E+00, &
     & 0.4599400E+00, 0.4552000E+00, 0.4512573E+00, 0.4512573E+00 /
      data (ref_adm(23,iz,13,12),iz = 1,20) / &
     & 0.4075900E+00, 0.4075900E+00, 0.4102200E+00, 0.3990900E+00, &
     & 0.4067200E+00, 0.3975200E+00, 0.3882400E+00, 0.3908700E+00, &
     & 0.3937100E+00, 0.3587000E+00, 0.3922500E+00, 0.4181600E+00, &
     & 0.4304600E+00, 0.4306800E+00, 0.4323700E+00, 0.4809100E+00, &
     & 0.4887800E+00, 0.4385000E+00, 0.3468000E+00, 0.3468000E+00 /
      data (ref_adm(23,iz,14,12),iz = 1,20) / &
     & 0.4045900E+00, 0.4045900E+00, 0.4005300E+00, 0.3942000E+00, &
     & 0.4009100E+00, 0.3990600E+00, 0.4080400E+00, 0.4035100E+00, &
     & 0.4079400E+00, 0.4161500E+00, 0.4277100E+00, 0.4294200E+00, &
     & 0.4491300E+00, 0.4766700E+00, 0.4189200E+00, 0.4541100E+00, &
     & 0.4883000E+00, 0.4503300E+00, 0.4336255E+00, 0.4336255E+00 /
      data (ref_adm(23,iz,15,12),iz = 1,20) / &
     & 0.4024700E+00, 0.4024700E+00, 0.4083500E+00, 0.3907500E+00, &
     & 0.3906600E+00, 0.4045100E+00, 0.4008200E+00, 0.4067400E+00, &
     & 0.4085200E+00, 0.3962900E+00, 0.4009100E+00, 0.3963900E+00, &
     & 0.4023300E+00, 0.4171100E+00, 0.4510600E+00, 0.4525300E+00, &
     & 0.4310100E+00, 0.4421000E+00, 0.4250072E+00, 0.4250072E+00 /
      data (ref_adm(23,iz,16,12),iz = 1,20) / &
     & 0.4001300E+00, 0.4001300E+00, 0.4169600E+00, 0.4146300E+00, &
     & 0.3877200E+00, 0.3680500E+00, 0.3732300E+00, 0.3520100E+00, &
     & 0.3813400E+00, 0.3986400E+00, 0.4042500E+00, 0.4132300E+00, &
     & 0.4264600E+00, 0.4200000E+00, 0.4457400E+00, 0.4347300E+00, &
     & 0.4175800E+00, 0.4693400E+00, 0.4148035E+00, 0.4148035E+00 /
      data (ref_adm(23,iz,17,12),iz = 1,20) / &
     & 0.4054400E+00, 0.4054400E+00, 0.4042400E+00, 0.3931900E+00, &
     & 0.4024300E+00, 0.3784500E+00, 0.3951100E+00, 0.3882900E+00, &
     & 0.4083800E+00, 0.4111300E+00, 0.4056100E+00, 0.4070700E+00, &
     & 0.4242000E+00, 0.4163500E+00, 0.4352000E+00, 0.4301000E+00, &
     & 0.4139300E+00, 0.4152100E+00, 0.4058119E+00, 0.4058119E+00 /
      data (ref_adm(23,iz,18,12),iz = 1,20) / &
     & 0.4197000E+00, 0.4197000E+00, 0.3942700E+00, 0.3858700E+00, &
     & 0.4020200E+00, 0.3601700E+00, 0.3783000E+00, 0.3913100E+00, &
     & 0.4170600E+00, 0.4020500E+00, 0.4185400E+00, 0.4401000E+00, &
     & 0.4127700E+00, 0.4115800E+00, 0.4474300E+00, 0.4579900E+00, &
     & 0.4576700E+00, 0.4239488E+00, 0.3610032E+00, 0.3610032E+00 /
      data (ref_adm(23,iz,19,12),iz = 1,20) / &
     & 0.3979800E+00, 0.3979800E+00, 0.4006100E+00, 0.3945100E+00, &
     & 0.3756200E+00, 0.3945400E+00, 0.4060400E+00, 0.4305900E+00, &
     & 0.4310300E+00, 0.4389400E+00, 0.4178300E+00, 0.4364200E+00, &
     & 0.4158100E+00, 0.4234600E+00, 0.4426000E+00, 0.4654700E+00, &
     & 0.3541000E+00, 0.4190834E+00, 0.3565269E+00, 0.3565269E+00 /
      data (ref_adm(23,iz,20,12),iz = 1,20) / &
     & 0.3919500E+00, 0.3919500E+00, 0.3992800E+00, 0.4055600E+00, &
     & 0.4025600E+00, 0.3891200E+00, 0.3846400E+00, 0.4065900E+00, &
     & 0.3960800E+00, 0.4165300E+00, 0.4418000E+00, 0.4176700E+00, &
     & 0.4302000E+00, 0.4392200E+00, 0.4338600E+00, 0.4580800E+00, &
     & 0.4311760E+00, 0.4144370E+00, 0.3536415E+00, 0.3536415E+00 /
      data (ref_adm(23,iz,21,12),iz = 1,20) / &
     & 0.3921100E+00, 0.3921100E+00, 0.4097100E+00, 0.4027700E+00, &
     & 0.4104900E+00, 0.3904600E+00, 0.4049700E+00, 0.3685900E+00, &
     & 0.3955700E+00, 0.3919700E+00, 0.4296600E+00, 0.4389400E+00, &
     & 0.4200200E+00, 0.4263000E+00, 0.4173300E+00, 0.4683700E+00, &
     & 0.4274604E+00, 0.4099183E+00, 0.3513415E+00, 0.3513415E+00 /
      data (ref_adm(23,iz,22,12),iz = 1,20) / &
     & 0.3915800E+00, 0.3915800E+00, 0.4217300E+00, 0.4063200E+00, &
     & 0.4025800E+00, 0.3865300E+00, 0.4081600E+00, 0.4100800E+00, &
     & 0.3916100E+00, 0.4252300E+00, 0.4392500E+00, 0.4394400E+00, &
     & 0.4625100E+00, 0.4387800E+00, 0.4319700E+00, 0.3887100E+00, &
     & 0.4636050E+00, 0.4422508E+00, 0.3842584E+00, 0.3842584E+00 /
      data (ref_adm(23,iz,23,12),iz = 1,20) / &
     & 0.3928600E+00, 0.3928600E+00, 0.4023600E+00, 0.3989700E+00, &
     & 0.4047300E+00, 0.3963900E+00, 0.4314700E+00, 0.3923200E+00, &
     & 0.3918700E+00, 0.4089900E+00, 0.4304700E+00, 0.4156700E+00, &
     & 0.4209000E+00, 0.4471900E+00, 0.4302500E+00, 0.4299400E+00, &
     & 0.4510300E+00, 0.4348474E+00, 0.3817278E+00, 0.3817278E+00 /
      data (ref_adm(23,iz,24,12),iz = 1,20) / &
     & 0.3925200E+00, 0.3925200E+00, 0.3899600E+00, 0.3880400E+00, &
     & 0.4002200E+00, 0.4235900E+00, 0.4238500E+00, 0.3979600E+00, &
     & 0.4067100E+00, 0.4057600E+00, 0.4112400E+00, 0.4235200E+00, &
     & 0.4431000E+00, 0.4640300E+00, 0.4415300E+00, 0.4334100E+00, &
     & 0.4158200E+00, 0.4291616E+00, 0.3799387E+00, 0.3799387E+00 /
      data (ref_adm(23,iz,25,12),iz = 1,20) / &
     & 0.4041900E+00, 0.4041900E+00, 0.4101400E+00, 0.4129900E+00, &
     & 0.4115000E+00, 0.4114300E+00, 0.4273100E+00, 0.4298300E+00, &
     & 0.4287200E+00, 0.4426800E+00, 0.4498600E+00, 0.4469800E+00, &
     & 0.4483400E+00, 0.4570200E+00, 0.4379600E+00, 0.4368800E+00, &
     & 0.4256500E+00, 0.4393100E+00, 0.3795074E+00, 0.3795074E+00 /
      data (ref_adm(23,iz,26,12),iz = 1,20) / &
     & 0.3978300E+00, 0.3978300E+00, 0.3928200E+00, 0.3957500E+00, &
     & 0.4017000E+00, 0.4074600E+00, 0.4110700E+00, 0.4134100E+00, &
     & 0.4202100E+00, 0.4206700E+00, 0.4315000E+00, 0.4270900E+00, &
     & 0.4332200E+00, 0.4465400E+00, 0.4379900E+00, 0.4180000E+00, &
     & 0.4255700E+00, 0.4322700E+00, 0.3799487E+00, 0.3799487E+00 /
      data (ref_adm(23,iz,27,12),iz = 1,20) / &
     & 0.4082000E+00, 0.4082000E+00, 0.4069800E+00, 0.4009700E+00, &
     & 0.4129600E+00, 0.4307000E+00, 0.4340800E+00, 0.4362100E+00, &
     & 0.4512400E+00, 0.4457500E+00, 0.4638000E+00, 0.4654500E+00, &
     & 0.4716400E+00, 0.4682100E+00, 0.4450800E+00, 0.4176700E+00, &
     & 0.4307700E+00, 0.4226700E+00, 0.3529700E+00, 0.3529700E+00 /
      data (ref_adm(23,iz,28,12),iz = 1,20) / &
     & 0.4010100E+00, 0.4010100E+00, 0.4146100E+00, 0.3973200E+00, &
     & 0.4090900E+00, 0.4169800E+00, 0.4298200E+00, 0.4225500E+00, &
     & 0.4397500E+00, 0.4381100E+00, 0.4484400E+00, 0.4433800E+00, &
     & 0.4678300E+00, 0.5104800E+00, 0.4653500E+00, 0.4268100E+00, &
     & 0.4264400E+00, 0.4204600E+00, 0.3486900E+00, 0.3486900E+00 /
      data (ref_adm(23,iz,29,12),iz = 1,20) / &
     & 0.4142500E+00, 0.4142500E+00, 0.4065500E+00, 0.4094200E+00, &
     & 0.4371800E+00, 0.4414300E+00, 0.4293600E+00, 0.4323800E+00, &
     & 0.4289600E+00, 0.4386600E+00, 0.4503400E+00, 0.4398200E+00, &
     & 0.4400100E+00, 0.4378500E+00, 0.4158800E+00, 0.4267600E+00, &
     & 0.4299500E+00, 0.4238100E+00, 0.3426700E+00, 0.3426700E+00 /
      data (ref_adm(23,iz,30,12),iz = 1,20) / &
     & 0.4009100E+00, 0.4009100E+00, 0.4057300E+00, 0.4182000E+00, &
     & 0.4239300E+00, 0.4267300E+00, 0.4307700E+00, 0.4319700E+00, &
     & 0.4302100E+00, 0.4628200E+00, 0.4717600E+00, 0.4442000E+00, &
     & 0.4589300E+00, 0.4514400E+00, 0.4392500E+00, 0.4483900E+00, &
     & 0.4474700E+00, 0.4201800E+00, 0.3584800E+00, 0.3584800E+00 /
      data (ref_adm(23,iz,31,12),iz = 1,20) / &
     & 0.4083600E+00, 0.4083600E+00, 0.4054600E+00, 0.4296700E+00, &
     & 0.4398200E+00, 0.4490100E+00, 0.4478500E+00, 0.4539400E+00, &
     & 0.4507700E+00, 0.4688200E+00, 0.4745600E+00, 0.4516600E+00, &
     & 0.4545200E+00, 0.4577600E+00, 0.4604900E+00, 0.4714000E+00, &
     & 0.4725600E+00, 0.4606400E+00, 0.3797000E+00, 0.3797000E+00 /
      data (ref_adm(23,iz,32,12),iz = 1,20) / &
     & 0.4098700E+00, 0.4098700E+00, 0.4020800E+00, 0.3996900E+00, &
     & 0.4108600E+00, 0.4087100E+00, 0.3997000E+00, 0.4107200E+00, &
     & 0.4203100E+00, 0.4313100E+00, 0.4426500E+00, 0.4339900E+00, &
     & 0.4557100E+00, 0.4454000E+00, 0.4437800E+00, 0.4299400E+00, &
     & 0.4368600E+00, 0.4229500E+00, 0.3418900E+00, 0.3418900E+00 /
      data (ref_adm(23,iz,33,12),iz = 1,20) / &
     & 0.4151800E+00, 0.4151800E+00, 0.4203100E+00, 0.4074800E+00, &
     & 0.4109300E+00, 0.4139400E+00, 0.4456300E+00, 0.4364500E+00, &
     & 0.4444100E+00, 0.4507700E+00, 0.4497000E+00, 0.4526800E+00, &
     & 0.4630300E+00, 0.4642300E+00, 0.5010800E+00, 0.4859200E+00, &
     & 0.4481800E+00, 0.4489600E+00, 0.3554500E+00, 0.3554500E+00 /
      data (ref_adm(23,iz,34,12),iz = 1,20) / &
     & 0.4166300E+00, 0.4166300E+00, 0.4033900E+00, 0.4004200E+00, &
     & 0.4143000E+00, 0.4225100E+00, 0.4185600E+00, 0.4128600E+00, &
     & 0.4290000E+00, 0.4390300E+00, 0.4459000E+00, 0.4511400E+00, &
     & 0.4596300E+00, 0.4998800E+00, 0.4828100E+00, 0.4963600E+00, &
     & 0.4950300E+00, 0.4477600E+00, 0.3695700E+00, 0.3695700E+00 /
      data (ref_adm(23,iz,35,12),iz = 1,20) / &
     & 0.4014400E+00, 0.4014400E+00, 0.4043200E+00, 0.4101600E+00, &
     & 0.4266500E+00, 0.4138700E+00, 0.3935100E+00, 0.4150500E+00, &
     & 0.4315900E+00, 0.4291900E+00, 0.4552300E+00, 0.4845700E+00, &
     & 0.5039000E+00, 0.5198800E+00, 0.5063500E+00, 0.5023600E+00, &
     & 0.5246900E+00, 0.4488200E+00, 0.3438300E+00, 0.3438300E+00 /
      data (ref_adm(23,iz,36,12),iz = 1,20) / &
     & 0.4152500E+00, 0.4152500E+00, 0.4392900E+00, 0.4246000E+00, &
     & 0.3915000E+00, 0.3984200E+00, 0.4249400E+00, 0.4279600E+00, &
     & 0.4443100E+00, 0.4470100E+00, 0.4809200E+00, 0.4824300E+00, &
     & 0.5068400E+00, 0.5236600E+00, 0.5175200E+00, 0.4798400E+00, &
     & 0.5058600E+00, 0.4655500E+00, 0.4211219E+00, 0.4211219E+00 /
      data (ref_adm(23,iz,37,12),iz = 1,20) / &
     & 0.4060000E+00, 0.4060000E+00, 0.4338800E+00, 0.4355300E+00, &
     & 0.4276600E+00, 0.4331400E+00, 0.4373100E+00, 0.4393900E+00, &
     & 0.4482400E+00, 0.4647300E+00, 0.4780200E+00, 0.4863000E+00, &
     & 0.5182300E+00, 0.5390900E+00, 0.5567000E+00, 0.5198700E+00, &
     & 0.4927600E+00, 0.4498478E+00, 0.4225583E+00, 0.4225583E+00 /
      data (ref_adm(23,iz,38,12),iz = 1,20) / &
     & 0.4060000E+00, 0.4060000E+00, 0.4338800E+00, 0.4355300E+00, &
     & 0.4276600E+00, 0.4331400E+00, 0.4373100E+00, 0.4393900E+00, &
     & 0.4482400E+00, 0.4647300E+00, 0.4780200E+00, 0.4863000E+00, &
     & 0.5182300E+00, 0.5390900E+00, 0.5567000E+00, 0.5198700E+00, &
     & 0.4927600E+00, 0.4498478E+00, 0.4225583E+00, 0.4225583E+00 /
! Solar Zenith Angle 60.0 Albedo  0.4436914E+00
      data (ref_adm(23,iz, 1,13),iz = 1,20) / &
     & 0.3914000E+00, 0.3914000E+00, 0.3645900E+00, 0.3730000E+00, &
     & 0.3841000E+00, 0.3810700E+00, 0.4130200E+00, 0.4213600E+00, &
     & 0.4268000E+00, 0.4368600E+00, 0.4656500E+00, 0.4600700E+00, &
     & 0.5189500E+00, 0.5688300E+00, 0.6403800E+00, 0.6597700E+00, &
     & 0.7102000E+00, 0.7329300E+00, 0.6951400E+00, 0.6951400E+00 /
      data (ref_adm(23,iz, 2,13),iz = 1,20) / &
     & 0.3914000E+00, 0.3914000E+00, 0.3645900E+00, 0.3730000E+00, &
     & 0.3841000E+00, 0.3810700E+00, 0.4130200E+00, 0.4213600E+00, &
     & 0.4268000E+00, 0.4368600E+00, 0.4656500E+00, 0.4600700E+00, &
     & 0.5189500E+00, 0.5688300E+00, 0.6403800E+00, 0.6597700E+00, &
     & 0.7102000E+00, 0.7329300E+00, 0.6951400E+00, 0.6951400E+00 /
      data (ref_adm(23,iz, 3,13),iz = 1,20) / &
     & 0.4007700E+00, 0.4007700E+00, 0.3886500E+00, 0.3931300E+00, &
     & 0.3841100E+00, 0.3973500E+00, 0.4109200E+00, 0.4183000E+00, &
     & 0.4225300E+00, 0.4377500E+00, 0.4628800E+00, 0.4924300E+00, &
     & 0.4970200E+00, 0.5303800E+00, 0.5719800E+00, 0.6373400E+00, &
     & 0.7006800E+00, 0.7442400E+00, 0.6429100E+00, 0.6429100E+00 /
      data (ref_adm(23,iz, 4,13),iz = 1,20) / &
     & 0.3909600E+00, 0.3909600E+00, 0.4008800E+00, 0.4061100E+00, &
     & 0.3967500E+00, 0.3883400E+00, 0.3945700E+00, 0.4022000E+00, &
     & 0.4204000E+00, 0.4355300E+00, 0.4332200E+00, 0.4428100E+00, &
     & 0.4957000E+00, 0.5354400E+00, 0.5917100E+00, 0.6049100E+00, &
     & 0.6635900E+00, 0.7337100E+00, 0.6442600E+00, 0.6442600E+00 /
      data (ref_adm(23,iz, 5,13),iz = 1,20) / &
     & 0.4077500E+00, 0.4077500E+00, 0.4069000E+00, 0.4000700E+00, &
     & 0.3870800E+00, 0.3903900E+00, 0.4063500E+00, 0.4088600E+00, &
     & 0.4272000E+00, 0.4237400E+00, 0.4497100E+00, 0.4657900E+00, &
     & 0.4958700E+00, 0.5170100E+00, 0.5585200E+00, 0.6108200E+00, &
     & 0.7018200E+00, 0.6923300E+00, 0.4705100E+00, 0.4705100E+00 /
      data (ref_adm(23,iz, 6,13),iz = 1,20) / &
     & 0.3869100E+00, 0.3869100E+00, 0.3944200E+00, 0.3940700E+00, &
     & 0.3976900E+00, 0.3965800E+00, 0.3985300E+00, 0.4030400E+00, &
     & 0.4037600E+00, 0.3972800E+00, 0.4433200E+00, 0.4557700E+00, &
     & 0.4910900E+00, 0.5001500E+00, 0.5272200E+00, 0.5684400E+00, &
     & 0.6579700E+00, 0.6755700E+00, 0.6492900E+00, 0.6492900E+00 /
      data (ref_adm(23,iz, 7,13),iz = 1,20) / &
     & 0.3995000E+00, 0.3995000E+00, 0.3898000E+00, 0.3835800E+00, &
     & 0.3943100E+00, 0.4009600E+00, 0.4079600E+00, 0.4121000E+00, &
     & 0.4097900E+00, 0.4213000E+00, 0.4493400E+00, 0.4591600E+00, &
     & 0.4959500E+00, 0.5295400E+00, 0.5389000E+00, 0.5900300E+00, &
     & 0.6388500E+00, 0.6724800E+00, 0.6324700E+00, 0.6324700E+00 /
      data (ref_adm(23,iz, 8,13),iz = 1,20) / &
     & 0.3890700E+00, 0.3890700E+00, 0.3940800E+00, 0.3784000E+00, &
     & 0.3937200E+00, 0.4010700E+00, 0.4096000E+00, 0.4113200E+00, &
     & 0.4031900E+00, 0.4314100E+00, 0.4377100E+00, 0.4501600E+00, &
     & 0.4834600E+00, 0.5213700E+00, 0.5750200E+00, 0.5985300E+00, &
     & 0.6287200E+00, 0.6104000E+00, 0.5485300E+00, 0.5485300E+00 /
      data (ref_adm(23,iz, 9,13),iz = 1,20) / &
     & 0.3823500E+00, 0.3823500E+00, 0.4081500E+00, 0.3973800E+00, &
     & 0.4063200E+00, 0.3887900E+00, 0.3854400E+00, 0.3870100E+00, &
     & 0.4039800E+00, 0.4104000E+00, 0.4320300E+00, 0.4535100E+00, &
     & 0.4590800E+00, 0.4835400E+00, 0.5178800E+00, 0.5420700E+00, &
     & 0.6012800E+00, 0.5774900E+00, 0.5624800E+00, 0.5624800E+00 /
      data (ref_adm(23,iz,10,13),iz = 1,20) / &
     & 0.3963300E+00, 0.3963300E+00, 0.3899300E+00, 0.4001300E+00, &
     & 0.3913000E+00, 0.3878900E+00, 0.3852700E+00, 0.3957300E+00, &
     & 0.4238200E+00, 0.4191300E+00, 0.4322100E+00, 0.4288900E+00, &
     & 0.4507800E+00, 0.4537200E+00, 0.4801000E+00, 0.5308500E+00, &
     & 0.5594300E+00, 0.5494200E+00, 0.5129100E+00, 0.5129100E+00 /
      data (ref_adm(23,iz,11,13),iz = 1,20) / &
     & 0.3954800E+00, 0.3954800E+00, 0.3955200E+00, 0.3922200E+00, &
     & 0.3806000E+00, 0.3811000E+00, 0.3876400E+00, 0.4043400E+00, &
     & 0.4138600E+00, 0.4380500E+00, 0.4381800E+00, 0.4083100E+00, &
     & 0.4234400E+00, 0.4556600E+00, 0.4779900E+00, 0.5203700E+00, &
     & 0.5597400E+00, 0.5512300E+00, 0.4831600E+00, 0.4831600E+00 /
      data (ref_adm(23,iz,12,13),iz = 1,20) / &
     & 0.3901800E+00, 0.3901800E+00, 0.3989500E+00, 0.3970300E+00, &
     & 0.4149100E+00, 0.4045400E+00, 0.3929500E+00, 0.3958000E+00, &
     & 0.4003700E+00, 0.3924800E+00, 0.4002300E+00, 0.4229800E+00, &
     & 0.4364900E+00, 0.4331500E+00, 0.4666700E+00, 0.4896800E+00, &
     & 0.4892700E+00, 0.4844000E+00, 0.4513300E+00, 0.4513300E+00 /
      data (ref_adm(23,iz,13,13),iz = 1,20) / &
     & 0.4149300E+00, 0.4149300E+00, 0.3975500E+00, 0.3825200E+00, &
     & 0.3926500E+00, 0.4092900E+00, 0.3989200E+00, 0.4018400E+00, &
     & 0.4078000E+00, 0.4074300E+00, 0.4110000E+00, 0.4186100E+00, &
     & 0.4304100E+00, 0.4498000E+00, 0.4336400E+00, 0.4876000E+00, &
     & 0.4842800E+00, 0.4942800E+00, 0.4175900E+00, 0.4175900E+00 /
      data (ref_adm(23,iz,14,13),iz = 1,20) / &
     & 0.3909700E+00, 0.3909700E+00, 0.3945900E+00, 0.3913700E+00, &
     & 0.3911600E+00, 0.3938300E+00, 0.3927100E+00, 0.3952200E+00, &
     & 0.3943900E+00, 0.4001500E+00, 0.4216500E+00, 0.4329500E+00, &
     & 0.4478100E+00, 0.4608500E+00, 0.4517200E+00, 0.4871800E+00, &
     & 0.4458900E+00, 0.4478200E+00, 0.4547115E+00, 0.4547115E+00 /
      data (ref_adm(23,iz,15,13),iz = 1,20) / &
     & 0.4042500E+00, 0.4042500E+00, 0.4079800E+00, 0.4085500E+00, &
     & 0.4165500E+00, 0.4247600E+00, 0.4302800E+00, 0.4285800E+00, &
     & 0.4263300E+00, 0.4226600E+00, 0.4165600E+00, 0.4138900E+00, &
     & 0.4161600E+00, 0.4183200E+00, 0.4495000E+00, 0.4824400E+00, &
     & 0.4690300E+00, 0.4432300E+00, 0.4449796E+00, 0.4449796E+00 /
      data (ref_adm(23,iz,16,13),iz = 1,20) / &
     & 0.3910200E+00, 0.3910200E+00, 0.3830800E+00, 0.4052200E+00, &
     & 0.4055400E+00, 0.4071200E+00, 0.3986100E+00, 0.3832300E+00, &
     & 0.3730600E+00, 0.3734000E+00, 0.3897700E+00, 0.3985700E+00, &
     & 0.4112200E+00, 0.4247600E+00, 0.4513500E+00, 0.4621600E+00, &
     & 0.4414400E+00, 0.4287900E+00, 0.4342426E+00, 0.4342426E+00 /
      data (ref_adm(23,iz,17,13),iz = 1,20) / &
     & 0.4009300E+00, 0.4009300E+00, 0.3916000E+00, 0.4191300E+00, &
     & 0.4158900E+00, 0.4010900E+00, 0.4109000E+00, 0.3962200E+00, &
     & 0.3931400E+00, 0.3975600E+00, 0.4107600E+00, 0.4228100E+00, &
     & 0.4157400E+00, 0.4145300E+00, 0.4422400E+00, 0.4461000E+00, &
     & 0.4350500E+00, 0.4704390E+00, 0.4242990E+00, 0.4242990E+00 /
      data (ref_adm(23,iz,18,13),iz = 1,20) / &
     & 0.4046900E+00, 0.4046900E+00, 0.4160900E+00, 0.4116700E+00, &
     & 0.4064900E+00, 0.4045200E+00, 0.3990800E+00, 0.4040200E+00, &
     & 0.3998200E+00, 0.4024300E+00, 0.3984800E+00, 0.4099500E+00, &
     & 0.4269700E+00, 0.4382500E+00, 0.4430700E+00, 0.4375400E+00, &
     & 0.4657200E+00, 0.4353963E+00, 0.3729562E+00, 0.3729562E+00 /
      data (ref_adm(23,iz,19,13),iz = 1,20) / &
     & 0.3863600E+00, 0.3863600E+00, 0.4126500E+00, 0.4019200E+00, &
     & 0.4077300E+00, 0.4121400E+00, 0.4063900E+00, 0.4127100E+00, &
     & 0.4097100E+00, 0.4053200E+00, 0.4063200E+00, 0.4182100E+00, &
     & 0.4378900E+00, 0.4400900E+00, 0.4436200E+00, 0.4475500E+00, &
     & 0.4448710E+00, 0.4300872E+00, 0.3679659E+00, 0.3679659E+00 /
      data (ref_adm(23,iz,20,13),iz = 1,20) / &
     & 0.3933100E+00, 0.3933100E+00, 0.3979200E+00, 0.3976300E+00, &
     & 0.4055300E+00, 0.4093400E+00, 0.4263200E+00, 0.4246700E+00, &
     & 0.4243400E+00, 0.3989500E+00, 0.4059000E+00, 0.4256100E+00, &
     & 0.4151600E+00, 0.4329800E+00, 0.4191300E+00, 0.4831100E+00, &
     & 0.4404044E+00, 0.4248438E+00, 0.3648571E+00, 0.3648571E+00 /
      data (ref_adm(23,iz,21,13),iz = 1,20) / &
     & 0.4008200E+00, 0.4008200E+00, 0.4097200E+00, 0.4188400E+00, &
     & 0.4022800E+00, 0.3920400E+00, 0.4113000E+00, 0.4327300E+00, &
     & 0.4054300E+00, 0.4165800E+00, 0.4131000E+00, 0.4262100E+00, &
     & 0.4318000E+00, 0.4391100E+00, 0.4293200E+00, 0.4376500E+00, &
     & 0.4363095E+00, 0.4198729E+00, 0.3623785E+00, 0.3623785E+00 /
      data (ref_adm(23,iz,22,13),iz = 1,20) / &
     & 0.3980400E+00, 0.3980400E+00, 0.4065000E+00, 0.4078900E+00, &
     & 0.4157000E+00, 0.4087100E+00, 0.4201000E+00, 0.4242000E+00, &
     & 0.4195100E+00, 0.4061000E+00, 0.4111200E+00, 0.4311500E+00, &
     & 0.4430800E+00, 0.4418800E+00, 0.4395100E+00, 0.4371100E+00, &
     & 0.4940279E+00, 0.4752852E+00, 0.4181100E+00, 0.4181100E+00 /
      data (ref_adm(23,iz,23,13),iz = 1,20) / &
     & 0.4118200E+00, 0.4118200E+00, 0.4248600E+00, 0.4016500E+00, &
     & 0.4046500E+00, 0.4068300E+00, 0.4136200E+00, 0.4338000E+00, &
     & 0.4333800E+00, 0.4217800E+00, 0.4145500E+00, 0.4327700E+00, &
     & 0.4465000E+00, 0.4462600E+00, 0.4423400E+00, 0.4545500E+00, &
     & 0.4853635E+00, 0.4654322E+00, 0.4149904E+00, 0.4149904E+00 /
      data (ref_adm(23,iz,24,13),iz = 1,20) / &
     & 0.3980000E+00, 0.3980000E+00, 0.3817100E+00, 0.3857900E+00, &
     & 0.3780400E+00, 0.3803300E+00, 0.3946000E+00, 0.4017000E+00, &
     & 0.4225600E+00, 0.4412400E+00, 0.4223100E+00, 0.4331800E+00, &
     & 0.4220500E+00, 0.4311900E+00, 0.4398900E+00, 0.4231600E+00, &
     & 0.4229000E+00, 0.4579422E+00, 0.4131342E+00, 0.4131342E+00 /
      data (ref_adm(23,iz,25,13),iz = 1,20) / &
     & 0.4184000E+00, 0.4184000E+00, 0.4198200E+00, 0.4218600E+00, &
     & 0.4248200E+00, 0.4209000E+00, 0.4306100E+00, 0.4379100E+00, &
     & 0.4361800E+00, 0.4465800E+00, 0.4509000E+00, 0.4553100E+00, &
     & 0.4519000E+00, 0.4462800E+00, 0.4619700E+00, 0.4499400E+00, &
     & 0.4442300E+00, 0.4521900E+00, 0.4128042E+00, 0.4128042E+00 /
      data (ref_adm(23,iz,26,13),iz = 1,20) / &
     & 0.3965400E+00, 0.3965400E+00, 0.3929100E+00, 0.3994900E+00, &
     & 0.3953100E+00, 0.4034200E+00, 0.4115000E+00, 0.4154700E+00, &
     & 0.4143000E+00, 0.4192600E+00, 0.4282000E+00, 0.4352900E+00, &
     & 0.4400000E+00, 0.4387000E+00, 0.4471500E+00, 0.4541400E+00, &
     & 0.4671900E+00, 0.4298900E+00, 0.4138271E+00, 0.4138271E+00 /
      data (ref_adm(23,iz,27,13),iz = 1,20) / &
     & 0.4019300E+00, 0.4019300E+00, 0.4063600E+00, 0.4140000E+00, &
     & 0.4198100E+00, 0.4252200E+00, 0.4157500E+00, 0.4268400E+00, &
     & 0.4296900E+00, 0.4371100E+00, 0.4564500E+00, 0.4770900E+00, &
     & 0.4799700E+00, 0.4725900E+00, 0.4559700E+00, 0.4492000E+00, &
     & 0.4550600E+00, 0.4327100E+00, 0.3865100E+00, 0.3865100E+00 /
      data (ref_adm(23,iz,28,13),iz = 1,20) / &
     & 0.4037300E+00, 0.4037300E+00, 0.4045100E+00, 0.4064200E+00, &
     & 0.4114700E+00, 0.4003800E+00, 0.4145900E+00, 0.4210600E+00, &
     & 0.4288400E+00, 0.4264600E+00, 0.4422300E+00, 0.4839300E+00, &
     & 0.4635100E+00, 0.4597300E+00, 0.4699400E+00, 0.4617400E+00, &
     & 0.4558400E+00, 0.4556400E+00, 0.3709600E+00, 0.3709600E+00 /
      data (ref_adm(23,iz,29,13),iz = 1,20) / &
     & 0.4005900E+00, 0.4005900E+00, 0.4084500E+00, 0.4163100E+00, &
     & 0.4175900E+00, 0.4107100E+00, 0.4273600E+00, 0.4347800E+00, &
     & 0.4316300E+00, 0.4504400E+00, 0.4685300E+00, 0.4657900E+00, &
     & 0.4805500E+00, 0.4827300E+00, 0.4860400E+00, 0.4776400E+00, &
     & 0.4743500E+00, 0.4501700E+00, 0.3770000E+00, 0.3770000E+00 /
      data (ref_adm(23,iz,30,13),iz = 1,20) / &
     & 0.4066800E+00, 0.4066800E+00, 0.4062600E+00, 0.3868500E+00, &
     & 0.4030400E+00, 0.4139400E+00, 0.4258500E+00, 0.4407200E+00, &
     & 0.4355800E+00, 0.4433300E+00, 0.4572500E+00, 0.4716800E+00, &
     & 0.4904200E+00, 0.4777500E+00, 0.4836300E+00, 0.4951400E+00, &
     & 0.4877700E+00, 0.4645500E+00, 0.3792700E+00, 0.3792700E+00 /
      data (ref_adm(23,iz,31,13),iz = 1,20) / &
     & 0.4015100E+00, 0.4015100E+00, 0.4092900E+00, 0.4044900E+00, &
     & 0.4142700E+00, 0.4374300E+00, 0.4358100E+00, 0.4449200E+00, &
     & 0.4461700E+00, 0.4596400E+00, 0.4738400E+00, 0.4882400E+00, &
     & 0.5003400E+00, 0.4866800E+00, 0.5053100E+00, 0.5215600E+00, &
     & 0.5226000E+00, 0.4933500E+00, 0.4136700E+00, 0.4136700E+00 /
      data (ref_adm(23,iz,32,13),iz = 1,20) / &
     & 0.4012200E+00, 0.4012200E+00, 0.3913200E+00, 0.4040100E+00, &
     & 0.4140600E+00, 0.4186500E+00, 0.4335400E+00, 0.4443100E+00, &
     & 0.4605800E+00, 0.4696700E+00, 0.4651500E+00, 0.4792800E+00, &
     & 0.4965800E+00, 0.4918300E+00, 0.4978700E+00, 0.5057000E+00, &
     & 0.5034500E+00, 0.4802700E+00, 0.3884400E+00, 0.3884400E+00 /
      data (ref_adm(23,iz,33,13),iz = 1,20) / &
     & 0.4152700E+00, 0.4152700E+00, 0.4011900E+00, 0.4132100E+00, &
     & 0.4048200E+00, 0.4035500E+00, 0.4142500E+00, 0.4188400E+00, &
     & 0.4212200E+00, 0.4493100E+00, 0.4636600E+00, 0.4757000E+00, &
     & 0.4752700E+00, 0.4880700E+00, 0.5042000E+00, 0.5002200E+00, &
     & 0.5042600E+00, 0.4943000E+00, 0.4091400E+00, 0.4091400E+00 /
      data (ref_adm(23,iz,34,13),iz = 1,20) / &
     & 0.3920700E+00, 0.3920700E+00, 0.3822800E+00, 0.4028700E+00, &
     & 0.4342400E+00, 0.4430400E+00, 0.4431000E+00, 0.4398200E+00, &
     & 0.4382800E+00, 0.4665900E+00, 0.4682800E+00, 0.4880800E+00, &
     & 0.5038200E+00, 0.5125400E+00, 0.5073300E+00, 0.5250100E+00, &
     & 0.5162100E+00, 0.5194000E+00, 0.4207600E+00, 0.4207600E+00 /
      data (ref_adm(23,iz,35,13),iz = 1,20) / &
     & 0.3870300E+00, 0.3870300E+00, 0.3833100E+00, 0.4045200E+00, &
     & 0.4207500E+00, 0.4427600E+00, 0.4360700E+00, 0.4407200E+00, &
     & 0.4384500E+00, 0.4573900E+00, 0.4819600E+00, 0.4816000E+00, &
     & 0.4922200E+00, 0.5162700E+00, 0.5065300E+00, 0.5309000E+00, &
     & 0.5491100E+00, 0.5220000E+00, 0.4190600E+00, 0.4190600E+00 /
      data (ref_adm(23,iz,36,13),iz = 1,20) / &
     & 0.4013000E+00, 0.4013000E+00, 0.4039700E+00, 0.4000300E+00, &
     & 0.4172600E+00, 0.4320400E+00, 0.4322500E+00, 0.4458300E+00, &
     & 0.4501900E+00, 0.4691400E+00, 0.4761900E+00, 0.4835900E+00, &
     & 0.5288900E+00, 0.5323300E+00, 0.5500200E+00, 0.5411600E+00, &
     & 0.5435600E+00, 0.5046800E+00, 0.4160900E+00, 0.4160900E+00 /
      data (ref_adm(23,iz,37,13),iz = 1,20) / &
     & 0.4165800E+00, 0.4165800E+00, 0.4301600E+00, 0.4196800E+00, &
     & 0.4027600E+00, 0.4220000E+00, 0.4430300E+00, 0.4437500E+00, &
     & 0.4373100E+00, 0.4470200E+00, 0.4643100E+00, 0.4955200E+00, &
     & 0.5353500E+00, 0.5662600E+00, 0.5593800E+00, 0.5592700E+00, &
     & 0.5362600E+00, 0.5203300E+00, 0.4755381E+00, 0.4755381E+00 /
      data (ref_adm(23,iz,38,13),iz = 1,20) / &
     & 0.4165800E+00, 0.4165800E+00, 0.4301600E+00, 0.4196800E+00, &
     & 0.4027600E+00, 0.4220000E+00, 0.4430300E+00, 0.4437500E+00, &
     & 0.4373100E+00, 0.4470200E+00, 0.4643100E+00, 0.4955200E+00, &
     & 0.5353500E+00, 0.5662600E+00, 0.5593800E+00, 0.5592700E+00, &
     & 0.5362600E+00, 0.5203300E+00, 0.4755381E+00, 0.4755381E+00 /
! Solar Zenith Angle 65.0 Albedo  0.4539538E+00
      data (ref_adm(23,iz, 1,14),iz = 1,20) / &
     & 0.3818600E+00, 0.3818600E+00, 0.3797800E+00, 0.3821300E+00, &
     & 0.3884600E+00, 0.4094900E+00, 0.4111100E+00, 0.4123100E+00, &
     & 0.4272300E+00, 0.4365900E+00, 0.4631700E+00, 0.4793100E+00, &
     & 0.5398600E+00, 0.6245200E+00, 0.7096600E+00, 0.7770900E+00, &
     & 0.8497300E+00, 0.8025700E+00, 0.8492191E+00, 0.8492191E+00 /
      data (ref_adm(23,iz, 2,14),iz = 1,20) / &
     & 0.3818600E+00, 0.3818600E+00, 0.3797800E+00, 0.3821300E+00, &
     & 0.3884600E+00, 0.4094900E+00, 0.4111100E+00, 0.4123100E+00, &
     & 0.4272300E+00, 0.4365900E+00, 0.4631700E+00, 0.4793100E+00, &
     & 0.5398600E+00, 0.6245200E+00, 0.7096600E+00, 0.7770900E+00, &
     & 0.8497300E+00, 0.8025700E+00, 0.8492191E+00, 0.8492191E+00 /
      data (ref_adm(23,iz, 3,14),iz = 1,20) / &
     & 0.3780200E+00, 0.3780200E+00, 0.3820000E+00, 0.3842900E+00, &
     & 0.3884600E+00, 0.3881400E+00, 0.4102100E+00, 0.4190400E+00, &
     & 0.4340700E+00, 0.4556900E+00, 0.4589500E+00, 0.4901600E+00, &
     & 0.5254900E+00, 0.5953600E+00, 0.6442800E+00, 0.7258400E+00, &
     & 0.8118400E+00, 0.8451300E+00, 0.2278298E+00, 0.2278298E+00 /
      data (ref_adm(23,iz, 4,14),iz = 1,20) / &
     & 0.3827700E+00, 0.3827700E+00, 0.4028800E+00, 0.4034900E+00, &
     & 0.3913100E+00, 0.3972300E+00, 0.3965000E+00, 0.4219000E+00, &
     & 0.4284600E+00, 0.4494200E+00, 0.4613500E+00, 0.5050000E+00, &
     & 0.5156800E+00, 0.5755400E+00, 0.6218200E+00, 0.6731300E+00, &
     & 0.7841500E+00, 0.8719400E+00, 0.7847462E+00, 0.7847462E+00 /
      data (ref_adm(23,iz, 5,14),iz = 1,20) / &
     & 0.3882800E+00, 0.3882800E+00, 0.3976400E+00, 0.4083600E+00, &
     & 0.3891900E+00, 0.4017400E+00, 0.4232500E+00, 0.4166500E+00, &
     & 0.4360300E+00, 0.4474400E+00, 0.4653100E+00, 0.5076500E+00, &
     & 0.5173900E+00, 0.5557300E+00, 0.6095300E+00, 0.6810100E+00, &
     & 0.7549800E+00, 0.7512000E+00, 0.7364563E+00, 0.7364563E+00 /
      data (ref_adm(23,iz, 6,14),iz = 1,20) / &
     & 0.3725900E+00, 0.3725900E+00, 0.3781100E+00, 0.3765800E+00, &
     & 0.3855800E+00, 0.3915000E+00, 0.4021300E+00, 0.4073900E+00, &
     & 0.4066600E+00, 0.4454600E+00, 0.4757600E+00, 0.4823300E+00, &
     & 0.5085700E+00, 0.5424100E+00, 0.5887700E+00, 0.6486200E+00, &
     & 0.7411000E+00, 0.7853900E+00, 0.6683300E+00, 0.6683300E+00 /
      data (ref_adm(23,iz, 7,14),iz = 1,20) / &
     & 0.3951500E+00, 0.3951500E+00, 0.3926800E+00, 0.4005200E+00, &
     & 0.4042400E+00, 0.4102700E+00, 0.4192100E+00, 0.4294200E+00, &
     & 0.4390000E+00, 0.4598900E+00, 0.4750700E+00, 0.4840700E+00, &
     & 0.5097900E+00, 0.5514800E+00, 0.5899200E+00, 0.6446000E+00, &
     & 0.6997200E+00, 0.7391200E+00, 0.7383200E+00, 0.7383200E+00 /
      data (ref_adm(23,iz, 8,14),iz = 1,20) / &
     & 0.3914000E+00, 0.3914000E+00, 0.4028100E+00, 0.4106700E+00, &
     & 0.4077700E+00, 0.3994700E+00, 0.4054700E+00, 0.4232000E+00, &
     & 0.4381000E+00, 0.4641700E+00, 0.4628600E+00, 0.4806200E+00, &
     & 0.5101600E+00, 0.5390600E+00, 0.5712800E+00, 0.6700200E+00, &
     & 0.6834100E+00, 0.6988900E+00, 0.7230400E+00, 0.7230400E+00 /
      data (ref_adm(23,iz, 9,14),iz = 1,20) / &
     & 0.3886700E+00, 0.3886700E+00, 0.4003200E+00, 0.4013500E+00, &
     & 0.3947800E+00, 0.3958200E+00, 0.3981100E+00, 0.3991700E+00, &
     & 0.4247700E+00, 0.4589000E+00, 0.4506700E+00, 0.4950600E+00, &
     & 0.4857400E+00, 0.5216000E+00, 0.5687600E+00, 0.6275500E+00, &
     & 0.6388400E+00, 0.6337900E+00, 0.6821200E+00, 0.6821200E+00 /
      data (ref_adm(23,iz,10,14),iz = 1,20) / &
     & 0.3914400E+00, 0.3914400E+00, 0.3796400E+00, 0.3818400E+00, &
     & 0.3910500E+00, 0.3820200E+00, 0.3884000E+00, 0.4086200E+00, &
     & 0.4075700E+00, 0.4464500E+00, 0.4358200E+00, 0.4694000E+00, &
     & 0.4721400E+00, 0.5195600E+00, 0.5389100E+00, 0.6030700E+00, &
     & 0.6054200E+00, 0.5830300E+00, 0.6192600E+00, 0.6192600E+00 /
      data (ref_adm(23,iz,11,14),iz = 1,20) / &
     & 0.3783700E+00, 0.3783700E+00, 0.3998900E+00, 0.3884100E+00, &
     & 0.3874400E+00, 0.3728200E+00, 0.3829400E+00, 0.4137000E+00, &
     & 0.4103700E+00, 0.4101200E+00, 0.4497100E+00, 0.4353000E+00, &
     & 0.4604500E+00, 0.4914500E+00, 0.5267700E+00, 0.5822100E+00, &
     & 0.6046900E+00, 0.5785200E+00, 0.5441600E+00, 0.5441600E+00 /
      data (ref_adm(23,iz,12,14),iz = 1,20) / &
     & 0.3926500E+00, 0.3926500E+00, 0.3971800E+00, 0.3832900E+00, &
     & 0.3844000E+00, 0.3931500E+00, 0.3955000E+00, 0.4046200E+00, &
     & 0.4193300E+00, 0.4165100E+00, 0.4351800E+00, 0.4330600E+00, &
     & 0.4808500E+00, 0.4903400E+00, 0.5094000E+00, 0.5390000E+00, &
     & 0.5616000E+00, 0.5551100E+00, 0.5215700E+00, 0.5215700E+00 /
      data (ref_adm(23,iz,13,14),iz = 1,20) / &
     & 0.3945900E+00, 0.3945900E+00, 0.3926800E+00, 0.3982000E+00, &
     & 0.3941500E+00, 0.3916600E+00, 0.3953100E+00, 0.4082300E+00, &
     & 0.4040700E+00, 0.4270700E+00, 0.4308700E+00, 0.4418900E+00, &
     & 0.4410000E+00, 0.4889800E+00, 0.4947700E+00, 0.5285900E+00, &
     & 0.5595200E+00, 0.5324700E+00, 0.4933500E+00, 0.4933500E+00 /
      data (ref_adm(23,iz,14,14),iz = 1,20) / &
     & 0.3791500E+00, 0.3791500E+00, 0.3906000E+00, 0.3921100E+00, &
     & 0.3920900E+00, 0.3883100E+00, 0.3886100E+00, 0.3908600E+00, &
     & 0.3981400E+00, 0.3976100E+00, 0.4023500E+00, 0.4136200E+00, &
     & 0.4193300E+00, 0.4338400E+00, 0.4787200E+00, 0.4997900E+00, &
     & 0.5242800E+00, 0.5063400E+00, 0.5131200E+00, 0.5131200E+00 /
      data (ref_adm(23,iz,15,14),iz = 1,20) / &
     & 0.4149900E+00, 0.4149900E+00, 0.4132800E+00, 0.4100200E+00, &
     & 0.4076500E+00, 0.4185600E+00, 0.4287000E+00, 0.4349500E+00, &
     & 0.4441800E+00, 0.4499400E+00, 0.4587900E+00, 0.4629900E+00, &
     & 0.4647400E+00, 0.4660100E+00, 0.4779300E+00, 0.4753300E+00, &
     & 0.4945200E+00, 0.4921900E+00, 0.4926929E+00, 0.4926929E+00 /
      data (ref_adm(23,iz,16,14),iz = 1,20) / &
     & 0.3647600E+00, 0.3647600E+00, 0.3458800E+00, 0.3671800E+00, &
     & 0.3541200E+00, 0.3464700E+00, 0.3364200E+00, 0.3391200E+00, &
     & 0.3549100E+00, 0.3620600E+00, 0.3608200E+00, 0.3848700E+00, &
     & 0.3965200E+00, 0.4083700E+00, 0.4571200E+00, 0.5031100E+00, &
     & 0.4887200E+00, 0.5509600E+00, 0.4788946E+00, 0.4788946E+00 /
      data (ref_adm(23,iz,17,14),iz = 1,20) / &
     & 0.3864100E+00, 0.3864100E+00, 0.4024500E+00, 0.4100600E+00, &
     & 0.3962900E+00, 0.4031100E+00, 0.4100500E+00, 0.4047400E+00, &
     & 0.4172100E+00, 0.4096900E+00, 0.3977800E+00, 0.4184800E+00, &
     & 0.4386900E+00, 0.4579900E+00, 0.4664800E+00, 0.4821000E+00, &
     & 0.4782000E+00, 0.5301525E+00, 0.4655553E+00, 0.4655553E+00 /
      data (ref_adm(23,iz,18,14),iz = 1,20) / &
     & 0.3851500E+00, 0.3851500E+00, 0.3889400E+00, 0.3994400E+00, &
     & 0.4113500E+00, 0.4109400E+00, 0.4087900E+00, 0.3858300E+00, &
     & 0.4115100E+00, 0.4160500E+00, 0.4160300E+00, 0.4129400E+00, &
     & 0.4505400E+00, 0.4442800E+00, 0.4530300E+00, 0.4610400E+00, &
     & 0.3900400E+00, 0.4794950E+00, 0.4375223E+00, 0.4375223E+00 /
      data (ref_adm(23,iz,19,14),iz = 1,20) / &
     & 0.3816800E+00, 0.3816800E+00, 0.3893500E+00, 0.3985500E+00, &
     & 0.4061300E+00, 0.4064500E+00, 0.4103600E+00, 0.4058300E+00, &
     & 0.4087300E+00, 0.4259900E+00, 0.3956500E+00, 0.4299000E+00, &
     & 0.4382800E+00, 0.4482400E+00, 0.4602900E+00, 0.4502000E+00, &
     & 0.4739071E+00, 0.4716244E+00, 0.4302673E+00, 0.4302673E+00 /
      data (ref_adm(23,iz,20,14),iz = 1,20) / &
     & 0.3845900E+00, 0.3845900E+00, 0.4045600E+00, 0.3936800E+00, &
     & 0.4044000E+00, 0.4027400E+00, 0.4091300E+00, 0.4042000E+00, &
     & 0.3941200E+00, 0.3977300E+00, 0.4154500E+00, 0.4260600E+00, &
     & 0.4309100E+00, 0.4410700E+00, 0.4583200E+00, 0.4297300E+00, &
     & 0.4678116E+00, 0.4656549E+00, 0.4260271E+00, 0.4260271E+00 /
      data (ref_adm(23,iz,21,14),iz = 1,20) / &
     & 0.3945100E+00, 0.3945100E+00, 0.4024500E+00, 0.4099900E+00, &
     & 0.4059600E+00, 0.3976600E+00, 0.4040400E+00, 0.4093200E+00, &
     & 0.4061800E+00, 0.4136200E+00, 0.4190400E+00, 0.4215000E+00, &
     & 0.4348100E+00, 0.4668300E+00, 0.4603200E+00, 0.4072700E+00, &
     & 0.4627955E+00, 0.4601733E+00, 0.4234289E+00, 0.4234289E+00 /
      data (ref_adm(23,iz,22,14),iz = 1,20) / &
     & 0.3891000E+00, 0.3891000E+00, 0.4001500E+00, 0.4126100E+00, &
     & 0.4044900E+00, 0.4047000E+00, 0.3996700E+00, 0.3965800E+00, &
     & 0.4118600E+00, 0.4181700E+00, 0.4279800E+00, 0.4204000E+00, &
     & 0.4390500E+00, 0.4635500E+00, 0.4531400E+00, 0.4502400E+00, &
     & 0.4577638E+00, 0.4432774E+00, 0.4171861E+00, 0.4171861E+00 /
      data (ref_adm(23,iz,23,14),iz = 1,20) / &
     & 0.3956000E+00, 0.3956000E+00, 0.3929100E+00, 0.4067700E+00, &
     & 0.4012600E+00, 0.4116800E+00, 0.4021900E+00, 0.4143500E+00, &
     & 0.4177100E+00, 0.4253400E+00, 0.4154900E+00, 0.4312500E+00, &
     & 0.4449700E+00, 0.4443200E+00, 0.4578100E+00, 0.4742300E+00, &
     & 0.4563428E+00, 0.4424217E+00, 0.4210114E+00, 0.4210114E+00 /
      data (ref_adm(23,iz,24,14),iz = 1,20) / &
     & 0.3588900E+00, 0.3588900E+00, 0.3426700E+00, 0.3525200E+00, &
     & 0.3565600E+00, 0.3641200E+00, 0.3662500E+00, 0.3700300E+00, &
     & 0.3812800E+00, 0.3940000E+00, 0.3996800E+00, 0.4210800E+00, &
     & 0.4374500E+00, 0.4523100E+00, 0.4619400E+00, 0.4751000E+00, &
     & 0.4527700E+00, 0.4448428E+00, 0.4274528E+00, 0.4274528E+00 /
      data (ref_adm(23,iz,25,14),iz = 1,20) / &
     & 0.4099500E+00, 0.4099500E+00, 0.4278300E+00, 0.4256900E+00, &
     & 0.4201500E+00, 0.4278700E+00, 0.4291000E+00, 0.4380000E+00, &
     & 0.4481800E+00, 0.4623700E+00, 0.4678200E+00, 0.4701800E+00, &
     & 0.4772500E+00, 0.4777600E+00, 0.4812200E+00, 0.4643400E+00, &
     & 0.4565300E+00, 0.4867100E+00, 0.4359806E+00, 0.4359806E+00 /
      data (ref_adm(23,iz,26,14),iz = 1,20) / &
     & 0.3918300E+00, 0.3918300E+00, 0.3811100E+00, 0.3857500E+00, &
     & 0.3851000E+00, 0.3908400E+00, 0.4003100E+00, 0.4021400E+00, &
     & 0.4004100E+00, 0.4091400E+00, 0.4206100E+00, 0.4384800E+00, &
     & 0.4532100E+00, 0.4642500E+00, 0.4720500E+00, 0.4697300E+00, &
     & 0.4746600E+00, 0.4431100E+00, 0.4472960E+00, 0.4472960E+00 /
      data (ref_adm(23,iz,27,14),iz = 1,20) / &
     & 0.3861200E+00, 0.3861200E+00, 0.3816800E+00, 0.4113600E+00, &
     & 0.4114600E+00, 0.4078900E+00, 0.4145400E+00, 0.4265400E+00, &
     & 0.4301800E+00, 0.4322600E+00, 0.4414500E+00, 0.4443300E+00, &
     & 0.4668000E+00, 0.4950300E+00, 0.4898400E+00, 0.4915700E+00, &
     & 0.4888600E+00, 0.4963800E+00, 0.4296300E+00, 0.4296300E+00 /
      data (ref_adm(23,iz,28,14),iz = 1,20) / &
     & 0.3819200E+00, 0.3819200E+00, 0.3973400E+00, 0.4089300E+00, &
     & 0.4072600E+00, 0.4111800E+00, 0.4154900E+00, 0.4181300E+00, &
     & 0.4322700E+00, 0.4387300E+00, 0.4498400E+00, 0.4643000E+00, &
     & 0.4763100E+00, 0.4814700E+00, 0.4686800E+00, 0.4840600E+00, &
     & 0.4944800E+00, 0.4911000E+00, 0.4054100E+00, 0.4054100E+00 /
      data (ref_adm(23,iz,29,14),iz = 1,20) / &
     & 0.3858600E+00, 0.3858600E+00, 0.4049600E+00, 0.4076000E+00, &
     & 0.4047800E+00, 0.4146100E+00, 0.4226600E+00, 0.4208800E+00, &
     & 0.4351100E+00, 0.4503600E+00, 0.4696200E+00, 0.4681000E+00, &
     & 0.4818900E+00, 0.4920600E+00, 0.4969000E+00, 0.5161700E+00, &
     & 0.5074700E+00, 0.4935200E+00, 0.4375100E+00, 0.4375100E+00 /
      data (ref_adm(23,iz,30,14),iz = 1,20) / &
     & 0.3964700E+00, 0.3964700E+00, 0.3913100E+00, 0.3962800E+00, &
     & 0.4052700E+00, 0.3951000E+00, 0.4064700E+00, 0.4188300E+00, &
     & 0.4415800E+00, 0.4546800E+00, 0.4674400E+00, 0.4720300E+00, &
     & 0.4890300E+00, 0.4917900E+00, 0.4920200E+00, 0.5104900E+00, &
     & 0.5276000E+00, 0.5186400E+00, 0.4302800E+00, 0.4302800E+00 /
      data (ref_adm(23,iz,31,14),iz = 1,20) / &
     & 0.3886700E+00, 0.3886700E+00, 0.3801800E+00, 0.3919100E+00, &
     & 0.4023700E+00, 0.4083800E+00, 0.4111700E+00, 0.4125800E+00, &
     & 0.4281400E+00, 0.4482400E+00, 0.4717200E+00, 0.4713000E+00, &
     & 0.4925900E+00, 0.4997000E+00, 0.5056300E+00, 0.5104300E+00, &
     & 0.5482700E+00, 0.5254000E+00, 0.4551900E+00, 0.4551900E+00 /
      data (ref_adm(23,iz,32,14),iz = 1,20) / &
     & 0.3872800E+00, 0.3872800E+00, 0.3974600E+00, 0.3996100E+00, &
     & 0.4120100E+00, 0.4187700E+00, 0.4225900E+00, 0.4367800E+00, &
     & 0.4521800E+00, 0.4662900E+00, 0.4799000E+00, 0.4885900E+00, &
     & 0.4933800E+00, 0.5079000E+00, 0.5222100E+00, 0.5366600E+00, &
     & 0.5527000E+00, 0.5420000E+00, 0.4595400E+00, 0.4595400E+00 /
      data (ref_adm(23,iz,33,14),iz = 1,20) / &
     & 0.3992400E+00, 0.3992400E+00, 0.3900700E+00, 0.3890200E+00, &
     & 0.3876400E+00, 0.3982200E+00, 0.4004800E+00, 0.4209400E+00, &
     & 0.4354900E+00, 0.4485700E+00, 0.4689200E+00, 0.4868500E+00, &
     & 0.5090800E+00, 0.5197700E+00, 0.5393900E+00, 0.5400900E+00, &
     & 0.5495000E+00, 0.5648900E+00, 0.4751400E+00, 0.4751400E+00 /
      data (ref_adm(23,iz,34,14),iz = 1,20) / &
     & 0.3850200E+00, 0.3850200E+00, 0.3999200E+00, 0.3918400E+00, &
     & 0.4125000E+00, 0.4145200E+00, 0.4179700E+00, 0.4363600E+00, &
     & 0.4429800E+00, 0.4535000E+00, 0.4874300E+00, 0.4837600E+00, &
     & 0.5197100E+00, 0.5324500E+00, 0.5636500E+00, 0.5728300E+00, &
     & 0.5774700E+00, 0.5660300E+00, 0.4742700E+00, 0.4742700E+00 /
      data (ref_adm(23,iz,35,14),iz = 1,20) / &
     & 0.3833000E+00, 0.3833000E+00, 0.3849100E+00, 0.3904100E+00, &
     & 0.4095400E+00, 0.4112200E+00, 0.4240500E+00, 0.4335000E+00, &
     & 0.4378400E+00, 0.4532400E+00, 0.4689500E+00, 0.4970600E+00, &
     & 0.5158200E+00, 0.5585800E+00, 0.5638200E+00, 0.5761600E+00, &
     & 0.5920400E+00, 0.5831600E+00, 0.4832800E+00, 0.4832800E+00 /
      data (ref_adm(23,iz,36,14),iz = 1,20) / &
     & 0.3748300E+00, 0.3748300E+00, 0.3896500E+00, 0.3983200E+00, &
     & 0.4016000E+00, 0.4080600E+00, 0.4238300E+00, 0.4426000E+00, &
     & 0.4557200E+00, 0.4715200E+00, 0.4745700E+00, 0.5062100E+00, &
     & 0.5338100E+00, 0.5564400E+00, 0.5716200E+00, 0.5801100E+00, &
     & 0.6063200E+00, 0.5829500E+00, 0.4759200E+00, 0.4759200E+00 /
      data (ref_adm(23,iz,37,14),iz = 1,20) / &
     & 0.3799500E+00, 0.3799500E+00, 0.3919700E+00, 0.3960100E+00, &
     & 0.4081000E+00, 0.4156400E+00, 0.4336600E+00, 0.4392000E+00, &
     & 0.4605400E+00, 0.4552700E+00, 0.4658400E+00, 0.4951300E+00, &
     & 0.5276200E+00, 0.5724100E+00, 0.5973200E+00, 0.6170200E+00, &
     & 0.6086500E+00, 0.5937700E+00, 0.5053700E+00, 0.5053700E+00 /
      data (ref_adm(23,iz,38,14),iz = 1,20) / &
     & 0.3799500E+00, 0.3799500E+00, 0.3919700E+00, 0.3960100E+00, &
     & 0.4081000E+00, 0.4156400E+00, 0.4336600E+00, 0.4392000E+00, &
     & 0.4605400E+00, 0.4552700E+00, 0.4658400E+00, 0.4951300E+00, &
     & 0.5276200E+00, 0.5724100E+00, 0.5973200E+00, 0.6170200E+00, &
     & 0.6086500E+00, 0.5937700E+00, 0.5053700E+00, 0.5053700E+00 /
! Solar Zenith Angle 70.0 Albedo  0.4512298E+00
      data (ref_adm(23,iz, 1,15),iz = 1,20) / &
     & 0.3679000E+00, 0.3679000E+00, 0.3827000E+00, 0.3883600E+00, &
     & 0.3839200E+00, 0.3879900E+00, 0.4044900E+00, 0.4105700E+00, &
     & 0.4310900E+00, 0.4546100E+00, 0.4803700E+00, 0.5286600E+00, &
     & 0.5883500E+00, 0.6595900E+00, 0.7623500E+00, 0.8012600E+00, &
     & 0.8812926E+00, 0.9205620E+00, 0.7173401E+00, 0.7173401E+00 /
      data (ref_adm(23,iz, 2,15),iz = 1,20) / &
     & 0.3679000E+00, 0.3679000E+00, 0.3827000E+00, 0.3883600E+00, &
     & 0.3839200E+00, 0.3879900E+00, 0.4044900E+00, 0.4105700E+00, &
     & 0.4310900E+00, 0.4546100E+00, 0.4803700E+00, 0.5286600E+00, &
     & 0.5883500E+00, 0.6595900E+00, 0.7623500E+00, 0.8012600E+00, &
     & 0.8812926E+00, 0.9205620E+00, 0.7173401E+00, 0.7173401E+00 /
      data (ref_adm(23,iz, 3,15),iz = 1,20) / &
     & 0.3704700E+00, 0.3704700E+00, 0.3720600E+00, 0.3783400E+00, &
     & 0.3778900E+00, 0.3819700E+00, 0.4056700E+00, 0.4259700E+00, &
     & 0.4320800E+00, 0.4546500E+00, 0.4764400E+00, 0.5311300E+00, &
     & 0.5800800E+00, 0.6542700E+00, 0.7303000E+00, 0.7982600E+00, &
     & 0.8855400E+00, 0.9084380E+00, 0.1918807E+00, 0.1918807E+00 /
      data (ref_adm(23,iz, 4,15),iz = 1,20) / &
     & 0.3885900E+00, 0.3885900E+00, 0.3796800E+00, 0.3833200E+00, &
     & 0.3823800E+00, 0.3894700E+00, 0.3963700E+00, 0.4175000E+00, &
     & 0.4429100E+00, 0.4373300E+00, 0.4872500E+00, 0.5255600E+00, &
     & 0.5617600E+00, 0.6332400E+00, 0.6858400E+00, 0.7845400E+00, &
     & 0.7875400E+00, 0.8837904E+00, 0.6896529E+00, 0.6896529E+00 /
      data (ref_adm(23,iz, 5,15),iz = 1,20) / &
     & 0.3844200E+00, 0.3844200E+00, 0.3857900E+00, 0.3853000E+00, &
     & 0.3887300E+00, 0.3965400E+00, 0.4146500E+00, 0.4271900E+00, &
     & 0.4328900E+00, 0.4556600E+00, 0.4766000E+00, 0.5082400E+00, &
     & 0.5716800E+00, 0.6275000E+00, 0.6738400E+00, 0.7295200E+00, &
     & 0.7654400E+00, 0.8503931E+00, 0.6651008E+00, 0.6651008E+00 /
      data (ref_adm(23,iz, 6,15),iz = 1,20) / &
     & 0.3583500E+00, 0.3583500E+00, 0.3563400E+00, 0.3551000E+00, &
     & 0.3645700E+00, 0.3684900E+00, 0.3786500E+00, 0.3902500E+00, &
     & 0.4000700E+00, 0.4217400E+00, 0.4545400E+00, 0.4819900E+00, &
     & 0.5234800E+00, 0.5798900E+00, 0.6259500E+00, 0.7104400E+00, &
     & 0.8334900E+00, 0.9275800E+00, 0.6614200E+00, 0.6614200E+00 /
      data (ref_adm(23,iz, 7,15),iz = 1,20) / &
     & 0.3838300E+00, 0.3838300E+00, 0.3877800E+00, 0.3815300E+00, &
     & 0.3920300E+00, 0.3981000E+00, 0.4124500E+00, 0.4229100E+00, &
     & 0.4352100E+00, 0.4480400E+00, 0.4722500E+00, 0.5046300E+00, &
     & 0.5482700E+00, 0.5954100E+00, 0.6477500E+00, 0.7382500E+00, &
     & 0.8587300E+00, 0.9093800E+00, 0.8392800E+00, 0.8392800E+00 /
      data (ref_adm(23,iz, 8,15),iz = 1,20) / &
     & 0.3740500E+00, 0.3740500E+00, 0.3598100E+00, 0.3628700E+00, &
     & 0.3898000E+00, 0.3783000E+00, 0.4031000E+00, 0.4107800E+00, &
     & 0.4338300E+00, 0.4327500E+00, 0.4509000E+00, 0.4886800E+00, &
     & 0.5017200E+00, 0.5505600E+00, 0.6065300E+00, 0.6875700E+00, &
     & 0.7999800E+00, 0.8135100E+00, 0.8238800E+00, 0.8238800E+00 /
      data (ref_adm(23,iz, 9,15),iz = 1,20) / &
     & 0.3689300E+00, 0.3689300E+00, 0.3796100E+00, 0.3845300E+00, &
     & 0.3737800E+00, 0.3744000E+00, 0.3886100E+00, 0.4005200E+00, &
     & 0.4257900E+00, 0.4105100E+00, 0.4329600E+00, 0.4768900E+00, &
     & 0.4948000E+00, 0.5326500E+00, 0.5688700E+00, 0.6551000E+00, &
     & 0.7575100E+00, 0.7384200E+00, 0.7206100E+00, 0.7206100E+00 /
      data (ref_adm(23,iz,10,15),iz = 1,20) / &
     & 0.3649600E+00, 0.3649600E+00, 0.3787800E+00, 0.3747000E+00, &
     & 0.3677500E+00, 0.3712500E+00, 0.3755400E+00, 0.3847100E+00, &
     & 0.4067400E+00, 0.4148900E+00, 0.4419100E+00, 0.4584500E+00, &
     & 0.4732200E+00, 0.5169600E+00, 0.5452900E+00, 0.6111500E+00, &
     & 0.6701500E+00, 0.6622400E+00, 0.6959000E+00, 0.6959000E+00 /
      data (ref_adm(23,iz,11,15),iz = 1,20) / &
     & 0.3724600E+00, 0.3724600E+00, 0.3796200E+00, 0.3719800E+00, &
     & 0.3597500E+00, 0.3682700E+00, 0.3763400E+00, 0.3908800E+00, &
     & 0.4003400E+00, 0.3927700E+00, 0.4252200E+00, 0.4370400E+00, &
     & 0.4686200E+00, 0.4875400E+00, 0.5386900E+00, 0.5818300E+00, &
     & 0.6324600E+00, 0.6367200E+00, 0.6356800E+00, 0.6356800E+00 /
      data (ref_adm(23,iz,12,15),iz = 1,20) / &
     & 0.3680600E+00, 0.3680600E+00, 0.3764700E+00, 0.3660200E+00, &
     & 0.3662600E+00, 0.3807500E+00, 0.3836200E+00, 0.3952300E+00, &
     & 0.3924700E+00, 0.4071500E+00, 0.4246300E+00, 0.4412300E+00, &
     & 0.4586000E+00, 0.4839800E+00, 0.5195200E+00, 0.5482600E+00, &
     & 0.5926800E+00, 0.6074300E+00, 0.5792500E+00, 0.5792500E+00 /
      data (ref_adm(23,iz,13,15),iz = 1,20) / &
     & 0.3779900E+00, 0.3779900E+00, 0.3803500E+00, 0.3790100E+00, &
     & 0.3793900E+00, 0.3844400E+00, 0.3900500E+00, 0.3743000E+00, &
     & 0.3863500E+00, 0.4005900E+00, 0.4296500E+00, 0.4365500E+00, &
     & 0.4473200E+00, 0.4691600E+00, 0.5135000E+00, 0.5404900E+00, &
     & 0.5711400E+00, 0.5720200E+00, 0.5516300E+00, 0.5516300E+00 /
      data (ref_adm(23,iz,14,15),iz = 1,20) / &
     & 0.3739900E+00, 0.3739900E+00, 0.3811000E+00, 0.3827700E+00, &
     & 0.3832200E+00, 0.3826500E+00, 0.3825300E+00, 0.3808900E+00, &
     & 0.3879300E+00, 0.3857400E+00, 0.3899000E+00, 0.4009200E+00, &
     & 0.4099000E+00, 0.4230800E+00, 0.4938400E+00, 0.5383300E+00, &
     & 0.5627300E+00, 0.5790400E+00, 0.4251828E+00, 0.4251828E+00 /
      data (ref_adm(23,iz,15,15),iz = 1,20) / &
     & 0.4016300E+00, 0.4016300E+00, 0.3897700E+00, 0.3803000E+00, &
     & 0.3802900E+00, 0.3883900E+00, 0.3935300E+00, 0.4038500E+00, &
     & 0.4090100E+00, 0.4225000E+00, 0.4406100E+00, 0.4513500E+00, &
     & 0.4605300E+00, 0.4690300E+00, 0.4818100E+00, 0.5308900E+00, &
     & 0.5457700E+00, 0.5588100E+00, 0.4099384E+00, 0.4099384E+00 /
      data (ref_adm(23,iz,16,15),iz = 1,20) / &
     & 0.3462800E+00, 0.3462800E+00, 0.3180600E+00, 0.3208400E+00, &
     & 0.3247400E+00, 0.3339300E+00, 0.3351000E+00, 0.3354100E+00, &
     & 0.3371500E+00, 0.3373400E+00, 0.3390200E+00, 0.3460400E+00, &
     & 0.3566400E+00, 0.3763500E+00, 0.4749300E+00, 0.5052100E+00, &
     & 0.5116900E+00, 0.4476060E+00, 0.3970373E+00, 0.3970373E+00 /
      data (ref_adm(23,iz,17,15),iz = 1,20) / &
     & 0.3605800E+00, 0.3605800E+00, 0.3795100E+00, 0.3716200E+00, &
     & 0.3685400E+00, 0.3665000E+00, 0.3748300E+00, 0.3780700E+00, &
     & 0.3985100E+00, 0.4039800E+00, 0.4082900E+00, 0.4195900E+00, &
     & 0.4403300E+00, 0.4391500E+00, 0.4791700E+00, 0.4905900E+00, &
     & 0.4629200E+00, 0.4322389E+00, 0.3865705E+00, 0.3865705E+00 /
      data (ref_adm(23,iz,18,15),iz = 1,20) / &
     & 0.3518000E+00, 0.3518000E+00, 0.3874600E+00, 0.3834000E+00, &
     & 0.3832300E+00, 0.3781400E+00, 0.3846500E+00, 0.3769400E+00, &
     & 0.4009500E+00, 0.4010900E+00, 0.3941600E+00, 0.4075200E+00, &
     & 0.4232800E+00, 0.4413200E+00, 0.4695500E+00, 0.5017000E+00, &
     & 0.4895200E+00, 0.5499112E+00, 0.5741556E+00, 0.5741556E+00 /
      data (ref_adm(23,iz,19,15),iz = 1,20) / &
     & 0.3550300E+00, 0.3550300E+00, 0.3670400E+00, 0.3870900E+00, &
     & 0.3822100E+00, 0.3833900E+00, 0.3837600E+00, 0.3755000E+00, &
     & 0.3938300E+00, 0.4038500E+00, 0.4032200E+00, 0.4055300E+00, &
     & 0.4223700E+00, 0.4479000E+00, 0.4563000E+00, 0.5164000E+00, &
     & 0.5022808E+00, 0.5405211E+00, 0.5620847E+00, 0.5620847E+00 /
      data (ref_adm(23,iz,20,15),iz = 1,20) / &
     & 0.3855600E+00, 0.3855600E+00, 0.3823800E+00, 0.3919500E+00, &
     & 0.3949900E+00, 0.3869700E+00, 0.3721600E+00, 0.3762100E+00, &
     & 0.3920500E+00, 0.3987900E+00, 0.4079100E+00, 0.4219400E+00, &
     & 0.4184600E+00, 0.4399300E+00, 0.4488100E+00, 0.4908300E+00, &
     & 0.4987200E+00, 0.5349346E+00, 0.5554520E+00, 0.5554520E+00 /
      data (ref_adm(23,iz,21,15),iz = 1,20) / &
     & 0.3776200E+00, 0.3776200E+00, 0.3734600E+00, 0.3771500E+00, &
     & 0.3643500E+00, 0.3769600E+00, 0.3726500E+00, 0.3801800E+00, &
     & 0.3905300E+00, 0.3878100E+00, 0.4021200E+00, 0.4308700E+00, &
     & 0.4332500E+00, 0.4389200E+00, 0.4511900E+00, 0.4322900E+00, &
     & 0.4961668E+00, 0.5306633E+00, 0.5520217E+00, 0.5520217E+00 /
      data (ref_adm(23,iz,22,15),iz = 1,20) / &
     & 0.3764600E+00, 0.3764600E+00, 0.3691000E+00, 0.3779200E+00, &
     & 0.3705900E+00, 0.3745400E+00, 0.3686600E+00, 0.3804500E+00, &
     & 0.4029200E+00, 0.4001200E+00, 0.4145300E+00, 0.4323100E+00, &
     & 0.4227300E+00, 0.4390000E+00, 0.4481800E+00, 0.4389800E+00, &
     & 0.4806997E+00, 0.4754739E+00, 0.4637070E+00, 0.4637070E+00 /
      data (ref_adm(23,iz,23,15),iz = 1,20) / &
     & 0.3670000E+00, 0.3670000E+00, 0.3663900E+00, 0.3716700E+00, &
     & 0.3777400E+00, 0.3712100E+00, 0.3808900E+00, 0.3905800E+00, &
     & 0.3970700E+00, 0.3927500E+00, 0.4129300E+00, 0.4249700E+00, &
     & 0.4286900E+00, 0.4496700E+00, 0.4595200E+00, 0.4576200E+00, &
     & 0.4175900E+00, 0.4744768E+00, 0.4686289E+00, 0.4686289E+00 /
      data (ref_adm(23,iz,24,15),iz = 1,20) / &
     & 0.3396000E+00, 0.3396000E+00, 0.3311900E+00, 0.3359200E+00, &
     & 0.3391800E+00, 0.3393900E+00, 0.3447700E+00, 0.3532200E+00, &
     & 0.3617400E+00, 0.3734200E+00, 0.3864900E+00, 0.3973100E+00, &
     & 0.4072500E+00, 0.4186700E+00, 0.4581000E+00, 0.4825700E+00, &
     & 0.4788700E+00, 0.4774464E+00, 0.4769691E+00, 0.4769691E+00 /
      data (ref_adm(23,iz,25,15),iz = 1,20) / &
     & 0.3911500E+00, 0.3911500E+00, 0.4023200E+00, 0.3971400E+00, &
     & 0.3970700E+00, 0.4022900E+00, 0.4100600E+00, 0.4234300E+00, &
     & 0.4335700E+00, 0.4476000E+00, 0.4679300E+00, 0.4809700E+00, &
     & 0.4955400E+00, 0.5105700E+00, 0.5041300E+00, 0.4882000E+00, &
     & 0.5012000E+00, 0.5078600E+00, 0.4880095E+00, 0.4880095E+00 /
      data (ref_adm(23,iz,26,15),iz = 1,20) / &
     & 0.3713700E+00, 0.3713700E+00, 0.3561500E+00, 0.3734300E+00, &
     & 0.3643600E+00, 0.3745600E+00, 0.3760000E+00, 0.3778200E+00, &
     & 0.3827100E+00, 0.3887600E+00, 0.4031600E+00, 0.4168700E+00, &
     & 0.4384600E+00, 0.4657000E+00, 0.4828600E+00, 0.5004100E+00, &
     & 0.5127700E+00, 0.5086400E+00, 0.5027898E+00, 0.5027898E+00 /
      data (ref_adm(23,iz,27,15),iz = 1,20) / &
     & 0.3607200E+00, 0.3607200E+00, 0.3798500E+00, 0.3752000E+00, &
     & 0.3751500E+00, 0.3642000E+00, 0.3843100E+00, 0.4026500E+00, &
     & 0.3993000E+00, 0.4034500E+00, 0.4234000E+00, 0.4418800E+00, &
     & 0.4629000E+00, 0.4840900E+00, 0.4890500E+00, 0.5140000E+00, &
     & 0.5340600E+00, 0.5477000E+00, 0.4733500E+00, 0.4733500E+00 /
      data (ref_adm(23,iz,28,15),iz = 1,20) / &
     & 0.3638800E+00, 0.3638800E+00, 0.3808900E+00, 0.3738600E+00, &
     & 0.3803500E+00, 0.3842200E+00, 0.3854800E+00, 0.3912400E+00, &
     & 0.4100900E+00, 0.4115600E+00, 0.4423100E+00, 0.4578000E+00, &
     & 0.4650900E+00, 0.5021800E+00, 0.4939500E+00, 0.5336900E+00, &
     & 0.5376000E+00, 0.5438400E+00, 0.4663200E+00, 0.4663200E+00 /
      data (ref_adm(23,iz,29,15),iz = 1,20) / &
     & 0.3711200E+00, 0.3711200E+00, 0.3731700E+00, 0.3851000E+00, &
     & 0.3735000E+00, 0.3882100E+00, 0.3861600E+00, 0.3965800E+00, &
     & 0.4120300E+00, 0.4101800E+00, 0.4474900E+00, 0.4581200E+00, &
     & 0.4811300E+00, 0.5019600E+00, 0.5049000E+00, 0.5381700E+00, &
     & 0.5654200E+00, 0.5529900E+00, 0.4849200E+00, 0.4849200E+00 /
      data (ref_adm(23,iz,30,15),iz = 1,20) / &
     & 0.3699700E+00, 0.3699700E+00, 0.3739100E+00, 0.3804000E+00, &
     & 0.3835600E+00, 0.3849700E+00, 0.3902900E+00, 0.4111300E+00, &
     & 0.4100400E+00, 0.4284400E+00, 0.4364100E+00, 0.4704600E+00, &
     & 0.4882600E+00, 0.4947700E+00, 0.5109900E+00, 0.5484300E+00, &
     & 0.5667200E+00, 0.5663100E+00, 0.4983800E+00, 0.4983800E+00 /
      data (ref_adm(23,iz,31,15),iz = 1,20) / &
     & 0.3700200E+00, 0.3700200E+00, 0.3684200E+00, 0.3747500E+00, &
     & 0.3820000E+00, 0.3863900E+00, 0.3864600E+00, 0.3988100E+00, &
     & 0.4222100E+00, 0.4324500E+00, 0.4425500E+00, 0.4738800E+00, &
     & 0.4949600E+00, 0.5210700E+00, 0.5352500E+00, 0.5610400E+00, &
     & 0.5993200E+00, 0.5929500E+00, 0.5056000E+00, 0.5056000E+00 /
      data (ref_adm(23,iz,32,15),iz = 1,20) / &
     & 0.3795700E+00, 0.3795700E+00, 0.3888400E+00, 0.4005300E+00, &
     & 0.4010000E+00, 0.4050000E+00, 0.4195700E+00, 0.4284300E+00, &
     & 0.4422900E+00, 0.4543300E+00, 0.4538300E+00, 0.4867900E+00, &
     & 0.5051700E+00, 0.5310000E+00, 0.5533700E+00, 0.5892300E+00, &
     & 0.6096600E+00, 0.6021700E+00, 0.5209700E+00, 0.5209700E+00 /
      data (ref_adm(23,iz,33,15),iz = 1,20) / &
     & 0.3756800E+00, 0.3756800E+00, 0.3704400E+00, 0.3736300E+00, &
     & 0.3778500E+00, 0.3885800E+00, 0.3897800E+00, 0.4020600E+00, &
     & 0.4157100E+00, 0.4248300E+00, 0.4434500E+00, 0.4644300E+00, &
     & 0.5067300E+00, 0.5194400E+00, 0.5441200E+00, 0.5842400E+00, &
     & 0.6039100E+00, 0.5964200E+00, 0.5369400E+00, 0.5369400E+00 /
      data (ref_adm(23,iz,34,15),iz = 1,20) / &
     & 0.3660300E+00, 0.3660300E+00, 0.3836400E+00, 0.3944400E+00, &
     & 0.3982000E+00, 0.4117800E+00, 0.4041800E+00, 0.4338800E+00, &
     & 0.4459400E+00, 0.4452600E+00, 0.4613400E+00, 0.4704400E+00, &
     & 0.5136400E+00, 0.5483800E+00, 0.5686300E+00, 0.6071800E+00, &
     & 0.6321100E+00, 0.6274000E+00, 0.5458700E+00, 0.5458700E+00 /
      data (ref_adm(23,iz,35,15),iz = 1,20) / &
     & 0.3741300E+00, 0.3741300E+00, 0.3915700E+00, 0.3885800E+00, &
     & 0.3883300E+00, 0.3930300E+00, 0.4131100E+00, 0.4258000E+00, &
     & 0.4391600E+00, 0.4469400E+00, 0.4618800E+00, 0.4785300E+00, &
     & 0.5110200E+00, 0.5453300E+00, 0.5867500E+00, 0.6152800E+00, &
     & 0.6422200E+00, 0.6364500E+00, 0.5664600E+00, 0.5664600E+00 /
      data (ref_adm(23,iz,36,15),iz = 1,20) / &
     & 0.3750600E+00, 0.3750600E+00, 0.3779800E+00, 0.3773000E+00, &
     & 0.3757400E+00, 0.3867600E+00, 0.4024000E+00, 0.4222100E+00, &
     & 0.4362100E+00, 0.4503100E+00, 0.4661100E+00, 0.4867600E+00, &
     & 0.5066200E+00, 0.5595900E+00, 0.5914200E+00, 0.6297500E+00, &
     & 0.6634300E+00, 0.6673300E+00, 0.5763800E+00, 0.5763800E+00 /
      data (ref_adm(23,iz,37,15),iz = 1,20) / &
     & 0.3629800E+00, 0.3629800E+00, 0.3789400E+00, 0.3728500E+00, &
     & 0.3754500E+00, 0.3932200E+00, 0.4035300E+00, 0.4193800E+00, &
     & 0.4410100E+00, 0.4501900E+00, 0.4660400E+00, 0.4829600E+00, &
     & 0.5161100E+00, 0.5568400E+00, 0.6091800E+00, 0.6554900E+00, &
     & 0.6825500E+00, 0.6903200E+00, 0.6006100E+00, 0.6006100E+00 /
      data (ref_adm(23,iz,38,15),iz = 1,20) / &
     & 0.3629800E+00, 0.3629800E+00, 0.3789400E+00, 0.3728500E+00, &
     & 0.3754500E+00, 0.3932200E+00, 0.4035300E+00, 0.4193800E+00, &
     & 0.4410100E+00, 0.4501900E+00, 0.4660400E+00, 0.4829600E+00, &
     & 0.5161100E+00, 0.5568400E+00, 0.6091800E+00, 0.6554900E+00, &
     & 0.6825500E+00, 0.6903200E+00, 0.6006100E+00, 0.6006100E+00 /
! Solar Zenith Angle 75.0 Albedo  0.4491394E+00
      data (ref_adm(23,iz, 1,16),iz = 1,20) / &
     & 0.3502000E+00, 0.3502000E+00, 0.3484600E+00, 0.3495700E+00, &
     & 0.3522300E+00, 0.3588800E+00, 0.3775800E+00, 0.3986200E+00, &
     & 0.4248800E+00, 0.4560000E+00, 0.4963500E+00, 0.5463500E+00, &
     & 0.6196000E+00, 0.6963000E+00, 0.7947307E+00, 0.9011172E+00, &
     & 0.9931699E+00, 0.1030490E+01, 0.7688890E+00, 0.7688890E+00 /
      data (ref_adm(23,iz, 2,16),iz = 1,20) / &
     & 0.3502000E+00, 0.3502000E+00, 0.3484600E+00, 0.3495700E+00, &
     & 0.3522300E+00, 0.3588800E+00, 0.3775800E+00, 0.3986200E+00, &
     & 0.4248800E+00, 0.4560000E+00, 0.4963500E+00, 0.5463500E+00, &
     & 0.6196000E+00, 0.6963000E+00, 0.7947307E+00, 0.9011172E+00, &
     & 0.9931699E+00, 0.1030490E+01, 0.7688890E+00, 0.7688890E+00 /
      data (ref_adm(23,iz, 3,16),iz = 1,20) / &
     & 0.3404000E+00, 0.3404000E+00, 0.3584300E+00, 0.3573700E+00, &
     & 0.3517600E+00, 0.3614000E+00, 0.3723300E+00, 0.3978700E+00, &
     & 0.4178200E+00, 0.4619900E+00, 0.4913500E+00, 0.5466100E+00, &
     & 0.6432300E+00, 0.6924900E+00, 0.7884756E+00, 0.8919929E+00, &
     & 0.9811589E+00, 0.1015997E+01, 0.1426859E+00, 0.1426859E+00 /
      data (ref_adm(23,iz, 4,16),iz = 1,20) / &
     & 0.3372500E+00, 0.3372500E+00, 0.3415700E+00, 0.3482800E+00, &
     & 0.3582100E+00, 0.3660500E+00, 0.3778500E+00, 0.3825100E+00, &
     & 0.4086900E+00, 0.4586000E+00, 0.4699900E+00, 0.5448500E+00, &
     & 0.5699500E+00, 0.6535100E+00, 0.7746857E+00, 0.8724947E+00, &
     & 0.9552610E+00, 0.9864896E+00, 0.7380977E+00, 0.7380977E+00 /
      data (ref_adm(23,iz, 5,16),iz = 1,20) / &
     & 0.3356400E+00, 0.3356400E+00, 0.3353100E+00, 0.3437500E+00, &
     & 0.3611200E+00, 0.3701300E+00, 0.3613900E+00, 0.3851200E+00, &
     & 0.4019400E+00, 0.4403600E+00, 0.4479100E+00, 0.5196200E+00, &
     & 0.5305400E+00, 0.5896600E+00, 0.7554924E+00, 0.8455731E+00, &
     & 0.9196267E+00, 0.9463387E+00, 0.7104748E+00, 0.7104748E+00 /
      data (ref_adm(23,iz, 6,16),iz = 1,20) / &
     & 0.3440400E+00, 0.3440400E+00, 0.3478100E+00, 0.3554600E+00, &
     & 0.3624700E+00, 0.3711700E+00, 0.3856600E+00, 0.3989300E+00, &
     & 0.4214300E+00, 0.4453400E+00, 0.4641200E+00, 0.5091600E+00, &
     & 0.5567200E+00, 0.6304300E+00, 0.7242500E+00, 0.8500900E+00, &
     & 0.1041000E+01, 0.1163800E+01, 0.6787101E+00, 0.6787101E+00 /
      data (ref_adm(23,iz, 7,16),iz = 1,20) / &
     & 0.3656900E+00, 0.3656900E+00, 0.3720000E+00, 0.3792200E+00, &
     & 0.3892200E+00, 0.4042300E+00, 0.4094200E+00, 0.4264400E+00, &
     & 0.4347500E+00, 0.4513800E+00, 0.4808700E+00, 0.5098000E+00, &
     & 0.5586200E+00, 0.6402100E+00, 0.7290800E+00, 0.8423800E+00, &
     & 0.9766000E+00, 0.1080100E+01, 0.1105600E+01, 0.1105600E+01 /
      data (ref_adm(23,iz, 8,16),iz = 1,20) / &
     & 0.3577900E+00, 0.3577900E+00, 0.3576300E+00, 0.3577200E+00, &
     & 0.3716400E+00, 0.3754900E+00, 0.3872100E+00, 0.3945800E+00, &
     & 0.4051400E+00, 0.4234400E+00, 0.4467000E+00, 0.4776600E+00, &
     & 0.5399600E+00, 0.5927900E+00, 0.6648700E+00, 0.7560300E+00, &
     & 0.9033800E+00, 0.9695900E+00, 0.9567100E+00, 0.9567100E+00 /
      data (ref_adm(23,iz, 9,16),iz = 1,20) / &
     & 0.3542400E+00, 0.3542400E+00, 0.3557900E+00, 0.3657000E+00, &
     & 0.3693800E+00, 0.3621000E+00, 0.3831000E+00, 0.3941800E+00, &
     & 0.4065700E+00, 0.4290500E+00, 0.4427200E+00, 0.4826800E+00, &
     & 0.5166400E+00, 0.5496100E+00, 0.6391300E+00, 0.7257500E+00, &
     & 0.8401500E+00, 0.9002600E+00, 0.8982600E+00, 0.8982600E+00 /
      data (ref_adm(23,iz,10,16),iz = 1,20) / &
     & 0.3590100E+00, 0.3590100E+00, 0.3542400E+00, 0.3474200E+00, &
     & 0.3632400E+00, 0.3765200E+00, 0.3902700E+00, 0.3857600E+00, &
     & 0.4014100E+00, 0.4137500E+00, 0.4254300E+00, 0.4648500E+00, &
     & 0.4876200E+00, 0.5320000E+00, 0.6075300E+00, 0.6856400E+00, &
     & 0.7815600E+00, 0.8089700E+00, 0.7845900E+00, 0.7845900E+00 /
      data (ref_adm(23,iz,11,16),iz = 1,20) / &
     & 0.3472500E+00, 0.3472500E+00, 0.3505700E+00, 0.3539500E+00, &
     & 0.3619500E+00, 0.3782800E+00, 0.3758500E+00, 0.3746300E+00, &
     & 0.3693200E+00, 0.3988600E+00, 0.4087000E+00, 0.4510900E+00, &
     & 0.4681500E+00, 0.5091400E+00, 0.5738300E+00, 0.6531000E+00, &
     & 0.7026700E+00, 0.7202600E+00, 0.7211100E+00, 0.7211100E+00 /
      data (ref_adm(23,iz,12,16),iz = 1,20) / &
     & 0.3496800E+00, 0.3496800E+00, 0.3484000E+00, 0.3499100E+00, &
     & 0.3577300E+00, 0.3582700E+00, 0.3714600E+00, 0.3672600E+00, &
     & 0.3827900E+00, 0.3821500E+00, 0.4053700E+00, 0.4359000E+00, &
     & 0.4543500E+00, 0.4901700E+00, 0.5529300E+00, 0.5970900E+00, &
     & 0.6437900E+00, 0.6685000E+00, 0.6762800E+00, 0.6762800E+00 /
      data (ref_adm(23,iz,13,16),iz = 1,20) / &
     & 0.3496900E+00, 0.3496900E+00, 0.3492000E+00, 0.3485800E+00, &
     & 0.3492600E+00, 0.3561000E+00, 0.3537000E+00, 0.3656500E+00, &
     & 0.3732100E+00, 0.3805900E+00, 0.4126900E+00, 0.4343500E+00, &
     & 0.4471400E+00, 0.4683400E+00, 0.5225400E+00, 0.5883000E+00, &
     & 0.6015200E+00, 0.6436700E+00, 0.6062300E+00, 0.6062300E+00 /
      data (ref_adm(23,iz,14,16),iz = 1,20) / &
     & 0.3791900E+00, 0.3791900E+00, 0.3843900E+00, 0.3850100E+00, &
     & 0.3838900E+00, 0.3896200E+00, 0.3874700E+00, 0.3898400E+00, &
     & 0.3991000E+00, 0.4095500E+00, 0.4229000E+00, 0.4358100E+00, &
     & 0.4447200E+00, 0.4533100E+00, 0.4949900E+00, 0.5359200E+00, &
     & 0.5922900E+00, 0.6284900E+00, 0.5571100E+00, 0.5571100E+00 /
      data (ref_adm(23,iz,15,16),iz = 1,20) / &
     & 0.3595000E+00, 0.3595000E+00, 0.3363100E+00, 0.3348200E+00, &
     & 0.3370900E+00, 0.3439400E+00, 0.3488100E+00, 0.3530500E+00, &
     & 0.3610700E+00, 0.3702500E+00, 0.3844200E+00, 0.4021500E+00, &
     & 0.4288500E+00, 0.4502700E+00, 0.4849300E+00, 0.5206600E+00, &
     & 0.5722100E+00, 0.6109200E+00, 0.4216446E+00, 0.4216446E+00 /
      data (ref_adm(23,iz,16,16),iz = 1,20) / &
     & 0.3294500E+00, 0.3294500E+00, 0.3225700E+00, 0.3251000E+00, &
     & 0.3296700E+00, 0.3340800E+00, 0.3326400E+00, 0.3367900E+00, &
     & 0.3490000E+00, 0.3491100E+00, 0.3632600E+00, 0.3700200E+00, &
     & 0.3798800E+00, 0.3909200E+00, 0.4819000E+00, 0.5085800E+00, &
     & 0.5457400E+00, 0.4627851E+00, 0.4073208E+00, 0.4073208E+00 /
      data (ref_adm(23,iz,17,16),iz = 1,20) / &
     & 0.3437200E+00, 0.3437200E+00, 0.3475000E+00, 0.3596300E+00, &
     & 0.3554200E+00, 0.3529900E+00, 0.3492800E+00, 0.3521100E+00, &
     & 0.3539900E+00, 0.3711200E+00, 0.3941700E+00, 0.3957100E+00, &
     & 0.4121700E+00, 0.4258600E+00, 0.4649600E+00, 0.4852600E+00, &
     & 0.5361500E+00, 0.4441260E+00, 0.3957347E+00, 0.3957347E+00 /
      data (ref_adm(23,iz,18,16),iz = 1,20) / &
     & 0.3361800E+00, 0.3361800E+00, 0.3540200E+00, 0.3508000E+00, &
     & 0.3519700E+00, 0.3411400E+00, 0.3420400E+00, 0.3620100E+00, &
     & 0.3510700E+00, 0.3817700E+00, 0.3964600E+00, 0.3945000E+00, &
     & 0.4091700E+00, 0.4324700E+00, 0.4669500E+00, 0.5050200E+00, &
     & 0.5217884E+00, 0.5523272E+00, 0.5472073E+00, 0.5472073E+00 /
      data (ref_adm(23,iz,19,16),iz = 1,20) / &
     & 0.3333000E+00, 0.3333000E+00, 0.3505500E+00, 0.3394500E+00, &
     & 0.3436000E+00, 0.3468000E+00, 0.3477500E+00, 0.3691800E+00, &
     & 0.3699900E+00, 0.3806800E+00, 0.3776300E+00, 0.3958300E+00, &
     & 0.3993400E+00, 0.4404100E+00, 0.4593700E+00, 0.5011000E+00, &
     & 0.5124192E+00, 0.5403775E+00, 0.5353497E+00, 0.5353497E+00 /
      data (ref_adm(23,iz,20,16),iz = 1,20) / &
     & 0.3399300E+00, 0.3399300E+00, 0.3521200E+00, 0.3606300E+00, &
     & 0.3399200E+00, 0.3583600E+00, 0.3647100E+00, 0.3632600E+00, &
     & 0.3660600E+00, 0.3769800E+00, 0.3749700E+00, 0.3911900E+00, &
     & 0.4087500E+00, 0.4219400E+00, 0.4478400E+00, 0.4799292E+00, &
     & 0.5052243E+00, 0.5321977E+00, 0.5285051E+00, 0.5285051E+00 /
      data (ref_adm(23,iz,21,16),iz = 1,20) / &
     & 0.3446700E+00, 0.3446700E+00, 0.3511900E+00, 0.3593700E+00, &
     & 0.3533900E+00, 0.3678500E+00, 0.3545800E+00, 0.3513800E+00, &
     & 0.3436000E+00, 0.3624800E+00, 0.3682000E+00, 0.3838300E+00, &
     & 0.4176200E+00, 0.4305500E+00, 0.4343100E+00, 0.4640200E+00, &
     & 0.4988454E+00, 0.5251133E+00, 0.5243930E+00, 0.5243930E+00 /
      data (ref_adm(23,iz,22,16),iz = 1,20) / &
     & 0.3541900E+00, 0.3541900E+00, 0.3491400E+00, 0.3615500E+00, &
     & 0.3523400E+00, 0.3582900E+00, 0.3580000E+00, 0.3513200E+00, &
     & 0.3648400E+00, 0.3685500E+00, 0.3690300E+00, 0.3889500E+00, &
     & 0.4171000E+00, 0.4294100E+00, 0.4442600E+00, 0.4618400E+00, &
     & 0.5086103E+00, 0.5190414E+00, 0.5338543E+00, 0.5338543E+00 /
      data (ref_adm(23,iz,23,16),iz = 1,20) / &
     & 0.3431800E+00, 0.3431800E+00, 0.3487200E+00, 0.3426800E+00, &
     & 0.3348600E+00, 0.3481200E+00, 0.3549000E+00, 0.3660200E+00, &
     & 0.3668200E+00, 0.3683200E+00, 0.3743000E+00, 0.3895400E+00, &
     & 0.4250400E+00, 0.4346500E+00, 0.4452700E+00, 0.4514800E+00, &
     & 0.4162600E+00, 0.5180019E+00, 0.5404499E+00, 0.5404499E+00 /
      data (ref_adm(23,iz,24,16),iz = 1,20) / &
     & 0.3351300E+00, 0.3351300E+00, 0.3268700E+00, 0.3268800E+00, &
     & 0.3248500E+00, 0.3308800E+00, 0.3365300E+00, 0.3441500E+00, &
     & 0.3515300E+00, 0.3615800E+00, 0.3700800E+00, 0.3842800E+00, &
     & 0.3985600E+00, 0.4240000E+00, 0.4512300E+00, 0.4790200E+00, &
     & 0.4995700E+00, 0.5217887E+00, 0.5515746E+00, 0.5515746E+00 /
      data (ref_adm(23,iz,25,16),iz = 1,20) / &
     & 0.3524900E+00, 0.3524900E+00, 0.3663500E+00, 0.3672000E+00, &
     & 0.3674900E+00, 0.3695600E+00, 0.3745800E+00, 0.3815400E+00, &
     & 0.3895000E+00, 0.3959000E+00, 0.4136300E+00, 0.4323000E+00, &
     & 0.4567300E+00, 0.4882000E+00, 0.4958000E+00, 0.5007000E+00, &
     & 0.5363300E+00, 0.5251800E+00, 0.5663856E+00, 0.5663856E+00 /
      data (ref_adm(23,iz,26,16),iz = 1,20) / &
     & 0.3616900E+00, 0.3616900E+00, 0.3652100E+00, 0.3700500E+00, &
     & 0.3593700E+00, 0.3692400E+00, 0.3693100E+00, 0.3793500E+00, &
     & 0.3920500E+00, 0.3978100E+00, 0.3901500E+00, 0.4019700E+00, &
     & 0.4163600E+00, 0.4505300E+00, 0.4713500E+00, 0.5133000E+00, &
     & 0.5526500E+00, 0.5686000E+00, 0.5860682E+00, 0.5860682E+00 /
      data (ref_adm(23,iz,27,16),iz = 1,20) / &
     & 0.3486400E+00, 0.3486400E+00, 0.3569900E+00, 0.3518200E+00, &
     & 0.3524900E+00, 0.3662300E+00, 0.3705100E+00, 0.3731700E+00, &
     & 0.3935100E+00, 0.4062800E+00, 0.4106300E+00, 0.4206000E+00, &
     & 0.4430500E+00, 0.4781800E+00, 0.5088800E+00, 0.5313500E+00, &
     & 0.5595700E+00, 0.5837300E+00, 0.5295800E+00, 0.5295800E+00 /
      data (ref_adm(23,iz,28,16),iz = 1,20) / &
     & 0.3412800E+00, 0.3412800E+00, 0.3642700E+00, 0.3606900E+00, &
     & 0.3646300E+00, 0.3828500E+00, 0.3858800E+00, 0.3905900E+00, &
     & 0.3907500E+00, 0.4159500E+00, 0.4182700E+00, 0.4216300E+00, &
     & 0.4445500E+00, 0.4801300E+00, 0.5300200E+00, 0.5447500E+00, &
     & 0.5912700E+00, 0.5918000E+00, 0.5431800E+00, 0.5431800E+00 /
      data (ref_adm(23,iz,29,16),iz = 1,20) / &
     & 0.3583500E+00, 0.3583500E+00, 0.3528200E+00, 0.3515300E+00, &
     & 0.3657100E+00, 0.3629800E+00, 0.3702400E+00, 0.3894000E+00, &
     & 0.3976800E+00, 0.4234100E+00, 0.4304200E+00, 0.4366600E+00, &
     & 0.4688500E+00, 0.4903900E+00, 0.5343000E+00, 0.5846100E+00, &
     & 0.6240500E+00, 0.6412300E+00, 0.5731500E+00, 0.5731500E+00 /
      data (ref_adm(23,iz,30,16),iz = 1,20) / &
     & 0.3566900E+00, 0.3566900E+00, 0.3486400E+00, 0.3558000E+00, &
     & 0.3624200E+00, 0.3666400E+00, 0.3717500E+00, 0.3942800E+00, &
     & 0.4103600E+00, 0.4193700E+00, 0.4429400E+00, 0.4584000E+00, &
     & 0.4785800E+00, 0.5128200E+00, 0.5465700E+00, 0.5901400E+00, &
     & 0.6460900E+00, 0.6586600E+00, 0.5841900E+00, 0.5841900E+00 /
      data (ref_adm(23,iz,31,16),iz = 1,20) / &
     & 0.3516600E+00, 0.3516600E+00, 0.3539100E+00, 0.3409900E+00, &
     & 0.3491500E+00, 0.3603500E+00, 0.3767900E+00, 0.3865300E+00, &
     & 0.4122800E+00, 0.4277900E+00, 0.4495100E+00, 0.4646000E+00, &
     & 0.4913300E+00, 0.5312200E+00, 0.5533400E+00, 0.6059100E+00, &
     & 0.6456400E+00, 0.6766100E+00, 0.6158100E+00, 0.6158100E+00 /
      data (ref_adm(23,iz,32,16),iz = 1,20) / &
     & 0.3636400E+00, 0.3636400E+00, 0.3526500E+00, 0.3686100E+00, &
     & 0.3743800E+00, 0.3780800E+00, 0.4005800E+00, 0.4094200E+00, &
     & 0.4258900E+00, 0.4348700E+00, 0.4565600E+00, 0.4768900E+00, &
     & 0.4932800E+00, 0.5315200E+00, 0.5789000E+00, 0.6350000E+00, &
     & 0.6752500E+00, 0.6988800E+00, 0.6191000E+00, 0.6191000E+00 /
      data (ref_adm(23,iz,33,16),iz = 1,20) / &
     & 0.3477000E+00, 0.3477000E+00, 0.3403100E+00, 0.3504500E+00, &
     & 0.3597000E+00, 0.3674400E+00, 0.3785100E+00, 0.3914400E+00, &
     & 0.4076300E+00, 0.4230800E+00, 0.4475200E+00, 0.4638100E+00, &
     & 0.4868100E+00, 0.5343000E+00, 0.5771200E+00, 0.6206000E+00, &
     & 0.6697000E+00, 0.7089500E+00, 0.6427300E+00, 0.6427300E+00 /
      data (ref_adm(23,iz,34,16),iz = 1,20) / &
     & 0.3465700E+00, 0.3465700E+00, 0.3578000E+00, 0.3582500E+00, &
     & 0.3636800E+00, 0.3693600E+00, 0.3782300E+00, 0.3887100E+00, &
     & 0.4108100E+00, 0.4286200E+00, 0.4474000E+00, 0.4675100E+00, &
     & 0.4970600E+00, 0.5453700E+00, 0.5916400E+00, 0.6329900E+00, &
     & 0.6844600E+00, 0.7262800E+00, 0.6526400E+00, 0.6526400E+00 /
      data (ref_adm(23,iz,35,16),iz = 1,20) / &
     & 0.3423100E+00, 0.3423100E+00, 0.3458000E+00, 0.3626900E+00, &
     & 0.3621100E+00, 0.3663700E+00, 0.3799900E+00, 0.3890600E+00, &
     & 0.4109700E+00, 0.4298800E+00, 0.4488400E+00, 0.4730500E+00, &
     & 0.4961000E+00, 0.5364400E+00, 0.6012000E+00, 0.6531900E+00, &
     & 0.7177000E+00, 0.7501600E+00, 0.6761800E+00, 0.6761800E+00 /
      data (ref_adm(23,iz,36,16),iz = 1,20) / &
     & 0.3431800E+00, 0.3431800E+00, 0.3509600E+00, 0.3513100E+00, &
     & 0.3697400E+00, 0.3664200E+00, 0.3773400E+00, 0.3888800E+00, &
     & 0.4093800E+00, 0.4324800E+00, 0.4477600E+00, 0.4723100E+00, &
     & 0.5042700E+00, 0.5533600E+00, 0.5989200E+00, 0.6662200E+00, &
     & 0.7337000E+00, 0.7812800E+00, 0.7060900E+00, 0.7060900E+00 /
      data (ref_adm(23,iz,37,16),iz = 1,20) / &
     & 0.3477900E+00, 0.3477900E+00, 0.3438900E+00, 0.3540700E+00, &
     & 0.3682000E+00, 0.3761300E+00, 0.3811800E+00, 0.3911200E+00, &
     & 0.3997900E+00, 0.4240000E+00, 0.4640700E+00, 0.4879500E+00, &
     & 0.5071300E+00, 0.5579500E+00, 0.6154500E+00, 0.6912000E+00, &
     & 0.7777000E+00, 0.8078300E+00, 0.7188200E+00, 0.7188200E+00 /
      data (ref_adm(23,iz,38,16),iz = 1,20) / &
     & 0.3477900E+00, 0.3477900E+00, 0.3438900E+00, 0.3540700E+00, &
     & 0.3682000E+00, 0.3761300E+00, 0.3811800E+00, 0.3911200E+00, &
     & 0.3997900E+00, 0.4240000E+00, 0.4640700E+00, 0.4879500E+00, &
     & 0.5071300E+00, 0.5579500E+00, 0.6154500E+00, 0.6912000E+00, &
     & 0.7777000E+00, 0.8078300E+00, 0.7188200E+00, 0.7188200E+00 /
! Solar Zenith Angle 80.0 Albedo  0.4592244E+00
      data (ref_adm(23,iz, 1,17),iz = 1,20) / &
     & 0.3423300E+00, 0.3423300E+00, 0.3549500E+00, 0.3523000E+00, &
     & 0.3565700E+00, 0.3569200E+00, 0.3733500E+00, 0.3900500E+00, &
     & 0.4179500E+00, 0.4633500E+00, 0.4966600E+00, 0.5475500E+00, &
     & 0.6631501E+00, 0.7296385E+00, 0.8197735E+00, 0.9295125E+00, &
     & 0.1024465E+01, 0.1062962E+01, 0.7931172E+00, 0.7931172E+00 /
      data (ref_adm(23,iz, 2,17),iz = 1,20) / &
     & 0.3423300E+00, 0.3423300E+00, 0.3549500E+00, 0.3523000E+00, &
     & 0.3565700E+00, 0.3569200E+00, 0.3733500E+00, 0.3900500E+00, &
     & 0.4179500E+00, 0.4633500E+00, 0.4966600E+00, 0.5475500E+00, &
     & 0.6631501E+00, 0.7296385E+00, 0.8197735E+00, 0.9295125E+00, &
     & 0.1024465E+01, 0.1062962E+01, 0.7931172E+00, 0.7931172E+00 /
      data (ref_adm(23,iz, 3,17),iz = 1,20) / &
     & 0.3413300E+00, 0.3413300E+00, 0.3496500E+00, 0.3518300E+00, &
     & 0.3660100E+00, 0.3625000E+00, 0.3679200E+00, 0.4014500E+00, &
     & 0.4217800E+00, 0.4495300E+00, 0.4932800E+00, 0.5497500E+00, &
     & 0.6596277E+00, 0.7248461E+00, 0.8133217E+00, 0.9201005E+00, &
     & 0.1012076E+01, 0.1048011E+01, 0.1471820E+00, 0.1471820E+00 /
      data (ref_adm(23,iz, 4,17),iz = 1,20) / &
     & 0.3382000E+00, 0.3382000E+00, 0.3481900E+00, 0.3492700E+00, &
     & 0.3585300E+00, 0.3658700E+00, 0.3712100E+00, 0.3974100E+00, &
     & 0.4208500E+00, 0.4436800E+00, 0.4923600E+00, 0.5551100E+00, &
     & 0.6519734E+00, 0.7147726E+00, 0.7990971E+00, 0.8999885E+00, &
     & 0.9853612E+00, 0.1017575E+01, 0.7613561E+00, 0.7613561E+00 /
      data (ref_adm(23,iz, 5,17),iz = 1,20) / &
     & 0.3444200E+00, 0.3444200E+00, 0.3448900E+00, 0.3483000E+00, &
     & 0.3552100E+00, 0.3682000E+00, 0.3847800E+00, 0.4014800E+00, &
     & 0.4151100E+00, 0.4529900E+00, 0.4796800E+00, 0.5379600E+00, &
     & 0.6411424E+00, 0.7003912E+00, 0.7792987E+00, 0.8722179E+00, &
     & 0.9486049E+00, 0.9761590E+00, 0.7328624E+00, 0.7328624E+00 /
      data (ref_adm(23,iz, 6,17),iz = 1,20) / &
     & 0.3308300E+00, 0.3308300E+00, 0.3293800E+00, 0.3353100E+00, &
     & 0.3441700E+00, 0.3531200E+00, 0.3672500E+00, 0.3857400E+00, &
     & 0.4074300E+00, 0.4343800E+00, 0.4692200E+00, 0.5270400E+00, &
     & 0.6013300E+00, 0.7063000E+00, 0.8422900E+00, 0.1008800E+01, &
     & 0.1256500E+01, 0.1604100E+01, 0.7000974E+00, 0.7000974E+00 /
      data (ref_adm(23,iz, 7,17),iz = 1,20) / &
     & 0.3439700E+00, 0.3439700E+00, 0.3536100E+00, 0.3480200E+00, &
     & 0.3573300E+00, 0.3650400E+00, 0.3787600E+00, 0.3889900E+00, &
     & 0.4046500E+00, 0.4347500E+00, 0.4740100E+00, 0.5151400E+00, &
     & 0.5995300E+00, 0.7098900E+00, 0.8371600E+00, 0.1036700E+01, &
     & 0.1299400E+01, 0.1445000E+01, 0.1355400E+01, 0.1355400E+01 /
      data (ref_adm(23,iz, 8,17),iz = 1,20) / &
     & 0.3461500E+00, 0.3461500E+00, 0.3445300E+00, 0.3417900E+00, &
     & 0.3545700E+00, 0.3497700E+00, 0.3682700E+00, 0.3670700E+00, &
     & 0.3930400E+00, 0.4235600E+00, 0.4557800E+00, 0.4996200E+00, &
     & 0.5896500E+00, 0.6782800E+00, 0.7596900E+00, 0.9480700E+00, &
     & 0.1162100E+01, 0.1248700E+01, 0.1164900E+01, 0.1164900E+01 /
      data (ref_adm(23,iz, 9,17),iz = 1,20) / &
     & 0.3372600E+00, 0.3372600E+00, 0.3282800E+00, 0.3376600E+00, &
     & 0.3413700E+00, 0.3525300E+00, 0.3563600E+00, 0.3709200E+00, &
     & 0.3963200E+00, 0.4203400E+00, 0.4391100E+00, 0.4805500E+00, &
     & 0.5579400E+00, 0.6200800E+00, 0.7156000E+00, 0.8570000E+00, &
     & 0.1027200E+01, 0.1107900E+01, 0.1024800E+01, 0.1024800E+01 /
      data (ref_adm(23,iz,10,17),iz = 1,20) / &
     & 0.3338500E+00, 0.3338500E+00, 0.3326900E+00, 0.3348000E+00, &
     & 0.3375800E+00, 0.3482700E+00, 0.3603800E+00, 0.3729600E+00, &
     & 0.3908100E+00, 0.4113200E+00, 0.4264600E+00, 0.4628100E+00, &
     & 0.5236900E+00, 0.5945000E+00, 0.6641300E+00, 0.7866900E+00, &
     & 0.9175600E+00, 0.9625400E+00, 0.9266200E+00, 0.9266200E+00 /
      data (ref_adm(23,iz,11,17),iz = 1,20) / &
     & 0.3456000E+00, 0.3456000E+00, 0.3355100E+00, 0.3377900E+00, &
     & 0.3324200E+00, 0.3418000E+00, 0.3606600E+00, 0.3640700E+00, &
     & 0.3793600E+00, 0.3890100E+00, 0.4118000E+00, 0.4501500E+00, &
     & 0.5117800E+00, 0.5745600E+00, 0.6221200E+00, 0.6916000E+00, &
     & 0.8285500E+00, 0.8718400E+00, 0.8684600E+00, 0.8684600E+00 /
      data (ref_adm(23,iz,12,17),iz = 1,20) / &
     & 0.3396500E+00, 0.3396500E+00, 0.3350000E+00, 0.3251900E+00, &
     & 0.3330600E+00, 0.3440400E+00, 0.3637100E+00, 0.3691300E+00, &
     & 0.3689900E+00, 0.3836100E+00, 0.4142100E+00, 0.4397000E+00, &
     & 0.4772000E+00, 0.5316300E+00, 0.5703700E+00, 0.6475800E+00, &
     & 0.7594600E+00, 0.8324600E+00, 0.8122500E+00, 0.8122500E+00 /
      data (ref_adm(23,iz,13,17),iz = 1,20) / &
     & 0.3319400E+00, 0.3319400E+00, 0.3265500E+00, 0.3338900E+00, &
     & 0.3432000E+00, 0.3564700E+00, 0.3577100E+00, 0.3621500E+00, &
     & 0.3643200E+00, 0.3794100E+00, 0.3914800E+00, 0.4263000E+00, &
     & 0.4631800E+00, 0.5012700E+00, 0.5354100E+00, 0.6014000E+00, &
     & 0.6939500E+00, 0.7452200E+00, 0.7351600E+00, 0.7351600E+00 /
      data (ref_adm(23,iz,14,17),iz = 1,20) / &
     & 0.3755700E+00, 0.3755700E+00, 0.3770300E+00, 0.3753500E+00, &
     & 0.3800100E+00, 0.3820800E+00, 0.3830000E+00, 0.3898900E+00, &
     & 0.3952100E+00, 0.4046500E+00, 0.4220200E+00, 0.4413900E+00, &
     & 0.4586500E+00, 0.4852300E+00, 0.5159000E+00, 0.5843600E+00, &
     & 0.6525400E+00, 0.7397800E+00, 0.4526305E+00, 0.4526305E+00 /
      data (ref_adm(23,iz,15,17),iz = 1,20) / &
     & 0.3409200E+00, 0.3409200E+00, 0.3066100E+00, 0.3123800E+00, &
     & 0.3142400E+00, 0.3155700E+00, 0.3207200E+00, 0.3234100E+00, &
     & 0.3296000E+00, 0.3407200E+00, 0.3508700E+00, 0.3664400E+00, &
     & 0.3870600E+00, 0.4161100E+00, 0.4932900E+00, 0.5511800E+00, &
     & 0.6018200E+00, 0.6833700E+00, 0.4349309E+00, 0.4349309E+00 /
      data (ref_adm(23,iz,16,17),iz = 1,20) / &
     & 0.3242300E+00, 0.3242300E+00, 0.3373200E+00, 0.3415100E+00, &
     & 0.3466400E+00, 0.3490800E+00, 0.3562400E+00, 0.3574200E+00, &
     & 0.3596700E+00, 0.3695900E+00, 0.3838100E+00, 0.3925400E+00, &
     & 0.4062400E+00, 0.4184600E+00, 0.4885800E+00, 0.5283600E+00, &
     & 0.6005500E+00, 0.4773680E+00, 0.4201559E+00, 0.4201559E+00 /
      data (ref_adm(23,iz,17,17),iz = 1,20) / &
     & 0.3284500E+00, 0.3284500E+00, 0.3339400E+00, 0.3430000E+00, &
     & 0.3467800E+00, 0.3424400E+00, 0.3499900E+00, 0.3466400E+00, &
     & 0.3592200E+00, 0.3654300E+00, 0.3824300E+00, 0.3924900E+00, &
     & 0.4227700E+00, 0.4329500E+00, 0.4656100E+00, 0.4916000E+00, &
     & 0.6303500E+00, 0.4581209E+00, 0.4082048E+00, 0.4082048E+00 /
      data (ref_adm(23,iz,18,17),iz = 1,20) / &
     & 0.3233200E+00, 0.3233200E+00, 0.3295100E+00, 0.3444200E+00, &
     & 0.3435800E+00, 0.3401500E+00, 0.3426200E+00, 0.3537100E+00, &
     & 0.3641200E+00, 0.3754000E+00, 0.3893000E+00, 0.3950600E+00, &
     & 0.4200500E+00, 0.4242400E+00, 0.4575900E+00, 0.5013200E+00, &
     & 0.5608953E+00, 0.6508403E+00, 0.7732549E+00, 0.7732549E+00 /
      data (ref_adm(23,iz,19,17),iz = 1,20) / &
     & 0.3294000E+00, 0.3294000E+00, 0.3412200E+00, 0.3381600E+00, &
     & 0.3399100E+00, 0.3444000E+00, 0.3494500E+00, 0.3556300E+00, &
     & 0.3568800E+00, 0.3764200E+00, 0.3803300E+00, 0.3945800E+00, &
     & 0.4019000E+00, 0.4240900E+00, 0.4515300E+00, 0.4906400E+00, &
     & 0.5513846E+00, 0.6363443E+00, 0.7541247E+00, 0.7541247E+00 /
      data (ref_adm(23,iz,20,17),iz = 1,20) / &
     & 0.3409700E+00, 0.3409700E+00, 0.3432400E+00, 0.3537400E+00, &
     & 0.3410100E+00, 0.3469700E+00, 0.3470200E+00, 0.3525800E+00, &
     & 0.3612600E+00, 0.3680500E+00, 0.3851400E+00, 0.3995700E+00, &
     & 0.4037600E+00, 0.4360400E+00, 0.4613800E+00, 0.4964018E+00, &
     & 0.5455663E+00, 0.6270738E+00, 0.7434834E+00, 0.7434834E+00 /
      data (ref_adm(23,iz,21,17),iz = 1,20) / &
     & 0.3385500E+00, 0.3385500E+00, 0.3460100E+00, 0.3490900E+00, &
     & 0.3430000E+00, 0.3543000E+00, 0.3500100E+00, 0.3541700E+00, &
     & 0.3522300E+00, 0.3657200E+00, 0.3733700E+00, 0.3874400E+00, &
     & 0.4067200E+00, 0.4323400E+00, 0.4512800E+00, 0.4861400E+00, &
     & 0.5413024E+00, 0.6206370E+00, 0.7382972E+00, 0.7382972E+00 /
      data (ref_adm(23,iz,22,17),iz = 1,20) / &
     & 0.3490000E+00, 0.3490000E+00, 0.3380600E+00, 0.3370100E+00, &
     & 0.3396000E+00, 0.3523300E+00, 0.3503700E+00, 0.3425100E+00, &
     & 0.3548800E+00, 0.3643500E+00, 0.3766600E+00, 0.3953900E+00, &
     & 0.4190100E+00, 0.4341200E+00, 0.4569100E+00, 0.5046200E+00, &
     & 0.5491477E+00, 0.5813350E+00, 0.6426194E+00, 0.6426194E+00 /
      data (ref_adm(23,iz,23,17),iz = 1,20) / &
     & 0.3223700E+00, 0.3223700E+00, 0.3298600E+00, 0.3471300E+00, &
     & 0.3493400E+00, 0.3394500E+00, 0.3444300E+00, 0.3451200E+00, &
     & 0.3608100E+00, 0.3662400E+00, 0.3859900E+00, 0.3983500E+00, &
     & 0.4230900E+00, 0.4408500E+00, 0.4567200E+00, 0.5042200E+00, &
     & 0.5579800E+00, 0.5804793E+00, 0.6518646E+00, 0.6518646E+00 /
      data (ref_adm(23,iz,24,17),iz = 1,20) / &
     & 0.3317100E+00, 0.3317100E+00, 0.3225500E+00, 0.3211300E+00, &
     & 0.3250800E+00, 0.3297500E+00, 0.3320800E+00, 0.3399000E+00, &
     & 0.3470200E+00, 0.3585800E+00, 0.3721300E+00, 0.3838400E+00, &
     & 0.4102400E+00, 0.4322800E+00, 0.4642400E+00, 0.5170400E+00, &
     & 0.5804600E+00, 0.5858217E+00, 0.6673029E+00, 0.6673029E+00 /
      data (ref_adm(23,iz,25,17),iz = 1,20) / &
     & 0.3341700E+00, 0.3341700E+00, 0.3527600E+00, 0.3604300E+00, &
     & 0.3634900E+00, 0.3661800E+00, 0.3733100E+00, 0.3777500E+00, &
     & 0.3850300E+00, 0.3961300E+00, 0.4085100E+00, 0.4199300E+00, &
     & 0.4391000E+00, 0.4648200E+00, 0.4871500E+00, 0.5284800E+00, &
     & 0.5865000E+00, 0.7064500E+00, 0.6878229E+00, 0.6878229E+00 /
      data (ref_adm(23,iz,26,17),iz = 1,20) / &
     & 0.3460000E+00, 0.3460000E+00, 0.3345200E+00, 0.3410700E+00, &
     & 0.3480100E+00, 0.3564800E+00, 0.3598700E+00, 0.3609400E+00, &
     & 0.3591100E+00, 0.3830800E+00, 0.4000900E+00, 0.4153000E+00, &
     & 0.4412100E+00, 0.4695100E+00, 0.5015900E+00, 0.5310600E+00, &
     & 0.6059000E+00, 0.6877900E+00, 0.7147064E+00, 0.7147064E+00 /
      data (ref_adm(23,iz,27,17),iz = 1,20) / &
     & 0.3352700E+00, 0.3352700E+00, 0.3401200E+00, 0.3395200E+00, &
     & 0.3466600E+00, 0.3449800E+00, 0.3555000E+00, 0.3648300E+00, &
     & 0.3712600E+00, 0.3867200E+00, 0.4099500E+00, 0.4209600E+00, &
     & 0.4491700E+00, 0.4789400E+00, 0.5039500E+00, 0.5574700E+00, &
     & 0.6028700E+00, 0.7132400E+00, 0.6819700E+00, 0.6819700E+00 /
      data (ref_adm(23,iz,28,17),iz = 1,20) / &
     & 0.3202600E+00, 0.3202600E+00, 0.3327700E+00, 0.3340800E+00, &
     & 0.3422900E+00, 0.3515900E+00, 0.3528700E+00, 0.3707900E+00, &
     & 0.3764000E+00, 0.3883900E+00, 0.4129600E+00, 0.4362900E+00, &
     & 0.4542300E+00, 0.5002100E+00, 0.5233300E+00, 0.5657800E+00, &
     & 0.6474300E+00, 0.7280300E+00, 0.6858400E+00, 0.6858400E+00 /
      data (ref_adm(23,iz,29,17),iz = 1,20) / &
     & 0.3323500E+00, 0.3323500E+00, 0.3400400E+00, 0.3409400E+00, &
     & 0.3445200E+00, 0.3524200E+00, 0.3620800E+00, 0.3790800E+00, &
     & 0.3871000E+00, 0.4019300E+00, 0.4260500E+00, 0.4438000E+00, &
     & 0.4570000E+00, 0.5034700E+00, 0.5312300E+00, 0.6077300E+00, &
     & 0.6931400E+00, 0.7510100E+00, 0.7152800E+00, 0.7152800E+00 /
      data (ref_adm(23,iz,30,17),iz = 1,20) / &
     & 0.3386900E+00, 0.3386900E+00, 0.3442600E+00, 0.3469700E+00, &
     & 0.3562000E+00, 0.3623200E+00, 0.3698100E+00, 0.3813400E+00, &
     & 0.3927200E+00, 0.4174400E+00, 0.4399300E+00, 0.4743400E+00, &
     & 0.4724200E+00, 0.5155400E+00, 0.5600200E+00, 0.6381100E+00, &
     & 0.7001300E+00, 0.7967800E+00, 0.7631100E+00, 0.7631100E+00 /
      data (ref_adm(23,iz,31,17),iz = 1,20) / &
     & 0.3348800E+00, 0.3348800E+00, 0.3410500E+00, 0.3436800E+00, &
     & 0.3540500E+00, 0.3530200E+00, 0.3715100E+00, 0.3796200E+00, &
     & 0.4005300E+00, 0.4137000E+00, 0.4417900E+00, 0.4732500E+00, &
     & 0.5018300E+00, 0.5286900E+00, 0.5804100E+00, 0.6640000E+00, &
     & 0.7319400E+00, 0.8206200E+00, 0.8095700E+00, 0.8095700E+00 /
      data (ref_adm(23,iz,32,17),iz = 1,20) / &
     & 0.3478900E+00, 0.3478900E+00, 0.3469800E+00, 0.3470900E+00, &
     & 0.3462000E+00, 0.3591200E+00, 0.3736200E+00, 0.3877400E+00, &
     & 0.4065000E+00, 0.4271900E+00, 0.4430200E+00, 0.4772800E+00, &
     & 0.5113300E+00, 0.5444700E+00, 0.5917900E+00, 0.6549600E+00, &
     & 0.7381100E+00, 0.8331200E+00, 0.8075900E+00, 0.8075900E+00 /
      data (ref_adm(23,iz,33,17),iz = 1,20) / &
     & 0.3282100E+00, 0.3282100E+00, 0.3342200E+00, 0.3361700E+00, &
     & 0.3401400E+00, 0.3513000E+00, 0.3611900E+00, 0.3728800E+00, &
     & 0.3914400E+00, 0.4174900E+00, 0.4414500E+00, 0.4680600E+00, &
     & 0.5057700E+00, 0.5402400E+00, 0.5923200E+00, 0.6571200E+00, &
     & 0.7462600E+00, 0.8455600E+00, 0.8139000E+00, 0.8139000E+00 /
      data (ref_adm(23,iz,34,17),iz = 1,20) / &
     & 0.3326700E+00, 0.3326700E+00, 0.3392800E+00, 0.3424000E+00, &
     & 0.3367000E+00, 0.3548500E+00, 0.3606600E+00, 0.3806300E+00, &
     & 0.3923000E+00, 0.4160000E+00, 0.4451400E+00, 0.4738500E+00, &
     & 0.5030900E+00, 0.5522600E+00, 0.6015900E+00, 0.6832200E+00, &
     & 0.7819400E+00, 0.8967500E+00, 0.8804600E+00, 0.8804600E+00 /
      data (ref_adm(23,iz,35,17),iz = 1,20) / &
     & 0.3411700E+00, 0.3411700E+00, 0.3489500E+00, 0.3392700E+00, &
     & 0.3479400E+00, 0.3648600E+00, 0.3739200E+00, 0.3913200E+00, &
     & 0.3965600E+00, 0.4171800E+00, 0.4418300E+00, 0.4788300E+00, &
     & 0.5225000E+00, 0.5529300E+00, 0.6126300E+00, 0.6997400E+00, &
     & 0.7996200E+00, 0.9070500E+00, 0.8869600E+00, 0.8869600E+00 /
      data (ref_adm(23,iz,36,17),iz = 1,20) / &
     & 0.3388900E+00, 0.3388900E+00, 0.3428800E+00, 0.3503400E+00, &
     & 0.3574700E+00, 0.3651500E+00, 0.3795200E+00, 0.3853700E+00, &
     & 0.4046500E+00, 0.4297700E+00, 0.4473300E+00, 0.4913700E+00, &
     & 0.5266700E+00, 0.5716100E+00, 0.6324200E+00, 0.7129100E+00, &
     & 0.8206400E+00, 0.9231300E+00, 0.8972200E+00, 0.8972200E+00 /
      data (ref_adm(23,iz,37,17),iz = 1,20) / &
     & 0.3391800E+00, 0.3391800E+00, 0.3411500E+00, 0.3518000E+00, &
     & 0.3582900E+00, 0.3694300E+00, 0.3796100E+00, 0.3866700E+00, &
     & 0.4054300E+00, 0.4218100E+00, 0.4552500E+00, 0.4924800E+00, &
     & 0.5379900E+00, 0.5765400E+00, 0.6290400E+00, 0.7155400E+00, &
     & 0.8363800E+00, 0.9671100E+00, 0.9602900E+00, 0.9602900E+00 /
      data (ref_adm(23,iz,38,17),iz = 1,20) / &
     & 0.3391800E+00, 0.3391800E+00, 0.3411500E+00, 0.3518000E+00, &
     & 0.3582900E+00, 0.3694300E+00, 0.3796100E+00, 0.3866700E+00, &
     & 0.4054300E+00, 0.4218100E+00, 0.4552500E+00, 0.4924800E+00, &
     & 0.5379900E+00, 0.5765400E+00, 0.6290400E+00, 0.7155400E+00, &
     & 0.8363800E+00, 0.9671100E+00, 0.9602900E+00, 0.9602900E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6412111E+00
      data (ref_adm(23,iz, 1,18),iz = 1,20) / &
     & 0.4049500E+00, 0.4049500E+00, 0.4062900E+00, 0.4369300E+00, &
     & 0.4514600E+00, 0.4605300E+00, 0.4846900E+00, 0.5073300E+00, &
     & 0.5490400E+00, 0.5615500E+00, 0.6563800E+00, 0.7555100E+00, &
     & 0.9000705E+00, 0.1173972E+01, 0.1934176E+01, 0.3692110E+01, &
     & 0.2470996E+01, 0.3415359E+01, 0.6353356E+01, 0.6353356E+01 /
      data (ref_adm(23,iz, 2,18),iz = 1,20) / &
     & 0.4049500E+00, 0.4049500E+00, 0.4062900E+00, 0.4369300E+00, &
     & 0.4514600E+00, 0.4605300E+00, 0.4846900E+00, 0.5073300E+00, &
     & 0.5490400E+00, 0.5615500E+00, 0.6563800E+00, 0.7555100E+00, &
     & 0.9000705E+00, 0.1173972E+01, 0.1934176E+01, 0.3692110E+01, &
     & 0.2470996E+01, 0.3415359E+01, 0.6353356E+01, 0.6353356E+01 /
      data (ref_adm(23,iz, 3,18),iz = 1,20) / &
     & 0.4065600E+00, 0.4065600E+00, 0.4177000E+00, 0.4256600E+00, &
     & 0.4455500E+00, 0.4837900E+00, 0.4913700E+00, 0.5087200E+00, &
     & 0.5370400E+00, 0.5862700E+00, 0.6675500E+00, 0.7379600E+00, &
     & 0.8842217E+00, 0.1139143E+01, 0.1806390E+01, 0.3693772E+01, &
     & 0.2792175E+01, 0.3189198E+01, 0.4257377E+01, 0.4257377E+01 /
      data (ref_adm(23,iz, 4,18),iz = 1,20) / &
     & 0.4113200E+00, 0.4113200E+00, 0.4334800E+00, 0.4380300E+00, &
     & 0.4510300E+00, 0.4505100E+00, 0.4878400E+00, 0.4992800E+00, &
     & 0.5297600E+00, 0.6041500E+00, 0.6455900E+00, 0.7357500E+00, &
     & 0.8552954E+00, 0.1074950E+01, 0.1585891E+01, 0.3107569E+01, &
     & 0.4095353E+01, 0.3164068E+01, 0.3978815E+01, 0.3978815E+01 /
      data (ref_adm(23,iz, 5,18),iz = 1,20) / &
     & 0.4275800E+00, 0.4275800E+00, 0.4236900E+00, 0.4281200E+00, &
     & 0.4418200E+00, 0.4573300E+00, 0.4656000E+00, 0.4935400E+00, &
     & 0.5352300E+00, 0.5964400E+00, 0.6464900E+00, 0.7209800E+00, &
     & 0.8240423E+00, 0.9961315E+00, 0.1370811E+01, 0.2260938E+01, &
     & 0.4228095E+01, 0.5075257E+01, 0.4055831E+01, 0.4055831E+01 /
      data (ref_adm(23,iz, 6,18),iz = 1,20) / &
     & 0.4304400E+00, 0.4304400E+00, 0.4256300E+00, 0.4333300E+00, &
     & 0.4456100E+00, 0.4632300E+00, 0.4848400E+00, 0.5125800E+00, &
     & 0.5572500E+00, 0.6023700E+00, 0.6652800E+00, 0.7296400E+00, &
     & 0.8628400E+00, 0.1015300E+01, 0.1193200E+01, 0.1546600E+01, &
     & 0.2229400E+01, 0.2652200E+01, 0.2603200E+01, 0.2603200E+01 /
      data (ref_adm(23,iz, 7,18),iz = 1,20) / &
     & 0.4203400E+00, 0.4203400E+00, 0.4275200E+00, 0.4271200E+00, &
     & 0.4433400E+00, 0.4557900E+00, 0.4822100E+00, 0.5177600E+00, &
     & 0.5424500E+00, 0.5792900E+00, 0.6389000E+00, 0.7007900E+00, &
     & 0.8632000E+00, 0.1043500E+01, 0.1254600E+01, 0.1591300E+01, &
     & 0.1988800E+01, 0.2457500E+01, 0.2560400E+01, 0.2560400E+01 /
      data (ref_adm(23,iz, 8,18),iz = 1,20) / &
     & 0.4104900E+00, 0.4104900E+00, 0.4104300E+00, 0.4152500E+00, &
     & 0.4189500E+00, 0.4326100E+00, 0.4547800E+00, 0.4836700E+00, &
     & 0.5195600E+00, 0.5264500E+00, 0.5934000E+00, 0.6643300E+00, &
     & 0.8524800E+00, 0.1019300E+01, 0.1214300E+01, 0.1509700E+01, &
     & 0.1829200E+01, 0.2196700E+01, 0.2457700E+01, 0.2457700E+01 /
      data (ref_adm(23,iz, 9,18),iz = 1,20) / &
     & 0.4184900E+00, 0.4184900E+00, 0.4058100E+00, 0.4120100E+00, &
     & 0.4208500E+00, 0.4369600E+00, 0.4479200E+00, 0.4772300E+00, &
     & 0.4980800E+00, 0.5256600E+00, 0.5858200E+00, 0.6273000E+00, &
     & 0.7693900E+00, 0.9341400E+00, 0.1055700E+01, 0.1338000E+01, &
     & 0.1596100E+01, 0.1993600E+01, 0.2211600E+01, 0.2211600E+01 /
      data (ref_adm(23,iz,10,18),iz = 1,20) / &
     & 0.4214300E+00, 0.4214300E+00, 0.4177200E+00, 0.4212200E+00, &
     & 0.4303600E+00, 0.4417100E+00, 0.4572600E+00, 0.4595500E+00, &
     & 0.4944900E+00, 0.5189500E+00, 0.5561100E+00, 0.6129600E+00, &
     & 0.7144900E+00, 0.8710200E+00, 0.1008900E+01, 0.1215400E+01, &
     & 0.1462900E+01, 0.1822500E+01, 0.1603100E+01, 0.1603100E+01 /
      data (ref_adm(23,iz,11,18),iz = 1,20) / &
     & 0.4121000E+00, 0.4121000E+00, 0.4127100E+00, 0.4241500E+00, &
     & 0.4284700E+00, 0.4402800E+00, 0.4437000E+00, 0.4714100E+00, &
     & 0.4885600E+00, 0.4996900E+00, 0.5507200E+00, 0.5806400E+00, &
     & 0.6935400E+00, 0.7759200E+00, 0.9134100E+00, 0.1098600E+01, &
     & 0.1320400E+01, 0.1607400E+01, 0.1491600E+01, 0.1491600E+01 /
      data (ref_adm(23,iz,12,18),iz = 1,20) / &
     & 0.4249000E+00, 0.4249000E+00, 0.4098900E+00, 0.4077100E+00, &
     & 0.4348300E+00, 0.4334700E+00, 0.4378300E+00, 0.4466900E+00, &
     & 0.4647800E+00, 0.4788000E+00, 0.5223100E+00, 0.5513700E+00, &
     & 0.6781400E+00, 0.7296300E+00, 0.8454800E+00, 0.1012400E+01, &
     & 0.1194300E+01, 0.1425700E+01, 0.1528800E+01, 0.1528800E+01 /
      data (ref_adm(23,iz,13,18),iz = 1,20) / &
     & 0.4211600E+00, 0.4211600E+00, 0.4100800E+00, 0.4260700E+00, &
     & 0.4185300E+00, 0.4309600E+00, 0.4240200E+00, 0.4444000E+00, &
     & 0.4420800E+00, 0.4690700E+00, 0.5126300E+00, 0.5394800E+00, &
     & 0.6381100E+00, 0.7213300E+00, 0.7953200E+00, 0.9645900E+00, &
     & 0.1094500E+01, 0.1317900E+01, 0.1241700E+01, 0.1241700E+01 /
      data (ref_adm(23,iz,14,18),iz = 1,20) / &
     & 0.4339200E+00, 0.4339200E+00, 0.4293300E+00, 0.4188300E+00, &
     & 0.4176800E+00, 0.4163400E+00, 0.4111400E+00, 0.4161400E+00, &
     & 0.4201100E+00, 0.4292900E+00, 0.4515400E+00, 0.4603800E+00, &
     & 0.5144500E+00, 0.5613200E+00, 0.7450900E+00, 0.8655000E+00, &
     & 0.1037500E+01, 0.1247300E+01, 0.1749314E+01, 0.1749314E+01 /
      data (ref_adm(23,iz,15,18),iz = 1,20) / &
     & 0.4077100E+00, 0.4077100E+00, 0.3998100E+00, 0.3977800E+00, &
     & 0.3951600E+00, 0.3986500E+00, 0.3954300E+00, 0.3939000E+00, &
     & 0.3989700E+00, 0.4022300E+00, 0.4132700E+00, 0.4193800E+00, &
     & 0.4372100E+00, 0.4646300E+00, 0.7091600E+00, 0.7799500E+00, &
     & 0.9418400E+00, 0.1172125E+01, 0.1673661E+01, 0.1673661E+01 /
      data (ref_adm(23,iz,16,18),iz = 1,20) / &
     & 0.4126800E+00, 0.4126800E+00, 0.4178100E+00, 0.4173900E+00, &
     & 0.4169300E+00, 0.4160300E+00, 0.4175100E+00, 0.4173800E+00, &
     & 0.4349700E+00, 0.4384100E+00, 0.4433400E+00, 0.4556500E+00, &
     & 0.4800400E+00, 0.4951000E+00, 0.6834100E+00, 0.7567200E+00, &
     & 0.8243800E+00, 0.1131987E+01, 0.1609458E+01, 0.1609458E+01 /
      data (ref_adm(23,iz,17,18),iz = 1,20) / &
     & 0.4089100E+00, 0.4089100E+00, 0.4101000E+00, 0.4111900E+00, &
     & 0.4147200E+00, 0.4198600E+00, 0.4250300E+00, 0.4255500E+00, &
     & 0.4505200E+00, 0.4532000E+00, 0.4767300E+00, 0.4889700E+00, &
     & 0.5761800E+00, 0.6014300E+00, 0.6459300E+00, 0.7359400E+00, &
     & 0.8772656E+00, 0.1085314E+01, 0.1543893E+01, 0.1543893E+01 /
      data (ref_adm(23,iz,18,18),iz = 1,20) / &
     & 0.4118400E+00, 0.4118400E+00, 0.4168300E+00, 0.4146500E+00, &
     & 0.4127500E+00, 0.4123200E+00, 0.4084100E+00, 0.4232800E+00, &
     & 0.4310900E+00, 0.4347200E+00, 0.4563100E+00, 0.4750300E+00, &
     & 0.5603000E+00, 0.5793000E+00, 0.6667000E+00, 0.7114600E+00, &
     & 0.7959548E+00, 0.9939991E+00, 0.1480464E+01, 0.1480464E+01 /
      data (ref_adm(23,iz,19,18),iz = 1,20) / &
     & 0.4056900E+00, 0.4056900E+00, 0.4140100E+00, 0.4157300E+00, &
     & 0.4133600E+00, 0.4132400E+00, 0.4102900E+00, 0.4045600E+00, &
     & 0.4148900E+00, 0.4296000E+00, 0.4564900E+00, 0.4719700E+00, &
     & 0.5647100E+00, 0.5991500E+00, 0.6472900E+00, 0.5936100E+00, &
     & 0.7705998E+00, 0.9598058E+00, 0.1441809E+01, 0.1441809E+01 /
      data (ref_adm(23,iz,20,18),iz = 1,20) / &
     & 0.4092900E+00, 0.4092900E+00, 0.4079100E+00, 0.4063700E+00, &
     & 0.4030800E+00, 0.4100500E+00, 0.4161800E+00, 0.4139100E+00, &
     & 0.4212700E+00, 0.4267700E+00, 0.4477000E+00, 0.4873500E+00, &
     & 0.5347500E+00, 0.5777500E+00, 0.6069500E+00, 0.6593449E+00, &
     & 0.7542125E+00, 0.9374203E+00, 0.1423400E+01, 0.1423400E+01 /
      data (ref_adm(23,iz,21,18),iz = 1,20) / &
     & 0.4111100E+00, 0.4111100E+00, 0.4019200E+00, 0.4183900E+00, &
     & 0.4060600E+00, 0.4135900E+00, 0.3973400E+00, 0.4201200E+00, &
     & 0.4144700E+00, 0.4266100E+00, 0.4465900E+00, 0.4758200E+00, &
     & 0.5319400E+00, 0.5614100E+00, 0.5696100E+00, 0.6495212E+00, &
     & 0.7421608E+00, 0.9225517E+00, 0.1419214E+01, 0.1419214E+01 /
      data (ref_adm(23,iz,22,18),iz = 1,20) / &
     & 0.4148700E+00, 0.4148700E+00, 0.4241000E+00, 0.4187100E+00, &
     & 0.4175200E+00, 0.4155600E+00, 0.4046300E+00, 0.4124600E+00, &
     & 0.4329500E+00, 0.4367700E+00, 0.4515500E+00, 0.4664700E+00, &
     & 0.4898900E+00, 0.5332600E+00, 0.5311200E+00, 0.5222700E+00, &
     & 0.7773255E+00, 0.8983485E+00, 0.1185071E+01, 0.1185071E+01 /
      data (ref_adm(23,iz,23,18),iz = 1,20) / &
     & 0.4113100E+00, 0.4113100E+00, 0.4271200E+00, 0.4393100E+00, &
     & 0.4290000E+00, 0.4431500E+00, 0.4505000E+00, 0.4573900E+00, &
     & 0.4745700E+00, 0.4767700E+00, 0.4874700E+00, 0.5106900E+00, &
     & 0.5241700E+00, 0.5317700E+00, 0.5293800E+00, 0.5396000E+00, &
     & 0.7668450E+00, 0.8886213E+00, 0.1197792E+01, 0.1197792E+01 /
      data (ref_adm(23,iz,24,18),iz = 1,20) / &
     & 0.4202000E+00, 0.4202000E+00, 0.4103300E+00, 0.4086400E+00, &
     & 0.4131400E+00, 0.4154600E+00, 0.4248800E+00, 0.4357000E+00, &
     & 0.4451300E+00, 0.4592100E+00, 0.4781700E+00, 0.5106800E+00, &
     & 0.5410700E+00, 0.5969300E+00, 0.6080700E+00, 0.5630000E+00, &
     & 0.6703300E+00, 0.8857622E+00, 0.1221790E+01, 0.1221790E+01 /
      data (ref_adm(23,iz,25,18),iz = 1,20) / &
     & 0.4111400E+00, 0.4111400E+00, 0.4102500E+00, 0.4124900E+00, &
     & 0.4171200E+00, 0.4254600E+00, 0.4273300E+00, 0.4342600E+00, &
     & 0.4484200E+00, 0.4569000E+00, 0.4797300E+00, 0.5063500E+00, &
     & 0.5358000E+00, 0.5778200E+00, 0.5938800E+00, 0.6372900E+00, &
     & 0.7081700E+00, 0.8888649E+00, 0.1254716E+01, 0.1254716E+01 /
      data (ref_adm(23,iz,26,18),iz = 1,20) / &
     & 0.4120200E+00, 0.4120200E+00, 0.4226500E+00, 0.4175100E+00, &
     & 0.4147500E+00, 0.4210100E+00, 0.4383000E+00, 0.4440700E+00, &
     & 0.4539700E+00, 0.4626900E+00, 0.5096000E+00, 0.5065400E+00, &
     & 0.5457800E+00, 0.6023400E+00, 0.6157800E+00, 0.6581800E+00, &
     & 0.7385300E+00, 0.8536300E+00, 0.1300898E+01, 0.1300898E+01 /
      data (ref_adm(23,iz,27,18),iz = 1,20) / &
     & 0.4070600E+00, 0.4070600E+00, 0.4181300E+00, 0.4175700E+00, &
     & 0.4216600E+00, 0.4228700E+00, 0.4330700E+00, 0.4546400E+00, &
     & 0.4592200E+00, 0.4757700E+00, 0.5049100E+00, 0.5368000E+00, &
     & 0.5553000E+00, 0.6050000E+00, 0.6472500E+00, 0.6987700E+00, &
     & 0.8229200E+00, 0.9898500E+00, 0.1068100E+01, 0.1068100E+01 /
      data (ref_adm(23,iz,28,18),iz = 1,20) / &
     & 0.4069700E+00, 0.4069700E+00, 0.4205500E+00, 0.4132400E+00, &
     & 0.4232000E+00, 0.4314900E+00, 0.4486800E+00, 0.4539400E+00, &
     & 0.4714300E+00, 0.4810300E+00, 0.5254600E+00, 0.5380400E+00, &
     & 0.5842000E+00, 0.6326800E+00, 0.7000200E+00, 0.7629600E+00, &
     & 0.9323200E+00, 0.1168600E+01, 0.1304200E+01, 0.1304200E+01 /
      data (ref_adm(23,iz,29,18),iz = 1,20) / &
     & 0.4154600E+00, 0.4154600E+00, 0.4126100E+00, 0.4176500E+00, &
     & 0.4251900E+00, 0.4396900E+00, 0.4433200E+00, 0.4579700E+00, &
     & 0.4805300E+00, 0.4880200E+00, 0.5211700E+00, 0.5707500E+00, &
     & 0.6073000E+00, 0.6658200E+00, 0.7562900E+00, 0.8147100E+00, &
     & 0.9954800E+00, 0.1260900E+01, 0.1515800E+01, 0.1515800E+01 /
      data (ref_adm(23,iz,30,18),iz = 1,20) / &
     & 0.4129800E+00, 0.4129800E+00, 0.4151600E+00, 0.4200900E+00, &
     & 0.4394900E+00, 0.4427100E+00, 0.4458000E+00, 0.4525700E+00, &
     & 0.4772500E+00, 0.4862200E+00, 0.5271000E+00, 0.5678900E+00, &
     & 0.6271900E+00, 0.7049000E+00, 0.8007400E+00, 0.9235200E+00, &
     & 0.1118500E+01, 0.1378200E+01, 0.1471000E+01, 0.1471000E+01 /
      data (ref_adm(23,iz,31,18),iz = 1,20) / &
     & 0.4206000E+00, 0.4206000E+00, 0.4160900E+00, 0.4227000E+00, &
     & 0.4253200E+00, 0.4391200E+00, 0.4409500E+00, 0.4541300E+00, &
     & 0.4686000E+00, 0.5006200E+00, 0.5394400E+00, 0.5883900E+00, &
     & 0.6544500E+00, 0.7129300E+00, 0.8248300E+00, 0.9398600E+00, &
     & 0.1102400E+01, 0.1391300E+01, 0.1715000E+01, 0.1715000E+01 /
      data (ref_adm(23,iz,32,18),iz = 1,20) / &
     & 0.4309100E+00, 0.4309100E+00, 0.4268500E+00, 0.4291800E+00, &
     & 0.4292200E+00, 0.4402500E+00, 0.4605200E+00, 0.4809200E+00, &
     & 0.4982600E+00, 0.5250100E+00, 0.5556600E+00, 0.6051400E+00, &
     & 0.6623400E+00, 0.7383900E+00, 0.8444500E+00, 0.9540100E+00, &
     & 0.1145200E+01, 0.1385000E+01, 0.1531800E+01, 0.1531800E+01 /
      data (ref_adm(23,iz,33,18),iz = 1,20) / &
     & 0.4062600E+00, 0.4062600E+00, 0.4080700E+00, 0.4111600E+00, &
     & 0.4299700E+00, 0.4445200E+00, 0.4619900E+00, 0.4814600E+00, &
     & 0.5099400E+00, 0.5280800E+00, 0.5639300E+00, 0.6191600E+00, &
     & 0.6823400E+00, 0.7593300E+00, 0.8447700E+00, 0.9847700E+00, &
     & 0.1198700E+01, 0.1476000E+01, 0.1667500E+01, 0.1667500E+01 /
      data (ref_adm(23,iz,34,18),iz = 1,20) / &
     & 0.4263500E+00, 0.4263500E+00, 0.4209800E+00, 0.4212100E+00, &
     & 0.4227900E+00, 0.4389400E+00, 0.4551300E+00, 0.4780000E+00, &
     & 0.4967500E+00, 0.5294800E+00, 0.5553700E+00, 0.6212300E+00, &
     & 0.6915400E+00, 0.7614200E+00, 0.8452700E+00, 0.9924400E+00, &
     & 0.1160200E+01, 0.1430400E+01, 0.1655500E+01, 0.1655500E+01 /
      data (ref_adm(23,iz,35,18),iz = 1,20) / &
     & 0.4066600E+00, 0.4066600E+00, 0.4104500E+00, 0.4175500E+00, &
     & 0.4336500E+00, 0.4398800E+00, 0.4574200E+00, 0.4778500E+00, &
     & 0.5007900E+00, 0.5359100E+00, 0.5855900E+00, 0.6338400E+00, &
     & 0.6814600E+00, 0.7563500E+00, 0.8426000E+00, 0.1008100E+01, &
     & 0.1202000E+01, 0.1501800E+01, 0.1808300E+01, 0.1808300E+01 /
      data (ref_adm(23,iz,36,18),iz = 1,20) / &
     & 0.4034300E+00, 0.4034300E+00, 0.4193100E+00, 0.4287800E+00, &
     & 0.4255000E+00, 0.4380200E+00, 0.4493200E+00, 0.4773300E+00, &
     & 0.5014000E+00, 0.5480800E+00, 0.5867400E+00, 0.6184200E+00, &
     & 0.6791100E+00, 0.7724000E+00, 0.8522200E+00, 0.1029600E+01, &
     & 0.1191600E+01, 0.1547600E+01, 0.1765700E+01, 0.1765700E+01 /
      data (ref_adm(23,iz,37,18),iz = 1,20) / &
     & 0.4103600E+00, 0.4103600E+00, 0.4173700E+00, 0.4230100E+00, &
     & 0.4341700E+00, 0.4491400E+00, 0.4698100E+00, 0.4731300E+00, &
     & 0.5042400E+00, 0.5320400E+00, 0.5784300E+00, 0.6280200E+00, &
     & 0.6890900E+00, 0.7615600E+00, 0.8710900E+00, 0.1039800E+01, &
     & 0.1228200E+01, 0.1573400E+01, 0.1959700E+01, 0.1959700E+01 /
      data (ref_adm(23,iz,38,18),iz = 1,20) / &
     & 0.4103600E+00, 0.4103600E+00, 0.4173700E+00, 0.4230100E+00, &
     & 0.4341700E+00, 0.4491400E+00, 0.4698100E+00, 0.4731300E+00, &
     & 0.5042400E+00, 0.5320400E+00, 0.5784300E+00, 0.6280200E+00, &
     & 0.6890900E+00, 0.7615600E+00, 0.8710900E+00, 0.1039800E+01, &
     & 0.1228200E+01, 0.1573400E+01, 0.1959700E+01, 0.1959700E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(24,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(24,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(24,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.5550595E+04
      data (ref_adm(24,iz, 1, 4),iz = 1,20) / &
     & 0.3190604E+00, 0.3190604E+00, 0.3133508E+00, 0.3113730E+00, &
     & 0.3098097E+00, 0.3087404E+00, 0.3068559E+00, 0.3036452E+00, &
     & 0.2995213E+00, 0.2945833E+00, 0.2892125E+00, 0.2817560E+00, &
     & 0.2730529E+00, 0.2648574E+00, 0.2530881E+00, 0.2375894E+00, &
     & 0.2215997E+00, 0.2006788E+00, 0.1637384E+00, 0.1637384E+00 /
      data (ref_adm(24,iz, 2, 4),iz = 1,20) / &
     & 0.3190604E+00, 0.3190604E+00, 0.3133508E+00, 0.3113730E+00, &
     & 0.3098097E+00, 0.3087404E+00, 0.3068559E+00, 0.3036452E+00, &
     & 0.2995213E+00, 0.2945833E+00, 0.2892125E+00, 0.2817560E+00, &
     & 0.2730529E+00, 0.2648574E+00, 0.2530881E+00, 0.2375894E+00, &
     & 0.2215997E+00, 0.2006788E+00, 0.1637384E+00, 0.1637384E+00 /
      data (ref_adm(24,iz, 3, 4),iz = 1,20) / &
     & 0.3190604E+00, 0.3190604E+00, 0.3133508E+00, 0.3113730E+00, &
     & 0.3098097E+00, 0.3087404E+00, 0.3068559E+00, 0.3036451E+00, &
     & 0.2995213E+00, 0.2945833E+00, 0.2892125E+00, 0.2817560E+00, &
     & 0.2730529E+00, 0.2648574E+00, 0.2530881E+00, 0.2375894E+00, &
     & 0.2215997E+00, 0.2006788E+00, 0.1637384E+00, 0.1637384E+00 /
      data (ref_adm(24,iz, 4, 4),iz = 1,20) / &
     & 0.3190604E+00, 0.3190604E+00, 0.3133508E+00, 0.3113730E+00, &
     & 0.3098097E+00, 0.3087404E+00, 0.3068559E+00, 0.3036452E+00, &
     & 0.2995213E+00, 0.2945833E+00, 0.2892125E+00, 0.2817560E+00, &
     & 0.2730529E+00, 0.2648574E+00, 0.2530881E+00, 0.2375894E+00, &
     & 0.2215997E+00, 0.2006788E+00, 0.1637384E+00, 0.1637384E+00 /
      data (ref_adm(24,iz, 5, 4),iz = 1,20) / &
     & 0.3190604E+00, 0.3190604E+00, 0.3133508E+00, 0.3113730E+00, &
     & 0.3098097E+00, 0.3087404E+00, 0.3068559E+00, 0.3036451E+00, &
     & 0.2995213E+00, 0.2945833E+00, 0.2610300E+00, 0.2817560E+00, &
     & 0.2730529E+00, 0.2648574E+00, 0.2530881E+00, 0.2375894E+00, &
     & 0.2215997E+00, 0.2006788E+00, 0.1637384E+00, 0.1637384E+00 /
      data (ref_adm(24,iz, 6, 4),iz = 1,20) / &
     & 0.3190604E+00, 0.3190604E+00, 0.3133508E+00, 0.3113730E+00, &
     & 0.3098097E+00, 0.3087404E+00, 0.3068559E+00, 0.3036452E+00, &
     & 0.2995213E+00, 0.2945833E+00, 0.2892125E+00, 0.2817560E+00, &
     & 0.2730529E+00, 0.2648574E+00, 0.2530881E+00, 0.2375894E+00, &
     & 0.2215997E+00, 0.2006788E+00, 0.1637384E+00, 0.1637384E+00 /
      data (ref_adm(24,iz, 7, 4),iz = 1,20) / &
     & 0.3190604E+00, 0.3190604E+00, 0.3133508E+00, 0.3113730E+00, &
     & 0.3098097E+00, 0.3087404E+00, 0.3068559E+00, 0.3036451E+00, &
     & 0.2995213E+00, 0.2945833E+00, 0.2892125E+00, 0.2817560E+00, &
     & 0.2730529E+00, 0.2648574E+00, 0.2530881E+00, 0.2375894E+00, &
     & 0.2215997E+00, 0.2006788E+00, 0.1637384E+00, 0.1637384E+00 /
      data (ref_adm(24,iz, 8, 4),iz = 1,20) / &
     & 0.3190604E+00, 0.3190604E+00, 0.3133508E+00, 0.3113730E+00, &
     & 0.3098097E+00, 0.3087404E+00, 0.3068559E+00, 0.3036452E+00, &
     & 0.2995213E+00, 0.2945833E+00, 0.2892125E+00, 0.2817560E+00, &
     & 0.2730529E+00, 0.2648574E+00, 0.2530881E+00, 0.2375894E+00, &
     & 0.2215997E+00, 0.2006788E+00, 0.1637384E+00, 0.1637384E+00 /
      data (ref_adm(24,iz, 9, 4),iz = 1,20) / &
     & 0.3190604E+00, 0.3190604E+00, 0.3133508E+00, 0.3113730E+00, &
     & 0.3098097E+00, 0.3087404E+00, 0.2964800E+00, 0.3036451E+00, &
     & 0.2995213E+00, 0.2945833E+00, 0.2892125E+00, 0.2817560E+00, &
     & 0.2730529E+00, 0.2648574E+00, 0.2530881E+00, 0.2375894E+00, &
     & 0.2215997E+00, 0.2006788E+00, 0.1637384E+00, 0.1637384E+00 /
      data (ref_adm(24,iz,10, 4),iz = 1,20) / &
     & 0.3190604E+00, 0.3190604E+00, 0.3133508E+00, 0.3113730E+00, &
     & 0.3098097E+00, 0.3087404E+00, 0.3068559E+00, 0.3036452E+00, &
     & 0.2995213E+00, 0.3332500E+00, 0.2892125E+00, 0.2817560E+00, &
     & 0.2730529E+00, 0.2648574E+00, 0.2530881E+00, 0.2375894E+00, &
     & 0.2215997E+00, 0.2006788E+00, 0.1637384E+00, 0.1637384E+00 /
      data (ref_adm(24,iz,11, 4),iz = 1,20) / &
     & 0.3190604E+00, 0.3190604E+00, 0.3133508E+00, 0.3113730E+00, &
     & 0.3098097E+00, 0.3087404E+00, 0.3068559E+00, 0.3036451E+00, &
     & 0.2995213E+00, 0.2945833E+00, 0.2892125E+00, 0.2817560E+00, &
     & 0.2730529E+00, 0.2648574E+00, 0.2530881E+00, 0.2375894E+00, &
     & 0.2215997E+00, 0.2006788E+00, 0.1637384E+00, 0.1637384E+00 /
      data (ref_adm(24,iz,12, 4),iz = 1,20) / &
     & 0.3190604E+00, 0.3190604E+00, 0.3133508E+00, 0.3113730E+00, &
     & 0.3098097E+00, 0.3087404E+00, 0.3068559E+00, 0.3036452E+00, &
     & 0.2995213E+00, 0.2945833E+00, 0.2892125E+00, 0.2817560E+00, &
     & 0.2730529E+00, 0.2648574E+00, 0.2530881E+00, 0.2375894E+00, &
     & 0.2215997E+00, 0.2006788E+00, 0.1637384E+00, 0.1637384E+00 /
      data (ref_adm(24,iz,13, 4),iz = 1,20) / &
     & 0.3190604E+00, 0.3190604E+00, 0.3133508E+00, 0.3113730E+00, &
     & 0.3098097E+00, 0.3087404E+00, 0.3068559E+00, 0.3036451E+00, &
     & 0.2995213E+00, 0.2945833E+00, 0.2892125E+00, 0.2817560E+00, &
     & 0.2730529E+00, 0.2648574E+00, 0.2530881E+00, 0.2375894E+00, &
     & 0.2215997E+00, 0.2006788E+00, 0.1637384E+00, 0.1637384E+00 /
      data (ref_adm(24,iz,14, 4),iz = 1,20) / &
     & 0.3190604E+00, 0.3190604E+00, 0.3133508E+00, 0.3113730E+00, &
     & 0.3098097E+00, 0.3087404E+00, 0.3068559E+00, 0.3036452E+00, &
     & 0.2995213E+00, 0.2945833E+00, 0.2892125E+00, 0.2817560E+00, &
     & 0.2730529E+00, 0.2648574E+00, 0.2530881E+00, 0.2375894E+00, &
     & 0.2215997E+00, 0.2006788E+00, 0.1637384E+00, 0.1637384E+00 /
      data (ref_adm(24,iz,15, 4),iz = 1,20) / &
     & 0.3190604E+00, 0.3190604E+00, 0.3133508E+00, 0.3113730E+00, &
     & 0.3098097E+00, 0.3087404E+00, 0.3068559E+00, 0.3036451E+00, &
     & 0.2995213E+00, 0.2945833E+00, 0.2892125E+00, 0.2817560E+00, &
     & 0.2730529E+00, 0.2648574E+00, 0.2530881E+00, 0.2375894E+00, &
     & 0.2215997E+00, 0.2006788E+00, 0.1637384E+00, 0.1637384E+00 /
      data (ref_adm(24,iz,16, 4),iz = 1,20) / &
     & 0.3190604E+00, 0.3190604E+00, 0.3133508E+00, 0.3113730E+00, &
     & 0.3098097E+00, 0.3087404E+00, 0.3068559E+00, 0.3036452E+00, &
     & 0.2995213E+00, 0.2945833E+00, 0.2892125E+00, 0.2817560E+00, &
     & 0.2730529E+00, 0.2648574E+00, 0.2530881E+00, 0.2375894E+00, &
     & 0.2215997E+00, 0.2006788E+00, 0.1637384E+00, 0.1637384E+00 /
      data (ref_adm(24,iz,17, 4),iz = 1,20) / &
     & 0.3190604E+00, 0.3190604E+00, 0.3133508E+00, 0.3113730E+00, &
     & 0.3098097E+00, 0.3087404E+00, 0.3068559E+00, 0.3036451E+00, &
     & 0.2995213E+00, 0.2945833E+00, 0.2892125E+00, 0.2817560E+00, &
     & 0.2730529E+00, 0.2648574E+00, 0.2530881E+00, 0.2375894E+00, &
     & 0.2215997E+00, 0.2006788E+00, 0.1637384E+00, 0.1637384E+00 /
      data (ref_adm(24,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.1080441E+04
      data (ref_adm(24,iz, 1, 5),iz = 1,20) / &
     & 0.4050324E+00, 0.4050324E+00, 0.3977843E+00, 0.3952735E+00, &
     & 0.3932889E+00, 0.3919316E+00, 0.3895392E+00, 0.3854635E+00, &
     & 0.3802284E+00, 0.3739598E+00, 0.3671418E+00, 0.3576761E+00, &
     & 0.3466279E+00, 0.3362241E+00, 0.3212836E+00, 0.3016087E+00, &
     & 0.2813106E+00, 0.2547525E+00, 0.2078582E+00, 0.2078582E+00 /
      data (ref_adm(24,iz, 2, 5),iz = 1,20) / &
     & 0.4050324E+00, 0.4050324E+00, 0.3977843E+00, 0.3952735E+00, &
     & 0.3932889E+00, 0.3919316E+00, 0.3895392E+00, 0.3854635E+00, &
     & 0.3802284E+00, 0.3739598E+00, 0.3671418E+00, 0.3576761E+00, &
     & 0.3466279E+00, 0.3362241E+00, 0.3212836E+00, 0.3016087E+00, &
     & 0.2813106E+00, 0.2547525E+00, 0.2078582E+00, 0.2078582E+00 /
      data (ref_adm(24,iz, 3, 5),iz = 1,20) / &
     & 0.4050324E+00, 0.4050324E+00, 0.3977843E+00, 0.3952736E+00, &
     & 0.3932889E+00, 0.3919316E+00, 0.3895392E+00, 0.3854634E+00, &
     & 0.3802284E+00, 0.3739598E+00, 0.3671418E+00, 0.3576761E+00, &
     & 0.3466279E+00, 0.3362241E+00, 0.3212836E+00, 0.3016087E+00, &
     & 0.2813106E+00, 0.2547525E+00, 0.2078582E+00, 0.2078582E+00 /
      data (ref_adm(24,iz, 4, 5),iz = 1,20) / &
     & 0.4050324E+00, 0.4050324E+00, 0.3977843E+00, 0.3952735E+00, &
     & 0.3932889E+00, 0.3919316E+00, 0.3895392E+00, 0.3854635E+00, &
     & 0.3802284E+00, 0.3739598E+00, 0.3671418E+00, 0.3576761E+00, &
     & 0.3466279E+00, 0.3362241E+00, 0.3212836E+00, 0.3016087E+00, &
     & 0.2813106E+00, 0.2547525E+00, 0.2078582E+00, 0.2078582E+00 /
      data (ref_adm(24,iz, 5, 5),iz = 1,20) / &
     & 0.4050324E+00, 0.4050324E+00, 0.3977843E+00, 0.3952736E+00, &
     & 0.3932889E+00, 0.3919316E+00, 0.3895392E+00, 0.3854634E+00, &
     & 0.3802284E+00, 0.3739598E+00, 0.3671418E+00, 0.3576761E+00, &
     & 0.3466279E+00, 0.3362241E+00, 0.3212836E+00, 0.3016087E+00, &
     & 0.2813106E+00, 0.2547525E+00, 0.2078582E+00, 0.2078582E+00 /
      data (ref_adm(24,iz, 6, 5),iz = 1,20) / &
     & 0.4050324E+00, 0.4050324E+00, 0.3977843E+00, 0.3952735E+00, &
     & 0.3932889E+00, 0.3919316E+00, 0.3895392E+00, 0.3854635E+00, &
     & 0.3802284E+00, 0.3739598E+00, 0.3671418E+00, 0.3576761E+00, &
     & 0.3466279E+00, 0.3362241E+00, 0.3212836E+00, 0.3016087E+00, &
     & 0.2813106E+00, 0.2547525E+00, 0.2078582E+00, 0.2078582E+00 /
      data (ref_adm(24,iz, 7, 5),iz = 1,20) / &
     & 0.4050324E+00, 0.4050324E+00, 0.3977843E+00, 0.3952736E+00, &
     & 0.3932889E+00, 0.3919316E+00, 0.3895392E+00, 0.3854634E+00, &
     & 0.3802284E+00, 0.3739598E+00, 0.3671418E+00, 0.3576761E+00, &
     & 0.3466279E+00, 0.3362241E+00, 0.3212836E+00, 0.3016087E+00, &
     & 0.2813106E+00, 0.2547525E+00, 0.2078582E+00, 0.2078582E+00 /
      data (ref_adm(24,iz, 8, 5),iz = 1,20) / &
     & 0.4050324E+00, 0.4050324E+00, 0.3977843E+00, 0.3952735E+00, &
     & 0.3932889E+00, 0.3919316E+00, 0.3895392E+00, 0.3854635E+00, &
     & 0.3802284E+00, 0.3739598E+00, 0.3671418E+00, 0.3576761E+00, &
     & 0.3466279E+00, 0.3362241E+00, 0.3212836E+00, 0.3016087E+00, &
     & 0.2813106E+00, 0.2547525E+00, 0.2078582E+00, 0.2078582E+00 /
      data (ref_adm(24,iz, 9, 5),iz = 1,20) / &
     & 0.4050324E+00, 0.4050324E+00, 0.3742600E+00, 0.3952736E+00, &
     & 0.3932889E+00, 0.3919316E+00, 0.2979700E+00, 0.5048000E+00, &
     & 0.3802284E+00, 0.3739598E+00, 0.3671418E+00, 0.3576761E+00, &
     & 0.3466279E+00, 0.3362241E+00, 0.3212836E+00, 0.3016087E+00, &
     & 0.2813106E+00, 0.2547525E+00, 0.2078582E+00, 0.2078582E+00 /
      data (ref_adm(24,iz,10, 5),iz = 1,20) / &
     & 0.4050324E+00, 0.4050324E+00, 0.3977843E+00, 0.3952735E+00, &
     & 0.3932889E+00, 0.3919316E+00, 0.3521800E+00, 0.4998200E+00, &
     & 0.3802284E+00, 0.3739598E+00, 0.3869100E+00, 0.3576761E+00, &
     & 0.3466279E+00, 0.3362241E+00, 0.3212836E+00, 0.3016087E+00, &
     & 0.2813106E+00, 0.2547525E+00, 0.2078582E+00, 0.2078582E+00 /
      data (ref_adm(24,iz,11, 5),iz = 1,20) / &
     & 0.4050324E+00, 0.4050324E+00, 0.3977843E+00, 0.3952736E+00, &
     & 0.3932889E+00, 0.3919316E+00, 0.3895392E+00, 0.3854634E+00, &
     & 0.3802284E+00, 0.3739598E+00, 0.3793200E+00, 0.3576761E+00, &
     & 0.3466279E+00, 0.3362241E+00, 0.3212836E+00, 0.3016087E+00, &
     & 0.2813106E+00, 0.2547525E+00, 0.2078582E+00, 0.2078582E+00 /
      data (ref_adm(24,iz,12, 5),iz = 1,20) / &
     & 0.4050324E+00, 0.4050324E+00, 0.3977843E+00, 0.3952735E+00, &
     & 0.3932889E+00, 0.3919316E+00, 0.3895392E+00, 0.3854635E+00, &
     & 0.3802284E+00, 0.3739598E+00, 0.3671418E+00, 0.3576761E+00, &
     & 0.2989700E+00, 0.3362241E+00, 0.3212836E+00, 0.3016087E+00, &
     & 0.2813106E+00, 0.2547525E+00, 0.2078582E+00, 0.2078582E+00 /
      data (ref_adm(24,iz,13, 5),iz = 1,20) / &
     & 0.4050324E+00, 0.4050324E+00, 0.3977843E+00, 0.3952736E+00, &
     & 0.3932889E+00, 0.3919316E+00, 0.3895392E+00, 0.3854634E+00, &
     & 0.3802284E+00, 0.3739598E+00, 0.3671418E+00, 0.3953300E+00, &
     & 0.2527100E+00, 0.3362241E+00, 0.3212836E+00, 0.3016087E+00, &
     & 0.2813106E+00, 0.2547525E+00, 0.2078582E+00, 0.2078582E+00 /
      data (ref_adm(24,iz,14, 5),iz = 1,20) / &
     & 0.4050324E+00, 0.4050324E+00, 0.3977843E+00, 0.3952735E+00, &
     & 0.3932889E+00, 0.3919316E+00, 0.3895392E+00, 0.3854635E+00, &
     & 0.3802284E+00, 0.3739598E+00, 0.3671418E+00, 0.3576761E+00, &
     & 0.3466279E+00, 0.3362241E+00, 0.3212836E+00, 0.3016087E+00, &
     & 0.2813106E+00, 0.2547525E+00, 0.2078582E+00, 0.2078582E+00 /
      data (ref_adm(24,iz,15, 5),iz = 1,20) / &
     & 0.4050324E+00, 0.4050324E+00, 0.3977843E+00, 0.3952736E+00, &
     & 0.3932889E+00, 0.3919316E+00, 0.3895392E+00, 0.3854634E+00, &
     & 0.3802284E+00, 0.3739598E+00, 0.3671418E+00, 0.3576761E+00, &
     & 0.3466279E+00, 0.3362241E+00, 0.3212836E+00, 0.3016087E+00, &
     & 0.2813106E+00, 0.2547525E+00, 0.2078582E+00, 0.2078582E+00 /
      data (ref_adm(24,iz,16, 5),iz = 1,20) / &
     & 0.4050324E+00, 0.4050324E+00, 0.3977843E+00, 0.3952735E+00, &
     & 0.3932889E+00, 0.3919316E+00, 0.3895392E+00, 0.3854635E+00, &
     & 0.3802284E+00, 0.3739598E+00, 0.3671418E+00, 0.3576761E+00, &
     & 0.3466279E+00, 0.3362241E+00, 0.3212836E+00, 0.3016087E+00, &
     & 0.2813106E+00, 0.2547525E+00, 0.2078582E+00, 0.2078582E+00 /
      data (ref_adm(24,iz,17, 5),iz = 1,20) / &
     & 0.4050324E+00, 0.4050324E+00, 0.3977843E+00, 0.3952736E+00, &
     & 0.3932889E+00, 0.3919316E+00, 0.3895392E+00, 0.3854634E+00, &
     & 0.3802284E+00, 0.3739598E+00, 0.3671418E+00, 0.3576761E+00, &
     & 0.3466279E+00, 0.3362241E+00, 0.3212836E+00, 0.3016087E+00, &
     & 0.2813106E+00, 0.2547525E+00, 0.2078582E+00, 0.2078582E+00 /
      data (ref_adm(24,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     & 0.3992900E+00,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(24,iz,22, 5),iz = 1,20) / &
     & 0.5817050E+00, 0.5817050E+00, 0.5712954E+00, 0.5676894E+00, &
     & 0.5648392E+00, 0.5628898E+00, 0.5594538E+00, 0.5536003E+00, &
     & 0.5460817E+00, 0.5370787E+00, 0.5272868E+00, 0.5136923E+00, &
     & 0.4978249E+00, 0.4828830E+00, 0.4614256E+00, 0.4331685E+00, &
     & 0.4040165E+00, 0.3658739E+00, 0.2985248E+00, 0.2985248E+00 /
      data (ref_adm(24,iz,23, 5),iz = 1,20) / &
     & 0.5817050E+00, 0.5817050E+00, 0.5712954E+00, 0.5676894E+00, &
     & 0.5648391E+00, 0.5628898E+00, 0.5594538E+00, 0.5536002E+00, &
     & 0.5460817E+00, 0.5370787E+00, 0.5272868E+00, 0.5136923E+00, &
     & 0.4978249E+00, 0.4828830E+00, 0.4614256E+00, 0.4331685E+00, &
     & 0.4040165E+00, 0.3658739E+00, 0.2985248E+00, 0.2985248E+00 /
      data (ref_adm(24,iz,24, 5),iz = 1,20) / &
     & 0.5817050E+00, 0.5817050E+00, 0.5712954E+00, 0.5676894E+00, &
     & 0.5648392E+00, 0.5628898E+00, 0.5594538E+00, 0.5536003E+00, &
     & 0.5460817E+00, 0.5370787E+00, 0.5272868E+00, 0.5136923E+00, &
     & 0.4978249E+00, 0.4828830E+00, 0.4614256E+00, 0.4331685E+00, &
     & 0.4040165E+00, 0.3658739E+00, 0.2985248E+00, 0.2985248E+00 /
      data (ref_adm(24,iz,25, 5),iz = 1,20) / &
     & 0.5817050E+00, 0.5817050E+00, 0.5712954E+00, 0.5676894E+00, &
     & 0.5648391E+00, 0.5628898E+00, 0.5594538E+00, 0.5536002E+00, &
     & 0.5460817E+00, 0.5370787E+00, 0.5272868E+00, 0.5136923E+00, &
     & 0.4978249E+00, 0.4828830E+00, 0.4614256E+00, 0.4331685E+00, &
     & 0.4040165E+00, 0.3658739E+00, 0.2985248E+00, 0.2985248E+00 /
      data (ref_adm(24,iz,26, 5),iz = 1,20) / &
     & 0.5817050E+00, 0.5817050E+00, 0.5712954E+00, 0.5676894E+00, &
     & 0.5648392E+00, 0.5628898E+00, 0.5594538E+00, 0.5536003E+00, &
     & 0.5460817E+00, 0.5370787E+00, 0.5272868E+00, 0.5136923E+00, &
     & 0.4978249E+00, 0.4828830E+00, 0.4614256E+00, 0.4331685E+00, &
     & 0.4040165E+00, 0.3658739E+00, 0.2985248E+00, 0.2985248E+00 /
      data (ref_adm(24,iz,27, 5),iz = 1,20) / &
     & 0.5817050E+00, 0.5817050E+00, 0.5712954E+00, 0.5676894E+00, &
     & 0.5648391E+00, 0.5628898E+00, 0.5594538E+00, 0.5536002E+00, &
     & 0.5460817E+00, 0.5370787E+00, 0.5272868E+00, 0.5136923E+00, &
     & 0.4978249E+00, 0.4828830E+00, 0.4614256E+00, 0.4331685E+00, &
     & 0.4040165E+00, 0.3658739E+00, 0.2985248E+00, 0.2985248E+00 /
      data (ref_adm(24,iz,28, 5),iz = 1,20) / &
     & 0.5797000E+00, 0.5797000E+00, 0.5712954E+00, 0.5676894E+00, &
     & 0.5648392E+00, 0.5628898E+00, 0.5594538E+00, 0.5536003E+00, &
     & 0.5460817E+00, 0.5370787E+00, 0.5272868E+00, 0.5136923E+00, &
     & 0.4978249E+00, 0.4828830E+00, 0.4614256E+00, 0.4331685E+00, &
     & 0.4040165E+00, 0.3658739E+00, 0.2985248E+00, 0.2985248E+00 /
      data (ref_adm(24,iz,29, 5),iz = 1,20) / &
     & 0.5817050E+00, 0.5817050E+00, 0.5712954E+00, 0.5676894E+00, &
     & 0.5648391E+00, 0.5628898E+00, 0.5594538E+00, 0.5536002E+00, &
     & 0.5460817E+00, 0.5370787E+00, 0.5272868E+00, 0.5136923E+00, &
     & 0.4978249E+00, 0.4828830E+00, 0.4614256E+00, 0.4331685E+00, &
     & 0.4040165E+00, 0.3658739E+00, 0.2985248E+00, 0.2985248E+00 /
      data (ref_adm(24,iz,30, 5),iz = 1,20) / &
     & 0.5817050E+00, 0.5817050E+00, 0.5712954E+00, 0.5676894E+00, &
     & 0.5648392E+00, 0.5628898E+00, 0.5594538E+00, 0.5536003E+00, &
     & 0.5460817E+00, 0.5370787E+00, 0.5272868E+00, 0.5136923E+00, &
     & 0.4978249E+00, 0.4828830E+00, 0.4614256E+00, 0.4331685E+00, &
     & 0.4040165E+00, 0.3658739E+00, 0.2985248E+00, 0.2985248E+00 /
      data (ref_adm(24,iz,31, 5),iz = 1,20) / &
     & 0.5817050E+00, 0.5817050E+00, 0.5712954E+00, 0.5676894E+00, &
     & 0.5648391E+00, 0.5628898E+00, 0.5594538E+00, 0.5536002E+00, &
     & 0.5460817E+00, 0.5370787E+00, 0.5272868E+00, 0.5136923E+00, &
     & 0.4978249E+00, 0.4828830E+00, 0.4614256E+00, 0.4331685E+00, &
     & 0.4040165E+00, 0.3658739E+00, 0.2985248E+00, 0.2985248E+00 /
      data (ref_adm(24,iz,32, 5),iz = 1,20) / &
     & 0.5817050E+00, 0.5817050E+00, 0.5712954E+00, 0.5676894E+00, &
     & 0.5648392E+00, 0.5628898E+00, 0.5594538E+00, 0.5536003E+00, &
     & 0.5460817E+00, 0.5370787E+00, 0.5272868E+00, 0.5136923E+00, &
     & 0.4978249E+00, 0.4828830E+00, 0.4614256E+00, 0.4331685E+00, &
     & 0.4040165E+00, 0.3658739E+00, 0.2985248E+00, 0.2985248E+00 /
      data (ref_adm(24,iz,33, 5),iz = 1,20) / &
     & 0.5837100E+00, 0.5837100E+00, 0.5712954E+00, 0.5676894E+00, &
     & 0.5648391E+00, 0.5628898E+00, 0.5594538E+00, 0.5536002E+00, &
     & 0.5460817E+00, 0.5370787E+00, 0.5272868E+00, 0.5136923E+00, &
     & 0.4978249E+00, 0.4828830E+00, 0.4614256E+00, 0.4331685E+00, &
     & 0.4040165E+00, 0.3658739E+00, 0.2985248E+00, 0.2985248E+00 /
      data (ref_adm(24,iz,34, 5),iz = 1,20) / &
     & 0.5817050E+00, 0.5817050E+00, 0.5712954E+00, 0.5676894E+00, &
     & 0.5648392E+00, 0.5628898E+00, 0.5594538E+00, 0.5536003E+00, &
     & 0.5460817E+00, 0.5370787E+00, 0.5272868E+00, 0.5136923E+00, &
     & 0.4978249E+00, 0.4828830E+00, 0.4614256E+00, 0.4331685E+00, &
     & 0.4040165E+00, 0.3658739E+00, 0.2985248E+00, 0.2985248E+00 /
      data (ref_adm(24,iz,35, 5),iz = 1,20) / &
     & 0.5817050E+00, 0.5817050E+00, 0.5712954E+00, 0.5676894E+00, &
     & 0.5648391E+00, 0.5628898E+00, 0.5594538E+00, 0.5536002E+00, &
     & 0.5460817E+00, 0.5370787E+00, 0.5272868E+00, 0.5136923E+00, &
     & 0.4978249E+00, 0.4828830E+00, 0.4614256E+00, 0.4331685E+00, &
     & 0.4040165E+00, 0.3658739E+00, 0.2985248E+00, 0.2985248E+00 /
      data (ref_adm(24,iz,36, 5),iz = 1,20) / &
     & 0.5817050E+00, 0.5817050E+00, 0.5712954E+00, 0.5676894E+00, &
     & 0.5648392E+00, 0.5628898E+00, 0.5594538E+00, 0.5536003E+00, &
     & 0.5460817E+00, 0.5370787E+00, 0.5272868E+00, 0.5136923E+00, &
     & 0.4978249E+00, 0.4828830E+00, 0.4614256E+00, 0.4331685E+00, &
     & 0.4040165E+00, 0.3658739E+00, 0.2985248E+00, 0.2985248E+00 /
      data (ref_adm(24,iz,37, 5),iz = 1,20) / &
     & 0.5817050E+00, 0.5817050E+00, 0.5712954E+00, 0.5676894E+00, &
     & 0.5648392E+00, 0.5628898E+00, 0.5594538E+00, 0.5536003E+00, &
     & 0.5460817E+00, 0.5370787E+00, 0.5272868E+00, 0.5136923E+00, &
     & 0.4978249E+00, 0.4828830E+00, 0.4614256E+00, 0.4331685E+00, &
     & 0.4040165E+00, 0.3658739E+00, 0.2985248E+00, 0.2985248E+00 /
      data (ref_adm(24,iz,38, 5),iz = 1,20) / &
     & 0.5817050E+00, 0.5817050E+00, 0.5712954E+00, 0.5676894E+00, &
     & 0.5648392E+00, 0.5628898E+00, 0.5594538E+00, 0.5536003E+00, &
     & 0.5460817E+00, 0.5370787E+00, 0.5272868E+00, 0.5136923E+00, &
     & 0.4978249E+00, 0.4828830E+00, 0.4614256E+00, 0.4331685E+00, &
     & 0.4040165E+00, 0.3658739E+00, 0.2985248E+00, 0.2985248E+00 /
! Solar Zenith Angle 25.0 Albedo  0.3703615E+00
      data (ref_adm(24,iz, 1, 6),iz = 1,20) / &
     & 0.4138473E+00, 0.4138473E+00, 0.4064414E+00, 0.4038760E+00, &
     & 0.4018482E+00, 0.4004613E+00, 0.3980168E+00, 0.3938524E+00, &
     & 0.3885034E+00, 0.3820984E+00, 0.3751320E+00, 0.3654603E+00, &
     & 0.3541717E+00, 0.3435414E+00, 0.3282758E+00, 0.3081726E+00, &
     & 0.3620900E+00, 0.2602967E+00, 0.2123819E+00, 0.2123819E+00 /
      data (ref_adm(24,iz, 2, 6),iz = 1,20) / &
     & 0.4138473E+00, 0.4138473E+00, 0.4064414E+00, 0.4038760E+00, &
     & 0.4018482E+00, 0.4004613E+00, 0.3980168E+00, 0.3938524E+00, &
     & 0.3885034E+00, 0.3820984E+00, 0.3751320E+00, 0.3654603E+00, &
     & 0.3541717E+00, 0.3435414E+00, 0.3282758E+00, 0.3081726E+00, &
     & 0.3620900E+00, 0.2602967E+00, 0.2123819E+00, 0.2123819E+00 /
      data (ref_adm(24,iz, 3, 6),iz = 1,20) / &
     & 0.4138473E+00, 0.4138473E+00, 0.4064414E+00, 0.4038760E+00, &
     & 0.4018482E+00, 0.4004613E+00, 0.3980168E+00, 0.3938523E+00, &
     & 0.3885034E+00, 0.3820984E+00, 0.3751319E+00, 0.3654603E+00, &
     & 0.3541717E+00, 0.3435414E+00, 0.3282758E+00, 0.3081726E+00, &
     & 0.2874328E+00, 0.2602967E+00, 0.2123819E+00, 0.2123819E+00 /
      data (ref_adm(24,iz, 4, 6),iz = 1,20) / &
     & 0.4138473E+00, 0.4138473E+00, 0.4064414E+00, 0.4038760E+00, &
     & 0.4018482E+00, 0.4004613E+00, 0.3980168E+00, 0.3938524E+00, &
     & 0.3885034E+00, 0.3820984E+00, 0.3751320E+00, 0.3654603E+00, &
     & 0.3541717E+00, 0.3435414E+00, 0.3282758E+00, 0.3081726E+00, &
     & 0.2874328E+00, 0.2602967E+00, 0.2123819E+00, 0.2123819E+00 /
      data (ref_adm(24,iz, 5, 6),iz = 1,20) / &
     & 0.4138473E+00, 0.4138473E+00, 0.4064414E+00, 0.4038760E+00, &
     & 0.4018482E+00, 0.4004613E+00, 0.3980168E+00, 0.3938523E+00, &
     & 0.3885034E+00, 0.3820984E+00, 0.3751319E+00, 0.3654603E+00, &
     & 0.3541717E+00, 0.3435414E+00, 0.3282758E+00, 0.3081726E+00, &
     & 0.2874328E+00, 0.2602967E+00, 0.2123819E+00, 0.2123819E+00 /
      data (ref_adm(24,iz, 6, 6),iz = 1,20) / &
     & 0.4138473E+00, 0.4138473E+00, 0.4064414E+00, 0.4038760E+00, &
     & 0.4018482E+00, 0.4004613E+00, 0.3980168E+00, 0.3938524E+00, &
     & 0.3885034E+00, 0.3820984E+00, 0.3751320E+00, 0.3654603E+00, &
     & 0.3541717E+00, 0.3435414E+00, 0.3282758E+00, 0.3081726E+00, &
     & 0.2874328E+00, 0.2602967E+00, 0.2123819E+00, 0.2123819E+00 /
      data (ref_adm(24,iz, 7, 6),iz = 1,20) / &
     & 0.4138473E+00, 0.4138473E+00, 0.4064414E+00, 0.4038760E+00, &
     & 0.4018482E+00, 0.4004613E+00, 0.3980168E+00, 0.3938523E+00, &
     & 0.3885034E+00, 0.3820984E+00, 0.3751319E+00, 0.3654603E+00, &
     & 0.3541717E+00, 0.3435414E+00, 0.3282758E+00, 0.3081726E+00, &
     & 0.2874328E+00, 0.2602967E+00, 0.2123819E+00, 0.2123819E+00 /
      data (ref_adm(24,iz, 8, 6),iz = 1,20) / &
     & 0.4138473E+00, 0.4138473E+00, 0.4064414E+00, 0.4038760E+00, &
     & 0.4018482E+00, 0.4004613E+00, 0.3980168E+00, 0.3938524E+00, &
     & 0.3885034E+00, 0.3820984E+00, 0.3751320E+00, 0.3654603E+00, &
     & 0.3541717E+00, 0.3435414E+00, 0.3282758E+00, 0.3081726E+00, &
     & 0.2874328E+00, 0.2602967E+00, 0.2123819E+00, 0.2123819E+00 /
      data (ref_adm(24,iz, 9, 6),iz = 1,20) / &
     & 0.4138473E+00, 0.4138473E+00, 0.4064414E+00, 0.4038760E+00, &
     & 0.4018482E+00, 0.4004613E+00, 0.3980168E+00, 0.3938523E+00, &
     & 0.3885034E+00, 0.3820984E+00, 0.3751319E+00, 0.3654603E+00, &
     & 0.3541717E+00, 0.3435414E+00, 0.3282758E+00, 0.3081726E+00, &
     & 0.2874328E+00, 0.2602967E+00, 0.2123819E+00, 0.2123819E+00 /
      data (ref_adm(24,iz,10, 6),iz = 1,20) / &
     & 0.4138473E+00, 0.4138473E+00, 0.4064414E+00, 0.4038760E+00, &
     & 0.4018482E+00, 0.3835400E+00, 0.3980168E+00, 0.3938524E+00, &
     & 0.3885034E+00, 0.3820984E+00, 0.3751320E+00, 0.3654603E+00, &
     & 0.3541717E+00, 0.3435414E+00, 0.3282758E+00, 0.3081726E+00, &
     & 0.2874328E+00, 0.2602967E+00, 0.2123819E+00, 0.2123819E+00 /
      data (ref_adm(24,iz,11, 6),iz = 1,20) / &
     & 0.4138473E+00, 0.4138473E+00, 0.4661000E+00, 0.4782500E+00, &
     & 0.3886900E+00, 0.3810500E+00, 0.3980168E+00, 0.3938523E+00, &
     & 0.3885034E+00, 0.3820984E+00, 0.3751319E+00, 0.3654603E+00, &
     & 0.3541717E+00, 0.3435414E+00, 0.3282758E+00, 0.3081726E+00, &
     & 0.2874328E+00, 0.2602967E+00, 0.2123819E+00, 0.2123819E+00 /
      data (ref_adm(24,iz,12, 6),iz = 1,20) / &
     & 0.4138473E+00, 0.4138473E+00, 0.4064414E+00, 0.4038760E+00, &
     & 0.4018482E+00, 0.4004613E+00, 0.4505200E+00, 0.4606500E+00, &
     & 0.3885034E+00, 0.3820984E+00, 0.2950200E+00, 0.2745600E+00, &
     & 0.3377600E+00, 0.3435414E+00, 0.3282758E+00, 0.3081726E+00, &
     & 0.2874328E+00, 0.2602967E+00, 0.2123819E+00, 0.2123819E+00 /
      data (ref_adm(24,iz,13, 6),iz = 1,20) / &
     & 0.4138473E+00, 0.4138473E+00, 0.4064414E+00, 0.4038760E+00, &
     & 0.4018482E+00, 0.4004613E+00, 0.3980168E+00, 0.3938523E+00, &
     & 0.2377500E+00, 0.3820984E+00, 0.3751319E+00, 0.3654603E+00, &
     & 0.2930500E+00, 0.3891500E+00, 0.3282758E+00, 0.3081726E+00, &
     & 0.2874328E+00, 0.2602967E+00, 0.2123819E+00, 0.2123819E+00 /
      data (ref_adm(24,iz,14, 6),iz = 1,20) / &
     & 0.4138473E+00, 0.4138473E+00, 0.5122900E+00, 0.4038760E+00, &
     & 0.4018482E+00, 0.4004613E+00, 0.3980168E+00, 0.3938524E+00, &
     & 0.3885034E+00, 0.3820984E+00, 0.3751320E+00, 0.3654603E+00, &
     & 0.3541717E+00, 0.3829200E+00, 0.3282758E+00, 0.3081726E+00, &
     & 0.2874328E+00, 0.2602967E+00, 0.2123819E+00, 0.2123819E+00 /
      data (ref_adm(24,iz,15, 6),iz = 1,20) / &
     & 0.4138473E+00, 0.4138473E+00, 0.4502000E+00, 0.4038760E+00, &
     & 0.4018482E+00, 0.4004613E+00, 0.3980168E+00, 0.3938523E+00, &
     & 0.3485000E+00, 0.3820984E+00, 0.3751319E+00, 0.3654603E+00, &
     & 0.3541717E+00, 0.3435414E+00, 0.3282758E+00, 0.3081726E+00, &
     & 0.2874328E+00, 0.2602967E+00, 0.2123819E+00, 0.2123819E+00 /
      data (ref_adm(24,iz,16, 6),iz = 1,20) / &
     & 0.4138473E+00, 0.4138473E+00, 0.4064414E+00, 0.4038760E+00, &
     & 0.4018482E+00, 0.3538300E+00, 0.3599900E+00, 0.3938524E+00, &
     & 0.3885034E+00, 0.3820984E+00, 0.3751320E+00, 0.3654603E+00, &
     & 0.3541717E+00, 0.3435414E+00, 0.3282758E+00, 0.3081726E+00, &
     & 0.2874328E+00, 0.2602967E+00, 0.2123819E+00, 0.2123819E+00 /
      data (ref_adm(24,iz,17, 6),iz = 1,20) / &
     & 0.4138473E+00, 0.4138473E+00, 0.4064414E+00, 0.4038760E+00, &
     & 0.4018482E+00, 0.4004613E+00, 0.3980168E+00, 0.3938523E+00, &
     & 0.3885034E+00, 0.3820984E+00, 0.3751319E+00, 0.3654603E+00, &
     & 0.3541717E+00, 0.3435414E+00, 0.3282758E+00, 0.3081726E+00, &
     & 0.2874328E+00, 0.2602967E+00, 0.2123819E+00, 0.2123819E+00 /
      data (ref_adm(24,iz,18, 6),iz = 1,20) / &
     & 0.4059323E+00, 0.4059323E+00, 0.4153771E+00, 0.4234577E+00, &
     & 0.4129882E+00, 0.3956388E+00, 0.3870981E+00, 0.3856413E+00, &
     & 0.3873761E+00, 0.3887728E+00, 0.3886117E+00, 0.3882418E+00, &
     & 0.3881639E+00, 0.3865578E+00, 0.3818988E+00, 0.3712664E+00, &
     & 0.3552971E+00, 0.3282079E+00, 0.2863364E+00, 0.2863364E+00 /
      data (ref_adm(24,iz,19, 6),iz = 1,20) / &
     & 0.4051233E+00, 0.4051233E+00, 0.4111841E+00, 0.4216870E+00, &
     & 0.4231912E+00, 0.4073574E+00, 0.3932430E+00, 0.3881786E+00, &
     & 0.3882585E+00, 0.3900349E+00, 0.3905869E+00, 0.3889741E+00, &
     & 0.3872028E+00, 0.3850056E+00, 0.3793513E+00, 0.3681213E+00, &
     & 0.3516874E+00, 0.3247524E+00, 0.2843821E+00, 0.2843821E+00 /
      data (ref_adm(24,iz,20, 6),iz = 1,20) / &
     & 0.4045439E+00, 0.4045439E+00, 0.4075091E+00, 0.4155102E+00, &
     & 0.4256843E+00, 0.4215665E+00, 0.4050060E+00, 0.3937796E+00, &
     & 0.3904387E+00, 0.3911042E+00, 0.3922940E+00, 0.3908831E+00, &
     & 0.3875550E+00, 0.3842795E+00, 0.3778594E+00, 0.3657840E+00, &
     & 0.3490870E+00, 0.3223249E+00, 0.2833681E+00, 0.2833681E+00 /
      data (ref_adm(24,iz,21, 6),iz = 1,20) / &
     & 0.4040197E+00, 0.4040197E+00, 0.4050107E+00, 0.4092836E+00, &
     & 0.4192948E+00, 0.4295114E+00, 0.4216714E+00, 0.4047203E+00, &
     & 0.3952527E+00, 0.3928790E+00, 0.3934694E+00, 0.3931615E+00, &
     & 0.3892277E+00, 0.3844830E+00, 0.3772055E+00, 0.3644192E+00, &
     & 0.3473261E+00, 0.3207074E+00, 0.2830808E+00, 0.2830808E+00 /
      data (ref_adm(24,iz,22, 6),iz = 1,20) / &
     & 0.4173034E+00, 0.4173034E+00, 0.4098357E+00, 0.4072489E+00, &
     & 0.4052042E+00, 0.4038057E+00, 0.4013409E+00, 0.3971415E+00, &
     & 0.3917479E+00, 0.3852894E+00, 0.3782648E+00, 0.3685124E+00, &
     & 0.3571295E+00, 0.3464105E+00, 0.3310173E+00, 0.3107463E+00, &
     & 0.2898332E+00, 0.2624705E+00, 0.2141556E+00, 0.2141556E+00 /
      data (ref_adm(24,iz,23, 6),iz = 1,20) / &
     & 0.4173034E+00, 0.4173034E+00, 0.4207100E+00, 0.4072489E+00, &
     & 0.4052041E+00, 0.4038057E+00, 0.4013409E+00, 0.3971415E+00, &
     & 0.3917479E+00, 0.3852894E+00, 0.3782648E+00, 0.3685124E+00, &
     & 0.3571295E+00, 0.3464105E+00, 0.3310173E+00, 0.3099300E+00, &
     & 0.3102900E+00, 0.2624705E+00, 0.2141556E+00, 0.2141556E+00 /
      data (ref_adm(24,iz,24, 6),iz = 1,20) / &
     & 0.4173034E+00, 0.4173034E+00, 0.4714900E+00, 0.4072489E+00, &
     & 0.4052042E+00, 0.4038057E+00, 0.4013409E+00, 0.3971415E+00, &
     & 0.3917479E+00, 0.3852894E+00, 0.3782648E+00, 0.3685124E+00, &
     & 0.3571295E+00, 0.3464105E+00, 0.3310173E+00, 0.3107463E+00, &
     & 0.2898332E+00, 0.2624705E+00, 0.2141556E+00, 0.2141556E+00 /
      data (ref_adm(24,iz,25, 6),iz = 1,20) / &
     & 0.4173034E+00, 0.4173034E+00, 0.4098357E+00, 0.4072489E+00, &
     & 0.4052041E+00, 0.4202500E+00, 0.4013409E+00, 0.3971415E+00, &
     & 0.3917479E+00, 0.3852894E+00, 0.3782648E+00, 0.3685124E+00, &
     & 0.3571295E+00, 0.3464105E+00, 0.3310173E+00, 0.3107463E+00, &
     & 0.2898332E+00, 0.2624705E+00, 0.2141556E+00, 0.2141556E+00 /
      data (ref_adm(24,iz,26, 6),iz = 1,20) / &
     & 0.4173034E+00, 0.4173034E+00, 0.4098357E+00, 0.4072489E+00, &
     & 0.4052042E+00, 0.4745800E+00, 0.4013409E+00, 0.3971415E+00, &
     & 0.3917479E+00, 0.3852894E+00, 0.3782648E+00, 0.3685124E+00, &
     & 0.3571295E+00, 0.3464105E+00, 0.3310173E+00, 0.3107463E+00, &
     & 0.2898332E+00, 0.2624705E+00, 0.2141556E+00, 0.2141556E+00 /
      data (ref_adm(24,iz,27, 6),iz = 1,20) / &
     & 0.4173034E+00, 0.4173034E+00, 0.4098357E+00, 0.4072489E+00, &
     & 0.4052041E+00, 0.4038057E+00, 0.4013409E+00, 0.3971415E+00, &
     & 0.3917479E+00, 0.3852894E+00, 0.3782648E+00, 0.3685124E+00, &
     & 0.3571295E+00, 0.3464105E+00, 0.3310173E+00, 0.3107463E+00, &
     & 0.2898332E+00, 0.2624705E+00, 0.2141556E+00, 0.2141556E+00 /
      data (ref_adm(24,iz,28, 6),iz = 1,20) / &
     & 0.4173034E+00, 0.4173034E+00, 0.4098357E+00, 0.4072489E+00, &
     & 0.4052042E+00, 0.4038057E+00, 0.4013409E+00, 0.3971415E+00, &
     & 0.2088200E+00, 0.3852894E+00, 0.3782648E+00, 0.3685124E+00, &
     & 0.3571295E+00, 0.3464105E+00, 0.3310173E+00, 0.3107463E+00, &
     & 0.2898332E+00, 0.2624705E+00, 0.2141556E+00, 0.2141556E+00 /
      data (ref_adm(24,iz,29, 6),iz = 1,20) / &
     & 0.4173034E+00, 0.4173034E+00, 0.4779900E+00, 0.4072489E+00, &
     & 0.4052041E+00, 0.4038057E+00, 0.4013409E+00, 0.3971415E+00, &
     & 0.3917479E+00, 0.3600200E+00, 0.3782648E+00, 0.3685124E+00, &
     & 0.3571295E+00, 0.3464105E+00, 0.3310173E+00, 0.3107463E+00, &
     & 0.2898332E+00, 0.2624705E+00, 0.2141556E+00, 0.2141556E+00 /
      data (ref_adm(24,iz,30, 6),iz = 1,20) / &
     & 0.4173034E+00, 0.4173034E+00, 0.4748800E+00, 0.4411000E+00, &
     & 0.3418100E+00, 0.4038057E+00, 0.4013409E+00, 0.3971415E+00, &
     & 0.3917479E+00, 0.3913300E+00, 0.3782648E+00, 0.3685124E+00, &
     & 0.3571295E+00, 0.3464105E+00, 0.3310173E+00, 0.3107463E+00, &
     & 0.2898332E+00, 0.2624705E+00, 0.2141556E+00, 0.2141556E+00 /
      data (ref_adm(24,iz,31, 6),iz = 1,20) / &
     & 0.2256400E+00, 0.2256400E+00, 0.4098357E+00, 0.4182600E+00, &
     & 0.4052041E+00, 0.4038057E+00, 0.4013409E+00, 0.3971415E+00, &
     & 0.3917479E+00, 0.5062900E+00, 0.3782648E+00, 0.3685124E+00, &
     & 0.3571295E+00, 0.3464105E+00, 0.3310173E+00, 0.3107463E+00, &
     & 0.2898332E+00, 0.2624705E+00, 0.2141556E+00, 0.2141556E+00 /
      data (ref_adm(24,iz,32, 6),iz = 1,20) / &
     & 0.4149900E+00, 0.4149900E+00, 0.4098357E+00, 0.4826500E+00, &
     & 0.4052042E+00, 0.4038057E+00, 0.4013409E+00, 0.3971415E+00, &
     & 0.3917479E+00, 0.3852894E+00, 0.3782648E+00, 0.3685124E+00, &
     & 0.3571295E+00, 0.3464105E+00, 0.3310173E+00, 0.3107463E+00, &
     & 0.2898332E+00, 0.2624705E+00, 0.2141556E+00, 0.2141556E+00 /
      data (ref_adm(24,iz,33, 6),iz = 1,20) / &
     & 0.2124900E+00, 0.2124900E+00, 0.4098357E+00, 0.4916000E+00, &
     & 0.4052041E+00, 0.4038057E+00, 0.4013409E+00, 0.3971415E+00, &
     & 0.3917479E+00, 0.3852894E+00, 0.3782648E+00, 0.3685124E+00, &
     & 0.3571295E+00, 0.3464105E+00, 0.3310173E+00, 0.3107463E+00, &
     & 0.2898332E+00, 0.2624705E+00, 0.2141556E+00, 0.2141556E+00 /
      data (ref_adm(24,iz,34, 6),iz = 1,20) / &
     & 0.4173034E+00, 0.4173034E+00, 0.4098357E+00, 0.4072489E+00, &
     & 0.4052042E+00, 0.4038057E+00, 0.4013409E+00, 0.3971415E+00, &
     & 0.3917479E+00, 0.3852894E+00, 0.3782648E+00, 0.3685124E+00, &
     & 0.3571295E+00, 0.3464105E+00, 0.3310173E+00, 0.3107463E+00, &
     & 0.2898332E+00, 0.2624705E+00, 0.2141556E+00, 0.2141556E+00 /
      data (ref_adm(24,iz,35, 6),iz = 1,20) / &
     & 0.4283800E+00, 0.4283800E+00, 0.4098357E+00, 0.4072489E+00, &
     & 0.4052041E+00, 0.4038057E+00, 0.4013409E+00, 0.3971415E+00, &
     & 0.3917479E+00, 0.3852894E+00, 0.3782648E+00, 0.3685124E+00, &
     & 0.3571295E+00, 0.3464105E+00, 0.3310173E+00, 0.3107463E+00, &
     & 0.2898332E+00, 0.2624705E+00, 0.2141556E+00, 0.2141556E+00 /
      data (ref_adm(24,iz,36, 6),iz = 1,20) / &
     & 0.4173034E+00, 0.4173034E+00, 0.4098357E+00, 0.4072489E+00, &
     & 0.4052042E+00, 0.4038057E+00, 0.4013409E+00, 0.3971415E+00, &
     & 0.3917479E+00, 0.3852894E+00, 0.3782648E+00, 0.3685124E+00, &
     & 0.3571295E+00, 0.3464105E+00, 0.3310173E+00, 0.3107463E+00, &
     & 0.2898332E+00, 0.2624705E+00, 0.2141556E+00, 0.2141556E+00 /
      data (ref_adm(24,iz,37, 6),iz = 1,20) / &
     & 0.4173034E+00, 0.4173034E+00, 0.4098357E+00, 0.4072489E+00, &
     & 0.4052042E+00, 0.4038057E+00, 0.4013409E+00, 0.3971415E+00, &
     & 0.3917479E+00, 0.3852894E+00, 0.3782648E+00, 0.3685124E+00, &
     & 0.3571295E+00, 0.3464105E+00, 0.3310173E+00, 0.3107463E+00, &
     & 0.2898332E+00, 0.2624705E+00, 0.2141556E+00, 0.2141556E+00 /
      data (ref_adm(24,iz,38, 6),iz = 1,20) / &
     & 0.4173034E+00, 0.4173034E+00, 0.4098357E+00, 0.4072489E+00, &
     & 0.4052042E+00, 0.4038057E+00, 0.4013409E+00, 0.3971415E+00, &
     & 0.3917479E+00, 0.3852894E+00, 0.3782648E+00, 0.3685124E+00, &
     & 0.3571295E+00, 0.3464105E+00, 0.3310173E+00, 0.3107463E+00, &
     & 0.2898332E+00, 0.2624705E+00, 0.2141556E+00, 0.2141556E+00 /
! Solar Zenith Angle 30.0 Albedo  0.3528452E+00
      data (ref_adm(24,iz, 1, 7),iz = 1,20) / &
     & 0.3452571E+00, 0.3452571E+00, 0.3397163E+00, 0.3408417E+00, &
     & 0.3462282E+00, 0.3713900E+00, 0.3380400E+00, 0.3382828E+00, &
     & 0.3353608E+00, 0.3338805E+00, 0.3343883E+00, 0.3357598E+00, &
     & 0.3391340E+00, 0.3431825E+00, 0.3468654E+00, 0.3500426E+00, &
     & 0.3723300E+00, 0.3348140E+00, 0.2824740E+00, 0.2824740E+00 /
      data (ref_adm(24,iz, 2, 7),iz = 1,20) / &
     & 0.3452571E+00, 0.3452571E+00, 0.3397163E+00, 0.3408417E+00, &
     & 0.3462282E+00, 0.3713900E+00, 0.3380400E+00, 0.3382828E+00, &
     & 0.3353608E+00, 0.3338805E+00, 0.3343883E+00, 0.3357598E+00, &
     & 0.3391340E+00, 0.3431825E+00, 0.3468654E+00, 0.3500426E+00, &
     & 0.3723300E+00, 0.3348140E+00, 0.2824740E+00, 0.2824740E+00 /
      data (ref_adm(24,iz, 3, 7),iz = 1,20) / &
     & 0.3452552E+00, 0.3452552E+00, 0.3397281E+00, 0.3408515E+00, &
     & 0.3461953E+00, 0.3464046E+00, 0.3423437E+00, 0.3385511E+00, &
     & 0.2951300E+00, 0.3338817E+00, 0.3344431E+00, 0.3358743E+00, &
     & 0.3391153E+00, 0.3428701E+00, 0.3468055E+00, 0.3126800E+00, &
     & 0.3485273E+00, 0.3346668E+00, 0.1172840E+00, 0.1172840E+00 /
      data (ref_adm(24,iz, 4, 7),iz = 1,20) / &
     & 0.3452286E+00, 0.3452286E+00, 0.3397554E+00, 0.3409075E+00, &
     & 0.3461981E+00, 0.3465867E+00, 0.3422407E+00, 0.3538900E+00, &
     & 0.3000700E+00, 0.3340436E+00, 0.3343424E+00, 0.3361616E+00, &
     & 0.3391323E+00, 0.3425813E+00, 0.3470055E+00, 0.3561700E+00, &
     & 0.3481905E+00, 0.3342243E+00, 0.2823825E+00, 0.2823825E+00 /
      data (ref_adm(24,iz, 5, 7),iz = 1,20) / &
     & 0.3453122E+00, 0.3453122E+00, 0.3398266E+00, 0.3410131E+00, &
     & 0.3462700E+00, 0.3465053E+00, 0.3314500E+00, 0.3991600E+00, &
     & 0.3550400E+00, 0.3340519E+00, 0.4133800E+00, 0.3358328E+00, &
     & 0.3391152E+00, 0.3428692E+00, 0.3132700E+00, 0.3057000E+00, &
     & 0.3483148E+00, 0.3343224E+00, 0.2822334E+00, 0.2822334E+00 /
      data (ref_adm(24,iz, 6, 7),iz = 1,20) / &
     & 0.3456899E+00, 0.3456899E+00, 0.3397726E+00, 0.3410488E+00, &
     & 0.3461571E+00, 0.3466830E+00, 0.3426197E+00, 0.3388994E+00, &
     & 0.3356833E+00, 0.3342682E+00, 0.3344820E+00, 0.3360296E+00, &
     & 0.3391064E+00, 0.3425697E+00, 0.3342300E+00, 0.3030200E+00, &
     & 0.3479510E+00, 0.3339919E+00, 0.2820794E+00, 0.2820794E+00 /
      data (ref_adm(24,iz, 7, 7),iz = 1,20) / &
     & 0.3455780E+00, 0.3455780E+00, 0.3400689E+00, 0.4160900E+00, &
     & 0.3459304E+00, 0.3468582E+00, 0.3428036E+00, 0.3391597E+00, &
     & 0.3359143E+00, 0.3344080E+00, 0.3344949E+00, 0.3361555E+00, &
     & 0.3389125E+00, 0.3423746E+00, 0.3226000E+00, 0.3090400E+00, &
     & 0.3476434E+00, 0.3337696E+00, 0.2818710E+00, 0.2818710E+00 /
      data (ref_adm(24,iz, 8, 7),iz = 1,20) / &
     & 0.3456217E+00, 0.3456217E+00, 0.4649500E+00, 0.3409017E+00, &
     & 0.3456281E+00, 0.3470320E+00, 0.3431611E+00, 0.3391091E+00, &
     & 0.3361026E+00, 0.3345727E+00, 0.3344897E+00, 0.3360149E+00, &
     & 0.2706000E+00, 0.3422515E+00, 0.2548000E+00, 0.3489450E+00, &
     & 0.3472357E+00, 0.3333997E+00, 0.2815187E+00, 0.2815187E+00 /
      data (ref_adm(24,iz, 9, 7),iz = 1,20) / &
     & 0.3458565E+00, 0.3458565E+00, 0.3402211E+00, 0.3406872E+00, &
     & 0.3455969E+00, 0.3473405E+00, 0.3432817E+00, 0.3395262E+00, &
     & 0.3362936E+00, 0.3346204E+00, 0.3344334E+00, 0.3359690E+00, &
     & 0.3387002E+00, 0.3420095E+00, 0.2960800E+00, 0.2698000E+00, &
     & 0.3467928E+00, 0.3329490E+00, 0.2812596E+00, 0.2812596E+00 /
      data (ref_adm(24,iz,10, 7),iz = 1,20) / &
     & 0.2814300E+00, 0.2814300E+00, 0.3410200E+00, 0.3405191E+00, &
     & 0.3455834E+00, 0.3474537E+00, 0.3437170E+00, 0.3398102E+00, &
     & 0.3365125E+00, 0.3347555E+00, 0.3345674E+00, 0.3360821E+00, &
     & 0.3386162E+00, 0.3418137E+00, 0.3256100E+00, 0.3481092E+00, &
     & 0.3463250E+00, 0.3325478E+00, 0.2809408E+00, 0.2809408E+00 /
      data (ref_adm(24,iz,11, 7),iz = 1,20) / &
     & 0.3113100E+00, 0.3113100E+00, 0.4460400E+00, 0.3931800E+00, &
     & 0.3484400E+00, 0.3307600E+00, 0.2945200E+00, 0.3443600E+00, &
     & 0.3783500E+00, 0.2716400E+00, 0.3346857E+00, 0.3361245E+00, &
     & 0.3384158E+00, 0.3416150E+00, 0.3452199E+00, 0.3477890E+00, &
     & 0.3458480E+00, 0.3320960E+00, 0.2805832E+00, 0.2805832E+00 /
      data (ref_adm(24,iz,12, 7),iz = 1,20) / &
     & 0.4545400E+00, 0.4545400E+00, 0.3408516E+00, 0.3953300E+00, &
     & 0.4708200E+00, 0.5401700E+00, 0.3765000E+00, 0.3400600E+00, &
     & 0.3282000E+00, 0.3305100E+00, 0.3277300E+00, 0.3229400E+00, &
     & 0.2949000E+00, 0.3412497E+00, 0.3449170E+00, 0.3472505E+00, &
     & 0.3452957E+00, 0.3316384E+00, 0.2801878E+00, 0.2801878E+00 /
      data (ref_adm(24,iz,13, 7),iz = 1,20) / &
     & 0.3460843E+00, 0.3460843E+00, 0.3408481E+00, 0.3853500E+00, &
     & 0.3986000E+00, 0.3674700E+00, 0.3444717E+00, 0.3640800E+00, &
     & 0.3642100E+00, 0.3315200E+00, 0.3348869E+00, 0.3623200E+00, &
     & 0.2873500E+00, 0.3405727E+00, 0.3446688E+00, 0.3467747E+00, &
     & 0.3447583E+00, 0.3309391E+00, 0.2797872E+00, 0.2797872E+00 /
      data (ref_adm(24,iz,14, 7),iz = 1,20) / &
     & 0.3461510E+00, 0.3461510E+00, 0.3408131E+00, 0.3990300E+00, &
     & 0.3192900E+00, 0.3659800E+00, 0.3080500E+00, 0.2792200E+00, &
     & 0.3376493E+00, 0.4296100E+00, 0.3350304E+00, 0.2958400E+00, &
     & 0.2642000E+00, 0.2280500E+00, 0.3441074E+00, 0.3460726E+00, &
     & 0.3443185E+00, 0.3304200E+00, 0.2794382E+00, 0.2794382E+00 /
      data (ref_adm(24,iz,15, 7),iz = 1,20) / &
     & 0.3466751E+00, 0.3466751E+00, 0.3410606E+00, 0.3398996E+00, &
     & 0.3359400E+00, 0.2900600E+00, 0.2710400E+00, 0.3374900E+00, &
     & 0.3380721E+00, 0.3361771E+00, 0.3350285E+00, 0.3362068E+00, &
     & 0.3576700E+00, 0.3618100E+00, 0.3437102E+00, 0.3453828E+00, &
     & 0.3434720E+00, 0.3296945E+00, 0.2790184E+00, 0.2790184E+00 /
      data (ref_adm(24,iz,16, 7),iz = 1,20) / &
     & 0.3466600E+00, 0.3466600E+00, 0.3560700E+00, 0.3402161E+00, &
     & 0.2930500E+00, 0.3003800E+00, 0.2975500E+00, 0.3302400E+00, &
     & 0.3512900E+00, 0.3364110E+00, 0.3352721E+00, 0.3868600E+00, &
     & 0.3377131E+00, 0.3401125E+00, 0.3434256E+00, 0.3450775E+00, &
     & 0.3431108E+00, 0.3291984E+00, 0.2786114E+00, 0.2786114E+00 /
      data (ref_adm(24,iz,17, 7),iz = 1,20) / &
     & 0.3758300E+00, 0.3758300E+00, 0.3392600E+00, 0.3404829E+00, &
     & 0.3083400E+00, 0.3927000E+00, 0.3972300E+00, 0.3428125E+00, &
     & 0.3481600E+00, 0.3366331E+00, 0.3357117E+00, 0.3327200E+00, &
     & 0.2585800E+00, 0.3396946E+00, 0.3429330E+00, 0.3445031E+00, &
     & 0.3422310E+00, 0.3283748E+00, 0.2782125E+00, 0.2782125E+00 /
      data (ref_adm(24,iz,18, 7),iz = 1,20) / &
     & 0.3687770E+00, 0.3687770E+00, 0.3575911E+00, 0.3726700E+00, &
     & 0.3509244E+00, 0.3492308E+00, 0.3468490E+00, 0.3433124E+00, &
     & 0.3703700E+00, 0.3933300E+00, 0.3311300E+00, 0.3261143E+00, &
     & 0.3207033E+00, 0.3159127E+00, 0.3092549E+00, 0.3008415E+00, &
     & 0.2926633E+00, 0.2819348E+00, 0.2543558E+00, 0.2543558E+00 /
      data (ref_adm(24,iz,19, 7),iz = 1,20) / &
     & 0.3687770E+00, 0.3687770E+00, 0.3575911E+00, 0.3537266E+00, &
     & 0.3694000E+00, 0.3492308E+00, 0.3468490E+00, 0.3433124E+00, &
     & 0.2741000E+00, 0.3639000E+00, 0.3311300E+00, 0.3261143E+00, &
     & 0.3343600E+00, 0.2563100E+00, 0.3092549E+00, 0.3008415E+00, &
     & 0.2926633E+00, 0.2819348E+00, 0.2543559E+00, 0.2543559E+00 /
      data (ref_adm(24,iz,20, 7),iz = 1,20) / &
     & 0.3687770E+00, 0.3687770E+00, 0.3575911E+00, 0.3537266E+00, &
     & 0.3509244E+00, 0.3492308E+00, 0.3468490E+00, 0.3433124E+00, &
     & 0.2711900E+00, 0.3116100E+00, 0.4055600E+00, 0.3261143E+00, &
     & 0.3432500E+00, 0.3159127E+00, 0.3092549E+00, 0.3008415E+00, &
     & 0.2926633E+00, 0.2819348E+00, 0.2543558E+00, 0.2543558E+00 /
      data (ref_adm(24,iz,21, 7),iz = 1,20) / &
     & 0.3687770E+00, 0.3687770E+00, 0.4027600E+00, 0.3537266E+00, &
     & 0.3509244E+00, 0.3492308E+00, 0.3666200E+00, 0.3433124E+00, &
     & 0.3394107E+00, 0.2709000E+00, 0.3765000E+00, 0.3261143E+00, &
     & 0.3207033E+00, 0.3159127E+00, 0.3092549E+00, 0.3008415E+00, &
     & 0.2926633E+00, 0.2819348E+00, 0.2543559E+00, 0.2543559E+00 /
      data (ref_adm(24,iz,22, 7),iz = 1,20) / &
     & 0.3573384E+00, 0.3573384E+00, 0.3572576E+00, 0.3584070E+00, &
     & 0.3636499E+00, 0.3729360E+00, 0.3769144E+00, 0.3755150E+00, &
     & 0.3743736E+00, 0.3737589E+00, 0.2880800E+00, 0.3369300E+00, &
     & 0.3806818E+00, 0.3819952E+00, 0.3820524E+00, 0.3779564E+00, &
     & 0.3676351E+00, 0.3440101E+00, 0.2868318E+00, 0.2868318E+00 /
      data (ref_adm(24,iz,23, 7),iz = 1,20) / &
     & 0.3996900E+00, 0.3996900E+00, 0.3578761E+00, 0.3581107E+00, &
     & 0.3626171E+00, 0.3715786E+00, 0.3775554E+00, 0.3762289E+00, &
     & 0.3754669E+00, 0.3743222E+00, 0.3753525E+00, 0.3447300E+00, &
     & 0.3803715E+00, 0.3808027E+00, 0.3807651E+00, 0.2814100E+00, &
     & 0.3656702E+00, 0.3424957E+00, 0.2861136E+00, 0.2861136E+00 /
      data (ref_adm(24,iz,24, 7),iz = 1,20) / &
     & 0.3573035E+00, 0.3573035E+00, 0.3242300E+00, 0.3931900E+00, &
     & 0.3615329E+00, 0.3702273E+00, 0.3775937E+00, 0.3774397E+00, &
     & 0.3762367E+00, 0.3754778E+00, 0.3760363E+00, 0.2907600E+00, &
     & 0.3802630E+00, 0.3804068E+00, 0.2679700E+00, 0.3282200E+00, &
     & 0.3643637E+00, 0.3409059E+00, 0.2852790E+00, 0.2852790E+00 /
      data (ref_adm(24,iz,25, 7),iz = 1,20) / &
     & 0.3577875E+00, 0.3577875E+00, 0.3581361E+00, 0.3639100E+00, &
     & 0.4103900E+00, 0.5397500E+00, 0.4525900E+00, 0.3629500E+00, &
     & 0.3774320E+00, 0.3761835E+00, 0.2777300E+00, 0.2857000E+00, &
     & 0.2949200E+00, 0.3798502E+00, 0.3387900E+00, 0.3044300E+00, &
     & 0.3626136E+00, 0.3395691E+00, 0.2845975E+00, 0.2845975E+00 /
      data (ref_adm(24,iz,26, 7),iz = 1,20) / &
     & 0.3578055E+00, 0.3578055E+00, 0.3587556E+00, 0.3589165E+00, &
     & 0.4378000E+00, 0.4054300E+00, 0.3659700E+00, 0.3740200E+00, &
     & 0.3779818E+00, 0.3771506E+00, 0.3767674E+00, 0.3778014E+00, &
     & 0.3487700E+00, 0.3223200E+00, 0.2579300E+00, 0.2776800E+00, &
     & 0.3614655E+00, 0.3381120E+00, 0.2839172E+00, 0.2839172E+00 /
      data (ref_adm(24,iz,27, 7),iz = 1,20) / &
     & 0.3581525E+00, 0.3581525E+00, 0.3590907E+00, 0.3587805E+00, &
     & 0.3803600E+00, 0.3660500E+00, 0.3761677E+00, 0.3717200E+00, &
     & 0.3379900E+00, 0.3779963E+00, 0.3773630E+00, 0.3780302E+00, &
     & 0.3794957E+00, 0.3791589E+00, 0.3153700E+00, 0.3715490E+00, &
     & 0.3602418E+00, 0.3369188E+00, 0.2833335E+00, 0.2833335E+00 /
      data (ref_adm(24,iz,28, 7),iz = 1,20) / &
     & 0.3583553E+00, 0.3583553E+00, 0.3601564E+00, 0.4318600E+00, &
     & 0.3989000E+00, 0.3249000E+00, 0.3750567E+00, 0.3810703E+00, &
     & 0.3799276E+00, 0.3790227E+00, 0.3776293E+00, 0.3782335E+00, &
     & 0.3791060E+00, 0.3789374E+00, 0.3762880E+00, 0.3703505E+00, &
     & 0.3591779E+00, 0.3357120E+00, 0.2827612E+00, 0.2827612E+00 /
      data (ref_adm(24,iz,29, 7),iz = 1,20) / &
     & 0.2004200E+00, 0.2004200E+00, 0.4438900E+00, 0.4102700E+00, &
     & 0.4133900E+00, 0.4164400E+00, 0.3601500E+00, 0.3813660E+00, &
     & 0.3806455E+00, 0.3796872E+00, 0.3782904E+00, 0.3784603E+00, &
     & 0.3787699E+00, 0.3790931E+00, 0.3757651E+00, 0.3693224E+00, &
     & 0.3580705E+00, 0.3344501E+00, 0.2822112E+00, 0.2822112E+00 /
      data (ref_adm(24,iz,30, 7),iz = 1,20) / &
     & 0.3585718E+00, 0.3585718E+00, 0.3630438E+00, 0.4470400E+00, &
     & 0.3606100E+00, 0.3632329E+00, 0.3617200E+00, 0.4190000E+00, &
     & 0.4554200E+00, 0.3804736E+00, 0.3790610E+00, 0.3786848E+00, &
     & 0.3786757E+00, 0.3784600E+00, 0.3754499E+00, 0.3687584E+00, &
     & 0.3573980E+00, 0.3337896E+00, 0.2818711E+00, 0.2818711E+00 /
      data (ref_adm(24,iz,31, 7),iz = 1,20) / &
     & 0.3591307E+00, 0.3591307E+00, 0.3643613E+00, 0.3618805E+00, &
     & 0.3606434E+00, 0.3625337E+00, 0.3719288E+00, 0.3811577E+00, &
     & 0.4902900E+00, 0.3810938E+00, 0.3794969E+00, 0.3788232E+00, &
     & 0.3786524E+00, 0.3782855E+00, 0.3749841E+00, 0.3679774E+00, &
     & 0.3566872E+00, 0.3327032E+00, 0.2815516E+00, 0.2815516E+00 /
      data (ref_adm(24,iz,32, 7),iz = 1,20) / &
     & 0.3590624E+00, 0.3590624E+00, 0.3686730E+00, 0.3641646E+00, &
     & 0.3609196E+00, 0.3627493E+00, 0.3704020E+00, 0.3809242E+00, &
     & 0.4901800E+00, 0.3817858E+00, 0.3801726E+00, 0.3789548E+00, &
     & 0.3786356E+00, 0.3780927E+00, 0.3748365E+00, 0.3674570E+00, &
     & 0.3559434E+00, 0.3320309E+00, 0.2811796E+00, 0.2811796E+00 /
      data (ref_adm(24,iz,33, 7),iz = 1,20) / &
     & 0.3592408E+00, 0.3592408E+00, 0.3739950E+00, 0.3671257E+00, &
     & 0.3617014E+00, 0.3624448E+00, 0.3694735E+00, 0.3805499E+00, &
     & 0.5072700E+00, 0.3820252E+00, 0.3805227E+00, 0.3792945E+00, &
     & 0.3784373E+00, 0.3783875E+00, 0.3744411E+00, 0.3665736E+00, &
     & 0.3553177E+00, 0.3312668E+00, 0.2810190E+00, 0.2810190E+00 /
      data (ref_adm(24,iz,34, 7),iz = 1,20) / &
     & 0.3596041E+00, 0.3596041E+00, 0.3807689E+00, 0.3712486E+00, &
     & 0.3620172E+00, 0.3622708E+00, 0.3690883E+00, 0.3800746E+00, &
     & 0.4861800E+00, 0.3824322E+00, 0.3811660E+00, 0.3797368E+00, &
     & 0.3786262E+00, 0.3781437E+00, 0.3743872E+00, 0.3665398E+00, &
     & 0.3546564E+00, 0.3306832E+00, 0.2807472E+00, 0.2807472E+00 /
      data (ref_adm(24,iz,35, 7),iz = 1,20) / &
     & 0.3595435E+00, 0.3595435E+00, 0.4039100E+00, 0.3769168E+00, &
     & 0.3624793E+00, 0.3619945E+00, 0.3684296E+00, 0.3798516E+00, &
     & 0.3844923E+00, 0.3829211E+00, 0.3812762E+00, 0.3797674E+00, &
     & 0.3787217E+00, 0.3779783E+00, 0.3741487E+00, 0.3662239E+00, &
     & 0.3540653E+00, 0.3302708E+00, 0.2806065E+00, 0.2806065E+00 /
      data (ref_adm(24,iz,36, 7),iz = 1,20) / &
     & 0.3588200E+00, 0.3588200E+00, 0.4622100E+00, 0.3828553E+00, &
     & 0.3624660E+00, 0.3624494E+00, 0.3680978E+00, 0.3798578E+00, &
     & 0.3846584E+00, 0.3832960E+00, 0.3815573E+00, 0.3799170E+00, &
     & 0.3787585E+00, 0.3779488E+00, 0.3740995E+00, 0.3659856E+00, &
     & 0.3538843E+00, 0.3300826E+00, 0.2805594E+00, 0.2805594E+00 /
      data (ref_adm(24,iz,37, 7),iz = 1,20) / &
     & 0.3600720E+00, 0.3600720E+00, 0.4120453E+00, 0.3863273E+00, &
     & 0.3625996E+00, 0.3621972E+00, 0.3680609E+00, 0.3793806E+00, &
     & 0.3846290E+00, 0.3835522E+00, 0.3816720E+00, 0.3797323E+00, &
     & 0.3787413E+00, 0.3782461E+00, 0.3740527E+00, 0.3659468E+00, &
     & 0.3540097E+00, 0.3301216E+00, 0.2804768E+00, 0.2804768E+00 /
      data (ref_adm(24,iz,38, 7),iz = 1,20) / &
     & 0.3600720E+00, 0.3600720E+00, 0.4120453E+00, 0.3863273E+00, &
     & 0.3625996E+00, 0.3621972E+00, 0.3680609E+00, 0.3793806E+00, &
     & 0.3846290E+00, 0.3835522E+00, 0.3816720E+00, 0.3797323E+00, &
     & 0.3787413E+00, 0.3782461E+00, 0.3740527E+00, 0.3659468E+00, &
     & 0.3540097E+00, 0.3301216E+00, 0.2804768E+00, 0.2804768E+00 /
! Solar Zenith Angle 35.0 Albedo  0.3695777E+00
      data (ref_adm(24,iz, 1, 8),iz = 1,20) / &
     & 0.3304600E+00, 0.3304600E+00, 0.4061800E+00, 0.3897400E+00, &
     & 0.4120500E+00, 0.3304300E+00, 0.3369619E+00, 0.3623900E+00, &
     & 0.3373253E+00, 0.3401270E+00, 0.3447412E+00, 0.3516293E+00, &
     & 0.3587725E+00, 0.2809800E+00, 0.3723000E+00, 0.3658402E+00, &
     & 0.3577302E+00, 0.3366497E+00, 0.2903768E+00, 0.2903768E+00 /
      data (ref_adm(24,iz, 2, 8),iz = 1,20) / &
     & 0.3304600E+00, 0.3304600E+00, 0.4061800E+00, 0.3897400E+00, &
     & 0.4120500E+00, 0.3304300E+00, 0.3369619E+00, 0.3623900E+00, &
     & 0.3373253E+00, 0.3401270E+00, 0.3447412E+00, 0.3516293E+00, &
     & 0.3587725E+00, 0.2809800E+00, 0.3723000E+00, 0.3658402E+00, &
     & 0.3577302E+00, 0.3366497E+00, 0.2903768E+00, 0.2903768E+00 /
      data (ref_adm(24,iz, 3, 8),iz = 1,20) / &
     & 0.3985300E+00, 0.3985300E+00, 0.5053300E+00, 0.2911100E+00, &
     & 0.4121900E+00, 0.1980700E+00, 0.4901700E+00, 0.3375493E+00, &
     & 0.3373246E+00, 0.3401035E+00, 0.3446119E+00, 0.3514803E+00, &
     & 0.3584774E+00, 0.3612100E+00, 0.3740500E+00, 0.3248400E+00, &
     & 0.3569634E+00, 0.3358487E+00, 0.4434694E-01, 0.4434694E-01 /
      data (ref_adm(24,iz, 4, 8),iz = 1,20) / &
     & 0.3643800E+00, 0.3643800E+00, 0.2837100E+00, 0.3812015E+00, &
     & 0.3422200E+00, 0.1693600E+00, 0.1847200E+00, 0.3154500E+00, &
     & 0.3374413E+00, 0.2557200E+00, 0.3443888E+00, 0.3510365E+00, &
     & 0.3578343E+00, 0.4036700E+00, 0.2629500E+00, 0.3638567E+00, &
     & 0.3553054E+00, 0.3341757E+00, 0.2886463E+00, 0.2886463E+00 /
      data (ref_adm(24,iz, 5, 8),iz = 1,20) / &
     & 0.3615452E+00, 0.3615452E+00, 0.4198700E+00, 0.3807918E+00, &
     & 0.3685100E+00, 0.3609300E+00, 0.1946400E+00, 0.1674900E+00, &
     & 0.4313800E+00, 0.3398878E+00, 0.2468800E+00, 0.1776200E+00, &
     & 0.3693000E+00, 0.3082600E+00, 0.3118000E+00, 0.4629700E+00, &
     & 0.3529564E+00, 0.3317397E+00, 0.2869532E+00, 0.2869532E+00 /
      data (ref_adm(24,iz, 6, 8),iz = 1,20) / &
     & 0.3968500E+00, 0.3968500E+00, 0.3990700E+00, 0.3616500E+00, &
     & 0.3733300E+00, 0.3853400E+00, 0.3373886E+00, 0.2478900E+00, &
     & 0.3378731E+00, 0.3397379E+00, 0.3220200E+00, 0.3496482E+00, &
     & 0.3489100E+00, 0.2850200E+00, 0.2892000E+00, 0.3412400E+00, &
     & 0.3481500E+00, 0.3285187E+00, 0.2847225E+00, 0.2847225E+00 /
      data (ref_adm(24,iz, 7, 8),iz = 1,20) / &
     & 0.3848200E+00, 0.3848200E+00, 0.3618830E+00, 0.3787774E+00, &
     & 0.3657787E+00, 0.3408930E+00, 0.3821700E+00, 0.3387082E+00, &
     & 0.3382399E+00, 0.2930400E+00, 0.3432229E+00, 0.2925600E+00, &
     & 0.3542237E+00, 0.3576154E+00, 0.2751400E+00, 0.3544900E+00, &
     & 0.4044600E+00, 0.3247676E+00, 0.2821173E+00, 0.2821173E+00 /
      data (ref_adm(24,iz, 8, 8),iz = 1,20) / &
     & 0.4074600E+00, 0.4074600E+00, 0.3600900E+00, 0.3397200E+00, &
     & 0.3593900E+00, 0.3669600E+00, 0.3982700E+00, 0.3940700E+00, &
     & 0.4380700E+00, 0.4489200E+00, 0.4295000E+00, 0.4173600E+00, &
     & 0.3913700E+00, 0.3727800E+00, 0.3661800E+00, 0.3584000E+00, &
     & 0.3265500E+00, 0.3205478E+00, 0.2791902E+00, 0.2791902E+00 /
      data (ref_adm(24,iz, 9, 8),iz = 1,20) / &
     & 0.4414900E+00, 0.4414900E+00, 0.3618513E+00, 0.4430800E+00, &
     & 0.3221300E+00, 0.3449381E+00, 0.3385058E+00, 0.3395697E+00, &
     & 0.3405800E+00, 0.4928400E+00, 0.1836900E+00, 0.3545600E+00, &
     & 0.2058500E+00, 0.3531693E+00, 0.3534243E+00, 0.3499400E+00, &
     & 0.3380364E+00, 0.3160375E+00, 0.2760551E+00, 0.2760551E+00 /
      data (ref_adm(24,iz,10, 8),iz = 1,20) / &
     & 0.4578100E+00, 0.4578100E+00, 0.4562900E+00, 0.4679500E+00, &
     & 0.3873200E+00, 0.4232100E+00, 0.4023500E+00, 0.3399596E+00, &
     & 0.3403555E+00, 0.3242700E+00, 0.3209600E+00, 0.2503900E+00, &
     & 0.2131000E+00, 0.3174300E+00, 0.3836300E+00, 0.3468200E+00, &
     & 0.3838300E+00, 0.3114012E+00, 0.2727442E+00, 0.2727442E+00 /
      data (ref_adm(24,iz,11, 8),iz = 1,20) / &
     & 0.4505500E+00, 0.4505500E+00, 0.4078300E+00, 0.4056500E+00, &
     & 0.3501600E+00, 0.4124600E+00, 0.4468700E+00, 0.3403578E+00, &
     & 0.3411645E+00, 0.1791800E+00, 0.3437000E+00, 0.2278000E+00, &
     & 0.3056100E+00, 0.2440900E+00, 0.3471171E+00, 0.3408836E+00, &
     & 0.4333100E+00, 0.4103800E+00, 0.2694341E+00, 0.2694341E+00 /
      data (ref_adm(24,iz,12, 8),iz = 1,20) / &
     & 0.4335000E+00, 0.4335000E+00, 0.3807500E+00, 0.3855200E+00, &
     & 0.2892800E+00, 0.3360100E+00, 0.4190700E+00, 0.3350800E+00, &
     & 0.3248600E+00, 0.2819100E+00, 0.3579500E+00, 0.2896100E+00, &
     & 0.2780200E+00, 0.3114600E+00, 0.3440607E+00, 0.3370495E+00, &
     & 0.3246019E+00, 0.3021326E+00, 0.2661928E+00, 0.2661928E+00 /
      data (ref_adm(24,iz,13, 8),iz = 1,20) / &
     & 0.3969300E+00, 0.3969300E+00, 0.3691900E+00, 0.3716600E+00, &
     & 0.3745700E+00, 0.3111900E+00, 0.3879600E+00, 0.2789200E+00, &
     & 0.3260200E+00, 0.2968600E+00, 0.2794400E+00, 0.3210700E+00, &
     & 0.2495500E+00, 0.2836200E+00, 0.4277500E+00, 0.3333349E+00, &
     & 0.3203457E+00, 0.2977567E+00, 0.2630913E+00, 0.2630913E+00 /
      data (ref_adm(24,iz,14, 8),iz = 1,20) / &
     & 0.4554900E+00, 0.4554900E+00, 0.4334400E+00, 0.3387000E+00, &
     & 0.4264800E+00, 0.4132100E+00, 0.4538400E+00, 0.3763300E+00, &
     & 0.4592700E+00, 0.4104200E+00, 0.3530900E+00, 0.3067200E+00, &
     & 0.2556200E+00, 0.3365000E+00, 0.3385662E+00, 0.3299359E+00, &
     & 0.3164396E+00, 0.2936996E+00, 0.2602469E+00, 0.2602469E+00 /
      data (ref_adm(24,iz,15, 8),iz = 1,20) / &
     & 0.4958900E+00, 0.4958900E+00, 0.4112300E+00, 0.3021500E+00, &
     & 0.2205400E+00, 0.3866429E+00, 0.3576535E+00, 0.3449219E+00, &
     & 0.3967700E+00, 0.4128500E+00, 0.3841800E+00, 0.3241200E+00, &
     & 0.2101400E+00, 0.3095800E+00, 0.3362322E+00, 0.3269264E+00, &
     & 0.3128842E+00, 0.2900122E+00, 0.2576904E+00, 0.2576904E+00 /
      data (ref_adm(24,iz,16, 8),iz = 1,20) / &
     & 0.4016500E+00, 0.4016500E+00, 0.2919300E+00, 0.4047400E+00, &
     & 0.3227000E+00, 0.3894652E+00, 0.3686538E+00, 0.3486913E+00, &
     & 0.3149000E+00, 0.4046300E+00, 0.3823400E+00, 0.4006000E+00, &
     & 0.3412949E+00, 0.3296500E+00, 0.3342873E+00, 0.3241854E+00, &
     & 0.3098052E+00, 0.2868537E+00, 0.2554890E+00, 0.2554890E+00 /
      data (ref_adm(24,iz,17, 8),iz = 1,20) / &
     & 0.4412000E+00, 0.4412000E+00, 0.3826800E+00, 0.5463700E+00, &
     & 0.2962000E+00, 0.3855459E+00, 0.3818756E+00, 0.3550031E+00, &
     & 0.4415700E+00, 0.3744900E+00, 0.3866200E+00, 0.3200300E+00, &
     & 0.2067300E+00, 0.3382844E+00, 0.3326422E+00, 0.3219817E+00, &
     & 0.3071786E+00, 0.2841503E+00, 0.2536579E+00, 0.2536579E+00 /
      data (ref_adm(24,iz,18, 8),iz = 1,20) / &
     & 0.3776200E+00, 0.3776200E+00, 0.3725188E+00, 0.2786900E+00, &
     & 0.3729043E+00, 0.4120300E+00, 0.3141900E+00, 0.5234500E+00, &
     & 0.3901900E+00, 0.3605600E+00, 0.3322100E+00, 0.3634800E+00, &
     & 0.1887600E+00, 0.3355516E+00, 0.3250388E+00, 0.3104792E+00, &
     & 0.2934848E+00, 0.2689423E+00, 0.2352200E+00, 0.2352200E+00 /
      data (ref_adm(24,iz,19, 8),iz = 1,20) / &
     & 0.3989308E+00, 0.3989308E+00, 0.1989200E+00, 0.3226900E+00, &
     & 0.2870600E+00, 0.3380900E+00, 0.3618800E+00, 0.3634700E+00, &
     & 0.3626100E+00, 0.3464700E+00, 0.3127100E+00, 0.3505827E+00, &
     & 0.1994700E+00, 0.3932900E+00, 0.4200600E+00, 0.3104415E+00, &
     & 0.2934090E+00, 0.2688634E+00, 0.2351737E+00, 0.2351737E+00 /
      data (ref_adm(24,iz,20, 8),iz = 1,20) / &
     & 0.4230300E+00, 0.4230300E+00, 0.5769500E+00, 0.3599400E+00, &
     & 0.2957600E+00, 0.4098700E+00, 0.2762400E+00, 0.4083300E+00, &
     & 0.4330600E+00, 0.3791577E+00, 0.3505200E+00, 0.3793000E+00, &
     & 0.3467200E+00, 0.1898400E+00, 0.3250616E+00, 0.3103806E+00, &
     & 0.2932776E+00, 0.2687504E+00, 0.2351317E+00, 0.2351317E+00 /
      data (ref_adm(24,iz,21, 8),iz = 1,20) / &
     & 0.3795500E+00, 0.3795500E+00, 0.2841800E+00, 0.3713472E+00, &
     & 0.3177900E+00, 0.3912900E+00, 0.3390100E+00, 0.4211700E+00, &
     & 0.3660700E+00, 0.4636300E+00, 0.2848400E+00, 0.3865900E+00, &
     & 0.3179300E+00, 0.1984400E+00, 0.3250864E+00, 0.3103390E+00, &
     & 0.2932375E+00, 0.2686661E+00, 0.2351063E+00, 0.2351063E+00 /
      data (ref_adm(24,iz,22, 8),iz = 1,20) / &
     & 0.3988062E+00, 0.3988062E+00, 0.3986903E+00, 0.3997238E+00, &
     & 0.4046238E+00, 0.3582000E+00, 0.3468900E+00, 0.3282000E+00, &
     & 0.4123900E+00, 0.6012100E+00, 0.4084400E+00, 0.4246600E+00, &
     & 0.4110862E+00, 0.2582100E+00, 0.2948400E+00, 0.3986830E+00, &
     & 0.3847094E+00, 0.3566141E+00, 0.2933452E+00, 0.2933452E+00 /
      data (ref_adm(24,iz,23, 8),iz = 1,20) / &
     & 0.3989142E+00, 0.3989142E+00, 0.3992714E+00, 0.3336000E+00, &
     & 0.4314000E+00, 0.4119604E+00, 0.4106900E+00, 0.4153665E+00, &
     & 0.3571300E+00, 0.4307700E+00, 0.2665800E+00, 0.4175800E+00, &
     & 0.4107866E+00, 0.3590200E+00, 0.4387200E+00, 0.3973178E+00, &
     & 0.3828861E+00, 0.3552252E+00, 0.2927200E+00, 0.2927200E+00 /
      data (ref_adm(24,iz,24, 8),iz = 1,20) / &
     & 0.3845400E+00, 0.3845400E+00, 0.3927900E+00, 0.3533700E+00, &
     & 0.3795800E+00, 0.4106364E+00, 0.4172833E+00, 0.4165014E+00, &
     & 0.3489900E+00, 0.3344700E+00, 0.4445600E+00, 0.4039700E+00, &
     & 0.3684100E+00, 0.4083852E+00, 0.3477300E+00, 0.4399600E+00, &
     & 0.3816737E+00, 0.3537781E+00, 0.2919965E+00, 0.2919965E+00 /
      data (ref_adm(24,iz,25, 8),iz = 1,20) / &
     & 0.2958600E+00, 0.2958600E+00, 0.3487900E+00, 0.3998334E+00, &
     & 0.4018085E+00, 0.4943500E+00, 0.4170697E+00, 0.6094100E+00, &
     & 0.4706000E+00, 0.3406900E+00, 0.4363100E+00, 0.3124200E+00, &
     & 0.4105138E+00, 0.3911700E+00, 0.4122700E+00, 0.3949675E+00, &
     & 0.3800541E+00, 0.3525621E+00, 0.2914131E+00, 0.2914131E+00 /
      data (ref_adm(24,iz,26, 8),iz = 1,20) / &
     & 0.3395000E+00, 0.3395000E+00, 0.4007500E+00, 0.5093500E+00, &
     & 0.2971100E+00, 0.4400500E+00, 0.5983000E+00, 0.4432400E+00, &
     & 0.4498600E+00, 0.3905700E+00, 0.3805500E+00, 0.4347200E+00, &
     & 0.4100305E+00, 0.4250400E+00, 0.4027064E+00, 0.3937228E+00, &
     & 0.3789947E+00, 0.3512360E+00, 0.2908325E+00, 0.2908325E+00 /
      data (ref_adm(24,iz,27, 8),iz = 1,20) / &
     & 0.4156700E+00, 0.4156700E+00, 0.4128400E+00, 0.3806200E+00, &
     & 0.4132000E+00, 0.3625500E+00, 0.4629500E+00, 0.3523400E+00, &
     & 0.4172055E+00, 0.4109800E+00, 0.4128923E+00, 0.2966200E+00, &
     & 0.4099510E+00, 0.4010600E+00, 0.4019922E+00, 0.3927075E+00, &
     & 0.3778632E+00, 0.3501481E+00, 0.2903406E+00, 0.2903406E+00 /
      data (ref_adm(24,iz,28, 8),iz = 1,20) / &
     & 0.4186300E+00, 0.4186300E+00, 0.3792300E+00, 0.3248600E+00, &
     & 0.3689400E+00, 0.3720200E+00, 0.3919000E+00, 0.2942500E+00, &
     & 0.3616400E+00, 0.4095200E+00, 0.5208500E+00, 0.4771400E+00, &
     & 0.4095803E+00, 0.4591100E+00, 0.4012541E+00, 0.3915839E+00, &
     & 0.3768865E+00, 0.3490587E+00, 0.2898599E+00, 0.2898599E+00 /
      data (ref_adm(24,iz,29, 8),iz = 1,20) / &
     & 0.4440900E+00, 0.4440900E+00, 0.4288500E+00, 0.4939700E+00, &
     & 0.4763000E+00, 0.3732100E+00, 0.3481200E+00, 0.4201589E+00, &
     & 0.4185950E+00, 0.4526900E+00, 0.4783500E+00, 0.4116493E+00, &
     & 0.3530500E+00, 0.4260100E+00, 0.4823600E+00, 0.3906312E+00, &
     & 0.3758700E+00, 0.3479118E+00, 0.2893972E+00, 0.2893972E+00 /
      data (ref_adm(24,iz,30, 8),iz = 1,20) / &
     & 0.4505700E+00, 0.4505700E+00, 0.6211800E+00, 0.5651900E+00, &
     & 0.4014359E+00, 0.4037799E+00, 0.4124680E+00, 0.3929900E+00, &
     & 0.4298100E+00, 0.4498800E+00, 0.4759000E+00, 0.4501000E+00, &
     & 0.3752700E+00, 0.4065717E+00, 0.4004882E+00, 0.3901083E+00, &
     & 0.3752528E+00, 0.3473195E+00, 0.2891252E+00, 0.2891252E+00 /
      data (ref_adm(24,iz,31, 8),iz = 1,20) / &
     & 0.3669000E+00, 0.3669000E+00, 0.3952200E+00, 0.4028753E+00, &
     & 0.4015385E+00, 0.4030954E+00, 0.4053500E+00, 0.4299900E+00, &
     & 0.3529300E+00, 0.4771300E+00, 0.4148881E+00, 0.4626200E+00, &
     & 0.3556700E+00, 0.5274700E+00, 0.3202200E+00, 0.3893839E+00, &
     & 0.3745951E+00, 0.3463341E+00, 0.2888710E+00, 0.2888710E+00 /
      data (ref_adm(24,iz,32, 8),iz = 1,20) / &
     & 0.4004208E+00, 0.4004208E+00, 0.4094840E+00, 0.4050489E+00, &
     & 0.3309400E+00, 0.3356000E+00, 0.4102149E+00, 0.4196852E+00, &
     & 0.3663100E+00, 0.2803800E+00, 0.4155248E+00, 0.4121073E+00, &
     & 0.3528500E+00, 0.4062294E+00, 0.3999233E+00, 0.3795600E+00, &
     & 0.3739189E+00, 0.3457293E+00, 0.2885608E+00, 0.2885608E+00 /
      data (ref_adm(24,iz,33, 8),iz = 1,20) / &
     & 0.4005904E+00, 0.4005904E+00, 0.4145714E+00, 0.4013800E+00, &
     & 0.4025228E+00, 0.3925000E+00, 0.5479300E+00, 0.4193147E+00, &
     & 0.3930400E+00, 0.3208200E+00, 0.4333200E+00, 0.4124315E+00, &
     & 0.4089488E+00, 0.4133000E+00, 0.3995613E+00, 0.3880810E+00, &
     & 0.3733453E+00, 0.3450430E+00, 0.2884394E+00, 0.2884394E+00 /
      data (ref_adm(24,iz,34, 8),iz = 1,20) / &
     & 0.4009372E+00, 0.4009372E+00, 0.5620300E+00, 0.3950100E+00, &
     & 0.3152700E+00, 0.3184800E+00, 0.3325500E+00, 0.3791100E+00, &
     & 0.3912200E+00, 0.4336300E+00, 0.3864900E+00, 0.4128484E+00, &
     & 0.4091316E+00, 0.4062830E+00, 0.3995159E+00, 0.3880590E+00, &
     & 0.3727333E+00, 0.3445145E+00, 0.2882172E+00, 0.2882172E+00 /
      data (ref_adm(24,iz,35, 8),iz = 1,20) / &
     & 0.3026400E+00, 0.3026400E+00, 0.4037900E+00, 0.4172269E+00, &
     & 0.5675000E+00, 0.4025280E+00, 0.4082881E+00, 0.4186288E+00, &
     & 0.4222104E+00, 0.4195655E+00, 0.4165618E+00, 0.4128773E+00, &
     & 0.4092246E+00, 0.4061325E+00, 0.3992957E+00, 0.3877677E+00, &
     & 0.3721872E+00, 0.3441422E+00, 0.2881071E+00, 0.2881071E+00 /
      data (ref_adm(24,iz,36, 8),iz = 1,20) / &
     & 0.4094500E+00, 0.4094500E+00, 0.4713800E+00, 0.4549300E+00, &
     & 0.4032244E+00, 0.4029597E+00, 0.4079638E+00, 0.5162600E+00, &
     & 0.4223652E+00, 0.4199204E+00, 0.4168281E+00, 0.4130177E+00, &
     & 0.6336000E+00, 0.4286900E+00, 0.3992490E+00, 0.3875478E+00, &
     & 0.3720216E+00, 0.3439754E+00, 0.2880760E+00, 0.2880760E+00 /
      data (ref_adm(24,iz,37, 8),iz = 1,20) / &
     & 0.3972100E+00, 0.3972100E+00, 0.6182200E+00, 0.4533600E+00, &
     & 0.4676500E+00, 0.4436100E+00, 0.3901000E+00, 0.4259400E+00, &
     & 0.4209000E+00, 0.4201616E+00, 0.4169458E+00, 0.4128374E+00, &
     & 0.3454400E+00, 0.3869600E+00, 0.3992022E+00, 0.3875051E+00, &
     & 0.3721413E+00, 0.3440145E+00, 0.2880068E+00, 0.2880068E+00 /
      data (ref_adm(24,iz,38, 8),iz = 1,20) / &
     & 0.3972100E+00, 0.3972100E+00, 0.6182200E+00, 0.4533600E+00, &
     & 0.4676500E+00, 0.4436100E+00, 0.3901000E+00, 0.4259400E+00, &
     & 0.4209000E+00, 0.4201616E+00, 0.4169458E+00, 0.4128374E+00, &
     & 0.3454400E+00, 0.3869600E+00, 0.3992022E+00, 0.3875051E+00, &
     & 0.3721413E+00, 0.3440145E+00, 0.2880068E+00, 0.2880068E+00 /
! Solar Zenith Angle 40.0 Albedo  0.3471658E+00
      data (ref_adm(24,iz, 1, 9),iz = 1,20) / &
     & 0.3502900E+00, 0.3502900E+00, 0.2521700E+00, 0.5691900E+00, &
     & 0.5196800E+00, 0.3120700E+00, 0.2195500E+00, 0.1751500E+00, &
     & 0.1433000E+00, 0.3053893E+00, 0.2246000E+00, 0.2349400E+00, &
     & 0.4373300E+00, 0.3028600E+00, 0.3174800E+00, 0.2449800E+00, &
     & 0.3230513E+00, 0.3814200E+00, 0.2639749E+00, 0.2639749E+00 /
      data (ref_adm(24,iz, 2, 9),iz = 1,20) / &
     & 0.3502900E+00, 0.3502900E+00, 0.2521700E+00, 0.5691900E+00, &
     & 0.5196800E+00, 0.3120700E+00, 0.2195500E+00, 0.1751500E+00, &
     & 0.1433000E+00, 0.3053893E+00, 0.2246000E+00, 0.2349400E+00, &
     & 0.4373300E+00, 0.3028600E+00, 0.3174800E+00, 0.2449800E+00, &
     & 0.3230513E+00, 0.3814200E+00, 0.2639749E+00, 0.2639749E+00 /
      data (ref_adm(24,iz, 3, 9),iz = 1,20) / &
     & 0.3814800E+00, 0.3814800E+00, 0.2814300E+00, 0.3373300E+00, &
     & 0.3413200E+00, 0.3400700E+00, 0.2000600E+00, 0.2333600E+00, &
     & 0.3877100E+00, 0.2526400E+00, 0.2749400E+00, 0.3035000E+00, &
     & 0.3806300E+00, 0.4371700E+00, 0.3350000E+00, 0.2524100E+00, &
     & 0.5015300E+00, 0.3042304E+00, 0.3798234E-01, 0.3798234E-01 /
      data (ref_adm(24,iz, 4, 9),iz = 1,20) / &
     & 0.3418200E+00, 0.3418200E+00, 0.2164000E+00, 0.4222800E+00, &
     & 0.3075600E+00, 0.2834800E+00, 0.3022054E+00, 0.2667600E+00, &
     & 0.3275600E+00, 0.3052592E+00, 0.3396400E+00, 0.2372600E+00, &
     & 0.3827300E+00, 0.3516700E+00, 0.3267200E+00, 0.3000900E+00, &
     & 0.3208086E+00, 0.3026877E+00, 0.2623837E+00, 0.2623837E+00 /
      data (ref_adm(24,iz, 5, 9),iz = 1,20) / &
     & 0.2387500E+00, 0.2387500E+00, 0.2932800E+00, 0.3348400E+00, &
     & 0.4043000E+00, 0.3374000E+00, 0.1776200E+00, 0.1958500E+00, &
     & 0.2333200E+00, 0.1955600E+00, 0.3464800E+00, 0.5249200E+00, &
     & 0.2968000E+00, 0.3517000E+00, 0.3272967E+00, 0.3260040E+00, &
     & 0.3186315E+00, 0.3004396E+00, 0.2608276E+00, 0.2608276E+00 /
      data (ref_adm(24,iz, 6, 9),iz = 1,20) / &
     & 0.3018500E+00, 0.3018500E+00, 0.2985500E+00, 0.4514200E+00, &
     & 0.4464900E+00, 0.3776900E+00, 0.3071200E+00, 0.2468300E+00, &
     & 0.3032364E+00, 0.3708500E+00, 0.3499000E+00, 0.3139549E+00, &
     & 0.2362400E+00, 0.3526900E+00, 0.3253304E+00, 0.2505900E+00, &
     & 0.2365000E+00, 0.2974682E+00, 0.2587770E+00, 0.2587770E+00 /
      data (ref_adm(24,iz, 7, 9),iz = 1,20) / &
     & 0.3609200E+00, 0.3609200E+00, 0.3840600E+00, 0.2563600E+00, &
     & 0.3577200E+00, 0.1903300E+00, 0.2728400E+00, 0.3028300E+00, &
     & 0.3035480E+00, 0.3150900E+00, 0.3563000E+00, 0.4557000E+00, &
     & 0.3533200E+00, 0.3077300E+00, 0.3229881E+00, 0.3206579E+00, &
     & 0.3125563E+00, 0.2940070E+00, 0.2563818E+00, 0.2563818E+00 /
      data (ref_adm(24,iz, 8, 9),iz = 1,20) / &
     & 0.3927100E+00, 0.3927100E+00, 0.3664100E+00, 0.3648200E+00, &
     & 0.2865400E+00, 0.2884500E+00, 0.3695100E+00, 0.3494900E+00, &
     & 0.3539300E+00, 0.3294000E+00, 0.2852100E+00, 0.3017100E+00, &
     & 0.3263000E+00, 0.3621100E+00, 0.4378900E+00, 0.3173407E+00, &
     & 0.3088220E+00, 0.2901129E+00, 0.2536909E+00, 0.2536909E+00 /
      data (ref_adm(24,iz, 9, 9),iz = 1,20) / &
     & 0.3801900E+00, 0.3801900E+00, 0.2549500E+00, 0.3522400E+00, &
     & 0.3364443E+00, 0.4679000E+00, 0.3034514E+00, 0.2388000E+00, &
     & 0.2132100E+00, 0.5064400E+00, 0.2602400E+00, 0.2061100E+00, &
     & 0.1819500E+00, 0.3644000E+00, 0.3844800E+00, 0.3602400E+00, &
     & 0.3048020E+00, 0.3625600E+00, 0.2508088E+00, 0.2508088E+00 /
      data (ref_adm(24,iz,10, 9),iz = 1,20) / &
     & 0.2863000E+00, 0.2863000E+00, 0.3088800E+00, 0.2720700E+00, &
     & 0.3068100E+00, 0.2123200E+00, 0.3041514E+00, 0.3048830E+00, &
     & 0.3053563E+00, 0.3109500E+00, 0.2479400E+00, 0.2376000E+00, &
     & 0.2216100E+00, 0.2305100E+00, 0.2031300E+00, 0.3101552E+00, &
     & 0.3006625E+00, 0.3381600E+00, 0.2477608E+00, 0.2477608E+00 /
      data (ref_adm(24,iz,11, 9),iz = 1,20) / &
     & 0.3044000E+00, 0.3044000E+00, 0.3376700E+00, 0.2989400E+00, &
     & 0.2920000E+00, 0.3206600E+00, 0.2481000E+00, 0.3760700E+00, &
     & 0.4405200E+00, 0.3142900E+00, 0.2138500E+00, 0.2070200E+00, &
     & 0.2307400E+00, 0.2525300E+00, 0.3116862E+00, 0.3065022E+00, &
     & 0.2964532E+00, 0.2773285E+00, 0.2447134E+00, 0.2447134E+00 /
      data (ref_adm(24,iz,12, 9),iz = 1,20) / &
     & 0.3091200E+00, 0.3091200E+00, 0.3615200E+00, 0.3628400E+00, &
     & 0.3633300E+00, 0.3642100E+00, 0.3324800E+00, 0.3995500E+00, &
     & 0.3054400E+00, 0.2871400E+00, 0.2612800E+00, 0.2402300E+00, &
     & 0.3242600E+00, 0.2877000E+00, 0.3088225E+00, 0.3029215E+00, &
     & 0.2923426E+00, 0.2731094E+00, 0.2417273E+00, 0.2417273E+00 /
      data (ref_adm(24,iz,13, 9),iz = 1,20) / &
     & 0.2984200E+00, 0.2984200E+00, 0.3011600E+00, 0.3163600E+00, &
     & 0.2910600E+00, 0.2540300E+00, 0.3159400E+00, 0.3059500E+00, &
     & 0.3031900E+00, 0.3144500E+00, 0.2853900E+00, 0.2812100E+00, &
     & 0.2567700E+00, 0.3547300E+00, 0.4111400E+00, 0.2994544E+00, &
     & 0.2883910E+00, 0.2690664E+00, 0.2388683E+00, 0.2388683E+00 /
      data (ref_adm(24,iz,14, 9),iz = 1,20) / &
     & 0.2971700E+00, 0.2971700E+00, 0.3242900E+00, 0.3731700E+00, &
     & 0.3887200E+00, 0.3089700E+00, 0.3027000E+00, 0.3476400E+00, &
     & 0.2961200E+00, 0.2972200E+00, 0.2833800E+00, 0.2792300E+00, &
     & 0.3031900E+00, 0.3145300E+00, 0.3270400E+00, 0.2962774E+00, &
     & 0.3012900E+00, 0.2653157E+00, 0.2362453E+00, 0.2362453E+00 /
      data (ref_adm(24,iz,15, 9),iz = 1,20) / &
     & 0.2998300E+00, 0.2998300E+00, 0.2686500E+00, 0.3198400E+00, &
     & 0.2652400E+00, 0.2838000E+00, 0.3328900E+00, 0.3743800E+00, &
     & 0.3635600E+00, 0.3244400E+00, 0.3784200E+00, 0.2971200E+00, &
     & 0.2893900E+00, 0.3065800E+00, 0.3014645E+00, 0.2934575E+00, &
     & 0.3284300E+00, 0.2619034E+00, 0.2338869E+00, 0.2338869E+00 /
      data (ref_adm(24,iz,16, 9),iz = 1,20) / &
     & 0.3246300E+00, 0.3246300E+00, 0.3859300E+00, 0.2778400E+00, &
     & 0.2498700E+00, 0.2999600E+00, 0.3370600E+00, 0.3068300E+00, &
     & 0.3885000E+00, 0.3121900E+00, 0.3409100E+00, 0.3730800E+00, &
     & 0.2024000E+00, 0.2812900E+00, 0.4128000E+00, 0.2909041E+00, &
     & 0.4341700E+00, 0.2589776E+00, 0.2318519E+00, 0.2318519E+00 /
      data (ref_adm(24,iz,17, 9),iz = 1,20) / &
     & 0.3466800E+00, 0.3466800E+00, 0.3241713E+00, 0.3254613E+00, &
     & 0.3700400E+00, 0.2090100E+00, 0.2933400E+00, 0.2565300E+00, &
     & 0.3257700E+00, 0.3409000E+00, 0.3386000E+00, 0.3080710E+00, &
     & 0.2951500E+00, 0.3364100E+00, 0.3209600E+00, 0.2888381E+00, &
     & 0.2761397E+00, 0.2564696E+00, 0.2301559E+00, 0.2301559E+00 /
      data (ref_adm(24,iz,18, 9),iz = 1,20) / &
     & 0.2047000E+00, 0.2047000E+00, 0.2787900E+00, 0.2763800E+00, &
     & 0.3699500E+00, 0.2689300E+00, 0.3177700E+00, 0.3551600E+00, &
     & 0.3064200E+00, 0.3163068E+00, 0.2880300E+00, 0.1908800E+00, &
     & 0.3219507E+00, 0.2608500E+00, 0.3381000E+00, 0.3276620E+00, &
     & 0.3596900E+00, 0.3230378E+00, 0.2955886E+00, 0.2955886E+00 /
      data (ref_adm(24,iz,19, 9),iz = 1,20) / &
     & 0.2705100E+00, 0.2705100E+00, 0.3129700E+00, 0.2798200E+00, &
     & 0.2989600E+00, 0.2590600E+00, 0.4364700E+00, 0.2178200E+00, &
     & 0.2842200E+00, 0.4498100E+00, 0.2944300E+00, 0.3176800E+00, &
     & 0.3215838E+00, 0.2891000E+00, 0.3250977E+00, 0.3263921E+00, &
     & 0.3258831E+00, 0.3208629E+00, 0.2930350E+00, 0.2930350E+00 /
      data (ref_adm(24,iz,20, 9),iz = 1,20) / &
     & 0.2910300E+00, 0.2910300E+00, 0.2457300E+00, 0.3531900E+00, &
     & 0.4154900E+00, 0.1838500E+00, 0.3185042E+00, 0.2759500E+00, &
     & 0.3006000E+00, 0.4468200E+00, 0.2846100E+00, 0.3245400E+00, &
     & 0.2466300E+00, 0.3047100E+00, 0.2922900E+00, 0.3251780E+00, &
     & 0.3243941E+00, 0.3189899E+00, 0.2913634E+00, 0.2913634E+00 /
      data (ref_adm(24,iz,21, 9),iz = 1,20) / &
     & 0.3290000E+00, 0.3290000E+00, 0.2891600E+00, 0.2634900E+00, &
     & 0.3474200E+00, 0.3926700E+00, 0.4121900E+00, 0.4124100E+00, &
     & 0.3199463E+00, 0.4513100E+00, 0.3547600E+00, 0.2998500E+00, &
     & 0.3270500E+00, 0.3805400E+00, 0.2461800E+00, 0.3245219E+00, &
     & 0.3231566E+00, 0.3172950E+00, 0.2901354E+00, 0.2901354E+00 /
      data (ref_adm(24,iz,22, 9),iz = 1,20) / &
     & 0.2677100E+00, 0.2677100E+00, 0.2467100E+00, 0.2777300E+00, &
     & 0.1994700E+00, 0.3379800E+00, 0.2721900E+00, 0.2904600E+00, &
     & 0.5282100E+00, 0.3040000E+00, 0.3200700E+00, 0.3376300E+00, &
     & 0.4032700E+00, 0.3457300E+00, 0.2139500E+00, 0.2182200E+00, &
     & 0.3741127E+00, 0.3599461E+00, 0.3452153E+00, 0.3452153E+00 /
      data (ref_adm(24,iz,23, 9),iz = 1,20) / &
     & 0.2922800E+00, 0.2922800E+00, 0.2500300E+00, 0.2719300E+00, &
     & 0.3520000E+00, 0.4284400E+00, 0.4332700E+00, 0.3754600E+00, &
     & 0.3450942E+00, 0.2606700E+00, 0.3402200E+00, 0.5305700E+00, &
     & 0.4381800E+00, 0.3861500E+00, 0.2469600E+00, 0.3815832E+00, &
     & 0.3748111E+00, 0.3610938E+00, 0.3490609E+00, 0.3490609E+00 /
      data (ref_adm(24,iz,24, 9),iz = 1,20) / &
     & 0.2230500E+00, 0.2230500E+00, 0.3112400E+00, 0.3014800E+00, &
     & 0.3339100E+00, 0.3869400E+00, 0.2168800E+00, 0.4010200E+00, &
     & 0.2757500E+00, 0.2917400E+00, 0.3395000E+00, 0.4369000E+00, &
     & 0.3685800E+00, 0.1986000E+00, 0.2900000E+00, 0.3205400E+00, &
     & 0.3782803E+00, 0.3648580E+00, 0.3549227E+00, 0.3549227E+00 /
      data (ref_adm(24,iz,25, 9),iz = 1,20) / &
     & 0.3027000E+00, 0.3027000E+00, 0.4599100E+00, 0.3193500E+00, &
     & 0.2358400E+00, 0.4198400E+00, 0.4202600E+00, 0.3985900E+00, &
     & 0.3553700E+00, 0.2721600E+00, 0.4038500E+00, 0.4645600E+00, &
     & 0.4158200E+00, 0.3924373E+00, 0.3959448E+00, 0.2666500E+00, &
     & 0.2333500E+00, 0.3711222E+00, 0.3624493E+00, 0.3624493E+00 /
      data (ref_adm(24,iz,26, 9),iz = 1,20) / &
     & 0.3242300E+00, 0.3242300E+00, 0.3741800E+00, 0.3918200E+00, &
     & 0.3263900E+00, 0.3174900E+00, 0.3299800E+00, 0.3509400E+00, &
     & 0.2811300E+00, 0.3000600E+00, 0.5053400E+00, 0.3889418E+00, &
     & 0.3650900E+00, 0.3254800E+00, 0.2499300E+00, 0.3061200E+00, &
     & 0.3660000E+00, 0.3863600E+00, 0.3719802E+00, 0.3719802E+00 /
      data (ref_adm(24,iz,27, 9),iz = 1,20) / &
     & 0.3110400E+00, 0.3110400E+00, 0.3304400E+00, 0.3135800E+00, &
     & 0.3386900E+00, 0.3301800E+00, 0.3694000E+00, 0.3542800E+00, &
     & 0.3713600E+00, 0.3712700E+00, 0.4056600E+00, 0.5059800E+00, &
     & 0.4187200E+00, 0.3212800E+00, 0.3138700E+00, 0.4081858E+00, &
     & 0.2888700E+00, 0.3917857E+00, 0.3831224E+00, 0.3831224E+00 /
      data (ref_adm(24,iz,28, 9),iz = 1,20) / &
     & 0.3542700E+00, 0.3542700E+00, 0.3373800E+00, 0.3627200E+00, &
     & 0.4115800E+00, 0.3931600E+00, 0.3415900E+00, 0.4038300E+00, &
     & 0.3752600E+00, 0.3414200E+00, 0.4271000E+00, 0.4675100E+00, &
     & 0.4408400E+00, 0.4834400E+00, 0.4884600E+00, 0.3837200E+00, &
     & 0.4134334E+00, 0.4012434E+00, 0.3946186E+00, 0.3946186E+00 /
      data (ref_adm(24,iz,29, 9),iz = 1,20) / &
     & 0.3144200E+00, 0.3144200E+00, 0.2950200E+00, 0.3188700E+00, &
     & 0.3840600E+00, 0.3558900E+00, 0.3930057E+00, 0.2618200E+00, &
     & 0.3942000E+00, 0.4191400E+00, 0.4038600E+00, 0.4716100E+00, &
     & 0.4947400E+00, 0.4156300E+00, 0.4892957E+00, 0.4428700E+00, &
     & 0.4370761E+00, 0.4136142E+00, 0.4059601E+00, 0.4059601E+00 /
      data (ref_adm(24,iz,30, 9),iz = 1,20) / &
     & 0.3138400E+00, 0.3138400E+00, 0.3356000E+00, 0.2867100E+00, &
     & 0.3152100E+00, 0.3130700E+00, 0.3650300E+00, 0.4444600E+00, &
     & 0.3653100E+00, 0.3277700E+00, 0.4105256E+00, 0.4123100E+00, &
     & 0.4202600E+00, 0.4147700E+00, 0.4696603E+00, 0.4961855E+00, &
     & 0.2880200E+00, 0.4407397E+00, 0.4189470E+00, 0.4189470E+00 /
      data (ref_adm(24,iz,31, 9),iz = 1,20) / &
     & 0.3477800E+00, 0.3477800E+00, 0.4163700E+00, 0.4237000E+00, &
     & 0.3926300E+00, 0.4872000E+00, 0.4533300E+00, 0.4693700E+00, &
     & 0.4234100E+00, 0.3997335E+00, 0.4114071E+00, 0.3891000E+00, &
     & 0.4435000E+00, 0.4514231E+00, 0.4618814E+00, 0.4738402E+00, &
     & 0.2856900E+00, 0.4839742E+00, 0.4361436E+00, 0.4361436E+00 /
      data (ref_adm(24,iz,32, 9),iz = 1,20) / &
     & 0.3968500E+00, 0.3968500E+00, 0.3483200E+00, 0.5984700E+00, &
     & 0.4515300E+00, 0.4897900E+00, 0.4164800E+00, 0.4884600E+00, &
     & 0.4295300E+00, 0.4000000E+00, 0.4434300E+00, 0.3991100E+00, &
     & 0.4418361E+00, 0.4424700E+00, 0.4637694E+00, 0.3683600E+00, &
     & 0.4792838E+00, 0.4974207E+00, 0.4583203E+00, 0.4583203E+00 /
      data (ref_adm(24,iz,33, 9),iz = 1,20) / &
     & 0.4813800E+00, 0.4813800E+00, 0.4117600E+00, 0.4410000E+00, &
     & 0.4423800E+00, 0.4812800E+00, 0.3841600E+00, 0.3790533E+00, &
     & 0.4313000E+00, 0.4873800E+00, 0.3463500E+00, 0.4380000E+00, &
     & 0.4425932E+00, 0.3928600E+00, 0.3507800E+00, 0.4747362E+00, &
     & 0.4037700E+00, 0.4714000E+00, 0.4741992E+00, 0.4741992E+00 /
      data (ref_adm(24,iz,34, 9),iz = 1,20) / &
     & 0.2245100E+00, 0.2245100E+00, 0.3178799E+00, 0.3974100E+00, &
     & 0.4173100E+00, 0.4700300E+00, 0.3701185E+00, 0.3599500E+00, &
     & 0.3740900E+00, 0.4007834E+00, 0.3333900E+00, 0.4367800E+00, &
     & 0.4441268E+00, 0.5047000E+00, 0.6110900E+00, 0.3548100E+00, &
     & 0.4139000E+00, 0.4791334E+00, 0.4762835E+00, 0.4762835E+00 /
      data (ref_adm(24,iz,35, 9),iz = 1,20) / &
     & 0.2765100E+00, 0.2765100E+00, 0.3958400E+00, 0.4225800E+00, &
     & 0.4528000E+00, 0.3768500E+00, 0.3615000E+00, 0.4025900E+00, &
     & 0.4150900E+00, 0.4338300E+00, 0.4148809E+00, 0.4341500E+00, &
     & 0.3445000E+00, 0.4222500E+00, 0.4365600E+00, 0.4770933E+00, &
     & 0.4823384E+00, 0.4805193E+00, 0.4755031E+00, 0.4755031E+00 /
      data (ref_adm(24,iz,36, 9),iz = 1,20) / &
     & 0.2307500E+00, 0.2307500E+00, 0.2665800E+00, 0.3525650E+00, &
     & 0.4772000E+00, 0.4689800E+00, 0.5205200E+00, 0.3376500E+00, &
     & 0.5756700E+00, 0.3257100E+00, 0.4172354E+00, 0.4387332E+00, &
     & 0.3915600E+00, 0.4578000E+00, 0.4890800E+00, 0.4778493E+00, &
     & 0.4832610E+00, 0.4822502E+00, 0.4759656E+00, 0.4759656E+00 /
      data (ref_adm(24,iz,37, 9),iz = 1,20) / &
     & 0.3327200E+00, 0.3327200E+00, 0.2167400E+00, 0.2615800E+00, &
     & 0.4122800E+00, 0.4471100E+00, 0.3702100E+00, 0.3794665E+00, &
     & 0.3024800E+00, 0.4029621E+00, 0.4196860E+00, 0.4619073E+00, &
     & 0.4080200E+00, 0.3606400E+00, 0.5332300E+00, 0.5270600E+00, &
     & 0.4837122E+00, 0.4831713E+00, 0.4767309E+00, 0.4767309E+00 /
      data (ref_adm(24,iz,38, 9),iz = 1,20) / &
     & 0.3327200E+00, 0.3327200E+00, 0.2167400E+00, 0.2615800E+00, &
     & 0.4122800E+00, 0.4471100E+00, 0.3702100E+00, 0.3794665E+00, &
     & 0.3024800E+00, 0.4029621E+00, 0.4196860E+00, 0.4619073E+00, &
     & 0.4080200E+00, 0.3606400E+00, 0.5332300E+00, 0.5270600E+00, &
     & 0.4837122E+00, 0.4831713E+00, 0.4767309E+00, 0.4767309E+00 /
! Solar Zenith Angle 45.0 Albedo  0.3278141E+00
      data (ref_adm(24,iz, 1,10),iz = 1,20) / &
     & 0.2493100E+00, 0.2493100E+00, 0.2638700E+00, 0.2843000E+00, &
     & 0.2608900E+00, 0.3050300E+00, 0.2623900E+00, 0.2580300E+00, &
     & 0.2511000E+00, 0.2580200E+00, 0.3431600E+00, 0.3450500E+00, &
     & 0.4285900E+00, 0.4913200E+00, 0.4334300E+00, 0.3862900E+00, &
     & 0.3781800E+00, 0.3994600E+00, 0.3285589E+00, 0.3285589E+00 /
      data (ref_adm(24,iz, 2,10),iz = 1,20) / &
     & 0.2493100E+00, 0.2493100E+00, 0.2638700E+00, 0.2843000E+00, &
     & 0.2608900E+00, 0.3050300E+00, 0.2623900E+00, 0.2580300E+00, &
     & 0.2511000E+00, 0.2580200E+00, 0.3431600E+00, 0.3450500E+00, &
     & 0.4285900E+00, 0.4913200E+00, 0.4334300E+00, 0.3862900E+00, &
     & 0.3781800E+00, 0.3994600E+00, 0.3285589E+00, 0.3285589E+00 /
      data (ref_adm(24,iz, 3,10),iz = 1,20) / &
     & 0.3065300E+00, 0.3065300E+00, 0.2651100E+00, 0.2334000E+00, &
     & 0.3420800E+00, 0.2486500E+00, 0.2492700E+00, 0.2227400E+00, &
     & 0.2457000E+00, 0.2818400E+00, 0.3072400E+00, 0.2575800E+00, &
     & 0.3184600E+00, 0.4582300E+00, 0.3634000E+00, 0.3087100E+00, &
     & 0.4282100E+00, 0.4395400E+00, 0.5048581E-08, 0.5048581E-08 /
      data (ref_adm(24,iz, 4,10),iz = 1,20) / &
     & 0.3226100E+00, 0.3226100E+00, 0.2225900E+00, 0.3705200E+00, &
     & 0.3147600E+00, 0.2299600E+00, 0.2255600E+00, 0.2415600E+00, &
     & 0.2875200E+00, 0.3326400E+00, 0.2837100E+00, 0.2949200E+00, &
     & 0.3956500E+00, 0.3925200E+00, 0.3644700E+00, 0.3559700E+00, &
     & 0.3790900E+00, 0.3150800E+00, 0.3276538E+00, 0.3276538E+00 /
      data (ref_adm(24,iz, 5,10),iz = 1,20) / &
     & 0.4478900E+00, 0.4478900E+00, 0.3969900E+00, 0.2627100E+00, &
     & 0.2224700E+00, 0.2334200E+00, 0.2381600E+00, 0.2790500E+00, &
     & 0.3105500E+00, 0.3016800E+00, 0.2966700E+00, 0.2623000E+00, &
     & 0.4099400E+00, 0.3562500E+00, 0.4065600E+00, 0.4212400E+00, &
     & 0.4785300E+00, 0.3885210E+00, 0.3267563E+00, 0.3267563E+00 /
      data (ref_adm(24,iz, 6,10),iz = 1,20) / &
     & 0.3580500E+00, 0.3580500E+00, 0.3316900E+00, 0.3291800E+00, &
     & 0.2643600E+00, 0.3359700E+00, 0.2402400E+00, 0.2570400E+00, &
     & 0.2737700E+00, 0.3122000E+00, 0.2740100E+00, 0.3624100E+00, &
     & 0.2890500E+00, 0.3175300E+00, 0.3396300E+00, 0.4095100E+00, &
     & 0.4447300E+00, 0.3182500E+00, 0.3255598E+00, 0.3255598E+00 /
      data (ref_adm(24,iz, 7,10),iz = 1,20) / &
     & 0.2833800E+00, 0.2833800E+00, 0.3086600E+00, 0.3685200E+00, &
     & 0.4032800E+00, 0.2809400E+00, 0.2890100E+00, 0.2763300E+00, &
     & 0.3097700E+00, 0.3112800E+00, 0.3073300E+00, 0.2809600E+00, &
     & 0.2712400E+00, 0.2852900E+00, 0.3889900E+00, 0.3998800E+00, &
     & 0.3776000E+00, 0.2869800E+00, 0.3239862E+00, 0.3239862E+00 /
      data (ref_adm(24,iz, 8,10),iz = 1,20) / &
     & 0.2774600E+00, 0.2774600E+00, 0.2496600E+00, 0.2822500E+00, &
     & 0.3094500E+00, 0.2863500E+00, 0.2537900E+00, 0.2905600E+00, &
     & 0.2933200E+00, 0.3041000E+00, 0.3149800E+00, 0.3317000E+00, &
     & 0.3293800E+00, 0.3582000E+00, 0.3648200E+00, 0.4090400E+00, &
     & 0.3220700E+00, 0.3145500E+00, 0.4158200E+00, 0.4158200E+00 /
      data (ref_adm(24,iz, 9,10),iz = 1,20) / &
     & 0.2981900E+00, 0.2981900E+00, 0.3416700E+00, 0.3285600E+00, &
     & 0.3326700E+00, 0.2846700E+00, 0.3008700E+00, 0.2787300E+00, &
     & 0.3027000E+00, 0.3437900E+00, 0.3413700E+00, 0.3710900E+00, &
     & 0.3832000E+00, 0.3688400E+00, 0.3330800E+00, 0.5183400E+00, &
     & 0.3901078E+00, 0.3349400E+00, 0.3199592E+00, 0.3199592E+00 /
      data (ref_adm(24,iz,10,10),iz = 1,20) / &
     & 0.3171700E+00, 0.3171700E+00, 0.2725000E+00, 0.2945700E+00, &
     & 0.2837000E+00, 0.2894700E+00, 0.2747200E+00, 0.2815200E+00, &
     & 0.2425000E+00, 0.2772800E+00, 0.2991200E+00, 0.2832800E+00, &
     & 0.3427000E+00, 0.3411800E+00, 0.3846800E+00, 0.5240700E+00, &
     & 0.3867337E+00, 0.3747277E+00, 0.3170055E+00, 0.3170055E+00 /
      data (ref_adm(24,iz,11,10),iz = 1,20) / &
     & 0.3360000E+00, 0.3360000E+00, 0.3341900E+00, 0.2851600E+00, &
     & 0.2267100E+00, 0.2450800E+00, 0.2996500E+00, 0.3010700E+00, &
     & 0.3206400E+00, 0.2283000E+00, 0.2550100E+00, 0.3026600E+00, &
     & 0.2997400E+00, 0.3338800E+00, 0.3053200E+00, 0.3770800E+00, &
     & 0.3830228E+00, 0.3709269E+00, 0.3140043E+00, 0.3140043E+00 /
      data (ref_adm(24,iz,12,10),iz = 1,20) / &
     & 0.2938000E+00, 0.2938000E+00, 0.3209100E+00, 0.3252400E+00, &
     & 0.2885800E+00, 0.2746700E+00, 0.2569800E+00, 0.2792600E+00, &
     & 0.3328600E+00, 0.2575800E+00, 0.2321100E+00, 0.2420400E+00, &
     & 0.3113400E+00, 0.3114600E+00, 0.2706400E+00, 0.2665200E+00, &
     & 0.3790971E+00, 0.2766300E+00, 0.3108067E+00, 0.3108067E+00 /
      data (ref_adm(24,iz,13,10),iz = 1,20) / &
     & 0.3371300E+00, 0.3371300E+00, 0.2883300E+00, 0.2872000E+00, &
     & 0.2881700E+00, 0.2939100E+00, 0.2969500E+00, 0.2945000E+00, &
     & 0.3216800E+00, 0.3035200E+00, 0.3095800E+00, 0.3008000E+00, &
     & 0.2939800E+00, 0.4045200E+00, 0.3498500E+00, 0.3920700E+00, &
     & 0.3750423E+00, 0.3624187E+00, 0.3076037E+00, 0.3076037E+00 /
      data (ref_adm(24,iz,14,10),iz = 1,20) / &
     & 0.2776200E+00, 0.2776200E+00, 0.3112200E+00, 0.2757200E+00, &
     & 0.3054900E+00, 0.2958900E+00, 0.2701800E+00, 0.2683800E+00, &
     & 0.2705100E+00, 0.2724400E+00, 0.2843900E+00, 0.2747300E+00, &
     & 0.3204600E+00, 0.3494300E+00, 0.3889700E+00, 0.2142700E+00, &
     & 0.3713525E+00, 0.3580063E+00, 0.3042693E+00, 0.3042693E+00 /
      data (ref_adm(24,iz,15,10),iz = 1,20) / &
     & 0.2967500E+00, 0.2967500E+00, 0.3172200E+00, 0.3292900E+00, &
     & 0.2841800E+00, 0.3043000E+00, 0.3401200E+00, 0.3424400E+00, &
     & 0.3483200E+00, 0.2966100E+00, 0.3008200E+00, 0.2765000E+00, &
     & 0.2500600E+00, 0.2648600E+00, 0.3835500E+00, 0.4075900E+00, &
     & 0.3674702E+00, 0.3534673E+00, 0.3010706E+00, 0.3010706E+00 /
      data (ref_adm(24,iz,16,10),iz = 1,20) / &
     & 0.3024600E+00, 0.3024600E+00, 0.2775900E+00, 0.2910600E+00, &
     & 0.3270400E+00, 0.3157000E+00, 0.2814400E+00, 0.4137500E+00, &
     & 0.3621200E+00, 0.2784700E+00, 0.2504500E+00, 0.2583500E+00, &
     & 0.2846600E+00, 0.3017700E+00, 0.4005600E+00, 0.3372100E+00, &
     & 0.3632621E+00, 0.3493492E+00, 0.2975857E+00, 0.2975857E+00 /
      data (ref_adm(24,iz,17,10),iz = 1,20) / &
     & 0.3340700E+00, 0.3340700E+00, 0.3457700E+00, 0.3175600E+00, &
     & 0.3286100E+00, 0.2658000E+00, 0.2644800E+00, 0.2711000E+00, &
     & 0.3194500E+00, 0.2904400E+00, 0.3081200E+00, 0.2688500E+00, &
     & 0.2484400E+00, 0.2582600E+00, 0.3176400E+00, 0.3408300E+00, &
     & 0.3880200E+00, 0.3453863E+00, 0.2943242E+00, 0.2943242E+00 /
      data (ref_adm(24,iz,18,10),iz = 1,20) / &
     & 0.3451700E+00, 0.3451700E+00, 0.3281200E+00, 0.2844800E+00, &
     & 0.3267000E+00, 0.2614600E+00, 0.3421800E+00, 0.2803600E+00, &
     & 0.2565600E+00, 0.3062200E+00, 0.2608700E+00, 0.2794900E+00, &
     & 0.2536800E+00, 0.2436700E+00, 0.2207700E+00, 0.3136130E+00, &
     & 0.3532900E+00, 0.3056303E+00, 0.2624098E+00, 0.2624098E+00 /
      data (ref_adm(24,iz,19,10),iz = 1,20) / &
     & 0.3039900E+00, 0.3039900E+00, 0.3505400E+00, 0.2851300E+00, &
     & 0.3251100E+00, 0.3163200E+00, 0.3401500E+00, 0.3474700E+00, &
     & 0.3300200E+00, 0.3266800E+00, 0.1933800E+00, 0.2666700E+00, &
     & 0.2587300E+00, 0.2881400E+00, 0.2639500E+00, 0.2934700E+00, &
     & 0.3041700E+00, 0.3051509E+00, 0.2620418E+00, 0.2620418E+00 /
      data (ref_adm(24,iz,20,10),iz = 1,20) / &
     & 0.3248200E+00, 0.3248200E+00, 0.3017800E+00, 0.2777400E+00, &
     & 0.2828700E+00, 0.2821200E+00, 0.2576300E+00, 0.3246700E+00, &
     & 0.3474300E+00, 0.3233200E+00, 0.2950000E+00, 0.2905200E+00, &
     & 0.2845000E+00, 0.2574100E+00, 0.2979600E+00, 0.3169600E+00, &
     & 0.3373800E+00, 0.3042341E+00, 0.2616513E+00, 0.2616513E+00 /
      data (ref_adm(24,iz,21,10),iz = 1,20) / &
     & 0.3633100E+00, 0.3633100E+00, 0.3752300E+00, 0.3501000E+00, &
     & 0.3015000E+00, 0.3269200E+00, 0.2705500E+00, 0.3001000E+00, &
     & 0.2924900E+00, 0.2495800E+00, 0.2522300E+00, 0.3306500E+00, &
     & 0.2988300E+00, 0.3052800E+00, 0.3490800E+00, 0.3359200E+00, &
     & 0.3129344E+00, 0.3034861E+00, 0.2613668E+00, 0.2613668E+00 /
      data (ref_adm(24,iz,22,10),iz = 1,20) / &
     & 0.2817000E+00, 0.2817000E+00, 0.3268900E+00, 0.2944700E+00, &
     & 0.3665700E+00, 0.3429400E+00, 0.2776400E+00, 0.3152000E+00, &
     & 0.2698000E+00, 0.2715600E+00, 0.2771900E+00, 0.3039100E+00, &
     & 0.2916100E+00, 0.2543000E+00, 0.3199200E+00, 0.2127500E+00, &
     & 0.3424770E+00, 0.3355367E+00, 0.3051631E+00, 0.3051631E+00 /
      data (ref_adm(24,iz,23,10),iz = 1,20) / &
     & 0.2803300E+00, 0.2803300E+00, 0.2919900E+00, 0.2684600E+00, &
     & 0.3225800E+00, 0.3834500E+00, 0.3200500E+00, 0.3548500E+00, &
     & 0.2815900E+00, 0.2782200E+00, 0.2837400E+00, 0.3095500E+00, &
     & 0.3054600E+00, 0.2393100E+00, 0.2676900E+00, 0.3125600E+00, &
     & 0.3417355E+00, 0.3341852E+00, 0.3052136E+00, 0.3052136E+00 /
      data (ref_adm(24,iz,24,10),iz = 1,20) / &
     & 0.3292400E+00, 0.3292400E+00, 0.2674500E+00, 0.2901000E+00, &
     & 0.2827500E+00, 0.3109000E+00, 0.3682000E+00, 0.3061200E+00, &
     & 0.3145800E+00, 0.2861800E+00, 0.2677800E+00, 0.4044900E+00, &
     & 0.3358400E+00, 0.2743700E+00, 0.3507400E+00, 0.3866800E+00, &
     & 0.3866600E+00, 0.3338656E+00, 0.3058904E+00, 0.3058904E+00 /
      data (ref_adm(24,iz,25,10),iz = 1,20) / &
     & 0.3295700E+00, 0.3295700E+00, 0.3311500E+00, 0.3020700E+00, &
     & 0.3216800E+00, 0.2796700E+00, 0.3911400E+00, 0.3855400E+00, &
     & 0.3340800E+00, 0.3042100E+00, 0.2885400E+00, 0.3016200E+00, &
     & 0.4089600E+00, 0.2994100E+00, 0.3366600E+00, 0.3207900E+00, &
     & 0.2743600E+00, 0.3341302E+00, 0.3075431E+00, 0.3075431E+00 /
      data (ref_adm(24,iz,26,10),iz = 1,20) / &
     & 0.3217600E+00, 0.3217600E+00, 0.2936700E+00, 0.3231100E+00, &
     & 0.3158400E+00, 0.2904600E+00, 0.3385100E+00, 0.3600800E+00, &
     & 0.3408100E+00, 0.3755900E+00, 0.3628200E+00, 0.3561100E+00, &
     & 0.3482200E+00, 0.4299400E+00, 0.3130500E+00, 0.3041300E+00, &
     & 0.2855800E+00, 0.2722900E+00, 0.3099003E+00, 0.3099003E+00 /
      data (ref_adm(24,iz,27,10),iz = 1,20) / &
     & 0.3040300E+00, 0.3040300E+00, 0.3253200E+00, 0.3449400E+00, &
     & 0.3389600E+00, 0.3233700E+00, 0.3269900E+00, 0.3236600E+00, &
     & 0.3129400E+00, 0.2976400E+00, 0.3151000E+00, 0.3215900E+00, &
     & 0.3954000E+00, 0.3621200E+00, 0.3441800E+00, 0.3548400E+00, &
     & 0.3261200E+00, 0.3118300E+00, 0.3129687E+00, 0.3129687E+00 /
      data (ref_adm(24,iz,28,10),iz = 1,20) / &
     & 0.3228600E+00, 0.3228600E+00, 0.3207900E+00, 0.3600600E+00, &
     & 0.3791400E+00, 0.3610300E+00, 0.3676200E+00, 0.3503600E+00, &
     & 0.3861900E+00, 0.3853700E+00, 0.3611300E+00, 0.3538800E+00, &
     & 0.3934500E+00, 0.4204400E+00, 0.3469100E+00, 0.3928000E+00, &
     & 0.3697500E+00, 0.3457000E+00, 0.2286400E+00, 0.2286400E+00 /
      data (ref_adm(24,iz,29,10),iz = 1,20) / &
     & 0.3641200E+00, 0.3641200E+00, 0.3822800E+00, 0.3678200E+00, &
     & 0.3763400E+00, 0.3041100E+00, 0.3114800E+00, 0.2857600E+00, &
     & 0.3883400E+00, 0.3578200E+00, 0.3820900E+00, 0.4262700E+00, &
     & 0.4309700E+00, 0.4140000E+00, 0.3756600E+00, 0.3857700E+00, &
     & 0.3921700E+00, 0.2521600E+00, 0.3219089E+00, 0.3219089E+00 /
      data (ref_adm(24,iz,30,10),iz = 1,20) / &
     & 0.3361900E+00, 0.3361900E+00, 0.3354200E+00, 0.4110100E+00, &
     & 0.3734900E+00, 0.3409600E+00, 0.3306500E+00, 0.3415100E+00, &
     & 0.3678200E+00, 0.3590300E+00, 0.3659800E+00, 0.3759600E+00, &
     & 0.4092700E+00, 0.3992400E+00, 0.3634200E+00, 0.3455200E+00, &
     & 0.4073700E+00, 0.3114200E+00, 0.3269268E+00, 0.3269268E+00 /
      data (ref_adm(24,iz,31,10),iz = 1,20) / &
     & 0.3172700E+00, 0.3172700E+00, 0.3022100E+00, 0.2970100E+00, &
     & 0.3040700E+00, 0.2963600E+00, 0.3172000E+00, 0.3328100E+00, &
     & 0.3634300E+00, 0.3463900E+00, 0.3379000E+00, 0.3093900E+00, &
     & 0.3491400E+00, 0.3450300E+00, 0.3391700E+00, 0.3797200E+00, &
     & 0.3642800E+00, 0.3170800E+00, 0.2511900E+00, 0.2511900E+00 /
      data (ref_adm(24,iz,32,10),iz = 1,20) / &
     & 0.2953700E+00, 0.2953700E+00, 0.2983300E+00, 0.3140100E+00, &
     & 0.3410500E+00, 0.2889800E+00, 0.2716700E+00, 0.2929800E+00, &
     & 0.3582900E+00, 0.2960100E+00, 0.2842800E+00, 0.3955600E+00, &
     & 0.5178800E+00, 0.4188300E+00, 0.3120000E+00, 0.3326700E+00, &
     & 0.3517800E+00, 0.2901200E+00, 0.2484900E+00, 0.2484900E+00 /
      data (ref_adm(24,iz,33,10),iz = 1,20) / &
     & 0.2481600E+00, 0.2481600E+00, 0.3457200E+00, 0.3187200E+00, &
     & 0.3428100E+00, 0.3323400E+00, 0.2989800E+00, 0.3513700E+00, &
     & 0.3090500E+00, 0.3344500E+00, 0.4922800E+00, 0.4060400E+00, &
     & 0.4240800E+00, 0.4577700E+00, 0.4458000E+00, 0.3125600E+00, &
     & 0.4029400E+00, 0.3118700E+00, 0.2845800E+00, 0.2845800E+00 /
      data (ref_adm(24,iz,34,10),iz = 1,20) / &
     & 0.3692800E+00, 0.3692800E+00, 0.2806300E+00, 0.3670400E+00, &
     & 0.2920600E+00, 0.3319300E+00, 0.3163100E+00, 0.3374800E+00, &
     & 0.3864800E+00, 0.4241600E+00, 0.4186100E+00, 0.4474400E+00, &
     & 0.4074800E+00, 0.3473500E+00, 0.3182600E+00, 0.3752300E+00, &
     & 0.3981000E+00, 0.4322400E+00, 0.3444911E+00, 0.3444911E+00 /
      data (ref_adm(24,iz,35,10),iz = 1,20) / &
     & 0.3651600E+00, 0.3651600E+00, 0.3342100E+00, 0.2884100E+00, &
     & 0.3859100E+00, 0.3510900E+00, 0.3410600E+00, 0.3560000E+00, &
     & 0.4334400E+00, 0.3735200E+00, 0.4921100E+00, 0.4034200E+00, &
     & 0.4507700E+00, 0.4439700E+00, 0.4034000E+00, 0.4095400E+00, &
     & 0.4448300E+00, 0.3676802E+00, 0.3475614E+00, 0.3475614E+00 /
      data (ref_adm(24,iz,36,10),iz = 1,20) / &
     & 0.3097100E+00, 0.3097100E+00, 0.3384600E+00, 0.4598100E+00, &
     & 0.4204700E+00, 0.4186700E+00, 0.3981500E+00, 0.3364400E+00, &
     & 0.4023800E+00, 0.4280900E+00, 0.3932400E+00, 0.4223600E+00, &
     & 0.4211500E+00, 0.4180900E+00, 0.4138500E+00, 0.3997300E+00, &
     & 0.4825400E+00, 0.3699712E+00, 0.3496055E+00, 0.3496055E+00 /
      data (ref_adm(24,iz,37,10),iz = 1,20) / &
     & 0.2775500E+00, 0.2775500E+00, 0.3946600E+00, 0.3996000E+00, &
     & 0.4174900E+00, 0.3451700E+00, 0.3954200E+00, 0.3610400E+00, &
     & 0.3936200E+00, 0.3825700E+00, 0.4111100E+00, 0.3718100E+00, &
     & 0.3665800E+00, 0.3494100E+00, 0.3894600E+00, 0.4408400E+00, &
     & 0.4095200E+00, 0.3712428E+00, 0.3507778E+00, 0.3507778E+00 /
      data (ref_adm(24,iz,38,10),iz = 1,20) / &
     & 0.2775500E+00, 0.2775500E+00, 0.3946600E+00, 0.3996000E+00, &
     & 0.4174900E+00, 0.3451700E+00, 0.3954200E+00, 0.3610400E+00, &
     & 0.3936200E+00, 0.3825700E+00, 0.4111100E+00, 0.3718100E+00, &
     & 0.3665800E+00, 0.3494100E+00, 0.3894600E+00, 0.4408400E+00, &
     & 0.4095200E+00, 0.3712428E+00, 0.3507778E+00, 0.3507778E+00 /
! Solar Zenith Angle 50.0 Albedo  0.3249588E+00
      data (ref_adm(24,iz, 1,11),iz = 1,20) / &
     & 0.2699200E+00, 0.2699200E+00, 0.2787900E+00, 0.2769100E+00, &
     & 0.3310800E+00, 0.3269600E+00, 0.3467000E+00, 0.3408200E+00, &
     & 0.3087200E+00, 0.3222800E+00, 0.3945000E+00, 0.4282400E+00, &
     & 0.3972200E+00, 0.3514000E+00, 0.3623400E+00, 0.3787400E+00, &
     & 0.4207700E+00, 0.4646400E+00, 0.4421730E+00, 0.4421730E+00 /
      data (ref_adm(24,iz, 2,11),iz = 1,20) / &
     & 0.2699200E+00, 0.2699200E+00, 0.2787900E+00, 0.2769100E+00, &
     & 0.3310800E+00, 0.3269600E+00, 0.3467000E+00, 0.3408200E+00, &
     & 0.3087200E+00, 0.3222800E+00, 0.3945000E+00, 0.4282400E+00, &
     & 0.3972200E+00, 0.3514000E+00, 0.3623400E+00, 0.3787400E+00, &
     & 0.4207700E+00, 0.4646400E+00, 0.4421730E+00, 0.4421730E+00 /
      data (ref_adm(24,iz, 3,11),iz = 1,20) / &
     & 0.2650700E+00, 0.2650700E+00, 0.2672800E+00, 0.3085000E+00, &
     & 0.2932000E+00, 0.2809300E+00, 0.2958300E+00, 0.3233600E+00, &
     & 0.3021200E+00, 0.2987500E+00, 0.3741600E+00, 0.3695600E+00, &
     & 0.3810200E+00, 0.3305200E+00, 0.4040700E+00, 0.3908600E+00, &
     & 0.4135600E+00, 0.4705900E+00, 0.1684443E+00, 0.1684443E+00 /
      data (ref_adm(24,iz, 4,11),iz = 1,20) / &
     & 0.2846200E+00, 0.2846200E+00, 0.3029200E+00, 0.2573100E+00, &
     & 0.2690400E+00, 0.2724200E+00, 0.3115500E+00, 0.3348600E+00, &
     & 0.3561100E+00, 0.2871500E+00, 0.3384500E+00, 0.3252100E+00, &
     & 0.3873500E+00, 0.3934300E+00, 0.3069700E+00, 0.3987300E+00, &
     & 0.3941700E+00, 0.4619800E+00, 0.4358696E+00, 0.4358696E+00 /
      data (ref_adm(24,iz, 5,11),iz = 1,20) / &
     & 0.2888000E+00, 0.2888000E+00, 0.3222400E+00, 0.2839200E+00, &
     & 0.2575300E+00, 0.2613800E+00, 0.2920500E+00, 0.3259600E+00, &
     & 0.2854300E+00, 0.3392700E+00, 0.3371700E+00, 0.3170500E+00, &
     & 0.3123400E+00, 0.3968400E+00, 0.3795100E+00, 0.4296200E+00, &
     & 0.4457500E+00, 0.5366700E+00, 0.4307359E+00, 0.4307359E+00 /
      data (ref_adm(24,iz, 6,11),iz = 1,20) / &
     & 0.3060000E+00, 0.3060000E+00, 0.3063900E+00, 0.2680200E+00, &
     & 0.2609100E+00, 0.2915700E+00, 0.3002100E+00, 0.2632500E+00, &
     & 0.2795600E+00, 0.2716300E+00, 0.3045900E+00, 0.2716200E+00, &
     & 0.3352700E+00, 0.3607000E+00, 0.3458600E+00, 0.4044400E+00, &
     & 0.3673200E+00, 0.4293300E+00, 0.4913300E+00, 0.4913300E+00 /
      data (ref_adm(24,iz, 7,11),iz = 1,20) / &
     & 0.2987200E+00, 0.2987200E+00, 0.2772800E+00, 0.2886700E+00, &
     & 0.2795300E+00, 0.3167100E+00, 0.3199400E+00, 0.2615900E+00, &
     & 0.2662900E+00, 0.2805800E+00, 0.2628400E+00, 0.2878900E+00, &
     & 0.3027800E+00, 0.2980200E+00, 0.3165700E+00, 0.3586100E+00, &
     & 0.3802800E+00, 0.3651100E+00, 0.4086239E+00, 0.4086239E+00 /
      data (ref_adm(24,iz, 8,11),iz = 1,20) / &
     & 0.2857100E+00, 0.2857100E+00, 0.2755900E+00, 0.2701300E+00, &
     & 0.2816400E+00, 0.2986400E+00, 0.3002800E+00, 0.3135200E+00, &
     & 0.3005900E+00, 0.2800100E+00, 0.2778500E+00, 0.2980700E+00, &
     & 0.3083900E+00, 0.3560400E+00, 0.3550600E+00, 0.4070300E+00, &
     & 0.3726300E+00, 0.3915200E+00, 0.3956576E+00, 0.3956576E+00 /
      data (ref_adm(24,iz, 9,11),iz = 1,20) / &
     & 0.2966600E+00, 0.2966600E+00, 0.3346000E+00, 0.3753800E+00, &
     & 0.3225400E+00, 0.2752500E+00, 0.3171400E+00, 0.3335500E+00, &
     & 0.3168000E+00, 0.3338900E+00, 0.3249500E+00, 0.3175200E+00, &
     & 0.3068600E+00, 0.3037200E+00, 0.3295400E+00, 0.3765200E+00, &
     & 0.3513300E+00, 0.3723800E+00, 0.3845995E+00, 0.3845995E+00 /
      data (ref_adm(24,iz,10,11),iz = 1,20) / &
     & 0.2985300E+00, 0.2985300E+00, 0.2890000E+00, 0.3196400E+00, &
     & 0.2973500E+00, 0.2950700E+00, 0.3128800E+00, 0.3020900E+00, &
     & 0.2705700E+00, 0.3153400E+00, 0.2907300E+00, 0.2915200E+00, &
     & 0.3002100E+00, 0.3083300E+00, 0.3433100E+00, 0.3358200E+00, &
     & 0.3172800E+00, 0.3491400E+00, 0.3751262E+00, 0.3751262E+00 /
      data (ref_adm(24,iz,11,11),iz = 1,20) / &
     & 0.2664900E+00, 0.2664900E+00, 0.2925300E+00, 0.2699500E+00, &
     & 0.2844700E+00, 0.3432400E+00, 0.2888300E+00, 0.3268200E+00, &
     & 0.3215300E+00, 0.2834500E+00, 0.2947200E+00, 0.2822600E+00, &
     & 0.2790300E+00, 0.3262700E+00, 0.3603500E+00, 0.3785500E+00, &
     & 0.3345300E+00, 0.3563000E+00, 0.3669327E+00, 0.3669327E+00 /
      data (ref_adm(24,iz,12,11),iz = 1,20) / &
     & 0.2985800E+00, 0.2985800E+00, 0.2847500E+00, 0.2613800E+00, &
     & 0.3029100E+00, 0.2852400E+00, 0.3277900E+00, 0.2897700E+00, &
     & 0.3045800E+00, 0.2802500E+00, 0.2850900E+00, 0.2908100E+00, &
     & 0.3099500E+00, 0.3137300E+00, 0.3320800E+00, 0.2875600E+00, &
     & 0.3460500E+00, 0.3463800E+00, 0.3598221E+00, 0.3598221E+00 /
      data (ref_adm(24,iz,13,11),iz = 1,20) / &
     & 0.3221000E+00, 0.3221000E+00, 0.3018800E+00, 0.2977100E+00, &
     & 0.3095800E+00, 0.3196200E+00, 0.2945000E+00, 0.3044900E+00, &
     & 0.3113400E+00, 0.3343000E+00, 0.2892900E+00, 0.2885600E+00, &
     & 0.2837400E+00, 0.2646200E+00, 0.3345300E+00, 0.3732800E+00, &
     & 0.3724900E+00, 0.3149100E+00, 0.3534396E+00, 0.3534396E+00 /
      data (ref_adm(24,iz,14,11),iz = 1,20) / &
     & 0.2880500E+00, 0.2880500E+00, 0.2578700E+00, 0.2631700E+00, &
     & 0.2566100E+00, 0.2597100E+00, 0.2432300E+00, 0.2716400E+00, &
     & 0.2733500E+00, 0.2734200E+00, 0.2811600E+00, 0.2925600E+00, &
     & 0.3111700E+00, 0.3171200E+00, 0.3011600E+00, 0.3780200E+00, &
     & 0.3318300E+00, 0.2599300E+00, 0.3471663E+00, 0.3471663E+00 /
      data (ref_adm(24,iz,15,11),iz = 1,20) / &
     & 0.3084800E+00, 0.3084800E+00, 0.3154000E+00, 0.3163600E+00, &
     & 0.2916500E+00, 0.2952000E+00, 0.3023300E+00, 0.3074700E+00, &
     & 0.3086600E+00, 0.3082500E+00, 0.2937800E+00, 0.2791600E+00, &
     & 0.2752900E+00, 0.2956700E+00, 0.3083500E+00, 0.3081200E+00, &
     & 0.3488400E+00, 0.2952500E+00, 0.3403482E+00, 0.3403482E+00 /
      data (ref_adm(24,iz,16,11),iz = 1,20) / &
     & 0.2788500E+00, 0.2788500E+00, 0.2888600E+00, 0.2903200E+00, &
     & 0.2828700E+00, 0.2909100E+00, 0.2836300E+00, 0.2924800E+00, &
     & 0.2460500E+00, 0.2695900E+00, 0.2880600E+00, 0.3043800E+00, &
     & 0.3171600E+00, 0.2832600E+00, 0.2805300E+00, 0.3323800E+00, &
     & 0.3480000E+00, 0.3021800E+00, 0.3329853E+00, 0.3329853E+00 /
      data (ref_adm(24,iz,17,11),iz = 1,20) / &
     & 0.2950800E+00, 0.2950800E+00, 0.2949800E+00, 0.3100500E+00, &
     & 0.3416500E+00, 0.2626800E+00, 0.2751000E+00, 0.3021300E+00, &
     & 0.3109800E+00, 0.2631800E+00, 0.2937900E+00, 0.2587900E+00, &
     & 0.2825800E+00, 0.2877700E+00, 0.2519700E+00, 0.3028500E+00, &
     & 0.3843500E+00, 0.3003900E+00, 0.3267387E+00, 0.3267387E+00 /
      data (ref_adm(24,iz,18,11),iz = 1,20) / &
     & 0.3163200E+00, 0.3163200E+00, 0.3133500E+00, 0.3020500E+00, &
     & 0.2849400E+00, 0.2792100E+00, 0.2863800E+00, 0.2661000E+00, &
     & 0.2837500E+00, 0.3199000E+00, 0.2643400E+00, 0.2761400E+00, &
     & 0.2827100E+00, 0.3326800E+00, 0.3232100E+00, 0.3740600E+00, &
     & 0.3877300E+00, 0.3151486E+00, 0.2897103E+00, 0.2897103E+00 /
      data (ref_adm(24,iz,19,11),iz = 1,20) / &
     & 0.2833300E+00, 0.2833300E+00, 0.3010400E+00, 0.2484700E+00, &
     & 0.2807500E+00, 0.2755100E+00, 0.3010000E+00, 0.2869900E+00, &
     & 0.2876000E+00, 0.2854400E+00, 0.2639300E+00, 0.2932800E+00, &
     & 0.2948300E+00, 0.2833700E+00, 0.2743100E+00, 0.3485900E+00, &
     & 0.4065500E+00, 0.3129884E+00, 0.2871672E+00, 0.2871672E+00 /
      data (ref_adm(24,iz,20,11),iz = 1,20) / &
     & 0.3013700E+00, 0.3013700E+00, 0.3435500E+00, 0.2939500E+00, &
     & 0.2952700E+00, 0.2806200E+00, 0.2897100E+00, 0.3097400E+00, &
     & 0.2973400E+00, 0.2931500E+00, 0.2815300E+00, 0.2919500E+00, &
     & 0.3039600E+00, 0.2874800E+00, 0.2655800E+00, 0.3145592E+00, &
     & 0.3149815E+00, 0.3111287E+00, 0.2855034E+00, 0.2855034E+00 /
      data (ref_adm(24,iz,21,11),iz = 1,20) / &
     & 0.3159100E+00, 0.3159100E+00, 0.3689500E+00, 0.3033100E+00, &
     & 0.3173200E+00, 0.3042000E+00, 0.2894000E+00, 0.3210600E+00, &
     & 0.3290500E+00, 0.3202300E+00, 0.3018100E+00, 0.3195900E+00, &
     & 0.3400300E+00, 0.3230100E+00, 0.2996200E+00, 0.2955400E+00, &
     & 0.3137591E+00, 0.3094472E+00, 0.2842814E+00, 0.2842814E+00 /
      data (ref_adm(24,iz,22,11),iz = 1,20) / &
     & 0.2969700E+00, 0.2969700E+00, 0.3032900E+00, 0.2849000E+00, &
     & 0.3118300E+00, 0.3309900E+00, 0.2927400E+00, 0.3273500E+00, &
     & 0.2973700E+00, 0.3027200E+00, 0.2974600E+00, 0.3141000E+00, &
     & 0.2895300E+00, 0.2953100E+00, 0.3514000E+00, 0.3483900E+00, &
     & 0.4018261E+00, 0.3925931E+00, 0.3525338E+00, 0.3525338E+00 /
      data (ref_adm(24,iz,23,11),iz = 1,20) / &
     & 0.2867900E+00, 0.2867900E+00, 0.3202200E+00, 0.3045100E+00, &
     & 0.2953900E+00, 0.3032900E+00, 0.3223200E+00, 0.3337500E+00, &
     & 0.3157800E+00, 0.2888700E+00, 0.3208300E+00, 0.3472700E+00, &
     & 0.3518300E+00, 0.3294300E+00, 0.3340000E+00, 0.3143600E+00, &
     & 0.3940005E+00, 0.3837494E+00, 0.3492124E+00, 0.3492124E+00 /
      data (ref_adm(24,iz,24,11),iz = 1,20) / &
     & 0.2709600E+00, 0.2709600E+00, 0.3294500E+00, 0.3297800E+00, &
     & 0.3162500E+00, 0.3142800E+00, 0.3801200E+00, 0.3624800E+00, &
     & 0.3578400E+00, 0.3343500E+00, 0.3261300E+00, 0.4032500E+00, &
     & 0.3412200E+00, 0.3203000E+00, 0.3066400E+00, 0.2476000E+00, &
     & 0.4948000E+00, 0.3767951E+00, 0.3466061E+00, 0.3466061E+00 /
      data (ref_adm(24,iz,25,11),iz = 1,20) / &
     & 0.2982000E+00, 0.2982000E+00, 0.3427100E+00, 0.3479000E+00, &
     & 0.3449300E+00, 0.3341900E+00, 0.3125900E+00, 0.3120600E+00, &
     & 0.3674100E+00, 0.3098400E+00, 0.3362500E+00, 0.3413100E+00, &
     & 0.3532600E+00, 0.3324200E+00, 0.3074400E+00, 0.3041000E+00, &
     & 0.3122100E+00, 0.3703588E+00, 0.3454476E+00, 0.3454476E+00 /
      data (ref_adm(24,iz,26,11),iz = 1,20) / &
     & 0.2991200E+00, 0.2991200E+00, 0.2665300E+00, 0.2758100E+00, &
     & 0.2796400E+00, 0.2924700E+00, 0.2887800E+00, 0.3066900E+00, &
     & 0.3235400E+00, 0.3270000E+00, 0.3575300E+00, 0.3586500E+00, &
     & 0.3695000E+00, 0.3499000E+00, 0.3370900E+00, 0.3456800E+00, &
     & 0.3085800E+00, 0.3662371E+00, 0.3451841E+00, 0.3451841E+00 /
      data (ref_adm(24,iz,27,11),iz = 1,20) / &
     & 0.3082000E+00, 0.3082000E+00, 0.3262900E+00, 0.3460500E+00, &
     & 0.3681500E+00, 0.3528600E+00, 0.3500100E+00, 0.3543300E+00, &
     & 0.3321000E+00, 0.3223200E+00, 0.3283700E+00, 0.3153200E+00, &
     & 0.3210000E+00, 0.3435100E+00, 0.3652000E+00, 0.3138700E+00, &
     & 0.3511800E+00, 0.3302700E+00, 0.3466326E+00, 0.3466326E+00 /
      data (ref_adm(24,iz,28,11),iz = 1,20) / &
     & 0.3032500E+00, 0.3032500E+00, 0.2857400E+00, 0.2732700E+00, &
     & 0.3403800E+00, 0.3232000E+00, 0.3337600E+00, 0.3364100E+00, &
     & 0.3214700E+00, 0.3306200E+00, 0.3777300E+00, 0.3902400E+00, &
     & 0.3869600E+00, 0.3933700E+00, 0.3855000E+00, 0.3527600E+00, &
     & 0.3526500E+00, 0.3209000E+00, 0.2523400E+00, 0.2523400E+00 /
      data (ref_adm(24,iz,29,11),iz = 1,20) / &
     & 0.2908600E+00, 0.2908600E+00, 0.2823900E+00, 0.2719100E+00, &
     & 0.3383500E+00, 0.2996800E+00, 0.3310700E+00, 0.3000000E+00, &
     & 0.3519700E+00, 0.3312800E+00, 0.3174300E+00, 0.3658200E+00, &
     & 0.3985100E+00, 0.3872200E+00, 0.3757600E+00, 0.3913500E+00, &
     & 0.3538800E+00, 0.3280200E+00, 0.2783500E+00, 0.2783500E+00 /
      data (ref_adm(24,iz,30,11),iz = 1,20) / &
     & 0.3073400E+00, 0.3073400E+00, 0.3334600E+00, 0.2968300E+00, &
     & 0.2892600E+00, 0.3392200E+00, 0.3149100E+00, 0.3191800E+00, &
     & 0.3499800E+00, 0.3728200E+00, 0.3553300E+00, 0.3770800E+00, &
     & 0.4051700E+00, 0.3880900E+00, 0.3755300E+00, 0.3601000E+00, &
     & 0.3750800E+00, 0.3505600E+00, 0.2751000E+00, 0.2751000E+00 /
      data (ref_adm(24,iz,31,11),iz = 1,20) / &
     & 0.2981600E+00, 0.2981600E+00, 0.3020800E+00, 0.2894800E+00, &
     & 0.3102000E+00, 0.3007700E+00, 0.2890600E+00, 0.3175200E+00, &
     & 0.3458900E+00, 0.3572800E+00, 0.3845700E+00, 0.4004900E+00, &
     & 0.4124300E+00, 0.3837600E+00, 0.3851800E+00, 0.3783300E+00, &
     & 0.3929400E+00, 0.3769100E+00, 0.3335700E+00, 0.3335700E+00 /
      data (ref_adm(24,iz,32,11),iz = 1,20) / &
     & 0.2868700E+00, 0.2868700E+00, 0.2982900E+00, 0.3261700E+00, &
     & 0.3015700E+00, 0.3420000E+00, 0.3038200E+00, 0.3125300E+00, &
     & 0.3310500E+00, 0.3246700E+00, 0.3198700E+00, 0.3473600E+00, &
     & 0.3654700E+00, 0.4000800E+00, 0.3887100E+00, 0.3643100E+00, &
     & 0.3659400E+00, 0.3200300E+00, 0.2786300E+00, 0.2786300E+00 /
      data (ref_adm(24,iz,33,11),iz = 1,20) / &
     & 0.3288200E+00, 0.3288200E+00, 0.2842800E+00, 0.2587100E+00, &
     & 0.2734600E+00, 0.3341800E+00, 0.3240200E+00, 0.2741800E+00, &
     & 0.3188800E+00, 0.3190900E+00, 0.3034700E+00, 0.3194900E+00, &
     & 0.3554400E+00, 0.3976100E+00, 0.3976200E+00, 0.3726300E+00, &
     & 0.3715800E+00, 0.3747900E+00, 0.2577300E+00, 0.2577300E+00 /
      data (ref_adm(24,iz,34,11),iz = 1,20) / &
     & 0.3044400E+00, 0.3044400E+00, 0.3003300E+00, 0.2569900E+00, &
     & 0.2658800E+00, 0.2670200E+00, 0.2896200E+00, 0.3035000E+00, &
     & 0.3145900E+00, 0.3025000E+00, 0.3153600E+00, 0.3715100E+00, &
     & 0.3971200E+00, 0.4010200E+00, 0.4723500E+00, 0.4419400E+00, &
     & 0.4159200E+00, 0.4253000E+00, 0.2571900E+00, 0.2571900E+00 /
      data (ref_adm(24,iz,35,11),iz = 1,20) / &
     & 0.2909300E+00, 0.2909300E+00, 0.3626900E+00, 0.2499800E+00, &
     & 0.2724700E+00, 0.3099100E+00, 0.2931700E+00, 0.3151900E+00, &
     & 0.3490600E+00, 0.3666600E+00, 0.3956500E+00, 0.4461100E+00, &
     & 0.3869100E+00, 0.4813500E+00, 0.4261800E+00, 0.5076900E+00, &
     & 0.3924400E+00, 0.3875200E+00, 0.3821973E+00, 0.3821973E+00 /
      data (ref_adm(24,iz,36,11),iz = 1,20) / &
     & 0.2859800E+00, 0.2859800E+00, 0.2632300E+00, 0.2996500E+00, &
     & 0.3045900E+00, 0.3003000E+00, 0.2846600E+00, 0.3397100E+00, &
     & 0.3747200E+00, 0.3452800E+00, 0.3656300E+00, 0.3954200E+00, &
     & 0.3999000E+00, 0.3745600E+00, 0.4108400E+00, 0.3979100E+00, &
     & 0.4125100E+00, 0.3824800E+00, 0.3848383E+00, 0.3848383E+00 /
      data (ref_adm(24,iz,37,11),iz = 1,20) / &
     & 0.3033900E+00, 0.3033900E+00, 0.2778300E+00, 0.2811300E+00, &
     & 0.2640600E+00, 0.2781700E+00, 0.3326700E+00, 0.3138600E+00, &
     & 0.3502500E+00, 0.3890500E+00, 0.4290000E+00, 0.3690900E+00, &
     & 0.3763000E+00, 0.4367400E+00, 0.4163400E+00, 0.4642600E+00, &
     & 0.3720900E+00, 0.3946046E+00, 0.3862962E+00, 0.3862962E+00 /
      data (ref_adm(24,iz,38,11),iz = 1,20) / &
     & 0.3033900E+00, 0.3033900E+00, 0.2778300E+00, 0.2811300E+00, &
     & 0.2640600E+00, 0.2781700E+00, 0.3326700E+00, 0.3138600E+00, &
     & 0.3502500E+00, 0.3890500E+00, 0.4290000E+00, 0.3690900E+00, &
     & 0.3763000E+00, 0.4367400E+00, 0.4163400E+00, 0.4642600E+00, &
     & 0.3720900E+00, 0.3946046E+00, 0.3862962E+00, 0.3862962E+00 /
! Solar Zenith Angle 55.0 Albedo  0.3246106E+00
      data (ref_adm(24,iz, 1,12),iz = 1,20) / &
     & 0.2571300E+00, 0.2571300E+00, 0.2739300E+00, 0.2989900E+00, &
     & 0.2822300E+00, 0.3007700E+00, 0.2951000E+00, 0.2953500E+00, &
     & 0.3012600E+00, 0.3038900E+00, 0.3107200E+00, 0.2993700E+00, &
     & 0.3481700E+00, 0.3339400E+00, 0.4161200E+00, 0.4214200E+00, &
     & 0.4465800E+00, 0.5433000E+00, 0.5256863E+00, 0.5256863E+00 /
      data (ref_adm(24,iz, 2,12),iz = 1,20) / &
     & 0.2571300E+00, 0.2571300E+00, 0.2739300E+00, 0.2989900E+00, &
     & 0.2822300E+00, 0.3007700E+00, 0.2951000E+00, 0.2953500E+00, &
     & 0.3012600E+00, 0.3038900E+00, 0.3107200E+00, 0.2993700E+00, &
     & 0.3481700E+00, 0.3339400E+00, 0.4161200E+00, 0.4214200E+00, &
     & 0.4465800E+00, 0.5433000E+00, 0.5256863E+00, 0.5256863E+00 /
      data (ref_adm(24,iz, 3,12),iz = 1,20) / &
     & 0.2844300E+00, 0.2844300E+00, 0.2841100E+00, 0.2479800E+00, &
     & 0.2881800E+00, 0.3062700E+00, 0.3126600E+00, 0.3010000E+00, &
     & 0.2944900E+00, 0.2992200E+00, 0.3282900E+00, 0.3416000E+00, &
     & 0.3494500E+00, 0.3519100E+00, 0.3850800E+00, 0.4138600E+00, &
     & 0.4534300E+00, 0.5033600E+00, 0.1857083E+00, 0.1857083E+00 /
      data (ref_adm(24,iz, 4,12),iz = 1,20) / &
     & 0.3048500E+00, 0.3048500E+00, 0.2994100E+00, 0.2566500E+00, &
     & 0.2803900E+00, 0.2834300E+00, 0.2732600E+00, 0.3119800E+00, &
     & 0.3032000E+00, 0.2820300E+00, 0.2955900E+00, 0.3044500E+00, &
     & 0.2997000E+00, 0.3706500E+00, 0.3675300E+00, 0.3797500E+00, &
     & 0.4267500E+00, 0.5050900E+00, 0.5111770E+00, 0.5111770E+00 /
      data (ref_adm(24,iz, 5,12),iz = 1,20) / &
     & 0.2580200E+00, 0.2580200E+00, 0.2599700E+00, 0.2670100E+00, &
     & 0.3220000E+00, 0.2577300E+00, 0.2695600E+00, 0.3317600E+00, &
     & 0.3002900E+00, 0.3031900E+00, 0.3077900E+00, 0.3201400E+00, &
     & 0.3150300E+00, 0.3366200E+00, 0.3517300E+00, 0.4134900E+00, &
     & 0.4363300E+00, 0.5052600E+00, 0.5009147E+00, 0.5009147E+00 /
      data (ref_adm(24,iz, 6,12),iz = 1,20) / &
     & 0.2634300E+00, 0.2634300E+00, 0.2726200E+00, 0.2762500E+00, &
     & 0.2698900E+00, 0.2769300E+00, 0.2981200E+00, 0.3008600E+00, &
     & 0.2993700E+00, 0.2911600E+00, 0.3000000E+00, 0.3226500E+00, &
     & 0.3220300E+00, 0.3433200E+00, 0.3477400E+00, 0.3702400E+00, &
     & 0.3898900E+00, 0.4462400E+00, 0.5032400E+00, 0.5032400E+00 /
      data (ref_adm(24,iz, 7,12),iz = 1,20) / &
     & 0.2895700E+00, 0.2895700E+00, 0.2818300E+00, 0.2892500E+00, &
     & 0.2772700E+00, 0.2846300E+00, 0.3103600E+00, 0.2872200E+00, &
     & 0.2939500E+00, 0.3202000E+00, 0.3099300E+00, 0.3210500E+00, &
     & 0.3332800E+00, 0.3561700E+00, 0.3672000E+00, 0.4175200E+00, &
     & 0.4723600E+00, 0.5695700E+00, 0.5838300E+00, 0.5838300E+00 /
      data (ref_adm(24,iz, 8,12),iz = 1,20) / &
     & 0.2856300E+00, 0.2856300E+00, 0.2727900E+00, 0.3000800E+00, &
     & 0.2907700E+00, 0.2848400E+00, 0.3223700E+00, 0.2891100E+00, &
     & 0.3010000E+00, 0.2947200E+00, 0.3184800E+00, 0.3071300E+00, &
     & 0.3235900E+00, 0.3742600E+00, 0.4123600E+00, 0.4499600E+00, &
     & 0.4676600E+00, 0.4827800E+00, 0.4264500E+00, 0.4264500E+00 /
      data (ref_adm(24,iz, 9,12),iz = 1,20) / &
     & 0.2640300E+00, 0.2640300E+00, 0.2565900E+00, 0.2818200E+00, &
     & 0.2675400E+00, 0.2650400E+00, 0.2462400E+00, 0.2525900E+00, &
     & 0.2608700E+00, 0.2699100E+00, 0.2895100E+00, 0.3055200E+00, &
     & 0.2908900E+00, 0.3203200E+00, 0.3339200E+00, 0.3438500E+00, &
     & 0.3675800E+00, 0.3698000E+00, 0.4114100E+00, 0.4114100E+00 /
      data (ref_adm(24,iz,10,12),iz = 1,20) / &
     & 0.2652500E+00, 0.2652500E+00, 0.2496300E+00, 0.2350000E+00, &
     & 0.2862700E+00, 0.2823500E+00, 0.2764000E+00, 0.2664000E+00, &
     & 0.2715400E+00, 0.2895200E+00, 0.3041900E+00, 0.2865900E+00, &
     & 0.2985300E+00, 0.3169900E+00, 0.3089200E+00, 0.3420000E+00, &
     & 0.3673300E+00, 0.3408300E+00, 0.4227945E+00, 0.4227945E+00 /
      data (ref_adm(24,iz,11,12),iz = 1,20) / &
     & 0.2799600E+00, 0.2799600E+00, 0.2616600E+00, 0.2815600E+00, &
     & 0.2819700E+00, 0.2701300E+00, 0.2998300E+00, 0.2816500E+00, &
     & 0.2838700E+00, 0.2791300E+00, 0.2975500E+00, 0.2893400E+00, &
     & 0.3050200E+00, 0.3409000E+00, 0.2927000E+00, 0.3401000E+00, &
     & 0.4007100E+00, 0.4037600E+00, 0.4358700E+00, 0.4358700E+00 /
      data (ref_adm(24,iz,12,12),iz = 1,20) / &
     & 0.2912600E+00, 0.2912600E+00, 0.2756700E+00, 0.2782000E+00, &
     & 0.2819100E+00, 0.3017800E+00, 0.2977700E+00, 0.2922400E+00, &
     & 0.2648400E+00, 0.2599800E+00, 0.2826400E+00, 0.2679600E+00, &
     & 0.3101900E+00, 0.3097200E+00, 0.3444600E+00, 0.4162400E+00, &
     & 0.3747500E+00, 0.3817700E+00, 0.3996104E+00, 0.3996104E+00 /
      data (ref_adm(24,iz,13,12),iz = 1,20) / &
     & 0.2686500E+00, 0.2686500E+00, 0.2864900E+00, 0.2760000E+00, &
     & 0.2873900E+00, 0.2942200E+00, 0.3008500E+00, 0.2911900E+00, &
     & 0.2871300E+00, 0.2686400E+00, 0.2700300E+00, 0.2728900E+00, &
     & 0.3112800E+00, 0.3163800E+00, 0.3204200E+00, 0.3936200E+00, &
     & 0.3920400E+00, 0.3533000E+00, 0.3907972E+00, 0.3907972E+00 /
      data (ref_adm(24,iz,14,12),iz = 1,20) / &
     & 0.2788600E+00, 0.2788600E+00, 0.2696300E+00, 0.2765100E+00, &
     & 0.2730000E+00, 0.2659600E+00, 0.2791800E+00, 0.2737100E+00, &
     & 0.2783800E+00, 0.2903600E+00, 0.2933200E+00, 0.2898100E+00, &
     & 0.3156500E+00, 0.3364300E+00, 0.3532300E+00, 0.3713300E+00, &
     & 0.3663800E+00, 0.3820200E+00, 0.3829067E+00, 0.3829067E+00 /
      data (ref_adm(24,iz,15,12),iz = 1,20) / &
     & 0.2787400E+00, 0.2787400E+00, 0.2873800E+00, 0.2852500E+00, &
     & 0.2890400E+00, 0.2898600E+00, 0.2905300E+00, 0.2816300E+00, &
     & 0.2824500E+00, 0.2732900E+00, 0.2780700E+00, 0.2863900E+00, &
     & 0.2955600E+00, 0.3090200E+00, 0.3255000E+00, 0.4021300E+00, &
     & 0.3852700E+00, 0.3667400E+00, 0.3749537E+00, 0.3749537E+00 /
      data (ref_adm(24,iz,16,12),iz = 1,20) / &
     & 0.2870900E+00, 0.2870900E+00, 0.2845900E+00, 0.2888700E+00, &
     & 0.2737700E+00, 0.2831000E+00, 0.2909400E+00, 0.2689000E+00, &
     & 0.2797300E+00, 0.2803000E+00, 0.2869000E+00, 0.2928000E+00, &
     & 0.3059600E+00, 0.3122400E+00, 0.3076400E+00, 0.3639300E+00, &
     & 0.3549400E+00, 0.3753100E+00, 0.3657652E+00, 0.3657652E+00 /
      data (ref_adm(24,iz,17,12),iz = 1,20) / &
     & 0.2745700E+00, 0.2745700E+00, 0.2633100E+00, 0.2636300E+00, &
     & 0.2605300E+00, 0.2685200E+00, 0.2923500E+00, 0.2909000E+00, &
     & 0.3019800E+00, 0.2913300E+00, 0.3065100E+00, 0.2760500E+00, &
     & 0.2915500E+00, 0.3000600E+00, 0.3706500E+00, 0.3058400E+00, &
     & 0.4277400E+00, 0.3706170E+00, 0.3577546E+00, 0.3577546E+00 /
      data (ref_adm(24,iz,18,12),iz = 1,20) / &
     & 0.3120900E+00, 0.3120900E+00, 0.3224100E+00, 0.2974400E+00, &
     & 0.2659200E+00, 0.2603200E+00, 0.2560600E+00, 0.2823100E+00, &
     & 0.3002900E+00, 0.2909700E+00, 0.3104500E+00, 0.2923800E+00, &
     & 0.3261200E+00, 0.3540800E+00, 0.3448900E+00, 0.3514700E+00, &
     & 0.4270600E+00, 0.3693517E+00, 0.3564971E+00, 0.3564971E+00 /
      data (ref_adm(24,iz,19,12),iz = 1,20) / &
     & 0.2740400E+00, 0.2740400E+00, 0.2941000E+00, 0.2970200E+00, &
     & 0.2981300E+00, 0.3008900E+00, 0.2946900E+00, 0.3025300E+00, &
     & 0.2766400E+00, 0.3205700E+00, 0.2993500E+00, 0.2744100E+00, &
     & 0.3374700E+00, 0.3290800E+00, 0.3240700E+00, 0.3539700E+00, &
     & 0.3541536E+00, 0.3650626E+00, 0.3508615E+00, 0.3508615E+00 /
      data (ref_adm(24,iz,20,12),iz = 1,20) / &
     & 0.2912000E+00, 0.2912000E+00, 0.3200600E+00, 0.2902700E+00, &
     & 0.2748700E+00, 0.2860600E+00, 0.2937700E+00, 0.3029000E+00, &
     & 0.2982400E+00, 0.3381700E+00, 0.2988400E+00, 0.2836300E+00, &
     & 0.3550300E+00, 0.3404300E+00, 0.3473000E+00, 0.3608400E+00, &
     & 0.3519866E+00, 0.3619976E+00, 0.3476182E+00, 0.3476182E+00 /
      data (ref_adm(24,iz,21,12),iz = 1,20) / &
     & 0.2745400E+00, 0.2745400E+00, 0.2721900E+00, 0.2676600E+00, &
     & 0.2961600E+00, 0.2953900E+00, 0.2878500E+00, 0.2883300E+00, &
     & 0.2922000E+00, 0.2670100E+00, 0.2960200E+00, 0.3048300E+00, &
     & 0.3323500E+00, 0.3330600E+00, 0.3208500E+00, 0.3258900E+00, &
     & 0.3506895E+00, 0.3593788E+00, 0.3456189E+00, 0.3456189E+00 /
      data (ref_adm(24,iz,22,12),iz = 1,20) / &
     & 0.2814400E+00, 0.2814400E+00, 0.2422700E+00, 0.2764500E+00, &
     & 0.2963500E+00, 0.2953100E+00, 0.2702000E+00, 0.2941400E+00, &
     & 0.3135300E+00, 0.2700600E+00, 0.3013800E+00, 0.2471500E+00, &
     & 0.3038400E+00, 0.3405100E+00, 0.3429600E+00, 0.3309400E+00, &
     & 0.4139661E+00, 0.4074887E+00, 0.3695621E+00, 0.3695621E+00 /
      data (ref_adm(24,iz,23,12),iz = 1,20) / &
     & 0.2883300E+00, 0.2883300E+00, 0.2824100E+00, 0.2595600E+00, &
     & 0.2885900E+00, 0.2668200E+00, 0.3238000E+00, 0.2826700E+00, &
     & 0.3247400E+00, 0.2814700E+00, 0.3052100E+00, 0.2866900E+00, &
     & 0.3114200E+00, 0.3342400E+00, 0.3777000E+00, 0.3507600E+00, &
     & 0.4053816E+00, 0.3974168E+00, 0.3659208E+00, 0.3659208E+00 /
      data (ref_adm(24,iz,24,12),iz = 1,20) / &
     & 0.2665800E+00, 0.2665800E+00, 0.2696700E+00, 0.2689800E+00, &
     & 0.2894400E+00, 0.2965300E+00, 0.3041600E+00, 0.3327800E+00, &
     & 0.3216900E+00, 0.2952700E+00, 0.2932000E+00, 0.3276500E+00, &
     & 0.3319400E+00, 0.3369500E+00, 0.2964800E+00, 0.3439300E+00, &
     & 0.3754900E+00, 0.3896880E+00, 0.3634764E+00, 0.3634764E+00 /
      data (ref_adm(24,iz,25,12),iz = 1,20) / &
     & 0.2899400E+00, 0.2899400E+00, 0.2942400E+00, 0.3076900E+00, &
     & 0.3028300E+00, 0.3075900E+00, 0.3167400E+00, 0.3234300E+00, &
     & 0.3295100E+00, 0.3368000E+00, 0.3332700E+00, 0.3513900E+00, &
     & 0.3395100E+00, 0.3517300E+00, 0.3114300E+00, 0.3249500E+00, &
     & 0.3528100E+00, 0.3826500E+00, 0.3625464E+00, 0.3625464E+00 /
      data (ref_adm(24,iz,26,12),iz = 1,20) / &
     & 0.2755800E+00, 0.2755800E+00, 0.2808600E+00, 0.2883800E+00, &
     & 0.2947900E+00, 0.2971800E+00, 0.3072200E+00, 0.3163200E+00, &
     & 0.3192100E+00, 0.3223900E+00, 0.3239000E+00, 0.3230300E+00, &
     & 0.3586900E+00, 0.3723700E+00, 0.3476700E+00, 0.3485800E+00, &
     & 0.3428500E+00, 0.3780200E+00, 0.3629257E+00, 0.3629257E+00 /
      data (ref_adm(24,iz,27,12),iz = 1,20) / &
     & 0.2801600E+00, 0.2801600E+00, 0.3190400E+00, 0.3027700E+00, &
     & 0.3050500E+00, 0.3293000E+00, 0.3300900E+00, 0.3472200E+00, &
     & 0.3619100E+00, 0.3607100E+00, 0.3762800E+00, 0.3696100E+00, &
     & 0.3629700E+00, 0.3388200E+00, 0.3440000E+00, 0.3508100E+00, &
     & 0.3444200E+00, 0.3420500E+00, 0.3427100E+00, 0.3427100E+00 /
      data (ref_adm(24,iz,28,12),iz = 1,20) / &
     & 0.2807300E+00, 0.2807300E+00, 0.3067300E+00, 0.2921400E+00, &
     & 0.2986100E+00, 0.2866500E+00, 0.3101900E+00, 0.3009500E+00, &
     & 0.3209200E+00, 0.2988600E+00, 0.3434900E+00, 0.3372400E+00, &
     & 0.3648200E+00, 0.4021800E+00, 0.3550600E+00, 0.3460500E+00, &
     & 0.3582600E+00, 0.3577200E+00, 0.3158800E+00, 0.3158800E+00 /
      data (ref_adm(24,iz,29,12),iz = 1,20) / &
     & 0.2904900E+00, 0.2904900E+00, 0.2771400E+00, 0.2877300E+00, &
     & 0.2906900E+00, 0.3121300E+00, 0.3033200E+00, 0.3110100E+00, &
     & 0.3380700E+00, 0.3230600E+00, 0.3243400E+00, 0.3266900E+00, &
     & 0.3190000E+00, 0.3647300E+00, 0.3694200E+00, 0.3632700E+00, &
     & 0.3638900E+00, 0.3647800E+00, 0.3768093E+00, 0.3768093E+00 /
      data (ref_adm(24,iz,30,12),iz = 1,20) / &
     & 0.2914800E+00, 0.2914800E+00, 0.3274000E+00, 0.2989400E+00, &
     & 0.3091100E+00, 0.3028200E+00, 0.3222600E+00, 0.3368500E+00, &
     & 0.3193200E+00, 0.3171200E+00, 0.3606800E+00, 0.3866300E+00, &
     & 0.3803600E+00, 0.3590200E+00, 0.3660800E+00, 0.3772400E+00, &
     & 0.3840300E+00, 0.3782800E+00, 0.2945200E+00, 0.2945200E+00 /
      data (ref_adm(24,iz,31,12),iz = 1,20) / &
     & 0.2860000E+00, 0.2860000E+00, 0.2882800E+00, 0.2860300E+00, &
     & 0.3183700E+00, 0.3136000E+00, 0.3252300E+00, 0.3417400E+00, &
     & 0.3060800E+00, 0.3325200E+00, 0.3499900E+00, 0.3518000E+00, &
     & 0.3896400E+00, 0.3903800E+00, 0.4125700E+00, 0.3909300E+00, &
     & 0.3957300E+00, 0.4246700E+00, 0.3430800E+00, 0.3430800E+00 /
      data (ref_adm(24,iz,32,12),iz = 1,20) / &
     & 0.2843500E+00, 0.2843500E+00, 0.2655600E+00, 0.2703300E+00, &
     & 0.2998000E+00, 0.2905500E+00, 0.2872100E+00, 0.2868300E+00, &
     & 0.3289100E+00, 0.3358500E+00, 0.3502300E+00, 0.3797200E+00, &
     & 0.3738700E+00, 0.3782500E+00, 0.3984500E+00, 0.4256500E+00, &
     & 0.4324800E+00, 0.3831100E+00, 0.2930700E+00, 0.2930700E+00 /
      data (ref_adm(24,iz,33,12),iz = 1,20) / &
     & 0.2821200E+00, 0.2821200E+00, 0.3031400E+00, 0.2967400E+00, &
     & 0.2812300E+00, 0.3063600E+00, 0.2985400E+00, 0.3025000E+00, &
     & 0.3178200E+00, 0.3371800E+00, 0.3677600E+00, 0.3885400E+00, &
     & 0.4002400E+00, 0.3840800E+00, 0.4323100E+00, 0.3954700E+00, &
     & 0.4023800E+00, 0.3744900E+00, 0.3391400E+00, 0.3391400E+00 /
      data (ref_adm(24,iz,34,12),iz = 1,20) / &
     & 0.3081800E+00, 0.3081800E+00, 0.2994500E+00, 0.2919700E+00, &
     & 0.3179300E+00, 0.3050500E+00, 0.3095100E+00, 0.3159700E+00, &
     & 0.3126800E+00, 0.3624700E+00, 0.3672000E+00, 0.3675100E+00, &
     & 0.4091100E+00, 0.4397600E+00, 0.4320600E+00, 0.4379200E+00, &
     & 0.4295400E+00, 0.3975000E+00, 0.3225700E+00, 0.3225700E+00 /
      data (ref_adm(24,iz,35,12),iz = 1,20) / &
     & 0.2688700E+00, 0.2688700E+00, 0.2966600E+00, 0.3060100E+00, &
     & 0.3090900E+00, 0.3067700E+00, 0.3295500E+00, 0.3446200E+00, &
     & 0.3511500E+00, 0.3635300E+00, 0.3947500E+00, 0.3748100E+00, &
     & 0.4005500E+00, 0.4384000E+00, 0.4272700E+00, 0.4518900E+00, &
     & 0.4554700E+00, 0.4602100E+00, 0.3374400E+00, 0.3374400E+00 /
      data (ref_adm(24,iz,36,12),iz = 1,20) / &
     & 0.2801900E+00, 0.2801900E+00, 0.2629000E+00, 0.2947900E+00, &
     & 0.3141000E+00, 0.2952600E+00, 0.3252300E+00, 0.3387700E+00, &
     & 0.3605700E+00, 0.3688900E+00, 0.3606100E+00, 0.3906200E+00, &
     & 0.4223100E+00, 0.4569700E+00, 0.4615000E+00, 0.4660700E+00, &
     & 0.4033000E+00, 0.3929800E+00, 0.4193878E+00, 0.4193878E+00 /
      data (ref_adm(24,iz,37,12),iz = 1,20) / &
     & 0.2804000E+00, 0.2804000E+00, 0.3003400E+00, 0.2816500E+00, &
     & 0.3411500E+00, 0.3533000E+00, 0.3383300E+00, 0.3361600E+00, &
     & 0.3470500E+00, 0.3419900E+00, 0.3635500E+00, 0.4017300E+00, &
     & 0.4238600E+00, 0.4570500E+00, 0.4656600E+00, 0.4735700E+00, &
     & 0.4354500E+00, 0.4819600E+00, 0.4213077E+00, 0.4213077E+00 /
      data (ref_adm(24,iz,38,12),iz = 1,20) / &
     & 0.2804000E+00, 0.2804000E+00, 0.3003400E+00, 0.2816500E+00, &
     & 0.3411500E+00, 0.3533000E+00, 0.3383300E+00, 0.3361600E+00, &
     & 0.3470500E+00, 0.3419900E+00, 0.3635500E+00, 0.4017300E+00, &
     & 0.4238600E+00, 0.4570500E+00, 0.4656600E+00, 0.4735700E+00, &
     & 0.4354500E+00, 0.4819600E+00, 0.4213077E+00, 0.4213077E+00 /
! Solar Zenith Angle 60.0 Albedo  0.3355681E+00
      data (ref_adm(24,iz, 1,13),iz = 1,20) / &
     & 0.2834500E+00, 0.2834500E+00, 0.2887300E+00, 0.2795300E+00, &
     & 0.2906800E+00, 0.2773400E+00, 0.2584800E+00, 0.2734500E+00, &
     & 0.2860200E+00, 0.3102800E+00, 0.3084100E+00, 0.3231900E+00, &
     & 0.3562000E+00, 0.4963600E+00, 0.4361700E+00, 0.5053200E+00, &
     & 0.5905000E+00, 0.6120900E+00, 0.4954177E+00, 0.4954177E+00 /
      data (ref_adm(24,iz, 2,13),iz = 1,20) / &
     & 0.2834500E+00, 0.2834500E+00, 0.2887300E+00, 0.2795300E+00, &
     & 0.2906800E+00, 0.2773400E+00, 0.2584800E+00, 0.2734500E+00, &
     & 0.2860200E+00, 0.3102800E+00, 0.3084100E+00, 0.3231900E+00, &
     & 0.3562000E+00, 0.4963600E+00, 0.4361700E+00, 0.5053200E+00, &
     & 0.5905000E+00, 0.6120900E+00, 0.4954177E+00, 0.4954177E+00 /
      data (ref_adm(24,iz, 3,13),iz = 1,20) / &
     & 0.2662300E+00, 0.2662300E+00, 0.2839900E+00, 0.2905700E+00, &
     & 0.2651600E+00, 0.2662100E+00, 0.2932100E+00, 0.2884500E+00, &
     & 0.3140600E+00, 0.2784100E+00, 0.2911000E+00, 0.3466400E+00, &
     & 0.3502800E+00, 0.4060000E+00, 0.4182800E+00, 0.4433200E+00, &
     & 0.5509700E+00, 0.5438900E+00, 0.1069855E+00, 0.1069855E+00 /
      data (ref_adm(24,iz, 4,13),iz = 1,20) / &
     & 0.2620900E+00, 0.2620900E+00, 0.2635500E+00, 0.2529500E+00, &
     & 0.2518200E+00, 0.2748400E+00, 0.2793000E+00, 0.3030900E+00, &
     & 0.2827200E+00, 0.2931700E+00, 0.3057900E+00, 0.3130100E+00, &
     & 0.3467300E+00, 0.3684600E+00, 0.3951200E+00, 0.4294800E+00, &
     & 0.4719800E+00, 0.5931800E+00, 0.4585400E+00, 0.4585400E+00 /
      data (ref_adm(24,iz, 5,13),iz = 1,20) / &
     & 0.2654500E+00, 0.2654500E+00, 0.2745200E+00, 0.2728400E+00, &
     & 0.2582700E+00, 0.2783600E+00, 0.2739600E+00, 0.2828600E+00, &
     & 0.2770500E+00, 0.2840800E+00, 0.3091300E+00, 0.3115600E+00, &
     & 0.3410700E+00, 0.3406200E+00, 0.3837100E+00, 0.4323600E+00, &
     & 0.4898000E+00, 0.5631800E+00, 0.6032900E+00, 0.6032900E+00 /
      data (ref_adm(24,iz, 6,13),iz = 1,20) / &
     & 0.2729800E+00, 0.2729800E+00, 0.2598300E+00, 0.2739500E+00, &
     & 0.2807500E+00, 0.2716000E+00, 0.2862800E+00, 0.2766900E+00, &
     & 0.2735600E+00, 0.2823600E+00, 0.2892700E+00, 0.3212100E+00, &
     & 0.3345800E+00, 0.3929700E+00, 0.4206500E+00, 0.4386600E+00, &
     & 0.5508900E+00, 0.5409600E+00, 0.4528500E+00, 0.4528500E+00 /
      data (ref_adm(24,iz, 7,13),iz = 1,20) / &
     & 0.2802200E+00, 0.2802200E+00, 0.2655400E+00, 0.2624500E+00, &
     & 0.2548100E+00, 0.2801400E+00, 0.2856400E+00, 0.2777900E+00, &
     & 0.2727600E+00, 0.2848600E+00, 0.2804300E+00, 0.3075500E+00, &
     & 0.3444800E+00, 0.3727900E+00, 0.3991400E+00, 0.4504900E+00, &
     & 0.5182500E+00, 0.5500700E+00, 0.5574800E+00, 0.5574800E+00 /
      data (ref_adm(24,iz, 8,13),iz = 1,20) / &
     & 0.2681500E+00, 0.2681500E+00, 0.2632000E+00, 0.2707400E+00, &
     & 0.2897500E+00, 0.2772000E+00, 0.2843000E+00, 0.2642500E+00, &
     & 0.2838700E+00, 0.2980200E+00, 0.3004600E+00, 0.3007500E+00, &
     & 0.3293000E+00, 0.3568100E+00, 0.3741100E+00, 0.3780500E+00, &
     & 0.4908100E+00, 0.5219500E+00, 0.4347900E+00, 0.4347900E+00 /
      data (ref_adm(24,iz, 9,13),iz = 1,20) / &
     & 0.2614800E+00, 0.2614800E+00, 0.3008500E+00, 0.2895600E+00, &
     & 0.2627600E+00, 0.2788900E+00, 0.2605800E+00, 0.2621500E+00, &
     & 0.2765300E+00, 0.3025900E+00, 0.3090300E+00, 0.2915700E+00, &
     & 0.3370700E+00, 0.3488500E+00, 0.3812500E+00, 0.3941300E+00, &
     & 0.4277500E+00, 0.4655800E+00, 0.4208806E+00, 0.4208806E+00 /
      data (ref_adm(24,iz,10,13),iz = 1,20) / &
     & 0.2799700E+00, 0.2799700E+00, 0.2842300E+00, 0.2754200E+00, &
     & 0.2706500E+00, 0.2646800E+00, 0.2574400E+00, 0.2950200E+00, &
     & 0.3000000E+00, 0.3098100E+00, 0.3172800E+00, 0.3029200E+00, &
     & 0.3610100E+00, 0.3632100E+00, 0.3815400E+00, 0.3645400E+00, &
     & 0.3776300E+00, 0.4259100E+00, 0.4369700E+00, 0.4369700E+00 /
      data (ref_adm(24,iz,11,13),iz = 1,20) / &
     & 0.2821800E+00, 0.2821800E+00, 0.2743500E+00, 0.2634400E+00, &
     & 0.2465100E+00, 0.2889100E+00, 0.2748800E+00, 0.2637300E+00, &
     & 0.2862700E+00, 0.2967900E+00, 0.2940300E+00, 0.3208100E+00, &
     & 0.3589400E+00, 0.3505400E+00, 0.3605500E+00, 0.3869600E+00, &
     & 0.4264200E+00, 0.4280400E+00, 0.3997182E+00, 0.3997182E+00 /
      data (ref_adm(24,iz,12,13),iz = 1,20) / &
     & 0.2607600E+00, 0.2607600E+00, 0.2951600E+00, 0.2748200E+00, &
     & 0.2601500E+00, 0.2703500E+00, 0.2656300E+00, 0.2748000E+00, &
     & 0.2724800E+00, 0.2877400E+00, 0.2940400E+00, 0.3068500E+00, &
     & 0.3509500E+00, 0.3399100E+00, 0.2900000E+00, 0.3286700E+00, &
     & 0.4079800E+00, 0.4356400E+00, 0.3917177E+00, 0.3917177E+00 /
      data (ref_adm(24,iz,13,13),iz = 1,20) / &
     & 0.2882800E+00, 0.2882800E+00, 0.2716700E+00, 0.2773700E+00, &
     & 0.2664400E+00, 0.2789300E+00, 0.2623200E+00, 0.2887600E+00, &
     & 0.2943800E+00, 0.2870800E+00, 0.2965500E+00, 0.3253400E+00, &
     & 0.3238000E+00, 0.3295300E+00, 0.3080400E+00, 0.3491700E+00, &
     & 0.3886100E+00, 0.4062900E+00, 0.3846729E+00, 0.3846729E+00 /
      data (ref_adm(24,iz,14,13),iz = 1,20) / &
     & 0.2781100E+00, 0.2781100E+00, 0.2833500E+00, 0.2785600E+00, &
     & 0.2747200E+00, 0.2805100E+00, 0.2822000E+00, 0.2840600E+00, &
     & 0.2826000E+00, 0.2898400E+00, 0.2981600E+00, 0.3168500E+00, &
     & 0.3297200E+00, 0.3367200E+00, 0.3420000E+00, 0.4028300E+00, &
     & 0.3557600E+00, 0.4095000E+00, 0.3914100E+00, 0.3914100E+00 /
      data (ref_adm(24,iz,15,13),iz = 1,20) / &
     & 0.2955600E+00, 0.2955600E+00, 0.2770100E+00, 0.2713100E+00, &
     & 0.2659700E+00, 0.2724100E+00, 0.2803200E+00, 0.2820900E+00, &
     & 0.2865300E+00, 0.3029100E+00, 0.3013400E+00, 0.3157500E+00, &
     & 0.3231300E+00, 0.3274400E+00, 0.3642400E+00, 0.3577200E+00, &
     & 0.3991000E+00, 0.4830500E+00, 0.3691315E+00, 0.3691315E+00 /
      data (ref_adm(24,iz,16,13),iz = 1,20) / &
     & 0.2784500E+00, 0.2784500E+00, 0.2849400E+00, 0.3017100E+00, &
     & 0.2811300E+00, 0.2927500E+00, 0.2800100E+00, 0.2658000E+00, &
     & 0.2693900E+00, 0.2760400E+00, 0.2806100E+00, 0.2874400E+00, &
     & 0.3044400E+00, 0.3137100E+00, 0.3783200E+00, 0.3740000E+00, &
     & 0.3687500E+00, 0.3700600E+00, 0.3596315E+00, 0.3596315E+00 /
      data (ref_adm(24,iz,17,13),iz = 1,20) / &
     & 0.2741400E+00, 0.2741400E+00, 0.2780800E+00, 0.3034300E+00, &
     & 0.2743100E+00, 0.2877100E+00, 0.2800000E+00, 0.2816300E+00, &
     & 0.2714700E+00, 0.2905000E+00, 0.2937700E+00, 0.3177600E+00, &
     & 0.3077400E+00, 0.3501800E+00, 0.4127600E+00, 0.4051900E+00, &
     & 0.3453800E+00, 0.3941553E+00, 0.3513316E+00, 0.3513316E+00 /
      data (ref_adm(24,iz,18,13),iz = 1,20) / &
     & 0.2834500E+00, 0.2834500E+00, 0.2776800E+00, 0.2980300E+00, &
     & 0.3126800E+00, 0.3038600E+00, 0.2796300E+00, 0.2805900E+00, &
     & 0.2827500E+00, 0.2820500E+00, 0.3254100E+00, 0.3083900E+00, &
     & 0.3051400E+00, 0.3380200E+00, 0.3888500E+00, 0.4382500E+00, &
     & 0.3875193E+00, 0.4111356E+00, 0.4124332E+00, 0.4124332E+00 /
      data (ref_adm(24,iz,19,13),iz = 1,20) / &
     & 0.2829100E+00, 0.2829100E+00, 0.2880000E+00, 0.2631900E+00, &
     & 0.2883600E+00, 0.2954700E+00, 0.2957800E+00, 0.2834400E+00, &
     & 0.2982300E+00, 0.3237900E+00, 0.3292300E+00, 0.3193300E+00, &
     & 0.3433600E+00, 0.3462500E+00, 0.3555900E+00, 0.4097400E+00, &
     & 0.3847910E+00, 0.4059842E+00, 0.4048735E+00, 0.4048735E+00 /
      data (ref_adm(24,iz,20,13),iz = 1,20) / &
     & 0.2781000E+00, 0.2781000E+00, 0.2941100E+00, 0.2919500E+00, &
     & 0.2921900E+00, 0.3040600E+00, 0.2960700E+00, 0.2793700E+00, &
     & 0.3169100E+00, 0.3210200E+00, 0.3133500E+00, 0.3181700E+00, &
     & 0.3252000E+00, 0.3156200E+00, 0.3083300E+00, 0.3009900E+00, &
     & 0.3829475E+00, 0.4028852E+00, 0.4006362E+00, 0.4006362E+00 /
      data (ref_adm(24,iz,21,13),iz = 1,20) / &
     & 0.2718800E+00, 0.2718800E+00, 0.2937900E+00, 0.2843700E+00, &
     & 0.2719500E+00, 0.2757400E+00, 0.2983400E+00, 0.3078800E+00, &
     & 0.3137900E+00, 0.3363300E+00, 0.3271900E+00, 0.3134000E+00, &
     & 0.3472900E+00, 0.3480700E+00, 0.3679500E+00, 0.4110900E+00, &
     & 0.3821652E+00, 0.4005268E+00, 0.3981924E+00, 0.3981924E+00 /
      data (ref_adm(24,iz,22,13),iz = 1,20) / &
     & 0.2760600E+00, 0.2760600E+00, 0.2814300E+00, 0.2775800E+00, &
     & 0.2870400E+00, 0.2922600E+00, 0.3045000E+00, 0.3131800E+00, &
     & 0.2930800E+00, 0.3217500E+00, 0.3256500E+00, 0.3338800E+00, &
     & 0.3394300E+00, 0.3499700E+00, 0.3357700E+00, 0.3252000E+00, &
     & 0.4361789E+00, 0.4334897E+00, 0.3982414E+00, 0.3982414E+00 /
      data (ref_adm(24,iz,23,13),iz = 1,20) / &
     & 0.2979500E+00, 0.2979500E+00, 0.2998400E+00, 0.2985900E+00, &
     & 0.2923600E+00, 0.2831100E+00, 0.2937700E+00, 0.3027800E+00, &
     & 0.3063900E+00, 0.3161400E+00, 0.3352800E+00, 0.3426700E+00, &
     & 0.3396900E+00, 0.3522700E+00, 0.3498400E+00, 0.3997500E+00, &
     & 0.4271674E+00, 0.4231380E+00, 0.3950081E+00, 0.3950081E+00 /
      data (ref_adm(24,iz,24,13),iz = 1,20) / &
     & 0.2758900E+00, 0.2758900E+00, 0.2667900E+00, 0.2743000E+00, &
     & 0.2745100E+00, 0.2791200E+00, 0.2863800E+00, 0.2969800E+00, &
     & 0.2969300E+00, 0.3259400E+00, 0.3254100E+00, 0.3568800E+00, &
     & 0.3678900E+00, 0.3607900E+00, 0.3768300E+00, 0.3730500E+00, &
     & 0.4046800E+00, 0.4155059E+00, 0.3936911E+00, 0.3936911E+00 /
      data (ref_adm(24,iz,25,13),iz = 1,20) / &
     & 0.2826100E+00, 0.2826100E+00, 0.3018200E+00, 0.3029800E+00, &
     & 0.3141900E+00, 0.3139600E+00, 0.3205300E+00, 0.3284500E+00, &
     & 0.3294100E+00, 0.3278600E+00, 0.3344300E+00, 0.3473500E+00, &
     & 0.3624900E+00, 0.3755300E+00, 0.3866000E+00, 0.3910800E+00, &
     & 0.4312200E+00, 0.4088885E+00, 0.3938955E+00, 0.3938955E+00 /
      data (ref_adm(24,iz,26,13),iz = 1,20) / &
     & 0.2910500E+00, 0.2910500E+00, 0.2897900E+00, 0.2896000E+00, &
     & 0.3036200E+00, 0.3129700E+00, 0.3276500E+00, 0.3141100E+00, &
     & 0.3252200E+00, 0.3347900E+00, 0.3490400E+00, 0.3609400E+00, &
     & 0.3688000E+00, 0.3899200E+00, 0.3860100E+00, 0.3869100E+00, &
     & 0.4070400E+00, 0.3974600E+00, 0.3964992E+00, 0.3964992E+00 /
      data (ref_adm(24,iz,27,13),iz = 1,20) / &
     & 0.2854300E+00, 0.2854300E+00, 0.2609000E+00, 0.2980000E+00, &
     & 0.2969600E+00, 0.2899500E+00, 0.2826200E+00, 0.2940700E+00, &
     & 0.2987800E+00, 0.3288700E+00, 0.3647500E+00, 0.3688700E+00, &
     & 0.3758100E+00, 0.3839500E+00, 0.3805500E+00, 0.3782500E+00, &
     & 0.3857000E+00, 0.4531300E+00, 0.3231000E+00, 0.3231000E+00 /
      data (ref_adm(24,iz,28,13),iz = 1,20) / &
     & 0.2762900E+00, 0.2762900E+00, 0.2822600E+00, 0.2635200E+00, &
     & 0.2816600E+00, 0.2895200E+00, 0.2955700E+00, 0.2889000E+00, &
     & 0.2924500E+00, 0.3130700E+00, 0.3317900E+00, 0.3503300E+00, &
     & 0.3210900E+00, 0.3795900E+00, 0.3795700E+00, 0.4011200E+00, &
     & 0.4341500E+00, 0.4137900E+00, 0.3946000E+00, 0.3946000E+00 /
      data (ref_adm(24,iz,29,13),iz = 1,20) / &
     & 0.2781100E+00, 0.2781100E+00, 0.2914800E+00, 0.2930200E+00, &
     & 0.2948500E+00, 0.2998700E+00, 0.3079400E+00, 0.2914000E+00, &
     & 0.3372400E+00, 0.3164500E+00, 0.3328300E+00, 0.3750000E+00, &
     & 0.3644000E+00, 0.3898900E+00, 0.4041000E+00, 0.4116000E+00, &
     & 0.4092300E+00, 0.4212700E+00, 0.3781000E+00, 0.3781000E+00 /
      data (ref_adm(24,iz,30,13),iz = 1,20) / &
     & 0.2734400E+00, 0.2734400E+00, 0.2812900E+00, 0.2828200E+00, &
     & 0.2981300E+00, 0.3081700E+00, 0.3109500E+00, 0.2914400E+00, &
     & 0.3065700E+00, 0.3191800E+00, 0.3320200E+00, 0.3856600E+00, &
     & 0.3949900E+00, 0.4115000E+00, 0.3921600E+00, 0.4033700E+00, &
     & 0.4290900E+00, 0.4109200E+00, 0.3727800E+00, 0.3727800E+00 /
      data (ref_adm(24,iz,31,13),iz = 1,20) / &
     & 0.2715700E+00, 0.2715700E+00, 0.2899200E+00, 0.2985500E+00, &
     & 0.3052400E+00, 0.3076900E+00, 0.3177100E+00, 0.3141000E+00, &
     & 0.3447100E+00, 0.3459800E+00, 0.3444100E+00, 0.3647800E+00, &
     & 0.3853400E+00, 0.3947900E+00, 0.3715400E+00, 0.3850200E+00, &
     & 0.4128000E+00, 0.4360800E+00, 0.3784400E+00, 0.3784400E+00 /
      data (ref_adm(24,iz,32,13),iz = 1,20) / &
     & 0.2730700E+00, 0.2730700E+00, 0.2797000E+00, 0.2791500E+00, &
     & 0.2894700E+00, 0.2874300E+00, 0.3074400E+00, 0.3412200E+00, &
     & 0.3415100E+00, 0.3705400E+00, 0.3912400E+00, 0.3917800E+00, &
     & 0.4068600E+00, 0.4082600E+00, 0.4243100E+00, 0.4185100E+00, &
     & 0.4410700E+00, 0.4408100E+00, 0.3500500E+00, 0.3500500E+00 /
      data (ref_adm(24,iz,33,13),iz = 1,20) / &
     & 0.2723500E+00, 0.2723500E+00, 0.2916300E+00, 0.2962700E+00, &
     & 0.3036900E+00, 0.3325700E+00, 0.3195500E+00, 0.3468500E+00, &
     & 0.3534300E+00, 0.3723900E+00, 0.4044000E+00, 0.3996900E+00, &
     & 0.4374800E+00, 0.4742300E+00, 0.4677200E+00, 0.4780600E+00, &
     & 0.4841500E+00, 0.4967700E+00, 0.4039800E+00, 0.4039800E+00 /
      data (ref_adm(24,iz,34,13),iz = 1,20) / &
     & 0.2823600E+00, 0.2823600E+00, 0.3002300E+00, 0.3144700E+00, &
     & 0.3149000E+00, 0.3016000E+00, 0.3565800E+00, 0.3817500E+00, &
     & 0.3435700E+00, 0.3605400E+00, 0.3967400E+00, 0.3741000E+00, &
     & 0.4069100E+00, 0.4234200E+00, 0.4552100E+00, 0.4736400E+00, &
     & 0.4705300E+00, 0.4650700E+00, 0.4373500E+00, 0.4373500E+00 /
      data (ref_adm(24,iz,35,13),iz = 1,20) / &
     & 0.3001600E+00, 0.3001600E+00, 0.3158800E+00, 0.3086000E+00, &
     & 0.3052400E+00, 0.3134400E+00, 0.3280600E+00, 0.3485400E+00, &
     & 0.3535100E+00, 0.3586200E+00, 0.3787400E+00, 0.3874700E+00, &
     & 0.4419100E+00, 0.4436200E+00, 0.4614000E+00, 0.4579400E+00, &
     & 0.5136300E+00, 0.5293900E+00, 0.4220700E+00, 0.4220700E+00 /
      data (ref_adm(24,iz,36,13),iz = 1,20) / &
     & 0.2818200E+00, 0.2818200E+00, 0.3274500E+00, 0.3123400E+00, &
     & 0.3198000E+00, 0.3362800E+00, 0.3223700E+00, 0.3434000E+00, &
     & 0.3581800E+00, 0.3625900E+00, 0.3902600E+00, 0.4247200E+00, &
     & 0.4358600E+00, 0.4475100E+00, 0.4668900E+00, 0.5133600E+00, &
     & 0.5029600E+00, 0.4578300E+00, 0.4764781E+00, 0.4764781E+00 /
      data (ref_adm(24,iz,37,13),iz = 1,20) / &
     & 0.2914300E+00, 0.2914300E+00, 0.3089600E+00, 0.3397900E+00, &
     & 0.3356600E+00, 0.3453800E+00, 0.3374600E+00, 0.3702100E+00, &
     & 0.3504200E+00, 0.3763800E+00, 0.3849800E+00, 0.4153500E+00, &
     & 0.4404500E+00, 0.4953100E+00, 0.4838100E+00, 0.5104400E+00, &
     & 0.5214800E+00, 0.5498000E+00, 0.4793057E+00, 0.4793057E+00 /
      data (ref_adm(24,iz,38,13),iz = 1,20) / &
     & 0.2914300E+00, 0.2914300E+00, 0.3089600E+00, 0.3397900E+00, &
     & 0.3356600E+00, 0.3453800E+00, 0.3374600E+00, 0.3702100E+00, &
     & 0.3504200E+00, 0.3763800E+00, 0.3849800E+00, 0.4153500E+00, &
     & 0.4404500E+00, 0.4953100E+00, 0.4838100E+00, 0.5104400E+00, &
     & 0.5214800E+00, 0.5498000E+00, 0.4793057E+00, 0.4793057E+00 /
! Solar Zenith Angle 65.0 Albedo  0.3402603E+00
      data (ref_adm(24,iz, 1,14),iz = 1,20) / &
     & 0.2614700E+00, 0.2614700E+00, 0.2747400E+00, 0.2594700E+00, &
     & 0.2773100E+00, 0.2622700E+00, 0.2536400E+00, 0.2793500E+00, &
     & 0.2796900E+00, 0.2770400E+00, 0.3265200E+00, 0.3343100E+00, &
     & 0.3744500E+00, 0.5104400E+00, 0.5575500E+00, 0.6117500E+00, &
     & 0.8562200E+00, 0.1019700E+01, 0.1412768E+01, 0.1412768E+01 /
      data (ref_adm(24,iz, 2,14),iz = 1,20) / &
     & 0.2614700E+00, 0.2614700E+00, 0.2747400E+00, 0.2594700E+00, &
     & 0.2773100E+00, 0.2622700E+00, 0.2536400E+00, 0.2793500E+00, &
     & 0.2796900E+00, 0.2770400E+00, 0.3265200E+00, 0.3343100E+00, &
     & 0.3744500E+00, 0.5104400E+00, 0.5575500E+00, 0.6117500E+00, &
     & 0.8562200E+00, 0.1019700E+01, 0.1412768E+01, 0.1412768E+01 /
      data (ref_adm(24,iz, 3,14),iz = 1,20) / &
     & 0.2521600E+00, 0.2521600E+00, 0.2598200E+00, 0.2542800E+00, &
     & 0.2695700E+00, 0.2475700E+00, 0.2540800E+00, 0.2601900E+00, &
     & 0.2692200E+00, 0.2913700E+00, 0.3262600E+00, 0.3150600E+00, &
     & 0.3591800E+00, 0.4357000E+00, 0.4482800E+00, 0.5626300E+00, &
     & 0.6286100E+00, 0.7286100E+00, 0.2601955E+00, 0.2601955E+00 /
      data (ref_adm(24,iz, 4,14),iz = 1,20) / &
     & 0.2709300E+00, 0.2709300E+00, 0.2549300E+00, 0.2636500E+00, &
     & 0.2606200E+00, 0.2653000E+00, 0.2915100E+00, 0.2704900E+00, &
     & 0.2785700E+00, 0.2916500E+00, 0.3005200E+00, 0.3159600E+00, &
     & 0.3566000E+00, 0.3986300E+00, 0.4246200E+00, 0.5172700E+00, &
     & 0.5840500E+00, 0.6872600E+00, 0.1139995E+01, 0.1139995E+01 /
      data (ref_adm(24,iz, 5,14),iz = 1,20) / &
     & 0.2694200E+00, 0.2694200E+00, 0.2611300E+00, 0.2674800E+00, &
     & 0.2600800E+00, 0.2539800E+00, 0.2740900E+00, 0.2710200E+00, &
     & 0.2997100E+00, 0.3081200E+00, 0.3150900E+00, 0.3156600E+00, &
     & 0.3470100E+00, 0.4073300E+00, 0.4234800E+00, 0.4975600E+00, &
     & 0.5566200E+00, 0.6590800E+00, 0.9735581E+00, 0.9735581E+00 /
      data (ref_adm(24,iz, 6,14),iz = 1,20) / &
     & 0.2708900E+00, 0.2708900E+00, 0.2604400E+00, 0.2756800E+00, &
     & 0.2573000E+00, 0.2585900E+00, 0.2766900E+00, 0.2805600E+00, &
     & 0.2926000E+00, 0.3051300E+00, 0.3233900E+00, 0.3394900E+00, &
     & 0.3597600E+00, 0.3924400E+00, 0.4458300E+00, 0.5238300E+00, &
     & 0.5756900E+00, 0.5921000E+00, 0.4721400E+00, 0.4721400E+00 /
      data (ref_adm(24,iz, 7,14),iz = 1,20) / &
     & 0.2945900E+00, 0.2945900E+00, 0.2828000E+00, 0.2666400E+00, &
     & 0.2592400E+00, 0.2659200E+00, 0.2698300E+00, 0.2772900E+00, &
     & 0.2770700E+00, 0.2856600E+00, 0.3049100E+00, 0.3218800E+00, &
     & 0.3585200E+00, 0.3652100E+00, 0.3918000E+00, 0.4186000E+00, &
     & 0.4834700E+00, 0.5669200E+00, 0.7325900E+00, 0.7325900E+00 /
      data (ref_adm(24,iz, 8,14),iz = 1,20) / &
     & 0.2718400E+00, 0.2718400E+00, 0.2663800E+00, 0.2490700E+00, &
     & 0.2554200E+00, 0.2817300E+00, 0.2519200E+00, 0.2643100E+00, &
     & 0.2992400E+00, 0.2935900E+00, 0.3146500E+00, 0.3260100E+00, &
     & 0.3210300E+00, 0.3559700E+00, 0.4068700E+00, 0.4513900E+00, &
     & 0.4953500E+00, 0.5236900E+00, 0.6909081E+00, 0.6909081E+00 /
      data (ref_adm(24,iz, 9,14),iz = 1,20) / &
     & 0.2775900E+00, 0.2775900E+00, 0.2684100E+00, 0.2496900E+00, &
     & 0.2611400E+00, 0.2633300E+00, 0.2929300E+00, 0.2640800E+00, &
     & 0.3060800E+00, 0.3076100E+00, 0.3129500E+00, 0.3070900E+00, &
     & 0.3444900E+00, 0.3643500E+00, 0.4020200E+00, 0.4515300E+00, &
     & 0.5096300E+00, 0.5470900E+00, 0.6695139E+00, 0.6695139E+00 /
      data (ref_adm(24,iz,10,14),iz = 1,20) / &
     & 0.2621000E+00, 0.2621000E+00, 0.2579600E+00, 0.2664200E+00, &
     & 0.2699000E+00, 0.2498700E+00, 0.2907700E+00, 0.2784200E+00, &
     & 0.2859500E+00, 0.3138100E+00, 0.3198100E+00, 0.3358400E+00, &
     & 0.3513900E+00, 0.3648100E+00, 0.3887600E+00, 0.4342400E+00, &
     & 0.4759000E+00, 0.5154400E+00, 0.4506100E+00, 0.4506100E+00 /
      data (ref_adm(24,iz,11,14),iz = 1,20) / &
     & 0.2748000E+00, 0.2748000E+00, 0.2686700E+00, 0.2651000E+00, &
     & 0.2666400E+00, 0.2776100E+00, 0.2774200E+00, 0.2608400E+00, &
     & 0.2930900E+00, 0.3088800E+00, 0.3018800E+00, 0.3188700E+00, &
     & 0.3672000E+00, 0.3766000E+00, 0.3749900E+00, 0.4141000E+00, &
     & 0.4794200E+00, 0.5072200E+00, 0.5847024E+00, 0.5847024E+00 /
      data (ref_adm(24,iz,12,14),iz = 1,20) / &
     & 0.2624900E+00, 0.2624900E+00, 0.2796000E+00, 0.2760900E+00, &
     & 0.2886900E+00, 0.2530900E+00, 0.2643000E+00, 0.2886300E+00, &
     & 0.2815100E+00, 0.2952100E+00, 0.3082600E+00, 0.3146000E+00, &
     & 0.3589100E+00, 0.3572900E+00, 0.3439600E+00, 0.4060200E+00, &
     & 0.4841000E+00, 0.4785500E+00, 0.5566083E+00, 0.5566083E+00 /
      data (ref_adm(24,iz,13,14),iz = 1,20) / &
     & 0.2559500E+00, 0.2559500E+00, 0.2670600E+00, 0.2716900E+00, &
     & 0.2494900E+00, 0.2708200E+00, 0.2601500E+00, 0.2722500E+00, &
     & 0.3010200E+00, 0.2736700E+00, 0.2822600E+00, 0.2892200E+00, &
     & 0.3560600E+00, 0.3536400E+00, 0.3864000E+00, 0.3872000E+00, &
     & 0.4206400E+00, 0.4485700E+00, 0.3752800E+00, 0.3752800E+00 /
      data (ref_adm(24,iz,14,14),iz = 1,20) / &
     & 0.2750900E+00, 0.2750900E+00, 0.2740900E+00, 0.2777100E+00, &
     & 0.2761900E+00, 0.2771100E+00, 0.2813000E+00, 0.2823500E+00, &
     & 0.2722000E+00, 0.2857800E+00, 0.3003800E+00, 0.3130300E+00, &
     & 0.3222100E+00, 0.3180300E+00, 0.3648600E+00, 0.3800400E+00, &
     & 0.4249700E+00, 0.4463600E+00, 0.4275600E+00, 0.4275600E+00 /
      data (ref_adm(24,iz,15,14),iz = 1,20) / &
     & 0.2832300E+00, 0.2832300E+00, 0.2693200E+00, 0.2619800E+00, &
     & 0.2627600E+00, 0.2690100E+00, 0.2728600E+00, 0.2805000E+00, &
     & 0.2917200E+00, 0.3046500E+00, 0.3151000E+00, 0.3296000E+00, &
     & 0.3408500E+00, 0.3535100E+00, 0.3635600E+00, 0.3948500E+00, &
     & 0.4047000E+00, 0.3862500E+00, 0.5057422E+00, 0.5057422E+00 /
      data (ref_adm(24,iz,16,14),iz = 1,20) / &
     & 0.2536200E+00, 0.2536200E+00, 0.2332200E+00, 0.2353200E+00, &
     & 0.2375400E+00, 0.2319900E+00, 0.2338000E+00, 0.2403400E+00, &
     & 0.2482500E+00, 0.2614400E+00, 0.2674300E+00, 0.2818500E+00, &
     & 0.3001600E+00, 0.3198000E+00, 0.3503400E+00, 0.3977000E+00, &
     & 0.4440600E+00, 0.5032100E+00, 0.4913951E+00, 0.4913951E+00 /
      data (ref_adm(24,iz,17,14),iz = 1,20) / &
     & 0.2675900E+00, 0.2675900E+00, 0.2668400E+00, 0.2716300E+00, &
     & 0.2917100E+00, 0.2702700E+00, 0.2636300E+00, 0.2669800E+00, &
     & 0.2804300E+00, 0.2965100E+00, 0.2893700E+00, 0.3064700E+00, &
     & 0.3173500E+00, 0.3532000E+00, 0.3617800E+00, 0.3771900E+00, &
     & 0.4102000E+00, 0.4613521E+00, 0.4764083E+00, 0.4764083E+00 /
      data (ref_adm(24,iz,18,14),iz = 1,20) / &
     & 0.2693800E+00, 0.2693800E+00, 0.2565900E+00, 0.2819300E+00, &
     & 0.2851600E+00, 0.2934400E+00, 0.2805200E+00, 0.2772400E+00, &
     & 0.2883100E+00, 0.2721000E+00, 0.3082000E+00, 0.3014600E+00, &
     & 0.3415100E+00, 0.3357400E+00, 0.3596500E+00, 0.3600900E+00, &
     & 0.3789300E+00, 0.4082575E+00, 0.3967987E+00, 0.3967987E+00 /
      data (ref_adm(24,iz,19,14),iz = 1,20) / &
     & 0.2819600E+00, 0.2819600E+00, 0.2582400E+00, 0.2713800E+00, &
     & 0.2649700E+00, 0.2854600E+00, 0.2619500E+00, 0.2714200E+00, &
     & 0.2922600E+00, 0.2786900E+00, 0.2925000E+00, 0.3244400E+00, &
     & 0.3348000E+00, 0.3289300E+00, 0.3591200E+00, 0.4261300E+00, &
     & 0.3861425E+00, 0.4016091E+00, 0.3894023E+00, 0.3894023E+00 /
      data (ref_adm(24,iz,20,14),iz = 1,20) / &
     & 0.2606300E+00, 0.2606300E+00, 0.2646000E+00, 0.2721800E+00, &
     & 0.2816200E+00, 0.2685400E+00, 0.2796000E+00, 0.2913400E+00, &
     & 0.2858700E+00, 0.3071800E+00, 0.3103000E+00, 0.3231700E+00, &
     & 0.3226800E+00, 0.3390000E+00, 0.3458800E+00, 0.3761600E+00, &
     & 0.3817517E+00, 0.3968020E+00, 0.3850444E+00, 0.3850444E+00 /
      data (ref_adm(24,iz,21,14),iz = 1,20) / &
     & 0.2730700E+00, 0.2730700E+00, 0.2697900E+00, 0.2807100E+00, &
     & 0.2901400E+00, 0.2851000E+00, 0.2779900E+00, 0.2753400E+00, &
     & 0.2780300E+00, 0.3013200E+00, 0.3110200E+00, 0.3273600E+00, &
     & 0.3232000E+00, 0.3196000E+00, 0.3328000E+00, 0.3003100E+00, &
     & 0.3784201E+00, 0.3925551E+00, 0.3823040E+00, 0.3823040E+00 /
      data (ref_adm(24,iz,22,14),iz = 1,20) / &
     & 0.2718800E+00, 0.2718800E+00, 0.2736300E+00, 0.2677900E+00, &
     & 0.2870600E+00, 0.2825400E+00, 0.2905200E+00, 0.2835700E+00, &
     & 0.2916600E+00, 0.2944200E+00, 0.3101100E+00, 0.3262700E+00, &
     & 0.3393200E+00, 0.3509600E+00, 0.3404900E+00, 0.3438400E+00, &
     & 0.3621061E+00, 0.3543377E+00, 0.3519225E+00, 0.3519225E+00 /
      data (ref_adm(24,iz,23,14),iz = 1,20) / &
     & 0.2736800E+00, 0.2736800E+00, 0.2559100E+00, 0.2694300E+00, &
     & 0.2835600E+00, 0.3038600E+00, 0.2875400E+00, 0.3196100E+00, &
     & 0.3044300E+00, 0.3078000E+00, 0.3347800E+00, 0.3278600E+00, &
     & 0.3217800E+00, 0.3563200E+00, 0.3652900E+00, 0.3804100E+00, &
     & 0.3634216E+00, 0.3563428E+00, 0.3569207E+00, 0.3569207E+00 /
      data (ref_adm(24,iz,24,14),iz = 1,20) / &
     & 0.2457600E+00, 0.2457600E+00, 0.2460900E+00, 0.2578300E+00, &
     & 0.2686000E+00, 0.2740000E+00, 0.2770000E+00, 0.2859400E+00, &
     & 0.2901300E+00, 0.2958200E+00, 0.3094700E+00, 0.3069300E+00, &
     & 0.3402100E+00, 0.3433400E+00, 0.3326600E+00, 0.3734100E+00, &
     & 0.4547400E+00, 0.3615711E+00, 0.3644640E+00, 0.3644640E+00 /
      data (ref_adm(24,iz,25,14),iz = 1,20) / &
     & 0.2631600E+00, 0.2631600E+00, 0.2913600E+00, 0.3007600E+00, &
     & 0.3005600E+00, 0.3034400E+00, 0.3182000E+00, 0.3304200E+00, &
     & 0.3339500E+00, 0.3384100E+00, 0.3402000E+00, 0.3564700E+00, &
     & 0.3591600E+00, 0.3767700E+00, 0.3785700E+00, 0.3835000E+00, &
     & 0.3744600E+00, 0.3701298E+00, 0.3741269E+00, 0.3741269E+00 /
      data (ref_adm(24,iz,26,14),iz = 1,20) / &
     & 0.2740600E+00, 0.2740600E+00, 0.2870900E+00, 0.3020800E+00, &
     & 0.3114800E+00, 0.3007700E+00, 0.3108300E+00, 0.3252100E+00, &
     & 0.3221200E+00, 0.3472600E+00, 0.3528300E+00, 0.3682500E+00, &
     & 0.3803000E+00, 0.4046900E+00, 0.3941500E+00, 0.3918600E+00, &
     & 0.4171400E+00, 0.4438400E+00, 0.3864135E+00, 0.3864135E+00 /
      data (ref_adm(24,iz,27,14),iz = 1,20) / &
     & 0.2674800E+00, 0.2674800E+00, 0.2884600E+00, 0.2816300E+00, &
     & 0.2725600E+00, 0.2999800E+00, 0.2891200E+00, 0.3092500E+00, &
     & 0.3176500E+00, 0.3474600E+00, 0.3553800E+00, 0.3633900E+00, &
     & 0.3474400E+00, 0.3982800E+00, 0.3931700E+00, 0.4050900E+00, &
     & 0.4450000E+00, 0.4346300E+00, 0.4002353E+00, 0.4002353E+00 /
      data (ref_adm(24,iz,28,14),iz = 1,20) / &
     & 0.2698700E+00, 0.2698700E+00, 0.2673000E+00, 0.2848100E+00, &
     & 0.2899600E+00, 0.2757800E+00, 0.3101400E+00, 0.3198600E+00, &
     & 0.3418000E+00, 0.3191300E+00, 0.3613400E+00, 0.3857800E+00, &
     & 0.3632600E+00, 0.3884700E+00, 0.4138600E+00, 0.4170700E+00, &
     & 0.4709200E+00, 0.4716300E+00, 0.3990500E+00, 0.3990500E+00 /
      data (ref_adm(24,iz,29,14),iz = 1,20) / &
     & 0.2801800E+00, 0.2801800E+00, 0.2669400E+00, 0.2741600E+00, &
     & 0.2708500E+00, 0.2996200E+00, 0.2867800E+00, 0.3115700E+00, &
     & 0.3204300E+00, 0.3465000E+00, 0.3707400E+00, 0.3571400E+00, &
     & 0.3855100E+00, 0.3846400E+00, 0.4006700E+00, 0.4231300E+00, &
     & 0.4524000E+00, 0.4638600E+00, 0.3918700E+00, 0.3918700E+00 /
      data (ref_adm(24,iz,30,14),iz = 1,20) / &
     & 0.2760500E+00, 0.2760500E+00, 0.2860800E+00, 0.2814900E+00, &
     & 0.2797200E+00, 0.2894200E+00, 0.3072600E+00, 0.3363100E+00, &
     & 0.3589200E+00, 0.3515700E+00, 0.3586200E+00, 0.3739600E+00, &
     & 0.3940600E+00, 0.4105000E+00, 0.4290400E+00, 0.4197500E+00, &
     & 0.4443000E+00, 0.4672700E+00, 0.3946300E+00, 0.3946300E+00 /
      data (ref_adm(24,iz,31,14),iz = 1,20) / &
     & 0.2665700E+00, 0.2665700E+00, 0.2806300E+00, 0.2905200E+00, &
     & 0.2707100E+00, 0.2883300E+00, 0.3149700E+00, 0.3179800E+00, &
     & 0.3421300E+00, 0.3453100E+00, 0.3814300E+00, 0.3948600E+00, &
     & 0.4069700E+00, 0.4200600E+00, 0.4216000E+00, 0.4529900E+00, &
     & 0.4652700E+00, 0.4665700E+00, 0.4363800E+00, 0.4363800E+00 /
      data (ref_adm(24,iz,32,14),iz = 1,20) / &
     & 0.2746600E+00, 0.2746600E+00, 0.2763200E+00, 0.2805100E+00, &
     & 0.2870700E+00, 0.2984900E+00, 0.3237300E+00, 0.3312900E+00, &
     & 0.3448100E+00, 0.3627600E+00, 0.3806500E+00, 0.3929800E+00, &
     & 0.3973600E+00, 0.4201400E+00, 0.4412600E+00, 0.4557500E+00, &
     & 0.4833800E+00, 0.4957300E+00, 0.4449000E+00, 0.4449000E+00 /
      data (ref_adm(24,iz,33,14),iz = 1,20) / &
     & 0.2668300E+00, 0.2668300E+00, 0.2729100E+00, 0.2683800E+00, &
     & 0.2788800E+00, 0.2926400E+00, 0.3018600E+00, 0.3204700E+00, &
     & 0.3337300E+00, 0.3527900E+00, 0.3623700E+00, 0.3828300E+00, &
     & 0.3993000E+00, 0.4342400E+00, 0.4685800E+00, 0.4713700E+00, &
     & 0.4881600E+00, 0.5215700E+00, 0.4497900E+00, 0.4497900E+00 /
      data (ref_adm(24,iz,34,14),iz = 1,20) / &
     & 0.2682500E+00, 0.2682500E+00, 0.2687900E+00, 0.2722300E+00, &
     & 0.2934200E+00, 0.3159400E+00, 0.3337000E+00, 0.3383800E+00, &
     & 0.3543200E+00, 0.3731000E+00, 0.3847600E+00, 0.3961000E+00, &
     & 0.4208200E+00, 0.4445800E+00, 0.4821300E+00, 0.5212200E+00, &
     & 0.5394200E+00, 0.5325100E+00, 0.4292500E+00, 0.4292500E+00 /
      data (ref_adm(24,iz,35,14),iz = 1,20) / &
     & 0.2844100E+00, 0.2844100E+00, 0.2768800E+00, 0.2834400E+00, &
     & 0.2827300E+00, 0.3221000E+00, 0.3459500E+00, 0.3359300E+00, &
     & 0.3592200E+00, 0.3866800E+00, 0.4008800E+00, 0.4044000E+00, &
     & 0.4476100E+00, 0.4597000E+00, 0.4949300E+00, 0.5413800E+00, &
     & 0.5485600E+00, 0.5696700E+00, 0.4843900E+00, 0.4843900E+00 /
      data (ref_adm(24,iz,36,14),iz = 1,20) / &
     & 0.2683500E+00, 0.2683500E+00, 0.2643500E+00, 0.2769700E+00, &
     & 0.2966300E+00, 0.3110000E+00, 0.3242600E+00, 0.3397100E+00, &
     & 0.3554400E+00, 0.3934400E+00, 0.4133900E+00, 0.4486800E+00, &
     & 0.4594200E+00, 0.4852500E+00, 0.5110400E+00, 0.5414500E+00, &
     & 0.5602800E+00, 0.5498500E+00, 0.4892000E+00, 0.4892000E+00 /
      data (ref_adm(24,iz,37,14),iz = 1,20) / &
     & 0.2873700E+00, 0.2873700E+00, 0.2941800E+00, 0.2792800E+00, &
     & 0.2960800E+00, 0.3010200E+00, 0.3038200E+00, 0.3283600E+00, &
     & 0.3461200E+00, 0.3885500E+00, 0.4061300E+00, 0.4448600E+00, &
     & 0.4824700E+00, 0.4828000E+00, 0.5387300E+00, 0.5530100E+00, &
     & 0.5751800E+00, 0.5897000E+00, 0.5077831E+00, 0.5077831E+00 /
      data (ref_adm(24,iz,38,14),iz = 1,20) / &
     & 0.2873700E+00, 0.2873700E+00, 0.2941800E+00, 0.2792800E+00, &
     & 0.2960800E+00, 0.3010200E+00, 0.3038200E+00, 0.3283600E+00, &
     & 0.3461200E+00, 0.3885500E+00, 0.4061300E+00, 0.4448600E+00, &
     & 0.4824700E+00, 0.4828000E+00, 0.5387300E+00, 0.5530100E+00, &
     & 0.5751800E+00, 0.5897000E+00, 0.5077831E+00, 0.5077831E+00 /
! Solar Zenith Angle 70.0 Albedo  0.3362346E+00
      data (ref_adm(24,iz, 1,15),iz = 1,20) / &
     & 0.2449600E+00, 0.2449600E+00, 0.2763400E+00, 0.2577300E+00, &
     & 0.2572000E+00, 0.2718900E+00, 0.2844200E+00, 0.2727800E+00, &
     & 0.2925000E+00, 0.2951200E+00, 0.3210200E+00, 0.3401000E+00, &
     & 0.4093300E+00, 0.4864200E+00, 0.7554800E+00, 0.6365400E+00, &
     & 0.6980480E+00, 0.9399445E+00, 0.1437811E+01, 0.1437811E+01 /
      data (ref_adm(24,iz, 2,15),iz = 1,20) / &
     & 0.2449600E+00, 0.2449600E+00, 0.2763400E+00, 0.2577300E+00, &
     & 0.2572000E+00, 0.2718900E+00, 0.2844200E+00, 0.2727800E+00, &
     & 0.2925000E+00, 0.2951200E+00, 0.3210200E+00, 0.3401000E+00, &
     & 0.4093300E+00, 0.4864200E+00, 0.7554800E+00, 0.6365400E+00, &
     & 0.6980480E+00, 0.9399445E+00, 0.1437811E+01, 0.1437811E+01 /
      data (ref_adm(24,iz, 3,15),iz = 1,20) / &
     & 0.2610800E+00, 0.2610800E+00, 0.2571500E+00, 0.2708500E+00, &
     & 0.2582100E+00, 0.2620200E+00, 0.2835500E+00, 0.2793000E+00, &
     & 0.2904200E+00, 0.2709300E+00, 0.3034400E+00, 0.3423400E+00, &
     & 0.3944800E+00, 0.4523200E+00, 0.5194900E+00, 0.6110300E+00, &
     & 0.5004400E+00, 0.9083641E+00, 0.2697118E+00, 0.2697118E+00 /
      data (ref_adm(24,iz, 4,15),iz = 1,20) / &
     & 0.2485100E+00, 0.2485100E+00, 0.2646100E+00, 0.2703500E+00, &
     & 0.2722300E+00, 0.2861800E+00, 0.2576900E+00, 0.2614100E+00, &
     & 0.2788000E+00, 0.3010300E+00, 0.3122900E+00, 0.3327000E+00, &
     & 0.3698300E+00, 0.4134900E+00, 0.4714900E+00, 0.5742900E+00, &
     & 0.6615700E+00, 0.8507521E+00, 0.1159663E+01, 0.1159663E+01 /
      data (ref_adm(24,iz, 5,15),iz = 1,20) / &
     & 0.2675600E+00, 0.2675600E+00, 0.2679600E+00, 0.2531200E+00, &
     & 0.2626400E+00, 0.2673800E+00, 0.2621700E+00, 0.2868300E+00, &
     & 0.3048400E+00, 0.2947000E+00, 0.3071500E+00, 0.3375700E+00, &
     & 0.3432700E+00, 0.4226200E+00, 0.4486700E+00, 0.5158000E+00, &
     & 0.5136000E+00, 0.7852940E+00, 0.9896223E+00, 0.9896223E+00 /
      data (ref_adm(24,iz, 6,15),iz = 1,20) / &
     & 0.2520300E+00, 0.2520300E+00, 0.2457700E+00, 0.2354900E+00, &
     & 0.2410300E+00, 0.2442500E+00, 0.2507700E+00, 0.2636100E+00, &
     & 0.2614100E+00, 0.2827100E+00, 0.3082700E+00, 0.3311200E+00, &
     & 0.3474800E+00, 0.3989000E+00, 0.4528000E+00, 0.5123800E+00, &
     & 0.6481300E+00, 0.7617100E+00, 0.6810700E+00, 0.6810700E+00 /
      data (ref_adm(24,iz, 7,15),iz = 1,20) / &
     & 0.2550500E+00, 0.2550500E+00, 0.2492300E+00, 0.2554300E+00, &
     & 0.2582500E+00, 0.2644300E+00, 0.2561800E+00, 0.2620600E+00, &
     & 0.2635100E+00, 0.2766700E+00, 0.3124200E+00, 0.3100900E+00, &
     & 0.3254000E+00, 0.3892500E+00, 0.4365000E+00, 0.5034000E+00, &
     & 0.5652900E+00, 0.6635300E+00, 0.9685900E+00, 0.9685900E+00 /
      data (ref_adm(24,iz, 8,15),iz = 1,20) / &
     & 0.2537000E+00, 0.2537000E+00, 0.2518000E+00, 0.2511400E+00, &
     & 0.2500600E+00, 0.2570900E+00, 0.2468300E+00, 0.2569400E+00, &
     & 0.2618500E+00, 0.2836500E+00, 0.2825200E+00, 0.3178000E+00, &
     & 0.3307800E+00, 0.3512200E+00, 0.4169700E+00, 0.4407400E+00, &
     & 0.5596500E+00, 0.6038400E+00, 0.6996088E+00, 0.6996088E+00 /
      data (ref_adm(24,iz, 9,15),iz = 1,20) / &
     & 0.2477100E+00, 0.2477100E+00, 0.2561700E+00, 0.2526200E+00, &
     & 0.2355700E+00, 0.2274800E+00, 0.2464200E+00, 0.2790200E+00, &
     & 0.2654800E+00, 0.2717000E+00, 0.2933900E+00, 0.3024900E+00, &
     & 0.3238700E+00, 0.3479400E+00, 0.3832600E+00, 0.4285100E+00, &
     & 0.5663800E+00, 0.6143700E+00, 0.6769442E+00, 0.6769442E+00 /
      data (ref_adm(24,iz,10,15),iz = 1,20) / &
     & 0.2550700E+00, 0.2550700E+00, 0.2714100E+00, 0.2494200E+00, &
     & 0.2360800E+00, 0.2371100E+00, 0.2644900E+00, 0.2515100E+00, &
     & 0.2521500E+00, 0.2682600E+00, 0.2758300E+00, 0.3115200E+00, &
     & 0.3266800E+00, 0.3650300E+00, 0.4031200E+00, 0.4766400E+00, &
     & 0.5156700E+00, 0.5326400E+00, 0.6340020E+00, 0.6340020E+00 /
      data (ref_adm(24,iz,11,15),iz = 1,20) / &
     & 0.2514800E+00, 0.2514800E+00, 0.2400000E+00, 0.2588200E+00, &
     & 0.2465000E+00, 0.2448700E+00, 0.2318500E+00, 0.2516200E+00, &
     & 0.2545200E+00, 0.2764900E+00, 0.2694200E+00, 0.3034600E+00, &
     & 0.3213100E+00, 0.3601700E+00, 0.3854200E+00, 0.4964600E+00, &
     & 0.5024700E+00, 0.5251900E+00, 0.5898364E+00, 0.5898364E+00 /
      data (ref_adm(24,iz,12,15),iz = 1,20) / &
     & 0.2372100E+00, 0.2372100E+00, 0.2454300E+00, 0.2615000E+00, &
     & 0.2640000E+00, 0.2658400E+00, 0.2462200E+00, 0.2711900E+00, &
     & 0.2652700E+00, 0.2699300E+00, 0.2769600E+00, 0.3188100E+00, &
     & 0.3310800E+00, 0.3645300E+00, 0.4135700E+00, 0.4532000E+00, &
     & 0.5220000E+00, 0.5261900E+00, 0.5608158E+00, 0.5608158E+00 /
      data (ref_adm(24,iz,13,15),iz = 1,20) / &
     & 0.2575900E+00, 0.2575900E+00, 0.2593700E+00, 0.2509700E+00, &
     & 0.2692200E+00, 0.2533600E+00, 0.2598600E+00, 0.2575500E+00, &
     & 0.2546400E+00, 0.2746000E+00, 0.2840600E+00, 0.2962200E+00, &
     & 0.3396000E+00, 0.3419400E+00, 0.3915900E+00, 0.4170100E+00, &
     & 0.4860000E+00, 0.4739500E+00, 0.5390252E+00, 0.5390252E+00 /
      data (ref_adm(24,iz,14,15),iz = 1,20) / &
     & 0.2571900E+00, 0.2571900E+00, 0.2624000E+00, 0.2643000E+00, &
     & 0.2625000E+00, 0.2697500E+00, 0.2640300E+00, 0.2726600E+00, &
     & 0.2710900E+00, 0.2737700E+00, 0.2774000E+00, 0.2946200E+00, &
     & 0.3271000E+00, 0.3435500E+00, 0.3705200E+00, 0.4140700E+00, &
     & 0.4552900E+00, 0.4772100E+00, 0.5222592E+00, 0.5222592E+00 /
      data (ref_adm(24,iz,15,15),iz = 1,20) / &
     & 0.2622800E+00, 0.2622800E+00, 0.2546100E+00, 0.2543900E+00, &
     & 0.2555900E+00, 0.2490500E+00, 0.2569000E+00, 0.2605500E+00, &
     & 0.2671000E+00, 0.2767500E+00, 0.2819300E+00, 0.2977400E+00, &
     & 0.3223400E+00, 0.3445800E+00, 0.3501000E+00, 0.4111400E+00, &
     & 0.4246900E+00, 0.4975200E+00, 0.5078993E+00, 0.5078993E+00 /
      data (ref_adm(24,iz,16,15),iz = 1,20) / &
     & 0.2482700E+00, 0.2482700E+00, 0.2410700E+00, 0.2464800E+00, &
     & 0.2447100E+00, 0.2386000E+00, 0.2456300E+00, 0.2481100E+00, &
     & 0.2487400E+00, 0.2580700E+00, 0.2614800E+00, 0.2637400E+00, &
     & 0.2780400E+00, 0.2934300E+00, 0.3762100E+00, 0.3918500E+00, &
     & 0.4303000E+00, 0.4674727E+00, 0.4930638E+00, 0.4930638E+00 /
      data (ref_adm(24,iz,17,15),iz = 1,20) / &
     & 0.2599600E+00, 0.2599600E+00, 0.2564700E+00, 0.2652500E+00, &
     & 0.2618100E+00, 0.2570700E+00, 0.2497300E+00, 0.2751100E+00, &
     & 0.2741600E+00, 0.3000100E+00, 0.2793000E+00, 0.3079000E+00, &
     & 0.3108300E+00, 0.3421800E+00, 0.3422200E+00, 0.4005200E+00, &
     & 0.4279600E+00, 0.4547901E+00, 0.4776372E+00, 0.4776372E+00 /
      data (ref_adm(24,iz,18,15),iz = 1,20) / &
     & 0.2610900E+00, 0.2610900E+00, 0.2544800E+00, 0.2599100E+00, &
     & 0.2537900E+00, 0.2568800E+00, 0.2492900E+00, 0.2768200E+00, &
     & 0.2818600E+00, 0.2984900E+00, 0.2765700E+00, 0.2996700E+00, &
     & 0.3157800E+00, 0.3385100E+00, 0.3678000E+00, 0.4524600E+00, &
     & 0.4196228E+00, 0.4559173E+00, 0.4689476E+00, 0.4689476E+00 /
      data (ref_adm(24,iz,19,15),iz = 1,20) / &
     & 0.2440900E+00, 0.2440900E+00, 0.2435900E+00, 0.2587100E+00, &
     & 0.2578600E+00, 0.2561200E+00, 0.2571300E+00, 0.2668900E+00, &
     & 0.2633600E+00, 0.2728900E+00, 0.2957900E+00, 0.2991700E+00, &
     & 0.3185500E+00, 0.3424700E+00, 0.3740600E+00, 0.5475800E+00, &
     & 0.4137480E+00, 0.4474722E+00, 0.4586968E+00, 0.4586968E+00 /
      data (ref_adm(24,iz,20,15),iz = 1,20) / &
     & 0.2399800E+00, 0.2399800E+00, 0.2386400E+00, 0.2729200E+00, &
     & 0.2623300E+00, 0.2516800E+00, 0.2839100E+00, 0.2829300E+00, &
     & 0.2682200E+00, 0.2832400E+00, 0.3093200E+00, 0.2939200E+00, &
     & 0.3207200E+00, 0.3437300E+00, 0.3461600E+00, 0.3826508E+00, &
     & 0.4096302E+00, 0.4419835E+00, 0.4528325E+00, 0.4528325E+00 /
      data (ref_adm(24,iz,21,15),iz = 1,20) / &
     & 0.2462800E+00, 0.2462800E+00, 0.2512700E+00, 0.2364200E+00, &
     & 0.2690700E+00, 0.2660200E+00, 0.2835800E+00, 0.2871500E+00, &
     & 0.2800500E+00, 0.2807500E+00, 0.3154400E+00, 0.3112400E+00, &
     & 0.3223500E+00, 0.3247300E+00, 0.3521000E+00, 0.3803362E+00, &
     & 0.4062492E+00, 0.4374502E+00, 0.4491322E+00, 0.4491322E+00 /
      data (ref_adm(24,iz,22,15),iz = 1,20) / &
     & 0.2554700E+00, 0.2554700E+00, 0.2579900E+00, 0.2621300E+00, &
     & 0.2681300E+00, 0.2495500E+00, 0.2777800E+00, 0.2647100E+00, &
     & 0.2761300E+00, 0.2876000E+00, 0.2948500E+00, 0.3078100E+00, &
     & 0.3358900E+00, 0.3316300E+00, 0.3508400E+00, 0.3296600E+00, &
     & 0.4319169E+00, 0.4632542E+00, 0.4769466E+00, 0.4769466E+00 /
      data (ref_adm(24,iz,23,15),iz = 1,20) / &
     & 0.2590800E+00, 0.2590800E+00, 0.2505300E+00, 0.2580800E+00, &
     & 0.2668800E+00, 0.2495400E+00, 0.2652000E+00, 0.2782600E+00, &
     & 0.2697100E+00, 0.3036300E+00, 0.2975400E+00, 0.3114000E+00, &
     & 0.3340600E+00, 0.3361100E+00, 0.3420600E+00, 0.3616900E+00, &
     & 0.3981200E+00, 0.4608963E+00, 0.4777788E+00, 0.4777788E+00 /
      data (ref_adm(24,iz,24,15),iz = 1,20) / &
     & 0.2441900E+00, 0.2441900E+00, 0.2419700E+00, 0.2437200E+00, &
     & 0.2553700E+00, 0.2577200E+00, 0.2630800E+00, 0.2743700E+00, &
     & 0.2849100E+00, 0.2918700E+00, 0.2986300E+00, 0.3087000E+00, &
     & 0.3186100E+00, 0.3288700E+00, 0.3246700E+00, 0.4080500E+00, &
     & 0.5024200E+00, 0.4613482E+00, 0.4820813E+00, 0.4820813E+00 /
      data (ref_adm(24,iz,25,15),iz = 1,20) / &
     & 0.2539000E+00, 0.2539000E+00, 0.2659100E+00, 0.2664000E+00, &
     & 0.2742700E+00, 0.2837700E+00, 0.3071700E+00, 0.3094700E+00, &
     & 0.3246800E+00, 0.3383800E+00, 0.3469300E+00, 0.3747700E+00, &
     & 0.3926600E+00, 0.4100100E+00, 0.3795200E+00, 0.4032100E+00, &
     & 0.4345900E+00, 0.4638084E+00, 0.4885663E+00, 0.4885663E+00 /
      data (ref_adm(24,iz,26,15),iz = 1,20) / &
     & 0.2648300E+00, 0.2648300E+00, 0.2634100E+00, 0.2634800E+00, &
     & 0.2668100E+00, 0.3064100E+00, 0.2751400E+00, 0.2916100E+00, &
     & 0.3042200E+00, 0.3226900E+00, 0.3424500E+00, 0.3613300E+00, &
     & 0.3733800E+00, 0.4080000E+00, 0.4041900E+00, 0.4106100E+00, &
     & 0.3977800E+00, 0.4874200E+00, 0.4996681E+00, 0.4996681E+00 /
      data (ref_adm(24,iz,27,15),iz = 1,20) / &
     & 0.2563400E+00, 0.2563400E+00, 0.2590700E+00, 0.2636400E+00, &
     & 0.2737500E+00, 0.2881600E+00, 0.2877400E+00, 0.2830500E+00, &
     & 0.2828000E+00, 0.3057600E+00, 0.3354500E+00, 0.3246600E+00, &
     & 0.3622400E+00, 0.4177600E+00, 0.3891400E+00, 0.4151200E+00, &
     & 0.4219500E+00, 0.4797800E+00, 0.4471000E+00, 0.4471000E+00 /
      data (ref_adm(24,iz,28,15),iz = 1,20) / &
     & 0.2566400E+00, 0.2566400E+00, 0.2530500E+00, 0.2441300E+00, &
     & 0.2498600E+00, 0.2885000E+00, 0.2994300E+00, 0.2985000E+00, &
     & 0.3039600E+00, 0.3209400E+00, 0.3471200E+00, 0.3362900E+00, &
     & 0.3645800E+00, 0.3891000E+00, 0.4221800E+00, 0.4312500E+00, &
     & 0.4432100E+00, 0.4737800E+00, 0.4330000E+00, 0.4330000E+00 /
      data (ref_adm(24,iz,29,15),iz = 1,20) / &
     & 0.2628800E+00, 0.2628800E+00, 0.2461000E+00, 0.2571100E+00, &
     & 0.2668900E+00, 0.2482000E+00, 0.2798200E+00, 0.3008300E+00, &
     & 0.3263300E+00, 0.3311700E+00, 0.3385800E+00, 0.3573100E+00, &
     & 0.3732300E+00, 0.4176400E+00, 0.4318900E+00, 0.4567800E+00, &
     & 0.4738700E+00, 0.5061600E+00, 0.4628800E+00, 0.4628800E+00 /
      data (ref_adm(24,iz,30,15),iz = 1,20) / &
     & 0.2449700E+00, 0.2449700E+00, 0.2522600E+00, 0.2581600E+00, &
     & 0.2663000E+00, 0.2692900E+00, 0.2769600E+00, 0.3124600E+00, &
     & 0.3239000E+00, 0.3319700E+00, 0.3538100E+00, 0.3700700E+00, &
     & 0.3763900E+00, 0.4382300E+00, 0.4429200E+00, 0.4571000E+00, &
     & 0.4958200E+00, 0.5255400E+00, 0.4281700E+00, 0.4281700E+00 /
      data (ref_adm(24,iz,31,15),iz = 1,20) / &
     & 0.2652400E+00, 0.2652400E+00, 0.2592900E+00, 0.2774800E+00, &
     & 0.2969200E+00, 0.2939600E+00, 0.3098200E+00, 0.3007800E+00, &
     & 0.3132600E+00, 0.3367300E+00, 0.3514100E+00, 0.3781400E+00, &
     & 0.3916300E+00, 0.4281400E+00, 0.4682200E+00, 0.5036800E+00, &
     & 0.5098300E+00, 0.5226800E+00, 0.4748000E+00, 0.4748000E+00 /
      data (ref_adm(24,iz,32,15),iz = 1,20) / &
     & 0.2538200E+00, 0.2538200E+00, 0.2605500E+00, 0.2837300E+00, &
     & 0.2733100E+00, 0.2864300E+00, 0.2926900E+00, 0.3203900E+00, &
     & 0.3382500E+00, 0.3409100E+00, 0.3807500E+00, 0.3939900E+00, &
     & 0.4220600E+00, 0.4433400E+00, 0.4678400E+00, 0.4935300E+00, &
     & 0.5486900E+00, 0.5629000E+00, 0.4680800E+00, 0.4680800E+00 /
      data (ref_adm(24,iz,33,15),iz = 1,20) / &
     & 0.2522800E+00, 0.2522800E+00, 0.2556900E+00, 0.2573000E+00, &
     & 0.2628500E+00, 0.2746100E+00, 0.2941200E+00, 0.3001600E+00, &
     & 0.3119900E+00, 0.3237200E+00, 0.3333400E+00, 0.3688400E+00, &
     & 0.3795400E+00, 0.4319700E+00, 0.4608900E+00, 0.4919300E+00, &
     & 0.5331500E+00, 0.5606800E+00, 0.5102600E+00, 0.5102600E+00 /
      data (ref_adm(24,iz,34,15),iz = 1,20) / &
     & 0.2599400E+00, 0.2599400E+00, 0.2664400E+00, 0.2623800E+00, &
     & 0.2817800E+00, 0.2862000E+00, 0.3099200E+00, 0.3204500E+00, &
     & 0.3256200E+00, 0.3366900E+00, 0.3527900E+00, 0.3757500E+00, &
     & 0.4395000E+00, 0.4700700E+00, 0.5144500E+00, 0.5341300E+00, &
     & 0.5856700E+00, 0.6032900E+00, 0.5237700E+00, 0.5237700E+00 /
      data (ref_adm(24,iz,35,15),iz = 1,20) / &
     & 0.2584100E+00, 0.2584100E+00, 0.2686900E+00, 0.2723400E+00, &
     & 0.2765300E+00, 0.3025500E+00, 0.2908100E+00, 0.3191000E+00, &
     & 0.3215400E+00, 0.3407300E+00, 0.3666800E+00, 0.4081400E+00, &
     & 0.4458000E+00, 0.4808300E+00, 0.5395700E+00, 0.5668400E+00, &
     & 0.5947100E+00, 0.6259200E+00, 0.5505800E+00, 0.5505800E+00 /
      data (ref_adm(24,iz,36,15),iz = 1,20) / &
     & 0.2553100E+00, 0.2553100E+00, 0.2704800E+00, 0.2633900E+00, &
     & 0.2680500E+00, 0.2882700E+00, 0.3059000E+00, 0.2948300E+00, &
     & 0.3137500E+00, 0.3524000E+00, 0.3940400E+00, 0.4168600E+00, &
     & 0.4518700E+00, 0.4851000E+00, 0.5171700E+00, 0.5688100E+00, &
     & 0.6217100E+00, 0.6332500E+00, 0.5468600E+00, 0.5468600E+00 /
      data (ref_adm(24,iz,37,15),iz = 1,20) / &
     & 0.2541500E+00, 0.2541500E+00, 0.2619500E+00, 0.2533100E+00, &
     & 0.2875600E+00, 0.2851000E+00, 0.2830800E+00, 0.3256100E+00, &
     & 0.3251400E+00, 0.3553100E+00, 0.3872100E+00, 0.4244400E+00, &
     & 0.4610900E+00, 0.5052200E+00, 0.5556800E+00, 0.5840200E+00, &
     & 0.6369400E+00, 0.6178900E+00, 0.5603800E+00, 0.5603800E+00 /
      data (ref_adm(24,iz,38,15),iz = 1,20) / &
     & 0.2541500E+00, 0.2541500E+00, 0.2619500E+00, 0.2533100E+00, &
     & 0.2875600E+00, 0.2851000E+00, 0.2830800E+00, 0.3256100E+00, &
     & 0.3251400E+00, 0.3553100E+00, 0.3872100E+00, 0.4244400E+00, &
     & 0.4610900E+00, 0.5052200E+00, 0.5556800E+00, 0.5840200E+00, &
     & 0.6369400E+00, 0.6178900E+00, 0.5603800E+00, 0.5603800E+00 /
! Solar Zenith Angle 75.0 Albedo  0.3452832E+00
      data (ref_adm(24,iz, 1,16),iz = 1,20) / &
     & 0.2844900E+00, 0.2844900E+00, 0.2489000E+00, 0.2464300E+00, &
     & 0.2498400E+00, 0.2715800E+00, 0.3155600E+00, 0.2991100E+00, &
     & 0.2781000E+00, 0.3116100E+00, 0.3339800E+00, 0.3570100E+00, &
     & 0.3923100E+00, 0.4280034E+00, 0.4571285E+00, 0.4819590E+00, &
     & 0.4949467E+00, 0.4928173E+00, 0.4360563E+00, 0.4360563E+00 /
      data (ref_adm(24,iz, 2,16),iz = 1,20) / &
     & 0.2844900E+00, 0.2844900E+00, 0.2489000E+00, 0.2464300E+00, &
     & 0.2498400E+00, 0.2715800E+00, 0.3155600E+00, 0.2991100E+00, &
     & 0.2781000E+00, 0.3116100E+00, 0.3339800E+00, 0.3570100E+00, &
     & 0.3923100E+00, 0.4280034E+00, 0.4571285E+00, 0.4819590E+00, &
     & 0.4949467E+00, 0.4928173E+00, 0.4360563E+00, 0.4360563E+00 /
      data (ref_adm(24,iz, 3,16),iz = 1,20) / &
     & 0.2691800E+00, 0.2691800E+00, 0.2625600E+00, 0.2650400E+00, &
     & 0.2554200E+00, 0.2937100E+00, 0.2713700E+00, 0.2963900E+00, &
     & 0.3030900E+00, 0.3322900E+00, 0.3324500E+00, 0.3719200E+00, &
     & 0.4069500E+00, 0.4245500E+00, 0.4565270E+00, 0.4814994E+00, &
     & 0.4943996E+00, 0.4914799E+00, 0.4837393E-01, 0.4837393E-01 /
      data (ref_adm(24,iz, 4,16),iz = 1,20) / &
     & 0.2435800E+00, 0.2435800E+00, 0.2519900E+00, 0.2507400E+00, &
     & 0.2584800E+00, 0.2642100E+00, 0.2793100E+00, 0.2867400E+00, &
     & 0.3047500E+00, 0.3355100E+00, 0.3641400E+00, 0.4027200E+00, &
     & 0.4036600E+00, 0.3520900E+00, 0.4553129E+00, 0.4801305E+00, &
     & 0.4920635E+00, 0.4877119E+00, 0.4299483E+00, 0.4299483E+00 /
      data (ref_adm(24,iz, 5,16),iz = 1,20) / &
     & 0.2565800E+00, 0.2565800E+00, 0.2333200E+00, 0.2380800E+00, &
     & 0.2563200E+00, 0.2529100E+00, 0.2729700E+00, 0.2904700E+00, &
     & 0.3033000E+00, 0.3105700E+00, 0.3505300E+00, 0.3688500E+00, &
     & 0.3953100E+00, 0.4977100E+00, 0.4527994E+00, 0.4775876E+00, &
     & 0.4895530E+00, 0.4834060E+00, 0.4245307E+00, 0.4245307E+00 /
      data (ref_adm(24,iz, 6,16),iz = 1,20) / &
     & 0.2421100E+00, 0.2421100E+00, 0.2602400E+00, 0.2459000E+00, &
     & 0.2549000E+00, 0.2606900E+00, 0.2676100E+00, 0.2852800E+00, &
     & 0.2957400E+00, 0.3099600E+00, 0.3453400E+00, 0.3690600E+00, &
     & 0.4136400E+00, 0.4852400E+00, 0.5757900E+00, 0.6917900E+00, &
     & 0.8699900E+00, 0.1063900E+01, 0.4182685E+00, 0.4182685E+00 /
      data (ref_adm(24,iz, 7,16),iz = 1,20) / &
     & 0.2585500E+00, 0.2585500E+00, 0.2608600E+00, 0.2554300E+00, &
     & 0.2502900E+00, 0.2593700E+00, 0.2878800E+00, 0.2978000E+00, &
     & 0.2815400E+00, 0.3366400E+00, 0.3333000E+00, 0.3574700E+00, &
     & 0.3845300E+00, 0.4384000E+00, 0.5086200E+00, 0.5936500E+00, &
     & 0.7611300E+00, 0.8142000E+00, 0.8818000E+00, 0.8818000E+00 /
      data (ref_adm(24,iz, 8,16),iz = 1,20) / &
     & 0.2303100E+00, 0.2303100E+00, 0.2376600E+00, 0.2542400E+00, &
     & 0.2440600E+00, 0.2646900E+00, 0.2980800E+00, 0.2702800E+00, &
     & 0.2890300E+00, 0.3195700E+00, 0.3196300E+00, 0.3485300E+00, &
     & 0.3703900E+00, 0.4069900E+00, 0.4435800E+00, 0.5534300E+00, &
     & 0.6959100E+00, 0.7503800E+00, 0.8251600E+00, 0.8251600E+00 /
      data (ref_adm(24,iz, 9,16),iz = 1,20) / &
     & 0.2420400E+00, 0.2420400E+00, 0.2375200E+00, 0.2566800E+00, &
     & 0.2416700E+00, 0.2770800E+00, 0.2475000E+00, 0.2651500E+00, &
     & 0.2973200E+00, 0.3114100E+00, 0.3328100E+00, 0.3373100E+00, &
     & 0.3657600E+00, 0.4042300E+00, 0.4825500E+00, 0.5799400E+00, &
     & 0.6986100E+00, 0.7066500E+00, 0.3986915E+00, 0.3986915E+00 /
      data (ref_adm(24,iz,10,16),iz = 1,20) / &
     & 0.2502100E+00, 0.2502100E+00, 0.2496800E+00, 0.2480300E+00, &
     & 0.2686500E+00, 0.2592500E+00, 0.2598600E+00, 0.2847400E+00, &
     & 0.2948100E+00, 0.3169500E+00, 0.2957800E+00, 0.3350600E+00, &
     & 0.3585300E+00, 0.3964000E+00, 0.4432800E+00, 0.5636700E+00, &
     & 0.6185600E+00, 0.6872100E+00, 0.4754000E+00, 0.4754000E+00 /
      data (ref_adm(24,iz,11,16),iz = 1,20) / &
     & 0.2467500E+00, 0.2467500E+00, 0.2546400E+00, 0.2586700E+00, &
     & 0.2326600E+00, 0.2406100E+00, 0.2525000E+00, 0.2622700E+00, &
     & 0.3021800E+00, 0.2810300E+00, 0.3009600E+00, 0.3133400E+00, &
     & 0.3536900E+00, 0.3803000E+00, 0.4411900E+00, 0.4601100E+00, &
     & 0.5424400E+00, 0.6030800E+00, 0.4221400E+00, 0.4221400E+00 /
      data (ref_adm(24,iz,12,16),iz = 1,20) / &
     & 0.2618400E+00, 0.2618400E+00, 0.2536900E+00, 0.2552800E+00, &
     & 0.2570500E+00, 0.2362900E+00, 0.2448300E+00, 0.2836100E+00, &
     & 0.2634800E+00, 0.2796400E+00, 0.2821000E+00, 0.2817100E+00, &
     & 0.3397000E+00, 0.3690100E+00, 0.4002400E+00, 0.4393700E+00, &
     & 0.5099500E+00, 0.5560100E+00, 0.3820410E+00, 0.3820410E+00 /
      data (ref_adm(24,iz,13,16),iz = 1,20) / &
     & 0.2588100E+00, 0.2588100E+00, 0.2522400E+00, 0.2566600E+00, &
     & 0.2611600E+00, 0.2440700E+00, 0.2747100E+00, 0.2670300E+00, &
     & 0.2632800E+00, 0.2931400E+00, 0.3153500E+00, 0.2979100E+00, &
     & 0.3316600E+00, 0.3521200E+00, 0.3854400E+00, 0.4405900E+00, &
     & 0.4887800E+00, 0.5039400E+00, 0.3765275E+00, 0.3765275E+00 /
      data (ref_adm(24,iz,14,16),iz = 1,20) / &
     & 0.2587900E+00, 0.2587900E+00, 0.2671300E+00, 0.2668600E+00, &
     & 0.2645200E+00, 0.2577600E+00, 0.2574500E+00, 0.2561300E+00, &
     & 0.2805300E+00, 0.3004900E+00, 0.3084400E+00, 0.3092700E+00, &
     & 0.3141300E+00, 0.3647500E+00, 0.3845500E+00, 0.4319400E+00, &
     & 0.5011500E+00, 0.5285000E+00, 0.3694972E+00, 0.3694972E+00 /
      data (ref_adm(24,iz,15,16),iz = 1,20) / &
     & 0.2505100E+00, 0.2505100E+00, 0.2490800E+00, 0.2546600E+00, &
     & 0.2532600E+00, 0.2548100E+00, 0.2591800E+00, 0.2659200E+00, &
     & 0.2717200E+00, 0.2806500E+00, 0.2892000E+00, 0.2985600E+00, &
     & 0.3208700E+00, 0.3322600E+00, 0.3868100E+00, 0.4258700E+00, &
     & 0.4495200E+00, 0.4375600E+00, 0.3613663E+00, 0.3613663E+00 /
      data (ref_adm(24,iz,16,16),iz = 1,20) / &
     & 0.2523500E+00, 0.2523500E+00, 0.2449800E+00, 0.2511200E+00, &
     & 0.2455500E+00, 0.2587400E+00, 0.2601600E+00, 0.2667700E+00, &
     & 0.2714300E+00, 0.2754200E+00, 0.2747500E+00, 0.2751000E+00, &
     & 0.2997500E+00, 0.3145200E+00, 0.3838000E+00, 0.3986700E+00, &
     & 0.4254300E+00, 0.4095764E+00, 0.3540444E+00, 0.3540444E+00 /
      data (ref_adm(24,iz,17,16),iz = 1,20) / &
     & 0.2498900E+00, 0.2498900E+00, 0.2389200E+00, 0.2368800E+00, &
     & 0.2359300E+00, 0.2427000E+00, 0.2486400E+00, 0.2567700E+00, &
     & 0.3045300E+00, 0.2959900E+00, 0.2881200E+00, 0.3037600E+00, &
     & 0.3075200E+00, 0.3594700E+00, 0.3503600E+00, 0.4090600E+00, &
     & 0.4078094E+00, 0.3998875E+00, 0.3470709E+00, 0.3470709E+00 /
      data (ref_adm(24,iz,18,16),iz = 1,20) / &
     & 0.2470500E+00, 0.2470500E+00, 0.2454900E+00, 0.2618000E+00, &
     & 0.2363600E+00, 0.2659500E+00, 0.2500900E+00, 0.2847200E+00, &
     & 0.3077000E+00, 0.3153500E+00, 0.2649700E+00, 0.2989400E+00, &
     & 0.2924900E+00, 0.3420900E+00, 0.3645500E+00, 0.3961600E+00, &
     & 0.4438928E+00, 0.5033858E+00, 0.5532746E+00, 0.5532746E+00 /
      data (ref_adm(24,iz,19,16),iz = 1,20) / &
     & 0.2406300E+00, 0.2406300E+00, 0.2483400E+00, 0.2386600E+00, &
     & 0.2368200E+00, 0.2564500E+00, 0.2553500E+00, 0.2549400E+00, &
     & 0.2745400E+00, 0.2842700E+00, 0.2579200E+00, 0.3186800E+00, &
     & 0.3167100E+00, 0.3456700E+00, 0.3683300E+00, 0.3602500E+00, &
     & 0.4384566E+00, 0.4941166E+00, 0.5401683E+00, 0.5401683E+00 /
      data (ref_adm(24,iz,20,16),iz = 1,20) / &
     & 0.2389200E+00, 0.2389200E+00, 0.2363600E+00, 0.2520900E+00, &
     & 0.2477700E+00, 0.2735000E+00, 0.2526900E+00, 0.2568600E+00, &
     & 0.2646000E+00, 0.2906100E+00, 0.2854100E+00, 0.3110800E+00, &
     & 0.3230400E+00, 0.3417900E+00, 0.3585400E+00, 0.3973055E+00, &
     & 0.4352281E+00, 0.4887124E+00, 0.5326762E+00, 0.5326762E+00 /
      data (ref_adm(24,iz,21,16),iz = 1,20) / &
     & 0.2380500E+00, 0.2380500E+00, 0.2474100E+00, 0.2414500E+00, &
     & 0.2503800E+00, 0.2784800E+00, 0.2583400E+00, 0.2733300E+00, &
     & 0.2796100E+00, 0.2768700E+00, 0.3138500E+00, 0.3136300E+00, &
     & 0.3274200E+00, 0.3584800E+00, 0.3765100E+00, 0.3962881E+00, &
     & 0.4331729E+00, 0.4847651E+00, 0.5283766E+00, 0.5283766E+00 /
      data (ref_adm(24,iz,22,16),iz = 1,20) / &
     & 0.2541400E+00, 0.2541400E+00, 0.2389700E+00, 0.2272800E+00, &
     & 0.2550400E+00, 0.2474300E+00, 0.2562800E+00, 0.2638100E+00, &
     & 0.2865400E+00, 0.2847300E+00, 0.3143800E+00, 0.2963400E+00, &
     & 0.3507600E+00, 0.3524600E+00, 0.3491700E+00, 0.3530800E+00, &
     & 0.4730088E+00, 0.5234191E+00, 0.5678164E+00, 0.5678164E+00 /
      data (ref_adm(24,iz,23,16),iz = 1,20) / &
     & 0.2531800E+00, 0.2531800E+00, 0.2445700E+00, 0.2468000E+00, &
     & 0.2465900E+00, 0.2436600E+00, 0.2521300E+00, 0.2927300E+00, &
     & 0.2936600E+00, 0.2909500E+00, 0.3181300E+00, 0.3286700E+00, &
     & 0.3295000E+00, 0.3987700E+00, 0.3798200E+00, 0.3929100E+00, &
     & 0.4712834E+00, 0.5208331E+00, 0.5694185E+00, 0.5694185E+00 /
      data (ref_adm(24,iz,24,16),iz = 1,20) / &
     & 0.2502100E+00, 0.2502100E+00, 0.2527900E+00, 0.2516300E+00, &
     & 0.2563500E+00, 0.2624200E+00, 0.2676000E+00, 0.2785800E+00, &
     & 0.2902800E+00, 0.3017000E+00, 0.3133500E+00, 0.3142000E+00, &
     & 0.3298200E+00, 0.3567400E+00, 0.3702300E+00, 0.3938100E+00, &
     & 0.6003700E+00, 0.5218452E+00, 0.5758296E+00, 0.5758296E+00 /
      data (ref_adm(24,iz,25,16),iz = 1,20) / &
     & 0.2532300E+00, 0.2532300E+00, 0.2640000E+00, 0.2562200E+00, &
     & 0.2653700E+00, 0.2723200E+00, 0.2715700E+00, 0.2867500E+00, &
     & 0.2970700E+00, 0.3221400E+00, 0.3291700E+00, 0.3466100E+00, &
     & 0.3595400E+00, 0.3862900E+00, 0.3996700E+00, 0.4384500E+00, &
     & 0.5264300E+00, 0.5253961E+00, 0.5852476E+00, 0.5852476E+00 /
      data (ref_adm(24,iz,26,16),iz = 1,20) / &
     & 0.2641500E+00, 0.2641500E+00, 0.2550700E+00, 0.2810900E+00, &
     & 0.2701700E+00, 0.2652000E+00, 0.2886800E+00, 0.2719400E+00, &
     & 0.2610800E+00, 0.3014200E+00, 0.3385800E+00, 0.3450000E+00, &
     & 0.3735100E+00, 0.3937500E+00, 0.3927500E+00, 0.4472300E+00, &
     & 0.4940500E+00, 0.5742800E+00, 0.6008552E+00, 0.6008552E+00 /
      data (ref_adm(24,iz,27,16),iz = 1,20) / &
     & 0.2553600E+00, 0.2553600E+00, 0.2772200E+00, 0.2575800E+00, &
     & 0.2912300E+00, 0.2739900E+00, 0.3019500E+00, 0.2727900E+00, &
     & 0.2982600E+00, 0.3063300E+00, 0.3501800E+00, 0.3610300E+00, &
     & 0.3726400E+00, 0.3991300E+00, 0.4143200E+00, 0.4524500E+00, &
     & 0.5194600E+00, 0.5244000E+00, 0.6203935E+00, 0.6203935E+00 /
      data (ref_adm(24,iz,28,16),iz = 1,20) / &
     & 0.2564600E+00, 0.2564600E+00, 0.2551500E+00, 0.2654400E+00, &
     & 0.2430200E+00, 0.2780600E+00, 0.2826500E+00, 0.2920100E+00, &
     & 0.3309000E+00, 0.3240500E+00, 0.3406300E+00, 0.3633600E+00, &
     & 0.3811400E+00, 0.4021200E+00, 0.4139000E+00, 0.4970900E+00, &
     & 0.5105200E+00, 0.5514800E+00, 0.5194700E+00, 0.5194700E+00 /
      data (ref_adm(24,iz,29,16),iz = 1,20) / &
     & 0.2659200E+00, 0.2659200E+00, 0.2583400E+00, 0.2597600E+00, &
     & 0.2751700E+00, 0.2724000E+00, 0.2821400E+00, 0.2900200E+00, &
     & 0.3098200E+00, 0.3195100E+00, 0.3444700E+00, 0.3879800E+00, &
     & 0.3905300E+00, 0.4019700E+00, 0.4369900E+00, 0.4865600E+00, &
     & 0.5285900E+00, 0.5662000E+00, 0.5177800E+00, 0.5177800E+00 /
      data (ref_adm(24,iz,30,16),iz = 1,20) / &
     & 0.2470000E+00, 0.2470000E+00, 0.2501300E+00, 0.2790300E+00, &
     & 0.2715100E+00, 0.2992000E+00, 0.2923600E+00, 0.3237600E+00, &
     & 0.3152500E+00, 0.3399800E+00, 0.3696200E+00, 0.3820900E+00, &
     & 0.3855800E+00, 0.4059800E+00, 0.4475500E+00, 0.5005300E+00, &
     & 0.5491900E+00, 0.5958600E+00, 0.5677900E+00, 0.5677900E+00 /
      data (ref_adm(24,iz,31,16),iz = 1,20) / &
     & 0.2518800E+00, 0.2518800E+00, 0.2612300E+00, 0.2668900E+00, &
     & 0.2722300E+00, 0.2960400E+00, 0.3043800E+00, 0.3143700E+00, &
     & 0.3271700E+00, 0.3319000E+00, 0.3560500E+00, 0.3836200E+00, &
     & 0.4042400E+00, 0.4536700E+00, 0.4634200E+00, 0.5117600E+00, &
     & 0.5658600E+00, 0.5989600E+00, 0.5697800E+00, 0.5697800E+00 /
      data (ref_adm(24,iz,32,16),iz = 1,20) / &
     & 0.2599200E+00, 0.2599200E+00, 0.2523600E+00, 0.2665700E+00, &
     & 0.2973700E+00, 0.3008600E+00, 0.3078300E+00, 0.3140900E+00, &
     & 0.3375800E+00, 0.3557000E+00, 0.3677400E+00, 0.4057200E+00, &
     & 0.4251500E+00, 0.4447400E+00, 0.4871400E+00, 0.5416200E+00, &
     & 0.6236400E+00, 0.6350700E+00, 0.6440700E+00, 0.6440700E+00 /
      data (ref_adm(24,iz,33,16),iz = 1,20) / &
     & 0.2486600E+00, 0.2486600E+00, 0.2606000E+00, 0.2506000E+00, &
     & 0.2605700E+00, 0.2732900E+00, 0.2938400E+00, 0.3224200E+00, &
     & 0.3289600E+00, 0.3382500E+00, 0.3690300E+00, 0.3903200E+00, &
     & 0.4188200E+00, 0.4485000E+00, 0.4789300E+00, 0.5438000E+00, &
     & 0.6119500E+00, 0.6617900E+00, 0.6081100E+00, 0.6081100E+00 /
      data (ref_adm(24,iz,34,16),iz = 1,20) / &
     & 0.2608400E+00, 0.2608400E+00, 0.2503600E+00, 0.2484600E+00, &
     & 0.2818300E+00, 0.2926500E+00, 0.2796200E+00, 0.3229800E+00, &
     & 0.3409700E+00, 0.3392000E+00, 0.3600500E+00, 0.3958300E+00, &
     & 0.4344900E+00, 0.4791000E+00, 0.5081300E+00, 0.5735900E+00, &
     & 0.6494400E+00, 0.6947500E+00, 0.6512100E+00, 0.6512100E+00 /
      data (ref_adm(24,iz,35,16),iz = 1,20) / &
     & 0.2427600E+00, 0.2427600E+00, 0.2419800E+00, 0.2806200E+00, &
     & 0.2697400E+00, 0.2733500E+00, 0.2993800E+00, 0.3179600E+00, &
     & 0.3275100E+00, 0.3488900E+00, 0.3381700E+00, 0.3920600E+00, &
     & 0.4243500E+00, 0.4831600E+00, 0.5211700E+00, 0.5902200E+00, &
     & 0.6614300E+00, 0.7034300E+00, 0.6297500E+00, 0.6297500E+00 /
      data (ref_adm(24,iz,36,16),iz = 1,20) / &
     & 0.2427500E+00, 0.2427500E+00, 0.2513500E+00, 0.2836700E+00, &
     & 0.2750200E+00, 0.2917200E+00, 0.3054100E+00, 0.3195600E+00, &
     & 0.3416000E+00, 0.3477700E+00, 0.3695600E+00, 0.4101500E+00, &
     & 0.4441700E+00, 0.5044700E+00, 0.5460300E+00, 0.6263900E+00, &
     & 0.6943600E+00, 0.7527500E+00, 0.6306400E+00, 0.6306400E+00 /
      data (ref_adm(24,iz,37,16),iz = 1,20) / &
     & 0.2744600E+00, 0.2744600E+00, 0.2734700E+00, 0.2814500E+00, &
     & 0.2885500E+00, 0.3247300E+00, 0.3269800E+00, 0.3118400E+00, &
     & 0.3391700E+00, 0.3399000E+00, 0.3885000E+00, 0.4331500E+00, &
     & 0.4404900E+00, 0.5160100E+00, 0.5766900E+00, 0.6456100E+00, &
     & 0.7770100E+00, 0.7598400E+00, 0.7883626E+00, 0.7883626E+00 /
      data (ref_adm(24,iz,38,16),iz = 1,20) / &
     & 0.2744600E+00, 0.2744600E+00, 0.2734700E+00, 0.2814500E+00, &
     & 0.2885500E+00, 0.3247300E+00, 0.3269800E+00, 0.3118400E+00, &
     & 0.3391700E+00, 0.3399000E+00, 0.3885000E+00, 0.4331500E+00, &
     & 0.4404900E+00, 0.5160100E+00, 0.5766900E+00, 0.6456100E+00, &
     & 0.7770100E+00, 0.7598400E+00, 0.7883626E+00, 0.7883626E+00 /
! Solar Zenith Angle 80.0 Albedo  0.3763417E+00
      data (ref_adm(24,iz, 1,17),iz = 1,20) / &
     & 0.2514200E+00, 0.2514200E+00, 0.2301500E+00, 0.2978600E+00, &
     & 0.2791600E+00, 0.2925600E+00, 0.3055200E+00, 0.3100200E+00, &
     & 0.2880800E+00, 0.3576400E+00, 0.4201800E+00, 0.4367300E+00, &
     & 0.4643636E+00, 0.5469908E+00, 0.7430567E+00, 0.1288411E+01, &
     & 0.2428187E+01, 0.1783716E+01, 0.2516857E+01, 0.2516857E+01 /
      data (ref_adm(24,iz, 2,17),iz = 1,20) / &
     & 0.2514200E+00, 0.2514200E+00, 0.2301500E+00, 0.2978600E+00, &
     & 0.2791600E+00, 0.2925600E+00, 0.3055200E+00, 0.3100200E+00, &
     & 0.2880800E+00, 0.3576400E+00, 0.4201800E+00, 0.4367300E+00, &
     & 0.4643636E+00, 0.5469908E+00, 0.7430567E+00, 0.1288411E+01, &
     & 0.2428187E+01, 0.1783716E+01, 0.2516857E+01, 0.2516857E+01 /
      data (ref_adm(24,iz, 3,17),iz = 1,20) / &
     & 0.2496600E+00, 0.2496600E+00, 0.2948200E+00, 0.2426600E+00, &
     & 0.2563800E+00, 0.2531800E+00, 0.2734600E+00, 0.2542000E+00, &
     & 0.3003800E+00, 0.3420600E+00, 0.3829800E+00, 0.4258400E+00, &
     & 0.4624635E+00, 0.5395645E+00, 0.7218325E+00, 0.1201582E+01, &
     & 0.2419041E+01, 0.1956638E+01, 0.4415444E+00, 0.4415444E+00 /
      data (ref_adm(24,iz, 4,17),iz = 1,20) / &
     & 0.2131400E+00, 0.2131400E+00, 0.2491700E+00, 0.2743000E+00, &
     & 0.2420200E+00, 0.2499500E+00, 0.2431600E+00, 0.3083500E+00, &
     & 0.2607300E+00, 0.3465400E+00, 0.3637500E+00, 0.4348800E+00, &
     & 0.4594981E+00, 0.5255284E+00, 0.6838028E+00, 0.1053198E+01, &
     & 0.1989507E+01, 0.2730203E+01, 0.2316263E+01, 0.2316263E+01 /
      data (ref_adm(24,iz, 5,17),iz = 1,20) / &
     & 0.2347500E+00, 0.2347500E+00, 0.2169600E+00, 0.2536800E+00, &
     & 0.2258200E+00, 0.2676700E+00, 0.2906400E+00, 0.3048900E+00, &
     & 0.3161800E+00, 0.3377700E+00, 0.3772300E+00, 0.4395200E+00, &
     & 0.4562054E+00, 0.5103053E+00, 0.6375935E+00, 0.9084632E+00, &
     & 0.1466272E+01, 0.3197022E+01, 0.3573555E+01, 0.3573555E+01 /
      data (ref_adm(24,iz, 6,17),iz = 1,20) / &
     & 0.2260900E+00, 0.2260900E+00, 0.2330500E+00, 0.2207400E+00, &
     & 0.2442600E+00, 0.2535800E+00, 0.2576400E+00, 0.2695600E+00, &
     & 0.3093100E+00, 0.3210900E+00, 0.3618800E+00, 0.4034700E+00, &
     & 0.4464000E+00, 0.5450300E+00, 0.6154300E+00, 0.7940200E+00, &
     & 0.1027600E+01, 0.1181200E+01, 0.3688796E+01, 0.3688796E+01 /
      data (ref_adm(24,iz, 7,17),iz = 1,20) / &
     & 0.2501800E+00, 0.2501800E+00, 0.2149600E+00, 0.2228900E+00, &
     & 0.2379200E+00, 0.2181000E+00, 0.2413900E+00, 0.2552000E+00, &
     & 0.2690000E+00, 0.2869600E+00, 0.3067100E+00, 0.3887900E+00, &
     & 0.4414700E+00, 0.5379700E+00, 0.5785200E+00, 0.7065000E+00, &
     & 0.1013200E+01, 0.1143500E+01, 0.2243653E+01, 0.2243653E+01 /
      data (ref_adm(24,iz, 8,17),iz = 1,20) / &
     & 0.2227200E+00, 0.2227200E+00, 0.2415300E+00, 0.2156800E+00, &
     & 0.2462900E+00, 0.2296700E+00, 0.2951200E+00, 0.3020900E+00, &
     & 0.3324200E+00, 0.3051400E+00, 0.3728700E+00, 0.3847800E+00, &
     & 0.4439500E+00, 0.5220900E+00, 0.5764000E+00, 0.6808300E+00, &
     & 0.9339200E+00, 0.9785800E+00, 0.9462200E+00, 0.9462200E+00 /
      data (ref_adm(24,iz, 9,17),iz = 1,20) / &
     & 0.2159200E+00, 0.2159200E+00, 0.2594600E+00, 0.2342500E+00, &
     & 0.2632300E+00, 0.2510600E+00, 0.2428100E+00, 0.2643800E+00, &
     & 0.2754700E+00, 0.3378100E+00, 0.3278500E+00, 0.3617400E+00, &
     & 0.4303600E+00, 0.5068600E+00, 0.5225200E+00, 0.6630600E+00, &
     & 0.8063900E+00, 0.8723000E+00, 0.1398793E+01, 0.1398793E+01 /
      data (ref_adm(24,iz,10,17),iz = 1,20) / &
     & 0.2442300E+00, 0.2442300E+00, 0.2416600E+00, 0.2311200E+00, &
     & 0.2438600E+00, 0.2646300E+00, 0.2484500E+00, 0.2522200E+00, &
     & 0.3243000E+00, 0.2917100E+00, 0.3233300E+00, 0.3573600E+00, &
     & 0.4042400E+00, 0.4386500E+00, 0.5125800E+00, 0.5138300E+00, &
     & 0.7412700E+00, 0.7355300E+00, 0.1296498E+01, 0.1296498E+01 /
      data (ref_adm(24,iz,11,17),iz = 1,20) / &
     & 0.2288700E+00, 0.2288700E+00, 0.2748700E+00, 0.2653900E+00, &
     & 0.2533100E+00, 0.2485400E+00, 0.2396700E+00, 0.2497500E+00, &
     & 0.2552000E+00, 0.2660100E+00, 0.3048100E+00, 0.3488200E+00, &
     & 0.3373700E+00, 0.4359200E+00, 0.5029500E+00, 0.5199400E+00, &
     & 0.6159600E+00, 0.6695100E+00, 0.1206110E+01, 0.1206110E+01 /
      data (ref_adm(24,iz,12,17),iz = 1,20) / &
     & 0.2391400E+00, 0.2391400E+00, 0.2580100E+00, 0.2637800E+00, &
     & 0.2276800E+00, 0.2350700E+00, 0.2647100E+00, 0.2582300E+00, &
     & 0.2691000E+00, 0.3120300E+00, 0.2947500E+00, 0.3422700E+00, &
     & 0.3817000E+00, 0.3691000E+00, 0.4443100E+00, 0.5473700E+00, &
     & 0.6458600E+00, 0.6881600E+00, 0.1100217E+01, 0.1100217E+01 /
      data (ref_adm(24,iz,13,17),iz = 1,20) / &
     & 0.2558300E+00, 0.2558300E+00, 0.2861100E+00, 0.1905400E+00, &
     & 0.2674100E+00, 0.2222200E+00, 0.2437700E+00, 0.2656300E+00, &
     & 0.3047500E+00, 0.2982300E+00, 0.3275300E+00, 0.3262600E+00, &
     & 0.3434100E+00, 0.2878400E+00, 0.4105000E+00, 0.5504400E+00, &
     & 0.4707500E+00, 0.6711400E+00, 0.1032106E+01, 0.1032106E+01 /
      data (ref_adm(24,iz,14,17),iz = 1,20) / &
     & 0.2524600E+00, 0.2524600E+00, 0.2795700E+00, 0.2546100E+00, &
     & 0.2614100E+00, 0.2677100E+00, 0.2316700E+00, 0.2754400E+00, &
     & 0.2814300E+00, 0.2933800E+00, 0.3033700E+00, 0.2984200E+00, &
     & 0.3175700E+00, 0.3911600E+00, 0.4039900E+00, 0.5099300E+00, &
     & 0.5069100E+00, 0.7575569E+00, 0.9848840E+00, 0.9848840E+00 /
      data (ref_adm(24,iz,15,17),iz = 1,20) / &
     & 0.2447000E+00, 0.2447000E+00, 0.2374600E+00, 0.2443300E+00, &
     & 0.2416200E+00, 0.2494800E+00, 0.2485500E+00, 0.2722200E+00, &
     & 0.2817800E+00, 0.2817600E+00, 0.2917300E+00, 0.3054100E+00, &
     & 0.3087500E+00, 0.3409800E+00, 0.3571300E+00, 0.4613600E+00, &
     & 0.5083600E+00, 0.7354915E+00, 0.9477776E+00, 0.9477776E+00 /
      data (ref_adm(24,iz,16,17),iz = 1,20) / &
     & 0.2423900E+00, 0.2423900E+00, 0.2469400E+00, 0.2571800E+00, &
     & 0.2552800E+00, 0.2601900E+00, 0.2663600E+00, 0.2776100E+00, &
     & 0.2901000E+00, 0.2684200E+00, 0.2879000E+00, 0.2887900E+00, &
     & 0.3285000E+00, 0.3339000E+00, 0.3788100E+00, 0.4213100E+00, &
     & 0.4498300E+00, 0.7141612E+00, 0.9158844E+00, 0.9158844E+00 /
      data (ref_adm(24,iz,17,17),iz = 1,20) / &
     & 0.2237800E+00, 0.2237800E+00, 0.2072900E+00, 0.2260300E+00, &
     & 0.2512800E+00, 0.2527700E+00, 0.2439100E+00, 0.3212000E+00, &
     & 0.3157500E+00, 0.3307500E+00, 0.2712700E+00, 0.3266800E+00, &
     & 0.3091700E+00, 0.3194900E+00, 0.3378700E+00, 0.3902200E+00, &
     & 0.5567392E+00, 0.6901236E+00, 0.8798779E+00, 0.8798779E+00 /
      data (ref_adm(24,iz,18,17),iz = 1,20) / &
     & 0.2418300E+00, 0.2418300E+00, 0.2126800E+00, 0.2263900E+00, &
     & 0.2829800E+00, 0.2407700E+00, 0.2615600E+00, 0.2570500E+00, &
     & 0.3041200E+00, 0.2806700E+00, 0.2893700E+00, 0.3003300E+00, &
     & 0.3041300E+00, 0.3571800E+00, 0.3729000E+00, 0.6058800E+00, &
     & 0.4630047E+00, 0.5348668E+00, 0.6065657E+00, 0.6065657E+00 /
      data (ref_adm(24,iz,19,17),iz = 1,20) / &
     & 0.2184700E+00, 0.2184700E+00, 0.2202400E+00, 0.2402100E+00, &
     & 0.2393200E+00, 0.2490300E+00, 0.2851900E+00, 0.2548000E+00, &
     & 0.2839000E+00, 0.2783200E+00, 0.2975400E+00, 0.2969300E+00, &
     & 0.3290500E+00, 0.3261600E+00, 0.3647800E+00, 0.3407800E+00, &
     & 0.4564851E+00, 0.5241340E+00, 0.5915216E+00, 0.5915216E+00 /
      data (ref_adm(24,iz,20,17),iz = 1,20) / &
     & 0.2506700E+00, 0.2506700E+00, 0.2410400E+00, 0.2398900E+00, &
     & 0.2380800E+00, 0.2354900E+00, 0.2933600E+00, 0.3067900E+00, &
     & 0.2722300E+00, 0.2674900E+00, 0.2942800E+00, 0.3033500E+00, &
     & 0.3139900E+00, 0.3202900E+00, 0.3504700E+00, 0.4084503E+00, &
     & 0.4525974E+00, 0.5177549E+00, 0.5828218E+00, 0.5828218E+00 /
      data (ref_adm(24,iz,21,17),iz = 1,20) / &
     & 0.2791600E+00, 0.2791600E+00, 0.2715600E+00, 0.2719800E+00, &
     & 0.2881800E+00, 0.2813000E+00, 0.2442400E+00, 0.2738000E+00, &
     & 0.2829100E+00, 0.2771600E+00, 0.3075600E+00, 0.2999000E+00, &
     & 0.3350100E+00, 0.3320400E+00, 0.3635500E+00, 0.4068983E+00, &
     & 0.4500474E+00, 0.5130889E+00, 0.5779044E+00, 0.5779044E+00 /
      data (ref_adm(24,iz,22,17),iz = 1,20) / &
     & 0.2430800E+00, 0.2430800E+00, 0.2554400E+00, 0.2694300E+00, &
     & 0.2673500E+00, 0.2791300E+00, 0.2319200E+00, 0.2571500E+00, &
     & 0.2343200E+00, 0.2629300E+00, 0.2712000E+00, 0.3108900E+00, &
     & 0.3418500E+00, 0.3670800E+00, 0.3567700E+00, 0.2976400E+00, &
     & 0.4933041E+00, 0.5553303E+00, 0.6198731E+00, 0.6198731E+00 /
      data (ref_adm(24,iz,23,17),iz = 1,20) / &
     & 0.2040900E+00, 0.2040900E+00, 0.2329500E+00, 0.2350400E+00, &
     & 0.2473500E+00, 0.2336600E+00, 0.2390100E+00, 0.2639300E+00, &
     & 0.2706500E+00, 0.2925300E+00, 0.2944400E+00, 0.2839200E+00, &
     & 0.3396400E+00, 0.3414300E+00, 0.3439700E+00, 0.3714600E+00, &
     & 0.4912913E+00, 0.5523758E+00, 0.6217750E+00, 0.6217750E+00 /
      data (ref_adm(24,iz,24,17),iz = 1,20) / &
     & 0.2469600E+00, 0.2469600E+00, 0.2547900E+00, 0.2445000E+00, &
     & 0.2460900E+00, 0.2616800E+00, 0.2542200E+00, 0.2614700E+00, &
     & 0.2740100E+00, 0.2918400E+00, 0.3007200E+00, 0.3300300E+00, &
     & 0.3472000E+00, 0.3706600E+00, 0.3905700E+00, 0.4221100E+00, &
     & 0.4055800E+00, 0.5536066E+00, 0.6293090E+00, 0.6293090E+00 /
      data (ref_adm(24,iz,25,17),iz = 1,20) / &
     & 0.2507500E+00, 0.2507500E+00, 0.2573100E+00, 0.2588800E+00, &
     & 0.2566600E+00, 0.2750800E+00, 0.2746400E+00, 0.2967900E+00, &
     & 0.2897300E+00, 0.3065700E+00, 0.3053300E+00, 0.3460000E+00, &
     & 0.3622000E+00, 0.3892600E+00, 0.4062400E+00, 0.4572200E+00, &
     & 0.5056300E+00, 0.5575153E+00, 0.6402838E+00, 0.6402838E+00 /
      data (ref_adm(24,iz,26,17),iz = 1,20) / &
     & 0.2391000E+00, 0.2391000E+00, 0.2156600E+00, 0.2524700E+00, &
     & 0.2280200E+00, 0.2816700E+00, 0.2545900E+00, 0.2894700E+00, &
     & 0.3351600E+00, 0.2875400E+00, 0.2993300E+00, 0.3376200E+00, &
     & 0.3710100E+00, 0.4219200E+00, 0.4387500E+00, 0.4444900E+00, &
     & 0.4991800E+00, 0.6411800E+00, 0.6583132E+00, 0.6583132E+00 /
      data (ref_adm(24,iz,27,17),iz = 1,20) / &
     & 0.2557200E+00, 0.2557200E+00, 0.2633200E+00, 0.2534700E+00, &
     & 0.2779300E+00, 0.2970400E+00, 0.3036500E+00, 0.2752400E+00, &
     & 0.2550600E+00, 0.2986300E+00, 0.3143500E+00, 0.3576500E+00, &
     & 0.3856600E+00, 0.4103200E+00, 0.4099500E+00, 0.4838400E+00, &
     & 0.5329400E+00, 0.6377800E+00, 0.6809158E+00, 0.6809158E+00 /
      data (ref_adm(24,iz,28,17),iz = 1,20) / &
     & 0.2509300E+00, 0.2509300E+00, 0.2186400E+00, 0.2321200E+00, &
     & 0.2487600E+00, 0.2595400E+00, 0.3235500E+00, 0.3042400E+00, &
     & 0.2546800E+00, 0.4193300E+00, 0.3614300E+00, 0.3744200E+00, &
     & 0.4239200E+00, 0.4096900E+00, 0.4285600E+00, 0.4745100E+00, &
     & 0.5439600E+00, 0.6583400E+00, 0.8065000E+00, 0.8065000E+00 /
      data (ref_adm(24,iz,29,17),iz = 1,20) / &
     & 0.2430600E+00, 0.2430600E+00, 0.2463500E+00, 0.2307700E+00, &
     & 0.2176800E+00, 0.3147200E+00, 0.3205800E+00, 0.2840600E+00, &
     & 0.2849400E+00, 0.3219100E+00, 0.3147500E+00, 0.3763500E+00, &
     & 0.4125300E+00, 0.3969700E+00, 0.4286000E+00, 0.5193900E+00, &
     & 0.5826000E+00, 0.6523100E+00, 0.6578900E+00, 0.6578900E+00 /
      data (ref_adm(24,iz,30,17),iz = 1,20) / &
     & 0.2470200E+00, 0.2470200E+00, 0.2297000E+00, 0.2577600E+00, &
     & 0.3012000E+00, 0.2492100E+00, 0.2885100E+00, 0.3118200E+00, &
     & 0.2846100E+00, 0.2859500E+00, 0.3169900E+00, 0.3981700E+00, &
     & 0.4112400E+00, 0.3898300E+00, 0.4802400E+00, 0.5376500E+00, &
     & 0.6086900E+00, 0.7084100E+00, 0.7331800E+00, 0.7331800E+00 /
      data (ref_adm(24,iz,31,17),iz = 1,20) / &
     & 0.2384800E+00, 0.2384800E+00, 0.2269300E+00, 0.2682300E+00, &
     & 0.2662300E+00, 0.2693800E+00, 0.2519200E+00, 0.2900600E+00, &
     & 0.3080200E+00, 0.3130500E+00, 0.3112300E+00, 0.3733600E+00, &
     & 0.4004500E+00, 0.4348400E+00, 0.5089000E+00, 0.5485700E+00, &
     & 0.6430600E+00, 0.7408000E+00, 0.7405600E+00, 0.7405600E+00 /
      data (ref_adm(24,iz,32,17),iz = 1,20) / &
     & 0.2284000E+00, 0.2284000E+00, 0.2380100E+00, 0.2532900E+00, &
     & 0.2659700E+00, 0.2605700E+00, 0.2612500E+00, 0.2863600E+00, &
     & 0.3294900E+00, 0.3119900E+00, 0.3113000E+00, 0.3586600E+00, &
     & 0.4096600E+00, 0.4547400E+00, 0.4902800E+00, 0.5565800E+00, &
     & 0.6504400E+00, 0.7932100E+00, 0.8486200E+00, 0.8486200E+00 /
      data (ref_adm(24,iz,33,17),iz = 1,20) / &
     & 0.2345600E+00, 0.2345600E+00, 0.2446800E+00, 0.2530700E+00, &
     & 0.2638800E+00, 0.2804900E+00, 0.2708600E+00, 0.2963000E+00, &
     & 0.3195600E+00, 0.3667500E+00, 0.3770600E+00, 0.3999800E+00, &
     & 0.4393200E+00, 0.4850600E+00, 0.5428500E+00, 0.6165200E+00, &
     & 0.7073000E+00, 0.8020700E+00, 0.8396800E+00, 0.8396800E+00 /
      data (ref_adm(24,iz,34,17),iz = 1,20) / &
     & 0.2437200E+00, 0.2437200E+00, 0.2767300E+00, 0.2600000E+00, &
     & 0.2743900E+00, 0.3091100E+00, 0.3157400E+00, 0.2959000E+00, &
     & 0.3455800E+00, 0.3563400E+00, 0.3477100E+00, 0.3855500E+00, &
     & 0.4167000E+00, 0.4817800E+00, 0.5383200E+00, 0.6066900E+00, &
     & 0.6933500E+00, 0.7956400E+00, 0.8064700E+00, 0.8064700E+00 /
      data (ref_adm(24,iz,35,17),iz = 1,20) / &
     & 0.2685100E+00, 0.2685100E+00, 0.2657900E+00, 0.2751600E+00, &
     & 0.2859300E+00, 0.2770300E+00, 0.2894600E+00, 0.3493000E+00, &
     & 0.3307200E+00, 0.3329100E+00, 0.3977100E+00, 0.4163900E+00, &
     & 0.4618300E+00, 0.4724500E+00, 0.5536500E+00, 0.6522100E+00, &
     & 0.7036100E+00, 0.8310400E+00, 0.7925700E+00, 0.7925700E+00 /
      data (ref_adm(24,iz,36,17),iz = 1,20) / &
     & 0.2279200E+00, 0.2279200E+00, 0.2566700E+00, 0.2822900E+00, &
     & 0.2709500E+00, 0.2649500E+00, 0.3002200E+00, 0.3374600E+00, &
     & 0.3126200E+00, 0.3644200E+00, 0.3978700E+00, 0.4392900E+00, &
     & 0.4750900E+00, 0.4871500E+00, 0.5609500E+00, 0.6395200E+00, &
     & 0.7571500E+00, 0.8756500E+00, 0.8882800E+00, 0.8882800E+00 /
      data (ref_adm(24,iz,37,17),iz = 1,20) / &
     & 0.2374200E+00, 0.2374200E+00, 0.2817400E+00, 0.2767900E+00, &
     & 0.2647000E+00, 0.2693200E+00, 0.3019800E+00, 0.3152300E+00, &
     & 0.3331100E+00, 0.3516200E+00, 0.3864600E+00, 0.4348500E+00, &
     & 0.4580200E+00, 0.5066200E+00, 0.5703000E+00, 0.6348000E+00, &
     & 0.8004500E+00, 0.9184000E+00, 0.8459400E+00, 0.8459400E+00 /
      data (ref_adm(24,iz,38,17),iz = 1,20) / &
     & 0.2374200E+00, 0.2374200E+00, 0.2817400E+00, 0.2767900E+00, &
     & 0.2647000E+00, 0.2693200E+00, 0.3019800E+00, 0.3152300E+00, &
     & 0.3331100E+00, 0.3516200E+00, 0.3864600E+00, 0.4348500E+00, &
     & 0.4580200E+00, 0.5066200E+00, 0.5703000E+00, 0.6348000E+00, &
     & 0.8004500E+00, 0.9184000E+00, 0.8459400E+00, 0.8459400E+00 /
! Solar Zenith Angle 85.0 Albedo  0.5011234E+00
      data (ref_adm(24,iz, 1,18),iz = 1,20) / &
     & 0.2365500E+00, 0.2365500E+00, 0.1881600E+00, 0.2728624E+00, &
     & 0.2889217E+00, 0.3081565E+00, 0.3314205E+00, 0.4387900E+00, &
     & 0.3858900E+00, 0.4207624E+00, 0.4829345E+00, 0.6065766E+00, &
     & 0.7292105E+00, 0.9181311E+00, 0.1379647E+01, 0.2659204E+01, &
     & 0.5125505E+01, 0.3074229E+01, 0.3231958E+01, 0.3231958E+01 /
      data (ref_adm(24,iz, 2,18),iz = 1,20) / &
     & 0.2365500E+00, 0.2365500E+00, 0.1881600E+00, 0.2728624E+00, &
     & 0.2889217E+00, 0.3081565E+00, 0.3314205E+00, 0.4387900E+00, &
     & 0.3858900E+00, 0.4207624E+00, 0.4829345E+00, 0.6065766E+00, &
     & 0.7292105E+00, 0.9181311E+00, 0.1379647E+01, 0.2659204E+01, &
     & 0.5125505E+01, 0.3074229E+01, 0.3231958E+01, 0.3231958E+01 /
      data (ref_adm(24,iz, 3,18),iz = 1,20) / &
     & 0.2497230E+00, 0.2497230E+00, 0.2606980E+00, 0.2726799E+00, &
     & 0.2888733E+00, 0.3589200E+00, 0.3303554E+00, 0.3895600E+00, &
     & 0.4564100E+00, 0.4121800E+00, 0.4790254E+00, 0.6153400E+00, &
     & 0.7240483E+00, 0.8978983E+00, 0.1323045E+01, 0.2437850E+01, &
     & 0.5107130E+01, 0.3436258E+01, 0.2344089E+00, 0.2344089E+00 /
      data (ref_adm(24,iz, 4,18),iz = 1,20) / &
     & 0.2796700E+00, 0.2796700E+00, 0.2931300E+00, 0.2723464E+00, &
     & 0.3431900E+00, 0.3378600E+00, 0.3303572E+00, 0.3517431E+00, &
     & 0.3787705E+00, 0.4158126E+00, 0.4725353E+00, 0.6563400E+00, &
     & 0.7160329E+00, 0.8597593E+00, 0.1222212E+01, 0.2059599E+01, &
     & 0.4099578E+01, 0.5020896E+01, 0.2964069E+01, 0.2964069E+01 /
      data (ref_adm(24,iz, 5,18),iz = 1,20) / &
     & 0.2498941E+00, 0.2498941E+00, 0.2604322E+00, 0.2715129E+00, &
     & 0.3333000E+00, 0.2697400E+00, 0.3284802E+00, 0.3507009E+00, &
     & 0.3767664E+00, 0.4119991E+00, 0.4647644E+00, 0.5741729E+00, &
     & 0.7073573E+00, 0.8186257E+00, 0.1099442E+01, 0.1690241E+01, &
     & 0.2853743E+01, 0.5901467E+01, 0.4760746E+01, 0.4760746E+01 /
      data (ref_adm(24,iz, 6,18),iz = 1,20) / &
     & 0.2494768E+00, 0.2494768E+00, 0.2733900E+00, 0.2434900E+00, &
     & 0.3363500E+00, 0.3493800E+00, 0.3262179E+00, 0.4070700E+00, &
     & 0.4235800E+00, 0.5824600E+00, 0.6886000E+00, 0.5491295E+00, &
     & 0.6903596E+00, 0.7914110E+00, 0.9872846E+00, 0.1408296E+01, &
     & 0.2083408E+01, 0.3628319E+01, 0.4878822E+01, 0.4878822E+01 /
      data (ref_adm(24,iz, 7,18),iz = 1,20) / &
     & 0.2492715E+00, 0.2492715E+00, 0.2594501E+00, 0.3396800E+00, &
     & 0.2850862E+00, 0.3447100E+00, 0.3234846E+00, 0.3469762E+00, &
     & 0.3713429E+00, 0.4991600E+00, 0.3512600E+00, 0.5264370E+00, &
     & 0.6509129E+00, 0.7728140E+00, 0.9135081E+00, 0.1192715E+01, &
     & 0.1618329E+01, 0.2368622E+01, 0.2850174E+01, 0.2850174E+01 /
      data (ref_adm(24,iz, 8,18),iz = 1,20) / &
     & 0.1387700E+00, 0.1387700E+00, 0.1470200E+00, 0.2049100E+00, &
     & 0.2830617E+00, 0.3081500E+00, 0.3207002E+00, 0.3438863E+00, &
     & 0.3677995E+00, 0.4234900E+00, 0.4358933E+00, 0.5061532E+00, &
     & 0.6081554E+00, 0.7242852E+00, 0.8776420E+00, 0.1066856E+01, &
     & 0.1336745E+01, 0.1797258E+01, 0.2068933E+01, 0.2068933E+01 /
      data (ref_adm(24,iz, 9,18),iz = 1,20) / &
     & 0.2706700E+00, 0.2706700E+00, 0.2585236E+00, 0.2429600E+00, &
     & 0.2816008E+00, 0.3361000E+00, 0.3169987E+00, 0.3406450E+00, &
     & 0.3643887E+00, 0.3236400E+00, 0.4272071E+00, 0.5289300E+00, &
     & 0.5726908E+00, 0.6652243E+00, 0.9930700E+00, 0.1055700E+01, &
     & 0.1196660E+01, 0.1481088E+01, 0.1666138E+01, 0.1666138E+01 /
      data (ref_adm(24,iz,10,18),iz = 1,20) / &
     & 0.2821400E+00, 0.2821400E+00, 0.2577398E+00, 0.2667219E+00, &
     & 0.2847800E+00, 0.2950367E+00, 0.3132782E+00, 0.3358900E+00, &
     & 0.3606325E+00, 0.2584700E+00, 0.3663000E+00, 0.4388600E+00, &
     & 0.5465494E+00, 0.6316900E+00, 0.6197900E+00, 0.9240018E+00, &
     & 0.9859800E+00, 0.1379019E+01, 0.1523997E+01, 0.1523997E+01 /
      data (ref_adm(24,iz,11,18),iz = 1,20) / &
     & 0.2487211E+00, 0.2487211E+00, 0.2859000E+00, 0.2654341E+00, &
     & 0.2541600E+00, 0.2917038E+00, 0.3096209E+00, 0.3306658E+00, &
     & 0.3206000E+00, 0.2280900E+00, 0.4129983E+00, 0.4615273E+00, &
     & 0.5243910E+00, 0.5897114E+00, 0.6880487E+00, 0.8327428E+00, &
     & 0.8117200E+00, 0.1237585E+01, 0.1402720E+01, 0.1402720E+01 /
      data (ref_adm(24,iz,12,18),iz = 1,20) / &
     & 0.2485702E+00, 0.2485702E+00, 0.2219600E+00, 0.2642945E+00, &
     & 0.2746791E+00, 0.3946400E+00, 0.3050976E+00, 0.3249847E+00, &
     & 0.3430300E+00, 0.3760234E+00, 0.4069591E+00, 0.4530024E+00, &
     & 0.5099282E+00, 0.8562200E+00, 0.6142900E+00, 0.7737476E+00, &
     & 0.9122071E+00, 0.1104724E+01, 0.1257685E+01, 0.1257685E+01 /
      data (ref_adm(24,iz,13,18),iz = 1,20) / &
     & 0.2310000E+00, 0.2310000E+00, 0.2550240E+00, 0.2631550E+00, &
     & 0.2972200E+00, 0.3486600E+00, 0.2738300E+00, 0.3193463E+00, &
     & 0.3133500E+00, 0.3671646E+00, 0.4023900E+00, 0.4442905E+00, &
     & 0.4981771E+00, 0.5499711E+00, 0.9759000E+00, 0.7330832E+00, &
     & 0.8544658E+00, 0.1020633E+01, 0.1166689E+01, 0.1166689E+01 /
      data (ref_adm(24,iz,14,18),iz = 1,20) / &
     & 0.2796000E+00, 0.2796000E+00, 0.3178300E+00, 0.3113000E+00, &
     & 0.2701660E+00, 0.3922100E+00, 0.2652100E+00, 0.3169700E+00, &
     & 0.3043400E+00, 0.3662700E+00, 0.2639800E+00, 0.4319666E+00, &
     & 0.4865733E+00, 0.5365752E+00, 0.6953400E+00, 0.7068872E+00, &
     & 0.8175678E+00, 0.9682122E+00, 0.1106723E+01, 0.1106723E+01 /
      data (ref_adm(24,iz,15,18),iz = 1,20) / &
     & 0.2498600E+00, 0.2498600E+00, 0.2377200E+00, 0.2655000E+00, &
     & 0.2644300E+00, 0.2929400E+00, 0.2883500E+00, 0.2935200E+00, &
     & 0.2879800E+00, 0.3298600E+00, 0.3057200E+00, 0.3166800E+00, &
     & 0.3105300E+00, 0.3435000E+00, 0.5889220E+00, 0.6848502E+00, &
     & 0.7883905E+00, 0.9311236E+00, 0.1061389E+01, 0.1061389E+01 /
      data (ref_adm(24,iz,16,18),iz = 1,20) / &
     & 0.2319500E+00, 0.2319500E+00, 0.2607300E+00, 0.2445500E+00, &
     & 0.2586900E+00, 0.2773700E+00, 0.2392400E+00, 0.2602000E+00, &
     & 0.2854200E+00, 0.3157000E+00, 0.3000400E+00, 0.3295600E+00, &
     & 0.3409000E+00, 0.4056600E+00, 0.5649027E+00, 0.6560367E+00, &
     & 0.7575594E+00, 0.8951334E+00, 0.1022807E+01, 0.1022807E+01 /
      data (ref_adm(24,iz,17,18),iz = 1,20) / &
     & 0.2475900E+00, 0.2475900E+00, 0.2882200E+00, 0.2563781E+00, &
     & 0.2630133E+00, 0.2350800E+00, 0.2353200E+00, 0.2864500E+00, &
     & 0.3125482E+00, 0.3324060E+00, 0.3563021E+00, 0.3932886E+00, &
     & 0.4382203E+00, 0.4810582E+00, 0.5429638E+00, 0.6280522E+00, &
     & 0.7217241E+00, 0.8517320E+00, 0.9768444E+00, 0.9768444E+00 /
      data (ref_adm(24,iz,18,18),iz = 1,20) / &
     & 0.2867300E+00, 0.2867300E+00, 0.3010100E+00, 0.2946200E+00, &
     & 0.2749300E+00, 0.2978200E+00, 0.2439200E+00, 0.2754800E+00, &
     & 0.2350200E+00, 0.3162944E+00, 0.3312628E+00, 0.3547665E+00, &
     & 0.3839340E+00, 0.4131941E+00, 0.4740100E+00, 0.5283519E+00, &
     & 0.6212952E+00, 0.7949724E+00, 0.1158482E+01, 0.1158482E+01 /
      data (ref_adm(24,iz,19,18),iz = 1,20) / &
     & 0.2658904E+00, 0.2658904E+00, 0.2672372E+00, 0.2696730E+00, &
     & 0.2733511E+00, 0.2951800E+00, 0.2739200E+00, 0.2926419E+00, &
     & 0.2355500E+00, 0.3141186E+00, 0.3286604E+00, 0.3511690E+00, &
     & 0.3683600E+00, 0.4074645E+00, 0.4508910E+00, 0.5179166E+00, &
     & 0.6069416E+00, 0.7732480E+00, 0.1124343E+01, 0.1124343E+01 /
      data (ref_adm(24,iz,20,18),iz = 1,20) / &
     & 0.2658722E+00, 0.2658722E+00, 0.2670951E+00, 0.3175400E+00, &
     & 0.2728890E+00, 0.2776638E+00, 0.2920400E+00, 0.2726800E+00, &
     & 0.3011934E+00, 0.3128142E+00, 0.3269149E+00, 0.3488863E+00, &
     & 0.3764684E+00, 0.4037657E+00, 0.4463246E+00, 0.5116285E+00, &
     & 0.5981995E+00, 0.7589862E+00, 0.1105463E+01, 0.1105463E+01 /
      data (ref_adm(24,iz,21,18),iz = 1,20) / &
     & 0.2929800E+00, 0.2929800E+00, 0.2668238E+00, 0.2099500E+00, &
     & 0.2657400E+00, 0.2770739E+00, 0.2832174E+00, 0.2908448E+00, &
     & 0.3003061E+00, 0.3116636E+00, 0.3254757E+00, 0.3473091E+00, &
     & 0.3742796E+00, 0.4012065E+00, 0.4428759E+00, 0.5069128E+00, &
     & 0.5919417E+00, 0.7496266E+00, 0.1095722E+01, 0.1095722E+01 /
      data (ref_adm(24,iz,22,18),iz = 1,20) / &
     & 0.3055700E+00, 0.3055700E+00, 0.3019773E+00, 0.2350500E+00, &
     & 0.3086061E+00, 0.3144558E+00, 0.3050800E+00, 0.3178500E+00, &
     & 0.3433742E+00, 0.3713300E+00, 0.3738355E+00, 0.3989386E+00, &
     & 0.4528000E+00, 0.4575502E+00, 0.5001154E+00, 0.5623687E+00, &
     & 0.6415135E+00, 0.7883540E+00, 0.1244420E+01, 0.1244420E+01 /
      data (ref_adm(24,iz,23,18),iz = 1,20) / &
     & 0.2605300E+00, 0.2605300E+00, 0.2222200E+00, 0.1968900E+00, &
     & 0.2334900E+00, 0.2253100E+00, 0.2788900E+00, 0.3310344E+00, &
     & 0.3722800E+00, 0.3589000E+00, 0.3729832E+00, 0.3753400E+00, &
     & 0.3535100E+00, 0.3869900E+00, 0.4986836E+00, 0.5610424E+00, &
     & 0.6403280E+00, 0.7897078E+00, 0.1269217E+01, 0.1269217E+01 /
      data (ref_adm(24,iz,24,18),iz = 1,20) / &
     & 0.2631400E+00, 0.2631400E+00, 0.2712600E+00, 0.2979200E+00, &
     & 0.2806600E+00, 0.2926400E+00, 0.2976700E+00, 0.3285900E+00, &
     & 0.3282200E+00, 0.3706100E+00, 0.3728600E+00, 0.3523500E+00, &
     & 0.3724000E+00, 0.3978800E+00, 0.4181300E+00, 0.5643402E+00, &
     & 0.6455419E+00, 0.7992413E+00, 0.1308088E+01, 0.1308088E+01 /
      data (ref_adm(24,iz,25,18),iz = 1,20) / &
     & 0.2680800E+00, 0.2680800E+00, 0.2488800E+00, 0.2508200E+00, &
     & 0.2904300E+00, 0.3123900E+00, 0.3462600E+00, 0.3749500E+00, &
     & 0.3544900E+00, 0.3354600E+00, 0.3068200E+00, 0.3727300E+00, &
     & 0.3870700E+00, 0.4034000E+00, 0.5061136E+00, 0.5718857E+00, &
     & 0.6563657E+00, 0.8169361E+00, 0.1358716E+01, 0.1358716E+01 /
      data (ref_adm(24,iz,26,18),iz = 1,20) / &
     & 0.3039600E+00, 0.3039600E+00, 0.3007320E+00, 0.3031332E+00, &
     & 0.2568100E+00, 0.3133428E+00, 0.3214419E+00, 0.3922000E+00, &
     & 0.3444089E+00, 0.3148900E+00, 0.3776080E+00, 0.4053548E+00, &
     & 0.4384502E+00, 0.4699958E+00, 0.5169119E+00, 0.5862096E+00, &
     & 0.6753603E+00, 0.8456938E+00, 0.1423707E+01, 0.1423707E+01 /
      data (ref_adm(24,iz,27,18),iz = 1,20) / &
     & 0.2905300E+00, 0.2905300E+00, 0.3005444E+00, 0.3030850E+00, &
     & 0.2638400E+00, 0.3135270E+00, 0.3221925E+00, 0.2955800E+00, &
     & 0.3463376E+00, 0.3625365E+00, 0.4261600E+00, 0.4118050E+00, &
     & 0.4040000E+00, 0.5992100E+00, 0.6152700E+00, 0.6023362E+00, &
     & 0.6964235E+00, 0.8768865E+00, 0.1495045E+01, 0.1495045E+01 /
      data (ref_adm(24,iz,28,18),iz = 1,20) / &
     & 0.3003564E+00, 0.3003564E+00, 0.3003988E+00, 0.3029935E+00, &
     & 0.3073376E+00, 0.3140327E+00, 0.3752500E+00, 0.2253300E+00, &
     & 0.3491106E+00, 0.3669364E+00, 0.3730500E+00, 0.4190699E+00, &
     & 0.3772100E+00, 0.5371800E+00, 0.5426388E+00, 0.6208622E+00, &
     & 0.7220550E+00, 0.9160498E+00, 0.1575186E+01, 0.1575186E+01 /
      data (ref_adm(24,iz,29,18),iz = 1,20) / &
     & 0.3003508E+00, 0.3003508E+00, 0.3004650E+00, 0.3028547E+00, &
     & 0.3074668E+00, 0.3146383E+00, 0.3239838E+00, 0.3043500E+00, &
     & 0.3197300E+00, 0.3718345E+00, 0.5205700E+00, 0.4257695E+00, &
     & 0.5294400E+00, 0.5398300E+00, 0.6178700E+00, 0.6557666E+00, &
     & 0.7717713E+00, 0.9886659E+00, 0.1679987E+01, 0.1679987E+01 /
      data (ref_adm(24,iz,30,18),iz = 1,20) / &
     & 0.2831900E+00, 0.2831900E+00, 0.3002917E+00, 0.3028962E+00, &
     & 0.3077828E+00, 0.2648500E+00, 0.4396200E+00, 0.3392664E+00, &
     & 0.3563574E+00, 0.3760991E+00, 0.3989343E+00, 0.4352430E+00, &
     & 0.4832940E+00, 0.5324705E+00, 0.7390700E+00, 0.7416400E+00, &
     & 0.8267425E+00, 0.1057551E+01, 0.1782410E+01, 0.1782410E+01 /
      data (ref_adm(24,iz,31,18),iz = 1,20) / &
     & 0.2675900E+00, 0.2675900E+00, 0.2414700E+00, 0.2449800E+00, &
     & 0.2665800E+00, 0.3158730E+00, 0.3269015E+00, 0.3418749E+00, &
     & 0.4125700E+00, 0.3801003E+00, 0.4054982E+00, 0.4501688E+00, &
     & 0.5109052E+00, 0.5625989E+00, 0.6175400E+00, 0.7381000E+00, &
     & 0.8242090E+00, 0.1057861E+01, 0.1829551E+01, 0.1829551E+01 /
      data (ref_adm(24,iz,32,18),iz = 1,20) / &
     & 0.2494900E+00, 0.2494900E+00, 0.2866000E+00, 0.2319400E+00, &
     & 0.3083968E+00, 0.3165328E+00, 0.3286023E+00, 0.3895100E+00, &
     & 0.3625726E+00, 0.3845901E+00, 0.4148770E+00, 0.4704120E+00, &
     & 0.5517300E+00, 0.7301900E+00, 0.8139900E+00, 0.7461600E+00, &
     & 0.9430500E+00, 0.1087735E+01, 0.1894881E+01, 0.1894881E+01 /
      data (ref_adm(24,iz,33,18),iz = 1,20) / &
     & 0.2525100E+00, 0.2525100E+00, 0.2244100E+00, 0.2641000E+00, &
     & 0.2902100E+00, 0.2441400E+00, 0.3038400E+00, 0.3695700E+00, &
     & 0.3912200E+00, 0.4624300E+00, 0.4946100E+00, 0.5158600E+00, &
     & 0.5941800E+00, 0.6051200E+00, 0.8145500E+00, 0.8597200E+00, &
     & 0.1115200E+01, 0.1106926E+01, 0.1949385E+01, 0.1949385E+01 /
      data (ref_adm(24,iz,34,18),iz = 1,20) / &
     & 0.3316600E+00, 0.3316600E+00, 0.3053100E+00, 0.3030171E+00, &
     & 0.2935800E+00, 0.3314100E+00, 0.3768500E+00, 0.3352400E+00, &
     & 0.4082400E+00, 0.3779100E+00, 0.4398452E+00, 0.4856200E+00, &
     & 0.5224194E+00, 0.5687320E+00, 0.6421900E+00, 0.7699200E+00, &
     & 0.8587421E+00, 0.1110576E+01, 0.1983881E+01, 0.1983881E+01 /
      data (ref_adm(24,iz,35,18),iz = 1,20) / &
     & 0.3128700E+00, 0.3128700E+00, 0.3001572E+00, 0.3030400E+00, &
     & 0.3091399E+00, 0.2297100E+00, 0.4179300E+00, 0.4050400E+00, &
     & 0.4424000E+00, 0.4450500E+00, 0.4486441E+00, 0.4820871E+00, &
     & 0.5272547E+00, 0.5739234E+00, 0.6366300E+00, 0.7940300E+00, &
     & 0.8617396E+00, 0.1120085E+01, 0.2016864E+01, 0.2016864E+01 /
      data (ref_adm(24,iz,36,18),iz = 1,20) / &
     & 0.3216700E+00, 0.3216700E+00, 0.3000538E+00, 0.3030392E+00, &
     & 0.3092445E+00, 0.3189243E+00, 0.3332418E+00, 0.3502687E+00, &
     & 0.4102500E+00, 0.4008400E+00, 0.4437000E+00, 0.4394500E+00, &
     & 0.6287300E+00, 0.6508800E+00, 0.7200800E+00, 0.7344016E+00, &
     & 0.8704943E+00, 0.1142090E+01, 0.2052587E+01, 0.2052587E+01 /
      data (ref_adm(24,iz,37,18),iz = 1,20) / &
     & 0.3001091E+00, 0.3001091E+00, 0.3000010E+00, 0.2685400E+00, &
     & 0.3094040E+00, 0.3191865E+00, 0.3336256E+00, 0.3507893E+00, &
     & 0.3325900E+00, 0.3828600E+00, 0.4923600E+00, 0.6715000E+00, &
     & 0.5317000E+00, 0.5767244E+00, 0.8428700E+00, 0.9564500E+00, &
     & 0.1071100E+01, 0.1230388E+01, 0.2124334E+01, 0.2124334E+01 /
      data (ref_adm(24,iz,38,18),iz = 1,20) / &
     & 0.3001091E+00, 0.3001091E+00, 0.3000010E+00, 0.2685400E+00, &
     & 0.3094040E+00, 0.3191865E+00, 0.3336256E+00, 0.3507893E+00, &
     & 0.3325900E+00, 0.3828600E+00, 0.4923600E+00, 0.6715000E+00, &
     & 0.5317000E+00, 0.5767244E+00, 0.8428700E+00, 0.9564500E+00, &
     & 0.1071100E+01, 0.1230388E+01, 0.2124334E+01, 0.2124334E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(25,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(25,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(25,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9999000E+04
      data (ref_adm(25,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.9999000E+04
      data (ref_adm(25,iz, 1, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 2, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 3, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 4, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 5, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 6, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 7, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 8, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 9, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,10, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,11, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,12, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,13, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,14, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,15, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,16, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,17, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,22, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,23, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,24, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,25, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,26, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,27, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,28, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,29, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,30, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,31, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,32, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,33, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,34, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,35, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,36, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,37, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,38, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 25.0 Albedo -0.9999000E+04
      data (ref_adm(25,iz, 1, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 2, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 3, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 4, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 5, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 6, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 7, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 8, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz, 9, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,10, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,11, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,12, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,13, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,14, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,15, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,16, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,17, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,18, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,19, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,20, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,21, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,22, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,23, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,24, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,25, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,26, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,27, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,28, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,29, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,30, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,31, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,32, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,33, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,34, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,35, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,36, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,37, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,38, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 30.0 Albedo  0.2664914E+00
      data (ref_adm(25,iz, 1, 7),iz = 1,20) / &
     & 0.3013351E+00, 0.3013351E+00, 0.2959427E+00, 0.2940747E+00, &
     & 0.2925982E+00, 0.2915884E+00, 0.2898085E+00, 0.2867762E+00, &
     & 0.2828814E+00, 0.2782177E+00, 0.2731453E+00, 0.2661031E+00, &
     & 0.2578834E+00, 0.2501433E+00, 0.2390279E+00, 0.2243901E+00, &
     & 0.2092888E+00, 0.1895302E+00, 0.1546419E+00, 0.1546419E+00 /
      data (ref_adm(25,iz, 2, 7),iz = 1,20) / &
     & 0.3013351E+00, 0.3013351E+00, 0.2959427E+00, 0.2940747E+00, &
     & 0.2925982E+00, 0.2915884E+00, 0.2898085E+00, 0.2867762E+00, &
     & 0.2828814E+00, 0.2782177E+00, 0.2731453E+00, 0.2661031E+00, &
     & 0.2578834E+00, 0.2501433E+00, 0.2390279E+00, 0.2243901E+00, &
     & 0.2092888E+00, 0.1895302E+00, 0.1546419E+00, 0.1546419E+00 /
      data (ref_adm(25,iz, 3, 7),iz = 1,20) / &
     & 0.3013351E+00, 0.3013351E+00, 0.2959427E+00, 0.2940747E+00, &
     & 0.2925982E+00, 0.2915884E+00, 0.2898085E+00, 0.2867762E+00, &
     & 0.2828814E+00, 0.2782177E+00, 0.2731453E+00, 0.2661031E+00, &
     & 0.2578834E+00, 0.2501433E+00, 0.2390279E+00, 0.2243901E+00, &
     & 0.2092888E+00, 0.1895302E+00, 0.1546419E+00, 0.1546419E+00 /
      data (ref_adm(25,iz, 4, 7),iz = 1,20) / &
     & 0.3013351E+00, 0.3013351E+00, 0.2959427E+00, 0.2940747E+00, &
     & 0.2925982E+00, 0.2915884E+00, 0.2898085E+00, 0.2867762E+00, &
     & 0.2828814E+00, 0.2782177E+00, 0.2731453E+00, 0.2661031E+00, &
     & 0.2578834E+00, 0.2501433E+00, 0.2390279E+00, 0.2243901E+00, &
     & 0.2092888E+00, 0.1895302E+00, 0.1546419E+00, 0.1546419E+00 /
      data (ref_adm(25,iz, 5, 7),iz = 1,20) / &
     & 0.3013351E+00, 0.3013351E+00, 0.2959427E+00, 0.2940747E+00, &
     & 0.2925982E+00, 0.2915884E+00, 0.2898085E+00, 0.2867762E+00, &
     & 0.2828814E+00, 0.2782177E+00, 0.2731453E+00, 0.2661031E+00, &
     & 0.2578834E+00, 0.2501433E+00, 0.2390279E+00, 0.2243901E+00, &
     & 0.2092888E+00, 0.1895302E+00, 0.1546419E+00, 0.1546419E+00 /
      data (ref_adm(25,iz, 6, 7),iz = 1,20) / &
     & 0.3013351E+00, 0.3013351E+00, 0.2959427E+00, 0.2940747E+00, &
     & 0.2925982E+00, 0.2915884E+00, 0.2898085E+00, 0.2867762E+00, &
     & 0.2828814E+00, 0.2782177E+00, 0.2731453E+00, 0.2661031E+00, &
     & 0.2578834E+00, 0.2501433E+00, 0.2390279E+00, 0.2243901E+00, &
     & 0.2092888E+00, 0.1895302E+00, 0.1546419E+00, 0.1546419E+00 /
      data (ref_adm(25,iz, 7, 7),iz = 1,20) / &
     & 0.3013351E+00, 0.3013351E+00, 0.2959427E+00, 0.2940747E+00, &
     & 0.2925982E+00, 0.2915884E+00, 0.2898085E+00, 0.2867762E+00, &
     & 0.2828814E+00, 0.2782177E+00, 0.2731453E+00, 0.2661031E+00, &
     & 0.2578834E+00, 0.2501433E+00, 0.2390279E+00, 0.2243901E+00, &
     & 0.2092888E+00, 0.1895302E+00, 0.1546419E+00, 0.1546419E+00 /
      data (ref_adm(25,iz, 8, 7),iz = 1,20) / &
     & 0.3013351E+00, 0.3013351E+00, 0.2959427E+00, 0.2940747E+00, &
     & 0.2925982E+00, 0.2915884E+00, 0.2898085E+00, 0.2867762E+00, &
     & 0.2828814E+00, 0.2782177E+00, 0.2731453E+00, 0.2661031E+00, &
     & 0.2578834E+00, 0.2501433E+00, 0.2390279E+00, 0.2243901E+00, &
     & 0.2092888E+00, 0.1895302E+00, 0.1546419E+00, 0.1546419E+00 /
      data (ref_adm(25,iz, 9, 7),iz = 1,20) / &
     & 0.3013351E+00, 0.3013351E+00, 0.2959427E+00, 0.2940747E+00, &
     & 0.2925982E+00, 0.2915884E+00, 0.2898085E+00, 0.2867762E+00, &
     & 0.2828814E+00, 0.2782177E+00, 0.2731453E+00, 0.2661031E+00, &
     & 0.2578834E+00, 0.2501433E+00, 0.2390279E+00, 0.2243901E+00, &
     & 0.2092888E+00, 0.1895302E+00, 0.1546419E+00, 0.1546419E+00 /
      data (ref_adm(25,iz,10, 7),iz = 1,20) / &
     & 0.3013351E+00, 0.3013351E+00, 0.2959427E+00, 0.2940747E+00, &
     & 0.2925982E+00, 0.2915884E+00, 0.2898085E+00, 0.2867762E+00, &
     & 0.2828814E+00, 0.2782177E+00, 0.2731453E+00, 0.2661031E+00, &
     & 0.2578834E+00, 0.2501433E+00, 0.2390279E+00, 0.2243901E+00, &
     & 0.2092888E+00, 0.1895302E+00, 0.1546419E+00, 0.1546419E+00 /
      data (ref_adm(25,iz,11, 7),iz = 1,20) / &
     & 0.3013351E+00, 0.3013351E+00, 0.2959427E+00, 0.2940747E+00, &
     & 0.3060800E+00, 0.2639400E+00, 0.2563900E+00, 0.2926500E+00, &
     & 0.3264100E+00, 0.2782177E+00, 0.2731453E+00, 0.2661031E+00, &
     & 0.2578834E+00, 0.2501433E+00, 0.2390279E+00, 0.2243901E+00, &
     & 0.2092888E+00, 0.1895302E+00, 0.1546419E+00, 0.1546419E+00 /
      data (ref_adm(25,iz,12, 7),iz = 1,20) / &
     & 0.3013351E+00, 0.3013351E+00, 0.2959427E+00, 0.2940747E+00, &
     & 0.2925982E+00, 0.2915884E+00, 0.2898085E+00, 0.2867762E+00, &
     & 0.2828814E+00, 0.2782177E+00, 0.2702900E+00, 0.2661031E+00, &
     & 0.2578834E+00, 0.2501433E+00, 0.2390279E+00, 0.2243901E+00, &
     & 0.2092888E+00, 0.1895302E+00, 0.1546419E+00, 0.1546419E+00 /
      data (ref_adm(25,iz,13, 7),iz = 1,20) / &
     & 0.3013351E+00, 0.3013351E+00, 0.2959427E+00, 0.2940747E+00, &
     & 0.3120400E+00, 0.2915884E+00, 0.2898085E+00, 0.2867762E+00, &
     & 0.2828814E+00, 0.2782177E+00, 0.2731453E+00, 0.2661031E+00, &
     & 0.2578834E+00, 0.2501433E+00, 0.2390279E+00, 0.2243901E+00, &
     & 0.2092888E+00, 0.1895302E+00, 0.1546419E+00, 0.1546419E+00 /
      data (ref_adm(25,iz,14, 7),iz = 1,20) / &
     & 0.3013351E+00, 0.3013351E+00, 0.2959427E+00, 0.2940747E+00, &
     & 0.2925982E+00, 0.2915884E+00, 0.2898500E+00, 0.2867762E+00, &
     & 0.2828814E+00, 0.2782177E+00, 0.2731453E+00, 0.2661031E+00, &
     & 0.2578834E+00, 0.2501433E+00, 0.2390279E+00, 0.2243901E+00, &
     & 0.2092888E+00, 0.1895302E+00, 0.1546419E+00, 0.1546419E+00 /
      data (ref_adm(25,iz,15, 7),iz = 1,20) / &
     & 0.3013351E+00, 0.3013351E+00, 0.2959427E+00, 0.2940747E+00, &
     & 0.2925982E+00, 0.2915884E+00, 0.2898085E+00, 0.2867762E+00, &
     & 0.2828814E+00, 0.2782177E+00, 0.2731453E+00, 0.2661031E+00, &
     & 0.2578834E+00, 0.2501433E+00, 0.2390279E+00, 0.2243901E+00, &
     & 0.2092888E+00, 0.1895302E+00, 0.1546419E+00, 0.1546419E+00 /
      data (ref_adm(25,iz,16, 7),iz = 1,20) / &
     & 0.3013351E+00, 0.3013351E+00, 0.2959427E+00, 0.2940747E+00, &
     & 0.2925982E+00, 0.2915884E+00, 0.2898085E+00, 0.2962100E+00, &
     & 0.2828814E+00, 0.2782177E+00, 0.2731453E+00, 0.2661031E+00, &
     & 0.2578834E+00, 0.2501433E+00, 0.2390279E+00, 0.2243901E+00, &
     & 0.2092888E+00, 0.1895302E+00, 0.1546419E+00, 0.1546419E+00 /
      data (ref_adm(25,iz,17, 7),iz = 1,20) / &
     & 0.3013351E+00, 0.3013351E+00, 0.2959427E+00, 0.2940747E+00, &
     & 0.2925982E+00, 0.2915884E+00, 0.2898085E+00, 0.2582900E+00, &
     & 0.2828814E+00, 0.2782177E+00, 0.2731453E+00, 0.2661031E+00, &
     & 0.2578834E+00, 0.2501433E+00, 0.2390279E+00, 0.2243901E+00, &
     & 0.2092888E+00, 0.1895302E+00, 0.1546419E+00, 0.1546419E+00 /
      data (ref_adm(25,iz,18, 7),iz = 1,20) / &
     & 0.2982472E+00, 0.2982472E+00, 0.2872881E+00, 0.2836174E+00, &
     & 0.2810956E+00, 0.2797467E+00, 0.2779438E+00, 0.2513400E+00, &
     & 0.2780000E+00, 0.2700085E+00, 0.2677237E+00, 0.2653030E+00, &
     & 0.2629532E+00, 0.2610438E+00, 0.2584978E+00, 0.2555230E+00, &
     & 0.2530608E+00, 0.2498368E+00, 0.2334281E+00, 0.2334281E+00 /
      data (ref_adm(25,iz,19, 7),iz = 1,20) / &
     & 0.2982472E+00, 0.2982472E+00, 0.2872881E+00, 0.2836173E+00, &
     & 0.2810956E+00, 0.2797467E+00, 0.2779438E+00, 0.2753257E+00, &
     & 0.2726701E+00, 0.2700085E+00, 0.2677237E+00, 0.2653030E+00, &
     & 0.2629532E+00, 0.2610438E+00, 0.2584978E+00, 0.2555230E+00, &
     & 0.2530608E+00, 0.2498368E+00, 0.2334281E+00, 0.2334281E+00 /
      data (ref_adm(25,iz,20, 7),iz = 1,20) / &
     & 0.2982472E+00, 0.2982472E+00, 0.2872881E+00, 0.2836174E+00, &
     & 0.2810956E+00, 0.2797467E+00, 0.2779438E+00, 0.2753257E+00, &
     & 0.2726701E+00, 0.2700085E+00, 0.2677237E+00, 0.2653030E+00, &
     & 0.2629532E+00, 0.2610438E+00, 0.2584978E+00, 0.2555230E+00, &
     & 0.2530608E+00, 0.2498368E+00, 0.2334281E+00, 0.2334281E+00 /
      data (ref_adm(25,iz,21, 7),iz = 1,20) / &
     & 0.2982472E+00, 0.2982472E+00, 0.2872881E+00, 0.2836173E+00, &
     & 0.2810956E+00, 0.2797467E+00, 0.2779438E+00, 0.2753257E+00, &
     & 0.2726701E+00, 0.2700085E+00, 0.2677237E+00, 0.2653030E+00, &
     & 0.2629532E+00, 0.2610438E+00, 0.2584978E+00, 0.2555230E+00, &
     & 0.2530608E+00, 0.2498368E+00, 0.2334281E+00, 0.2334281E+00 /
      data (ref_adm(25,iz,22, 7),iz = 1,20) / &
     & 0.2992766E+00, 0.2992766E+00, 0.2939211E+00, 0.2920659E+00, &
     & 0.2905995E+00, 0.2895965E+00, 0.2878288E+00, 0.2848172E+00, &
     & 0.2809491E+00, 0.2763172E+00, 0.2920400E+00, 0.2642853E+00, &
     & 0.2561218E+00, 0.2484345E+00, 0.2373950E+00, 0.2228573E+00, &
     & 0.2078591E+00, 0.1882355E+00, 0.1535855E+00, 0.1535855E+00 /
      data (ref_adm(25,iz,23, 7),iz = 1,20) / &
     & 0.2992766E+00, 0.2992766E+00, 0.2939211E+00, 0.2920659E+00, &
     & 0.2905994E+00, 0.2895965E+00, 0.2878288E+00, 0.2848172E+00, &
     & 0.2809491E+00, 0.2763172E+00, 0.2712794E+00, 0.2440600E+00, &
     & 0.2561218E+00, 0.2484345E+00, 0.2373950E+00, 0.2228573E+00, &
     & 0.2078591E+00, 0.1882355E+00, 0.1535855E+00, 0.1535855E+00 /
      data (ref_adm(25,iz,24, 7),iz = 1,20) / &
     & 0.2992766E+00, 0.2992766E+00, 0.2939211E+00, 0.2920659E+00, &
     & 0.2905995E+00, 0.2895965E+00, 0.2878288E+00, 0.2848172E+00, &
     & 0.2809491E+00, 0.2763172E+00, 0.2712795E+00, 0.2642853E+00, &
     & 0.2561218E+00, 0.2484345E+00, 0.2373950E+00, 0.2228573E+00, &
     & 0.2078591E+00, 0.1882355E+00, 0.1535855E+00, 0.1535855E+00 /
      data (ref_adm(25,iz,25, 7),iz = 1,20) / &
     & 0.2992766E+00, 0.2992766E+00, 0.2939211E+00, 0.2920659E+00, &
     & 0.2905994E+00, 0.2895965E+00, 0.2878288E+00, 0.2848172E+00, &
     & 0.2809491E+00, 0.2763172E+00, 0.2712794E+00, 0.2642853E+00, &
     & 0.2561218E+00, 0.2484345E+00, 0.2373950E+00, 0.2228573E+00, &
     & 0.2078591E+00, 0.1882355E+00, 0.1535855E+00, 0.1535855E+00 /
      data (ref_adm(25,iz,26, 7),iz = 1,20) / &
     & 0.2992766E+00, 0.2992766E+00, 0.2939211E+00, 0.2920659E+00, &
     & 0.2905995E+00, 0.2895965E+00, 0.2878288E+00, 0.2848172E+00, &
     & 0.2809491E+00, 0.2763172E+00, 0.2712795E+00, 0.2642853E+00, &
     & 0.2561218E+00, 0.2484345E+00, 0.2373950E+00, 0.2228573E+00, &
     & 0.2078591E+00, 0.1882355E+00, 0.1535855E+00, 0.1535855E+00 /
      data (ref_adm(25,iz,27, 7),iz = 1,20) / &
     & 0.2992766E+00, 0.2992766E+00, 0.2939211E+00, 0.2920659E+00, &
     & 0.2905994E+00, 0.2895965E+00, 0.2878288E+00, 0.2848172E+00, &
     & 0.2809491E+00, 0.2763172E+00, 0.2712794E+00, 0.2642853E+00, &
     & 0.2561218E+00, 0.2484345E+00, 0.2373950E+00, 0.2228573E+00, &
     & 0.2078591E+00, 0.1882355E+00, 0.1535855E+00, 0.1535855E+00 /
      data (ref_adm(25,iz,28, 7),iz = 1,20) / &
     & 0.2992766E+00, 0.2992766E+00, 0.2939211E+00, 0.2920659E+00, &
     & 0.2905995E+00, 0.2895965E+00, 0.2878288E+00, 0.2848172E+00, &
     & 0.2809491E+00, 0.2763172E+00, 0.2712795E+00, 0.2642853E+00, &
     & 0.2561218E+00, 0.2484345E+00, 0.2373950E+00, 0.2228573E+00, &
     & 0.2078591E+00, 0.1882355E+00, 0.1535855E+00, 0.1535855E+00 /
      data (ref_adm(25,iz,29, 7),iz = 1,20) / &
     & 0.2992766E+00, 0.2992766E+00, 0.2939211E+00, 0.2920659E+00, &
     & 0.2905994E+00, 0.2895965E+00, 0.2878288E+00, 0.2848172E+00, &
     & 0.2809491E+00, 0.2763172E+00, 0.2712794E+00, 0.2642853E+00, &
     & 0.2561218E+00, 0.2484345E+00, 0.2373950E+00, 0.2228573E+00, &
     & 0.2078591E+00, 0.1882355E+00, 0.1535855E+00, 0.1535855E+00 /
      data (ref_adm(25,iz,30, 7),iz = 1,20) / &
     & 0.2992766E+00, 0.2992766E+00, 0.2939211E+00, 0.2920659E+00, &
     & 0.2905995E+00, 0.2895965E+00, 0.2878288E+00, 0.2848172E+00, &
     & 0.2809491E+00, 0.2763172E+00, 0.2712795E+00, 0.2642853E+00, &
     & 0.2561218E+00, 0.2484345E+00, 0.2373950E+00, 0.2228573E+00, &
     & 0.2078591E+00, 0.1882355E+00, 0.1535855E+00, 0.1535855E+00 /
      data (ref_adm(25,iz,31, 7),iz = 1,20) / &
     & 0.2992766E+00, 0.2992766E+00, 0.2939211E+00, 0.2920659E+00, &
     & 0.2905994E+00, 0.2895965E+00, 0.2878288E+00, 0.2848172E+00, &
     & 0.2809491E+00, 0.2763172E+00, 0.2712794E+00, 0.2642853E+00, &
     & 0.2561218E+00, 0.2484345E+00, 0.2373950E+00, 0.2228573E+00, &
     & 0.2078591E+00, 0.1882355E+00, 0.1535855E+00, 0.1535855E+00 /
      data (ref_adm(25,iz,32, 7),iz = 1,20) / &
     & 0.2992766E+00, 0.2992766E+00, 0.2939211E+00, 0.2920659E+00, &
     & 0.2905995E+00, 0.2895965E+00, 0.2878288E+00, 0.2848172E+00, &
     & 0.2809491E+00, 0.2763172E+00, 0.2712795E+00, 0.2642853E+00, &
     & 0.2561218E+00, 0.2484345E+00, 0.2373950E+00, 0.2228573E+00, &
     & 0.2078591E+00, 0.1882355E+00, 0.1535855E+00, 0.1535855E+00 /
      data (ref_adm(25,iz,33, 7),iz = 1,20) / &
     & 0.2992766E+00, 0.2992766E+00, 0.2939211E+00, 0.2920659E+00, &
     & 0.2905994E+00, 0.2895965E+00, 0.2878288E+00, 0.2848172E+00, &
     & 0.2809491E+00, 0.2763172E+00, 0.2712794E+00, 0.2642853E+00, &
     & 0.2561218E+00, 0.2484345E+00, 0.2373950E+00, 0.2228573E+00, &
     & 0.2078591E+00, 0.1882355E+00, 0.1535855E+00, 0.1535855E+00 /
      data (ref_adm(25,iz,34, 7),iz = 1,20) / &
     & 0.2992766E+00, 0.2992766E+00, 0.2939211E+00, 0.2920659E+00, &
     & 0.2905995E+00, 0.2895965E+00, 0.2878288E+00, 0.2848172E+00, &
     & 0.2809491E+00, 0.2763172E+00, 0.2712795E+00, 0.2642853E+00, &
     & 0.2561218E+00, 0.2484345E+00, 0.2373950E+00, 0.2228573E+00, &
     & 0.2078591E+00, 0.1882355E+00, 0.1535855E+00, 0.1535855E+00 /
      data (ref_adm(25,iz,35, 7),iz = 1,20) / &
     & 0.2992766E+00, 0.2992766E+00, 0.2939211E+00, 0.2920659E+00, &
     & 0.2905994E+00, 0.2895965E+00, 0.2878288E+00, 0.2848172E+00, &
     & 0.2809491E+00, 0.2763172E+00, 0.2712794E+00, 0.2642853E+00, &
     & 0.2561218E+00, 0.2484345E+00, 0.2373950E+00, 0.2228573E+00, &
     & 0.2078591E+00, 0.1882355E+00, 0.1535855E+00, 0.1535855E+00 /
      data (ref_adm(25,iz,36, 7),iz = 1,20) / &
     & 0.2992766E+00, 0.2992766E+00, 0.2939211E+00, 0.2920659E+00, &
     & 0.2905995E+00, 0.2895965E+00, 0.2878288E+00, 0.2848172E+00, &
     & 0.2809491E+00, 0.2763172E+00, 0.2712795E+00, 0.2642853E+00, &
     & 0.2561218E+00, 0.2484345E+00, 0.2373950E+00, 0.2228573E+00, &
     & 0.2078591E+00, 0.1882355E+00, 0.1535855E+00, 0.1535855E+00 /
      data (ref_adm(25,iz,37, 7),iz = 1,20) / &
     & 0.2992766E+00, 0.2992766E+00, 0.2939211E+00, 0.2920659E+00, &
     & 0.2905995E+00, 0.2895965E+00, 0.2878288E+00, 0.2848172E+00, &
     & 0.2809491E+00, 0.2763172E+00, 0.2712795E+00, 0.2642853E+00, &
     & 0.2561218E+00, 0.2484345E+00, 0.2373950E+00, 0.2228573E+00, &
     & 0.2078591E+00, 0.1882355E+00, 0.1535855E+00, 0.1535855E+00 /
      data (ref_adm(25,iz,38, 7),iz = 1,20) / &
     & 0.2992766E+00, 0.2992766E+00, 0.2939211E+00, 0.2920659E+00, &
     & 0.2905995E+00, 0.2895965E+00, 0.2878288E+00, 0.2848172E+00, &
     & 0.2809491E+00, 0.2763172E+00, 0.2712795E+00, 0.2642853E+00, &
     & 0.2561218E+00, 0.2484345E+00, 0.2373950E+00, 0.2228573E+00, &
     & 0.2078591E+00, 0.1882355E+00, 0.1535855E+00, 0.1535855E+00 /
! Solar Zenith Angle 35.0 Albedo -0.4448173E+04
      data (ref_adm(25,iz, 1, 8),iz = 1,20) / &
     & 0.2168553E+00, 0.2168553E+00, 0.2129746E+00, 0.2116304E+00, &
     & 0.2105678E+00, 0.2098411E+00, 0.2085602E+00, 0.2063780E+00, &
     & 0.2035752E+00, 0.2002189E+00, 0.1965686E+00, 0.1915006E+00, &
     & 0.1855854E+00, 0.1800152E+00, 0.1720160E+00, 0.1614820E+00, &
     & 0.1506143E+00, 0.1363951E+00, 0.1112878E+00, 0.1112878E+00 /
      data (ref_adm(25,iz, 2, 8),iz = 1,20) / &
     & 0.2168553E+00, 0.2168553E+00, 0.2129746E+00, 0.2116304E+00, &
     & 0.2105678E+00, 0.2098411E+00, 0.2085602E+00, 0.2063780E+00, &
     & 0.2035752E+00, 0.2002189E+00, 0.1965686E+00, 0.1915006E+00, &
     & 0.1855854E+00, 0.1800152E+00, 0.1720160E+00, 0.1614820E+00, &
     & 0.1506143E+00, 0.1363951E+00, 0.1112878E+00, 0.1112878E+00 /
      data (ref_adm(25,iz, 3, 8),iz = 1,20) / &
     & 0.2168553E+00, 0.2168553E+00, 0.2129746E+00, 0.2116304E+00, &
     & 0.2105678E+00, 0.2098411E+00, 0.2085602E+00, 0.2063780E+00, &
     & 0.2035752E+00, 0.2002189E+00, 0.1965686E+00, 0.1915006E+00, &
     & 0.1855854E+00, 0.1800152E+00, 0.1720160E+00, 0.1614820E+00, &
     & 0.1506143E+00, 0.1363951E+00, 0.1112878E+00, 0.1112878E+00 /
      data (ref_adm(25,iz, 4, 8),iz = 1,20) / &
     & 0.2168553E+00, 0.2168553E+00, 0.2129746E+00, 0.2116304E+00, &
     & 0.2105678E+00, 0.2098411E+00, 0.2085602E+00, 0.2063780E+00, &
     & 0.2035752E+00, 0.2002189E+00, 0.1965686E+00, 0.1915006E+00, &
     & 0.1855854E+00, 0.1800152E+00, 0.1720160E+00, 0.1614820E+00, &
     & 0.1506143E+00, 0.1363951E+00, 0.1112878E+00, 0.1112878E+00 /
      data (ref_adm(25,iz, 5, 8),iz = 1,20) / &
     & 0.2168553E+00, 0.2168553E+00, 0.2129746E+00, 0.2116304E+00, &
     & 0.2105678E+00, 0.2098411E+00, 0.2085602E+00, 0.2063780E+00, &
     & 0.2035752E+00, 0.2002189E+00, 0.1965686E+00, 0.1915006E+00, &
     & 0.1855854E+00, 0.1800152E+00, 0.1720160E+00, 0.1614820E+00, &
     & 0.1506143E+00, 0.1363951E+00, 0.1112878E+00, 0.1112878E+00 /
      data (ref_adm(25,iz, 6, 8),iz = 1,20) / &
     & 0.2168553E+00, 0.2168553E+00, 0.2129746E+00, 0.2116304E+00, &
     & 0.2105678E+00, 0.2098411E+00, 0.2085602E+00, 0.2063780E+00, &
     & 0.2035752E+00, 0.2002189E+00, 0.1965686E+00, 0.1915006E+00, &
     & 0.1855854E+00, 0.1800152E+00, 0.1720160E+00, 0.1614820E+00, &
     & 0.1506143E+00, 0.1363951E+00, 0.1112878E+00, 0.1112878E+00 /
      data (ref_adm(25,iz, 7, 8),iz = 1,20) / &
     & 0.2168553E+00, 0.2168553E+00, 0.2129746E+00, 0.2116304E+00, &
     & 0.2105678E+00, 0.2098411E+00, 0.2085602E+00, 0.2063780E+00, &
     & 0.2035752E+00, 0.2002189E+00, 0.1965686E+00, 0.1915006E+00, &
     & 0.1855854E+00, 0.1800152E+00, 0.1720160E+00, 0.1614820E+00, &
     & 0.1506143E+00, 0.1363951E+00, 0.1112878E+00, 0.1112878E+00 /
      data (ref_adm(25,iz, 8, 8),iz = 1,20) / &
     & 0.2168553E+00, 0.2168553E+00, 0.2129746E+00, 0.2116304E+00, &
     & 0.2105678E+00, 0.2098411E+00, 0.2085602E+00, 0.2063780E+00, &
     & 0.2035752E+00, 0.2002189E+00, 0.1965686E+00, 0.1915006E+00, &
     & 0.1855854E+00, 0.1800152E+00, 0.1720160E+00, 0.1614820E+00, &
     & 0.1506143E+00, 0.1363951E+00, 0.1112878E+00, 0.1112878E+00 /
      data (ref_adm(25,iz, 9, 8),iz = 1,20) / &
     & 0.2168553E+00, 0.2168553E+00, 0.2129746E+00, 0.2116304E+00, &
     & 0.2105678E+00, 0.2098411E+00, 0.2085602E+00, 0.2063780E+00, &
     & 0.2035752E+00, 0.2002189E+00, 0.1965686E+00, 0.1915006E+00, &
     & 0.1855854E+00, 0.1800152E+00, 0.1720160E+00, 0.1614820E+00, &
     & 0.1506143E+00, 0.1363951E+00, 0.1112878E+00, 0.1112878E+00 /
      data (ref_adm(25,iz,10, 8),iz = 1,20) / &
     & 0.2168553E+00, 0.2168553E+00, 0.2129746E+00, 0.2116304E+00, &
     & 0.2105678E+00, 0.2098411E+00, 0.2085602E+00, 0.2063780E+00, &
     & 0.2035752E+00, 0.2002189E+00, 0.1965686E+00, 0.1915006E+00, &
     & 0.1855854E+00, 0.1800152E+00, 0.1720160E+00, 0.1614820E+00, &
     & 0.1506143E+00, 0.1363951E+00, 0.1112878E+00, 0.1112878E+00 /
      data (ref_adm(25,iz,11, 8),iz = 1,20) / &
     & 0.2168553E+00, 0.2168553E+00, 0.2129746E+00, 0.2116304E+00, &
     & 0.2105678E+00, 0.2098411E+00, 0.2085602E+00, 0.2063780E+00, &
     & 0.2035752E+00, 0.2002189E+00, 0.1965686E+00, 0.1915006E+00, &
     & 0.1855854E+00, 0.1800152E+00, 0.1720160E+00, 0.1614820E+00, &
     & 0.1506143E+00, 0.1363951E+00, 0.1112878E+00, 0.1112878E+00 /
      data (ref_adm(25,iz,12, 8),iz = 1,20) / &
     & 0.2168553E+00, 0.2168553E+00, 0.2129746E+00, 0.2116304E+00, &
     & 0.2105678E+00, 0.2098411E+00, 0.2085602E+00, 0.2063780E+00, &
     & 0.2035752E+00, 0.2002189E+00, 0.1965686E+00, 0.1823300E+00, &
     & 0.1855854E+00, 0.1800152E+00, 0.1720160E+00, 0.1614820E+00, &
     & 0.1506143E+00, 0.1363951E+00, 0.1112878E+00, 0.1112878E+00 /
      data (ref_adm(25,iz,13, 8),iz = 1,20) / &
     & 0.2168553E+00, 0.2168553E+00, 0.2129746E+00, 0.2116304E+00, &
     & 0.2105678E+00, 0.2098411E+00, 0.2085602E+00, 0.2063780E+00, &
     & 0.2035752E+00, 0.2002189E+00, 0.1965686E+00, 0.1991800E+00, &
     & 0.1855854E+00, 0.1800152E+00, 0.1720160E+00, 0.1614820E+00, &
     & 0.1506143E+00, 0.1363951E+00, 0.1112878E+00, 0.1112878E+00 /
      data (ref_adm(25,iz,14, 8),iz = 1,20) / &
     & 0.2168553E+00, 0.2168553E+00, 0.2129746E+00, 0.2116304E+00, &
     & 0.2105678E+00, 0.2098411E+00, 0.2085602E+00, 0.2063780E+00, &
     & 0.2035752E+00, 0.2002189E+00, 0.1965686E+00, 0.1841000E+00, &
     & 0.1855854E+00, 0.1800152E+00, 0.1720160E+00, 0.1614820E+00, &
     & 0.1506143E+00, 0.1363951E+00, 0.1112878E+00, 0.1112878E+00 /
      data (ref_adm(25,iz,15, 8),iz = 1,20) / &
     & 0.2168553E+00, 0.2168553E+00, 0.2129746E+00, 0.2116304E+00, &
     & 0.2105678E+00, 0.2098411E+00, 0.2085602E+00, 0.2063780E+00, &
     & 0.2035752E+00, 0.2002189E+00, 0.1965686E+00, 0.1875100E+00, &
     & 0.1855854E+00, 0.1800152E+00, 0.1720160E+00, 0.1614820E+00, &
     & 0.1506143E+00, 0.1363951E+00, 0.1112878E+00, 0.1112878E+00 /
      data (ref_adm(25,iz,16, 8),iz = 1,20) / &
     & 0.2168553E+00, 0.2168553E+00, 0.2129746E+00, 0.2116304E+00, &
     & 0.2105678E+00, 0.2098411E+00, 0.2085602E+00, 0.2063780E+00, &
     & 0.2035752E+00, 0.2002189E+00, 0.1965686E+00, 0.1915006E+00, &
     & 0.1980700E+00, 0.1800152E+00, 0.1720160E+00, 0.1614820E+00, &
     & 0.1506143E+00, 0.1363951E+00, 0.1112878E+00, 0.1112878E+00 /
      data (ref_adm(25,iz,17, 8),iz = 1,20) / &
     & 0.2168553E+00, 0.2168553E+00, 0.2129746E+00, 0.2116304E+00, &
     & 0.2105678E+00, 0.2098411E+00, 0.2085602E+00, 0.2063780E+00, &
     & 0.2035752E+00, 0.2002189E+00, 0.1965686E+00, 0.1915006E+00, &
     & 0.1855854E+00, 0.1800152E+00, 0.1720160E+00, 0.1614820E+00, &
     & 0.1506143E+00, 0.1363951E+00, 0.1112878E+00, 0.1112878E+00 /
      data (ref_adm(25,iz,18, 8),iz = 1,20) / &
     & 0.1455255E+00, 0.1455255E+00, 0.1456074E+00, 0.1463815E+00, &
     & 0.1478757E+00, 0.1501133E+00, 0.1531447E+00, 0.1570621E+00, &
     & 0.1620263E+00, 0.1679460E+00, 0.1750339E+00, 0.1858328E+00, &
     & 0.1986058E+00, 0.2104465E+00, 0.2273784E+00, 0.2502670E+00, &
     & 0.2752411E+00, 0.3087293E+00, 0.3320478E+00, 0.3320478E+00 /
      data (ref_adm(25,iz,19, 8),iz = 1,20) / &
     & 0.1456655E+00, 0.1456655E+00, 0.1461072E+00, 0.1471422E+00, &
     & 0.1487903E+00, 0.1512128E+00, 0.1543743E+00, 0.1583416E+00, &
     & 0.1632391E+00, 0.1692523E+00, 0.1762186E+00, 0.1867508E+00, &
     & 0.1991993E+00, 0.2108392E+00, 0.2271819E+00, 0.2492327E+00, &
     & 0.2735801E+00, 0.3051714E+00, 0.3255781E+00, 0.3255781E+00 /
      data (ref_adm(25,iz,20, 8),iz = 1,20) / &
     & 0.1458044E+00, 0.1458044E+00, 0.1466154E+00, 0.1479733E+00, &
     & 0.1498782E+00, 0.1524643E+00, 0.1558262E+00, 0.1599202E+00, &
     & 0.1648417E+00, 0.1708025E+00, 0.1777544E+00, 0.1882348E+00, &
     & 0.2004638E+00, 0.2117459E+00, 0.2277916E+00, 0.2492750E+00, &
     & 0.2726833E+00, 0.3030273E+00, 0.3218249E+00, 0.3218249E+00 /
      data (ref_adm(25,iz,21, 8),iz = 1,20) / &
     & 0.1459438E+00, 0.1459438E+00, 0.1471225E+00, 0.1488066E+00, &
     & 0.1510545E+00, 0.1539028E+00, 0.1574422E+00, 0.1616960E+00, &
     & 0.1667783E+00, 0.1727462E+00, 0.1797124E+00, 0.1900642E+00, &
     & 0.2022318E+00, 0.2133866E+00, 0.2288926E+00, 0.2499079E+00, &
     & 0.2726887E+00, 0.3014657E+00, 0.3195312E+00, 0.3195312E+00 /
      data (ref_adm(25,iz,22, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,23, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,24, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,25, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,26, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,27, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,28, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,29, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,30, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,31, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,32, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,33, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,34, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,35, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,36, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,37, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(25,iz,38, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 40.0 Albedo  0.2253327E+00
      data (ref_adm(25,iz, 1, 9),iz = 1,20) / &
     & 0.2400893E+00, 0.2400893E+00, 0.2302811E+00, 0.2268958E+00, &
     & 0.2245234E+00, 0.2231687E+00, 0.2215060E+00, 0.2192995E+00, &
     & 0.2172356E+00, 0.2153192E+00, 0.2138460E+00, 0.2125645E+00, &
     & 0.2116016E+00, 0.2110610E+00, 0.2105514E+00, 0.2385200E+00, &
     & 0.2106552E+00, 0.2110787E+00, 0.2014489E+00, 0.2014489E+00 /
      data (ref_adm(25,iz, 2, 9),iz = 1,20) / &
     & 0.2400893E+00, 0.2400893E+00, 0.2302811E+00, 0.2268958E+00, &
     & 0.2245234E+00, 0.2231687E+00, 0.2215060E+00, 0.2192995E+00, &
     & 0.2172356E+00, 0.2153192E+00, 0.2138460E+00, 0.2125645E+00, &
     & 0.2116016E+00, 0.2110610E+00, 0.2105514E+00, 0.2385200E+00, &
     & 0.2106552E+00, 0.2110787E+00, 0.2014489E+00, 0.2014489E+00 /
      data (ref_adm(25,iz, 3, 9),iz = 1,20) / &
     & 0.2400893E+00, 0.2400893E+00, 0.2838200E+00, 0.2268958E+00, &
     & 0.2245234E+00, 0.2231687E+00, 0.2215060E+00, 0.2192995E+00, &
     & 0.2172356E+00, 0.2153192E+00, 0.2138460E+00, 0.2125645E+00, &
     & 0.2116016E+00, 0.2110610E+00, 0.2105514E+00, 0.2251200E+00, &
     & 0.2106552E+00, 0.2110787E+00, 0.6253274E-01, 0.6253274E-01 /
      data (ref_adm(25,iz, 4, 9),iz = 1,20) / &
     & 0.2400893E+00, 0.2400893E+00, 0.2302811E+00, 0.2268958E+00, &
     & 0.2245234E+00, 0.2231687E+00, 0.2215060E+00, 0.2192995E+00, &
     & 0.2172356E+00, 0.2153192E+00, 0.2138460E+00, 0.2125645E+00, &
     & 0.2116016E+00, 0.2110610E+00, 0.2105514E+00, 0.2103058E+00, &
     & 0.2106552E+00, 0.2110787E+00, 0.2014489E+00, 0.2014489E+00 /
      data (ref_adm(25,iz, 5, 9),iz = 1,20) / &
     & 0.1586000E+00, 0.1586000E+00, 0.2302811E+00, 0.3164100E+00, &
     & 0.2790500E+00, 0.2231687E+00, 0.2215060E+00, 0.2192995E+00, &
     & 0.2172356E+00, 0.2153192E+00, 0.2138460E+00, 0.2125645E+00, &
     & 0.2116016E+00, 0.2110610E+00, 0.2105514E+00, 0.2103058E+00, &
     & 0.2106552E+00, 0.2110787E+00, 0.2014489E+00, 0.2014489E+00 /
      data (ref_adm(25,iz, 6, 9),iz = 1,20) / &
     & 0.2400893E+00, 0.2400893E+00, 0.2302811E+00, 0.2268958E+00, &
     & 0.2245234E+00, 0.2231687E+00, 0.2215060E+00, 0.2192995E+00, &
     & 0.2172356E+00, 0.2153192E+00, 0.2138460E+00, 0.2125645E+00, &
     & 0.2116016E+00, 0.2110610E+00, 0.2105514E+00, 0.2103058E+00, &
     & 0.2106552E+00, 0.2110787E+00, 0.2014489E+00, 0.2014489E+00 /
      data (ref_adm(25,iz, 7, 9),iz = 1,20) / &
     & 0.2400893E+00, 0.2400893E+00, 0.2302811E+00, 0.2268958E+00, &
     & 0.2245234E+00, 0.2231687E+00, 0.2215060E+00, 0.2192995E+00, &
     & 0.2172356E+00, 0.2153192E+00, 0.2138460E+00, 0.2125645E+00, &
     & 0.2116016E+00, 0.2110610E+00, 0.2105514E+00, 0.2103058E+00, &
     & 0.2106552E+00, 0.2110787E+00, 0.2014489E+00, 0.2014489E+00 /
      data (ref_adm(25,iz, 8, 9),iz = 1,20) / &
     & 0.2400893E+00, 0.2400893E+00, 0.2302811E+00, 0.2268958E+00, &
     & 0.2245234E+00, 0.2231687E+00, 0.2215060E+00, 0.2192995E+00, &
     & 0.2172356E+00, 0.2153192E+00, 0.2138460E+00, 0.2125645E+00, &
     & 0.2116016E+00, 0.2110610E+00, 0.2105514E+00, 0.2103058E+00, &
     & 0.2106552E+00, 0.2110787E+00, 0.2014489E+00, 0.2014489E+00 /
      data (ref_adm(25,iz, 9, 9),iz = 1,20) / &
     & 0.2400893E+00, 0.2400893E+00, 0.2302811E+00, 0.2268958E+00, &
     & 0.2245234E+00, 0.2231687E+00, 0.2215060E+00, 0.2192995E+00, &
     & 0.2172356E+00, 0.2153192E+00, 0.2138460E+00, 0.2125645E+00, &
     & 0.2116016E+00, 0.2110610E+00, 0.2105514E+00, 0.2103058E+00, &
     & 0.2106552E+00, 0.2110787E+00, 0.2014489E+00, 0.2014489E+00 /
      data (ref_adm(25,iz,10, 9),iz = 1,20) / &
     & 0.2400893E+00, 0.2400893E+00, 0.2302811E+00, 0.2268958E+00, &
     & 0.2245234E+00, 0.2231687E+00, 0.2215060E+00, 0.2192995E+00, &
     & 0.2172356E+00, 0.2153192E+00, 0.2138460E+00, 0.2125645E+00, &
     & 0.2116016E+00, 0.2110610E+00, 0.2105514E+00, 0.2103058E+00, &
     & 0.2106552E+00, 0.2110787E+00, 0.2014489E+00, 0.2014489E+00 /
      data (ref_adm(25,iz,11, 9),iz = 1,20) / &
     & 0.2400893E+00, 0.2400893E+00, 0.2302811E+00, 0.2268958E+00, &
     & 0.2245234E+00, 0.2231687E+00, 0.2215060E+00, 0.2192995E+00, &
     & 0.2172356E+00, 0.2153192E+00, 0.2138460E+00, 0.2125645E+00, &
     & 0.2116016E+00, 0.2547100E+00, 0.2391900E+00, 0.2103058E+00, &
     & 0.2106552E+00, 0.2110787E+00, 0.2014489E+00, 0.2014489E+00 /
      data (ref_adm(25,iz,12, 9),iz = 1,20) / &
     & 0.2400893E+00, 0.2400893E+00, 0.2302811E+00, 0.2268958E+00, &
     & 0.2245234E+00, 0.2231687E+00, 0.2215060E+00, 0.2192995E+00, &
     & 0.2172356E+00, 0.2153192E+00, 0.2138460E+00, 0.2125645E+00, &
     & 0.2116016E+00, 0.2110610E+00, 0.2105514E+00, 0.2103058E+00, &
     & 0.2106552E+00, 0.2110787E+00, 0.2014489E+00, 0.2014489E+00 /
      data (ref_adm(25,iz,13, 9),iz = 1,20) / &
     & 0.2400893E+00, 0.2400893E+00, 0.2488300E+00, 0.2611000E+00, &
     & 0.1498100E+00, 0.1970300E+00, 0.1740900E+00, 0.2192995E+00, &
     & 0.2172356E+00, 0.2153192E+00, 0.2194200E+00, 0.2570000E+00, &
     & 0.2144300E+00, 0.2110610E+00, 0.2105514E+00, 0.2103058E+00, &
     & 0.2106552E+00, 0.2110787E+00, 0.2014489E+00, 0.2014489E+00 /
      data (ref_adm(25,iz,14, 9),iz = 1,20) / &
     & 0.2089000E+00, 0.2089000E+00, 0.2302811E+00, 0.1838800E+00, &
     & 0.2245234E+00, 0.1666800E+00, 0.1693300E+00, 0.2192995E+00, &
     & 0.1804800E+00, 0.2153192E+00, 0.1738900E+00, 0.2198400E+00, &
     & 0.2062500E+00, 0.2456400E+00, 0.2105514E+00, 0.2103058E+00, &
     & 0.2106552E+00, 0.2110787E+00, 0.2014489E+00, 0.2014489E+00 /
      data (ref_adm(25,iz,15, 9),iz = 1,20) / &
     & 0.2400893E+00, 0.2400893E+00, 0.2302811E+00, 0.2268958E+00, &
     & 0.2245234E+00, 0.2257300E+00, 0.2215060E+00, 0.2192995E+00, &
     & 0.2172356E+00, 0.2153192E+00, 0.2138460E+00, 0.2125645E+00, &
     & 0.2116016E+00, 0.2243000E+00, 0.2105514E+00, 0.2103058E+00, &
     & 0.2106552E+00, 0.2110787E+00, 0.2014489E+00, 0.2014489E+00 /
      data (ref_adm(25,iz,16, 9),iz = 1,20) / &
     & 0.2400893E+00, 0.2400893E+00, 0.2302811E+00, 0.2268958E+00, &
     & 0.2245234E+00, 0.2231687E+00, 0.2215060E+00, 0.2244600E+00, &
     & 0.2172356E+00, 0.2153192E+00, 0.2138460E+00, 0.2125645E+00, &
     & 0.2116016E+00, 0.2110610E+00, 0.2105514E+00, 0.2103058E+00, &
     & 0.2106552E+00, 0.2110787E+00, 0.2014489E+00, 0.2014489E+00 /
      data (ref_adm(25,iz,17, 9),iz = 1,20) / &
     & 0.2400893E+00, 0.2400893E+00, 0.2302811E+00, 0.2268958E+00, &
     & 0.2245234E+00, 0.2231687E+00, 0.2215060E+00, 0.2192995E+00, &
     & 0.2172356E+00, 0.2153192E+00, 0.2138460E+00, 0.2125645E+00, &
     & 0.2116016E+00, 0.2110610E+00, 0.2105514E+00, 0.2103058E+00, &
     & 0.2106552E+00, 0.2110787E+00, 0.2014489E+00, 0.2014489E+00 /
      data (ref_adm(25,iz,18, 9),iz = 1,20) / &
     & 0.2023190E+00, 0.2023190E+00, 0.2013592E+00, 0.2003205E+00, &
     & 0.1992738E+00, 0.1983915E+00, 0.1978470E+00, 0.1978180E+00, &
     & 0.1982617E+00, 0.1994424E+00, 0.2011749E+00, 0.2042485E+00, &
     & 0.2084399E+00, 0.2126122E+00, 0.2182794E+00, 0.2258485E+00, &
     & 0.2334679E+00, 0.2420736E+00, 0.2389514E+00, 0.2389514E+00 /
      data (ref_adm(25,iz,19, 9),iz = 1,20) / &
     & 0.2071100E+00, 0.2071100E+00, 0.1996500E+00, 0.2013232E+00, &
     & 0.2005481E+00, 0.1596100E+00, 0.1994225E+00, 0.1993812E+00, &
     & 0.1998356E+00, 0.2008699E+00, 0.2025781E+00, 0.2054421E+00, &
     & 0.2093152E+00, 0.2132140E+00, 0.2186543E+00, 0.2258213E+00, &
     & 0.2330490E+00, 0.2412048E+00, 0.2372138E+00, 0.2372138E+00 /
      data (ref_adm(25,iz,20, 9),iz = 1,20) / &
     & 0.2026376E+00, 0.2026376E+00, 0.2026301E+00, 0.2023467E+00, &
     & 0.2019145E+00, 0.2014267E+00, 0.2011156E+00, 0.2010848E+00, &
     & 0.2015765E+00, 0.2025036E+00, 0.2041123E+00, 0.2068624E+00, &
     & 0.2103970E+00, 0.2139779E+00, 0.2192238E+00, 0.2259189E+00, &
     & 0.2328327E+00, 0.2402981E+00, 0.2360554E+00, 0.2360554E+00 /
      data (ref_adm(25,iz,21, 9),iz = 1,20) / &
     & 0.2028056E+00, 0.2028056E+00, 0.2032312E+00, 0.2034114E+00, &
     & 0.2033128E+00, 0.2030904E+00, 0.2030176E+00, 0.2029952E+00, &
     & 0.2034517E+00, 0.2043318E+00, 0.2057501E+00, 0.2084765E+00, &
     & 0.2298800E+00, 0.2150874E+00, 0.1851700E+00, 0.2262982E+00, &
     & 0.2328494E+00, 0.2397032E+00, 0.2351341E+00, 0.2351341E+00 /
      data (ref_adm(25,iz,22, 9),iz = 1,20) / &
     & 0.2698445E+00, 0.2698445E+00, 0.2650157E+00, 0.2633429E+00, &
     & 0.2620207E+00, 0.2611164E+00, 0.2233100E+00, 0.2514800E+00, &
     & 0.2533194E+00, 0.2491430E+00, 0.2446007E+00, 0.2382944E+00, &
     & 0.2309338E+00, 0.2240025E+00, 0.2140487E+00, 0.2009406E+00, &
     & 0.1874174E+00, 0.1697236E+00, 0.1384813E+00, 0.1384813E+00 /
      data (ref_adm(25,iz,23, 9),iz = 1,20) / &
     & 0.2698445E+00, 0.2698445E+00, 0.2650157E+00, 0.2633429E+00, &
     & 0.2265500E+00, 0.2611164E+00, 0.2595226E+00, 0.2568071E+00, &
     & 0.2533194E+00, 0.2491430E+00, 0.2446007E+00, 0.2382944E+00, &
     & 0.2309338E+00, 0.2240025E+00, 0.2140487E+00, 0.2009406E+00, &
     & 0.1874174E+00, 0.1697236E+00, 0.1384813E+00, 0.1384813E+00 /
      data (ref_adm(25,iz,24, 9),iz = 1,20) / &
     & 0.2698445E+00, 0.2698445E+00, 0.2650157E+00, 0.2633429E+00, &
     & 0.2620207E+00, 0.2611164E+00, 0.2595226E+00, 0.2568071E+00, &
     & 0.2533194E+00, 0.1807800E+00, 0.2446007E+00, 0.2382944E+00, &
     & 0.2309338E+00, 0.2240025E+00, 0.2140487E+00, 0.2009406E+00, &
     & 0.1874174E+00, 0.1697236E+00, 0.1384813E+00, 0.1384813E+00 /
      data (ref_adm(25,iz,25, 9),iz = 1,20) / &
     & 0.2698445E+00, 0.2698445E+00, 0.2650157E+00, 0.2633429E+00, &
     & 0.2620207E+00, 0.2611164E+00, 0.2595226E+00, 0.2568071E+00, &
     & 0.2533194E+00, 0.1838200E+00, 0.2117800E+00, 0.2382944E+00, &
     & 0.2309338E+00, 0.2240025E+00, 0.2140487E+00, 0.2009406E+00, &
     & 0.1874174E+00, 0.1697236E+00, 0.1384813E+00, 0.1384813E+00 /
      data (ref_adm(25,iz,26, 9),iz = 1,20) / &
     & 0.2698445E+00, 0.2698445E+00, 0.2650157E+00, 0.2633429E+00, &
     & 0.2620207E+00, 0.2611164E+00, 0.2595226E+00, 0.2568071E+00, &
     & 0.2533194E+00, 0.2491430E+00, 0.2446007E+00, 0.2382944E+00, &
     & 0.2309338E+00, 0.2240025E+00, 0.2140487E+00, 0.2009406E+00, &
     & 0.1874174E+00, 0.1697236E+00, 0.1384813E+00, 0.1384813E+00 /
      data (ref_adm(25,iz,27, 9),iz = 1,20) / &
     & 0.3300700E+00, 0.3300700E+00, 0.2650157E+00, 0.2633429E+00, &
     & 0.2255800E+00, 0.2611164E+00, 0.2595226E+00, 0.2568071E+00, &
     & 0.2533194E+00, 0.2719400E+00, 0.2446007E+00, 0.2382944E+00, &
     & 0.2309338E+00, 0.2240025E+00, 0.2140487E+00, 0.2009406E+00, &
     & 0.1874174E+00, 0.1697236E+00, 0.1384813E+00, 0.1384813E+00 /
      data (ref_adm(25,iz,28, 9),iz = 1,20) / &
     & 0.2698445E+00, 0.2698445E+00, 0.2650157E+00, 0.2633429E+00, &
     & 0.1906700E+00, 0.2611164E+00, 0.2012900E+00, 0.2568071E+00, &
     & 0.3263300E+00, 0.3161600E+00, 0.2446007E+00, 0.2382944E+00, &
     & 0.2309338E+00, 0.2240025E+00, 0.2140487E+00, 0.2009406E+00, &
     & 0.1874174E+00, 0.1697236E+00, 0.1384813E+00, 0.1384813E+00 /
      data (ref_adm(25,iz,29, 9),iz = 1,20) / &
     & 0.2698445E+00, 0.2698445E+00, 0.2650157E+00, 0.2633429E+00, &
     & 0.2620207E+00, 0.2611164E+00, 0.2595226E+00, 0.2568071E+00, &
     & 0.2533194E+00, 0.2491430E+00, 0.2446007E+00, 0.2382944E+00, &
     & 0.2309338E+00, 0.2240025E+00, 0.2140487E+00, 0.2009406E+00, &
     & 0.1874174E+00, 0.1697236E+00, 0.1384813E+00, 0.1384813E+00 /
      data (ref_adm(25,iz,30, 9),iz = 1,20) / &
     & 0.2698445E+00, 0.2698445E+00, 0.2650157E+00, 0.2633429E+00, &
     & 0.2620207E+00, 0.2611164E+00, 0.2595226E+00, 0.2568071E+00, &
     & 0.2533194E+00, 0.2491430E+00, 0.2446007E+00, 0.2382944E+00, &
     & 0.2309338E+00, 0.2240025E+00, 0.2140487E+00, 0.2009406E+00, &
     & 0.1874174E+00, 0.1697236E+00, 0.1384813E+00, 0.1384813E+00 /
      data (ref_adm(25,iz,31, 9),iz = 1,20) / &
     & 0.2698445E+00, 0.2698445E+00, 0.2650157E+00, 0.2633429E+00, &
     & 0.2620207E+00, 0.2611164E+00, 0.2595226E+00, 0.2568071E+00, &
     & 0.2533194E+00, 0.2491430E+00, 0.2446007E+00, 0.2382944E+00, &
     & 0.2309338E+00, 0.2240025E+00, 0.2140487E+00, 0.2009406E+00, &
     & 0.1874174E+00, 0.1697236E+00, 0.1384813E+00, 0.1384813E+00 /
      data (ref_adm(25,iz,32, 9),iz = 1,20) / &
     & 0.2698445E+00, 0.2698445E+00, 0.2650157E+00, 0.2633429E+00, &
     & 0.2620207E+00, 0.2611164E+00, 0.2595226E+00, 0.2568071E+00, &
     & 0.2533194E+00, 0.2491430E+00, 0.2446007E+00, 0.2382944E+00, &
     & 0.2309338E+00, 0.2240025E+00, 0.2140487E+00, 0.2009406E+00, &
     & 0.1874174E+00, 0.1697236E+00, 0.1384813E+00, 0.1384813E+00 /
      data (ref_adm(25,iz,33, 9),iz = 1,20) / &
     & 0.2698445E+00, 0.2698445E+00, 0.2650157E+00, 0.2633429E+00, &
     & 0.2620207E+00, 0.2611164E+00, 0.2595226E+00, 0.2568071E+00, &
     & 0.2533194E+00, 0.2491430E+00, 0.2446007E+00, 0.2382944E+00, &
     & 0.2309338E+00, 0.2240025E+00, 0.2140487E+00, 0.2009406E+00, &
     & 0.1874174E+00, 0.1697236E+00, 0.1384813E+00, 0.1384813E+00 /
      data (ref_adm(25,iz,34, 9),iz = 1,20) / &
     & 0.2698445E+00, 0.2698445E+00, 0.2650157E+00, 0.2633429E+00, &
     & 0.2620207E+00, 0.2611164E+00, 0.2595226E+00, 0.2568071E+00, &
     & 0.2533194E+00, 0.2491430E+00, 0.2446007E+00, 0.2382944E+00, &
     & 0.2309338E+00, 0.2240025E+00, 0.2140487E+00, 0.2009406E+00, &
     & 0.1874174E+00, 0.1697236E+00, 0.1384813E+00, 0.1384813E+00 /
      data (ref_adm(25,iz,35, 9),iz = 1,20) / &
     & 0.2698445E+00, 0.2698445E+00, 0.2650157E+00, 0.2633429E+00, &
     & 0.2620207E+00, 0.2611164E+00, 0.2595226E+00, 0.2568071E+00, &
     & 0.2533194E+00, 0.2491430E+00, 0.2446007E+00, 0.2382944E+00, &
     & 0.2309338E+00, 0.2240025E+00, 0.2140487E+00, 0.2009406E+00, &
     & 0.1874174E+00, 0.1697236E+00, 0.1384813E+00, 0.1384813E+00 /
      data (ref_adm(25,iz,36, 9),iz = 1,20) / &
     & 0.2698445E+00, 0.2698445E+00, 0.2650157E+00, 0.2633429E+00, &
     & 0.2620207E+00, 0.2611164E+00, 0.2595226E+00, 0.2568071E+00, &
     & 0.2533194E+00, 0.2491430E+00, 0.2446007E+00, 0.2382944E+00, &
     & 0.2309338E+00, 0.3875900E+00, 0.2140487E+00, 0.2009406E+00, &
     & 0.1874174E+00, 0.1697236E+00, 0.1384813E+00, 0.1384813E+00 /
      data (ref_adm(25,iz,37, 9),iz = 1,20) / &
     & 0.2698445E+00, 0.2698445E+00, 0.2650157E+00, 0.2633429E+00, &
     & 0.2620207E+00, 0.2611164E+00, 0.2595226E+00, 0.2568071E+00, &
     & 0.2533194E+00, 0.2491430E+00, 0.2446007E+00, 0.2382944E+00, &
     & 0.2309338E+00, 0.2240025E+00, 0.2140487E+00, 0.2009406E+00, &
     & 0.1874174E+00, 0.1697236E+00, 0.1384813E+00, 0.1384813E+00 /
      data (ref_adm(25,iz,38, 9),iz = 1,20) / &
     & 0.2698445E+00, 0.2698445E+00, 0.2650157E+00, 0.2633429E+00, &
     & 0.2620207E+00, 0.2611164E+00, 0.2595226E+00, 0.2568071E+00, &
     & 0.2533194E+00, 0.2491430E+00, 0.2446007E+00, 0.2382944E+00, &
     & 0.2309338E+00, 0.2240025E+00, 0.2140487E+00, 0.2009406E+00, &
     & 0.1874174E+00, 0.1697236E+00, 0.1384813E+00, 0.1384813E+00 /
! Solar Zenith Angle 45.0 Albedo  0.2706499E+00
      data (ref_adm(25,iz, 1,10),iz = 1,20) / &
     & 0.2642500E+00, 0.2642500E+00, 0.2216300E+00, 0.1893600E+00, &
     & 0.2012700E+00, 0.2410700E+00, 0.2677157E+00, 0.2648125E+00, &
     & 0.2627742E+00, 0.2612796E+00, 0.2616327E+00, 0.2641596E+00, &
     & 0.2680903E+00, 0.2726770E+00, 0.2789615E+00, 0.2859874E+00, &
     & 0.2905510E+00, 0.2855510E+00, 0.2492049E+00, 0.2492049E+00 /
      data (ref_adm(25,iz, 2,10),iz = 1,20) / &
     & 0.2642500E+00, 0.2642500E+00, 0.2216300E+00, 0.1893600E+00, &
     & 0.2012700E+00, 0.2410700E+00, 0.2677157E+00, 0.2648125E+00, &
     & 0.2627742E+00, 0.2612796E+00, 0.2616327E+00, 0.2641596E+00, &
     & 0.2680903E+00, 0.2726770E+00, 0.2789615E+00, 0.2859874E+00, &
     & 0.2905510E+00, 0.2855510E+00, 0.2492049E+00, 0.2492049E+00 /
      data (ref_adm(25,iz, 3,10),iz = 1,20) / &
     & 0.2134400E+00, 0.2134400E+00, 0.1991700E+00, 0.2651000E+00, &
     & 0.3439400E+00, 0.2664461E+00, 0.2677157E+00, 0.2648125E+00, &
     & 0.2627742E+00, 0.2612796E+00, 0.1822500E+00, 0.2641596E+00, &
     & 0.2680903E+00, 0.2726770E+00, 0.2789615E+00, 0.2859875E+00, &
     & 0.2905510E+00, 0.2855511E+00, 0.6890824E-01, 0.6890824E-01 /
      data (ref_adm(25,iz, 4,10),iz = 1,20) / &
     & 0.5607500E+00, 0.5607500E+00, 0.5661700E+00, 0.1812500E+00, &
     & 0.2446900E+00, 0.1563600E+00, 0.1695300E+00, 0.2648125E+00, &
     & 0.2627742E+00, 0.2612796E+00, 0.2616327E+00, 0.2641596E+00, &
     & 0.2680903E+00, 0.2726770E+00, 0.3012900E+00, 0.2854500E+00, &
     & 0.2905510E+00, 0.2855510E+00, 0.2492049E+00, 0.2492049E+00 /
      data (ref_adm(25,iz, 5,10),iz = 1,20) / &
     & 0.5698600E+00, 0.5698600E+00, 0.5680200E+00, 0.2143100E+00, &
     & 0.2612633E+00, 0.2664461E+00, 0.2677157E+00, 0.2480400E+00, &
     & 0.2516900E+00, 0.1635200E+00, 0.1963100E+00, 0.2641596E+00, &
     & 0.2680903E+00, 0.2222800E+00, 0.2789615E+00, 0.2859875E+00, &
     & 0.2905510E+00, 0.2855511E+00, 0.2492049E+00, 0.2492049E+00 /
      data (ref_adm(25,iz, 6,10),iz = 1,20) / &
     & 0.5755800E+00, 0.5755800E+00, 0.2401700E+00, 0.2531000E+00, &
     & 0.2612633E+00, 0.2731300E+00, 0.2719800E+00, 0.3348300E+00, &
     & 0.2160300E+00, 0.3393600E+00, 0.2541200E+00, 0.2641596E+00, &
     & 0.2680903E+00, 0.2726770E+00, 0.2789615E+00, 0.2859874E+00, &
     & 0.2905510E+00, 0.2855510E+00, 0.2492049E+00, 0.2492049E+00 /
      data (ref_adm(25,iz, 7,10),iz = 1,20) / &
     & 0.3018841E+00, 0.3018841E+00, 0.1877400E+00, 0.1846600E+00, &
     & 0.2612633E+00, 0.2664461E+00, 0.2677157E+00, 0.3468200E+00, &
     & 0.1841300E+00, 0.2487000E+00, 0.1987400E+00, 0.2641596E+00, &
     & 0.2680903E+00, 0.2726770E+00, 0.2789615E+00, 0.2859875E+00, &
     & 0.2905510E+00, 0.2855511E+00, 0.2492049E+00, 0.2492049E+00 /
      data (ref_adm(25,iz, 8,10),iz = 1,20) / &
     & 0.2456400E+00, 0.2456400E+00, 0.2111300E+00, 0.1852600E+00, &
     & 0.1713900E+00, 0.1685600E+00, 0.1726900E+00, 0.2648125E+00, &
     & 0.3644900E+00, 0.2612796E+00, 0.5892300E+00, 0.4311500E+00, &
     & 0.2680903E+00, 0.1917200E+00, 0.2227900E+00, 0.3272200E+00, &
     & 0.2905510E+00, 0.2855510E+00, 0.2492049E+00, 0.2492049E+00 /
      data (ref_adm(25,iz, 9,10),iz = 1,20) / &
     & 0.2946400E+00, 0.2946400E+00, 0.2918600E+00, 0.2599362E+00, &
     & 0.2612633E+00, 0.2664461E+00, 0.1649600E+00, 0.1641000E+00, &
     & 0.2627742E+00, 0.2612796E+00, 0.2616327E+00, 0.2680400E+00, &
     & 0.2052600E+00, 0.2726770E+00, 0.2789615E+00, 0.2859875E+00, &
     & 0.2905510E+00, 0.2855511E+00, 0.2492049E+00, 0.2492049E+00 /
      data (ref_adm(25,iz,10,10),iz = 1,20) / &
     & 0.2566000E+00, 0.2566000E+00, 0.2625409E+00, 0.2599362E+00, &
     & 0.2287600E+00, 0.2334800E+00, 0.1580800E+00, 0.1522300E+00, &
     & 0.2627742E+00, 0.2612796E+00, 0.2616327E+00, 0.4663400E+00, &
     & 0.2680903E+00, 0.2726770E+00, 0.2789615E+00, 0.2859874E+00, &
     & 0.2905510E+00, 0.2855510E+00, 0.2492049E+00, 0.2492049E+00 /
      data (ref_adm(25,iz,11,10),iz = 1,20) / &
     & 0.3018841E+00, 0.3018841E+00, 0.1961100E+00, 0.3307500E+00, &
     & 0.2612633E+00, 0.2664461E+00, 0.2677157E+00, 0.2648125E+00, &
     & 0.2627742E+00, 0.2612796E+00, 0.2616327E+00, 0.4843700E+00, &
     & 0.2375100E+00, 0.2726770E+00, 0.2789615E+00, 0.3852600E+00, &
     & 0.2905510E+00, 0.2855511E+00, 0.2492049E+00, 0.2492049E+00 /
      data (ref_adm(25,iz,12,10),iz = 1,20) / &
     & 0.3018841E+00, 0.3018841E+00, 0.1956300E+00, 0.2116400E+00, &
     & 0.2612633E+00, 0.2664461E+00, 0.2677157E+00, 0.2648125E+00, &
     & 0.2627742E+00, 0.2612796E+00, 0.2244500E+00, 0.2254800E+00, &
     & 0.2680903E+00, 0.2128200E+00, 0.2789615E+00, 0.2859874E+00, &
     & 0.2905510E+00, 0.2855510E+00, 0.2492049E+00, 0.2492049E+00 /
      data (ref_adm(25,iz,13,10),iz = 1,20) / &
     & 0.2572400E+00, 0.2572400E+00, 0.2436900E+00, 0.2494900E+00, &
     & 0.2558800E+00, 0.2245500E+00, 0.2156800E+00, 0.1814700E+00, &
     & 0.5546900E+00, 0.2255500E+00, 0.2616327E+00, 0.2617300E+00, &
     & 0.2436500E+00, 0.2408600E+00, 0.2789615E+00, 0.2859875E+00, &
     & 0.2905510E+00, 0.2855511E+00, 0.2492049E+00, 0.2492049E+00 /
      data (ref_adm(25,iz,14,10),iz = 1,20) / &
     & 0.3198700E+00, 0.3198700E+00, 0.3261500E+00, 0.2939500E+00, &
     & 0.3054600E+00, 0.2341200E+00, 0.2306000E+00, 0.2452700E+00, &
     & 0.2629700E+00, 0.2246800E+00, 0.2242200E+00, 0.2283200E+00, &
     & 0.1971300E+00, 0.2415100E+00, 0.2789615E+00, 0.2859874E+00, &
     & 0.2905510E+00, 0.2855510E+00, 0.2492049E+00, 0.2492049E+00 /
      data (ref_adm(25,iz,15,10),iz = 1,20) / &
     & 0.3309900E+00, 0.3309900E+00, 0.2782300E+00, 0.3779900E+00, &
     & 0.2194100E+00, 0.3346700E+00, 0.1444900E+00, 0.5772000E+00, &
     & 0.2500000E+00, 0.2516700E+00, 0.2323400E+00, 0.2172300E+00, &
     & 0.2090100E+00, 0.2130200E+00, 0.1857900E+00, 0.2859875E+00, &
     & 0.2905510E+00, 0.2855511E+00, 0.2492049E+00, 0.2492049E+00 /
      data (ref_adm(25,iz,16,10),iz = 1,20) / &
     & 0.2759300E+00, 0.2759300E+00, 0.2625409E+00, 0.3872300E+00, &
     & 0.4097400E+00, 0.5550700E+00, 0.2677157E+00, 0.2648125E+00, &
     & 0.2627742E+00, 0.2612796E+00, 0.2616327E+00, 0.2332400E+00, &
     & 0.1995500E+00, 0.2218900E+00, 0.2789615E+00, 0.2859874E+00, &
     & 0.2905510E+00, 0.2855510E+00, 0.2492049E+00, 0.2492049E+00 /
      data (ref_adm(25,iz,17,10),iz = 1,20) / &
     & 0.2539700E+00, 0.2539700E+00, 0.1873000E+00, 0.2599362E+00, &
     & 0.2286900E+00, 0.2664461E+00, 0.2677157E+00, 0.2648125E+00, &
     & 0.2627742E+00, 0.2612796E+00, 0.2616327E+00, 0.2641596E+00, &
     & 0.1850000E+00, 0.2726770E+00, 0.2789615E+00, 0.2859875E+00, &
     & 0.2905510E+00, 0.2855511E+00, 0.2492049E+00, 0.2492049E+00 /
      data (ref_adm(25,iz,18,10),iz = 1,20) / &
     & 0.3170200E+00, 0.3170200E+00, 0.2748229E+00, 0.2450200E+00, &
     & 0.3180900E+00, 0.2699779E+00, 0.2675654E+00, 0.1917500E+00, &
     & 0.2165500E+00, 0.2591459E+00, 0.2573733E+00, 0.2561323E+00, &
     & 0.2115000E+00, 0.2072300E+00, 0.2126300E+00, 0.2547482E+00, &
     & 0.2544107E+00, 0.2516791E+00, 0.2340010E+00, 0.2340010E+00 /
      data (ref_adm(25,iz,19,10),iz = 1,20) / &
     & 0.2794431E+00, 0.2794431E+00, 0.3516600E+00, 0.2557600E+00, &
     & 0.2707072E+00, 0.2703199E+00, 0.2123500E+00, 0.2649029E+00, &
     & 0.2618612E+00, 0.2116000E+00, 0.1902900E+00, 0.2563979E+00, &
     & 0.2048400E+00, 0.2131500E+00, 0.2364100E+00, 0.2547903E+00, &
     & 0.2544054E+00, 0.2515944E+00, 0.2337879E+00, 0.2337879E+00 /
      data (ref_adm(25,iz,20,10),iz = 1,20) / &
     & 0.2048300E+00, 0.2048300E+00, 0.2754506E+00, 0.2092700E+00, &
     & 0.1794000E+00, 0.2484900E+00, 0.2367500E+00, 0.2652980E+00, &
     & 0.2624550E+00, 0.2599288E+00, 0.2580880E+00, 0.2566113E+00, &
     & 0.2555652E+00, 0.2550823E+00, 0.2550519E+00, 0.2548001E+00, &
     & 0.2541740E+00, 0.2513248E+00, 0.2335997E+00, 0.2335997E+00 /
      data (ref_adm(25,iz,21,10),iz = 1,20) / &
     & 0.2797808E+00, 0.2797808E+00, 0.2757995E+00, 0.3587100E+00, &
     & 0.3640000E+00, 0.2163700E+00, 0.2107600E+00, 0.3833600E+00, &
     & 0.2223600E+00, 0.2603768E+00, 0.1754900E+00, 0.1939800E+00, &
     & 0.2557584E+00, 0.2604000E+00, 0.2551059E+00, 0.2547864E+00, &
     & 0.2541829E+00, 0.2511346E+00, 0.2334563E+00, 0.2334563E+00 /
      data (ref_adm(25,iz,22,10),iz = 1,20) / &
     & 0.3203404E+00, 0.3203404E+00, 0.2704976E+00, 0.2684758E+00, &
     & 0.2713095E+00, 0.2682200E+00, 0.2935400E+00, 0.3651200E+00, &
     & 0.3909300E+00, 0.2075900E+00, 0.2771317E+00, 0.2412200E+00, &
     & 0.2477500E+00, 0.2909317E+00, 0.2959327E+00, 0.2987370E+00, &
     & 0.2963732E+00, 0.2822086E+00, 0.2386853E+00, 0.2386853E+00 /
      data (ref_adm(25,iz,23,10),iz = 1,20) / &
     & 0.3203405E+00, 0.3203405E+00, 0.4209800E+00, 0.2684758E+00, &
     & 0.4568800E+00, 0.4491400E+00, 0.3003000E+00, 0.3121900E+00, &
     & 0.2817000E+00, 0.1907600E+00, 0.2771317E+00, 0.2811302E+00, &
     & 0.2008300E+00, 0.2233000E+00, 0.2959327E+00, 0.2987370E+00, &
     & 0.2963732E+00, 0.2822087E+00, 0.2386853E+00, 0.2386853E+00 /
      data (ref_adm(25,iz,24,10),iz = 1,20) / &
     & 0.3203404E+00, 0.3203404E+00, 0.3008800E+00, 0.2564500E+00, &
     & 0.4189300E+00, 0.3068100E+00, 0.2891300E+00, 0.2782192E+00, &
     & 0.2765266E+00, 0.2756834E+00, 0.2257300E+00, 0.2487000E+00, &
     & 0.2861320E+00, 0.1975900E+00, 0.2959327E+00, 0.2987370E+00, &
     & 0.2963732E+00, 0.2822086E+00, 0.2386853E+00, 0.2386853E+00 /
      data (ref_adm(25,iz,25,10),iz = 1,20) / &
     & 0.2161200E+00, 0.2161200E+00, 0.2704977E+00, 0.3040600E+00, &
     & 0.2713095E+00, 0.2788630E+00, 0.2413100E+00, 0.2228700E+00, &
     & 0.2331500E+00, 0.2975800E+00, 0.1938700E+00, 0.2811302E+00, &
     & 0.2335400E+00, 0.2909317E+00, 0.2959327E+00, 0.2987370E+00, &
     & 0.2963732E+00, 0.2822087E+00, 0.2386853E+00, 0.2386853E+00 /
      data (ref_adm(25,iz,26,10),iz = 1,20) / &
     & 0.3631400E+00, 0.3631400E+00, 0.2445000E+00, 0.1970200E+00, &
     & 0.2661700E+00, 0.2603400E+00, 0.2811936E+00, 0.2780900E+00, &
     & 0.2197300E+00, 0.2436500E+00, 0.2771317E+00, 0.2811302E+00, &
     & 0.5444100E+00, 0.2909317E+00, 0.2959327E+00, 0.2987370E+00, &
     & 0.2397500E+00, 0.2822086E+00, 0.2386853E+00, 0.2386853E+00 /
      data (ref_adm(25,iz,27,10),iz = 1,20) / &
     & 0.2534700E+00, 0.2534700E+00, 0.3545600E+00, 0.2640900E+00, &
     & 0.2324000E+00, 0.3288100E+00, 0.3522100E+00, 0.2816100E+00, &
     & 0.2493500E+00, 0.3088600E+00, 0.2771317E+00, 0.2811302E+00, &
     & 0.2861320E+00, 0.3350000E+00, 0.2959327E+00, 0.2987370E+00, &
     & 0.2963732E+00, 0.2822087E+00, 0.2386853E+00, 0.2386853E+00 /
      data (ref_adm(25,iz,28,10),iz = 1,20) / &
     & 0.2927400E+00, 0.2927400E+00, 0.2954100E+00, 0.3073700E+00, &
     & 0.2031100E+00, 0.3943600E+00, 0.1920800E+00, 0.2782192E+00, &
     & 0.2854100E+00, 0.2756834E+00, 0.3686900E+00, 0.2623600E+00, &
     & 0.3686800E+00, 0.2909317E+00, 0.2959327E+00, 0.2987370E+00, &
     & 0.2963732E+00, 0.2822086E+00, 0.2386853E+00, 0.2386853E+00 /
      data (ref_adm(25,iz,29,10),iz = 1,20) / &
     & 0.3767400E+00, 0.3767400E+00, 0.2898600E+00, 0.2979800E+00, &
     & 0.2713095E+00, 0.2919100E+00, 0.2556500E+00, 0.2782192E+00, &
     & 0.2765266E+00, 0.2756833E+00, 0.2771317E+00, 0.2811302E+00, &
     & 0.3561500E+00, 0.3035900E+00, 0.2959327E+00, 0.2987370E+00, &
     & 0.2963732E+00, 0.2822087E+00, 0.2386853E+00, 0.2386853E+00 /
      data (ref_adm(25,iz,30,10),iz = 1,20) / &
     & 0.2554000E+00, 0.2554000E+00, 0.2714900E+00, 0.2684758E+00, &
     & 0.2713095E+00, 0.2788630E+00, 0.2811936E+00, 0.2782192E+00, &
     & 0.2765266E+00, 0.2756834E+00, 0.2771317E+00, 0.2811302E+00, &
     & 0.2860600E+00, 0.3016100E+00, 0.2959327E+00, 0.2987370E+00, &
     & 0.2963732E+00, 0.2822086E+00, 0.2386853E+00, 0.2386853E+00 /
      data (ref_adm(25,iz,31,10),iz = 1,20) / &
     & 0.3203405E+00, 0.3203405E+00, 0.2019900E+00, 0.1735100E+00, &
     & 0.1766500E+00, 0.1919400E+00, 0.1884000E+00, 0.1993000E+00, &
     & 0.1978500E+00, 0.2003800E+00, 0.2771317E+00, 0.2811302E+00, &
     & 0.2861320E+00, 0.2909317E+00, 0.2959327E+00, 0.2987370E+00, &
     & 0.2963732E+00, 0.2822087E+00, 0.2386853E+00, 0.2386853E+00 /
      data (ref_adm(25,iz,32,10),iz = 1,20) / &
     & 0.3203404E+00, 0.3203404E+00, 0.2704976E+00, 0.1991200E+00, &
     & 0.2381500E+00, 0.2527800E+00, 0.2811936E+00, 0.2782192E+00, &
     & 0.2765266E+00, 0.2756834E+00, 0.2771317E+00, 0.2811302E+00, &
     & 0.2861320E+00, 0.2909317E+00, 0.2959327E+00, 0.2987370E+00, &
     & 0.2963732E+00, 0.2822086E+00, 0.2386853E+00, 0.2386853E+00 /
      data (ref_adm(25,iz,33,10),iz = 1,20) / &
     & 0.3203405E+00, 0.3203405E+00, 0.2704977E+00, 0.2286300E+00, &
     & 0.2323000E+00, 0.2788630E+00, 0.2811936E+00, 0.2782192E+00, &
     & 0.2765266E+00, 0.2756833E+00, 0.2771317E+00, 0.2811302E+00, &
     & 0.2861320E+00, 0.2909317E+00, 0.2959327E+00, 0.2987370E+00, &
     & 0.2963732E+00, 0.2822087E+00, 0.2386853E+00, 0.2386853E+00 /
      data (ref_adm(25,iz,34,10),iz = 1,20) / &
     & 0.3203404E+00, 0.3203404E+00, 0.2405400E+00, 0.2314900E+00, &
     & 0.2713095E+00, 0.3674600E+00, 0.2811936E+00, 0.2350900E+00, &
     & 0.2765266E+00, 0.2756834E+00, 0.2771317E+00, 0.2811302E+00, &
     & 0.2861320E+00, 0.2909317E+00, 0.2959327E+00, 0.2987370E+00, &
     & 0.2963732E+00, 0.2822086E+00, 0.2386853E+00, 0.2386853E+00 /
      data (ref_adm(25,iz,35,10),iz = 1,20) / &
     & 0.5788900E+00, 0.5788900E+00, 0.2704977E+00, 0.2680900E+00, &
     & 0.2713095E+00, 0.2788630E+00, 0.3613600E+00, 0.2547200E+00, &
     & 0.2765266E+00, 0.2756833E+00, 0.2771317E+00, 0.2811302E+00, &
     & 0.2861320E+00, 0.2909317E+00, 0.2959327E+00, 0.2987370E+00, &
     & 0.2963732E+00, 0.2822087E+00, 0.2386853E+00, 0.2386853E+00 /
      data (ref_adm(25,iz,36,10),iz = 1,20) / &
     & 0.4210500E+00, 0.4210500E+00, 0.2082700E+00, 0.2684758E+00, &
     & 0.2713095E+00, 0.2788630E+00, 0.3514700E+00, 0.2782192E+00, &
     & 0.2765266E+00, 0.2756834E+00, 0.2771317E+00, 0.2811302E+00, &
     & 0.2861320E+00, 0.2909317E+00, 0.3081700E+00, 0.2987370E+00, &
     & 0.2963732E+00, 0.2822086E+00, 0.2386853E+00, 0.2386853E+00 /
      data (ref_adm(25,iz,37,10),iz = 1,20) / &
     & 0.1895400E+00, 0.1895400E+00, 0.2704976E+00, 0.3246800E+00, &
     & 0.2713095E+00, 0.2788630E+00, 0.2811936E+00, 0.2782192E+00, &
     & 0.2765266E+00, 0.2756833E+00, 0.2771317E+00, 0.2811302E+00, &
     & 0.2861320E+00, 0.2909317E+00, 0.2959327E+00, 0.2987370E+00, &
     & 0.2963732E+00, 0.2822086E+00, 0.2386853E+00, 0.2386853E+00 /
      data (ref_adm(25,iz,38,10),iz = 1,20) / &
     & 0.1895400E+00, 0.1895400E+00, 0.2704976E+00, 0.3246800E+00, &
     & 0.2713095E+00, 0.2788630E+00, 0.2811936E+00, 0.2782192E+00, &
     & 0.2765266E+00, 0.2756833E+00, 0.2771317E+00, 0.2811302E+00, &
     & 0.2861320E+00, 0.2909317E+00, 0.2959327E+00, 0.2987370E+00, &
     & 0.2963732E+00, 0.2822086E+00, 0.2386853E+00, 0.2386853E+00 /
! Solar Zenith Angle 50.0 Albedo  0.2608827E+00
      data (ref_adm(25,iz, 1,11),iz = 1,20) / &
     & 0.1756200E+00, 0.1756200E+00, 0.2197000E+00, 0.3268700E+00, &
     & 0.2211800E+00, 0.2945000E+00, 0.2840100E+00, 0.2033100E+00, &
     & 0.2024600E+00, 0.2024700E+00, 0.2531474E+00, 0.2600400E+00, &
     & 0.2345900E+00, 0.3274300E+00, 0.3084204E+00, 0.4368400E+00, &
     & 0.3264812E+00, 0.3190449E+00, 0.2720161E+00, 0.2720161E+00 /
      data (ref_adm(25,iz, 2,11),iz = 1,20) / &
     & 0.1756200E+00, 0.1756200E+00, 0.2197000E+00, 0.3268700E+00, &
     & 0.2211800E+00, 0.2945000E+00, 0.2840100E+00, 0.2033100E+00, &
     & 0.2024600E+00, 0.2024700E+00, 0.2531474E+00, 0.2600400E+00, &
     & 0.2345900E+00, 0.3274300E+00, 0.3084204E+00, 0.4368400E+00, &
     & 0.3264812E+00, 0.3190449E+00, 0.2720161E+00, 0.2720161E+00 /
      data (ref_adm(25,iz, 3,11),iz = 1,20) / &
     & 0.2329487E+00, 0.2329487E+00, 0.4111000E+00, 0.2354120E+00, &
     & 0.2060100E+00, 0.1945900E+00, 0.2242800E+00, 0.1985800E+00, &
     & 0.2272700E+00, 0.2697400E+00, 0.2529681E+00, 0.2346500E+00, &
     & 0.4022500E+00, 0.2943135E+00, 0.3085158E+00, 0.3205787E+00, &
     & 0.3413900E+00, 0.3184738E+00, 0.3423264E-01, 0.3423264E-01 /
      data (ref_adm(25,iz, 4,11),iz = 1,20) / &
     & 0.2735800E+00, 0.2735800E+00, 0.2206000E+00, 0.2381300E+00, &
     & 0.2283800E+00, 0.2054000E+00, 0.2167500E+00, 0.2776300E+00, &
     & 0.4977000E+00, 0.2299600E+00, 0.2529207E+00, 0.2423200E+00, &
     & 0.3167800E+00, 0.2940773E+00, 0.3080359E+00, 0.3200553E+00, &
     & 0.3254136E+00, 0.3179479E+00, 0.2713630E+00, 0.2713630E+00 /
      data (ref_adm(25,iz, 5,11),iz = 1,20) / &
     & 0.1889100E+00, 0.1889100E+00, 0.2314800E+00, 0.2564400E+00, &
     & 0.1993600E+00, 0.2571700E+00, 0.2314243E+00, 0.4157800E+00, &
     & 0.4386200E+00, 0.2198300E+00, 0.2441400E+00, 0.2234100E+00, &
     & 0.2315500E+00, 0.2264400E+00, 0.3075128E+00, 0.3195077E+00, &
     & 0.3243445E+00, 0.3170714E+00, 0.2706330E+00, 0.2706330E+00 /
      data (ref_adm(25,iz, 6,11),iz = 1,20) / &
     & 0.5549500E+00, 0.5549500E+00, 0.2154400E+00, 0.1996600E+00, &
     & 0.2182000E+00, 0.3259200E+00, 0.3440100E+00, 0.5890900E+00, &
     & 0.2631600E+00, 0.2441631E+00, 0.2084000E+00, 0.2138200E+00, &
     & 0.2182300E+00, 0.2290500E+00, 0.2065200E+00, 0.2811300E+00, &
     & 0.3233451E+00, 0.3156586E+00, 0.2697833E+00, 0.2697833E+00 /
      data (ref_adm(25,iz, 7,11),iz = 1,20) / &
     & 0.2341200E+00, 0.2341200E+00, 0.1859600E+00, 0.1800400E+00, &
     & 0.2248600E+00, 0.2578200E+00, 0.3963400E+00, 0.1988100E+00, &
     & 0.2382120E+00, 0.5909400E+00, 0.2092300E+00, 0.2313600E+00, &
     & 0.1995100E+00, 0.2014000E+00, 0.2224200E+00, 0.3169604E+00, &
     & 0.3217741E+00, 0.3142184E+00, 0.2685777E+00, 0.2685777E+00 /
      data (ref_adm(25,iz, 8,11),iz = 1,20) / &
     & 0.2042900E+00, 0.2042900E+00, 0.1577100E+00, 0.2103000E+00, &
     & 0.2443800E+00, 0.2502500E+00, 0.2703700E+00, 0.1889900E+00, &
     & 0.2085700E+00, 0.2207300E+00, 0.2078100E+00, 0.2294600E+00, &
     & 0.2138400E+00, 0.2044400E+00, 0.3041175E+00, 0.3156968E+00, &
     & 0.3200350E+00, 0.3125692E+00, 0.2672076E+00, 0.2672076E+00 /
      data (ref_adm(25,iz, 9,11),iz = 1,20) / &
     & 0.2437500E+00, 0.2437500E+00, 0.2749200E+00, 0.2370991E+00, &
     & 0.2946500E+00, 0.2803000E+00, 0.2525500E+00, 0.2553800E+00, &
     & 0.2381915E+00, 0.2303800E+00, 0.2004900E+00, 0.1946100E+00, &
     & 0.2133700E+00, 0.2019300E+00, 0.3027053E+00, 0.3141680E+00, &
     & 0.3182180E+00, 0.3106714E+00, 0.2656323E+00, 0.2656323E+00 /
      data (ref_adm(25,iz,10,11),iz = 1,20) / &
     & 0.3342000E+00, 0.3342000E+00, 0.3222800E+00, 0.2615600E+00, &
     & 0.2779300E+00, 0.2162800E+00, 0.2545400E+00, 0.2257100E+00, &
     & 0.1939500E+00, 0.1941500E+00, 0.2503959E+00, 0.1866200E+00, &
     & 0.2762735E+00, 0.1941000E+00, 0.3010003E+00, 0.3122901E+00, &
     & 0.3160843E+00, 0.3083183E+00, 0.2638352E+00, 0.2638352E+00 /
      data (ref_adm(25,iz,11,11),iz = 1,20) / &
     & 0.2872600E+00, 0.2872600E+00, 0.2868300E+00, 0.2946200E+00, &
     & 0.1998900E+00, 0.2793500E+00, 0.1938000E+00, 0.1966000E+00, &
     & 0.1863600E+00, 0.1710300E+00, 0.2838600E+00, 0.2284400E+00, &
     & 0.2752825E+00, 0.2863857E+00, 0.2629100E+00, 0.3104076E+00, &
     & 0.3141800E+00, 0.3057775E+00, 0.2618925E+00, 0.2618925E+00 /
      data (ref_adm(25,iz,12,11),iz = 1,20) / &
     & 0.2630600E+00, 0.2630600E+00, 0.3437400E+00, 0.2427000E+00, &
     & 0.1919700E+00, 0.2134300E+00, 0.1923500E+00, 0.2090800E+00, &
     & 0.1973400E+00, 0.1896000E+00, 0.1895600E+00, 0.2605856E+00, &
     & 0.2738306E+00, 0.2491400E+00, 0.2701700E+00, 0.3081671E+00, &
     & 0.3118426E+00, 0.3031723E+00, 0.2599538E+00, 0.2599538E+00 /
      data (ref_adm(25,iz,13,11),iz = 1,20) / &
     & 0.2908800E+00, 0.2908800E+00, 0.2717400E+00, 0.2455600E+00, &
     & 0.2429100E+00, 0.2695200E+00, 0.2280400E+00, 0.2256600E+00, &
     & 0.2081700E+00, 0.2242000E+00, 0.2030400E+00, 0.1879600E+00, &
     & 0.2099800E+00, 0.2830774E+00, 0.2394400E+00, 0.3058477E+00, &
     & 0.3094523E+00, 0.3004225E+00, 0.2580876E+00, 0.2580876E+00 /
      data (ref_adm(25,iz,14,11),iz = 1,20) / &
     & 0.2306600E+00, 0.2306600E+00, 0.2460700E+00, 0.2361500E+00, &
     & 0.2308100E+00, 0.2337100E+00, 0.2135300E+00, 0.2163200E+00, &
     & 0.2098300E+00, 0.2232300E+00, 0.2078600E+00, 0.2085400E+00, &
     & 0.2178000E+00, 0.2364200E+00, 0.2932736E+00, 0.3036532E+00, &
     & 0.3071043E+00, 0.2977934E+00, 0.2559631E+00, 0.2559631E+00 /
      data (ref_adm(25,iz,15,11),iz = 1,20) / &
     & 0.2300200E+00, 0.2300200E+00, 0.1916600E+00, 0.2191600E+00, &
     & 0.1976200E+00, 0.2424100E+00, 0.3127600E+00, 0.2081100E+00, &
     & 0.2260200E+00, 0.2218800E+00, 0.2282300E+00, 0.2275300E+00, &
     & 0.2220800E+00, 0.2224800E+00, 0.2910759E+00, 0.3012370E+00, &
     & 0.3046418E+00, 0.2951582E+00, 0.2538648E+00, 0.2538648E+00 /
      data (ref_adm(25,iz,16,11),iz = 1,20) / &
     & 0.2394500E+00, 0.2394500E+00, 0.2933100E+00, 0.2391595E+00, &
     & 0.2699400E+00, 0.2533400E+00, 0.1746300E+00, 0.2049800E+00, &
     & 0.2316100E+00, 0.2300700E+00, 0.2262100E+00, 0.1967000E+00, &
     & 0.2233900E+00, 0.2280800E+00, 0.3260800E+00, 0.2985389E+00, &
     & 0.3017874E+00, 0.2924768E+00, 0.2516508E+00, 0.2516508E+00 /
      data (ref_adm(25,iz,17,11),iz = 1,20) / &
     & 0.1892100E+00, 0.1892100E+00, 0.3248700E+00, 0.2853100E+00, &
     & 0.3910900E+00, 0.2367000E+00, 0.2007700E+00, 0.2491500E+00, &
     & 0.2306600E+00, 0.2383200E+00, 0.2485442E+00, 0.2566711E+00, &
     & 0.1993800E+00, 0.2299600E+00, 0.2113100E+00, 0.2962649E+00, &
     & 0.2991089E+00, 0.2900233E+00, 0.2496575E+00, 0.2496575E+00 /
      data (ref_adm(25,iz,18,11),iz = 1,20) / &
     & 0.2248300E+00, 0.2248300E+00, 0.2392913E+00, 0.2388052E+00, &
     & 0.2342600E+00, 0.2337000E+00, 0.2201800E+00, 0.2157600E+00, &
     & 0.2168700E+00, 0.3344400E+00, 0.2321270E+00, 0.2441800E+00, &
     & 0.2352780E+00, 0.2376279E+00, 0.2409240E+00, 0.2450949E+00, &
     & 0.2488623E+00, 0.2513613E+00, 0.2384029E+00, 0.2384029E+00 /
      data (ref_adm(25,iz,19,11),iz = 1,20) / &
     & 0.2043900E+00, 0.2043900E+00, 0.2651300E+00, 0.2392922E+00, &
     & 0.2029800E+00, 0.2241500E+00, 0.2028200E+00, 0.2104800E+00, &
     & 0.2331301E+00, 0.2704600E+00, 0.2291400E+00, 0.2340904E+00, &
     & 0.2093500E+00, 0.2378848E+00, 0.3365400E+00, 0.2447745E+00, &
     & 0.2483317E+00, 0.2505083E+00, 0.2373292E+00, 0.2373292E+00 /
      data (ref_adm(25,iz,20,11),iz = 1,20) / &
     & 0.2445200E+00, 0.2445200E+00, 0.2085500E+00, 0.1962800E+00, &
     & 0.2663200E+00, 0.2282000E+00, 0.2265100E+00, 0.2048300E+00, &
     & 0.2343979E+00, 0.2340075E+00, 0.2339807E+00, 0.2239400E+00, &
     & 0.2215800E+00, 0.2009000E+00, 0.2411383E+00, 0.2446815E+00, &
     & 0.2479357E+00, 0.2497131E+00, 0.2364936E+00, 0.2364936E+00 /
      data (ref_adm(25,iz,21,11),iz = 1,20) / &
     & 0.2351400E+00, 0.2351400E+00, 0.2179900E+00, 0.2402540E+00, &
     & 0.1813900E+00, 0.2797300E+00, 0.2802600E+00, 0.1908300E+00, &
     & 0.2676600E+00, 0.2210500E+00, 0.2351367E+00, 0.2359609E+00, &
     & 0.2101800E+00, 0.2130200E+00, 0.2191200E+00, 0.2446073E+00, &
     & 0.2476574E+00, 0.2490348E+00, 0.2357983E+00, 0.2357983E+00 /
      data (ref_adm(25,iz,22,11),iz = 1,20) / &
     & 0.1872300E+00, 0.1872300E+00, 0.2632700E+00, 0.2491100E+00, &
     & 0.2822400E+00, 0.3782400E+00, 0.2220900E+00, 0.3229300E+00, &
     & 0.2147600E+00, 0.2203000E+00, 0.2230800E+00, 0.2788967E+00, &
     & 0.2219900E+00, 0.3072084E+00, 0.2196200E+00, 0.3389126E+00, &
     & 0.3460517E+00, 0.3427260E+00, 0.3134091E+00, 0.3134091E+00 /
      data (ref_adm(25,iz,23,11),iz = 1,20) / &
     & 0.2721700E+00, 0.2721700E+00, 0.2206300E+00, 0.1758100E+00, &
     & 0.2008200E+00, 0.2308484E+00, 0.2168000E+00, 0.1965000E+00, &
     & 0.1894400E+00, 0.2420600E+00, 0.2051300E+00, 0.2786475E+00, &
     & 0.2926295E+00, 0.2254500E+00, 0.2788500E+00, 0.2990700E+00, &
     & 0.3393265E+00, 0.3350664E+00, 0.3104681E+00, 0.3104681E+00 /
      data (ref_adm(25,iz,24,11),iz = 1,20) / &
     & 0.2289200E+00, 0.2289200E+00, 0.2215693E+00, 0.2427600E+00, &
     & 0.2300500E+00, 0.2867000E+00, 0.3229800E+00, 0.2978800E+00, &
     & 0.3909600E+00, 0.2298400E+00, 0.2094300E+00, 0.2781809E+00, &
     & 0.2594700E+00, 0.2530800E+00, 0.2580400E+00, 0.3268425E+00, &
     & 0.3329313E+00, 0.3289032E+00, 0.3080242E+00, 0.3080242E+00 /
      data (ref_adm(25,iz,25,11),iz = 1,20) / &
     & 0.2148100E+00, 0.2148100E+00, 0.2001100E+00, 0.2647300E+00, &
     & 0.2317400E+00, 0.2907100E+00, 0.3166100E+00, 0.2495600E+00, &
     & 0.2218100E+00, 0.2156000E+00, 0.2230900E+00, 0.2216900E+00, &
     & 0.2102300E+00, 0.2289200E+00, 0.3141351E+00, 0.3235738E+00, &
     & 0.3279703E+00, 0.3234325E+00, 0.3068523E+00, 0.3068523E+00 /
      data (ref_adm(25,iz,26,11),iz = 1,20) / &
     & 0.2483100E+00, 0.2483100E+00, 0.2252400E+00, 0.2350700E+00, &
     & 0.2326700E+00, 0.2930800E+00, 0.2624100E+00, 0.2647200E+00, &
     & 0.2843000E+00, 0.2832100E+00, 0.2177300E+00, 0.3714300E+00, &
     & 0.2321400E+00, 0.1976100E+00, 0.1986500E+00, 0.3226235E+00, &
     & 0.3253840E+00, 0.3195071E+00, 0.3065353E+00, 0.3065353E+00 /
      data (ref_adm(25,iz,27,11),iz = 1,20) / &
     & 0.2274300E+00, 0.2274300E+00, 0.2203900E+00, 0.3070000E+00, &
     & 0.3379400E+00, 0.3380800E+00, 0.3795800E+00, 0.3948300E+00, &
     & 0.2774900E+00, 0.2710000E+00, 0.2493700E+00, 0.2554200E+00, &
     & 0.2786900E+00, 0.2697500E+00, 0.4102000E+00, 0.3226685E+00, &
     & 0.3248308E+00, 0.3174517E+00, 0.3072267E+00, 0.3072267E+00 /
      data (ref_adm(25,iz,28,11),iz = 1,20) / &
     & 0.2357600E+00, 0.2357600E+00, 0.3266900E+00, 0.2397400E+00, &
     & 0.2138400E+00, 0.2421900E+00, 0.2038700E+00, 0.2787300E+00, &
     & 0.2600000E+00, 0.2197500E+00, 0.2439800E+00, 0.3498200E+00, &
     & 0.2829500E+00, 0.2473800E+00, 0.2683900E+00, 0.2648000E+00, &
     & 0.3250585E+00, 0.3176377E+00, 0.3096278E+00, 0.3096278E+00 /
      data (ref_adm(25,iz,29,11),iz = 1,20) / &
     & 0.2666000E+00, 0.2666000E+00, 0.1839000E+00, 0.1815200E+00, &
     & 0.2370538E+00, 0.2321200E+00, 0.1789600E+00, 0.2024500E+00, &
     & 0.2102400E+00, 0.2407100E+00, 0.2856525E+00, 0.2962816E+00, &
     & 0.3071656E+00, 0.2824800E+00, 0.2430200E+00, 0.3267933E+00, &
     & 0.3260459E+00, 0.3188602E+00, 0.3131515E+00, 0.3131515E+00 /
      data (ref_adm(25,iz,30,11),iz = 1,20) / &
     & 0.3165200E+00, 0.3165200E+00, 0.3978300E+00, 0.2525700E+00, &
     & 0.1870100E+00, 0.2248900E+00, 0.2031500E+00, 0.2831000E+00, &
     & 0.2718933E+00, 0.2809900E+00, 0.2912850E+00, 0.3023436E+00, &
     & 0.3131012E+00, 0.3198657E+00, 0.2407200E+00, 0.2471000E+00, &
     & 0.3290511E+00, 0.3197959E+00, 0.3172119E+00, 0.3172119E+00 /
      data (ref_adm(25,iz,31,11),iz = 1,20) / &
     & 0.3187400E+00, 0.3187400E+00, 0.2834200E+00, 0.2956800E+00, &
     & 0.3305500E+00, 0.3270200E+00, 0.2671900E+00, 0.4630500E+00, &
     & 0.4671900E+00, 0.2792999E+00, 0.2430600E+00, 0.2627000E+00, &
     & 0.2546300E+00, 0.2549300E+00, 0.2555400E+00, 0.2482800E+00, &
     & 0.3322451E+00, 0.3225388E+00, 0.3210219E+00, 0.3210219E+00 /
      data (ref_adm(25,iz,32,11),iz = 1,20) / &
     & 0.2308800E+00, 0.2308800E+00, 0.1781100E+00, 0.1953200E+00, &
     & 0.1920800E+00, 0.2026900E+00, 0.2056300E+00, 0.2590641E+00, &
     & 0.2643810E+00, 0.2301700E+00, 0.2451000E+00, 0.2525800E+00, &
     & 0.2607000E+00, 0.2940300E+00, 0.3146400E+00, 0.2809600E+00, &
     & 0.3363104E+00, 0.3257986E+00, 0.3247718E+00, 0.3247718E+00 /
      data (ref_adm(25,iz,33,11),iz = 1,20) / &
     & 0.2145800E+00, 0.2145800E+00, 0.2005600E+00, 0.1966600E+00, &
     & 0.2004800E+00, 0.2063300E+00, 0.1995800E+00, 0.2563300E+00, &
     & 0.2602880E+00, 0.2684653E+00, 0.2578500E+00, 0.2525200E+00, &
     & 0.3176091E+00, 0.3339256E+00, 0.3435448E+00, 0.3456222E+00, &
     & 0.3414768E+00, 0.3294673E+00, 0.3286692E+00, 0.3286692E+00 /
      data (ref_adm(25,iz,34,11),iz = 1,20) / &
     & 0.2979500E+00, 0.2979500E+00, 0.1961300E+00, 0.2492300E+00, &
     & 0.1978700E+00, 0.1972800E+00, 0.2804000E+00, 0.3164800E+00, &
     & 0.2596152E+00, 0.2335500E+00, 0.3033900E+00, 0.2923267E+00, &
     & 0.3111183E+00, 0.3301696E+00, 0.3466858E+00, 0.3504222E+00, &
     & 0.3463086E+00, 0.3325765E+00, 0.3325874E+00, 0.3325874E+00 /
      data (ref_adm(25,iz,35,11),iz = 1,20) / &
     & 0.1919400E+00, 0.1919400E+00, 0.1982800E+00, 0.2353086E+00, &
     & 0.2045400E+00, 0.2383200E+00, 0.3115900E+00, 0.2517499E+00, &
     & 0.2603371E+00, 0.2709315E+00, 0.2978300E+00, 0.2765800E+00, &
     & 0.3069576E+00, 0.3373300E+00, 0.3466228E+00, 0.3541667E+00, &
     & 0.3494395E+00, 0.3358896E+00, 0.3355212E+00, 0.3355212E+00 /
      data (ref_adm(25,iz,36,11),iz = 1,20) / &
     & 0.3156000E+00, 0.3156000E+00, 0.2274686E+00, 0.2358341E+00, &
     & 0.3124500E+00, 0.2468000E+00, 0.2376200E+00, 0.2132800E+00, &
     & 0.2620216E+00, 0.2779249E+00, 0.2880445E+00, 0.3232500E+00, &
     & 0.3055938E+00, 0.3468800E+00, 0.3791600E+00, 0.3573198E+00, &
     & 0.3519980E+00, 0.3384397E+00, 0.3374506E+00, 0.3374506E+00 /
      data (ref_adm(25,iz,37,11),iz = 1,20) / &
     & 0.2000400E+00, 0.2000400E+00, 0.2275612E+00, 0.2604500E+00, &
     & 0.2695200E+00, 0.2244100E+00, 0.2089100E+00, 0.2739200E+00, &
     & 0.2644657E+00, 0.3018320E+00, 0.3203830E+00, 0.2967698E+00, &
     & 0.3352600E+00, 0.3189432E+00, 0.3689500E+00, 0.3584677E+00, &
     & 0.3533220E+00, 0.3398367E+00, 0.3385786E+00, 0.3385786E+00 /
      data (ref_adm(25,iz,38,11),iz = 1,20) / &
     & 0.2000400E+00, 0.2000400E+00, 0.2275612E+00, 0.2604500E+00, &
     & 0.2695200E+00, 0.2244100E+00, 0.2089100E+00, 0.2739200E+00, &
     & 0.2644657E+00, 0.3018320E+00, 0.3203830E+00, 0.2967698E+00, &
     & 0.3352600E+00, 0.3189432E+00, 0.3689500E+00, 0.3584677E+00, &
     & 0.3533220E+00, 0.3398367E+00, 0.3385786E+00, 0.3385786E+00 /
! Solar Zenith Angle 55.0 Albedo  0.2500849E+00
      data (ref_adm(25,iz, 1,12),iz = 1,20) / &
     & 0.1986976E+00, 0.1986976E+00, 0.1947000E+00, 0.2993200E+00, &
     & 0.2266800E+00, 0.1914600E+00, 0.1795700E+00, 0.1919600E+00, &
     & 0.1816600E+00, 0.2199237E+00, 0.1878300E+00, 0.3033800E+00, &
     & 0.3011000E+00, 0.3116100E+00, 0.2458400E+00, 0.3952500E+00, &
     & 0.2795700E+00, 0.4415500E+00, 0.4595302E+00, 0.4595302E+00 /
      data (ref_adm(25,iz, 2,12),iz = 1,20) / &
     & 0.1986976E+00, 0.1986976E+00, 0.1947000E+00, 0.2993200E+00, &
     & 0.2266800E+00, 0.1914600E+00, 0.1795700E+00, 0.1919600E+00, &
     & 0.1816600E+00, 0.2199237E+00, 0.1878300E+00, 0.3033800E+00, &
     & 0.3011000E+00, 0.3116100E+00, 0.2458400E+00, 0.3952500E+00, &
     & 0.2795700E+00, 0.4415500E+00, 0.4595302E+00, 0.4595302E+00 /
      data (ref_adm(25,iz, 3,12),iz = 1,20) / &
     & 0.2622300E+00, 0.2622300E+00, 0.2580900E+00, 0.1819500E+00, &
     & 0.1959058E+00, 0.2074400E+00, 0.1748600E+00, 0.1939400E+00, &
     & 0.2039700E+00, 0.1772500E+00, 0.2318300E+00, 0.2378900E+00, &
     & 0.2993000E+00, 0.2344300E+00, 0.2910300E+00, 0.3249200E+00, &
     & 0.4275900E+00, 0.4319400E+00, 0.6470931E-01, 0.6470931E-01 /
      data (ref_adm(25,iz, 4,12),iz = 1,20) / &
     & 0.2108100E+00, 0.2108100E+00, 0.1934900E+00, 0.1968000E+00, &
     & 0.1820200E+00, 0.1729300E+00, 0.1752100E+00, 0.1919000E+00, &
     & 0.1976400E+00, 0.2360300E+00, 0.1581700E+00, 0.2061800E+00, &
     & 0.2440900E+00, 0.2077400E+00, 0.3384500E+00, 0.3227544E+00, &
     & 0.3456200E+00, 0.4126619E+00, 0.4552217E+00, 0.4552217E+00 /
      data (ref_adm(25,iz, 5,12),iz = 1,20) / &
     & 0.2475600E+00, 0.2475600E+00, 0.1927400E+00, 0.1713300E+00, &
     & 0.2444000E+00, 0.1711300E+00, 0.2013814E+00, 0.1876300E+00, &
     & 0.2258200E+00, 0.2004500E+00, 0.1910300E+00, 0.2169300E+00, &
     & 0.2462000E+00, 0.2002200E+00, 0.3090700E+00, 0.3204642E+00, &
     & 0.3523200E+00, 0.4045746E+00, 0.4531987E+00, 0.4531987E+00 /
      data (ref_adm(25,iz, 6,12),iz = 1,20) / &
     & 0.2039600E+00, 0.2039600E+00, 0.1796600E+00, 0.2043200E+00, &
     & 0.1822700E+00, 0.1972300E+00, 0.1861500E+00, 0.1936600E+00, &
     & 0.1703900E+00, 0.1714000E+00, 0.2038000E+00, 0.2916000E+00, &
     & 0.2771900E+00, 0.2537300E+00, 0.2806200E+00, 0.3734900E+00, &
     & 0.3475690E+00, 0.3943698E+00, 0.4445909E+00, 0.4445909E+00 /
      data (ref_adm(25,iz, 7,12),iz = 1,20) / &
     & 0.1988500E+00, 0.1988500E+00, 0.2061900E+00, 0.2075800E+00, &
     & 0.3187400E+00, 0.2079100E+00, 0.1719800E+00, 0.1711700E+00, &
     & 0.1698400E+00, 0.1519100E+00, 0.1951100E+00, 0.2192900E+00, &
     & 0.2844000E+00, 0.3347100E+00, 0.3770900E+00, 0.3147427E+00, &
     & 0.3823300E+00, 0.3835300E+00, 0.3955300E+00, 0.3955300E+00 /
      data (ref_adm(25,iz, 8,12),iz = 1,20) / &
     & 0.2431500E+00, 0.2431500E+00, 0.2585800E+00, 0.2196000E+00, &
     & 0.2273500E+00, 0.2043300E+00, 0.2223300E+00, 0.2277000E+00, &
     & 0.2214000E+00, 0.2389700E+00, 0.1995900E+00, 0.2291400E+00, &
     & 0.2575800E+00, 0.2641600E+00, 0.2962400E+00, 0.2003000E+00, &
     & 0.2790500E+00, 0.3749186E+00, 0.4080756E+00, 0.4080756E+00 /
      data (ref_adm(25,iz, 9,12),iz = 1,20) / &
     & 0.2229100E+00, 0.2229100E+00, 0.2056300E+00, 0.2467700E+00, &
     & 0.1719900E+00, 0.1911200E+00, 0.1893600E+00, 0.1815500E+00, &
     & 0.1786400E+00, 0.1685900E+00, 0.1927200E+00, 0.2184800E+00, &
     & 0.2444200E+00, 0.2513400E+00, 0.2213300E+00, 0.2451500E+00, &
     & 0.3326718E+00, 0.3667344E+00, 0.3931111E+00, 0.3931111E+00 /
      data (ref_adm(25,iz,10,12),iz = 1,20) / &
     & 0.2472100E+00, 0.2472100E+00, 0.2930400E+00, 0.2055000E+00, &
     & 0.2055400E+00, 0.1973800E+00, 0.1784200E+00, 0.1730000E+00, &
     & 0.1692300E+00, 0.1894500E+00, 0.1751000E+00, 0.2266400E+00, &
     & 0.1922000E+00, 0.2635025E+00, 0.2167500E+00, 0.2275600E+00, &
     & 0.3284863E+00, 0.3597506E+00, 0.3805904E+00, 0.3805904E+00 /
      data (ref_adm(25,iz,11,12),iz = 1,20) / &
     & 0.1936200E+00, 0.1936200E+00, 0.1956200E+00, 0.2199300E+00, &
     & 0.1953300E+00, 0.1939200E+00, 0.2171100E+00, 0.1986100E+00, &
     & 0.2150900E+00, 0.1948200E+00, 0.2093800E+00, 0.2396100E+00, &
     & 0.2303200E+00, 0.2609652E+00, 0.2782625E+00, 0.3011567E+00, &
     & 0.2495700E+00, 0.2747500E+00, 0.3704134E+00, 0.3704134E+00 /
      data (ref_adm(25,iz,12,12),iz = 1,20) / &
     & 0.2006200E+00, 0.2006200E+00, 0.1992900E+00, 0.2126200E+00, &
     & 0.2092800E+00, 0.2514500E+00, 0.2041100E+00, 0.2527600E+00, &
     & 0.2284400E+00, 0.2140300E+00, 0.1905400E+00, 0.2250500E+00, &
     & 0.2122800E+00, 0.2408600E+00, 0.2749999E+00, 0.2969247E+00, &
     & 0.3198703E+00, 0.3478867E+00, 0.3618035E+00, 0.3618035E+00 /
      data (ref_adm(25,iz,13,12),iz = 1,20) / &
     & 0.2124900E+00, 0.2124900E+00, 0.2290000E+00, 0.2489600E+00, &
     & 0.2438100E+00, 0.2187400E+00, 0.2288400E+00, 0.2175700E+00, &
     & 0.2016800E+00, 0.2118700E+00, 0.1937300E+00, 0.2245000E+00, &
     & 0.2447678E+00, 0.2424700E+00, 0.2718307E+00, 0.2925359E+00, &
     & 0.3149262E+00, 0.3425761E+00, 0.3544907E+00, 0.3544907E+00 /
      data (ref_adm(25,iz,14,12),iz = 1,20) / &
     & 0.2176600E+00, 0.2176600E+00, 0.2053200E+00, 0.1980800E+00, &
     & 0.2101800E+00, 0.2047700E+00, 0.2062200E+00, 0.2043400E+00, &
     & 0.2138600E+00, 0.2122200E+00, 0.2248400E+00, 0.2472600E+00, &
     & 0.2315700E+00, 0.2554300E+00, 0.2297400E+00, 0.2886635E+00, &
     & 0.3095776E+00, 0.3366022E+00, 0.3474398E+00, 0.3474398E+00 /
      data (ref_adm(25,iz,15,12),iz = 1,20) / &
     & 0.2055500E+00, 0.2055500E+00, 0.2371300E+00, 0.2114200E+00, &
     & 0.2068900E+00, 0.2015700E+00, 0.2124800E+00, 0.1975100E+00, &
     & 0.2069700E+00, 0.2143000E+00, 0.2161700E+00, 0.2274500E+00, &
     & 0.2252600E+00, 0.2330000E+00, 0.2662411E+00, 0.2850575E+00, &
     & 0.3046991E+00, 0.3299142E+00, 0.3401058E+00, 0.3401058E+00 /
      data (ref_adm(25,iz,16,12),iz = 1,20) / &
     & 0.2013000E+00, 0.2013000E+00, 0.2081200E+00, 0.2093200E+00, &
     & 0.2739000E+00, 0.2012100E+00, 0.1895800E+00, 0.2041300E+00, &
     & 0.2318200E+00, 0.2570100E+00, 0.2308900E+00, 0.2192700E+00, &
     & 0.2510000E+00, 0.2476700E+00, 0.2642654E+00, 0.2815306E+00, &
     & 0.3004461E+00, 0.3237921E+00, 0.3314514E+00, 0.3314514E+00 /
      data (ref_adm(25,iz,17,12),iz = 1,20) / &
     & 0.2013500E+00, 0.2013500E+00, 0.1869900E+00, 0.2525400E+00, &
     & 0.1875200E+00, 0.2058600E+00, 0.2123100E+00, 0.1860200E+00, &
     & 0.2123900E+00, 0.2017800E+00, 0.1939600E+00, 0.2162200E+00, &
     & 0.2951100E+00, 0.2545100E+00, 0.2625781E+00, 0.2790944E+00, &
     & 0.2963369E+00, 0.3182627E+00, 0.3242027E+00, 0.3242027E+00 /
      data (ref_adm(25,iz,18,12),iz = 1,20) / &
     & 0.2101100E+00, 0.2101100E+00, 0.1934700E+00, 0.2025300E+00, &
     & 0.2255200E+00, 0.2088700E+00, 0.2194900E+00, 0.2232100E+00, &
     & 0.2767300E+00, 0.1910800E+00, 0.1912800E+00, 0.3043300E+00, &
     & 0.2706700E+00, 0.2411600E+00, 0.4014700E+00, 0.2852567E+00, &
     & 0.2909363E+00, 0.2846319E+00, 0.2491529E+00, 0.2491529E+00 /
      data (ref_adm(25,iz,19,12),iz = 1,20) / &
     & 0.2011000E+00, 0.2011000E+00, 0.2541900E+00, 0.2144700E+00, &
     & 0.2525800E+00, 0.1916400E+00, 0.2214700E+00, 0.2749400E+00, &
     & 0.2524900E+00, 0.1962500E+00, 0.2152300E+00, 0.2623900E+00, &
     & 0.2630300E+00, 0.2637300E+00, 0.2729815E+00, 0.2841226E+00, &
     & 0.2897328E+00, 0.2835655E+00, 0.2484750E+00, 0.2484750E+00 /
      data (ref_adm(25,iz,20,12),iz = 1,20) / &
     & 0.2279200E+00, 0.2279200E+00, 0.2479300E+00, 0.2222300E+00, &
     & 0.2349300E+00, 0.2299400E+00, 0.2888300E+00, 0.3294100E+00, &
     & 0.2675300E+00, 0.2293400E+00, 0.2223700E+00, 0.2336500E+00, &
     & 0.2233400E+00, 0.2426100E+00, 0.3071700E+00, 0.2830084E+00, &
     & 0.2882953E+00, 0.2821305E+00, 0.2478128E+00, 0.2478128E+00 /
      data (ref_adm(25,iz,21,12),iz = 1,20) / &
     & 0.2211600E+00, 0.2211600E+00, 0.2354100E+00, 0.2084700E+00, &
     & 0.2032700E+00, 0.2135900E+00, 0.1968900E+00, 0.1771700E+00, &
     & 0.2448600E+00, 0.2022700E+00, 0.2047000E+00, 0.2504200E+00, &
     & 0.3070600E+00, 0.2721900E+00, 0.2582600E+00, 0.2819811E+00, &
     & 0.2872612E+00, 0.2808056E+00, 0.2471554E+00, 0.2471554E+00 /
      data (ref_adm(25,iz,22,12),iz = 1,20) / &
     & 0.2342400E+00, 0.2342400E+00, 0.2415000E+00, 0.2125500E+00, &
     & 0.2228700E+00, 0.2058300E+00, 0.2134400E+00, 0.1794600E+00, &
     & 0.1865000E+00, 0.2432316E+00, 0.2077200E+00, 0.2079900E+00, &
     & 0.3119200E+00, 0.2487700E+00, 0.2799300E+00, 0.3232363E+00, &
     & 0.3368953E+00, 0.3431343E+00, 0.3222105E+00, 0.3222105E+00 /
      data (ref_adm(25,iz,23,12),iz = 1,20) / &
     & 0.2066000E+00, 0.2066000E+00, 0.2075000E+00, 0.2034400E+00, &
     & 0.2204800E+00, 0.2141800E+00, 0.2030300E+00, 0.1983300E+00, &
     & 0.2369947E+00, 0.1844500E+00, 0.2035800E+00, 0.2282900E+00, &
     & 0.2114800E+00, 0.2862300E+00, 0.2752900E+00, 0.3177509E+00, &
     & 0.3309776E+00, 0.3355280E+00, 0.3196096E+00, 0.3196096E+00 /
      data (ref_adm(25,iz,24,12),iz = 1,20) / &
     & 0.2151200E+00, 0.2151200E+00, 0.2252300E+00, 0.2078600E+00, &
     & 0.2196500E+00, 0.2176400E+00, 0.2238900E+00, 0.2331908E+00, &
     & 0.2386497E+00, 0.2580300E+00, 0.2837700E+00, 0.2217000E+00, &
     & 0.2589300E+00, 0.2929300E+00, 0.2623800E+00, 0.2608200E+00, &
     & 0.3251230E+00, 0.3299612E+00, 0.3179032E+00, 0.3179032E+00 /
      data (ref_adm(25,iz,25,12),iz = 1,20) / &
     & 0.2154400E+00, 0.2154400E+00, 0.2032000E+00, 0.2142200E+00, &
     & 0.2178300E+00, 0.2357200E+00, 0.2264300E+00, 0.2344800E+00, &
     & 0.2396400E+00, 0.2488600E+00, 0.2493000E+00, 0.2539400E+00, &
     & 0.2274900E+00, 0.3240700E+00, 0.3063200E+00, 0.2884400E+00, &
     & 0.3216629E+00, 0.3246424E+00, 0.3176769E+00, 0.3176769E+00 /
      data (ref_adm(25,iz,26,12),iz = 1,20) / &
     & 0.2043900E+00, 0.2043900E+00, 0.2129500E+00, 0.2140000E+00, &
     & 0.2259800E+00, 0.2368500E+00, 0.2316100E+00, 0.2572600E+00, &
     & 0.2612700E+00, 0.2529200E+00, 0.2523500E+00, 0.2589000E+00, &
     & 0.2898500E+00, 0.2841000E+00, 0.3178000E+00, 0.3125885E+00, &
     & 0.3204093E+00, 0.3220622E+00, 0.3183039E+00, 0.3183039E+00 /
      data (ref_adm(25,iz,27,12),iz = 1,20) / &
     & 0.2189700E+00, 0.2189700E+00, 0.2111600E+00, 0.2044700E+00, &
     & 0.2222000E+00, 0.2086000E+00, 0.2469900E+00, 0.3781300E+00, &
     & 0.3042700E+00, 0.2602800E+00, 0.2836700E+00, 0.2570900E+00, &
     & 0.2841000E+00, 0.2575100E+00, 0.2656300E+00, 0.3136227E+00, &
     & 0.3216137E+00, 0.3221539E+00, 0.3211208E+00, 0.3211208E+00 /
      data (ref_adm(25,iz,28,12),iz = 1,20) / &
     & 0.2094100E+00, 0.2094100E+00, 0.3230000E+00, 0.2621400E+00, &
     & 0.2485900E+00, 0.2335000E+00, 0.2303900E+00, 0.2399200E+00, &
     & 0.2406500E+00, 0.2305100E+00, 0.2659500E+00, 0.2563600E+00, &
     & 0.2592500E+00, 0.2585000E+00, 0.2598100E+00, 0.3166660E+00, &
     & 0.3231307E+00, 0.3242118E+00, 0.3256803E+00, 0.3256803E+00 /
      data (ref_adm(25,iz,29,12),iz = 1,20) / &
     & 0.1971400E+00, 0.1971400E+00, 0.1757400E+00, 0.2079100E+00, &
     & 0.2098700E+00, 0.2291900E+00, 0.2317900E+00, 0.2183700E+00, &
     & 0.2284700E+00, 0.2580800E+00, 0.2753700E+00, 0.2924000E+00, &
     & 0.2718800E+00, 0.2745300E+00, 0.2983500E+00, 0.3210545E+00, &
     & 0.3266983E+00, 0.3259951E+00, 0.3313138E+00, 0.3313138E+00 /
      data (ref_adm(25,iz,30,12),iz = 1,20) / &
     & 0.2214400E+00, 0.2214400E+00, 0.2146700E+00, 0.1903400E+00, &
     & 0.2505400E+00, 0.2153600E+00, 0.2112700E+00, 0.2045700E+00, &
     & 0.2161300E+00, 0.2596700E+00, 0.2750700E+00, 0.2712900E+00, &
     & 0.3013133E+00, 0.2981800E+00, 0.2842000E+00, 0.3271403E+00, &
     & 0.3315977E+00, 0.3300609E+00, 0.3367389E+00, 0.3367389E+00 /
      data (ref_adm(25,iz,31,12),iz = 1,20) / &
     & 0.2687700E+00, 0.2687700E+00, 0.2643000E+00, 0.2873700E+00, &
     & 0.2899100E+00, 0.2709300E+00, 0.2842200E+00, 0.2379200E+00, &
     & 0.2194300E+00, 0.2446100E+00, 0.2513000E+00, 0.2882900E+00, &
     & 0.2691400E+00, 0.3054100E+00, 0.3266738E+00, 0.3344951E+00, &
     & 0.3374428E+00, 0.3353111E+00, 0.3424704E+00, 0.3424704E+00 /
      data (ref_adm(25,iz,32,12),iz = 1,20) / &
     & 0.1975100E+00, 0.1975100E+00, 0.2092600E+00, 0.2027800E+00, &
     & 0.2071800E+00, 0.1967800E+00, 0.2122400E+00, 0.2256600E+00, &
     & 0.2253400E+00, 0.3086300E+00, 0.2396100E+00, 0.3720600E+00, &
     & 0.3095376E+00, 0.3032600E+00, 0.2865200E+00, 0.2987900E+00, &
     & 0.3218000E+00, 0.3407287E+00, 0.3489988E+00, 0.3489988E+00 /
      data (ref_adm(25,iz,33,12),iz = 1,20) / &
     & 0.1968600E+00, 0.1968600E+00, 0.2888700E+00, 0.2154300E+00, &
     & 0.2361900E+00, 0.2297600E+00, 0.2331900E+00, 0.2741800E+00, &
     & 0.3019000E+00, 0.2776400E+00, 0.3376800E+00, 0.2869564E+00, &
     & 0.3044173E+00, 0.3204663E+00, 0.2988800E+00, 0.3084100E+00, &
     & 0.3516058E+00, 0.3469075E+00, 0.3547726E+00, 0.3547726E+00 /
      data (ref_adm(25,iz,34,12),iz = 1,20) / &
     & 0.3077900E+00, 0.3077900E+00, 0.2186900E+00, 0.2119900E+00, &
     & 0.4526900E+00, 0.2073900E+00, 0.2495500E+00, 0.2793100E+00, &
     & 0.2829100E+00, 0.2900400E+00, 0.3104200E+00, 0.2862900E+00, &
     & 0.3352200E+00, 0.2906000E+00, 0.2951300E+00, 0.3542221E+00, &
     & 0.3576144E+00, 0.3529299E+00, 0.3598686E+00, 0.3598686E+00 /
      data (ref_adm(25,iz,35,12),iz = 1,20) / &
     & 0.2087000E+00, 0.2087000E+00, 0.2053800E+00, 0.2102400E+00, &
     & 0.2716600E+00, 0.2047300E+00, 0.2570000E+00, 0.2701800E+00, &
     & 0.2452900E+00, 0.3400500E+00, 0.2811400E+00, 0.3299500E+00, &
     & 0.3340700E+00, 0.3148600E+00, 0.3324000E+00, 0.3561577E+00, &
     & 0.3629566E+00, 0.3575015E+00, 0.3646546E+00, 0.3646546E+00 /
      data (ref_adm(25,iz,36,12),iz = 1,20) / &
     & 0.2253700E+00, 0.2253700E+00, 0.2884300E+00, 0.2761800E+00, &
     & 0.2173100E+00, 0.3179000E+00, 0.2342100E+00, 0.2600700E+00, &
     & 0.2484400E+00, 0.2674700E+00, 0.2784200E+00, 0.3100400E+00, &
     & 0.3019840E+00, 0.3124100E+00, 0.3289704E+00, 0.4089000E+00, &
     & 0.3662268E+00, 0.3609668E+00, 0.3679123E+00, 0.3679123E+00 /
      data (ref_adm(25,iz,37,12),iz = 1,20) / &
     & 0.2326700E+00, 0.2326700E+00, 0.2295800E+00, 0.2465700E+00, &
     & 0.2783800E+00, 0.2507000E+00, 0.2231800E+00, 0.2541800E+00, &
     & 0.2541900E+00, 0.2825100E+00, 0.3043300E+00, 0.3082200E+00, &
     & 0.3678600E+00, 0.2979000E+00, 0.3263600E+00, 0.3536611E+00, &
     & 0.3678252E+00, 0.3630990E+00, 0.3696659E+00, 0.3696659E+00 /
      data (ref_adm(25,iz,38,12),iz = 1,20) / &
     & 0.2326700E+00, 0.2326700E+00, 0.2295800E+00, 0.2465700E+00, &
     & 0.2783800E+00, 0.2507000E+00, 0.2231800E+00, 0.2541800E+00, &
     & 0.2541900E+00, 0.2825100E+00, 0.3043300E+00, 0.3082200E+00, &
     & 0.3678600E+00, 0.2979000E+00, 0.3263600E+00, 0.3536611E+00, &
     & 0.3678252E+00, 0.3630990E+00, 0.3696659E+00, 0.3696659E+00 /
! Solar Zenith Angle 60.0 Albedo  0.2564442E+00
      data (ref_adm(25,iz, 1,13),iz = 1,20) / &
     & 0.1921400E+00, 0.1921400E+00, 0.1637600E+00, 0.1993300E+00, &
     & 0.2510600E+00, 0.1989200E+00, 0.2165900E+00, 0.2429500E+00, &
     & 0.2139300E+00, 0.2388000E+00, 0.2166100E+00, 0.2723400E+00, &
     & 0.2140200E+00, 0.3393200E+00, 0.3891800E+00, 0.3863000E+00, &
     & 0.4397599E+00, 0.5657000E+00, 0.6813114E+00, 0.6813114E+00 /
      data (ref_adm(25,iz, 2,13),iz = 1,20) / &
     & 0.1921400E+00, 0.1921400E+00, 0.1637600E+00, 0.1993300E+00, &
     & 0.2510600E+00, 0.1989200E+00, 0.2165900E+00, 0.2429500E+00, &
     & 0.2139300E+00, 0.2388000E+00, 0.2166100E+00, 0.2723400E+00, &
     & 0.2140200E+00, 0.3393200E+00, 0.3891800E+00, 0.3863000E+00, &
     & 0.4397599E+00, 0.5657000E+00, 0.6813114E+00, 0.6813114E+00 /
      data (ref_adm(25,iz, 3,13),iz = 1,20) / &
     & 0.1825900E+00, 0.1825900E+00, 0.1877600E+00, 0.1801900E+00, &
     & 0.2153000E+00, 0.2000100E+00, 0.2038400E+00, 0.2220600E+00, &
     & 0.2129600E+00, 0.2166000E+00, 0.1940200E+00, 0.2277500E+00, &
     & 0.2822200E+00, 0.3189100E+00, 0.3202400E+00, 0.3494100E+00, &
     & 0.4707100E+00, 0.5238702E+00, 0.8201909E-01, 0.8201909E-01 /
      data (ref_adm(25,iz, 4,13),iz = 1,20) / &
     & 0.2445600E+00, 0.2445600E+00, 0.1886000E+00, 0.1882700E+00, &
     & 0.1985200E+00, 0.2076600E+00, 0.2057900E+00, 0.2235400E+00, &
     & 0.2095900E+00, 0.3216600E+00, 0.2298200E+00, 0.2554700E+00, &
     & 0.2862500E+00, 0.3506700E+00, 0.3327500E+00, 0.3703200E+00, &
     & 0.4331267E+00, 0.5123615E+00, 0.6296047E+00, 0.6296047E+00 /
      data (ref_adm(25,iz, 5,13),iz = 1,20) / &
     & 0.1835700E+00, 0.1835700E+00, 0.1793800E+00, 0.2096100E+00, &
     & 0.2092300E+00, 0.1757100E+00, 0.2009800E+00, 0.1896800E+00, &
     & 0.2077700E+00, 0.1806100E+00, 0.2705900E+00, 0.2872500E+00, &
     & 0.2954800E+00, 0.3325000E+00, 0.3388300E+00, 0.3429000E+00, &
     & 0.4322500E+00, 0.5005084E+00, 0.5908992E+00, 0.5908992E+00 /
      data (ref_adm(25,iz, 6,13),iz = 1,20) / &
     & 0.1926200E+00, 0.1926200E+00, 0.1857100E+00, 0.2095500E+00, &
     & 0.1966900E+00, 0.1792300E+00, 0.2008500E+00, 0.2052400E+00, &
     & 0.1949100E+00, 0.2139600E+00, 0.2391500E+00, 0.2763300E+00, &
     & 0.2531400E+00, 0.3536600E+00, 0.3040700E+00, 0.3669444E+00, &
     & 0.4182087E+00, 0.4887799E+00, 0.4369100E+00, 0.4369100E+00 /
      data (ref_adm(25,iz, 7,13),iz = 1,20) / &
     & 0.2015500E+00, 0.2015500E+00, 0.1954600E+00, 0.2045700E+00, &
     & 0.2118200E+00, 0.2221800E+00, 0.1967200E+00, 0.2095400E+00, &
     & 0.2404100E+00, 0.2191500E+00, 0.1924300E+00, 0.2508600E+00, &
     & 0.2549500E+00, 0.2315100E+00, 0.2739700E+00, 0.3599639E+00, &
     & 0.4170600E+00, 0.4516400E+00, 0.4220000E+00, 0.4220000E+00 /
      data (ref_adm(25,iz, 8,13),iz = 1,20) / &
     & 0.2185700E+00, 0.2185700E+00, 0.2282800E+00, 0.2389100E+00, &
     & 0.2324200E+00, 0.2159400E+00, 0.1927600E+00, 0.1989800E+00, &
     & 0.2385400E+00, 0.2373300E+00, 0.1924800E+00, 0.2792600E+00, &
     & 0.2542800E+00, 0.2379700E+00, 0.2408200E+00, 0.2063300E+00, &
     & 0.3939261E+00, 0.4586445E+00, 0.5172768E+00, 0.5172768E+00 /
      data (ref_adm(25,iz, 9,13),iz = 1,20) / &
     & 0.2328700E+00, 0.2328700E+00, 0.2182900E+00, 0.2221900E+00, &
     & 0.2413500E+00, 0.2201900E+00, 0.2105500E+00, 0.1954500E+00, &
     & 0.2150800E+00, 0.2375400E+00, 0.1759700E+00, 0.2506300E+00, &
     & 0.2311000E+00, 0.2016900E+00, 0.2556600E+00, 0.3463106E+00, &
     & 0.3833105E+00, 0.4383824E+00, 0.4916594E+00, 0.4916594E+00 /
      data (ref_adm(25,iz,10,13),iz = 1,20) / &
     & 0.2093100E+00, 0.2093100E+00, 0.2347000E+00, 0.2161400E+00, &
     & 0.2002200E+00, 0.1955300E+00, 0.2008200E+00, 0.2139600E+00, &
     & 0.2007400E+00, 0.2412500E+00, 0.2428500E+00, 0.2301500E+00, &
     & 0.2770100E+00, 0.2533200E+00, 0.2447500E+00, 0.2293700E+00, &
     & 0.2770200E+00, 0.4223780E+00, 0.4633131E+00, 0.4633131E+00 /
      data (ref_adm(25,iz,11,13),iz = 1,20) / &
     & 0.2265100E+00, 0.2265100E+00, 0.2199700E+00, 0.2119600E+00, &
     & 0.2058100E+00, 0.1915800E+00, 0.1730600E+00, 0.2164700E+00, &
     & 0.2104700E+00, 0.2356000E+00, 0.2311000E+00, 0.2864800E+00, &
     & 0.2000900E+00, 0.2596400E+00, 0.2608000E+00, 0.3422900E+00, &
     & 0.2306100E+00, 0.4097624E+00, 0.4422100E+00, 0.4422100E+00 /
      data (ref_adm(25,iz,12,13),iz = 1,20) / &
     & 0.2265700E+00, 0.2265700E+00, 0.2114300E+00, 0.2061500E+00, &
     & 0.2306000E+00, 0.2100400E+00, 0.2145400E+00, 0.2285100E+00, &
     & 0.2064300E+00, 0.2484800E+00, 0.2414200E+00, 0.2579900E+00, &
     & 0.2922500E+00, 0.2506000E+00, 0.2651900E+00, 0.3299070E+00, &
     & 0.3601092E+00, 0.4000093E+00, 0.4270034E+00, 0.4270034E+00 /
      data (ref_adm(25,iz,13,13),iz = 1,20) / &
     & 0.1935600E+00, 0.1935600E+00, 0.1827400E+00, 0.1968400E+00, &
     & 0.2087300E+00, 0.2039300E+00, 0.1915000E+00, 0.2203700E+00, &
     & 0.2239300E+00, 0.2424600E+00, 0.2205000E+00, 0.2177700E+00, &
     & 0.2712700E+00, 0.2609700E+00, 0.2248100E+00, 0.3245043E+00, &
     & 0.3540888E+00, 0.3918078E+00, 0.4147263E+00, 0.4147263E+00 /
      data (ref_adm(25,iz,14,13),iz = 1,20) / &
     & 0.2141500E+00, 0.2141500E+00, 0.2110000E+00, 0.2128400E+00, &
     & 0.2179600E+00, 0.2031600E+00, 0.2078300E+00, 0.2193200E+00, &
     & 0.2114600E+00, 0.2292200E+00, 0.2314900E+00, 0.2359700E+00, &
     & 0.2359700E+00, 0.2523200E+00, 0.2921062E+00, 0.2783700E+00, &
     & 0.3474105E+00, 0.3844831E+00, 0.4046984E+00, 0.4046984E+00 /
      data (ref_adm(25,iz,15,13),iz = 1,20) / &
     & 0.2205500E+00, 0.2205500E+00, 0.2021600E+00, 0.1974700E+00, &
     & 0.2055300E+00, 0.2020100E+00, 0.1919100E+00, 0.2102800E+00, &
     & 0.2201400E+00, 0.2319400E+00, 0.2224400E+00, 0.2414400E+00, &
     & 0.2379400E+00, 0.2455300E+00, 0.3184500E+00, 0.3132491E+00, &
     & 0.3402825E+00, 0.3761939E+00, 0.3952291E+00, 0.3952291E+00 /
      data (ref_adm(25,iz,16,13),iz = 1,20) / &
     & 0.2099700E+00, 0.2099700E+00, 0.1920400E+00, 0.1922300E+00, &
     & 0.2122300E+00, 0.2329700E+00, 0.2001300E+00, 0.1984200E+00, &
     & 0.2059500E+00, 0.2147900E+00, 0.2303500E+00, 0.2233400E+00, &
     & 0.2382400E+00, 0.2619900E+00, 0.2351300E+00, 0.3083613E+00, &
     & 0.3342104E+00, 0.3674773E+00, 0.3842817E+00, 0.3842817E+00 /
      data (ref_adm(25,iz,17,13),iz = 1,20) / &
     & 0.2012700E+00, 0.2012700E+00, 0.2359900E+00, 0.2632400E+00, &
     & 0.2588800E+00, 0.2087600E+00, 0.1841900E+00, 0.1999700E+00, &
     & 0.3023300E+00, 0.1979700E+00, 0.2089700E+00, 0.2389426E+00, &
     & 0.2251700E+00, 0.2187900E+00, 0.2248700E+00, 0.3041955E+00, &
     & 0.3284484E+00, 0.3597660E+00, 0.3738588E+00, 0.3738588E+00 /
      data (ref_adm(25,iz,18,13),iz = 1,20) / &
     & 0.2250400E+00, 0.2250400E+00, 0.2337600E+00, 0.2870600E+00, &
     & 0.2109900E+00, 0.2289400E+00, 0.1915300E+00, 0.2431600E+00, &
     & 0.2243500E+00, 0.1969800E+00, 0.2002800E+00, 0.2327866E+00, &
     & 0.2420620E+00, 0.2702700E+00, 0.2628921E+00, 0.2764866E+00, &
     & 0.2861257E+00, 0.2870817E+00, 0.2556778E+00, 0.2556778E+00 /
      data (ref_adm(25,iz,19,13),iz = 1,20) / &
     & 0.2014300E+00, 0.2014300E+00, 0.2268900E+00, 0.2182400E+00, &
     & 0.2084200E+00, 0.2050100E+00, 0.1969100E+00, 0.2293500E+00, &
     & 0.2484700E+00, 0.2149600E+00, 0.2758700E+00, 0.2479900E+00, &
     & 0.2411702E+00, 0.2324000E+00, 0.2488800E+00, 0.2896300E+00, &
     & 0.2831973E+00, 0.2840161E+00, 0.2535101E+00, 0.2535101E+00 /
      data (ref_adm(25,iz,20,13),iz = 1,20) / &
     & 0.2146900E+00, 0.2146900E+00, 0.1859500E+00, 0.2658900E+00, &
     & 0.2598800E+00, 0.2422400E+00, 0.2034200E+00, 0.2027300E+00, &
     & 0.1997600E+00, 0.2123900E+00, 0.2232100E+00, 0.2361900E+00, &
     & 0.2481000E+00, 0.2587700E+00, 0.2480300E+00, 0.2711358E+00, &
     & 0.2800485E+00, 0.2805369E+00, 0.2517126E+00, 0.2517126E+00 /
      data (ref_adm(25,iz,21,13),iz = 1,20) / &
     & 0.2152800E+00, 0.2152800E+00, 0.1974700E+00, 0.1915400E+00, &
     & 0.1908900E+00, 0.2260600E+00, 0.2413300E+00, 0.2133300E+00, &
     & 0.1922600E+00, 0.2199500E+00, 0.2277763E+00, 0.2391900E+00, &
     & 0.2384600E+00, 0.2551000E+00, 0.2511100E+00, 0.2686608E+00, &
     & 0.2772647E+00, 0.2774304E+00, 0.2500215E+00, 0.2500215E+00 /
      data (ref_adm(25,iz,22,13),iz = 1,20) / &
     & 0.2138800E+00, 0.2138800E+00, 0.2308500E+00, 0.2026600E+00, &
     & 0.2329500E+00, 0.2020400E+00, 0.2519700E+00, 0.2275800E+00, &
     & 0.2179400E+00, 0.2376400E+00, 0.2457137E+00, 0.2342600E+00, &
     & 0.2561500E+00, 0.2587000E+00, 0.2442600E+00, 0.2508900E+00, &
     & 0.3119451E+00, 0.3296399E+00, 0.3309056E+00, 0.3309056E+00 /
      data (ref_adm(25,iz,23,13),iz = 1,20) / &
     & 0.2467300E+00, 0.2467300E+00, 0.2343200E+00, 0.2550300E+00, &
     & 0.1791400E+00, 0.1877500E+00, 0.2254200E+00, 0.2428300E+00, &
     & 0.2125400E+00, 0.2452200E+00, 0.2192000E+00, 0.2609500E+00, &
     & 0.2783300E+00, 0.2323000E+00, 0.2695000E+00, 0.2790800E+00, &
     & 0.3124155E+00, 0.3288934E+00, 0.3312763E+00, 0.3312763E+00 /
      data (ref_adm(25,iz,24,13),iz = 1,20) / &
     & 0.2124700E+00, 0.2124700E+00, 0.2059000E+00, 0.2219000E+00, &
     & 0.2201800E+00, 0.2100500E+00, 0.2327400E+00, 0.2143800E+00, &
     & 0.2323000E+00, 0.2542700E+00, 0.2317900E+00, 0.2500000E+00, &
     & 0.2847500E+00, 0.3091600E+00, 0.2790800E+00, 0.3211400E+00, &
     & 0.3132977E+00, 0.3298620E+00, 0.3330721E+00, 0.3330721E+00 /
      data (ref_adm(25,iz,25,13),iz = 1,20) / &
     & 0.2159800E+00, 0.2159800E+00, 0.2138100E+00, 0.2116100E+00, &
     & 0.2179700E+00, 0.2163000E+00, 0.2396200E+00, 0.2220400E+00, &
     & 0.2196700E+00, 0.2303500E+00, 0.2539800E+00, 0.2620100E+00, &
     & 0.2684200E+00, 0.2858700E+00, 0.2747900E+00, 0.3074000E+00, &
     & 0.3159131E+00, 0.3316802E+00, 0.3362405E+00, 0.3362405E+00 /
      data (ref_adm(25,iz,26,13),iz = 1,20) / &
     & 0.2224900E+00, 0.2224900E+00, 0.2219100E+00, 0.2300300E+00, &
     & 0.2286400E+00, 0.2701600E+00, 0.2477200E+00, 0.2394400E+00, &
     & 0.2363700E+00, 0.2649600E+00, 0.2529900E+00, 0.2640600E+00, &
     & 0.2689500E+00, 0.3111700E+00, 0.3062300E+00, 0.3059800E+00, &
     & 0.2922900E+00, 0.2920000E+00, 0.3408149E+00, 0.3408149E+00 /
      data (ref_adm(25,iz,27,13),iz = 1,20) / &
     & 0.2219900E+00, 0.2219900E+00, 0.2054700E+00, 0.2182100E+00, &
     & 0.2255100E+00, 0.2363300E+00, 0.3009600E+00, 0.3512500E+00, &
     & 0.2217600E+00, 0.2637300E+00, 0.2790100E+00, 0.3076200E+00, &
     & 0.3217100E+00, 0.3114900E+00, 0.3042700E+00, 0.2803800E+00, &
     & 0.3249850E+00, 0.3407493E+00, 0.3474899E+00, 0.3474899E+00 /
      data (ref_adm(25,iz,28,13),iz = 1,20) / &
     & 0.2241900E+00, 0.2241900E+00, 0.1968000E+00, 0.2177000E+00, &
     & 0.2314000E+00, 0.2354200E+00, 0.2196500E+00, 0.2247500E+00, &
     & 0.2142400E+00, 0.2428800E+00, 0.2162600E+00, 0.2590800E+00, &
     & 0.2544400E+00, 0.2959900E+00, 0.3453400E+00, 0.2942300E+00, &
     & 0.3171900E+00, 0.3469849E+00, 0.3557451E+00, 0.3557451E+00 /
      data (ref_adm(25,iz,29,13),iz = 1,20) / &
     & 0.2310200E+00, 0.2310200E+00, 0.2207000E+00, 0.2156000E+00, &
     & 0.1984900E+00, 0.2256500E+00, 0.2202500E+00, 0.2577600E+00, &
     & 0.2271800E+00, 0.2439000E+00, 0.2574900E+00, 0.2753600E+00, &
     & 0.2584300E+00, 0.2581500E+00, 0.2844200E+00, 0.3185800E+00, &
     & 0.4049300E+00, 0.3537008E+00, 0.3643023E+00, 0.3643023E+00 /
      data (ref_adm(25,iz,30,13),iz = 1,20) / &
     & 0.2425800E+00, 0.2425800E+00, 0.2311500E+00, 0.2151100E+00, &
     & 0.2300100E+00, 0.2124300E+00, 0.2403000E+00, 0.2167400E+00, &
     & 0.2529000E+00, 0.2367400E+00, 0.2435800E+00, 0.2604300E+00, &
     & 0.3052400E+00, 0.2908300E+00, 0.2713200E+00, 0.2960500E+00, &
     & 0.3473700E+00, 0.3616176E+00, 0.3731295E+00, 0.3731295E+00 /
      data (ref_adm(25,iz,31,13),iz = 1,20) / &
     & 0.2238400E+00, 0.2238400E+00, 0.2123900E+00, 0.2157800E+00, &
     & 0.2232700E+00, 0.2346800E+00, 0.2384700E+00, 0.2414900E+00, &
     & 0.2428000E+00, 0.2632500E+00, 0.2674300E+00, 0.2773500E+00, &
     & 0.2771000E+00, 0.2808000E+00, 0.2769800E+00, 0.3090500E+00, &
     & 0.3303300E+00, 0.3696524E+00, 0.3827278E+00, 0.3827278E+00 /
      data (ref_adm(25,iz,32,13),iz = 1,20) / &
     & 0.2189000E+00, 0.2189000E+00, 0.2306900E+00, 0.2395100E+00, &
     & 0.2349700E+00, 0.2622100E+00, 0.2706800E+00, 0.2729400E+00, &
     & 0.2600100E+00, 0.2405000E+00, 0.2577500E+00, 0.2996100E+00, &
     & 0.2702200E+00, 0.3129359E+00, 0.2832300E+00, 0.3437369E+00, &
     & 0.3601292E+00, 0.3781064E+00, 0.3916180E+00, 0.3916180E+00 /
      data (ref_adm(25,iz,33,13),iz = 1,20) / &
     & 0.2278100E+00, 0.2278100E+00, 0.2302200E+00, 0.2113000E+00, &
     & 0.2074900E+00, 0.2084600E+00, 0.2630600E+00, 0.2815700E+00, &
     & 0.3129800E+00, 0.2494000E+00, 0.2576000E+00, 0.3083400E+00, &
     & 0.3145200E+00, 0.3849900E+00, 0.3574900E+00, 0.3408800E+00, &
     & 0.3686900E+00, 0.3860742E+00, 0.4002912E+00, 0.4002912E+00 /
      data (ref_adm(25,iz,34,13),iz = 1,20) / &
     & 0.2075000E+00, 0.2075000E+00, 0.2361000E+00, 0.2346800E+00, &
     & 0.2257700E+00, 0.2542700E+00, 0.2088100E+00, 0.2989900E+00, &
     & 0.2944700E+00, 0.2892200E+00, 0.2913700E+00, 0.3017700E+00, &
     & 0.3491600E+00, 0.3622400E+00, 0.3428500E+00, 0.3176800E+00, &
     & 0.3565600E+00, 0.3928975E+00, 0.4081126E+00, 0.4081126E+00 /
      data (ref_adm(25,iz,35,13),iz = 1,20) / &
     & 0.2056400E+00, 0.2056400E+00, 0.2320500E+00, 0.2273200E+00, &
     & 0.2009500E+00, 0.2358000E+00, 0.2226900E+00, 0.2637500E+00, &
     & 0.2746800E+00, 0.2427200E+00, 0.2530000E+00, 0.3724300E+00, &
     & 0.3287500E+00, 0.3678700E+00, 0.3172300E+00, 0.3418000E+00, &
     & 0.3775089E+00, 0.3986045E+00, 0.4143164E+00, 0.4143164E+00 /
      data (ref_adm(25,iz,36,13),iz = 1,20) / &
     & 0.2011600E+00, 0.2011600E+00, 0.2189500E+00, 0.2093700E+00, &
     & 0.2243200E+00, 0.2353300E+00, 0.1973100E+00, 0.4334100E+00, &
     & 0.2796600E+00, 0.2945000E+00, 0.3137000E+00, 0.3492000E+00, &
     & 0.3566300E+00, 0.3737000E+00, 0.3476000E+00, 0.3561096E+00, &
     & 0.3791734E+00, 0.4025927E+00, 0.4183820E+00, 0.4183820E+00 /
      data (ref_adm(25,iz,37,13),iz = 1,20) / &
     & 0.2117800E+00, 0.2117800E+00, 0.2168200E+00, 0.2108300E+00, &
     & 0.2234700E+00, 0.2457700E+00, 0.2472100E+00, 0.2289700E+00, &
     & 0.2534400E+00, 0.2894100E+00, 0.3134500E+00, 0.3267400E+00, &
     & 0.3371400E+00, 0.3084700E+00, 0.3353500E+00, 0.3568315E+00, &
     & 0.3797177E+00, 0.4046290E+00, 0.4206158E+00, 0.4206158E+00 /
      data (ref_adm(25,iz,38,13),iz = 1,20) / &
     & 0.2117800E+00, 0.2117800E+00, 0.2168200E+00, 0.2108300E+00, &
     & 0.2234700E+00, 0.2457700E+00, 0.2472100E+00, 0.2289700E+00, &
     & 0.2534400E+00, 0.2894100E+00, 0.3134500E+00, 0.3267400E+00, &
     & 0.3371400E+00, 0.3084700E+00, 0.3353500E+00, 0.3568315E+00, &
     & 0.3797177E+00, 0.4046290E+00, 0.4206158E+00, 0.4206158E+00 /
! Solar Zenith Angle 65.0 Albedo  0.2731691E+00
      data (ref_adm(25,iz, 1,14),iz = 1,20) / &
     & 0.2128700E+00, 0.2128700E+00, 0.2032100E+00, 0.2052300E+00, &
     & 0.2163900E+00, 0.2028500E+00, 0.2146000E+00, 0.2074400E+00, &
     & 0.2055500E+00, 0.1865100E+00, 0.2127800E+00, 0.2240500E+00, &
     & 0.3173100E+00, 0.3226100E+00, 0.3752600E+00, 0.4494300E+00, &
     & 0.5011356E+00, 0.6983470E+00, 0.1116489E+01, 0.1116489E+01 /
      data (ref_adm(25,iz, 2,14),iz = 1,20) / &
     & 0.2128700E+00, 0.2128700E+00, 0.2032100E+00, 0.2052300E+00, &
     & 0.2163900E+00, 0.2028500E+00, 0.2146000E+00, 0.2074400E+00, &
     & 0.2055500E+00, 0.1865100E+00, 0.2127800E+00, 0.2240500E+00, &
     & 0.3173100E+00, 0.3226100E+00, 0.3752600E+00, 0.4494300E+00, &
     & 0.5011356E+00, 0.6983470E+00, 0.1116489E+01, 0.1116489E+01 /
      data (ref_adm(25,iz, 3,14),iz = 1,20) / &
     & 0.2043600E+00, 0.2043600E+00, 0.2171600E+00, 0.2132600E+00, &
     & 0.2183300E+00, 0.2282200E+00, 0.2074500E+00, 0.2124700E+00, &
     & 0.2070800E+00, 0.2177900E+00, 0.2074700E+00, 0.2712900E+00, &
     & 0.3083000E+00, 0.3187200E+00, 0.3711500E+00, 0.4526200E+00, &
     & 0.5130100E+00, 0.6791693E+00, 0.1039515E+00, 0.1039515E+00 /
      data (ref_adm(25,iz, 4,14),iz = 1,20) / &
     & 0.2609400E+00, 0.2609400E+00, 0.2242300E+00, 0.1864800E+00, &
     & 0.2161300E+00, 0.1960600E+00, 0.1941000E+00, 0.2140200E+00, &
     & 0.2259300E+00, 0.2073500E+00, 0.2137700E+00, 0.2125600E+00, &
     & 0.3036200E+00, 0.2563900E+00, 0.3249000E+00, 0.3026300E+00, &
     & 0.5701100E+00, 0.6445886E+00, 0.9353555E+00, 0.9353555E+00 /
      data (ref_adm(25,iz, 5,14),iz = 1,20) / &
     & 0.1870600E+00, 0.1870600E+00, 0.2218000E+00, 0.2365900E+00, &
     & 0.1960800E+00, 0.2277800E+00, 0.1936600E+00, 0.2314500E+00, &
     & 0.2178600E+00, 0.1903000E+00, 0.2395200E+00, 0.2625300E+00, &
     & 0.2575300E+00, 0.3081300E+00, 0.3204400E+00, 0.3126800E+00, &
     & 0.4523200E+00, 0.6067343E+00, 0.8192528E+00, 0.8192528E+00 /
      data (ref_adm(25,iz, 6,14),iz = 1,20) / &
     & 0.2004100E+00, 0.2004100E+00, 0.2306800E+00, 0.2107600E+00, &
     & 0.1950000E+00, 0.2041300E+00, 0.2118100E+00, 0.2115800E+00, &
     & 0.2352100E+00, 0.2163400E+00, 0.2423300E+00, 0.2659100E+00, &
     & 0.3249100E+00, 0.2808700E+00, 0.3256500E+00, 0.3508300E+00, &
     & 0.4450200E+00, 0.5731351E+00, 0.7267894E+00, 0.7267894E+00 /
      data (ref_adm(25,iz, 7,14),iz = 1,20) / &
     & 0.2248700E+00, 0.2248700E+00, 0.2078100E+00, 0.2038200E+00, &
     & 0.1965700E+00, 0.1995100E+00, 0.1953700E+00, 0.1922800E+00, &
     & 0.2043800E+00, 0.2141800E+00, 0.2662100E+00, 0.2677700E+00, &
     & 0.2947000E+00, 0.3004800E+00, 0.3360100E+00, 0.2543000E+00, &
     & 0.4572187E+00, 0.5497382E+00, 0.6565441E+00, 0.6565441E+00 /
      data (ref_adm(25,iz, 8,14),iz = 1,20) / &
     & 0.2043300E+00, 0.2043300E+00, 0.2072000E+00, 0.1980900E+00, &
     & 0.2195600E+00, 0.2021900E+00, 0.2088400E+00, 0.2244200E+00, &
     & 0.2048300E+00, 0.2400100E+00, 0.2399000E+00, 0.2618000E+00, &
     & 0.2752600E+00, 0.2863000E+00, 0.3283000E+00, 0.3820930E+00, &
     & 0.4410811E+00, 0.5331110E+00, 0.6191893E+00, 0.6191893E+00 /
      data (ref_adm(25,iz, 9,14),iz = 1,20) / &
     & 0.2047700E+00, 0.2047700E+00, 0.1776100E+00, 0.1935600E+00, &
     & 0.1833800E+00, 0.1897900E+00, 0.1808000E+00, 0.1841700E+00, &
     & 0.2162800E+00, 0.2285500E+00, 0.2656300E+00, 0.2674900E+00, &
     & 0.2855400E+00, 0.2981700E+00, 0.3031000E+00, 0.3967400E+00, &
     & 0.4245732E+00, 0.5096643E+00, 0.5965371E+00, 0.5965371E+00 /
      data (ref_adm(25,iz,10,14),iz = 1,20) / &
     & 0.2053000E+00, 0.2053000E+00, 0.2059700E+00, 0.1804900E+00, &
     & 0.1962500E+00, 0.2006100E+00, 0.1848900E+00, 0.2317300E+00, &
     & 0.1897500E+00, 0.2336100E+00, 0.2141200E+00, 0.2740900E+00, &
     & 0.2659500E+00, 0.3155100E+00, 0.2960600E+00, 0.2826400E+00, &
     & 0.4113801E+00, 0.4094200E+00, 0.5575172E+00, 0.5575172E+00 /
      data (ref_adm(25,iz,11,14),iz = 1,20) / &
     & 0.1972500E+00, 0.1972500E+00, 0.2261400E+00, 0.2562000E+00, &
     & 0.1734200E+00, 0.1692300E+00, 0.2212100E+00, 0.2258300E+00, &
     & 0.1906200E+00, 0.2398000E+00, 0.2459500E+00, 0.2298400E+00, &
     & 0.2631000E+00, 0.2798900E+00, 0.2832800E+00, 0.3052400E+00, &
     & 0.4005348E+00, 0.4636567E+00, 0.5226133E+00, 0.5226133E+00 /
      data (ref_adm(25,iz,12,14),iz = 1,20) / &
     & 0.2141000E+00, 0.2141000E+00, 0.2102800E+00, 0.2534500E+00, &
     & 0.2273400E+00, 0.1988700E+00, 0.2158800E+00, 0.2262100E+00, &
     & 0.2119500E+00, 0.2256200E+00, 0.2803200E+00, 0.2364600E+00, &
     & 0.2590600E+00, 0.2263100E+00, 0.3162871E+00, 0.3349600E+00, &
     & 0.3919198E+00, 0.4494749E+00, 0.4992290E+00, 0.4992290E+00 /
      data (ref_adm(25,iz,13,14),iz = 1,20) / &
     & 0.2023900E+00, 0.2023900E+00, 0.2099700E+00, 0.2222100E+00, &
     & 0.2202600E+00, 0.2399200E+00, 0.2219800E+00, 0.2152200E+00, &
     & 0.2516400E+00, 0.2362400E+00, 0.2349800E+00, 0.2425200E+00, &
     & 0.2772700E+00, 0.2821400E+00, 0.3272400E+00, 0.3460995E+00, &
     & 0.3846079E+00, 0.4382864E+00, 0.4815792E+00, 0.4815792E+00 /
      data (ref_adm(25,iz,14,14),iz = 1,20) / &
     & 0.2107500E+00, 0.2107500E+00, 0.2284100E+00, 0.2206700E+00, &
     & 0.2080300E+00, 0.2154500E+00, 0.2217700E+00, 0.2340600E+00, &
     & 0.2169500E+00, 0.2215000E+00, 0.2246700E+00, 0.2192300E+00, &
     & 0.2138500E+00, 0.2589700E+00, 0.2359600E+00, 0.3399825E+00, &
     & 0.3776017E+00, 0.4292534E+00, 0.4678743E+00, 0.4678743E+00 /
      data (ref_adm(25,iz,15,14),iz = 1,20) / &
     & 0.2150100E+00, 0.2150100E+00, 0.2137200E+00, 0.2046100E+00, &
     & 0.2058600E+00, 0.2077900E+00, 0.2073600E+00, 0.2163700E+00, &
     & 0.2271400E+00, 0.2265200E+00, 0.2407000E+00, 0.2408100E+00, &
     & 0.2474600E+00, 0.2707400E+00, 0.2900300E+00, 0.2336100E+00, &
     & 0.3697614E+00, 0.4201732E+00, 0.4558607E+00, 0.4558607E+00 /
      data (ref_adm(25,iz,16,14),iz = 1,20) / &
     & 0.2013400E+00, 0.2013400E+00, 0.1853200E+00, 0.1945200E+00, &
     & 0.1971000E+00, 0.1859900E+00, 0.1989300E+00, 0.2051200E+00, &
     & 0.2098100E+00, 0.2200400E+00, 0.2173200E+00, 0.2260600E+00, &
     & 0.2436900E+00, 0.2700500E+00, 0.3296400E+00, 0.2618500E+00, &
     & 0.3625654E+00, 0.4096142E+00, 0.4428090E+00, 0.4428090E+00 /
      data (ref_adm(25,iz,17,14),iz = 1,20) / &
     & 0.2010000E+00, 0.2010000E+00, 0.2244400E+00, 0.2366900E+00, &
     & 0.2167500E+00, 0.1906600E+00, 0.2172700E+00, 0.2126500E+00, &
     & 0.2145900E+00, 0.2446700E+00, 0.2572300E+00, 0.2195900E+00, &
     & 0.2345700E+00, 0.2547400E+00, 0.3611700E+00, 0.3238409E+00, &
     & 0.3561071E+00, 0.4005033E+00, 0.4294510E+00, 0.4294510E+00 /
      data (ref_adm(25,iz,18,14),iz = 1,20) / &
     & 0.2255500E+00, 0.2255500E+00, 0.1879400E+00, 0.2070500E+00, &
     & 0.2254500E+00, 0.2237500E+00, 0.2019000E+00, 0.2235400E+00, &
     & 0.2255400E+00, 0.2144800E+00, 0.2196500E+00, 0.2171100E+00, &
     & 0.2123700E+00, 0.2781200E+00, 0.2954500E+00, 0.3002345E+00, &
     & 0.3206348E+00, 0.3461406E+00, 0.3550049E+00, 0.3550049E+00 /
      data (ref_adm(25,iz,19,14),iz = 1,20) / &
     & 0.1983900E+00, 0.1983900E+00, 0.2035200E+00, 0.2133800E+00, &
     & 0.1894300E+00, 0.2189500E+00, 0.2298700E+00, 0.2271900E+00, &
     & 0.2293100E+00, 0.2397800E+00, 0.2273900E+00, 0.2359200E+00, &
     & 0.2437100E+00, 0.2550100E+00, 0.2714500E+00, 0.2427900E+00, &
     & 0.3180279E+00, 0.3418149E+00, 0.3484219E+00, 0.3484219E+00 /
      data (ref_adm(25,iz,20,14),iz = 1,20) / &
     & 0.1986000E+00, 0.1986000E+00, 0.1930700E+00, 0.1933100E+00, &
     & 0.1905700E+00, 0.2039700E+00, 0.2143000E+00, 0.1974100E+00, &
     & 0.2056200E+00, 0.2286100E+00, 0.2497500E+00, 0.2482700E+00, &
     & 0.2595200E+00, 0.2483500E+00, 0.2848300E+00, 0.2971297E+00, &
     & 0.3161193E+00, 0.3389243E+00, 0.3445793E+00, 0.3445793E+00 /
      data (ref_adm(25,iz,21,14),iz = 1,20) / &
     & 0.2122600E+00, 0.2122600E+00, 0.1986600E+00, 0.2080700E+00, &
     & 0.2153600E+00, 0.2022400E+00, 0.2018400E+00, 0.2019300E+00, &
     & 0.2009900E+00, 0.2337800E+00, 0.2399800E+00, 0.2563800E+00, &
     & 0.2206400E+00, 0.2413000E+00, 0.2609700E+00, 0.2966914E+00, &
     & 0.3151264E+00, 0.3365748E+00, 0.3422085E+00, 0.3422085E+00 /
      data (ref_adm(25,iz,22,14),iz = 1,20) / &
     & 0.2143300E+00, 0.2143300E+00, 0.2402300E+00, 0.2406600E+00, &
     & 0.1981000E+00, 0.1925100E+00, 0.2203200E+00, 0.2200300E+00, &
     & 0.2072300E+00, 0.2239000E+00, 0.1905600E+00, 0.2473200E+00, &
     & 0.2368100E+00, 0.2634600E+00, 0.2643800E+00, 0.4280207E+00, &
     & 0.4684660E+00, 0.5093085E+00, 0.5307338E+00, 0.5307338E+00 /
      data (ref_adm(25,iz,23,14),iz = 1,20) / &
     & 0.2185600E+00, 0.2185600E+00, 0.2140900E+00, 0.1882800E+00, &
     & 0.1923900E+00, 0.2082200E+00, 0.2050100E+00, 0.2176500E+00, &
     & 0.2370300E+00, 0.2126200E+00, 0.2571800E+00, 0.2235900E+00, &
     & 0.2335700E+00, 0.3208100E+00, 0.2893600E+00, 0.3337500E+00, &
     & 0.4552454E+00, 0.4936759E+00, 0.5248490E+00, 0.5248490E+00 /
      data (ref_adm(25,iz,24,14),iz = 1,20) / &
     & 0.2094700E+00, 0.2094700E+00, 0.1997900E+00, 0.2027800E+00, &
     & 0.2076200E+00, 0.2146900E+00, 0.2202400E+00, 0.2284400E+00, &
     & 0.2335400E+00, 0.2339500E+00, 0.2627900E+00, 0.2537200E+00, &
     & 0.2604900E+00, 0.3010000E+00, 0.3250100E+00, 0.4074098E+00, &
     & 0.4439968E+00, 0.4819734E+00, 0.5235111E+00, 0.5235111E+00 /
      data (ref_adm(25,iz,25,14),iz = 1,20) / &
     & 0.2044400E+00, 0.2044400E+00, 0.2067300E+00, 0.2360800E+00, &
     & 0.2359000E+00, 0.2348500E+00, 0.2334100E+00, 0.2359200E+00, &
     & 0.2514600E+00, 0.2604400E+00, 0.2763600E+00, 0.2709900E+00, &
     & 0.2864000E+00, 0.2799400E+00, 0.2918500E+00, 0.3494900E+00, &
     & 0.4376682E+00, 0.4735028E+00, 0.5248298E+00, 0.5248298E+00 /
      data (ref_adm(25,iz,26,14),iz = 1,20) / &
     & 0.2251700E+00, 0.2251700E+00, 0.2287200E+00, 0.2306200E+00, &
     & 0.2461200E+00, 0.2381800E+00, 0.2523700E+00, 0.2757200E+00, &
     & 0.2621400E+00, 0.2765500E+00, 0.2910300E+00, 0.2938900E+00, &
     & 0.2696300E+00, 0.3096300E+00, 0.3619200E+00, 0.4030267E+00, &
     & 0.4364668E+00, 0.4721367E+00, 0.5331920E+00, 0.5331920E+00 /
      data (ref_adm(25,iz,27,14),iz = 1,20) / &
     & 0.2116200E+00, 0.2116200E+00, 0.2051300E+00, 0.2231800E+00, &
     & 0.2335700E+00, 0.2411100E+00, 0.2354400E+00, 0.2286800E+00, &
     & 0.2713000E+00, 0.2530100E+00, 0.2618500E+00, 0.2492900E+00, &
     & 0.3148200E+00, 0.3118300E+00, 0.3495100E+00, 0.3591400E+00, &
     & 0.4387176E+00, 0.4760160E+00, 0.5460960E+00, 0.5460960E+00 /
      data (ref_adm(25,iz,28,14),iz = 1,20) / &
     & 0.2159100E+00, 0.2159100E+00, 0.2115600E+00, 0.2066200E+00, &
     & 0.2016900E+00, 0.2402300E+00, 0.2507200E+00, 0.2303800E+00, &
     & 0.2661600E+00, 0.2582800E+00, 0.2404200E+00, 0.2838600E+00, &
     & 0.3070200E+00, 0.3105300E+00, 0.4209700E+00, 0.4115361E+00, &
     & 0.4449300E+00, 0.4819048E+00, 0.5606518E+00, 0.5606518E+00 /
      data (ref_adm(25,iz,29,14),iz = 1,20) / &
     & 0.2110600E+00, 0.2110600E+00, 0.2112200E+00, 0.2298000E+00, &
     & 0.2448300E+00, 0.2220200E+00, 0.2402700E+00, 0.2840700E+00, &
     & 0.2589900E+00, 0.2624400E+00, 0.2224300E+00, 0.2687300E+00, &
     & 0.2892800E+00, 0.3363500E+00, 0.3543800E+00, 0.4204934E+00, &
     & 0.4557127E+00, 0.4939674E+00, 0.5794764E+00, 0.5794764E+00 /
      data (ref_adm(25,iz,30,14),iz = 1,20) / &
     & 0.2145700E+00, 0.2145700E+00, 0.2094800E+00, 0.2261800E+00, &
     & 0.2345600E+00, 0.2367900E+00, 0.2324800E+00, 0.2577900E+00, &
     & 0.2651500E+00, 0.2759200E+00, 0.2663900E+00, 0.2619900E+00, &
     & 0.2882600E+00, 0.3132500E+00, 0.3599500E+00, 0.4038900E+00, &
     & 0.4712531E+00, 0.5101435E+00, 0.5998151E+00, 0.5998151E+00 /
      data (ref_adm(25,iz,31,14),iz = 1,20) / &
     & 0.2248300E+00, 0.2248300E+00, 0.2086800E+00, 0.2346800E+00, &
     & 0.2283300E+00, 0.2351800E+00, 0.2400800E+00, 0.2672200E+00, &
     & 0.2927300E+00, 0.2643500E+00, 0.2754500E+00, 0.2871700E+00, &
     & 0.3067600E+00, 0.3392700E+00, 0.3671700E+00, 0.4503673E+00, &
     & 0.4882045E+00, 0.5301015E+00, 0.6231447E+00, 0.6231447E+00 /
      data (ref_adm(25,iz,32,14),iz = 1,20) / &
     & 0.2223800E+00, 0.2223800E+00, 0.2390700E+00, 0.2283400E+00, &
     & 0.2328700E+00, 0.2399300E+00, 0.2505000E+00, 0.2503100E+00, &
     & 0.2728800E+00, 0.2645900E+00, 0.2976600E+00, 0.3156500E+00, &
     & 0.3080100E+00, 0.3604200E+00, 0.3801900E+00, 0.3763300E+00, &
     & 0.5061689E+00, 0.5503790E+00, 0.6452969E+00, 0.6452969E+00 /
      data (ref_adm(25,iz,33,14),iz = 1,20) / &
     & 0.2529500E+00, 0.2529500E+00, 0.2362400E+00, 0.2244300E+00, &
     & 0.2349700E+00, 0.2518700E+00, 0.2603000E+00, 0.2849400E+00, &
     & 0.2682600E+00, 0.2783300E+00, 0.3001000E+00, 0.3215300E+00, &
     & 0.3550800E+00, 0.3538100E+00, 0.3905700E+00, 0.3843700E+00, &
     & 0.5082212E+00, 0.5656778E+00, 0.6672376E+00, 0.6672376E+00 /
      data (ref_adm(25,iz,34,14),iz = 1,20) / &
     & 0.2152200E+00, 0.2152200E+00, 0.2120500E+00, 0.2538600E+00, &
     & 0.2214200E+00, 0.2112200E+00, 0.2311600E+00, 0.2697200E+00, &
     & 0.3177700E+00, 0.2855900E+00, 0.3228300E+00, 0.3570900E+00, &
     & 0.3725800E+00, 0.3474900E+00, 0.4028500E+00, 0.4111700E+00, &
     & 0.4912834E+00, 0.5568926E+00, 0.6814262E+00, 0.6814262E+00 /
      data (ref_adm(25,iz,35,14),iz = 1,20) / &
     & 0.2069900E+00, 0.2069900E+00, 0.2231700E+00, 0.2305900E+00, &
     & 0.2337600E+00, 0.2408500E+00, 0.2427600E+00, 0.2424500E+00, &
     & 0.2712100E+00, 0.2866800E+00, 0.3290200E+00, 0.3504200E+00, &
     & 0.3546500E+00, 0.3813700E+00, 0.4113800E+00, 0.3793100E+00, &
     & 0.4837788E+00, 0.5416992E+00, 0.6831709E+00, 0.6831709E+00 /
      data (ref_adm(25,iz,36,14),iz = 1,20) / &
     & 0.2232900E+00, 0.2232900E+00, 0.2225400E+00, 0.2209700E+00, &
     & 0.2366100E+00, 0.2616600E+00, 0.2456300E+00, 0.2588500E+00, &
     & 0.2853400E+00, 0.2713600E+00, 0.3665400E+00, 0.3999600E+00, &
     & 0.3819700E+00, 0.4051800E+00, 0.4066300E+00, 0.4798700E+00, &
     & 0.4876900E+00, 0.5365341E+00, 0.6796408E+00, 0.6796408E+00 /
      data (ref_adm(25,iz,37,14),iz = 1,20) / &
     & 0.1874600E+00, 0.1874600E+00, 0.1814100E+00, 0.2043900E+00, &
     & 0.2599900E+00, 0.2598700E+00, 0.2321600E+00, 0.2563300E+00, &
     & 0.2556800E+00, 0.2970600E+00, 0.3647700E+00, 0.4240800E+00, &
     & 0.4900400E+00, 0.4654600E+00, 0.5016000E+00, 0.4949900E+00, &
     & 0.4942398E+00, 0.5377148E+00, 0.6777409E+00, 0.6777409E+00 /
      data (ref_adm(25,iz,38,14),iz = 1,20) / &
     & 0.1874600E+00, 0.1874600E+00, 0.1814100E+00, 0.2043900E+00, &
     & 0.2599900E+00, 0.2598700E+00, 0.2321600E+00, 0.2563300E+00, &
     & 0.2556800E+00, 0.2970600E+00, 0.3647700E+00, 0.4240800E+00, &
     & 0.4900400E+00, 0.4654600E+00, 0.5016000E+00, 0.4949900E+00, &
     & 0.4942398E+00, 0.5377148E+00, 0.6777409E+00, 0.6777409E+00 /
! Solar Zenith Angle 70.0 Albedo  0.2823341E+00
      data (ref_adm(25,iz, 1,15),iz = 1,20) / &
     & 0.1928600E+00, 0.1928600E+00, 0.2037400E+00, 0.2093000E+00, &
     & 0.1896600E+00, 0.1821800E+00, 0.2119400E+00, 0.2086800E+00, &
     & 0.2067000E+00, 0.2257000E+00, 0.2505800E+00, 0.2600600E+00, &
     & 0.2890800E+00, 0.3477657E+00, 0.3965012E+00, 0.4621130E+00, &
     & 0.5421577E+00, 0.7285935E+00, 0.1126221E+01, 0.1126221E+01 /
      data (ref_adm(25,iz, 2,15),iz = 1,20) / &
     & 0.1928600E+00, 0.1928600E+00, 0.2037400E+00, 0.2093000E+00, &
     & 0.1896600E+00, 0.1821800E+00, 0.2119400E+00, 0.2086800E+00, &
     & 0.2067000E+00, 0.2257000E+00, 0.2505800E+00, 0.2600600E+00, &
     & 0.2890800E+00, 0.3477657E+00, 0.3965012E+00, 0.4621130E+00, &
     & 0.5421577E+00, 0.7285935E+00, 0.1126221E+01, 0.1126221E+01 /
      data (ref_adm(25,iz, 3,15),iz = 1,20) / &
     & 0.2063400E+00, 0.2063400E+00, 0.2072700E+00, 0.1911400E+00, &
     & 0.1939100E+00, 0.1865000E+00, 0.2084100E+00, 0.2071500E+00, &
     & 0.2271700E+00, 0.2182300E+00, 0.2155700E+00, 0.2944900E+00, &
     & 0.2942300E+00, 0.3471200E+00, 0.4784600E+00, 0.4594419E+00, &
     & 0.5361122E+00, 0.7086393E+00, 0.1111200E+00, 0.1111200E+00 /
      data (ref_adm(25,iz, 4,15),iz = 1,20) / &
     & 0.1814600E+00, 0.1814600E+00, 0.1997600E+00, 0.1861900E+00, &
     & 0.1857900E+00, 0.2137300E+00, 0.1743700E+00, 0.1956500E+00, &
     & 0.1991600E+00, 0.2031200E+00, 0.2764200E+00, 0.2797300E+00, &
     & 0.2891700E+00, 0.3799200E+00, 0.3333800E+00, 0.4535704E+00, &
     & 0.5251403E+00, 0.6723737E+00, 0.9436360E+00, 0.9436360E+00 /
      data (ref_adm(25,iz, 5,15),iz = 1,20) / &
     & 0.2068700E+00, 0.2068700E+00, 0.2065000E+00, 0.2173000E+00, &
     & 0.2113500E+00, 0.2203600E+00, 0.1917100E+00, 0.2058300E+00, &
     & 0.2266000E+00, 0.2212500E+00, 0.2577600E+00, 0.2483900E+00, &
     & 0.2909800E+00, 0.3527400E+00, 0.3407000E+00, 0.4455759E+00, &
     & 0.5127030E+00, 0.6321818E+00, 0.8264769E+00, 0.8264769E+00 /
      data (ref_adm(25,iz, 6,15),iz = 1,20) / &
     & 0.1932300E+00, 0.1932300E+00, 0.2052900E+00, 0.2057100E+00, &
     & 0.1933900E+00, 0.1970200E+00, 0.1939400E+00, 0.1933700E+00, &
     & 0.2110000E+00, 0.2023800E+00, 0.2347200E+00, 0.2618500E+00, &
     & 0.2774500E+00, 0.3123400E+00, 0.3458700E+00, 0.3921100E+00, &
     & 0.4988984E+00, 0.5956777E+00, 0.7330346E+00, 0.7330346E+00 /
      data (ref_adm(25,iz, 7,15),iz = 1,20) / &
     & 0.2158700E+00, 0.2158700E+00, 0.2185500E+00, 0.2127500E+00, &
     & 0.1883200E+00, 0.1730700E+00, 0.2028700E+00, 0.1997300E+00, &
     & 0.1803800E+00, 0.2328000E+00, 0.2681900E+00, 0.2880300E+00, &
     & 0.3013800E+00, 0.4218600E+00, 0.4557500E+00, 0.4205155E+00, &
     & 0.4842276E+00, 0.5690851E+00, 0.6619114E+00, 0.6619114E+00 /
      data (ref_adm(25,iz, 8,15),iz = 1,20) / &
     & 0.2137500E+00, 0.2137500E+00, 0.2083900E+00, 0.2111900E+00, &
     & 0.2161800E+00, 0.2484700E+00, 0.1763800E+00, 0.2038700E+00, &
     & 0.2309500E+00, 0.2218900E+00, 0.2354700E+00, 0.2689700E+00, &
     & 0.2867800E+00, 0.3204200E+00, 0.3146000E+00, 0.4924800E+00, &
     & 0.4646653E+00, 0.5493766E+00, 0.6238418E+00, 0.6238418E+00 /
      data (ref_adm(25,iz, 9,15),iz = 1,20) / &
     & 0.1958400E+00, 0.1958400E+00, 0.1991100E+00, 0.1793400E+00, &
     & 0.2204500E+00, 0.2181500E+00, 0.1968100E+00, 0.1907900E+00, &
     & 0.2371800E+00, 0.2348600E+00, 0.1954800E+00, 0.2711700E+00, &
     & 0.2865600E+00, 0.2869800E+00, 0.2770300E+00, 0.3938475E+00, &
     & 0.4448689E+00, 0.5234118E+00, 0.6006459E+00, 0.6006459E+00 /
      data (ref_adm(25,iz,10,15),iz = 1,20) / &
     & 0.2014400E+00, 0.2014400E+00, 0.2022700E+00, 0.2033300E+00, &
     & 0.2031100E+00, 0.1856700E+00, 0.1958300E+00, 0.2055100E+00, &
     & 0.2088600E+00, 0.2292900E+00, 0.1939500E+00, 0.2366800E+00, &
     & 0.2487500E+00, 0.2804600E+00, 0.2632800E+00, 0.3824646E+00, &
     & 0.4284360E+00, 0.4949550E+00, 0.5610874E+00, 0.5610874E+00 /
      data (ref_adm(25,iz,11,15),iz = 1,20) / &
     & 0.2140400E+00, 0.2140400E+00, 0.1969600E+00, 0.1846200E+00, &
     & 0.2116800E+00, 0.2077100E+00, 0.1983900E+00, 0.2022100E+00, &
     & 0.2178900E+00, 0.2325400E+00, 0.2132500E+00, 0.2306100E+00, &
     & 0.2971200E+00, 0.2299700E+00, 0.2419700E+00, 0.3723237E+00, &
     & 0.4144939E+00, 0.4730562E+00, 0.5256644E+00, 0.5256644E+00 /
      data (ref_adm(25,iz,12,15),iz = 1,20) / &
     & 0.2114100E+00, 0.2114100E+00, 0.1941900E+00, 0.2101700E+00, &
     & 0.1962000E+00, 0.1943800E+00, 0.1948800E+00, 0.2071700E+00, &
     & 0.2011900E+00, 0.2029400E+00, 0.2242400E+00, 0.2521300E+00, &
     & 0.2645000E+00, 0.2452600E+00, 0.2388700E+00, 0.3635834E+00, &
     & 0.4030196E+00, 0.4568738E+00, 0.5018438E+00, 0.5018438E+00 /
      data (ref_adm(25,iz,13,15),iz = 1,20) / &
     & 0.2219700E+00, 0.2219700E+00, 0.2191500E+00, 0.1938800E+00, &
     & 0.1940500E+00, 0.2128000E+00, 0.2326800E+00, 0.2272400E+00, &
     & 0.2111500E+00, 0.2140600E+00, 0.2613800E+00, 0.2369800E+00, &
     & 0.2445000E+00, 0.2306700E+00, 0.3690300E+00, 0.2915700E+00, &
     & 0.3931238E+00, 0.4438636E+00, 0.4838105E+00, 0.4838105E+00 /
      data (ref_adm(25,iz,14,15),iz = 1,20) / &
     & 0.2082600E+00, 0.2082600E+00, 0.2213100E+00, 0.2360900E+00, &
     & 0.2045000E+00, 0.2177400E+00, 0.1951700E+00, 0.2036400E+00, &
     & 0.2311300E+00, 0.2116300E+00, 0.2305800E+00, 0.2343700E+00, &
     & 0.2252000E+00, 0.2808900E+00, 0.3131687E+00, 0.3469970E+00, &
     & 0.3839142E+00, 0.4332493E+00, 0.4697721E+00, 0.4697721E+00 /
      data (ref_adm(25,iz,15,15),iz = 1,20) / &
     & 0.2214700E+00, 0.2214700E+00, 0.2116100E+00, 0.2033700E+00, &
     & 0.1969100E+00, 0.2054800E+00, 0.2071600E+00, 0.2048400E+00, &
     & 0.2100600E+00, 0.2256100E+00, 0.2378500E+00, 0.2444300E+00, &
     & 0.2569200E+00, 0.2661200E+00, 0.3317300E+00, 0.3388654E+00, &
     & 0.3742412E+00, 0.4228344E+00, 0.4574674E+00, 0.4574674E+00 /
      data (ref_adm(25,iz,16,15),iz = 1,20) / &
     & 0.2055800E+00, 0.2055800E+00, 0.2080400E+00, 0.2059600E+00, &
     & 0.1899900E+00, 0.2001900E+00, 0.1912200E+00, 0.2074100E+00, &
     & 0.2052500E+00, 0.2279000E+00, 0.2270300E+00, 0.2280900E+00, &
     & 0.2482600E+00, 0.2714800E+00, 0.3413500E+00, 0.2980400E+00, &
     & 0.3654979E+00, 0.4112310E+00, 0.4441595E+00, 0.4441595E+00 /
      data (ref_adm(25,iz,17,15),iz = 1,20) / &
     & 0.2062800E+00, 0.2062800E+00, 0.2074700E+00, 0.1927900E+00, &
     & 0.1871800E+00, 0.2047300E+00, 0.2063300E+00, 0.2089200E+00, &
     & 0.2302200E+00, 0.2640000E+00, 0.2431600E+00, 0.2665500E+00, &
     & 0.2576300E+00, 0.2962500E+00, 0.2977300E+00, 0.3258071E+00, &
     & 0.3576907E+00, 0.4012123E+00, 0.4305666E+00, 0.4305666E+00 /
      data (ref_adm(25,iz,18,15),iz = 1,20) / &
     & 0.2140200E+00, 0.2140200E+00, 0.1970200E+00, 0.1921200E+00, &
     & 0.1902000E+00, 0.2026500E+00, 0.1960000E+00, 0.2614300E+00, &
     & 0.2414600E+00, 0.2211200E+00, 0.2269600E+00, 0.2392300E+00, &
     & 0.2971700E+00, 0.3177400E+00, 0.4154000E+00, 0.3365073E+00, &
     & 0.3661212E+00, 0.4050418E+00, 0.4267610E+00, 0.4267610E+00 /
      data (ref_adm(25,iz,19,15),iz = 1,20) / &
     & 0.1962500E+00, 0.1962500E+00, 0.1884700E+00, 0.1948000E+00, &
     & 0.2005300E+00, 0.2434200E+00, 0.2195600E+00, 0.2131500E+00, &
     & 0.2621300E+00, 0.2541300E+00, 0.2758700E+00, 0.2698900E+00, &
     & 0.2375900E+00, 0.2761800E+00, 0.2597400E+00, 0.3334921E+00, &
     & 0.3619033E+00, 0.3982731E+00, 0.4174555E+00, 0.4174555E+00 /
      data (ref_adm(25,iz,20,15),iz = 1,20) / &
     & 0.1966200E+00, 0.1966200E+00, 0.2170100E+00, 0.2276700E+00, &
     & 0.2072000E+00, 0.2134600E+00, 0.2412000E+00, 0.2353000E+00, &
     & 0.2551500E+00, 0.2033000E+00, 0.2058600E+00, 0.2413300E+00, &
     & 0.2608300E+00, 0.2785800E+00, 0.2973700E+00, 0.3313850E+00, &
     & 0.3590458E+00, 0.3940336E+00, 0.4120828E+00, 0.4120828E+00 /
      data (ref_adm(25,iz,21,15),iz = 1,20) / &
     & 0.2006300E+00, 0.2006300E+00, 0.2789300E+00, 0.1902000E+00, &
     & 0.2485300E+00, 0.2357400E+00, 0.2301200E+00, 0.2229900E+00, &
     & 0.2207900E+00, 0.2368800E+00, 0.2697700E+00, 0.3048100E+00, &
     & 0.2663000E+00, 0.2508200E+00, 0.2682600E+00, 0.3304100E+00, &
     & 0.3571701E+00, 0.3906929E+00, 0.4086814E+00, 0.4086814E+00 /
      data (ref_adm(25,iz,22,15),iz = 1,20) / &
     & 0.2198300E+00, 0.2198300E+00, 0.2034500E+00, 0.1943300E+00, &
     & 0.2003600E+00, 0.2220700E+00, 0.2504700E+00, 0.2432800E+00, &
     & 0.2232100E+00, 0.2492400E+00, 0.2677500E+00, 0.2616700E+00, &
     & 0.2575200E+00, 0.2911000E+00, 0.2636600E+00, 0.3914961E+00, &
     & 0.4374175E+00, 0.5022226E+00, 0.5684063E+00, 0.5684063E+00 /
      data (ref_adm(25,iz,23,15),iz = 1,20) / &
     & 0.1926600E+00, 0.1926600E+00, 0.2157000E+00, 0.1872200E+00, &
     & 0.2201700E+00, 0.1897800E+00, 0.2343000E+00, 0.2545000E+00, &
     & 0.2325800E+00, 0.2590300E+00, 0.2593100E+00, 0.2353300E+00, &
     & 0.3040819E+00, 0.3877700E+00, 0.3526481E+00, 0.3925458E+00, &
     & 0.4379546E+00, 0.5013856E+00, 0.5695369E+00, 0.5695369E+00 /
      data (ref_adm(25,iz,24,15),iz = 1,20) / &
     & 0.2060700E+00, 0.2060700E+00, 0.1966400E+00, 0.2009600E+00, &
     & 0.2083500E+00, 0.2118600E+00, 0.2289300E+00, 0.2340700E+00, &
     & 0.2399700E+00, 0.2445200E+00, 0.2503300E+00, 0.2658500E+00, &
     & 0.2787800E+00, 0.2953600E+00, 0.2983200E+00, 0.3004500E+00, &
     & 0.4405561E+00, 0.5041202E+00, 0.5757335E+00, 0.5757335E+00 /
      data (ref_adm(25,iz,25,15),iz = 1,20) / &
     & 0.2098600E+00, 0.2098600E+00, 0.2111100E+00, 0.2183200E+00, &
     & 0.2340900E+00, 0.2336300E+00, 0.2408100E+00, 0.2537700E+00, &
     & 0.2597600E+00, 0.2719400E+00, 0.2906600E+00, 0.2696200E+00, &
     & 0.3249500E+00, 0.3990400E+00, 0.3162200E+00, 0.4000180E+00, &
     & 0.4458978E+00, 0.5093451E+00, 0.5849957E+00, 0.5849957E+00 /
      data (ref_adm(25,iz,26,15),iz = 1,20) / &
     & 0.2077900E+00, 0.2077900E+00, 0.2246700E+00, 0.2176100E+00, &
     & 0.2278900E+00, 0.2206600E+00, 0.2427900E+00, 0.2280500E+00, &
     & 0.2649700E+00, 0.3067200E+00, 0.2899700E+00, 0.3278900E+00, &
     & 0.3156600E+00, 0.3775000E+00, 0.3386400E+00, 0.4076514E+00, &
     & 0.4544078E+00, 0.5192755E+00, 0.6009189E+00, 0.6009189E+00 /
      data (ref_adm(25,iz,27,15),iz = 1,20) / &
     & 0.2050200E+00, 0.2050200E+00, 0.2406200E+00, 0.2420400E+00, &
     & 0.2367500E+00, 0.2332100E+00, 0.2619900E+00, 0.2399700E+00, &
     & 0.2497200E+00, 0.2824000E+00, 0.2678700E+00, 0.2840000E+00, &
     & 0.2959500E+00, 0.3425358E+00, 0.3737434E+00, 0.3300800E+00, &
     & 0.4046400E+00, 0.5321977E+00, 0.6211019E+00, 0.6211019E+00 /
      data (ref_adm(25,iz,28,15),iz = 1,20) / &
     & 0.1835500E+00, 0.1835500E+00, 0.2120500E+00, 0.1842400E+00, &
     & 0.2518200E+00, 0.2439200E+00, 0.2483000E+00, 0.2623300E+00, &
     & 0.2672100E+00, 0.2553000E+00, 0.3062500E+00, 0.3285900E+00, &
     & 0.2947100E+00, 0.3201700E+00, 0.3827683E+00, 0.4271916E+00, &
     & 0.4721700E+00, 0.5468699E+00, 0.6427751E+00, 0.6427751E+00 /
      data (ref_adm(25,iz,29,15),iz = 1,20) / &
     & 0.2061800E+00, 0.2061800E+00, 0.2003400E+00, 0.2280700E+00, &
     & 0.2025400E+00, 0.2275800E+00, 0.2141100E+00, 0.2493500E+00, &
     & 0.2472500E+00, 0.2621400E+00, 0.2925100E+00, 0.3265600E+00, &
     & 0.3101700E+00, 0.3505100E+00, 0.3817700E+00, 0.4014000E+00, &
     & 0.4916038E+00, 0.5645637E+00, 0.6680832E+00, 0.6680832E+00 /
      data (ref_adm(25,iz,30,15),iz = 1,20) / &
     & 0.1957500E+00, 0.1957500E+00, 0.1990600E+00, 0.1881200E+00, &
     & 0.2354100E+00, 0.2290700E+00, 0.2436700E+00, 0.3045400E+00, &
     & 0.2731500E+00, 0.2899300E+00, 0.3191500E+00, 0.3097400E+00, &
     & 0.3092600E+00, 0.3686551E+00, 0.3844800E+00, 0.3698500E+00, &
     & 0.5081050E+00, 0.5844764E+00, 0.6947504E+00, 0.6947504E+00 /
      data (ref_adm(25,iz,31,15),iz = 1,20) / &
     & 0.2044600E+00, 0.2044600E+00, 0.2082900E+00, 0.2212500E+00, &
     & 0.2344000E+00, 0.2237200E+00, 0.2576400E+00, 0.2422100E+00, &
     & 0.2942000E+00, 0.2878600E+00, 0.2786500E+00, 0.3753100E+00, &
     & 0.3988400E+00, 0.3643500E+00, 0.4962300E+00, 0.4669354E+00, &
     & 0.5245440E+00, 0.4804200E+00, 0.7232194E+00, 0.7232194E+00 /
      data (ref_adm(25,iz,32,15),iz = 1,20) / &
     & 0.2017100E+00, 0.2017100E+00, 0.2136000E+00, 0.2241200E+00, &
     & 0.2376900E+00, 0.2453100E+00, 0.2667500E+00, 0.2451200E+00, &
     & 0.2619800E+00, 0.2893000E+00, 0.3314300E+00, 0.3466200E+00, &
     & 0.3803100E+00, 0.4009900E+00, 0.4267100E+00, 0.4803253E+00, &
     & 0.4965200E+00, 0.6260743E+00, 0.7499170E+00, 0.7499170E+00 /
      data (ref_adm(25,iz,33,15),iz = 1,20) / &
     & 0.2167600E+00, 0.2167600E+00, 0.2134900E+00, 0.2184800E+00, &
     & 0.2285300E+00, 0.2364300E+00, 0.2354900E+00, 0.2482000E+00, &
     & 0.2613800E+00, 0.2853800E+00, 0.2981400E+00, 0.3151000E+00, &
     & 0.3424800E+00, 0.3595400E+00, 0.3670600E+00, 0.3716100E+00, &
     & 0.5494530E+00, 0.6410593E+00, 0.7750738E+00, 0.7750738E+00 /
      data (ref_adm(25,iz,34,15),iz = 1,20) / &
     & 0.1923100E+00, 0.1923100E+00, 0.2282600E+00, 0.2012800E+00, &
     & 0.2268100E+00, 0.2370200E+00, 0.2467000E+00, 0.2663900E+00, &
     & 0.2649700E+00, 0.2663500E+00, 0.2961100E+00, 0.2841600E+00, &
     & 0.3576900E+00, 0.3535800E+00, 0.5082100E+00, 0.4876839E+00, &
     & 0.5502055E+00, 0.6431317E+00, 0.7881674E+00, 0.7881674E+00 /
      data (ref_adm(25,iz,35,15),iz = 1,20) / &
     & 0.2187100E+00, 0.2187100E+00, 0.2270400E+00, 0.2203700E+00, &
     & 0.2157100E+00, 0.2621200E+00, 0.2368900E+00, 0.2609800E+00, &
     & 0.2688300E+00, 0.2732000E+00, 0.3303200E+00, 0.3379600E+00, &
     & 0.3020300E+00, 0.4073400E+00, 0.4372713E+00, 0.4925845E+00, &
     & 0.5544894E+00, 0.6435568E+00, 0.7918086E+00, 0.7918086E+00 /
      data (ref_adm(25,iz,36,15),iz = 1,20) / &
     & 0.2262700E+00, 0.2262700E+00, 0.2139800E+00, 0.2013600E+00, &
     & 0.2343100E+00, 0.2497900E+00, 0.2429100E+00, 0.2667900E+00, &
     & 0.2570500E+00, 0.3059900E+00, 0.3084100E+00, 0.3283500E+00, &
     & 0.4544000E+00, 0.4254100E+00, 0.3929900E+00, 0.4765800E+00, &
     & 0.5624878E+00, 0.6484498E+00, 0.7936825E+00, 0.7936825E+00 /
      data (ref_adm(25,iz,37,15),iz = 1,20) / &
     & 0.2047400E+00, 0.2047400E+00, 0.2105800E+00, 0.2236800E+00, &
     & 0.2259400E+00, 0.2442500E+00, 0.2502600E+00, 0.2565000E+00, &
     & 0.2828100E+00, 0.3017000E+00, 0.3451400E+00, 0.3232600E+00, &
     & 0.3952000E+00, 0.4023419E+00, 0.4542100E+00, 0.5217416E+00, &
     & 0.5793675E+00, 0.6539130E+00, 0.7956516E+00, 0.7956516E+00 /
      data (ref_adm(25,iz,38,15),iz = 1,20) / &
     & 0.2047400E+00, 0.2047400E+00, 0.2105800E+00, 0.2236800E+00, &
     & 0.2259400E+00, 0.2442500E+00, 0.2502600E+00, 0.2565000E+00, &
     & 0.2828100E+00, 0.3017000E+00, 0.3451400E+00, 0.3232600E+00, &
     & 0.3952000E+00, 0.4023419E+00, 0.4542100E+00, 0.5217416E+00, &
     & 0.5793675E+00, 0.6539130E+00, 0.7956516E+00, 0.7956516E+00 /
! Solar Zenith Angle 75.0 Albedo  0.2956814E+00
      data (ref_adm(25,iz, 1,16),iz = 1,20) / &
     & 0.2034500E+00, 0.2034500E+00, 0.2098700E+00, 0.2203600E+00, &
     & 0.2143800E+00, 0.2229800E+00, 0.1995700E+00, 0.2155900E+00, &
     & 0.2589000E+00, 0.2695000E+00, 0.2717000E+00, 0.2760400E+00, &
     & 0.2440500E+00, 0.3479155E+00, 0.3942437E+00, 0.4564652E+00, &
     & 0.5345132E+00, 0.7277787E+00, 0.1134559E+01, 0.1134559E+01 /
      data (ref_adm(25,iz, 2,16),iz = 1,20) / &
     & 0.2034500E+00, 0.2034500E+00, 0.2098700E+00, 0.2203600E+00, &
     & 0.2143800E+00, 0.2229800E+00, 0.1995700E+00, 0.2155900E+00, &
     & 0.2589000E+00, 0.2695000E+00, 0.2717000E+00, 0.2760400E+00, &
     & 0.2440500E+00, 0.3479155E+00, 0.3942437E+00, 0.4564652E+00, &
     & 0.5345132E+00, 0.7277787E+00, 0.1134559E+01, 0.1134559E+01 /
      data (ref_adm(25,iz, 3,16),iz = 1,20) / &
     & 0.2197800E+00, 0.2197800E+00, 0.1824300E+00, 0.2224300E+00, &
     & 0.1924900E+00, 0.2033100E+00, 0.2032200E+00, 0.2141000E+00, &
     & 0.2312000E+00, 0.2514000E+00, 0.2581900E+00, 0.3346700E+00, &
     & 0.2958500E+00, 0.3466049E+00, 0.3925069E+00, 0.4544058E+00, &
     & 0.5290635E+00, 0.7078166E+00, 0.1129349E+00, 0.1129349E+00 /
      data (ref_adm(25,iz, 4,16),iz = 1,20) / &
     & 0.2047200E+00, 0.2047200E+00, 0.2260100E+00, 0.1754000E+00, &
     & 0.1881900E+00, 0.1893700E+00, 0.2156900E+00, 0.1980200E+00, &
     & 0.2124300E+00, 0.2605000E+00, 0.2472200E+00, 0.3461600E+00, &
     & 0.3132800E+00, 0.3329800E+00, 0.3883054E+00, 0.4497447E+00, &
     & 0.5195034E+00, 0.6717888E+00, 0.9513732E+00, 0.9513732E+00 /
      data (ref_adm(25,iz, 5,16),iz = 1,20) / &
     & 0.2051700E+00, 0.2051700E+00, 0.1860000E+00, 0.1992600E+00, &
     & 0.1956300E+00, 0.1881800E+00, 0.2488400E+00, 0.2315200E+00, &
     & 0.2241100E+00, 0.2500200E+00, 0.2891400E+00, 0.3457200E+00, &
     & 0.2885800E+00, 0.2866100E+00, 0.3822590E+00, 0.4433450E+00, &
     & 0.5091568E+00, 0.6322796E+00, 0.8339284E+00, 0.8339284E+00 /
      data (ref_adm(25,iz, 6,16),iz = 1,20) / &
     & 0.1965100E+00, 0.1965100E+00, 0.2068500E+00, 0.1953600E+00, &
     & 0.2105900E+00, 0.2031900E+00, 0.2186900E+00, 0.2259100E+00, &
     & 0.2320900E+00, 0.2548200E+00, 0.2639000E+00, 0.2690800E+00, &
     & 0.2937500E+00, 0.3130100E+00, 0.3352600E+00, 0.4336176E+00, &
     & 0.4977715E+00, 0.5971656E+00, 0.7403571E+00, 0.7403571E+00 /
      data (ref_adm(25,iz, 7,16),iz = 1,20) / &
     & 0.2128400E+00, 0.2128400E+00, 0.2061500E+00, 0.2090200E+00, &
     & 0.2634400E+00, 0.3070400E+00, 0.2944600E+00, 0.1934700E+00, &
     & 0.2569500E+00, 0.2396700E+00, 0.2349300E+00, 0.2870900E+00, &
     & 0.2197300E+00, 0.3926600E+00, 0.6101100E+00, 0.3986000E+00, &
     & 0.4854434E+00, 0.5725564E+00, 0.6692302E+00, 0.6692302E+00 /
      data (ref_adm(25,iz, 8,16),iz = 1,20) / &
     & 0.2236800E+00, 0.2236800E+00, 0.1931500E+00, 0.1927500E+00, &
     & 0.1992800E+00, 0.2202200E+00, 0.2445400E+00, 0.2277100E+00, &
     & 0.2128900E+00, 0.2346200E+00, 0.2479800E+00, 0.2816703E+00, &
     & 0.3071800E+00, 0.4064800E+00, 0.3608307E+00, 0.4085149E+00, &
     & 0.4673520E+00, 0.5548269E+00, 0.6313556E+00, 0.6313556E+00 /
      data (ref_adm(25,iz, 9,16),iz = 1,20) / &
     & 0.1974700E+00, 0.1974700E+00, 0.1683500E+00, 0.1730600E+00, &
     & 0.1861300E+00, 0.2147400E+00, 0.1993700E+00, 0.2263600E+00, &
     & 0.2048200E+00, 0.2156900E+00, 0.2309700E+00, 0.2858000E+00, &
     & 0.3358300E+00, 0.4183900E+00, 0.5280100E+00, 0.3976195E+00, &
     & 0.4489017E+00, 0.5299243E+00, 0.6083266E+00, 0.6083266E+00 /
      data (ref_adm(25,iz,10,16),iz = 1,20) / &
     & 0.1487900E+00, 0.1487900E+00, 0.1704800E+00, 0.1984000E+00, &
     & 0.2129800E+00, 0.2168200E+00, 0.2099100E+00, 0.2219600E+00, &
     & 0.2325600E+00, 0.2223600E+00, 0.2217300E+00, 0.2992400E+00, &
     & 0.3350300E+00, 0.2399100E+00, 0.6811700E+00, 0.5319500E+00, &
     & 0.4341083E+00, 0.5021992E+00, 0.5687371E+00, 0.5687371E+00 /
      data (ref_adm(25,iz,11,16),iz = 1,20) / &
     & 0.1938700E+00, 0.1938700E+00, 0.1843200E+00, 0.2186700E+00, &
     & 0.1891400E+00, 0.2032700E+00, 0.2506000E+00, 0.2468200E+00, &
     & 0.2798600E+00, 0.2434500E+00, 0.2036400E+00, 0.2310900E+00, &
     & 0.2549300E+00, 0.3077300E+00, 0.3240400E+00, 0.3744800E+00, &
     & 0.4219261E+00, 0.4812812E+00, 0.5333229E+00, 0.5333229E+00 /
      data (ref_adm(25,iz,12,16),iz = 1,20) / &
     & 0.1945500E+00, 0.1945500E+00, 0.2037600E+00, 0.2515400E+00, &
     & 0.1825900E+00, 0.2105200E+00, 0.1874300E+00, 0.2233400E+00, &
     & 0.2328500E+00, 0.3018700E+00, 0.2495100E+00, 0.2627100E+00, &
     & 0.3561500E+00, 0.3103604E+00, 0.3364700E+00, 0.3731560E+00, &
     & 0.4122524E+00, 0.4662065E+00, 0.5095682E+00, 0.5095682E+00 /
      data (ref_adm(25,iz,13,16),iz = 1,20) / &
     & 0.2344300E+00, 0.2344300E+00, 0.1820900E+00, 0.1952100E+00, &
     & 0.2431500E+00, 0.2065700E+00, 0.1992000E+00, 0.1850100E+00, &
     & 0.1941100E+00, 0.2251900E+00, 0.2196600E+00, 0.2808600E+00, &
     & 0.2402400E+00, 0.3056114E+00, 0.3398400E+00, 0.3665929E+00, &
     & 0.4040572E+00, 0.4542991E+00, 0.4916215E+00, 0.4916215E+00 /
      data (ref_adm(25,iz,14,16),iz = 1,20) / &
     & 0.2010200E+00, 0.2010200E+00, 0.1964300E+00, 0.1817500E+00, &
     & 0.2188200E+00, 0.2396200E+00, 0.2005900E+00, 0.2289100E+00, &
     & 0.2329300E+00, 0.2249100E+00, 0.3165500E+00, 0.3114900E+00, &
     & 0.2742800E+00, 0.2649500E+00, 0.3259129E+00, 0.3595265E+00, &
     & 0.3962321E+00, 0.4446663E+00, 0.4776714E+00, 0.4776714E+00 /
      data (ref_adm(25,iz,15,16),iz = 1,20) / &
     & 0.2160400E+00, 0.2160400E+00, 0.2088900E+00, 0.2155400E+00, &
     & 0.2208400E+00, 0.2235600E+00, 0.2213700E+00, 0.2223700E+00, &
     & 0.2366300E+00, 0.2453100E+00, 0.2692700E+00, 0.2535200E+00, &
     & 0.2609600E+00, 0.2812700E+00, 0.4126300E+00, 0.3523041E+00, &
     & 0.3874889E+00, 0.4349943E+00, 0.4654341E+00, 0.4654341E+00 /
      data (ref_adm(25,iz,16,16),iz = 1,20) / &
     & 0.2047700E+00, 0.2047700E+00, 0.1998900E+00, 0.1929200E+00, &
     & 0.1985000E+00, 0.2031100E+00, 0.2286700E+00, 0.2031700E+00, &
     & 0.2067500E+00, 0.2080500E+00, 0.2356100E+00, 0.2295900E+00, &
     & 0.2596700E+00, 0.2611100E+00, 0.2563400E+00, 0.3461217E+00, &
     & 0.3794105E+00, 0.4237821E+00, 0.4521473E+00, 0.4521473E+00 /
      data (ref_adm(25,iz,17,16),iz = 1,20) / &
     & 0.2193700E+00, 0.2193700E+00, 0.1962500E+00, 0.2014500E+00, &
     & 0.1893300E+00, 0.1942800E+00, 0.2250700E+00, 0.1987000E+00, &
     & 0.2028600E+00, 0.2606900E+00, 0.2388600E+00, 0.2033600E+00, &
     & 0.2753924E+00, 0.2401700E+00, 0.3118422E+00, 0.3405105E+00, &
     & 0.3720782E+00, 0.4140585E+00, 0.4385519E+00, 0.4385519E+00 /
      data (ref_adm(25,iz,18,16),iz = 1,20) / &
     & 0.2173100E+00, 0.2173100E+00, 0.1973400E+00, 0.1881200E+00, &
     & 0.2183700E+00, 0.2006800E+00, 0.2288200E+00, 0.2275000E+00, &
     & 0.2361000E+00, 0.2279900E+00, 0.2433400E+00, 0.1946900E+00, &
     & 0.2736400E+00, 0.2104000E+00, 0.2670200E+00, 0.2521700E+00, &
     & 0.3714903E+00, 0.4109814E+00, 0.4330191E+00, 0.4330191E+00 /
      data (ref_adm(25,iz,19,16),iz = 1,20) / &
     & 0.2149800E+00, 0.2149800E+00, 0.1994900E+00, 0.1976200E+00, &
     & 0.1941000E+00, 0.2212200E+00, 0.2517900E+00, 0.2090100E+00, &
     & 0.2280800E+00, 0.2361600E+00, 0.2345100E+00, 0.2759500E+00, &
     & 0.2485900E+00, 0.2674700E+00, 0.2770200E+00, 0.3383825E+00, &
     & 0.3672104E+00, 0.4041137E+00, 0.4235771E+00, 0.4235771E+00 /
      data (ref_adm(25,iz,20,16),iz = 1,20) / &
     & 0.1946500E+00, 0.1946500E+00, 0.1902200E+00, 0.1851000E+00, &
     & 0.2299500E+00, 0.2420200E+00, 0.2372900E+00, 0.2263100E+00, &
     & 0.3171100E+00, 0.2100300E+00, 0.2797000E+00, 0.2803600E+00, &
     & 0.2698000E+00, 0.2908774E+00, 0.3103655E+00, 0.3362445E+00, &
     & 0.3643110E+00, 0.3998121E+00, 0.4181258E+00, 0.4181258E+00 /
      data (ref_adm(25,iz,21,16),iz = 1,20) / &
     & 0.1929300E+00, 0.1929300E+00, 0.2039900E+00, 0.2084400E+00, &
     & 0.2086400E+00, 0.2272300E+00, 0.2279500E+00, 0.2252400E+00, &
     & 0.2138300E+00, 0.2280900E+00, 0.2655300E+00, 0.2405900E+00, &
     & 0.2641400E+00, 0.3397100E+00, 0.3098394E+00, 0.3352554E+00, &
     & 0.3624077E+00, 0.3964222E+00, 0.4146745E+00, 0.4146745E+00 /
      data (ref_adm(25,iz,22,16),iz = 1,20) / &
     & 0.1883200E+00, 0.1883200E+00, 0.2099600E+00, 0.2135900E+00, &
     & 0.2049500E+00, 0.2355700E+00, 0.2438600E+00, 0.2384100E+00, &
     & 0.2401500E+00, 0.2175600E+00, 0.2738200E+00, 0.2997200E+00, &
     & 0.2689500E+00, 0.2655600E+00, 0.3110300E+00, 0.4236686E+00, &
     & 0.4820047E+00, 0.5731757E+00, 0.7028431E+00, 0.7028431E+00 /
      data (ref_adm(25,iz,23,16),iz = 1,20) / &
     & 0.2186800E+00, 0.2186800E+00, 0.2308800E+00, 0.2197900E+00, &
     & 0.2333800E+00, 0.2309200E+00, 0.2530300E+00, 0.2670000E+00, &
     & 0.2634900E+00, 0.2285300E+00, 0.2238600E+00, 0.2447700E+00, &
     & 0.2638700E+00, 0.2898300E+00, 0.3157100E+00, 0.3467200E+00, &
     & 0.4807262E+00, 0.5709535E+00, 0.7050992E+00, 0.7050992E+00 /
      data (ref_adm(25,iz,24,16),iz = 1,20) / &
     & 0.2073200E+00, 0.2073200E+00, 0.2013800E+00, 0.2106900E+00, &
     & 0.2212800E+00, 0.2234000E+00, 0.2389900E+00, 0.2604100E+00, &
     & 0.2727600E+00, 0.2721700E+00, 0.2903300E+00, 0.2778100E+00, &
     & 0.2815900E+00, 0.3342400E+00, 0.3400300E+00, 0.3559200E+00, &
     & 0.4825651E+00, 0.5732362E+00, 0.7139925E+00, 0.7139925E+00 /
      data (ref_adm(25,iz,25,16),iz = 1,20) / &
     & 0.2133900E+00, 0.2133900E+00, 0.2152100E+00, 0.2166700E+00, &
     & 0.2382400E+00, 0.2351700E+00, 0.2694000E+00, 0.2482100E+00, &
     & 0.2639200E+00, 0.2882600E+00, 0.3167800E+00, 0.3118700E+00, &
     & 0.3216200E+00, 0.3661800E+00, 0.3323300E+00, 0.4281361E+00, &
     & 0.4870428E+00, 0.5785995E+00, 0.7274687E+00, 0.7274687E+00 /
      data (ref_adm(25,iz,26,16),iz = 1,20) / &
     & 0.2067300E+00, 0.2067300E+00, 0.2069800E+00, 0.2186600E+00, &
     & 0.2662300E+00, 0.2194300E+00, 0.2413000E+00, 0.2480100E+00, &
     & 0.2181700E+00, 0.2474300E+00, 0.2852100E+00, 0.3149000E+00, &
     & 0.3094100E+00, 0.3361500E+00, 0.3332400E+00, 0.4763300E+00, &
     & 0.4729500E+00, 0.5899686E+00, 0.7498194E+00, 0.7498194E+00 /
      data (ref_adm(25,iz,27,16),iz = 1,20) / &
     & 0.2109500E+00, 0.2109500E+00, 0.2410500E+00, 0.2387600E+00, &
     & 0.2330600E+00, 0.2314500E+00, 0.2218000E+00, 0.2462000E+00, &
     & 0.2563600E+00, 0.2292900E+00, 0.2525900E+00, 0.3052318E+00, &
     & 0.3027100E+00, 0.4291700E+00, 0.3919277E+00, 0.4437385E+00, &
     & 0.5065076E+00, 0.6047626E+00, 0.7774829E+00, 0.7774829E+00 /
      data (ref_adm(25,iz,28,16),iz = 1,20) / &
     & 0.2017200E+00, 0.2017200E+00, 0.2270100E+00, 0.2049600E+00, &
     & 0.1877700E+00, 0.1950300E+00, 0.2381100E+00, 0.2653300E+00, &
     & 0.2705600E+00, 0.3081200E+00, 0.2341500E+00, 0.2716600E+00, &
     & 0.3366484E+00, 0.3046600E+00, 0.3814100E+00, 0.4436200E+00, &
     & 0.5196789E+00, 0.6221648E+00, 0.8073009E+00, 0.8073009E+00 /
      data (ref_adm(25,iz,29,16),iz = 1,20) / &
     & 0.2027900E+00, 0.2027900E+00, 0.2040500E+00, 0.2341100E+00, &
     & 0.2222800E+00, 0.1982800E+00, 0.2135400E+00, 0.2372000E+00, &
     & 0.2940400E+00, 0.3131300E+00, 0.2709200E+00, 0.3133900E+00, &
     & 0.3930200E+00, 0.3618200E+00, 0.4068400E+00, 0.4665776E+00, &
     & 0.4499000E+00, 0.6427429E+00, 0.8418624E+00, 0.8418624E+00 /
      data (ref_adm(25,iz,30,16),iz = 1,20) / &
     & 0.1925800E+00, 0.1925800E+00, 0.2137600E+00, 0.2248000E+00, &
     & 0.2973700E+00, 0.2783600E+00, 0.2371300E+00, 0.2334300E+00, &
     & 0.2639500E+00, 0.3062800E+00, 0.2650200E+00, 0.3617100E+00, &
     & 0.3587500E+00, 0.3789556E+00, 0.4441900E+00, 0.4806477E+00, &
     & 0.4362900E+00, 0.6667897E+00, 0.8789015E+00, 0.8789015E+00 /
      data (ref_adm(25,iz,31,16),iz = 1,20) / &
     & 0.2073800E+00, 0.2073800E+00, 0.1954200E+00, 0.1743200E+00, &
     & 0.2943100E+00, 0.2609700E+00, 0.2302400E+00, 0.2529400E+00, &
     & 0.3051600E+00, 0.2564600E+00, 0.2972400E+00, 0.3468300E+00, &
     & 0.3609400E+00, 0.3576900E+00, 0.3995800E+00, 0.4948387E+00, &
     & 0.5710257E+00, 0.4424000E+00, 0.9172685E+00, 0.9172685E+00 /
      data (ref_adm(25,iz,32,16),iz = 1,20) / &
     & 0.1909900E+00, 0.1909900E+00, 0.2128500E+00, 0.2273600E+00, &
     & 0.2184100E+00, 0.2404700E+00, 0.2201400E+00, 0.2539800E+00, &
     & 0.3102900E+00, 0.3439300E+00, 0.3520800E+00, 0.3225400E+00, &
     & 0.3690000E+00, 0.4400800E+00, 0.3662700E+00, 0.4421400E+00, &
     & 0.5364800E+00, 0.7160565E+00, 0.9537981E+00, 0.9537981E+00 /
      data (ref_adm(25,iz,33,16),iz = 1,20) / &
     & 0.2093300E+00, 0.2093300E+00, 0.2271200E+00, 0.2383400E+00, &
     & 0.2458300E+00, 0.2593500E+00, 0.2470000E+00, 0.2654000E+00, &
     & 0.2578200E+00, 0.2911700E+00, 0.3339700E+00, 0.3085200E+00, &
     & 0.3053700E+00, 0.3687200E+00, 0.3979200E+00, 0.5165636E+00, &
     & 0.5971665E+00, 0.7297102E+00, 0.9839820E+00, 0.9839820E+00 /
      data (ref_adm(25,iz,34,16),iz = 1,20) / &
     & 0.2169200E+00, 0.2169200E+00, 0.2172900E+00, 0.2098300E+00, &
     & 0.2186400E+00, 0.2650800E+00, 0.3131800E+00, 0.2784600E+00, &
     & 0.2946600E+00, 0.3024100E+00, 0.3120400E+00, 0.4003400E+00, &
     & 0.3653300E+00, 0.4082882E+00, 0.4666900E+00, 0.5169739E+00, &
     & 0.5969365E+00, 0.7286726E+00, 0.9925865E+00, 0.9925865E+00 /
      data (ref_adm(25,iz,35,16),iz = 1,20) / &
     & 0.2294800E+00, 0.2294800E+00, 0.2564000E+00, 0.2441800E+00, &
     & 0.2541700E+00, 0.2515300E+00, 0.2691800E+00, 0.3221500E+00, &
     & 0.2982300E+00, 0.3016000E+00, 0.3038400E+00, 0.4008000E+00, &
     & 0.3638500E+00, 0.4093741E+00, 0.4535768E+00, 0.5197482E+00, &
     & 0.6012486E+00, 0.7311062E+00, 0.9960584E+00, 0.9960584E+00 /
      data (ref_adm(25,iz,36,16),iz = 1,20) / &
     & 0.1821500E+00, 0.1821500E+00, 0.2296600E+00, 0.2289700E+00, &
     & 0.2532700E+00, 0.2422100E+00, 0.2046700E+00, 0.2764800E+00, &
     & 0.3080900E+00, 0.3033500E+00, 0.3119700E+00, 0.4888000E+00, &
     & 0.3543900E+00, 0.5000500E+00, 0.4715700E+00, 0.5259877E+00, &
     & 0.6102414E+00, 0.7409108E+00, 0.1003979E+01, 0.1003979E+01 /
      data (ref_adm(25,iz,37,16),iz = 1,20) / &
     & 0.2515300E+00, 0.2515300E+00, 0.2184000E+00, 0.2316000E+00, &
     & 0.2366200E+00, 0.2153400E+00, 0.2626000E+00, 0.2335900E+00, &
     & 0.3178000E+00, 0.3344100E+00, 0.3308100E+00, 0.3818600E+00, &
     & 0.3803733E+00, 0.5706500E+00, 0.5275300E+00, 0.4830100E+00, &
     & 0.6576800E+00, 0.7637886E+00, 0.1011272E+01, 0.1011272E+01 /
      data (ref_adm(25,iz,38,16),iz = 1,20) / &
     & 0.2515300E+00, 0.2515300E+00, 0.2184000E+00, 0.2316000E+00, &
     & 0.2366200E+00, 0.2153400E+00, 0.2626000E+00, 0.2335900E+00, &
     & 0.3178000E+00, 0.3344100E+00, 0.3308100E+00, 0.3818600E+00, &
     & 0.3803733E+00, 0.5706500E+00, 0.5275300E+00, 0.4830100E+00, &
     & 0.6576800E+00, 0.7637886E+00, 0.1011272E+01, 0.1011272E+01 /
! Solar Zenith Angle 80.0 Albedo  0.3073649E+00
      data (ref_adm(25,iz, 1,17),iz = 1,20) / &
     & 0.3363700E+00, 0.3363700E+00, 0.1978400E+00, 0.2147511E+00, &
     & 0.2476500E+00, 0.2196531E+00, 0.2261040E+00, 0.2336523E+00, &
     & 0.2437880E+00, 0.2554619E+00, 0.2540400E+00, 0.2895655E+00, &
     & 0.3139155E+00, 0.3350000E+00, 0.3624209E+00, 0.3902512E+00, &
     & 0.4119183E+00, 0.4252679E+00, 0.3873309E+00, 0.3873309E+00 /
      data (ref_adm(25,iz, 2,17),iz = 1,20) / &
     & 0.3363700E+00, 0.3363700E+00, 0.1978400E+00, 0.2147511E+00, &
     & 0.2476500E+00, 0.2196531E+00, 0.2261040E+00, 0.2336523E+00, &
     & 0.2437880E+00, 0.2554619E+00, 0.2540400E+00, 0.2895655E+00, &
     & 0.3139155E+00, 0.3350000E+00, 0.3624209E+00, 0.3902512E+00, &
     & 0.4119183E+00, 0.4252679E+00, 0.3873309E+00, 0.3873309E+00 /
      data (ref_adm(25,iz, 3,17),iz = 1,20) / &
     & 0.1904700E+00, 0.1904700E+00, 0.1893500E+00, 0.2148068E+00, &
     & 0.2159651E+00, 0.2273200E+00, 0.2258579E+00, 0.2334901E+00, &
     & 0.2569800E+00, 0.2862200E+00, 0.3015400E+00, 0.3093400E+00, &
     & 0.3137770E+00, 0.3347984E+00, 0.3619480E+00, 0.3899080E+00, &
     & 0.4114727E+00, 0.4240513E+00, 0.4936351E-01, 0.4936351E-01 /
      data (ref_adm(25,iz, 4,17),iz = 1,20) / &
     & 0.1885800E+00, 0.1885800E+00, 0.2150777E+00, 0.2147616E+00, &
     & 0.1939700E+00, 0.1878300E+00, 0.2452800E+00, 0.2979400E+00, &
     & 0.2430813E+00, 0.2550900E+00, 0.3123100E+00, 0.2524000E+00, &
     & 0.3129495E+00, 0.3334140E+00, 0.3610143E+00, 0.3888195E+00, &
     & 0.4094791E+00, 0.4206053E+00, 0.3816565E+00, 0.3816565E+00 /
      data (ref_adm(25,iz, 5,17),iz = 1,20) / &
     & 0.2894200E+00, 0.2894200E+00, 0.2150353E+00, 0.2148419E+00, &
     & 0.1871900E+00, 0.2630800E+00, 0.2250652E+00, 0.3170900E+00, &
     & 0.2537000E+00, 0.2377900E+00, 0.2676952E+00, 0.2876256E+00, &
     & 0.3113005E+00, 0.3315902E+00, 0.3590113E+00, 0.3867620E+00, &
     & 0.4073808E+00, 0.4166900E+00, 0.3766234E+00, 0.3766234E+00 /
      data (ref_adm(25,iz, 6,17),iz = 1,20) / &
     & 0.2285500E+00, 0.2285500E+00, 0.2318200E+00, 0.2274600E+00, &
     & 0.2301400E+00, 0.2438100E+00, 0.2377000E+00, 0.2463500E+00, &
     & 0.2635400E+00, 0.3063100E+00, 0.2591300E+00, 0.3476800E+00, &
     & 0.4082500E+00, 0.3300124E+00, 0.3563789E+00, 0.3850761E+00, &
     & 0.4043268E+00, 0.4126612E+00, 0.3708156E+00, 0.3708156E+00 /
      data (ref_adm(25,iz, 7,17),iz = 1,20) / &
     & 0.2292600E+00, 0.2292600E+00, 0.1885100E+00, 0.1811600E+00, &
     & 0.1658800E+00, 0.2310700E+00, 0.2001300E+00, 0.2095400E+00, &
     & 0.2412150E+00, 0.2551400E+00, 0.3265500E+00, 0.3572600E+00, &
     & 0.3922700E+00, 0.3272720E+00, 0.3527792E+00, 0.3817523E+00, &
     & 0.4009645E+00, 0.4075180E+00, 0.3644492E+00, 0.3644492E+00 /
      data (ref_adm(25,iz, 8,17),iz = 1,20) / &
     & 0.1788000E+00, 0.1788000E+00, 0.1907300E+00, 0.1764700E+00, &
     & 0.2379500E+00, 0.1554400E+00, 0.2314600E+00, 0.2026900E+00, &
     & 0.2396400E+00, 0.3248100E+00, 0.3120100E+00, 0.2912200E+00, &
     & 0.3617300E+00, 0.3676800E+00, 0.3492899E+00, 0.3784317E+00, &
     & 0.5952800E+00, 0.4027689E+00, 0.3584904E+00, 0.3584904E+00 /
      data (ref_adm(25,iz, 9,17),iz = 1,20) / &
     & 0.1851900E+00, 0.1851900E+00, 0.3492300E+00, 0.2156400E+00, &
     & 0.1558100E+00, 0.1733900E+00, 0.2335400E+00, 0.2206900E+00, &
     & 0.2021400E+00, 0.2572100E+00, 0.2353300E+00, 0.2396400E+00, &
     & 0.3016814E+00, 0.3382100E+00, 0.5068400E+00, 0.3740024E+00, &
     & 0.3942730E+00, 0.3981909E+00, 0.3527008E+00, 0.3527008E+00 /
      data (ref_adm(25,iz,10,17),iz = 1,20) / &
     & 0.1860700E+00, 0.1860700E+00, 0.1785700E+00, 0.2070500E+00, &
     & 0.2361100E+00, 0.2188862E+00, 0.2391100E+00, 0.2444600E+00, &
     & 0.2022600E+00, 0.2178500E+00, 0.2356100E+00, 0.3136800E+00, &
     & 0.2987615E+00, 0.3327100E+00, 0.5059100E+00, 0.3677467E+00, &
     & 0.3895192E+00, 0.3942606E+00, 0.3472203E+00, 0.3472203E+00 /
      data (ref_adm(25,iz,11,17),iz = 1,20) / &
     & 0.1545900E+00, 0.1545900E+00, 0.1746000E+00, 0.2033200E+00, &
     & 0.2655300E+00, 0.2189394E+00, 0.1854700E+00, 0.1738800E+00, &
     & 0.1908800E+00, 0.2655200E+00, 0.2686100E+00, 0.3516900E+00, &
     & 0.2378200E+00, 0.3130147E+00, 0.3359308E+00, 0.3618586E+00, &
     & 0.3830198E+00, 0.3892399E+00, 0.3421467E+00, 0.3421467E+00 /
      data (ref_adm(25,iz,12,17),iz = 1,20) / &
     & 0.1632400E+00, 0.1632400E+00, 0.1282100E+00, 0.2158501E+00, &
     & 0.1966400E+00, 0.2189794E+00, 0.1970300E+00, 0.1830900E+00, &
     & 0.2171100E+00, 0.2637700E+00, 0.2961000E+00, 0.2365200E+00, &
     & 0.2928029E+00, 0.2839400E+00, 0.3052600E+00, 0.3556497E+00, &
     & 0.3749828E+00, 0.3838556E+00, 0.3374157E+00, 0.3374157E+00 /
      data (ref_adm(25,iz,13,17),iz = 1,20) / &
     & 0.1687400E+00, 0.1687400E+00, 0.1703500E+00, 0.1569300E+00, &
     & 0.2796600E+00, 0.1690500E+00, 0.2069100E+00, 0.2152700E+00, &
     & 0.2320400E+00, 0.2439833E+00, 0.2647700E+00, 0.2372000E+00, &
     & 0.2894219E+00, 0.3052849E+00, 0.3249808E+00, 0.3493072E+00, &
     & 0.3681589E+00, 0.3759782E+00, 0.3323824E+00, 0.3323824E+00 /
      data (ref_adm(25,iz,14,17),iz = 1,20) / &
     & 0.1489200E+00, 0.1489200E+00, 0.3641800E+00, 0.2566600E+00, &
     & 0.1917700E+00, 0.1877400E+00, 0.2645600E+00, 0.2203200E+00, &
     & 0.2118300E+00, 0.2356900E+00, 0.3593400E+00, 0.2198000E+00, &
     & 0.2858640E+00, 0.3013730E+00, 0.3205146E+00, 0.3426646E+00, &
     & 0.3606868E+00, 0.3672545E+00, 0.3259450E+00, 0.3259450E+00 /
      data (ref_adm(25,iz,15,17),iz = 1,20) / &
     & 0.1902800E+00, 0.1902800E+00, 0.1998000E+00, 0.1996400E+00, &
     & 0.2030800E+00, 0.2023800E+00, 0.2114200E+00, 0.1934500E+00, &
     & 0.2199500E+00, 0.2499100E+00, 0.2391700E+00, 0.2812700E+00, &
     & 0.2624900E+00, 0.3251900E+00, 0.3156311E+00, 0.3360608E+00, &
     & 0.3526776E+00, 0.3592395E+00, 0.3184880E+00, 0.3184880E+00 /
      data (ref_adm(25,iz,16,17),iz = 1,20) / &
     & 0.2044200E+00, 0.2044200E+00, 0.2068900E+00, 0.1853200E+00, &
     & 0.1935200E+00, 0.1940500E+00, 0.2289200E+00, 0.2317300E+00, &
     & 0.2045500E+00, 0.2631500E+00, 0.2353100E+00, 0.2591100E+00, &
     & 0.2895100E+00, 0.3056100E+00, 0.3360600E+00, 0.3303038E+00, &
     & 0.3446925E+00, 0.3505989E+00, 0.3117945E+00, 0.3117945E+00 /
      data (ref_adm(25,iz,17,17),iz = 1,20) / &
     & 0.2134100E+00, 0.2134100E+00, 0.1957100E+00, 0.1942700E+00, &
     & 0.1806100E+00, 0.2027400E+00, 0.1972400E+00, 0.2193300E+00, &
     & 0.2890100E+00, 0.2782100E+00, 0.2319100E+00, 0.2314100E+00, &
     & 0.2756804E+00, 0.2892758E+00, 0.3060779E+00, 0.3247896E+00, &
     & 0.3378958E+00, 0.3419207E+00, 0.3054358E+00, 0.3054358E+00 /
      data (ref_adm(25,iz,18,17),iz = 1,20) / &
     & 0.2069700E+00, 0.2069700E+00, 0.1698000E+00, 0.1973800E+00, &
     & 0.1703600E+00, 0.1892900E+00, 0.2214200E+00, 0.2264900E+00, &
     & 0.3121700E+00, 0.2433829E+00, 0.2167800E+00, 0.2424300E+00, &
     & 0.3356300E+00, 0.3143800E+00, 0.3442366E+00, 0.3869869E+00, &
     & 0.4378381E+00, 0.5145165E+00, 0.5933204E+00, 0.5933204E+00 /
      data (ref_adm(25,iz,19,17),iz = 1,20) / &
     & 0.1956100E+00, 0.1956100E+00, 0.2052300E+00, 0.1838100E+00, &
     & 0.1981600E+00, 0.2091300E+00, 0.2027800E+00, 0.2463800E+00, &
     & 0.2999800E+00, 0.2783700E+00, 0.2169000E+00, 0.2763000E+00, &
     & 0.2926221E+00, 0.3123258E+00, 0.3415020E+00, 0.3827915E+00, &
     & 0.4314708E+00, 0.5039548E+00, 0.5780655E+00, 0.5780655E+00 /
      data (ref_adm(25,iz,20,17),iz = 1,20) / &
     & 0.1811100E+00, 0.1811100E+00, 0.1804300E+00, 0.1967400E+00, &
     & 0.2261800E+00, 0.2368800E+00, 0.2556600E+00, 0.2483200E+00, &
     & 0.2183000E+00, 0.2485700E+00, 0.2682600E+00, 0.2725300E+00, &
     & 0.2919637E+00, 0.2528400E+00, 0.3397329E+00, 0.3802395E+00, &
     & 0.4277360E+00, 0.4977097E+00, 0.5691398E+00, 0.5691398E+00 /
      data (ref_adm(25,iz,21,17),iz = 1,20) / &
     & 0.1881400E+00, 0.1881400E+00, 0.2080300E+00, 0.1908400E+00, &
     & 0.1881300E+00, 0.2406100E+00, 0.2395800E+00, 0.2121900E+00, &
     & 0.2728300E+00, 0.2691700E+00, 0.2430200E+00, 0.2980300E+00, &
     & 0.2494700E+00, 0.3112677E+00, 0.3392722E+00, 0.3788749E+00, &
     & 0.4253835E+00, 0.4932024E+00, 0.5639403E+00, 0.5639403E+00 /
      data (ref_adm(25,iz,22,17),iz = 1,20) / &
     & 0.1897800E+00, 0.1897800E+00, 0.1770300E+00, 0.2310600E+00, &
     & 0.1695800E+00, 0.1746900E+00, 0.1883700E+00, 0.2125100E+00, &
     & 0.2443882E+00, 0.2580837E+00, 0.2644700E+00, 0.2938300E+00, &
     & 0.2427000E+00, 0.3674605E+00, 0.3255900E+00, 0.4986990E+00, &
     & 0.6068671E+00, 0.8134627E+00, 0.1326822E+01, 0.1326822E+01 /
      data (ref_adm(25,iz,23,17),iz = 1,20) / &
     & 0.1959700E+00, 0.1959700E+00, 0.1970400E+00, 0.1866100E+00, &
     & 0.2090500E+00, 0.1986700E+00, 0.2234900E+00, 0.2238400E+00, &
     & 0.2481000E+00, 0.2892000E+00, 0.3147300E+00, 0.2987000E+00, &
     & 0.3337153E+00, 0.3665892E+00, 0.3804700E+00, 0.4973209E+00, &
     & 0.6043640E+00, 0.8097938E+00, 0.1333151E+01, 0.1333151E+01 /
      data (ref_adm(25,iz,24,17),iz = 1,20) / &
     & 0.2048600E+00, 0.2048600E+00, 0.2084200E+00, 0.2194300E+00, &
     & 0.2117500E+00, 0.2058900E+00, 0.2266400E+00, 0.2448000E+00, &
     & 0.2428600E+00, 0.2644100E+00, 0.2696400E+00, 0.3158100E+00, &
     & 0.3472400E+00, 0.4399800E+00, 0.3873300E+00, 0.4995346E+00, &
     & 0.6073726E+00, 0.8127765E+00, 0.1353520E+01, 0.1353520E+01 /
      data (ref_adm(25,iz,25,17),iz = 1,20) / &
     & 0.2136200E+00, 0.2136200E+00, 0.1968500E+00, 0.2088000E+00, &
     & 0.1739400E+00, 0.1959000E+00, 0.2188200E+00, 0.2355500E+00, &
     & 0.2315500E+00, 0.2598400E+00, 0.3243500E+00, 0.3437200E+00, &
     & 0.2976300E+00, 0.3411600E+00, 0.3536700E+00, 0.5041654E+00, &
     & 0.6137624E+00, 0.8218532E+00, 0.1384942E+01, 0.1384942E+01 /
      data (ref_adm(25,iz,26,17),iz = 1,20) / &
     & 0.1716500E+00, 0.1716500E+00, 0.1749700E+00, 0.1392500E+00, &
     & 0.1947400E+00, 0.2115500E+00, 0.2229561E+00, 0.2284300E+00, &
     & 0.2465700E+00, 0.2642200E+00, 0.2812900E+00, 0.3066800E+00, &
     & 0.3408179E+00, 0.3757091E+00, 0.5926900E+00, 0.3930800E+00, &
     & 0.5108300E+00, 0.8409131E+00, 0.1436607E+01, 0.1436607E+01 /
      data (ref_adm(25,iz,27,17),iz = 1,20) / &
     & 0.1815500E+00, 0.1815500E+00, 0.3034100E+00, 0.1941600E+00, &
     & 0.2053000E+00, 0.2461700E+00, 0.2182300E+00, 0.2572800E+00, &
     & 0.2491700E+00, 0.2662600E+00, 0.2804020E+00, 0.3274700E+00, &
     & 0.3470679E+00, 0.3310400E+00, 0.4401195E+00, 0.5270529E+00, &
     & 0.6437349E+00, 0.8659387E+00, 0.1498652E+01, 0.1498652E+01 /
      data (ref_adm(25,iz,28,17),iz = 1,20) / &
     & 0.1945600E+00, 0.1945600E+00, 0.1972300E+00, 0.3238300E+00, &
     & 0.2095370E+00, 0.2101400E+00, 0.2264100E+00, 0.2139300E+00, &
     & 0.2213900E+00, 0.3366800E+00, 0.2269800E+00, 0.2950200E+00, &
     & 0.3540683E+00, 0.3919303E+00, 0.3732000E+00, 0.4595300E+00, &
     & 0.4572200E+00, 0.8952777E+00, 0.1566394E+01, 0.1566394E+01 /
      data (ref_adm(25,iz,29,17),iz = 1,20) / &
     & 0.1620700E+00, 0.1620700E+00, 0.1910200E+00, 0.1781200E+00, &
     & 0.2943700E+00, 0.2161031E+00, 0.2245107E+00, 0.2116000E+00, &
     & 0.2083500E+00, 0.2232100E+00, 0.2293800E+00, 0.3316900E+00, &
     & 0.3575700E+00, 0.4854400E+00, 0.5259900E+00, 0.5593306E+00, &
     & 0.6864272E+00, 0.9316693E+00, 0.1643422E+01, 0.1643422E+01 /
      data (ref_adm(25,iz,30,17),iz = 1,20) / &
     & 0.1666200E+00, 0.1666200E+00, 0.2374800E+00, 0.1865700E+00, &
     & 0.2191100E+00, 0.2164451E+00, 0.2253581E+00, 0.2374437E+00, &
     & 0.2525811E+00, 0.2069000E+00, 0.2407900E+00, 0.3174300E+00, &
     & 0.3449300E+00, 0.3822500E+00, 0.5997500E+00, 0.5789400E+00, &
     & 0.7137986E+00, 0.9728822E+00, 0.1729229E+01, 0.1729229E+01 /
      data (ref_adm(25,iz,31,17),iz = 1,20) / &
     & 0.2307600E+00, 0.2307600E+00, 0.1857600E+00, 0.1858500E+00, &
     & 0.2256800E+00, 0.2672200E+00, 0.2263109E+00, 0.2370900E+00, &
     & 0.2540300E+00, 0.2032300E+00, 0.2977647E+00, 0.3299200E+00, &
     & 0.3622300E+00, 0.4288000E+00, 0.4943772E+00, 0.6000104E+00, &
     & 0.7415930E+00, 0.1014309E+01, 0.1811839E+01, 0.1811839E+01 /
      data (ref_adm(25,iz,32,17),iz = 1,20) / &
     & 0.1526700E+00, 0.1526700E+00, 0.1653700E+00, 0.2147400E+00, &
     & 0.2294400E+00, 0.1263000E+00, 0.3740000E+00, 0.2408632E+00, &
     & 0.2575940E+00, 0.2759900E+00, 0.3253500E+00, 0.3053400E+00, &
     & 0.3889500E+00, 0.4365121E+00, 0.5089833E+00, 0.6203991E+00, &
     & 0.7695121E+00, 0.1056894E+01, 0.1898148E+01, 0.1898148E+01 /
      data (ref_adm(25,iz,33,17),iz = 1,20) / &
     & 0.2463700E+00, 0.2463700E+00, 0.2332600E+00, 0.2257500E+00, &
     & 0.2241200E+00, 0.2557000E+00, 0.2774600E+00, 0.2448500E+00, &
     & 0.2799700E+00, 0.3146500E+00, 0.3184100E+00, 0.3566300E+00, &
     & 0.4037100E+00, 0.4473590E+00, 0.5236098E+00, 0.6383110E+00, &
     & 0.7875794E+00, 0.1077901E+01, 0.1952171E+01, 0.1952171E+01 /
      data (ref_adm(25,iz,34,17),iz = 1,20) / &
     & 0.1836300E+00, 0.1836300E+00, 0.1809500E+00, 0.2053711E+00, &
     & 0.2104271E+00, 0.2181192E+00, 0.3371100E+00, 0.2404200E+00, &
     & 0.2616129E+00, 0.2838297E+00, 0.3330000E+00, 0.3535269E+00, &
     & 0.4056605E+00, 0.4370300E+00, 0.5329273E+00, 0.6414147E+00, &
     & 0.7857655E+00, 0.1071762E+01, 0.1959462E+01, 0.1959462E+01 /
      data (ref_adm(25,iz,35,17),iz = 1,20) / &
     & 0.2070600E+00, 0.2070600E+00, 0.2030699E+00, 0.2053286E+00, &
     & 0.2016800E+00, 0.2185046E+00, 0.2300100E+00, 0.2450001E+00, &
     & 0.2574200E+00, 0.3664400E+00, 0.3349400E+00, 0.4953200E+00, &
     & 0.3869400E+00, 0.4297600E+00, 0.5627800E+00, 0.6391836E+00, &
     & 0.7857918E+00, 0.1075577E+01, 0.1975806E+01, 0.1975806E+01 /
      data (ref_adm(25,iz,36,17),iz = 1,20) / &
     & 0.2258100E+00, 0.2258100E+00, 0.2194900E+00, 0.1831200E+00, &
     & 0.1737500E+00, 0.2186508E+00, 0.2305571E+00, 0.2541100E+00, &
     & 0.2534000E+00, 0.3020400E+00, 0.3315600E+00, 0.3536200E+00, &
     & 0.3711400E+00, 0.5944900E+00, 0.5108300E+00, 0.6402539E+00, &
     & 0.7928499E+00, 0.1094122E+01, 0.2009503E+01, 0.2009503E+01 /
      data (ref_adm(25,iz,37,17),iz = 1,20) / &
     & 0.2178800E+00, 0.2178800E+00, 0.2792500E+00, 0.2330900E+00, &
     & 0.1955200E+00, 0.2058600E+00, 0.2308495E+00, 0.2556200E+00, &
     & 0.2953000E+00, 0.2880000E+00, 0.3130700E+00, 0.3630435E+00, &
     & 0.4189695E+00, 0.4674807E+00, 0.5333021E+00, 0.6428919E+00, &
     & 0.8006322E+00, 0.1160151E+01, 0.2080577E+01, 0.2080577E+01 /
      data (ref_adm(25,iz,38,17),iz = 1,20) / &
     & 0.2178800E+00, 0.2178800E+00, 0.2792500E+00, 0.2330900E+00, &
     & 0.1955200E+00, 0.2058600E+00, 0.2308495E+00, 0.2556200E+00, &
     & 0.2953000E+00, 0.2880000E+00, 0.3130700E+00, 0.3630435E+00, &
     & 0.4189695E+00, 0.4674807E+00, 0.5333021E+00, 0.6428919E+00, &
     & 0.8006322E+00, 0.1160151E+01, 0.2080577E+01, 0.2080577E+01 /
! Solar Zenith Angle 85.0 Albedo  0.2444087E+00
      data (ref_adm(25,iz, 1,18),iz = 1,20) / &
     & 0.2295893E+00, 0.2295893E+00, 0.2254808E+00, 0.2240576E+00, &
     & 0.2229327E+00, 0.2221632E+00, 0.2208071E+00, 0.2184968E+00, &
     & 0.2155294E+00, 0.2119760E+00, 0.2081113E+00, 0.2027458E+00, &
     & 0.1964832E+00, 0.1905859E+00, 0.1821170E+00, 0.1709644E+00, &
     & 0.1594586E+00, 0.1444044E+00, 0.1178228E+00, 0.1178228E+00 /
      data (ref_adm(25,iz, 2,18),iz = 1,20) / &
     & 0.2295893E+00, 0.2295893E+00, 0.2254808E+00, 0.2240576E+00, &
     & 0.2229327E+00, 0.2221632E+00, 0.2208071E+00, 0.2184968E+00, &
     & 0.2155294E+00, 0.2119760E+00, 0.2081113E+00, 0.2027458E+00, &
     & 0.1964832E+00, 0.1905859E+00, 0.1821170E+00, 0.1709644E+00, &
     & 0.1594586E+00, 0.1444044E+00, 0.1178228E+00, 0.1178228E+00 /
      data (ref_adm(25,iz, 3,18),iz = 1,20) / &
     & 0.2295893E+00, 0.2295893E+00, 0.2254808E+00, 0.2240576E+00, &
     & 0.2229326E+00, 0.2221632E+00, 0.2208071E+00, 0.2184968E+00, &
     & 0.2155294E+00, 0.2119760E+00, 0.2081113E+00, 0.2027458E+00, &
     & 0.1964832E+00, 0.1905859E+00, 0.1821170E+00, 0.1709644E+00, &
     & 0.1594586E+00, 0.1444044E+00, 0.1178228E+00, 0.1178228E+00 /
      data (ref_adm(25,iz, 4,18),iz = 1,20) / &
     & 0.2295893E+00, 0.2295893E+00, 0.2254808E+00, 0.2240576E+00, &
     & 0.2229327E+00, 0.2221632E+00, 0.2208071E+00, 0.2184968E+00, &
     & 0.2155294E+00, 0.2119760E+00, 0.2081113E+00, 0.2027458E+00, &
     & 0.1964832E+00, 0.1905859E+00, 0.1821170E+00, 0.1709644E+00, &
     & 0.1594586E+00, 0.1444044E+00, 0.1178228E+00, 0.1178228E+00 /
      data (ref_adm(25,iz, 5,18),iz = 1,20) / &
     & 0.2295893E+00, 0.2295893E+00, 0.2254808E+00, 0.2240576E+00, &
     & 0.2229326E+00, 0.2221632E+00, 0.2208071E+00, 0.2184968E+00, &
     & 0.2155294E+00, 0.2119760E+00, 0.2081113E+00, 0.2027458E+00, &
     & 0.1964832E+00, 0.1905859E+00, 0.1821170E+00, 0.1709644E+00, &
     & 0.1594586E+00, 0.1444044E+00, 0.1178228E+00, 0.1178228E+00 /
      data (ref_adm(25,iz, 6,18),iz = 1,20) / &
     & 0.2295893E+00, 0.2295893E+00, 0.2254808E+00, 0.2240576E+00, &
     & 0.2229327E+00, 0.2221632E+00, 0.2208071E+00, 0.2184968E+00, &
     & 0.2155294E+00, 0.2119760E+00, 0.2081113E+00, 0.2027458E+00, &
     & 0.1964832E+00, 0.1905859E+00, 0.1821170E+00, 0.1709644E+00, &
     & 0.1594586E+00, 0.1444044E+00, 0.1178228E+00, 0.1178228E+00 /
      data (ref_adm(25,iz, 7,18),iz = 1,20) / &
     & 0.2295893E+00, 0.2295893E+00, 0.2254808E+00, 0.2240576E+00, &
     & 0.2229326E+00, 0.2221632E+00, 0.2208071E+00, 0.2184968E+00, &
     & 0.2155294E+00, 0.2119760E+00, 0.2081113E+00, 0.2027458E+00, &
     & 0.1964832E+00, 0.1905859E+00, 0.1821170E+00, 0.1709644E+00, &
     & 0.1594586E+00, 0.1444044E+00, 0.1178228E+00, 0.1178228E+00 /
      data (ref_adm(25,iz, 8,18),iz = 1,20) / &
     & 0.2295893E+00, 0.2295893E+00, 0.2254808E+00, 0.2240576E+00, &
     & 0.2229327E+00, 0.2221632E+00, 0.2208071E+00, 0.2184968E+00, &
     & 0.2155294E+00, 0.2119760E+00, 0.2081113E+00, 0.2027458E+00, &
     & 0.1964832E+00, 0.1905859E+00, 0.1821170E+00, 0.1709644E+00, &
     & 0.1594586E+00, 0.1444044E+00, 0.1178228E+00, 0.1178228E+00 /
      data (ref_adm(25,iz, 9,18),iz = 1,20) / &
     & 0.2295893E+00, 0.2295893E+00, 0.2254808E+00, 0.2240576E+00, &
     & 0.2229326E+00, 0.2221632E+00, 0.2208071E+00, 0.2184968E+00, &
     & 0.2155294E+00, 0.2119760E+00, 0.2081113E+00, 0.2027458E+00, &
     & 0.1964832E+00, 0.1905859E+00, 0.1821170E+00, 0.1709644E+00, &
     & 0.1594586E+00, 0.1444044E+00, 0.1178228E+00, 0.1178228E+00 /
      data (ref_adm(25,iz,10,18),iz = 1,20) / &
     & 0.2295893E+00, 0.2295893E+00, 0.2254808E+00, 0.2240576E+00, &
     & 0.2229327E+00, 0.2221632E+00, 0.2208071E+00, 0.2184968E+00, &
     & 0.2155294E+00, 0.2119760E+00, 0.2081113E+00, 0.2027458E+00, &
     & 0.1964832E+00, 0.1905859E+00, 0.1821170E+00, 0.1709644E+00, &
     & 0.1594586E+00, 0.1444044E+00, 0.1178228E+00, 0.1178228E+00 /
      data (ref_adm(25,iz,11,18),iz = 1,20) / &
     & 0.2295893E+00, 0.2295893E+00, 0.2254808E+00, 0.2240576E+00, &
     & 0.2229326E+00, 0.2221632E+00, 0.2208071E+00, 0.2184968E+00, &
     & 0.2155294E+00, 0.2119760E+00, 0.2081113E+00, 0.2027458E+00, &
     & 0.1964832E+00, 0.1905859E+00, 0.1821170E+00, 0.1709644E+00, &
     & 0.1594586E+00, 0.1444044E+00, 0.1178228E+00, 0.1178228E+00 /
      data (ref_adm(25,iz,12,18),iz = 1,20) / &
     & 0.2295893E+00, 0.2295893E+00, 0.2254808E+00, 0.2240576E+00, &
     & 0.2229327E+00, 0.2221632E+00, 0.2208071E+00, 0.2184968E+00, &
     & 0.2155294E+00, 0.2119760E+00, 0.2081113E+00, 0.2027458E+00, &
     & 0.1964832E+00, 0.1905859E+00, 0.1821170E+00, 0.1709644E+00, &
     & 0.1594586E+00, 0.1444044E+00, 0.1178228E+00, 0.1178228E+00 /
      data (ref_adm(25,iz,13,18),iz = 1,20) / &
     & 0.2295893E+00, 0.2295893E+00, 0.2254808E+00, 0.2240576E+00, &
     & 0.2229326E+00, 0.2221632E+00, 0.2208071E+00, 0.2184968E+00, &
     & 0.2155294E+00, 0.2119760E+00, 0.2081113E+00, 0.2027458E+00, &
     & 0.1964832E+00, 0.1905859E+00, 0.1821170E+00, 0.1709644E+00, &
     & 0.1594586E+00, 0.1444044E+00, 0.1178228E+00, 0.1178228E+00 /
      data (ref_adm(25,iz,14,18),iz = 1,20) / &
     & 0.2295893E+00, 0.2295893E+00, 0.2254808E+00, 0.2240576E+00, &
     & 0.2229327E+00, 0.2221632E+00, 0.2208071E+00, 0.2184968E+00, &
     & 0.2155294E+00, 0.2119760E+00, 0.2081113E+00, 0.2027458E+00, &
     & 0.1964832E+00, 0.1905859E+00, 0.1821170E+00, 0.1709644E+00, &
     & 0.1594586E+00, 0.1444044E+00, 0.1178228E+00, 0.1178228E+00 /
      data (ref_adm(25,iz,15,18),iz = 1,20) / &
     & 0.2295893E+00, 0.2295893E+00, 0.2267100E+00, 0.2084500E+00, &
     & 0.2270300E+00, 0.2221632E+00, 0.2208071E+00, 0.2285100E+00, &
     & 0.2155294E+00, 0.2119760E+00, 0.2081113E+00, 0.2027458E+00, &
     & 0.1964832E+00, 0.1905859E+00, 0.1821170E+00, 0.1709644E+00, &
     & 0.1594586E+00, 0.1444044E+00, 0.1178228E+00, 0.1178228E+00 /
      data (ref_adm(25,iz,16,18),iz = 1,20) / &
     & 0.2295893E+00, 0.2295893E+00, 0.2254808E+00, 0.2240576E+00, &
     & 0.2229327E+00, 0.2221632E+00, 0.2208071E+00, 0.2184968E+00, &
     & 0.2155294E+00, 0.2119760E+00, 0.2081113E+00, 0.2027458E+00, &
     & 0.1964832E+00, 0.1905859E+00, 0.1821170E+00, 0.1709644E+00, &
     & 0.1594586E+00, 0.1444044E+00, 0.1178228E+00, 0.1178228E+00 /
      data (ref_adm(25,iz,17,18),iz = 1,20) / &
     & 0.2295893E+00, 0.2295893E+00, 0.2254808E+00, 0.2240576E+00, &
     & 0.2229326E+00, 0.2221632E+00, 0.2208071E+00, 0.2184968E+00, &
     & 0.2155294E+00, 0.2119760E+00, 0.2081113E+00, 0.2027458E+00, &
     & 0.1964832E+00, 0.1905859E+00, 0.1821170E+00, 0.1709644E+00, &
     & 0.1594586E+00, 0.1444044E+00, 0.1178228E+00, 0.1178228E+00 /
      data (ref_adm(25,iz,18,18),iz = 1,20) / &
     & 0.3061551E+00, 0.3061551E+00, 0.2530208E+00, 0.2513725E+00, &
     & 0.2551694E+00, 0.2642350E+00, 0.2678618E+00, 0.2659203E+00, &
     & 0.2654690E+00, 0.2659901E+00, 0.2690443E+00, 0.2753878E+00, &
     & 0.2830942E+00, 0.2904740E+00, 0.2991210E+00, 0.3066049E+00, &
     & 0.3086017E+00, 0.2980109E+00, 0.2568078E+00, 0.2568078E+00 /
      data (ref_adm(25,iz,19,18),iz = 1,20) / &
     & 0.3061551E+00, 0.3061551E+00, 0.2530208E+00, 0.2513725E+00, &
     & 0.2551694E+00, 0.2642350E+00, 0.2678617E+00, 0.2659203E+00, &
     & 0.2654690E+00, 0.2659901E+00, 0.2690442E+00, 0.2753878E+00, &
     & 0.2830942E+00, 0.2904740E+00, 0.2991211E+00, 0.3066049E+00, &
     & 0.3086017E+00, 0.2980109E+00, 0.2568078E+00, 0.2568078E+00 /
      data (ref_adm(25,iz,20,18),iz = 1,20) / &
     & 0.3061551E+00, 0.3061551E+00, 0.2530208E+00, 0.2513725E+00, &
     & 0.2551694E+00, 0.2642350E+00, 0.2678618E+00, 0.2659203E+00, &
     & 0.2654690E+00, 0.2659901E+00, 0.2690443E+00, 0.2753878E+00, &
     & 0.2830942E+00, 0.2904740E+00, 0.2991210E+00, 0.3066049E+00, &
     & 0.3086017E+00, 0.2980109E+00, 0.2568078E+00, 0.2568078E+00 /
      data (ref_adm(25,iz,21,18),iz = 1,20) / &
     & 0.3061551E+00, 0.3061551E+00, 0.2530208E+00, 0.2513725E+00, &
     & 0.2551694E+00, 0.2642350E+00, 0.2678617E+00, 0.2659203E+00, &
     & 0.2654690E+00, 0.2659901E+00, 0.2690442E+00, 0.2753878E+00, &
     & 0.2830942E+00, 0.2904740E+00, 0.2991211E+00, 0.3066049E+00, &
     & 0.3086017E+00, 0.2980109E+00, 0.2568078E+00, 0.2568078E+00 /
      data (ref_adm(25,iz,22,18),iz = 1,20) / &
     & 0.3130847E+00, 0.3130847E+00, 0.3074820E+00, 0.3055412E+00, &
     & 0.3040072E+00, 0.3029580E+00, 0.3011087E+00, 0.2979582E+00, &
     & 0.2939115E+00, 0.2890660E+00, 0.2837958E+00, 0.2764789E+00, &
     & 0.2679388E+00, 0.2598968E+00, 0.2483480E+00, 0.2331395E+00, &
     & 0.2174494E+00, 0.1969203E+00, 0.1606717E+00, 0.1606717E+00 /
      data (ref_adm(25,iz,23,18),iz = 1,20) / &
     & 0.3130847E+00, 0.3130847E+00, 0.3074820E+00, 0.3055413E+00, &
     & 0.3040072E+00, 0.3029580E+00, 0.3011087E+00, 0.2979581E+00, &
     & 0.2939115E+00, 0.2890660E+00, 0.2837957E+00, 0.2764789E+00, &
     & 0.2679388E+00, 0.2598968E+00, 0.2483480E+00, 0.2331395E+00, &
     & 0.2174494E+00, 0.1969203E+00, 0.1606717E+00, 0.1606717E+00 /
      data (ref_adm(25,iz,24,18),iz = 1,20) / &
     & 0.3130847E+00, 0.3130847E+00, 0.3074820E+00, 0.3055412E+00, &
     & 0.2821500E+00, 0.2389300E+00, 0.2745600E+00, 0.2979582E+00, &
     & 0.2939115E+00, 0.3267200E+00, 0.2950700E+00, 0.2764789E+00, &
     & 0.3010300E+00, 0.2598968E+00, 0.2483480E+00, 0.2331395E+00, &
     & 0.2174494E+00, 0.1969203E+00, 0.1606717E+00, 0.1606717E+00 /
      data (ref_adm(25,iz,25,18),iz = 1,20) / &
     & 0.3374800E+00, 0.3374800E+00, 0.3074820E+00, 0.3055413E+00, &
     & 0.3040072E+00, 0.3029580E+00, 0.3011087E+00, 0.2979581E+00, &
     & 0.2939115E+00, 0.2890660E+00, 0.2837957E+00, 0.2764789E+00, &
     & 0.2679388E+00, 0.2598968E+00, 0.2483480E+00, 0.2331395E+00, &
     & 0.2174494E+00, 0.1969203E+00, 0.1606717E+00, 0.1606717E+00 /
      data (ref_adm(25,iz,26,18),iz = 1,20) / &
     & 0.3130847E+00, 0.3130847E+00, 0.3074820E+00, 0.3055412E+00, &
     & 0.3040072E+00, 0.3029580E+00, 0.3011087E+00, 0.2979582E+00, &
     & 0.2939115E+00, 0.2890660E+00, 0.2837958E+00, 0.2764789E+00, &
     & 0.2679388E+00, 0.2598968E+00, 0.2483480E+00, 0.2331395E+00, &
     & 0.2174494E+00, 0.1969203E+00, 0.1606717E+00, 0.1606717E+00 /
      data (ref_adm(25,iz,27,18),iz = 1,20) / &
     & 0.3130847E+00, 0.3130847E+00, 0.3074820E+00, 0.3055413E+00, &
     & 0.3040072E+00, 0.3029580E+00, 0.3011087E+00, 0.2979581E+00, &
     & 0.2939115E+00, 0.2890660E+00, 0.2837957E+00, 0.2764789E+00, &
     & 0.2679388E+00, 0.2598968E+00, 0.2483480E+00, 0.2331395E+00, &
     & 0.2174494E+00, 0.1969203E+00, 0.1606717E+00, 0.1606717E+00 /
      data (ref_adm(25,iz,28,18),iz = 1,20) / &
     & 0.3130847E+00, 0.3130847E+00, 0.3074820E+00, 0.3055412E+00, &
     & 0.3040072E+00, 0.3029580E+00, 0.3011087E+00, 0.2979582E+00, &
     & 0.2939115E+00, 0.2890660E+00, 0.2837958E+00, 0.2764789E+00, &
     & 0.2679388E+00, 0.2598968E+00, 0.2483480E+00, 0.2331395E+00, &
     & 0.2174494E+00, 0.1969203E+00, 0.1606717E+00, 0.1606717E+00 /
      data (ref_adm(25,iz,29,18),iz = 1,20) / &
     & 0.3130847E+00, 0.3130847E+00, 0.3074820E+00, 0.3055413E+00, &
     & 0.3040072E+00, 0.3029580E+00, 0.3011087E+00, 0.2979581E+00, &
     & 0.2939115E+00, 0.2890660E+00, 0.2837957E+00, 0.2764789E+00, &
     & 0.2679388E+00, 0.2598968E+00, 0.2483480E+00, 0.2331395E+00, &
     & 0.2174494E+00, 0.1969203E+00, 0.1606717E+00, 0.1606717E+00 /
      data (ref_adm(25,iz,30,18),iz = 1,20) / &
     & 0.3130847E+00, 0.3130847E+00, 0.3074820E+00, 0.3055412E+00, &
     & 0.3040072E+00, 0.3029580E+00, 0.3011087E+00, 0.2979582E+00, &
     & 0.2939115E+00, 0.2890660E+00, 0.2837958E+00, 0.2764789E+00, &
     & 0.2679388E+00, 0.2598968E+00, 0.2483480E+00, 0.2331395E+00, &
     & 0.2174494E+00, 0.1969203E+00, 0.1606717E+00, 0.1606717E+00 /
      data (ref_adm(25,iz,31,18),iz = 1,20) / &
     & 0.3130847E+00, 0.3130847E+00, 0.3074820E+00, 0.3055413E+00, &
     & 0.3040072E+00, 0.3029580E+00, 0.3011087E+00, 0.2979581E+00, &
     & 0.2939115E+00, 0.2890660E+00, 0.2837957E+00, 0.2764789E+00, &
     & 0.2679388E+00, 0.2598968E+00, 0.2483480E+00, 0.2331395E+00, &
     & 0.2174494E+00, 0.1969203E+00, 0.1606717E+00, 0.1606717E+00 /
      data (ref_adm(25,iz,32,18),iz = 1,20) / &
     & 0.3130847E+00, 0.3130847E+00, 0.3074820E+00, 0.3055412E+00, &
     & 0.3040072E+00, 0.3029580E+00, 0.3011087E+00, 0.2979582E+00, &
     & 0.2939115E+00, 0.2890660E+00, 0.2837958E+00, 0.2764789E+00, &
     & 0.2679388E+00, 0.2598968E+00, 0.2483480E+00, 0.2331395E+00, &
     & 0.2174494E+00, 0.1969203E+00, 0.1606717E+00, 0.1606717E+00 /
      data (ref_adm(25,iz,33,18),iz = 1,20) / &
     & 0.3130847E+00, 0.3130847E+00, 0.3074820E+00, 0.3055413E+00, &
     & 0.3040072E+00, 0.3029580E+00, 0.3011087E+00, 0.2979581E+00, &
     & 0.2939115E+00, 0.2890660E+00, 0.2837957E+00, 0.2764789E+00, &
     & 0.2679388E+00, 0.2598968E+00, 0.2483480E+00, 0.2331395E+00, &
     & 0.2174494E+00, 0.1969203E+00, 0.1606717E+00, 0.1606717E+00 /
      data (ref_adm(25,iz,34,18),iz = 1,20) / &
     & 0.3130847E+00, 0.3130847E+00, 0.3074820E+00, 0.3055412E+00, &
     & 0.3040072E+00, 0.3029580E+00, 0.3011087E+00, 0.2979582E+00, &
     & 0.2939115E+00, 0.2890660E+00, 0.2837958E+00, 0.2764789E+00, &
     & 0.2679388E+00, 0.2598968E+00, 0.2483480E+00, 0.2331395E+00, &
     & 0.2174494E+00, 0.1969203E+00, 0.1606717E+00, 0.1606717E+00 /
      data (ref_adm(25,iz,35,18),iz = 1,20) / &
     & 0.3130847E+00, 0.3130847E+00, 0.3074820E+00, 0.3055413E+00, &
     & 0.3040072E+00, 0.3029580E+00, 0.3011087E+00, 0.2979581E+00, &
     & 0.2939115E+00, 0.2890660E+00, 0.2837957E+00, 0.2764789E+00, &
     & 0.2679388E+00, 0.2598968E+00, 0.2483480E+00, 0.2331395E+00, &
     & 0.2174494E+00, 0.1969203E+00, 0.1606717E+00, 0.1606717E+00 /
      data (ref_adm(25,iz,36,18),iz = 1,20) / &
     & 0.3130847E+00, 0.3130847E+00, 0.3074820E+00, 0.3055412E+00, &
     & 0.3040072E+00, 0.3029580E+00, 0.3011087E+00, 0.2979582E+00, &
     & 0.2939115E+00, 0.2890660E+00, 0.2837958E+00, 0.2764789E+00, &
     & 0.2679388E+00, 0.2598968E+00, 0.2483480E+00, 0.2331395E+00, &
     & 0.2174494E+00, 0.1969203E+00, 0.1606717E+00, 0.1606717E+00 /
      data (ref_adm(25,iz,37,18),iz = 1,20) / &
     & 0.3130847E+00, 0.3130847E+00, 0.3074820E+00, 0.3055412E+00, &
     & 0.3040072E+00, 0.3029580E+00, 0.3011087E+00, 0.2979582E+00, &
     & 0.2939115E+00, 0.2890660E+00, 0.2837958E+00, 0.2764789E+00, &
     & 0.2679388E+00, 0.2598968E+00, 0.2483480E+00, 0.2331395E+00, &
     & 0.2174494E+00, 0.1969203E+00, 0.1606717E+00, 0.1606717E+00 /
      data (ref_adm(25,iz,38,18),iz = 1,20) / &
     & 0.3130847E+00, 0.3130847E+00, 0.3074820E+00, 0.3055412E+00, &
     & 0.3040072E+00, 0.3029580E+00, 0.3011087E+00, 0.2979582E+00, &
     & 0.2939115E+00, 0.2890660E+00, 0.2837958E+00, 0.2764789E+00, &
     & 0.2679388E+00, 0.2598968E+00, 0.2483480E+00, 0.2331395E+00, &
     & 0.2174494E+00, 0.1969203E+00, 0.1606717E+00, 0.1606717E+00 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(26,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.5550488E+04
      data (ref_adm(26,iz, 1, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5079690E+00, 0.5359400E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm(26,iz, 2, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5079690E+00, 0.5359400E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm(26,iz, 3, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707097E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650311E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225322E+00, &
     & 0.5079690E+00, 0.4133300E+00, 0.4734617E+00, 0.4465695E+00, &
     & 0.4187760E+00, 0.3825119E+00, 0.2978929E+00, 0.2978929E+00 /
      data (ref_adm(26,iz, 4, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5577400E+00, 0.4837900E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm(26,iz, 5, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707097E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650311E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225322E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465695E+00, &
     & 0.4187760E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm(26,iz, 6, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm(26,iz, 7, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707097E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650311E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225322E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465695E+00, &
     & 0.4187760E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm(26,iz, 8, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm(26,iz, 9, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707097E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650311E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225322E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465695E+00, &
     & 0.4187760E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm(26,iz,10, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm(26,iz,11, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707097E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650311E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225322E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465695E+00, &
     & 0.4187760E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm(26,iz,12, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm(26,iz,13, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707097E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650311E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225322E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465695E+00, &
     & 0.4187760E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm(26,iz,14, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm(26,iz,15, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707097E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650311E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225322E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465695E+00, &
     & 0.4187760E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm(26,iz,16, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707098E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650309E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225323E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465694E+00, &
     & 0.4187759E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm(26,iz,17, 2),iz = 1,20) / &
     & 0.5894516E+00, 0.5894516E+00, 0.5742683E+00, 0.5707097E+00, &
     & 0.5684427E+00, 0.5673928E+00, 0.5650311E+00, 0.5603461E+00, &
     & 0.5560395E+00, 0.5461896E+00, 0.5350544E+00, 0.5225322E+00, &
     & 0.5079690E+00, 0.4938147E+00, 0.4734617E+00, 0.4465695E+00, &
     & 0.4187760E+00, 0.3825119E+00, 0.3180712E+00, 0.3180712E+00 /
      data (ref_adm(26,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.4448032E+04
      data (ref_adm(26,iz, 1, 3),iz = 1,20) / &
     & 0.3863808E+00, 0.3863808E+00, 0.3850019E+00, 0.3868353E+00, &
     & 0.3904156E+00, 0.3950763E+00, 0.4027349E+00, 0.4126396E+00, &
     & 0.4242589E+00, 0.5763000E+00, 0.4723700E+00, 0.4742200E+00, &
     & 0.4768800E+00, 0.4971486E+00, 0.5090600E+00, 0.5124940E+00, &
     & 0.5029105E+00, 0.4725667E+00, 0.3928506E+00, 0.3928506E+00 /
      data (ref_adm(26,iz, 2, 3),iz = 1,20) / &
     & 0.3863808E+00, 0.3863808E+00, 0.3850019E+00, 0.3868353E+00, &
     & 0.3904156E+00, 0.3950763E+00, 0.4027349E+00, 0.4126396E+00, &
     & 0.4242589E+00, 0.5763000E+00, 0.4723700E+00, 0.4742200E+00, &
     & 0.4768800E+00, 0.4971486E+00, 0.5090600E+00, 0.5124940E+00, &
     & 0.5029105E+00, 0.4725667E+00, 0.3928506E+00, 0.3928506E+00 /
      data (ref_adm(26,iz, 3, 3),iz = 1,20) / &
     & 0.3863573E+00, 0.3863573E+00, 0.3850286E+00, 0.3867585E+00, &
     & 0.3904004E+00, 0.3952503E+00, 0.4023741E+00, 0.5496800E+00, &
     & 0.5316000E+00, 0.5369500E+00, 0.5647000E+00, 0.4498400E+00, &
     & 0.5409500E+00, 0.4963452E+00, 0.5068009E+00, 0.5119602E+00, &
     & 0.5020683E+00, 0.4719787E+00, 0.1191610E+00, 0.1191610E+00 /
      data (ref_adm(26,iz, 4, 3),iz = 1,20) / &
     & 0.3863873E+00, 0.3863873E+00, 0.3851575E+00, 0.3865977E+00, &
     & 0.3902121E+00, 0.3949690E+00, 0.4019955E+00, 0.2905500E+00, &
     & 0.2934600E+00, 0.5215900E+00, 0.4455200E+00, 0.4435300E+00, &
     & 0.5369800E+00, 0.6090000E+00, 0.5051124E+00, 0.5099703E+00, &
     & 0.5005898E+00, 0.4701326E+00, 0.3902953E+00, 0.3902953E+00 /
      data (ref_adm(26,iz, 5, 3),iz = 1,20) / &
     & 0.3866777E+00, 0.3866777E+00, 0.3851059E+00, 0.3864603E+00, &
     & 0.3899771E+00, 0.3946496E+00, 0.4016370E+00, 0.4109368E+00, &
     & 0.4224150E+00, 0.5817100E+00, 0.3651300E+00, 0.3074500E+00, &
     & 0.4485900E+00, 0.4927455E+00, 0.5027861E+00, 0.5072650E+00, &
     & 0.4980419E+00, 0.4679332E+00, 0.3881346E+00, 0.3881346E+00 /
      data (ref_adm(26,iz, 6, 3),iz = 1,20) / &
     & 0.3866242E+00, 0.3866242E+00, 0.3849899E+00, 0.3863754E+00, &
     & 0.3900496E+00, 0.3946411E+00, 0.4009882E+00, 0.4102440E+00, &
     & 0.4213917E+00, 0.4340052E+00, 0.3886800E+00, 0.3960800E+00, &
     & 0.4117000E+00, 0.4899261E+00, 0.4996985E+00, 0.5036498E+00, &
     & 0.4951538E+00, 0.4648820E+00, 0.3849619E+00, 0.3849619E+00 /
      data (ref_adm(26,iz, 7, 3),iz = 1,20) / &
     & 0.3866602E+00, 0.3866602E+00, 0.3850370E+00, 0.3863633E+00, &
     & 0.3895929E+00, 0.3940412E+00, 0.4004263E+00, 0.4092904E+00, &
     & 0.4202255E+00, 0.4323615E+00, 0.4685000E+00, 0.4241800E+00, &
     & 0.4524200E+00, 0.5438300E+00, 0.4956634E+00, 0.4990386E+00, &
     & 0.4917199E+00, 0.4613644E+00, 0.3817237E+00, 0.3817237E+00 /
      data (ref_adm(26,iz, 8, 3),iz = 1,20) / &
     & 0.3867943E+00, 0.3867943E+00, 0.3851947E+00, 0.3862778E+00, &
     & 0.3892034E+00, 0.3936985E+00, 0.3996710E+00, 0.4081644E+00, &
     & 0.4184357E+00, 0.5305300E+00, 0.4110700E+00, 0.4146300E+00, &
     & 0.4207900E+00, 0.4160400E+00, 0.4914562E+00, 0.4938020E+00, &
     & 0.4871363E+00, 0.4578683E+00, 0.3780453E+00, 0.3780453E+00 /
      data (ref_adm(26,iz, 9, 3),iz = 1,20) / &
     & 0.3867813E+00, 0.3867813E+00, 0.3852345E+00, 0.3860405E+00, &
     & 0.3888822E+00, 0.3932388E+00, 0.3988638E+00, 0.4069341E+00, &
     & 0.4170262E+00, 0.4281542E+00, 0.3749000E+00, 0.4340300E+00, &
     & 0.5152900E+00, 0.5176200E+00, 0.4863329E+00, 0.4880890E+00, &
     & 0.4813316E+00, 0.4540342E+00, 0.3743172E+00, 0.3743172E+00 /
      data (ref_adm(26,iz,10, 3),iz = 1,20) / &
     & 0.3868442E+00, 0.3868442E+00, 0.3853516E+00, 0.3862135E+00, &
     & 0.3884847E+00, 0.3929335E+00, 0.3981208E+00, 0.4054762E+00, &
     & 0.4151096E+00, 0.4256293E+00, 0.3731000E+00, 0.4345900E+00, &
     & 0.4599000E+00, 0.4180000E+00, 0.4803913E+00, 0.4822863E+00, &
     & 0.4745027E+00, 0.4492145E+00, 0.3707586E+00, 0.3707586E+00 /
      data (ref_adm(26,iz,11, 3),iz = 1,20) / &
     & 0.3868533E+00, 0.3868533E+00, 0.3851698E+00, 0.3862607E+00, &
     & 0.3881878E+00, 0.3922827E+00, 0.3971245E+00, 0.4040681E+00, &
     & 0.4130318E+00, 0.4232874E+00, 0.4344596E+00, 0.3624900E+00, &
     & 0.5150500E+00, 0.4614000E+00, 0.4744577E+00, 0.4756196E+00, &
     & 0.4675660E+00, 0.4438417E+00, 0.3668819E+00, 0.3668819E+00 /
      data (ref_adm(26,iz,12, 3),iz = 1,20) / &
     & 0.3869829E+00, 0.3869829E+00, 0.3853419E+00, 0.3862172E+00, &
     & 0.3879116E+00, 0.3917452E+00, 0.3964849E+00, 0.4027153E+00, &
     & 0.4108062E+00, 0.4209149E+00, 0.4308289E+00, 0.3658700E+00, &
     & 0.4557922E+00, 0.3888600E+00, 0.4684284E+00, 0.4689503E+00, &
     & 0.4609875E+00, 0.4370114E+00, 0.3628151E+00, 0.3628151E+00 /
      data (ref_adm(26,iz,13, 3),iz = 1,20) / &
     & 0.3869954E+00, 0.3869954E+00, 0.3856027E+00, 0.3860510E+00, &
     & 0.3878253E+00, 0.3908207E+00, 0.3956893E+00, 0.4013420E+00, &
     & 0.4089516E+00, 0.4179977E+00, 0.4277607E+00, 0.3771800E+00, &
     & 0.4509585E+00, 0.4579145E+00, 0.4624266E+00, 0.4615241E+00, &
     & 0.4538002E+00, 0.4294837E+00, 0.3579620E+00, 0.3579620E+00 /
      data (ref_adm(26,iz,14, 3),iz = 1,20) / &
     & 0.3871541E+00, 0.3871541E+00, 0.3858553E+00, 0.3861601E+00, &
     & 0.3877483E+00, 0.3905430E+00, 0.3950529E+00, 0.4002547E+00, &
     & 0.4069392E+00, 0.4150366E+00, 0.4244053E+00, 0.4354598E+00, &
     & 0.5496400E+00, 0.5079000E+00, 0.4564556E+00, 0.4546361E+00, &
     & 0.4459328E+00, 0.4221432E+00, 0.3522669E+00, 0.3522669E+00 /
      data (ref_adm(26,iz,15, 3),iz = 1,20) / &
     & 0.3872879E+00, 0.3872879E+00, 0.3860106E+00, 0.3861679E+00, &
     & 0.3877365E+00, 0.3900656E+00, 0.3943100E+00, 0.3992558E+00, &
     & 0.4049480E+00, 0.4125369E+00, 0.4210333E+00, 0.4312800E+00, &
     & 0.4407692E+00, 0.4821400E+00, 0.4517200E+00, 0.4479597E+00, &
     & 0.4385195E+00, 0.4150664E+00, 0.3464515E+00, 0.3464515E+00 /
      data (ref_adm(26,iz,16, 3),iz = 1,20) / &
     & 0.3873236E+00, 0.3873236E+00, 0.3865043E+00, 0.3863222E+00, &
     & 0.3877158E+00, 0.3900237E+00, 0.3934083E+00, 0.3982858E+00, &
     & 0.4037122E+00, 0.4102017E+00, 0.4173784E+00, 0.4271952E+00, &
     & 0.4355182E+00, 0.4411491E+00, 0.4061300E+00, 0.4416423E+00, &
     & 0.4312378E+00, 0.4072466E+00, 0.3414082E+00, 0.3414082E+00 /
      data (ref_adm(26,iz,17, 3),iz = 1,20) / &
     & 0.3873770E+00, 0.3873770E+00, 0.3868179E+00, 0.3869191E+00, &
     & 0.3877918E+00, 0.3899736E+00, 0.3926952E+00, 0.3973179E+00, &
     & 0.4023750E+00, 0.4078832E+00, 0.4143414E+00, 0.4231122E+00, &
     & 0.4308765E+00, 0.4355687E+00, 0.4277700E+00, 0.4351490E+00, &
     & 0.4246416E+00, 0.4000242E+00, 0.3362977E+00, 0.3362977E+00 /
      data (ref_adm(26,iz,18, 3),iz = 1,20) / &
     & 0.5529258E+00, 0.5529258E+00, 0.5419497E+00, 0.5390139E+00, &
     & 0.5373947E+00, 0.5367689E+00, 0.5348957E+00, 0.5313575E+00, &
     & 0.5301402E+00, 0.5183429E+00, 0.5063347E+00, 0.4948636E+00, &
     & 0.4814150E+00, 0.4681325E+00, 0.3989200E+00, 0.4241033E+00, &
     & 0.3979614E+00, 0.3637663E+00, 0.3046825E+00, 0.3046825E+00 /
      data (ref_adm(26,iz,19, 3),iz = 1,20) / &
     & 0.5529700E+00, 0.5529700E+00, 0.5419644E+00, 0.5389671E+00, &
     & 0.5373042E+00, 0.5366898E+00, 0.5348735E+00, 0.5312174E+00, &
     & 0.5300108E+00, 0.5186456E+00, 0.5063747E+00, 0.4947756E+00, &
     & 0.4813103E+00, 0.4679309E+00, 0.4490325E+00, 0.4238913E+00, &
     & 0.3977667E+00, 0.3636073E+00, 0.3045926E+00, 0.3045926E+00 /
      data (ref_adm(26,iz,20, 3),iz = 1,20) / &
     & 0.5530258E+00, 0.5530258E+00, 0.5419210E+00, 0.5388508E+00, &
     & 0.5371677E+00, 0.5365365E+00, 0.5347777E+00, 0.5310768E+00, &
     & 0.5298679E+00, 0.5189909E+00, 0.5063980E+00, 0.4946696E+00, &
     & 0.4812000E+00, 0.4677808E+00, 0.4488027E+00, 0.4236657E+00, &
     & 0.3974886E+00, 0.3633785E+00, 0.3044982E+00, 0.3044982E+00 /
      data (ref_adm(26,iz,21, 3),iz = 1,20) / &
     & 0.5530470E+00, 0.5530470E+00, 0.5419195E+00, 0.5387949E+00, &
     & 0.5370310E+00, 0.5364256E+00, 0.5346916E+00, 0.5309815E+00, &
     & 0.5296401E+00, 0.5193607E+00, 0.5064738E+00, 0.4946111E+00, &
     & 0.4810843E+00, 0.4676690E+00, 0.4485886E+00, 0.4234405E+00, &
     & 0.3973138E+00, 0.3631856E+00, 0.3044359E+00, 0.3044359E+00 /
      data (ref_adm(26,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(26,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo  0.4305417E+00
      data (ref_adm(26,iz, 1, 4),iz = 1,20) / &
     & 0.6304000E+00, 0.6304000E+00, 0.4880300E+00, 0.4144000E+00, &
     & 0.6575900E+00, 0.5751700E+00, 0.3260300E+00, 0.4063300E+00, &
     & 0.4529600E+00, 0.4456277E+00, 0.7330000E+00, 0.3971600E+00, &
     & 0.3300200E+00, 0.2873600E+00, 0.4089379E+00, 0.3961593E+00, &
     & 0.3810777E+00, 0.3557893E+00, 0.2998299E+00, 0.2998299E+00 /
      data (ref_adm(26,iz, 2, 4),iz = 1,20) / &
     & 0.6304000E+00, 0.6304000E+00, 0.4880300E+00, 0.4144000E+00, &
     & 0.6575900E+00, 0.5751700E+00, 0.3260300E+00, 0.4063300E+00, &
     & 0.4529600E+00, 0.4456277E+00, 0.7330000E+00, 0.3971600E+00, &
     & 0.3300200E+00, 0.2873600E+00, 0.4089379E+00, 0.3961593E+00, &
     & 0.3810777E+00, 0.3557893E+00, 0.2998299E+00, 0.2998299E+00 /
      data (ref_adm(26,iz, 3, 4),iz = 1,20) / &
     & 0.4953100E+00, 0.4953100E+00, 0.4044500E+00, 0.4630200E+00, &
     & 0.4719900E+00, 0.5768800E+00, 0.4827200E+00, 0.4412500E+00, &
     & 0.4492400E+00, 0.4456277E+00, 0.4396317E+00, 0.4322913E+00, &
     & 0.4304100E+00, 0.4180152E+00, 0.3710000E+00, 0.3961593E+00, &
     & 0.3810777E+00, 0.3557893E+00, 0.2014540E+00, 0.2014540E+00 /
      data (ref_adm(26,iz, 4, 4),iz = 1,20) / &
     & 0.4377800E+00, 0.4377800E+00, 0.4240600E+00, 0.3818100E+00, &
     & 0.3807500E+00, 0.4576800E+00, 0.5035500E+00, 0.3863800E+00, &
     & 0.4104500E+00, 0.4456277E+00, 0.4396317E+00, 0.3992300E+00, &
     & 0.5187100E+00, 0.3519000E+00, 0.4089379E+00, 0.3961593E+00, &
     & 0.3810777E+00, 0.3557893E+00, 0.2998299E+00, 0.2998299E+00 /
      data (ref_adm(26,iz, 5, 4),iz = 1,20) / &
     & 0.5049300E+00, 0.5049300E+00, 0.4945400E+00, 0.4269500E+00, &
     & 0.3881600E+00, 0.4122500E+00, 0.4216800E+00, 0.3754300E+00, &
     & 0.3740700E+00, 0.4456277E+00, 0.3823400E+00, 0.3901600E+00, &
     & 0.5772200E+00, 0.4180152E+00, 0.4469100E+00, 0.3961593E+00, &
     & 0.3810777E+00, 0.3557893E+00, 0.2998300E+00, 0.2998300E+00 /
      data (ref_adm(26,iz, 6, 4),iz = 1,20) / &
     & 0.5063400E+00, 0.5063400E+00, 0.4555900E+00, 0.4286500E+00, &
     & 0.4354200E+00, 0.4750400E+00, 0.4408400E+00, 0.4123200E+00, &
     & 0.4300300E+00, 0.3612200E+00, 0.4243900E+00, 0.3935000E+00, &
     & 0.5501800E+00, 0.4180152E+00, 0.5426700E+00, 0.3961593E+00, &
     & 0.3810777E+00, 0.3557893E+00, 0.2998299E+00, 0.2998299E+00 /
      data (ref_adm(26,iz, 7, 4),iz = 1,20) / &
     & 0.4232100E+00, 0.4232100E+00, 0.4564800E+00, 0.4277200E+00, &
     & 0.4617300E+00, 0.4807700E+00, 0.4529200E+00, 0.4797000E+00, &
     & 0.4398300E+00, 0.5126100E+00, 0.4847400E+00, 0.3750500E+00, &
     & 0.4459400E+00, 0.4180152E+00, 0.5569400E+00, 0.3961593E+00, &
     & 0.3810777E+00, 0.3557893E+00, 0.2998300E+00, 0.2998300E+00 /
      data (ref_adm(26,iz, 8, 4),iz = 1,20) / &
     & 0.4772000E+00, 0.4772000E+00, 0.3884700E+00, 0.4402500E+00, &
     & 0.4435600E+00, 0.4509100E+00, 0.4505000E+00, 0.4618300E+00, &
     & 0.4517000E+00, 0.5012500E+00, 0.4791500E+00, 0.3918400E+00, &
     & 0.3952300E+00, 0.4108900E+00, 0.4612500E+00, 0.3961593E+00, &
     & 0.3810777E+00, 0.3557893E+00, 0.2998299E+00, 0.2998299E+00 /
      data (ref_adm(26,iz, 9, 4),iz = 1,20) / &
     & 0.6180200E+00, 0.6180200E+00, 0.3549600E+00, 0.4448900E+00, &
     & 0.4484500E+00, 0.3985600E+00, 0.4718000E+00, 0.4785900E+00, &
     & 0.4624300E+00, 0.4613900E+00, 0.4339100E+00, 0.4223400E+00, &
     & 0.5300500E+00, 0.3845000E+00, 0.4089379E+00, 0.4501400E+00, &
     & 0.3810777E+00, 0.3557893E+00, 0.2998300E+00, 0.2998300E+00 /
      data (ref_adm(26,iz,10, 4),iz = 1,20) / &
     & 0.5061597E+00, 0.5061597E+00, 0.4717847E+00, 0.4678187E+00, &
     & 0.4261900E+00, 0.4677904E+00, 0.4546900E+00, 0.4390700E+00, &
     & 0.3941300E+00, 0.3808100E+00, 0.4463200E+00, 0.4270300E+00, &
     & 0.5148500E+00, 0.3971600E+00, 0.4089379E+00, 0.4899700E+00, &
     & 0.3810777E+00, 0.3557893E+00, 0.2998299E+00, 0.2998299E+00 /
      data (ref_adm(26,iz,11, 4),iz = 1,20) / &
     & 0.5061597E+00, 0.5061597E+00, 0.4717847E+00, 0.4678187E+00, &
     & 0.4761900E+00, 0.4252800E+00, 0.4555400E+00, 0.4585918E+00, &
     & 0.4350300E+00, 0.4844500E+00, 0.5176500E+00, 0.4181700E+00, &
     & 0.4677100E+00, 0.4557700E+00, 0.4089379E+00, 0.3961593E+00, &
     & 0.3810777E+00, 0.3557893E+00, 0.2998300E+00, 0.2998300E+00 /
      data (ref_adm(26,iz,12, 4),iz = 1,20) / &
     & 0.5061597E+00, 0.5061597E+00, 0.3954900E+00, 0.4678187E+00, &
     & 0.4665500E+00, 0.4677904E+00, 0.4651479E+00, 0.4585918E+00, &
     & 0.5636000E+00, 0.4456277E+00, 0.4037500E+00, 0.4205300E+00, &
     & 0.3967500E+00, 0.4011800E+00, 0.4089379E+00, 0.3961593E+00, &
     & 0.3810777E+00, 0.3557893E+00, 0.2998299E+00, 0.2998299E+00 /
      data (ref_adm(26,iz,13, 4),iz = 1,20) / &
     & 0.3528400E+00, 0.3528400E+00, 0.4717847E+00, 0.4678187E+00, &
     & 0.4665500E+00, 0.4677905E+00, 0.3949200E+00, 0.4482700E+00, &
     & 0.4522254E+00, 0.5824800E+00, 0.4617700E+00, 0.4534400E+00, &
     & 0.4994100E+00, 0.3791000E+00, 0.4089379E+00, 0.3961593E+00, &
     & 0.3810777E+00, 0.3557893E+00, 0.2998300E+00, 0.2998300E+00 /
      data (ref_adm(26,iz,14, 4),iz = 1,20) / &
     & 0.5246300E+00, 0.5246300E+00, 0.4717847E+00, 0.4678187E+00, &
     & 0.4665500E+00, 0.4677904E+00, 0.4719800E+00, 0.4823000E+00, &
     & 0.5017400E+00, 0.5111300E+00, 0.4519800E+00, 0.4396900E+00, &
     & 0.4977500E+00, 0.3704000E+00, 0.4089379E+00, 0.3961593E+00, &
     & 0.3810777E+00, 0.3557893E+00, 0.2998299E+00, 0.2998299E+00 /
      data (ref_adm(26,iz,15, 4),iz = 1,20) / &
     & 0.5061597E+00, 0.5061597E+00, 0.4717847E+00, 0.4678187E+00, &
     & 0.4665500E+00, 0.4677905E+00, 0.4651479E+00, 0.4034000E+00, &
     & 0.4648400E+00, 0.5078200E+00, 0.4396317E+00, 0.4322913E+00, &
     & 0.4244705E+00, 0.4180152E+00, 0.4089379E+00, 0.3961593E+00, &
     & 0.3810777E+00, 0.3557893E+00, 0.2998300E+00, 0.2998300E+00 /
      data (ref_adm(26,iz,16, 4),iz = 1,20) / &
     & 0.5311300E+00, 0.5311300E+00, 0.4137500E+00, 0.3915600E+00, &
     & 0.4809400E+00, 0.4677904E+00, 0.4651479E+00, 0.4554500E+00, &
     & 0.5574900E+00, 0.4292200E+00, 0.4829400E+00, 0.4322913E+00, &
     & 0.4244705E+00, 0.4180152E+00, 0.4089379E+00, 0.3961593E+00, &
     & 0.3810777E+00, 0.3557893E+00, 0.2998299E+00, 0.2998299E+00 /
      data (ref_adm(26,iz,17, 4),iz = 1,20) / &
     & 0.4925400E+00, 0.4925400E+00, 0.5165100E+00, 0.4839500E+00, &
     & 0.3832500E+00, 0.4283900E+00, 0.4835200E+00, 0.4585918E+00, &
     & 0.3780400E+00, 0.4456277E+00, 0.4396317E+00, 0.4322913E+00, &
     & 0.4244705E+00, 0.4697300E+00, 0.5150800E+00, 0.3961593E+00, &
     & 0.3810777E+00, 0.3557893E+00, 0.2998300E+00, 0.2998300E+00 /
      data (ref_adm(26,iz,18, 4),iz = 1,20) / &
     & 0.3872500E+00, 0.3872500E+00, 0.4203100E+00, 0.5366200E+00, &
     & 0.5234900E+00, 0.4410200E+00, 0.4267100E+00, 0.4129548E+00, &
     & 0.4169222E+00, 0.3916100E+00, 0.3801300E+00, 0.3814800E+00, &
     & 0.4424642E+00, 0.4206500E+00, 0.4835400E+00, 0.4580211E+00, &
     & 0.4562902E+00, 0.4427771E+00, 0.3871114E+00, 0.3871114E+00 /
      data (ref_adm(26,iz,19, 4),iz = 1,20) / &
     & 0.4014705E+00, 0.4014705E+00, 0.4020112E+00, 0.4030245E+00, &
     & 0.4043305E+00, 0.3186000E+00, 0.4226100E+00, 0.4295400E+00, &
     & 0.4147582E+00, 0.3493800E+00, 0.4063500E+00, 0.3944200E+00, &
     & 0.4365242E+00, 0.3828800E+00, 0.3903600E+00, 0.4488804E+00, &
     & 0.4470008E+00, 0.4337655E+00, 0.3808168E+00, 0.3808168E+00 /
      data (ref_adm(26,iz,20, 4),iz = 1,20) / &
     & 0.4014837E+00, 0.4014837E+00, 0.4019667E+00, 0.4217300E+00, &
     & 0.4009300E+00, 0.4034900E+00, 0.3731400E+00, 0.4419400E+00, &
     & 0.4248100E+00, 0.4568300E+00, 0.4201692E+00, 0.4255580E+00, &
     & 0.4313866E+00, 0.4353710E+00, 0.4511000E+00, 0.3963000E+00, &
     & 0.4383464E+00, 0.4255681E+00, 0.3766499E+00, 0.3766499E+00 /
      data (ref_adm(26,iz,21, 4),iz = 1,20) / &
     & 0.2551300E+00, 0.2551300E+00, 0.2559700E+00, 0.2633000E+00, &
     & 0.2808900E+00, 0.4054506E+00, 0.4071774E+00, 0.3458400E+00, &
     & 0.4182700E+00, 0.4449600E+00, 0.4176348E+00, 0.4220055E+00, &
     & 0.4264585E+00, 0.4072300E+00, 0.4438800E+00, 0.4330800E+00, &
     & 0.4306541E+00, 0.4177837E+00, 0.3733255E+00, 0.3733255E+00 /
      data (ref_adm(26,iz,22, 4),iz = 1,20) / &
     & 0.4695977E+00, 0.4695977E+00, 0.4284149E+00, 0.4272127E+00, &
     & 0.4300336E+00, 0.3020800E+00, 0.3161000E+00, 0.4129300E+00, &
     & 0.3421200E+00, 0.4315200E+00, 0.4321999E+00, 0.3768100E+00, &
     & 0.4272400E+00, 0.4113000E+00, 0.4609600E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984308E+00, 0.2984308E+00 /
      data (ref_adm(26,iz,23, 4),iz = 1,20) / &
     & 0.5041800E+00, 0.5041800E+00, 0.4570200E+00, 0.4272127E+00, &
     & 0.2871100E+00, 0.2824600E+00, 0.2608200E+00, 0.2535300E+00, &
     & 0.4445200E+00, 0.4394200E+00, 0.3956600E+00, 0.3987400E+00, &
     & 0.4139000E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
      data (ref_adm(26,iz,24, 4),iz = 1,20) / &
     & 0.5640200E+00, 0.5640200E+00, 0.5518900E+00, 0.5090900E+00, &
     & 0.2835900E+00, 0.2495800E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342878E+00, 0.4537000E+00, 0.4321999E+00, 0.3445300E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984308E+00, 0.2984308E+00 /
      data (ref_adm(26,iz,25, 4),iz = 1,20) / &
     & 0.4695977E+00, 0.4695977E+00, 0.2587700E+00, 0.3568400E+00, &
     & 0.4300337E+00, 0.5805400E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342877E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
      data (ref_adm(26,iz,26, 4),iz = 1,20) / &
     & 0.5285000E+00, 0.5285000E+00, 0.2781200E+00, 0.4272127E+00, &
     & 0.6355500E+00, 0.6055600E+00, 0.6086100E+00, 0.4361490E+00, &
     & 0.4342878E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984308E+00, 0.2984308E+00 /
      data (ref_adm(26,iz,27, 4),iz = 1,20) / &
     & 0.4695977E+00, 0.4695977E+00, 0.4284149E+00, 0.5100600E+00, &
     & 0.5119500E+00, 0.4366743E+00, 0.4191800E+00, 0.4361490E+00, &
     & 0.4342877E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
      data (ref_adm(26,iz,28, 4),iz = 1,20) / &
     & 0.5551800E+00, 0.5551800E+00, 0.5184100E+00, 0.5238500E+00, &
     & 0.4300336E+00, 0.4153600E+00, 0.3959200E+00, 0.4361490E+00, &
     & 0.4342878E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984308E+00, 0.2984308E+00 /
      data (ref_adm(26,iz,29, 4),iz = 1,20) / &
     & 0.5336900E+00, 0.5336900E+00, 0.4998200E+00, 0.4272127E+00, &
     & 0.4300337E+00, 0.4784100E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342877E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
      data (ref_adm(26,iz,30, 4),iz = 1,20) / &
     & 0.4695977E+00, 0.4695977E+00, 0.4284149E+00, 0.4272127E+00, &
     & 0.4300336E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342878E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984308E+00, 0.2984308E+00 /
      data (ref_adm(26,iz,31, 4),iz = 1,20) / &
     & 0.4695977E+00, 0.4695977E+00, 0.4284149E+00, 0.4272127E+00, &
     & 0.4300337E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342877E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
      data (ref_adm(26,iz,32, 4),iz = 1,20) / &
     & 0.4695977E+00, 0.4695977E+00, 0.4284149E+00, 0.4272127E+00, &
     & 0.4300336E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342878E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984308E+00, 0.2984308E+00 /
      data (ref_adm(26,iz,33, 4),iz = 1,20) / &
     & 0.4695977E+00, 0.4695977E+00, 0.4284149E+00, 0.4272127E+00, &
     & 0.4300337E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342877E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
      data (ref_adm(26,iz,34, 4),iz = 1,20) / &
     & 0.4695977E+00, 0.4695977E+00, 0.4284149E+00, 0.4272127E+00, &
     & 0.4300336E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342878E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984308E+00, 0.2984308E+00 /
      data (ref_adm(26,iz,35, 4),iz = 1,20) / &
     & 0.5299700E+00, 0.5299700E+00, 0.4447700E+00, 0.4272127E+00, &
     & 0.4300337E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342877E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
      data (ref_adm(26,iz,36, 4),iz = 1,20) / &
     & 0.4887900E+00, 0.4887900E+00, 0.4154800E+00, 0.5395800E+00, &
     & 0.4300336E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342878E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984308E+00, 0.2984308E+00 /
      data (ref_adm(26,iz,37, 4),iz = 1,20) / &
     & 0.4934900E+00, 0.4934900E+00, 0.4135600E+00, 0.4941600E+00, &
     & 0.4789900E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342877E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
      data (ref_adm(26,iz,38, 4),iz = 1,20) / &
     & 0.4934900E+00, 0.4934900E+00, 0.4135600E+00, 0.4941600E+00, &
     & 0.4789900E+00, 0.4366743E+00, 0.4387491E+00, 0.4361490E+00, &
     & 0.4342877E+00, 0.4326319E+00, 0.4321999E+00, 0.4322098E+00, &
     & 0.4315637E+00, 0.4304192E+00, 0.4265622E+00, 0.4173202E+00, &
     & 0.4019957E+00, 0.3698024E+00, 0.2984307E+00, 0.2984307E+00 /
! Solar Zenith Angle 20.0 Albedo  0.4426996E+00
      data (ref_adm(26,iz, 1, 5),iz = 1,20) / &
     & 0.4459000E+00, 0.4459000E+00, 0.3882000E+00, 0.3788200E+00, &
     & 0.3607900E+00, 0.4138900E+00, 0.4019600E+00, 0.3626100E+00, &
     & 0.3923400E+00, 0.3805700E+00, 0.3978800E+00, 0.4419000E+00, &
     & 0.4301318E+00, 0.4358391E+00, 0.4407364E+00, 0.4982400E+00, &
     & 0.4401814E+00, 0.4200001E+00, 0.3463563E+00, 0.3463563E+00 /
      data (ref_adm(26,iz, 2, 5),iz = 1,20) / &
     & 0.4459000E+00, 0.4459000E+00, 0.3882000E+00, 0.3788200E+00, &
     & 0.3607900E+00, 0.4138900E+00, 0.4019600E+00, 0.3626100E+00, &
     & 0.3923400E+00, 0.3805700E+00, 0.3978800E+00, 0.4419000E+00, &
     & 0.4301318E+00, 0.4358391E+00, 0.4407364E+00, 0.4982400E+00, &
     & 0.4401814E+00, 0.4200001E+00, 0.3463563E+00, 0.3463563E+00 /
      data (ref_adm(26,iz, 3, 5),iz = 1,20) / &
     & 0.3814300E+00, 0.3814300E+00, 0.3522500E+00, 0.4756700E+00, &
     & 0.3961200E+00, 0.5859400E+00, 0.3284200E+00, 0.3192900E+00, &
     & 0.3041500E+00, 0.4657600E+00, 0.3406200E+00, 0.4235591E+00, &
     & 0.4300271E+00, 0.4353768E+00, 0.4415400E+00, 0.4431396E+00, &
     & 0.4511800E+00, 0.4194003E+00, 0.1302737E+00, 0.1302737E+00 /
      data (ref_adm(26,iz, 4, 5),iz = 1,20) / &
     & 0.3916400E+00, 0.3916400E+00, 0.5074200E+00, 0.3870300E+00, &
     & 0.4610400E+00, 0.4807600E+00, 0.4574700E+00, 0.3169100E+00, &
     & 0.4157091E+00, 0.4159403E+00, 0.4182141E+00, 0.4231727E+00, &
     & 0.3786400E+00, 0.3242300E+00, 0.4404132E+00, 0.4426284E+00, &
     & 0.4390829E+00, 0.4188450E+00, 0.3456527E+00, 0.3456527E+00 /
      data (ref_adm(26,iz, 5, 5),iz = 1,20) / &
     & 0.3792500E+00, 0.3792500E+00, 0.3471200E+00, 0.4586900E+00, &
     & 0.3703700E+00, 0.4595600E+00, 0.4545700E+00, 0.3190500E+00, &
     & 0.4377000E+00, 0.4159078E+00, 0.3908000E+00, 0.4228974E+00, &
     & 0.4812600E+00, 0.3017200E+00, 0.4399382E+00, 0.4421071E+00, &
     & 0.4379809E+00, 0.4179176E+00, 0.3448711E+00, 0.3448711E+00 /
      data (ref_adm(26,iz, 6, 5),iz = 1,20) / &
     & 0.3514300E+00, 0.3514300E+00, 0.3777500E+00, 0.3731300E+00, &
     & 0.4163300E+00, 0.4679200E+00, 0.5174000E+00, 0.4856400E+00, &
     & 0.3764400E+00, 0.4158770E+00, 0.4176244E+00, 0.4225617E+00, &
     & 0.4886500E+00, 0.2769600E+00, 0.5077200E+00, 0.4409853E+00, &
     & 0.4369659E+00, 0.4164350E+00, 0.3439539E+00, 0.3439539E+00 /
      data (ref_adm(26,iz, 7, 5),iz = 1,20) / &
     & 0.3764000E+00, 0.3764000E+00, 0.4148000E+00, 0.4292300E+00, &
     & 0.4378300E+00, 0.4505500E+00, 0.4143900E+00, 0.4858600E+00, &
     & 0.4495900E+00, 0.4243600E+00, 0.4177075E+00, 0.4222012E+00, &
     & 0.4433700E+00, 0.5898300E+00, 0.5236900E+00, 0.4395865E+00, &
     & 0.4353513E+00, 0.4149160E+00, 0.3426661E+00, 0.3426661E+00 /
      data (ref_adm(26,iz, 8, 5),iz = 1,20) / &
     & 0.4111200E+00, 0.4111200E+00, 0.4094400E+00, 0.4576600E+00, &
     & 0.4630000E+00, 0.4419800E+00, 0.4026500E+00, 0.4769800E+00, &
     & 0.3189400E+00, 0.4158432E+00, 0.3609700E+00, 0.5880900E+00, &
     & 0.4558400E+00, 0.4514100E+00, 0.4325500E+00, 0.4383707E+00, &
     & 0.4335740E+00, 0.4131845E+00, 0.3412034E+00, 0.3412034E+00 /
      data (ref_adm(26,iz, 9, 5),iz = 1,20) / &
     & 0.3950000E+00, 0.3950000E+00, 0.3917700E+00, 0.3989800E+00, &
     & 0.4463800E+00, 0.4132400E+00, 0.4014600E+00, 0.4231200E+00, &
     & 0.4693300E+00, 0.3480700E+00, 0.3087200E+00, 0.4691300E+00, &
     & 0.5065900E+00, 0.3884200E+00, 0.4354286E+00, 0.4368954E+00, &
     & 0.4317291E+00, 0.4111929E+00, 0.3395281E+00, 0.3395281E+00 /
      data (ref_adm(26,iz,10, 5),iz = 1,20) / &
     & 0.4199900E+00, 0.4199900E+00, 0.5008500E+00, 0.4198000E+00, &
     & 0.4570800E+00, 0.4312800E+00, 0.3757800E+00, 0.3949900E+00, &
     & 0.3943300E+00, 0.4303300E+00, 0.5019600E+00, 0.4432200E+00, &
     & 0.4536000E+00, 0.4295057E+00, 0.4338294E+00, 0.4350623E+00, &
     & 0.4334000E+00, 0.4087268E+00, 0.3376285E+00, 0.3376285E+00 /
      data (ref_adm(26,iz,11, 5),iz = 1,20) / &
     & 0.4080300E+00, 0.4080300E+00, 0.3846400E+00, 0.4003100E+00, &
     & 0.4179400E+00, 0.3758800E+00, 0.4571800E+00, 0.3959700E+00, &
     & 0.4990800E+00, 0.4161900E+00, 0.4603300E+00, 0.4894800E+00, &
     & 0.4911100E+00, 0.4447100E+00, 0.4321439E+00, 0.4332452E+00, &
     & 0.4832600E+00, 0.4060707E+00, 0.3355803E+00, 0.3355803E+00 /
      data (ref_adm(26,iz,12, 5),iz = 1,20) / &
     & 0.3965100E+00, 0.3965100E+00, 0.4369417E+00, 0.5127900E+00, &
     & 0.4222800E+00, 0.2967100E+00, 0.2936800E+00, 0.4191692E+00, &
     & 0.5100300E+00, 0.5388300E+00, 0.4789000E+00, 0.4315200E+00, &
     & 0.3996000E+00, 0.3916300E+00, 0.4302949E+00, 0.4410500E+00, &
     & 0.4252974E+00, 0.4033552E+00, 0.3335393E+00, 0.3335393E+00 /
      data (ref_adm(26,iz,13, 5),iz = 1,20) / &
     & 0.5029000E+00, 0.5029000E+00, 0.5016900E+00, 0.4647000E+00, &
     & 0.3855400E+00, 0.4287616E+00, 0.4238458E+00, 0.4200089E+00, &
     & 0.4174974E+00, 0.4177000E+00, 0.4262000E+00, 0.4699700E+00, &
     & 0.4272800E+00, 0.4373600E+00, 0.3323000E+00, 0.3651400E+00, &
     & 0.4229020E+00, 0.4004921E+00, 0.3315777E+00, 0.3315777E+00 /
      data (ref_adm(26,iz,14, 5),iz = 1,20) / &
     & 0.4130700E+00, 0.4130700E+00, 0.4002900E+00, 0.3740500E+00, &
     & 0.3826200E+00, 0.4593700E+00, 0.4449200E+00, 0.3863500E+00, &
     & 0.3801200E+00, 0.3610800E+00, 0.4349200E+00, 0.4036200E+00, &
     & 0.5012400E+00, 0.4487200E+00, 0.4266982E+00, 0.3567500E+00, &
     & 0.4205659E+00, 0.3977794E+00, 0.3293620E+00, 0.3293620E+00 /
      data (ref_adm(26,iz,15, 5),iz = 1,20) / &
     & 0.4080600E+00, 0.4080600E+00, 0.3668400E+00, 0.4452500E+00, &
     & 0.3364000E+00, 0.5497000E+00, 0.6292000E+00, 0.4738300E+00, &
     & 0.3438000E+00, 0.4170417E+00, 0.5445500E+00, 0.4588600E+00, &
     & 0.4528400E+00, 0.5231100E+00, 0.4246809E+00, 0.4243942E+00, &
     & 0.4181177E+00, 0.3950672E+00, 0.3271860E+00, 0.3271860E+00 /
      data (ref_adm(26,iz,16, 5),iz = 1,20) / &
     & 0.4066600E+00, 0.4066600E+00, 0.3968500E+00, 0.3759400E+00, &
     & 0.4539000E+00, 0.5183100E+00, 0.2728900E+00, 0.4903700E+00, &
     & 0.4787200E+00, 0.3968500E+00, 0.4201900E+00, 0.4749900E+00, &
     & 0.4575500E+00, 0.4255100E+00, 0.4226179E+00, 0.4217877E+00, &
     & 0.4152597E+00, 0.3923228E+00, 0.3249094E+00, 0.3249094E+00 /
      data (ref_adm(26,iz,17, 5),iz = 1,20) / &
     & 0.3834200E+00, 0.3834200E+00, 0.4352211E+00, 0.5010700E+00, &
     & 0.4377127E+00, 0.4341600E+00, 0.2279600E+00, 0.3941900E+00, &
     & 0.5974700E+00, 0.4140500E+00, 0.4050200E+00, 0.4358900E+00, &
     & 0.4819000E+00, 0.5167700E+00, 0.4204253E+00, 0.4196505E+00, &
     & 0.4125935E+00, 0.3898352E+00, 0.3228738E+00, 0.3228738E+00 /
      data (ref_adm(26,iz,18, 5),iz = 1,20) / &
     & 0.3880200E+00, 0.3880200E+00, 0.4573000E+00, 0.4008200E+00, &
     & 0.3333200E+00, 0.3811100E+00, 0.4343800E+00, 0.2664700E+00, &
     & 0.4861800E+00, 0.5869000E+00, 0.4795800E+00, 0.4306349E+00, &
     & 0.4588400E+00, 0.4478900E+00, 0.4475800E+00, 0.4282254E+00, &
     & 0.4153254E+00, 0.3865662E+00, 0.3180619E+00, 0.3180619E+00 /
      data (ref_adm(26,iz,19, 5),iz = 1,20) / &
     & 0.4548300E+00, 0.4548300E+00, 0.4686000E+00, 0.4287100E+00, &
     & 0.4215940E+00, 0.4512900E+00, 0.4479800E+00, 0.4209800E+00, &
     & 0.3125500E+00, 0.5167800E+00, 0.5156900E+00, 0.4303965E+00, &
     & 0.4298200E+00, 0.3592000E+00, 0.3857700E+00, 0.4263494E+00, &
     & 0.4133992E+00, 0.3849761E+00, 0.3171915E+00, 0.3171915E+00 /
      data (ref_adm(26,iz,20, 5),iz = 1,20) / &
     & 0.4132400E+00, 0.4132400E+00, 0.3851300E+00, 0.3215000E+00, &
     & 0.4514400E+00, 0.4172000E+00, 0.3734500E+00, 0.4278499E+00, &
     & 0.4227100E+00, 0.4373500E+00, 0.4568800E+00, 0.4162000E+00, &
     & 0.4466600E+00, 0.4632800E+00, 0.3690300E+00, 0.4246390E+00, &
     & 0.4117272E+00, 0.3831703E+00, 0.3163706E+00, 0.3163706E+00 /
      data (ref_adm(26,iz,21, 5),iz = 1,20) / &
     & 0.4544300E+00, 0.4544300E+00, 0.3858700E+00, 0.4703700E+00, &
     & 0.5352300E+00, 0.3465500E+00, 0.4308474E+00, 0.4435100E+00, &
     & 0.4667100E+00, 0.4769400E+00, 0.5224600E+00, 0.4572300E+00, &
     & 0.4470700E+00, 0.4755100E+00, 0.3897800E+00, 0.3690200E+00, &
     & 0.4101630E+00, 0.3813992E+00, 0.3154573E+00, 0.3154573E+00 /
      data (ref_adm(26,iz,22, 5),iz = 1,20) / &
     & 0.3755200E+00, 0.3755200E+00, 0.3964000E+00, 0.3890473E+00, &
     & 0.4022000E+00, 0.3561300E+00, 0.4423100E+00, 0.4229200E+00, &
     & 0.4166840E+00, 0.2533800E+00, 0.3268700E+00, 0.4168700E+00, &
     & 0.4731000E+00, 0.4495000E+00, 0.4596100E+00, 0.3373800E+00, &
     & 0.4599101E+00, 0.4434437E+00, 0.4147737E+00, 0.4147737E+00 /
      data (ref_adm(26,iz,23, 5),iz = 1,20) / &
     & 0.3805500E+00, 0.3805500E+00, 0.4046900E+00, 0.3761300E+00, &
     & 0.3858000E+00, 0.4318900E+00, 0.4168500E+00, 0.4083000E+00, &
     & 0.4192778E+00, 0.4271716E+00, 0.2575100E+00, 0.3420600E+00, &
     & 0.4468800E+00, 0.4591110E+00, 0.4651500E+00, 0.4641348E+00, &
     & 0.4584959E+00, 0.4425882E+00, 0.4185047E+00, 0.4185047E+00 /
      data (ref_adm(26,iz,24, 5),iz = 1,20) / &
     & 0.3714200E+00, 0.3714200E+00, 0.3854700E+00, 0.4023200E+00, &
     & 0.3895400E+00, 0.3971100E+00, 0.4064907E+00, 0.4135587E+00, &
     & 0.3668800E+00, 0.4401500E+00, 0.3463300E+00, 0.3900700E+00, &
     & 0.4140100E+00, 0.3287400E+00, 0.4633800E+00, 0.4070400E+00, &
     & 0.4725500E+00, 0.4449349E+00, 0.4247915E+00, 0.4247915E+00 /
      data (ref_adm(26,iz,25, 5),iz = 1,20) / &
     & 0.4019500E+00, 0.4019500E+00, 0.3768100E+00, 0.4206800E+00, &
     & 0.4136400E+00, 0.4395800E+00, 0.4622600E+00, 0.5035200E+00, &
     & 0.5163200E+00, 0.5083600E+00, 0.5067200E+00, 0.4811100E+00, &
     & 0.4401000E+00, 0.4425700E+00, 0.4076700E+00, 0.4725015E+00, &
     & 0.4655665E+00, 0.4500378E+00, 0.4331151E+00, 0.4331151E+00 /
      data (ref_adm(26,iz,26, 5),iz = 1,20) / &
     & 0.4327200E+00, 0.4327200E+00, 0.4402200E+00, 0.4332600E+00, &
     & 0.4146500E+00, 0.4101100E+00, 0.4805800E+00, 0.5556400E+00, &
     & 0.3743300E+00, 0.4373764E+00, 0.4707300E+00, 0.4572978E+00, &
     & 0.4666115E+00, 0.4727700E+00, 0.3528300E+00, 0.3599300E+00, &
     & 0.4167200E+00, 0.4596769E+00, 0.4441634E+00, 0.4441634E+00 /
      data (ref_adm(26,iz,27, 5),iz = 1,20) / &
     & 0.4450900E+00, 0.4450900E+00, 0.4323100E+00, 0.4786900E+00, &
     & 0.3974492E+00, 0.3465100E+00, 0.4147800E+00, 0.4197600E+00, &
     & 0.4192600E+00, 0.4590100E+00, 0.6349800E+00, 0.4734476E+00, &
     & 0.4807412E+00, 0.3732300E+00, 0.4180500E+00, 0.4862840E+00, &
     & 0.4820712E+00, 0.4700597E+00, 0.4569950E+00, 0.4569950E+00 /
      data (ref_adm(26,iz,28, 5),iz = 1,20) / &
     & 0.4238900E+00, 0.4238900E+00, 0.4657500E+00, 0.4474800E+00, &
     & 0.3989200E+00, 0.4085880E+00, 0.3358500E+00, 0.2809500E+00, &
     & 0.4627400E+00, 0.5248900E+00, 0.5949500E+00, 0.6203800E+00, &
     & 0.6283100E+00, 0.5064300E+00, 0.4108100E+00, 0.3947700E+00, &
     & 0.4944593E+00, 0.4802587E+00, 0.4702848E+00, 0.4702848E+00 /
      data (ref_adm(26,iz,29, 5),iz = 1,20) / &
     & 0.4130200E+00, 0.4130200E+00, 0.4783400E+00, 0.4967400E+00, &
     & 0.4009903E+00, 0.3963200E+00, 0.4373532E+00, 0.3343800E+00, &
     & 0.4192600E+00, 0.4865254E+00, 0.4937170E+00, 0.5074100E+00, &
     & 0.3828900E+00, 0.4625200E+00, 0.3942200E+00, 0.5500185E+00, &
     & 0.5256659E+00, 0.4979426E+00, 0.4843039E+00, 0.4843039E+00 /
      data (ref_adm(26,iz,30, 5),iz = 1,20) / &
     & 0.3907300E+00, 0.3907300E+00, 0.4450500E+00, 0.5059500E+00, &
     & 0.4038564E+00, 0.4239182E+00, 0.4370400E+00, 0.4191100E+00, &
     & 0.4676625E+00, 0.5330100E+00, 0.4839877E+00, 0.3113300E+00, &
     & 0.4325900E+00, 0.5248616E+00, 0.5394717E+00, 0.5596114E+00, &
     & 0.5674812E+00, 0.5369285E+00, 0.5031306E+00, 0.5031306E+00 /
      data (ref_adm(26,iz,31, 5),iz = 1,20) / &
     & 0.4370500E+00, 0.4370500E+00, 0.4222500E+00, 0.4212300E+00, &
     & 0.2385600E+00, 0.6104500E+00, 0.4826000E+00, 0.2786200E+00, &
     & 0.4621704E+00, 0.4737236E+00, 0.4861827E+00, 0.5019088E+00, &
     & 0.4626800E+00, 0.5277398E+00, 0.5383171E+00, 0.5467209E+00, &
     & 0.5563286E+00, 0.5671933E+00, 0.5282619E+00, 0.5282619E+00 /
      data (ref_adm(26,iz,32, 5),iz = 1,20) / &
     & 0.4092000E+00, 0.4092000E+00, 0.4311100E+00, 0.4585600E+00, &
     & 0.4157300E+00, 0.4665400E+00, 0.4576500E+00, 0.4530841E+00, &
     & 0.4247400E+00, 0.4759944E+00, 0.4882278E+00, 0.4702300E+00, &
     & 0.5183711E+00, 0.5298870E+00, 0.5422207E+00, 0.5517433E+00, &
     & 0.5543231E+00, 0.5559193E+00, 0.5456068E+00, 0.5456068E+00 /
      data (ref_adm(26,iz,33, 5),iz = 1,20) / &
     & 0.4152400E+00, 0.4152400E+00, 0.4142100E+00, 0.4111700E+00, &
     & 0.4538200E+00, 0.4627200E+00, 0.4651000E+00, 0.4718200E+00, &
     & 0.4931800E+00, 0.4717000E+00, 0.4878952E+00, 0.5022444E+00, &
     & 0.5170480E+00, 0.5285774E+00, 0.5421941E+00, 0.5544739E+00, &
     & 0.5597234E+00, 0.5546796E+00, 0.5485951E+00, 0.5485951E+00 /
      data (ref_adm(26,iz,34, 5),iz = 1,20) / &
     & 0.4066600E+00, 0.4066600E+00, 0.3803200E+00, 0.3234300E+00, &
     & 0.3786500E+00, 0.4458800E+00, 0.4331500E+00, 0.4333400E+00, &
     & 0.4937800E+00, 0.4732300E+00, 0.4865562E+00, 0.5012503E+00, &
     & 0.5166079E+00, 0.5280225E+00, 0.5408260E+00, 0.5537615E+00, &
     & 0.5618209E+00, 0.5600439E+00, 0.5520947E+00, 0.5520947E+00 /
      data (ref_adm(26,iz,35, 5),iz = 1,20) / &
     & 0.4219300E+00, 0.4219300E+00, 0.3775400E+00, 0.3950700E+00, &
     & 0.4635300E+00, 0.4721200E+00, 0.4218800E+00, 0.4448700E+00, &
     & 0.4561300E+00, 0.4859800E+00, 0.4859227E+00, 0.5023327E+00, &
     & 0.5191232E+00, 0.5308459E+00, 0.5418448E+00, 0.5528331E+00, &
     & 0.5615200E+00, 0.5634516E+00, 0.5575533E+00, 0.5575533E+00 /
      data (ref_adm(26,iz,36, 5),iz = 1,20) / &
     & 0.3763300E+00, 0.3763300E+00, 0.3702300E+00, 0.4010500E+00, &
     & 0.4870100E+00, 0.4685600E+00, 0.4900200E+00, 0.5144500E+00, &
     & 0.5081900E+00, 0.4712400E+00, 0.4745800E+00, 0.5054082E+00, &
     & 0.5268360E+00, 0.5385937E+00, 0.5461120E+00, 0.5538552E+00, &
     & 0.5608276E+00, 0.5646066E+00, 0.5618510E+00, 0.5618510E+00 /
      data (ref_adm(26,iz,37, 5),iz = 1,20) / &
     & 0.4610400E+00, 0.4610400E+00, 0.3766900E+00, 0.4160200E+00, &
     & 0.4223600E+00, 0.5291900E+00, 0.5186200E+00, 0.4852200E+00, &
     & 0.5213500E+00, 0.5567100E+00, 0.4439000E+00, 0.5280200E+00, &
     & 0.5610401E+00, 0.5749550E+00, 0.5522222E+00, 0.5554495E+00, &
     & 0.5609769E+00, 0.5649921E+00, 0.5643457E+00, 0.5643457E+00 /
      data (ref_adm(26,iz,38, 5),iz = 1,20) / &
     & 0.4610400E+00, 0.4610400E+00, 0.3766900E+00, 0.4160200E+00, &
     & 0.4223600E+00, 0.5291900E+00, 0.5186200E+00, 0.4852200E+00, &
     & 0.5213500E+00, 0.5567100E+00, 0.4439000E+00, 0.5280200E+00, &
     & 0.5610401E+00, 0.5749550E+00, 0.5522222E+00, 0.5554495E+00, &
     & 0.5609769E+00, 0.5649921E+00, 0.5643457E+00, 0.5643457E+00 /
! Solar Zenith Angle 25.0 Albedo  0.4514415E+00
      data (ref_adm(26,iz, 1, 6),iz = 1,20) / &
     & 0.4501100E+00, 0.4501100E+00, 0.3504600E+00, 0.3220500E+00, &
     & 0.3494200E+00, 0.4382200E+00, 0.5920500E+00, 0.6153400E+00, &
     & 0.4547000E+00, 0.4803500E+00, 0.4935400E+00, 0.5485000E+00, &
     & 0.5747600E+00, 0.4535300E+00, 0.4639800E+00, 0.4653800E+00, &
     & 0.4589982E+00, 0.4376900E+00, 0.3519748E+00, 0.3519748E+00 /
      data (ref_adm(26,iz, 2, 6),iz = 1,20) / &
     & 0.4501100E+00, 0.4501100E+00, 0.3504600E+00, 0.3220500E+00, &
     & 0.3494200E+00, 0.4382200E+00, 0.5920500E+00, 0.6153400E+00, &
     & 0.4547000E+00, 0.4803500E+00, 0.4935400E+00, 0.5485000E+00, &
     & 0.5747600E+00, 0.4535300E+00, 0.4639800E+00, 0.4653800E+00, &
     & 0.4589982E+00, 0.4376900E+00, 0.3519748E+00, 0.3519748E+00 /
      data (ref_adm(26,iz, 3, 6),iz = 1,20) / &
     & 0.4289000E+00, 0.4289000E+00, 0.3892100E+00, 0.3306700E+00, &
     & 0.3993800E+00, 0.4690100E+00, 0.5314300E+00, 0.4655100E+00, &
     & 0.4460900E+00, 0.4521100E+00, 0.5174500E+00, 0.5013200E+00, &
     & 0.5361500E+00, 0.6189400E+00, 0.4914300E+00, 0.4493000E+00, &
     & 0.4102100E+00, 0.3730900E+00, 0.1806291E+00, 0.1806291E+00 /
      data (ref_adm(26,iz, 4, 6),iz = 1,20) / &
     & 0.4650200E+00, 0.4650200E+00, 0.5780200E+00, 0.6555100E+00, &
     & 0.4007900E+00, 0.4638400E+00, 0.5031700E+00, 0.4552200E+00, &
     & 0.4348900E+00, 0.4498000E+00, 0.5166400E+00, 0.5119000E+00, &
     & 0.4676500E+00, 0.4702200E+00, 0.5222100E+00, 0.4311900E+00, &
     & 0.5575000E+00, 0.4276460E+00, 0.3511091E+00, 0.3511091E+00 /
      data (ref_adm(26,iz, 5, 6),iz = 1,20) / &
     & 0.4574200E+00, 0.4574200E+00, 0.4412600E+00, 0.3864600E+00, &
     & 0.4311100E+00, 0.4207700E+00, 0.5134300E+00, 0.4799900E+00, &
     & 0.4662000E+00, 0.5618300E+00, 0.5156600E+00, 0.4519700E+00, &
     & 0.5687300E+00, 0.3911200E+00, 0.4666900E+00, 0.4718100E+00, &
     & 0.4559952E+00, 0.4263594E+00, 0.3502506E+00, 0.3502506E+00 /
      data (ref_adm(26,iz, 6, 6),iz = 1,20) / &
     & 0.5385500E+00, 0.5385500E+00, 0.4350300E+00, 0.3937300E+00, &
     & 0.4618000E+00, 0.3851700E+00, 0.4527313E+00, 0.5238500E+00, &
     & 0.5440900E+00, 0.5452900E+00, 0.5628300E+00, 0.4612300E+00, &
     & 0.5153900E+00, 0.5694200E+00, 0.4354800E+00, 0.4911800E+00, &
     & 0.4142900E+00, 0.4245218E+00, 0.3491043E+00, 0.3491043E+00 /
      data (ref_adm(26,iz, 7, 6),iz = 1,20) / &
     & 0.4463700E+00, 0.4463700E+00, 0.3871700E+00, 0.5596500E+00, &
     & 0.5554400E+00, 0.3198500E+00, 0.3278800E+00, 0.5643200E+00, &
     & 0.5045900E+00, 0.4869900E+00, 0.4682800E+00, 0.4588200E+00, &
     & 0.4571200E+00, 0.5083400E+00, 0.4775100E+00, 0.4780100E+00, &
     & 0.4519374E+00, 0.4223322E+00, 0.3476402E+00, 0.3476402E+00 /
      data (ref_adm(26,iz, 8, 6),iz = 1,20) / &
     & 0.3864800E+00, 0.3864800E+00, 0.3121400E+00, 0.3628100E+00, &
     & 0.4338300E+00, 0.3827200E+00, 0.5725200E+00, 0.5834100E+00, &
     & 0.4665500E+00, 0.4071500E+00, 0.4080600E+00, 0.4422000E+00, &
     & 0.4225800E+00, 0.4624300E+00, 0.5071100E+00, 0.5113300E+00, &
     & 0.4490665E+00, 0.4197303E+00, 0.3459376E+00, 0.3459376E+00 /
      data (ref_adm(26,iz, 9, 6),iz = 1,20) / &
     & 0.3936500E+00, 0.3936500E+00, 0.4378500E+00, 0.5062700E+00, &
     & 0.4911300E+00, 0.4681200E+00, 0.4902800E+00, 0.4800800E+00, &
     & 0.4752300E+00, 0.4518600E+00, 0.4107200E+00, 0.4308700E+00, &
     & 0.4267200E+00, 0.5036600E+00, 0.5113500E+00, 0.5210700E+00, &
     & 0.4460188E+00, 0.4168362E+00, 0.3439492E+00, 0.3439492E+00 /
      data (ref_adm(26,iz,10, 6),iz = 1,20) / &
     & 0.4455900E+00, 0.4455900E+00, 0.4851800E+00, 0.3869200E+00, &
     & 0.4820700E+00, 0.4662300E+00, 0.4219900E+00, 0.4388800E+00, &
     & 0.4333300E+00, 0.3955600E+00, 0.4441400E+00, 0.4334100E+00, &
     & 0.4165200E+00, 0.3907400E+00, 0.5363700E+00, 0.4582415E+00, &
     & 0.4427101E+00, 0.4135343E+00, 0.3414137E+00, 0.3414137E+00 /
      data (ref_adm(26,iz,11, 6),iz = 1,20) / &
     & 0.4278400E+00, 0.4278400E+00, 0.3695800E+00, 0.4194900E+00, &
     & 0.4553400E+00, 0.4628200E+00, 0.4448900E+00, 0.4527900E+00, &
     & 0.4747800E+00, 0.5027700E+00, 0.5443100E+00, 0.4770300E+00, &
     & 0.4810200E+00, 0.3802700E+00, 0.4646648E+00, 0.4551092E+00, &
     & 0.4391212E+00, 0.4100515E+00, 0.3388164E+00, 0.3388164E+00 /
      data (ref_adm(26,iz,12, 6),iz = 1,20) / &
     & 0.3170300E+00, 0.3170300E+00, 0.4110500E+00, 0.3717100E+00, &
     & 0.4040600E+00, 0.3810700E+00, 0.4169200E+00, 0.4653700E+00, &
     & 0.4352400E+00, 0.4377800E+00, 0.4166800E+00, 0.4644600E+00, &
     & 0.4145300E+00, 0.3950100E+00, 0.4627700E+00, 0.4544500E+00, &
     & 0.4353594E+00, 0.4056600E+00, 0.3360939E+00, 0.3360939E+00 /
      data (ref_adm(26,iz,13, 6),iz = 1,20) / &
     & 0.4170600E+00, 0.4170600E+00, 0.4219000E+00, 0.4645200E+00, &
     & 0.4152000E+00, 0.4117700E+00, 0.4098700E+00, 0.4213700E+00, &
     & 0.4104500E+00, 0.4126700E+00, 0.4570200E+00, 0.4452800E+00, &
     & 0.4375700E+00, 0.4340400E+00, 0.4445500E+00, 0.4480202E+00, &
     & 0.4314989E+00, 0.4024141E+00, 0.3333850E+00, 0.3333850E+00 /
      data (ref_adm(26,iz,14, 6),iz = 1,20) / &
     & 0.3750500E+00, 0.3750500E+00, 0.4333300E+00, 0.3577200E+00, &
     & 0.3365700E+00, 0.3281500E+00, 0.4403100E+00, 0.3791800E+00, &
     & 0.4537327E+00, 0.4596300E+00, 0.5340100E+00, 0.5411300E+00, &
     & 0.4478000E+00, 0.4158600E+00, 0.4549729E+00, 0.4444105E+00, &
     & 0.4278832E+00, 0.3984976E+00, 0.3306196E+00, 0.3306196E+00 /
      data (ref_adm(26,iz,15, 6),iz = 1,20) / &
     & 0.3934700E+00, 0.3934700E+00, 0.4544286E+00, 0.4544021E+00, &
     & 0.7100000E+00, 0.3891300E+00, 0.4233100E+00, 0.3616700E+00, &
     & 0.4758700E+00, 0.4653400E+00, 0.5239200E+00, 0.4340500E+00, &
     & 0.5693600E+00, 0.4842000E+00, 0.4514874E+00, 0.4408658E+00, &
     & 0.4241824E+00, 0.3945426E+00, 0.3279842E+00, 0.3279842E+00 /
      data (ref_adm(26,iz,16, 6),iz = 1,20) / &
     & 0.3994900E+00, 0.3994900E+00, 0.4204100E+00, 0.4039800E+00, &
     & 0.5446900E+00, 0.5712100E+00, 0.4518346E+00, 0.4552500E+00, &
     & 0.3900600E+00, 0.4808200E+00, 0.4937300E+00, 0.4960000E+00, &
     & 0.4034900E+00, 0.4530834E+00, 0.4481212E+00, 0.4368418E+00, &
     & 0.4203429E+00, 0.3909321E+00, 0.3252040E+00, 0.3252040E+00 /
      data (ref_adm(26,iz,17, 6),iz = 1,20) / &
     & 0.3541100E+00, 0.3541100E+00, 0.4777500E+00, 0.5658300E+00, &
     & 0.6738100E+00, 0.6935000E+00, 0.4740800E+00, 0.4356600E+00, &
     & 0.4089800E+00, 0.4367000E+00, 0.4862300E+00, 0.5296900E+00, &
     & 0.4021200E+00, 0.4500705E+00, 0.4444401E+00, 0.4987200E+00, &
     & 0.4166391E+00, 0.3875205E+00, 0.3226266E+00, 0.3226266E+00 /
      data (ref_adm(26,iz,18, 6),iz = 1,20) / &
     & 0.4206300E+00, 0.4206300E+00, 0.4333945E+00, 0.6247000E+00, &
     & 0.6869200E+00, 0.4612400E+00, 0.4546000E+00, 0.4752300E+00, &
     & 0.5404500E+00, 0.4338900E+00, 0.4779700E+00, 0.5147000E+00, &
     & 0.4570700E+00, 0.4533054E+00, 0.3478000E+00, 0.4455394E+00, &
     & 0.4314556E+00, 0.4007256E+00, 0.3278151E+00, 0.3278151E+00 /
      data (ref_adm(26,iz,19, 6),iz = 1,20) / &
     & 0.3144600E+00, 0.3144600E+00, 0.3006300E+00, 0.3493800E+00, &
     & 0.4018400E+00, 0.4818000E+00, 0.4748600E+00, 0.4323600E+00, &
     & 0.5669600E+00, 0.4643300E+00, 0.4816500E+00, 0.4798100E+00, &
     & 0.4191800E+00, 0.4512391E+00, 0.3516700E+00, 0.4430317E+00, &
     & 0.4287480E+00, 0.3981199E+00, 0.3264381E+00, 0.3264381E+00 /
      data (ref_adm(26,iz,20, 6),iz = 1,20) / &
     & 0.4067300E+00, 0.4067300E+00, 0.3439600E+00, 0.3675200E+00, &
     & 0.4015100E+00, 0.4744000E+00, 0.4577700E+00, 0.5086200E+00, &
     & 0.4449046E+00, 0.3961000E+00, 0.4339900E+00, 0.4915500E+00, &
     & 0.4507000E+00, 0.4103800E+00, 0.5096100E+00, 0.3696500E+00, &
     & 0.4261578E+00, 0.3956750E+00, 0.3252435E+00, 0.3252435E+00 /
      data (ref_adm(26,iz,21, 6),iz = 1,20) / &
     & 0.3809100E+00, 0.3809100E+00, 0.3926700E+00, 0.4749400E+00, &
     & 0.5675500E+00, 0.3474300E+00, 0.5257500E+00, 0.4882500E+00, &
     & 0.4736300E+00, 0.4454311E+00, 0.4463176E+00, 0.4749000E+00, &
     & 0.4484300E+00, 0.4256300E+00, 0.5285900E+00, 0.3855500E+00, &
     & 0.4234296E+00, 0.3932075E+00, 0.3240476E+00, 0.3240476E+00 /
      data (ref_adm(26,iz,22, 6),iz = 1,20) / &
     & 0.4839000E+00, 0.4839000E+00, 0.4339900E+00, 0.4015040E+00, &
     & 0.3855400E+00, 0.4070190E+00, 0.4275500E+00, 0.4801600E+00, &
     & 0.4936500E+00, 0.4267900E+00, 0.4400443E+00, 0.4666100E+00, &
     & 0.4646442E+00, 0.4759000E+00, 0.4091000E+00, 0.3667100E+00, &
     & 0.4958763E+00, 0.4893180E+00, 0.4539266E+00, 0.4539266E+00 /
      data (ref_adm(26,iz,23, 6),iz = 1,20) / &
     & 0.4192100E+00, 0.4192100E+00, 0.3997411E+00, 0.4007496E+00, &
     & 0.4526900E+00, 0.3837800E+00, 0.4101299E+00, 0.4632900E+00, &
     & 0.4213000E+00, 0.4282119E+00, 0.4359615E+00, 0.4436200E+00, &
     & 0.4270900E+00, 0.4591000E+00, 0.4763881E+00, 0.3845600E+00, &
     & 0.3754000E+00, 0.4796605E+00, 0.4518535E+00, 0.4518535E+00 /
      data (ref_adm(26,iz,24, 6),iz = 1,20) / &
     & 0.3538700E+00, 0.3538700E+00, 0.3779200E+00, 0.3653600E+00, &
     & 0.4022003E+00, 0.3396700E+00, 0.4090432E+00, 0.4139453E+00, &
     & 0.4197954E+00, 0.4262465E+00, 0.4306100E+00, 0.3960200E+00, &
     & 0.4451800E+00, 0.4808800E+00, 0.4637600E+00, 0.3966300E+00, &
     & 0.4336000E+00, 0.3713800E+00, 0.4521613E+00, 0.4521613E+00 /
      data (ref_adm(26,iz,25, 6),iz = 1,20) / &
     & 0.4359300E+00, 0.4359300E+00, 0.1921800E+00, 0.3088600E+00, &
     & 0.4100200E+00, 0.2974600E+00, 0.3562300E+00, 0.4124924E+00, &
     & 0.4179778E+00, 0.4038200E+00, 0.4577300E+00, 0.4513600E+00, &
     & 0.4376500E+00, 0.4835300E+00, 0.4637700E+00, 0.4196200E+00, &
     & 0.4189700E+00, 0.4232600E+00, 0.4541385E+00, 0.4541385E+00 /
      data (ref_adm(26,iz,26, 6),iz = 1,20) / &
     & 0.2266600E+00, 0.2266600E+00, 0.2692500E+00, 0.2671700E+00, &
     & 0.3670200E+00, 0.5185400E+00, 0.5448400E+00, 0.4120133E+00, &
     & 0.3748300E+00, 0.4292800E+00, 0.5114200E+00, 0.4487500E+00, &
     & 0.4241300E+00, 0.4914100E+00, 0.4195900E+00, 0.4708200E+00, &
     & 0.4625700E+00, 0.4255600E+00, 0.4590835E+00, 0.4590835E+00 /
      data (ref_adm(26,iz,27, 6),iz = 1,20) / &
     & 0.4726900E+00, 0.4726900E+00, 0.6147800E+00, 0.1779600E+00, &
     & 0.3201500E+00, 0.3173300E+00, 0.3712700E+00, 0.3385500E+00, &
     & 0.4001900E+00, 0.3841200E+00, 0.4115100E+00, 0.4377600E+00, &
     & 0.4034100E+00, 0.3556400E+00, 0.4315300E+00, 0.4317000E+00, &
     & 0.4706657E+00, 0.3712400E+00, 0.4666685E+00, 0.4666685E+00 /
      data (ref_adm(26,iz,28, 6),iz = 1,20) / &
     & 0.5737700E+00, 0.5737700E+00, 0.5849300E+00, 0.4842300E+00, &
     & 0.4612400E+00, 0.3528900E+00, 0.3060200E+00, 0.3340500E+00, &
     & 0.4090100E+00, 0.4716800E+00, 0.4028800E+00, 0.4393800E+00, &
     & 0.4567400E+00, 0.4591859E+00, 0.4278500E+00, 0.4714429E+00, &
     & 0.4725773E+00, 0.4704158E+00, 0.4763612E+00, 0.4763612E+00 /
      data (ref_adm(26,iz,29, 6),iz = 1,20) / &
     & 0.4455900E+00, 0.4455900E+00, 0.4283300E+00, 0.4223300E+00, &
     & 0.4822800E+00, 0.4281900E+00, 0.3389800E+00, 0.3743100E+00, &
     & 0.3929800E+00, 0.5366200E+00, 0.4295500E+00, 0.4655800E+00, &
     & 0.4836800E+00, 0.5409700E+00, 0.3424600E+00, 0.3412900E+00, &
     & 0.4773161E+00, 0.4760369E+00, 0.4861082E+00, 0.4861082E+00 /
      data (ref_adm(26,iz,30, 6),iz = 1,20) / &
     & 0.4489100E+00, 0.4489100E+00, 0.4218000E+00, 0.4177200E+00, &
     & 0.4150300E+00, 0.4404400E+00, 0.4299200E+00, 0.3963600E+00, &
     & 0.4516200E+00, 0.4518600E+00, 0.4000600E+00, 0.4374600E+00, &
     & 0.5315700E+00, 0.4782800E+00, 0.4152900E+00, 0.4550400E+00, &
     & 0.4838708E+00, 0.4833044E+00, 0.4979132E+00, 0.4979132E+00 /
      data (ref_adm(26,iz,31, 6),iz = 1,20) / &
     & 0.3925400E+00, 0.3925400E+00, 0.3738700E+00, 0.3999800E+00, &
     & 0.3783500E+00, 0.4547700E+00, 0.4563100E+00, 0.4696500E+00, &
     & 0.4544500E+00, 0.4568700E+00, 0.4401900E+00, 0.4083900E+00, &
     & 0.5252300E+00, 0.4760500E+00, 0.4378900E+00, 0.3846400E+00, &
     & 0.4926767E+00, 0.4925037E+00, 0.5095731E+00, 0.5095731E+00 /
      data (ref_adm(26,iz,32, 6),iz = 1,20) / &
     & 0.3280900E+00, 0.3280900E+00, 0.3150600E+00, 0.4789900E+00, &
     & 0.5217700E+00, 0.4609600E+00, 0.4464100E+00, 0.4796500E+00, &
     & 0.4587500E+00, 0.4800300E+00, 0.4779500E+00, 0.4660400E+00, &
     & 0.5120900E+00, 0.4683400E+00, 0.5481100E+00, 0.4971157E+00, &
     & 0.5006737E+00, 0.5026126E+00, 0.5217869E+00, 0.5217869E+00 /
      data (ref_adm(26,iz,33, 6),iz = 1,20) / &
     & 0.3595000E+00, 0.3595000E+00, 0.3468400E+00, 0.3659400E+00, &
     & 0.5319700E+00, 0.3751500E+00, 0.3727600E+00, 0.4057000E+00, &
     & 0.4453200E+00, 0.4750000E+00, 0.4339700E+00, 0.4695600E+00, &
     & 0.4921700E+00, 0.4461700E+00, 0.4589300E+00, 0.4319900E+00, &
     & 0.5090899E+00, 0.5121562E+00, 0.5333351E+00, 0.5333351E+00 /
      data (ref_adm(26,iz,34, 6),iz = 1,20) / &
     & 0.3836600E+00, 0.3836600E+00, 0.4070300E+00, 0.4174300E+00, &
     & 0.4590000E+00, 0.4260000E+00, 0.4871800E+00, 0.4811800E+00, &
     & 0.4947100E+00, 0.4628200E+00, 0.4362300E+00, 0.4616800E+00, &
     & 0.4627200E+00, 0.4649800E+00, 0.4825200E+00, 0.4934008E+00, &
     & 0.5097960E+00, 0.5210333E+00, 0.5428035E+00, 0.5428035E+00 /
      data (ref_adm(26,iz,35, 6),iz = 1,20) / &
     & 0.4867000E+00, 0.4867000E+00, 0.4770400E+00, 0.4406100E+00, &
     & 0.4558700E+00, 0.3753500E+00, 0.4391500E+00, 0.4100400E+00, &
     & 0.5198900E+00, 0.4300900E+00, 0.4370100E+00, 0.4856100E+00, &
     & 0.4939900E+00, 0.4406900E+00, 0.4913800E+00, 0.4867935E+00, &
     & 0.5048380E+00, 0.5254654E+00, 0.5509824E+00, 0.5509824E+00 /
      data (ref_adm(26,iz,36, 6),iz = 1,20) / &
     & 0.4017700E+00, 0.4017700E+00, 0.3630500E+00, 0.3713400E+00, &
     & 0.4122500E+00, 0.3853400E+00, 0.4134200E+00, 0.4307800E+00, &
     & 0.5056100E+00, 0.4451800E+00, 0.4738600E+00, 0.4799300E+00, &
     & 0.4383500E+00, 0.4428400E+00, 0.4805600E+00, 0.4848877E+00, &
     & 0.4995839E+00, 0.5251113E+00, 0.5566913E+00, 0.5566913E+00 /
      data (ref_adm(26,iz,37, 6),iz = 1,20) / &
     & 0.3887900E+00, 0.3887900E+00, 0.4249900E+00, 0.3715700E+00, &
     & 0.4495400E+00, 0.4153100E+00, 0.4008600E+00, 0.4444900E+00, &
     & 0.4279428E+00, 0.3730900E+00, 0.4566300E+00, 0.5126200E+00, &
     & 0.5295200E+00, 0.5128600E+00, 0.5511500E+00, 0.4854204E+00, &
     & 0.4976599E+00, 0.5239267E+00, 0.5602204E+00, 0.5602204E+00 /
      data (ref_adm(26,iz,38, 6),iz = 1,20) / &
     & 0.3887900E+00, 0.3887900E+00, 0.4249900E+00, 0.3715700E+00, &
     & 0.4495400E+00, 0.4153100E+00, 0.4008600E+00, 0.4444900E+00, &
     & 0.4279428E+00, 0.3730900E+00, 0.4566300E+00, 0.5126200E+00, &
     & 0.5295200E+00, 0.5128600E+00, 0.5511500E+00, 0.4854204E+00, &
     & 0.4976599E+00, 0.5239267E+00, 0.5602204E+00, 0.5602204E+00 /
! Solar Zenith Angle 30.0 Albedo  0.4629622E+00
      data (ref_adm(26,iz, 1, 7),iz = 1,20) / &
     & 0.3064500E+00, 0.3064500E+00, 0.4644700E+00, 0.3382900E+00, &
     & 0.3627900E+00, 0.3843600E+00, 0.3523300E+00, 0.3999100E+00, &
     & 0.4807000E+00, 0.4258500E+00, 0.5272100E+00, 0.6079200E+00, &
     & 0.5383900E+00, 0.5457700E+00, 0.5114400E+00, 0.5974400E+00, &
     & 0.5968400E+00, 0.4803300E+00, 0.4800223E+00, 0.4800223E+00 /
      data (ref_adm(26,iz, 2, 7),iz = 1,20) / &
     & 0.3064500E+00, 0.3064500E+00, 0.4644700E+00, 0.3382900E+00, &
     & 0.3627900E+00, 0.3843600E+00, 0.3523300E+00, 0.3999100E+00, &
     & 0.4807000E+00, 0.4258500E+00, 0.5272100E+00, 0.6079200E+00, &
     & 0.5383900E+00, 0.5457700E+00, 0.5114400E+00, 0.5974400E+00, &
     & 0.5968400E+00, 0.4803300E+00, 0.4800223E+00, 0.4800223E+00 /
      data (ref_adm(26,iz, 3, 7),iz = 1,20) / &
     & 0.3262700E+00, 0.3262700E+00, 0.5919100E+00, 0.3718000E+00, &
     & 0.3216300E+00, 0.3417900E+00, 0.4057400E+00, 0.4324000E+00, &
     & 0.4172600E+00, 0.4442000E+00, 0.3897800E+00, 0.5866500E+00, &
     & 0.5628100E+00, 0.4653400E+00, 0.6142500E+00, 0.6677200E+00, &
     & 0.6246600E+00, 0.5465600E+00, 0.1600509E+00, 0.1600509E+00 /
      data (ref_adm(26,iz, 4, 7),iz = 1,20) / &
     & 0.4723400E+00, 0.4723400E+00, 0.5874800E+00, 0.4416600E+00, &
     & 0.4136900E+00, 0.4358300E+00, 0.4051900E+00, 0.4646300E+00, &
     & 0.4512100E+00, 0.4860000E+00, 0.4350400E+00, 0.4507600E+00, &
     & 0.4849000E+00, 0.4219100E+00, 0.6109700E+00, 0.6008500E+00, &
     & 0.5302300E+00, 0.4792400E+00, 0.4797400E+00, 0.4797400E+00 /
      data (ref_adm(26,iz, 5, 7),iz = 1,20) / &
     & 0.4748400E+00, 0.4748400E+00, 0.5216400E+00, 0.4376800E+00, &
     & 0.4307000E+00, 0.4575600E+00, 0.4376100E+00, 0.4120900E+00, &
     & 0.3900200E+00, 0.4541700E+00, 0.4388400E+00, 0.4618700E+00, &
     & 0.5043300E+00, 0.5395900E+00, 0.5607600E+00, 0.5585200E+00, &
     & 0.5380700E+00, 0.5573795E+00, 0.5054800E+00, 0.5054800E+00 /
      data (ref_adm(26,iz, 6, 7),iz = 1,20) / &
     & 0.4823600E+00, 0.4823600E+00, 0.4644700E+00, 0.3986700E+00, &
     & 0.4210600E+00, 0.4501900E+00, 0.4585600E+00, 0.4470900E+00, &
     & 0.5044300E+00, 0.4941400E+00, 0.4507600E+00, 0.4484800E+00, &
     & 0.5217000E+00, 0.5214400E+00, 0.5787800E+00, 0.5256000E+00, &
     & 0.4930000E+00, 0.4675600E+00, 0.4627143E+00, 0.4627143E+00 /
      data (ref_adm(26,iz, 7, 7),iz = 1,20) / &
     & 0.4172100E+00, 0.4172100E+00, 0.4483400E+00, 0.4273000E+00, &
     & 0.4917700E+00, 0.4824000E+00, 0.5002800E+00, 0.5514300E+00, &
     & 0.6035300E+00, 0.4115400E+00, 0.4513100E+00, 0.4469100E+00, &
     & 0.4758000E+00, 0.4587700E+00, 0.4833100E+00, 0.5099500E+00, &
     & 0.5748996E+00, 0.5466979E+00, 0.4559643E+00, 0.4559643E+00 /
      data (ref_adm(26,iz, 8, 7),iz = 1,20) / &
     & 0.4655500E+00, 0.4655500E+00, 0.4592900E+00, 0.4546200E+00, &
     & 0.4730200E+00, 0.4448700E+00, 0.5144100E+00, 0.4068700E+00, &
     & 0.5175000E+00, 0.5802700E+00, 0.4372700E+00, 0.4214300E+00, &
     & 0.4728300E+00, 0.4883600E+00, 0.5068700E+00, 0.5398500E+00, &
     & 0.5711395E+00, 0.5410854E+00, 0.4495396E+00, 0.4495396E+00 /
      data (ref_adm(26,iz, 9, 7),iz = 1,20) / &
     & 0.5088400E+00, 0.5088400E+00, 0.4921300E+00, 0.4808600E+00, &
     & 0.5119400E+00, 0.4595600E+00, 0.4532900E+00, 0.4423300E+00, &
     & 0.4290100E+00, 0.4707100E+00, 0.4391200E+00, 0.4404600E+00, &
     & 0.4173300E+00, 0.4528100E+00, 0.4826200E+00, 0.4449800E+00, &
     & 0.4495900E+00, 0.5355829E+00, 0.4432287E+00, 0.4432287E+00 /
      data (ref_adm(26,iz,10, 7),iz = 1,20) / &
     & 0.4411600E+00, 0.4411600E+00, 0.4241600E+00, 0.4456700E+00, &
     & 0.4504200E+00, 0.3990300E+00, 0.3929800E+00, 0.3922300E+00, &
     & 0.4214100E+00, 0.6245400E+00, 0.6020100E+00, 0.4461800E+00, &
     & 0.4488700E+00, 0.4562500E+00, 0.4675800E+00, 0.5233800E+00, &
     & 0.5595912E+00, 0.5307150E+00, 0.4371896E+00, 0.4371896E+00 /
      data (ref_adm(26,iz,11, 7),iz = 1,20) / &
     & 0.4656000E+00, 0.4656000E+00, 0.4747000E+00, 0.4381600E+00, &
     & 0.4878300E+00, 0.4486000E+00, 0.4596200E+00, 0.4664500E+00, &
     & 0.4189200E+00, 0.4310200E+00, 0.5318300E+00, 0.4527400E+00, &
     & 0.4553000E+00, 0.4450000E+00, 0.4452000E+00, 0.5462100E+00, &
     & 0.5513648E+00, 0.5246516E+00, 0.4315264E+00, 0.4315264E+00 /
      data (ref_adm(26,iz,12, 7),iz = 1,20) / &
     & 0.4835900E+00, 0.4835900E+00, 0.4632100E+00, 0.4508800E+00, &
     & 0.4396500E+00, 0.4734300E+00, 0.4534400E+00, 0.4600800E+00, &
     & 0.4525900E+00, 0.4545700E+00, 0.4589700E+00, 0.4895400E+00, &
     & 0.5420100E+00, 0.4457700E+00, 0.5341288E+00, 0.6135500E+00, &
     & 0.5976300E+00, 0.5181459E+00, 0.4261784E+00, 0.4261784E+00 /
      data (ref_adm(26,iz,13, 7),iz = 1,20) / &
     & 0.4377500E+00, 0.4377500E+00, 0.4738100E+00, 0.4280800E+00, &
     & 0.4164300E+00, 0.4605400E+00, 0.4242600E+00, 0.4452100E+00, &
     & 0.4884700E+00, 0.4935100E+00, 0.4797000E+00, 0.4960900E+00, &
     & 0.4846100E+00, 0.4912600E+00, 0.4453100E+00, 0.5352299E+00, &
     & 0.5326979E+00, 0.5089765E+00, 0.4205306E+00, 0.4205306E+00 /
      data (ref_adm(26,iz,14, 7),iz = 1,20) / &
     & 0.4592300E+00, 0.4592300E+00, 0.4214000E+00, 0.4857700E+00, &
     & 0.3366800E+00, 0.3774200E+00, 0.3639500E+00, 0.4948000E+00, &
     & 0.4022300E+00, 0.5064500E+00, 0.4541000E+00, 0.4682500E+00, &
     & 0.4928500E+00, 0.4559300E+00, 0.4832000E+00, 0.4401200E+00, &
     & 0.5232593E+00, 0.4989127E+00, 0.4134846E+00, 0.4134846E+00 /
      data (ref_adm(26,iz,15, 7),iz = 1,20) / &
     & 0.4520200E+00, 0.4520200E+00, 0.4088700E+00, 0.4413800E+00, &
     & 0.3936000E+00, 0.3461300E+00, 0.4238773E+00, 0.4293779E+00, &
     & 0.4176100E+00, 0.4091900E+00, 0.4514000E+00, 0.5039400E+00, &
     & 0.4361200E+00, 0.4429100E+00, 0.4232000E+00, 0.5171207E+00, &
     & 0.5131934E+00, 0.4895856E+00, 0.4054669E+00, 0.4054669E+00 /
      data (ref_adm(26,iz,16, 7),iz = 1,20) / &
     & 0.4469100E+00, 0.4469100E+00, 0.4120800E+00, 0.3675200E+00, &
     & 0.4029700E+00, 0.4690700E+00, 0.4240294E+00, 0.5064200E+00, &
     & 0.4273600E+00, 0.4872900E+00, 0.5548700E+00, 0.5314200E+00, &
     & 0.5113300E+00, 0.4854800E+00, 0.4450300E+00, 0.5090233E+00, &
     & 0.4556700E+00, 0.4795995E+00, 0.3982678E+00, 0.3982678E+00 /
      data (ref_adm(26,iz,17, 7),iz = 1,20) / &
     & 0.3594100E+00, 0.3594100E+00, 0.3327200E+00, 0.3758600E+00, &
     & 0.5078700E+00, 0.4959200E+00, 0.3306300E+00, 0.5401700E+00, &
     & 0.5495100E+00, 0.5137700E+00, 0.5409400E+00, 0.4705300E+00, &
     & 0.4957300E+00, 0.4249200E+00, 0.4622900E+00, 0.5114500E+00, &
     & 0.4943916E+00, 0.4695958E+00, 0.3914470E+00, 0.3914470E+00 /
      data (ref_adm(26,iz,18, 7),iz = 1,20) / &
     & 0.3489300E+00, 0.3489300E+00, 0.3681700E+00, 0.4202300E+00, &
     & 0.5413200E+00, 0.6174300E+00, 0.4394800E+00, 0.4548947E+00, &
     & 0.4315000E+00, 0.4361700E+00, 0.4765100E+00, 0.4306600E+00, &
     & 0.4846900E+00, 0.3915600E+00, 0.4107500E+00, 0.4483357E+00, &
     & 0.4332991E+00, 0.4015787E+00, 0.3276420E+00, 0.3276420E+00 /
      data (ref_adm(26,iz,19, 7),iz = 1,20) / &
     & 0.4333900E+00, 0.4333900E+00, 0.4385400E+00, 0.6017300E+00, &
     & 0.5384500E+00, 0.6245700E+00, 0.4749100E+00, 0.5205600E+00, &
     & 0.3613800E+00, 0.4051100E+00, 0.5114700E+00, 0.4010000E+00, &
     & 0.3639300E+00, 0.4132800E+00, 0.4317700E+00, 0.3792100E+00, &
     & 0.4133900E+00, 0.3995102E+00, 0.3265418E+00, 0.3265418E+00 /
      data (ref_adm(26,iz,20, 7),iz = 1,20) / &
     & 0.5176800E+00, 0.5176800E+00, 0.4303600E+00, 0.4309200E+00, &
     & 0.6531000E+00, 0.4660200E+00, 0.4767100E+00, 0.4893400E+00, &
     & 0.3399300E+00, 0.5379900E+00, 0.4540100E+00, 0.4192400E+00, &
     & 0.4560432E+00, 0.4347900E+00, 0.3976000E+00, 0.4167700E+00, &
     & 0.4289089E+00, 0.3974179E+00, 0.3255571E+00, 0.3255571E+00 /
      data (ref_adm(26,iz,21, 7),iz = 1,20) / &
     & 0.3925700E+00, 0.3925700E+00, 0.3519300E+00, 0.3836100E+00, &
     & 0.4536100E+00, 0.3610600E+00, 0.4117900E+00, 0.4697900E+00, &
     & 0.4091900E+00, 0.4830900E+00, 0.5385300E+00, 0.5105900E+00, &
     & 0.4425100E+00, 0.3904200E+00, 0.3101200E+00, 0.3658800E+00, &
     & 0.4267912E+00, 0.3953327E+00, 0.3245293E+00, 0.3245293E+00 /
      data (ref_adm(26,iz,22, 7),iz = 1,20) / &
     & 0.4158900E+00, 0.4158900E+00, 0.3302800E+00, 0.3777100E+00, &
     & 0.3988600E+00, 0.4172900E+00, 0.5039900E+00, 0.5221100E+00, &
     & 0.5443300E+00, 0.4361400E+00, 0.5038600E+00, 0.5214500E+00, &
     & 0.4880800E+00, 0.5041400E+00, 0.3839500E+00, 0.4210300E+00, &
     & 0.4390036E+00, 0.4165483E+00, 0.3578289E+00, 0.3578289E+00 /
      data (ref_adm(26,iz,23, 7),iz = 1,20) / &
     & 0.4817200E+00, 0.4817200E+00, 0.4708200E+00, 0.4506600E+00, &
     & 0.4037500E+00, 0.4646600E+00, 0.5110900E+00, 0.4906400E+00, &
     & 0.5474000E+00, 0.4012000E+00, 0.4707200E+00, 0.5197100E+00, &
     & 0.4344200E+00, 0.4712200E+00, 0.4957000E+00, 0.4576700E+00, &
     & 0.5679800E+00, 0.4111398E+00, 0.3565374E+00, 0.3565374E+00 /
      data (ref_adm(26,iz,24, 7),iz = 1,20) / &
     & 0.4459100E+00, 0.4459100E+00, 0.3930400E+00, 0.3991400E+00, &
     & 0.4556000E+00, 0.4163200E+00, 0.4691300E+00, 0.4719000E+00, &
     & 0.4709800E+00, 0.4092000E+00, 0.3584400E+00, 0.3982500E+00, &
     & 0.5003900E+00, 0.4725600E+00, 0.5239400E+00, 0.5273200E+00, &
     & 0.5410500E+00, 0.4070744E+00, 0.3557832E+00, 0.3557832E+00 /
      data (ref_adm(26,iz,25, 7),iz = 1,20) / &
     & 0.3921800E+00, 0.3921800E+00, 0.5163000E+00, 0.3710500E+00, &
     & 0.3882300E+00, 0.4099500E+00, 0.3944700E+00, 0.4350000E+00, &
     & 0.4825900E+00, 0.4958300E+00, 0.4501100E+00, 0.4701700E+00, &
     & 0.4720800E+00, 0.4993500E+00, 0.4944500E+00, 0.5965700E+00, &
     & 0.4516200E+00, 0.4150400E+00, 0.3557369E+00, 0.3557369E+00 /
      data (ref_adm(26,iz,26, 7),iz = 1,20) / &
     & 0.4564800E+00, 0.4564800E+00, 0.4137800E+00, 0.4759800E+00, &
     & 0.4605521E+00, 0.4243400E+00, 0.4301300E+00, 0.4805700E+00, &
     & 0.5848300E+00, 0.6166500E+00, 0.4605603E+00, 0.4403500E+00, &
     & 0.4431800E+00, 0.4524400E+00, 0.4941400E+00, 0.5231700E+00, &
     & 0.4364000E+00, 0.3759500E+00, 0.3565615E+00, 0.3565615E+00 /
      data (ref_adm(26,iz,27, 7),iz = 1,20) / &
     & 0.3056300E+00, 0.3056300E+00, 0.4244800E+00, 0.4462100E+00, &
     & 0.4198000E+00, 0.3179800E+00, 0.4126500E+00, 0.5041400E+00, &
     & 0.4996500E+00, 0.5015100E+00, 0.4881500E+00, 0.4575600E+00, &
     & 0.4465600E+00, 0.5072100E+00, 0.4668500E+00, 0.4883100E+00, &
     & 0.4625800E+00, 0.4433700E+00, 0.3852200E+00, 0.3852200E+00 /
      data (ref_adm(26,iz,28, 7),iz = 1,20) / &
     & 0.4347300E+00, 0.4347300E+00, 0.4562400E+00, 0.4754100E+00, &
     & 0.4546600E+00, 0.4693000E+00, 0.5756900E+00, 0.4757900E+00, &
     & 0.4409400E+00, 0.4280800E+00, 0.5627000E+00, 0.4891200E+00, &
     & 0.4922500E+00, 0.4500600E+00, 0.5056900E+00, 0.4833600E+00, &
     & 0.4216605E+00, 0.3986855E+00, 0.3596841E+00, 0.3596841E+00 /
      data (ref_adm(26,iz,29, 7),iz = 1,20) / &
     & 0.4789600E+00, 0.4789600E+00, 0.4741800E+00, 0.4582100E+00, &
     & 0.4182700E+00, 0.4447000E+00, 0.4691000E+00, 0.4629000E+00, &
     & 0.4620600E+00, 0.4917800E+00, 0.4760400E+00, 0.5046900E+00, &
     & 0.5297700E+00, 0.4525300E+00, 0.4896300E+00, 0.2800400E+00, &
     & 0.2870600E+00, 0.3806000E+00, 0.3625208E+00, 0.3625208E+00 /
      data (ref_adm(26,iz,30, 7),iz = 1,20) / &
     & 0.4601800E+00, 0.4601800E+00, 0.4046400E+00, 0.4666200E+00, &
     & 0.4298700E+00, 0.4437100E+00, 0.4439200E+00, 0.4663000E+00, &
     & 0.4726300E+00, 0.4658000E+00, 0.4620500E+00, 0.4775200E+00, &
     & 0.4408800E+00, 0.4495200E+00, 0.4554400E+00, 0.4576300E+00, &
     & 0.4225118E+00, 0.4007008E+00, 0.3658341E+00, 0.3658341E+00 /
      data (ref_adm(26,iz,31, 7),iz = 1,20) / &
     & 0.4520300E+00, 0.4520300E+00, 0.3727200E+00, 0.3293000E+00, &
     & 0.4196300E+00, 0.4758700E+00, 0.3598600E+00, 0.5098200E+00, &
     & 0.4359100E+00, 0.4937500E+00, 0.4660200E+00, 0.4574200E+00, &
     & 0.4752200E+00, 0.4484500E+00, 0.4818900E+00, 0.4499800E+00, &
     & 0.4433800E+00, 0.4019186E+00, 0.3693834E+00, 0.3693834E+00 /
      data (ref_adm(26,iz,32, 7),iz = 1,20) / &
     & 0.4394500E+00, 0.4394500E+00, 0.3180000E+00, 0.5060400E+00, &
     & 0.4298100E+00, 0.4947300E+00, 0.4826000E+00, 0.4254600E+00, &
     & 0.4489900E+00, 0.4686300E+00, 0.4365100E+00, 0.4993600E+00, &
     & 0.4372500E+00, 0.4375200E+00, 0.4471000E+00, 0.4816300E+00, &
     & 0.4263665E+00, 0.4035382E+00, 0.3726236E+00, 0.3726236E+00 /
      data (ref_adm(26,iz,33, 7),iz = 1,20) / &
     & 0.4223400E+00, 0.4223400E+00, 0.5034100E+00, 0.5256000E+00, &
     & 0.4858300E+00, 0.4860200E+00, 0.3894300E+00, 0.4402600E+00, &
     & 0.4023000E+00, 0.4169600E+00, 0.4435700E+00, 0.4128700E+00, &
     & 0.4064800E+00, 0.4264600E+00, 0.4265100E+00, 0.4448692E+00, &
     & 0.4282209E+00, 0.4056880E+00, 0.3754443E+00, 0.3754443E+00 /
      data (ref_adm(26,iz,34, 7),iz = 1,20) / &
     & 0.4610400E+00, 0.4610400E+00, 0.5240400E+00, 0.4640100E+00, &
     & 0.4619900E+00, 0.4115400E+00, 0.4563842E+00, 0.3857500E+00, &
     & 0.3990800E+00, 0.3922000E+00, 0.4914900E+00, 0.4982300E+00, &
     & 0.4566200E+00, 0.4519000E+00, 0.4852800E+00, 0.4472074E+00, &
     & 0.4304514E+00, 0.4077412E+00, 0.3779189E+00, 0.3779189E+00 /
      data (ref_adm(26,iz,35, 7),iz = 1,20) / &
     & 0.5180200E+00, 0.5180200E+00, 0.5304800E+00, 0.5394400E+00, &
     & 0.4263200E+00, 0.4550800E+00, 0.3855000E+00, 0.3421300E+00, &
     & 0.4284800E+00, 0.4691100E+00, 0.5023000E+00, 0.4687800E+00, &
     & 0.4567200E+00, 0.4214300E+00, 0.4875100E+00, 0.4489869E+00, &
     & 0.4325027E+00, 0.4094138E+00, 0.3800572E+00, 0.3800572E+00 /
      data (ref_adm(26,iz,36, 7),iz = 1,20) / &
     & 0.4488900E+00, 0.4488900E+00, 0.5574700E+00, 0.5373500E+00, &
     & 0.5015000E+00, 0.4346400E+00, 0.4709200E+00, 0.4755500E+00, &
     & 0.3748800E+00, 0.4978400E+00, 0.4611501E+00, 0.5008800E+00, &
     & 0.4553800E+00, 0.4751000E+00, 0.4637635E+00, 0.4504975E+00, &
     & 0.4339640E+00, 0.4105407E+00, 0.3815568E+00, 0.3815568E+00 /
      data (ref_adm(26,iz,37, 7),iz = 1,20) / &
     & 0.4552100E+00, 0.4552100E+00, 0.3806900E+00, 0.4638629E+00, &
     & 0.4541800E+00, 0.4600800E+00, 0.4700300E+00, 0.4399200E+00, &
     & 0.5608000E+00, 0.4504300E+00, 0.4824200E+00, 0.4983000E+00, &
     & 0.4762900E+00, 0.5067500E+00, 0.4640388E+00, 0.4511329E+00, &
     & 0.4350259E+00, 0.4111027E+00, 0.3824235E+00, 0.3824235E+00 /
      data (ref_adm(26,iz,38, 7),iz = 1,20) / &
     & 0.4552100E+00, 0.4552100E+00, 0.3806900E+00, 0.4638629E+00, &
     & 0.4541800E+00, 0.4600800E+00, 0.4700300E+00, 0.4399200E+00, &
     & 0.5608000E+00, 0.4504300E+00, 0.4824200E+00, 0.4983000E+00, &
     & 0.4762900E+00, 0.5067500E+00, 0.4640388E+00, 0.4511329E+00, &
     & 0.4350259E+00, 0.4111027E+00, 0.3824235E+00, 0.3824235E+00 /
! Solar Zenith Angle 35.0 Albedo  0.4973955E+00
      data (ref_adm(26,iz, 1, 8),iz = 1,20) / &
     & 0.4372600E+00, 0.4372600E+00, 0.4001200E+00, 0.4235200E+00, &
     & 0.4234100E+00, 0.3825800E+00, 0.4457500E+00, 0.4644200E+00, &
     & 0.4647100E+00, 0.4867700E+00, 0.5195500E+00, 0.5449300E+00, &
     & 0.5537800E+00, 0.5755100E+00, 0.5953200E+00, 0.5931900E+00, &
     & 0.5651700E+00, 0.5389600E+00, 0.5286866E+00, 0.5286866E+00 /
      data (ref_adm(26,iz, 2, 8),iz = 1,20) / &
     & 0.4372600E+00, 0.4372600E+00, 0.4001200E+00, 0.4235200E+00, &
     & 0.4234100E+00, 0.3825800E+00, 0.4457500E+00, 0.4644200E+00, &
     & 0.4647100E+00, 0.4867700E+00, 0.5195500E+00, 0.5449300E+00, &
     & 0.5537800E+00, 0.5755100E+00, 0.5953200E+00, 0.5931900E+00, &
     & 0.5651700E+00, 0.5389600E+00, 0.5286866E+00, 0.5286866E+00 /
      data (ref_adm(26,iz, 3, 8),iz = 1,20) / &
     & 0.4486500E+00, 0.4486500E+00, 0.4481800E+00, 0.4328100E+00, &
     & 0.4270300E+00, 0.4098700E+00, 0.4146200E+00, 0.4304000E+00, &
     & 0.4448000E+00, 0.5037900E+00, 0.5294200E+00, 0.5381800E+00, &
     & 0.5526600E+00, 0.5132200E+00, 0.5729000E+00, 0.6025500E+00, &
     & 0.5766900E+00, 0.5477700E+00, 0.4841200E+00, 0.4841200E+00 /
      data (ref_adm(26,iz, 4, 8),iz = 1,20) / &
     & 0.4531200E+00, 0.4531200E+00, 0.4486800E+00, 0.4014800E+00, &
     & 0.4127600E+00, 0.4440900E+00, 0.4744700E+00, 0.4565100E+00, &
     & 0.4813200E+00, 0.5126000E+00, 0.5564900E+00, 0.5311700E+00, &
     & 0.5701400E+00, 0.5422300E+00, 0.5919000E+00, 0.5819200E+00, &
     & 0.5674800E+00, 0.5292800E+00, 0.5220098E+00, 0.5220098E+00 /
      data (ref_adm(26,iz, 5, 8),iz = 1,20) / &
     & 0.5261600E+00, 0.5261600E+00, 0.4652400E+00, 0.4772300E+00, &
     & 0.4677900E+00, 0.4148400E+00, 0.4510200E+00, 0.4327900E+00, &
     & 0.4585800E+00, 0.4703500E+00, 0.5171300E+00, 0.5539600E+00, &
     & 0.5714400E+00, 0.5764800E+00, 0.5958500E+00, 0.5502400E+00, &
     & 0.5780500E+00, 0.5595200E+00, 0.5161588E+00, 0.5161588E+00 /
      data (ref_adm(26,iz, 6, 8),iz = 1,20) / &
     & 0.5226000E+00, 0.5226000E+00, 0.4478700E+00, 0.4346400E+00, &
     & 0.4547000E+00, 0.4358100E+00, 0.4641700E+00, 0.4590000E+00, &
     & 0.4577700E+00, 0.4307900E+00, 0.4777700E+00, 0.5210100E+00, &
     & 0.5300500E+00, 0.5743200E+00, 0.5818200E+00, 0.6123400E+00, &
     & 0.6164900E+00, 0.6092200E+00, 0.5057167E+00, 0.5057167E+00 /
      data (ref_adm(26,iz, 7, 8),iz = 1,20) / &
     & 0.4555400E+00, 0.4555400E+00, 0.4025400E+00, 0.4553300E+00, &
     & 0.4007100E+00, 0.3831500E+00, 0.4094900E+00, 0.4616600E+00, &
     & 0.4074100E+00, 0.4183800E+00, 0.4519700E+00, 0.5168700E+00, &
     & 0.5279100E+00, 0.5443200E+00, 0.5689000E+00, 0.6232600E+00, &
     & 0.6229800E+00, 0.5627800E+00, 0.4916819E+00, 0.4916819E+00 /
      data (ref_adm(26,iz, 8, 8),iz = 1,20) / &
     & 0.4552700E+00, 0.4552700E+00, 0.4184800E+00, 0.3938100E+00, &
     & 0.4141700E+00, 0.4114600E+00, 0.4388300E+00, 0.4629500E+00, &
     & 0.4583000E+00, 0.4516600E+00, 0.4565000E+00, 0.4861500E+00, &
     & 0.5178200E+00, 0.5074500E+00, 0.5120000E+00, 0.5256400E+00, &
     & 0.5355200E+00, 0.6596100E+00, 0.4777445E+00, 0.4777445E+00 /
      data (ref_adm(26,iz, 9, 8),iz = 1,20) / &
     & 0.5037100E+00, 0.5037100E+00, 0.4586200E+00, 0.4377700E+00, &
     & 0.4626700E+00, 0.4940800E+00, 0.4849400E+00, 0.4983300E+00, &
     & 0.5052500E+00, 0.4759600E+00, 0.4927300E+00, 0.4664400E+00, &
     & 0.5237200E+00, 0.5163800E+00, 0.5131300E+00, 0.5052800E+00, &
     & 0.5543350E+00, 0.5357606E+00, 0.4656637E+00, 0.4656637E+00 /
      data (ref_adm(26,iz,10, 8),iz = 1,20) / &
     & 0.4267000E+00, 0.4267000E+00, 0.4678600E+00, 0.3764300E+00, &
     & 0.4034800E+00, 0.3568600E+00, 0.4195600E+00, 0.4647800E+00, &
     & 0.4651100E+00, 0.4622400E+00, 0.4797900E+00, 0.4901800E+00, &
     & 0.4832600E+00, 0.4654700E+00, 0.5444300E+00, 0.5626600E+00, &
     & 0.6359400E+00, 0.5256894E+00, 0.4550573E+00, 0.4550573E+00 /
      data (ref_adm(26,iz,11, 8),iz = 1,20) / &
     & 0.4909500E+00, 0.4909500E+00, 0.4674100E+00, 0.4495600E+00, &
     & 0.4419000E+00, 0.4625200E+00, 0.4842500E+00, 0.5205700E+00, &
     & 0.4657400E+00, 0.4039500E+00, 0.4288600E+00, 0.4823100E+00, &
     & 0.4906400E+00, 0.4966900E+00, 0.5650100E+00, 0.6328800E+00, &
     & 0.6302000E+00, 0.5165582E+00, 0.4457087E+00, 0.4457087E+00 /
      data (ref_adm(26,iz,12, 8),iz = 1,20) / &
     & 0.4663300E+00, 0.4663300E+00, 0.4398600E+00, 0.4361300E+00, &
     & 0.4576000E+00, 0.4619600E+00, 0.4807100E+00, 0.4878900E+00, &
     & 0.4916100E+00, 0.4901200E+00, 0.5127200E+00, 0.4600400E+00, &
     & 0.4808200E+00, 0.4849600E+00, 0.6343400E+00, 0.6431300E+00, &
     & 0.6285600E+00, 0.5082495E+00, 0.4374544E+00, 0.4374544E+00 /
      data (ref_adm(26,iz,13, 8),iz = 1,20) / &
     & 0.4475400E+00, 0.4475400E+00, 0.4465800E+00, 0.4500400E+00, &
     & 0.4675900E+00, 0.4969100E+00, 0.5003400E+00, 0.5055500E+00, &
     & 0.5167100E+00, 0.5148800E+00, 0.5115800E+00, 0.5181300E+00, &
     & 0.5105700E+00, 0.5043400E+00, 0.6534300E+00, 0.6311000E+00, &
     & 0.6117400E+00, 0.5779100E+00, 0.4299520E+00, 0.4299520E+00 /
      data (ref_adm(26,iz,14, 8),iz = 1,20) / &
     & 0.4663400E+00, 0.4663400E+00, 0.4357900E+00, 0.4442600E+00, &
     & 0.4629700E+00, 0.4670000E+00, 0.4589900E+00, 0.4540400E+00, &
     & 0.4553600E+00, 0.4488400E+00, 0.4812200E+00, 0.5163100E+00, &
     & 0.5116700E+00, 0.4881200E+00, 0.5075300E+00, 0.5817400E+00, &
     & 0.5045557E+00, 0.5676000E+00, 0.4225991E+00, 0.4225991E+00 /
      data (ref_adm(26,iz,15, 8),iz = 1,20) / &
     & 0.4705200E+00, 0.4705200E+00, 0.4991700E+00, 0.4588100E+00, &
     & 0.4791800E+00, 0.5021400E+00, 0.4714700E+00, 0.5148600E+00, &
     & 0.4614100E+00, 0.4335800E+00, 0.4657100E+00, 0.4819300E+00, &
     & 0.4943400E+00, 0.5007500E+00, 0.4989200E+00, 0.5767600E+00, &
     & 0.4943252E+00, 0.4800528E+00, 0.4146938E+00, 0.4146938E+00 /
      data (ref_adm(26,iz,16, 8),iz = 1,20) / &
     & 0.4873900E+00, 0.4873900E+00, 0.4057600E+00, 0.4490600E+00, &
     & 0.4626500E+00, 0.4665400E+00, 0.4852500E+00, 0.4935400E+00, &
     & 0.5032000E+00, 0.3904300E+00, 0.4364100E+00, 0.5071900E+00, &
     & 0.4967800E+00, 0.5134100E+00, 0.4904900E+00, 0.5139800E+00, &
     & 0.4113600E+00, 0.4560300E+00, 0.4063790E+00, 0.4063790E+00 /
      data (ref_adm(26,iz,17, 8),iz = 1,20) / &
     & 0.4449300E+00, 0.4449300E+00, 0.4459100E+00, 0.4302100E+00, &
     & 0.4785000E+00, 0.5187600E+00, 0.5026100E+00, 0.4978600E+00, &
     & 0.5008300E+00, 0.4128500E+00, 0.4612200E+00, 0.5086900E+00, &
     & 0.5601600E+00, 0.5141200E+00, 0.5261600E+00, 0.4797873E+00, &
     & 0.4752119E+00, 0.4611529E+00, 0.3992706E+00, 0.3992706E+00 /
      data (ref_adm(26,iz,18, 8),iz = 1,20) / &
     & 0.3978900E+00, 0.3978900E+00, 0.4449700E+00, 0.4305700E+00, &
     & 0.4551800E+00, 0.5058600E+00, 0.5379600E+00, 0.5025900E+00, &
     & 0.5213300E+00, 0.4274300E+00, 0.4539300E+00, 0.5166900E+00, &
     & 0.5204100E+00, 0.4891400E+00, 0.4772200E+00, 0.5022578E+00, &
     & 0.5018700E+00, 0.4549496E+00, 0.3896259E+00, 0.3896259E+00 /
      data (ref_adm(26,iz,19, 8),iz = 1,20) / &
     & 0.4465500E+00, 0.4465500E+00, 0.4647700E+00, 0.4194600E+00, &
     & 0.4842800E+00, 0.4570400E+00, 0.5073600E+00, 0.5601600E+00, &
     & 0.5521200E+00, 0.4847200E+00, 0.4486700E+00, 0.4758600E+00, &
     & 0.4669300E+00, 0.5442400E+00, 0.4430700E+00, 0.4511300E+00, &
     & 0.4446300E+00, 0.4464259E+00, 0.3847759E+00, 0.3847759E+00 /
      data (ref_adm(26,iz,20, 8),iz = 1,20) / &
     & 0.4361100E+00, 0.4361100E+00, 0.4833800E+00, 0.4490200E+00, &
     & 0.4388300E+00, 0.4839900E+00, 0.4810900E+00, 0.5523700E+00, &
     & 0.5403000E+00, 0.5262800E+00, 0.4693200E+00, 0.4613700E+00, &
     & 0.4572300E+00, 0.4473800E+00, 0.4864200E+00, 0.4609300E+00, &
     & 0.4413800E+00, 0.4401463E+00, 0.3821453E+00, 0.3821453E+00 /
      data (ref_adm(26,iz,21, 8),iz = 1,20) / &
     & 0.4570800E+00, 0.4570800E+00, 0.4603300E+00, 0.4231000E+00, &
     & 0.4570600E+00, 0.5220600E+00, 0.5127600E+00, 0.5083900E+00, &
     & 0.6156000E+00, 0.5720400E+00, 0.5209900E+00, 0.4714300E+00, &
     & 0.5006800E+00, 0.4803300E+00, 0.4850400E+00, 0.5535200E+00, &
     & 0.3823900E+00, 0.4353877E+00, 0.3810830E+00, 0.3810830E+00 /
      data (ref_adm(26,iz,22, 8),iz = 1,20) / &
     & 0.4462700E+00, 0.4462700E+00, 0.4484700E+00, 0.3835400E+00, &
     & 0.4213700E+00, 0.4658600E+00, 0.4745000E+00, 0.5429600E+00, &
     & 0.5339300E+00, 0.5866000E+00, 0.6176500E+00, 0.3872100E+00, &
     & 0.4807600E+00, 0.5176700E+00, 0.4964700E+00, 0.4615300E+00, &
     & 0.3795600E+00, 0.4257234E+00, 0.3651913E+00, 0.3651913E+00 /
      data (ref_adm(26,iz,23, 8),iz = 1,20) / &
     & 0.4415800E+00, 0.4415800E+00, 0.4210500E+00, 0.4099300E+00, &
     & 0.4265500E+00, 0.4827500E+00, 0.4829000E+00, 0.5265200E+00, &
     & 0.4983000E+00, 0.6211200E+00, 0.5830200E+00, 0.5129600E+00, &
     & 0.5052200E+00, 0.5215300E+00, 0.4767400E+00, 0.4359600E+00, &
     & 0.3881200E+00, 0.4230615E+00, 0.3649038E+00, 0.3649038E+00 /
      data (ref_adm(26,iz,24, 8),iz = 1,20) / &
     & 0.4280900E+00, 0.4280900E+00, 0.4083400E+00, 0.4112800E+00, &
     & 0.4002700E+00, 0.4090800E+00, 0.5085700E+00, 0.5134700E+00, &
     & 0.5582100E+00, 0.5673600E+00, 0.5572200E+00, 0.5658000E+00, &
     & 0.4964000E+00, 0.5229900E+00, 0.5298700E+00, 0.5130200E+00, &
     & 0.4069700E+00, 0.4215696E+00, 0.3652012E+00, 0.3652012E+00 /
      data (ref_adm(26,iz,25, 8),iz = 1,20) / &
     & 0.4537100E+00, 0.4537100E+00, 0.4334900E+00, 0.5307700E+00, &
     & 0.4385100E+00, 0.4183900E+00, 0.4547600E+00, 0.5764500E+00, &
     & 0.5650700E+00, 0.5268600E+00, 0.5165100E+00, 0.5694300E+00, &
     & 0.5896400E+00, 0.5442200E+00, 0.5297300E+00, 0.5061400E+00, &
     & 0.4760000E+00, 0.4205668E+00, 0.3661733E+00, 0.3661733E+00 /
      data (ref_adm(26,iz,26, 8),iz = 1,20) / &
     & 0.5101800E+00, 0.5101800E+00, 0.4904400E+00, 0.4408400E+00, &
     & 0.4296000E+00, 0.4111500E+00, 0.4102700E+00, 0.5390200E+00, &
     & 0.5230800E+00, 0.5241400E+00, 0.5270400E+00, 0.5395600E+00, &
     & 0.5724800E+00, 0.5893000E+00, 0.5152100E+00, 0.5064200E+00, &
     & 0.4671600E+00, 0.4408400E+00, 0.3679676E+00, 0.3679676E+00 /
      data (ref_adm(26,iz,27, 8),iz = 1,20) / &
     & 0.4670700E+00, 0.4670700E+00, 0.4387900E+00, 0.4174500E+00, &
     & 0.4172400E+00, 0.4193600E+00, 0.4632500E+00, 0.4969300E+00, &
     & 0.4750900E+00, 0.4712600E+00, 0.5082600E+00, 0.5298800E+00, &
     & 0.5294200E+00, 0.5615900E+00, 0.5173700E+00, 0.5321100E+00, &
     & 0.4756300E+00, 0.4369200E+00, 0.3699626E+00, 0.3699626E+00 /
      data (ref_adm(26,iz,28, 8),iz = 1,20) / &
     & 0.4422700E+00, 0.4422700E+00, 0.4514400E+00, 0.5089500E+00, &
     & 0.5214100E+00, 0.5069900E+00, 0.5199700E+00, 0.5327900E+00, &
     & 0.5420200E+00, 0.4532400E+00, 0.4982500E+00, 0.5007200E+00, &
     & 0.5213800E+00, 0.5466700E+00, 0.4987400E+00, 0.5090500E+00, &
     & 0.4916000E+00, 0.4715300E+00, 0.3729070E+00, 0.3729070E+00 /
      data (ref_adm(26,iz,29, 8),iz = 1,20) / &
     & 0.4406800E+00, 0.4406800E+00, 0.4554000E+00, 0.4610400E+00, &
     & 0.4554000E+00, 0.4440800E+00, 0.4303300E+00, 0.4493700E+00, &
     & 0.4583400E+00, 0.4442100E+00, 0.4587500E+00, 0.4906700E+00, &
     & 0.4927300E+00, 0.5190600E+00, 0.4412300E+00, 0.4685100E+00, &
     & 0.4511800E+00, 0.4121500E+00, 0.3555600E+00, 0.3555600E+00 /
      data (ref_adm(26,iz,30, 8),iz = 1,20) / &
     & 0.4454700E+00, 0.4454700E+00, 0.5115800E+00, 0.5288700E+00, &
     & 0.4986400E+00, 0.5107500E+00, 0.4527600E+00, 0.4655800E+00, &
     & 0.5010200E+00, 0.4619100E+00, 0.4584100E+00, 0.4817200E+00, &
     & 0.5140000E+00, 0.4996600E+00, 0.5163600E+00, 0.4533000E+00, &
     & 0.4555500E+00, 0.3596100E+00, 0.3803762E+00, 0.3803762E+00 /
      data (ref_adm(26,iz,31, 8),iz = 1,20) / &
     & 0.4668400E+00, 0.4668400E+00, 0.4804500E+00, 0.4926200E+00, &
     & 0.4745400E+00, 0.4871900E+00, 0.4461800E+00, 0.5126200E+00, &
     & 0.5719700E+00, 0.5437000E+00, 0.4967900E+00, 0.5488000E+00, &
     & 0.5337700E+00, 0.5297500E+00, 0.5506700E+00, 0.5672900E+00, &
     & 0.4327800E+00, 0.4257500E+00, 0.3844211E+00, 0.3844211E+00 /
      data (ref_adm(26,iz,32, 8),iz = 1,20) / &
     & 0.5060800E+00, 0.5060800E+00, 0.4905600E+00, 0.4620400E+00, &
     & 0.4751700E+00, 0.5062400E+00, 0.5873100E+00, 0.4869700E+00, &
     & 0.5162200E+00, 0.4716800E+00, 0.5445900E+00, 0.5451300E+00, &
     & 0.5617400E+00, 0.5520000E+00, 0.5582800E+00, 0.4580200E+00, &
     & 0.4293600E+00, 0.4331678E+00, 0.3881243E+00, 0.3881243E+00 /
      data (ref_adm(26,iz,33, 8),iz = 1,20) / &
     & 0.4615000E+00, 0.4615000E+00, 0.4869300E+00, 0.5272300E+00, &
     & 0.5226900E+00, 0.4933600E+00, 0.5368400E+00, 0.5289900E+00, &
     & 0.5531900E+00, 0.5539800E+00, 0.5399100E+00, 0.5601900E+00, &
     & 0.5530900E+00, 0.5278000E+00, 0.5471700E+00, 0.4789100E+00, &
     & 0.5016600E+00, 0.4361989E+00, 0.3913671E+00, 0.3913671E+00 /
      data (ref_adm(26,iz,34, 8),iz = 1,20) / &
     & 0.4841700E+00, 0.4841700E+00, 0.4286300E+00, 0.5467800E+00, &
     & 0.5544600E+00, 0.5741400E+00, 0.5155200E+00, 0.5084300E+00, &
     & 0.5570100E+00, 0.5172600E+00, 0.4973700E+00, 0.5786400E+00, &
     & 0.5483900E+00, 0.4769100E+00, 0.5114900E+00, 0.5071600E+00, &
     & 0.5643100E+00, 0.4389162E+00, 0.3941636E+00, 0.3941636E+00 /
      data (ref_adm(26,iz,35, 8),iz = 1,20) / &
     & 0.5123400E+00, 0.5123400E+00, 0.4836900E+00, 0.5002300E+00, &
     & 0.5820600E+00, 0.5507800E+00, 0.5008600E+00, 0.5246000E+00, &
     & 0.5891900E+00, 0.6012400E+00, 0.5349400E+00, 0.4902900E+00, &
     & 0.3949800E+00, 0.4667500E+00, 0.4805500E+00, 0.4898571E+00, &
     & 0.4701217E+00, 0.4411261E+00, 0.3965314E+00, 0.3965314E+00 /
      data (ref_adm(26,iz,36, 8),iz = 1,20) / &
     & 0.4544000E+00, 0.4544000E+00, 0.4377300E+00, 0.4661000E+00, &
     & 0.5054300E+00, 0.5050500E+00, 0.5217400E+00, 0.5660100E+00, &
     & 0.5777700E+00, 0.5635600E+00, 0.5571100E+00, 0.5714000E+00, &
     & 0.4108700E+00, 0.4672100E+00, 0.4842900E+00, 0.4918802E+00, &
     & 0.4719935E+00, 0.4426202E+00, 0.3981776E+00, 0.3981776E+00 /
      data (ref_adm(26,iz,37, 8),iz = 1,20) / &
     & 0.4318900E+00, 0.4318900E+00, 0.4134800E+00, 0.4292900E+00, &
     & 0.4367100E+00, 0.4841700E+00, 0.6029400E+00, 0.5354200E+00, &
     & 0.5573500E+00, 0.6212700E+00, 0.5505200E+00, 0.4807700E+00, &
     & 0.5136300E+00, 0.4812400E+00, 0.4703800E+00, 0.5040100E+00, &
     & 0.4732574E+00, 0.4434299E+00, 0.3991312E+00, 0.3991312E+00 /
      data (ref_adm(26,iz,38, 8),iz = 1,20) / &
     & 0.4318900E+00, 0.4318900E+00, 0.4134800E+00, 0.4292900E+00, &
     & 0.4367100E+00, 0.4841700E+00, 0.6029400E+00, 0.5354200E+00, &
     & 0.5573500E+00, 0.6212700E+00, 0.5505200E+00, 0.4807700E+00, &
     & 0.5136300E+00, 0.4812400E+00, 0.4703800E+00, 0.5040100E+00, &
     & 0.4732574E+00, 0.4434299E+00, 0.3991312E+00, 0.3991312E+00 /
! Solar Zenith Angle 40.0 Albedo  0.4895988E+00
      data (ref_adm(26,iz, 1, 9),iz = 1,20) / &
     & 0.4271400E+00, 0.4271400E+00, 0.3749500E+00, 0.4300500E+00, &
     & 0.4250800E+00, 0.4368300E+00, 0.4839000E+00, 0.5353900E+00, &
     & 0.5240400E+00, 0.5767200E+00, 0.6249200E+00, 0.6036600E+00, &
     & 0.6145600E+00, 0.6160900E+00, 0.6152300E+00, 0.6259100E+00, &
     & 0.5959600E+00, 0.5745300E+00, 0.5017674E+00, 0.5017674E+00 /
      data (ref_adm(26,iz, 2, 9),iz = 1,20) / &
     & 0.4271400E+00, 0.4271400E+00, 0.3749500E+00, 0.4300500E+00, &
     & 0.4250800E+00, 0.4368300E+00, 0.4839000E+00, 0.5353900E+00, &
     & 0.5240400E+00, 0.5767200E+00, 0.6249200E+00, 0.6036600E+00, &
     & 0.6145600E+00, 0.6160900E+00, 0.6152300E+00, 0.6259100E+00, &
     & 0.5959600E+00, 0.5745300E+00, 0.5017674E+00, 0.5017674E+00 /
      data (ref_adm(26,iz, 3, 9),iz = 1,20) / &
     & 0.3427100E+00, 0.3427100E+00, 0.4718100E+00, 0.4797300E+00, &
     & 0.3948000E+00, 0.4534700E+00, 0.4887000E+00, 0.4871300E+00, &
     & 0.5506100E+00, 0.5563200E+00, 0.5454500E+00, 0.5655200E+00, &
     & 0.5752500E+00, 0.6040500E+00, 0.5993700E+00, 0.6243900E+00, &
     & 0.6194200E+00, 0.5595600E+00, 0.1961836E+00, 0.1961836E+00 /
      data (ref_adm(26,iz, 4, 9),iz = 1,20) / &
     & 0.4104800E+00, 0.4104800E+00, 0.4563100E+00, 0.4551300E+00, &
     & 0.4162500E+00, 0.4621200E+00, 0.4511400E+00, 0.4800900E+00, &
     & 0.5400500E+00, 0.5708100E+00, 0.5591500E+00, 0.5123300E+00, &
     & 0.6008200E+00, 0.5841200E+00, 0.5932400E+00, 0.5836500E+00, &
     & 0.6491600E+00, 0.6472900E+00, 0.4932452E+00, 0.4932452E+00 /
      data (ref_adm(26,iz, 5, 9),iz = 1,20) / &
     & 0.4384800E+00, 0.4384800E+00, 0.4497200E+00, 0.4656900E+00, &
     & 0.5272800E+00, 0.4635300E+00, 0.3951600E+00, 0.4742700E+00, &
     & 0.5278300E+00, 0.5492300E+00, 0.5229400E+00, 0.4945900E+00, &
     & 0.5647300E+00, 0.5742600E+00, 0.5952200E+00, 0.6163200E+00, &
     & 0.6625200E+00, 0.6111800E+00, 0.4854837E+00, 0.4854837E+00 /
      data (ref_adm(26,iz, 6, 9),iz = 1,20) / &
     & 0.4667800E+00, 0.4667800E+00, 0.4613700E+00, 0.4358900E+00, &
     & 0.4376400E+00, 0.4994100E+00, 0.4388100E+00, 0.4190300E+00, &
     & 0.5162000E+00, 0.5394100E+00, 0.5020200E+00, 0.5025400E+00, &
     & 0.5806500E+00, 0.5522100E+00, 0.5865300E+00, 0.6355500E+00, &
     & 0.6287400E+00, 0.7175800E+00, 0.4762693E+00, 0.4762693E+00 /
      data (ref_adm(26,iz, 7, 9),iz = 1,20) / &
     & 0.4545800E+00, 0.4545800E+00, 0.4613600E+00, 0.4638500E+00, &
     & 0.4717900E+00, 0.4437900E+00, 0.4825600E+00, 0.5167700E+00, &
     & 0.5286700E+00, 0.5300600E+00, 0.5335600E+00, 0.5587500E+00, &
     & 0.5581600E+00, 0.5768700E+00, 0.6032100E+00, 0.6478600E+00, &
     & 0.6530300E+00, 0.5867900E+00, 0.4669679E+00, 0.4669679E+00 /
      data (ref_adm(26,iz, 8, 9),iz = 1,20) / &
     & 0.4819700E+00, 0.4819700E+00, 0.4751900E+00, 0.4574800E+00, &
     & 0.4124300E+00, 0.4040900E+00, 0.4539600E+00, 0.4563100E+00, &
     & 0.4850300E+00, 0.4648400E+00, 0.4868300E+00, 0.5326200E+00, &
     & 0.5330700E+00, 0.5549000E+00, 0.5691700E+00, 0.5618300E+00, &
     & 0.6450800E+00, 0.5502834E+00, 0.4178400E+00, 0.4178400E+00 /
      data (ref_adm(26,iz, 9, 9),iz = 1,20) / &
     & 0.4267900E+00, 0.4267900E+00, 0.3888800E+00, 0.3868300E+00, &
     & 0.4059400E+00, 0.3966800E+00, 0.4482700E+00, 0.4447800E+00, &
     & 0.4788200E+00, 0.4414100E+00, 0.4585700E+00, 0.5197200E+00, &
     & 0.5268700E+00, 0.5227800E+00, 0.5385800E+00, 0.5616300E+00, &
     & 0.5419300E+00, 0.5416241E+00, 0.4497947E+00, 0.4497947E+00 /
      data (ref_adm(26,iz,10, 9),iz = 1,20) / &
     & 0.4278300E+00, 0.4278300E+00, 0.4344000E+00, 0.4531300E+00, &
     & 0.4796300E+00, 0.4497000E+00, 0.4930400E+00, 0.4846900E+00, &
     & 0.4398500E+00, 0.4337800E+00, 0.4713600E+00, 0.4535700E+00, &
     & 0.4712100E+00, 0.5140000E+00, 0.5027900E+00, 0.4778200E+00, &
     & 0.5793200E+00, 0.5030200E+00, 0.4497800E+00, 0.4497800E+00 /
      data (ref_adm(26,iz,11, 9),iz = 1,20) / &
     & 0.4786500E+00, 0.4786500E+00, 0.4837700E+00, 0.4751100E+00, &
     & 0.4651100E+00, 0.4992800E+00, 0.4851600E+00, 0.4645400E+00, &
     & 0.4329400E+00, 0.4407100E+00, 0.4707400E+00, 0.4965200E+00, &
     & 0.4363600E+00, 0.5230400E+00, 0.4909900E+00, 0.4834200E+00, &
     & 0.5533600E+00, 0.4864900E+00, 0.4460300E+00, 0.4460300E+00 /
      data (ref_adm(26,iz,12, 9),iz = 1,20) / &
     & 0.4208400E+00, 0.4208400E+00, 0.4462600E+00, 0.4527900E+00, &
     & 0.4600000E+00, 0.4726200E+00, 0.4977000E+00, 0.5320100E+00, &
     & 0.5220800E+00, 0.4847700E+00, 0.5110500E+00, 0.4464800E+00, &
     & 0.4790600E+00, 0.5178100E+00, 0.5248100E+00, 0.5123200E+00, &
     & 0.5608400E+00, 0.5101500E+00, 0.3637500E+00, 0.3637500E+00 /
      data (ref_adm(26,iz,13, 9),iz = 1,20) / &
     & 0.4503300E+00, 0.4503300E+00, 0.4351800E+00, 0.4498100E+00, &
     & 0.4632400E+00, 0.4567200E+00, 0.4884300E+00, 0.5020800E+00, &
     & 0.5129600E+00, 0.5293600E+00, 0.5260300E+00, 0.5098400E+00, &
     & 0.5147800E+00, 0.5247200E+00, 0.5976700E+00, 0.6527200E+00, &
     & 0.6406200E+00, 0.5078064E+00, 0.4228812E+00, 0.4228812E+00 /
      data (ref_adm(26,iz,14, 9),iz = 1,20) / &
     & 0.4271900E+00, 0.4271900E+00, 0.4180100E+00, 0.4437800E+00, &
     & 0.4618500E+00, 0.4460200E+00, 0.4354900E+00, 0.4418500E+00, &
     & 0.4500000E+00, 0.4624500E+00, 0.4611600E+00, 0.4648500E+00, &
     & 0.4814400E+00, 0.5122600E+00, 0.5792900E+00, 0.5810800E+00, &
     & 0.5701400E+00, 0.5402700E+00, 0.4159192E+00, 0.4159192E+00 /
      data (ref_adm(26,iz,15, 9),iz = 1,20) / &
     & 0.4315800E+00, 0.4315800E+00, 0.4460800E+00, 0.4617800E+00, &
     & 0.4352700E+00, 0.4387600E+00, 0.4466000E+00, 0.4562800E+00, &
     & 0.4424400E+00, 0.4630600E+00, 0.4595000E+00, 0.4934900E+00, &
     & 0.4507700E+00, 0.4547400E+00, 0.6365500E+00, 0.5681400E+00, &
     & 0.5619700E+00, 0.4839700E+00, 0.4078528E+00, 0.4078528E+00 /
      data (ref_adm(26,iz,16, 9),iz = 1,20) / &
     & 0.4258300E+00, 0.4258300E+00, 0.3979800E+00, 0.3683000E+00, &
     & 0.3919800E+00, 0.4495900E+00, 0.4978500E+00, 0.5050600E+00, &
     & 0.5458500E+00, 0.4987300E+00, 0.4381500E+00, 0.4374000E+00, &
     & 0.4625600E+00, 0.4723400E+00, 0.5360100E+00, 0.4398700E+00, &
     & 0.4750400E+00, 0.4631500E+00, 0.4000916E+00, 0.4000916E+00 /
      data (ref_adm(26,iz,17, 9),iz = 1,20) / &
     & 0.4130800E+00, 0.4130800E+00, 0.3856300E+00, 0.4077200E+00, &
     & 0.4276600E+00, 0.4326600E+00, 0.5272600E+00, 0.5118400E+00, &
     & 0.5094700E+00, 0.4965600E+00, 0.4639900E+00, 0.4421000E+00, &
     & 0.4703500E+00, 0.4753100E+00, 0.5468200E+00, 0.5754500E+00, &
     & 0.4490300E+00, 0.4650512E+00, 0.3929964E+00, 0.3929964E+00 /
      data (ref_adm(26,iz,18, 9),iz = 1,20) / &
     & 0.4019200E+00, 0.4019200E+00, 0.4256000E+00, 0.4336100E+00, &
     & 0.4289300E+00, 0.4608800E+00, 0.5644200E+00, 0.5457200E+00, &
     & 0.4862800E+00, 0.5266300E+00, 0.4756100E+00, 0.4563900E+00, &
     & 0.4715500E+00, 0.4612100E+00, 0.5297600E+00, 0.4604700E+00, &
     & 0.4378300E+00, 0.4541200E+00, 0.3827791E+00, 0.3827791E+00 /
      data (ref_adm(26,iz,19, 9),iz = 1,20) / &
     & 0.3983800E+00, 0.3983800E+00, 0.4180900E+00, 0.4068400E+00, &
     & 0.4441400E+00, 0.4966100E+00, 0.4698100E+00, 0.5243600E+00, &
     & 0.5131200E+00, 0.4901700E+00, 0.4952400E+00, 0.4743200E+00, &
     & 0.4927200E+00, 0.4585100E+00, 0.5037400E+00, 0.4870200E+00, &
     & 0.3956900E+00, 0.3901500E+00, 0.3779640E+00, 0.3779640E+00 /
      data (ref_adm(26,iz,20, 9),iz = 1,20) / &
     & 0.3858100E+00, 0.3858100E+00, 0.3768400E+00, 0.3990200E+00, &
     & 0.4279600E+00, 0.4844600E+00, 0.4422000E+00, 0.4873000E+00, &
     & 0.5007100E+00, 0.4628700E+00, 0.4793900E+00, 0.4374900E+00, &
     & 0.4609200E+00, 0.4514000E+00, 0.4752300E+00, 0.4806100E+00, &
     & 0.4608324E+00, 0.4313329E+00, 0.3753533E+00, 0.3753533E+00 /
      data (ref_adm(26,iz,21, 9),iz = 1,20) / &
     & 0.3816700E+00, 0.3816700E+00, 0.3826600E+00, 0.4480700E+00, &
     & 0.3947800E+00, 0.4375900E+00, 0.4781200E+00, 0.4802000E+00, &
     & 0.4931100E+00, 0.4804000E+00, 0.4769500E+00, 0.4642900E+00, &
     & 0.4833700E+00, 0.4658500E+00, 0.4920400E+00, 0.4809400E+00, &
     & 0.4557343E+00, 0.4266161E+00, 0.3742996E+00, 0.3742996E+00 /
      data (ref_adm(26,iz,22, 9),iz = 1,20) / &
     & 0.4053800E+00, 0.4053800E+00, 0.4553800E+00, 0.4878300E+00, &
     & 0.4630300E+00, 0.4183900E+00, 0.4708000E+00, 0.4794000E+00, &
     & 0.5223200E+00, 0.5200500E+00, 0.5027200E+00, 0.5077900E+00, &
     & 0.4977000E+00, 0.4508100E+00, 0.4654000E+00, 0.4943300E+00, &
     & 0.3687500E+00, 0.3910961E+00, 0.3411157E+00, 0.3411157E+00 /
      data (ref_adm(26,iz,23, 9),iz = 1,20) / &
     & 0.4302100E+00, 0.4302100E+00, 0.4560500E+00, 0.4556200E+00, &
     & 0.4700700E+00, 0.4674100E+00, 0.4351700E+00, 0.5265100E+00, &
     & 0.4796400E+00, 0.5408100E+00, 0.5516600E+00, 0.4897100E+00, &
     & 0.4902500E+00, 0.4808600E+00, 0.5194300E+00, 0.4748000E+00, &
     & 0.5152100E+00, 0.3899762E+00, 0.3424682E+00, 0.3424682E+00 /
      data (ref_adm(26,iz,24, 9),iz = 1,20) / &
     & 0.4195300E+00, 0.4195300E+00, 0.4336100E+00, 0.4574700E+00, &
     & 0.4609200E+00, 0.4720800E+00, 0.4979400E+00, 0.4453200E+00, &
     & 0.4793300E+00, 0.4783900E+00, 0.5252900E+00, 0.4902300E+00, &
     & 0.4911300E+00, 0.4708500E+00, 0.5100100E+00, 0.4983900E+00, &
     & 0.4257600E+00, 0.3903107E+00, 0.3447396E+00, 0.3447396E+00 /
      data (ref_adm(26,iz,25, 9),iz = 1,20) / &
     & 0.4165700E+00, 0.4165700E+00, 0.4538600E+00, 0.5004200E+00, &
     & 0.4627200E+00, 0.4821200E+00, 0.4287500E+00, 0.4625700E+00, &
     & 0.4779700E+00, 0.4895300E+00, 0.4965800E+00, 0.4889800E+00, &
     & 0.4952600E+00, 0.4755500E+00, 0.4999000E+00, 0.5064300E+00, &
     & 0.4669200E+00, 0.4384600E+00, 0.3479100E+00, 0.3479100E+00 /
      data (ref_adm(26,iz,26, 9),iz = 1,20) / &
     & 0.4309300E+00, 0.4309300E+00, 0.4293600E+00, 0.4406400E+00, &
     & 0.4473200E+00, 0.4431600E+00, 0.4350600E+00, 0.4202200E+00, &
     & 0.4476900E+00, 0.4439700E+00, 0.4730900E+00, 0.5310300E+00, &
     & 0.4933500E+00, 0.5019400E+00, 0.5274800E+00, 0.5034800E+00, &
     & 0.4943700E+00, 0.4624400E+00, 0.3519578E+00, 0.3519578E+00 /
      data (ref_adm(26,iz,27, 9),iz = 1,20) / &
     & 0.4271700E+00, 0.4271700E+00, 0.4513100E+00, 0.4406100E+00, &
     & 0.4354700E+00, 0.4397200E+00, 0.4563300E+00, 0.4528500E+00, &
     & 0.4728500E+00, 0.4490500E+00, 0.4711300E+00, 0.4702800E+00, &
     & 0.4621400E+00, 0.5133400E+00, 0.5583400E+00, 0.5102900E+00, &
     & 0.4978900E+00, 0.4554100E+00, 0.3186500E+00, 0.3186500E+00 /
      data (ref_adm(26,iz,28, 9),iz = 1,20) / &
     & 0.4460100E+00, 0.4460100E+00, 0.4487100E+00, 0.4575800E+00, &
     & 0.4721100E+00, 0.4943500E+00, 0.4953700E+00, 0.4982400E+00, &
     & 0.5059600E+00, 0.4944300E+00, 0.4902800E+00, 0.4871400E+00, &
     & 0.4704900E+00, 0.4930100E+00, 0.5322800E+00, 0.5248000E+00, &
     & 0.4980200E+00, 0.4663200E+00, 0.3892300E+00, 0.3892300E+00 /
      data (ref_adm(26,iz,29, 9),iz = 1,20) / &
     & 0.4261000E+00, 0.4261000E+00, 0.4277600E+00, 0.4563500E+00, &
     & 0.4445400E+00, 0.4435800E+00, 0.4369500E+00, 0.4345900E+00, &
     & 0.4666300E+00, 0.4482900E+00, 0.4724700E+00, 0.4519800E+00, &
     & 0.4611100E+00, 0.4759200E+00, 0.4890900E+00, 0.5037600E+00, &
     & 0.4845700E+00, 0.4421200E+00, 0.3900900E+00, 0.3900900E+00 /
      data (ref_adm(26,iz,30, 9),iz = 1,20) / &
     & 0.4414100E+00, 0.4414100E+00, 0.4466500E+00, 0.4133400E+00, &
     & 0.4023100E+00, 0.4477000E+00, 0.4607500E+00, 0.4922200E+00, &
     & 0.4875400E+00, 0.4822900E+00, 0.5095900E+00, 0.4896100E+00, &
     & 0.4761200E+00, 0.5050400E+00, 0.4873300E+00, 0.4852200E+00, &
     & 0.4404800E+00, 0.4078800E+00, 0.3172100E+00, 0.3172100E+00 /
      data (ref_adm(26,iz,31, 9),iz = 1,20) / &
     & 0.4368900E+00, 0.4368900E+00, 0.4740800E+00, 0.4609000E+00, &
     & 0.4229700E+00, 0.4814600E+00, 0.4853200E+00, 0.4889000E+00, &
     & 0.5308100E+00, 0.4991100E+00, 0.4934400E+00, 0.4645900E+00, &
     & 0.5087000E+00, 0.4858200E+00, 0.5047700E+00, 0.4946900E+00, &
     & 0.4771000E+00, 0.4062400E+00, 0.3800656E+00, 0.3800656E+00 /
      data (ref_adm(26,iz,32, 9),iz = 1,20) / &
     & 0.4916700E+00, 0.4916700E+00, 0.4835000E+00, 0.4560300E+00, &
     & 0.4742000E+00, 0.4826100E+00, 0.4596500E+00, 0.4881900E+00, &
     & 0.5408400E+00, 0.5513900E+00, 0.4700000E+00, 0.4590900E+00, &
     & 0.4564100E+00, 0.5017900E+00, 0.5432700E+00, 0.5557200E+00, &
     & 0.5100700E+00, 0.4290595E+00, 0.3854851E+00, 0.3854851E+00 /
      data (ref_adm(26,iz,33, 9),iz = 1,20) / &
     & 0.4572600E+00, 0.4572600E+00, 0.4279200E+00, 0.4602500E+00, &
     & 0.4644000E+00, 0.3685000E+00, 0.4002300E+00, 0.5064900E+00, &
     & 0.5334400E+00, 0.5368600E+00, 0.4821100E+00, 0.4662300E+00, &
     & 0.5003600E+00, 0.5229400E+00, 0.5137700E+00, 0.5446300E+00, &
     & 0.4262000E+00, 0.4102800E+00, 0.3051600E+00, 0.3051600E+00 /
      data (ref_adm(26,iz,34, 9),iz = 1,20) / &
     & 0.4666700E+00, 0.4666700E+00, 0.4502900E+00, 0.4776300E+00, &
     & 0.4615600E+00, 0.4454300E+00, 0.4093600E+00, 0.4937600E+00, &
     & 0.5442700E+00, 0.4976200E+00, 0.4536800E+00, 0.5017800E+00, &
     & 0.5097400E+00, 0.4884600E+00, 0.4748800E+00, 0.4873800E+00, &
     & 0.4930300E+00, 0.4102700E+00, 0.3959005E+00, 0.3959005E+00 /
      data (ref_adm(26,iz,35, 9),iz = 1,20) / &
     & 0.4417200E+00, 0.4417200E+00, 0.4352200E+00, 0.4230500E+00, &
     & 0.4505900E+00, 0.4411200E+00, 0.4164100E+00, 0.4367700E+00, &
     & 0.5377400E+00, 0.5416100E+00, 0.5528900E+00, 0.5289000E+00, &
     & 0.5297500E+00, 0.4857300E+00, 0.4813400E+00, 0.4963400E+00, &
     & 0.4725500E+00, 0.4591882E+00, 0.4004930E+00, 0.4004930E+00 /
      data (ref_adm(26,iz,36, 9),iz = 1,20) / &
     & 0.4450700E+00, 0.4450700E+00, 0.4511900E+00, 0.4456500E+00, &
     & 0.4702100E+00, 0.4313700E+00, 0.4792600E+00, 0.4876800E+00, &
     & 0.5304500E+00, 0.5277100E+00, 0.5844700E+00, 0.5592600E+00, &
     & 0.5233800E+00, 0.5148600E+00, 0.4880900E+00, 0.4279900E+00, &
     & 0.4543700E+00, 0.3596600E+00, 0.4039145E+00, 0.4039145E+00 /
      data (ref_adm(26,iz,37, 9),iz = 1,20) / &
     & 0.4373500E+00, 0.4373500E+00, 0.4595000E+00, 0.4382200E+00, &
     & 0.4580300E+00, 0.4729900E+00, 0.4378000E+00, 0.4047800E+00, &
     & 0.4567800E+00, 0.5303200E+00, 0.5578600E+00, 0.5707700E+00, &
     & 0.5419900E+00, 0.4755100E+00, 0.5020600E+00, 0.4573600E+00, &
     & 0.4938440E+00, 0.4650074E+00, 0.4059404E+00, 0.4059404E+00 /
      data (ref_adm(26,iz,38, 9),iz = 1,20) / &
     & 0.4373500E+00, 0.4373500E+00, 0.4595000E+00, 0.4382200E+00, &
     & 0.4580300E+00, 0.4729900E+00, 0.4378000E+00, 0.4047800E+00, &
     & 0.4567800E+00, 0.5303200E+00, 0.5578600E+00, 0.5707700E+00, &
     & 0.5419900E+00, 0.4755100E+00, 0.5020600E+00, 0.4573600E+00, &
     & 0.4938440E+00, 0.4650074E+00, 0.4059404E+00, 0.4059404E+00 /
! Solar Zenith Angle 45.0 Albedo  0.4929084E+00
      data (ref_adm(26,iz, 1,10),iz = 1,20) / &
     & 0.4368800E+00, 0.4368800E+00, 0.4530000E+00, 0.4822800E+00, &
     & 0.5033500E+00, 0.4841700E+00, 0.4880900E+00, 0.5088300E+00, &
     & 0.5238500E+00, 0.5533500E+00, 0.5490700E+00, 0.5365400E+00, &
     & 0.6020000E+00, 0.6542700E+00, 0.6692600E+00, 0.7028500E+00, &
     & 0.7136800E+00, 0.6903900E+00, 0.5715200E+00, 0.5715200E+00 /
      data (ref_adm(26,iz, 2,10),iz = 1,20) / &
     & 0.4368800E+00, 0.4368800E+00, 0.4530000E+00, 0.4822800E+00, &
     & 0.5033500E+00, 0.4841700E+00, 0.4880900E+00, 0.5088300E+00, &
     & 0.5238500E+00, 0.5533500E+00, 0.5490700E+00, 0.5365400E+00, &
     & 0.6020000E+00, 0.6542700E+00, 0.6692600E+00, 0.7028500E+00, &
     & 0.7136800E+00, 0.6903900E+00, 0.5715200E+00, 0.5715200E+00 /
      data (ref_adm(26,iz, 3,10),iz = 1,20) / &
     & 0.4406300E+00, 0.4406300E+00, 0.4592100E+00, 0.4847400E+00, &
     & 0.4849600E+00, 0.4662400E+00, 0.4783100E+00, 0.5024900E+00, &
     & 0.5101600E+00, 0.5192200E+00, 0.5271100E+00, 0.5355300E+00, &
     & 0.5734100E+00, 0.6100900E+00, 0.6391900E+00, 0.6909500E+00, &
     & 0.6930200E+00, 0.6621200E+00, 0.6268500E+00, 0.6268500E+00 /
      data (ref_adm(26,iz, 4,10),iz = 1,20) / &
     & 0.4674500E+00, 0.4674500E+00, 0.4729400E+00, 0.4566500E+00, &
     & 0.4583900E+00, 0.4854000E+00, 0.4964100E+00, 0.5181500E+00, &
     & 0.5085400E+00, 0.5089700E+00, 0.5487800E+00, 0.5494600E+00, &
     & 0.5642800E+00, 0.5849000E+00, 0.6368200E+00, 0.6892200E+00, &
     & 0.6921400E+00, 0.6476600E+00, 0.4881100E+00, 0.4881100E+00 /
      data (ref_adm(26,iz, 5,10),iz = 1,20) / &
     & 0.4617200E+00, 0.4617200E+00, 0.4437700E+00, 0.4400000E+00, &
     & 0.4531600E+00, 0.4932400E+00, 0.5353100E+00, 0.5351600E+00, &
     & 0.4886300E+00, 0.4809200E+00, 0.5322000E+00, 0.5704300E+00, &
     & 0.5734200E+00, 0.5969000E+00, 0.6114500E+00, 0.6746500E+00, &
     & 0.6872400E+00, 0.6694600E+00, 0.6599900E+00, 0.6599900E+00 /
      data (ref_adm(26,iz, 6,10),iz = 1,20) / &
     & 0.4360800E+00, 0.4360800E+00, 0.4483800E+00, 0.4364500E+00, &
     & 0.4690100E+00, 0.4786200E+00, 0.5179700E+00, 0.5017300E+00, &
     & 0.4937000E+00, 0.5081500E+00, 0.5271400E+00, 0.5751000E+00, &
     & 0.5961100E+00, 0.6034900E+00, 0.6175100E+00, 0.6752800E+00, &
     & 0.7071700E+00, 0.6864500E+00, 0.5586457E+00, 0.5586457E+00 /
      data (ref_adm(26,iz, 7,10),iz = 1,20) / &
     & 0.4643100E+00, 0.4643100E+00, 0.4378200E+00, 0.4527500E+00, &
     & 0.4697900E+00, 0.4567400E+00, 0.4995200E+00, 0.4840600E+00, &
     & 0.4931300E+00, 0.5142200E+00, 0.5561100E+00, 0.5677500E+00, &
     & 0.5894400E+00, 0.6100900E+00, 0.6023800E+00, 0.6136200E+00, &
     & 0.6855300E+00, 0.6162800E+00, 0.5463665E+00, 0.5463665E+00 /
      data (ref_adm(26,iz, 8,10),iz = 1,20) / &
     & 0.4468800E+00, 0.4468800E+00, 0.4623100E+00, 0.4675300E+00, &
     & 0.4558800E+00, 0.4740000E+00, 0.4599900E+00, 0.4660900E+00, &
     & 0.4977900E+00, 0.5045200E+00, 0.5507400E+00, 0.5501000E+00, &
     & 0.5606300E+00, 0.5839000E+00, 0.6110300E+00, 0.6355000E+00, &
     & 0.6415800E+00, 0.6031600E+00, 0.5273684E+00, 0.5273684E+00 /
      data (ref_adm(26,iz, 9,10),iz = 1,20) / &
     & 0.4622500E+00, 0.4622500E+00, 0.4739300E+00, 0.4688900E+00, &
     & 0.4519000E+00, 0.4284000E+00, 0.4579000E+00, 0.4507500E+00, &
     & 0.4463300E+00, 0.4760000E+00, 0.5097500E+00, 0.5327400E+00, &
     & 0.5474900E+00, 0.5697700E+00, 0.5867500E+00, 0.6434100E+00, &
     & 0.6564200E+00, 0.5867600E+00, 0.4427200E+00, 0.4427200E+00 /
      data (ref_adm(26,iz,10,10),iz = 1,20) / &
     & 0.4621600E+00, 0.4621600E+00, 0.4865300E+00, 0.4704300E+00, &
     & 0.4089500E+00, 0.4242600E+00, 0.4432000E+00, 0.4549500E+00, &
     & 0.4386100E+00, 0.4812700E+00, 0.4882700E+00, 0.5430700E+00, &
     & 0.5391200E+00, 0.5570400E+00, 0.5822200E+00, 0.5451400E+00, &
     & 0.5949600E+00, 0.5375100E+00, 0.4294500E+00, 0.4294500E+00 /
      data (ref_adm(26,iz,11,10),iz = 1,20) / &
     & 0.4313300E+00, 0.4313300E+00, 0.4326600E+00, 0.4625600E+00, &
     & 0.4643600E+00, 0.4260200E+00, 0.4581300E+00, 0.4612700E+00, &
     & 0.4529400E+00, 0.4655300E+00, 0.4707500E+00, 0.4993100E+00, &
     & 0.5418800E+00, 0.5441300E+00, 0.5448500E+00, 0.5460600E+00, &
     & 0.5800200E+00, 0.5253800E+00, 0.4778698E+00, 0.4778698E+00 /
      data (ref_adm(26,iz,12,10),iz = 1,20) / &
     & 0.4466100E+00, 0.4466100E+00, 0.4409600E+00, 0.4516500E+00, &
     & 0.4586100E+00, 0.4679200E+00, 0.4869800E+00, 0.4765800E+00, &
     & 0.4714400E+00, 0.4764000E+00, 0.5028600E+00, 0.4904700E+00, &
     & 0.5174300E+00, 0.5394400E+00, 0.5351700E+00, 0.5422800E+00, &
     & 0.5458100E+00, 0.5137900E+00, 0.4671155E+00, 0.4671155E+00 /
      data (ref_adm(26,iz,13,10),iz = 1,20) / &
     & 0.4625600E+00, 0.4625600E+00, 0.4661800E+00, 0.4773800E+00, &
     & 0.4793400E+00, 0.4803100E+00, 0.4841600E+00, 0.4889300E+00, &
     & 0.4987500E+00, 0.4988400E+00, 0.5086900E+00, 0.5083300E+00, &
     & 0.5111100E+00, 0.5064300E+00, 0.5157500E+00, 0.5508700E+00, &
     & 0.5653800E+00, 0.5374800E+00, 0.4055400E+00, 0.4055400E+00 /
      data (ref_adm(26,iz,14,10),iz = 1,20) / &
     & 0.4564200E+00, 0.4564200E+00, 0.4477400E+00, 0.4362700E+00, &
     & 0.4447100E+00, 0.4661200E+00, 0.4812800E+00, 0.4866200E+00, &
     & 0.4823200E+00, 0.4892600E+00, 0.4907600E+00, 0.4990600E+00, &
     & 0.5028400E+00, 0.5094300E+00, 0.5319800E+00, 0.5657600E+00, &
     & 0.5152700E+00, 0.4947000E+00, 0.4123000E+00, 0.4123000E+00 /
      data (ref_adm(26,iz,15,10),iz = 1,20) / &
     & 0.4325200E+00, 0.4325200E+00, 0.3950200E+00, 0.3885700E+00, &
     & 0.4031200E+00, 0.4171000E+00, 0.4171100E+00, 0.4212800E+00, &
     & 0.4375600E+00, 0.4560000E+00, 0.4893800E+00, 0.5040800E+00, &
     & 0.5026400E+00, 0.5062300E+00, 0.5250000E+00, 0.5282500E+00, &
     & 0.5376900E+00, 0.4468400E+00, 0.3526000E+00, 0.3526000E+00 /
      data (ref_adm(26,iz,16,10),iz = 1,20) / &
     & 0.4366200E+00, 0.4366200E+00, 0.4452400E+00, 0.4550300E+00, &
     & 0.4364600E+00, 0.4223500E+00, 0.4486100E+00, 0.4961100E+00, &
     & 0.4738000E+00, 0.4475300E+00, 0.4598600E+00, 0.4555500E+00, &
     & 0.4633200E+00, 0.4682700E+00, 0.5082300E+00, 0.4821600E+00, &
     & 0.5348700E+00, 0.4042700E+00, 0.4310881E+00, 0.4310881E+00 /
      data (ref_adm(26,iz,17,10),iz = 1,20) / &
     & 0.4452200E+00, 0.4452200E+00, 0.4347500E+00, 0.4606600E+00, &
     & 0.4452600E+00, 0.4593300E+00, 0.4370600E+00, 0.4619800E+00, &
     & 0.4667500E+00, 0.4508100E+00, 0.4718300E+00, 0.4823000E+00, &
     & 0.5029400E+00, 0.4895100E+00, 0.4896600E+00, 0.4735400E+00, &
     & 0.5261400E+00, 0.4636100E+00, 0.4227128E+00, 0.4227128E+00 /
      data (ref_adm(26,iz,18,10),iz = 1,20) / &
     & 0.4527900E+00, 0.4527900E+00, 0.4587000E+00, 0.4615100E+00, &
     & 0.4825500E+00, 0.4666100E+00, 0.4569900E+00, 0.4648300E+00, &
     & 0.4728900E+00, 0.4576200E+00, 0.4774600E+00, 0.4913500E+00, &
     & 0.4809300E+00, 0.5216600E+00, 0.5094800E+00, 0.4813800E+00, &
     & 0.4852700E+00, 0.5325500E+00, 0.4065424E+00, 0.4065424E+00 /
      data (ref_adm(26,iz,19,10),iz = 1,20) / &
     & 0.4385400E+00, 0.4385400E+00, 0.4317400E+00, 0.4243200E+00, &
     & 0.4775300E+00, 0.4471500E+00, 0.4858900E+00, 0.4841900E+00, &
     & 0.5009700E+00, 0.5141900E+00, 0.5096900E+00, 0.5079000E+00, &
     & 0.4988600E+00, 0.4745000E+00, 0.5008000E+00, 0.4945200E+00, &
     & 0.4457400E+00, 0.4517626E+00, 0.4011823E+00, 0.4011823E+00 /
      data (ref_adm(26,iz,20,10),iz = 1,20) / &
     & 0.3997400E+00, 0.3997400E+00, 0.4014100E+00, 0.4082100E+00, &
     & 0.4067200E+00, 0.4398600E+00, 0.4512900E+00, 0.4634400E+00, &
     & 0.4620400E+00, 0.4939500E+00, 0.4881400E+00, 0.4988300E+00, &
     & 0.4891600E+00, 0.4798000E+00, 0.4626900E+00, 0.4502100E+00, &
     & 0.4353100E+00, 0.4468789E+00, 0.3985341E+00, 0.3985341E+00 /
      data (ref_adm(26,iz,21,10),iz = 1,20) / &
     & 0.4412600E+00, 0.4412600E+00, 0.4252900E+00, 0.4608200E+00, &
     & 0.4732500E+00, 0.4884700E+00, 0.4768100E+00, 0.4841500E+00, &
     & 0.4815100E+00, 0.4585500E+00, 0.4763000E+00, 0.4613400E+00, &
     & 0.4570300E+00, 0.4534500E+00, 0.4741000E+00, 0.5024400E+00, &
     & 0.4659256E+00, 0.4437298E+00, 0.3978261E+00, 0.3978261E+00 /
      data (ref_adm(26,iz,22,10),iz = 1,20) / &
     & 0.4615200E+00, 0.4615200E+00, 0.4334000E+00, 0.4796000E+00, &
     & 0.4978700E+00, 0.4641000E+00, 0.4394200E+00, 0.4687200E+00, &
     & 0.4935000E+00, 0.4783400E+00, 0.4580600E+00, 0.4692800E+00, &
     & 0.4857600E+00, 0.4321900E+00, 0.4641000E+00, 0.5188800E+00, &
     & 0.4737908E+00, 0.4447905E+00, 0.3764062E+00, 0.3764062E+00 /
      data (ref_adm(26,iz,23,10),iz = 1,20) / &
     & 0.4465900E+00, 0.4465900E+00, 0.4672800E+00, 0.4310600E+00, &
     & 0.4606000E+00, 0.4421900E+00, 0.4257500E+00, 0.4584100E+00, &
     & 0.4684600E+00, 0.4959100E+00, 0.4896600E+00, 0.5145200E+00, &
     & 0.5001500E+00, 0.4776200E+00, 0.4439800E+00, 0.4452200E+00, &
     & 0.4609700E+00, 0.4384421E+00, 0.3742895E+00, 0.3742895E+00 /
      data (ref_adm(26,iz,24,10),iz = 1,20) / &
     & 0.4838400E+00, 0.4838400E+00, 0.4580100E+00, 0.4520200E+00, &
     & 0.4353000E+00, 0.4456300E+00, 0.4558000E+00, 0.4601500E+00, &
     & 0.4810000E+00, 0.4959400E+00, 0.4975400E+00, 0.5256300E+00, &
     & 0.5058600E+00, 0.4669300E+00, 0.4625300E+00, 0.4520700E+00, &
     & 0.4546300E+00, 0.4332145E+00, 0.3726209E+00, 0.3726209E+00 /
      data (ref_adm(26,iz,25,10),iz = 1,20) / &
     & 0.4226000E+00, 0.4226000E+00, 0.4240700E+00, 0.4409000E+00, &
     & 0.4522500E+00, 0.4497600E+00, 0.4474300E+00, 0.4536000E+00, &
     & 0.4631900E+00, 0.5031700E+00, 0.5389600E+00, 0.5469100E+00, &
     & 0.5083200E+00, 0.4604700E+00, 0.5004100E+00, 0.5080200E+00, &
     & 0.5110700E+00, 0.5025700E+00, 0.3715215E+00, 0.3715215E+00 /
      data (ref_adm(26,iz,26,10),iz = 1,20) / &
     & 0.4266800E+00, 0.4266800E+00, 0.4422500E+00, 0.4491200E+00, &
     & 0.4475300E+00, 0.4438300E+00, 0.4661100E+00, 0.4815600E+00, &
     & 0.4686700E+00, 0.4700000E+00, 0.4860600E+00, 0.4956300E+00, &
     & 0.5000100E+00, 0.5034200E+00, 0.5243000E+00, 0.5141100E+00, &
     & 0.4974700E+00, 0.4747800E+00, 0.3996800E+00, 0.3996800E+00 /
      data (ref_adm(26,iz,27,10),iz = 1,20) / &
     & 0.4457000E+00, 0.4457000E+00, 0.4364500E+00, 0.4353200E+00, &
     & 0.4412300E+00, 0.4552700E+00, 0.4647300E+00, 0.4767000E+00, &
     & 0.4719500E+00, 0.4606200E+00, 0.4649500E+00, 0.4875700E+00, &
     & 0.4789800E+00, 0.4769200E+00, 0.5045000E+00, 0.5040800E+00, &
     & 0.4888600E+00, 0.4558100E+00, 0.3755500E+00, 0.3755500E+00 /
      data (ref_adm(26,iz,28,10),iz = 1,20) / &
     & 0.4420700E+00, 0.4420700E+00, 0.4570700E+00, 0.4406000E+00, &
     & 0.4544800E+00, 0.4559800E+00, 0.4874100E+00, 0.5129200E+00, &
     & 0.5210000E+00, 0.5229100E+00, 0.5141000E+00, 0.5186600E+00, &
     & 0.5039400E+00, 0.4854800E+00, 0.5131600E+00, 0.4979200E+00, &
     & 0.4921800E+00, 0.4539000E+00, 0.3815200E+00, 0.3815200E+00 /
      data (ref_adm(26,iz,29,10),iz = 1,20) / &
     & 0.4534000E+00, 0.4534000E+00, 0.4270100E+00, 0.4603400E+00, &
     & 0.4574800E+00, 0.4253100E+00, 0.4425400E+00, 0.4460100E+00, &
     & 0.4821600E+00, 0.5200200E+00, 0.4974300E+00, 0.5135900E+00, &
     & 0.4802500E+00, 0.4918100E+00, 0.4949300E+00, 0.5091700E+00, &
     & 0.5067800E+00, 0.4690300E+00, 0.3575200E+00, 0.3575200E+00 /
      data (ref_adm(26,iz,30,10),iz = 1,20) / &
     & 0.4468300E+00, 0.4468300E+00, 0.4425400E+00, 0.4450400E+00, &
     & 0.4500000E+00, 0.4516700E+00, 0.4407900E+00, 0.4604600E+00, &
     & 0.4777100E+00, 0.4950800E+00, 0.4986500E+00, 0.5555400E+00, &
     & 0.5229600E+00, 0.4998200E+00, 0.5031900E+00, 0.5004300E+00, &
     & 0.5167300E+00, 0.4388900E+00, 0.3304900E+00, 0.3304900E+00 /
      data (ref_adm(26,iz,31,10),iz = 1,20) / &
     & 0.4523800E+00, 0.4523800E+00, 0.4391200E+00, 0.4556900E+00, &
     & 0.4549200E+00, 0.4661200E+00, 0.4693900E+00, 0.4692800E+00, &
     & 0.4777500E+00, 0.5007200E+00, 0.4873500E+00, 0.5176600E+00, &
     & 0.4850900E+00, 0.4829100E+00, 0.4864800E+00, 0.4707900E+00, &
     & 0.4693700E+00, 0.4543200E+00, 0.3791939E+00, 0.3791939E+00 /
      data (ref_adm(26,iz,32,10),iz = 1,20) / &
     & 0.4661000E+00, 0.4661000E+00, 0.4619800E+00, 0.4684200E+00, &
     & 0.4706900E+00, 0.4773700E+00, 0.4815700E+00, 0.5162500E+00, &
     & 0.5021800E+00, 0.5005000E+00, 0.5364000E+00, 0.5350000E+00, &
     & 0.5295100E+00, 0.5310900E+00, 0.5276600E+00, 0.5302600E+00, &
     & 0.4943800E+00, 0.4473400E+00, 0.3751900E+00, 0.3751900E+00 /
      data (ref_adm(26,iz,33,10),iz = 1,20) / &
     & 0.4456800E+00, 0.4456800E+00, 0.4632800E+00, 0.4481200E+00, &
     & 0.4483000E+00, 0.4362300E+00, 0.4517500E+00, 0.4608500E+00, &
     & 0.4523600E+00, 0.4428700E+00, 0.4923300E+00, 0.4983300E+00, &
     & 0.4952200E+00, 0.5197500E+00, 0.5150000E+00, 0.4899900E+00, &
     & 0.4989000E+00, 0.4540700E+00, 0.4516100E+00, 0.4516100E+00 /
      data (ref_adm(26,iz,34,10),iz = 1,20) / &
     & 0.4375800E+00, 0.4375800E+00, 0.4533900E+00, 0.4623700E+00, &
     & 0.4572500E+00, 0.4527200E+00, 0.4560900E+00, 0.4451600E+00, &
     & 0.4347000E+00, 0.4496400E+00, 0.4543400E+00, 0.4886500E+00, &
     & 0.5328700E+00, 0.5348300E+00, 0.5180600E+00, 0.4974600E+00, &
     & 0.4660600E+00, 0.4690400E+00, 0.3597200E+00, 0.3597200E+00 /
      data (ref_adm(26,iz,35,10),iz = 1,20) / &
     & 0.4570200E+00, 0.4570200E+00, 0.4494200E+00, 0.4779600E+00, &
     & 0.4586500E+00, 0.4578100E+00, 0.4485500E+00, 0.4399200E+00, &
     & 0.4330800E+00, 0.4349000E+00, 0.4786800E+00, 0.5097100E+00, &
     & 0.5250700E+00, 0.5193000E+00, 0.5056800E+00, 0.4700900E+00, &
     & 0.4380300E+00, 0.3982500E+00, 0.3381600E+00, 0.3381600E+00 /
      data (ref_adm(26,iz,36,10),iz = 1,20) / &
     & 0.4434400E+00, 0.4434400E+00, 0.4615400E+00, 0.4450100E+00, &
     & 0.4592300E+00, 0.4710200E+00, 0.4310300E+00, 0.4605300E+00, &
     & 0.4682200E+00, 0.4629200E+00, 0.4844100E+00, 0.4828400E+00, &
     & 0.5240800E+00, 0.5345300E+00, 0.5069300E+00, 0.4802200E+00, &
     & 0.4621800E+00, 0.4287716E+00, 0.3892492E+00, 0.3892492E+00 /
      data (ref_adm(26,iz,37,10),iz = 1,20) / &
     & 0.4357600E+00, 0.4357600E+00, 0.4630300E+00, 0.4690800E+00, &
     & 0.4393300E+00, 0.4108100E+00, 0.4325200E+00, 0.4536300E+00, &
     & 0.4588000E+00, 0.5055100E+00, 0.4595200E+00, 0.4568200E+00, &
     & 0.5185000E+00, 0.5468200E+00, 0.5148500E+00, 0.4883400E+00, &
     & 0.4674900E+00, 0.4292211E+00, 0.3899826E+00, 0.3899826E+00 /
      data (ref_adm(26,iz,38,10),iz = 1,20) / &
     & 0.4357600E+00, 0.4357600E+00, 0.4630300E+00, 0.4690800E+00, &
     & 0.4393300E+00, 0.4108100E+00, 0.4325200E+00, 0.4536300E+00, &
     & 0.4588000E+00, 0.5055100E+00, 0.4595200E+00, 0.4568200E+00, &
     & 0.5185000E+00, 0.5468200E+00, 0.5148500E+00, 0.4883400E+00, &
     & 0.4674900E+00, 0.4292211E+00, 0.3899826E+00, 0.3899826E+00 /
! Solar Zenith Angle 50.0 Albedo  0.5041215E+00
      data (ref_adm(26,iz, 1,11),iz = 1,20) / &
     & 0.4443500E+00, 0.4443500E+00, 0.4430500E+00, 0.4737500E+00, &
     & 0.4524800E+00, 0.4575000E+00, 0.4821400E+00, 0.4881300E+00, &
     & 0.4798000E+00, 0.5413600E+00, 0.5890500E+00, 0.6248300E+00, &
     & 0.6490000E+00, 0.6730500E+00, 0.6992400E+00, 0.7298600E+00, &
     & 0.7914700E+00, 0.7647700E+00, 0.7201800E+00, 0.7201800E+00 /
      data (ref_adm(26,iz, 2,11),iz = 1,20) / &
     & 0.4443500E+00, 0.4443500E+00, 0.4430500E+00, 0.4737500E+00, &
     & 0.4524800E+00, 0.4575000E+00, 0.4821400E+00, 0.4881300E+00, &
     & 0.4798000E+00, 0.5413600E+00, 0.5890500E+00, 0.6248300E+00, &
     & 0.6490000E+00, 0.6730500E+00, 0.6992400E+00, 0.7298600E+00, &
     & 0.7914700E+00, 0.7647700E+00, 0.7201800E+00, 0.7201800E+00 /
      data (ref_adm(26,iz, 3,11),iz = 1,20) / &
     & 0.4475800E+00, 0.4475800E+00, 0.4536100E+00, 0.4352800E+00, &
     & 0.4705200E+00, 0.4928600E+00, 0.4727700E+00, 0.5014000E+00, &
     & 0.5216500E+00, 0.5207800E+00, 0.5507900E+00, 0.6023600E+00, &
     & 0.6401900E+00, 0.6636500E+00, 0.6929800E+00, 0.7321500E+00, &
     & 0.7811200E+00, 0.7750600E+00, 0.7058700E+00, 0.7058700E+00 /
      data (ref_adm(26,iz, 4,11),iz = 1,20) / &
     & 0.4416600E+00, 0.4416600E+00, 0.4302700E+00, 0.4339100E+00, &
     & 0.4617600E+00, 0.4823900E+00, 0.4777400E+00, 0.4927000E+00, &
     & 0.5211600E+00, 0.5371300E+00, 0.5479200E+00, 0.6014500E+00, &
     & 0.6206300E+00, 0.6544200E+00, 0.6838800E+00, 0.7124800E+00, &
     & 0.7625800E+00, 0.7468300E+00, 0.6854700E+00, 0.6854700E+00 /
      data (ref_adm(26,iz, 5,11),iz = 1,20) / &
     & 0.4305300E+00, 0.4305300E+00, 0.4345900E+00, 0.4534600E+00, &
     & 0.4607100E+00, 0.4651400E+00, 0.4769700E+00, 0.5189200E+00, &
     & 0.5116800E+00, 0.5345600E+00, 0.5467500E+00, 0.5806800E+00, &
     & 0.5969500E+00, 0.6082200E+00, 0.6576300E+00, 0.6927800E+00, &
     & 0.7433700E+00, 0.7504000E+00, 0.6843313E+00, 0.6843313E+00 /
      data (ref_adm(26,iz, 6,11),iz = 1,20) / &
     & 0.4429200E+00, 0.4429200E+00, 0.4587800E+00, 0.4543900E+00, &
     & 0.4460000E+00, 0.4467600E+00, 0.4757000E+00, 0.5169400E+00, &
     & 0.5122300E+00, 0.5351100E+00, 0.5604400E+00, 0.5752700E+00, &
     & 0.5896900E+00, 0.6087100E+00, 0.6416300E+00, 0.6823000E+00, &
     & 0.7370700E+00, 0.7224300E+00, 0.6543438E+00, 0.6543438E+00 /
      data (ref_adm(26,iz, 7,11),iz = 1,20) / &
     & 0.4282000E+00, 0.4282000E+00, 0.4462600E+00, 0.4353900E+00, &
     & 0.4386900E+00, 0.4491000E+00, 0.4575700E+00, 0.4813200E+00, &
     & 0.4957900E+00, 0.5248000E+00, 0.5496800E+00, 0.5645700E+00, &
     & 0.5719100E+00, 0.6227000E+00, 0.6419700E+00, 0.6627300E+00, &
     & 0.7067400E+00, 0.6535900E+00, 0.5759200E+00, 0.5759200E+00 /
      data (ref_adm(26,iz, 8,11),iz = 1,20) / &
     & 0.4498300E+00, 0.4498300E+00, 0.4506900E+00, 0.4532100E+00, &
     & 0.4644400E+00, 0.4652700E+00, 0.4716400E+00, 0.4885600E+00, &
     & 0.4971800E+00, 0.5258600E+00, 0.5437900E+00, 0.5546400E+00, &
     & 0.5695500E+00, 0.6122600E+00, 0.6426300E+00, 0.6709700E+00, &
     & 0.6766600E+00, 0.6757100E+00, 0.6148305E+00, 0.6148305E+00 /
      data (ref_adm(26,iz, 9,11),iz = 1,20) / &
     & 0.4678800E+00, 0.4678800E+00, 0.4433600E+00, 0.4448000E+00, &
     & 0.4423900E+00, 0.4690500E+00, 0.4780900E+00, 0.4819600E+00, &
     & 0.5136800E+00, 0.5041600E+00, 0.5430500E+00, 0.5510000E+00, &
     & 0.5688400E+00, 0.6044400E+00, 0.6363000E+00, 0.6722100E+00, &
     & 0.6668700E+00, 0.6496300E+00, 0.5617300E+00, 0.5617300E+00 /
      data (ref_adm(26,iz,10,11),iz = 1,20) / &
     & 0.4332200E+00, 0.4332200E+00, 0.4386900E+00, 0.4316400E+00, &
     & 0.4326200E+00, 0.4599100E+00, 0.4899100E+00, 0.4758500E+00, &
     & 0.4976000E+00, 0.5088600E+00, 0.5074500E+00, 0.5089400E+00, &
     & 0.5372800E+00, 0.5824800E+00, 0.6114400E+00, 0.6558800E+00, &
     & 0.6355200E+00, 0.6002300E+00, 0.5604719E+00, 0.5604719E+00 /
      data (ref_adm(26,iz,11,11),iz = 1,20) / &
     & 0.4431900E+00, 0.4431900E+00, 0.4383800E+00, 0.4456600E+00, &
     & 0.4505600E+00, 0.4595300E+00, 0.4785600E+00, 0.4766200E+00, &
     & 0.4999300E+00, 0.5059700E+00, 0.5071700E+00, 0.5298200E+00, &
     & 0.5373800E+00, 0.5504200E+00, 0.5900700E+00, 0.6402900E+00, &
     & 0.6228700E+00, 0.5554200E+00, 0.5391645E+00, 0.5391645E+00 /
      data (ref_adm(26,iz,12,11),iz = 1,20) / &
     & 0.4546600E+00, 0.4546600E+00, 0.4457600E+00, 0.4506200E+00, &
     & 0.4394800E+00, 0.4427000E+00, 0.4635600E+00, 0.4910400E+00, &
     & 0.5014500E+00, 0.5057200E+00, 0.4993200E+00, 0.5227000E+00, &
     & 0.5301000E+00, 0.5311000E+00, 0.5607400E+00, 0.5803100E+00, &
     & 0.6043900E+00, 0.5377900E+00, 0.5535600E+00, 0.5535600E+00 /
      data (ref_adm(26,iz,13,11),iz = 1,20) / &
     & 0.4641600E+00, 0.4641600E+00, 0.4561400E+00, 0.4555500E+00, &
     & 0.4592800E+00, 0.4615200E+00, 0.4785100E+00, 0.5027800E+00, &
     & 0.5039500E+00, 0.4854200E+00, 0.4842300E+00, 0.5029500E+00, &
     & 0.5096000E+00, 0.5226300E+00, 0.5489300E+00, 0.5682100E+00, &
     & 0.5870000E+00, 0.5510300E+00, 0.4299400E+00, 0.4299400E+00 /
      data (ref_adm(26,iz,14,11),iz = 1,20) / &
     & 0.4598100E+00, 0.4598100E+00, 0.4557000E+00, 0.4588700E+00, &
     & 0.4621700E+00, 0.4696000E+00, 0.4824100E+00, 0.4820800E+00, &
     & 0.4901200E+00, 0.4936700E+00, 0.4961600E+00, 0.5049800E+00, &
     & 0.5100000E+00, 0.5223300E+00, 0.5433100E+00, 0.5617700E+00, &
     & 0.5540400E+00, 0.5317500E+00, 0.3969100E+00, 0.3969100E+00 /
      data (ref_adm(26,iz,15,11),iz = 1,20) / &
     & 0.4263300E+00, 0.4263300E+00, 0.4044500E+00, 0.4140200E+00, &
     & 0.4184000E+00, 0.4315200E+00, 0.4348300E+00, 0.4370100E+00, &
     & 0.4606900E+00, 0.4752600E+00, 0.4835300E+00, 0.4892300E+00, &
     & 0.4992400E+00, 0.5083900E+00, 0.5676200E+00, 0.5874900E+00, &
     & 0.5927100E+00, 0.5169700E+00, 0.4627100E+00, 0.4627100E+00 /
      data (ref_adm(26,iz,16,11),iz = 1,20) / &
     & 0.4488600E+00, 0.4488600E+00, 0.4632800E+00, 0.4641000E+00, &
     & 0.4694100E+00, 0.4623200E+00, 0.4554700E+00, 0.4675100E+00, &
     & 0.4787300E+00, 0.4707500E+00, 0.4518300E+00, 0.4603200E+00, &
     & 0.4760000E+00, 0.4674500E+00, 0.5531900E+00, 0.5579000E+00, &
     & 0.5607900E+00, 0.5599300E+00, 0.4762784E+00, 0.4762784E+00 /
      data (ref_adm(26,iz,17,11),iz = 1,20) / &
     & 0.4449700E+00, 0.4449700E+00, 0.4417000E+00, 0.4492400E+00, &
     & 0.4583100E+00, 0.4675800E+00, 0.4665700E+00, 0.4460100E+00, &
     & 0.4811700E+00, 0.4809700E+00, 0.4823000E+00, 0.4685000E+00, &
     & 0.4884000E+00, 0.4904600E+00, 0.5241900E+00, 0.5332400E+00, &
     & 0.5151400E+00, 0.4896500E+00, 0.4653996E+00, 0.4653996E+00 /
      data (ref_adm(26,iz,18,11),iz = 1,20) / &
     & 0.4446900E+00, 0.4446900E+00, 0.4499200E+00, 0.4472200E+00, &
     & 0.4308500E+00, 0.4480700E+00, 0.4534400E+00, 0.4516600E+00, &
     & 0.4743300E+00, 0.4928500E+00, 0.4889300E+00, 0.4850900E+00, &
     & 0.4916000E+00, 0.4761100E+00, 0.4858700E+00, 0.5160300E+00, &
     & 0.5298300E+00, 0.5222700E+00, 0.4205205E+00, 0.4205205E+00 /
      data (ref_adm(26,iz,19,11),iz = 1,20) / &
     & 0.4512700E+00, 0.4512700E+00, 0.4464400E+00, 0.4685900E+00, &
     & 0.4557900E+00, 0.4593400E+00, 0.4572000E+00, 0.4504900E+00, &
     & 0.4473900E+00, 0.4713100E+00, 0.4736800E+00, 0.4887500E+00, &
     & 0.5025400E+00, 0.4828500E+00, 0.4976800E+00, 0.5373300E+00, &
     & 0.5410200E+00, 0.4888663E+00, 0.4137064E+00, 0.4137064E+00 /
      data (ref_adm(26,iz,20,11),iz = 1,20) / &
     & 0.4317700E+00, 0.4317700E+00, 0.4250800E+00, 0.4295000E+00, &
     & 0.4285400E+00, 0.4497500E+00, 0.4442500E+00, 0.4262200E+00, &
     & 0.4510100E+00, 0.4648700E+00, 0.4716000E+00, 0.4824300E+00, &
     & 0.4740500E+00, 0.4745600E+00, 0.5007000E+00, 0.5061200E+00, &
     & 0.5232500E+00, 0.4802435E+00, 0.4091733E+00, 0.4091733E+00 /
      data (ref_adm(26,iz,21,11),iz = 1,20) / &
     & 0.4450500E+00, 0.4450500E+00, 0.4514800E+00, 0.4453800E+00, &
     & 0.4547900E+00, 0.4675900E+00, 0.4431800E+00, 0.4428800E+00, &
     & 0.4544500E+00, 0.4654200E+00, 0.4949500E+00, 0.4849500E+00, &
     & 0.4886000E+00, 0.4734300E+00, 0.4975400E+00, 0.5198600E+00, &
     & 0.4925303E+00, 0.4716397E+00, 0.4056123E+00, 0.4056123E+00 /
      data (ref_adm(26,iz,22,11),iz = 1,20) / &
     & 0.4531800E+00, 0.4531800E+00, 0.4600400E+00, 0.4523600E+00, &
     & 0.4391200E+00, 0.4565700E+00, 0.4603000E+00, 0.4503000E+00, &
     & 0.4618700E+00, 0.4690200E+00, 0.4793300E+00, 0.4892200E+00, &
     & 0.4677400E+00, 0.4995900E+00, 0.4959700E+00, 0.4625700E+00, &
     & 0.4957454E+00, 0.4683175E+00, 0.4013560E+00, 0.4013560E+00 /
      data (ref_adm(26,iz,23,11),iz = 1,20) / &
     & 0.4567000E+00, 0.4567000E+00, 0.4815300E+00, 0.4724100E+00, &
     & 0.4555200E+00, 0.4540800E+00, 0.4678700E+00, 0.4524100E+00, &
     & 0.4529800E+00, 0.4562500E+00, 0.4700200E+00, 0.4987500E+00, &
     & 0.5020400E+00, 0.5067500E+00, 0.4933500E+00, 0.4875000E+00, &
     & 0.4615100E+00, 0.4606532E+00, 0.3989213E+00, 0.3989213E+00 /
      data (ref_adm(26,iz,24,11),iz = 1,20) / &
     & 0.4467600E+00, 0.4467600E+00, 0.4490200E+00, 0.4524600E+00, &
     & 0.4548200E+00, 0.4717400E+00, 0.4803200E+00, 0.4641900E+00, &
     & 0.4537200E+00, 0.4816400E+00, 0.4819400E+00, 0.5008700E+00, &
     & 0.5040300E+00, 0.5034500E+00, 0.4931500E+00, 0.4744300E+00, &
     & 0.4896800E+00, 0.4545527E+00, 0.3970926E+00, 0.3970926E+00 /
      data (ref_adm(26,iz,25,11),iz = 1,20) / &
     & 0.4234000E+00, 0.4234000E+00, 0.4245000E+00, 0.4299300E+00, &
     & 0.4286500E+00, 0.4196200E+00, 0.4322200E+00, 0.4417700E+00, &
     & 0.4330900E+00, 0.4434500E+00, 0.4610600E+00, 0.4978000E+00, &
     & 0.5053600E+00, 0.5069400E+00, 0.4918100E+00, 0.4752600E+00, &
     & 0.4790700E+00, 0.4574700E+00, 0.3965442E+00, 0.3965442E+00 /
      data (ref_adm(26,iz,26,11),iz = 1,20) / &
     & 0.4464000E+00, 0.4464000E+00, 0.4599800E+00, 0.4603300E+00, &
     & 0.4628300E+00, 0.4564300E+00, 0.4501900E+00, 0.4629700E+00, &
     & 0.4559000E+00, 0.4551800E+00, 0.4574900E+00, 0.4670400E+00, &
     & 0.4718600E+00, 0.4759900E+00, 0.4792900E+00, 0.4908300E+00, &
     & 0.4839000E+00, 0.4618300E+00, 0.3968955E+00, 0.3968955E+00 /
      data (ref_adm(26,iz,27,11),iz = 1,20) / &
     & 0.4604200E+00, 0.4604200E+00, 0.4633900E+00, 0.4591500E+00, &
     & 0.4687300E+00, 0.4672300E+00, 0.4752100E+00, 0.4872200E+00, &
     & 0.4878100E+00, 0.4960800E+00, 0.5059700E+00, 0.5069000E+00, &
     & 0.5070600E+00, 0.5093600E+00, 0.5100300E+00, 0.5032100E+00, &
     & 0.4721600E+00, 0.4596500E+00, 0.3924500E+00, 0.3924500E+00 /
      data (ref_adm(26,iz,28,11),iz = 1,20) / &
     & 0.4587300E+00, 0.4587300E+00, 0.4485400E+00, 0.4490400E+00, &
     & 0.4794800E+00, 0.4859300E+00, 0.5057900E+00, 0.5137500E+00, &
     & 0.5014400E+00, 0.4976600E+00, 0.5091600E+00, 0.5352600E+00, &
     & 0.5301600E+00, 0.5103900E+00, 0.5122400E+00, 0.5040400E+00, &
     & 0.5036800E+00, 0.4466200E+00, 0.3970500E+00, 0.3970500E+00 /
      data (ref_adm(26,iz,29,11),iz = 1,20) / &
     & 0.4543300E+00, 0.4543300E+00, 0.4478100E+00, 0.4718500E+00, &
     & 0.4776800E+00, 0.4942700E+00, 0.4949200E+00, 0.5034600E+00, &
     & 0.4938400E+00, 0.4719100E+00, 0.4983400E+00, 0.5243300E+00, &
     & 0.5349800E+00, 0.5272100E+00, 0.5089100E+00, 0.5045100E+00, &
     & 0.4897200E+00, 0.4534700E+00, 0.3837100E+00, 0.3837100E+00 /
      data (ref_adm(26,iz,30,11),iz = 1,20) / &
     & 0.4621200E+00, 0.4621200E+00, 0.4598800E+00, 0.4631400E+00, &
     & 0.4845900E+00, 0.4873900E+00, 0.5022800E+00, 0.5119400E+00, &
     & 0.5069200E+00, 0.5046200E+00, 0.5241500E+00, 0.5345700E+00, &
     & 0.5316900E+00, 0.5291000E+00, 0.5181700E+00, 0.5197700E+00, &
     & 0.4850100E+00, 0.4885400E+00, 0.3809400E+00, 0.3809400E+00 /
      data (ref_adm(26,iz,31,11),iz = 1,20) / &
     & 0.4632800E+00, 0.4632800E+00, 0.4642200E+00, 0.4670600E+00, &
     & 0.4695700E+00, 0.4905300E+00, 0.4872500E+00, 0.5006800E+00, &
     & 0.5044000E+00, 0.5057800E+00, 0.5090500E+00, 0.5235200E+00, &
     & 0.5325200E+00, 0.5281800E+00, 0.5227600E+00, 0.5141100E+00, &
     & 0.4827600E+00, 0.4452100E+00, 0.3643000E+00, 0.3643000E+00 /
      data (ref_adm(26,iz,32,11),iz = 1,20) / &
     & 0.4597900E+00, 0.4597900E+00, 0.4442600E+00, 0.4587800E+00, &
     & 0.4620300E+00, 0.4906600E+00, 0.4933400E+00, 0.5045700E+00, &
     & 0.5191400E+00, 0.4902100E+00, 0.4972400E+00, 0.5041700E+00, &
     & 0.5392800E+00, 0.5251800E+00, 0.5214400E+00, 0.4943700E+00, &
     & 0.4986700E+00, 0.4622800E+00, 0.3699800E+00, 0.3699800E+00 /
      data (ref_adm(26,iz,33,11),iz = 1,20) / &
     & 0.4321300E+00, 0.4321300E+00, 0.4521300E+00, 0.4527700E+00, &
     & 0.4539400E+00, 0.4598900E+00, 0.4676400E+00, 0.4810600E+00, &
     & 0.5054400E+00, 0.4974400E+00, 0.5065800E+00, 0.5146700E+00, &
     & 0.5437000E+00, 0.5400700E+00, 0.5341200E+00, 0.5135900E+00, &
     & 0.5175800E+00, 0.4859500E+00, 0.3865900E+00, 0.3865900E+00 /
      data (ref_adm(26,iz,34,11),iz = 1,20) / &
     & 0.4462700E+00, 0.4462700E+00, 0.4606700E+00, 0.4485300E+00, &
     & 0.4451300E+00, 0.4805600E+00, 0.4807700E+00, 0.4534700E+00, &
     & 0.4792900E+00, 0.5176600E+00, 0.5244400E+00, 0.5178900E+00, &
     & 0.5363600E+00, 0.5362400E+00, 0.5391200E+00, 0.5141700E+00, &
     & 0.5499800E+00, 0.4951000E+00, 0.4076900E+00, 0.4076900E+00 /
      data (ref_adm(26,iz,35,11),iz = 1,20) / &
     & 0.4414600E+00, 0.4414600E+00, 0.4382500E+00, 0.4611700E+00, &
     & 0.4733300E+00, 0.4553900E+00, 0.4613700E+00, 0.4570900E+00, &
     & 0.4735800E+00, 0.5022000E+00, 0.5131600E+00, 0.5206500E+00, &
     & 0.5317600E+00, 0.5234800E+00, 0.5230300E+00, 0.5435400E+00, &
     & 0.5451600E+00, 0.4733300E+00, 0.3540400E+00, 0.3540400E+00 /
      data (ref_adm(26,iz,36,11),iz = 1,20) / &
     & 0.4553100E+00, 0.4553100E+00, 0.4449600E+00, 0.4463200E+00, &
     & 0.4407700E+00, 0.4664500E+00, 0.4458600E+00, 0.4544900E+00, &
     & 0.4881100E+00, 0.5127200E+00, 0.5351800E+00, 0.5422300E+00, &
     & 0.5240400E+00, 0.5195300E+00, 0.5331200E+00, 0.5316100E+00, &
     & 0.5157800E+00, 0.4838300E+00, 0.3752400E+00, 0.3752400E+00 /
      data (ref_adm(26,iz,37,11),iz = 1,20) / &
     & 0.4539900E+00, 0.4539900E+00, 0.4480100E+00, 0.4559200E+00, &
     & 0.4362300E+00, 0.4327500E+00, 0.4493600E+00, 0.4643600E+00, &
     & 0.4737500E+00, 0.5052800E+00, 0.5386600E+00, 0.5495100E+00, &
     & 0.5092600E+00, 0.5264800E+00, 0.5356900E+00, 0.5285200E+00, &
     & 0.5080900E+00, 0.4384700E+00, 0.4333678E+00, 0.4333678E+00 /
      data (ref_adm(26,iz,38,11),iz = 1,20) / &
     & 0.4539900E+00, 0.4539900E+00, 0.4480100E+00, 0.4559200E+00, &
     & 0.4362300E+00, 0.4327500E+00, 0.4493600E+00, 0.4643600E+00, &
     & 0.4737500E+00, 0.5052800E+00, 0.5386600E+00, 0.5495100E+00, &
     & 0.5092600E+00, 0.5264800E+00, 0.5356900E+00, 0.5285200E+00, &
     & 0.5080900E+00, 0.4384700E+00, 0.4333678E+00, 0.4333678E+00 /
! Solar Zenith Angle 55.0 Albedo  0.5038470E+00
      data (ref_adm(26,iz, 1,12),iz = 1,20) / &
     & 0.4038600E+00, 0.4038600E+00, 0.4155500E+00, 0.4113900E+00, &
     & 0.4215300E+00, 0.4487500E+00, 0.4597300E+00, 0.5041600E+00, &
     & 0.5283800E+00, 0.5475900E+00, 0.5859400E+00, 0.6615300E+00, &
     & 0.7278900E+00, 0.7561100E+00, 0.7965600E+00, 0.8624400E+00, &
     & 0.9092900E+00, 0.9349600E+00, 0.9020900E+00, 0.9020900E+00 /
      data (ref_adm(26,iz, 2,12),iz = 1,20) / &
     & 0.4038600E+00, 0.4038600E+00, 0.4155500E+00, 0.4113900E+00, &
     & 0.4215300E+00, 0.4487500E+00, 0.4597300E+00, 0.5041600E+00, &
     & 0.5283800E+00, 0.5475900E+00, 0.5859400E+00, 0.6615300E+00, &
     & 0.7278900E+00, 0.7561100E+00, 0.7965600E+00, 0.8624400E+00, &
     & 0.9092900E+00, 0.9349600E+00, 0.9020900E+00, 0.9020900E+00 /
      data (ref_adm(26,iz, 3,12),iz = 1,20) / &
     & 0.4154400E+00, 0.4154400E+00, 0.4043500E+00, 0.4266900E+00, &
     & 0.4151800E+00, 0.4500800E+00, 0.4674400E+00, 0.4814400E+00, &
     & 0.5128800E+00, 0.5400100E+00, 0.5958800E+00, 0.6455200E+00, &
     & 0.6647000E+00, 0.7203800E+00, 0.7768200E+00, 0.8533400E+00, &
     & 0.9088000E+00, 0.9454200E+00, 0.8477800E+00, 0.8477800E+00 /
      data (ref_adm(26,iz, 4,12),iz = 1,20) / &
     & 0.4136900E+00, 0.4136900E+00, 0.4035700E+00, 0.4218400E+00, &
     & 0.4395400E+00, 0.4645100E+00, 0.4504300E+00, 0.4787300E+00, &
     & 0.5153100E+00, 0.5437100E+00, 0.5775800E+00, 0.6307300E+00, &
     & 0.6511500E+00, 0.6911800E+00, 0.7604600E+00, 0.8277800E+00, &
     & 0.8913300E+00, 0.9410900E+00, 0.8242000E+00, 0.8242000E+00 /
      data (ref_adm(26,iz, 5,12),iz = 1,20) / &
     & 0.4000900E+00, 0.4000900E+00, 0.4165300E+00, 0.4190700E+00, &
     & 0.4326300E+00, 0.4457300E+00, 0.4501100E+00, 0.4741100E+00, &
     & 0.4908900E+00, 0.5327600E+00, 0.5790500E+00, 0.5968700E+00, &
     & 0.6364800E+00, 0.6891100E+00, 0.7406500E+00, 0.7895600E+00, &
     & 0.8531400E+00, 0.8878700E+00, 0.7571600E+00, 0.7571600E+00 /
      data (ref_adm(26,iz, 6,12),iz = 1,20) / &
     & 0.4128300E+00, 0.4128300E+00, 0.4026800E+00, 0.4164200E+00, &
     & 0.4111300E+00, 0.4180800E+00, 0.4444600E+00, 0.4564300E+00, &
     & 0.4900500E+00, 0.5149400E+00, 0.5569300E+00, 0.5786800E+00, &
     & 0.6246700E+00, 0.6724600E+00, 0.7269100E+00, 0.7708500E+00, &
     & 0.8455500E+00, 0.8620100E+00, 0.7871900E+00, 0.7871900E+00 /
      data (ref_adm(26,iz, 7,12),iz = 1,20) / &
     & 0.4190600E+00, 0.4190600E+00, 0.4157100E+00, 0.4095400E+00, &
     & 0.4300600E+00, 0.4378700E+00, 0.4503200E+00, 0.4728500E+00, &
     & 0.4851000E+00, 0.5236800E+00, 0.5410200E+00, 0.5672800E+00, &
     & 0.6237300E+00, 0.6576500E+00, 0.6846100E+00, 0.7413600E+00, &
     & 0.7919400E+00, 0.7812700E+00, 0.6518300E+00, 0.6518300E+00 /
      data (ref_adm(26,iz, 8,12),iz = 1,20) / &
     & 0.4297000E+00, 0.4297000E+00, 0.4279400E+00, 0.4387700E+00, &
     & 0.4381700E+00, 0.4504100E+00, 0.4659700E+00, 0.4842700E+00, &
     & 0.4959600E+00, 0.5188200E+00, 0.5359100E+00, 0.5596000E+00, &
     & 0.6056600E+00, 0.6269900E+00, 0.6558800E+00, 0.7131500E+00, &
     & 0.7607900E+00, 0.7294800E+00, 0.6051200E+00, 0.6051200E+00 /
      data (ref_adm(26,iz, 9,12),iz = 1,20) / &
     & 0.4275800E+00, 0.4275800E+00, 0.4234600E+00, 0.4281600E+00, &
     & 0.4535300E+00, 0.4685700E+00, 0.4682200E+00, 0.4880600E+00, &
     & 0.5049200E+00, 0.5162300E+00, 0.5140400E+00, 0.5638500E+00, &
     & 0.6075900E+00, 0.6234100E+00, 0.6408500E+00, 0.6986700E+00, &
     & 0.7252600E+00, 0.7281700E+00, 0.6871483E+00, 0.6871483E+00 /
      data (ref_adm(26,iz,10,12),iz = 1,20) / &
     & 0.4227700E+00, 0.4227700E+00, 0.4402000E+00, 0.4458400E+00, &
     & 0.4448800E+00, 0.4572000E+00, 0.4738500E+00, 0.4778000E+00, &
     & 0.4831600E+00, 0.5055500E+00, 0.5021100E+00, 0.5446900E+00, &
     & 0.5755500E+00, 0.5987100E+00, 0.6258600E+00, 0.6848100E+00, &
     & 0.6890500E+00, 0.6603000E+00, 0.5274400E+00, 0.5274400E+00 /
      data (ref_adm(26,iz,11,12),iz = 1,20) / &
     & 0.4308000E+00, 0.4308000E+00, 0.4408600E+00, 0.4475900E+00, &
     & 0.4410300E+00, 0.4526000E+00, 0.4589200E+00, 0.4896900E+00, &
     & 0.4964300E+00, 0.5081400E+00, 0.4922900E+00, 0.5427300E+00, &
     & 0.5633200E+00, 0.5880100E+00, 0.6085300E+00, 0.6663000E+00, &
     & 0.6709900E+00, 0.6323500E+00, 0.5254400E+00, 0.5254400E+00 /
      data (ref_adm(26,iz,12,12),iz = 1,20) / &
     & 0.4231300E+00, 0.4231300E+00, 0.4308200E+00, 0.4472400E+00, &
     & 0.4454700E+00, 0.4534300E+00, 0.4532900E+00, 0.4697700E+00, &
     & 0.4718100E+00, 0.4947400E+00, 0.4944400E+00, 0.5279100E+00, &
     & 0.5506200E+00, 0.5752200E+00, 0.5930000E+00, 0.6318600E+00, &
     & 0.6497500E+00, 0.6132800E+00, 0.5575800E+00, 0.5575800E+00 /
      data (ref_adm(26,iz,13,12),iz = 1,20) / &
     & 0.4396400E+00, 0.4396400E+00, 0.4186300E+00, 0.4229200E+00, &
     & 0.4310700E+00, 0.4381000E+00, 0.4467600E+00, 0.4661700E+00, &
     & 0.4723300E+00, 0.4771500E+00, 0.4973200E+00, 0.5231500E+00, &
     & 0.5480300E+00, 0.5505500E+00, 0.5818000E+00, 0.6176800E+00, &
     & 0.6163600E+00, 0.5876500E+00, 0.4894400E+00, 0.4894400E+00 /
      data (ref_adm(26,iz,14,12),iz = 1,20) / &
     & 0.4318600E+00, 0.4318600E+00, 0.4313900E+00, 0.4374500E+00, &
     & 0.4442600E+00, 0.4476000E+00, 0.4612800E+00, 0.4703400E+00, &
     & 0.4771900E+00, 0.4838900E+00, 0.4976300E+00, 0.5167100E+00, &
     & 0.5369900E+00, 0.5552200E+00, 0.5746400E+00, 0.5823800E+00, &
     & 0.5937100E+00, 0.5512000E+00, 0.4707800E+00, 0.4707800E+00 /
      data (ref_adm(26,iz,15,12),iz = 1,20) / &
     & 0.4175900E+00, 0.4175900E+00, 0.4030400E+00, 0.4140300E+00, &
     & 0.4202400E+00, 0.4295900E+00, 0.4497000E+00, 0.4553500E+00, &
     & 0.4669100E+00, 0.4719000E+00, 0.4810800E+00, 0.5042900E+00, &
     & 0.5151500E+00, 0.5204300E+00, 0.5415100E+00, 0.5654500E+00, &
     & 0.5630800E+00, 0.5752800E+00, 0.5510120E+00, 0.5510120E+00 /
      data (ref_adm(26,iz,16,12),iz = 1,20) / &
     & 0.4193800E+00, 0.4193800E+00, 0.4235000E+00, 0.4313800E+00, &
     & 0.4382000E+00, 0.4429300E+00, 0.4556000E+00, 0.4432800E+00, &
     & 0.4494800E+00, 0.4518600E+00, 0.4642700E+00, 0.4944400E+00, &
     & 0.4924300E+00, 0.5073800E+00, 0.5425900E+00, 0.5587800E+00, &
     & 0.5622000E+00, 0.5579300E+00, 0.5350803E+00, 0.5350803E+00 /
      data (ref_adm(26,iz,17,12),iz = 1,20) / &
     & 0.4295400E+00, 0.4295400E+00, 0.4275500E+00, 0.4329800E+00, &
     & 0.4311000E+00, 0.4452400E+00, 0.4561000E+00, 0.4569800E+00, &
     & 0.4589700E+00, 0.4599100E+00, 0.4711300E+00, 0.5078500E+00, &
     & 0.5151900E+00, 0.5313600E+00, 0.5217500E+00, 0.5421800E+00, &
     & 0.5630100E+00, 0.5281800E+00, 0.5193354E+00, 0.5193354E+00 /
      data (ref_adm(26,iz,18,12),iz = 1,20) / &
     & 0.4186100E+00, 0.4186100E+00, 0.4264800E+00, 0.4281500E+00, &
     & 0.4272800E+00, 0.4460900E+00, 0.4425100E+00, 0.4559400E+00, &
     & 0.4511100E+00, 0.4491600E+00, 0.4591300E+00, 0.5022300E+00, &
     & 0.5106700E+00, 0.5263600E+00, 0.5276000E+00, 0.5351900E+00, &
     & 0.5609200E+00, 0.5283082E+00, 0.4520787E+00, 0.4520787E+00 /
      data (ref_adm(26,iz,19,12),iz = 1,20) / &
     & 0.4355300E+00, 0.4355300E+00, 0.4295000E+00, 0.4403300E+00, &
     & 0.4393300E+00, 0.4366000E+00, 0.4318300E+00, 0.4561400E+00, &
     & 0.4482200E+00, 0.4646200E+00, 0.4679500E+00, 0.4901500E+00, &
     & 0.4995100E+00, 0.5004500E+00, 0.5008500E+00, 0.5457000E+00, &
     & 0.5457400E+00, 0.5168340E+00, 0.4438058E+00, 0.4438058E+00 /
      data (ref_adm(26,iz,20,12),iz = 1,20) / &
     & 0.4345000E+00, 0.4345000E+00, 0.4216400E+00, 0.4326000E+00, &
     & 0.4370700E+00, 0.4427400E+00, 0.4402600E+00, 0.4454900E+00, &
     & 0.4462300E+00, 0.4523900E+00, 0.4743000E+00, 0.4848800E+00, &
     & 0.4991300E+00, 0.5003200E+00, 0.5081000E+00, 0.5349300E+00, &
     & 0.5222260E+00, 0.5068143E+00, 0.4383772E+00, 0.4383772E+00 /
      data (ref_adm(26,iz,21,12),iz = 1,20) / &
     & 0.4325400E+00, 0.4325400E+00, 0.4288500E+00, 0.4369200E+00, &
     & 0.4429300E+00, 0.4461900E+00, 0.4394500E+00, 0.4418400E+00, &
     & 0.4552200E+00, 0.4633300E+00, 0.4677800E+00, 0.4604100E+00, &
     & 0.4813800E+00, 0.4835900E+00, 0.4979000E+00, 0.4984800E+00, &
     & 0.5122715E+00, 0.4967034E+00, 0.4343497E+00, 0.4343497E+00 /
      data (ref_adm(26,iz,22,12),iz = 1,20) / &
     & 0.4354100E+00, 0.4354100E+00, 0.4306400E+00, 0.4289900E+00, &
     & 0.4420500E+00, 0.4477300E+00, 0.4479800E+00, 0.4384100E+00, &
     & 0.4461400E+00, 0.4650300E+00, 0.4711300E+00, 0.4716400E+00, &
     & 0.4681300E+00, 0.4953200E+00, 0.5014800E+00, 0.5008800E+00, &
     & 0.5059177E+00, 0.4827771E+00, 0.4203230E+00, 0.4203230E+00 /
      data (ref_adm(26,iz,23,12),iz = 1,20) / &
     & 0.4173100E+00, 0.4173100E+00, 0.4192000E+00, 0.4304700E+00, &
     & 0.4439200E+00, 0.4399100E+00, 0.4436300E+00, 0.4477900E+00, &
     & 0.4533100E+00, 0.4687400E+00, 0.4660900E+00, 0.4764900E+00, &
     & 0.4824600E+00, 0.4849200E+00, 0.5050500E+00, 0.5181100E+00, &
     & 0.5111300E+00, 0.4734050E+00, 0.4172837E+00, 0.4172837E+00 /
      data (ref_adm(26,iz,24,12),iz = 1,20) / &
     & 0.4169300E+00, 0.4169300E+00, 0.4225800E+00, 0.4322500E+00, &
     & 0.4256600E+00, 0.4322400E+00, 0.4293300E+00, 0.4575300E+00, &
     & 0.4562300E+00, 0.4600700E+00, 0.4802600E+00, 0.4678100E+00, &
     & 0.4806900E+00, 0.4936200E+00, 0.5023400E+00, 0.5123000E+00, &
     & 0.4998900E+00, 0.4662750E+00, 0.4152255E+00, 0.4152255E+00 /
      data (ref_adm(26,iz,25,12),iz = 1,20) / &
     & 0.4127500E+00, 0.4127500E+00, 0.4073200E+00, 0.4032300E+00, &
     & 0.4132500E+00, 0.4198400E+00, 0.4237700E+00, 0.4293300E+00, &
     & 0.4471900E+00, 0.4478000E+00, 0.4597100E+00, 0.4611500E+00, &
     & 0.4746100E+00, 0.4880000E+00, 0.4972000E+00, 0.4928600E+00, &
     & 0.4993800E+00, 0.4842200E+00, 0.4147452E+00, 0.4147452E+00 /
      data (ref_adm(26,iz,26,12),iz = 1,20) / &
     & 0.4318200E+00, 0.4318200E+00, 0.4397600E+00, 0.4413800E+00, &
     & 0.4444800E+00, 0.4494600E+00, 0.4539900E+00, 0.4555200E+00, &
     & 0.4561400E+00, 0.4638900E+00, 0.4652700E+00, 0.4707900E+00, &
     & 0.4765200E+00, 0.4792100E+00, 0.4951100E+00, 0.5146200E+00, &
     & 0.5032000E+00, 0.4938300E+00, 0.4152190E+00, 0.4152190E+00 /
      data (ref_adm(26,iz,27,12),iz = 1,20) / &
     & 0.4317300E+00, 0.4317300E+00, 0.4392700E+00, 0.4392700E+00, &
     & 0.4549300E+00, 0.4561700E+00, 0.4680000E+00, 0.4842000E+00, &
     & 0.4979700E+00, 0.5055700E+00, 0.5012900E+00, 0.4991200E+00, &
     & 0.4970700E+00, 0.4972700E+00, 0.5035300E+00, 0.5190100E+00, &
     & 0.5033400E+00, 0.4792900E+00, 0.3889700E+00, 0.3889700E+00 /
      data (ref_adm(26,iz,28,12),iz = 1,20) / &
     & 0.4294800E+00, 0.4294800E+00, 0.4285800E+00, 0.4347000E+00, &
     & 0.4298200E+00, 0.4211000E+00, 0.4479200E+00, 0.4492400E+00, &
     & 0.4614100E+00, 0.4746500E+00, 0.4987200E+00, 0.5010000E+00, &
     & 0.5185500E+00, 0.5293200E+00, 0.5303700E+00, 0.5171200E+00, &
     & 0.5192900E+00, 0.4776300E+00, 0.4007600E+00, 0.4007600E+00 /
      data (ref_adm(26,iz,29,12),iz = 1,20) / &
     & 0.4326000E+00, 0.4326000E+00, 0.4252800E+00, 0.4209400E+00, &
     & 0.4326100E+00, 0.4337600E+00, 0.4361300E+00, 0.4583700E+00, &
     & 0.4597700E+00, 0.4687200E+00, 0.4874600E+00, 0.4961900E+00, &
     & 0.5117800E+00, 0.5368200E+00, 0.5400500E+00, 0.5233300E+00, &
     & 0.5177300E+00, 0.4934400E+00, 0.3975000E+00, 0.3975000E+00 /
      data (ref_adm(26,iz,30,12),iz = 1,20) / &
     & 0.4270400E+00, 0.4270400E+00, 0.4173100E+00, 0.4260300E+00, &
     & 0.4254100E+00, 0.4270200E+00, 0.4523500E+00, 0.4565900E+00, &
     & 0.4622600E+00, 0.4688900E+00, 0.4951700E+00, 0.5103300E+00, &
     & 0.5175000E+00, 0.5243500E+00, 0.5213000E+00, 0.5289200E+00, &
     & 0.5198100E+00, 0.4964600E+00, 0.4055300E+00, 0.4055300E+00 /
      data (ref_adm(26,iz,31,12),iz = 1,20) / &
     & 0.4250100E+00, 0.4250100E+00, 0.4335500E+00, 0.4303200E+00, &
     & 0.4273700E+00, 0.4354500E+00, 0.4521500E+00, 0.4628700E+00, &
     & 0.4632900E+00, 0.4654100E+00, 0.4869900E+00, 0.5057600E+00, &
     & 0.5155100E+00, 0.5234400E+00, 0.5318600E+00, 0.5202000E+00, &
     & 0.5093000E+00, 0.4953600E+00, 0.4032900E+00, 0.4032900E+00 /
      data (ref_adm(26,iz,32,12),iz = 1,20) / &
     & 0.4369400E+00, 0.4369400E+00, 0.4404600E+00, 0.4446200E+00, &
     & 0.4485900E+00, 0.4551000E+00, 0.4670800E+00, 0.4658100E+00, &
     & 0.4802400E+00, 0.4911600E+00, 0.4995500E+00, 0.5186400E+00, &
     & 0.5199700E+00, 0.5253700E+00, 0.5400900E+00, 0.5338700E+00, &
     & 0.5143900E+00, 0.4815400E+00, 0.3942600E+00, 0.3942600E+00 /
      data (ref_adm(26,iz,33,12),iz = 1,20) / &
     & 0.4247600E+00, 0.4247600E+00, 0.4242800E+00, 0.4282900E+00, &
     & 0.4382900E+00, 0.4333800E+00, 0.4457400E+00, 0.4443300E+00, &
     & 0.4578200E+00, 0.4706300E+00, 0.4887200E+00, 0.5103700E+00, &
     & 0.5046500E+00, 0.5176400E+00, 0.5285400E+00, 0.5259400E+00, &
     & 0.5015500E+00, 0.4674700E+00, 0.4042100E+00, 0.4042100E+00 /
      data (ref_adm(26,iz,34,12),iz = 1,20) / &
     & 0.4199000E+00, 0.4199000E+00, 0.4311700E+00, 0.4357300E+00, &
     & 0.4278400E+00, 0.4451900E+00, 0.4666100E+00, 0.4728700E+00, &
     & 0.4677200E+00, 0.4912400E+00, 0.4977500E+00, 0.5022800E+00, &
     & 0.5048300E+00, 0.5268500E+00, 0.5341800E+00, 0.5207300E+00, &
     & 0.4969800E+00, 0.4838100E+00, 0.4365100E+00, 0.4365100E+00 /
      data (ref_adm(26,iz,35,12),iz = 1,20) / &
     & 0.4254900E+00, 0.4254900E+00, 0.4168200E+00, 0.4219000E+00, &
     & 0.4272700E+00, 0.4395500E+00, 0.4633200E+00, 0.4712900E+00, &
     & 0.4764900E+00, 0.4882300E+00, 0.4983600E+00, 0.5055000E+00, &
     & 0.5212100E+00, 0.5190800E+00, 0.5207500E+00, 0.5273400E+00, &
     & 0.5161300E+00, 0.5035700E+00, 0.4152500E+00, 0.4152500E+00 /
      data (ref_adm(26,iz,36,12),iz = 1,20) / &
     & 0.4219400E+00, 0.4219400E+00, 0.4087300E+00, 0.4088500E+00, &
     & 0.4246300E+00, 0.4355900E+00, 0.4581900E+00, 0.4741300E+00, &
     & 0.4793200E+00, 0.4853900E+00, 0.5013600E+00, 0.5277200E+00, &
     & 0.5317200E+00, 0.5329300E+00, 0.5359200E+00, 0.5448800E+00, &
     & 0.5319300E+00, 0.4969800E+00, 0.4133600E+00, 0.4133600E+00 /
      data (ref_adm(26,iz,37,12),iz = 1,20) / &
     & 0.4140700E+00, 0.4140700E+00, 0.4251800E+00, 0.4260100E+00, &
     & 0.4250900E+00, 0.4311800E+00, 0.4397500E+00, 0.4493700E+00, &
     & 0.4741500E+00, 0.4996600E+00, 0.5065200E+00, 0.5345700E+00, &
     & 0.5370000E+00, 0.5400500E+00, 0.5388200E+00, 0.5446000E+00, &
     & 0.5344300E+00, 0.4984900E+00, 0.4244900E+00, 0.4244900E+00 /
      data (ref_adm(26,iz,38,12),iz = 1,20) / &
     & 0.4140700E+00, 0.4140700E+00, 0.4251800E+00, 0.4260100E+00, &
     & 0.4250900E+00, 0.4311800E+00, 0.4397500E+00, 0.4493700E+00, &
     & 0.4741500E+00, 0.4996600E+00, 0.5065200E+00, 0.5345700E+00, &
     & 0.5370000E+00, 0.5400500E+00, 0.5388200E+00, 0.5446000E+00, &
     & 0.5344300E+00, 0.4984900E+00, 0.4244900E+00, 0.4244900E+00 /
! Solar Zenith Angle 60.0 Albedo  0.5192102E+00
      data (ref_adm(26,iz, 1,13),iz = 1,20) / &
     & 0.4433600E+00, 0.4433600E+00, 0.4338400E+00, 0.4488700E+00, &
     & 0.4529100E+00, 0.4694600E+00, 0.4880300E+00, 0.5161200E+00, &
     & 0.5360100E+00, 0.5646700E+00, 0.6177800E+00, 0.6631400E+00, &
     & 0.7467000E+00, 0.8296700E+00, 0.8960600E+00, 0.9787400E+00, &
     & 0.1106400E+01, 0.1196700E+01, 0.1034800E+01, 0.1034800E+01 /
      data (ref_adm(26,iz, 2,13),iz = 1,20) / &
     & 0.4433600E+00, 0.4433600E+00, 0.4338400E+00, 0.4488700E+00, &
     & 0.4529100E+00, 0.4694600E+00, 0.4880300E+00, 0.5161200E+00, &
     & 0.5360100E+00, 0.5646700E+00, 0.6177800E+00, 0.6631400E+00, &
     & 0.7467000E+00, 0.8296700E+00, 0.8960600E+00, 0.9787400E+00, &
     & 0.1106400E+01, 0.1196700E+01, 0.1034800E+01, 0.1034800E+01 /
      data (ref_adm(26,iz, 3,13),iz = 1,20) / &
     & 0.4415500E+00, 0.4415500E+00, 0.4349000E+00, 0.4299800E+00, &
     & 0.4536400E+00, 0.4652700E+00, 0.4927100E+00, 0.5047800E+00, &
     & 0.5305300E+00, 0.5628100E+00, 0.6014300E+00, 0.6605100E+00, &
     & 0.7325500E+00, 0.7877000E+00, 0.8619900E+00, 0.9749000E+00, &
     & 0.1086100E+01, 0.1189700E+01, 0.1020000E+01, 0.1020000E+01 /
      data (ref_adm(26,iz, 4,13),iz = 1,20) / &
     & 0.4354000E+00, 0.4354000E+00, 0.4396000E+00, 0.4373500E+00, &
     & 0.4489400E+00, 0.4684600E+00, 0.4742400E+00, 0.5009700E+00, &
     & 0.5285000E+00, 0.5578300E+00, 0.5865300E+00, 0.6369500E+00, &
     & 0.7152100E+00, 0.7690700E+00, 0.8448700E+00, 0.9448800E+00, &
     & 0.1034000E+01, 0.1131700E+01, 0.9558400E+00, 0.9558400E+00 /
      data (ref_adm(26,iz, 5,13),iz = 1,20) / &
     & 0.4375500E+00, 0.4375500E+00, 0.4393800E+00, 0.4358400E+00, &
     & 0.4484000E+00, 0.4649000E+00, 0.4755100E+00, 0.4821000E+00, &
     & 0.5196600E+00, 0.5506500E+00, 0.5773000E+00, 0.6207700E+00, &
     & 0.6910900E+00, 0.7486000E+00, 0.8290000E+00, 0.9139200E+00, &
     & 0.9873000E+00, 0.1023800E+01, 0.8881300E+00, 0.8881300E+00 /
      data (ref_adm(26,iz, 6,13),iz = 1,20) / &
     & 0.4310200E+00, 0.4310200E+00, 0.4326500E+00, 0.4307500E+00, &
     & 0.4485600E+00, 0.4616800E+00, 0.4662700E+00, 0.4840200E+00, &
     & 0.5111300E+00, 0.5416400E+00, 0.5806800E+00, 0.6242500E+00, &
     & 0.6724100E+00, 0.7398400E+00, 0.8089900E+00, 0.8743800E+00, &
     & 0.9622100E+00, 0.9351900E+00, 0.9076200E+00, 0.9076200E+00 /
      data (ref_adm(26,iz, 7,13),iz = 1,20) / &
     & 0.4347300E+00, 0.4347300E+00, 0.4399900E+00, 0.4401800E+00, &
     & 0.4485100E+00, 0.4619000E+00, 0.4730100E+00, 0.4913600E+00, &
     & 0.5096800E+00, 0.5363900E+00, 0.5809000E+00, 0.6134800E+00, &
     & 0.6632300E+00, 0.7153900E+00, 0.7828400E+00, 0.8490900E+00, &
     & 0.9363900E+00, 0.9178000E+00, 0.7926600E+00, 0.7926600E+00 /
      data (ref_adm(26,iz, 8,13),iz = 1,20) / &
     & 0.4194300E+00, 0.4194300E+00, 0.4239600E+00, 0.4284400E+00, &
     & 0.4359600E+00, 0.4559900E+00, 0.4828400E+00, 0.5005500E+00, &
     & 0.5030100E+00, 0.5220400E+00, 0.5663300E+00, 0.6010200E+00, &
     & 0.6534500E+00, 0.7046300E+00, 0.7460200E+00, 0.8254700E+00, &
     & 0.8561800E+00, 0.8682000E+00, 0.7053335E+00, 0.7053335E+00 /
      data (ref_adm(26,iz, 9,13),iz = 1,20) / &
     & 0.4096300E+00, 0.4096300E+00, 0.4258300E+00, 0.4222100E+00, &
     & 0.4392900E+00, 0.4718700E+00, 0.4927500E+00, 0.4886400E+00, &
     & 0.5057900E+00, 0.5156900E+00, 0.5567500E+00, 0.5901900E+00, &
     & 0.6170200E+00, 0.6669600E+00, 0.6983100E+00, 0.7562100E+00, &
     & 0.8037700E+00, 0.7924700E+00, 0.6718900E+00, 0.6718900E+00 /
      data (ref_adm(26,iz,10,13),iz = 1,20) / &
     & 0.4224500E+00, 0.4224500E+00, 0.4210200E+00, 0.4374400E+00, &
     & 0.4568700E+00, 0.4709500E+00, 0.4758000E+00, 0.4842400E+00, &
     & 0.4899000E+00, 0.5175000E+00, 0.5506700E+00, 0.5774400E+00, &
     & 0.6199000E+00, 0.6469000E+00, 0.6791800E+00, 0.7266700E+00, &
     & 0.7764300E+00, 0.7452600E+00, 0.6169800E+00, 0.6169800E+00 /
      data (ref_adm(26,iz,11,13),iz = 1,20) / &
     & 0.4160600E+00, 0.4160600E+00, 0.4248300E+00, 0.4323500E+00, &
     & 0.4373600E+00, 0.4510700E+00, 0.4692300E+00, 0.4699000E+00, &
     & 0.4898200E+00, 0.5177100E+00, 0.5352900E+00, 0.5595900E+00, &
     & 0.5923900E+00, 0.6227000E+00, 0.6514100E+00, 0.7020400E+00, &
     & 0.7335300E+00, 0.7045100E+00, 0.5541900E+00, 0.5541900E+00 /
      data (ref_adm(26,iz,12,13),iz = 1,20) / &
     & 0.4233600E+00, 0.4233600E+00, 0.4367800E+00, 0.4316300E+00, &
     & 0.4478300E+00, 0.4592800E+00, 0.4725900E+00, 0.4760000E+00, &
     & 0.4789900E+00, 0.5112300E+00, 0.5212400E+00, 0.5465300E+00, &
     & 0.5720800E+00, 0.6088200E+00, 0.6399200E+00, 0.6869500E+00, &
     & 0.6925000E+00, 0.6586800E+00, 0.5566900E+00, 0.5566900E+00 /
      data (ref_adm(26,iz,13,13),iz = 1,20) / &
     & 0.4355000E+00, 0.4355000E+00, 0.4329700E+00, 0.4467200E+00, &
     & 0.4526000E+00, 0.4542400E+00, 0.4553100E+00, 0.4690500E+00, &
     & 0.4809000E+00, 0.4934900E+00, 0.5079100E+00, 0.5219700E+00, &
     & 0.5444500E+00, 0.5764600E+00, 0.6144000E+00, 0.6211200E+00, &
     & 0.6505500E+00, 0.6019700E+00, 0.4616500E+00, 0.4616500E+00 /
      data (ref_adm(26,iz,14,13),iz = 1,20) / &
     & 0.4259800E+00, 0.4259800E+00, 0.4277200E+00, 0.4310300E+00, &
     & 0.4428000E+00, 0.4482700E+00, 0.4535500E+00, 0.4633300E+00, &
     & 0.4731400E+00, 0.4912000E+00, 0.5076400E+00, 0.5297800E+00, &
     & 0.5497000E+00, 0.5817700E+00, 0.6058900E+00, 0.5855800E+00, &
     & 0.6190300E+00, 0.5771500E+00, 0.4236500E+00, 0.4236500E+00 /
      data (ref_adm(26,iz,15,13),iz = 1,20) / &
     & 0.4287300E+00, 0.4287300E+00, 0.4277000E+00, 0.4284100E+00, &
     & 0.4335800E+00, 0.4426800E+00, 0.4519400E+00, 0.4712900E+00, &
     & 0.4843000E+00, 0.4916600E+00, 0.5060600E+00, 0.5215600E+00, &
     & 0.5378900E+00, 0.5582700E+00, 0.5795900E+00, 0.5809400E+00, &
     & 0.5910800E+00, 0.5685000E+00, 0.5296140E+00, 0.5296140E+00 /
      data (ref_adm(26,iz,16,13),iz = 1,20) / &
     & 0.4158200E+00, 0.4158200E+00, 0.4152900E+00, 0.4253700E+00, &
     & 0.4255400E+00, 0.4293200E+00, 0.4288100E+00, 0.4438300E+00, &
     & 0.4552600E+00, 0.4579200E+00, 0.4672600E+00, 0.4825500E+00, &
     & 0.4957600E+00, 0.5200400E+00, 0.5654500E+00, 0.5671500E+00, &
     & 0.5555000E+00, 0.5888800E+00, 0.5150951E+00, 0.5150951E+00 /
      data (ref_adm(26,iz,17,13),iz = 1,20) / &
     & 0.4214600E+00, 0.4214600E+00, 0.4224000E+00, 0.4138200E+00, &
     & 0.4226500E+00, 0.4380600E+00, 0.4506700E+00, 0.4709800E+00, &
     & 0.4835700E+00, 0.4810400E+00, 0.4923100E+00, 0.5026200E+00, &
     & 0.5141800E+00, 0.5243100E+00, 0.5504500E+00, 0.5580000E+00, &
     & 0.5510800E+00, 0.5451130E+00, 0.5011203E+00, 0.5011203E+00 /
      data (ref_adm(26,iz,18,13),iz = 1,20) / &
     & 0.4206400E+00, 0.4206400E+00, 0.4313300E+00, 0.4214300E+00, &
     & 0.4298100E+00, 0.4367200E+00, 0.4536700E+00, 0.4596500E+00, &
     & 0.4667000E+00, 0.4754500E+00, 0.4912000E+00, 0.5009500E+00, &
     & 0.5137000E+00, 0.5246600E+00, 0.5355200E+00, 0.5634000E+00, &
     & 0.5533300E+00, 0.5060549E+00, 0.4409334E+00, 0.4409334E+00 /
      data (ref_adm(26,iz,19,13),iz = 1,20) / &
     & 0.4189900E+00, 0.4189900E+00, 0.4419300E+00, 0.4429300E+00, &
     & 0.4281900E+00, 0.4403600E+00, 0.4522100E+00, 0.4519600E+00, &
     & 0.4656400E+00, 0.4848000E+00, 0.4887600E+00, 0.4881600E+00, &
     & 0.5014700E+00, 0.5202400E+00, 0.5288900E+00, 0.5364900E+00, &
     & 0.5174559E+00, 0.4937229E+00, 0.4337573E+00, 0.4337573E+00 /
      data (ref_adm(26,iz,20,13),iz = 1,20) / &
     & 0.4311000E+00, 0.4311000E+00, 0.4297400E+00, 0.4203700E+00, &
     & 0.4294800E+00, 0.4446100E+00, 0.4403000E+00, 0.4416700E+00, &
     & 0.4581600E+00, 0.4789100E+00, 0.4902000E+00, 0.4938200E+00, &
     & 0.5039800E+00, 0.5093100E+00, 0.5077700E+00, 0.4848600E+00, &
     & 0.5072422E+00, 0.4846748E+00, 0.4297940E+00, 0.4297940E+00 /
      data (ref_adm(26,iz,21,13),iz = 1,20) / &
     & 0.4266400E+00, 0.4266400E+00, 0.4111300E+00, 0.4240200E+00, &
     & 0.4325800E+00, 0.4385000E+00, 0.4467900E+00, 0.4454700E+00, &
     & 0.4574800E+00, 0.4873400E+00, 0.4850400E+00, 0.4866600E+00, &
     & 0.5002300E+00, 0.5070000E+00, 0.5133500E+00, 0.5131200E+00, &
     & 0.4993883E+00, 0.4774977E+00, 0.4280462E+00, 0.4280462E+00 /
      data (ref_adm(26,iz,22,13),iz = 1,20) / &
     & 0.4183400E+00, 0.4183400E+00, 0.4208700E+00, 0.4272600E+00, &
     & 0.4325800E+00, 0.4311900E+00, 0.4397200E+00, 0.4480400E+00, &
     & 0.4620200E+00, 0.4789300E+00, 0.4946500E+00, 0.4932500E+00, &
     & 0.5014800E+00, 0.5108800E+00, 0.5188300E+00, 0.5175000E+00, &
     & 0.5184467E+00, 0.4965087E+00, 0.4336052E+00, 0.4336052E+00 /
      data (ref_adm(26,iz,23,13),iz = 1,20) / &
     & 0.4236900E+00, 0.4236900E+00, 0.4171300E+00, 0.4211400E+00, &
     & 0.4385700E+00, 0.4400000E+00, 0.4485100E+00, 0.4587300E+00, &
     & 0.4600800E+00, 0.4701200E+00, 0.4919600E+00, 0.4951400E+00, &
     & 0.5067700E+00, 0.5314800E+00, 0.5158800E+00, 0.5102000E+00, &
     & 0.5159200E+00, 0.4868971E+00, 0.4308218E+00, 0.4308218E+00 /
      data (ref_adm(26,iz,24,13),iz = 1,20) / &
     & 0.4111900E+00, 0.4111900E+00, 0.3941900E+00, 0.3948500E+00, &
     & 0.4011100E+00, 0.4095900E+00, 0.4208800E+00, 0.4354200E+00, &
     & 0.4508200E+00, 0.4559500E+00, 0.4827200E+00, 0.4956400E+00, &
     & 0.5106700E+00, 0.5120600E+00, 0.5099600E+00, 0.5202500E+00, &
     & 0.5374100E+00, 0.4796655E+00, 0.4293436E+00, 0.4293436E+00 /
      data (ref_adm(26,iz,25,13),iz = 1,20) / &
     & 0.4261100E+00, 0.4261100E+00, 0.4331700E+00, 0.4344600E+00, &
     & 0.4381900E+00, 0.4413300E+00, 0.4441000E+00, 0.4442000E+00, &
     & 0.4542800E+00, 0.4666600E+00, 0.4629500E+00, 0.4738100E+00, &
     & 0.4771700E+00, 0.4863000E+00, 0.5030400E+00, 0.5230700E+00, &
     & 0.5405500E+00, 0.5395700E+00, 0.4294034E+00, 0.4294034E+00 /
      data (ref_adm(26,iz,26,13),iz = 1,20) / &
     & 0.4293200E+00, 0.4293200E+00, 0.4331700E+00, 0.4370400E+00, &
     & 0.4404300E+00, 0.4412900E+00, 0.4455600E+00, 0.4529100E+00, &
     & 0.4597500E+00, 0.4629900E+00, 0.4694300E+00, 0.4773900E+00, &
     & 0.4822600E+00, 0.4900400E+00, 0.4965800E+00, 0.5213400E+00, &
     & 0.5310500E+00, 0.4975900E+00, 0.4308415E+00, 0.4308415E+00 /
      data (ref_adm(26,iz,27,13),iz = 1,20) / &
     & 0.4327300E+00, 0.4327300E+00, 0.4306600E+00, 0.4266700E+00, &
     & 0.4393900E+00, 0.4301000E+00, 0.4440800E+00, 0.4514300E+00, &
     & 0.4590300E+00, 0.4734300E+00, 0.4914000E+00, 0.4939100E+00, &
     & 0.5026500E+00, 0.5080300E+00, 0.5094600E+00, 0.5217500E+00, &
     & 0.5267600E+00, 0.5119500E+00, 0.4394200E+00, 0.4394200E+00 /
      data (ref_adm(26,iz,28,13),iz = 1,20) / &
     & 0.4278900E+00, 0.4278900E+00, 0.4282400E+00, 0.4261400E+00, &
     & 0.4286200E+00, 0.4352200E+00, 0.4416900E+00, 0.4631400E+00, &
     & 0.4602000E+00, 0.4688200E+00, 0.4916400E+00, 0.4956700E+00, &
     & 0.5117000E+00, 0.5201400E+00, 0.5245600E+00, 0.5326900E+00, &
     & 0.5257500E+00, 0.5129800E+00, 0.4382000E+00, 0.4382000E+00 /
      data (ref_adm(26,iz,29,13),iz = 1,20) / &
     & 0.4275400E+00, 0.4275400E+00, 0.4178300E+00, 0.4240700E+00, &
     & 0.4273100E+00, 0.4317900E+00, 0.4511400E+00, 0.4522700E+00, &
     & 0.4731200E+00, 0.4710000E+00, 0.4888600E+00, 0.5001800E+00, &
     & 0.5098100E+00, 0.5198000E+00, 0.5335600E+00, 0.5509200E+00, &
     & 0.5541600E+00, 0.5092800E+00, 0.4286700E+00, 0.4286700E+00 /
      data (ref_adm(26,iz,30,13),iz = 1,20) / &
     & 0.4120600E+00, 0.4120600E+00, 0.4137600E+00, 0.4296300E+00, &
     & 0.4404000E+00, 0.4494900E+00, 0.4557100E+00, 0.4584300E+00, &
     & 0.4682900E+00, 0.4713300E+00, 0.4927500E+00, 0.4906000E+00, &
     & 0.5111500E+00, 0.5276500E+00, 0.5257300E+00, 0.5377100E+00, &
     & 0.5511700E+00, 0.5220900E+00, 0.4262300E+00, 0.4262300E+00 /
      data (ref_adm(26,iz,31,13),iz = 1,20) / &
     & 0.4194700E+00, 0.4194700E+00, 0.4248000E+00, 0.4279600E+00, &
     & 0.4366300E+00, 0.4427000E+00, 0.4516000E+00, 0.4601700E+00, &
     & 0.4692700E+00, 0.4795400E+00, 0.4866500E+00, 0.4947300E+00, &
     & 0.5038600E+00, 0.5181900E+00, 0.5272900E+00, 0.5433500E+00, &
     & 0.5506700E+00, 0.5326600E+00, 0.4563300E+00, 0.4563300E+00 /
      data (ref_adm(26,iz,32,13),iz = 1,20) / &
     & 0.4276600E+00, 0.4276600E+00, 0.4364100E+00, 0.4384700E+00, &
     & 0.4420000E+00, 0.4458200E+00, 0.4565200E+00, 0.4635000E+00, &
     & 0.4703500E+00, 0.4778500E+00, 0.4890600E+00, 0.5013200E+00, &
     & 0.5232400E+00, 0.5402300E+00, 0.5435900E+00, 0.5586100E+00, &
     & 0.5700200E+00, 0.5257100E+00, 0.4472500E+00, 0.4472500E+00 /
      data (ref_adm(26,iz,33,13),iz = 1,20) / &
     & 0.4281700E+00, 0.4281700E+00, 0.4136800E+00, 0.4311100E+00, &
     & 0.4402100E+00, 0.4596000E+00, 0.4589600E+00, 0.4664600E+00, &
     & 0.4706900E+00, 0.4745400E+00, 0.4948400E+00, 0.5001300E+00, &
     & 0.5227700E+00, 0.5386000E+00, 0.5425000E+00, 0.5581100E+00, &
     & 0.5780700E+00, 0.5334000E+00, 0.4425900E+00, 0.4425900E+00 /
      data (ref_adm(26,iz,34,13),iz = 1,20) / &
     & 0.4200400E+00, 0.4200400E+00, 0.4297700E+00, 0.4364000E+00, &
     & 0.4463100E+00, 0.4584900E+00, 0.4616300E+00, 0.4717200E+00, &
     & 0.4759200E+00, 0.4842200E+00, 0.5010100E+00, 0.5148500E+00, &
     & 0.5156000E+00, 0.5406500E+00, 0.5475200E+00, 0.5612800E+00, &
     & 0.5689300E+00, 0.5269800E+00, 0.4356300E+00, 0.4356300E+00 /
      data (ref_adm(26,iz,35,13),iz = 1,20) / &
     & 0.4379100E+00, 0.4379100E+00, 0.4427800E+00, 0.4270400E+00, &
     & 0.4469500E+00, 0.4663600E+00, 0.4659800E+00, 0.4683100E+00, &
     & 0.4730200E+00, 0.4867000E+00, 0.4887900E+00, 0.5097700E+00, &
     & 0.5247700E+00, 0.5437700E+00, 0.5557900E+00, 0.5469500E+00, &
     & 0.5613800E+00, 0.5423800E+00, 0.4375500E+00, 0.4375500E+00 /
      data (ref_adm(26,iz,36,13),iz = 1,20) / &
     & 0.4431300E+00, 0.4431300E+00, 0.4419900E+00, 0.4331500E+00, &
     & 0.4383100E+00, 0.4554300E+00, 0.4610000E+00, 0.4637500E+00, &
     & 0.4745400E+00, 0.4888800E+00, 0.4987800E+00, 0.5245400E+00, &
     & 0.5454000E+00, 0.5583300E+00, 0.5563100E+00, 0.5625700E+00, &
     & 0.5564500E+00, 0.5428600E+00, 0.4422500E+00, 0.4422500E+00 /
      data (ref_adm(26,iz,37,13),iz = 1,20) / &
     & 0.4467900E+00, 0.4467900E+00, 0.4459400E+00, 0.4337600E+00, &
     & 0.4346500E+00, 0.4371700E+00, 0.4543200E+00, 0.4667300E+00, &
     & 0.4781700E+00, 0.4783900E+00, 0.4975000E+00, 0.5264500E+00, &
     & 0.5474700E+00, 0.5681800E+00, 0.5458100E+00, 0.5562900E+00, &
     & 0.5507300E+00, 0.5443000E+00, 0.4328700E+00, 0.4328700E+00 /
      data (ref_adm(26,iz,38,13),iz = 1,20) / &
     & 0.4467900E+00, 0.4467900E+00, 0.4459400E+00, 0.4337600E+00, &
     & 0.4346500E+00, 0.4371700E+00, 0.4543200E+00, 0.4667300E+00, &
     & 0.4781700E+00, 0.4783900E+00, 0.4975000E+00, 0.5264500E+00, &
     & 0.5474700E+00, 0.5681800E+00, 0.5458100E+00, 0.5562900E+00, &
     & 0.5507300E+00, 0.5443000E+00, 0.4328700E+00, 0.4328700E+00 /
! Solar Zenith Angle 65.0 Albedo  0.5358240E+00
      data (ref_adm(26,iz, 1,14),iz = 1,20) / &
     & 0.4187100E+00, 0.4187100E+00, 0.4362300E+00, 0.4436400E+00, &
     & 0.4415300E+00, 0.4652400E+00, 0.4754000E+00, 0.5037500E+00, &
     & 0.5436700E+00, 0.5887800E+00, 0.6318500E+00, 0.6917400E+00, &
     & 0.7754800E+00, 0.9378300E+00, 0.1066300E+01, 0.1251200E+01, &
     & 0.1386300E+01, 0.1461700E+01, 0.1162710E+01, 0.1162710E+01 /
      data (ref_adm(26,iz, 2,14),iz = 1,20) / &
     & 0.4187100E+00, 0.4187100E+00, 0.4362300E+00, 0.4436400E+00, &
     & 0.4415300E+00, 0.4652400E+00, 0.4754000E+00, 0.5037500E+00, &
     & 0.5436700E+00, 0.5887800E+00, 0.6318500E+00, 0.6917400E+00, &
     & 0.7754800E+00, 0.9378300E+00, 0.1066300E+01, 0.1251200E+01, &
     & 0.1386300E+01, 0.1461700E+01, 0.1162710E+01, 0.1162710E+01 /
      data (ref_adm(26,iz, 3,14),iz = 1,20) / &
     & 0.4297600E+00, 0.4297600E+00, 0.4348600E+00, 0.4336400E+00, &
     & 0.4535300E+00, 0.4666900E+00, 0.4796100E+00, 0.5103900E+00, &
     & 0.5305200E+00, 0.5771000E+00, 0.6280600E+00, 0.6878300E+00, &
     & 0.7799000E+00, 0.8938000E+00, 0.1028200E+01, 0.1194800E+01, &
     & 0.1324200E+01, 0.1327000E+01, 0.6651525E+00, 0.6651525E+00 /
      data (ref_adm(26,iz, 4,14),iz = 1,20) / &
     & 0.4245100E+00, 0.4245100E+00, 0.4293000E+00, 0.4433200E+00, &
     & 0.4496400E+00, 0.4565800E+00, 0.4837300E+00, 0.5071900E+00, &
     & 0.5400700E+00, 0.5746100E+00, 0.6317200E+00, 0.6847200E+00, &
     & 0.7639600E+00, 0.8601300E+00, 0.9861600E+00, 0.1142800E+01, &
     & 0.1259900E+01, 0.1294200E+01, 0.1052479E+01, 0.1052479E+01 /
      data (ref_adm(26,iz, 5,14),iz = 1,20) / &
     & 0.4232500E+00, 0.4232500E+00, 0.4416500E+00, 0.4473600E+00, &
     & 0.4555600E+00, 0.4653000E+00, 0.4863200E+00, 0.5075300E+00, &
     & 0.5382700E+00, 0.5845700E+00, 0.6199200E+00, 0.6736800E+00, &
     & 0.7479400E+00, 0.8437200E+00, 0.9394000E+00, 0.1078600E+01, &
     & 0.1185400E+01, 0.1203800E+01, 0.9731524E+00, 0.9731524E+00 /
      data (ref_adm(26,iz, 6,14),iz = 1,20) / &
     & 0.4210500E+00, 0.4210500E+00, 0.4201400E+00, 0.4240800E+00, &
     & 0.4313900E+00, 0.4448300E+00, 0.4646200E+00, 0.4852700E+00, &
     & 0.5170600E+00, 0.5617000E+00, 0.6040200E+00, 0.6541700E+00, &
     & 0.7286200E+00, 0.8140200E+00, 0.9116600E+00, 0.1019800E+01, &
     & 0.1154800E+01, 0.1264000E+01, 0.1191500E+01, 0.1191500E+01 /
      data (ref_adm(26,iz, 7,14),iz = 1,20) / &
     & 0.4452600E+00, 0.4452600E+00, 0.4512300E+00, 0.4582500E+00, &
     & 0.4593600E+00, 0.4784500E+00, 0.5005100E+00, 0.5161800E+00, &
     & 0.5544800E+00, 0.5748000E+00, 0.6171300E+00, 0.6618700E+00, &
     & 0.7169700E+00, 0.7946800E+00, 0.8744800E+00, 0.9626800E+00, &
     & 0.1097500E+01, 0.1165000E+01, 0.1019700E+01, 0.1019700E+01 /
      data (ref_adm(26,iz, 8,14),iz = 1,20) / &
     & 0.4182900E+00, 0.4182900E+00, 0.4227800E+00, 0.4264000E+00, &
     & 0.4422500E+00, 0.4663100E+00, 0.4715400E+00, 0.4847200E+00, &
     & 0.4986500E+00, 0.5331500E+00, 0.5740300E+00, 0.6305400E+00, &
     & 0.6871200E+00, 0.7487100E+00, 0.8130800E+00, 0.8977800E+00, &
     & 0.1060600E+01, 0.1047900E+01, 0.9006900E+00, 0.9006900E+00 /
      data (ref_adm(26,iz, 9,14),iz = 1,20) / &
     & 0.4259300E+00, 0.4259300E+00, 0.4263100E+00, 0.4300100E+00, &
     & 0.4412400E+00, 0.4468700E+00, 0.4671800E+00, 0.4823800E+00, &
     & 0.5047600E+00, 0.5287600E+00, 0.5614600E+00, 0.6079700E+00, &
     & 0.6611000E+00, 0.7169000E+00, 0.7738700E+00, 0.8674200E+00, &
     & 0.9702400E+00, 0.9676400E+00, 0.8255700E+00, 0.8255700E+00 /
      data (ref_adm(26,iz,10,14),iz = 1,20) / &
     & 0.4231800E+00, 0.4231800E+00, 0.4245100E+00, 0.4387400E+00, &
     & 0.4445000E+00, 0.4474800E+00, 0.4560100E+00, 0.4817000E+00, &
     & 0.5070200E+00, 0.5280400E+00, 0.5608400E+00, 0.5936000E+00, &
     & 0.6385900E+00, 0.6802700E+00, 0.7312600E+00, 0.8232700E+00, &
     & 0.8795500E+00, 0.8672000E+00, 0.7505500E+00, 0.7505500E+00 /
      data (ref_adm(26,iz,11,14),iz = 1,20) / &
     & 0.4307900E+00, 0.4307900E+00, 0.4292000E+00, 0.4369300E+00, &
     & 0.4400500E+00, 0.4521300E+00, 0.4634600E+00, 0.4725100E+00, &
     & 0.4918000E+00, 0.5175800E+00, 0.5433800E+00, 0.5829800E+00, &
     & 0.6162900E+00, 0.6608400E+00, 0.6993000E+00, 0.7778200E+00, &
     & 0.8199700E+00, 0.7925500E+00, 0.6826900E+00, 0.6826900E+00 /
      data (ref_adm(26,iz,12,14),iz = 1,20) / &
     & 0.4273000E+00, 0.4273000E+00, 0.4277900E+00, 0.4233400E+00, &
     & 0.4400600E+00, 0.4486800E+00, 0.4689600E+00, 0.4788800E+00, &
     & 0.4809500E+00, 0.5046900E+00, 0.5283400E+00, 0.5684200E+00, &
     & 0.5925200E+00, 0.6380200E+00, 0.6749800E+00, 0.7360800E+00, &
     & 0.7595900E+00, 0.7389300E+00, 0.6384100E+00, 0.6384100E+00 /
      data (ref_adm(26,iz,13,14),iz = 1,20) / &
     & 0.4303300E+00, 0.4303300E+00, 0.4340400E+00, 0.4353900E+00, &
     & 0.4444300E+00, 0.4573500E+00, 0.4615400E+00, 0.4655800E+00, &
     & 0.4816800E+00, 0.5000900E+00, 0.5133100E+00, 0.5494200E+00, &
     & 0.5859300E+00, 0.6114300E+00, 0.6454500E+00, 0.6859900E+00, &
     & 0.7174100E+00, 0.6854100E+00, 0.5621000E+00, 0.5621000E+00 /
      data (ref_adm(26,iz,14,14),iz = 1,20) / &
     & 0.4332500E+00, 0.4332500E+00, 0.4383700E+00, 0.4452100E+00, &
     & 0.4502700E+00, 0.4518100E+00, 0.4594500E+00, 0.4685500E+00, &
     & 0.4800500E+00, 0.4925000E+00, 0.5127000E+00, 0.5376200E+00, &
     & 0.5653800E+00, 0.5973400E+00, 0.6117900E+00, 0.6509900E+00, &
     & 0.6727000E+00, 0.6540600E+00, 0.5543349E+00, 0.5543349E+00 /
      data (ref_adm(26,iz,15,14),iz = 1,20) / &
     & 0.4429500E+00, 0.4429500E+00, 0.4248200E+00, 0.4209200E+00, &
     & 0.4325100E+00, 0.4458700E+00, 0.4585100E+00, 0.4710200E+00, &
     & 0.4906400E+00, 0.5099800E+00, 0.5351400E+00, 0.5547200E+00, &
     & 0.5687700E+00, 0.5910200E+00, 0.5990800E+00, 0.6285800E+00, &
     & 0.6501200E+00, 0.6179000E+00, 0.5334709E+00, 0.5334709E+00 /
      data (ref_adm(26,iz,16,14),iz = 1,20) / &
     & 0.4015800E+00, 0.4015800E+00, 0.3865700E+00, 0.3992900E+00, &
     & 0.3960800E+00, 0.4056400E+00, 0.4109700E+00, 0.4261700E+00, &
     & 0.4408900E+00, 0.4526100E+00, 0.4672500E+00, 0.4867900E+00, &
     & 0.5039400E+00, 0.5344800E+00, 0.5710400E+00, 0.5988400E+00, &
     & 0.6417000E+00, 0.6932100E+00, 0.5151211E+00, 0.5151211E+00 /
      data (ref_adm(26,iz,17,14),iz = 1,20) / &
     & 0.4190600E+00, 0.4190600E+00, 0.4208100E+00, 0.4235700E+00, &
     & 0.4312600E+00, 0.4300500E+00, 0.4411700E+00, 0.4558600E+00, &
     & 0.4701200E+00, 0.4768000E+00, 0.4870400E+00, 0.4990900E+00, &
     & 0.5167200E+00, 0.5454100E+00, 0.5578800E+00, 0.5785900E+00, &
     & 0.6096400E+00, 0.5506033E+00, 0.4991623E+00, 0.4991623E+00 /
      data (ref_adm(26,iz,18,14),iz = 1,20) / &
     & 0.4152700E+00, 0.4152700E+00, 0.4157000E+00, 0.4232600E+00, &
     & 0.4273000E+00, 0.4266400E+00, 0.4316200E+00, 0.4510400E+00, &
     & 0.4710900E+00, 0.4859400E+00, 0.4851200E+00, 0.4956200E+00, &
     & 0.5125100E+00, 0.5310700E+00, 0.5368700E+00, 0.5563500E+00, &
     & 0.5680200E+00, 0.6114683E+00, 0.5767919E+00, 0.5767919E+00 /
      data (ref_adm(26,iz,19,14),iz = 1,20) / &
     & 0.4216500E+00, 0.4216500E+00, 0.4390200E+00, 0.4353400E+00, &
     & 0.4407100E+00, 0.4545600E+00, 0.4499200E+00, 0.4539400E+00, &
     & 0.4631700E+00, 0.4745100E+00, 0.4801700E+00, 0.4941500E+00, &
     & 0.5136400E+00, 0.5253800E+00, 0.5342500E+00, 0.5482200E+00, &
     & 0.5845138E+00, 0.5975143E+00, 0.5650224E+00, 0.5650224E+00 /
      data (ref_adm(26,iz,20,14),iz = 1,20) / &
     & 0.4305900E+00, 0.4305900E+00, 0.4144400E+00, 0.4296800E+00, &
     & 0.4302700E+00, 0.4411300E+00, 0.4408800E+00, 0.4424600E+00, &
     & 0.4531900E+00, 0.4647800E+00, 0.4759400E+00, 0.4941800E+00, &
     & 0.5113700E+00, 0.5183100E+00, 0.5299500E+00, 0.5374200E+00, &
     & 0.5749784E+00, 0.5875402E+00, 0.5582397E+00, 0.5582397E+00 /
      data (ref_adm(26,iz,21,14),iz = 1,20) / &
     & 0.4232900E+00, 0.4232900E+00, 0.4147200E+00, 0.4278300E+00, &
     & 0.4293300E+00, 0.4314300E+00, 0.4300000E+00, 0.4290700E+00, &
     & 0.4512100E+00, 0.4566800E+00, 0.4705200E+00, 0.4880800E+00, &
     & 0.5029500E+00, 0.5172900E+00, 0.5304200E+00, 0.5422000E+00, &
     & 0.5661288E+00, 0.5785557E+00, 0.5542322E+00, 0.5542322E+00 /
      data (ref_adm(26,iz,22,14),iz = 1,20) / &
     & 0.4228600E+00, 0.4228600E+00, 0.4221500E+00, 0.4172600E+00, &
     & 0.4275600E+00, 0.4333200E+00, 0.4321300E+00, 0.4396100E+00, &
     & 0.4461900E+00, 0.4612500E+00, 0.4788600E+00, 0.4783200E+00, &
     & 0.4946500E+00, 0.5164600E+00, 0.5262200E+00, 0.5426300E+00, &
     & 0.4809294E+00, 0.4605450E+00, 0.4215732E+00, 0.4215732E+00 /
      data (ref_adm(26,iz,23,14),iz = 1,20) / &
     & 0.4288200E+00, 0.4288200E+00, 0.4298600E+00, 0.4291000E+00, &
     & 0.4354000E+00, 0.4441200E+00, 0.4435800E+00, 0.4576200E+00, &
     & 0.4582700E+00, 0.4673200E+00, 0.4883600E+00, 0.4905900E+00, &
     & 0.4969600E+00, 0.5160400E+00, 0.5253800E+00, 0.5411200E+00, &
     & 0.4791631E+00, 0.4591645E+00, 0.4248528E+00, 0.4248528E+00 /
      data (ref_adm(26,iz,24,14),iz = 1,20) / &
     & 0.3866300E+00, 0.3866300E+00, 0.3880600E+00, 0.3883200E+00, &
     & 0.3926800E+00, 0.4014400E+00, 0.4081100E+00, 0.4187400E+00, &
     & 0.4265000E+00, 0.4358200E+00, 0.4434200E+00, 0.4571200E+00, &
     & 0.4833000E+00, 0.5085100E+00, 0.5188700E+00, 0.5401900E+00, &
     & 0.5623900E+00, 0.4606923E+00, 0.4304267E+00, 0.4304267E+00 /
      data (ref_adm(26,iz,25,14),iz = 1,20) / &
     & 0.4317000E+00, 0.4317000E+00, 0.4486400E+00, 0.4465200E+00, &
     & 0.4578300E+00, 0.4650500E+00, 0.4716800E+00, 0.4745800E+00, &
     & 0.4786300E+00, 0.4792200E+00, 0.4823500E+00, 0.4900300E+00, &
     & 0.4888600E+00, 0.4970400E+00, 0.5148900E+00, 0.5442600E+00, &
     & 0.5664400E+00, 0.5593900E+00, 0.4378500E+00, 0.4378500E+00 /
      data (ref_adm(26,iz,26,14),iz = 1,20) / &
     & 0.4338400E+00, 0.4338400E+00, 0.4324800E+00, 0.4390500E+00, &
     & 0.4420400E+00, 0.4451200E+00, 0.4513400E+00, 0.4571000E+00, &
     & 0.4565800E+00, 0.4640100E+00, 0.4748500E+00, 0.4827200E+00, &
     & 0.4894100E+00, 0.5018700E+00, 0.5122700E+00, 0.5468900E+00, &
     & 0.5504000E+00, 0.5499600E+00, 0.4476470E+00, 0.4476470E+00 /
      data (ref_adm(26,iz,27,14),iz = 1,20) / &
     & 0.4319700E+00, 0.4319700E+00, 0.4369000E+00, 0.4445500E+00, &
     & 0.4383400E+00, 0.4389400E+00, 0.4346100E+00, 0.4497400E+00, &
     & 0.4556200E+00, 0.4761600E+00, 0.4718800E+00, 0.4850900E+00, &
     & 0.4996000E+00, 0.5193000E+00, 0.5310100E+00, 0.5553100E+00, &
     & 0.5480200E+00, 0.5526500E+00, 0.4813900E+00, 0.4813900E+00 /
      data (ref_adm(26,iz,28,14),iz = 1,20) / &
     & 0.4233500E+00, 0.4233500E+00, 0.4264500E+00, 0.4261800E+00, &
     & 0.4341200E+00, 0.4355600E+00, 0.4426000E+00, 0.4572700E+00, &
     & 0.4630500E+00, 0.4807100E+00, 0.4871900E+00, 0.5028500E+00, &
     & 0.5108300E+00, 0.5295700E+00, 0.5451800E+00, 0.5623300E+00, &
     & 0.5602400E+00, 0.5580800E+00, 0.4924400E+00, 0.4924400E+00 /
      data (ref_adm(26,iz,29,14),iz = 1,20) / &
     & 0.4279400E+00, 0.4279400E+00, 0.4224400E+00, 0.4275300E+00, &
     & 0.4370800E+00, 0.4501700E+00, 0.4492100E+00, 0.4477000E+00, &
     & 0.4599100E+00, 0.4787100E+00, 0.4982500E+00, 0.5079100E+00, &
     & 0.5183400E+00, 0.5341300E+00, 0.5548700E+00, 0.5775400E+00, &
     & 0.5815500E+00, 0.5642700E+00, 0.4703500E+00, 0.4703500E+00 /
      data (ref_adm(26,iz,30,14),iz = 1,20) / &
     & 0.4225600E+00, 0.4225600E+00, 0.4204100E+00, 0.4242500E+00, &
     & 0.4303100E+00, 0.4441100E+00, 0.4551200E+00, 0.4589600E+00, &
     & 0.4589900E+00, 0.4828400E+00, 0.4987000E+00, 0.5035500E+00, &
     & 0.5175400E+00, 0.5321800E+00, 0.5558200E+00, 0.5792300E+00, &
     & 0.5954200E+00, 0.5779600E+00, 0.4934300E+00, 0.4934300E+00 /
      data (ref_adm(26,iz,31,14),iz = 1,20) / &
     & 0.4203400E+00, 0.4203400E+00, 0.4169900E+00, 0.4227900E+00, &
     & 0.4245600E+00, 0.4427200E+00, 0.4529300E+00, 0.4681700E+00, &
     & 0.4800500E+00, 0.4885100E+00, 0.5026100E+00, 0.5022400E+00, &
     & 0.5137900E+00, 0.5282500E+00, 0.5621000E+00, 0.5933300E+00, &
     & 0.5969200E+00, 0.5748800E+00, 0.5068500E+00, 0.5068500E+00 /
      data (ref_adm(26,iz,32,14),iz = 1,20) / &
     & 0.4259100E+00, 0.4259100E+00, 0.4364200E+00, 0.4417600E+00, &
     & 0.4472500E+00, 0.4548400E+00, 0.4712500E+00, 0.4838000E+00, &
     & 0.5001400E+00, 0.5090600E+00, 0.5199800E+00, 0.5224800E+00, &
     & 0.5341700E+00, 0.5504500E+00, 0.5731100E+00, 0.6076300E+00, &
     & 0.6181900E+00, 0.5965200E+00, 0.5071600E+00, 0.5071600E+00 /
      data (ref_adm(26,iz,33,14),iz = 1,20) / &
     & 0.4228500E+00, 0.4228500E+00, 0.4102600E+00, 0.4168000E+00, &
     & 0.4202000E+00, 0.4282800E+00, 0.4430800E+00, 0.4652900E+00, &
     & 0.4676700E+00, 0.4755500E+00, 0.4897600E+00, 0.5077200E+00, &
     & 0.5283000E+00, 0.5411100E+00, 0.5566300E+00, 0.5797000E+00, &
     & 0.6085700E+00, 0.5757400E+00, 0.4926000E+00, 0.4926000E+00 /
      data (ref_adm(26,iz,34,14),iz = 1,20) / &
     & 0.4245600E+00, 0.4245600E+00, 0.4244800E+00, 0.4199800E+00, &
     & 0.4252600E+00, 0.4434400E+00, 0.4586200E+00, 0.4739700E+00, &
     & 0.4789400E+00, 0.4807400E+00, 0.4934900E+00, 0.5234600E+00, &
     & 0.5448800E+00, 0.5460700E+00, 0.5648200E+00, 0.5868900E+00, &
     & 0.6297800E+00, 0.5771000E+00, 0.4921000E+00, 0.4921000E+00 /
      data (ref_adm(26,iz,35,14),iz = 1,20) / &
     & 0.4300400E+00, 0.4300400E+00, 0.4233000E+00, 0.4210900E+00, &
     & 0.4263300E+00, 0.4356200E+00, 0.4540500E+00, 0.4759700E+00, &
     & 0.4817500E+00, 0.4939400E+00, 0.5006500E+00, 0.5216900E+00, &
     & 0.5427200E+00, 0.5641700E+00, 0.5815500E+00, 0.6018600E+00, &
     & 0.6039800E+00, 0.5928600E+00, 0.4870000E+00, 0.4870000E+00 /
      data (ref_adm(26,iz,36,14),iz = 1,20) / &
     & 0.4272300E+00, 0.4272300E+00, 0.4212500E+00, 0.4298200E+00, &
     & 0.4261000E+00, 0.4401500E+00, 0.4629300E+00, 0.4703400E+00, &
     & 0.4784200E+00, 0.4985400E+00, 0.5054200E+00, 0.5282000E+00, &
     & 0.5442000E+00, 0.5672700E+00, 0.5874300E+00, 0.6059900E+00, &
     & 0.6035500E+00, 0.5916900E+00, 0.4962700E+00, 0.4962700E+00 /
      data (ref_adm(26,iz,37,14),iz = 1,20) / &
     & 0.4270900E+00, 0.4270900E+00, 0.4292000E+00, 0.4300800E+00, &
     & 0.4421900E+00, 0.4575300E+00, 0.4576100E+00, 0.4549200E+00, &
     & 0.4693800E+00, 0.4963800E+00, 0.5145200E+00, 0.5179600E+00, &
     & 0.5428500E+00, 0.5810500E+00, 0.5959100E+00, 0.6002900E+00, &
     & 0.6010500E+00, 0.5890700E+00, 0.4989000E+00, 0.4989000E+00 /
      data (ref_adm(26,iz,38,14),iz = 1,20) / &
     & 0.4270900E+00, 0.4270900E+00, 0.4292000E+00, 0.4300800E+00, &
     & 0.4421900E+00, 0.4575300E+00, 0.4576100E+00, 0.4549200E+00, &
     & 0.4693800E+00, 0.4963800E+00, 0.5145200E+00, 0.5179600E+00, &
     & 0.5428500E+00, 0.5810500E+00, 0.5959100E+00, 0.6002900E+00, &
     & 0.6010500E+00, 0.5890700E+00, 0.4989000E+00, 0.4989000E+00 /
! Solar Zenith Angle 70.0 Albedo  0.5582950E+00
      data (ref_adm(26,iz, 1,15),iz = 1,20) / &
     & 0.4192800E+00, 0.4192800E+00, 0.4206300E+00, 0.4314600E+00, &
     & 0.4508000E+00, 0.4638600E+00, 0.4790400E+00, 0.5207900E+00, &
     & 0.5605400E+00, 0.5979300E+00, 0.6739600E+00, 0.7584100E+00, &
     & 0.8781700E+00, 0.1047500E+01, 0.1213300E+01, 0.1374400E+01, &
     & 0.1595766E+01, 0.1776955E+01, 0.1415811E+01, 0.1415811E+01 /
      data (ref_adm(26,iz, 2,15),iz = 1,20) / &
     & 0.4192800E+00, 0.4192800E+00, 0.4206300E+00, 0.4314600E+00, &
     & 0.4508000E+00, 0.4638600E+00, 0.4790400E+00, 0.5207900E+00, &
     & 0.5605400E+00, 0.5979300E+00, 0.6739600E+00, 0.7584100E+00, &
     & 0.8781700E+00, 0.1047500E+01, 0.1213300E+01, 0.1374400E+01, &
     & 0.1595766E+01, 0.1776955E+01, 0.1415811E+01, 0.1415811E+01 /
      data (ref_adm(26,iz, 3,15),iz = 1,20) / &
     & 0.4100200E+00, 0.4100200E+00, 0.4195000E+00, 0.4243700E+00, &
     & 0.4454300E+00, 0.4655500E+00, 0.4920400E+00, 0.5144400E+00, &
     & 0.5456700E+00, 0.6050200E+00, 0.6659800E+00, 0.7501100E+00, &
     & 0.8521100E+00, 0.1009100E+01, 0.1157100E+01, 0.1330400E+01, &
     & 0.1564719E+01, 0.1727949E+01, 0.6874158E+00, 0.6874158E+00 /
      data (ref_adm(26,iz, 4,15),iz = 1,20) / &
     & 0.4212000E+00, 0.4212000E+00, 0.4192200E+00, 0.4314400E+00, &
     & 0.4480300E+00, 0.4689600E+00, 0.4870300E+00, 0.5149300E+00, &
     & 0.5381800E+00, 0.5978900E+00, 0.6560300E+00, 0.7328200E+00, &
     & 0.8323100E+00, 0.9686300E+00, 0.1114900E+01, 0.1264400E+01, &
     & 0.1402900E+01, 0.1633008E+01, 0.1261638E+01, 0.1261638E+01 /
      data (ref_adm(26,iz, 5,15),iz = 1,20) / &
     & 0.4256700E+00, 0.4256700E+00, 0.4296300E+00, 0.4321100E+00, &
     & 0.4538000E+00, 0.4694300E+00, 0.4854100E+00, 0.5114400E+00, &
     & 0.5470600E+00, 0.5826900E+00, 0.6444900E+00, 0.7276600E+00, &
     & 0.8196800E+00, 0.9536700E+00, 0.1083100E+01, 0.1175200E+01, &
     & 0.1200400E+01, 0.1513594E+01, 0.1153516E+01, 0.1153516E+01 /
      data (ref_adm(26,iz, 6,15),iz = 1,20) / &
     & 0.4039000E+00, 0.4039000E+00, 0.4118200E+00, 0.4159400E+00, &
     & 0.4337700E+00, 0.4544700E+00, 0.4745200E+00, 0.5018900E+00, &
     & 0.5401200E+00, 0.5794000E+00, 0.6300900E+00, 0.7079700E+00, &
     & 0.8041100E+00, 0.9168800E+00, 0.1019700E+01, 0.1144900E+01, &
     & 0.1387000E+01, 0.1645500E+01, 0.1327200E+01, 0.1327200E+01 /
      data (ref_adm(26,iz, 7,15),iz = 1,20) / &
     & 0.4178200E+00, 0.4178200E+00, 0.4195300E+00, 0.4289000E+00, &
     & 0.4396200E+00, 0.4555900E+00, 0.4771700E+00, 0.5114600E+00, &
     & 0.5443800E+00, 0.5828500E+00, 0.6290000E+00, 0.6927100E+00, &
     & 0.7737500E+00, 0.8758800E+00, 0.9775300E+00, 0.1107100E+01, &
     & 0.1292100E+01, 0.1420700E+01, 0.1498900E+01, 0.1498900E+01 /
      data (ref_adm(26,iz, 8,15),iz = 1,20) / &
     & 0.4078200E+00, 0.4078200E+00, 0.4106700E+00, 0.4284300E+00, &
     & 0.4352500E+00, 0.4473700E+00, 0.4682200E+00, 0.5054000E+00, &
     & 0.5274000E+00, 0.5702800E+00, 0.6163100E+00, 0.6717900E+00, &
     & 0.7385300E+00, 0.8169400E+00, 0.9148200E+00, 0.1039100E+01, &
     & 0.1218700E+01, 0.1244800E+01, 0.9438800E+00, 0.9438800E+00 /
      data (ref_adm(26,iz, 9,15),iz = 1,20) / &
     & 0.4134700E+00, 0.4134700E+00, 0.4166700E+00, 0.4284600E+00, &
     & 0.4316200E+00, 0.4464400E+00, 0.4694400E+00, 0.4954900E+00, &
     & 0.5264200E+00, 0.5521200E+00, 0.5996100E+00, 0.6460400E+00, &
     & 0.7153000E+00, 0.7835600E+00, 0.8629600E+00, 0.9939400E+00, &
     & 0.1124800E+01, 0.1119400E+01, 0.9710600E+00, 0.9710600E+00 /
      data (ref_adm(26,iz,10,15),iz = 1,20) / &
     & 0.4124300E+00, 0.4124300E+00, 0.4251400E+00, 0.4209200E+00, &
     & 0.4227600E+00, 0.4474600E+00, 0.4697700E+00, 0.4864500E+00, &
     & 0.5160900E+00, 0.5450400E+00, 0.5861200E+00, 0.6227300E+00, &
     & 0.6787400E+00, 0.7413100E+00, 0.8035200E+00, 0.9203500E+00, &
     & 0.1023500E+01, 0.9746900E+00, 0.8656200E+00, 0.8656200E+00 /
      data (ref_adm(26,iz,11,15),iz = 1,20) / &
     & 0.4149600E+00, 0.4149600E+00, 0.4181800E+00, 0.4285300E+00, &
     & 0.4391100E+00, 0.4524600E+00, 0.4723000E+00, 0.4859800E+00, &
     & 0.5078900E+00, 0.5386100E+00, 0.5752200E+00, 0.6038800E+00, &
     & 0.6539500E+00, 0.7097300E+00, 0.7646800E+00, 0.8683300E+00, &
     & 0.9280900E+00, 0.8970700E+00, 0.7770400E+00, 0.7770400E+00 /
      data (ref_adm(26,iz,12,15),iz = 1,20) / &
     & 0.4120300E+00, 0.4120300E+00, 0.4180600E+00, 0.4268300E+00, &
     & 0.4422700E+00, 0.4565100E+00, 0.4598100E+00, 0.4782600E+00, &
     & 0.5041400E+00, 0.5275200E+00, 0.5657700E+00, 0.5861700E+00, &
     & 0.6292600E+00, 0.6824100E+00, 0.7307400E+00, 0.8176600E+00, &
     & 0.8705700E+00, 0.8473400E+00, 0.6904900E+00, 0.6904900E+00 /
      data (ref_adm(26,iz,13,15),iz = 1,20) / &
     & 0.4196300E+00, 0.4196300E+00, 0.4230600E+00, 0.4245600E+00, &
     & 0.4378800E+00, 0.4469500E+00, 0.4597400E+00, 0.4853700E+00, &
     & 0.4946700E+00, 0.5202000E+00, 0.5406400E+00, 0.5714100E+00, &
     & 0.6057800E+00, 0.6584200E+00, 0.6943300E+00, 0.7593800E+00, &
     & 0.8196300E+00, 0.7871900E+00, 0.6629900E+00, 0.6629900E+00 /
      data (ref_adm(26,iz,14,15),iz = 1,20) / &
     & 0.4207000E+00, 0.4207000E+00, 0.4305700E+00, 0.4397900E+00, &
     & 0.4479600E+00, 0.4565300E+00, 0.4667700E+00, 0.4782400E+00, &
     & 0.4944300E+00, 0.5094200E+00, 0.5265300E+00, 0.5505700E+00, &
     & 0.5764900E+00, 0.6126700E+00, 0.6582800E+00, 0.7141600E+00, &
     & 0.7462500E+00, 0.7496600E+00, 0.6030033E+00, 0.6030033E+00 /
      data (ref_adm(26,iz,15,15),iz = 1,20) / &
     & 0.4359900E+00, 0.4359900E+00, 0.4245900E+00, 0.4236700E+00, &
     & 0.4328600E+00, 0.4471700E+00, 0.4587300E+00, 0.4730700E+00, &
     & 0.4935600E+00, 0.5176200E+00, 0.5425000E+00, 0.5759100E+00, &
     & 0.6033900E+00, 0.6287700E+00, 0.6434500E+00, 0.6683200E+00, &
     & 0.6943100E+00, 0.7078400E+00, 0.5771072E+00, 0.5771072E+00 /
      data (ref_adm(26,iz,16,15),iz = 1,20) / &
     & 0.3991700E+00, 0.3991700E+00, 0.3915500E+00, 0.3888800E+00, &
     & 0.3974200E+00, 0.4058400E+00, 0.4177100E+00, 0.4294000E+00, &
     & 0.4429700E+00, 0.4630300E+00, 0.4795500E+00, 0.5012200E+00, &
     & 0.5301500E+00, 0.5668400E+00, 0.6102500E+00, 0.6396100E+00, &
     & 0.6689900E+00, 0.7631400E+00, 0.5551208E+00, 0.5551208E+00 /
      data (ref_adm(26,iz,17,15),iz = 1,20) / &
     & 0.4098200E+00, 0.4098200E+00, 0.4191200E+00, 0.4256200E+00, &
     & 0.4251000E+00, 0.4412900E+00, 0.4452000E+00, 0.4533100E+00, &
     & 0.4637500E+00, 0.4842000E+00, 0.4962900E+00, 0.5159000E+00, &
     & 0.5552800E+00, 0.5711800E+00, 0.5969800E+00, 0.6147000E+00, &
     & 0.6323000E+00, 0.5857933E+00, 0.5362516E+00, 0.5362516E+00 /
      data (ref_adm(26,iz,18,15),iz = 1,20) / &
     & 0.4080400E+00, 0.4080400E+00, 0.4189500E+00, 0.4237700E+00, &
     & 0.4273900E+00, 0.4364000E+00, 0.4429500E+00, 0.4504500E+00, &
     & 0.4670000E+00, 0.4858400E+00, 0.4994900E+00, 0.5142400E+00, &
     & 0.5399500E+00, 0.5622000E+00, 0.5764300E+00, 0.5943700E+00, &
     & 0.6433600E+00, 0.6579798E+00, 0.6224323E+00, 0.6224323E+00 /
      data (ref_adm(26,iz,19,15),iz = 1,20) / &
     & 0.4087400E+00, 0.4087400E+00, 0.4273700E+00, 0.4257800E+00, &
     & 0.4323000E+00, 0.4416900E+00, 0.4523400E+00, 0.4454000E+00, &
     & 0.4655100E+00, 0.4769000E+00, 0.4980200E+00, 0.5185600E+00, &
     & 0.5328200E+00, 0.5498400E+00, 0.5699000E+00, 0.5675600E+00, &
     & 0.6222194E+00, 0.6406000E+00, 0.6087001E+00, 0.6087001E+00 /
      data (ref_adm(26,iz,20,15),iz = 1,20) / &
     & 0.4240300E+00, 0.4240300E+00, 0.4121300E+00, 0.4144600E+00, &
     & 0.4178000E+00, 0.4335700E+00, 0.4371700E+00, 0.4492100E+00, &
     & 0.4529800E+00, 0.4761600E+00, 0.4879500E+00, 0.5020800E+00, &
     & 0.5212000E+00, 0.5347300E+00, 0.5488000E+00, 0.5775000E+00, &
     & 0.6100351E+00, 0.6280180E+00, 0.6005688E+00, 0.6005688E+00 /
      data (ref_adm(26,iz,21,15),iz = 1,20) / &
     & 0.4213300E+00, 0.4213300E+00, 0.4181800E+00, 0.4183500E+00, &
     & 0.4309400E+00, 0.4425100E+00, 0.4480800E+00, 0.4505900E+00, &
     & 0.4556500E+00, 0.4757700E+00, 0.4874200E+00, 0.4949200E+00, &
     & 0.5145900E+00, 0.5356000E+00, 0.5508600E+00, 0.5625300E+00, &
     & 0.5986373E+00, 0.6165491E+00, 0.5956738E+00, 0.5956738E+00 /
      data (ref_adm(26,iz,22,15),iz = 1,20) / &
     & 0.4144100E+00, 0.4144100E+00, 0.4136500E+00, 0.4117700E+00, &
     & 0.4210800E+00, 0.4375800E+00, 0.4477600E+00, 0.4493700E+00, &
     & 0.4566600E+00, 0.4744600E+00, 0.4896100E+00, 0.4987300E+00, &
     & 0.5161200E+00, 0.5324700E+00, 0.5451900E+00, 0.5692400E+00, &
     & 0.5140504E+00, 0.5001007E+00, 0.4704781E+00, 0.4704781E+00 /
      data (ref_adm(26,iz,23,15),iz = 1,20) / &
     & 0.4049800E+00, 0.4049800E+00, 0.4088400E+00, 0.4167300E+00, &
     & 0.4193400E+00, 0.4229300E+00, 0.4366800E+00, 0.4449500E+00, &
     & 0.4473200E+00, 0.4670600E+00, 0.4903800E+00, 0.5015400E+00, &
     & 0.5126300E+00, 0.5284000E+00, 0.5384400E+00, 0.5752800E+00, &
     & 0.5579400E+00, 0.4984475E+00, 0.4746962E+00, 0.4746962E+00 /
      data (ref_adm(26,iz,24,15),iz = 1,20) / &
     & 0.3910900E+00, 0.3910900E+00, 0.3912900E+00, 0.3954400E+00, &
     & 0.3997000E+00, 0.4041500E+00, 0.4139700E+00, 0.4245200E+00, &
     & 0.4323600E+00, 0.4386400E+00, 0.4547100E+00, 0.4690300E+00, &
     & 0.4793300E+00, 0.4999900E+00, 0.5330600E+00, 0.5714300E+00, &
     & 0.5970900E+00, 0.5004113E+00, 0.4819683E+00, 0.4819683E+00 /
      data (ref_adm(26,iz,25,15),iz = 1,20) / &
     & 0.4309400E+00, 0.4309400E+00, 0.4386800E+00, 0.4400700E+00, &
     & 0.4446300E+00, 0.4492400E+00, 0.4554300E+00, 0.4650600E+00, &
     & 0.4767400E+00, 0.4920100E+00, 0.5076800E+00, 0.5214800E+00, &
     & 0.5289400E+00, 0.5352400E+00, 0.5408300E+00, 0.5789800E+00, &
     & 0.6024700E+00, 0.5925700E+00, 0.4916236E+00, 0.4916236E+00 /
      data (ref_adm(26,iz,26,15),iz = 1,20) / &
     & 0.4181500E+00, 0.4181500E+00, 0.4124900E+00, 0.4292400E+00, &
     & 0.4292900E+00, 0.4317200E+00, 0.4441700E+00, 0.4518100E+00, &
     & 0.4563200E+00, 0.4611700E+00, 0.4736300E+00, 0.4934300E+00, &
     & 0.5051900E+00, 0.5213000E+00, 0.5374300E+00, 0.5840300E+00, &
     & 0.5976900E+00, 0.6134200E+00, 0.5045959E+00, 0.5045959E+00 /
      data (ref_adm(26,iz,27,15),iz = 1,20) / &
     & 0.4176000E+00, 0.4176000E+00, 0.4229200E+00, 0.4230200E+00, &
     & 0.4241100E+00, 0.4297800E+00, 0.4391700E+00, 0.4478400E+00, &
     & 0.4611500E+00, 0.4759700E+00, 0.4938100E+00, 0.5070300E+00, &
     & 0.5209700E+00, 0.5429600E+00, 0.5616700E+00, 0.5798700E+00, &
     & 0.5982900E+00, 0.6142700E+00, 0.5403700E+00, 0.5403700E+00 /
      data (ref_adm(26,iz,28,15),iz = 1,20) / &
     & 0.4125600E+00, 0.4125600E+00, 0.4135600E+00, 0.4155400E+00, &
     & 0.4312300E+00, 0.4402800E+00, 0.4395800E+00, 0.4516700E+00, &
     & 0.4643500E+00, 0.4745600E+00, 0.4995700E+00, 0.5182100E+00, &
     & 0.5369300E+00, 0.5566100E+00, 0.5717200E+00, 0.6048400E+00, &
     & 0.6238100E+00, 0.6148200E+00, 0.5534400E+00, 0.5534400E+00 /
      data (ref_adm(26,iz,29,15),iz = 1,20) / &
     & 0.4161400E+00, 0.4161400E+00, 0.4107700E+00, 0.4144300E+00, &
     & 0.4269800E+00, 0.4358600E+00, 0.4399600E+00, 0.4476700E+00, &
     & 0.4661800E+00, 0.4847500E+00, 0.4980100E+00, 0.5227300E+00, &
     & 0.5405100E+00, 0.5624600E+00, 0.5909900E+00, 0.6179900E+00, &
     & 0.6349000E+00, 0.6359800E+00, 0.5516800E+00, 0.5516800E+00 /
      data (ref_adm(26,iz,30,15),iz = 1,20) / &
     & 0.4183400E+00, 0.4183400E+00, 0.4158100E+00, 0.4092300E+00, &
     & 0.4162600E+00, 0.4332200E+00, 0.4481700E+00, 0.4640300E+00, &
     & 0.4678600E+00, 0.4836100E+00, 0.4979200E+00, 0.5271900E+00, &
     & 0.5438800E+00, 0.5594500E+00, 0.5852500E+00, 0.6142800E+00, &
     & 0.6475500E+00, 0.6561900E+00, 0.5607100E+00, 0.5607100E+00 /
      data (ref_adm(26,iz,31,15),iz = 1,20) / &
     & 0.4097000E+00, 0.4097000E+00, 0.4124400E+00, 0.4131800E+00, &
     & 0.4241100E+00, 0.4332300E+00, 0.4512400E+00, 0.4662500E+00, &
     & 0.4769200E+00, 0.4938400E+00, 0.5166300E+00, 0.5290800E+00, &
     & 0.5417700E+00, 0.5477800E+00, 0.5744000E+00, 0.6166200E+00, &
     & 0.6411500E+00, 0.6430900E+00, 0.5617600E+00, 0.5617600E+00 /
      data (ref_adm(26,iz,32,15),iz = 1,20) / &
     & 0.4082700E+00, 0.4082700E+00, 0.4143800E+00, 0.4208400E+00, &
     & 0.4300600E+00, 0.4337300E+00, 0.4461600E+00, 0.4607500E+00, &
     & 0.4809200E+00, 0.4923800E+00, 0.5120600E+00, 0.5267400E+00, &
     & 0.5459200E+00, 0.5653300E+00, 0.5902600E+00, 0.6347500E+00, &
     & 0.6655200E+00, 0.6928700E+00, 0.6015500E+00, 0.6015500E+00 /
      data (ref_adm(26,iz,33,15),iz = 1,20) / &
     & 0.4195200E+00, 0.4195200E+00, 0.4105400E+00, 0.4107600E+00, &
     & 0.4169000E+00, 0.4287400E+00, 0.4306700E+00, 0.4497200E+00, &
     & 0.4744500E+00, 0.4920300E+00, 0.5079100E+00, 0.5227400E+00, &
     & 0.5518300E+00, 0.5734600E+00, 0.5909800E+00, 0.6287800E+00, &
     & 0.6549400E+00, 0.6474500E+00, 0.5624700E+00, 0.5624700E+00 /
      data (ref_adm(26,iz,34,15),iz = 1,20) / &
     & 0.4065300E+00, 0.4065300E+00, 0.4115500E+00, 0.4157900E+00, &
     & 0.4200700E+00, 0.4310100E+00, 0.4504800E+00, 0.4635400E+00, &
     & 0.4799500E+00, 0.4996200E+00, 0.5175100E+00, 0.5326300E+00, &
     & 0.5656700E+00, 0.6007200E+00, 0.6024700E+00, 0.6227500E+00, &
     & 0.6654300E+00, 0.6847300E+00, 0.5733300E+00, 0.5733300E+00 /
      data (ref_adm(26,iz,35,15),iz = 1,20) / &
     & 0.4195700E+00, 0.4195700E+00, 0.4209200E+00, 0.4102300E+00, &
     & 0.4210600E+00, 0.4386700E+00, 0.4553200E+00, 0.4675300E+00, &
     & 0.4835400E+00, 0.5039900E+00, 0.5224700E+00, 0.5434500E+00, &
     & 0.5691400E+00, 0.5944100E+00, 0.6103000E+00, 0.6408700E+00, &
     & 0.6802000E+00, 0.6718500E+00, 0.5633300E+00, 0.5633300E+00 /
      data (ref_adm(26,iz,36,15),iz = 1,20) / &
     & 0.4154300E+00, 0.4154300E+00, 0.4145900E+00, 0.4157800E+00, &
     & 0.4280000E+00, 0.4391800E+00, 0.4506700E+00, 0.4679100E+00, &
     & 0.4819200E+00, 0.4982800E+00, 0.5143300E+00, 0.5409500E+00, &
     & 0.5609800E+00, 0.5911100E+00, 0.6210100E+00, 0.6539500E+00, &
     & 0.6860500E+00, 0.6824300E+00, 0.5678800E+00, 0.5678800E+00 /
      data (ref_adm(26,iz,37,15),iz = 1,20) / &
     & 0.4118600E+00, 0.4118600E+00, 0.4138400E+00, 0.4235200E+00, &
     & 0.4344200E+00, 0.4481800E+00, 0.4579600E+00, 0.4633700E+00, &
     & 0.4859200E+00, 0.5000000E+00, 0.5197700E+00, 0.5300200E+00, &
     & 0.5663100E+00, 0.5918600E+00, 0.6285100E+00, 0.6706700E+00, &
     & 0.6835500E+00, 0.6685800E+00, 0.5763600E+00, 0.5763600E+00 /
      data (ref_adm(26,iz,38,15),iz = 1,20) / &
     & 0.4118600E+00, 0.4118600E+00, 0.4138400E+00, 0.4235200E+00, &
     & 0.4344200E+00, 0.4481800E+00, 0.4579600E+00, 0.4633700E+00, &
     & 0.4859200E+00, 0.5000000E+00, 0.5197700E+00, 0.5300200E+00, &
     & 0.5663100E+00, 0.5918600E+00, 0.6285100E+00, 0.6706700E+00, &
     & 0.6835500E+00, 0.6685800E+00, 0.5763600E+00, 0.5763600E+00 /
! Solar Zenith Angle 75.0 Albedo  0.5733240E+00
      data (ref_adm(26,iz, 1,16),iz = 1,20) / &
     & 0.4050000E+00, 0.4050000E+00, 0.4085400E+00, 0.4218500E+00, &
     & 0.4362600E+00, 0.4571600E+00, 0.4827800E+00, 0.5180900E+00, &
     & 0.5642000E+00, 0.6191100E+00, 0.7088800E+00, 0.8084200E+00, &
     & 0.9228700E+00, 0.1040800E+01, 0.1285021E+01, 0.1544130E+01, &
     & 0.1833901E+01, 0.2229413E+01, 0.1877604E+01, 0.1877604E+01 /
      data (ref_adm(26,iz, 2,16),iz = 1,20) / &
     & 0.4050000E+00, 0.4050000E+00, 0.4085400E+00, 0.4218500E+00, &
     & 0.4362600E+00, 0.4571600E+00, 0.4827800E+00, 0.5180900E+00, &
     & 0.5642000E+00, 0.6191100E+00, 0.7088800E+00, 0.8084200E+00, &
     & 0.9228700E+00, 0.1040800E+01, 0.1285021E+01, 0.1544130E+01, &
     & 0.1833901E+01, 0.2229413E+01, 0.1877604E+01, 0.1877604E+01 /
      data (ref_adm(26,iz, 3,16),iz = 1,20) / &
     & 0.4068900E+00, 0.4068900E+00, 0.4127700E+00, 0.4228900E+00, &
     & 0.4415400E+00, 0.4595000E+00, 0.4810200E+00, 0.5225600E+00, &
     & 0.5707500E+00, 0.6227300E+00, 0.6979700E+00, 0.8060400E+00, &
     & 0.9077100E+00, 0.9646300E+00, 0.1269266E+01, 0.1518304E+01, &
     & 0.1790333E+01, 0.2137645E+01, 0.1004217E+01, 0.1004217E+01 /
      data (ref_adm(26,iz, 4,16),iz = 1,20) / &
     & 0.4041600E+00, 0.4041600E+00, 0.4047000E+00, 0.4129000E+00, &
     & 0.4320200E+00, 0.4591500E+00, 0.4855400E+00, 0.5162300E+00, &
     & 0.5578700E+00, 0.6142000E+00, 0.6842300E+00, 0.7833100E+00, &
     & 0.8885400E+00, 0.1013700E+01, 0.1235932E+01, 0.1465807E+01, &
     & 0.1703792E+01, 0.1971855E+01, 0.1639465E+01, 0.1639465E+01 /
      data (ref_adm(26,iz, 5,16),iz = 1,20) / &
     & 0.4010000E+00, 0.4010000E+00, 0.4099300E+00, 0.4175200E+00, &
     & 0.4331100E+00, 0.4523700E+00, 0.4813700E+00, 0.5144600E+00, &
     & 0.5503200E+00, 0.6074000E+00, 0.6763200E+00, 0.7688300E+00, &
     & 0.8725600E+00, 0.9829800E+00, 0.1190175E+01, 0.1396495E+01, &
     & 0.1594263E+01, 0.1782443E+01, 0.1426210E+01, 0.1426210E+01 /
      data (ref_adm(26,iz, 6,16),iz = 1,20) / &
     & 0.3937600E+00, 0.3937600E+00, 0.4028500E+00, 0.4160900E+00, &
     & 0.4303700E+00, 0.4518300E+00, 0.4801900E+00, 0.5103400E+00, &
     & 0.5498700E+00, 0.5940300E+00, 0.6624200E+00, 0.7398300E+00, &
     & 0.8370700E+00, 0.9895900E+00, 0.1202000E+01, 0.1462200E+01, &
     & 0.1799300E+01, 0.2099100E+01, 0.1256697E+01, 0.1256697E+01 /
      data (ref_adm(26,iz, 7,16),iz = 1,20) / &
     & 0.4033500E+00, 0.4033500E+00, 0.4123800E+00, 0.4260500E+00, &
     & 0.4377700E+00, 0.4581700E+00, 0.4815100E+00, 0.5152000E+00, &
     & 0.5446200E+00, 0.5868600E+00, 0.6441400E+00, 0.7158900E+00, &
     & 0.8168900E+00, 0.9639900E+00, 0.1125100E+01, 0.1335400E+01, &
     & 0.1606100E+01, 0.1772600E+01, 0.1591500E+01, 0.1591500E+01 /
      data (ref_adm(26,iz, 8,16),iz = 1,20) / &
     & 0.3969300E+00, 0.3969300E+00, 0.4109700E+00, 0.4118300E+00, &
     & 0.4335600E+00, 0.4519500E+00, 0.4762300E+00, 0.5061300E+00, &
     & 0.5383200E+00, 0.5722300E+00, 0.6256500E+00, 0.6949300E+00, &
     & 0.7720400E+00, 0.9137600E+00, 0.1037400E+01, 0.1254500E+01, &
     & 0.1395300E+01, 0.1436100E+01, 0.1275800E+01, 0.1275800E+01 /
      data (ref_adm(26,iz, 9,16),iz = 1,20) / &
     & 0.4107800E+00, 0.4107800E+00, 0.4177200E+00, 0.4184200E+00, &
     & 0.4245600E+00, 0.4493600E+00, 0.4718400E+00, 0.4993800E+00, &
     & 0.5235300E+00, 0.5658600E+00, 0.6072300E+00, 0.6726000E+00, &
     & 0.7539300E+00, 0.8488900E+00, 0.9396900E+00, 0.1125700E+01, &
     & 0.1299500E+01, 0.1326100E+01, 0.1239900E+01, 0.1239900E+01 /
      data (ref_adm(26,iz,10,16),iz = 1,20) / &
     & 0.4028800E+00, 0.4028800E+00, 0.4167300E+00, 0.4187900E+00, &
     & 0.4220600E+00, 0.4372200E+00, 0.4608900E+00, 0.4880500E+00, &
     & 0.5100200E+00, 0.5462100E+00, 0.5862900E+00, 0.6491900E+00, &
     & 0.7165300E+00, 0.7998200E+00, 0.8820700E+00, 0.1015900E+01, &
     & 0.1158900E+01, 0.1157200E+01, 0.1067000E+01, 0.1067000E+01 /
      data (ref_adm(26,iz,11,16),iz = 1,20) / &
     & 0.4108100E+00, 0.4108100E+00, 0.4120300E+00, 0.4188300E+00, &
     & 0.4288500E+00, 0.4452500E+00, 0.4639100E+00, 0.4812900E+00, &
     & 0.5004000E+00, 0.5288900E+00, 0.5748700E+00, 0.6250600E+00, &
     & 0.6914600E+00, 0.7647300E+00, 0.8358400E+00, 0.9536200E+00, &
     & 0.1071500E+01, 0.1045300E+01, 0.9693700E+00, 0.9693700E+00 /
      data (ref_adm(26,iz,12,16),iz = 1,20) / &
     & 0.4062000E+00, 0.4062000E+00, 0.4026000E+00, 0.4099400E+00, &
     & 0.4244500E+00, 0.4403300E+00, 0.4519500E+00, 0.4716400E+00, &
     & 0.4921400E+00, 0.5261300E+00, 0.5568800E+00, 0.5994600E+00, &
     & 0.6604600E+00, 0.7211000E+00, 0.7891600E+00, 0.9036200E+00, &
     & 0.9843900E+00, 0.9481000E+00, 0.8286300E+00, 0.8286300E+00 /
      data (ref_adm(26,iz,13,16),iz = 1,20) / &
     & 0.3994900E+00, 0.3994900E+00, 0.3981600E+00, 0.4116900E+00, &
     & 0.4218300E+00, 0.4258800E+00, 0.4383900E+00, 0.4594300E+00, &
     & 0.4867100E+00, 0.5171800E+00, 0.5425200E+00, 0.5834900E+00, &
     & 0.6278300E+00, 0.6842000E+00, 0.7498600E+00, 0.8401100E+00, &
     & 0.9239400E+00, 0.9080000E+00, 0.7958300E+00, 0.7958300E+00 /
      data (ref_adm(26,iz,14,16),iz = 1,20) / &
     & 0.4086900E+00, 0.4086900E+00, 0.4123400E+00, 0.4212700E+00, &
     & 0.4338600E+00, 0.4467200E+00, 0.4579000E+00, 0.4755400E+00, &
     & 0.4924700E+00, 0.5123000E+00, 0.5415000E+00, 0.5692000E+00, &
     & 0.6034300E+00, 0.6498000E+00, 0.7019900E+00, 0.7881900E+00, &
     & 0.8630600E+00, 0.8564400E+00, 0.6698659E+00, 0.6698659E+00 /
      data (ref_adm(26,iz,15,16),iz = 1,20) / &
     & 0.4082500E+00, 0.4082500E+00, 0.4054700E+00, 0.4100100E+00, &
     & 0.4181100E+00, 0.4263200E+00, 0.4406000E+00, 0.4576000E+00, &
     & 0.4771500E+00, 0.4986800E+00, 0.5269700E+00, 0.5622800E+00, &
     & 0.6055600E+00, 0.6518900E+00, 0.6847100E+00, 0.7492200E+00, &
     & 0.8098400E+00, 0.8968500E+00, 0.6396420E+00, 0.6396420E+00 /
      data (ref_adm(26,iz,16,16),iz = 1,20) / &
     & 0.3888400E+00, 0.3888400E+00, 0.3823100E+00, 0.3885300E+00, &
     & 0.3947100E+00, 0.4057000E+00, 0.4189000E+00, 0.4333000E+00, &
     & 0.4492700E+00, 0.4681200E+00, 0.4919700E+00, 0.5184200E+00, &
     & 0.5524000E+00, 0.5948200E+00, 0.6564300E+00, 0.7156400E+00, &
     & 0.7745400E+00, 0.6743252E+00, 0.6141690E+00, 0.6141690E+00 /
      data (ref_adm(26,iz,17,16),iz = 1,20) / &
     & 0.3947500E+00, 0.3947500E+00, 0.4047500E+00, 0.4044600E+00, &
     & 0.4006100E+00, 0.4216400E+00, 0.4296400E+00, 0.4471400E+00, &
     & 0.4627600E+00, 0.4797500E+00, 0.5093700E+00, 0.5356700E+00, &
     & 0.5636400E+00, 0.6015700E+00, 0.6296900E+00, 0.6789100E+00, &
     & 0.7542700E+00, 0.6414955E+00, 0.5920942E+00, 0.5920942E+00 /
      data (ref_adm(26,iz,18,16),iz = 1,20) / &
     & 0.3968000E+00, 0.3968000E+00, 0.4129700E+00, 0.4065000E+00, &
     & 0.4092900E+00, 0.4145000E+00, 0.4258700E+00, 0.4440900E+00, &
     & 0.4564400E+00, 0.4615100E+00, 0.4916200E+00, 0.5202100E+00, &
     & 0.5513100E+00, 0.5852500E+00, 0.6124400E+00, 0.6591700E+00, &
     & 0.6859336E+00, 0.7159195E+00, 0.7185040E+00, 0.7185040E+00 /
      data (ref_adm(26,iz,19,16),iz = 1,20) / &
     & 0.4006700E+00, 0.4006700E+00, 0.4042500E+00, 0.4120800E+00, &
     & 0.4101200E+00, 0.4117800E+00, 0.4152700E+00, 0.4352000E+00, &
     & 0.4500700E+00, 0.4594800E+00, 0.4860300E+00, 0.5168000E+00, &
     & 0.5400600E+00, 0.5760500E+00, 0.5940200E+00, 0.6144900E+00, &
     & 0.6603954E+00, 0.6884704E+00, 0.7007548E+00, 0.7007548E+00 /
      data (ref_adm(26,iz,20,16),iz = 1,20) / &
     & 0.4012400E+00, 0.4012400E+00, 0.4078800E+00, 0.4109500E+00, &
     & 0.4160900E+00, 0.4152400E+00, 0.4186800E+00, 0.4304900E+00, &
     & 0.4498200E+00, 0.4514600E+00, 0.4761500E+00, 0.5045600E+00, &
     & 0.5253000E+00, 0.5621300E+00, 0.5835200E+00, 0.5667900E+00, &
     & 0.6417745E+00, 0.6696051E+00, 0.6911108E+00, 0.6911108E+00 /
      data (ref_adm(26,iz,21,16),iz = 1,20) / &
     & 0.4026300E+00, 0.4026300E+00, 0.4077100E+00, 0.4055500E+00, &
     & 0.4084300E+00, 0.4101200E+00, 0.4112000E+00, 0.4285800E+00, &
     & 0.4454400E+00, 0.4629200E+00, 0.4783600E+00, 0.5016800E+00, &
     & 0.5262600E+00, 0.5528500E+00, 0.5729600E+00, 0.6134900E+00, &
     & 0.6272871E+00, 0.6555403E+00, 0.6874966E+00, 0.6874966E+00 /
      data (ref_adm(26,iz,22,16),iz = 1,20) / &
     & 0.4014700E+00, 0.4014700E+00, 0.3987900E+00, 0.4025900E+00, &
     & 0.4079700E+00, 0.4165800E+00, 0.4139700E+00, 0.4259100E+00, &
     & 0.4422800E+00, 0.4597700E+00, 0.4747200E+00, 0.5005200E+00, &
     & 0.5206300E+00, 0.5496400E+00, 0.5708500E+00, 0.6113900E+00, &
     & 0.5632765E+00, 0.5688951E+00, 0.5714619E+00, 0.5714619E+00 /
      data (ref_adm(26,iz,23,16),iz = 1,20) / &
     & 0.3854100E+00, 0.3854100E+00, 0.3909700E+00, 0.3926800E+00, &
     & 0.4052600E+00, 0.4105100E+00, 0.4198100E+00, 0.4268700E+00, &
     & 0.4423500E+00, 0.4604600E+00, 0.4799600E+00, 0.4978800E+00, &
     & 0.5247500E+00, 0.5445000E+00, 0.5679600E+00, 0.6059800E+00, &
     & 0.6334200E+00, 0.5669695E+00, 0.5778889E+00, 0.5778889E+00 /
      data (ref_adm(26,iz,24,16),iz = 1,20) / &
     & 0.3867900E+00, 0.3867900E+00, 0.3878200E+00, 0.3910400E+00, &
     & 0.3957100E+00, 0.4026500E+00, 0.4077600E+00, 0.4216100E+00, &
     & 0.4313200E+00, 0.4453700E+00, 0.4598800E+00, 0.4771300E+00, &
     & 0.5003500E+00, 0.5228600E+00, 0.5513100E+00, 0.6027800E+00, &
     & 0.6426800E+00, 0.5698370E+00, 0.5889155E+00, 0.5889155E+00 /
      data (ref_adm(26,iz,25,16),iz = 1,20) / &
     & 0.4042800E+00, 0.4042800E+00, 0.4132400E+00, 0.4156300E+00, &
     & 0.4211900E+00, 0.4320800E+00, 0.4400600E+00, 0.4482000E+00, &
     & 0.4582500E+00, 0.4641200E+00, 0.4797700E+00, 0.4995900E+00, &
     & 0.5255200E+00, 0.5605000E+00, 0.5732900E+00, 0.6077900E+00, &
     & 0.6500500E+00, 0.6657100E+00, 0.6036207E+00, 0.6036207E+00 /
      data (ref_adm(26,iz,26,16),iz = 1,20) / &
     & 0.4057500E+00, 0.4057500E+00, 0.3996300E+00, 0.4007100E+00, &
     & 0.3978100E+00, 0.4044900E+00, 0.4209800E+00, 0.4272400E+00, &
     & 0.4467100E+00, 0.4619800E+00, 0.4720800E+00, 0.4866700E+00, &
     & 0.5094000E+00, 0.5377900E+00, 0.5573100E+00, 0.6177500E+00, &
     & 0.6506900E+00, 0.6726800E+00, 0.6233263E+00, 0.6233263E+00 /
      data (ref_adm(26,iz,27,16),iz = 1,20) / &
     & 0.4028700E+00, 0.4028700E+00, 0.4031300E+00, 0.4025500E+00, &
     & 0.4028700E+00, 0.4114300E+00, 0.4271000E+00, 0.4367000E+00, &
     & 0.4481300E+00, 0.4648900E+00, 0.4775200E+00, 0.5025900E+00, &
     & 0.5223900E+00, 0.5545700E+00, 0.5831900E+00, 0.6338900E+00, &
     & 0.6721300E+00, 0.6971400E+00, 0.6523100E+00, 0.6523100E+00 /
      data (ref_adm(26,iz,28,16),iz = 1,20) / &
     & 0.3977900E+00, 0.3977900E+00, 0.3988300E+00, 0.3964900E+00, &
     & 0.3957600E+00, 0.4070900E+00, 0.4235700E+00, 0.4377800E+00, &
     & 0.4492000E+00, 0.4697400E+00, 0.4800200E+00, 0.5003100E+00, &
     & 0.5241900E+00, 0.5657500E+00, 0.5970400E+00, 0.6435200E+00, &
     & 0.6900500E+00, 0.7004200E+00, 0.6376300E+00, 0.6376300E+00 /
      data (ref_adm(26,iz,29,16),iz = 1,20) / &
     & 0.4016600E+00, 0.4016600E+00, 0.3970200E+00, 0.3980500E+00, &
     & 0.3984700E+00, 0.4136000E+00, 0.4225500E+00, 0.4303800E+00, &
     & 0.4522300E+00, 0.4681900E+00, 0.4867700E+00, 0.5040700E+00, &
     & 0.5345400E+00, 0.5796500E+00, 0.6071700E+00, 0.6566100E+00, &
     & 0.6923400E+00, 0.7249000E+00, 0.6504600E+00, 0.6504600E+00 /
      data (ref_adm(26,iz,30,16),iz = 1,20) / &
     & 0.4043400E+00, 0.4043400E+00, 0.3953300E+00, 0.3940200E+00, &
     & 0.4057400E+00, 0.4082500E+00, 0.4266500E+00, 0.4333600E+00, &
     & 0.4473400E+00, 0.4607600E+00, 0.4884800E+00, 0.5074500E+00, &
     & 0.5459900E+00, 0.5812400E+00, 0.6067900E+00, 0.6579500E+00, &
     & 0.7035400E+00, 0.7360800E+00, 0.6646100E+00, 0.6646100E+00 /
      data (ref_adm(26,iz,31,16),iz = 1,20) / &
     & 0.4024200E+00, 0.4024200E+00, 0.3983600E+00, 0.3975600E+00, &
     & 0.3998600E+00, 0.4092700E+00, 0.4159400E+00, 0.4384500E+00, &
     & 0.4523100E+00, 0.4637700E+00, 0.4877500E+00, 0.5237800E+00, &
     & 0.5580400E+00, 0.5906400E+00, 0.6240800E+00, 0.6645500E+00, &
     & 0.7119200E+00, 0.7446800E+00, 0.6844600E+00, 0.6844600E+00 /
      data (ref_adm(26,iz,32,16),iz = 1,20) / &
     & 0.3952100E+00, 0.3952100E+00, 0.4060800E+00, 0.4065500E+00, &
     & 0.4050900E+00, 0.4102300E+00, 0.4201600E+00, 0.4379600E+00, &
     & 0.4554400E+00, 0.4788800E+00, 0.5003300E+00, 0.5275900E+00, &
     & 0.5552900E+00, 0.5974400E+00, 0.6308700E+00, 0.6801000E+00, &
     & 0.7402000E+00, 0.7779800E+00, 0.7065600E+00, 0.7065600E+00 /
      data (ref_adm(26,iz,33,16),iz = 1,20) / &
     & 0.3982200E+00, 0.3982200E+00, 0.3965900E+00, 0.3969700E+00, &
     & 0.4015700E+00, 0.4063200E+00, 0.4199300E+00, 0.4392700E+00, &
     & 0.4611300E+00, 0.4838500E+00, 0.5033500E+00, 0.5306300E+00, &
     & 0.5629200E+00, 0.5927500E+00, 0.6320800E+00, 0.6769300E+00, &
     & 0.7204600E+00, 0.7403700E+00, 0.6587400E+00, 0.6587400E+00 /
      data (ref_adm(26,iz,34,16),iz = 1,20) / &
     & 0.3934000E+00, 0.3934000E+00, 0.3987000E+00, 0.4000900E+00, &
     & 0.4044300E+00, 0.4149700E+00, 0.4248300E+00, 0.4438800E+00, &
     & 0.4649800E+00, 0.4860800E+00, 0.5038500E+00, 0.5275400E+00, &
     & 0.5612400E+00, 0.6043800E+00, 0.6443600E+00, 0.6793600E+00, &
     & 0.7348500E+00, 0.7905500E+00, 0.7381200E+00, 0.7381200E+00 /
      data (ref_adm(26,iz,35,16),iz = 1,20) / &
     & 0.4036200E+00, 0.4036200E+00, 0.3990000E+00, 0.4000800E+00, &
     & 0.4082900E+00, 0.4164600E+00, 0.4243300E+00, 0.4434100E+00, &
     & 0.4677800E+00, 0.4906400E+00, 0.5062700E+00, 0.5217600E+00, &
     & 0.5568000E+00, 0.6031900E+00, 0.6423700E+00, 0.6917600E+00, &
     & 0.7476800E+00, 0.8122600E+00, 0.6969700E+00, 0.6969700E+00 /
      data (ref_adm(26,iz,36,16),iz = 1,20) / &
     & 0.4028700E+00, 0.4028700E+00, 0.3981800E+00, 0.4025800E+00, &
     & 0.4072300E+00, 0.4157800E+00, 0.4322700E+00, 0.4503000E+00, &
     & 0.4770500E+00, 0.4907100E+00, 0.5089700E+00, 0.5261400E+00, &
     & 0.5611100E+00, 0.6053300E+00, 0.6437100E+00, 0.7017300E+00, &
     & 0.7588100E+00, 0.8020000E+00, 0.7042600E+00, 0.7042600E+00 /
      data (ref_adm(26,iz,37,16),iz = 1,20) / &
     & 0.3994800E+00, 0.3994800E+00, 0.3953500E+00, 0.4005700E+00, &
     & 0.4098100E+00, 0.4217900E+00, 0.4369800E+00, 0.4581900E+00, &
     & 0.4760100E+00, 0.4897800E+00, 0.5080000E+00, 0.5330800E+00, &
     & 0.5606000E+00, 0.6008400E+00, 0.6438700E+00, 0.7084600E+00, &
     & 0.7764500E+00, 0.8116300E+00, 0.7383200E+00, 0.7383200E+00 /
      data (ref_adm(26,iz,38,16),iz = 1,20) / &
     & 0.3994800E+00, 0.3994800E+00, 0.3953500E+00, 0.4005700E+00, &
     & 0.4098100E+00, 0.4217900E+00, 0.4369800E+00, 0.4581900E+00, &
     & 0.4760100E+00, 0.4897800E+00, 0.5080000E+00, 0.5330800E+00, &
     & 0.5606000E+00, 0.6008400E+00, 0.6438700E+00, 0.7084600E+00, &
     & 0.7764500E+00, 0.8116300E+00, 0.7383200E+00, 0.7383200E+00 /
! Solar Zenith Angle 80.0 Albedo  0.6139247E+00
      data (ref_adm(26,iz, 1,17),iz = 1,20) / &
     & 0.4017800E+00, 0.4017800E+00, 0.4102800E+00, 0.4294700E+00, &
     & 0.4322200E+00, 0.4574800E+00, 0.4877600E+00, 0.5286200E+00, &
     & 0.5660900E+00, 0.6332800E+00, 0.7309300E+00, 0.8564800E+00, &
     & 0.1058024E+01, 0.1263295E+01, 0.1650210E+01, 0.2406311E+01, &
     & 0.3626271E+01, 0.4117588E+01, 0.2726396E+01, 0.2726396E+01 /
      data (ref_adm(26,iz, 2,17),iz = 1,20) / &
     & 0.4017800E+00, 0.4017800E+00, 0.4102800E+00, 0.4294700E+00, &
     & 0.4322200E+00, 0.4574800E+00, 0.4877600E+00, 0.5286200E+00, &
     & 0.5660900E+00, 0.6332800E+00, 0.7309300E+00, 0.8564800E+00, &
     & 0.1058024E+01, 0.1263295E+01, 0.1650210E+01, 0.2406311E+01, &
     & 0.3626271E+01, 0.4117588E+01, 0.2726396E+01, 0.2726396E+01 /
      data (ref_adm(26,iz, 3,17),iz = 1,20) / &
     & 0.4049500E+00, 0.4049500E+00, 0.4103200E+00, 0.4213000E+00, &
     & 0.4338500E+00, 0.4535200E+00, 0.4861300E+00, 0.5175500E+00, &
     & 0.5703600E+00, 0.6338100E+00, 0.7249800E+00, 0.8468800E+00, &
     & 0.1046708E+01, 0.1244297E+01, 0.1610189E+01, 0.2305533E+01, &
     & 0.3490947E+01, 0.4112960E+01, 0.1933258E+01, 0.1933258E+01 /
      data (ref_adm(26,iz, 4,17),iz = 1,20) / &
     & 0.4051900E+00, 0.4051900E+00, 0.4097300E+00, 0.4199500E+00, &
     & 0.4389600E+00, 0.4547300E+00, 0.4829700E+00, 0.5130700E+00, &
     & 0.5626200E+00, 0.6272700E+00, 0.7096100E+00, 0.8366700E+00, &
     & 0.1023080E+01, 0.1205873E+01, 0.1531815E+01, 0.2117015E+01, &
     & 0.3054023E+01, 0.4098169E+01, 0.2808400E+01, 0.2808400E+01 /
      data (ref_adm(26,iz, 5,17),iz = 1,20) / &
     & 0.4024300E+00, 0.4024300E+00, 0.4114400E+00, 0.4218800E+00, &
     & 0.4435200E+00, 0.4564300E+00, 0.4834100E+00, 0.5262200E+00, &
     & 0.5662400E+00, 0.6236900E+00, 0.6944800E+00, 0.8100800E+00, &
     & 0.9909790E+00, 0.1155939E+01, 0.1433051E+01, 0.1901696E+01, &
     & 0.2551508E+01, 0.3734996E+01, 0.3211879E+01, 0.3211879E+01 /
      data (ref_adm(26,iz, 6,17),iz = 1,20) / &
     & 0.4061000E+00, 0.4061000E+00, 0.4079000E+00, 0.4213000E+00, &
     & 0.4345300E+00, 0.4539000E+00, 0.4783000E+00, 0.5174100E+00, &
     & 0.5553500E+00, 0.6051000E+00, 0.6867400E+00, 0.7881900E+00, &
     & 0.9376200E+00, 0.1130000E+01, 0.1366700E+01, 0.1695100E+01, &
     & 0.2143200E+01, 0.2601200E+01, 0.2153700E+01, 0.2153700E+01 /
      data (ref_adm(26,iz, 7,17),iz = 1,20) / &
     & 0.3978700E+00, 0.3978700E+00, 0.4066200E+00, 0.4214300E+00, &
     & 0.4372200E+00, 0.4476600E+00, 0.4745200E+00, 0.5015000E+00, &
     & 0.5478200E+00, 0.6021500E+00, 0.6724400E+00, 0.7571100E+00, &
     & 0.8897000E+00, 0.1065400E+01, 0.1256600E+01, 0.1567800E+01, &
     & 0.2004000E+01, 0.2371600E+01, 0.2061900E+01, 0.2061900E+01 /
      data (ref_adm(26,iz, 8,17),iz = 1,20) / &
     & 0.3980400E+00, 0.3980400E+00, 0.4086500E+00, 0.4177900E+00, &
     & 0.4326500E+00, 0.4471200E+00, 0.4627200E+00, 0.4995800E+00, &
     & 0.5405800E+00, 0.5889100E+00, 0.6528300E+00, 0.7220100E+00, &
     & 0.8709500E+00, 0.1028100E+01, 0.1192100E+01, 0.1433200E+01, &
     & 0.1832800E+01, 0.2041700E+01, 0.1696400E+01, 0.1696400E+01 /
      data (ref_adm(26,iz, 9,17),iz = 1,20) / &
     & 0.4038200E+00, 0.4038200E+00, 0.4093800E+00, 0.4163200E+00, &
     & 0.4239700E+00, 0.4389400E+00, 0.4649500E+00, 0.5001900E+00, &
     & 0.5268100E+00, 0.5684300E+00, 0.6303100E+00, 0.6881300E+00, &
     & 0.8208200E+00, 0.9533400E+00, 0.1078100E+01, 0.1302400E+01, &
     & 0.1509600E+01, 0.1673100E+01, 0.1408300E+01, 0.1408300E+01 /
      data (ref_adm(26,iz,10,17),iz = 1,20) / &
     & 0.4020600E+00, 0.4020600E+00, 0.4032000E+00, 0.4077900E+00, &
     & 0.4221800E+00, 0.4425800E+00, 0.4620900E+00, 0.4868200E+00, &
     & 0.5256100E+00, 0.5617300E+00, 0.6103500E+00, 0.6632900E+00, &
     & 0.7656000E+00, 0.8791600E+00, 0.9985800E+00, 0.1188100E+01, &
     & 0.1372900E+01, 0.1423600E+01, 0.1282500E+01, 0.1282500E+01 /
      data (ref_adm(26,iz,11,17),iz = 1,20) / &
     & 0.3987000E+00, 0.3987000E+00, 0.4040400E+00, 0.4089600E+00, &
     & 0.4175400E+00, 0.4278300E+00, 0.4480000E+00, 0.4782300E+00, &
     & 0.5087300E+00, 0.5453700E+00, 0.5917600E+00, 0.6400600E+00, &
     & 0.7412200E+00, 0.8179000E+00, 0.9341900E+00, 0.1073600E+01, &
     & 0.1259500E+01, 0.1270300E+01, 0.1169500E+01, 0.1169500E+01 /
      data (ref_adm(26,iz,12,17),iz = 1,20) / &
     & 0.4001200E+00, 0.4001200E+00, 0.4021200E+00, 0.4097700E+00, &
     & 0.4168900E+00, 0.4248700E+00, 0.4420900E+00, 0.4656200E+00, &
     & 0.4888000E+00, 0.5304700E+00, 0.5656800E+00, 0.6206200E+00, &
     & 0.7012300E+00, 0.7714900E+00, 0.8583500E+00, 0.9913500E+00, &
     & 0.1135200E+01, 0.1152500E+01, 0.1055400E+01, 0.1055400E+01 /
      data (ref_adm(26,iz,13,17),iz = 1,20) / &
     & 0.4003600E+00, 0.4003600E+00, 0.4035900E+00, 0.4075400E+00, &
     & 0.4217200E+00, 0.4272100E+00, 0.4404300E+00, 0.4590100E+00, &
     & 0.4801800E+00, 0.5127200E+00, 0.5533200E+00, 0.5952000E+00, &
     & 0.6593700E+00, 0.7270100E+00, 0.8056800E+00, 0.9133600E+00, &
     & 0.1055300E+01, 0.1081000E+01, 0.1044900E+01, 0.1044900E+01 /
      data (ref_adm(26,iz,14,17),iz = 1,20) / &
     & 0.4248400E+00, 0.4248400E+00, 0.4262900E+00, 0.4295000E+00, &
     & 0.4348600E+00, 0.4459700E+00, 0.4603900E+00, 0.4773600E+00, &
     & 0.4972200E+00, 0.5223900E+00, 0.5539700E+00, 0.5875100E+00, &
     & 0.6281100E+00, 0.6744900E+00, 0.7449700E+00, 0.8524400E+00, &
     & 0.9673900E+00, 0.9996200E+00, 0.1004952E+01, 0.1004952E+01 /
      data (ref_adm(26,iz,15,17),iz = 1,20) / &
     & 0.3992600E+00, 0.3992600E+00, 0.3846000E+00, 0.3891200E+00, &
     & 0.3989500E+00, 0.4076400E+00, 0.4206200E+00, 0.4358800E+00, &
     & 0.4545600E+00, 0.4787100E+00, 0.5107300E+00, 0.5428700E+00, &
     & 0.5879400E+00, 0.6406200E+00, 0.7110500E+00, 0.8054900E+00, &
     & 0.8932600E+00, 0.9454000E+00, 0.9576718E+00, 0.9576718E+00 /
      data (ref_adm(26,iz,16,17),iz = 1,20) / &
     & 0.3982600E+00, 0.3982600E+00, 0.4040800E+00, 0.4078300E+00, &
     & 0.4168700E+00, 0.4231700E+00, 0.4346500E+00, 0.4503100E+00, &
     & 0.4683000E+00, 0.4897700E+00, 0.5150300E+00, 0.5442600E+00, &
     & 0.5791500E+00, 0.6144900E+00, 0.6711000E+00, 0.7636300E+00, &
     & 0.8230200E+00, 0.8613402E+00, 0.9181077E+00, 0.9181077E+00 /
      data (ref_adm(26,iz,17,17),iz = 1,20) / &
     & 0.4005100E+00, 0.4005100E+00, 0.4042900E+00, 0.4073800E+00, &
     & 0.4095700E+00, 0.4208300E+00, 0.4337600E+00, 0.4407000E+00, &
     & 0.4622200E+00, 0.4767500E+00, 0.5085000E+00, 0.5346300E+00, &
     & 0.5617600E+00, 0.5934600E+00, 0.6399800E+00, 0.7143800E+00, &
     & 0.7956100E+00, 0.8161616E+00, 0.8813095E+00, 0.8813095E+00 /
      data (ref_adm(26,iz,18,17),iz = 1,20) / &
     & 0.3967700E+00, 0.3967700E+00, 0.4081000E+00, 0.4017200E+00, &
     & 0.4102300E+00, 0.4190700E+00, 0.4252200E+00, 0.4410900E+00, &
     & 0.4584000E+00, 0.4693700E+00, 0.4955900E+00, 0.5270800E+00, &
     & 0.5519800E+00, 0.5803000E+00, 0.6156400E+00, 0.6757900E+00, &
     & 0.7526400E+00, 0.8317379E+00, 0.9332340E+00, 0.9332340E+00 /
      data (ref_adm(26,iz,19,17),iz = 1,20) / &
     & 0.3971800E+00, 0.3971800E+00, 0.4022900E+00, 0.3993000E+00, &
     & 0.4049500E+00, 0.4098000E+00, 0.4235800E+00, 0.4365000E+00, &
     & 0.4500600E+00, 0.4666200E+00, 0.4865800E+00, 0.5171600E+00, &
     & 0.5435500E+00, 0.5748600E+00, 0.6055900E+00, 0.6652500E+00, &
     & 0.7245853E+00, 0.7998680E+00, 0.9093065E+00, 0.9093065E+00 /
      data (ref_adm(26,iz,20,17),iz = 1,20) / &
     & 0.4003700E+00, 0.4003700E+00, 0.3990200E+00, 0.3981100E+00, &
     & 0.4002500E+00, 0.4086100E+00, 0.4227200E+00, 0.4328500E+00, &
     & 0.4464400E+00, 0.4595000E+00, 0.4781300E+00, 0.5032500E+00, &
     & 0.5341300E+00, 0.5629100E+00, 0.5925300E+00, 0.6515585E+00, &
     & 0.7048732E+00, 0.7778074E+00, 0.8968433E+00, 0.8968433E+00 /
      data (ref_adm(26,iz,21,17),iz = 1,20) / &
     & 0.3977100E+00, 0.3977100E+00, 0.4004700E+00, 0.4037400E+00, &
     & 0.4051800E+00, 0.4120800E+00, 0.4238700E+00, 0.4364400E+00, &
     & 0.4450100E+00, 0.4616600E+00, 0.4785400E+00, 0.4991200E+00, &
     & 0.5257400E+00, 0.5584300E+00, 0.5907100E+00, 0.6345100E+00, &
     & 0.6896146E+00, 0.7623470E+00, 0.8929232E+00, 0.8929232E+00 /
      data (ref_adm(26,iz,22,17),iz = 1,20) / &
     & 0.3996400E+00, 0.3996400E+00, 0.4032700E+00, 0.4037000E+00, &
     & 0.4130400E+00, 0.4132500E+00, 0.4225800E+00, 0.4314700E+00, &
     & 0.4380400E+00, 0.4558700E+00, 0.4665900E+00, 0.4895600E+00, &
     & 0.5199500E+00, 0.5520600E+00, 0.5798600E+00, 0.6249200E+00, &
     & 0.6198254E+00, 0.6493986E+00, 0.6932184E+00, 0.6932184E+00 /
      data (ref_adm(26,iz,23,17),iz = 1,20) / &
     & 0.3877200E+00, 0.3877200E+00, 0.3889400E+00, 0.3868200E+00, &
     & 0.3966900E+00, 0.4028900E+00, 0.4147900E+00, 0.4217300E+00, &
     & 0.4320100E+00, 0.4418800E+00, 0.4614900E+00, 0.4877200E+00, &
     & 0.5113000E+00, 0.5418600E+00, 0.5811600E+00, 0.6316700E+00, &
     & 0.6689500E+00, 0.6460243E+00, 0.7014264E+00, 0.7014264E+00 /
      data (ref_adm(26,iz,24,17),iz = 1,20) / &
     & 0.4013700E+00, 0.4013700E+00, 0.3923100E+00, 0.3954100E+00, &
     & 0.3995400E+00, 0.4011300E+00, 0.4087400E+00, 0.4170200E+00, &
     & 0.4295900E+00, 0.4470000E+00, 0.4648500E+00, 0.4838200E+00, &
     & 0.5084400E+00, 0.5372500E+00, 0.5625400E+00, 0.6259500E+00, &
     & 0.6797200E+00, 0.6487294E+00, 0.7158642E+00, 0.7158642E+00 /
      data (ref_adm(26,iz,25,17),iz = 1,20) / &
     & 0.3988500E+00, 0.3988500E+00, 0.4064300E+00, 0.4096200E+00, &
     & 0.4114600E+00, 0.4142900E+00, 0.4239600E+00, 0.4359800E+00, &
     & 0.4481400E+00, 0.4587000E+00, 0.4747500E+00, 0.4961300E+00, &
     & 0.5210800E+00, 0.5550700E+00, 0.5738700E+00, 0.6353400E+00, &
     & 0.7019900E+00, 0.7478100E+00, 0.7352180E+00, 0.7352180E+00 /
      data (ref_adm(26,iz,26,17),iz = 1,20) / &
     & 0.4068000E+00, 0.4068000E+00, 0.4050000E+00, 0.4066800E+00, &
     & 0.4053000E+00, 0.4043700E+00, 0.4189500E+00, 0.4313800E+00, &
     & 0.4450700E+00, 0.4552800E+00, 0.4728900E+00, 0.4947000E+00, &
     & 0.5218900E+00, 0.5578300E+00, 0.5931600E+00, 0.6460800E+00, &
     & 0.7121200E+00, 0.7803800E+00, 0.7611837E+00, 0.7611837E+00 /
      data (ref_adm(26,iz,27,17),iz = 1,20) / &
     & 0.3996400E+00, 0.3996400E+00, 0.4035300E+00, 0.4094800E+00, &
     & 0.4142900E+00, 0.4129600E+00, 0.4121600E+00, 0.4283900E+00, &
     & 0.4398200E+00, 0.4514000E+00, 0.4693600E+00, 0.5019700E+00, &
     & 0.5338100E+00, 0.5664500E+00, 0.6010700E+00, 0.6615400E+00, &
     & 0.7303800E+00, 0.7893600E+00, 0.7891800E+00, 0.7891800E+00 /
      data (ref_adm(26,iz,28,17),iz = 1,20) / &
     & 0.3962200E+00, 0.3962200E+00, 0.4030600E+00, 0.4117000E+00, &
     & 0.4108100E+00, 0.4101300E+00, 0.4108200E+00, 0.4235900E+00, &
     & 0.4399800E+00, 0.4606900E+00, 0.4740300E+00, 0.5008300E+00, &
     & 0.5382300E+00, 0.5724100E+00, 0.6035200E+00, 0.6761400E+00, &
     & 0.7397300E+00, 0.8135600E+00, 0.7894400E+00, 0.7894400E+00 /
      data (ref_adm(26,iz,29,17),iz = 1,20) / &
     & 0.4015700E+00, 0.4015700E+00, 0.4067500E+00, 0.4032400E+00, &
     & 0.4034600E+00, 0.4090200E+00, 0.4194500E+00, 0.4290900E+00, &
     & 0.4456600E+00, 0.4669500E+00, 0.4877000E+00, 0.5126900E+00, &
     & 0.5479300E+00, 0.5790300E+00, 0.6192100E+00, 0.6967300E+00, &
     & 0.7633000E+00, 0.8496300E+00, 0.8225600E+00, 0.8225600E+00 /
      data (ref_adm(26,iz,30,17),iz = 1,20) / &
     & 0.4029400E+00, 0.4029400E+00, 0.3956100E+00, 0.3981400E+00, &
     & 0.4085100E+00, 0.4119400E+00, 0.4282000E+00, 0.4446700E+00, &
     & 0.4507400E+00, 0.4707700E+00, 0.4904000E+00, 0.5158800E+00, &
     & 0.5524100E+00, 0.5976100E+00, 0.6369700E+00, 0.7140200E+00, &
     & 0.7841500E+00, 0.8754900E+00, 0.8719700E+00, 0.8719700E+00 /
      data (ref_adm(26,iz,31,17),iz = 1,20) / &
     & 0.3997000E+00, 0.3997000E+00, 0.3963100E+00, 0.3997500E+00, &
     & 0.4024600E+00, 0.4108400E+00, 0.4288800E+00, 0.4414900E+00, &
     & 0.4558800E+00, 0.4761800E+00, 0.5011400E+00, 0.5267700E+00, &
     & 0.5610500E+00, 0.6042300E+00, 0.6460900E+00, 0.7255800E+00, &
     & 0.8103500E+00, 0.8714500E+00, 0.8620500E+00, 0.8620500E+00 /
      data (ref_adm(26,iz,32,17),iz = 1,20) / &
     & 0.3962500E+00, 0.3962500E+00, 0.3949400E+00, 0.3964600E+00, &
     & 0.4095700E+00, 0.4195000E+00, 0.4304500E+00, 0.4413000E+00, &
     & 0.4552700E+00, 0.4752500E+00, 0.4976900E+00, 0.5262600E+00, &
     & 0.5629900E+00, 0.6098100E+00, 0.6597300E+00, 0.7175000E+00, &
     & 0.8156500E+00, 0.9054800E+00, 0.8767700E+00, 0.8767700E+00 /
      data (ref_adm(26,iz,33,17),iz = 1,20) / &
     & 0.3946200E+00, 0.3946200E+00, 0.3947400E+00, 0.3971900E+00, &
     & 0.4085600E+00, 0.4139800E+00, 0.4256300E+00, 0.4399200E+00, &
     & 0.4594200E+00, 0.4834300E+00, 0.5116300E+00, 0.5412100E+00, &
     & 0.5751600E+00, 0.6132700E+00, 0.6607400E+00, 0.7259500E+00, &
     & 0.8322700E+00, 0.9469800E+00, 0.9395400E+00, 0.9395400E+00 /
      data (ref_adm(26,iz,34,17),iz = 1,20) / &
     & 0.3904000E+00, 0.3904000E+00, 0.3942700E+00, 0.4006600E+00, &
     & 0.4088500E+00, 0.4144500E+00, 0.4256500E+00, 0.4450800E+00, &
     & 0.4664500E+00, 0.4903700E+00, 0.5174200E+00, 0.5393100E+00, &
     & 0.5764400E+00, 0.6125700E+00, 0.6689100E+00, 0.7347200E+00, &
     & 0.8067400E+00, 0.9461800E+00, 0.9167100E+00, 0.9167100E+00 /
      data (ref_adm(26,iz,35,17),iz = 1,20) / &
     & 0.3912700E+00, 0.3912700E+00, 0.3892800E+00, 0.3951400E+00, &
     & 0.4022900E+00, 0.4107200E+00, 0.4157000E+00, 0.4368300E+00, &
     & 0.4577700E+00, 0.4856300E+00, 0.5108200E+00, 0.5408500E+00, &
     & 0.5728000E+00, 0.6214700E+00, 0.6744200E+00, 0.7389600E+00, &
     & 0.8358400E+00, 0.9980100E+00, 0.9967800E+00, 0.9967800E+00 /
      data (ref_adm(26,iz,36,17),iz = 1,20) / &
     & 0.3979400E+00, 0.3979400E+00, 0.3971300E+00, 0.3952200E+00, &
     & 0.3950700E+00, 0.4150700E+00, 0.4266100E+00, 0.4296900E+00, &
     & 0.4571500E+00, 0.4820900E+00, 0.5121400E+00, 0.5426000E+00, &
     & 0.5838900E+00, 0.6323000E+00, 0.6810000E+00, 0.7520900E+00, &
     & 0.8492700E+00, 0.9677000E+00, 0.9749600E+00, 0.9749600E+00 /
      data (ref_adm(26,iz,37,17),iz = 1,20) / &
     & 0.4019800E+00, 0.4019800E+00, 0.4042900E+00, 0.4026800E+00, &
     & 0.4061200E+00, 0.4122200E+00, 0.4229500E+00, 0.4405900E+00, &
     & 0.4560600E+00, 0.4836600E+00, 0.5118600E+00, 0.5470100E+00, &
     & 0.5916400E+00, 0.6295600E+00, 0.6811700E+00, 0.7681200E+00, &
     & 0.8664200E+00, 0.9625000E+00, 0.9418300E+00, 0.9418300E+00 /
      data (ref_adm(26,iz,38,17),iz = 1,20) / &
     & 0.4019800E+00, 0.4019800E+00, 0.4042900E+00, 0.4026800E+00, &
     & 0.4061200E+00, 0.4122200E+00, 0.4229500E+00, 0.4405900E+00, &
     & 0.4560600E+00, 0.4836600E+00, 0.5118600E+00, 0.5470100E+00, &
     & 0.5916400E+00, 0.6295600E+00, 0.6811700E+00, 0.7681200E+00, &
     & 0.8664200E+00, 0.9625000E+00, 0.9418300E+00, 0.9418300E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6990959E+00
      data (ref_adm(26,iz, 1,18),iz = 1,20) / &
     & 0.4577300E+00, 0.4577300E+00, 0.4573800E+00, 0.4618700E+00, &
     & 0.4810500E+00, 0.5068800E+00, 0.5373900E+00, 0.5779200E+00, &
     & 0.6213100E+00, 0.6971100E+00, 0.7922900E+00, 0.9406900E+00, &
     & 0.1145711E+01, 0.1355305E+01, 0.1760140E+01, 0.2574115E+01, &
     & 0.3918342E+01, 0.4355453E+01, 0.2757727E+01, 0.2757727E+01 /
      data (ref_adm(26,iz, 2,18),iz = 1,20) / &
     & 0.4577300E+00, 0.4577300E+00, 0.4573800E+00, 0.4618700E+00, &
     & 0.4810500E+00, 0.5068800E+00, 0.5373900E+00, 0.5779200E+00, &
     & 0.6213100E+00, 0.6971100E+00, 0.7922900E+00, 0.9406900E+00, &
     & 0.1145711E+01, 0.1355305E+01, 0.1760140E+01, 0.2574115E+01, &
     & 0.3918342E+01, 0.4355453E+01, 0.2757727E+01, 0.2757727E+01 /
      data (ref_adm(26,iz, 3,18),iz = 1,20) / &
     & 0.4607500E+00, 0.4607500E+00, 0.4568100E+00, 0.4677300E+00, &
     & 0.4794800E+00, 0.5027900E+00, 0.5302300E+00, 0.5734700E+00, &
     & 0.6267700E+00, 0.6949100E+00, 0.7840400E+00, 0.9187800E+00, &
     & 0.1134300E+01, 0.1335693E+01, 0.1717384E+01, 0.2462479E+01, &
     & 0.3770568E+01, 0.4372025E+01, 0.2320783E+01, 0.2320783E+01 /
      data (ref_adm(26,iz, 4,18),iz = 1,20) / &
     & 0.4537900E+00, 0.4537900E+00, 0.4600500E+00, 0.4678400E+00, &
     & 0.4878400E+00, 0.5046900E+00, 0.5408000E+00, 0.5634800E+00, &
     & 0.6274000E+00, 0.6930500E+00, 0.7820200E+00, 0.9107500E+00, &
     & 0.1110577E+01, 0.1296295E+01, 0.1634074E+01, 0.2254873E+01, &
     & 0.3277982E+01, 0.4397020E+01, 0.2928031E+01, 0.2928031E+01 /
      data (ref_adm(26,iz, 5,18),iz = 1,20) / &
     & 0.4473100E+00, 0.4473100E+00, 0.4666200E+00, 0.4876500E+00, &
     & 0.5089100E+00, 0.5230000E+00, 0.5425700E+00, 0.5750500E+00, &
     & 0.6231000E+00, 0.6826600E+00, 0.7917200E+00, 0.8957000E+00, &
     & 0.1078392E+01, 0.1245521E+01, 0.1529946E+01, 0.2020654E+01, &
     & 0.2714888E+01, 0.4018634E+01, 0.3454810E+01, 0.3454810E+01 /
      data (ref_adm(26,iz, 6,18),iz = 1,20) / &
     & 0.4501100E+00, 0.4501100E+00, 0.4591400E+00, 0.4686700E+00, &
     & 0.4818300E+00, 0.5011700E+00, 0.5268500E+00, 0.5645100E+00, &
     & 0.6082100E+00, 0.6691000E+00, 0.7507000E+00, 0.8561900E+00, &
     & 0.1019600E+01, 0.1242300E+01, 0.1541400E+01, 0.1988300E+01, &
     & 0.2705000E+01, 0.3274500E+01, 0.2917939E+01, 0.2917939E+01 /
      data (ref_adm(26,iz, 7,18),iz = 1,20) / &
     & 0.4649700E+00, 0.4649700E+00, 0.4824100E+00, 0.4968700E+00, &
     & 0.4940400E+00, 0.5089300E+00, 0.5430200E+00, 0.5788500E+00, &
     & 0.6174200E+00, 0.6769200E+00, 0.7568700E+00, 0.8379700E+00, &
     & 0.1021600E+01, 0.1252000E+01, 0.1536000E+01, 0.1969700E+01, &
     & 0.2591400E+01, 0.3178600E+01, 0.2441500E+01, 0.2441500E+01 /
      data (ref_adm(26,iz, 8,18),iz = 1,20) / &
     & 0.4681100E+00, 0.4681100E+00, 0.4692900E+00, 0.4774200E+00, &
     & 0.4852200E+00, 0.4934000E+00, 0.5230700E+00, 0.5551900E+00, &
     & 0.5999200E+00, 0.6502800E+00, 0.7108600E+00, 0.7865800E+00, &
     & 0.9649800E+00, 0.1165800E+01, 0.1402200E+01, 0.1769300E+01, &
     & 0.2212300E+01, 0.2708800E+01, 0.2595200E+01, 0.2595200E+01 /
      data (ref_adm(26,iz, 9,18),iz = 1,20) / &
     & 0.4636800E+00, 0.4636800E+00, 0.4648400E+00, 0.4635700E+00, &
     & 0.4886800E+00, 0.4988700E+00, 0.5114800E+00, 0.5464000E+00, &
     & 0.5930900E+00, 0.6289800E+00, 0.6875000E+00, 0.7602200E+00, &
     & 0.9120800E+00, 0.1104600E+01, 0.1287200E+01, 0.1561300E+01, &
     & 0.1920700E+01, 0.2159000E+01, 0.1835600E+01, 0.1835600E+01 /
      data (ref_adm(26,iz,10,18),iz = 1,20) / &
     & 0.4540600E+00, 0.4540600E+00, 0.4609300E+00, 0.4746700E+00, &
     & 0.4771500E+00, 0.4948500E+00, 0.5172200E+00, 0.5471300E+00, &
     & 0.5841300E+00, 0.6142200E+00, 0.6695400E+00, 0.7188300E+00, &
     & 0.8806800E+00, 0.1001200E+01, 0.1165600E+01, 0.1389600E+01, &
     & 0.1730200E+01, 0.1894900E+01, 0.1695400E+01, 0.1695400E+01 /
      data (ref_adm(26,iz,11,18),iz = 1,20) / &
     & 0.4505000E+00, 0.4505000E+00, 0.4532800E+00, 0.4575200E+00, &
     & 0.4680500E+00, 0.4889400E+00, 0.5144400E+00, 0.5271000E+00, &
     & 0.5661200E+00, 0.6025700E+00, 0.6436700E+00, 0.6783400E+00, &
     & 0.8187000E+00, 0.9638200E+00, 0.1076300E+01, 0.1251700E+01, &
     & 0.1505700E+01, 0.1671300E+01, 0.1568000E+01, 0.1568000E+01 /
      data (ref_adm(26,iz,12,18),iz = 1,20) / &
     & 0.4481000E+00, 0.4481000E+00, 0.4462000E+00, 0.4536400E+00, &
     & 0.4645500E+00, 0.4787300E+00, 0.4948600E+00, 0.5285900E+00, &
     & 0.5529800E+00, 0.5800500E+00, 0.6160800E+00, 0.6634900E+00, &
     & 0.7911600E+00, 0.8868100E+00, 0.1020400E+01, 0.1172100E+01, &
     & 0.1398500E+01, 0.1518900E+01, 0.1215442E+01, 0.1215442E+01 /
      data (ref_adm(26,iz,13,18),iz = 1,20) / &
     & 0.4561500E+00, 0.4561500E+00, 0.4556900E+00, 0.4578900E+00, &
     & 0.4653000E+00, 0.4741400E+00, 0.4917000E+00, 0.5134900E+00, &
     & 0.5357000E+00, 0.5612700E+00, 0.5994000E+00, 0.6436100E+00, &
     & 0.7564500E+00, 0.8387800E+00, 0.9566600E+00, 0.1074500E+01, &
     & 0.1260700E+01, 0.1397900E+01, 0.1140661E+01, 0.1140661E+01 /
      data (ref_adm(26,iz,14,18),iz = 1,20) / &
     & 0.4675000E+00, 0.4675000E+00, 0.4732600E+00, 0.4723100E+00, &
     & 0.4771900E+00, 0.4860800E+00, 0.4999400E+00, 0.5147500E+00, &
     & 0.5332300E+00, 0.5560400E+00, 0.5776400E+00, 0.6099100E+00, &
     & 0.6515200E+00, 0.7045500E+00, 0.8657800E+00, 0.1004000E+01, &
     & 0.1149000E+01, 0.1470100E+01, 0.1083470E+01, 0.1083470E+01 /
      data (ref_adm(26,iz,15,18),iz = 1,20) / &
     & 0.4462200E+00, 0.4462200E+00, 0.4424100E+00, 0.4472800E+00, &
     & 0.4525100E+00, 0.4625500E+00, 0.4706500E+00, 0.4850300E+00, &
     & 0.5045600E+00, 0.5248700E+00, 0.5494200E+00, 0.5795100E+00, &
     & 0.6196900E+00, 0.6650200E+00, 0.8072200E+00, 0.9561600E+00, &
     & 0.1106300E+01, 0.9977818E+00, 0.1036741E+01, 0.1036741E+01 /
      data (ref_adm(26,iz,16,18),iz = 1,20) / &
     & 0.4562100E+00, 0.4562100E+00, 0.4614000E+00, 0.4627400E+00, &
     & 0.4795300E+00, 0.4899400E+00, 0.4965600E+00, 0.5102600E+00, &
     & 0.5265300E+00, 0.5484200E+00, 0.5695800E+00, 0.5985600E+00, &
     & 0.6396700E+00, 0.6764600E+00, 0.7722900E+00, 0.8899000E+00, &
     & 0.9746300E+00, 0.9481043E+00, 0.9970170E+00, 0.9970170E+00 /
      data (ref_adm(26,iz,17,18),iz = 1,20) / &
     & 0.4513200E+00, 0.4513200E+00, 0.4564200E+00, 0.4581300E+00, &
     & 0.4653900E+00, 0.4771800E+00, 0.4915600E+00, 0.4919300E+00, &
     & 0.5038100E+00, 0.5187100E+00, 0.5412100E+00, 0.5726000E+00, &
     & 0.6482000E+00, 0.7082900E+00, 0.7482900E+00, 0.8247200E+00, &
     & 0.8303141E+00, 0.9015646E+00, 0.9588944E+00, 0.9588944E+00 /
      data (ref_adm(26,iz,18,18),iz = 1,20) / &
     & 0.4475300E+00, 0.4475300E+00, 0.4586800E+00, 0.4609900E+00, &
     & 0.4600000E+00, 0.4811200E+00, 0.4951500E+00, 0.5016400E+00, &
     & 0.5149800E+00, 0.5261700E+00, 0.5407800E+00, 0.5750300E+00, &
     & 0.6308100E+00, 0.6780600E+00, 0.7222900E+00, 0.7590200E+00, &
     & 0.9288501E+00, 0.1131500E+01, 0.1584238E+01, 0.1584238E+01 /
      data (ref_adm(26,iz,19,18),iz = 1,20) / &
     & 0.4508400E+00, 0.4508400E+00, 0.4549900E+00, 0.4592100E+00, &
     & 0.4765600E+00, 0.4774300E+00, 0.4786000E+00, 0.4924400E+00, &
     & 0.4927200E+00, 0.5143100E+00, 0.5270800E+00, 0.5561800E+00, &
     & 0.6007800E+00, 0.6541200E+00, 0.7097900E+00, 0.7197600E+00, &
     & 0.8963008E+00, 0.1089174E+01, 0.1536923E+01, 0.1536923E+01 /
      data (ref_adm(26,iz,20,18),iz = 1,20) / &
     & 0.4548700E+00, 0.4548700E+00, 0.4569500E+00, 0.4546200E+00, &
     & 0.4656500E+00, 0.4659800E+00, 0.4772400E+00, 0.4889600E+00, &
     & 0.4931700E+00, 0.4996700E+00, 0.5177400E+00, 0.5473200E+00, &
     & 0.5877100E+00, 0.6409700E+00, 0.6816200E+00, 0.7702382E+00, &
     & 0.8726593E+00, 0.1058008E+01, 0.1510342E+01, 0.1510342E+01 /
      data (ref_adm(26,iz,21,18),iz = 1,20) / &
     & 0.4504800E+00, 0.4504800E+00, 0.4587500E+00, 0.4566900E+00, &
     & 0.4614100E+00, 0.4690500E+00, 0.4725800E+00, 0.4883200E+00, &
     & 0.4976300E+00, 0.5098800E+00, 0.5299800E+00, 0.5384700E+00, &
     & 0.5862200E+00, 0.6317200E+00, 0.6565300E+00, 0.6838300E+00, &
     & 0.8520558E+00, 0.1033212E+01, 0.1496450E+01, 0.1496450E+01 /
      data (ref_adm(26,iz,22,18),iz = 1,20) / &
     & 0.4473200E+00, 0.4473200E+00, 0.4396000E+00, 0.4444600E+00, &
     & 0.4609100E+00, 0.4650900E+00, 0.4761500E+00, 0.4893900E+00, &
     & 0.4945800E+00, 0.5093900E+00, 0.5389700E+00, 0.5447100E+00, &
     & 0.5648200E+00, 0.6119500E+00, 0.6400300E+00, 0.6918100E+00, &
     & 0.7866380E+00, 0.9067544E+00, 0.1203501E+01, 0.1203501E+01 /
      data (ref_adm(26,iz,23,18),iz = 1,20) / &
     & 0.4368600E+00, 0.4368600E+00, 0.4320600E+00, 0.4429800E+00, &
     & 0.4628900E+00, 0.4655500E+00, 0.4823500E+00, 0.4813100E+00, &
     & 0.4965700E+00, 0.5087800E+00, 0.5350100E+00, 0.5481200E+00, &
     & 0.5640200E+00, 0.6182600E+00, 0.6516200E+00, 0.6914500E+00, &
     & 0.7773891E+00, 0.8986081E+00, 0.1217906E+01, 0.1217906E+01 /
      data (ref_adm(26,iz,24,18),iz = 1,20) / &
     & 0.4625600E+00, 0.4625600E+00, 0.4526900E+00, 0.4548000E+00, &
     & 0.4602200E+00, 0.4619200E+00, 0.4710900E+00, 0.4803400E+00, &
     & 0.4934000E+00, 0.5130700E+00, 0.5316200E+00, 0.5507800E+00, &
     & 0.5832600E+00, 0.6270500E+00, 0.6486800E+00, 0.7100000E+00, &
     & 0.7649700E+00, 0.8977167E+00, 0.1243971E+01, 0.1243971E+01 /
      data (ref_adm(26,iz,25,18),iz = 1,20) / &
     & 0.4475800E+00, 0.4475800E+00, 0.4489800E+00, 0.4552200E+00, &
     & 0.4593800E+00, 0.4607200E+00, 0.4706700E+00, 0.4827000E+00, &
     & 0.4977800E+00, 0.5130100E+00, 0.5282100E+00, 0.5494800E+00, &
     & 0.5779500E+00, 0.6343100E+00, 0.6576500E+00, 0.7220300E+00, &
     & 0.8106200E+00, 0.9196400E+00, 0.1279365E+01, 0.1279365E+01 /
      data (ref_adm(26,iz,26,18),iz = 1,20) / &
     & 0.4514200E+00, 0.4514200E+00, 0.4482800E+00, 0.4518400E+00, &
     & 0.4562600E+00, 0.4689100E+00, 0.4717800E+00, 0.4817900E+00, &
     & 0.4969000E+00, 0.5149700E+00, 0.5500800E+00, 0.5691900E+00, &
     & 0.5995700E+00, 0.6412100E+00, 0.6841700E+00, 0.7452800E+00, &
     & 0.8343500E+00, 0.9356400E+00, 0.1328134E+01, 0.1328134E+01 /
      data (ref_adm(26,iz,27,18),iz = 1,20) / &
     & 0.4489100E+00, 0.4489100E+00, 0.4449200E+00, 0.4495600E+00, &
     & 0.4710600E+00, 0.4721000E+00, 0.4744400E+00, 0.4770800E+00, &
     & 0.4897900E+00, 0.5160100E+00, 0.5471300E+00, 0.5730200E+00, &
     & 0.5949400E+00, 0.6475600E+00, 0.6975900E+00, 0.7792700E+00, &
     & 0.8623200E+00, 0.9938900E+00, 0.1097000E+01, 0.1097000E+01 /
      data (ref_adm(26,iz,28,18),iz = 1,20) / &
     & 0.4425900E+00, 0.4425900E+00, 0.4582000E+00, 0.4620200E+00, &
     & 0.4610600E+00, 0.4693400E+00, 0.4658000E+00, 0.4698400E+00, &
     & 0.5021000E+00, 0.5286900E+00, 0.5522400E+00, 0.5811400E+00, &
     & 0.6077100E+00, 0.6655300E+00, 0.7104600E+00, 0.7854100E+00, &
     & 0.8903800E+00, 0.1062600E+01, 0.1129200E+01, 0.1129200E+01 /
      data (ref_adm(26,iz,29,18),iz = 1,20) / &
     & 0.4489300E+00, 0.4489300E+00, 0.4563300E+00, 0.4551200E+00, &
     & 0.4516800E+00, 0.4562100E+00, 0.4721700E+00, 0.4888100E+00, &
     & 0.4995000E+00, 0.5224200E+00, 0.5583600E+00, 0.5869900E+00, &
     & 0.6160400E+00, 0.6672100E+00, 0.7190400E+00, 0.8539300E+00, &
     & 0.9504100E+00, 0.1180100E+01, 0.1217100E+01, 0.1217100E+01 /
      data (ref_adm(26,iz,30,18),iz = 1,20) / &
     & 0.4558500E+00, 0.4558500E+00, 0.4519100E+00, 0.4465500E+00, &
     & 0.4551500E+00, 0.4595200E+00, 0.4654200E+00, 0.4814000E+00, &
     & 0.5087100E+00, 0.5254400E+00, 0.5508600E+00, 0.5949500E+00, &
     & 0.6360100E+00, 0.7012100E+00, 0.7512600E+00, 0.8339700E+00, &
     & 0.9142300E+00, 0.1106900E+01, 0.1229400E+01, 0.1229400E+01 /
      data (ref_adm(26,iz,31,18),iz = 1,20) / &
     & 0.4577600E+00, 0.4577600E+00, 0.4504700E+00, 0.4492300E+00, &
     & 0.4612200E+00, 0.4581400E+00, 0.4669900E+00, 0.4954200E+00, &
     & 0.5071900E+00, 0.5230100E+00, 0.5522200E+00, 0.6044700E+00, &
     & 0.6383300E+00, 0.7084800E+00, 0.7694600E+00, 0.8736800E+00, &
     & 0.1001500E+01, 0.1191900E+01, 0.1213500E+01, 0.1213500E+01 /
      data (ref_adm(26,iz,32,18),iz = 1,20) / &
     & 0.4668400E+00, 0.4668400E+00, 0.4574900E+00, 0.4560000E+00, &
     & 0.4678600E+00, 0.4778200E+00, 0.4880000E+00, 0.5062300E+00, &
     & 0.5263600E+00, 0.5400600E+00, 0.5658000E+00, 0.6087400E+00, &
     & 0.6718200E+00, 0.7328500E+00, 0.7755200E+00, 0.8831400E+00, &
     & 0.9920200E+00, 0.1187400E+01, 0.1298700E+01, 0.1298700E+01 /
      data (ref_adm(26,iz,33,18),iz = 1,20) / &
     & 0.4458100E+00, 0.4458100E+00, 0.4447300E+00, 0.4458500E+00, &
     & 0.4550400E+00, 0.4669700E+00, 0.4727600E+00, 0.4915000E+00, &
     & 0.5158600E+00, 0.5398900E+00, 0.5692200E+00, 0.6105600E+00, &
     & 0.6627900E+00, 0.7172300E+00, 0.7802100E+00, 0.8887600E+00, &
     & 0.1030700E+01, 0.1247700E+01, 0.1620300E+01, 0.1620300E+01 /
      data (ref_adm(26,iz,34,18),iz = 1,20) / &
     & 0.4485600E+00, 0.4485600E+00, 0.4510500E+00, 0.4636200E+00, &
     & 0.4697900E+00, 0.4826400E+00, 0.4927100E+00, 0.5042800E+00, &
     & 0.5277100E+00, 0.5700700E+00, 0.5903800E+00, 0.6192500E+00, &
     & 0.6616600E+00, 0.7197000E+00, 0.7985400E+00, 0.9116700E+00, &
     & 0.1052900E+01, 0.1272900E+01, 0.1876800E+01, 0.1876800E+01 /
      data (ref_adm(26,iz,35,18),iz = 1,20) / &
     & 0.4469300E+00, 0.4469300E+00, 0.4606000E+00, 0.4475900E+00, &
     & 0.4581600E+00, 0.4712500E+00, 0.4956100E+00, 0.4934200E+00, &
     & 0.5189200E+00, 0.5627500E+00, 0.5744500E+00, 0.6214800E+00, &
     & 0.6650500E+00, 0.7247700E+00, 0.8110100E+00, 0.9097500E+00, &
     & 0.1096800E+01, 0.1351300E+01, 0.1454700E+01, 0.1454700E+01 /
      data (ref_adm(26,iz,36,18),iz = 1,20) / &
     & 0.4547400E+00, 0.4547400E+00, 0.4485600E+00, 0.4484100E+00, &
     & 0.4543700E+00, 0.4683000E+00, 0.4828400E+00, 0.4958500E+00, &
     & 0.5164600E+00, 0.5629300E+00, 0.5916400E+00, 0.6151000E+00, &
     & 0.6832600E+00, 0.7413100E+00, 0.8003500E+00, 0.9136800E+00, &
     & 0.1103000E+01, 0.1267300E+01, 0.1585800E+01, 0.1585800E+01 /
      data (ref_adm(26,iz,37,18),iz = 1,20) / &
     & 0.4583300E+00, 0.4583300E+00, 0.4573500E+00, 0.4521500E+00, &
     & 0.4597600E+00, 0.4635900E+00, 0.4688700E+00, 0.4886300E+00, &
     & 0.5157100E+00, 0.5436800E+00, 0.5731100E+00, 0.6313300E+00, &
     & 0.6784300E+00, 0.7321100E+00, 0.8067700E+00, 0.9032800E+00, &
     & 0.1097600E+01, 0.1288500E+01, 0.1581000E+01, 0.1581000E+01 /
      data (ref_adm(26,iz,38,18),iz = 1,20) / &
     & 0.4583300E+00, 0.4583300E+00, 0.4573500E+00, 0.4521500E+00, &
     & 0.4597600E+00, 0.4635900E+00, 0.4688700E+00, 0.4886300E+00, &
     & 0.5157100E+00, 0.5436800E+00, 0.5731100E+00, 0.6313300E+00, &
     & 0.6784300E+00, 0.7321100E+00, 0.8067700E+00, 0.9032800E+00, &
     & 0.1097600E+01, 0.1288500E+01, 0.1581000E+01, 0.1581000E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 25.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 30.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 35.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 40.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 45.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 50.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 55.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 60.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 65.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 70.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 75.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 80.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 85.0 Albedo -0.9999000E+04
      data (ref_adm(27,iz, 1,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 2,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 3,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 4,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 5,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 6,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 7,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 8,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz, 9,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,10,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,11,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,12,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,13,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,14,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,15,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,16,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,17,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,18,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,19,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,20,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,21,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,22,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,23,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,24,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,25,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,26,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,27,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,28,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,29,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,30,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,31,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,32,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,33,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,34,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,35,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,36,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,37,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(27,iz,38,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 25.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 30.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 35.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 40.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 45.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 50.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 55.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 60.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 65.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 70.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 75.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 80.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 85.0 Albedo -0.9999000E+04
      data (ref_adm(28,iz, 1,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 2,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 3,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 4,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 5,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 6,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 7,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 8,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz, 9,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,10,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,11,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,12,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,13,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,14,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,15,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,16,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,17,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,18,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,19,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,20,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,21,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,22,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,23,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,24,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,25,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,26,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,27,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,28,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,29,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,30,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,31,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,32,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,33,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,34,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,35,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,36,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,37,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(28,iz,38,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 25.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 30.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 35.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 40.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 45.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 50.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 55.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 60.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 65.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 70.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 75.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 80.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 85.0 Albedo -0.9999000E+04
      data (ref_adm(29,iz, 1,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 2,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 3,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 4,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 5,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 6,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 7,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 8,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz, 9,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,10,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,11,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,12,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,13,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,14,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,15,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,16,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,17,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,18,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,19,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,20,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,21,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,22,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,23,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,24,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,25,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,26,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,27,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,28,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,29,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,30,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,31,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,32,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,33,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,34,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,35,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,36,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,37,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(29,iz,38,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(30,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(30,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(30,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9999000E+04
      data (ref_adm(30,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.5550489E+04
      data (ref_adm(30,iz, 1, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 2, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 3, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 4, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 5, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 6, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 7, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 8, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz, 9, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,10, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,11, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,12, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,13, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,14, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,15, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,16, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,17, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(30,iz,22, 5),iz = 1,20) / &
     & 0.5880300E+00, 0.5880300E+00, 0.5775072E+00, 0.5738620E+00, &
     & 0.5709808E+00, 0.5690101E+00, 0.5655369E+00, 0.5596197E+00, &
     & 0.5520194E+00, 0.5429184E+00, 0.5330201E+00, 0.5192778E+00, &
     & 0.5032378E+00, 0.4881335E+00, 0.4664428E+00, 0.4378785E+00, &
     & 0.4084095E+00, 0.3698522E+00, 0.3017707E+00, 0.3017707E+00 /
      data (ref_adm(30,iz,23, 5),iz = 1,20) / &
     & 0.5880300E+00, 0.5880300E+00, 0.5775072E+00, 0.5738621E+00, &
     & 0.5709808E+00, 0.5690101E+00, 0.5655369E+00, 0.5596196E+00, &
     & 0.5520194E+00, 0.5429184E+00, 0.5330200E+00, 0.5192778E+00, &
     & 0.5032378E+00, 0.4881335E+00, 0.4664428E+00, 0.4378785E+00, &
     & 0.4084095E+00, 0.3698522E+00, 0.3017707E+00, 0.3017707E+00 /
      data (ref_adm(30,iz,24, 5),iz = 1,20) / &
     & 0.5880300E+00, 0.5880300E+00, 0.5775072E+00, 0.5738620E+00, &
     & 0.5709808E+00, 0.5690101E+00, 0.5655369E+00, 0.5596197E+00, &
     & 0.5520194E+00, 0.5429184E+00, 0.5330201E+00, 0.5192778E+00, &
     & 0.5032378E+00, 0.4881335E+00, 0.4664428E+00, 0.4378785E+00, &
     & 0.4084095E+00, 0.3698522E+00, 0.3017707E+00, 0.3017707E+00 /
      data (ref_adm(30,iz,25, 5),iz = 1,20) / &
     & 0.5880300E+00, 0.5880300E+00, 0.5775072E+00, 0.5738621E+00, &
     & 0.5709808E+00, 0.5690101E+00, 0.5655369E+00, 0.5596196E+00, &
     & 0.5520194E+00, 0.5429184E+00, 0.5330200E+00, 0.5192778E+00, &
     & 0.5032378E+00, 0.4881335E+00, 0.4664428E+00, 0.4378785E+00, &
     & 0.4084095E+00, 0.3698522E+00, 0.3017707E+00, 0.3017707E+00 /
      data (ref_adm(30,iz,26, 5),iz = 1,20) / &
     & 0.5880300E+00, 0.5880300E+00, 0.5775072E+00, 0.5738620E+00, &
     & 0.5709808E+00, 0.5690101E+00, 0.5655369E+00, 0.5596197E+00, &
     & 0.5520194E+00, 0.5429184E+00, 0.5330201E+00, 0.5192778E+00, &
     & 0.5032378E+00, 0.4881335E+00, 0.4664428E+00, 0.4378785E+00, &
     & 0.4084095E+00, 0.3698522E+00, 0.3017707E+00, 0.3017707E+00 /
      data (ref_adm(30,iz,27, 5),iz = 1,20) / &
     & 0.5880300E+00, 0.5880300E+00, 0.5775072E+00, 0.5738621E+00, &
     & 0.5709808E+00, 0.5690101E+00, 0.5655369E+00, 0.5596196E+00, &
     & 0.5520194E+00, 0.5429184E+00, 0.5330200E+00, 0.5192778E+00, &
     & 0.5032378E+00, 0.4881335E+00, 0.4664428E+00, 0.4378785E+00, &
     & 0.4084095E+00, 0.3698522E+00, 0.3017707E+00, 0.3017707E+00 /
      data (ref_adm(30,iz,28, 5),iz = 1,20) / &
     & 0.5912000E+00, 0.5912000E+00, 0.5775072E+00, 0.5738620E+00, &
     & 0.5709808E+00, 0.5690101E+00, 0.5655369E+00, 0.5596197E+00, &
     & 0.5520194E+00, 0.5429184E+00, 0.5330201E+00, 0.5192778E+00, &
     & 0.5032378E+00, 0.4881335E+00, 0.4664428E+00, 0.4378785E+00, &
     & 0.4084095E+00, 0.3698522E+00, 0.3017707E+00, 0.3017707E+00 /
      data (ref_adm(30,iz,29, 5),iz = 1,20) / &
     & 0.5880300E+00, 0.5880300E+00, 0.5775072E+00, 0.5738621E+00, &
     & 0.5709808E+00, 0.5690101E+00, 0.5655369E+00, 0.5596196E+00, &
     & 0.5520194E+00, 0.5429184E+00, 0.5330200E+00, 0.5192778E+00, &
     & 0.5032378E+00, 0.4881335E+00, 0.4664428E+00, 0.4378785E+00, &
     & 0.4084095E+00, 0.3698522E+00, 0.3017707E+00, 0.3017707E+00 /
      data (ref_adm(30,iz,30, 5),iz = 1,20) / &
     & 0.5880300E+00, 0.5880300E+00, 0.5775072E+00, 0.5738620E+00, &
     & 0.5709808E+00, 0.5690101E+00, 0.5655369E+00, 0.5596197E+00, &
     & 0.5520194E+00, 0.5429184E+00, 0.5330201E+00, 0.5192778E+00, &
     & 0.5032378E+00, 0.4881335E+00, 0.4664428E+00, 0.4378785E+00, &
     & 0.4084095E+00, 0.3698522E+00, 0.3017707E+00, 0.3017707E+00 /
      data (ref_adm(30,iz,31, 5),iz = 1,20) / &
     & 0.5880300E+00, 0.5880300E+00, 0.5775072E+00, 0.5738621E+00, &
     & 0.5709808E+00, 0.5690101E+00, 0.5655369E+00, 0.5596196E+00, &
     & 0.5520194E+00, 0.5429184E+00, 0.5330200E+00, 0.5192778E+00, &
     & 0.5032378E+00, 0.4881335E+00, 0.4664428E+00, 0.4378785E+00, &
     & 0.4084095E+00, 0.3698522E+00, 0.3017707E+00, 0.3017707E+00 /
      data (ref_adm(30,iz,32, 5),iz = 1,20) / &
     & 0.5880300E+00, 0.5880300E+00, 0.5775072E+00, 0.5738620E+00, &
     & 0.5709808E+00, 0.5690101E+00, 0.5655369E+00, 0.5596197E+00, &
     & 0.5520194E+00, 0.5429184E+00, 0.5330201E+00, 0.5192778E+00, &
     & 0.5032378E+00, 0.4881335E+00, 0.4664428E+00, 0.4378785E+00, &
     & 0.4084095E+00, 0.3698522E+00, 0.3017707E+00, 0.3017707E+00 /
      data (ref_adm(30,iz,33, 5),iz = 1,20) / &
     & 0.5880300E+00, 0.5880300E+00, 0.5775072E+00, 0.5738621E+00, &
     & 0.5709808E+00, 0.5690101E+00, 0.5655369E+00, 0.5596196E+00, &
     & 0.5520194E+00, 0.5429184E+00, 0.5330200E+00, 0.5192778E+00, &
     & 0.5032378E+00, 0.4881335E+00, 0.4664428E+00, 0.4378785E+00, &
     & 0.4084095E+00, 0.3698522E+00, 0.3017707E+00, 0.3017707E+00 /
      data (ref_adm(30,iz,34, 5),iz = 1,20) / &
     & 0.5848600E+00, 0.5848600E+00, 0.5775072E+00, 0.5738620E+00, &
     & 0.5709808E+00, 0.5690101E+00, 0.5655369E+00, 0.5596197E+00, &
     & 0.5520194E+00, 0.5429184E+00, 0.5330201E+00, 0.5192778E+00, &
     & 0.5032378E+00, 0.4881335E+00, 0.4664428E+00, 0.4378785E+00, &
     & 0.4084095E+00, 0.3698522E+00, 0.3017707E+00, 0.3017707E+00 /
      data (ref_adm(30,iz,35, 5),iz = 1,20) / &
     & 0.5880300E+00, 0.5880300E+00, 0.5775072E+00, 0.5738621E+00, &
     & 0.5709808E+00, 0.5690101E+00, 0.5655369E+00, 0.5596196E+00, &
     & 0.5520194E+00, 0.5429184E+00, 0.5330200E+00, 0.5192778E+00, &
     & 0.5032378E+00, 0.4881335E+00, 0.4664428E+00, 0.4378785E+00, &
     & 0.4084095E+00, 0.3698522E+00, 0.3017707E+00, 0.3017707E+00 /
      data (ref_adm(30,iz,36, 5),iz = 1,20) / &
     & 0.5880300E+00, 0.5880300E+00, 0.5775072E+00, 0.5738620E+00, &
     & 0.5709808E+00, 0.5690101E+00, 0.5655369E+00, 0.5596197E+00, &
     & 0.5520194E+00, 0.5429184E+00, 0.5330201E+00, 0.5192778E+00, &
     & 0.5032378E+00, 0.4881335E+00, 0.4664428E+00, 0.4378785E+00, &
     & 0.4084095E+00, 0.3698522E+00, 0.3017707E+00, 0.3017707E+00 /
      data (ref_adm(30,iz,37, 5),iz = 1,20) / &
     & 0.5880300E+00, 0.5880300E+00, 0.5775072E+00, 0.5738620E+00, &
     & 0.5709808E+00, 0.5690101E+00, 0.5655369E+00, 0.5596197E+00, &
     & 0.5520194E+00, 0.5429184E+00, 0.5330201E+00, 0.5192778E+00, &
     & 0.5032378E+00, 0.4881335E+00, 0.4664428E+00, 0.4378785E+00, &
     & 0.4084095E+00, 0.3698522E+00, 0.3017707E+00, 0.3017707E+00 /
      data (ref_adm(30,iz,38, 5),iz = 1,20) / &
     & 0.5880300E+00, 0.5880300E+00, 0.5775072E+00, 0.5738620E+00, &
     & 0.5709808E+00, 0.5690101E+00, 0.5655369E+00, 0.5596197E+00, &
     & 0.5520194E+00, 0.5429184E+00, 0.5330201E+00, 0.5192778E+00, &
     & 0.5032378E+00, 0.4881335E+00, 0.4664428E+00, 0.4378785E+00, &
     & 0.4084095E+00, 0.3698522E+00, 0.3017707E+00, 0.3017707E+00 /
! Solar Zenith Angle 25.0 Albedo  0.4616082E+00
      data (ref_adm(30,iz, 1, 6),iz = 1,20) / &
     & 0.5309740E+00, 0.5309740E+00, 0.5214723E+00, 0.5181807E+00, &
     & 0.5155791E+00, 0.5137998E+00, 0.5106634E+00, 0.5053204E+00, &
     & 0.4984575E+00, 0.4902396E+00, 0.4813017E+00, 0.4688928E+00, &
     & 0.4544092E+00, 0.4407704E+00, 0.4211843E+00, 0.3953916E+00, &
     & 0.4277000E+00, 0.3339658E+00, 0.2724902E+00, 0.2724902E+00 /
      data (ref_adm(30,iz, 2, 6),iz = 1,20) / &
     & 0.5309740E+00, 0.5309740E+00, 0.5214723E+00, 0.5181807E+00, &
     & 0.5155791E+00, 0.5137998E+00, 0.5106634E+00, 0.5053204E+00, &
     & 0.4984575E+00, 0.4902396E+00, 0.4813017E+00, 0.4688928E+00, &
     & 0.4544092E+00, 0.4407704E+00, 0.4211843E+00, 0.3953916E+00, &
     & 0.4277000E+00, 0.3339658E+00, 0.2724902E+00, 0.2724902E+00 /
      data (ref_adm(30,iz, 3, 6),iz = 1,20) / &
     & 0.5309740E+00, 0.5309740E+00, 0.5214723E+00, 0.5181808E+00, &
     & 0.5155790E+00, 0.5137998E+00, 0.5106634E+00, 0.5053203E+00, &
     & 0.4984575E+00, 0.4902396E+00, 0.4813016E+00, 0.4688928E+00, &
     & 0.4544092E+00, 0.4407704E+00, 0.4211843E+00, 0.3953916E+00, &
     & 0.3687819E+00, 0.3339658E+00, 0.2724902E+00, 0.2724902E+00 /
      data (ref_adm(30,iz, 4, 6),iz = 1,20) / &
     & 0.5309740E+00, 0.5309740E+00, 0.5214723E+00, 0.5181807E+00, &
     & 0.5155791E+00, 0.5137998E+00, 0.5106634E+00, 0.5053204E+00, &
     & 0.4984575E+00, 0.4902396E+00, 0.4813017E+00, 0.4688928E+00, &
     & 0.4544092E+00, 0.4407704E+00, 0.4211843E+00, 0.3953916E+00, &
     & 0.3687819E+00, 0.3339658E+00, 0.2724902E+00, 0.2724902E+00 /
      data (ref_adm(30,iz, 5, 6),iz = 1,20) / &
     & 0.5309740E+00, 0.5309740E+00, 0.5214723E+00, 0.5181808E+00, &
     & 0.5155790E+00, 0.5137998E+00, 0.5106634E+00, 0.5053203E+00, &
     & 0.4984575E+00, 0.4902396E+00, 0.4813016E+00, 0.4688928E+00, &
     & 0.4544092E+00, 0.4407704E+00, 0.4211843E+00, 0.3953916E+00, &
     & 0.3687819E+00, 0.3339658E+00, 0.2724902E+00, 0.2724902E+00 /
      data (ref_adm(30,iz, 6, 6),iz = 1,20) / &
     & 0.5309740E+00, 0.5309740E+00, 0.5214723E+00, 0.5181807E+00, &
     & 0.5155791E+00, 0.5137998E+00, 0.5106634E+00, 0.5053204E+00, &
     & 0.4984575E+00, 0.4902396E+00, 0.4813017E+00, 0.4688928E+00, &
     & 0.4544092E+00, 0.4407704E+00, 0.4211843E+00, 0.3953916E+00, &
     & 0.3687819E+00, 0.3339658E+00, 0.2724902E+00, 0.2724902E+00 /
      data (ref_adm(30,iz, 7, 6),iz = 1,20) / &
     & 0.5309740E+00, 0.5309740E+00, 0.5214723E+00, 0.5181808E+00, &
     & 0.5155790E+00, 0.5137998E+00, 0.5106634E+00, 0.5053203E+00, &
     & 0.4984575E+00, 0.4902396E+00, 0.4813016E+00, 0.4688928E+00, &
     & 0.4544092E+00, 0.4407704E+00, 0.4211843E+00, 0.3953916E+00, &
     & 0.3687819E+00, 0.3339658E+00, 0.2724902E+00, 0.2724902E+00 /
      data (ref_adm(30,iz, 8, 6),iz = 1,20) / &
     & 0.5309740E+00, 0.5309740E+00, 0.5214723E+00, 0.5181807E+00, &
     & 0.5155791E+00, 0.5137998E+00, 0.5106634E+00, 0.5053204E+00, &
     & 0.4984575E+00, 0.4902396E+00, 0.4813017E+00, 0.4688928E+00, &
     & 0.4544092E+00, 0.4407704E+00, 0.4211843E+00, 0.3953916E+00, &
     & 0.3687819E+00, 0.3339658E+00, 0.2724902E+00, 0.2724902E+00 /
      data (ref_adm(30,iz, 9, 6),iz = 1,20) / &
     & 0.5309740E+00, 0.5309740E+00, 0.5214723E+00, 0.5181808E+00, &
     & 0.5155790E+00, 0.5137998E+00, 0.5106634E+00, 0.5053203E+00, &
     & 0.4984575E+00, 0.4902396E+00, 0.4813016E+00, 0.4688928E+00, &
     & 0.4544092E+00, 0.4407704E+00, 0.4211843E+00, 0.3953916E+00, &
     & 0.3687819E+00, 0.3339658E+00, 0.2724902E+00, 0.2724902E+00 /
      data (ref_adm(30,iz,10, 6),iz = 1,20) / &
     & 0.5309740E+00, 0.5309740E+00, 0.5214723E+00, 0.5181807E+00, &
     & 0.5155791E+00, 0.5137998E+00, 0.5106634E+00, 0.5053204E+00, &
     & 0.4984575E+00, 0.4902396E+00, 0.4813017E+00, 0.4688928E+00, &
     & 0.4544092E+00, 0.4407704E+00, 0.4211843E+00, 0.3953916E+00, &
     & 0.3687819E+00, 0.3339658E+00, 0.2724902E+00, 0.2724902E+00 /
      data (ref_adm(30,iz,11, 6),iz = 1,20) / &
     & 0.5309740E+00, 0.5309740E+00, 0.5019800E+00, 0.5759500E+00, &
     & 0.5155790E+00, 0.5137998E+00, 0.5106634E+00, 0.5053203E+00, &
     & 0.4984575E+00, 0.4902396E+00, 0.4813016E+00, 0.4688928E+00, &
     & 0.4544092E+00, 0.4407704E+00, 0.4211843E+00, 0.3953916E+00, &
     & 0.3687819E+00, 0.3339658E+00, 0.2724902E+00, 0.2724902E+00 /
      data (ref_adm(30,iz,12, 6),iz = 1,20) / &
     & 0.5309740E+00, 0.5309740E+00, 0.5214723E+00, 0.5181807E+00, &
     & 0.5155791E+00, 0.5137998E+00, 0.5106634E+00, 0.5226200E+00, &
     & 0.4984575E+00, 0.4902396E+00, 0.3505000E+00, 0.4688928E+00, &
     & 0.3843400E+00, 0.4407704E+00, 0.4211843E+00, 0.3953916E+00, &
     & 0.3687819E+00, 0.3339658E+00, 0.2724902E+00, 0.2724902E+00 /
      data (ref_adm(30,iz,13, 6),iz = 1,20) / &
     & 0.5309740E+00, 0.5309740E+00, 0.5214723E+00, 0.5181808E+00, &
     & 0.5155790E+00, 0.5137998E+00, 0.5106634E+00, 0.5053203E+00, &
     & 0.4984575E+00, 0.4902396E+00, 0.4813016E+00, 0.4688928E+00, &
     & 0.4702500E+00, 0.4800200E+00, 0.4211843E+00, 0.3953916E+00, &
     & 0.3687819E+00, 0.3339658E+00, 0.2724902E+00, 0.2724902E+00 /
      data (ref_adm(30,iz,14, 6),iz = 1,20) / &
     & 0.5309740E+00, 0.5309740E+00, 0.5316300E+00, 0.5181807E+00, &
     & 0.5155791E+00, 0.5137998E+00, 0.5106634E+00, 0.5053204E+00, &
     & 0.4984575E+00, 0.4902396E+00, 0.4813017E+00, 0.4688928E+00, &
     & 0.4544092E+00, 0.4471500E+00, 0.4211843E+00, 0.3953916E+00, &
     & 0.3687819E+00, 0.3339658E+00, 0.2724902E+00, 0.2724902E+00 /
      data (ref_adm(30,iz,15, 6),iz = 1,20) / &
     & 0.5309740E+00, 0.5309740E+00, 0.5214723E+00, 0.5181808E+00, &
     & 0.5155790E+00, 0.5137998E+00, 0.5106634E+00, 0.5053203E+00, &
     & 0.4984575E+00, 0.4902396E+00, 0.4813016E+00, 0.4688928E+00, &
     & 0.4544092E+00, 0.4407704E+00, 0.4211843E+00, 0.3953916E+00, &
     & 0.3687819E+00, 0.3339658E+00, 0.2724902E+00, 0.2724902E+00 /
      data (ref_adm(30,iz,16, 6),iz = 1,20) / &
     & 0.5309740E+00, 0.5309740E+00, 0.5214723E+00, 0.5181807E+00, &
     & 0.5155791E+00, 0.5137998E+00, 0.5106634E+00, 0.5053204E+00, &
     & 0.4984575E+00, 0.4902396E+00, 0.4813017E+00, 0.4688928E+00, &
     & 0.4544092E+00, 0.4407704E+00, 0.4211843E+00, 0.3953916E+00, &
     & 0.3687819E+00, 0.3339658E+00, 0.2724902E+00, 0.2724902E+00 /
      data (ref_adm(30,iz,17, 6),iz = 1,20) / &
     & 0.5309740E+00, 0.5309740E+00, 0.5214723E+00, 0.5181808E+00, &
     & 0.5155790E+00, 0.5137998E+00, 0.5106634E+00, 0.5053203E+00, &
     & 0.4984575E+00, 0.4902396E+00, 0.4813016E+00, 0.4688928E+00, &
     & 0.4544092E+00, 0.4407704E+00, 0.4211843E+00, 0.3953916E+00, &
     & 0.3687819E+00, 0.3339658E+00, 0.2724902E+00, 0.2724902E+00 /
      data (ref_adm(30,iz,18, 6),iz = 1,20) / &
     & 0.4600209E+00, 0.4600209E+00, 0.4667125E+00, 0.4723248E+00, &
     & 0.4639498E+00, 0.4505108E+00, 0.4436682E+00, 0.4422033E+00, &
     & 0.4433349E+00, 0.4440353E+00, 0.4436213E+00, 0.4429616E+00, &
     & 0.4425182E+00, 0.4403413E+00, 0.4349635E+00, 0.4230003E+00, &
     & 0.4049866E+00, 0.3729996E+00, 0.3153579E+00, 0.3153579E+00 /
      data (ref_adm(30,iz,19, 6),iz = 1,20) / &
     & 0.4594404E+00, 0.4594404E+00, 0.4637158E+00, 0.4711897E+00, &
     & 0.4718305E+00, 0.4594520E+00, 0.4483720E+00, 0.4440698E+00, &
     & 0.4437274E+00, 0.4447016E+00, 0.4446347E+00, 0.4427625E+00, &
     & 0.4406533E+00, 0.4380766E+00, 0.4316825E+00, 0.4192859E+00, &
     & 0.4008762E+00, 0.3691696E+00, 0.3131725E+00, 0.3131725E+00 /
      data (ref_adm(30,iz,20, 6),iz = 1,20) / &
     & 0.4590946E+00, 0.4590946E+00, 0.4610566E+00, 0.4667414E+00, &
     & 0.4739951E+00, 0.4703251E+00, 0.4573581E+00, 0.4483815E+00, &
     & 0.4452658E+00, 0.4452929E+00, 0.4456378E+00, 0.4435843E+00, &
     & 0.4400107E+00, 0.4364499E+00, 0.4293740E+00, 0.4160976E+00, &
     & 0.3975471E+00, 0.3661482E+00, 0.3119122E+00, 0.3119122E+00 /
      data (ref_adm(30,iz,21, 6),iz = 1,20) / &
     & 0.4587282E+00, 0.4587282E+00, 0.4593936E+00, 0.4622861E+00, &
     & 0.4694450E+00, 0.4766257E+00, 0.4700167E+00, 0.4567533E+00, &
     & 0.4489090E+00, 0.4464289E+00, 0.4462079E+00, 0.4448708E+00, &
     & 0.4405384E+00, 0.4355094E+00, 0.4278085E+00, 0.4138542E+00, &
     & 0.3948869E+00, 0.3637487E+00, 0.3113064E+00, 0.3113064E+00 /
      data (ref_adm(30,iz,22, 6),iz = 1,20) / &
     & 0.5160162E+00, 0.5160162E+00, 0.5067822E+00, 0.5035834E+00, &
     & 0.5010551E+00, 0.4993256E+00, 0.4962778E+00, 0.4910852E+00, &
     & 0.4844157E+00, 0.4764293E+00, 0.4677432E+00, 0.4556838E+00, &
     & 0.4416083E+00, 0.4283537E+00, 0.4093193E+00, 0.3842532E+00, &
     & 0.3583931E+00, 0.3245578E+00, 0.2648140E+00, 0.2648140E+00 /
      data (ref_adm(30,iz,23, 6),iz = 1,20) / &
     & 0.5160162E+00, 0.5160162E+00, 0.3233900E+00, 0.5035834E+00, &
     & 0.5010549E+00, 0.4993256E+00, 0.4962778E+00, 0.4910852E+00, &
     & 0.4844157E+00, 0.4764293E+00, 0.4677431E+00, 0.4556838E+00, &
     & 0.4416083E+00, 0.4283537E+00, 0.4093193E+00, 0.3842532E+00, &
     & 0.3583931E+00, 0.3245578E+00, 0.2648140E+00, 0.2648140E+00 /
      data (ref_adm(30,iz,24, 6),iz = 1,20) / &
     & 0.5160162E+00, 0.5160162E+00, 0.5067822E+00, 0.5035834E+00, &
     & 0.5010551E+00, 0.4993256E+00, 0.4962778E+00, 0.4910852E+00, &
     & 0.4844157E+00, 0.4764293E+00, 0.4677432E+00, 0.4556838E+00, &
     & 0.4416083E+00, 0.4283537E+00, 0.4093193E+00, 0.3842532E+00, &
     & 0.3583931E+00, 0.3245578E+00, 0.2648140E+00, 0.2648140E+00 /
      data (ref_adm(30,iz,25, 6),iz = 1,20) / &
     & 0.5160162E+00, 0.5160162E+00, 0.5413200E+00, 0.5035834E+00, &
     & 0.5010549E+00, 0.4993256E+00, 0.4962778E+00, 0.4910852E+00, &
     & 0.4844157E+00, 0.4764293E+00, 0.4677431E+00, 0.4556838E+00, &
     & 0.4416083E+00, 0.4283537E+00, 0.4093193E+00, 0.3842532E+00, &
     & 0.3583931E+00, 0.3245578E+00, 0.2648140E+00, 0.2648140E+00 /
      data (ref_adm(30,iz,26, 6),iz = 1,20) / &
     & 0.5160162E+00, 0.5160162E+00, 0.6071600E+00, 0.5035834E+00, &
     & 0.5010551E+00, 0.4911100E+00, 0.4962778E+00, 0.4910852E+00, &
     & 0.4844157E+00, 0.4764293E+00, 0.4677432E+00, 0.4556838E+00, &
     & 0.4416083E+00, 0.4283537E+00, 0.4093193E+00, 0.3842532E+00, &
     & 0.3583931E+00, 0.3245578E+00, 0.2648140E+00, 0.2648140E+00 /
      data (ref_adm(30,iz,27, 6),iz = 1,20) / &
     & 0.5160162E+00, 0.5160162E+00, 0.5067822E+00, 0.5035834E+00, &
     & 0.5010549E+00, 0.4993256E+00, 0.4962778E+00, 0.4910852E+00, &
     & 0.4844157E+00, 0.4764293E+00, 0.4677431E+00, 0.4556838E+00, &
     & 0.4416083E+00, 0.4283537E+00, 0.4093193E+00, 0.3842532E+00, &
     & 0.3583931E+00, 0.3245578E+00, 0.2648140E+00, 0.2648140E+00 /
      data (ref_adm(30,iz,28, 6),iz = 1,20) / &
     & 0.5160162E+00, 0.5160162E+00, 0.5067822E+00, 0.5035834E+00, &
     & 0.5010551E+00, 0.4993256E+00, 0.4962778E+00, 0.4910852E+00, &
     & 0.4844157E+00, 0.4764293E+00, 0.4677432E+00, 0.4556838E+00, &
     & 0.4416083E+00, 0.4283537E+00, 0.4093193E+00, 0.3842532E+00, &
     & 0.3583931E+00, 0.3245578E+00, 0.2648140E+00, 0.2648140E+00 /
      data (ref_adm(30,iz,29, 6),iz = 1,20) / &
     & 0.5160162E+00, 0.5160162E+00, 0.5321400E+00, 0.5035834E+00, &
     & 0.5010549E+00, 0.4993256E+00, 0.4962778E+00, 0.4910852E+00, &
     & 0.4844157E+00, 0.4764293E+00, 0.4677431E+00, 0.4556838E+00, &
     & 0.4416083E+00, 0.4283537E+00, 0.4093193E+00, 0.3842532E+00, &
     & 0.3583931E+00, 0.3245578E+00, 0.2648140E+00, 0.2648140E+00 /
      data (ref_adm(30,iz,30, 6),iz = 1,20) / &
     & 0.5160162E+00, 0.5160162E+00, 0.5067822E+00, 0.4038000E+00, &
     & 0.5010551E+00, 0.4993256E+00, 0.5436100E+00, 0.4910852E+00, &
     & 0.4844157E+00, 0.4764293E+00, 0.4677432E+00, 0.4556838E+00, &
     & 0.4416083E+00, 0.4283537E+00, 0.4093193E+00, 0.3842532E+00, &
     & 0.3583931E+00, 0.3245578E+00, 0.2648140E+00, 0.2648140E+00 /
      data (ref_adm(30,iz,31, 6),iz = 1,20) / &
     & 0.5160162E+00, 0.5160162E+00, 0.5067822E+00, 0.5042900E+00, &
     & 0.5010549E+00, 0.4993256E+00, 0.5773900E+00, 0.4910852E+00, &
     & 0.4844157E+00, 0.4764293E+00, 0.4677431E+00, 0.4556838E+00, &
     & 0.4416083E+00, 0.4283537E+00, 0.4093193E+00, 0.3842532E+00, &
     & 0.3583931E+00, 0.3245578E+00, 0.2648140E+00, 0.2648140E+00 /
      data (ref_adm(30,iz,32, 6),iz = 1,20) / &
     & 0.5160162E+00, 0.5160162E+00, 0.5067822E+00, 0.5035834E+00, &
     & 0.5010551E+00, 0.4993256E+00, 0.4962778E+00, 0.4910852E+00, &
     & 0.4844157E+00, 0.4764293E+00, 0.4677432E+00, 0.4556838E+00, &
     & 0.4416083E+00, 0.4283537E+00, 0.4093193E+00, 0.3842532E+00, &
     & 0.3583931E+00, 0.3245578E+00, 0.2648140E+00, 0.2648140E+00 /
      data (ref_adm(30,iz,33, 6),iz = 1,20) / &
     & 0.5160162E+00, 0.5160162E+00, 0.5067822E+00, 0.5035834E+00, &
     & 0.5010549E+00, 0.4993256E+00, 0.4962778E+00, 0.4910852E+00, &
     & 0.4844157E+00, 0.4764293E+00, 0.4677431E+00, 0.4556838E+00, &
     & 0.4416083E+00, 0.4283537E+00, 0.4093193E+00, 0.3842532E+00, &
     & 0.3583931E+00, 0.3245578E+00, 0.2648140E+00, 0.2648140E+00 /
      data (ref_adm(30,iz,34, 6),iz = 1,20) / &
     & 0.5160162E+00, 0.5160162E+00, 0.5067822E+00, 0.5035834E+00, &
     & 0.5010551E+00, 0.4993256E+00, 0.4962778E+00, 0.4910852E+00, &
     & 0.4844157E+00, 0.4764293E+00, 0.4677432E+00, 0.4556838E+00, &
     & 0.4416083E+00, 0.4283537E+00, 0.4093193E+00, 0.3842532E+00, &
     & 0.3583931E+00, 0.3245578E+00, 0.2648140E+00, 0.2648140E+00 /
      data (ref_adm(30,iz,35, 6),iz = 1,20) / &
     & 0.5160162E+00, 0.5160162E+00, 0.5067822E+00, 0.5035834E+00, &
     & 0.5010549E+00, 0.4993256E+00, 0.4962778E+00, 0.4910852E+00, &
     & 0.4844157E+00, 0.4764293E+00, 0.4677431E+00, 0.4556838E+00, &
     & 0.4416083E+00, 0.4283537E+00, 0.4093193E+00, 0.3842532E+00, &
     & 0.3583931E+00, 0.3245578E+00, 0.2648140E+00, 0.2648140E+00 /
      data (ref_adm(30,iz,36, 6),iz = 1,20) / &
     & 0.5160162E+00, 0.5160162E+00, 0.5067822E+00, 0.5035834E+00, &
     & 0.5010551E+00, 0.4993256E+00, 0.4962778E+00, 0.4910852E+00, &
     & 0.4844157E+00, 0.4764293E+00, 0.4677432E+00, 0.4556838E+00, &
     & 0.4416083E+00, 0.4283537E+00, 0.4093193E+00, 0.3842532E+00, &
     & 0.3583931E+00, 0.3245578E+00, 0.2648140E+00, 0.2648140E+00 /
      data (ref_adm(30,iz,37, 6),iz = 1,20) / &
     & 0.5160162E+00, 0.5160162E+00, 0.5067822E+00, 0.5035834E+00, &
     & 0.5010551E+00, 0.4993256E+00, 0.4962778E+00, 0.4910852E+00, &
     & 0.4844157E+00, 0.4764293E+00, 0.4677432E+00, 0.4556838E+00, &
     & 0.4416083E+00, 0.4283537E+00, 0.4093193E+00, 0.3842532E+00, &
     & 0.3583931E+00, 0.3245578E+00, 0.2648140E+00, 0.2648140E+00 /
      data (ref_adm(30,iz,38, 6),iz = 1,20) / &
     & 0.5160162E+00, 0.5160162E+00, 0.5067822E+00, 0.5035834E+00, &
     & 0.5010551E+00, 0.4993256E+00, 0.4962778E+00, 0.4910852E+00, &
     & 0.4844157E+00, 0.4764293E+00, 0.4677432E+00, 0.4556838E+00, &
     & 0.4416083E+00, 0.4283537E+00, 0.4093193E+00, 0.3842532E+00, &
     & 0.3583931E+00, 0.3245578E+00, 0.2648140E+00, 0.2648140E+00 /
! Solar Zenith Angle 30.0 Albedo  0.4341486E+00
      data (ref_adm(30,iz, 1, 7),iz = 1,20) / &
     & 0.4640524E+00, 0.4640524E+00, 0.4635630E+00, 0.4584500E+00, &
     & 0.4396900E+00, 0.3769500E+00, 0.4324800E+00, 0.4414101E+00, &
     & 0.4406983E+00, 0.4406146E+00, 0.4418666E+00, 0.4438743E+00, &
     & 0.4455011E+00, 0.4453404E+00, 0.4415514E+00, 0.3997400E+00, &
     & 0.4154840E+00, 0.3831831E+00, 0.3159535E+00, 0.3159535E+00 /
      data (ref_adm(30,iz, 2, 7),iz = 1,20) / &
     & 0.4640524E+00, 0.4640524E+00, 0.4635630E+00, 0.4584500E+00, &
     & 0.4396900E+00, 0.3769500E+00, 0.4324800E+00, 0.4414101E+00, &
     & 0.4406983E+00, 0.4406146E+00, 0.4418666E+00, 0.4438743E+00, &
     & 0.4455011E+00, 0.4453404E+00, 0.4415514E+00, 0.3997400E+00, &
     & 0.4154840E+00, 0.3831831E+00, 0.3159535E+00, 0.3159535E+00 /
      data (ref_adm(30,iz, 3, 7),iz = 1,20) / &
     & 0.4640394E+00, 0.4640394E+00, 0.4635642E+00, 0.4679114E+00, &
     & 0.4643712E+00, 0.4495510E+00, 0.4423669E+00, 0.4051800E+00, &
     & 0.4405400E+00, 0.4406092E+00, 0.4417160E+00, 0.4438423E+00, &
     & 0.4452785E+00, 0.4449705E+00, 0.4413003E+00, 0.4314973E+00, &
     & 0.4148956E+00, 0.3826214E+00, 0.1669766E+00, 0.1669766E+00 /
      data (ref_adm(30,iz, 4, 7),iz = 1,20) / &
     & 0.4640124E+00, 0.4640124E+00, 0.4635971E+00, 0.5754700E+00, &
     & 0.5671400E+00, 0.4500566E+00, 0.4425841E+00, 0.4414911E+00, &
     & 0.4407238E+00, 0.4404639E+00, 0.4415658E+00, 0.4434862E+00, &
     & 0.4448121E+00, 0.4442644E+00, 0.4405612E+00, 0.4305845E+00, &
     & 0.4138200E+00, 0.3815719E+00, 0.3148097E+00, 0.3148097E+00 /
      data (ref_adm(30,iz, 5, 7),iz = 1,20) / &
     & 0.4641088E+00, 0.4641088E+00, 0.4635695E+00, 0.4679547E+00, &
     & 0.5490700E+00, 0.5407600E+00, 0.4427789E+00, 0.4416133E+00, &
     & 0.4407730E+00, 0.4404063E+00, 0.4411958E+00, 0.4429288E+00, &
     & 0.4440920E+00, 0.4433364E+00, 0.4394394E+00, 0.4292403E+00, &
     & 0.4122607E+00, 0.3799971E+00, 0.3136798E+00, 0.3136798E+00 /
      data (ref_adm(30,iz, 6, 7),iz = 1,20) / &
     & 0.4640733E+00, 0.4640733E+00, 0.5717800E+00, 0.4677880E+00, &
     & 0.4660734E+00, 0.4521884E+00, 0.4431426E+00, 0.4416466E+00, &
     & 0.4408950E+00, 0.4402311E+00, 0.4408548E+00, 0.4423165E+00, &
     & 0.4431759E+00, 0.4421804E+00, 0.4379600E+00, 0.4273513E+00, &
     & 0.4102403E+00, 0.3778715E+00, 0.3121914E+00, 0.3121914E+00 /
      data (ref_adm(30,iz, 7, 7),iz = 1,20) / &
     & 0.4640470E+00, 0.4640470E+00, 0.4637624E+00, 0.4292100E+00, &
     & 0.4669222E+00, 0.4539326E+00, 0.4436582E+00, 0.4418179E+00, &
     & 0.4409966E+00, 0.4401525E+00, 0.4405037E+00, 0.4415937E+00, &
     & 0.4420460E+00, 0.4408929E+00, 0.4361824E+00, 0.4252335E+00, &
     & 0.4078694E+00, 0.3753677E+00, 0.3104225E+00, 0.3104225E+00 /
      data (ref_adm(30,iz, 8, 7),iz = 1,20) / &
     & 0.4640613E+00, 0.4640613E+00, 0.4639333E+00, 0.4670835E+00, &
     & 0.4677190E+00, 0.4558487E+00, 0.4442578E+00, 0.4420839E+00, &
     & 0.4411279E+00, 0.4399988E+00, 0.4399874E+00, 0.4407085E+00, &
     & 0.4406971E+00, 0.4391955E+00, 0.4341615E+00, 0.4227287E+00, &
     & 0.4050262E+00, 0.3725158E+00, 0.3084060E+00, 0.3084060E+00 /
      data (ref_adm(30,iz, 9, 7),iz = 1,20) / &
     & 0.4640306E+00, 0.4640306E+00, 0.4639854E+00, 0.4664952E+00, &
     & 0.4686287E+00, 0.4582144E+00, 0.4452780E+00, 0.4423428E+00, &
     & 0.4413503E+00, 0.4400156E+00, 0.4395481E+00, 0.4398407E+00, &
     & 0.4393629E+00, 0.4375302E+00, 0.4320937E+00, 0.4200815E+00, &
     & 0.4019978E+00, 0.3694287E+00, 0.3061982E+00, 0.3061982E+00 /
      data (ref_adm(30,iz,10, 7),iz = 1,20) / &
     & 0.4640498E+00, 0.4640498E+00, 0.4640698E+00, 0.4657077E+00, &
     & 0.5033000E+00, 0.5133300E+00, 0.4466432E+00, 0.4426056E+00, &
     & 0.4416789E+00, 0.4401072E+00, 0.4391428E+00, 0.4388104E+00, &
     & 0.4378622E+00, 0.4356281E+00, 0.4297489E+00, 0.4172279E+00, &
     & 0.3988167E+00, 0.3661401E+00, 0.3037780E+00, 0.3037780E+00 /
      data (ref_adm(30,iz,11, 7),iz = 1,20) / &
     & 0.4911500E+00, 0.4911500E+00, 0.4857200E+00, 0.5381600E+00, &
     & 0.4673700E+00, 0.4729500E+00, 0.4344300E+00, 0.4197500E+00, &
     & 0.4372800E+00, 0.3822900E+00, 0.4387772E+00, 0.4378667E+00, &
     & 0.4364477E+00, 0.4337969E+00, 0.4272893E+00, 0.4144385E+00, &
     & 0.3955271E+00, 0.3627739E+00, 0.3013273E+00, 0.3013273E+00 /
      data (ref_adm(30,iz,12, 7),iz = 1,20) / &
     & 0.4990200E+00, 0.4990200E+00, 0.4644031E+00, 0.5439700E+00, &
     & 0.5084400E+00, 0.4471300E+00, 0.4686200E+00, 0.4449700E+00, &
     & 0.3798400E+00, 0.4426600E+00, 0.4090300E+00, 0.4233100E+00, &
     & 0.4349541E+00, 0.4318585E+00, 0.4248919E+00, 0.4115783E+00, &
     & 0.3922415E+00, 0.3594058E+00, 0.2988943E+00, 0.2988943E+00 /
      data (ref_adm(30,iz,13, 7),iz = 1,20) / &
     & 0.5964200E+00, 0.5964200E+00, 0.4645715E+00, 0.4644619E+00, &
     & 0.4687100E+00, 0.5255900E+00, 0.5390500E+00, 0.4448782E+00, &
     & 0.4425738E+00, 0.5350800E+00, 0.4384828E+00, 0.4043600E+00, &
     & 0.4486300E+00, 0.4299594E+00, 0.4225904E+00, 0.4087036E+00, &
     & 0.3890153E+00, 0.3560389E+00, 0.2965441E+00, 0.2965441E+00 /
      data (ref_adm(30,iz,14, 7),iz = 1,20) / &
     & 0.4640188E+00, 0.4640188E+00, 0.4646390E+00, 0.4467400E+00, &
     & 0.4685282E+00, 0.3615800E+00, 0.4596601E+00, 0.4465508E+00, &
     & 0.4429680E+00, 0.4414613E+00, 0.4387805E+00, 0.4355703E+00, &
     & 0.2313000E+00, 0.4281730E+00, 0.4203939E+00, 0.4060004E+00, &
     & 0.3860610E+00, 0.3528635E+00, 0.2943099E+00, 0.2943099E+00 /
      data (ref_adm(30,iz,15, 7),iz = 1,20) / &
     & 0.4639848E+00, 0.4639848E+00, 0.4647947E+00, 0.4646851E+00, &
     & 0.3855400E+00, 0.3505600E+00, 0.4648716E+00, 0.3917800E+00, &
     & 0.4436443E+00, 0.4419073E+00, 0.4393341E+00, 0.4351204E+00, &
     & 0.4311244E+00, 0.4264825E+00, 0.4182250E+00, 0.4034911E+00, &
     & 0.3832404E+00, 0.3498640E+00, 0.2922665E+00, 0.2922665E+00 /
      data (ref_adm(30,iz,16, 7),iz = 1,20) / &
     & 0.4639490E+00, 0.4639490E+00, 0.4648000E+00, 0.4648993E+00, &
     & 0.4658098E+00, 0.4720436E+00, 0.4697416E+00, 0.4534296E+00, &
     & 0.4447622E+00, 0.4423618E+00, 0.4399410E+00, 0.4350880E+00, &
     & 0.4301835E+00, 0.4251515E+00, 0.4163062E+00, 0.4009224E+00, &
     & 0.3805851E+00, 0.3472251E+00, 0.2903922E+00, 0.2903922E+00 /
      data (ref_adm(30,iz,17, 7),iz = 1,20) / &
     & 0.4638727E+00, 0.4638727E+00, 0.4649020E+00, 0.4652785E+00, &
     & 0.4653195E+00, 0.4703384E+00, 0.4735576E+00, 0.3527500E+00, &
     & 0.3886700E+00, 0.4428303E+00, 0.4405781E+00, 0.4354185E+00, &
     & 0.4293298E+00, 0.4239016E+00, 0.4144002E+00, 0.3988875E+00, &
     & 0.3781901E+00, 0.3449125E+00, 0.2887805E+00, 0.2887805E+00 /
      data (ref_adm(30,iz,18, 7),iz = 1,20) / &
     & 0.4202150E+00, 0.4202150E+00, 0.4088709E+00, 0.4049498E+00, &
     & 0.4020610E+00, 0.4002711E+00, 0.3976193E+00, 0.3935362E+00, &
     & 0.3661100E+00, 0.4168200E+00, 0.3782792E+00, 0.3714626E+00, &
     & 0.3638761E+00, 0.3569861E+00, 0.3472767E+00, 0.3347857E+00, &
     & 0.3223175E+00, 0.3059805E+00, 0.2699336E+00, 0.2699336E+00 /
      data (ref_adm(30,iz,19, 7),iz = 1,20) / &
     & 0.4202150E+00, 0.4202150E+00, 0.4088709E+00, 0.4049498E+00, &
     & 0.4020610E+00, 0.4002711E+00, 0.3976193E+00, 0.3935361E+00, &
     & 0.4031300E+00, 0.4236900E+00, 0.3782791E+00, 0.3714626E+00, &
     & 0.3638761E+00, 0.3569861E+00, 0.3472767E+00, 0.3347857E+00, &
     & 0.3223175E+00, 0.3059805E+00, 0.2699336E+00, 0.2699336E+00 /
      data (ref_adm(30,iz,20, 7),iz = 1,20) / &
     & 0.4202150E+00, 0.4202150E+00, 0.4088709E+00, 0.4049498E+00, &
     & 0.4020610E+00, 0.4002711E+00, 0.3976193E+00, 0.3935362E+00, &
     & 0.3888259E+00, 0.3673700E+00, 0.3782792E+00, 0.3714626E+00, &
     & 0.3638761E+00, 0.3569861E+00, 0.3472767E+00, 0.3347857E+00, &
     & 0.3223175E+00, 0.3059805E+00, 0.2699336E+00, 0.2699336E+00 /
      data (ref_adm(30,iz,21, 7),iz = 1,20) / &
     & 0.4202150E+00, 0.4202150E+00, 0.4088709E+00, 0.4049498E+00, &
     & 0.4020610E+00, 0.4002711E+00, 0.3976193E+00, 0.3935361E+00, &
     & 0.3888259E+00, 0.3452100E+00, 0.4213700E+00, 0.3714626E+00, &
     & 0.3638761E+00, 0.3569861E+00, 0.3472767E+00, 0.3347857E+00, &
     & 0.3223175E+00, 0.3059805E+00, 0.2699336E+00, 0.2699336E+00 /
      data (ref_adm(30,iz,22, 7),iz = 1,20) / &
     & 0.5035461E+00, 0.5035461E+00, 0.4945351E+00, 0.4914136E+00, &
     & 0.4889463E+00, 0.4814200E+00, 0.4842845E+00, 0.4792175E+00, &
     & 0.4727091E+00, 0.4649158E+00, 0.3619600E+00, 0.4446716E+00, &
     & 0.4309362E+00, 0.4180020E+00, 0.3994276E+00, 0.3749672E+00, &
     & 0.3497321E+00, 0.3167144E+00, 0.2584144E+00, 0.2584144E+00 /
      data (ref_adm(30,iz,23, 7),iz = 1,20) / &
     & 0.5035461E+00, 0.5035461E+00, 0.4945351E+00, 0.4914137E+00, &
     & 0.4889463E+00, 0.4872588E+00, 0.4842845E+00, 0.4792174E+00, &
     & 0.4727091E+00, 0.4649158E+00, 0.4564396E+00, 0.4446716E+00, &
     & 0.4309362E+00, 0.4180020E+00, 0.3994276E+00, 0.3749672E+00, &
     & 0.3497321E+00, 0.3167144E+00, 0.2584144E+00, 0.2584144E+00 /
      data (ref_adm(30,iz,24, 7),iz = 1,20) / &
     & 0.5035461E+00, 0.5035461E+00, 0.4308500E+00, 0.4914136E+00, &
     & 0.4889463E+00, 0.4872588E+00, 0.4842845E+00, 0.4792175E+00, &
     & 0.4727091E+00, 0.4649158E+00, 0.4564396E+00, 0.4446716E+00, &
     & 0.4309362E+00, 0.4180020E+00, 0.3994276E+00, 0.3749672E+00, &
     & 0.3497321E+00, 0.3167144E+00, 0.2584144E+00, 0.2584144E+00 /
      data (ref_adm(30,iz,25, 7),iz = 1,20) / &
     & 0.5035461E+00, 0.5035461E+00, 0.4945351E+00, 0.4914137E+00, &
     & 0.4526600E+00, 0.4872588E+00, 0.4945700E+00, 0.4792174E+00, &
     & 0.4727091E+00, 0.4649158E+00, 0.4564396E+00, 0.4446716E+00, &
     & 0.3301300E+00, 0.4180020E+00, 0.3994276E+00, 0.3749672E+00, &
     & 0.3497321E+00, 0.3167144E+00, 0.2584144E+00, 0.2584144E+00 /
      data (ref_adm(30,iz,26, 7),iz = 1,20) / &
     & 0.5035461E+00, 0.5035461E+00, 0.4945351E+00, 0.4914136E+00, &
     & 0.4889463E+00, 0.4764700E+00, 0.4842845E+00, 0.4792175E+00, &
     & 0.4727091E+00, 0.4649158E+00, 0.4564396E+00, 0.4446716E+00, &
     & 0.4309362E+00, 0.4180020E+00, 0.3994276E+00, 0.3749672E+00, &
     & 0.3497321E+00, 0.3167144E+00, 0.2584144E+00, 0.2584144E+00 /
      data (ref_adm(30,iz,27, 7),iz = 1,20) / &
     & 0.5035461E+00, 0.5035461E+00, 0.4945351E+00, 0.4914137E+00, &
     & 0.4889463E+00, 0.4872588E+00, 0.4842845E+00, 0.4792174E+00, &
     & 0.4727091E+00, 0.4649158E+00, 0.4564396E+00, 0.4446716E+00, &
     & 0.4309362E+00, 0.4180020E+00, 0.3994276E+00, 0.3749672E+00, &
     & 0.3497321E+00, 0.3167144E+00, 0.2584144E+00, 0.2584144E+00 /
      data (ref_adm(30,iz,28, 7),iz = 1,20) / &
     & 0.5035461E+00, 0.5035461E+00, 0.4945351E+00, 0.4697400E+00, &
     & 0.4326000E+00, 0.4872588E+00, 0.4842845E+00, 0.4792175E+00, &
     & 0.4727091E+00, 0.4649158E+00, 0.4564396E+00, 0.4446716E+00, &
     & 0.4309362E+00, 0.4180020E+00, 0.3994276E+00, 0.3749672E+00, &
     & 0.3497321E+00, 0.3167144E+00, 0.2584144E+00, 0.2584144E+00 /
      data (ref_adm(30,iz,29, 7),iz = 1,20) / &
     & 0.5869900E+00, 0.5869900E+00, 0.4527600E+00, 0.4914137E+00, &
     & 0.4527500E+00, 0.5009600E+00, 0.4736300E+00, 0.4792174E+00, &
     & 0.4727091E+00, 0.4649158E+00, 0.4564396E+00, 0.4446716E+00, &
     & 0.4309362E+00, 0.4180020E+00, 0.3994276E+00, 0.3749672E+00, &
     & 0.3497321E+00, 0.3167144E+00, 0.2584144E+00, 0.2584144E+00 /
      data (ref_adm(30,iz,30, 7),iz = 1,20) / &
     & 0.5788300E+00, 0.5788300E+00, 0.4945351E+00, 0.4914136E+00, &
     & 0.4889463E+00, 0.4872588E+00, 0.4842845E+00, 0.4792175E+00, &
     & 0.4727091E+00, 0.4649158E+00, 0.4564396E+00, 0.4446716E+00, &
     & 0.4309362E+00, 0.4180020E+00, 0.3994276E+00, 0.3749672E+00, &
     & 0.3497321E+00, 0.3167144E+00, 0.2584144E+00, 0.2584144E+00 /
      data (ref_adm(30,iz,31, 7),iz = 1,20) / &
     & 0.6230800E+00, 0.6230800E+00, 0.4945351E+00, 0.4914137E+00, &
     & 0.4889463E+00, 0.4872588E+00, 0.4842845E+00, 0.4792174E+00, &
     & 0.4727091E+00, 0.4649158E+00, 0.4564396E+00, 0.4446716E+00, &
     & 0.4309362E+00, 0.4180020E+00, 0.3994276E+00, 0.3749672E+00, &
     & 0.3497321E+00, 0.3167144E+00, 0.2584144E+00, 0.2584144E+00 /
      data (ref_adm(30,iz,32, 7),iz = 1,20) / &
     & 0.5907400E+00, 0.5907400E+00, 0.4945351E+00, 0.4914136E+00, &
     & 0.4889463E+00, 0.4872588E+00, 0.4842845E+00, 0.4792175E+00, &
     & 0.5564900E+00, 0.4649158E+00, 0.4564396E+00, 0.4446716E+00, &
     & 0.4309362E+00, 0.4180020E+00, 0.3994276E+00, 0.3749672E+00, &
     & 0.3497321E+00, 0.3167144E+00, 0.2584144E+00, 0.2584144E+00 /
      data (ref_adm(30,iz,33, 7),iz = 1,20) / &
     & 0.5035461E+00, 0.5035461E+00, 0.4945351E+00, 0.4914137E+00, &
     & 0.4889463E+00, 0.4872588E+00, 0.4842845E+00, 0.4792174E+00, &
     & 0.4727091E+00, 0.4649158E+00, 0.4564396E+00, 0.4446716E+00, &
     & 0.4309362E+00, 0.4180020E+00, 0.3994276E+00, 0.3749672E+00, &
     & 0.3497321E+00, 0.3167144E+00, 0.2584144E+00, 0.2584144E+00 /
      data (ref_adm(30,iz,34, 7),iz = 1,20) / &
     & 0.5035461E+00, 0.5035461E+00, 0.4945351E+00, 0.4914136E+00, &
     & 0.4889463E+00, 0.4872588E+00, 0.4842845E+00, 0.4792175E+00, &
     & 0.4727091E+00, 0.4649158E+00, 0.4564396E+00, 0.4446716E+00, &
     & 0.4309362E+00, 0.4180020E+00, 0.3994276E+00, 0.3749672E+00, &
     & 0.3497321E+00, 0.3167144E+00, 0.2584144E+00, 0.2584144E+00 /
      data (ref_adm(30,iz,35, 7),iz = 1,20) / &
     & 0.5035461E+00, 0.5035461E+00, 0.4945351E+00, 0.4914137E+00, &
     & 0.4889463E+00, 0.4872588E+00, 0.4842845E+00, 0.4792174E+00, &
     & 0.4727091E+00, 0.4649158E+00, 0.4564396E+00, 0.4446716E+00, &
     & 0.4309362E+00, 0.4180020E+00, 0.3994276E+00, 0.3749672E+00, &
     & 0.3497321E+00, 0.3167144E+00, 0.2584144E+00, 0.2584144E+00 /
      data (ref_adm(30,iz,36, 7),iz = 1,20) / &
     & 0.5365400E+00, 0.5365400E+00, 0.4945351E+00, 0.4914136E+00, &
     & 0.4889463E+00, 0.4872588E+00, 0.4842845E+00, 0.4792175E+00, &
     & 0.4727091E+00, 0.4649158E+00, 0.4564396E+00, 0.4446716E+00, &
     & 0.4309362E+00, 0.4180020E+00, 0.3994276E+00, 0.3749672E+00, &
     & 0.3497321E+00, 0.3167144E+00, 0.2584144E+00, 0.2584144E+00 /
      data (ref_adm(30,iz,37, 7),iz = 1,20) / &
     & 0.5035461E+00, 0.5035461E+00, 0.4945351E+00, 0.4914136E+00, &
     & 0.4889463E+00, 0.4872588E+00, 0.4842845E+00, 0.4792175E+00, &
     & 0.4727091E+00, 0.4649158E+00, 0.4564396E+00, 0.4446716E+00, &
     & 0.4309362E+00, 0.4180020E+00, 0.3994276E+00, 0.3749672E+00, &
     & 0.3497321E+00, 0.3167144E+00, 0.2584144E+00, 0.2584144E+00 /
      data (ref_adm(30,iz,38, 7),iz = 1,20) / &
     & 0.5035461E+00, 0.5035461E+00, 0.4945351E+00, 0.4914136E+00, &
     & 0.4889463E+00, 0.4872588E+00, 0.4842845E+00, 0.4792175E+00, &
     & 0.4727091E+00, 0.4649158E+00, 0.4564396E+00, 0.4446716E+00, &
     & 0.4309362E+00, 0.4180020E+00, 0.3994276E+00, 0.3749672E+00, &
     & 0.3497321E+00, 0.3167144E+00, 0.2584144E+00, 0.2584144E+00 /
! Solar Zenith Angle 35.0 Albedo  0.5003628E+00
      data (ref_adm(30,iz, 1, 8),iz = 1,20) / &
     & 0.4438200E+00, 0.4438200E+00, 0.4697200E+00, 0.5084700E+00, &
     & 0.4951700E+00, 0.4931500E+00, 0.4702376E+00, 0.4646896E+00, &
     & 0.4603817E+00, 0.4572414E+00, 0.4545080E+00, 0.4519996E+00, &
     & 0.4517348E+00, 0.4502524E+00, 0.4470141E+00, 0.4390565E+00, &
     & 0.4253510E+00, 0.3948493E+00, 0.3183131E+00, 0.3183131E+00 /
      data (ref_adm(30,iz, 2, 8),iz = 1,20) / &
     & 0.4438200E+00, 0.4438200E+00, 0.4697200E+00, 0.5084700E+00, &
     & 0.4951700E+00, 0.4931500E+00, 0.4702376E+00, 0.4646896E+00, &
     & 0.4603817E+00, 0.4572414E+00, 0.4545080E+00, 0.4519996E+00, &
     & 0.4517348E+00, 0.4502524E+00, 0.4470141E+00, 0.4390565E+00, &
     & 0.4253510E+00, 0.3948493E+00, 0.3183131E+00, 0.3183131E+00 /
      data (ref_adm(30,iz, 3, 8),iz = 1,20) / &
     & 0.5017900E+00, 0.5017900E+00, 0.4434700E+00, 0.5188300E+00, &
     & 0.5150800E+00, 0.4677800E+00, 0.4702551E+00, 0.4649724E+00, &
     & 0.4604876E+00, 0.4572491E+00, 0.4544078E+00, 0.4523389E+00, &
     & 0.4517800E+00, 0.4497321E+00, 0.4469702E+00, 0.4388941E+00, &
     & 0.4249303E+00, 0.3944265E+00, 0.1885289E+00, 0.1885289E+00 /
      data (ref_adm(30,iz, 4, 8),iz = 1,20) / &
     & 0.5730600E+00, 0.5730600E+00, 0.5114700E+00, 0.5617700E+00, &
     & 0.5773700E+00, 0.4760524E+00, 0.4703259E+00, 0.4646911E+00, &
     & 0.4603010E+00, 0.4573008E+00, 0.4543260E+00, 0.4522024E+00, &
     & 0.4516540E+00, 0.4498533E+00, 0.4481200E+00, 0.4388168E+00, &
     & 0.4248081E+00, 0.3942148E+00, 0.3180081E+00, 0.3180081E+00 /
      data (ref_adm(30,iz, 5, 8),iz = 1,20) / &
     & 0.5300500E+00, 0.5300500E+00, 0.4523900E+00, 0.4822592E+00, &
     & 0.5959400E+00, 0.4950100E+00, 0.5285600E+00, 0.4648497E+00, &
     & 0.4955500E+00, 0.4572746E+00, 0.4543512E+00, 0.4936100E+00, &
     & 0.4513575E+00, 0.4496997E+00, 0.4465686E+00, 0.4387259E+00, &
     & 0.4246499E+00, 0.3938078E+00, 0.3176800E+00, 0.3176800E+00 /
      data (ref_adm(30,iz, 6, 8),iz = 1,20) / &
     & 0.4683000E+00, 0.4683000E+00, 0.4772094E+00, 0.4820780E+00, &
     & 0.4422300E+00, 0.5706300E+00, 0.3914800E+00, 0.4652488E+00, &
     & 0.4605812E+00, 0.4573062E+00, 0.5233900E+00, 0.4520207E+00, &
     & 0.4510184E+00, 0.4494770E+00, 0.3505000E+00, 0.4381760E+00, &
     & 0.4241654E+00, 0.3932713E+00, 0.3173266E+00, 0.3173266E+00 /
      data (ref_adm(30,iz, 7, 8),iz = 1,20) / &
     & 0.3440700E+00, 0.3440700E+00, 0.4398500E+00, 0.4816183E+00, &
     & 0.4824421E+00, 0.4771022E+00, 0.4682500E+00, 0.5675000E+00, &
     & 0.4609168E+00, 0.3291100E+00, 0.4282500E+00, 0.4520097E+00, &
     & 0.4505985E+00, 0.4489782E+00, 0.4458379E+00, 0.4377130E+00, &
     & 0.4236120E+00, 0.3926998E+00, 0.3167587E+00, 0.3167587E+00 /
      data (ref_adm(30,iz, 8, 8),iz = 1,20) / &
     & 0.4763672E+00, 0.4763672E+00, 0.3687000E+00, 0.3269800E+00, &
     & 0.4828642E+00, 0.4445400E+00, 0.3908700E+00, 0.5543900E+00, &
     & 0.3157000E+00, 0.5236000E+00, 0.4871200E+00, 0.4332500E+00, &
     & 0.3998200E+00, 0.3725800E+00, 0.3725400E+00, 0.4366645E+00, &
     & 0.4226182E+00, 0.3916564E+00, 0.3162306E+00, 0.3162306E+00 /
      data (ref_adm(30,iz, 9, 8),iz = 1,20) / &
     & 0.5890600E+00, 0.5890600E+00, 0.5305300E+00, 0.4055200E+00, &
     & 0.4109400E+00, 0.5697200E+00, 0.4720317E+00, 0.4658709E+00, &
     & 0.3716400E+00, 0.4331500E+00, 0.5215200E+00, 0.3895600E+00, &
     & 0.2241600E+00, 0.4485218E+00, 0.4441033E+00, 0.4358137E+00, &
     & 0.4220942E+00, 0.3908086E+00, 0.3154996E+00, 0.3154996E+00 /
      data (ref_adm(30,iz,10, 8),iz = 1,20) / &
     & 0.5759700E+00, 0.5759700E+00, 0.5502900E+00, 0.5641800E+00, &
     & 0.5593000E+00, 0.5150000E+00, 0.5639400E+00, 0.4664215E+00, &
     & 0.4615092E+00, 0.5235500E+00, 0.5434500E+00, 0.2072000E+00, &
     & 0.2283200E+00, 0.3833400E+00, 0.4175400E+00, 0.3698000E+00, &
     & 0.4210470E+00, 0.3900108E+00, 0.3147301E+00, 0.3147301E+00 /
      data (ref_adm(30,iz,11, 8),iz = 1,20) / &
     & 0.5717800E+00, 0.5717800E+00, 0.5458100E+00, 0.5475600E+00, &
     & 0.5157300E+00, 0.5661700E+00, 0.5011400E+00, 0.4669236E+00, &
     & 0.4617474E+00, 0.5261700E+00, 0.5356500E+00, 0.4511661E+00, &
     & 0.3119300E+00, 0.4468932E+00, 0.4428633E+00, 0.4345229E+00, &
     & 0.4202438E+00, 0.3890946E+00, 0.3139795E+00, 0.3139795E+00 /
      data (ref_adm(30,iz,12, 8),iz = 1,20) / &
     & 0.5095600E+00, 0.5095600E+00, 0.5058100E+00, 0.4721800E+00, &
     & 0.4962200E+00, 0.5119900E+00, 0.4995900E+00, 0.4832300E+00, &
     & 0.4860100E+00, 0.4378300E+00, 0.3696600E+00, 0.4510298E+00, &
     & 0.3287900E+00, 0.4464404E+00, 0.4417543E+00, 0.4332619E+00, &
     & 0.4190923E+00, 0.3880337E+00, 0.3130730E+00, 0.3130730E+00 /
      data (ref_adm(30,iz,13, 8),iz = 1,20) / &
     & 0.5419600E+00, 0.5419600E+00, 0.5089200E+00, 0.5321100E+00, &
     & 0.4869900E+00, 0.5072500E+00, 0.4812100E+00, 0.5422000E+00, &
     & 0.4767300E+00, 0.4224200E+00, 0.4186800E+00, 0.4199500E+00, &
     & 0.2874500E+00, 0.4457588E+00, 0.4407189E+00, 0.4322250E+00, &
     & 0.4177311E+00, 0.3870319E+00, 0.3122067E+00, 0.3122067E+00 /
      data (ref_adm(30,iz,14, 8),iz = 1,20) / &
     & 0.5130900E+00, 0.5130900E+00, 0.3785700E+00, 0.4037300E+00, &
     & 0.4842000E+00, 0.5244700E+00, 0.5332200E+00, 0.5175400E+00, &
     & 0.4932900E+00, 0.5100900E+00, 0.4067600E+00, 0.4433700E+00, &
     & 0.4537500E+00, 0.5023200E+00, 0.4400876E+00, 0.4311104E+00, &
     & 0.4165989E+00, 0.3857855E+00, 0.3112839E+00, 0.3112839E+00 /
      data (ref_adm(30,iz,15, 8),iz = 1,20) / &
     & 0.5151500E+00, 0.5151500E+00, 0.5025200E+00, 0.4962500E+00, &
     & 0.3226600E+00, 0.4818580E+00, 0.5384000E+00, 0.5789300E+00, &
     & 0.5708900E+00, 0.5206400E+00, 0.4282100E+00, 0.3984300E+00, &
     & 0.2065900E+00, 0.4347600E+00, 0.4389982E+00, 0.4299674E+00, &
     & 0.4153265E+00, 0.3846453E+00, 0.3104535E+00, 0.3104535E+00 /
      data (ref_adm(30,iz,16, 8),iz = 1,20) / &
     & 0.4636100E+00, 0.4636100E+00, 0.5098000E+00, 0.5639500E+00, &
     & 0.3473700E+00, 0.4823543E+00, 0.4765733E+00, 0.4703889E+00, &
     & 0.4899400E+00, 0.5165200E+00, 0.4551049E+00, 0.4507666E+00, &
     & 0.4463263E+00, 0.4432589E+00, 0.4381576E+00, 0.4287781E+00, &
     & 0.4139800E+00, 0.3834410E+00, 0.3096173E+00, 0.3096173E+00 /
      data (ref_adm(30,iz,17, 8),iz = 1,20) / &
     & 0.3870300E+00, 0.3870300E+00, 0.4557800E+00, 0.5335800E+00, &
     & 0.6024500E+00, 0.4830748E+00, 0.4773347E+00, 0.4712978E+00, &
     & 0.4647522E+00, 0.4467400E+00, 0.4553026E+00, 0.4507883E+00, &
     & 0.4461302E+00, 0.4423069E+00, 0.4371677E+00, 0.4273531E+00, &
     & 0.4128206E+00, 0.3821034E+00, 0.3088627E+00, 0.3088627E+00 /
      data (ref_adm(30,iz,18, 8),iz = 1,20) / &
     & 0.5050747E+00, 0.5050747E+00, 0.4992458E+00, 0.4766700E+00, &
     & 0.4907300E+00, 0.5186700E+00, 0.4686900E+00, 0.5007872E+00, &
     & 0.5123300E+00, 0.5066500E+00, 0.4186700E+00, 0.4654154E+00, &
     & 0.4553522E+00, 0.4453341E+00, 0.4316744E+00, 0.4119359E+00, &
     & 0.3885382E+00, 0.3521415E+00, 0.2895866E+00, 0.2895866E+00 /
      data (ref_adm(30,iz,19, 8),iz = 1,20) / &
     & 0.5910400E+00, 0.5910400E+00, 0.5828900E+00, 0.4999800E+00, &
     & 0.3859600E+00, 0.4492100E+00, 0.4129300E+00, 0.3932200E+00, &
     & 0.4850300E+00, 0.5375100E+00, 0.3919200E+00, 0.3939500E+00, &
     & 0.4555145E+00, 0.5135300E+00, 0.5934000E+00, 0.4116953E+00, &
     & 0.3882588E+00, 0.3518691E+00, 0.2894380E+00, 0.2894380E+00 /
      data (ref_adm(30,iz,20, 8),iz = 1,20) / &
     & 0.5797300E+00, 0.5797300E+00, 0.5218800E+00, 0.3683400E+00, &
     & 0.4925700E+00, 0.4327800E+00, 0.5251000E+00, 0.5046700E+00, &
     & 0.5204300E+00, 0.4920765E+00, 0.4269600E+00, 0.4031600E+00, &
     & 0.4043200E+00, 0.4451760E+00, 0.5764700E+00, 0.4113853E+00, &
     & 0.3876961E+00, 0.3514312E+00, 0.2892801E+00, 0.2892801E+00 /
      data (ref_adm(30,iz,21, 8),iz = 1,20) / &
     & 0.5422000E+00, 0.5422000E+00, 0.4211100E+00, 0.4981420E+00, &
     & 0.4992462E+00, 0.4776100E+00, 0.5618200E+00, 0.5179200E+00, &
     & 0.5978300E+00, 0.4943901E+00, 0.4663200E+00, 0.4564500E+00, &
     & 0.4557558E+00, 0.4454209E+00, 0.4310915E+00, 0.4110712E+00, &
     & 0.3874640E+00, 0.3510821E+00, 0.2891795E+00, 0.2891795E+00 /
      data (ref_adm(30,iz,22, 8),iz = 1,20) / &
     & 0.5620000E+00, 0.5620000E+00, 0.5070058E+00, 0.5077843E+00, &
     & 0.5101082E+00, 0.5016500E+00, 0.4647400E+00, 0.4503000E+00, &
     & 0.5327000E+00, 0.5408090E+00, 0.5086800E+00, 0.4405000E+00, &
     & 0.5853029E+00, 0.6007496E+00, 0.6212277E+00, 0.6445714E+00, &
     & 0.6644152E+00, 0.6783997E+00, 0.6600842E+00, 0.6600842E+00 /
      data (ref_adm(30,iz,23, 8),iz = 1,20) / &
     & 0.4838500E+00, 0.4838500E+00, 0.5058943E+00, 0.5064393E+00, &
     & 0.5199800E+00, 0.4942700E+00, 0.5152686E+00, 0.5208016E+00, &
     & 0.5088000E+00, 0.4786400E+00, 0.4449100E+00, 0.4798100E+00, &
     & 0.4921500E+00, 0.5926296E+00, 0.6117960E+00, 0.6343854E+00, &
     & 0.6533979E+00, 0.6678067E+00, 0.6620454E+00, 0.6620454E+00 /
      data (ref_adm(30,iz,24, 8),iz = 1,20) / &
     & 0.4954100E+00, 0.4954100E+00, 0.5049686E+00, 0.5007600E+00, &
     & 0.5698800E+00, 0.5881400E+00, 0.6358600E+00, 0.6432200E+00, &
     & 0.5772800E+00, 0.4545900E+00, 0.4798100E+00, 0.5695100E+00, &
     & 0.5718147E+00, 0.4809000E+00, 0.4218800E+00, 0.6258360E+00, &
     & 0.6448545E+00, 0.6615947E+00, 0.6688466E+00, 0.6688466E+00 /
      data (ref_adm(30,iz,25, 8),iz = 1,20) / &
     & 0.4532000E+00, 0.4532000E+00, 0.5543200E+00, 0.5853200E+00, &
     & 0.5830500E+00, 0.5185400E+00, 0.6351000E+00, 0.5818800E+00, &
     & 0.5316900E+00, 0.4567400E+00, 0.4597500E+00, 0.3775900E+00, &
     & 0.5687875E+00, 0.5822792E+00, 0.4255200E+00, 0.6218216E+00, &
     & 0.6408475E+00, 0.6585349E+00, 0.6789203E+00, 0.6789203E+00 /
      data (ref_adm(30,iz,26, 8),iz = 1,20) / &
     & 0.5478200E+00, 0.5478200E+00, 0.5510200E+00, 0.5625700E+00, &
     & 0.5851500E+00, 0.5337500E+00, 0.5088419E+00, 0.5853200E+00, &
     & 0.5969200E+00, 0.4721400E+00, 0.4793200E+00, 0.5348400E+00, &
     & 0.5687735E+00, 0.5831971E+00, 0.6013845E+00, 0.6228837E+00, &
     & 0.6423175E+00, 0.6624641E+00, 0.6950067E+00, 0.6950067E+00 /
      data (ref_adm(30,iz,27, 8),iz = 1,20) / &
     & 0.5521900E+00, 0.5521900E+00, 0.5762500E+00, 0.4837600E+00, &
     & 0.4579600E+00, 0.4226800E+00, 0.5206300E+00, 0.3990600E+00, &
     & 0.5204505E+00, 0.5469900E+00, 0.5282600E+00, 0.5076800E+00, &
     & 0.5695724E+00, 0.4388000E+00, 0.6031372E+00, 0.6252826E+00, &
     & 0.6467577E+00, 0.6704309E+00, 0.7148290E+00, 0.7148290E+00 /
      data (ref_adm(30,iz,28, 8),iz = 1,20) / &
     & 0.5468300E+00, 0.5468300E+00, 0.5309500E+00, 0.4957400E+00, &
     & 0.4935500E+00, 0.4688100E+00, 0.5145200E+00, 0.4637900E+00, &
     & 0.5208235E+00, 0.5440900E+00, 0.5600200E+00, 0.5555658E+00, &
     & 0.5146900E+00, 0.4961200E+00, 0.6085434E+00, 0.6325344E+00, &
     & 0.6549039E+00, 0.6809060E+00, 0.7361876E+00, 0.7361876E+00 /
      data (ref_adm(30,iz,29, 8),iz = 1,20) / &
     & 0.5698500E+00, 0.5698500E+00, 0.5226300E+00, 0.5542600E+00, &
     & 0.5685300E+00, 0.5013600E+00, 0.5252300E+00, 0.5652900E+00, &
     & 0.5214379E+00, 0.6380700E+00, 0.5899100E+00, 0.5597333E+00, &
     & 0.5785049E+00, 0.5055000E+00, 0.4917300E+00, 0.6420722E+00, &
     & 0.6667117E+00, 0.6959804E+00, 0.7605281E+00, 0.7605281E+00 /
      data (ref_adm(30,iz,30, 8),iz = 1,20) / &
     & 0.5400000E+00, 0.5400000E+00, 0.6066400E+00, 0.5837500E+00, &
     & 0.5495700E+00, 0.5027686E+00, 0.5076161E+00, 0.5129200E+00, &
     & 0.5081100E+00, 0.5395700E+00, 0.5667700E+00, 0.5100900E+00, &
     & 0.5868839E+00, 0.6049963E+00, 0.6284484E+00, 0.6564856E+00, &
     & 0.6832345E+00, 0.7149002E+00, 0.7858714E+00, 0.7858714E+00 /
      data (ref_adm(30,iz,31, 8),iz = 1,20) / &
     & 0.5684700E+00, 0.5684700E+00, 0.5004627E+00, 0.4984434E+00, &
     & 0.4993640E+00, 0.3866500E+00, 0.5315200E+00, 0.5722600E+00, &
     & 0.5493000E+00, 0.5528000E+00, 0.5110100E+00, 0.5454400E+00, &
     & 0.5951703E+00, 0.5871300E+00, 0.5382500E+00, 0.6706291E+00, &
     & 0.7000750E+00, 0.7356973E+00, 0.8123736E+00, 0.8123736E+00 /
      data (ref_adm(30,iz,32, 8),iz = 1,20) / &
     & 0.3416900E+00, 0.3416900E+00, 0.5000081E+00, 0.4978976E+00, &
     & 0.5540900E+00, 0.5415000E+00, 0.5886100E+00, 0.5531200E+00, &
     & 0.3670000E+00, 0.4824200E+00, 0.5566614E+00, 0.5790094E+00, &
     & 0.6040722E+00, 0.6251641E+00, 0.6525716E+00, 0.6853879E+00, &
     & 0.7180517E+00, 0.7569972E+00, 0.8371933E+00, 0.8371933E+00 /
      data (ref_adm(30,iz,33, 8),iz = 1,20) / &
     & 0.3468700E+00, 0.3468700E+00, 0.4997326E+00, 0.4975967E+00, &
     & 0.5279000E+00, 0.5972600E+00, 0.6062300E+00, 0.5178469E+00, &
     & 0.4481000E+00, 0.3465100E+00, 0.3573000E+00, 0.5854202E+00, &
     & 0.6094075E+00, 0.6276696E+00, 0.6518014E+00, 0.6841167E+00, &
     & 0.7210527E+00, 0.7703260E+00, 0.8603902E+00, 0.8603902E+00 /
      data (ref_adm(30,iz,34, 8),iz = 1,20) / &
     & 0.5720700E+00, 0.5720700E+00, 0.4992844E+00, 0.5581400E+00, &
     & 0.5721500E+00, 0.5338700E+00, 0.5094236E+00, 0.5192975E+00, &
     & 0.5321736E+00, 0.5477991E+00, 0.5656798E+00, 0.5878006E+00, &
     & 0.6059896E+00, 0.6201804E+00, 0.6415029E+00, 0.6725937E+00, &
     & 0.7089357E+00, 0.7640770E+00, 0.8732059E+00, 0.8732059E+00 /
      data (ref_adm(30,iz,35, 8),iz = 1,20) / &
     & 0.5188600E+00, 0.5188600E+00, 0.4845100E+00, 0.5400500E+00, &
     & 0.4441200E+00, 0.5546200E+00, 0.5098905E+00, 0.5204309E+00, &
     & 0.5341679E+00, 0.5506840E+00, 0.5684636E+00, 0.5865119E+00, &
     & 0.6447800E+00, 0.6586000E+00, 0.6381488E+00, 0.6711543E+00, &
     & 0.7057441E+00, 0.7567180E+00, 0.8783157E+00, 0.8783157E+00 /
      data (ref_adm(30,iz,36, 8),iz = 1,20) / &
     & 0.6325700E+00, 0.6325700E+00, 0.5216300E+00, 0.4829500E+00, &
     & 0.4987858E+00, 0.5205500E+00, 0.5101775E+00, 0.5273500E+00, &
     & 0.5353763E+00, 0.5523208E+00, 0.5694480E+00, 0.5841015E+00, &
     & 0.6365400E+00, 0.6139932E+00, 0.6426218E+00, 0.6784170E+00, &
     & 0.7125968E+00, 0.7585264E+00, 0.8815977E+00, 0.8815977E+00 /
      data (ref_adm(30,iz,37, 8),iz = 1,20) / &
     & 0.5489400E+00, 0.5489400E+00, 0.5758100E+00, 0.5541300E+00, &
     & 0.5727500E+00, 0.5965400E+00, 0.5107430E+00, 0.5217782E+00, &
     & 0.5362319E+00, 0.5535305E+00, 0.5697386E+00, 0.5822445E+00, &
     & 0.5967774E+00, 0.6159118E+00, 0.6638135E+00, 0.7323602E+00, &
     & 0.7490238E+00, 0.7641564E+00, 0.8843995E+00, 0.8843995E+00 /
      data (ref_adm(30,iz,38, 8),iz = 1,20) / &
     & 0.5489400E+00, 0.5489400E+00, 0.5758100E+00, 0.5541300E+00, &
     & 0.5727500E+00, 0.5965400E+00, 0.5107430E+00, 0.5217782E+00, &
     & 0.5362319E+00, 0.5535305E+00, 0.5697386E+00, 0.5822445E+00, &
     & 0.5967774E+00, 0.6159118E+00, 0.6638135E+00, 0.7323602E+00, &
     & 0.7490238E+00, 0.7641564E+00, 0.8843995E+00, 0.8843995E+00 /
! Solar Zenith Angle 40.0 Albedo  0.4904842E+00
      data (ref_adm(30,iz, 1, 9),iz = 1,20) / &
     & 0.5181800E+00, 0.5181800E+00, 0.5758000E+00, 0.5764000E+00, &
     & 0.5621800E+00, 0.5440600E+00, 0.6078600E+00, 0.6174800E+00, &
     & 0.5469700E+00, 0.5155000E+00, 0.4569623E+00, 0.4421500E+00, &
     & 0.4968800E+00, 0.4224125E+00, 0.2848400E+00, 0.2653800E+00, &
     & 0.6664300E+00, 0.3260517E+00, 0.2744640E+00, 0.2744640E+00 /
      data (ref_adm(30,iz, 2, 9),iz = 1,20) / &
     & 0.5181800E+00, 0.5181800E+00, 0.5758000E+00, 0.5764000E+00, &
     & 0.5621800E+00, 0.5440600E+00, 0.6078600E+00, 0.6174800E+00, &
     & 0.5469700E+00, 0.5155000E+00, 0.4569623E+00, 0.4421500E+00, &
     & 0.4968800E+00, 0.4224125E+00, 0.2848400E+00, 0.2653800E+00, &
     & 0.6664300E+00, 0.3260517E+00, 0.2744640E+00, 0.2744640E+00 /
      data (ref_adm(30,iz, 3, 9),iz = 1,20) / &
     & 0.5253300E+00, 0.5253300E+00, 0.5203400E+00, 0.5612900E+00, &
     & 0.5738400E+00, 0.5317300E+00, 0.5338100E+00, 0.5804900E+00, &
     & 0.5927200E+00, 0.3383000E+00, 0.4569632E+00, 0.4465193E+00, &
     & 0.4299300E+00, 0.4478800E+00, 0.4626300E+00, 0.2708900E+00, &
     & 0.3581758E+00, 0.3260253E+00, 0.1982447E+00, 0.1982447E+00 /
      data (ref_adm(30,iz, 4, 9),iz = 1,20) / &
     & 0.5826200E+00, 0.5826200E+00, 0.5118100E+00, 0.5463000E+00, &
     & 0.4787900E+00, 0.5168800E+00, 0.4895400E+00, 0.4231600E+00, &
     & 0.5127000E+00, 0.4687836E+00, 0.5212600E+00, 0.4465432E+00, &
     & 0.3127900E+00, 0.4223281E+00, 0.3525500E+00, 0.3825111E+00, &
     & 0.3581095E+00, 0.3259440E+00, 0.2744341E+00, 0.2744341E+00 /
      data (ref_adm(30,iz, 5, 9),iz = 1,20) / &
     & 0.5917300E+00, 0.5917300E+00, 0.5716100E+00, 0.5492500E+00, &
     & 0.4873400E+00, 0.4562000E+00, 0.5157100E+00, 0.4141100E+00, &
     & 0.3309600E+00, 0.4858000E+00, 0.4189800E+00, 0.4465090E+00, &
     & 0.4342085E+00, 0.3083700E+00, 0.4053220E+00, 0.3824398E+00, &
     & 0.3580796E+00, 0.3259211E+00, 0.2743949E+00, 0.2743949E+00 /
      data (ref_adm(30,iz, 6, 9),iz = 1,20) / &
     & 0.4837100E+00, 0.4837100E+00, 0.5656600E+00, 0.5659700E+00, &
     & 0.5429400E+00, 0.5712400E+00, 0.3998600E+00, 0.3689100E+00, &
     & 0.4829132E+00, 0.4688497E+00, 0.5631800E+00, 0.4890300E+00, &
     & 0.2743600E+00, 0.4089200E+00, 0.4052670E+00, 0.3823528E+00, &
     & 0.3579852E+00, 0.3258372E+00, 0.2743511E+00, 0.2743511E+00 /
      data (ref_adm(30,iz, 7, 9),iz = 1,20) / &
     & 0.4939700E+00, 0.4939700E+00, 0.5099900E+00, 0.5106100E+00, &
     & 0.5142700E+00, 0.5823500E+00, 0.5865900E+00, 0.4471300E+00, &
     & 0.4196900E+00, 0.3521300E+00, 0.5010100E+00, 0.5481100E+00, &
     & 0.4527700E+00, 0.4086300E+00, 0.5738900E+00, 0.4791600E+00, &
     & 0.3578843E+00, 0.3257594E+00, 0.2742940E+00, 0.2742940E+00 /
      data (ref_adm(30,iz, 8, 9),iz = 1,20) / &
     & 0.4022100E+00, 0.4022100E+00, 0.5037500E+00, 0.4408900E+00, &
     & 0.4095300E+00, 0.3720500E+00, 0.4768300E+00, 0.4525900E+00, &
     & 0.3466100E+00, 0.4312100E+00, 0.4568900E+00, 0.4464963E+00, &
     & 0.5061200E+00, 0.4690600E+00, 0.5234900E+00, 0.3821711E+00, &
     & 0.3577624E+00, 0.3256524E+00, 0.2742136E+00, 0.2742136E+00 /
      data (ref_adm(30,iz, 9, 9),iz = 1,20) / &
     & 0.5529200E+00, 0.5529200E+00, 0.4727100E+00, 0.5357500E+00, &
     & 0.5393900E+00, 0.4950200E+00, 0.4857210E+00, 0.5367200E+00, &
     & 0.4723500E+00, 0.4690816E+00, 0.4568750E+00, 0.2047500E+00, &
     & 0.4757500E+00, 0.4415100E+00, 0.4914900E+00, 0.3820433E+00, &
     & 0.3576238E+00, 0.3255255E+00, 0.2741406E+00, 0.2741406E+00 /
      data (ref_adm(30,iz,10, 9),iz = 1,20) / &
     & 0.5520000E+00, 0.5520000E+00, 0.5589700E+00, 0.5678000E+00, &
     & 0.5546800E+00, 0.4880600E+00, 0.5496700E+00, 0.4856900E+00, &
     & 0.4909000E+00, 0.5736000E+00, 0.2249200E+00, 0.2510400E+00, &
     & 0.3712800E+00, 0.5227400E+00, 0.4048511E+00, 0.3819045E+00, &
     & 0.3574757E+00, 0.3253982E+00, 0.2740594E+00, 0.2740594E+00 /
      data (ref_adm(30,iz,11, 9),iz = 1,20) / &
     & 0.4429000E+00, 0.4429000E+00, 0.5371900E+00, 0.5423200E+00, &
     & 0.5305000E+00, 0.5127400E+00, 0.4973000E+00, 0.5074500E+00, &
     & 0.4660200E+00, 0.4603900E+00, 0.2266600E+00, 0.3253000E+00, &
     & 0.6189800E+00, 0.4218754E+00, 0.5009300E+00, 0.3817581E+00, &
     & 0.3573231E+00, 0.3252631E+00, 0.2739717E+00, 0.2739717E+00 /
      data (ref_adm(30,iz,12, 9),iz = 1,20) / &
     & 0.4991400E+00, 0.4991400E+00, 0.5240800E+00, 0.5038400E+00, &
     & 0.5260600E+00, 0.4965200E+00, 0.4802500E+00, 0.4846300E+00, &
     & 0.4758400E+00, 0.5046900E+00, 0.2370900E+00, 0.4464482E+00, &
     & 0.5388900E+00, 0.4217669E+00, 0.2958100E+00, 0.3815897E+00, &
     & 0.3571561E+00, 0.3251265E+00, 0.2738765E+00, 0.2738765E+00 /
      data (ref_adm(30,iz,13, 9),iz = 1,20) / &
     & 0.4740900E+00, 0.4740900E+00, 0.4544900E+00, 0.4482200E+00, &
     & 0.4363300E+00, 0.4387800E+00, 0.4518800E+00, 0.4762500E+00, &
     & 0.4703600E+00, 0.4142600E+00, 0.4099800E+00, 0.3875300E+00, &
     & 0.4401400E+00, 0.3394300E+00, 0.3525400E+00, 0.3814275E+00, &
     & 0.3569878E+00, 0.3249522E+00, 0.2737832E+00, 0.2737832E+00 /
      data (ref_adm(30,iz,14, 9),iz = 1,20) / &
     & 0.4636800E+00, 0.4636800E+00, 0.4237300E+00, 0.4291800E+00, &
     & 0.4061000E+00, 0.4980400E+00, 0.4289000E+00, 0.4762600E+00, &
     & 0.4567500E+00, 0.3807700E+00, 0.4376900E+00, 0.4121900E+00, &
     & 0.4494500E+00, 0.4312700E+00, 0.4043052E+00, 0.3812455E+00, &
     & 0.3568312E+00, 0.3248062E+00, 0.2736967E+00, 0.2736967E+00 /
      data (ref_adm(30,iz,15, 9),iz = 1,20) / &
     & 0.4489000E+00, 0.4489000E+00, 0.4669300E+00, 0.4477900E+00, &
     & 0.3529400E+00, 0.3902400E+00, 0.5194400E+00, 0.5003600E+00, &
     & 0.5065500E+00, 0.4313600E+00, 0.4392000E+00, 0.4859700E+00, &
     & 0.4969100E+00, 0.4376000E+00, 0.3970200E+00, 0.4578700E+00, &
     & 0.4472200E+00, 0.3246387E+00, 0.2736034E+00, 0.2736034E+00 /
      data (ref_adm(30,iz,16, 9),iz = 1,20) / &
     & 0.4593500E+00, 0.4593500E+00, 0.3808300E+00, 0.4085600E+00, &
     & 0.3738700E+00, 0.3389600E+00, 0.3300500E+00, 0.3766900E+00, &
     & 0.5236400E+00, 0.5084200E+00, 0.3902700E+00, 0.4463660E+00, &
     & 0.5608000E+00, 0.4356800E+00, 0.3804800E+00, 0.3808965E+00, &
     & 0.3564801E+00, 0.3244965E+00, 0.2735158E+00, 0.2735158E+00 /
      data (ref_adm(30,iz,17, 9),iz = 1,20) / &
     & 0.4880400E+00, 0.4880400E+00, 0.4867700E+00, 0.4879169E+00, &
     & 0.5693100E+00, 0.4589000E+00, 0.3879000E+00, 0.4833808E+00, &
     & 0.4867977E+00, 0.5218000E+00, 0.5067700E+00, 0.4578300E+00, &
     & 0.5725100E+00, 0.4625400E+00, 0.4038607E+00, 0.3807186E+00, &
     & 0.3562821E+00, 0.3243164E+00, 0.2734327E+00, 0.2734327E+00 /
      data (ref_adm(30,iz,18, 9),iz = 1,20) / &
     & 0.4656700E+00, 0.4656700E+00, 0.5507700E+00, 0.3149100E+00, &
     & 0.4492200E+00, 0.5566100E+00, 0.4978200E+00, 0.4539025E+00, &
     & 0.4855700E+00, 0.5335600E+00, 0.4638212E+00, 0.4694101E+00, &
     & 0.5816700E+00, 0.4696700E+00, 0.2888600E+00, 0.4655929E+00, &
     & 0.4495077E+00, 0.4175110E+00, 0.3557343E+00, 0.3557343E+00 /
      data (ref_adm(30,iz,19, 9),iz = 1,20) / &
     & 0.3075700E+00, 0.3075700E+00, 0.3693700E+00, 0.4477900E+00, &
     & 0.4300900E+00, 0.4826900E+00, 0.4581400E+00, 0.1799800E+00, &
     & 0.5386500E+00, 0.4680100E+00, 0.5311300E+00, 0.5969900E+00, &
     & 0.5738600E+00, 0.5011600E+00, 0.4681128E+00, 0.4587906E+00, &
     & 0.4425435E+00, 0.4111006E+00, 0.3519829E+00, 0.3519829E+00 /
      data (ref_adm(30,iz,20, 9),iz = 1,20) / &
     & 0.3368600E+00, 0.3368600E+00, 0.3663500E+00, 0.5112700E+00, &
     & 0.5015800E+00, 0.5089400E+00, 0.4558000E+00, 0.4912300E+00, &
     & 0.5320600E+00, 0.5060600E+00, 0.5117700E+00, 0.6089600E+00, &
     & 0.5585700E+00, 0.5234700E+00, 0.4839400E+00, 0.4539470E+00, &
     & 0.4370358E+00, 0.4060781E+00, 0.3499840E+00, 0.3499840E+00 /
      data (ref_adm(30,iz,21, 9),iz = 1,20) / &
     & 0.3248800E+00, 0.3248800E+00, 0.3046800E+00, 0.4030900E+00, &
     & 0.4795600E+00, 0.4445500E+00, 0.4783400E+00, 0.4587400E+00, &
     & 0.6008100E+00, 0.6025700E+00, 0.5591700E+00, 0.4858100E+00, &
     & 0.3878800E+00, 0.4949200E+00, 0.4877100E+00, 0.4498673E+00, &
     & 0.4328884E+00, 0.4023081E+00, 0.3491427E+00, 0.3491427E+00 /
      data (ref_adm(30,iz,22, 9),iz = 1,20) / &
     & 0.4484500E+00, 0.4484500E+00, 0.4171400E+00, 0.4056200E+00, &
     & 0.3790500E+00, 0.4495500E+00, 0.4925500E+00, 0.3630100E+00, &
     & 0.4753200E+00, 0.4814300E+00, 0.5278500E+00, 0.5362300E+00, &
     & 0.3712300E+00, 0.4530200E+00, 0.5959641E+00, 0.6185283E+00, &
     & 0.6408332E+00, 0.6684468E+00, 0.6909779E+00, 0.6909779E+00 /
      data (ref_adm(30,iz,23, 9),iz = 1,20) / &
     & 0.3807100E+00, 0.3807100E+00, 0.3755000E+00, 0.4460400E+00, &
     & 0.4394300E+00, 0.4961800E+00, 0.4520500E+00, 0.5377000E+00, &
     & 0.4571000E+00, 0.3664400E+00, 0.5714600E+00, 0.5668200E+00, &
     & 0.4959300E+00, 0.5685578E+00, 0.5857795E+00, 0.6074812E+00, &
     & 0.6292605E+00, 0.6576822E+00, 0.6926621E+00, 0.6926621E+00 /
      data (ref_adm(30,iz,24, 9),iz = 1,20) / &
     & 0.4563000E+00, 0.4563000E+00, 0.4031100E+00, 0.3859300E+00, &
     & 0.4341800E+00, 0.5085500E+00, 0.5779400E+00, 0.5831800E+00, &
     & 0.3774800E+00, 0.4249000E+00, 0.5473700E+00, 0.3973100E+00, &
     & 0.4946400E+00, 0.5612937E+00, 0.3803000E+00, 0.5987104E+00, &
     & 0.6206673E+00, 0.6514804E+00, 0.6996579E+00, 0.6996579E+00 /
      data (ref_adm(30,iz,25, 9),iz = 1,20) / &
     & 0.4615600E+00, 0.4615600E+00, 0.5733100E+00, 0.4924100E+00, &
     & 0.5952500E+00, 0.5720400E+00, 0.5201000E+00, 0.5913900E+00, &
     & 0.5562600E+00, 0.5781200E+00, 0.5746300E+00, 0.5314272E+00, &
     & 0.4961800E+00, 0.5563751E+00, 0.5726302E+00, 0.2945700E+00, &
     & 0.3149500E+00, 0.6485422E+00, 0.7102033E+00, 0.7102033E+00 /
      data (ref_adm(30,iz,26, 9),iz = 1,20) / &
     & 0.4782100E+00, 0.4782100E+00, 0.5348300E+00, 0.4890600E+00, &
     & 0.4603100E+00, 0.4383600E+00, 0.4869700E+00, 0.4487000E+00, &
     & 0.4773200E+00, 0.5864200E+00, 0.6022900E+00, 0.5421500E+00, &
     & 0.5392500E+00, 0.5546771E+00, 0.5709608E+00, 0.5923401E+00, &
     & 0.6158172E+00, 0.6517680E+00, 0.7271919E+00, 0.7271919E+00 /
      data (ref_adm(30,iz,27, 9),iz = 1,20) / &
     & 0.4416000E+00, 0.4416000E+00, 0.4494200E+00, 0.4613400E+00, &
     & 0.4349100E+00, 0.4533500E+00, 0.4545700E+00, 0.4636000E+00, &
     & 0.4355500E+00, 0.5011200E+00, 0.5800800E+00, 0.5541600E+00, &
     & 0.5580800E+00, 0.4641500E+00, 0.5705270E+00, 0.5927430E+00, &
     & 0.6183904E+00, 0.4649500E+00, 0.7482315E+00, 0.7482315E+00 /
      data (ref_adm(30,iz,28, 9),iz = 1,20) / &
     & 0.4604800E+00, 0.4604800E+00, 0.4815200E+00, 0.4827300E+00, &
     & 0.5037000E+00, 0.5217200E+00, 0.5426000E+00, 0.5222000E+00, &
     & 0.5280300E+00, 0.5330400E+00, 0.5469900E+00, 0.5920200E+00, &
     & 0.5924600E+00, 0.5611000E+00, 0.5804800E+00, 0.5967206E+00, &
     & 0.6240608E+00, 0.6682722E+00, 0.7709983E+00, 0.7709983E+00 /
      data (ref_adm(30,iz,29, 9),iz = 1,20) / &
     & 0.4970400E+00, 0.4970400E+00, 0.4467200E+00, 0.4153500E+00, &
     & 0.4500400E+00, 0.4892700E+00, 0.5182100E+00, 0.5287100E+00, &
     & 0.5801100E+00, 0.6337600E+00, 0.6265500E+00, 0.5814100E+00, &
     & 0.5913400E+00, 0.5733500E+00, 0.4953000E+00, 0.6025525E+00, &
     & 0.6325889E+00, 0.6817537E+00, 0.7969872E+00, 0.7969872E+00 /
      data (ref_adm(30,iz,30, 9),iz = 1,20) / &
     & 0.4984100E+00, 0.4984100E+00, 0.4905200E+00, 0.4332400E+00, &
     & 0.5369000E+00, 0.4947700E+00, 0.5234900E+00, 0.5832300E+00, &
     & 0.5318900E+00, 0.4311300E+00, 0.5183746E+00, 0.5529700E+00, &
     & 0.5563700E+00, 0.5737500E+00, 0.5835158E+00, 0.6115837E+00, &
     & 0.6445007E+00, 0.6984223E+00, 0.8240960E+00, 0.8240960E+00 /
      data (ref_adm(30,iz,31, 9),iz = 1,20) / &
     & 0.5016600E+00, 0.5016600E+00, 0.5552400E+00, 0.5927700E+00, &
     & 0.5860800E+00, 0.5908600E+00, 0.6107300E+00, 0.5837200E+00, &
     & 0.5898500E+00, 0.6030900E+00, 0.5203683E+00, 0.5354077E+00, &
     & 0.5814500E+00, 0.5189400E+00, 0.5904822E+00, 0.6206287E+00, &
     & 0.6567789E+00, 0.7166776E+00, 0.8524603E+00, 0.8524603E+00 /
      data (ref_adm(30,iz,32, 9),iz = 1,20) / &
     & 0.4858300E+00, 0.4858300E+00, 0.5437900E+00, 0.6085900E+00, &
     & 0.5408700E+00, 0.5570200E+00, 0.5609000E+00, 0.4810600E+00, &
     & 0.5380400E+00, 0.6193800E+00, 0.5227712E+00, 0.5386339E+00, &
     & 0.6198600E+00, 0.5736701E+00, 0.5973190E+00, 0.6300611E+00, &
     & 0.6697522E+00, 0.7351739E+00, 0.8789885E+00, 0.8789885E+00 /
      data (ref_adm(30,iz,33, 9),iz = 1,20) / &
     & 0.5395000E+00, 0.5395000E+00, 0.5682300E+00, 0.5033100E+00, &
     & 0.5382200E+00, 0.5720100E+00, 0.4363100E+00, 0.4739600E+00, &
     & 0.5732100E+00, 0.5867200E+00, 0.4123600E+00, 0.4706400E+00, &
     & 0.6445200E+00, 0.5768900E+00, 0.5972886E+00, 0.6300892E+00, &
     & 0.4888200E+00, 0.7473741E+00, 0.9037678E+00, 0.9037678E+00 /
      data (ref_adm(30,iz,34, 9),iz = 1,20) / &
     & 0.5581200E+00, 0.5581200E+00, 0.5897600E+00, 0.5666300E+00, &
     & 0.5679900E+00, 0.5418800E+00, 0.5232900E+00, 0.4750300E+00, &
     & 0.4919300E+00, 0.5149348E+00, 0.4702900E+00, 0.5429657E+00, &
     & 0.6494300E+00, 0.6068500E+00, 0.6341900E+00, 0.6240563E+00, &
     & 0.6663200E+00, 0.7441605E+00, 0.9176263E+00, 0.9176263E+00 /
      data (ref_adm(30,iz,35, 9),iz = 1,20) / &
     & 0.4926100E+00, 0.4926100E+00, 0.5269900E+00, 0.5803900E+00, &
     & 0.4825824E+00, 0.4133200E+00, 0.4895396E+00, 0.4786100E+00, &
     & 0.4497200E+00, 0.4439000E+00, 0.5282848E+00, 0.4653500E+00, &
     & 0.5510600E+00, 0.6104000E+00, 0.5830100E+00, 0.6238720E+00, &
     & 0.6652526E+00, 0.7396613E+00, 0.9232053E+00, 0.9232053E+00 /
      data (ref_adm(30,iz,36, 9),iz = 1,20) / &
     & 0.5001700E+00, 0.5001700E+00, 0.4853100E+00, 0.3815400E+00, &
     & 0.5651700E+00, 0.5663500E+00, 0.5277500E+00, 0.5105000E+00, &
     & 0.5080300E+00, 0.4336500E+00, 0.4639600E+00, 0.4622100E+00, &
     & 0.5547300E+00, 0.6063700E+00, 0.6299700E+00, 0.6287074E+00, &
     & 0.6704390E+00, 0.7418804E+00, 0.9267257E+00, 0.9267257E+00 /
      data (ref_adm(30,iz,37, 9),iz = 1,20) / &
     & 0.4994000E+00, 0.4994000E+00, 0.4336600E+00, 0.4668100E+00, &
     & 0.4893400E+00, 0.6049200E+00, 0.4674200E+00, 0.4969877E+00, &
     & 0.4838300E+00, 0.4846300E+00, 0.4673700E+00, 0.5402809E+00, &
     & 0.5537013E+00, 0.5972300E+00, 0.5883900E+00, 0.6585642E+00, &
     & 0.6931153E+00, 0.7466013E+00, 0.9296981E+00, 0.9296981E+00 /
      data (ref_adm(30,iz,38, 9),iz = 1,20) / &
     & 0.4994000E+00, 0.4994000E+00, 0.4336600E+00, 0.4668100E+00, &
     & 0.4893400E+00, 0.6049200E+00, 0.4674200E+00, 0.4969877E+00, &
     & 0.4838300E+00, 0.4846300E+00, 0.4673700E+00, 0.5402809E+00, &
     & 0.5537013E+00, 0.5972300E+00, 0.5883900E+00, 0.6585642E+00, &
     & 0.6931153E+00, 0.7466013E+00, 0.9296981E+00, 0.9296981E+00 /
! Solar Zenith Angle 45.0 Albedo  0.4540754E+00
      data (ref_adm(30,iz, 1,10),iz = 1,20) / &
     & 0.3732000E+00, 0.3732000E+00, 0.3563200E+00, 0.4298400E+00, &
     & 0.4448600E+00, 0.4550100E+00, 0.4644600E+00, 0.4716200E+00, &
     & 0.5173400E+00, 0.5051600E+00, 0.4711500E+00, 0.4932900E+00, &
     & 0.5526900E+00, 0.5896200E+00, 0.5122600E+00, 0.5508100E+00, &
     & 0.5363500E+00, 0.5489400E+00, 0.4659896E+00, 0.4659896E+00 /
      data (ref_adm(30,iz, 2,10),iz = 1,20) / &
     & 0.3732000E+00, 0.3732000E+00, 0.3563200E+00, 0.4298400E+00, &
     & 0.4448600E+00, 0.4550100E+00, 0.4644600E+00, 0.4716200E+00, &
     & 0.5173400E+00, 0.5051600E+00, 0.4711500E+00, 0.4932900E+00, &
     & 0.5526900E+00, 0.5896200E+00, 0.5122600E+00, 0.5508100E+00, &
     & 0.5363500E+00, 0.5489400E+00, 0.4659896E+00, 0.4659896E+00 /
      data (ref_adm(30,iz, 3,10),iz = 1,20) / &
     & 0.3845200E+00, 0.3845200E+00, 0.4280200E+00, 0.3833000E+00, &
     & 0.4300200E+00, 0.4165100E+00, 0.4421000E+00, 0.4933000E+00, &
     & 0.4732100E+00, 0.4898000E+00, 0.4566100E+00, 0.5181400E+00, &
     & 0.5394000E+00, 0.5793800E+00, 0.5740600E+00, 0.5921000E+00, &
     & 0.5924700E+00, 0.5953700E+00, 0.9425084E-01, 0.9425084E-01 /
      data (ref_adm(30,iz, 4,10),iz = 1,20) / &
     & 0.4310600E+00, 0.4310600E+00, 0.4228700E+00, 0.4078400E+00, &
     & 0.3708900E+00, 0.4068400E+00, 0.4376000E+00, 0.4745500E+00, &
     & 0.4532100E+00, 0.5067100E+00, 0.4731800E+00, 0.4940900E+00, &
     & 0.5053100E+00, 0.5443200E+00, 0.5747700E+00, 0.5965500E+00, &
     & 0.5860900E+00, 0.5426345E+00, 0.4602281E+00, 0.4602281E+00 /
      data (ref_adm(30,iz, 5,10),iz = 1,20) / &
     & 0.4718000E+00, 0.4718000E+00, 0.4496300E+00, 0.3676500E+00, &
     & 0.4390000E+00, 0.4412300E+00, 0.4573800E+00, 0.4243800E+00, &
     & 0.4381600E+00, 0.4745900E+00, 0.4874900E+00, 0.5112100E+00, &
     & 0.5352100E+00, 0.5674000E+00, 0.5446200E+00, 0.5686300E+00, &
     & 0.5169000E+00, 0.5384046E+00, 0.4550928E+00, 0.4550928E+00 /
      data (ref_adm(30,iz, 6,10),iz = 1,20) / &
     & 0.4448200E+00, 0.4448200E+00, 0.5010400E+00, 0.4689100E+00, &
     & 0.4209100E+00, 0.4228000E+00, 0.3638000E+00, 0.3793400E+00, &
     & 0.4253100E+00, 0.4852700E+00, 0.5016400E+00, 0.4950100E+00, &
     & 0.5374100E+00, 0.5087000E+00, 0.5288900E+00, 0.5191000E+00, &
     & 0.5318900E+00, 0.5339738E+00, 0.4491424E+00, 0.4491424E+00 /
      data (ref_adm(30,iz, 7,10),iz = 1,20) / &
     & 0.4116600E+00, 0.4116600E+00, 0.4293800E+00, 0.5031600E+00, &
     & 0.4570500E+00, 0.4245500E+00, 0.3942000E+00, 0.3986500E+00, &
     & 0.4499000E+00, 0.4265000E+00, 0.4783700E+00, 0.5129200E+00, &
     & 0.5172700E+00, 0.4400800E+00, 0.4441700E+00, 0.4379000E+00, &
     & 0.4642800E+00, 0.3274200E+00, 0.4426029E+00, 0.4426029E+00 /
      data (ref_adm(30,iz, 8,10),iz = 1,20) / &
     & 0.4259700E+00, 0.4259700E+00, 0.4464600E+00, 0.4608500E+00, &
     & 0.4487300E+00, 0.4519800E+00, 0.4241200E+00, 0.4344000E+00, &
     & 0.4480100E+00, 0.4613500E+00, 0.4741800E+00, 0.4916300E+00, &
     & 0.4856300E+00, 0.4869700E+00, 0.4499500E+00, 0.5011600E+00, &
     & 0.4288600E+00, 0.5230944E+00, 0.4364151E+00, 0.4364151E+00 /
      data (ref_adm(30,iz, 9,10),iz = 1,20) / &
     & 0.4800900E+00, 0.4800900E+00, 0.4771400E+00, 0.4624000E+00, &
     & 0.4428100E+00, 0.3872600E+00, 0.3993200E+00, 0.3752200E+00, &
     & 0.4025000E+00, 0.4705200E+00, 0.4625100E+00, 0.4585400E+00, &
     & 0.4519000E+00, 0.4373600E+00, 0.4893700E+00, 0.5610400E+00, &
     & 0.5168400E+00, 0.5179543E+00, 0.4303629E+00, 0.4303629E+00 /
      data (ref_adm(30,iz,10,10),iz = 1,20) / &
     & 0.4839100E+00, 0.4839100E+00, 0.4271200E+00, 0.4157800E+00, &
     & 0.3874600E+00, 0.4103800E+00, 0.3896100E+00, 0.4332300E+00, &
     & 0.3854900E+00, 0.4387300E+00, 0.4408800E+00, 0.4917400E+00, &
     & 0.5309900E+00, 0.5097700E+00, 0.5110600E+00, 0.5312300E+00, &
     & 0.5472300E+00, 0.5134326E+00, 0.4245922E+00, 0.4245922E+00 /
      data (ref_adm(30,iz,11,10),iz = 1,20) / &
     & 0.4383200E+00, 0.4383200E+00, 0.4095700E+00, 0.3645600E+00, &
     & 0.3484700E+00, 0.3643800E+00, 0.4308800E+00, 0.4445600E+00, &
     & 0.4947500E+00, 0.4506800E+00, 0.4567700E+00, 0.4875000E+00, &
     & 0.4553200E+00, 0.4860400E+00, 0.5105300E+00, 0.5016200E+00, &
     & 0.5327458E+00, 0.5077509E+00, 0.4192013E+00, 0.4192013E+00 /
      data (ref_adm(30,iz,12,10),iz = 1,20) / &
     & 0.4391000E+00, 0.4391000E+00, 0.4467100E+00, 0.3952500E+00, &
     & 0.3545700E+00, 0.3711400E+00, 0.4667700E+00, 0.4339900E+00, &
     & 0.4565400E+00, 0.4384700E+00, 0.4569600E+00, 0.4636800E+00, &
     & 0.3981600E+00, 0.4582000E+00, 0.5192800E+00, 0.3552300E+00, &
     & 0.5234761E+00, 0.5016544E+00, 0.4141262E+00, 0.4141262E+00 /
      data (ref_adm(30,iz,13,10),iz = 1,20) / &
     & 0.4366000E+00, 0.4366000E+00, 0.4200300E+00, 0.4265400E+00, &
     & 0.4337400E+00, 0.4247500E+00, 0.4063700E+00, 0.4117800E+00, &
     & 0.4304400E+00, 0.4455600E+00, 0.4441200E+00, 0.4249300E+00, &
     & 0.4295200E+00, 0.4366900E+00, 0.4831400E+00, 0.5190379E+00, &
     & 0.5154549E+00, 0.4929827E+00, 0.4087378E+00, 0.4087378E+00 /
      data (ref_adm(30,iz,14,10),iz = 1,20) / &
     & 0.4080100E+00, 0.4080100E+00, 0.3946500E+00, 0.3747400E+00, &
     & 0.3949900E+00, 0.4164100E+00, 0.4226100E+00, 0.4306000E+00, &
     & 0.4399000E+00, 0.4488100E+00, 0.4564500E+00, 0.4606600E+00, &
     & 0.4730600E+00, 0.4629500E+00, 0.4289400E+00, 0.5107217E+00, &
     & 0.5066999E+00, 0.4834281E+00, 0.4019474E+00, 0.4019474E+00 /
      data (ref_adm(30,iz,15,10),iz = 1,20) / &
     & 0.4031100E+00, 0.4031100E+00, 0.4183900E+00, 0.4319700E+00, &
     & 0.4541700E+00, 0.4184500E+00, 0.4533300E+00, 0.4454400E+00, &
     & 0.4424400E+00, 0.4535800E+00, 0.4398900E+00, 0.4289500E+00, &
     & 0.4109900E+00, 0.4318200E+00, 0.4078800E+00, 0.5024015E+00, &
     & 0.4973431E+00, 0.4745816E+00, 0.3941639E+00, 0.3941639E+00 /
      data (ref_adm(30,iz,16,10),iz = 1,20) / &
     & 0.4149100E+00, 0.4149100E+00, 0.4401200E+00, 0.4330000E+00, &
     & 0.4059900E+00, 0.4386000E+00, 0.4652100E+00, 0.4640800E+00, &
     & 0.5104000E+00, 0.4794400E+00, 0.5113000E+00, 0.4496600E+00, &
     & 0.3829400E+00, 0.3922100E+00, 0.3974700E+00, 0.4157900E+00, &
     & 0.4879607E+00, 0.4650711E+00, 0.3871582E+00, 0.3871582E+00 /
      data (ref_adm(30,iz,17,10),iz = 1,20) / &
     & 0.4212700E+00, 0.4212700E+00, 0.4454900E+00, 0.4201200E+00, &
     & 0.4586700E+00, 0.4842900E+00, 0.4610100E+00, 0.4447400E+00, &
     & 0.4897000E+00, 0.5154000E+00, 0.4733700E+00, 0.4194900E+00, &
     & 0.3416200E+00, 0.4313200E+00, 0.4616200E+00, 0.3857000E+00, &
     & 0.4798123E+00, 0.4555131E+00, 0.3804950E+00, 0.3804950E+00 /
      data (ref_adm(30,iz,18,10),iz = 1,20) / &
     & 0.4464400E+00, 0.4464400E+00, 0.3657600E+00, 0.4286900E+00, &
     & 0.4282300E+00, 0.4271700E+00, 0.4766500E+00, 0.4771100E+00, &
     & 0.4590900E+00, 0.5435200E+00, 0.4631500E+00, 0.4397200E+00, &
     & 0.3840600E+00, 0.4227800E+00, 0.4735900E+00, 0.4331447E+00, &
     & 0.4200949E+00, 0.3892697E+00, 0.3159074E+00, 0.3159074E+00 /
      data (ref_adm(30,iz,19,10),iz = 1,20) / &
     & 0.4222500E+00, 0.4222500E+00, 0.4278700E+00, 0.4048100E+00, &
     & 0.4080000E+00, 0.4462200E+00, 0.4365000E+00, 0.4082200E+00, &
     & 0.4373000E+00, 0.4461100E+00, 0.4898500E+00, 0.4693900E+00, &
     & 0.4191000E+00, 0.4340700E+00, 0.4073600E+00, 0.4326668E+00, &
     & 0.4196193E+00, 0.3887921E+00, 0.3155272E+00, 0.3155272E+00 /
      data (ref_adm(30,iz,20,10),iz = 1,20) / &
     & 0.4028200E+00, 0.4028200E+00, 0.3783600E+00, 0.3574600E+00, &
     & 0.3635100E+00, 0.4113200E+00, 0.4104900E+00, 0.4054800E+00, &
     & 0.4181000E+00, 0.3950600E+00, 0.4895900E+00, 0.5204900E+00, &
     & 0.4557600E+00, 0.4632400E+00, 0.4438700E+00, 0.4320865E+00, &
     & 0.4185548E+00, 0.3878994E+00, 0.3151264E+00, 0.3151264E+00 /
      data (ref_adm(30,iz,21,10),iz = 1,20) / &
     & 0.4053900E+00, 0.4053900E+00, 0.3825500E+00, 0.4042700E+00, &
     & 0.3885000E+00, 0.3767300E+00, 0.4370900E+00, 0.3666300E+00, &
     & 0.3853200E+00, 0.4257800E+00, 0.4582800E+00, 0.5050500E+00, &
     & 0.4950300E+00, 0.4726100E+00, 0.4784300E+00, 0.4314215E+00, &
     & 0.4180645E+00, 0.3871638E+00, 0.3148296E+00, 0.3148296E+00 /
      data (ref_adm(30,iz,22,10),iz = 1,20) / &
     & 0.4395300E+00, 0.4395300E+00, 0.4202700E+00, 0.4306700E+00, &
     & 0.4118700E+00, 0.4370500E+00, 0.3993400E+00, 0.3809000E+00, &
     & 0.4049900E+00, 0.4158300E+00, 0.4653600E+00, 0.4754600E+00, &
     & 0.5004600E+00, 0.4692400E+00, 0.4612500E+00, 0.4450600E+00, &
     & 0.3787085E+00, 0.3469074E+00, 0.2952701E+00, 0.2952701E+00 /
      data (ref_adm(30,iz,23,10),iz = 1,20) / &
     & 0.4869000E+00, 0.4869000E+00, 0.4673100E+00, 0.4488900E+00, &
     & 0.3941200E+00, 0.4098000E+00, 0.4007300E+00, 0.4103600E+00, &
     & 0.3949700E+00, 0.3914100E+00, 0.4264400E+00, 0.4907300E+00, &
     & 0.5104100E+00, 0.4794400E+00, 0.4337600E+00, 0.4030600E+00, &
     & 0.3780302E+00, 0.3461605E+00, 0.2957093E+00, 0.2957093E+00 /
      data (ref_adm(30,iz,24,10),iz = 1,20) / &
     & 0.4297400E+00, 0.4297400E+00, 0.4245100E+00, 0.4142100E+00, &
     & 0.3610200E+00, 0.4043000E+00, 0.3903400E+00, 0.3755500E+00, &
     & 0.3920700E+00, 0.3780400E+00, 0.4707900E+00, 0.4730300E+00, &
     & 0.5145700E+00, 0.4495700E+00, 0.4180900E+00, 0.4153500E+00, &
     & 0.4233100E+00, 0.3457630E+00, 0.2965885E+00, 0.2965885E+00 /
      data (ref_adm(30,iz,25,10),iz = 1,20) / &
     & 0.3844500E+00, 0.3844500E+00, 0.3954600E+00, 0.4330100E+00, &
     & 0.4864100E+00, 0.3767400E+00, 0.3723000E+00, 0.3841500E+00, &
     & 0.4460100E+00, 0.4152500E+00, 0.4080400E+00, 0.4550900E+00, &
     & 0.5086800E+00, 0.5127200E+00, 0.4243300E+00, 0.4014600E+00, &
     & 0.3142700E+00, 0.3460474E+00, 0.2977966E+00, 0.2977966E+00 /
      data (ref_adm(30,iz,26,10),iz = 1,20) / &
     & 0.4189400E+00, 0.4189400E+00, 0.4153800E+00, 0.4299700E+00, &
     & 0.4411000E+00, 0.4186300E+00, 0.4107500E+00, 0.4177800E+00, &
     & 0.4008300E+00, 0.4078800E+00, 0.3918200E+00, 0.4361400E+00, &
     & 0.5042700E+00, 0.4997300E+00, 0.4837800E+00, 0.4509400E+00, &
     & 0.4968900E+00, 0.3229700E+00, 0.2993401E+00, 0.2993401E+00 /
      data (ref_adm(30,iz,27,10),iz = 1,20) / &
     & 0.4274000E+00, 0.4274000E+00, 0.4571200E+00, 0.4603600E+00, &
     & 0.4525700E+00, 0.4390300E+00, 0.4413900E+00, 0.4348000E+00, &
     & 0.4117100E+00, 0.3879000E+00, 0.4249300E+00, 0.4602100E+00, &
     & 0.5443200E+00, 0.4289900E+00, 0.4504500E+00, 0.4733100E+00, &
     & 0.4067500E+00, 0.4342400E+00, 0.3746600E+00, 0.3746600E+00 /
      data (ref_adm(30,iz,28,10),iz = 1,20) / &
     & 0.4559900E+00, 0.4559900E+00, 0.4820500E+00, 0.5046200E+00, &
     & 0.4918800E+00, 0.4599800E+00, 0.4764500E+00, 0.5158900E+00, &
     & 0.5002400E+00, 0.4907400E+00, 0.5093000E+00, 0.4880800E+00, &
     & 0.5096400E+00, 0.4869900E+00, 0.4514700E+00, 0.4878300E+00, &
     & 0.4510300E+00, 0.4462800E+00, 0.3870000E+00, 0.3870000E+00 /
      data (ref_adm(30,iz,29,10),iz = 1,20) / &
     & 0.4366800E+00, 0.4366800E+00, 0.4727200E+00, 0.5265200E+00, &
     & 0.5251400E+00, 0.4491400E+00, 0.4496100E+00, 0.4660400E+00, &
     & 0.4805000E+00, 0.4614300E+00, 0.4339800E+00, 0.5372000E+00, &
     & 0.5312000E+00, 0.5383500E+00, 0.5008800E+00, 0.4970000E+00, &
     & 0.4343900E+00, 0.3909700E+00, 0.3054534E+00, 0.3054534E+00 /
      data (ref_adm(30,iz,30,10),iz = 1,20) / &
     & 0.4531600E+00, 0.4531600E+00, 0.4630800E+00, 0.4650600E+00, &
     & 0.4646100E+00, 0.4741200E+00, 0.4581000E+00, 0.4624100E+00, &
     & 0.4797200E+00, 0.4947300E+00, 0.4713600E+00, 0.4175500E+00, &
     & 0.4840200E+00, 0.4063700E+00, 0.3715300E+00, 0.4627200E+00, &
     & 0.4716300E+00, 0.3842100E+00, 0.3077650E+00, 0.3077650E+00 /
      data (ref_adm(30,iz,31,10),iz = 1,20) / &
     & 0.4498400E+00, 0.4498400E+00, 0.4466400E+00, 0.4327100E+00, &
     & 0.4216900E+00, 0.4281300E+00, 0.4417300E+00, 0.4445000E+00, &
     & 0.4414900E+00, 0.4500200E+00, 0.4511600E+00, 0.4498400E+00, &
     & 0.4639700E+00, 0.4604500E+00, 0.4611500E+00, 0.4431300E+00, &
     & 0.3931000E+00, 0.3486100E+00, 0.2269800E+00, 0.2269800E+00 /
      data (ref_adm(30,iz,32,10),iz = 1,20) / &
     & 0.4487200E+00, 0.4487200E+00, 0.5260200E+00, 0.4601800E+00, &
     & 0.4585800E+00, 0.3452900E+00, 0.3720600E+00, 0.3664600E+00, &
     & 0.3810500E+00, 0.3756700E+00, 0.3857000E+00, 0.5296200E+00, &
     & 0.5322600E+00, 0.5033200E+00, 0.4820000E+00, 0.4684300E+00, &
     & 0.3918424E+00, 0.3586980E+00, 0.3124390E+00, 0.3124390E+00 /
      data (ref_adm(30,iz,33,10),iz = 1,20) / &
     & 0.4624900E+00, 0.4624900E+00, 0.4166600E+00, 0.4700700E+00, &
     & 0.4497300E+00, 0.4676200E+00, 0.3765600E+00, 0.4429600E+00, &
     & 0.5024600E+00, 0.4236000E+00, 0.4889800E+00, 0.5390500E+00, &
     & 0.5306300E+00, 0.4525300E+00, 0.4923300E+00, 0.4959300E+00, &
     & 0.4408300E+00, 0.3606374E+00, 0.3145882E+00, 0.3145882E+00 /
      data (ref_adm(30,iz,34,10),iz = 1,20) / &
     & 0.4451200E+00, 0.4451200E+00, 0.4212400E+00, 0.4618000E+00, &
     & 0.4547400E+00, 0.4022300E+00, 0.4739700E+00, 0.4908600E+00, &
     & 0.5282200E+00, 0.4668000E+00, 0.5091800E+00, 0.5127100E+00, &
     & 0.4495900E+00, 0.5252400E+00, 0.4356900E+00, 0.4681000E+00, &
     & 0.3959800E+00, 0.3621179E+00, 0.3163628E+00, 0.3163628E+00 /
      data (ref_adm(30,iz,35,10),iz = 1,20) / &
     & 0.4545800E+00, 0.4545800E+00, 0.4347400E+00, 0.4209200E+00, &
     & 0.3674600E+00, 0.4222000E+00, 0.5653200E+00, 0.5828300E+00, &
     & 0.5023400E+00, 0.5306900E+00, 0.4536500E+00, 0.4787200E+00, &
     & 0.4952900E+00, 0.4547800E+00, 0.5461800E+00, 0.3743500E+00, &
     & 0.3972646E+00, 0.3633187E+00, 0.3178098E+00, 0.3178098E+00 /
      data (ref_adm(30,iz,36,10),iz = 1,20) / &
     & 0.4393200E+00, 0.4393200E+00, 0.4852700E+00, 0.4448300E+00, &
     & 0.4926300E+00, 0.5713200E+00, 0.5373100E+00, 0.4334800E+00, &
     & 0.4702700E+00, 0.4766000E+00, 0.5020500E+00, 0.5201100E+00, &
     & 0.4529100E+00, 0.3844400E+00, 0.5999000E+00, 0.3601400E+00, &
     & 0.3987618E+00, 0.3640849E+00, 0.3187828E+00, 0.3187828E+00 /
      data (ref_adm(30,iz,37,10),iz = 1,20) / &
     & 0.4366000E+00, 0.4366000E+00, 0.4311900E+00, 0.4615600E+00, &
     & 0.4978100E+00, 0.5491000E+00, 0.5908800E+00, 0.4801800E+00, &
     & 0.4364700E+00, 0.4458700E+00, 0.4377900E+00, 0.4851700E+00, &
     & 0.3843300E+00, 0.3950500E+00, 0.6520900E+00, 0.5076000E+00, &
     & 0.3996600E+00, 0.3644786E+00, 0.3193405E+00, 0.3193405E+00 /
      data (ref_adm(30,iz,38,10),iz = 1,20) / &
     & 0.4366000E+00, 0.4366000E+00, 0.4311900E+00, 0.4615600E+00, &
     & 0.4978100E+00, 0.5491000E+00, 0.5908800E+00, 0.4801800E+00, &
     & 0.4364700E+00, 0.4458700E+00, 0.4377900E+00, 0.4851700E+00, &
     & 0.3843300E+00, 0.3950500E+00, 0.6520900E+00, 0.5076000E+00, &
     & 0.3996600E+00, 0.3644786E+00, 0.3193405E+00, 0.3193405E+00 /
! Solar Zenith Angle 50.0 Albedo  0.4474358E+00
      data (ref_adm(30,iz, 1,11),iz = 1,20) / &
     & 0.4227500E+00, 0.4227500E+00, 0.3475100E+00, 0.3569600E+00, &
     & 0.3747400E+00, 0.4053600E+00, 0.4211700E+00, 0.4039500E+00, &
     & 0.4152300E+00, 0.4449600E+00, 0.5323000E+00, 0.5274300E+00, &
     & 0.4999800E+00, 0.5261900E+00, 0.5069300E+00, 0.5337100E+00, &
     & 0.5139600E+00, 0.5576300E+00, 0.4220796E+00, 0.4220796E+00 /
      data (ref_adm(30,iz, 2,11),iz = 1,20) / &
     & 0.4227500E+00, 0.4227500E+00, 0.3475100E+00, 0.3569600E+00, &
     & 0.3747400E+00, 0.4053600E+00, 0.4211700E+00, 0.4039500E+00, &
     & 0.4152300E+00, 0.4449600E+00, 0.5323000E+00, 0.5274300E+00, &
     & 0.4999800E+00, 0.5261900E+00, 0.5069300E+00, 0.5337100E+00, &
     & 0.5139600E+00, 0.5576300E+00, 0.4220796E+00, 0.4220796E+00 /
      data (ref_adm(30,iz, 3,11),iz = 1,20) / &
     & 0.3859700E+00, 0.3859700E+00, 0.4106900E+00, 0.4024900E+00, &
     & 0.4165200E+00, 0.3909500E+00, 0.4127900E+00, 0.4202400E+00, &
     & 0.4225900E+00, 0.4838100E+00, 0.5215800E+00, 0.4872800E+00, &
     & 0.5072300E+00, 0.5302400E+00, 0.5379100E+00, 0.5239200E+00, &
     & 0.5574900E+00, 0.5086100E+00, 0.8644388E-01, 0.8644388E-01 /
      data (ref_adm(30,iz, 4,11),iz = 1,20) / &
     & 0.4032200E+00, 0.4032200E+00, 0.4061000E+00, 0.4230600E+00, &
     & 0.4287200E+00, 0.4163800E+00, 0.4290700E+00, 0.4305600E+00, &
     & 0.4331600E+00, 0.4809900E+00, 0.4796800E+00, 0.4754600E+00, &
     & 0.5204300E+00, 0.5119500E+00, 0.5570500E+00, 0.5386800E+00, &
     & 0.5583600E+00, 0.5169000E+00, 0.4192998E+00, 0.4192998E+00 /
      data (ref_adm(30,iz, 5,11),iz = 1,20) / &
     & 0.3926500E+00, 0.3926500E+00, 0.4172200E+00, 0.4156400E+00, &
     & 0.4119900E+00, 0.4331000E+00, 0.4359700E+00, 0.4254300E+00, &
     & 0.4632000E+00, 0.4965600E+00, 0.4752200E+00, 0.4786300E+00, &
     & 0.5379100E+00, 0.5257600E+00, 0.5557900E+00, 0.5486700E+00, &
     & 0.5415600E+00, 0.5644800E+00, 0.4169798E+00, 0.4169798E+00 /
      data (ref_adm(30,iz, 6,11),iz = 1,20) / &
     & 0.4410600E+00, 0.4410600E+00, 0.3933100E+00, 0.3972600E+00, &
     & 0.4313700E+00, 0.4105500E+00, 0.4335200E+00, 0.4179900E+00, &
     & 0.4450200E+00, 0.4797000E+00, 0.4368400E+00, 0.4825800E+00, &
     & 0.5035700E+00, 0.5223500E+00, 0.5267700E+00, 0.5700900E+00, &
     & 0.5156400E+00, 0.5027300E+00, 0.4135390E+00, 0.4135390E+00 /
      data (ref_adm(30,iz, 7,11),iz = 1,20) / &
     & 0.4251900E+00, 0.4251900E+00, 0.4017800E+00, 0.4159600E+00, &
     & 0.4283600E+00, 0.4359900E+00, 0.4034600E+00, 0.4405500E+00, &
     & 0.4351800E+00, 0.3933700E+00, 0.4450200E+00, 0.4849900E+00, &
     & 0.4820400E+00, 0.4791800E+00, 0.5097500E+00, 0.5304000E+00, &
     & 0.4828900E+00, 0.4292600E+00, 0.4100701E+00, 0.4100701E+00 /
      data (ref_adm(30,iz, 8,11),iz = 1,20) / &
     & 0.3855000E+00, 0.3855000E+00, 0.3939400E+00, 0.3950000E+00, &
     & 0.3981500E+00, 0.3873200E+00, 0.3696000E+00, 0.3747000E+00, &
     & 0.3760100E+00, 0.3816100E+00, 0.3873600E+00, 0.4284600E+00, &
     & 0.4363100E+00, 0.4454200E+00, 0.4513000E+00, 0.4163900E+00, &
     & 0.4571100E+00, 0.5184300E+00, 0.4061230E+00, 0.4061230E+00 /
      data (ref_adm(30,iz, 9,11),iz = 1,20) / &
     & 0.4436900E+00, 0.4436900E+00, 0.4392000E+00, 0.4305800E+00, &
     & 0.4359800E+00, 0.4248200E+00, 0.4334100E+00, 0.4413100E+00, &
     & 0.4391700E+00, 0.4365400E+00, 0.4592500E+00, 0.4801500E+00, &
     & 0.4627400E+00, 0.4230300E+00, 0.4400500E+00, 0.4696000E+00, &
     & 0.4298000E+00, 0.4511600E+00, 0.4021419E+00, 0.4021419E+00 /
      data (ref_adm(30,iz,10,11),iz = 1,20) / &
     & 0.4242100E+00, 0.4242100E+00, 0.4337200E+00, 0.4142600E+00, &
     & 0.4146500E+00, 0.4423800E+00, 0.4483100E+00, 0.4229300E+00, &
     & 0.4204500E+00, 0.4358000E+00, 0.4483100E+00, 0.4479000E+00, &
     & 0.4488400E+00, 0.4449800E+00, 0.4628100E+00, 0.4667400E+00, &
     & 0.4601900E+00, 0.4313300E+00, 0.3983766E+00, 0.3983766E+00 /
      data (ref_adm(30,iz,11,11),iz = 1,20) / &
     & 0.4192000E+00, 0.4192000E+00, 0.4136300E+00, 0.4077900E+00, &
     & 0.4575800E+00, 0.4434600E+00, 0.4368800E+00, 0.4318500E+00, &
     & 0.4263700E+00, 0.4509200E+00, 0.4259800E+00, 0.4374200E+00, &
     & 0.4377600E+00, 0.4727300E+00, 0.4961300E+00, 0.4975700E+00, &
     & 0.4587300E+00, 0.4125400E+00, 0.3942440E+00, 0.3942440E+00 /
      data (ref_adm(30,iz,12,11),iz = 1,20) / &
     & 0.4093600E+00, 0.4093600E+00, 0.3980900E+00, 0.4265200E+00, &
     & 0.4694500E+00, 0.4381900E+00, 0.4571500E+00, 0.4424800E+00, &
     & 0.4283800E+00, 0.3950500E+00, 0.4393500E+00, 0.4476400E+00, &
     & 0.4359100E+00, 0.4656200E+00, 0.5232100E+00, 0.4803900E+00, &
     & 0.4940600E+00, 0.4661200E+00, 0.3898880E+00, 0.3898880E+00 /
      data (ref_adm(30,iz,13,11),iz = 1,20) / &
     & 0.4249800E+00, 0.4249800E+00, 0.4320200E+00, 0.4451500E+00, &
     & 0.4512400E+00, 0.4410200E+00, 0.4426900E+00, 0.4424400E+00, &
     & 0.4340500E+00, 0.4662700E+00, 0.4524300E+00, 0.4336900E+00, &
     & 0.4379500E+00, 0.4580800E+00, 0.5078800E+00, 0.5012100E+00, &
     & 0.3863200E+00, 0.4469900E+00, 0.3846065E+00, 0.3846065E+00 /
      data (ref_adm(30,iz,14,11),iz = 1,20) / &
     & 0.3970800E+00, 0.3970800E+00, 0.3883100E+00, 0.3888900E+00, &
     & 0.3969100E+00, 0.4061700E+00, 0.4114200E+00, 0.4123100E+00, &
     & 0.4189900E+00, 0.4311100E+00, 0.4512900E+00, 0.4548900E+00, &
     & 0.4924100E+00, 0.4824400E+00, 0.4395400E+00, 0.4534700E+00, &
     & 0.4797100E+00, 0.3776500E+00, 0.3783382E+00, 0.3783382E+00 /
      data (ref_adm(30,iz,15,11),iz = 1,20) / &
     & 0.3932200E+00, 0.3932200E+00, 0.4182800E+00, 0.4191300E+00, &
     & 0.4202200E+00, 0.4327900E+00, 0.4344000E+00, 0.4586300E+00, &
     & 0.4580800E+00, 0.4211400E+00, 0.4030600E+00, 0.3805800E+00, &
     & 0.3915000E+00, 0.4268500E+00, 0.4447300E+00, 0.4416600E+00, &
     & 0.4912600E+00, 0.4477885E+00, 0.3718994E+00, 0.3718994E+00 /
      data (ref_adm(30,iz,16,11),iz = 1,20) / &
     & 0.3908800E+00, 0.3908800E+00, 0.3870300E+00, 0.4007400E+00, &
     & 0.3829200E+00, 0.4117900E+00, 0.4495600E+00, 0.4489500E+00, &
     & 0.4604400E+00, 0.4448600E+00, 0.4571700E+00, 0.4338500E+00, &
     & 0.4094600E+00, 0.4252200E+00, 0.4166000E+00, 0.3787000E+00, &
     & 0.4378900E+00, 0.3768500E+00, 0.3663126E+00, 0.3663126E+00 /
      data (ref_adm(30,iz,17,11),iz = 1,20) / &
     & 0.4151300E+00, 0.4151300E+00, 0.4027800E+00, 0.4445000E+00, &
     & 0.4227200E+00, 0.3978500E+00, 0.4130700E+00, 0.4303000E+00, &
     & 0.4546100E+00, 0.4520100E+00, 0.4684200E+00, 0.4458200E+00, &
     & 0.3806600E+00, 0.4157400E+00, 0.4815800E+00, 0.3744900E+00, &
     & 0.4350100E+00, 0.4312019E+00, 0.3606066E+00, 0.3606066E+00 /
      data (ref_adm(30,iz,18,11),iz = 1,20) / &
     & 0.3992600E+00, 0.3992600E+00, 0.4210200E+00, 0.4247300E+00, &
     & 0.4081600E+00, 0.4342400E+00, 0.4317600E+00, 0.4469000E+00, &
     & 0.4463400E+00, 0.4489800E+00, 0.4333200E+00, 0.4413100E+00, &
     & 0.3900800E+00, 0.4086800E+00, 0.4677000E+00, 0.4907400E+00, &
     & 0.4730000E+00, 0.3927745E+00, 0.3188188E+00, 0.3188188E+00 /
      data (ref_adm(30,iz,19,11),iz = 1,20) / &
     & 0.4014100E+00, 0.4014100E+00, 0.3968500E+00, 0.4110900E+00, &
     & 0.4119200E+00, 0.4195800E+00, 0.4239800E+00, 0.4311400E+00, &
     & 0.4159600E+00, 0.4388900E+00, 0.4239200E+00, 0.4412500E+00, &
     & 0.3938100E+00, 0.4504000E+00, 0.4414700E+00, 0.5037100E+00, &
     & 0.4220047E+00, 0.3914967E+00, 0.3180559E+00, 0.3180559E+00 /
      data (ref_adm(30,iz,20,11),iz = 1,20) / &
     & 0.4084000E+00, 0.4084000E+00, 0.4186400E+00, 0.4193300E+00, &
     & 0.4050200E+00, 0.4461100E+00, 0.4464600E+00, 0.4283900E+00, &
     & 0.4392500E+00, 0.4332300E+00, 0.4359100E+00, 0.4378300E+00, &
     & 0.4045900E+00, 0.4605900E+00, 0.4264300E+00, 0.5002700E+00, &
     & 0.4207310E+00, 0.3900335E+00, 0.3173435E+00, 0.3173435E+00 /
      data (ref_adm(30,iz,21,11),iz = 1,20) / &
     & 0.4082300E+00, 0.4082300E+00, 0.4302800E+00, 0.4258600E+00, &
     & 0.4157400E+00, 0.4313400E+00, 0.4528800E+00, 0.4535200E+00, &
     & 0.4517400E+00, 0.4552600E+00, 0.4747500E+00, 0.4693400E+00, &
     & 0.4271600E+00, 0.4428300E+00, 0.4582500E+00, 0.4106700E+00, &
     & 0.4195459E+00, 0.3886019E+00, 0.3165515E+00, 0.3165515E+00 /
      data (ref_adm(30,iz,22,11),iz = 1,20) / &
     & 0.3947200E+00, 0.3947200E+00, 0.4048800E+00, 0.4114800E+00, &
     & 0.4168700E+00, 0.4448600E+00, 0.4702000E+00, 0.4515300E+00, &
     & 0.4431600E+00, 0.4680100E+00, 0.4439000E+00, 0.4554800E+00, &
     & 0.4523500E+00, 0.4552400E+00, 0.4836600E+00, 0.4274500E+00, &
     & 0.4037835E+00, 0.3787852E+00, 0.3390957E+00, 0.3390957E+00 /
      data (ref_adm(30,iz,23,11),iz = 1,20) / &
     & 0.3881600E+00, 0.3881600E+00, 0.3988300E+00, 0.4329600E+00, &
     & 0.4304900E+00, 0.4397800E+00, 0.4545700E+00, 0.4730200E+00, &
     & 0.4541200E+00, 0.4453900E+00, 0.4401400E+00, 0.4351100E+00, &
     & 0.4581400E+00, 0.4253900E+00, 0.4595000E+00, 0.4397700E+00, &
     & 0.5347200E+00, 0.3782751E+00, 0.3411853E+00, 0.3411853E+00 /
      data (ref_adm(30,iz,24,11),iz = 1,20) / &
     & 0.3943500E+00, 0.3943500E+00, 0.4282800E+00, 0.4316300E+00, &
     & 0.4158500E+00, 0.4437000E+00, 0.4418100E+00, 0.4420900E+00, &
     & 0.4377600E+00, 0.4346400E+00, 0.4466600E+00, 0.4403500E+00, &
     & 0.4329800E+00, 0.4411100E+00, 0.4057900E+00, 0.3807800E+00, &
     & 0.4327800E+00, 0.3795804E+00, 0.3445233E+00, 0.3445233E+00 /
      data (ref_adm(30,iz,25,11),iz = 1,20) / &
     & 0.4005400E+00, 0.4005400E+00, 0.4263200E+00, 0.4432100E+00, &
     & 0.4413000E+00, 0.4410400E+00, 0.4272800E+00, 0.4495700E+00, &
     & 0.4500800E+00, 0.4507900E+00, 0.4504000E+00, 0.4602300E+00, &
     & 0.4783900E+00, 0.4228000E+00, 0.3866400E+00, 0.4218600E+00, &
     & 0.4435900E+00, 0.3822148E+00, 0.3490229E+00, 0.3490229E+00 /
      data (ref_adm(30,iz,26,11),iz = 1,20) / &
     & 0.3896700E+00, 0.3896700E+00, 0.4145400E+00, 0.4281400E+00, &
     & 0.4313500E+00, 0.4261100E+00, 0.4428000E+00, 0.4473600E+00, &
     & 0.4427200E+00, 0.4383200E+00, 0.4358600E+00, 0.4499900E+00, &
     & 0.4620500E+00, 0.4497200E+00, 0.4203600E+00, 0.4030400E+00, &
     & 0.4234800E+00, 0.4362400E+00, 0.3546771E+00, 0.3546771E+00 /
      data (ref_adm(30,iz,27,11),iz = 1,20) / &
     & 0.4215600E+00, 0.4215600E+00, 0.4424300E+00, 0.4568800E+00, &
     & 0.4610500E+00, 0.4637300E+00, 0.4681200E+00, 0.4812000E+00, &
     & 0.4758700E+00, 0.4651900E+00, 0.4686000E+00, 0.4635400E+00, &
     & 0.4768700E+00, 0.4866400E+00, 0.4535000E+00, 0.4497800E+00, &
     & 0.4519600E+00, 0.4311000E+00, 0.3540900E+00, 0.3540900E+00 /
      data (ref_adm(30,iz,28,11),iz = 1,20) / &
     & 0.4280400E+00, 0.4280400E+00, 0.4286800E+00, 0.4228600E+00, &
     & 0.4497900E+00, 0.4546800E+00, 0.4609600E+00, 0.4513700E+00, &
     & 0.4870200E+00, 0.4484400E+00, 0.4444400E+00, 0.4701800E+00, &
     & 0.5004800E+00, 0.5284000E+00, 0.5025600E+00, 0.4523100E+00, &
     & 0.4445200E+00, 0.3969000E+00, 0.3359200E+00, 0.3359200E+00 /
      data (ref_adm(30,iz,29,11),iz = 1,20) / &
     & 0.4193900E+00, 0.4193900E+00, 0.4647200E+00, 0.4574700E+00, &
     & 0.4523700E+00, 0.4367700E+00, 0.4608200E+00, 0.4538600E+00, &
     & 0.4350000E+00, 0.4235000E+00, 0.4111100E+00, 0.4493500E+00, &
     & 0.4762800E+00, 0.5072800E+00, 0.4803300E+00, 0.4785300E+00, &
     & 0.4296700E+00, 0.3847200E+00, 0.2772200E+00, 0.2772200E+00 /
      data (ref_adm(30,iz,30,11),iz = 1,20) / &
     & 0.4283300E+00, 0.4283300E+00, 0.4595200E+00, 0.4595500E+00, &
     & 0.4525500E+00, 0.4612000E+00, 0.4408800E+00, 0.4136700E+00, &
     & 0.4482200E+00, 0.4262000E+00, 0.4726000E+00, 0.4638500E+00, &
     & 0.5070400E+00, 0.4832500E+00, 0.4722000E+00, 0.4567000E+00, &
     & 0.4582700E+00, 0.4071000E+00, 0.3846858E+00, 0.3846858E+00 /
      data (ref_adm(30,iz,31,11),iz = 1,20) / &
     & 0.4417900E+00, 0.4417900E+00, 0.4030300E+00, 0.4166000E+00, &
     & 0.4250400E+00, 0.4221800E+00, 0.4125100E+00, 0.3978000E+00, &
     & 0.4108000E+00, 0.4246400E+00, 0.4152000E+00, 0.4315100E+00, &
     & 0.4342800E+00, 0.4328100E+00, 0.4348100E+00, 0.4120900E+00, &
     & 0.3927800E+00, 0.3818800E+00, 0.3184700E+00, 0.3184700E+00 /
      data (ref_adm(30,iz,32,11),iz = 1,20) / &
     & 0.4006000E+00, 0.4006000E+00, 0.4224100E+00, 0.4080400E+00, &
     & 0.4097500E+00, 0.4253800E+00, 0.4259700E+00, 0.4391800E+00, &
     & 0.4453700E+00, 0.4371400E+00, 0.4166500E+00, 0.4042900E+00, &
     & 0.4452100E+00, 0.4435200E+00, 0.4490200E+00, 0.4258100E+00, &
     & 0.4057700E+00, 0.3286300E+00, 0.2889700E+00, 0.2889700E+00 /
      data (ref_adm(30,iz,33,11),iz = 1,20) / &
     & 0.4150400E+00, 0.4150400E+00, 0.4151700E+00, 0.4263300E+00, &
     & 0.4043500E+00, 0.4401500E+00, 0.4600900E+00, 0.4378400E+00, &
     & 0.4395400E+00, 0.4347100E+00, 0.4046400E+00, 0.4309100E+00, &
     & 0.4643500E+00, 0.4936900E+00, 0.4831300E+00, 0.4644000E+00, &
     & 0.4821900E+00, 0.4326900E+00, 0.3359200E+00, 0.3359200E+00 /
      data (ref_adm(30,iz,34,11),iz = 1,20) / &
     & 0.4018600E+00, 0.4018600E+00, 0.4017000E+00, 0.4081800E+00, &
     & 0.4383600E+00, 0.4135500E+00, 0.4277500E+00, 0.4632600E+00, &
     & 0.4536300E+00, 0.4649200E+00, 0.4404800E+00, 0.4904200E+00, &
     & 0.5103100E+00, 0.5043100E+00, 0.5028800E+00, 0.5144400E+00, &
     & 0.4755900E+00, 0.4362400E+00, 0.3540300E+00, 0.3540300E+00 /
      data (ref_adm(30,iz,35,11),iz = 1,20) / &
     & 0.4026900E+00, 0.4026900E+00, 0.3945700E+00, 0.4158000E+00, &
     & 0.4212700E+00, 0.4000500E+00, 0.4261300E+00, 0.4668700E+00, &
     & 0.4864200E+00, 0.4597400E+00, 0.5072900E+00, 0.4951600E+00, &
     & 0.4924000E+00, 0.5171000E+00, 0.5266500E+00, 0.4928800E+00, &
     & 0.4694600E+00, 0.4448400E+00, 0.3521100E+00, 0.3521100E+00 /
      data (ref_adm(30,iz,36,11),iz = 1,20) / &
     & 0.3944500E+00, 0.3944500E+00, 0.4098200E+00, 0.4232400E+00, &
     & 0.4369800E+00, 0.4408400E+00, 0.4142300E+00, 0.4725700E+00, &
     & 0.4632700E+00, 0.4780700E+00, 0.5220400E+00, 0.5148200E+00, &
     & 0.5268700E+00, 0.5070700E+00, 0.4881700E+00, 0.4738000E+00, &
     & 0.5101400E+00, 0.4624700E+00, 0.4311414E+00, 0.4311414E+00 /
      data (ref_adm(30,iz,37,11),iz = 1,20) / &
     & 0.4086500E+00, 0.4086500E+00, 0.3800800E+00, 0.4081800E+00, &
     & 0.4299200E+00, 0.4745600E+00, 0.4701300E+00, 0.4273200E+00, &
     & 0.4860300E+00, 0.5359100E+00, 0.5314000E+00, 0.5325900E+00, &
     & 0.5100700E+00, 0.5101000E+00, 0.4939700E+00, 0.5011700E+00, &
     & 0.4489600E+00, 0.4744910E+00, 0.4330309E+00, 0.4330309E+00 /
      data (ref_adm(30,iz,38,11),iz = 1,20) / &
     & 0.4086500E+00, 0.4086500E+00, 0.3800800E+00, 0.4081800E+00, &
     & 0.4299200E+00, 0.4745600E+00, 0.4701300E+00, 0.4273200E+00, &
     & 0.4860300E+00, 0.5359100E+00, 0.5314000E+00, 0.5325900E+00, &
     & 0.5100700E+00, 0.5101000E+00, 0.4939700E+00, 0.5011700E+00, &
     & 0.4489600E+00, 0.4744910E+00, 0.4330309E+00, 0.4330309E+00 /
! Solar Zenith Angle 55.0 Albedo  0.4429033E+00
      data (ref_adm(30,iz, 1,12),iz = 1,20) / &
     & 0.4332400E+00, 0.4332400E+00, 0.4268600E+00, 0.4036400E+00, &
     & 0.4206500E+00, 0.4214600E+00, 0.4314500E+00, 0.4358400E+00, &
     & 0.4069100E+00, 0.4440500E+00, 0.4517100E+00, 0.4737100E+00, &
     & 0.5029300E+00, 0.5038000E+00, 0.5431800E+00, 0.5072500E+00, &
     & 0.5983500E+00, 0.5856500E+00, 0.5612912E+00, 0.5612912E+00 /
      data (ref_adm(30,iz, 2,12),iz = 1,20) / &
     & 0.4332400E+00, 0.4332400E+00, 0.4268600E+00, 0.4036400E+00, &
     & 0.4206500E+00, 0.4214600E+00, 0.4314500E+00, 0.4358400E+00, &
     & 0.4069100E+00, 0.4440500E+00, 0.4517100E+00, 0.4737100E+00, &
     & 0.5029300E+00, 0.5038000E+00, 0.5431800E+00, 0.5072500E+00, &
     & 0.5983500E+00, 0.5856500E+00, 0.5612912E+00, 0.5612912E+00 /
      data (ref_adm(30,iz, 3,12),iz = 1,20) / &
     & 0.4294800E+00, 0.4294800E+00, 0.4118100E+00, 0.4278300E+00, &
     & 0.4324800E+00, 0.4261900E+00, 0.4140200E+00, 0.4149700E+00, &
     & 0.4336500E+00, 0.4286500E+00, 0.4718600E+00, 0.4593200E+00, &
     & 0.5009700E+00, 0.4865300E+00, 0.5001900E+00, 0.5483500E+00, &
     & 0.6193000E+00, 0.5677500E+00, 0.3673954E+00, 0.3673954E+00 /
      data (ref_adm(30,iz, 4,12),iz = 1,20) / &
     & 0.4388900E+00, 0.4388900E+00, 0.4260600E+00, 0.4119500E+00, &
     & 0.4453400E+00, 0.4401900E+00, 0.4299500E+00, 0.4152000E+00, &
     & 0.4382500E+00, 0.4248300E+00, 0.4482400E+00, 0.4826000E+00, &
     & 0.4739400E+00, 0.4881200E+00, 0.4891000E+00, 0.5349900E+00, &
     & 0.5756800E+00, 0.5738300E+00, 0.5481498E+00, 0.5481498E+00 /
      data (ref_adm(30,iz, 5,12),iz = 1,20) / &
     & 0.4308800E+00, 0.4308800E+00, 0.4270600E+00, 0.4274800E+00, &
     & 0.4194600E+00, 0.4457000E+00, 0.4362900E+00, 0.4258700E+00, &
     & 0.3979700E+00, 0.4377800E+00, 0.4473400E+00, 0.4673900E+00, &
     & 0.4740600E+00, 0.4737700E+00, 0.4812100E+00, 0.5420500E+00, &
     & 0.5593400E+00, 0.4845800E+00, 0.5384329E+00, 0.5384329E+00 /
      data (ref_adm(30,iz, 6,12),iz = 1,20) / &
     & 0.4150800E+00, 0.4150800E+00, 0.4070900E+00, 0.4176300E+00, &
     & 0.4045100E+00, 0.3905000E+00, 0.4229900E+00, 0.4035500E+00, &
     & 0.4111200E+00, 0.4369900E+00, 0.4328200E+00, 0.4430100E+00, &
     & 0.4463300E+00, 0.4598900E+00, 0.4598700E+00, 0.5136600E+00, &
     & 0.5109300E+00, 0.5298000E+00, 0.5273509E+00, 0.5273509E+00 /
      data (ref_adm(30,iz, 7,12),iz = 1,20) / &
     & 0.4100700E+00, 0.4100700E+00, 0.4128400E+00, 0.3953600E+00, &
     & 0.4045300E+00, 0.4012700E+00, 0.3862300E+00, 0.4086500E+00, &
     & 0.4221900E+00, 0.4068900E+00, 0.4155900E+00, 0.4326200E+00, &
     & 0.4547800E+00, 0.4544500E+00, 0.4813900E+00, 0.4964300E+00, &
     & 0.5124000E+00, 0.5178400E+00, 0.5155184E+00, 0.5155184E+00 /
      data (ref_adm(30,iz, 8,12),iz = 1,20) / &
     & 0.4090400E+00, 0.4090400E+00, 0.4186000E+00, 0.4248300E+00, &
     & 0.4237900E+00, 0.4182000E+00, 0.4264700E+00, 0.4472900E+00, &
     & 0.4605100E+00, 0.4651100E+00, 0.4762700E+00, 0.4696600E+00, &
     & 0.4895900E+00, 0.5121600E+00, 0.5196700E+00, 0.5146800E+00, &
     & 0.5323400E+00, 0.5468200E+00, 0.4973133E+00, 0.4973133E+00 /
      data (ref_adm(30,iz, 9,12),iz = 1,20) / &
     & 0.4043000E+00, 0.4043000E+00, 0.3958800E+00, 0.4125100E+00, &
     & 0.4063900E+00, 0.4073900E+00, 0.3886800E+00, 0.4102300E+00, &
     & 0.4209300E+00, 0.4489000E+00, 0.4530800E+00, 0.4404500E+00, &
     & 0.4323100E+00, 0.4745200E+00, 0.4776900E+00, 0.4727300E+00, &
     & 0.4719600E+00, 0.4718400E+00, 0.4779409E+00, 0.4779409E+00 /
      data (ref_adm(30,iz,10,12),iz = 1,20) / &
     & 0.4003400E+00, 0.4003400E+00, 0.4005100E+00, 0.4048900E+00, &
     & 0.4081300E+00, 0.3841900E+00, 0.3730900E+00, 0.4190900E+00, &
     & 0.4256400E+00, 0.4273800E+00, 0.4319400E+00, 0.4370800E+00, &
     & 0.4595300E+00, 0.4618900E+00, 0.4596000E+00, 0.4990700E+00, &
     & 0.4961700E+00, 0.4750400E+00, 0.4623527E+00, 0.4623527E+00 /
      data (ref_adm(30,iz,11,12),iz = 1,20) / &
     & 0.4058800E+00, 0.4058800E+00, 0.3990400E+00, 0.4068000E+00, &
     & 0.3870200E+00, 0.3827300E+00, 0.4042000E+00, 0.4124200E+00, &
     & 0.3940500E+00, 0.4001900E+00, 0.4090600E+00, 0.4174100E+00, &
     & 0.4795100E+00, 0.4668000E+00, 0.4669500E+00, 0.4735000E+00, &
     & 0.4900100E+00, 0.5056300E+00, 0.4495521E+00, 0.4495521E+00 /
      data (ref_adm(30,iz,12,12),iz = 1,20) / &
     & 0.4170000E+00, 0.4170000E+00, 0.4211600E+00, 0.4065000E+00, &
     & 0.3895800E+00, 0.4059700E+00, 0.4275500E+00, 0.4030300E+00, &
     & 0.3965200E+00, 0.4020500E+00, 0.4182500E+00, 0.4200900E+00, &
     & 0.4660700E+00, 0.4571200E+00, 0.4593300E+00, 0.5220500E+00, &
     & 0.5063600E+00, 0.4691300E+00, 0.4391916E+00, 0.4391916E+00 /
      data (ref_adm(30,iz,13,12),iz = 1,20) / &
     & 0.4210200E+00, 0.4210200E+00, 0.4205800E+00, 0.4253900E+00, &
     & 0.4223800E+00, 0.4102000E+00, 0.4021000E+00, 0.3997100E+00, &
     & 0.4045500E+00, 0.4014900E+00, 0.4248800E+00, 0.4246700E+00, &
     & 0.4470600E+00, 0.4721700E+00, 0.4679500E+00, 0.5026800E+00, &
     & 0.5037400E+00, 0.3925800E+00, 0.4301712E+00, 0.4301712E+00 /
      data (ref_adm(30,iz,14,12),iz = 1,20) / &
     & 0.4102200E+00, 0.4102200E+00, 0.4056800E+00, 0.4045400E+00, &
     & 0.4034700E+00, 0.4048800E+00, 0.4039400E+00, 0.4145600E+00, &
     & 0.4133100E+00, 0.4226700E+00, 0.4341200E+00, 0.4435600E+00, &
     & 0.4613500E+00, 0.4873000E+00, 0.4490400E+00, 0.4869200E+00, &
     & 0.4882600E+00, 0.3727700E+00, 0.4220467E+00, 0.4220467E+00 /
      data (ref_adm(30,iz,15,12),iz = 1,20) / &
     & 0.4123800E+00, 0.4123800E+00, 0.4110700E+00, 0.4083500E+00, &
     & 0.4099800E+00, 0.3999700E+00, 0.4021800E+00, 0.4080800E+00, &
     & 0.4099400E+00, 0.3972300E+00, 0.3948600E+00, 0.3848800E+00, &
     & 0.3935100E+00, 0.4108100E+00, 0.4371700E+00, 0.4534100E+00, &
     & 0.4494300E+00, 0.3306700E+00, 0.4139065E+00, 0.4139065E+00 /
      data (ref_adm(30,iz,16,12),iz = 1,20) / &
     & 0.4164300E+00, 0.4164300E+00, 0.4117700E+00, 0.4034000E+00, &
     & 0.3986400E+00, 0.3730000E+00, 0.3842500E+00, 0.3949500E+00, &
     & 0.4169300E+00, 0.4224900E+00, 0.4181200E+00, 0.4093600E+00, &
     & 0.4280300E+00, 0.4388900E+00, 0.4305000E+00, 0.4360000E+00, &
     & 0.4528500E+00, 0.3151700E+00, 0.4047749E+00, 0.4047749E+00 /
      data (ref_adm(30,iz,17,12),iz = 1,20) / &
     & 0.4136200E+00, 0.4136200E+00, 0.4046600E+00, 0.4002900E+00, &
     & 0.4105800E+00, 0.4129800E+00, 0.3881300E+00, 0.3972700E+00, &
     & 0.4098700E+00, 0.4512800E+00, 0.4521300E+00, 0.4296000E+00, &
     & 0.4213900E+00, 0.4367900E+00, 0.4327300E+00, 0.4216000E+00, &
     & 0.4637100E+00, 0.4446674E+00, 0.3968677E+00, 0.3968677E+00 /
      data (ref_adm(30,iz,18,12),iz = 1,20) / &
     & 0.4079200E+00, 0.4079200E+00, 0.3902700E+00, 0.3840200E+00, &
     & 0.4009100E+00, 0.3925200E+00, 0.3952400E+00, 0.3883100E+00, &
     & 0.3993500E+00, 0.4269100E+00, 0.4289500E+00, 0.4425500E+00, &
     & 0.4378900E+00, 0.4405800E+00, 0.4353800E+00, 0.4612200E+00, &
     & 0.4812100E+00, 0.4064139E+00, 0.3346398E+00, 0.3346398E+00 /
      data (ref_adm(30,iz,19,12),iz = 1,20) / &
     & 0.3991500E+00, 0.3991500E+00, 0.3929500E+00, 0.3826000E+00, &
     & 0.4275000E+00, 0.4090600E+00, 0.4007100E+00, 0.3725000E+00, &
     & 0.4243400E+00, 0.4450400E+00, 0.4648200E+00, 0.4448800E+00, &
     & 0.4245300E+00, 0.4335200E+00, 0.4155200E+00, 0.4760200E+00, &
     & 0.5503100E+00, 0.4028640E+00, 0.3320412E+00, 0.3320412E+00 /
      data (ref_adm(30,iz,20,12),iz = 1,20) / &
     & 0.4081300E+00, 0.4081300E+00, 0.3983100E+00, 0.3995200E+00, &
     & 0.4076600E+00, 0.4218900E+00, 0.4169000E+00, 0.3954900E+00, &
     & 0.4072400E+00, 0.4375600E+00, 0.4626700E+00, 0.4635200E+00, &
     & 0.4361900E+00, 0.4389800E+00, 0.4547300E+00, 0.4435900E+00, &
     & 0.4260524E+00, 0.3986138E+00, 0.3299681E+00, 0.3299681E+00 /
      data (ref_adm(30,iz,21,12),iz = 1,20) / &
     & 0.4034400E+00, 0.4034400E+00, 0.3936100E+00, 0.3972800E+00, &
     & 0.4023300E+00, 0.4032100E+00, 0.4038800E+00, 0.4015600E+00, &
     & 0.4212600E+00, 0.4278300E+00, 0.4579600E+00, 0.4541700E+00, &
     & 0.4501200E+00, 0.4377000E+00, 0.4088500E+00, 0.4099600E+00, &
     & 0.4224403E+00, 0.3949989E+00, 0.3279946E+00, 0.3279946E+00 /
      data (ref_adm(30,iz,22,12),iz = 1,20) / &
     & 0.4001900E+00, 0.4001900E+00, 0.4097200E+00, 0.4163100E+00, &
     & 0.4122100E+00, 0.4282200E+00, 0.4344400E+00, 0.4463500E+00, &
     & 0.4048200E+00, 0.4150800E+00, 0.4548600E+00, 0.4572800E+00, &
     & 0.4313100E+00, 0.4342500E+00, 0.4021300E+00, 0.4069600E+00, &
     & 0.4743596E+00, 0.4513597E+00, 0.3911958E+00, 0.3911958E+00 /
      data (ref_adm(30,iz,23,12),iz = 1,20) / &
     & 0.4003200E+00, 0.4003200E+00, 0.4047200E+00, 0.4082100E+00, &
     & 0.4045300E+00, 0.4484500E+00, 0.4433000E+00, 0.4554400E+00, &
     & 0.4396700E+00, 0.4485800E+00, 0.4275500E+00, 0.4716100E+00, &
     & 0.4337700E+00, 0.4381300E+00, 0.4074900E+00, 0.4077500E+00, &
     & 0.4671500E+00, 0.4430183E+00, 0.3884217E+00, 0.3884217E+00 /
      data (ref_adm(30,iz,24,12),iz = 1,20) / &
     & 0.3883100E+00, 0.3883100E+00, 0.3959000E+00, 0.3959300E+00, &
     & 0.4209000E+00, 0.4340000E+00, 0.4479000E+00, 0.4553000E+00, &
     & 0.4438200E+00, 0.4408900E+00, 0.4348300E+00, 0.4370400E+00, &
     & 0.4440400E+00, 0.4302000E+00, 0.4365100E+00, 0.4391800E+00, &
     & 0.4519600E+00, 0.4365127E+00, 0.3863971E+00, 0.3863971E+00 /
      data (ref_adm(30,iz,25,12),iz = 1,20) / &
     & 0.4232400E+00, 0.4232400E+00, 0.4269900E+00, 0.4263500E+00, &
     & 0.4199000E+00, 0.4392900E+00, 0.4454200E+00, 0.4480200E+00, &
     & 0.4458400E+00, 0.4457400E+00, 0.4413900E+00, 0.4365500E+00, &
     & 0.4546400E+00, 0.4646300E+00, 0.4556400E+00, 0.4309500E+00, &
     & 0.4426300E+00, 0.4757900E+00, 0.3857562E+00, 0.3857562E+00 /
      data (ref_adm(30,iz,26,12),iz = 1,20) / &
     & 0.4085600E+00, 0.4085600E+00, 0.4118200E+00, 0.4140100E+00, &
     & 0.4199800E+00, 0.4319800E+00, 0.4332200E+00, 0.4407800E+00, &
     & 0.4452000E+00, 0.4389600E+00, 0.4330600E+00, 0.4302600E+00, &
     & 0.4478300E+00, 0.4512000E+00, 0.4364200E+00, 0.4114600E+00, &
     & 0.4384000E+00, 0.4170600E+00, 0.3860093E+00, 0.3860093E+00 /
      data (ref_adm(30,iz,27,12),iz = 1,20) / &
     & 0.4171200E+00, 0.4171200E+00, 0.4064300E+00, 0.4096000E+00, &
     & 0.4162900E+00, 0.4256900E+00, 0.4459000E+00, 0.4655500E+00, &
     & 0.4768900E+00, 0.4905100E+00, 0.4908100E+00, 0.4894200E+00, &
     & 0.4776700E+00, 0.4791100E+00, 0.4592300E+00, 0.4342500E+00, &
     & 0.4311800E+00, 0.3996300E+00, 0.3490500E+00, 0.3490500E+00 /
      data (ref_adm(30,iz,28,12),iz = 1,20) / &
     & 0.4156300E+00, 0.4156300E+00, 0.4260600E+00, 0.4214100E+00, &
     & 0.4204200E+00, 0.4262900E+00, 0.4291300E+00, 0.4503600E+00, &
     & 0.4623600E+00, 0.4588300E+00, 0.4725100E+00, 0.4627000E+00, &
     & 0.4572500E+00, 0.4861000E+00, 0.4418100E+00, 0.4372000E+00, &
     & 0.4452600E+00, 0.4131300E+00, 0.3759800E+00, 0.3759800E+00 /
      data (ref_adm(30,iz,29,12),iz = 1,20) / &
     & 0.4188800E+00, 0.4188800E+00, 0.4272600E+00, 0.4490900E+00, &
     & 0.4476400E+00, 0.4483400E+00, 0.4327600E+00, 0.4460100E+00, &
     & 0.4788200E+00, 0.4559600E+00, 0.4615900E+00, 0.4558900E+00, &
     & 0.4731400E+00, 0.4655500E+00, 0.4350300E+00, 0.4338700E+00, &
     & 0.4442900E+00, 0.4151700E+00, 0.3327000E+00, 0.3327000E+00 /
      data (ref_adm(30,iz,30,12),iz = 1,20) / &
     & 0.4199100E+00, 0.4199100E+00, 0.4171200E+00, 0.4312800E+00, &
     & 0.4375000E+00, 0.4356700E+00, 0.4404700E+00, 0.4398000E+00, &
     & 0.4473100E+00, 0.4474000E+00, 0.4500300E+00, 0.4593600E+00, &
     & 0.4550200E+00, 0.4598300E+00, 0.4528300E+00, 0.4606900E+00, &
     & 0.4517200E+00, 0.4242400E+00, 0.3742500E+00, 0.3742500E+00 /
      data (ref_adm(30,iz,31,12),iz = 1,20) / &
     & 0.4179600E+00, 0.4179600E+00, 0.4192500E+00, 0.4257300E+00, &
     & 0.4315300E+00, 0.4382100E+00, 0.4491500E+00, 0.4535900E+00, &
     & 0.4468100E+00, 0.4586300E+00, 0.4705800E+00, 0.4756100E+00, &
     & 0.4898800E+00, 0.4958500E+00, 0.5071300E+00, 0.4963600E+00, &
     & 0.5140800E+00, 0.4714100E+00, 0.3872400E+00, 0.3872400E+00 /
      data (ref_adm(30,iz,32,12),iz = 1,20) / &
     & 0.3966900E+00, 0.3966900E+00, 0.3958700E+00, 0.4127800E+00, &
     & 0.4115100E+00, 0.3990900E+00, 0.4079200E+00, 0.4134200E+00, &
     & 0.4214700E+00, 0.4175700E+00, 0.4293500E+00, 0.4310900E+00, &
     & 0.4419600E+00, 0.4662000E+00, 0.4684100E+00, 0.4964700E+00, &
     & 0.4895100E+00, 0.4613200E+00, 0.3703100E+00, 0.3703100E+00 /
      data (ref_adm(30,iz,33,12),iz = 1,20) / &
     & 0.4049000E+00, 0.4049000E+00, 0.4012000E+00, 0.4084100E+00, &
     & 0.4073600E+00, 0.4165200E+00, 0.4285800E+00, 0.4464200E+00, &
     & 0.4524800E+00, 0.4428600E+00, 0.4581500E+00, 0.4773100E+00, &
     & 0.4712000E+00, 0.4576200E+00, 0.5051700E+00, 0.5140300E+00, &
     & 0.5000600E+00, 0.4519300E+00, 0.3561900E+00, 0.3561900E+00 /
      data (ref_adm(30,iz,34,12),iz = 1,20) / &
     & 0.4198800E+00, 0.4198800E+00, 0.4139100E+00, 0.4067100E+00, &
     & 0.4234700E+00, 0.4357800E+00, 0.4228500E+00, 0.4183900E+00, &
     & 0.4405000E+00, 0.4599800E+00, 0.4679900E+00, 0.4785100E+00, &
     & 0.4962700E+00, 0.5036200E+00, 0.5097100E+00, 0.5209100E+00, &
     & 0.5137000E+00, 0.4597200E+00, 0.3837800E+00, 0.3837800E+00 /
      data (ref_adm(30,iz,35,12),iz = 1,20) / &
     & 0.4177500E+00, 0.4177500E+00, 0.4217000E+00, 0.4423700E+00, &
     & 0.4343400E+00, 0.4204800E+00, 0.4236500E+00, 0.4204000E+00, &
     & 0.4565200E+00, 0.4678200E+00, 0.4871000E+00, 0.4988300E+00, &
     & 0.5082800E+00, 0.5344700E+00, 0.5267000E+00, 0.5153200E+00, &
     & 0.5253300E+00, 0.5012000E+00, 0.3832500E+00, 0.3832500E+00 /
      data (ref_adm(30,iz,36,12),iz = 1,20) / &
     & 0.4221400E+00, 0.4221400E+00, 0.4373400E+00, 0.4365800E+00, &
     & 0.4339200E+00, 0.4213200E+00, 0.4125500E+00, 0.4436800E+00, &
     & 0.4257500E+00, 0.4558300E+00, 0.4739000E+00, 0.4930300E+00, &
     & 0.5082000E+00, 0.5338000E+00, 0.5411000E+00, 0.5471800E+00, &
     & 0.5336500E+00, 0.5116300E+00, 0.4267833E+00, 0.4267833E+00 /
      data (ref_adm(30,iz,37,12),iz = 1,20) / &
     & 0.4434600E+00, 0.4434600E+00, 0.4506600E+00, 0.4395500E+00, &
     & 0.4240500E+00, 0.4324200E+00, 0.4469300E+00, 0.4354900E+00, &
     & 0.4454900E+00, 0.4652300E+00, 0.4900600E+00, 0.5143400E+00, &
     & 0.5586500E+00, 0.5560300E+00, 0.5556200E+00, 0.5397600E+00, &
     & 0.4969200E+00, 0.3859400E+00, 0.4282439E+00, 0.4282439E+00 /
      data (ref_adm(30,iz,38,12),iz = 1,20) / &
     & 0.4434600E+00, 0.4434600E+00, 0.4506600E+00, 0.4395500E+00, &
     & 0.4240500E+00, 0.4324200E+00, 0.4469300E+00, 0.4354900E+00, &
     & 0.4454900E+00, 0.4652300E+00, 0.4900600E+00, 0.5143400E+00, &
     & 0.5586500E+00, 0.5560300E+00, 0.5556200E+00, 0.5397600E+00, &
     & 0.4969200E+00, 0.3859400E+00, 0.4282439E+00, 0.4282439E+00 /
! Solar Zenith Angle 60.0 Albedo  0.4448641E+00
      data (ref_adm(30,iz, 1,13),iz = 1,20) / &
     & 0.3926000E+00, 0.3926000E+00, 0.3811900E+00, 0.3921000E+00, &
     & 0.3952700E+00, 0.4193900E+00, 0.4220800E+00, 0.4186200E+00, &
     & 0.4062400E+00, 0.4167000E+00, 0.4282400E+00, 0.4550700E+00, &
     & 0.4836400E+00, 0.5340200E+00, 0.5636000E+00, 0.6024300E+00, &
     & 0.6410100E+00, 0.6830300E+00, 0.6411900E+00, 0.6411900E+00 /
      data (ref_adm(30,iz, 2,13),iz = 1,20) / &
     & 0.3926000E+00, 0.3926000E+00, 0.3811900E+00, 0.3921000E+00, &
     & 0.3952700E+00, 0.4193900E+00, 0.4220800E+00, 0.4186200E+00, &
     & 0.4062400E+00, 0.4167000E+00, 0.4282400E+00, 0.4550700E+00, &
     & 0.4836400E+00, 0.5340200E+00, 0.5636000E+00, 0.6024300E+00, &
     & 0.6410100E+00, 0.6830300E+00, 0.6411900E+00, 0.6411900E+00 /
      data (ref_adm(30,iz, 3,13),iz = 1,20) / &
     & 0.4064500E+00, 0.4064500E+00, 0.4049000E+00, 0.4052200E+00, &
     & 0.4082600E+00, 0.4029700E+00, 0.4068800E+00, 0.4123800E+00, &
     & 0.4195400E+00, 0.4137900E+00, 0.4470100E+00, 0.4580400E+00, &
     & 0.4783600E+00, 0.4945200E+00, 0.5328800E+00, 0.5435300E+00, &
     & 0.6201700E+00, 0.6255600E+00, 0.5710000E+00, 0.5710000E+00 /
      data (ref_adm(30,iz, 4,13),iz = 1,20) / &
     & 0.4108100E+00, 0.4108100E+00, 0.4080300E+00, 0.4087600E+00, &
     & 0.3945400E+00, 0.3971000E+00, 0.4012600E+00, 0.4003000E+00, &
     & 0.4192000E+00, 0.4142500E+00, 0.4421100E+00, 0.4532200E+00, &
     & 0.4746600E+00, 0.5056400E+00, 0.5258800E+00, 0.5352300E+00, &
     & 0.6020400E+00, 0.6060000E+00, 0.5029800E+00, 0.5029800E+00 /
      data (ref_adm(30,iz, 5,13),iz = 1,20) / &
     & 0.4074600E+00, 0.4074600E+00, 0.4094300E+00, 0.4022600E+00, &
     & 0.3948400E+00, 0.3924300E+00, 0.4029100E+00, 0.4028600E+00, &
     & 0.4015300E+00, 0.4278200E+00, 0.4382200E+00, 0.4476700E+00, &
     & 0.4730400E+00, 0.4840100E+00, 0.5177800E+00, 0.5449700E+00, &
     & 0.5971500E+00, 0.5881700E+00, 0.4931300E+00, 0.4931300E+00 /
      data (ref_adm(30,iz, 6,13),iz = 1,20) / &
     & 0.3925900E+00, 0.3925900E+00, 0.3941200E+00, 0.3974300E+00, &
     & 0.4029000E+00, 0.4005700E+00, 0.4050000E+00, 0.4009300E+00, &
     & 0.4177900E+00, 0.4373900E+00, 0.4495000E+00, 0.4643500E+00, &
     & 0.4638700E+00, 0.4884900E+00, 0.5181400E+00, 0.5496900E+00, &
     & 0.6001100E+00, 0.5648200E+00, 0.4848700E+00, 0.4848700E+00 /
      data (ref_adm(30,iz, 7,13),iz = 1,20) / &
     & 0.4105700E+00, 0.4105700E+00, 0.4030400E+00, 0.4045800E+00, &
     & 0.4116300E+00, 0.4097100E+00, 0.4109300E+00, 0.4197000E+00, &
     & 0.4325600E+00, 0.4400500E+00, 0.4479600E+00, 0.4645400E+00, &
     & 0.4746700E+00, 0.4893100E+00, 0.5154700E+00, 0.5501400E+00, &
     & 0.5871500E+00, 0.5960700E+00, 0.5855300E+00, 0.5855300E+00 /
      data (ref_adm(30,iz, 8,13),iz = 1,20) / &
     & 0.4063600E+00, 0.4063600E+00, 0.4031800E+00, 0.4051800E+00, &
     & 0.4020500E+00, 0.4130700E+00, 0.4208300E+00, 0.4140900E+00, &
     & 0.4250200E+00, 0.4380400E+00, 0.4560400E+00, 0.4626400E+00, &
     & 0.4765900E+00, 0.5103400E+00, 0.5366200E+00, 0.5588100E+00, &
     & 0.5927000E+00, 0.5744500E+00, 0.5478200E+00, 0.5478200E+00 /
      data (ref_adm(30,iz, 9,13),iz = 1,20) / &
     & 0.3865100E+00, 0.3865100E+00, 0.3840500E+00, 0.3886400E+00, &
     & 0.3845900E+00, 0.3912300E+00, 0.3968100E+00, 0.4019600E+00, &
     & 0.4137400E+00, 0.4263600E+00, 0.4435700E+00, 0.4508200E+00, &
     & 0.4468000E+00, 0.4568100E+00, 0.4955500E+00, 0.5234700E+00, &
     & 0.5248600E+00, 0.5349700E+00, 0.4368600E+00, 0.4368600E+00 /
      data (ref_adm(30,iz,10,13),iz = 1,20) / &
     & 0.3811600E+00, 0.3811600E+00, 0.3875100E+00, 0.3970500E+00, &
     & 0.3937400E+00, 0.3866600E+00, 0.3939300E+00, 0.4111700E+00, &
     & 0.4105500E+00, 0.4285200E+00, 0.4385000E+00, 0.4399600E+00, &
     & 0.4324000E+00, 0.4594200E+00, 0.5139100E+00, 0.5400700E+00, &
     & 0.5592500E+00, 0.5169300E+00, 0.4831817E+00, 0.4831817E+00 /
      data (ref_adm(30,iz,11,13),iz = 1,20) / &
     & 0.3967100E+00, 0.3967100E+00, 0.4086200E+00, 0.3928500E+00, &
     & 0.3904100E+00, 0.3790400E+00, 0.4102500E+00, 0.4115200E+00, &
     & 0.4201700E+00, 0.4205600E+00, 0.4389000E+00, 0.4541300E+00, &
     & 0.4273600E+00, 0.4382700E+00, 0.5002200E+00, 0.4886400E+00, &
     & 0.5100000E+00, 0.4978000E+00, 0.4325600E+00, 0.4325600E+00 /
      data (ref_adm(30,iz,12,13),iz = 1,20) / &
     & 0.3932900E+00, 0.3932900E+00, 0.3974400E+00, 0.3918100E+00, &
     & 0.3902000E+00, 0.3960600E+00, 0.4059400E+00, 0.4035700E+00, &
     & 0.4047900E+00, 0.4023900E+00, 0.4480900E+00, 0.4627800E+00, &
     & 0.4307000E+00, 0.4284900E+00, 0.4892000E+00, 0.5184200E+00, &
     & 0.4827100E+00, 0.4628500E+00, 0.4556767E+00, 0.4556767E+00 /
      data (ref_adm(30,iz,13,13),iz = 1,20) / &
     & 0.3967400E+00, 0.3967400E+00, 0.3945000E+00, 0.3844600E+00, &
     & 0.4035100E+00, 0.4066100E+00, 0.4103100E+00, 0.3964800E+00, &
     & 0.3885900E+00, 0.4073500E+00, 0.4324700E+00, 0.4527600E+00, &
     & 0.4232100E+00, 0.4333400E+00, 0.4662600E+00, 0.4722700E+00, &
     & 0.4677900E+00, 0.4496900E+00, 0.4452491E+00, 0.4452491E+00 /
      data (ref_adm(30,iz,14,13),iz = 1,20) / &
     & 0.3957700E+00, 0.3957700E+00, 0.3985400E+00, 0.3989900E+00, &
     & 0.3993400E+00, 0.3964300E+00, 0.3942900E+00, 0.3985200E+00, &
     & 0.4003500E+00, 0.4021900E+00, 0.4131100E+00, 0.4172400E+00, &
     & 0.4255100E+00, 0.4402600E+00, 0.4668200E+00, 0.4952700E+00, &
     & 0.4527500E+00, 0.4468700E+00, 0.4362903E+00, 0.4362903E+00 /
      data (ref_adm(30,iz,15,13),iz = 1,20) / &
     & 0.4138400E+00, 0.4138400E+00, 0.4272800E+00, 0.4222300E+00, &
     & 0.4218400E+00, 0.4230800E+00, 0.4326800E+00, 0.4281700E+00, &
     & 0.4287700E+00, 0.4277200E+00, 0.4196200E+00, 0.4033600E+00, &
     & 0.3940700E+00, 0.4052400E+00, 0.4430000E+00, 0.4560500E+00, &
     & 0.4501800E+00, 0.3786500E+00, 0.4275102E+00, 0.4275102E+00 /
      data (ref_adm(30,iz,16,13),iz = 1,20) / &
     & 0.3972800E+00, 0.3972800E+00, 0.4066400E+00, 0.4037900E+00, &
     & 0.4068300E+00, 0.3964200E+00, 0.3837600E+00, 0.3967900E+00, &
     & 0.3953200E+00, 0.4048000E+00, 0.4014600E+00, 0.4064300E+00, &
     & 0.4191000E+00, 0.4281900E+00, 0.4295300E+00, 0.4506500E+00, &
     & 0.4792000E+00, 0.4635600E+00, 0.4176235E+00, 0.4176235E+00 /
      data (ref_adm(30,iz,17,13),iz = 1,20) / &
     & 0.4000900E+00, 0.4000900E+00, 0.4154700E+00, 0.4096800E+00, &
     & 0.4147300E+00, 0.4023400E+00, 0.4039600E+00, 0.4032200E+00, &
     & 0.4152600E+00, 0.4268800E+00, 0.4224300E+00, 0.4259100E+00, &
     & 0.4138100E+00, 0.4371000E+00, 0.4440600E+00, 0.4277400E+00, &
     & 0.4506000E+00, 0.4546251E+00, 0.4088202E+00, 0.4088202E+00 /
      data (ref_adm(30,iz,18,13),iz = 1,20) / &
     & 0.4032000E+00, 0.4032000E+00, 0.4173500E+00, 0.4333400E+00, &
     & 0.4236300E+00, 0.4223000E+00, 0.4239400E+00, 0.4248500E+00, &
     & 0.4267000E+00, 0.4245300E+00, 0.4170300E+00, 0.4386600E+00, &
     & 0.4270900E+00, 0.4229400E+00, 0.4328600E+00, 0.4636200E+00, &
     & 0.4796700E+00, 0.4261890E+00, 0.3589614E+00, 0.3589614E+00 /
      data (ref_adm(30,iz,19,13),iz = 1,20) / &
     & 0.4018000E+00, 0.4018000E+00, 0.4186800E+00, 0.4289000E+00, &
     & 0.4183200E+00, 0.4128800E+00, 0.4252300E+00, 0.4416700E+00, &
     & 0.4194100E+00, 0.4117400E+00, 0.4197700E+00, 0.4245400E+00, &
     & 0.4352700E+00, 0.4185800E+00, 0.4380500E+00, 0.4848900E+00, &
     & 0.4400655E+00, 0.4209883E+00, 0.3545845E+00, 0.3545845E+00 /
      data (ref_adm(30,iz,20,13),iz = 1,20) / &
     & 0.4034300E+00, 0.4034300E+00, 0.4155000E+00, 0.4155200E+00, &
     & 0.4086500E+00, 0.4249800E+00, 0.4232300E+00, 0.4265600E+00, &
     & 0.4287300E+00, 0.4161300E+00, 0.4317900E+00, 0.4452700E+00, &
     & 0.4284500E+00, 0.4226800E+00, 0.4423300E+00, 0.4799200E+00, &
     & 0.4356708E+00, 0.4161553E+00, 0.3515644E+00, 0.3515644E+00 /
      data (ref_adm(30,iz,21,13),iz = 1,20) / &
     & 0.4033100E+00, 0.4033100E+00, 0.4099400E+00, 0.4248900E+00, &
     & 0.4198800E+00, 0.4313900E+00, 0.4279000E+00, 0.4162000E+00, &
     & 0.4211500E+00, 0.4152600E+00, 0.4261400E+00, 0.4437200E+00, &
     & 0.4361700E+00, 0.4380400E+00, 0.4444300E+00, 0.4648800E+00, &
     & 0.4313628E+00, 0.4112558E+00, 0.3490751E+00, 0.3490751E+00 /
      data (ref_adm(30,iz,22,13),iz = 1,20) / &
     & 0.4133700E+00, 0.4133700E+00, 0.4034000E+00, 0.4117000E+00, &
     & 0.4178100E+00, 0.4095700E+00, 0.4252800E+00, 0.4388100E+00, &
     & 0.4363900E+00, 0.4328100E+00, 0.4288900E+00, 0.4432600E+00, &
     & 0.4457500E+00, 0.4351200E+00, 0.4334400E+00, 0.4246800E+00, &
     & 0.4219033E+00, 0.3994254E+00, 0.3628500E+00, 0.3628500E+00 /
      data (ref_adm(30,iz,23,13),iz = 1,20) / &
     & 0.4084500E+00, 0.4084500E+00, 0.4077400E+00, 0.4118100E+00, &
     & 0.4035500E+00, 0.4171900E+00, 0.4244800E+00, 0.4370300E+00, &
     & 0.4423700E+00, 0.4411400E+00, 0.4398600E+00, 0.4506000E+00, &
     & 0.4466500E+00, 0.4470100E+00, 0.4270900E+00, 0.4371500E+00, &
     & 0.4324500E+00, 0.3990225E+00, 0.3656638E+00, 0.3656638E+00 /
      data (ref_adm(30,iz,24,13),iz = 1,20) / &
     & 0.3845000E+00, 0.3845000E+00, 0.3864700E+00, 0.3943100E+00, &
     & 0.3830300E+00, 0.3997700E+00, 0.4101600E+00, 0.4094000E+00, &
     & 0.4321200E+00, 0.4349200E+00, 0.4541800E+00, 0.4515300E+00, &
     & 0.4626800E+00, 0.4578400E+00, 0.4301800E+00, 0.4041200E+00, &
     & 0.3766300E+00, 0.4009025E+00, 0.3701659E+00, 0.3701659E+00 /
      data (ref_adm(30,iz,25,13),iz = 1,20) / &
     & 0.4257600E+00, 0.4257600E+00, 0.4281700E+00, 0.4339400E+00, &
     & 0.4312400E+00, 0.4334500E+00, 0.4336000E+00, 0.4435800E+00, &
     & 0.4579000E+00, 0.4683000E+00, 0.4649200E+00, 0.4703500E+00, &
     & 0.4554800E+00, 0.4543300E+00, 0.4373800E+00, 0.4002800E+00, &
     & 0.4114800E+00, 0.4796200E+00, 0.3761117E+00, 0.3761117E+00 /
      data (ref_adm(30,iz,26,13),iz = 1,20) / &
     & 0.3993200E+00, 0.3993200E+00, 0.4029900E+00, 0.4124900E+00, &
     & 0.4176800E+00, 0.4228100E+00, 0.4245100E+00, 0.4229200E+00, &
     & 0.4152800E+00, 0.4271600E+00, 0.4336000E+00, 0.4359200E+00, &
     & 0.4362000E+00, 0.4477800E+00, 0.4498300E+00, 0.4404700E+00, &
     & 0.4467200E+00, 0.4456900E+00, 0.3836862E+00, 0.3836862E+00 /
      data (ref_adm(30,iz,27,13),iz = 1,20) / &
     & 0.4009500E+00, 0.4009500E+00, 0.4087500E+00, 0.4305200E+00, &
     & 0.4333500E+00, 0.4245800E+00, 0.4176500E+00, 0.4173000E+00, &
     & 0.4340000E+00, 0.4407700E+00, 0.4660900E+00, 0.4908900E+00, &
     & 0.4951900E+00, 0.5015900E+00, 0.4836400E+00, 0.4512200E+00, &
     & 0.4213700E+00, 0.4221000E+00, 0.3145500E+00, 0.3145500E+00 /
      data (ref_adm(30,iz,28,13),iz = 1,20) / &
     & 0.3926100E+00, 0.3926100E+00, 0.3967300E+00, 0.4201600E+00, &
     & 0.4327500E+00, 0.4247700E+00, 0.4208000E+00, 0.4157700E+00, &
     & 0.4186700E+00, 0.4434500E+00, 0.4581200E+00, 0.4601800E+00, &
     & 0.4551600E+00, 0.4589000E+00, 0.4663700E+00, 0.4572800E+00, &
     & 0.4416500E+00, 0.4287300E+00, 0.3578300E+00, 0.3578300E+00 /
      data (ref_adm(30,iz,29,13),iz = 1,20) / &
     & 0.4024100E+00, 0.4024100E+00, 0.3901600E+00, 0.4026200E+00, &
     & 0.4203400E+00, 0.4299800E+00, 0.4426900E+00, 0.4356300E+00, &
     & 0.4403300E+00, 0.4532300E+00, 0.4563200E+00, 0.4613200E+00, &
     & 0.4613900E+00, 0.4611300E+00, 0.4730400E+00, 0.4474300E+00, &
     & 0.4418300E+00, 0.4339800E+00, 0.3704000E+00, 0.3704000E+00 /
      data (ref_adm(30,iz,30,13),iz = 1,20) / &
     & 0.3961000E+00, 0.3961000E+00, 0.3916700E+00, 0.4008900E+00, &
     & 0.4120200E+00, 0.4260000E+00, 0.4384100E+00, 0.4281000E+00, &
     & 0.4323200E+00, 0.4608600E+00, 0.4563300E+00, 0.4721700E+00, &
     & 0.4696100E+00, 0.4722900E+00, 0.4556300E+00, 0.4567700E+00, &
     & 0.4588200E+00, 0.4349700E+00, 0.3850100E+00, 0.3850100E+00 /
      data (ref_adm(30,iz,31,13),iz = 1,20) / &
     & 0.3963300E+00, 0.3963300E+00, 0.4129600E+00, 0.4179400E+00, &
     & 0.4278000E+00, 0.4308900E+00, 0.4442500E+00, 0.4565000E+00, &
     & 0.4633700E+00, 0.4741800E+00, 0.4819800E+00, 0.4898900E+00, &
     & 0.5059900E+00, 0.5107900E+00, 0.4975000E+00, 0.5024400E+00, &
     & 0.5082800E+00, 0.5038100E+00, 0.4049800E+00, 0.4049800E+00 /
      data (ref_adm(30,iz,32,13),iz = 1,20) / &
     & 0.4086300E+00, 0.4086300E+00, 0.4037000E+00, 0.4055900E+00, &
     & 0.4169200E+00, 0.4242600E+00, 0.4261400E+00, 0.4373900E+00, &
     & 0.4522300E+00, 0.4605700E+00, 0.4732400E+00, 0.4823400E+00, &
     & 0.4925300E+00, 0.4875600E+00, 0.4867200E+00, 0.4730400E+00, &
     & 0.4723100E+00, 0.4715600E+00, 0.3957000E+00, 0.3957000E+00 /
      data (ref_adm(30,iz,33,13),iz = 1,20) / &
     & 0.4097700E+00, 0.4097700E+00, 0.4109200E+00, 0.4054000E+00, &
     & 0.4063600E+00, 0.4201600E+00, 0.4235600E+00, 0.4286600E+00, &
     & 0.4586700E+00, 0.4628100E+00, 0.4865300E+00, 0.4788000E+00, &
     & 0.4937100E+00, 0.5163000E+00, 0.5281400E+00, 0.5259500E+00, &
     & 0.5047500E+00, 0.5000900E+00, 0.4116900E+00, 0.4116900E+00 /
      data (ref_adm(30,iz,34,13),iz = 1,20) / &
     & 0.3971500E+00, 0.3971500E+00, 0.4152600E+00, 0.4083100E+00, &
     & 0.4126700E+00, 0.4239600E+00, 0.4439800E+00, 0.4607000E+00, &
     & 0.4725700E+00, 0.4761600E+00, 0.4870000E+00, 0.5036800E+00, &
     & 0.5216800E+00, 0.5130600E+00, 0.5367900E+00, 0.5042300E+00, &
     & 0.5111400E+00, 0.4853500E+00, 0.4161300E+00, 0.4161300E+00 /
      data (ref_adm(30,iz,35,13),iz = 1,20) / &
     & 0.3958700E+00, 0.3958700E+00, 0.4035000E+00, 0.4160600E+00, &
     & 0.4171100E+00, 0.4220000E+00, 0.4456400E+00, 0.4523100E+00, &
     & 0.4686800E+00, 0.4756300E+00, 0.4719300E+00, 0.4994300E+00, &
     & 0.5173900E+00, 0.5174300E+00, 0.5251200E+00, 0.5257800E+00, &
     & 0.5396000E+00, 0.5325700E+00, 0.4230600E+00, 0.4230600E+00 /
      data (ref_adm(30,iz,36,13),iz = 1,20) / &
     & 0.4080200E+00, 0.4080200E+00, 0.4230900E+00, 0.4254100E+00, &
     & 0.4241000E+00, 0.4436100E+00, 0.4424700E+00, 0.4464100E+00, &
     & 0.4611800E+00, 0.4792100E+00, 0.4941600E+00, 0.4990600E+00, &
     & 0.5296600E+00, 0.5278000E+00, 0.5258300E+00, 0.5547600E+00, &
     & 0.5408600E+00, 0.5241500E+00, 0.4032600E+00, 0.4032600E+00 /
      data (ref_adm(30,iz,37,13),iz = 1,20) / &
     & 0.4141700E+00, 0.4141700E+00, 0.4239500E+00, 0.4312500E+00, &
     & 0.4585400E+00, 0.4512100E+00, 0.4578500E+00, 0.4464000E+00, &
     & 0.4600300E+00, 0.4775000E+00, 0.5012400E+00, 0.5116000E+00, &
     & 0.5126800E+00, 0.5558400E+00, 0.5694800E+00, 0.5611900E+00, &
     & 0.5481800E+00, 0.4877700E+00, 0.4784502E+00, 0.4784502E+00 /
      data (ref_adm(30,iz,38,13),iz = 1,20) / &
     & 0.4141700E+00, 0.4141700E+00, 0.4239500E+00, 0.4312500E+00, &
     & 0.4585400E+00, 0.4512100E+00, 0.4578500E+00, 0.4464000E+00, &
     & 0.4600300E+00, 0.4775000E+00, 0.5012400E+00, 0.5116000E+00, &
     & 0.5126800E+00, 0.5558400E+00, 0.5694800E+00, 0.5611900E+00, &
     & 0.5481800E+00, 0.4877700E+00, 0.4784502E+00, 0.4784502E+00 /
! Solar Zenith Angle 65.0 Albedo  0.4552435E+00
      data (ref_adm(30,iz, 1,14),iz = 1,20) / &
     & 0.3929000E+00, 0.3929000E+00, 0.3906400E+00, 0.3971200E+00, &
     & 0.4060700E+00, 0.4103700E+00, 0.4064300E+00, 0.4065400E+00, &
     & 0.4107300E+00, 0.4210600E+00, 0.4488100E+00, 0.4736900E+00, &
     & 0.5061800E+00, 0.5775400E+00, 0.6360700E+00, 0.6897500E+00, &
     & 0.7536100E+00, 0.7418600E+00, 0.7082299E+00, 0.7082299E+00 /
      data (ref_adm(30,iz, 2,14),iz = 1,20) / &
     & 0.3929000E+00, 0.3929000E+00, 0.3906400E+00, 0.3971200E+00, &
     & 0.4060700E+00, 0.4103700E+00, 0.4064300E+00, 0.4065400E+00, &
     & 0.4107300E+00, 0.4210600E+00, 0.4488100E+00, 0.4736900E+00, &
     & 0.5061800E+00, 0.5775400E+00, 0.6360700E+00, 0.6897500E+00, &
     & 0.7536100E+00, 0.7418600E+00, 0.7082299E+00, 0.7082299E+00 /
      data (ref_adm(30,iz, 3,14),iz = 1,20) / &
     & 0.4009900E+00, 0.4009900E+00, 0.3989100E+00, 0.3974200E+00, &
     & 0.3984500E+00, 0.4032600E+00, 0.4081300E+00, 0.4145300E+00, &
     & 0.4212400E+00, 0.4386900E+00, 0.4572200E+00, 0.4498200E+00, &
     & 0.5034800E+00, 0.5409100E+00, 0.5760700E+00, 0.6529700E+00, &
     & 0.7303600E+00, 0.7447800E+00, 0.2000325E+00, 0.2000325E+00 /
      data (ref_adm(30,iz, 4,14),iz = 1,20) / &
     & 0.4049600E+00, 0.4049600E+00, 0.3940300E+00, 0.3961700E+00, &
     & 0.3975000E+00, 0.4018300E+00, 0.4035300E+00, 0.4121200E+00, &
     & 0.4245600E+00, 0.4373100E+00, 0.4485500E+00, 0.4574500E+00, &
     & 0.4882600E+00, 0.5240300E+00, 0.5588900E+00, 0.6135300E+00, &
     & 0.6943700E+00, 0.7367300E+00, 0.6747259E+00, 0.6747259E+00 /
      data (ref_adm(30,iz, 5,14),iz = 1,20) / &
     & 0.4153400E+00, 0.4153400E+00, 0.4035200E+00, 0.3993700E+00, &
     & 0.3983100E+00, 0.3968800E+00, 0.4078800E+00, 0.4251000E+00, &
     & 0.4378800E+00, 0.4437400E+00, 0.4683500E+00, 0.4644400E+00, &
     & 0.4940300E+00, 0.5171400E+00, 0.5544000E+00, 0.6030300E+00, &
     & 0.6633200E+00, 0.6924500E+00, 0.6507182E+00, 0.6507182E+00 /
      data (ref_adm(30,iz, 6,14),iz = 1,20) / &
     & 0.3901800E+00, 0.3901800E+00, 0.3917800E+00, 0.3906100E+00, &
     & 0.3978500E+00, 0.3974700E+00, 0.3948900E+00, 0.4095400E+00, &
     & 0.4359900E+00, 0.4508800E+00, 0.4650300E+00, 0.4843800E+00, &
     & 0.4945600E+00, 0.5174200E+00, 0.5415000E+00, 0.6002700E+00, &
     & 0.6354900E+00, 0.6760100E+00, 0.6098300E+00, 0.6098300E+00 /
      data (ref_adm(30,iz, 7,14),iz = 1,20) / &
     & 0.4035200E+00, 0.4035200E+00, 0.4043500E+00, 0.4062600E+00, &
     & 0.4037700E+00, 0.4083600E+00, 0.4108100E+00, 0.4207100E+00, &
     & 0.4374000E+00, 0.4525500E+00, 0.4586300E+00, 0.4678000E+00, &
     & 0.4893500E+00, 0.5194800E+00, 0.5506700E+00, 0.5833200E+00, &
     & 0.6366600E+00, 0.6659100E+00, 0.6270700E+00, 0.6270700E+00 /
      data (ref_adm(30,iz, 8,14),iz = 1,20) / &
     & 0.3950700E+00, 0.3950700E+00, 0.3917900E+00, 0.3839800E+00, &
     & 0.3942500E+00, 0.3971600E+00, 0.4149300E+00, 0.4250900E+00, &
     & 0.4445500E+00, 0.4624400E+00, 0.4600800E+00, 0.4729800E+00, &
     & 0.4804800E+00, 0.5308200E+00, 0.5312600E+00, 0.5445500E+00, &
     & 0.5885400E+00, 0.6328100E+00, 0.7094400E+00, 0.7094400E+00 /
      data (ref_adm(30,iz, 9,14),iz = 1,20) / &
     & 0.3920300E+00, 0.3920300E+00, 0.3959600E+00, 0.3913700E+00, &
     & 0.3886900E+00, 0.3928800E+00, 0.3994300E+00, 0.4099900E+00, &
     & 0.4338100E+00, 0.4383000E+00, 0.4564000E+00, 0.4534100E+00, &
     & 0.4765800E+00, 0.5042800E+00, 0.5186800E+00, 0.5588900E+00, &
     & 0.5711900E+00, 0.5818500E+00, 0.6384800E+00, 0.6384800E+00 /
      data (ref_adm(30,iz,10,14),iz = 1,20) / &
     & 0.3898900E+00, 0.3898900E+00, 0.3931000E+00, 0.4006900E+00, &
     & 0.3968600E+00, 0.3899600E+00, 0.4055500E+00, 0.4067000E+00, &
     & 0.4261400E+00, 0.4294500E+00, 0.4425600E+00, 0.4650400E+00, &
     & 0.4669600E+00, 0.4943900E+00, 0.5145900E+00, 0.5381500E+00, &
     & 0.5720400E+00, 0.5588700E+00, 0.5678400E+00, 0.5678400E+00 /
      data (ref_adm(30,iz,11,14),iz = 1,20) / &
     & 0.3977800E+00, 0.3977800E+00, 0.3941600E+00, 0.4011600E+00, &
     & 0.3944000E+00, 0.3949000E+00, 0.4124600E+00, 0.4133300E+00, &
     & 0.4262000E+00, 0.4345000E+00, 0.4474100E+00, 0.4586600E+00, &
     & 0.4626300E+00, 0.4897200E+00, 0.5082300E+00, 0.5236500E+00, &
     & 0.5592900E+00, 0.5312800E+00, 0.5562400E+00, 0.5562400E+00 /
      data (ref_adm(30,iz,12,14),iz = 1,20) / &
     & 0.3867700E+00, 0.3867700E+00, 0.3938100E+00, 0.3811300E+00, &
     & 0.3942600E+00, 0.4049100E+00, 0.3943100E+00, 0.4064900E+00, &
     & 0.4194700E+00, 0.4243700E+00, 0.4342100E+00, 0.4455500E+00, &
     & 0.4455600E+00, 0.4971300E+00, 0.5170600E+00, 0.5390300E+00, &
     & 0.5454800E+00, 0.5242400E+00, 0.4978300E+00, 0.4978300E+00 /
      data (ref_adm(30,iz,13,14),iz = 1,20) / &
     & 0.4047900E+00, 0.4047900E+00, 0.4020500E+00, 0.3934200E+00, &
     & 0.3959300E+00, 0.4040100E+00, 0.4036400E+00, 0.4103700E+00, &
     & 0.4320800E+00, 0.4101300E+00, 0.4271900E+00, 0.4288200E+00, &
     & 0.4488900E+00, 0.4641800E+00, 0.4857200E+00, 0.5259200E+00, &
     & 0.5329000E+00, 0.5109600E+00, 0.4276300E+00, 0.4276300E+00 /
      data (ref_adm(30,iz,14,14),iz = 1,20) / &
     & 0.3811700E+00, 0.3811700E+00, 0.3931800E+00, 0.3959000E+00, &
     & 0.3914200E+00, 0.3970200E+00, 0.3943300E+00, 0.3922000E+00, &
     & 0.3935200E+00, 0.3971100E+00, 0.4011800E+00, 0.4076400E+00, &
     & 0.4126600E+00, 0.4105900E+00, 0.4759100E+00, 0.5163100E+00, &
     & 0.5243700E+00, 0.5173700E+00, 0.4817751E+00, 0.4817751E+00 /
      data (ref_adm(30,iz,15,14),iz = 1,20) / &
     & 0.4212700E+00, 0.4212700E+00, 0.4195200E+00, 0.4154300E+00, &
     & 0.4136500E+00, 0.4214500E+00, 0.4318300E+00, 0.4450300E+00, &
     & 0.4495100E+00, 0.4611900E+00, 0.4632600E+00, 0.4554400E+00, &
     & 0.4542500E+00, 0.4538000E+00, 0.4811800E+00, 0.4939600E+00, &
     & 0.4855100E+00, 0.5273500E+00, 0.4713896E+00, 0.4713896E+00 /
      data (ref_adm(30,iz,16,14),iz = 1,20) / &
     & 0.3774100E+00, 0.3774100E+00, 0.3412000E+00, 0.3543300E+00, &
     & 0.3580700E+00, 0.3627600E+00, 0.3464700E+00, 0.3496900E+00, &
     & 0.3599300E+00, 0.3711800E+00, 0.3881700E+00, 0.3933600E+00, &
     & 0.4121100E+00, 0.4165100E+00, 0.4944300E+00, 0.5012000E+00, &
     & 0.4683000E+00, 0.5244151E+00, 0.4585579E+00, 0.4585579E+00 /
      data (ref_adm(30,iz,17,14),iz = 1,20) / &
     & 0.3951500E+00, 0.3951500E+00, 0.4021900E+00, 0.4106400E+00, &
     & 0.4063000E+00, 0.4059500E+00, 0.4121200E+00, 0.4245700E+00, &
     & 0.4167000E+00, 0.4274400E+00, 0.4285000E+00, 0.4170000E+00, &
     & 0.4314700E+00, 0.4484600E+00, 0.4863500E+00, 0.4782100E+00, &
     & 0.4564200E+00, 0.5097539E+00, 0.4467216E+00, 0.4467216E+00 /
      data (ref_adm(30,iz,18,14),iz = 1,20) / &
     & 0.3948000E+00, 0.3948000E+00, 0.4002900E+00, 0.4115200E+00, &
     & 0.4083100E+00, 0.4163900E+00, 0.4146800E+00, 0.4165300E+00, &
     & 0.4183100E+00, 0.4185600E+00, 0.4310900E+00, 0.4313500E+00, &
     & 0.4457200E+00, 0.4484300E+00, 0.4635200E+00, 0.4511400E+00, &
     & 0.5263000E+00, 0.5037432E+00, 0.4925856E+00, 0.4925856E+00 /
      data (ref_adm(30,iz,19,14),iz = 1,20) / &
     & 0.3904700E+00, 0.3904700E+00, 0.4019700E+00, 0.4069000E+00, &
     & 0.4106700E+00, 0.4237200E+00, 0.4250700E+00, 0.4278700E+00, &
     & 0.4273600E+00, 0.4201700E+00, 0.4329900E+00, 0.4375000E+00, &
     & 0.4477700E+00, 0.4597100E+00, 0.4641500E+00, 0.4646200E+00, &
     & 0.4817890E+00, 0.4968633E+00, 0.4837666E+00, 0.4837666E+00 /
      data (ref_adm(30,iz,20,14),iz = 1,20) / &
     & 0.3993700E+00, 0.3993700E+00, 0.3956500E+00, 0.4088000E+00, &
     & 0.4276300E+00, 0.4147600E+00, 0.4107300E+00, 0.4224200E+00, &
     & 0.4163900E+00, 0.4250300E+00, 0.4319900E+00, 0.4423400E+00, &
     & 0.4415200E+00, 0.4524600E+00, 0.4476200E+00, 0.4974500E+00, &
     & 0.4792348E+00, 0.4926639E+00, 0.4790790E+00, 0.4790790E+00 /
      data (ref_adm(30,iz,21,14),iz = 1,20) / &
     & 0.4047900E+00, 0.4047900E+00, 0.3893900E+00, 0.4034300E+00, &
     & 0.4132100E+00, 0.4231000E+00, 0.4098300E+00, 0.4068900E+00, &
     & 0.4255900E+00, 0.4376100E+00, 0.4486500E+00, 0.4501500E+00, &
     & 0.4516600E+00, 0.4599500E+00, 0.4530800E+00, 0.4745900E+00, &
     & 0.4772780E+00, 0.4892922E+00, 0.4765888E+00, 0.4765888E+00 /
      data (ref_adm(30,iz,22,14),iz = 1,20) / &
     & 0.4038800E+00, 0.4038800E+00, 0.4052900E+00, 0.4055300E+00, &
     & 0.4163300E+00, 0.4167700E+00, 0.4145700E+00, 0.4352200E+00, &
     & 0.4264800E+00, 0.4484800E+00, 0.4473100E+00, 0.4519000E+00, &
     & 0.4530700E+00, 0.4672000E+00, 0.4560500E+00, 0.4358000E+00, &
     & 0.4505257E+00, 0.4321689E+00, 0.4009942E+00, 0.4009942E+00 /
      data (ref_adm(30,iz,23,14),iz = 1,20) / &
     & 0.3982700E+00, 0.3982700E+00, 0.4029400E+00, 0.4176200E+00, &
     & 0.4205600E+00, 0.4117300E+00, 0.4204300E+00, 0.4208900E+00, &
     & 0.4224400E+00, 0.4392900E+00, 0.4475800E+00, 0.4499800E+00, &
     & 0.4645600E+00, 0.4723500E+00, 0.4748900E+00, 0.4812200E+00, &
     & 0.4959100E+00, 0.4316481E+00, 0.4046013E+00, 0.4046013E+00 /
      data (ref_adm(30,iz,24,14),iz = 1,20) / &
     & 0.3661400E+00, 0.3661400E+00, 0.3645200E+00, 0.3734200E+00, &
     & 0.3785000E+00, 0.3872900E+00, 0.3904000E+00, 0.4018000E+00, &
     & 0.4088700E+00, 0.4164600E+00, 0.4241200E+00, 0.4248800E+00, &
     & 0.4543500E+00, 0.4731000E+00, 0.4711600E+00, 0.4795600E+00, &
     & 0.4684800E+00, 0.4340370E+00, 0.4104950E+00, 0.4104950E+00 /
      data (ref_adm(30,iz,25,14),iz = 1,20) / &
     & 0.4252200E+00, 0.4252200E+00, 0.4341300E+00, 0.4331300E+00, &
     & 0.4357800E+00, 0.4414400E+00, 0.4474700E+00, 0.4577200E+00, &
     & 0.4729900E+00, 0.4813400E+00, 0.4903000E+00, 0.4952600E+00, &
     & 0.4968600E+00, 0.4955800E+00, 0.4697900E+00, 0.4509500E+00, &
     & 0.4832800E+00, 0.5068600E+00, 0.4182455E+00, 0.4182455E+00 /
      data (ref_adm(30,iz,26,14),iz = 1,20) / &
     & 0.3940500E+00, 0.3940500E+00, 0.3859700E+00, 0.3953800E+00, &
     & 0.4037200E+00, 0.4126400E+00, 0.4197900E+00, 0.4234200E+00, &
     & 0.4192500E+00, 0.4293900E+00, 0.4437500E+00, 0.4551400E+00, &
     & 0.4706300E+00, 0.4843400E+00, 0.4870300E+00, 0.4615700E+00, &
     & 0.4431400E+00, 0.4447500E+00, 0.4283506E+00, 0.4283506E+00 /
      data (ref_adm(30,iz,27,14),iz = 1,20) / &
     & 0.3938900E+00, 0.3938900E+00, 0.3934000E+00, 0.4031900E+00, &
     & 0.4010600E+00, 0.4220700E+00, 0.4374500E+00, 0.4372200E+00, &
     & 0.4382800E+00, 0.4449300E+00, 0.4518600E+00, 0.4694800E+00, &
     & 0.4790200E+00, 0.5085700E+00, 0.4961600E+00, 0.4674900E+00, &
     & 0.4832500E+00, 0.5036300E+00, 0.4467800E+00, 0.4467800E+00 /
      data (ref_adm(30,iz,28,14),iz = 1,20) / &
     & 0.3839400E+00, 0.3839400E+00, 0.3975100E+00, 0.4055000E+00, &
     & 0.4086000E+00, 0.4197200E+00, 0.4334700E+00, 0.4271600E+00, &
     & 0.4386300E+00, 0.4443600E+00, 0.4556700E+00, 0.4610400E+00, &
     & 0.4752700E+00, 0.4766200E+00, 0.4690100E+00, 0.4773100E+00, &
     & 0.4966700E+00, 0.4860900E+00, 0.4295600E+00, 0.4295600E+00 /
      data (ref_adm(30,iz,29,14),iz = 1,20) / &
     & 0.3876800E+00, 0.3876800E+00, 0.3909700E+00, 0.4089100E+00, &
     & 0.4212400E+00, 0.4085800E+00, 0.4198900E+00, 0.4315900E+00, &
     & 0.4390300E+00, 0.4586800E+00, 0.4653700E+00, 0.4719400E+00, &
     & 0.4757500E+00, 0.4699000E+00, 0.4844900E+00, 0.5085700E+00, &
     & 0.4999900E+00, 0.4877900E+00, 0.4131400E+00, 0.4131400E+00 /
      data (ref_adm(30,iz,30,14),iz = 1,20) / &
     & 0.3980700E+00, 0.3980700E+00, 0.4050200E+00, 0.4014200E+00, &
     & 0.4123600E+00, 0.4221800E+00, 0.4209700E+00, 0.4249500E+00, &
     & 0.4414200E+00, 0.4596600E+00, 0.4603400E+00, 0.4757500E+00, &
     & 0.4894700E+00, 0.4895400E+00, 0.4949700E+00, 0.5094200E+00, &
     & 0.5284500E+00, 0.4991000E+00, 0.4304600E+00, 0.4304600E+00 /
      data (ref_adm(30,iz,31,14),iz = 1,20) / &
     & 0.4055900E+00, 0.4055900E+00, 0.4086200E+00, 0.4049200E+00, &
     & 0.4108000E+00, 0.4160800E+00, 0.4269400E+00, 0.4333700E+00, &
     & 0.4360600E+00, 0.4550100E+00, 0.4700800E+00, 0.4894900E+00, &
     & 0.4958100E+00, 0.4802900E+00, 0.5078300E+00, 0.5087100E+00, &
     & 0.5322800E+00, 0.5240600E+00, 0.4216100E+00, 0.4216100E+00 /
      data (ref_adm(30,iz,32,14),iz = 1,20) / &
     & 0.4012900E+00, 0.4012900E+00, 0.4077900E+00, 0.4164300E+00, &
     & 0.4248300E+00, 0.4235300E+00, 0.4308300E+00, 0.4343000E+00, &
     & 0.4467700E+00, 0.4588800E+00, 0.4666300E+00, 0.4834100E+00, &
     & 0.4962400E+00, 0.5122200E+00, 0.5363900E+00, 0.5435100E+00, &
     & 0.5549000E+00, 0.5357300E+00, 0.4462600E+00, 0.4462600E+00 /
      data (ref_adm(30,iz,33,14),iz = 1,20) / &
     & 0.4098700E+00, 0.4098700E+00, 0.4048400E+00, 0.4101000E+00, &
     & 0.4185000E+00, 0.4174600E+00, 0.4239200E+00, 0.4279300E+00, &
     & 0.4465000E+00, 0.4524000E+00, 0.4631500E+00, 0.4799800E+00, &
     & 0.4942700E+00, 0.5097100E+00, 0.5346600E+00, 0.5521600E+00, &
     & 0.5838500E+00, 0.5535400E+00, 0.4714800E+00, 0.4714800E+00 /
      data (ref_adm(30,iz,34,14),iz = 1,20) / &
     & 0.3888700E+00, 0.3888700E+00, 0.4032600E+00, 0.4112300E+00, &
     & 0.4204900E+00, 0.4323700E+00, 0.4415100E+00, 0.4507900E+00, &
     & 0.4608000E+00, 0.4681100E+00, 0.4870400E+00, 0.4978500E+00, &
     & 0.5176800E+00, 0.5413900E+00, 0.5627500E+00, 0.5699300E+00, &
     & 0.5844000E+00, 0.5685000E+00, 0.4827300E+00, 0.4827300E+00 /
      data (ref_adm(30,iz,35,14),iz = 1,20) / &
     & 0.3973800E+00, 0.3973800E+00, 0.4098700E+00, 0.4069700E+00, &
     & 0.4108500E+00, 0.4321600E+00, 0.4412300E+00, 0.4474200E+00, &
     & 0.4532700E+00, 0.4696600E+00, 0.4942500E+00, 0.5036100E+00, &
     & 0.5194300E+00, 0.5496200E+00, 0.5727900E+00, 0.5865000E+00, &
     & 0.6158400E+00, 0.5896700E+00, 0.4682900E+00, 0.4682900E+00 /
      data (ref_adm(30,iz,36,14),iz = 1,20) / &
     & 0.4033400E+00, 0.4033400E+00, 0.4040000E+00, 0.3965100E+00, &
     & 0.4095100E+00, 0.4205900E+00, 0.4419400E+00, 0.4455400E+00, &
     & 0.4563000E+00, 0.4696600E+00, 0.4813600E+00, 0.5013400E+00, &
     & 0.5301200E+00, 0.5530100E+00, 0.5905100E+00, 0.6093800E+00, &
     & 0.6175800E+00, 0.5732400E+00, 0.4744000E+00, 0.4744000E+00 /
      data (ref_adm(30,iz,37,14),iz = 1,20) / &
     & 0.3973100E+00, 0.3973100E+00, 0.3976000E+00, 0.4005100E+00, &
     & 0.4058300E+00, 0.4200700E+00, 0.4242500E+00, 0.4398500E+00, &
     & 0.4644400E+00, 0.4800500E+00, 0.4831300E+00, 0.4976300E+00, &
     & 0.5343500E+00, 0.5751400E+00, 0.6166200E+00, 0.6237300E+00, &
     & 0.6072800E+00, 0.5888200E+00, 0.4892600E+00, 0.4892600E+00 /
      data (ref_adm(30,iz,38,14),iz = 1,20) / &
     & 0.3973100E+00, 0.3973100E+00, 0.3976000E+00, 0.4005100E+00, &
     & 0.4058300E+00, 0.4200700E+00, 0.4242500E+00, 0.4398500E+00, &
     & 0.4644400E+00, 0.4800500E+00, 0.4831300E+00, 0.4976300E+00, &
     & 0.5343500E+00, 0.5751400E+00, 0.6166200E+00, 0.6237300E+00, &
     & 0.6072800E+00, 0.5888200E+00, 0.4892600E+00, 0.4892600E+00 /
! Solar Zenith Angle 70.0 Albedo  0.4475903E+00
      data (ref_adm(30,iz, 1,15),iz = 1,20) / &
     & 0.3779800E+00, 0.3779800E+00, 0.3825100E+00, 0.3864000E+00, &
     & 0.3868100E+00, 0.3931900E+00, 0.4024600E+00, 0.4072300E+00, &
     & 0.4074200E+00, 0.4222900E+00, 0.4523900E+00, 0.4850700E+00, &
     & 0.5243800E+00, 0.5953200E+00, 0.6436500E+00, 0.7114600E+00, &
     & 0.7448093E+00, 0.8240871E+00, 0.8193250E+00, 0.8193250E+00 /
      data (ref_adm(30,iz, 2,15),iz = 1,20) / &
     & 0.3779800E+00, 0.3779800E+00, 0.3825100E+00, 0.3864000E+00, &
     & 0.3868100E+00, 0.3931900E+00, 0.4024600E+00, 0.4072300E+00, &
     & 0.4074200E+00, 0.4222900E+00, 0.4523900E+00, 0.4850700E+00, &
     & 0.5243800E+00, 0.5953200E+00, 0.6436500E+00, 0.7114600E+00, &
     & 0.7448093E+00, 0.8240871E+00, 0.8193250E+00, 0.8193250E+00 /
      data (ref_adm(30,iz, 3,15),iz = 1,20) / &
     & 0.3847100E+00, 0.3847100E+00, 0.3765600E+00, 0.3805100E+00, &
     & 0.3818700E+00, 0.3842700E+00, 0.4011500E+00, 0.3965800E+00, &
     & 0.4122000E+00, 0.4211200E+00, 0.4463300E+00, 0.4784800E+00, &
     & 0.5246900E+00, 0.5677000E+00, 0.6516700E+00, 0.6899300E+00, &
     & 0.6729800E+00, 0.8112072E+00, 0.2106788E+00, 0.2106788E+00 /
      data (ref_adm(30,iz, 4,15),iz = 1,20) / &
     & 0.3797300E+00, 0.3797300E+00, 0.3823400E+00, 0.3697400E+00, &
     & 0.3807200E+00, 0.3809700E+00, 0.3912600E+00, 0.3957900E+00, &
     & 0.4110900E+00, 0.4311800E+00, 0.4554000E+00, 0.4865800E+00, &
     & 0.5217500E+00, 0.5494900E+00, 0.5841600E+00, 0.6646800E+00, &
     & 0.8091900E+00, 0.7885938E+00, 0.7572956E+00, 0.7572956E+00 /
      data (ref_adm(30,iz, 5,15),iz = 1,20) / &
     & 0.3850500E+00, 0.3850500E+00, 0.3770100E+00, 0.3807400E+00, &
     & 0.3765900E+00, 0.3799000E+00, 0.3862900E+00, 0.3935900E+00, &
     & 0.4083500E+00, 0.4296900E+00, 0.4555500E+00, 0.4844100E+00, &
     & 0.4999700E+00, 0.5591900E+00, 0.5854800E+00, 0.6424700E+00, &
     & 0.5666100E+00, 0.7654787E+00, 0.7108610E+00, 0.7108610E+00 /
      data (ref_adm(30,iz, 6,15),iz = 1,20) / &
     & 0.3588800E+00, 0.3588800E+00, 0.3618100E+00, 0.3623700E+00, &
     & 0.3649300E+00, 0.3709700E+00, 0.3785500E+00, 0.3851800E+00, &
     & 0.3968300E+00, 0.4158500E+00, 0.4313500E+00, 0.4465800E+00, &
     & 0.4810400E+00, 0.5175300E+00, 0.5681400E+00, 0.6381700E+00, &
     & 0.7210600E+00, 0.7895800E+00, 0.6312500E+00, 0.6312500E+00 /
      data (ref_adm(30,iz, 7,15),iz = 1,20) / &
     & 0.3858200E+00, 0.3858200E+00, 0.3835000E+00, 0.3814900E+00, &
     & 0.3951000E+00, 0.4036300E+00, 0.4101300E+00, 0.4134100E+00, &
     & 0.4243800E+00, 0.4373100E+00, 0.4592400E+00, 0.4793600E+00, &
     & 0.5124100E+00, 0.5438100E+00, 0.5897100E+00, 0.6582700E+00, &
     & 0.7211400E+00, 0.7443800E+00, 0.7783600E+00, 0.7783600E+00 /
      data (ref_adm(30,iz, 8,15),iz = 1,20) / &
     & 0.3719700E+00, 0.3719700E+00, 0.3663000E+00, 0.3714200E+00, &
     & 0.3743400E+00, 0.3771900E+00, 0.3828600E+00, 0.3943800E+00, &
     & 0.4010600E+00, 0.4181000E+00, 0.4418900E+00, 0.4533700E+00, &
     & 0.4814500E+00, 0.5007000E+00, 0.5489300E+00, 0.6215700E+00, &
     & 0.6881600E+00, 0.6911500E+00, 0.8087900E+00, 0.8087900E+00 /
      data (ref_adm(30,iz, 9,15),iz = 1,20) / &
     & 0.3769800E+00, 0.3769800E+00, 0.3743400E+00, 0.3756300E+00, &
     & 0.3733500E+00, 0.3714500E+00, 0.3757400E+00, 0.3952100E+00, &
     & 0.4094300E+00, 0.4154700E+00, 0.4283200E+00, 0.4437400E+00, &
     & 0.4704500E+00, 0.4840000E+00, 0.5213500E+00, 0.6040400E+00, &
     & 0.6642200E+00, 0.6397400E+00, 0.7214400E+00, 0.7214400E+00 /
      data (ref_adm(30,iz,10,15),iz = 1,20) / &
     & 0.3725700E+00, 0.3725700E+00, 0.3789400E+00, 0.3751300E+00, &
     & 0.3739400E+00, 0.3743400E+00, 0.3728300E+00, 0.3860900E+00, &
     & 0.4043900E+00, 0.4219300E+00, 0.4312800E+00, 0.4516900E+00, &
     & 0.4734400E+00, 0.4919600E+00, 0.5214400E+00, 0.5875100E+00, &
     & 0.6276400E+00, 0.6055200E+00, 0.5569407E+00, 0.5569407E+00 /
      data (ref_adm(30,iz,11,15),iz = 1,20) / &
     & 0.3719900E+00, 0.3719900E+00, 0.3675400E+00, 0.3677500E+00, &
     & 0.3653600E+00, 0.3633800E+00, 0.3787000E+00, 0.3890200E+00, &
     & 0.4009700E+00, 0.4025400E+00, 0.4156800E+00, 0.4339500E+00, &
     & 0.4527800E+00, 0.4873600E+00, 0.5140200E+00, 0.5609400E+00, &
     & 0.5768400E+00, 0.5682700E+00, 0.4400900E+00, 0.4400900E+00 /
      data (ref_adm(30,iz,12,15),iz = 1,20) / &
     & 0.3737200E+00, 0.3737200E+00, 0.3744200E+00, 0.3777300E+00, &
     & 0.3775400E+00, 0.3805200E+00, 0.3772500E+00, 0.3891900E+00, &
     & 0.3982400E+00, 0.4141100E+00, 0.4272200E+00, 0.4367900E+00, &
     & 0.4508700E+00, 0.4912300E+00, 0.5013600E+00, 0.5633000E+00, &
     & 0.5669300E+00, 0.5348000E+00, 0.5009400E+00, 0.5009400E+00 /
      data (ref_adm(30,iz,13,15),iz = 1,20) / &
     & 0.3794000E+00, 0.3794000E+00, 0.3800100E+00, 0.3778900E+00, &
     & 0.3738400E+00, 0.3811400E+00, 0.3892200E+00, 0.3967600E+00, &
     & 0.4001300E+00, 0.4153300E+00, 0.4185500E+00, 0.4433800E+00, &
     & 0.4503700E+00, 0.4704600E+00, 0.4916700E+00, 0.5266300E+00, &
     & 0.5628300E+00, 0.5534800E+00, 0.4812100E+00, 0.4812100E+00 /
      data (ref_adm(30,iz,14,15),iz = 1,20) / &
     & 0.3680600E+00, 0.3680600E+00, 0.3732300E+00, 0.3760100E+00, &
     & 0.3732000E+00, 0.3694000E+00, 0.3712200E+00, 0.3733000E+00, &
     & 0.3728800E+00, 0.3725900E+00, 0.3728000E+00, 0.3874100E+00, &
     & 0.3979000E+00, 0.3996500E+00, 0.4851700E+00, 0.5261500E+00, &
     & 0.5626100E+00, 0.5494700E+00, 0.5098700E+00, 0.5098700E+00 /
      data (ref_adm(30,iz,15,15),iz = 1,20) / &
     & 0.4013400E+00, 0.4013400E+00, 0.3944000E+00, 0.3830500E+00, &
     & 0.3787600E+00, 0.3821200E+00, 0.3901000E+00, 0.3965900E+00, &
     & 0.4084000E+00, 0.4201600E+00, 0.4286200E+00, 0.4355600E+00, &
     & 0.4440700E+00, 0.4456400E+00, 0.4821100E+00, 0.5072200E+00, &
     & 0.5258200E+00, 0.5435400E+00, 0.4776357E+00, 0.4776357E+00 /
      data (ref_adm(30,iz,16,15),iz = 1,20) / &
     & 0.3479300E+00, 0.3479300E+00, 0.3152700E+00, 0.3196400E+00, &
     & 0.3269200E+00, 0.3385500E+00, 0.3396700E+00, 0.3313800E+00, &
     & 0.3355900E+00, 0.3251700E+00, 0.3303700E+00, 0.3397200E+00, &
     & 0.3474900E+00, 0.3574900E+00, 0.4702400E+00, 0.4913500E+00, &
     & 0.5043000E+00, 0.5231292E+00, 0.4644825E+00, 0.4644825E+00 /
      data (ref_adm(30,iz,17,15),iz = 1,20) / &
     & 0.3653200E+00, 0.3653200E+00, 0.3736100E+00, 0.3627400E+00, &
     & 0.3588700E+00, 0.3664000E+00, 0.3898500E+00, 0.3901200E+00, &
     & 0.3971400E+00, 0.4061100E+00, 0.4133100E+00, 0.4279600E+00, &
     & 0.4444300E+00, 0.4501400E+00, 0.4863000E+00, 0.4967800E+00, &
     & 0.4797400E+00, 0.5086224E+00, 0.4517733E+00, 0.4517733E+00 /
      data (ref_adm(30,iz,18,15),iz = 1,20) / &
     & 0.3673400E+00, 0.3673400E+00, 0.3802800E+00, 0.3807200E+00, &
     & 0.3760800E+00, 0.3897600E+00, 0.3925100E+00, 0.3944100E+00, &
     & 0.3938600E+00, 0.4071400E+00, 0.4135900E+00, 0.4284700E+00, &
     & 0.4361100E+00, 0.4474300E+00, 0.4741000E+00, 0.5192500E+00, &
     & 0.4874819E+00, 0.4919805E+00, 0.4546969E+00, 0.4546969E+00 /
      data (ref_adm(30,iz,19,15),iz = 1,20) / &
     & 0.3497600E+00, 0.3497600E+00, 0.3783800E+00, 0.3863100E+00, &
     & 0.3857200E+00, 0.3855800E+00, 0.3800700E+00, 0.3798900E+00, &
     & 0.3895000E+00, 0.3913800E+00, 0.4105400E+00, 0.4267200E+00, &
     & 0.4287800E+00, 0.4581700E+00, 0.4722800E+00, 0.4647400E+00, &
     & 0.4801063E+00, 0.4831095E+00, 0.4466422E+00, 0.4466422E+00 /
      data (ref_adm(30,iz,20,15),iz = 1,20) / &
     & 0.3794600E+00, 0.3794600E+00, 0.3794400E+00, 0.3884200E+00, &
     & 0.3921000E+00, 0.3958300E+00, 0.4000300E+00, 0.3915900E+00, &
     & 0.3999300E+00, 0.4078300E+00, 0.4287000E+00, 0.4295900E+00, &
     & 0.4368700E+00, 0.4680100E+00, 0.4675200E+00, 0.4345300E+00, &
     & 0.4734917E+00, 0.4765910E+00, 0.4419541E+00, 0.4419541E+00 /
      data (ref_adm(30,iz,21,15),iz = 1,20) / &
     & 0.3810200E+00, 0.3810200E+00, 0.3876300E+00, 0.3806200E+00, &
     & 0.3884700E+00, 0.3907700E+00, 0.3875000E+00, 0.3990900E+00, &
     & 0.4019500E+00, 0.4018400E+00, 0.4299900E+00, 0.4414800E+00, &
     & 0.4463300E+00, 0.4618900E+00, 0.4512100E+00, 0.4085500E+00, &
     & 0.4680974E+00, 0.4706591E+00, 0.4390946E+00, 0.4390946E+00 /
      data (ref_adm(30,iz,22,15),iz = 1,20) / &
     & 0.3751900E+00, 0.3751900E+00, 0.3621100E+00, 0.3749900E+00, &
     & 0.3868000E+00, 0.3970500E+00, 0.3895000E+00, 0.4091400E+00, &
     & 0.4092500E+00, 0.4080800E+00, 0.4323800E+00, 0.4343000E+00, &
     & 0.4431700E+00, 0.4493300E+00, 0.4423000E+00, 0.4263800E+00, &
     & 0.4828241E+00, 0.4762393E+00, 0.4629609E+00, 0.4629609E+00 /
      data (ref_adm(30,iz,23,15),iz = 1,20) / &
     & 0.3707300E+00, 0.3707300E+00, 0.3732900E+00, 0.3782100E+00, &
     & 0.3931900E+00, 0.3999400E+00, 0.4030600E+00, 0.4005100E+00, &
     & 0.4132100E+00, 0.4126500E+00, 0.4284300E+00, 0.4482500E+00, &
     & 0.4451200E+00, 0.4667100E+00, 0.4405600E+00, 0.4314900E+00, &
     & 0.4082000E+00, 0.4755589E+00, 0.4680774E+00, 0.4680774E+00 /
      data (ref_adm(30,iz,24,15),iz = 1,20) / &
     & 0.3339100E+00, 0.3339100E+00, 0.3331900E+00, 0.3459400E+00, &
     & 0.3519200E+00, 0.3604400E+00, 0.3647700E+00, 0.3740600E+00, &
     & 0.3799600E+00, 0.3894000E+00, 0.4061500E+00, 0.4096700E+00, &
     & 0.4159000E+00, 0.4349900E+00, 0.4432900E+00, 0.4616400E+00, &
     & 0.4475800E+00, 0.4787955E+00, 0.4765724E+00, 0.4765724E+00 /
      data (ref_adm(30,iz,25,15),iz = 1,20) / &
     & 0.3969200E+00, 0.3969200E+00, 0.4032100E+00, 0.4030000E+00, &
     & 0.4083200E+00, 0.4176400E+00, 0.4265600E+00, 0.4396700E+00, &
     & 0.4543600E+00, 0.4679700E+00, 0.4864400E+00, 0.5041400E+00, &
     & 0.5207000E+00, 0.5398000E+00, 0.4950800E+00, 0.4865600E+00, &
     & 0.4899800E+00, 0.4503500E+00, 0.4877535E+00, 0.4877535E+00 /
      data (ref_adm(30,iz,26,15),iz = 1,20) / &
     & 0.3748900E+00, 0.3748900E+00, 0.3561700E+00, 0.3704600E+00, &
     & 0.3838000E+00, 0.3822600E+00, 0.3752400E+00, 0.3830000E+00, &
     & 0.3954000E+00, 0.4009300E+00, 0.4157000E+00, 0.4406900E+00, &
     & 0.4611500E+00, 0.4885100E+00, 0.4913600E+00, 0.4879200E+00, &
     & 0.4953800E+00, 0.4873300E+00, 0.5025951E+00, 0.5025951E+00 /
      data (ref_adm(30,iz,27,15),iz = 1,20) / &
     & 0.3736800E+00, 0.3736800E+00, 0.3844900E+00, 0.3868300E+00, &
     & 0.3847700E+00, 0.3863900E+00, 0.3845500E+00, 0.3988500E+00, &
     & 0.4205300E+00, 0.4287200E+00, 0.4461600E+00, 0.4491300E+00, &
     & 0.4734500E+00, 0.4942400E+00, 0.4858500E+00, 0.4805800E+00, &
     & 0.5224800E+00, 0.5214600E+00, 0.4586700E+00, 0.4586700E+00 /
      data (ref_adm(30,iz,28,15),iz = 1,20) / &
     & 0.3713800E+00, 0.3713800E+00, 0.3800200E+00, 0.3849700E+00, &
     & 0.3817400E+00, 0.3908700E+00, 0.4064700E+00, 0.4126400E+00, &
     & 0.4187100E+00, 0.4359100E+00, 0.4484800E+00, 0.4569800E+00, &
     & 0.4790700E+00, 0.5025500E+00, 0.4978800E+00, 0.5059300E+00, &
     & 0.5382800E+00, 0.5127300E+00, 0.4565900E+00, 0.4565900E+00 /
      data (ref_adm(30,iz,29,15),iz = 1,20) / &
     & 0.3723100E+00, 0.3723100E+00, 0.3813200E+00, 0.3858700E+00, &
     & 0.3929200E+00, 0.3992700E+00, 0.4101400E+00, 0.4145000E+00, &
     & 0.4230500E+00, 0.4244800E+00, 0.4487100E+00, 0.4746300E+00, &
     & 0.4798700E+00, 0.5097500E+00, 0.4981800E+00, 0.5341400E+00, &
     & 0.5399500E+00, 0.5453900E+00, 0.4777400E+00, 0.4777400E+00 /
      data (ref_adm(30,iz,30,15),iz = 1,20) / &
     & 0.3699700E+00, 0.3699700E+00, 0.3694300E+00, 0.3878400E+00, &
     & 0.3947500E+00, 0.3971800E+00, 0.4055300E+00, 0.4131200E+00, &
     & 0.4280600E+00, 0.4339700E+00, 0.4515300E+00, 0.4702500E+00, &
     & 0.4873700E+00, 0.5095500E+00, 0.5109200E+00, 0.5368400E+00, &
     & 0.5719100E+00, 0.5748800E+00, 0.4768600E+00, 0.4768600E+00 /
      data (ref_adm(30,iz,31,15),iz = 1,20) / &
     & 0.3751000E+00, 0.3751000E+00, 0.3691000E+00, 0.3805700E+00, &
     & 0.3954100E+00, 0.3860200E+00, 0.4070400E+00, 0.4234200E+00, &
     & 0.4364100E+00, 0.4462800E+00, 0.4529400E+00, 0.4785200E+00, &
     & 0.4963100E+00, 0.5203700E+00, 0.5477600E+00, 0.5565100E+00, &
     & 0.5697500E+00, 0.5953300E+00, 0.5132700E+00, 0.5132700E+00 /
      data (ref_adm(30,iz,32,15),iz = 1,20) / &
     & 0.3808400E+00, 0.3808400E+00, 0.3976000E+00, 0.4007900E+00, &
     & 0.4074800E+00, 0.4170800E+00, 0.4253700E+00, 0.4347400E+00, &
     & 0.4443800E+00, 0.4606000E+00, 0.4802800E+00, 0.4927800E+00, &
     & 0.5115600E+00, 0.5400800E+00, 0.5690100E+00, 0.5879000E+00, &
     & 0.6089000E+00, 0.6133800E+00, 0.5306500E+00, 0.5306500E+00 /
      data (ref_adm(30,iz,33,15),iz = 1,20) / &
     & 0.3770600E+00, 0.3770600E+00, 0.3683600E+00, 0.3798100E+00, &
     & 0.3858600E+00, 0.3846200E+00, 0.3948800E+00, 0.4086900E+00, &
     & 0.4156900E+00, 0.4363200E+00, 0.4574400E+00, 0.4739500E+00, &
     & 0.4973100E+00, 0.5209300E+00, 0.5466100E+00, 0.5802800E+00, &
     & 0.6104800E+00, 0.6404800E+00, 0.5461200E+00, 0.5461200E+00 /
      data (ref_adm(30,iz,34,15),iz = 1,20) / &
     & 0.3710800E+00, 0.3710800E+00, 0.3942600E+00, 0.4011700E+00, &
     & 0.4081200E+00, 0.4103400E+00, 0.4142200E+00, 0.4237200E+00, &
     & 0.4429000E+00, 0.4679400E+00, 0.4803400E+00, 0.5139500E+00, &
     & 0.5170100E+00, 0.5542600E+00, 0.5811500E+00, 0.6244200E+00, &
     & 0.6532400E+00, 0.6648600E+00, 0.5581000E+00, 0.5581000E+00 /
      data (ref_adm(30,iz,35,15),iz = 1,20) / &
     & 0.3842500E+00, 0.3842500E+00, 0.3908300E+00, 0.3928700E+00, &
     & 0.4044300E+00, 0.4122500E+00, 0.4180100E+00, 0.4250800E+00, &
     & 0.4453100E+00, 0.4614900E+00, 0.4795000E+00, 0.5062300E+00, &
     & 0.5211100E+00, 0.5617400E+00, 0.6027600E+00, 0.6258700E+00, &
     & 0.6658400E+00, 0.6854500E+00, 0.5664800E+00, 0.5664800E+00 /
      data (ref_adm(30,iz,36,15),iz = 1,20) / &
     & 0.3823100E+00, 0.3823100E+00, 0.3743700E+00, 0.3816800E+00, &
     & 0.3980400E+00, 0.4005200E+00, 0.4127800E+00, 0.4340100E+00, &
     & 0.4439700E+00, 0.4640700E+00, 0.4827700E+00, 0.4987700E+00, &
     & 0.5309900E+00, 0.5685600E+00, 0.6079500E+00, 0.6443100E+00, &
     & 0.6881900E+00, 0.6982200E+00, 0.5929500E+00, 0.5929500E+00 /
      data (ref_adm(30,iz,37,15),iz = 1,20) / &
     & 0.3689600E+00, 0.3689600E+00, 0.3745200E+00, 0.3864800E+00, &
     & 0.3903800E+00, 0.3924100E+00, 0.4139400E+00, 0.4275100E+00, &
     & 0.4452900E+00, 0.4598200E+00, 0.4839200E+00, 0.5077600E+00, &
     & 0.5489200E+00, 0.5855400E+00, 0.6234300E+00, 0.6754100E+00, &
     & 0.6973300E+00, 0.7106900E+00, 0.6537412E+00, 0.6537412E+00 /
      data (ref_adm(30,iz,38,15),iz = 1,20) / &
     & 0.3689600E+00, 0.3689600E+00, 0.3745200E+00, 0.3864800E+00, &
     & 0.3903800E+00, 0.3924100E+00, 0.4139400E+00, 0.4275100E+00, &
     & 0.4452900E+00, 0.4598200E+00, 0.4839200E+00, 0.5077600E+00, &
     & 0.5489200E+00, 0.5855400E+00, 0.6234300E+00, 0.6754100E+00, &
     & 0.6973300E+00, 0.7106900E+00, 0.6537412E+00, 0.6537412E+00 /
! Solar Zenith Angle 75.0 Albedo  0.4249530E+00
      data (ref_adm(30,iz, 1,16),iz = 1,20) / &
     & 0.3446900E+00, 0.3446900E+00, 0.3435800E+00, 0.3443200E+00, &
     & 0.3386600E+00, 0.3364800E+00, 0.3497500E+00, 0.3699800E+00, &
     & 0.4019500E+00, 0.4201700E+00, 0.4269400E+00, 0.4741200E+00, &
     & 0.4877600E+00, 0.5235500E+00, 0.6064013E+00, 0.6477144E+00, &
     & 0.6743446E+00, 0.6693494E+00, 0.5250346E+00, 0.5250346E+00 /
      data (ref_adm(30,iz, 2,16),iz = 1,20) / &
     & 0.3446900E+00, 0.3446900E+00, 0.3435800E+00, 0.3443200E+00, &
     & 0.3386600E+00, 0.3364800E+00, 0.3497500E+00, 0.3699800E+00, &
     & 0.4019500E+00, 0.4201700E+00, 0.4269400E+00, 0.4741200E+00, &
     & 0.4877600E+00, 0.5235500E+00, 0.6064013E+00, 0.6477144E+00, &
     & 0.6743446E+00, 0.6693494E+00, 0.5250346E+00, 0.5250346E+00 /
      data (ref_adm(30,iz, 3,16),iz = 1,20) / &
     & 0.3502900E+00, 0.3502900E+00, 0.3440000E+00, 0.3431900E+00, &
     & 0.3368000E+00, 0.3481900E+00, 0.3576700E+00, 0.3742600E+00, &
     & 0.3999800E+00, 0.4146900E+00, 0.4253300E+00, 0.4635400E+00, &
     & 0.5053400E+00, 0.5851800E+00, 0.6034068E+00, 0.6436350E+00, &
     & 0.6693647E+00, 0.6633667E+00, 0.1158636E+00, 0.1158636E+00 /
      data (ref_adm(30,iz, 4,16),iz = 1,20) / &
     & 0.3405800E+00, 0.3405800E+00, 0.3363200E+00, 0.3372400E+00, &
     & 0.3405000E+00, 0.3571000E+00, 0.3567000E+00, 0.3747200E+00, &
     & 0.3884100E+00, 0.4099200E+00, 0.4354400E+00, 0.4606600E+00, &
     & 0.4794300E+00, 0.4906400E+00, 0.5970514E+00, 0.6352515E+00, &
     & 0.6587880E+00, 0.6508690E+00, 0.5127206E+00, 0.5127206E+00 /
      data (ref_adm(30,iz, 5,16),iz = 1,20) / &
     & 0.3364800E+00, 0.3364800E+00, 0.3328300E+00, 0.3396700E+00, &
     & 0.3448600E+00, 0.3524400E+00, 0.3636600E+00, 0.3698400E+00, &
     & 0.3836100E+00, 0.3964500E+00, 0.4255600E+00, 0.4659500E+00, &
     & 0.4925600E+00, 0.4769300E+00, 0.5878937E+00, 0.6232754E+00, &
     & 0.6437944E+00, 0.6334316E+00, 0.5011038E+00, 0.5011038E+00 /
      data (ref_adm(30,iz, 6,16),iz = 1,20) / &
     & 0.3376500E+00, 0.3376500E+00, 0.3387100E+00, 0.3420800E+00, &
     & 0.3437300E+00, 0.3514200E+00, 0.3570500E+00, 0.3640900E+00, &
     & 0.3771000E+00, 0.3939200E+00, 0.4132800E+00, 0.4449900E+00, &
     & 0.4671100E+00, 0.5197600E+00, 0.6047700E+00, 0.7008300E+00, &
     & 0.8120300E+00, 0.1047800E+01, 0.4866847E+00, 0.4866847E+00 /
      data (ref_adm(30,iz, 7,16),iz = 1,20) / &
     & 0.3483200E+00, 0.3483200E+00, 0.3522500E+00, 0.3562900E+00, &
     & 0.3553500E+00, 0.3633400E+00, 0.3731700E+00, 0.3730900E+00, &
     & 0.3817400E+00, 0.4024800E+00, 0.4205600E+00, 0.4508700E+00, &
     & 0.4653100E+00, 0.5158700E+00, 0.5775900E+00, 0.6615200E+00, &
     & 0.7686700E+00, 0.9020000E+00, 0.8869400E+00, 0.8869400E+00 /
      data (ref_adm(30,iz, 8,16),iz = 1,20) / &
     & 0.3457500E+00, 0.3457500E+00, 0.3430900E+00, 0.3475200E+00, &
     & 0.3529400E+00, 0.3539000E+00, 0.3559300E+00, 0.3522700E+00, &
     & 0.3727500E+00, 0.3859000E+00, 0.4074200E+00, 0.4388000E+00, &
     & 0.4423000E+00, 0.4859900E+00, 0.5514100E+00, 0.6309100E+00, &
     & 0.7394200E+00, 0.8625900E+00, 0.8570900E+00, 0.8570900E+00 /
      data (ref_adm(30,iz, 9,16),iz = 1,20) / &
     & 0.3435000E+00, 0.3435000E+00, 0.3401900E+00, 0.3454100E+00, &
     & 0.3392900E+00, 0.3488000E+00, 0.3543600E+00, 0.3649400E+00, &
     & 0.3752000E+00, 0.3807600E+00, 0.4047800E+00, 0.4141700E+00, &
     & 0.4286600E+00, 0.4704700E+00, 0.5396900E+00, 0.6322900E+00, &
     & 0.6957000E+00, 0.7668700E+00, 0.7718300E+00, 0.7718300E+00 /
      data (ref_adm(30,iz,10,16),iz = 1,20) / &
     & 0.3416300E+00, 0.3416300E+00, 0.3435400E+00, 0.3379800E+00, &
     & 0.3407000E+00, 0.3348900E+00, 0.3518300E+00, 0.3698700E+00, &
     & 0.3754700E+00, 0.3838900E+00, 0.3930900E+00, 0.4012300E+00, &
     & 0.4096900E+00, 0.4809400E+00, 0.5168300E+00, 0.6091900E+00, &
     & 0.6576100E+00, 0.6895300E+00, 0.7049800E+00, 0.7049800E+00 /
      data (ref_adm(30,iz,11,16),iz = 1,20) / &
     & 0.3510200E+00, 0.3510200E+00, 0.3365500E+00, 0.3383900E+00, &
     & 0.3370000E+00, 0.3422800E+00, 0.3540400E+00, 0.3723200E+00, &
     & 0.3751600E+00, 0.3857900E+00, 0.3921800E+00, 0.3981600E+00, &
     & 0.4150200E+00, 0.4652300E+00, 0.5080900E+00, 0.5787500E+00, &
     & 0.6395900E+00, 0.6754200E+00, 0.6568300E+00, 0.6568300E+00 /
      data (ref_adm(30,iz,12,16),iz = 1,20) / &
     & 0.3450100E+00, 0.3450100E+00, 0.3357800E+00, 0.3330400E+00, &
     & 0.3348200E+00, 0.3364100E+00, 0.3445200E+00, 0.3638100E+00, &
     & 0.3629900E+00, 0.3669500E+00, 0.3824700E+00, 0.3979600E+00, &
     & 0.4193300E+00, 0.4575900E+00, 0.5244400E+00, 0.5694600E+00, &
     & 0.6173000E+00, 0.6485600E+00, 0.6304500E+00, 0.6304500E+00 /
      data (ref_adm(30,iz,13,16),iz = 1,20) / &
     & 0.3397600E+00, 0.3397600E+00, 0.3382100E+00, 0.3377000E+00, &
     & 0.3381700E+00, 0.3442200E+00, 0.3500400E+00, 0.3649800E+00, &
     & 0.3652000E+00, 0.3666900E+00, 0.3807500E+00, 0.3850100E+00, &
     & 0.4049200E+00, 0.4562300E+00, 0.5200200E+00, 0.5444300E+00, &
     & 0.6002900E+00, 0.6202400E+00, 0.5804900E+00, 0.5804900E+00 /
      data (ref_adm(30,iz,14,16),iz = 1,20) / &
     & 0.3696400E+00, 0.3696400E+00, 0.3727800E+00, 0.3723600E+00, &
     & 0.3727400E+00, 0.3738400E+00, 0.3753400E+00, 0.3779600E+00, &
     & 0.3866300E+00, 0.3911400E+00, 0.3964900E+00, 0.4009400E+00, &
     & 0.4108000E+00, 0.4311500E+00, 0.4895100E+00, 0.5356000E+00, &
     & 0.5872000E+00, 0.5897700E+00, 0.4495400E+00, 0.4495400E+00 /
      data (ref_adm(30,iz,15,16),iz = 1,20) / &
     & 0.3437100E+00, 0.3437100E+00, 0.3140500E+00, 0.3095200E+00, &
     & 0.3118500E+00, 0.3126200E+00, 0.3172000E+00, 0.3226000E+00, &
     & 0.3304000E+00, 0.3372200E+00, 0.3411000E+00, 0.3557800E+00, &
     & 0.3799400E+00, 0.4011500E+00, 0.4837500E+00, 0.5300200E+00, &
     & 0.5681300E+00, 0.5733900E+00, 0.3569894E+00, 0.3569894E+00 /
      data (ref_adm(30,iz,16,16),iz = 1,20) / &
     & 0.3239800E+00, 0.3239800E+00, 0.3234700E+00, 0.3281200E+00, &
     & 0.3284200E+00, 0.3279800E+00, 0.3277600E+00, 0.3325900E+00, &
     & 0.3452500E+00, 0.3519400E+00, 0.3499500E+00, 0.3558100E+00, &
     & 0.3632400E+00, 0.3760400E+00, 0.4903800E+00, 0.5394300E+00, &
     & 0.5405000E+00, 0.3992595E+00, 0.3483923E+00, 0.3483923E+00 /
      data (ref_adm(30,iz,17,16),iz = 1,20) / &
     & 0.3311300E+00, 0.3311300E+00, 0.3421000E+00, 0.3373300E+00, &
     & 0.3404500E+00, 0.3342500E+00, 0.3340000E+00, 0.3369100E+00, &
     & 0.3535200E+00, 0.3613200E+00, 0.3602700E+00, 0.3734700E+00, &
     & 0.3860800E+00, 0.4030700E+00, 0.4546500E+00, 0.5019300E+00, &
     & 0.5124200E+00, 0.3879836E+00, 0.3413654E+00, 0.3413654E+00 /
      data (ref_adm(30,iz,18,16),iz = 1,20) / &
     & 0.3314400E+00, 0.3314400E+00, 0.3488000E+00, 0.3332400E+00, &
     & 0.3335300E+00, 0.3307000E+00, 0.3415300E+00, 0.3480200E+00, &
     & 0.3524200E+00, 0.3587000E+00, 0.3626200E+00, 0.3729700E+00, &
     & 0.3981800E+00, 0.4056100E+00, 0.4534800E+00, 0.4794400E+00, &
     & 0.4923952E+00, 0.5147952E+00, 0.5004427E+00, 0.5004427E+00 /
      data (ref_adm(30,iz,19,16),iz = 1,20) / &
     & 0.3329600E+00, 0.3329600E+00, 0.3420500E+00, 0.3349600E+00, &
     & 0.3314600E+00, 0.3315100E+00, 0.3476200E+00, 0.3489600E+00, &
     & 0.3485100E+00, 0.3523000E+00, 0.3631100E+00, 0.3667800E+00, &
     & 0.3914000E+00, 0.4085900E+00, 0.4435500E+00, 0.4712700E+00, &
     & 0.4842193E+00, 0.5044386E+00, 0.4901537E+00, 0.4901537E+00 /
      data (ref_adm(30,iz,20,16),iz = 1,20) / &
     & 0.3363000E+00, 0.3363000E+00, 0.3381100E+00, 0.3327200E+00, &
     & 0.3298600E+00, 0.3385200E+00, 0.3408000E+00, 0.3482300E+00, &
     & 0.3415000E+00, 0.3604800E+00, 0.3653800E+00, 0.3811500E+00, &
     & 0.3871000E+00, 0.4106600E+00, 0.4406900E+00, 0.4122500E+00, &
     & 0.4778553E+00, 0.4972284E+00, 0.4842662E+00, 0.4842662E+00 /
      data (ref_adm(30,iz,21,16),iz = 1,20) / &
     & 0.3402400E+00, 0.3402400E+00, 0.3338300E+00, 0.3347200E+00, &
     & 0.3342500E+00, 0.3415000E+00, 0.3391000E+00, 0.3351900E+00, &
     & 0.3375300E+00, 0.3448200E+00, 0.3619400E+00, 0.3784900E+00, &
     & 0.3891600E+00, 0.4200100E+00, 0.4405400E+00, 0.4391200E+00, &
     & 0.4720947E+00, 0.4908678E+00, 0.4806061E+00, 0.4806061E+00 /
      data (ref_adm(30,iz,22,16),iz = 1,20) / &
     & 0.3375600E+00, 0.3375600E+00, 0.3385700E+00, 0.3383900E+00, &
     & 0.3371200E+00, 0.3459200E+00, 0.3460300E+00, 0.3529700E+00, &
     & 0.3503600E+00, 0.3535400E+00, 0.3702100E+00, 0.3806300E+00, &
     & 0.3957600E+00, 0.4262700E+00, 0.4356200E+00, 0.4372800E+00, &
     & 0.4951752E+00, 0.5034474E+00, 0.5222938E+00, 0.5222938E+00 /
      data (ref_adm(30,iz,23,16),iz = 1,20) / &
     & 0.3424300E+00, 0.3424300E+00, 0.3371100E+00, 0.3406800E+00, &
     & 0.3395900E+00, 0.3470900E+00, 0.3445800E+00, 0.3516600E+00, &
     & 0.3678700E+00, 0.3570000E+00, 0.3779900E+00, 0.3946700E+00, &
     & 0.4055500E+00, 0.4319600E+00, 0.4275100E+00, 0.4456800E+00, &
     & 0.4029900E+00, 0.5039696E+00, 0.5297551E+00, 0.5297551E+00 /
      data (ref_adm(30,iz,24,16),iz = 1,20) / &
     & 0.3318800E+00, 0.3318800E+00, 0.3238400E+00, 0.3263300E+00, &
     & 0.3308400E+00, 0.3342500E+00, 0.3408700E+00, 0.3486500E+00, &
     & 0.3563600E+00, 0.3729200E+00, 0.3861800E+00, 0.3990800E+00, &
     & 0.4105400E+00, 0.4364100E+00, 0.4340300E+00, 0.4500100E+00, &
     & 0.5157900E+00, 0.5094192E+00, 0.5417407E+00, 0.5417407E+00 /
      data (ref_adm(30,iz,25,16),iz = 1,20) / &
     & 0.3373400E+00, 0.3373400E+00, 0.3506300E+00, 0.3580600E+00, &
     & 0.3638500E+00, 0.3673700E+00, 0.3782700E+00, 0.3854300E+00, &
     & 0.3980500E+00, 0.4103700E+00, 0.4269200E+00, 0.4454100E+00, &
     & 0.4737800E+00, 0.5152400E+00, 0.4941100E+00, 0.4750600E+00, &
     & 0.5238000E+00, 0.5371100E+00, 0.5575014E+00, 0.5575014E+00 /
      data (ref_adm(30,iz,26,16),iz = 1,20) / &
     & 0.3453900E+00, 0.3453900E+00, 0.3421300E+00, 0.3476800E+00, &
     & 0.3554700E+00, 0.3645300E+00, 0.3679000E+00, 0.3785600E+00, &
     & 0.3918800E+00, 0.3884200E+00, 0.3865700E+00, 0.3975200E+00, &
     & 0.4315000E+00, 0.4655000E+00, 0.4692800E+00, 0.4888400E+00, &
     & 0.5231900E+00, 0.5480300E+00, 0.5779691E+00, 0.5779691E+00 /
      data (ref_adm(30,iz,27,16),iz = 1,20) / &
     & 0.3378700E+00, 0.3378700E+00, 0.3564400E+00, 0.3616500E+00, &
     & 0.3593600E+00, 0.3717200E+00, 0.3715400E+00, 0.3812300E+00, &
     & 0.3909600E+00, 0.3979900E+00, 0.4150200E+00, 0.4207700E+00, &
     & 0.4454300E+00, 0.4915700E+00, 0.5032400E+00, 0.5183500E+00, &
     & 0.5366800E+00, 0.5478100E+00, 0.5438200E+00, 0.5438200E+00 /
      data (ref_adm(30,iz,28,16),iz = 1,20) / &
     & 0.3319500E+00, 0.3319500E+00, 0.3558400E+00, 0.3570100E+00, &
     & 0.3667700E+00, 0.3754600E+00, 0.3826600E+00, 0.3847000E+00, &
     & 0.3957700E+00, 0.4128500E+00, 0.4187300E+00, 0.4233800E+00, &
     & 0.4532700E+00, 0.5011700E+00, 0.5206300E+00, 0.5173700E+00, &
     & 0.5395100E+00, 0.5712000E+00, 0.5434000E+00, 0.5434000E+00 /
      data (ref_adm(30,iz,29,16),iz = 1,20) / &
     & 0.3483500E+00, 0.3483500E+00, 0.3433200E+00, 0.3633900E+00, &
     & 0.3609500E+00, 0.3724500E+00, 0.3712200E+00, 0.3822100E+00, &
     & 0.4020500E+00, 0.4143300E+00, 0.4208800E+00, 0.4379200E+00, &
     & 0.4601200E+00, 0.5105900E+00, 0.5253700E+00, 0.5476300E+00, &
     & 0.5858500E+00, 0.5966500E+00, 0.5420000E+00, 0.5420000E+00 /
      data (ref_adm(30,iz,30,16),iz = 1,20) / &
     & 0.3386600E+00, 0.3386600E+00, 0.3468600E+00, 0.3553800E+00, &
     & 0.3540800E+00, 0.3642300E+00, 0.3694500E+00, 0.3905400E+00, &
     & 0.4050200E+00, 0.4131700E+00, 0.4335900E+00, 0.4524800E+00, &
     & 0.4757100E+00, 0.5203000E+00, 0.5313900E+00, 0.5835600E+00, &
     & 0.6078800E+00, 0.6285700E+00, 0.6103500E+00, 0.6103500E+00 /
      data (ref_adm(30,iz,31,16),iz = 1,20) / &
     & 0.3431300E+00, 0.3431300E+00, 0.3419700E+00, 0.3305800E+00, &
     & 0.3459400E+00, 0.3633100E+00, 0.3754700E+00, 0.3964200E+00, &
     & 0.4091600E+00, 0.4238500E+00, 0.4411300E+00, 0.4592700E+00, &
     & 0.4862300E+00, 0.5212100E+00, 0.5653800E+00, 0.6060500E+00, &
     & 0.6317600E+00, 0.6545300E+00, 0.6164800E+00, 0.6164800E+00 /
      data (ref_adm(30,iz,32,16),iz = 1,20) / &
     & 0.3475100E+00, 0.3475100E+00, 0.3546700E+00, 0.3531800E+00, &
     & 0.3595800E+00, 0.3743600E+00, 0.3846300E+00, 0.3972700E+00, &
     & 0.4208300E+00, 0.4424500E+00, 0.4598700E+00, 0.4776700E+00, &
     & 0.5041000E+00, 0.5319200E+00, 0.5698700E+00, 0.6130800E+00, &
     & 0.6641400E+00, 0.6832300E+00, 0.6279400E+00, 0.6279400E+00 /
      data (ref_adm(30,iz,33,16),iz = 1,20) / &
     & 0.3384900E+00, 0.3384900E+00, 0.3359500E+00, 0.3423800E+00, &
     & 0.3491500E+00, 0.3571800E+00, 0.3664200E+00, 0.3801100E+00, &
     & 0.3969900E+00, 0.4149000E+00, 0.4391600E+00, 0.4610200E+00, &
     & 0.4813500E+00, 0.5238500E+00, 0.5571200E+00, 0.6008200E+00, &
     & 0.6698000E+00, 0.7198300E+00, 0.6574600E+00, 0.6574600E+00 /
      data (ref_adm(30,iz,34,16),iz = 1,20) / &
     & 0.3283300E+00, 0.3283300E+00, 0.3409000E+00, 0.3478600E+00, &
     & 0.3581100E+00, 0.3643300E+00, 0.3751600E+00, 0.3893100E+00, &
     & 0.3990000E+00, 0.4279500E+00, 0.4534200E+00, 0.4740000E+00, &
     & 0.5043900E+00, 0.5450600E+00, 0.5844800E+00, 0.6305700E+00, &
     & 0.6951400E+00, 0.7616300E+00, 0.6735800E+00, 0.6735800E+00 /
      data (ref_adm(30,iz,35,16),iz = 1,20) / &
     & 0.3332500E+00, 0.3332500E+00, 0.3428600E+00, 0.3550700E+00, &
     & 0.3675700E+00, 0.3824600E+00, 0.3790900E+00, 0.3949300E+00, &
     & 0.4048400E+00, 0.4350700E+00, 0.4478600E+00, 0.4820300E+00, &
     & 0.5163900E+00, 0.5447600E+00, 0.6014500E+00, 0.6727900E+00, &
     & 0.7378300E+00, 0.7787600E+00, 0.7080300E+00, 0.7080300E+00 /
      data (ref_adm(30,iz,36,16),iz = 1,20) / &
     & 0.3384600E+00, 0.3384600E+00, 0.3517700E+00, 0.3550400E+00, &
     & 0.3640300E+00, 0.3769800E+00, 0.3944100E+00, 0.4059400E+00, &
     & 0.4185600E+00, 0.4242000E+00, 0.4552900E+00, 0.4879600E+00, &
     & 0.5158100E+00, 0.5626500E+00, 0.6260900E+00, 0.6995300E+00, &
     & 0.7586300E+00, 0.7937100E+00, 0.7061500E+00, 0.7061500E+00 /
      data (ref_adm(30,iz,37,16),iz = 1,20) / &
     & 0.3428500E+00, 0.3428500E+00, 0.3430200E+00, 0.3492900E+00, &
     & 0.3622500E+00, 0.3686200E+00, 0.3962200E+00, 0.4132900E+00, &
     & 0.4253600E+00, 0.4398400E+00, 0.4662400E+00, 0.4875900E+00, &
     & 0.5214000E+00, 0.5822000E+00, 0.6349500E+00, 0.7204600E+00, &
     & 0.7868700E+00, 0.8176000E+00, 0.6770600E+00, 0.6770600E+00 /
      data (ref_adm(30,iz,38,16),iz = 1,20) / &
     & 0.3428500E+00, 0.3428500E+00, 0.3430200E+00, 0.3492900E+00, &
     & 0.3622500E+00, 0.3686200E+00, 0.3962200E+00, 0.4132900E+00, &
     & 0.4253600E+00, 0.4398400E+00, 0.4662400E+00, 0.4875900E+00, &
     & 0.5214000E+00, 0.5822000E+00, 0.6349500E+00, 0.7204600E+00, &
     & 0.7868700E+00, 0.8176000E+00, 0.6770600E+00, 0.6770600E+00 /
! Solar Zenith Angle 80.0 Albedo  0.4344588E+00
      data (ref_adm(30,iz, 1,17),iz = 1,20) / &
     & 0.3304200E+00, 0.3304200E+00, 0.3322500E+00, 0.3309200E+00, &
     & 0.3237000E+00, 0.3384800E+00, 0.3508300E+00, 0.3662200E+00, &
     & 0.3728500E+00, 0.4092200E+00, 0.4494500E+00, 0.4801500E+00, &
     & 0.5423679E+00, 0.5922297E+00, 0.6683491E+00, 0.7473599E+00, &
     & 0.8543580E+00, 0.1105605E+01, 0.1491347E+01, 0.1491347E+01 /
      data (ref_adm(30,iz, 2,17),iz = 1,20) / &
     & 0.3304200E+00, 0.3304200E+00, 0.3322500E+00, 0.3309200E+00, &
     & 0.3237000E+00, 0.3384800E+00, 0.3508300E+00, 0.3662200E+00, &
     & 0.3728500E+00, 0.4092200E+00, 0.4494500E+00, 0.4801500E+00, &
     & 0.5423679E+00, 0.5922297E+00, 0.6683491E+00, 0.7473599E+00, &
     & 0.8543580E+00, 0.1105605E+01, 0.1491347E+01, 0.1491347E+01 /
      data (ref_adm(30,iz, 3,17),iz = 1,20) / &
     & 0.3208800E+00, 0.3208800E+00, 0.3252000E+00, 0.3342700E+00, &
     & 0.3426000E+00, 0.3469100E+00, 0.3568700E+00, 0.3702500E+00, &
     & 0.3889100E+00, 0.4063600E+00, 0.4400500E+00, 0.4757600E+00, &
     & 0.5403917E+00, 0.5889999E+00, 0.6635003E+00, 0.7427104E+00, &
     & 0.8399990E+00, 0.1067400E+01, 0.5636126E+00, 0.5636126E+00 /
      data (ref_adm(30,iz, 4,17),iz = 1,20) / &
     & 0.3229900E+00, 0.3229900E+00, 0.3173700E+00, 0.3224000E+00, &
     & 0.3414100E+00, 0.3367700E+00, 0.3468500E+00, 0.3579000E+00, &
     & 0.3905400E+00, 0.4080800E+00, 0.4321700E+00, 0.4744000E+00, &
     & 0.5351630E+00, 0.5812797E+00, 0.6524553E+00, 0.7327692E+00, &
     & 0.8135216E+00, 0.9981869E+00, 0.1217637E+01, 0.1217637E+01 /
      data (ref_adm(30,iz, 5,17),iz = 1,20) / &
     & 0.3270900E+00, 0.3270900E+00, 0.3221800E+00, 0.3237500E+00, &
     & 0.3263400E+00, 0.3364300E+00, 0.3502500E+00, 0.3653200E+00, &
     & 0.3753700E+00, 0.3913200E+00, 0.4279100E+00, 0.4691600E+00, &
     & 0.5287465E+00, 0.5719465E+00, 0.6373294E+00, 0.7199320E+00, &
     & 0.7842981E+00, 0.9197984E+00, 0.1050243E+01, 0.1050243E+01 /
      data (ref_adm(30,iz, 6,17),iz = 1,20) / &
     & 0.3279100E+00, 0.3279100E+00, 0.3265700E+00, 0.3241200E+00, &
     & 0.3242400E+00, 0.3310700E+00, 0.3422800E+00, 0.3606500E+00, &
     & 0.3788700E+00, 0.3954800E+00, 0.4254300E+00, 0.4616900E+00, &
     & 0.5206600E+00, 0.5997300E+00, 0.6801100E+00, 0.7966700E+00, &
     & 0.1001200E+01, 0.1166100E+01, 0.9214981E+00, 0.9214981E+00 /
      data (ref_adm(30,iz, 7,17),iz = 1,20) / &
     & 0.3280100E+00, 0.3280100E+00, 0.3257300E+00, 0.3229800E+00, &
     & 0.3229300E+00, 0.3286900E+00, 0.3393600E+00, 0.3525300E+00, &
     & 0.3715500E+00, 0.3971300E+00, 0.4307900E+00, 0.4687100E+00, &
     & 0.5308900E+00, 0.6060900E+00, 0.6995100E+00, 0.8457200E+00, &
     & 0.1005700E+01, 0.1201200E+01, 0.1069100E+01, 0.1069100E+01 /
      data (ref_adm(30,iz, 8,17),iz = 1,20) / &
     & 0.3219200E+00, 0.3219200E+00, 0.3100800E+00, 0.3054100E+00, &
     & 0.3119100E+00, 0.3243200E+00, 0.3324100E+00, 0.3432500E+00, &
     & 0.3643200E+00, 0.3833100E+00, 0.4127600E+00, 0.4442500E+00, &
     & 0.5111000E+00, 0.5549700E+00, 0.6544900E+00, 0.7778200E+00, &
     & 0.9357600E+00, 0.1099700E+01, 0.1089300E+01, 0.1089300E+01 /
      data (ref_adm(30,iz, 9,17),iz = 1,20) / &
     & 0.3137400E+00, 0.3137400E+00, 0.3116700E+00, 0.3165100E+00, &
     & 0.3201500E+00, 0.3200000E+00, 0.3218300E+00, 0.3429600E+00, &
     & 0.3549900E+00, 0.3695300E+00, 0.4042800E+00, 0.4304600E+00, &
     & 0.4795000E+00, 0.5468400E+00, 0.6092200E+00, 0.7109600E+00, &
     & 0.8607600E+00, 0.9817900E+00, 0.9389300E+00, 0.9389300E+00 /
      data (ref_adm(30,iz,10,17),iz = 1,20) / &
     & 0.3150800E+00, 0.3150800E+00, 0.3181100E+00, 0.3174700E+00, &
     & 0.3203300E+00, 0.3242900E+00, 0.3282900E+00, 0.3393800E+00, &
     & 0.3564100E+00, 0.3697000E+00, 0.3867300E+00, 0.4145500E+00, &
     & 0.4675300E+00, 0.5378800E+00, 0.5761500E+00, 0.6503200E+00, &
     & 0.7896400E+00, 0.8891900E+00, 0.8593100E+00, 0.8593100E+00 /
      data (ref_adm(30,iz,11,17),iz = 1,20) / &
     & 0.3079600E+00, 0.3079600E+00, 0.3127300E+00, 0.3093200E+00, &
     & 0.3179500E+00, 0.3285100E+00, 0.3344900E+00, 0.3502400E+00, &
     & 0.3618600E+00, 0.3807400E+00, 0.3890600E+00, 0.3980000E+00, &
     & 0.4496800E+00, 0.5059800E+00, 0.5452000E+00, 0.6209300E+00, &
     & 0.7603600E+00, 0.8326100E+00, 0.7755800E+00, 0.7755800E+00 /
      data (ref_adm(30,iz,12,17),iz = 1,20) / &
     & 0.3107400E+00, 0.3107400E+00, 0.3119700E+00, 0.3169000E+00, &
     & 0.3276400E+00, 0.3261500E+00, 0.3317700E+00, 0.3441800E+00, &
     & 0.3546000E+00, 0.3801600E+00, 0.3886200E+00, 0.4083700E+00, &
     & 0.4411500E+00, 0.4833100E+00, 0.5078200E+00, 0.6028100E+00, &
     & 0.7006600E+00, 0.7815400E+00, 0.7515900E+00, 0.7515900E+00 /
      data (ref_adm(30,iz,13,17),iz = 1,20) / &
     & 0.3150800E+00, 0.3150800E+00, 0.3156100E+00, 0.3272700E+00, &
     & 0.3268400E+00, 0.3291300E+00, 0.3360600E+00, 0.3428300E+00, &
     & 0.3630100E+00, 0.3821700E+00, 0.3817300E+00, 0.3971100E+00, &
     & 0.4345100E+00, 0.4636200E+00, 0.5068300E+00, 0.5820100E+00, &
     & 0.6699900E+00, 0.7106100E+00, 0.6280800E+00, 0.6280800E+00 /
      data (ref_adm(30,iz,14,17),iz = 1,20) / &
     & 0.3569800E+00, 0.3569800E+00, 0.3565700E+00, 0.3533800E+00, &
     & 0.3507200E+00, 0.3516000E+00, 0.3556800E+00, 0.3627300E+00, &
     & 0.3715600E+00, 0.3811700E+00, 0.3923700E+00, 0.4105000E+00, &
     & 0.4377800E+00, 0.4502400E+00, 0.4908900E+00, 0.5723200E+00, &
     & 0.6547800E+00, 0.6715100E+00, 0.5762605E+00, 0.5762605E+00 /
      data (ref_adm(30,iz,15,17),iz = 1,20) / &
     & 0.3191600E+00, 0.3191600E+00, 0.2857200E+00, 0.2866200E+00, &
     & 0.2895300E+00, 0.2945400E+00, 0.2962100E+00, 0.2989800E+00, &
     & 0.3064900E+00, 0.3116300E+00, 0.3223600E+00, 0.3361100E+00, &
     & 0.3538600E+00, 0.3793200E+00, 0.4881200E+00, 0.5534600E+00, &
     & 0.5913200E+00, 0.7229600E+00, 0.5609650E+00, 0.5609650E+00 /
      data (ref_adm(30,iz,16,17),iz = 1,20) / &
     & 0.3119000E+00, 0.3119000E+00, 0.3290400E+00, 0.3353200E+00, &
     & 0.3398500E+00, 0.3436500E+00, 0.3456800E+00, 0.3513100E+00, &
     & 0.3527300E+00, 0.3562800E+00, 0.3616000E+00, 0.3757800E+00, &
     & 0.3942800E+00, 0.4032000E+00, 0.4786000E+00, 0.5064500E+00, &
     & 0.5832000E+00, 0.5552238E+00, 0.5452530E+00, 0.5452530E+00 /
      data (ref_adm(30,iz,17,17),iz = 1,20) / &
     & 0.3179000E+00, 0.3179000E+00, 0.3282300E+00, 0.3327500E+00, &
     & 0.3407900E+00, 0.3384100E+00, 0.3401000E+00, 0.3469900E+00, &
     & 0.3489800E+00, 0.3630600E+00, 0.3672400E+00, 0.3854500E+00, &
     & 0.4146200E+00, 0.4228300E+00, 0.4444300E+00, 0.4955100E+00, &
     & 0.5211900E+00, 0.5401014E+00, 0.5290599E+00, 0.5290599E+00 /
      data (ref_adm(30,iz,18,17),iz = 1,20) / &
     & 0.3138000E+00, 0.3138000E+00, 0.3310200E+00, 0.3342800E+00, &
     & 0.3325900E+00, 0.3329200E+00, 0.3408400E+00, 0.3473300E+00, &
     & 0.3451500E+00, 0.3535700E+00, 0.3628200E+00, 0.3845800E+00, &
     & 0.4036300E+00, 0.4203500E+00, 0.4499100E+00, 0.5000100E+00, &
     & 0.5715471E+00, 0.6714125E+00, 0.8067756E+00, 0.8067756E+00 /
      data (ref_adm(30,iz,19,17),iz = 1,20) / &
     & 0.3211600E+00, 0.3211600E+00, 0.3295500E+00, 0.3331900E+00, &
     & 0.3305700E+00, 0.3288700E+00, 0.3340200E+00, 0.3413000E+00, &
     & 0.3478400E+00, 0.3540800E+00, 0.3622000E+00, 0.3808200E+00, &
     & 0.4124200E+00, 0.4312800E+00, 0.4614600E+00, 0.5004100E+00, &
     & 0.5616614E+00, 0.6562635E+00, 0.7861689E+00, 0.7861689E+00 /
      data (ref_adm(30,iz,20,17),iz = 1,20) / &
     & 0.3256600E+00, 0.3256600E+00, 0.3328200E+00, 0.3333500E+00, &
     & 0.3416600E+00, 0.3324400E+00, 0.3334200E+00, 0.3441400E+00, &
     & 0.3368100E+00, 0.3503800E+00, 0.3600300E+00, 0.3899900E+00, &
     & 0.4105700E+00, 0.4281800E+00, 0.4578800E+00, 0.5002400E+00, &
     & 0.5556608E+00, 0.6465800E+00, 0.7745428E+00, 0.7745428E+00 /
      data (ref_adm(30,iz,21,17),iz = 1,20) / &
     & 0.3331200E+00, 0.3331200E+00, 0.3343800E+00, 0.3381400E+00, &
     & 0.3328700E+00, 0.3346200E+00, 0.3453700E+00, 0.3522000E+00, &
     & 0.3489000E+00, 0.3552700E+00, 0.3662200E+00, 0.3895000E+00, &
     & 0.4158000E+00, 0.4303000E+00, 0.4423500E+00, 0.4563100E+00, &
     & 0.5513501E+00, 0.6399229E+00, 0.7686056E+00, 0.7686056E+00 /
      data (ref_adm(30,iz,22,17),iz = 1,20) / &
     & 0.3226300E+00, 0.3226300E+00, 0.3368200E+00, 0.3338700E+00, &
     & 0.3271500E+00, 0.3304100E+00, 0.3412400E+00, 0.3383500E+00, &
     & 0.3419500E+00, 0.3525000E+00, 0.3636500E+00, 0.3862900E+00, &
     & 0.4139600E+00, 0.4237200E+00, 0.4518400E+00, 0.4809800E+00, &
     & 0.5408088E+00, 0.5738171E+00, 0.6361600E+00, 0.6361600E+00 /
      data (ref_adm(30,iz,23,17),iz = 1,20) / &
     & 0.3258600E+00, 0.3258600E+00, 0.3241000E+00, 0.3254900E+00, &
     & 0.3256600E+00, 0.3213300E+00, 0.3295600E+00, 0.3387600E+00, &
     & 0.3544200E+00, 0.3658500E+00, 0.3789500E+00, 0.4024700E+00, &
     & 0.4255200E+00, 0.4378500E+00, 0.4540500E+00, 0.5027700E+00, &
     & 0.5358600E+00, 0.5729771E+00, 0.6453618E+00, 0.6453618E+00 /
      data (ref_adm(30,iz,24,17),iz = 1,20) / &
     & 0.3269500E+00, 0.3269500E+00, 0.3141500E+00, 0.3139800E+00, &
     & 0.3123900E+00, 0.3171600E+00, 0.3231700E+00, 0.3341200E+00, &
     & 0.3461200E+00, 0.3519200E+00, 0.3707100E+00, 0.3949500E+00, &
     & 0.4172500E+00, 0.4448600E+00, 0.4615100E+00, 0.4983700E+00, &
     & 0.5533900E+00, 0.5783021E+00, 0.6607223E+00, 0.6607223E+00 /
      data (ref_adm(30,iz,25,17),iz = 1,20) / &
     & 0.3121800E+00, 0.3121800E+00, 0.3290600E+00, 0.3401800E+00, &
     & 0.3470800E+00, 0.3523500E+00, 0.3598600E+00, 0.3661900E+00, &
     & 0.3753800E+00, 0.3934700E+00, 0.4091500E+00, 0.4265300E+00, &
     & 0.4509600E+00, 0.4784200E+00, 0.4868700E+00, 0.5093000E+00, &
     & 0.5637100E+00, 0.6333300E+00, 0.6811371E+00, 0.6811371E+00 /
      data (ref_adm(30,iz,26,17),iz = 1,20) / &
     & 0.3268300E+00, 0.3268300E+00, 0.3086300E+00, 0.3180600E+00, &
     & 0.3183700E+00, 0.3301300E+00, 0.3385300E+00, 0.3428200E+00, &
     & 0.3606900E+00, 0.3737400E+00, 0.3987600E+00, 0.4179200E+00, &
     & 0.4478400E+00, 0.4640700E+00, 0.4826800E+00, 0.5233900E+00, &
     & 0.5662000E+00, 0.6477400E+00, 0.7078820E+00, 0.7078820E+00 /
      data (ref_adm(30,iz,27,17),iz = 1,20) / &
     & 0.3100300E+00, 0.3100300E+00, 0.3101400E+00, 0.3180900E+00, &
     & 0.3210900E+00, 0.3335100E+00, 0.3420800E+00, 0.3571200E+00, &
     & 0.3608900E+00, 0.3784900E+00, 0.3981900E+00, 0.4331100E+00, &
     & 0.4569700E+00, 0.4796000E+00, 0.4989900E+00, 0.5292700E+00, &
     & 0.5989400E+00, 0.6605700E+00, 0.6568400E+00, 0.6568400E+00 /
      data (ref_adm(30,iz,28,17),iz = 1,20) / &
     & 0.3078000E+00, 0.3078000E+00, 0.3058500E+00, 0.3208300E+00, &
     & 0.3263800E+00, 0.3276300E+00, 0.3511700E+00, 0.3598600E+00, &
     & 0.3677700E+00, 0.3849800E+00, 0.4068100E+00, 0.4300900E+00, &
     & 0.4726500E+00, 0.5015100E+00, 0.5187200E+00, 0.5594900E+00, &
     & 0.6506000E+00, 0.7236300E+00, 0.6701800E+00, 0.6701800E+00 /
      data (ref_adm(30,iz,29,17),iz = 1,20) / &
     & 0.3048600E+00, 0.3048600E+00, 0.3127800E+00, 0.3195700E+00, &
     & 0.3220300E+00, 0.3301600E+00, 0.3421400E+00, 0.3557400E+00, &
     & 0.3716800E+00, 0.3932800E+00, 0.4135900E+00, 0.4396000E+00, &
     & 0.4806000E+00, 0.5118800E+00, 0.5465800E+00, 0.5944000E+00, &
     & 0.6644900E+00, 0.7154300E+00, 0.7005600E+00, 0.7005600E+00 /
      data (ref_adm(30,iz,30,17),iz = 1,20) / &
     & 0.3199800E+00, 0.3199800E+00, 0.3199100E+00, 0.3252000E+00, &
     & 0.3328100E+00, 0.3471200E+00, 0.3501800E+00, 0.3699000E+00, &
     & 0.3873300E+00, 0.4089900E+00, 0.4281100E+00, 0.4481900E+00, &
     & 0.4991400E+00, 0.5302200E+00, 0.5644100E+00, 0.6186800E+00, &
     & 0.6892000E+00, 0.7471200E+00, 0.7204200E+00, 0.7204200E+00 /
      data (ref_adm(30,iz,31,17),iz = 1,20) / &
     & 0.3195200E+00, 0.3195200E+00, 0.3232200E+00, 0.3304900E+00, &
     & 0.3380700E+00, 0.3468000E+00, 0.3509100E+00, 0.3587900E+00, &
     & 0.3807500E+00, 0.4060100E+00, 0.4356100E+00, 0.4573200E+00, &
     & 0.5006600E+00, 0.5449900E+00, 0.5829000E+00, 0.6165600E+00, &
     & 0.7014500E+00, 0.7993000E+00, 0.7584900E+00, 0.7584900E+00 /
      data (ref_adm(30,iz,32,17),iz = 1,20) / &
     & 0.3286200E+00, 0.3286200E+00, 0.3337400E+00, 0.3349700E+00, &
     & 0.3417100E+00, 0.3532500E+00, 0.3703100E+00, 0.3817300E+00, &
     & 0.3929900E+00, 0.4127500E+00, 0.4368800E+00, 0.4709700E+00, &
     & 0.5070100E+00, 0.5475400E+00, 0.5878800E+00, 0.6309500E+00, &
     & 0.7139800E+00, 0.8162100E+00, 0.7712800E+00, 0.7712800E+00 /
      data (ref_adm(30,iz,33,17),iz = 1,20) / &
     & 0.3113600E+00, 0.3113600E+00, 0.3244800E+00, 0.3310300E+00, &
     & 0.3367800E+00, 0.3500800E+00, 0.3605600E+00, 0.3722900E+00, &
     & 0.3880100E+00, 0.4093600E+00, 0.4363800E+00, 0.4636200E+00, &
     & 0.4942100E+00, 0.5329400E+00, 0.5848900E+00, 0.6473600E+00, &
     & 0.7303000E+00, 0.8201400E+00, 0.7965900E+00, 0.7965900E+00 /
      data (ref_adm(30,iz,34,17),iz = 1,20) / &
     & 0.3196800E+00, 0.3196800E+00, 0.3295000E+00, 0.3289900E+00, &
     & 0.3404400E+00, 0.3513300E+00, 0.3593000E+00, 0.3708700E+00, &
     & 0.3924200E+00, 0.4086700E+00, 0.4437800E+00, 0.4769000E+00, &
     & 0.5028000E+00, 0.5486300E+00, 0.6053800E+00, 0.6756500E+00, &
     & 0.7752300E+00, 0.8642400E+00, 0.8600800E+00, 0.8600800E+00 /
      data (ref_adm(30,iz,35,17),iz = 1,20) / &
     & 0.3271500E+00, 0.3271500E+00, 0.3346300E+00, 0.3396600E+00, &
     & 0.3404300E+00, 0.3500900E+00, 0.3668900E+00, 0.3832900E+00, &
     & 0.3905200E+00, 0.4114000E+00, 0.4489100E+00, 0.4739600E+00, &
     & 0.5131500E+00, 0.5600500E+00, 0.6125500E+00, 0.6961600E+00, &
     & 0.7869500E+00, 0.8876200E+00, 0.9055600E+00, 0.9055600E+00 /
      data (ref_adm(30,iz,36,17),iz = 1,20) / &
     & 0.3235200E+00, 0.3235200E+00, 0.3339800E+00, 0.3382500E+00, &
     & 0.3448400E+00, 0.3495100E+00, 0.3642900E+00, 0.3838500E+00, &
     & 0.3933100E+00, 0.4141100E+00, 0.4442800E+00, 0.4796200E+00, &
     & 0.5273900E+00, 0.5647600E+00, 0.6307200E+00, 0.7108300E+00, &
     & 0.8130800E+00, 0.9101100E+00, 0.8950300E+00, 0.8950300E+00 /
      data (ref_adm(30,iz,37,17),iz = 1,20) / &
     & 0.3273100E+00, 0.3273100E+00, 0.3302100E+00, 0.3388100E+00, &
     & 0.3464900E+00, 0.3496800E+00, 0.3614500E+00, 0.3794200E+00, &
     & 0.3962900E+00, 0.4131900E+00, 0.4311600E+00, 0.4838700E+00, &
     & 0.5321500E+00, 0.5684700E+00, 0.6441100E+00, 0.7332200E+00, &
     & 0.8547000E+00, 0.9616100E+00, 0.8763700E+00, 0.8763700E+00 /
      data (ref_adm(30,iz,38,17),iz = 1,20) / &
     & 0.3273100E+00, 0.3273100E+00, 0.3302100E+00, 0.3388100E+00, &
     & 0.3464900E+00, 0.3496800E+00, 0.3614500E+00, 0.3794200E+00, &
     & 0.3962900E+00, 0.4131900E+00, 0.4311600E+00, 0.4838700E+00, &
     & 0.5321500E+00, 0.5684700E+00, 0.6441100E+00, 0.7332200E+00, &
     & 0.8547000E+00, 0.9616100E+00, 0.8763700E+00, 0.8763700E+00 /
! Solar Zenith Angle 85.0 Albedo  0.5985979E+00
      data (ref_adm(30,iz, 1,18),iz = 1,20) / &
     & 0.4051800E+00, 0.4051800E+00, 0.3911200E+00, 0.3899100E+00, &
     & 0.4114300E+00, 0.4321200E+00, 0.4517600E+00, 0.4739100E+00, &
     & 0.4903200E+00, 0.5445500E+00, 0.5735800E+00, 0.6670700E+00, &
     & 0.8713481E+00, 0.9757686E+00, 0.1129301E+01, 0.1323121E+01, &
     & 0.1509313E+01, 0.1695942E+01, 0.1337743E+01, 0.1337743E+01 /
      data (ref_adm(30,iz, 2,18),iz = 1,20) / &
     & 0.4051800E+00, 0.4051800E+00, 0.3911200E+00, 0.3899100E+00, &
     & 0.4114300E+00, 0.4321200E+00, 0.4517600E+00, 0.4739100E+00, &
     & 0.4903200E+00, 0.5445500E+00, 0.5735800E+00, 0.6670700E+00, &
     & 0.8713481E+00, 0.9757686E+00, 0.1129301E+01, 0.1323121E+01, &
     & 0.1509313E+01, 0.1695942E+01, 0.1337743E+01, 0.1337743E+01 /
      data (ref_adm(30,iz, 3,18),iz = 1,20) / &
     & 0.3896100E+00, 0.3896100E+00, 0.3999700E+00, 0.4056500E+00, &
     & 0.4053600E+00, 0.4230600E+00, 0.4517300E+00, 0.4638500E+00, &
     & 0.4921900E+00, 0.5298700E+00, 0.5930900E+00, 0.6417400E+00, &
     & 0.8659127E+00, 0.9677172E+00, 0.1117828E+01, 0.1307331E+01, &
     & 0.1484920E+01, 0.1655266E+01, 0.5007378E+00, 0.5007378E+00 /
      data (ref_adm(30,iz, 4,18),iz = 1,20) / &
     & 0.3998000E+00, 0.3998000E+00, 0.4105700E+00, 0.4143400E+00, &
     & 0.4097000E+00, 0.4128200E+00, 0.4325600E+00, 0.4635200E+00, &
     & 0.4853500E+00, 0.5191200E+00, 0.6000100E+00, 0.6544000E+00, &
     & 0.8536917E+00, 0.9509012E+00, 0.1093025E+01, 0.1273242E+01, &
     & 0.1436261E+01, 0.1576290E+01, 0.1226829E+01, 0.1226829E+01 /
      data (ref_adm(30,iz, 5,18),iz = 1,20) / &
     & 0.4077800E+00, 0.4077800E+00, 0.4137600E+00, 0.4075200E+00, &
     & 0.4065900E+00, 0.4217600E+00, 0.4347300E+00, 0.4549300E+00, &
     & 0.4898500E+00, 0.5247400E+00, 0.5867400E+00, 0.6563900E+00, &
     & 0.8370557E+00, 0.9277215E+00, 0.1058248E+01, 0.1226454E+01, &
     & 0.1371994E+01, 0.1476726E+01, 0.1142655E+01, 0.1142655E+01 /
      data (ref_adm(30,iz, 6,18),iz = 1,20) / &
     & 0.4214800E+00, 0.4214800E+00, 0.4171100E+00, 0.4213100E+00, &
     & 0.4297500E+00, 0.4462700E+00, 0.4603300E+00, 0.4921900E+00, &
     & 0.5282100E+00, 0.5730600E+00, 0.6356900E+00, 0.7040800E+00, &
     & 0.8597100E+00, 0.1036700E+01, 0.1260800E+01, 0.1668500E+01, &
     & 0.2477200E+01, 0.2796200E+01, 0.2837100E+01, 0.2837100E+01 /
      data (ref_adm(30,iz, 7,18),iz = 1,20) / &
     & 0.4078200E+00, 0.4078200E+00, 0.4060800E+00, 0.4110000E+00, &
     & 0.4119500E+00, 0.4185700E+00, 0.4408900E+00, 0.4561200E+00, &
     & 0.4864700E+00, 0.5133000E+00, 0.5828300E+00, 0.6521200E+00, &
     & 0.7834700E+00, 0.8936500E+00, 0.1067100E+01, 0.1383800E+01, &
     & 0.1766000E+01, 0.2227200E+01, 0.2474900E+01, 0.2474900E+01 /
      data (ref_adm(30,iz, 8,18),iz = 1,20) / &
     & 0.4060300E+00, 0.4060300E+00, 0.4151500E+00, 0.4085000E+00, &
     & 0.4030700E+00, 0.4269700E+00, 0.4455200E+00, 0.4629900E+00, &
     & 0.4984600E+00, 0.5142700E+00, 0.5732700E+00, 0.6412500E+00, &
     & 0.7518700E+00, 0.8876100E+00, 0.1031000E+01, 0.1351000E+01, &
     & 0.1794400E+01, 0.2038800E+01, 0.2135700E+01, 0.2135700E+01 /
      data (ref_adm(30,iz, 9,18),iz = 1,20) / &
     & 0.4119300E+00, 0.4119300E+00, 0.4032100E+00, 0.3944700E+00, &
     & 0.4165600E+00, 0.4226900E+00, 0.4371900E+00, 0.4782200E+00, &
     & 0.4944200E+00, 0.5054200E+00, 0.5761600E+00, 0.5922200E+00, &
     & 0.7186900E+00, 0.8190700E+00, 0.1022000E+01, 0.1230900E+01, &
     & 0.1576200E+01, 0.1927700E+01, 0.1802100E+01, 0.1802100E+01 /
      data (ref_adm(30,iz,10,18),iz = 1,20) / &
     & 0.4138900E+00, 0.4138900E+00, 0.4093200E+00, 0.4150300E+00, &
     & 0.4067700E+00, 0.4199800E+00, 0.4446900E+00, 0.4593100E+00, &
     & 0.4793400E+00, 0.4925100E+00, 0.5481100E+00, 0.5904600E+00, &
     & 0.7066200E+00, 0.7739000E+00, 0.9289000E+00, 0.1113100E+01, &
     & 0.1426000E+01, 0.1815200E+01, 0.1530500E+01, 0.1530500E+01 /
      data (ref_adm(30,iz,11,18),iz = 1,20) / &
     & 0.4013100E+00, 0.4013100E+00, 0.4107900E+00, 0.4109900E+00, &
     & 0.4131400E+00, 0.4242200E+00, 0.4255800E+00, 0.4373500E+00, &
     & 0.4592200E+00, 0.4872800E+00, 0.5210800E+00, 0.5652400E+00, &
     & 0.6912100E+00, 0.7725500E+00, 0.8750100E+00, 0.1046400E+01, &
     & 0.1282400E+01, 0.1676700E+01, 0.1359900E+01, 0.1359900E+01 /
      data (ref_adm(30,iz,12,18),iz = 1,20) / &
     & 0.4086000E+00, 0.4086000E+00, 0.4075000E+00, 0.4106200E+00, &
     & 0.4231900E+00, 0.4206700E+00, 0.4257600E+00, 0.4202100E+00, &
     & 0.4526000E+00, 0.4643900E+00, 0.5076600E+00, 0.5363400E+00, &
     & 0.6289500E+00, 0.7456600E+00, 0.8552600E+00, 0.9837000E+00, &
     & 0.1198100E+01, 0.1581400E+01, 0.1300100E+01, 0.1300100E+01 /
      data (ref_adm(30,iz,13,18),iz = 1,20) / &
     & 0.4099100E+00, 0.4099100E+00, 0.4077200E+00, 0.4084000E+00, &
     & 0.4123700E+00, 0.4107500E+00, 0.4199600E+00, 0.4274100E+00, &
     & 0.4461900E+00, 0.4584500E+00, 0.4873100E+00, 0.5242700E+00, &
     & 0.6221800E+00, 0.6706900E+00, 0.7729500E+00, 0.9166000E+00, &
     & 0.1156000E+01, 0.1529800E+01, 0.6579805E+00, 0.6579805E+00 /
      data (ref_adm(30,iz,14,18),iz = 1,20) / &
     & 0.4180600E+00, 0.4180600E+00, 0.4044100E+00, 0.3941400E+00, &
     & 0.3876200E+00, 0.3856000E+00, 0.3787800E+00, 0.3857100E+00, &
     & 0.3908200E+00, 0.4032200E+00, 0.4140500E+00, 0.4344400E+00, &
     & 0.4773700E+00, 0.5183100E+00, 0.7120400E+00, 0.8790800E+00, &
     & 0.1158100E+01, 0.1325200E+01, 0.6269302E+00, 0.6269302E+00 /
      data (ref_adm(30,iz,15,18),iz = 1,20) / &
     & 0.3987700E+00, 0.3987700E+00, 0.3866200E+00, 0.3773200E+00, &
     & 0.3718600E+00, 0.3673000E+00, 0.3664700E+00, 0.3699000E+00, &
     & 0.3725200E+00, 0.3721100E+00, 0.3792800E+00, 0.3948700E+00, &
     & 0.4184400E+00, 0.4454400E+00, 0.6970800E+00, 0.8333700E+00, &
     & 0.1002400E+01, 0.6859800E+00, 0.6005888E+00, 0.6005888E+00 /
      data (ref_adm(30,iz,16,18),iz = 1,20) / &
     & 0.3990300E+00, 0.3990300E+00, 0.4008600E+00, 0.4030500E+00, &
     & 0.4039300E+00, 0.4041300E+00, 0.4074800E+00, 0.4089000E+00, &
     & 0.4195300E+00, 0.4207000E+00, 0.4361100E+00, 0.4366500E+00, &
     & 0.4542000E+00, 0.4834500E+00, 0.6884200E+00, 0.8157000E+00, &
     & 0.8426400E+00, 0.6520598E+00, 0.5783257E+00, 0.5783257E+00 /
      data (ref_adm(30,iz,17,18),iz = 1,20) / &
     & 0.3970900E+00, 0.3970900E+00, 0.3986700E+00, 0.4088300E+00, &
     & 0.4161600E+00, 0.4104700E+00, 0.4117600E+00, 0.4220500E+00, &
     & 0.4306000E+00, 0.4340500E+00, 0.4641200E+00, 0.4889300E+00, &
     & 0.5505500E+00, 0.6004000E+00, 0.6740300E+00, 0.7558400E+00, &
     & 0.6373309E+00, 0.6240039E+00, 0.5596597E+00, 0.5596597E+00 /
      data (ref_adm(30,iz,18,18),iz = 1,20) / &
     & 0.3958500E+00, 0.3958500E+00, 0.3969700E+00, 0.3998000E+00, &
     & 0.3992200E+00, 0.4079200E+00, 0.4030500E+00, 0.4061700E+00, &
     & 0.4148800E+00, 0.4182200E+00, 0.4593100E+00, 0.4779900E+00, &
     & 0.5378600E+00, 0.5942200E+00, 0.6647400E+00, 0.7867500E+00, &
     & 0.8018915E+00, 0.9961084E+00, 0.1462046E+01, 0.1462046E+01 /
      data (ref_adm(30,iz,19,18),iz = 1,20) / &
     & 0.4120700E+00, 0.4120700E+00, 0.4089400E+00, 0.4087000E+00, &
     & 0.4007600E+00, 0.4005800E+00, 0.4035000E+00, 0.4059800E+00, &
     & 0.4147000E+00, 0.4200100E+00, 0.4417100E+00, 0.4672200E+00, &
     & 0.5440800E+00, 0.5838900E+00, 0.6553400E+00, 0.5767000E+00, &
     & 0.7753076E+00, 0.9610050E+00, 0.1423664E+01, 0.1423664E+01 /
      data (ref_adm(30,iz,20,18),iz = 1,20) / &
     & 0.4163700E+00, 0.4163700E+00, 0.4071800E+00, 0.4052400E+00, &
     & 0.4068800E+00, 0.3995800E+00, 0.4081400E+00, 0.4189200E+00, &
     & 0.4228800E+00, 0.4371100E+00, 0.4595300E+00, 0.4785200E+00, &
     & 0.5495500E+00, 0.5895500E+00, 0.6108100E+00, 0.6614953E+00, &
     & 0.7577636E+00, 0.9376680E+00, 0.1405208E+01, 0.1405208E+01 /
      data (ref_adm(30,iz,21,18),iz = 1,20) / &
     & 0.4170700E+00, 0.4170700E+00, 0.4089100E+00, 0.4052000E+00, &
     & 0.3972800E+00, 0.3920200E+00, 0.3981600E+00, 0.4156900E+00, &
     & 0.4257400E+00, 0.4481200E+00, 0.4626900E+00, 0.4817600E+00, &
     & 0.5185300E+00, 0.5582300E+00, 0.5670000E+00, 0.6505916E+00, &
     & 0.7445359E+00, 0.9218047E+00, 0.1400743E+01, 0.1400743E+01 /
      data (ref_adm(30,iz,22,18),iz = 1,20) / &
     & 0.4132600E+00, 0.4132600E+00, 0.4064900E+00, 0.4035900E+00, &
     & 0.3974400E+00, 0.4012100E+00, 0.3933500E+00, 0.4049100E+00, &
     & 0.4184900E+00, 0.4344000E+00, 0.4525700E+00, 0.4662900E+00, &
     & 0.5066700E+00, 0.5562200E+00, 0.5365700E+00, 0.5318600E+00, &
     & 0.7706524E+00, 0.8852699E+00, 0.1157254E+01, 0.1157254E+01 /
      data (ref_adm(30,iz,23,18),iz = 1,20) / &
     & 0.4060800E+00, 0.4060800E+00, 0.4132400E+00, 0.4215900E+00, &
     & 0.4208600E+00, 0.4383100E+00, 0.4346800E+00, 0.4365900E+00, &
     & 0.4508800E+00, 0.4619300E+00, 0.4900600E+00, 0.4986400E+00, &
     & 0.5217500E+00, 0.5608800E+00, 0.5315500E+00, 0.5547000E+00, &
     & 0.7587681E+00, 0.8736130E+00, 0.1167258E+01, 0.1167258E+01 /
      data (ref_adm(30,iz,24,18),iz = 1,20) / &
     & 0.4132400E+00, 0.4132400E+00, 0.4103600E+00, 0.4104600E+00, &
     & 0.4145400E+00, 0.4227400E+00, 0.4292300E+00, 0.4395200E+00, &
     & 0.4530800E+00, 0.4723100E+00, 0.4932200E+00, 0.5183900E+00, &
     & 0.5602000E+00, 0.6171300E+00, 0.6166500E+00, 0.5474300E+00, &
     & 0.6204700E+00, 0.8686727E+00, 0.1188206E+01, 0.1188206E+01 /
      data (ref_adm(30,iz,25,18),iz = 1,20) / &
     & 0.4014800E+00, 0.4014800E+00, 0.4001500E+00, 0.4032200E+00, &
     & 0.4139600E+00, 0.4222500E+00, 0.4279800E+00, 0.4341200E+00, &
     & 0.4427400E+00, 0.4577200E+00, 0.4755800E+00, 0.5075400E+00, &
     & 0.5486400E+00, 0.6077500E+00, 0.6152400E+00, 0.6161100E+00, &
     & 0.6828500E+00, 0.7188400E+00, 0.1217792E+01, 0.1217792E+01 /
      data (ref_adm(30,iz,26,18),iz = 1,20) / &
     & 0.3981200E+00, 0.3981200E+00, 0.4114500E+00, 0.4148400E+00, &
     & 0.4143400E+00, 0.4234800E+00, 0.4345200E+00, 0.4423200E+00, &
     & 0.4527200E+00, 0.4541100E+00, 0.4917700E+00, 0.5149800E+00, &
     & 0.5561000E+00, 0.5981900E+00, 0.5935300E+00, 0.6265800E+00, &
     & 0.6935100E+00, 0.8440400E+00, 0.1260827E+01, 0.1260827E+01 /
      data (ref_adm(30,iz,27,18),iz = 1,20) / &
     & 0.3962000E+00, 0.3962000E+00, 0.4112600E+00, 0.4135300E+00, &
     & 0.4211800E+00, 0.4255700E+00, 0.4252400E+00, 0.4372100E+00, &
     & 0.4659800E+00, 0.4711200E+00, 0.4922900E+00, 0.5292700E+00, &
     & 0.5750800E+00, 0.6257800E+00, 0.6313900E+00, 0.6866400E+00, &
     & 0.7832100E+00, 0.9840700E+00, 0.1231000E+01, 0.1231000E+01 /
      data (ref_adm(30,iz,28,18),iz = 1,20) / &
     & 0.3911000E+00, 0.3911000E+00, 0.4128400E+00, 0.4275200E+00, &
     & 0.4253600E+00, 0.4307300E+00, 0.4300300E+00, 0.4532800E+00, &
     & 0.4774300E+00, 0.4971200E+00, 0.5145300E+00, 0.5468600E+00, &
     & 0.5894400E+00, 0.6333400E+00, 0.6811100E+00, 0.7821300E+00, &
     & 0.9083000E+00, 0.1167300E+01, 0.1154500E+01, 0.1154500E+01 /
      data (ref_adm(30,iz,29,18),iz = 1,20) / &
     & 0.4064300E+00, 0.4064300E+00, 0.4046300E+00, 0.4111100E+00, &
     & 0.4385200E+00, 0.4410100E+00, 0.4489600E+00, 0.4511700E+00, &
     & 0.4754300E+00, 0.5089100E+00, 0.5252200E+00, 0.5621300E+00, &
     & 0.6085600E+00, 0.6922400E+00, 0.7775200E+00, 0.8504100E+00, &
     & 0.1076500E+01, 0.1296000E+01, 0.1517400E+01, 0.1517400E+01 /
      data (ref_adm(30,iz,30,18),iz = 1,20) / &
     & 0.4132200E+00, 0.4132200E+00, 0.4039200E+00, 0.4058800E+00, &
     & 0.4298800E+00, 0.4450200E+00, 0.4445600E+00, 0.4657000E+00, &
     & 0.4839100E+00, 0.5262900E+00, 0.5489200E+00, 0.5800300E+00, &
     & 0.6411200E+00, 0.7210200E+00, 0.8161200E+00, 0.9408200E+00, &
     & 0.1120900E+01, 0.1379400E+01, 0.1508600E+01, 0.1508600E+01 /
      data (ref_adm(30,iz,31,18),iz = 1,20) / &
     & 0.4122000E+00, 0.4122000E+00, 0.4111100E+00, 0.4212500E+00, &
     & 0.4212100E+00, 0.4377400E+00, 0.4567100E+00, 0.4687800E+00, &
     & 0.4827400E+00, 0.5224000E+00, 0.5605500E+00, 0.6182600E+00, &
     & 0.6754700E+00, 0.7585300E+00, 0.8438600E+00, 0.9571500E+00, &
     & 0.1142400E+01, 0.1303200E+01, 0.1454300E+01, 0.1454300E+01 /
      data (ref_adm(30,iz,32,18),iz = 1,20) / &
     & 0.4113100E+00, 0.4113100E+00, 0.4107600E+00, 0.4123800E+00, &
     & 0.4218700E+00, 0.4294200E+00, 0.4457300E+00, 0.4727400E+00, &
     & 0.4932900E+00, 0.5283100E+00, 0.5650500E+00, 0.6106500E+00, &
     & 0.6873700E+00, 0.7528800E+00, 0.8393000E+00, 0.9661300E+00, &
     & 0.1109500E+01, 0.1419600E+01, 0.1744200E+01, 0.1744200E+01 /
      data (ref_adm(30,iz,33,18),iz = 1,20) / &
     & 0.3905600E+00, 0.3905600E+00, 0.4144900E+00, 0.4211400E+00, &
     & 0.4326000E+00, 0.4415100E+00, 0.4551600E+00, 0.4814900E+00, &
     & 0.5094500E+00, 0.5463800E+00, 0.5829300E+00, 0.6354400E+00, &
     & 0.7140100E+00, 0.8034400E+00, 0.9056700E+00, 0.1056100E+01, &
     & 0.1278600E+01, 0.1545900E+01, 0.1644200E+01, 0.1644200E+01 /
      data (ref_adm(30,iz,34,18),iz = 1,20) / &
     & 0.4140400E+00, 0.4140400E+00, 0.4017400E+00, 0.4096700E+00, &
     & 0.4361200E+00, 0.4479300E+00, 0.4618200E+00, 0.4807800E+00, &
     & 0.5110300E+00, 0.5445400E+00, 0.5771200E+00, 0.6400400E+00, &
     & 0.7155900E+00, 0.7988600E+00, 0.8793400E+00, 0.1023200E+01, &
     & 0.1173000E+01, 0.1571400E+01, 0.1630600E+01, 0.1630600E+01 /
      data (ref_adm(30,iz,35,18),iz = 1,20) / &
     & 0.3973200E+00, 0.3973200E+00, 0.4014900E+00, 0.4129900E+00, &
     & 0.4329200E+00, 0.4545500E+00, 0.4804900E+00, 0.4859000E+00, &
     & 0.5186400E+00, 0.5637100E+00, 0.5906400E+00, 0.6403200E+00, &
     & 0.7080500E+00, 0.8053900E+00, 0.9040200E+00, 0.1052800E+01, &
     & 0.1291500E+01, 0.1632600E+01, 0.1776100E+01, 0.1776100E+01 /
      data (ref_adm(30,iz,36,18),iz = 1,20) / &
     & 0.3999800E+00, 0.3999800E+00, 0.4115700E+00, 0.4182200E+00, &
     & 0.4353000E+00, 0.4565500E+00, 0.4738200E+00, 0.5023200E+00, &
     & 0.5134100E+00, 0.5514200E+00, 0.6025100E+00, 0.6585300E+00, &
     & 0.7084000E+00, 0.8006900E+00, 0.9225600E+00, 0.1058400E+01, &
     & 0.1324100E+01, 0.1554300E+01, 0.1618700E+01, 0.1618700E+01 /
      data (ref_adm(30,iz,37,18),iz = 1,20) / &
     & 0.4017200E+00, 0.4017200E+00, 0.4170700E+00, 0.4375800E+00, &
     & 0.4594400E+00, 0.4711400E+00, 0.4866300E+00, 0.4950800E+00, &
     & 0.5135900E+00, 0.5300800E+00, 0.5915300E+00, 0.6628000E+00, &
     & 0.7153000E+00, 0.8141500E+00, 0.9240000E+00, 0.1065000E+01, &
     & 0.1342000E+01, 0.1647600E+01, 0.2067600E+01, 0.2067600E+01 /
      data (ref_adm(30,iz,38,18),iz = 1,20) / &
     & 0.4017200E+00, 0.4017200E+00, 0.4170700E+00, 0.4375800E+00, &
     & 0.4594400E+00, 0.4711400E+00, 0.4866300E+00, 0.4950800E+00, &
     & 0.5135900E+00, 0.5300800E+00, 0.5915300E+00, 0.6628000E+00, &
     & 0.7153000E+00, 0.8141500E+00, 0.9240000E+00, 0.1065000E+01, &
     & 0.1342000E+01, 0.1647600E+01, 0.2067600E+01, 0.2067600E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(31,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(31,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(31,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9999000E+04
      data (ref_adm(31,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.9999000E+04
      data (ref_adm(31,iz, 1, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 2, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 3, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 4, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 5, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 6, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 7, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 8, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 9, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,10, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,11, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,12, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,13, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,14, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,15, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,16, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,17, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,22, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,23, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,24, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,25, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,26, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,27, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,28, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,29, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,30, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,31, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,32, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,33, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,34, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,35, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,36, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,37, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,38, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 25.0 Albedo -0.9999000E+04
      data (ref_adm(31,iz, 1, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 2, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 3, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 4, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 5, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 6, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 7, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 8, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz, 9, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,10, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,11, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,12, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,13, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,14, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,15, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,16, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,17, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,18, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,19, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,20, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,21, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,22, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,23, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,24, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,25, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,26, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,27, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,28, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,29, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,30, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,31, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,32, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,33, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,34, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,35, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,36, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,37, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,38, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 30.0 Albedo -0.4422863E+04
      data (ref_adm(31,iz, 1, 7),iz = 1,20) / &
     & 0.3707023E+00, 0.3707023E+00, 0.3640686E+00, 0.3617706E+00, &
     & 0.3599543E+00, 0.3587120E+00, 0.3565224E+00, 0.3527921E+00, &
     & 0.3480007E+00, 0.3422634E+00, 0.3360233E+00, 0.3273599E+00, &
     & 0.3172482E+00, 0.3077262E+00, 0.2940520E+00, 0.2760447E+00, &
     & 0.2574670E+00, 0.2331599E+00, 0.1902404E+00, 0.1902404E+00 /
      data (ref_adm(31,iz, 2, 7),iz = 1,20) / &
     & 0.3707023E+00, 0.3707023E+00, 0.3640686E+00, 0.3617706E+00, &
     & 0.3599543E+00, 0.3587120E+00, 0.3565224E+00, 0.3527921E+00, &
     & 0.3480007E+00, 0.3422634E+00, 0.3360233E+00, 0.3273599E+00, &
     & 0.3172482E+00, 0.3077262E+00, 0.2940520E+00, 0.2760447E+00, &
     & 0.2574670E+00, 0.2331599E+00, 0.1902404E+00, 0.1902404E+00 /
      data (ref_adm(31,iz, 3, 7),iz = 1,20) / &
     & 0.3707023E+00, 0.3707023E+00, 0.3640686E+00, 0.3617707E+00, &
     & 0.3599542E+00, 0.3587120E+00, 0.3565224E+00, 0.3527920E+00, &
     & 0.3480007E+00, 0.3422634E+00, 0.3360233E+00, 0.3273599E+00, &
     & 0.3172482E+00, 0.3077262E+00, 0.2940520E+00, 0.2760447E+00, &
     & 0.2574670E+00, 0.2331599E+00, 0.1902404E+00, 0.1902404E+00 /
      data (ref_adm(31,iz, 4, 7),iz = 1,20) / &
     & 0.3707023E+00, 0.3707023E+00, 0.3640686E+00, 0.3617706E+00, &
     & 0.3599543E+00, 0.3587120E+00, 0.3565224E+00, 0.3527921E+00, &
     & 0.3480007E+00, 0.3422634E+00, 0.3360233E+00, 0.3273599E+00, &
     & 0.3172482E+00, 0.3077262E+00, 0.2940520E+00, 0.2760447E+00, &
     & 0.2574670E+00, 0.2331599E+00, 0.1902404E+00, 0.1902404E+00 /
      data (ref_adm(31,iz, 5, 7),iz = 1,20) / &
     & 0.3707023E+00, 0.3707023E+00, 0.3640686E+00, 0.3617707E+00, &
     & 0.3599542E+00, 0.3587120E+00, 0.3565224E+00, 0.3527920E+00, &
     & 0.3480007E+00, 0.3422634E+00, 0.3360233E+00, 0.3273599E+00, &
     & 0.3172482E+00, 0.3077262E+00, 0.2940520E+00, 0.2760447E+00, &
     & 0.2574670E+00, 0.2331599E+00, 0.1902404E+00, 0.1902404E+00 /
      data (ref_adm(31,iz, 6, 7),iz = 1,20) / &
     & 0.3707023E+00, 0.3707023E+00, 0.3640686E+00, 0.3617706E+00, &
     & 0.3599543E+00, 0.3587120E+00, 0.3565224E+00, 0.3527921E+00, &
     & 0.3480007E+00, 0.3422634E+00, 0.3360233E+00, 0.3273599E+00, &
     & 0.3172482E+00, 0.3077262E+00, 0.2940520E+00, 0.2760447E+00, &
     & 0.2574670E+00, 0.2331599E+00, 0.1902404E+00, 0.1902404E+00 /
      data (ref_adm(31,iz, 7, 7),iz = 1,20) / &
     & 0.3707023E+00, 0.3707023E+00, 0.3640686E+00, 0.3617707E+00, &
     & 0.3599542E+00, 0.3587120E+00, 0.3565224E+00, 0.3527920E+00, &
     & 0.3480007E+00, 0.3422634E+00, 0.3360233E+00, 0.3273599E+00, &
     & 0.3172482E+00, 0.3077262E+00, 0.2940520E+00, 0.2760447E+00, &
     & 0.2574670E+00, 0.2331599E+00, 0.1902404E+00, 0.1902404E+00 /
      data (ref_adm(31,iz, 8, 7),iz = 1,20) / &
     & 0.3707023E+00, 0.3707023E+00, 0.3640686E+00, 0.3617706E+00, &
     & 0.3599543E+00, 0.3587120E+00, 0.3565224E+00, 0.3527921E+00, &
     & 0.3480007E+00, 0.3422634E+00, 0.3360233E+00, 0.3273599E+00, &
     & 0.3172482E+00, 0.3077262E+00, 0.2940520E+00, 0.2760447E+00, &
     & 0.2574670E+00, 0.2331599E+00, 0.1902404E+00, 0.1902404E+00 /
      data (ref_adm(31,iz, 9, 7),iz = 1,20) / &
     & 0.3707023E+00, 0.3707023E+00, 0.3640686E+00, 0.3617707E+00, &
     & 0.3599542E+00, 0.3587120E+00, 0.3565224E+00, 0.3527920E+00, &
     & 0.3480007E+00, 0.3422634E+00, 0.3360233E+00, 0.3273599E+00, &
     & 0.3172482E+00, 0.3077262E+00, 0.2940520E+00, 0.2760447E+00, &
     & 0.2574670E+00, 0.2331599E+00, 0.1902404E+00, 0.1902404E+00 /
      data (ref_adm(31,iz,10, 7),iz = 1,20) / &
     & 0.3707023E+00, 0.3707023E+00, 0.3640686E+00, 0.3617706E+00, &
     & 0.3599543E+00, 0.3587120E+00, 0.3565224E+00, 0.3527921E+00, &
     & 0.3480007E+00, 0.3422634E+00, 0.3360233E+00, 0.3273599E+00, &
     & 0.3172482E+00, 0.3077262E+00, 0.2940520E+00, 0.2760447E+00, &
     & 0.2574670E+00, 0.2331599E+00, 0.1902404E+00, 0.1902404E+00 /
      data (ref_adm(31,iz,11, 7),iz = 1,20) / &
     & 0.3707023E+00, 0.3707023E+00, 0.3640686E+00, 0.3617707E+00, &
     & 0.3853400E+00, 0.3587120E+00, 0.3475600E+00, 0.3861500E+00, &
     & 0.3514600E+00, 0.3422634E+00, 0.3360233E+00, 0.3273599E+00, &
     & 0.3172482E+00, 0.3077262E+00, 0.2940520E+00, 0.2760447E+00, &
     & 0.2574670E+00, 0.2331599E+00, 0.1902404E+00, 0.1902404E+00 /
      data (ref_adm(31,iz,12, 7),iz = 1,20) / &
     & 0.3707023E+00, 0.3707023E+00, 0.3640686E+00, 0.3617706E+00, &
     & 0.3599543E+00, 0.3587120E+00, 0.3565224E+00, 0.3527921E+00, &
     & 0.3480007E+00, 0.3422634E+00, 0.3193600E+00, 0.3273599E+00, &
     & 0.3172482E+00, 0.3077262E+00, 0.2940520E+00, 0.2760447E+00, &
     & 0.2574670E+00, 0.2331599E+00, 0.1902404E+00, 0.1902404E+00 /
      data (ref_adm(31,iz,13, 7),iz = 1,20) / &
     & 0.3707023E+00, 0.3707023E+00, 0.3640686E+00, 0.3617707E+00, &
     & 0.3599542E+00, 0.3587120E+00, 0.3565224E+00, 0.3527920E+00, &
     & 0.3480007E+00, 0.3422634E+00, 0.3360233E+00, 0.3273599E+00, &
     & 0.3172482E+00, 0.3077262E+00, 0.2940520E+00, 0.2760447E+00, &
     & 0.2574670E+00, 0.2331599E+00, 0.1902404E+00, 0.1902404E+00 /
      data (ref_adm(31,iz,14, 7),iz = 1,20) / &
     & 0.3707023E+00, 0.3707023E+00, 0.3640686E+00, 0.3617706E+00, &
     & 0.3785200E+00, 0.3504200E+00, 0.3565224E+00, 0.3527921E+00, &
     & 0.3480007E+00, 0.3422634E+00, 0.3360233E+00, 0.3273599E+00, &
     & 0.3172482E+00, 0.3077262E+00, 0.2940520E+00, 0.2760447E+00, &
     & 0.2574670E+00, 0.2331599E+00, 0.1902404E+00, 0.1902404E+00 /
      data (ref_adm(31,iz,15, 7),iz = 1,20) / &
     & 0.3707023E+00, 0.3707023E+00, 0.3640686E+00, 0.3617707E+00, &
     & 0.3599542E+00, 0.3485500E+00, 0.3565224E+00, 0.3527920E+00, &
     & 0.3480007E+00, 0.3422634E+00, 0.3360233E+00, 0.3273599E+00, &
     & 0.3172482E+00, 0.3077262E+00, 0.2940520E+00, 0.2760447E+00, &
     & 0.2574670E+00, 0.2331599E+00, 0.1902404E+00, 0.1902404E+00 /
      data (ref_adm(31,iz,16, 7),iz = 1,20) / &
     & 0.3707023E+00, 0.3707023E+00, 0.3640686E+00, 0.3617706E+00, &
     & 0.3599543E+00, 0.3587120E+00, 0.3565224E+00, 0.3229800E+00, &
     & 0.3480007E+00, 0.3422634E+00, 0.3360233E+00, 0.3273599E+00, &
     & 0.3172482E+00, 0.3077262E+00, 0.2940520E+00, 0.2760447E+00, &
     & 0.2574670E+00, 0.2331599E+00, 0.1902404E+00, 0.1902404E+00 /
      data (ref_adm(31,iz,17, 7),iz = 1,20) / &
     & 0.3707023E+00, 0.3707023E+00, 0.3640686E+00, 0.3617707E+00, &
     & 0.3599542E+00, 0.3587120E+00, 0.3565224E+00, 0.3527920E+00, &
     & 0.3424600E+00, 0.3422634E+00, 0.3360233E+00, 0.3273599E+00, &
     & 0.3172482E+00, 0.3077262E+00, 0.2940520E+00, 0.2760447E+00, &
     & 0.2574670E+00, 0.2331599E+00, 0.1902404E+00, 0.1902404E+00 /
      data (ref_adm(31,iz,18, 7),iz = 1,20) / &
     & 0.3595243E+00, 0.3595243E+00, 0.3567084E+00, 0.3559660E+00, &
     & 0.3570325E+00, 0.3598945E+00, 0.3636136E+00, 0.3673216E+00, &
     & 0.3857200E+00, 0.3751246E+00, 0.3805946E+00, 0.3881116E+00, &
     & 0.3945374E+00, 0.3983113E+00, 0.3994989E+00, 0.3950248E+00, &
     & 0.3833531E+00, 0.3590118E+00, 0.3171179E+00, 0.3171179E+00 /
      data (ref_adm(31,iz,19, 7),iz = 1,20) / &
     & 0.3601598E+00, 0.3601598E+00, 0.3586014E+00, 0.3578960E+00, &
     & 0.3584648E+00, 0.3606997E+00, 0.3644888E+00, 0.3687703E+00, &
     & 0.3728329E+00, 0.4052600E+00, 0.3806322E+00, 0.3864747E+00, &
     & 0.3917667E+00, 0.3943223E+00, 0.3944660E+00, 0.3888009E+00, &
     & 0.3767406E+00, 0.3528275E+00, 0.3136454E+00, 0.3136454E+00 /
      data (ref_adm(31,iz,20, 7),iz = 1,20) / &
     & 0.3608712E+00, 0.3608712E+00, 0.3609654E+00, 0.3607520E+00, &
     & 0.3609696E+00, 0.3624135E+00, 0.3654836E+00, 0.3698417E+00, &
     & 0.3745505E+00, 0.4034300E+00, 0.3822327E+00, 0.3862945E+00, &
     & 0.3901926E+00, 0.3919697E+00, 0.3909401E+00, 0.3846600E+00, &
     & 0.3719882E+00, 0.3484704E+00, 0.3119114E+00, 0.3119114E+00 /
      data (ref_adm(31,iz,21, 7),iz = 1,20) / &
     & 0.3616523E+00, 0.3616523E+00, 0.3639426E+00, 0.3647162E+00, &
     & 0.3650960E+00, 0.3658236E+00, 0.3676564E+00, 0.3710370E+00, &
     & 0.3758336E+00, 0.3807303E+00, 0.3933400E+00, 0.3881430E+00, &
     & 0.3901420E+00, 0.3907741E+00, 0.3890528E+00, 0.3817158E+00, &
     & 0.3688686E+00, 0.3456573E+00, 0.3114738E+00, 0.3114738E+00 /
      data (ref_adm(31,iz,22, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04, 0.3705900E+00,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,23, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,24, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,25, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,26, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,27, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,28, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,29, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,30, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,31, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,32, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,33, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,34, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,35, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,36, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,37, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(31,iz,38, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 35.0 Albedo  0.4482096E+00
      data (ref_adm(31,iz, 1, 8),iz = 1,20) / &
     & 0.4641336E+00, 0.4641336E+00, 0.4558279E+00, 0.4529507E+00, &
     & 0.4506766E+00, 0.4491212E+00, 0.4463797E+00, 0.4417092E+00, &
     & 0.4357103E+00, 0.4285270E+00, 0.4207141E+00, 0.4098673E+00, &
     & 0.3972069E+00, 0.3852850E+00, 0.3681645E+00, 0.3456186E+00, &
     & 0.3223586E+00, 0.2919253E+00, 0.2381884E+00, 0.2381884E+00 /
      data (ref_adm(31,iz, 2, 8),iz = 1,20) / &
     & 0.4641336E+00, 0.4641336E+00, 0.4558279E+00, 0.4529507E+00, &
     & 0.4506766E+00, 0.4491212E+00, 0.4463797E+00, 0.4417092E+00, &
     & 0.4357103E+00, 0.4285270E+00, 0.4207141E+00, 0.4098673E+00, &
     & 0.3972069E+00, 0.3852850E+00, 0.3681645E+00, 0.3456186E+00, &
     & 0.3223586E+00, 0.2919253E+00, 0.2381884E+00, 0.2381884E+00 /
      data (ref_adm(31,iz, 3, 8),iz = 1,20) / &
     & 0.4641336E+00, 0.4641336E+00, 0.4558279E+00, 0.4529507E+00, &
     & 0.4506766E+00, 0.4491212E+00, 0.4463797E+00, 0.4417092E+00, &
     & 0.4357103E+00, 0.4285270E+00, 0.4207141E+00, 0.4098673E+00, &
     & 0.3972069E+00, 0.3852850E+00, 0.3681645E+00, 0.3456186E+00, &
     & 0.3223586E+00, 0.2919253E+00, 0.2381884E+00, 0.2381884E+00 /
      data (ref_adm(31,iz, 4, 8),iz = 1,20) / &
     & 0.4641336E+00, 0.4641336E+00, 0.4558279E+00, 0.4529507E+00, &
     & 0.4506766E+00, 0.4491212E+00, 0.4463797E+00, 0.4417092E+00, &
     & 0.4357103E+00, 0.4285270E+00, 0.4207141E+00, 0.4098673E+00, &
     & 0.3972069E+00, 0.3852850E+00, 0.3681645E+00, 0.3456186E+00, &
     & 0.3223586E+00, 0.2919253E+00, 0.2381884E+00, 0.2381884E+00 /
      data (ref_adm(31,iz, 5, 8),iz = 1,20) / &
     & 0.4641336E+00, 0.4641336E+00, 0.4558279E+00, 0.4529507E+00, &
     & 0.4506766E+00, 0.4491212E+00, 0.4463797E+00, 0.4417092E+00, &
     & 0.4357103E+00, 0.4285270E+00, 0.4207141E+00, 0.4098673E+00, &
     & 0.3972069E+00, 0.3852850E+00, 0.3681645E+00, 0.3456186E+00, &
     & 0.3223586E+00, 0.2919253E+00, 0.2381884E+00, 0.2381884E+00 /
      data (ref_adm(31,iz, 6, 8),iz = 1,20) / &
     & 0.4641336E+00, 0.4641336E+00, 0.4558279E+00, 0.4529507E+00, &
     & 0.4506766E+00, 0.4491212E+00, 0.4463797E+00, 0.4417092E+00, &
     & 0.4357103E+00, 0.4285270E+00, 0.4207141E+00, 0.4098673E+00, &
     & 0.3972069E+00, 0.3852850E+00, 0.3681645E+00, 0.3456186E+00, &
     & 0.3223586E+00, 0.2919253E+00, 0.2381884E+00, 0.2381884E+00 /
      data (ref_adm(31,iz, 7, 8),iz = 1,20) / &
     & 0.4641336E+00, 0.4641336E+00, 0.4558279E+00, 0.4529507E+00, &
     & 0.4506766E+00, 0.4491212E+00, 0.4463797E+00, 0.4417092E+00, &
     & 0.4357103E+00, 0.4285270E+00, 0.4207141E+00, 0.4098673E+00, &
     & 0.3972069E+00, 0.3852850E+00, 0.3681645E+00, 0.3456186E+00, &
     & 0.3223586E+00, 0.2919253E+00, 0.2381884E+00, 0.2381884E+00 /
      data (ref_adm(31,iz, 8, 8),iz = 1,20) / &
     & 0.4641336E+00, 0.4641336E+00, 0.4558279E+00, 0.4529507E+00, &
     & 0.4506766E+00, 0.4491212E+00, 0.4463797E+00, 0.4417092E+00, &
     & 0.4357103E+00, 0.4285270E+00, 0.4207141E+00, 0.4098673E+00, &
     & 0.3972069E+00, 0.3852850E+00, 0.3681645E+00, 0.3456186E+00, &
     & 0.3223586E+00, 0.2919253E+00, 0.2381884E+00, 0.2381884E+00 /
      data (ref_adm(31,iz, 9, 8),iz = 1,20) / &
     & 0.4641336E+00, 0.4641336E+00, 0.4558279E+00, 0.4529507E+00, &
     & 0.4506766E+00, 0.4491212E+00, 0.4463797E+00, 0.4417092E+00, &
     & 0.4357103E+00, 0.4285270E+00, 0.4207141E+00, 0.4098673E+00, &
     & 0.3972069E+00, 0.3852850E+00, 0.3681645E+00, 0.3456186E+00, &
     & 0.3223586E+00, 0.2919253E+00, 0.2381884E+00, 0.2381884E+00 /
      data (ref_adm(31,iz,10, 8),iz = 1,20) / &
     & 0.4641336E+00, 0.4641336E+00, 0.6108600E+00, 0.4529507E+00, &
     & 0.4506766E+00, 0.4491212E+00, 0.4463797E+00, 0.4417092E+00, &
     & 0.4357103E+00, 0.4285270E+00, 0.4207141E+00, 0.4098673E+00, &
     & 0.3972069E+00, 0.3852850E+00, 0.3681645E+00, 0.3456186E+00, &
     & 0.3223586E+00, 0.2919253E+00, 0.2381884E+00, 0.2381884E+00 /
      data (ref_adm(31,iz,11, 8),iz = 1,20) / &
     & 0.4641336E+00, 0.4641336E+00, 0.5160000E+00, 0.4602200E+00, &
     & 0.4891400E+00, 0.4491212E+00, 0.4463797E+00, 0.4417092E+00, &
     & 0.4357103E+00, 0.4285270E+00, 0.4207141E+00, 0.2283300E+00, &
     & 0.3972069E+00, 0.3852850E+00, 0.3681645E+00, 0.3456186E+00, &
     & 0.3223586E+00, 0.2919253E+00, 0.2381884E+00, 0.2381884E+00 /
      data (ref_adm(31,iz,12, 8),iz = 1,20) / &
     & 0.4641336E+00, 0.4641336E+00, 0.4558279E+00, 0.6192500E+00, &
     & 0.6189500E+00, 0.4491212E+00, 0.4594000E+00, 0.4417092E+00, &
     & 0.4357103E+00, 0.4285270E+00, 0.4207141E+00, 0.2075800E+00, &
     & 0.3972069E+00, 0.3852850E+00, 0.3681645E+00, 0.3456186E+00, &
     & 0.3223586E+00, 0.2919253E+00, 0.2381884E+00, 0.2381884E+00 /
      data (ref_adm(31,iz,13, 8),iz = 1,20) / &
     & 0.4641336E+00, 0.4641336E+00, 0.6189100E+00, 0.6232300E+00, &
     & 0.6414300E+00, 0.4491212E+00, 0.3290400E+00, 0.5703600E+00, &
     & 0.4357103E+00, 0.4285270E+00, 0.4207141E+00, 0.2200700E+00, &
     & 0.3972069E+00, 0.3852850E+00, 0.3681645E+00, 0.3456186E+00, &
     & 0.3223586E+00, 0.2919253E+00, 0.2381884E+00, 0.2381884E+00 /
      data (ref_adm(31,iz,14, 8),iz = 1,20) / &
     & 0.4641336E+00, 0.4641336E+00, 0.4558279E+00, 0.4529507E+00, &
     & 0.4506766E+00, 0.4491212E+00, 0.4463797E+00, 0.4417092E+00, &
     & 0.4357103E+00, 0.4285270E+00, 0.4207141E+00, 0.2216900E+00, &
     & 0.4227600E+00, 0.3852850E+00, 0.3681645E+00, 0.3456186E+00, &
     & 0.3223586E+00, 0.2919253E+00, 0.2381884E+00, 0.2381884E+00 /
      data (ref_adm(31,iz,15, 8),iz = 1,20) / &
     & 0.4641336E+00, 0.4641336E+00, 0.4558279E+00, 0.4529507E+00, &
     & 0.4506766E+00, 0.4491212E+00, 0.4463797E+00, 0.4417092E+00, &
     & 0.4357103E+00, 0.4285270E+00, 0.4207141E+00, 0.2012700E+00, &
     & 0.2089800E+00, 0.3852850E+00, 0.3681645E+00, 0.3456186E+00, &
     & 0.3223586E+00, 0.2919253E+00, 0.2381884E+00, 0.2381884E+00 /
      data (ref_adm(31,iz,16, 8),iz = 1,20) / &
     & 0.4641336E+00, 0.4641336E+00, 0.5270600E+00, 0.4529507E+00, &
     & 0.4506766E+00, 0.4491212E+00, 0.4463797E+00, 0.4417092E+00, &
     & 0.4357103E+00, 0.4285270E+00, 0.4207141E+00, 0.4098673E+00, &
     & 0.3972069E+00, 0.3852850E+00, 0.3681645E+00, 0.3456186E+00, &
     & 0.3223586E+00, 0.2919253E+00, 0.2381884E+00, 0.2381884E+00 /
      data (ref_adm(31,iz,17, 8),iz = 1,20) / &
     & 0.4641336E+00, 0.4641336E+00, 0.4558279E+00, 0.4947600E+00, &
     & 0.4506766E+00, 0.4491212E+00, 0.4463797E+00, 0.4417092E+00, &
     & 0.4357103E+00, 0.4285270E+00, 0.4207141E+00, 0.4098673E+00, &
     & 0.3972069E+00, 0.3852850E+00, 0.3681645E+00, 0.3456186E+00, &
     & 0.3223586E+00, 0.2919253E+00, 0.2381884E+00, 0.2381884E+00 /
      data (ref_adm(31,iz,18, 8),iz = 1,20) / &
     & 0.4298634E+00, 0.4298634E+00, 0.4185971E+00, 0.4149271E+00, &
     & 0.5032100E+00, 0.4109861E+00, 0.4087023E+00, 0.4048495E+00, &
     & 0.4002441E+00, 0.3949943E+00, 0.3896543E+00, 0.3826809E+00, &
     & 0.3747522E+00, 0.3673837E+00, 0.3568240E+00, 0.3430825E+00, &
     & 0.3292806E+00, 0.3112641E+00, 0.2724624E+00, 0.2724624E+00 /
      data (ref_adm(31,iz,19, 8),iz = 1,20) / &
     & 0.4298634E+00, 0.4298634E+00, 0.4185971E+00, 0.4149270E+00, &
     & 0.4123623E+00, 0.4109861E+00, 0.4087023E+00, 0.4048495E+00, &
     & 0.4002441E+00, 0.3949943E+00, 0.3896543E+00, 0.3826809E+00, &
     & 0.3747522E+00, 0.3673837E+00, 0.3568240E+00, 0.3430826E+00, &
     & 0.3292806E+00, 0.3112640E+00, 0.2724624E+00, 0.2724624E+00 /
      data (ref_adm(31,iz,20, 8),iz = 1,20) / &
     & 0.4298634E+00, 0.4298634E+00, 0.4185971E+00, 0.4149271E+00, &
     & 0.4123624E+00, 0.4109861E+00, 0.4087023E+00, 0.4048495E+00, &
     & 0.4002441E+00, 0.3949943E+00, 0.3896543E+00, 0.3826809E+00, &
     & 0.3747522E+00, 0.3673837E+00, 0.3568240E+00, 0.3430825E+00, &
     & 0.3292806E+00, 0.3112641E+00, 0.2724624E+00, 0.2724624E+00 /
      data (ref_adm(31,iz,21, 8),iz = 1,20) / &
     & 0.4298634E+00, 0.4298634E+00, 0.4185971E+00, 0.4149270E+00, &
     & 0.4123623E+00, 0.4109861E+00, 0.4087023E+00, 0.4048495E+00, &
     & 0.4002441E+00, 0.3949943E+00, 0.3896543E+00, 0.3826809E+00, &
     & 0.3747522E+00, 0.3673837E+00, 0.3568240E+00, 0.3430826E+00, &
     & 0.3292806E+00, 0.3112640E+00, 0.2724624E+00, 0.2724624E+00 /
      data (ref_adm(31,iz,22, 8),iz = 1,20) / &
     & 0.5678183E+00, 0.5678183E+00, 0.5576572E+00, 0.5541373E+00, &
     & 0.5513552E+00, 0.5494522E+00, 0.5460984E+00, 0.5403846E+00, &
     & 0.5330455E+00, 0.5242574E+00, 0.5146993E+00, 0.5014293E+00, &
     & 0.4859406E+00, 0.4713555E+00, 0.4504102E+00, 0.4228278E+00, &
     & 0.3943717E+00, 0.3571397E+00, 0.2913983E+00, 0.2913983E+00 /
      data (ref_adm(31,iz,23, 8),iz = 1,20) / &
     & 0.5678183E+00, 0.5678183E+00, 0.5576572E+00, 0.5541374E+00, &
     & 0.5513551E+00, 0.5494522E+00, 0.5460984E+00, 0.5403844E+00, &
     & 0.5330455E+00, 0.5242574E+00, 0.5146992E+00, 0.5014293E+00, &
     & 0.4859406E+00, 0.4713555E+00, 0.4504102E+00, 0.4228278E+00, &
     & 0.3943717E+00, 0.3571397E+00, 0.2913983E+00, 0.2913983E+00 /
      data (ref_adm(31,iz,24, 8),iz = 1,20) / &
     & 0.5678183E+00, 0.5678183E+00, 0.5576572E+00, 0.5541373E+00, &
     & 0.5513552E+00, 0.5494522E+00, 0.5460984E+00, 0.5403846E+00, &
     & 0.5330455E+00, 0.5242574E+00, 0.5146993E+00, 0.5014293E+00, &
     & 0.4859406E+00, 0.4713555E+00, 0.4504102E+00, 0.4228278E+00, &
     & 0.3943717E+00, 0.3571397E+00, 0.2913983E+00, 0.2913983E+00 /
      data (ref_adm(31,iz,25, 8),iz = 1,20) / &
     & 0.5678183E+00, 0.5678183E+00, 0.5576572E+00, 0.5541374E+00, &
     & 0.6338700E+00, 0.5494522E+00, 0.5460984E+00, 0.5403844E+00, &
     & 0.5330455E+00, 0.5242574E+00, 0.5146992E+00, 0.5014293E+00, &
     & 0.4859406E+00, 0.4713555E+00, 0.4504102E+00, 0.4228278E+00, &
     & 0.3943717E+00, 0.3571397E+00, 0.2913983E+00, 0.2913983E+00 /
      data (ref_adm(31,iz,26, 8),iz = 1,20) / &
     & 0.5678183E+00, 0.5678183E+00, 0.5442600E+00, 0.5541373E+00, &
     & 0.5513552E+00, 0.5494522E+00, 0.5460984E+00, 0.5403846E+00, &
     & 0.5330455E+00, 0.5242574E+00, 0.5146993E+00, 0.5014293E+00, &
     & 0.4859406E+00, 0.4713555E+00, 0.4504102E+00, 0.4228278E+00, &
     & 0.3943717E+00, 0.3571397E+00, 0.2913983E+00, 0.2913983E+00 /
      data (ref_adm(31,iz,27, 8),iz = 1,20) / &
     & 0.5678183E+00, 0.5678183E+00, 0.5576572E+00, 0.5541374E+00, &
     & 0.5513551E+00, 0.5494522E+00, 0.5460984E+00, 0.5403844E+00, &
     & 0.5330455E+00, 0.5242574E+00, 0.5146992E+00, 0.5014293E+00, &
     & 0.4859406E+00, 0.4713555E+00, 0.4504102E+00, 0.4228278E+00, &
     & 0.3943717E+00, 0.3571397E+00, 0.2913983E+00, 0.2913983E+00 /
      data (ref_adm(31,iz,28, 8),iz = 1,20) / &
     & 0.6085700E+00, 0.6085700E+00, 0.5996700E+00, 0.4996300E+00, &
     & 0.3934600E+00, 0.5494522E+00, 0.5460984E+00, 0.5403846E+00, &
     & 0.5330455E+00, 0.5242574E+00, 0.5146993E+00, 0.5014293E+00, &
     & 0.4859406E+00, 0.4713555E+00, 0.4504102E+00, 0.4228278E+00, &
     & 0.3943717E+00, 0.3571397E+00, 0.2913983E+00, 0.2913983E+00 /
      data (ref_adm(31,iz,29, 8),iz = 1,20) / &
     & 0.6214000E+00, 0.6214000E+00, 0.5576572E+00, 0.5541374E+00, &
     & 0.5513551E+00, 0.5494522E+00, 0.5460984E+00, 0.5403844E+00, &
     & 0.5330455E+00, 0.5242574E+00, 0.5146992E+00, 0.5014293E+00, &
     & 0.4859406E+00, 0.4713555E+00, 0.4504102E+00, 0.4228278E+00, &
     & 0.3943717E+00, 0.3571397E+00, 0.2913983E+00, 0.2913983E+00 /
      data (ref_adm(31,iz,30, 8),iz = 1,20) / &
     & 0.5678183E+00, 0.5678183E+00, 0.5576572E+00, 0.5541373E+00, &
     & 0.5513552E+00, 0.5494522E+00, 0.5460984E+00, 0.5403846E+00, &
     & 0.5330455E+00, 0.5242574E+00, 0.5146993E+00, 0.5014293E+00, &
     & 0.4859406E+00, 0.4713555E+00, 0.4504102E+00, 0.4228278E+00, &
     & 0.3943717E+00, 0.3571397E+00, 0.2913983E+00, 0.2913983E+00 /
      data (ref_adm(31,iz,31, 8),iz = 1,20) / &
     & 0.5678183E+00, 0.5678183E+00, 0.5576572E+00, 0.5541374E+00, &
     & 0.5513551E+00, 0.5494522E+00, 0.5460984E+00, 0.5403844E+00, &
     & 0.5330455E+00, 0.5242574E+00, 0.5146992E+00, 0.5014293E+00, &
     & 0.4859406E+00, 0.4713555E+00, 0.4504102E+00, 0.4228278E+00, &
     & 0.3943717E+00, 0.3571397E+00, 0.2913983E+00, 0.2913983E+00 /
      data (ref_adm(31,iz,32, 8),iz = 1,20) / &
     & 0.5678183E+00, 0.5678183E+00, 0.5576572E+00, 0.5541373E+00, &
     & 0.5513552E+00, 0.5494522E+00, 0.5460984E+00, 0.5403846E+00, &
     & 0.5330455E+00, 0.5242574E+00, 0.5146993E+00, 0.5014293E+00, &
     & 0.4859406E+00, 0.4713555E+00, 0.4504102E+00, 0.4228278E+00, &
     & 0.3943717E+00, 0.3571397E+00, 0.2913983E+00, 0.2913983E+00 /
      data (ref_adm(31,iz,33, 8),iz = 1,20) / &
     & 0.5678183E+00, 0.5678183E+00, 0.5576572E+00, 0.5541374E+00, &
     & 0.5513551E+00, 0.5494522E+00, 0.5460984E+00, 0.5403844E+00, &
     & 0.5330455E+00, 0.5242574E+00, 0.5146992E+00, 0.5014293E+00, &
     & 0.4859406E+00, 0.4713555E+00, 0.4504102E+00, 0.4228278E+00, &
     & 0.3943717E+00, 0.3571397E+00, 0.2913983E+00, 0.2913983E+00 /
      data (ref_adm(31,iz,34, 8),iz = 1,20) / &
     & 0.5678183E+00, 0.5678183E+00, 0.5576572E+00, 0.5541373E+00, &
     & 0.5513552E+00, 0.5494522E+00, 0.5460984E+00, 0.5403846E+00, &
     & 0.5330455E+00, 0.5242574E+00, 0.5146993E+00, 0.5014293E+00, &
     & 0.4859406E+00, 0.4713555E+00, 0.4504102E+00, 0.4228278E+00, &
     & 0.3943717E+00, 0.3571397E+00, 0.2913983E+00, 0.2913983E+00 /
      data (ref_adm(31,iz,35, 8),iz = 1,20) / &
     & 0.5678183E+00, 0.5678183E+00, 0.5576572E+00, 0.5541374E+00, &
     & 0.5513551E+00, 0.5494522E+00, 0.5460984E+00, 0.5403844E+00, &
     & 0.5330455E+00, 0.5242574E+00, 0.5146992E+00, 0.5014293E+00, &
     & 0.4859406E+00, 0.4713555E+00, 0.4504102E+00, 0.4228278E+00, &
     & 0.3943717E+00, 0.3571397E+00, 0.2913983E+00, 0.2913983E+00 /
      data (ref_adm(31,iz,36, 8),iz = 1,20) / &
     & 0.5678183E+00, 0.5678183E+00, 0.5576572E+00, 0.5541373E+00, &
     & 0.5513552E+00, 0.5494522E+00, 0.5460984E+00, 0.5403846E+00, &
     & 0.5330455E+00, 0.5242574E+00, 0.5146993E+00, 0.5014293E+00, &
     & 0.4859406E+00, 0.4713555E+00, 0.4504102E+00, 0.4228278E+00, &
     & 0.3943717E+00, 0.3571397E+00, 0.2913983E+00, 0.2913983E+00 /
      data (ref_adm(31,iz,37, 8),iz = 1,20) / &
     & 0.5678183E+00, 0.5678183E+00, 0.5576572E+00, 0.5639100E+00, &
     & 0.5513552E+00, 0.5494522E+00, 0.5460984E+00, 0.5403846E+00, &
     & 0.5330455E+00, 0.5242574E+00, 0.5146993E+00, 0.5014293E+00, &
     & 0.4859406E+00, 0.4713555E+00, 0.4504102E+00, 0.4228278E+00, &
     & 0.3943717E+00, 0.3571397E+00, 0.2913983E+00, 0.2913983E+00 /
      data (ref_adm(31,iz,38, 8),iz = 1,20) / &
     & 0.5678183E+00, 0.5678183E+00, 0.5576572E+00, 0.5639100E+00, &
     & 0.5513552E+00, 0.5494522E+00, 0.5460984E+00, 0.5403846E+00, &
     & 0.5330455E+00, 0.5242574E+00, 0.5146993E+00, 0.5014293E+00, &
     & 0.4859406E+00, 0.4713555E+00, 0.4504102E+00, 0.4228278E+00, &
     & 0.3943717E+00, 0.3571397E+00, 0.2913983E+00, 0.2913983E+00 /
! Solar Zenith Angle 40.0 Albedo  0.4062246E+00
      data (ref_adm(31,iz, 1, 9),iz = 1,20) / &
     & 0.3188595E+00, 0.3188595E+00, 0.3269712E+00, 0.3351961E+00, &
     & 0.5922800E+00, 0.3572524E+00, 0.3721187E+00, 0.3887631E+00, &
     & 0.4064921E+00, 0.4261607E+00, 0.4526637E+00, 0.5028690E+00, &
     & 0.5783383E+00, 0.6439378E+00, 0.7448114E+00, 0.9647431E+00, &
     & 0.1420382E+01, 0.2302063E+01, 0.1612489E+01, 0.1612489E+01 /
      data (ref_adm(31,iz, 2, 9),iz = 1,20) / &
     & 0.3188595E+00, 0.3188595E+00, 0.3269712E+00, 0.3351961E+00, &
     & 0.5922800E+00, 0.3572524E+00, 0.3721187E+00, 0.3887631E+00, &
     & 0.4064921E+00, 0.4261607E+00, 0.4526637E+00, 0.5028690E+00, &
     & 0.5783383E+00, 0.6439378E+00, 0.7448114E+00, 0.9647431E+00, &
     & 0.1420382E+01, 0.2302063E+01, 0.1612489E+01, 0.1612489E+01 /
      data (ref_adm(31,iz, 3, 9),iz = 1,20) / &
     & 0.3188070E+00, 0.3188070E+00, 0.4507600E+00, 0.3350452E+00, &
     & 0.3449305E+00, 0.3570623E+00, 0.3716262E+00, 0.3879740E+00, &
     & 0.4058997E+00, 0.4255479E+00, 0.4518656E+00, 0.5011197E+00, &
     & 0.5744006E+00, 0.6396065E+00, 0.7362200E+00, 0.9383525E+00, &
     & 0.1335585E+01, 0.2288254E+01, 0.8460285E+00, 0.8460285E+00 /
      data (ref_adm(31,iz, 4, 9),iz = 1,20) / &
     & 0.3187904E+00, 0.3187904E+00, 0.3267787E+00, 0.6024300E+00, &
     & 0.3445321E+00, 0.3567243E+00, 0.3711547E+00, 0.3875546E+00, &
     & 0.4049640E+00, 0.4245079E+00, 0.4495087E+00, 0.4959385E+00, &
     & 0.5660831E+00, 0.6308370E+00, 0.7188575E+00, 0.8868172E+00, &
     & 0.1187637E+01, 0.1993364E+01, 0.1814064E+01, 0.1814064E+01 /
      data (ref_adm(31,iz, 5, 9),iz = 1,20) / &
     & 0.3189401E+00, 0.3189401E+00, 0.3266178E+00, 0.4690900E+00, &
     & 0.3359700E+00, 0.3557554E+00, 0.3699495E+00, 0.3860238E+00, &
     & 0.4036604E+00, 0.4227890E+00, 0.4464920E+00, 0.4897638E+00, &
     & 0.5531001E+00, 0.6182484E+00, 0.6988235E+00, 0.8266067E+00, &
     & 0.1039632E+01, 0.1503772E+01, 0.1723194E+01, 0.1723194E+01 /
      data (ref_adm(31,iz, 6, 9),iz = 1,20) / &
     & 0.3187556E+00, 0.3187556E+00, 0.3262388E+00, 0.3341450E+00, &
     & 0.3432137E+00, 0.3547120E+00, 0.3683722E+00, 0.3842653E+00, &
     & 0.4016588E+00, 0.4204194E+00, 0.4429175E+00, 0.4823288E+00, &
     & 0.5376041E+00, 0.5988258E+00, 0.6774297E+00, 0.7746751E+00, &
     & 0.9175237E+00, 0.1175403E+01, 0.1211026E+01, 0.1211026E+01 /
      data (ref_adm(31,iz, 7, 9),iz = 1,20) / &
     & 0.3185929E+00, 0.3185929E+00, 0.3258950E+00, 0.3336471E+00, &
     & 0.3423180E+00, 0.3533804E+00, 0.3666871E+00, 0.3820098E+00, &
     & 0.3992380E+00, 0.4178534E+00, 0.4389971E+00, 0.4744124E+00, &
     & 0.5226942E+00, 0.5742247E+00, 0.6524042E+00, 0.7372951E+00, &
     & 0.8222082E+00, 0.9668993E+00, 0.9323072E+00, 0.9323072E+00 /
      data (ref_adm(31,iz, 8, 9),iz = 1,20) / &
     & 0.2221000E+00, 0.2221000E+00, 0.3256278E+00, 0.3327617E+00, &
     & 0.3413850E+00, 0.3518699E+00, 0.3645001E+00, 0.3792522E+00, &
     & 0.3963303E+00, 0.4146820E+00, 0.4350032E+00, 0.4669238E+00, &
     & 0.5084322E+00, 0.5515374E+00, 0.6195067E+00, 0.7047871E+00, &
     & 0.7727831E+00, 0.8434522E+00, 0.7877018E+00, 0.7877018E+00 /
      data (ref_adm(31,iz, 9, 9),iz = 1,20) / &
     & 0.3183701E+00, 0.3183701E+00, 0.3250182E+00, 0.3318690E+00, &
     & 0.3401335E+00, 0.3501294E+00, 0.3623950E+00, 0.3764462E+00, &
     & 0.3926667E+00, 0.4109693E+00, 0.4307510E+00, 0.4596232E+00, &
     & 0.4960396E+00, 0.5311912E+00, 0.5853807E+00, 0.6606888E+00, &
     & 0.7357311E+00, 0.7844617E+00, 0.7084144E+00, 0.7084144E+00 /
      data (ref_adm(31,iz,10, 9),iz = 1,20) / &
     & 0.3183724E+00, 0.3183724E+00, 0.3244656E+00, 0.3310749E+00, &
     & 0.3389440E+00, 0.3482881E+00, 0.3596371E+00, 0.3731609E+00, &
     & 0.3888621E+00, 0.4063977E+00, 0.4256553E+00, 0.4532042E+00, &
     & 0.4848304E+00, 0.5157343E+00, 0.5588937E+00, 0.6176066E+00, &
     & 0.6768736E+00, 0.7350928E+00, 0.6752691E+00, 0.6752691E+00 /
      data (ref_adm(31,iz,11, 9),iz = 1,20) / &
     & 0.3180916E+00, 0.3180916E+00, 0.3240243E+00, 0.3301627E+00, &
     & 0.3358500E+00, 0.3463573E+00, 0.3569728E+00, 0.3696362E+00, &
     & 0.3844016E+00, 0.4011291E+00, 0.4203079E+00, 0.4468684E+00, &
     & 0.4761147E+00, 0.5021364E+00, 0.5381929E+00, 0.5844970E+00, &
     & 0.6286627E+00, 0.6692612E+00, 0.6224290E+00, 0.6224290E+00 /
      data (ref_adm(31,iz,12, 9),iz = 1,20) / &
     & 0.3111100E+00, 0.3111100E+00, 0.4834400E+00, 0.3290588E+00, &
     & 0.3544000E+00, 0.3442886E+00, 0.3542176E+00, 0.3659735E+00, &
     & 0.3799771E+00, 0.3956786E+00, 0.4138540E+00, 0.4394947E+00, &
     & 0.4676916E+00, 0.4914644E+00, 0.5230921E+00, 0.5608202E+00, &
     & 0.5957469E+00, 0.6241419E+00, 0.5806674E+00, 0.5806674E+00 /
      data (ref_adm(31,iz,13, 9),iz = 1,20) / &
     & 0.2784500E+00, 0.2784500E+00, 0.4374900E+00, 0.4933000E+00, &
     & 0.3841500E+00, 0.2666400E+00, 0.2182100E+00, 0.2495500E+00, &
     & 0.5529700E+00, 0.3219700E+00, 0.2747600E+00, 0.2629700E+00, &
     & 0.2828900E+00, 0.4816638E+00, 0.5102793E+00, 0.5435793E+00, &
     & 0.5721090E+00, 0.5929597E+00, 0.5516110E+00, 0.5516110E+00 /
      data (ref_adm(31,iz,14, 9),iz = 1,20) / &
     & 0.3274600E+00, 0.3274600E+00, 0.3217685E+00, 0.3268235E+00, &
     & 0.3328629E+00, 0.1879500E+00, 0.2027200E+00, 0.3090000E+00, &
     & 0.2792000E+00, 0.3842447E+00, 0.4000953E+00, 0.2773800E+00, &
     & 0.2520900E+00, 0.4704015E+00, 0.4980056E+00, 0.5294144E+00, &
     & 0.5552408E+00, 0.5725844E+00, 0.5308000E+00, 0.5308000E+00 /
      data (ref_adm(31,iz,15, 9),iz = 1,20) / &
     & 0.3175347E+00, 0.3175347E+00, 0.3985000E+00, 0.4909400E+00, &
     & 0.3309847E+00, 0.3377791E+00, 0.3457074E+00, 0.3551598E+00, &
     & 0.3660456E+00, 0.3783950E+00, 0.3931914E+00, 0.4144136E+00, &
     & 0.5739600E+00, 0.2126900E+00, 0.4843799E+00, 0.5146427E+00, &
     & 0.5395807E+00, 0.5561217E+00, 0.5142024E+00, 0.5142024E+00 /
      data (ref_adm(31,iz,16, 9),iz = 1,20) / &
     & 0.3792900E+00, 0.3792900E+00, 0.3204854E+00, 0.3242406E+00, &
     & 0.4410600E+00, 0.3354424E+00, 0.2348100E+00, 0.2063100E+00, &
     & 0.3615819E+00, 0.3732330E+00, 0.3865442E+00, 0.4058898E+00, &
     & 0.4279322E+00, 0.4466404E+00, 0.4706686E+00, 0.4980833E+00, &
     & 0.5206382E+00, 0.5372421E+00, 0.4984659E+00, 0.4984659E+00 /
      data (ref_adm(31,iz,17, 9),iz = 1,20) / &
     & 0.3171229E+00, 0.3171229E+00, 0.3196675E+00, 0.3230107E+00, &
     & 0.3275246E+00, 0.3332370E+00, 0.3399977E+00, 0.3479702E+00, &
     & 0.3573558E+00, 0.3681515E+00, 0.3804834E+00, 0.3980603E+00, &
     & 0.4180394E+00, 0.4351115E+00, 0.4572567E+00, 0.4825557E+00, &
     & 0.5033746E+00, 0.5175796E+00, 0.4815595E+00, 0.4815595E+00 /
      data (ref_adm(31,iz,18, 9),iz = 1,20) / &
     & 0.2942705E+00, 0.2942705E+00, 0.2966712E+00, 0.2982671E+00, &
     & 0.2973413E+00, 0.2946709E+00, 0.2924512E+00, 0.2902958E+00, &
     & 0.2896316E+00, 0.2898204E+00, 0.2922148E+00, 0.2956127E+00, &
     & 0.3012616E+00, 0.3070310E+00, 0.3141347E+00, 0.3211638E+00, &
     & 0.3240178E+00, 0.3160384E+00, 0.2732557E+00, 0.2732557E+00 /
      data (ref_adm(31,iz,19, 9),iz = 1,20) / &
     & 0.2626800E+00, 0.2626800E+00, 0.3082800E+00, 0.2981349E+00, &
     & 0.2985590E+00, 0.2961884E+00, 0.2938332E+00, 0.2915881E+00, &
     & 0.2907188E+00, 0.2909287E+00, 0.2924375E+00, 0.2960818E+00, &
     & 0.3005216E+00, 0.3057674E+00, 0.3124231E+00, 0.3186388E+00, &
     & 0.3212857E+00, 0.3132445E+00, 0.2715177E+00, 0.2715177E+00 /
      data (ref_adm(31,iz,20, 9),iz = 1,20) / &
     & 0.2463700E+00, 0.2463700E+00, 0.2956044E+00, 0.5134300E+00, &
     & 0.2994362E+00, 0.2979395E+00, 0.2956023E+00, 0.2935460E+00, &
     & 0.2920469E+00, 0.2922037E+00, 0.2929879E+00, 0.2962863E+00, &
     & 0.3001600E+00, 0.3045524E+00, 0.3108025E+00, 0.3165117E+00, &
     & 0.3186485E+00, 0.3103606E+00, 0.2699885E+00, 0.2699885E+00 /
      data (ref_adm(31,iz,21, 9),iz = 1,20) / &
     & 0.2981100E+00, 0.2981100E+00, 0.2950600E+00, 0.2975716E+00, &
     & 0.2779600E+00, 0.2241300E+00, 0.2973322E+00, 0.2957202E+00, &
     & 0.2940784E+00, 0.2935411E+00, 0.2938295E+00, 0.2554700E+00, &
     & 0.3000185E+00, 0.3037480E+00, 0.3090915E+00, 0.3142331E+00, &
     & 0.3161147E+00, 0.3075833E+00, 0.2685858E+00, 0.2685858E+00 /
      data (ref_adm(31,iz,22, 9),iz = 1,20) / &
     & 0.2889100E+00, 0.2889100E+00, 0.3739015E+00, 0.3525700E+00, &
     & 0.3791219E+00, 0.2943000E+00, 0.3848600E+00, 0.3879240E+00, &
     & 0.3858135E+00, 0.3021500E+00, 0.2360100E+00, 0.3846762E+00, &
     & 0.3850787E+00, 0.3845102E+00, 0.3822454E+00, 0.3756042E+00, &
     & 0.3631707E+00, 0.3374671E+00, 0.2785009E+00, 0.2785009E+00 /
      data (ref_adm(31,iz,23, 9),iz = 1,20) / &
     & 0.2641300E+00, 0.2641300E+00, 0.2812500E+00, 0.3744062E+00, &
     & 0.2406000E+00, 0.3859082E+00, 0.3907186E+00, 0.3885868E+00, &
     & 0.3868291E+00, 0.3845551E+00, 0.3841439E+00, 0.3845369E+00, &
     & 0.3847969E+00, 0.3834172E+00, 0.3810656E+00, 0.3742683E+00, &
     & 0.3613775E+00, 0.3360929E+00, 0.2778656E+00, 0.2778656E+00 /
      data (ref_adm(31,iz,24, 9),iz = 1,20) / &
     & 0.2268500E+00, 0.2268500E+00, 0.3131200E+00, 0.3745522E+00, &
     & 0.3771544E+00, 0.3846524E+00, 0.3907568E+00, 0.3897125E+00, &
     & 0.1989000E+00, 0.2190100E+00, 0.3847826E+00, 0.3844634E+00, &
     & 0.3847041E+00, 0.3830615E+00, 0.3800721E+00, 0.3731333E+00, &
     & 0.3601866E+00, 0.3346559E+00, 0.2771285E+00, 0.2771285E+00 /
      data (ref_adm(31,iz,25, 9),iz = 1,20) / &
     & 0.3745536E+00, 0.3745536E+00, 0.3747149E+00, 0.3748433E+00, &
     & 0.3764668E+00, 0.3835731E+00, 0.3905752E+00, 0.3906926E+00, &
     & 0.3886549E+00, 0.1918700E+00, 0.3851698E+00, 0.3844796E+00, &
     & 0.3845447E+00, 0.3825536E+00, 0.3791512E+00, 0.3719667E+00, &
     & 0.3585920E+00, 0.3334476E+00, 0.2765299E+00, 0.2765299E+00 /
      data (ref_adm(31,iz,26, 9),iz = 1,20) / &
     & 0.5742800E+00, 0.5742800E+00, 0.3752905E+00, 0.3751512E+00, &
     & 0.3759704E+00, 0.3820103E+00, 0.3901460E+00, 0.3917546E+00, &
     & 0.3891663E+00, 0.2160800E+00, 0.3854672E+00, 0.3845186E+00, &
     & 0.3840843E+00, 0.3823124E+00, 0.3783964E+00, 0.3707479E+00, &
     & 0.3575481E+00, 0.3321304E+00, 0.2759336E+00, 0.2759336E+00 /
      data (ref_adm(31,iz,27, 9),iz = 1,20) / &
     & 0.2591200E+00, 0.2591200E+00, 0.5011600E+00, 0.3750243E+00, &
     & 0.3288300E+00, 0.3401400E+00, 0.3894351E+00, 0.3924086E+00, &
     & 0.3902535E+00, 0.3879730E+00, 0.3860232E+00, 0.3847355E+00, &
     & 0.3840137E+00, 0.3819338E+00, 0.3776968E+00, 0.3697511E+00, &
     & 0.3564342E+00, 0.3310513E+00, 0.2754249E+00, 0.2754249E+00 /
      data (ref_adm(31,iz,28, 9),iz = 1,20) / &
     & 0.3653600E+00, 0.3653600E+00, 0.3765873E+00, 0.2768900E+00, &
     & 0.3307200E+00, 0.4375700E+00, 0.3884048E+00, 0.3930906E+00, &
     & 0.3909736E+00, 0.4677900E+00, 0.5009200E+00, 0.3849286E+00, &
     & 0.3836597E+00, 0.3817365E+00, 0.3769780E+00, 0.3686532E+00, &
     & 0.3554686E+00, 0.3299645E+00, 0.2749271E+00, 0.2749271E+00 /
      data (ref_adm(31,iz,29, 9),iz = 1,20) / &
     & 0.5866400E+00, 0.5866400E+00, 0.3774688E+00, 0.3765426E+00, &
     & 0.3757497E+00, 0.3788920E+00, 0.3873532E+00, 0.3933686E+00, &
     & 0.3916413E+00, 0.3895461E+00, 0.3868896E+00, 0.3851450E+00, &
     & 0.3833535E+00, 0.3818859E+00, 0.3765066E+00, 0.3677167E+00, &
     & 0.3544640E+00, 0.3288244E+00, 0.2744479E+00, 0.2744479E+00 /
      data (ref_adm(31,iz,30, 9),iz = 1,20) / &
     & 0.4870800E+00, 0.4870800E+00, 0.3792633E+00, 0.3769987E+00, &
     & 0.3762061E+00, 0.5375400E+00, 0.5318300E+00, 0.3934022E+00, &
     & 0.3927462E+00, 0.3902764E+00, 0.3876082E+00, 0.3853576E+00, &
     & 0.3832728E+00, 0.3813103E+00, 0.3762243E+00, 0.3672041E+00, &
     & 0.3538547E+00, 0.3282320E+00, 0.2741589E+00, 0.2741589E+00 /
      data (ref_adm(31,iz,31, 9),iz = 1,20) / &
     & 0.5532400E+00, 0.5532400E+00, 0.3804829E+00, 0.3778943E+00, &
     & 0.3763227E+00, 0.3775048E+00, 0.3855012E+00, 0.6211600E+00, &
     & 0.3933901E+00, 0.3908535E+00, 0.3880143E+00, 0.3854884E+00, &
     & 0.3832565E+00, 0.3811544E+00, 0.3758001E+00, 0.3664927E+00, &
     & 0.3532077E+00, 0.3272516E+00, 0.2738875E+00, 0.2738875E+00 /
      data (ref_adm(31,iz,32, 9),iz = 1,20) / &
     & 0.3757337E+00, 0.3757337E+00, 0.3844852E+00, 0.3800135E+00, &
     & 0.3765781E+00, 0.3777039E+00, 0.3840829E+00, 0.3929618E+00, &
     & 0.3940672E+00, 0.3914975E+00, 0.3886428E+00, 0.3856144E+00, &
     & 0.3832453E+00, 0.3809811E+00, 0.3756716E+00, 0.3660197E+00, &
     & 0.3525358E+00, 0.3266472E+00, 0.2735652E+00, 0.2735652E+00 /
      data (ref_adm(31,iz,33, 9),iz = 1,20) / &
     & 0.3758996E+00, 0.3758996E+00, 0.3894234E+00, 0.3827564E+00, &
     & 0.3773034E+00, 0.3774201E+00, 0.3832206E+00, 0.3926153E+00, &
     & 0.3947482E+00, 0.3917197E+00, 0.3889705E+00, 0.3859341E+00, &
     & 0.3830675E+00, 0.3812583E+00, 0.3753147E+00, 0.3652131E+00, &
     & 0.3519696E+00, 0.3259607E+00, 0.2734318E+00, 0.2734318E+00 /
      data (ref_adm(31,iz,34, 9),iz = 1,20) / &
     & 0.6154700E+00, 0.6154700E+00, 0.3957128E+00, 0.3865829E+00, &
     & 0.3775962E+00, 0.3772592E+00, 0.3828613E+00, 0.3921761E+00, &
     & 0.3951136E+00, 0.3920985E+00, 0.3895686E+00, 0.3863450E+00, &
     & 0.3832468E+00, 0.3810359E+00, 0.3752694E+00, 0.3651881E+00, &
     & 0.3513663E+00, 0.3254347E+00, 0.2731982E+00, 0.2731982E+00 /
      data (ref_adm(31,iz,35, 9),iz = 1,20) / &
     & 0.4207200E+00, 0.4207200E+00, 0.5632600E+00, 0.3918461E+00, &
     & 0.3780229E+00, 0.3770033E+00, 0.3822512E+00, 0.3919698E+00, &
     & 0.3952210E+00, 0.3925517E+00, 0.3896713E+00, 0.3863758E+00, &
     & 0.3833378E+00, 0.3808873E+00, 0.3750528E+00, 0.3649007E+00, &
     & 0.3508280E+00, 0.3250634E+00, 0.2730800E+00, 0.2730800E+00 /
      data (ref_adm(31,iz,36, 9),iz = 1,20) / &
     & 0.5127900E+00, 0.5127900E+00, 0.4125929E+00, 0.3973568E+00, &
     & 0.3780098E+00, 0.3774259E+00, 0.3819432E+00, 0.3919746E+00, &
     & 0.3953757E+00, 0.3929000E+00, 0.3899329E+00, 0.3865153E+00, &
     & 0.3833737E+00, 0.3808602E+00, 0.3750089E+00, 0.3646847E+00, &
     & 0.3506645E+00, 0.3248952E+00, 0.2730430E+00, 0.2730430E+00 /
      data (ref_adm(31,iz,37, 9),iz = 1,20) / &
     & 0.2520200E+00, 0.2520200E+00, 0.4248361E+00, 0.4006146E+00, &
     & 0.3781326E+00, 0.3771867E+00, 0.3819162E+00, 0.3915343E+00, &
     & 0.3953526E+00, 0.3931376E+00, 0.3900441E+00, 0.3863435E+00, &
     & 0.3833584E+00, 0.3811360E+00, 0.3749652E+00, 0.3646466E+00, &
     & 0.3507805E+00, 0.3249325E+00, 0.2729713E+00, 0.2729713E+00 /
      data (ref_adm(31,iz,38, 9),iz = 1,20) / &
     & 0.2520200E+00, 0.2520200E+00, 0.4248361E+00, 0.4006146E+00, &
     & 0.3781326E+00, 0.3771867E+00, 0.3819162E+00, 0.3915343E+00, &
     & 0.3953526E+00, 0.3931376E+00, 0.3900441E+00, 0.3863435E+00, &
     & 0.3833584E+00, 0.3811360E+00, 0.3749652E+00, 0.3646466E+00, &
     & 0.3507805E+00, 0.3249325E+00, 0.2729713E+00, 0.2729713E+00 /
! Solar Zenith Angle 45.0 Albedo  0.3547317E+00
      data (ref_adm(31,iz, 1,10),iz = 1,20) / &
     & 0.2474800E+00, 0.2474800E+00, 0.2711400E+00, 0.2265600E+00, &
     & 0.2824605E+00, 0.2923031E+00, 0.2088300E+00, 0.1869100E+00, &
     & 0.2835700E+00, 0.3735800E+00, 0.3793874E+00, 0.4127714E+00, &
     & 0.4489396E+00, 0.6166200E+00, 0.5109528E+00, 0.5425308E+00, &
     & 0.5663518E+00, 0.5810475E+00, 0.5246554E+00, 0.5246554E+00 /
      data (ref_adm(31,iz, 2,10),iz = 1,20) / &
     & 0.2474800E+00, 0.2474800E+00, 0.2711400E+00, 0.2265600E+00, &
     & 0.2824605E+00, 0.2923031E+00, 0.2088300E+00, 0.1869100E+00, &
     & 0.2835700E+00, 0.3735800E+00, 0.3793874E+00, 0.4127714E+00, &
     & 0.4489396E+00, 0.6166200E+00, 0.5109528E+00, 0.5425308E+00, &
     & 0.5663518E+00, 0.5810475E+00, 0.5246554E+00, 0.5246554E+00 /
      data (ref_adm(31,iz, 3,10),iz = 1,20) / &
     & 0.2343000E+00, 0.2343000E+00, 0.2730856E+00, 0.2592100E+00, &
     & 0.2918100E+00, 0.2265600E+00, 0.5613600E+00, 0.2912500E+00, &
     & 0.3577300E+00, 0.3565234E+00, 0.3707000E+00, 0.4705000E+00, &
     & 0.4968700E+00, 0.6014600E+00, 0.2800900E+00, 0.5405788E+00, &
     & 0.5639823E+00, 0.5762886E+00, 0.5547103E-01, 0.5547103E-01 /
      data (ref_adm(31,iz, 4,10),iz = 1,20) / &
     & 0.2889500E+00, 0.2889500E+00, 0.2563600E+00, 0.2277000E+00, &
     & 0.2702600E+00, 0.2682400E+00, 0.2539000E+00, 0.1856200E+00, &
     & 0.3453000E+00, 0.3533600E+00, 0.3561300E+00, 0.3185700E+00, &
     & 0.3875700E+00, 0.4766671E+00, 0.5079548E+00, 0.5381253E+00, &
     & 0.5601403E+00, 0.5694506E+00, 0.5113090E+00, 0.5113090E+00 /
      data (ref_adm(31,iz, 5,10),iz = 1,20) / &
     & 0.5624300E+00, 0.5624300E+00, 0.4496100E+00, 0.2866400E+00, &
     & 0.2261000E+00, 0.2265900E+00, 0.2226200E+00, 0.4118100E+00, &
     & 0.2316800E+00, 0.2906700E+00, 0.3125700E+00, 0.3141100E+00, &
     & 0.3950200E+00, 0.5104000E+00, 0.5050192E+00, 0.5345579E+00, &
     & 0.5542274E+00, 0.5598455E+00, 0.4990543E+00, 0.4990543E+00 /
      data (ref_adm(31,iz, 6,10),iz = 1,20) / &
     & 0.3213500E+00, 0.3213500E+00, 0.2623000E+00, 0.2185500E+00, &
     & 0.2861600E+00, 0.2907207E+00, 0.2470000E+00, 0.3073600E+00, &
     & 0.2741100E+00, 0.3582200E+00, 0.4272000E+00, 0.4572100E+00, &
     & 0.4401789E+00, 0.4826900E+00, 0.5019973E+00, 0.3001000E+00, &
     & 0.5474895E+00, 0.5483670E+00, 0.4844421E+00, 0.4844421E+00 /
      data (ref_adm(31,iz, 7,10),iz = 1,20) / &
     & 0.3464900E+00, 0.3464900E+00, 0.2730556E+00, 0.2518400E+00, &
     & 0.2810363E+00, 0.5032300E+00, 0.2213400E+00, 0.2816800E+00, &
     & 0.2524700E+00, 0.3843600E+00, 0.3214300E+00, 0.4146300E+00, &
     & 0.4362369E+00, 0.4639112E+00, 0.4976096E+00, 0.3237400E+00, &
     & 0.5395288E+00, 0.5355620E+00, 0.4705710E+00, 0.4705710E+00 /
      data (ref_adm(31,iz, 8,10),iz = 1,20) / &
     & 0.2330600E+00, 0.2330600E+00, 0.4432700E+00, 0.2400400E+00, &
     & 0.2121500E+00, 0.2265600E+00, 0.2817300E+00, 0.2297500E+00, &
     & 0.2954400E+00, 0.4166200E+00, 0.3616600E+00, 0.3928400E+00, &
     & 0.5028500E+00, 0.4581893E+00, 0.2327000E+00, 0.3055700E+00, &
     & 0.5313652E+00, 0.5251877E+00, 0.4577890E+00, 0.4577890E+00 /
      data (ref_adm(31,iz, 9,10),iz = 1,20) / &
     & 0.2980100E+00, 0.2980100E+00, 0.2841300E+00, 0.2686500E+00, &
     & 0.2266200E+00, 0.1896000E+00, 0.1763600E+00, 0.2152300E+00, &
     & 0.2172100E+00, 0.3696700E+00, 0.3644100E+00, 0.3934735E+00, &
     & 0.4259029E+00, 0.4284400E+00, 0.5787400E+00, 0.5123748E+00, &
     & 0.5248621E+00, 0.5158046E+00, 0.4463001E+00, 0.4463001E+00 /
      data (ref_adm(31,iz,10,10),iz = 1,20) / &
     & 0.2835600E+00, 0.2835600E+00, 0.2810800E+00, 0.2305700E+00, &
     & 0.1846600E+00, 0.1897700E+00, 0.2123400E+00, 0.1965200E+00, &
     & 0.1825500E+00, 0.2967400E+00, 0.5151100E+00, 0.4397800E+00, &
     & 0.3736000E+00, 0.4450573E+00, 0.4747445E+00, 0.5044910E+00, &
     & 0.5176225E+00, 0.5069268E+00, 0.4367885E+00, 0.4367885E+00 /
      data (ref_adm(31,iz,11,10),iz = 1,20) / &
     & 0.2779300E+00, 0.2779300E+00, 0.2169200E+00, 0.2327500E+00, &
     & 0.2303600E+00, 0.2500300E+00, 0.2285500E+00, 0.1845100E+00, &
     & 0.3215246E+00, 0.3385102E+00, 0.3924500E+00, 0.5019900E+00, &
     & 0.4434200E+00, 0.4376121E+00, 0.4667841E+00, 0.4944887E+00, &
     & 0.5097219E+00, 0.4993447E+00, 0.4282103E+00, 0.4282103E+00 /
      data (ref_adm(31,iz,12,10),iz = 1,20) / &
     & 0.2239000E+00, 0.2239000E+00, 0.2771700E+00, 0.2188500E+00, &
     & 0.2654100E+00, 0.3112400E+00, 0.2406600E+00, 0.5119500E+00, &
     & 0.3187954E+00, 0.3349512E+00, 0.3712500E+00, 0.4850900E+00, &
     & 0.4683100E+00, 0.4296635E+00, 0.4574912E+00, 0.4837171E+00, &
     & 0.4993143E+00, 0.4916237E+00, 0.4208995E+00, 0.4208995E+00 /
      data (ref_adm(31,iz,13,10),iz = 1,20) / &
     & 0.2848100E+00, 0.2848100E+00, 0.2636700E+00, 0.2492000E+00, &
     & 0.2569900E+00, 0.2561800E+00, 0.2441800E+00, 0.2516200E+00, &
     & 0.3009200E+00, 0.2657100E+00, 0.2863600E+00, 0.3767300E+00, &
     & 0.2624800E+00, 0.4212628E+00, 0.4476307E+00, 0.4730576E+00, &
     & 0.4879407E+00, 0.4828164E+00, 0.4139034E+00, 0.4139034E+00 /
      data (ref_adm(31,iz,14,10),iz = 1,20) / &
     & 0.3056600E+00, 0.3056600E+00, 0.2964200E+00, 0.2720200E+00, &
     & 0.2975600E+00, 0.2723400E+00, 0.2670900E+00, 0.2958000E+00, &
     & 0.3233600E+00, 0.2583700E+00, 0.2814200E+00, 0.2615200E+00, &
     & 0.3295000E+00, 0.4316400E+00, 0.4381289E+00, 0.4625000E+00, &
     & 0.4757327E+00, 0.4709577E+00, 0.4063936E+00, 0.4063936E+00 /
      data (ref_adm(31,iz,15,10),iz = 1,20) / &
     & 0.2861600E+00, 0.2861600E+00, 0.2780000E+00, 0.3792600E+00, &
     & 0.5337900E+00, 0.2828064E+00, 0.2898055E+00, 0.4544600E+00, &
     & 0.3758900E+00, 0.3031500E+00, 0.3385000E+00, 0.3197600E+00, &
     & 0.2769200E+00, 0.2731600E+00, 0.4294405E+00, 0.4513052E+00, &
     & 0.4639502E+00, 0.4583678E+00, 0.3970071E+00, 0.3970071E+00 /
      data (ref_adm(31,iz,16,10),iz = 1,20) / &
     & 0.3099500E+00, 0.3099500E+00, 0.3893200E+00, 0.4420900E+00, &
     & 0.3692000E+00, 0.3889000E+00, 0.4786000E+00, 0.5026900E+00, &
     & 0.5874100E+00, 0.2785100E+00, 0.3348763E+00, 0.4003600E+00, &
     & 0.2195800E+00, 0.3985521E+00, 0.4206410E+00, 0.4404321E+00, &
     & 0.4515131E+00, 0.4465955E+00, 0.3872062E+00, 0.3872062E+00 /
      data (ref_adm(31,iz,17,10),iz = 1,20) / &
     & 0.3229200E+00, 0.3229200E+00, 0.5739500E+00, 0.3739300E+00, &
     & 0.3831100E+00, 0.2672800E+00, 0.2540600E+00, 0.2954612E+00, &
     & 0.4650900E+00, 0.3169591E+00, 0.3312097E+00, 0.5033400E+00, &
     & 0.3731252E+00, 0.3912110E+00, 0.4654300E+00, 0.4310833E+00, &
     & 0.4405119E+00, 0.4340102E+00, 0.3783843E+00, 0.3783843E+00 /
      data (ref_adm(31,iz,18,10),iz = 1,20) / &
     & 0.3527000E+00, 0.3527000E+00, 0.3965400E+00, 0.4079200E+00, &
     & 0.3306900E+00, 0.3241258E+00, 0.2259800E+00, 0.3329400E+00, &
     & 0.2683300E+00, 0.3249623E+00, 0.3304956E+00, 0.3695700E+00, &
     & 0.2818000E+00, 0.2210900E+00, 0.4712600E+00, 0.3702577E+00, &
     & 0.3677397E+00, 0.3503094E+00, 0.2949815E+00, 0.2949815E+00 /
      data (ref_adm(31,iz,19,10),iz = 1,20) / &
     & 0.3668400E+00, 0.3668400E+00, 0.4179100E+00, 0.3218800E+00, &
     & 0.2966300E+00, 0.2932600E+00, 0.2484900E+00, 0.1980900E+00, &
     & 0.2808000E+00, 0.2788100E+00, 0.3413600E+00, 0.3135100E+00, &
     & 0.4511000E+00, 0.3009100E+00, 0.3618100E+00, 0.3669403E+00, &
     & 0.3643865E+00, 0.3470953E+00, 0.2930054E+00, 0.2930054E+00 /
      data (ref_adm(31,iz,20,10),iz = 1,20) / &
     & 0.3909600E+00, 0.3909600E+00, 0.3025200E+00, 0.3135800E+00, &
     & 0.3254100E+00, 0.3316500E+00, 0.2928800E+00, 0.2653900E+00, &
     & 0.2305700E+00, 0.5735500E+00, 0.3305640E+00, 0.3377138E+00, &
     & 0.3451692E+00, 0.3519859E+00, 0.4803200E+00, 0.3640577E+00, &
     & 0.3611118E+00, 0.3437788E+00, 0.2912482E+00, 0.2912482E+00 /
      data (ref_adm(31,iz,21,10),iz = 1,20) / &
     & 0.4651200E+00, 0.4651200E+00, 0.2307700E+00, 0.3274500E+00, &
     & 0.3290100E+00, 0.3628000E+00, 0.3278072E+00, 0.3192500E+00, &
     & 0.2262100E+00, 0.2249300E+00, 0.3311459E+00, 0.1957400E+00, &
     & 0.4715300E+00, 0.3504622E+00, 0.2415900E+00, 0.3609996E+00, &
     & 0.3579443E+00, 0.3405733E+00, 0.2896154E+00, 0.2896154E+00 /
      data (ref_adm(31,iz,22,10),iz = 1,20) / &
     & 0.2373300E+00, 0.2373300E+00, 0.3330300E+00, 0.2728800E+00, &
     & 0.2284900E+00, 0.3308200E+00, 0.3036200E+00, 0.3055100E+00, &
     & 0.2392900E+00, 0.2692300E+00, 0.2564700E+00, 0.2934300E+00, &
     & 0.4962400E+00, 0.4537900E+00, 0.3592292E+00, 0.5635500E+00, &
     & 0.3584481E+00, 0.3503055E+00, 0.3392861E+00, 0.3392861E+00 /
      data (ref_adm(31,iz,23,10),iz = 1,20) / &
     & 0.3058300E+00, 0.3058300E+00, 0.3957300E+00, 0.4442400E+00, &
     & 0.3309100E+00, 0.3407300E+00, 0.2915400E+00, 0.2962900E+00, &
     & 0.2969800E+00, 0.2649500E+00, 0.2439900E+00, 0.3419783E+00, &
     & 0.2614300E+00, 0.2412300E+00, 0.2438200E+00, 0.5607700E+00, &
     & 0.3574038E+00, 0.3499512E+00, 0.3425944E+00, 0.3425944E+00 /
      data (ref_adm(31,iz,24,10),iz = 1,20) / &
     & 0.3473600E+00, 0.3473600E+00, 0.2537700E+00, 0.3201700E+00, &
     & 0.2647300E+00, 0.3424000E+00, 0.2224700E+00, 0.2423400E+00, &
     & 0.2704800E+00, 0.2163900E+00, 0.2372100E+00, 0.2614600E+00, &
     & 0.5773600E+00, 0.2068800E+00, 0.3609859E+00, 0.5326800E+00, &
     & 0.3589154E+00, 0.3522277E+00, 0.3480733E+00, 0.3480733E+00 /
      data (ref_adm(31,iz,25,10),iz = 1,20) / &
     & 0.3077100E+00, 0.3077100E+00, 0.2491900E+00, 0.3129100E+00, &
     & 0.2587000E+00, 0.3291700E+00, 0.3107400E+00, 0.2357400E+00, &
     & 0.2552400E+00, 0.2795000E+00, 0.2633700E+00, 0.2725000E+00, &
     & 0.5182700E+00, 0.3608096E+00, 0.3654580E+00, 0.3667836E+00, &
     & 0.3541000E+00, 0.3568781E+00, 0.3552935E+00, 0.3552935E+00 /
      data (ref_adm(31,iz,26,10),iz = 1,20) / &
     & 0.2939400E+00, 0.2939400E+00, 0.2795100E+00, 0.3022700E+00, &
     & 0.3294900E+00, 0.3427200E+00, 0.2991000E+00, 0.2618500E+00, &
     & 0.2478500E+00, 0.2674400E+00, 0.2748300E+00, 0.2249200E+00, &
     & 0.5616100E+00, 0.3639505E+00, 0.3691142E+00, 0.3720571E+00, &
     & 0.3297800E+00, 0.3650562E+00, 0.3647906E+00, 0.3647906E+00 /
      data (ref_adm(31,iz,27,10),iz = 1,20) / &
     & 0.3223600E+00, 0.3223600E+00, 0.3373600E+00, 0.3236900E+00, &
     & 0.2715800E+00, 0.2968100E+00, 0.3219300E+00, 0.3109500E+00, &
     & 0.2743800E+00, 0.3039100E+00, 0.3069000E+00, 0.2856000E+00, &
     & 0.3694274E+00, 0.3753600E+00, 0.3756455E+00, 0.3773356E+00, &
     & 0.3769554E+00, 0.3736797E+00, 0.3757671E+00, 0.3757671E+00 /
      data (ref_adm(31,iz,28,10),iz = 1,20) / &
     & 0.3163300E+00, 0.3163300E+00, 0.2783500E+00, 0.2756400E+00, &
     & 0.3002300E+00, 0.3156100E+00, 0.2783000E+00, 0.2600400E+00, &
     & 0.2407700E+00, 0.2413800E+00, 0.3803952E+00, 0.3426100E+00, &
     & 0.3721900E+00, 0.2994700E+00, 0.3236100E+00, 0.3926223E+00, &
     & 0.3869362E+00, 0.3821636E+00, 0.3871141E+00, 0.3871141E+00 /
      data (ref_adm(31,iz,29,10),iz = 1,20) / &
     & 0.3522100E+00, 0.3522100E+00, 0.3397900E+00, 0.3675600E+00, &
     & 0.3545500E+00, 0.3390000E+00, 0.3326754E+00, 0.3547806E+00, &
     & 0.3677088E+00, 0.2398200E+00, 0.3781894E+00, 0.3894497E+00, &
     & 0.3352400E+00, 0.3280300E+00, 0.4321029E+00, 0.4296870E+00, &
     & 0.4126735E+00, 0.3968002E+00, 0.3990979E+00, 0.3990979E+00 /
      data (ref_adm(31,iz,30,10),iz = 1,20) / &
     & 0.2809800E+00, 0.2809800E+00, 0.2990700E+00, 0.3504200E+00, &
     & 0.3139300E+00, 0.2776500E+00, 0.2822900E+00, 0.3966300E+00, &
     & 0.6452400E+00, 0.3601821E+00, 0.4747600E+00, 0.4260800E+00, &
     & 0.3813400E+00, 0.4435900E+00, 0.3202600E+00, 0.4362204E+00, &
     & 0.4472622E+00, 0.4295437E+00, 0.4151479E+00, 0.4151479E+00 /
      data (ref_adm(31,iz,31,10),iz = 1,20) / &
     & 0.2938700E+00, 0.2938700E+00, 0.2726200E+00, 0.2631900E+00, &
     & 0.3016500E+00, 0.3352700E+00, 0.3614700E+00, 0.3092300E+00, &
     & 0.4530100E+00, 0.4156900E+00, 0.4777300E+00, 0.4785000E+00, &
     & 0.4719900E+00, 0.4365700E+00, 0.4306900E+00, 0.4333600E+00, &
     & 0.4362423E+00, 0.4546184E+00, 0.4365866E+00, 0.4365866E+00 /
      data (ref_adm(31,iz,32,10),iz = 1,20) / &
     & 0.2462400E+00, 0.2462400E+00, 0.2201800E+00, 0.2093400E+00, &
     & 0.2364800E+00, 0.3976300E+00, 0.2417700E+00, 0.2884000E+00, &
     & 0.3507529E+00, 0.3599462E+00, 0.3696176E+00, 0.3820914E+00, &
     & 0.3947453E+00, 0.4045153E+00, 0.4155968E+00, 0.4261864E+00, &
     & 0.4332004E+00, 0.4440901E+00, 0.4513278E+00, 0.4513278E+00 /
      data (ref_adm(31,iz,33,10),iz = 1,20) / &
     & 0.2563800E+00, 0.2563800E+00, 0.2356500E+00, 0.2230700E+00, &
     & 0.2579900E+00, 0.2893400E+00, 0.5333600E+00, 0.2409900E+00, &
     & 0.3512338E+00, 0.3602180E+00, 0.3696881E+00, 0.3821592E+00, &
     & 0.3948512E+00, 0.4046539E+00, 0.4162150E+00, 0.4279073E+00, &
     & 0.4364170E+00, 0.4421809E+00, 0.4537913E+00, 0.4537913E+00 /
      data (ref_adm(31,iz,34,10),iz = 1,20) / &
     & 0.2425500E+00, 0.2425500E+00, 0.3258000E+00, 0.2545500E+00, &
     & 0.2666200E+00, 0.3413100E+00, 0.4324600E+00, 0.3430778E+00, &
     & 0.3514530E+00, 0.3602287E+00, 0.3696065E+00, 0.3824432E+00, &
     & 0.3955856E+00, 0.4054111E+00, 0.4165944E+00, 0.4284291E+00, &
     & 0.4381253E+00, 0.4459561E+00, 0.4567059E+00, 0.4567059E+00 /
      data (ref_adm(31,iz,35,10),iz = 1,20) / &
     & 0.2915100E+00, 0.2915100E+00, 0.3120100E+00, 0.2963900E+00, &
     & 0.2837100E+00, 0.4437000E+00, 0.4674400E+00, 0.3433217E+00, &
     & 0.3515054E+00, 0.3600730E+00, 0.3697942E+00, 0.3835656E+00, &
     & 0.4538500E+00, 0.4076710E+00, 0.4180084E+00, 0.4289083E+00, &
     & 0.4387463E+00, 0.4485905E+00, 0.4612816E+00, 0.4612816E+00 /
      data (ref_adm(31,iz,36,10),iz = 1,20) / &
     & 0.3747700E+00, 0.3747700E+00, 0.3537900E+00, 0.3011315E+00, &
     & 0.3249820E+00, 0.3413911E+00, 0.3359525E+00, 0.3434221E+00, &
     & 0.3514822E+00, 0.3539300E+00, 0.3703116E+00, 0.3857656E+00, &
     & 0.4029984E+00, 0.4132324E+00, 0.4211084E+00, 0.4301434E+00, &
     & 0.4390756E+00, 0.4497850E+00, 0.4649063E+00, 0.4649063E+00 /
      data (ref_adm(31,iz,37,10),iz = 1,20) / &
     & 0.3717100E+00, 0.3717100E+00, 0.2945612E+00, 0.4939200E+00, &
     & 0.4537600E+00, 0.4380800E+00, 0.3359671E+00, 0.3435024E+00, &
     & 0.4438900E+00, 0.4747200E+00, 0.3707410E+00, 0.3887462E+00, &
     & 0.4241548E+00, 0.4357874E+00, 0.4254117E+00, 0.4313914E+00, &
     & 0.4395822E+00, 0.4503518E+00, 0.4670125E+00, 0.4670125E+00 /
      data (ref_adm(31,iz,38,10),iz = 1,20) / &
     & 0.3717100E+00, 0.3717100E+00, 0.2945612E+00, 0.4939200E+00, &
     & 0.4537600E+00, 0.4380800E+00, 0.3359671E+00, 0.3435024E+00, &
     & 0.4438900E+00, 0.4747200E+00, 0.3707410E+00, 0.3887462E+00, &
     & 0.4241548E+00, 0.4357874E+00, 0.4254117E+00, 0.4313914E+00, &
     & 0.4395822E+00, 0.4503518E+00, 0.4670125E+00, 0.4670125E+00 /
! Solar Zenith Angle 50.0 Albedo  0.3353128E+00
      data (ref_adm(31,iz, 1,11),iz = 1,20) / &
     & 0.2605500E+00, 0.2605500E+00, 0.2736900E+00, 0.3574900E+00, &
     & 0.3214900E+00, 0.2629500E+00, 0.3767200E+00, 0.4093800E+00, &
     & 0.2556700E+00, 0.4953000E+00, 0.5297800E+00, 0.3431200E+00, &
     & 0.3803500E+00, 0.4411900E+00, 0.3842300E+00, 0.4185400E+00, &
     & 0.5422800E+00, 0.6659900E+00, 0.6345600E+00, 0.6345600E+00 /
      data (ref_adm(31,iz, 2,11),iz = 1,20) / &
     & 0.2605500E+00, 0.2605500E+00, 0.2736900E+00, 0.3574900E+00, &
     & 0.3214900E+00, 0.2629500E+00, 0.3767200E+00, 0.4093800E+00, &
     & 0.2556700E+00, 0.4953000E+00, 0.5297800E+00, 0.3431200E+00, &
     & 0.3803500E+00, 0.4411900E+00, 0.3842300E+00, 0.4185400E+00, &
     & 0.5422800E+00, 0.6659900E+00, 0.6345600E+00, 0.6345600E+00 /
      data (ref_adm(31,iz, 3,11),iz = 1,20) / &
     & 0.2595900E+00, 0.2595900E+00, 0.2806200E+00, 0.3192500E+00, &
     & 0.3116500E+00, 0.4286900E+00, 0.3607700E+00, 0.2760800E+00, &
     & 0.4168800E+00, 0.2984300E+00, 0.3963100E+00, 0.3247200E+00, &
     & 0.3115400E+00, 0.5947800E+00, 0.3902100E+00, 0.3580400E+00, &
     & 0.3788600E+00, 0.5241500E+00, 0.2631844E+00, 0.2631844E+00 /
      data (ref_adm(31,iz, 4,11),iz = 1,20) / &
     & 0.2863200E+00, 0.2863200E+00, 0.3068700E+00, 0.2873800E+00, &
     & 0.3216500E+00, 0.3521300E+00, 0.2661000E+00, 0.2507900E+00, &
     & 0.3898700E+00, 0.3826300E+00, 0.3050400E+00, 0.3977400E+00, &
     & 0.2973400E+00, 0.3593100E+00, 0.3976500E+00, 0.3957200E+00, &
     & 0.4519963E+00, 0.5142434E+00, 0.5928323E+00, 0.5928323E+00 /
      data (ref_adm(31,iz, 5,11),iz = 1,20) / &
     & 0.3515100E+00, 0.3515100E+00, 0.2995600E+00, 0.2912600E+00, &
     & 0.2868200E+00, 0.2905700E+00, 0.2782400E+00, 0.3633400E+00, &
     & 0.3914900E+00, 0.3009200E+00, 0.3120100E+00, 0.3404300E+00, &
     & 0.3009300E+00, 0.3260200E+00, 0.3960700E+00, 0.5308800E+00, &
     & 0.4475437E+00, 0.5040653E+00, 0.5614040E+00, 0.5614040E+00 /
      data (ref_adm(31,iz, 6,11),iz = 1,20) / &
     & 0.3291300E+00, 0.3291300E+00, 0.2912800E+00, 0.2735700E+00, &
     & 0.2628500E+00, 0.3010100E+00, 0.3995500E+00, 0.3772100E+00, &
     & 0.2501400E+00, 0.2357600E+00, 0.3146200E+00, 0.2536800E+00, &
     & 0.2268900E+00, 0.3164700E+00, 0.2695100E+00, 0.5063700E+00, &
     & 0.4400316E+00, 0.4940611E+00, 0.5338455E+00, 0.5338455E+00 /
      data (ref_adm(31,iz, 7,11),iz = 1,20) / &
     & 0.2995900E+00, 0.2995900E+00, 0.3041500E+00, 0.3403200E+00, &
     & 0.2736600E+00, 0.3269600E+00, 0.3576900E+00, 0.2308600E+00, &
     & 0.2591200E+00, 0.3016600E+00, 0.2596600E+00, 0.2876400E+00, &
     & 0.2824100E+00, 0.1849300E+00, 0.3867200E+00, 0.3233100E+00, &
     & 0.3638000E+00, 0.4833134E+00, 0.5150300E+00, 0.5150300E+00 /
      data (ref_adm(31,iz, 8,11),iz = 1,20) / &
     & 0.3131500E+00, 0.3131500E+00, 0.2667100E+00, 0.2548000E+00, &
     & 0.2959700E+00, 0.2864000E+00, 0.2865000E+00, 0.2266400E+00, &
     & 0.2261800E+00, 0.2483500E+00, 0.3096300E+00, 0.2526900E+00, &
     & 0.3562400E+00, 0.3231900E+00, 0.3295300E+00, 0.6415900E+00, &
     & 0.3725900E+00, 0.4679580E+00, 0.4998070E+00, 0.4998070E+00 /
      data (ref_adm(31,iz, 9,11),iz = 1,20) / &
     & 0.2879400E+00, 0.2879400E+00, 0.2855200E+00, 0.2692400E+00, &
     & 0.2904500E+00, 0.3407800E+00, 0.3032700E+00, 0.2701300E+00, &
     & 0.2932800E+00, 0.3246800E+00, 0.3801900E+00, 0.2682000E+00, &
     & 0.3049800E+00, 0.3669000E+00, 0.3227200E+00, 0.5624200E+00, &
     & 0.4127700E+00, 0.4504451E+00, 0.4774570E+00, 0.4774570E+00 /
      data (ref_adm(31,iz,10,11),iz = 1,20) / &
     & 0.3136800E+00, 0.3136800E+00, 0.3216700E+00, 0.3338500E+00, &
     & 0.2433300E+00, 0.2864100E+00, 0.2879800E+00, 0.2809200E+00, &
     & 0.2979300E+00, 0.2653700E+00, 0.3315200E+00, 0.2704100E+00, &
     & 0.2544600E+00, 0.2818900E+00, 0.3085100E+00, 0.3831052E+00, &
     & 0.2955600E+00, 0.4367939E+00, 0.4533983E+00, 0.4533983E+00 /
      data (ref_adm(31,iz,11,11),iz = 1,20) / &
     & 0.3253800E+00, 0.3253800E+00, 0.3052300E+00, 0.2812900E+00, &
     & 0.2678700E+00, 0.3515500E+00, 0.2949500E+00, 0.2755100E+00, &
     & 0.3069800E+00, 0.3347100E+00, 0.3559200E+00, 0.2828600E+00, &
     & 0.2818100E+00, 0.5283700E+00, 0.4128700E+00, 0.3792349E+00, &
     & 0.3991582E+00, 0.4261093E+00, 0.4351578E+00, 0.4351578E+00 /
      data (ref_adm(31,iz,12,11),iz = 1,20) / &
     & 0.2970400E+00, 0.2970400E+00, 0.2679700E+00, 0.2899000E+00, &
     & 0.2669000E+00, 0.2878400E+00, 0.2964500E+00, 0.3179900E+00, &
     & 0.2790400E+00, 0.3062200E+00, 0.3026200E+00, 0.3187200E+00, &
     & 0.3137700E+00, 0.2440300E+00, 0.3579551E+00, 0.3755583E+00, &
     & 0.3940964E+00, 0.4179135E+00, 0.4216391E+00, 0.4216391E+00 /
      data (ref_adm(31,iz,13,11),iz = 1,20) / &
     & 0.2726400E+00, 0.2726400E+00, 0.3081600E+00, 0.3326500E+00, &
     & 0.3125200E+00, 0.2918700E+00, 0.2960900E+00, 0.2916500E+00, &
     & 0.3006400E+00, 0.2676000E+00, 0.2765700E+00, 0.3506400E+00, &
     & 0.3756100E+00, 0.3391300E+00, 0.5256800E+00, 0.3715979E+00, &
     & 0.3895011E+00, 0.4110581E+00, 0.4105152E+00, 0.4105152E+00 /
      data (ref_adm(31,iz,14,11),iz = 1,20) / &
     & 0.2839800E+00, 0.2839800E+00, 0.2681100E+00, 0.2640600E+00, &
     & 0.2635600E+00, 0.2780700E+00, 0.2899200E+00, 0.2903000E+00, &
     & 0.2865300E+00, 0.3055800E+00, 0.2973800E+00, 0.3523000E+00, &
     & 0.4070000E+00, 0.3688700E+00, 0.5436600E+00, 0.3671751E+00, &
     & 0.3843165E+00, 0.4049499E+00, 0.4013146E+00, 0.4013146E+00 /
      data (ref_adm(31,iz,15,11),iz = 1,20) / &
     & 0.2726100E+00, 0.2726100E+00, 0.3122000E+00, 0.2566400E+00, &
     & 0.2788300E+00, 0.3264500E+00, 0.3238700E+00, 0.2679600E+00, &
     & 0.3053000E+00, 0.3067300E+00, 0.3226300E+00, 0.3242100E+00, &
     & 0.3147800E+00, 0.3375600E+00, 0.3594400E+00, 0.3544200E+00, &
     & 0.3787182E+00, 0.3980044E+00, 0.3926741E+00, 0.3926741E+00 /
      data (ref_adm(31,iz,16,11),iz = 1,20) / &
     & 0.3135100E+00, 0.3135100E+00, 0.2987300E+00, 0.2952300E+00, &
     & 0.3215300E+00, 0.2943000E+00, 0.2787100E+00, 0.2506900E+00, &
     & 0.2479000E+00, 0.2315900E+00, 0.2382900E+00, 0.3034300E+00, &
     & 0.3170500E+00, 0.2972700E+00, 0.3462741E+00, 0.4678200E+00, &
     & 0.3739988E+00, 0.3906467E+00, 0.3830006E+00, 0.3830006E+00 /
      data (ref_adm(31,iz,17,11),iz = 1,20) / &
     & 0.3359300E+00, 0.3359300E+00, 0.4735100E+00, 0.3621600E+00, &
     & 0.3015000E+00, 0.2940100E+00, 0.3303100E+00, 0.2836800E+00, &
     & 0.2478700E+00, 0.2478500E+00, 0.1948000E+00, 0.3137500E+00, &
     & 0.3856100E+00, 0.3800100E+00, 0.3014500E+00, 0.3566926E+00, &
     & 0.3695294E+00, 0.3841727E+00, 0.3739719E+00, 0.3739719E+00 /
      data (ref_adm(31,iz,18,11),iz = 1,20) / &
     & 0.3497300E+00, 0.3497300E+00, 0.2313100E+00, 0.3172300E+00, &
     & 0.2398000E+00, 0.2887300E+00, 0.2728500E+00, 0.1980600E+00, &
     & 0.2809900E+00, 0.4417100E+00, 0.4064300E+00, 0.4865800E+00, &
     & 0.4400700E+00, 0.2616400E+00, 0.2582100E+00, 0.3245327E+00, &
     & 0.3150689E+00, 0.2964153E+00, 0.2723420E+00, 0.2723420E+00 /
      data (ref_adm(31,iz,19,11),iz = 1,20) / &
     & 0.2878600E+00, 0.2878600E+00, 0.2764500E+00, 0.2404800E+00, &
     & 0.3144300E+00, 0.2404400E+00, 0.2745000E+00, 0.2308100E+00, &
     & 0.2724300E+00, 0.2638600E+00, 0.2667600E+00, 0.2888600E+00, &
     & 0.2921300E+00, 0.2915300E+00, 0.3243861E+00, 0.3197724E+00, &
     & 0.3097242E+00, 0.2913017E+00, 0.2695787E+00, 0.2695787E+00 /
      data (ref_adm(31,iz,20,11),iz = 1,20) / &
     & 0.2703800E+00, 0.2703800E+00, 0.2690100E+00, 0.2705500E+00, &
     & 0.3886900E+00, 0.2996400E+00, 0.3103800E+00, 0.2695100E+00, &
     & 0.4290100E+00, 0.2970200E+00, 0.3252800E+00, 0.3066300E+00, &
     & 0.2919100E+00, 0.2052700E+00, 0.3223484E+00, 0.3168925E+00, &
     & 0.3063533E+00, 0.2881582E+00, 0.2683159E+00, 0.2683159E+00 /
      data (ref_adm(31,iz,21,11),iz = 1,20) / &
     & 0.2915100E+00, 0.2915100E+00, 0.3025900E+00, 0.2692300E+00, &
     & 0.3314100E+00, 0.3978700E+00, 0.4953600E+00, 0.2035500E+00, &
     & 0.3399800E+00, 0.2865800E+00, 0.3291000E+00, 0.3464900E+00, &
     & 0.4219500E+00, 0.5194800E+00, 0.3217549E+00, 0.3154704E+00, &
     & 0.3046231E+00, 0.2866037E+00, 0.2683013E+00, 0.2683013E+00 /
      data (ref_adm(31,iz,22,11),iz = 1,20) / &
     & 0.2969500E+00, 0.2969500E+00, 0.2813500E+00, 0.3069300E+00, &
     & 0.3216500E+00, 0.4571700E+00, 0.4020900E+00, 0.3547800E+00, &
     & 0.2875000E+00, 0.2231600E+00, 0.2750500E+00, 0.2971900E+00, &
     & 0.2316600E+00, 0.3221108E+00, 0.2315000E+00, 0.2287600E+00, &
     & 0.3041313E+00, 0.2873100E+00, 0.2711653E+00, 0.2711653E+00 /
      data (ref_adm(31,iz,23,11),iz = 1,20) / &
     & 0.2878000E+00, 0.2878000E+00, 0.3228100E+00, 0.2736200E+00, &
     & 0.2660400E+00, 0.3483400E+00, 0.3502500E+00, 0.3940500E+00, &
     & 0.3230900E+00, 0.3991600E+00, 0.3078700E+00, 0.2711800E+00, &
     & 0.3286000E+00, 0.3046400E+00, 0.3208200E+00, 0.2876900E+00, &
     & 0.3055451E+00, 0.2887673E+00, 0.2737795E+00, 0.2737795E+00 /
      data (ref_adm(31,iz,24,11),iz = 1,20) / &
     & 0.3058500E+00, 0.3058500E+00, 0.3288700E+00, 0.3332200E+00, &
     & 0.3759300E+00, 0.3332400E+00, 0.3506400E+00, 0.3495800E+00, &
     & 0.3698800E+00, 0.3481500E+00, 0.3117800E+00, 0.3264200E+00, &
     & 0.3310000E+00, 0.4195800E+00, 0.3443900E+00, 0.3758200E+00, &
     & 0.3087610E+00, 0.2918089E+00, 0.2775324E+00, 0.2775324E+00 /
      data (ref_adm(31,iz,25,11),iz = 1,20) / &
     & 0.3368400E+00, 0.3368400E+00, 0.3261000E+00, 0.2990000E+00, &
     & 0.3180600E+00, 0.3007100E+00, 0.3486300E+00, 0.3838600E+00, &
     & 0.2979500E+00, 0.2936900E+00, 0.2983100E+00, 0.4163000E+00, &
     & 0.3750500E+00, 0.2978900E+00, 0.3150500E+00, 0.3450900E+00, &
     & 0.4457000E+00, 0.2961920E+00, 0.2822547E+00, 0.2822547E+00 /
      data (ref_adm(31,iz,26,11),iz = 1,20) / &
     & 0.2956200E+00, 0.2956200E+00, 0.2830900E+00, 0.2984900E+00, &
     & 0.2895900E+00, 0.3101300E+00, 0.3410800E+00, 0.3570100E+00, &
     & 0.3612600E+00, 0.3779300E+00, 0.2985600E+00, 0.3451500E+00, &
     & 0.3204300E+00, 0.2812300E+00, 0.2661100E+00, 0.3201900E+00, &
     & 0.3361200E+00, 0.3025788E+00, 0.2879751E+00, 0.2879751E+00 /
      data (ref_adm(31,iz,27,11),iz = 1,20) / &
     & 0.3116200E+00, 0.3116200E+00, 0.3015000E+00, 0.3900800E+00, &
     & 0.3645000E+00, 0.3659500E+00, 0.4308600E+00, 0.3571300E+00, &
     & 0.3636900E+00, 0.3623700E+00, 0.3126200E+00, 0.3310800E+00, &
     & 0.3805100E+00, 0.3640300E+00, 0.4102900E+00, 0.3392913E+00, &
     & 0.4066500E+00, 0.3106523E+00, 0.2946098E+00, 0.2946098E+00 /
      data (ref_adm(31,iz,28,11),iz = 1,20) / &
     & 0.2898400E+00, 0.2898400E+00, 0.2614000E+00, 0.4011100E+00, &
     & 0.4772700E+00, 0.3774500E+00, 0.3402300E+00, 0.3416700E+00, &
     & 0.3049200E+00, 0.4442800E+00, 0.2751200E+00, 0.3610900E+00, &
     & 0.3198300E+00, 0.4071100E+00, 0.4246300E+00, 0.4774900E+00, &
     & 0.3329600E+00, 0.3186247E+00, 0.3020635E+00, 0.3020635E+00 /
      data (ref_adm(31,iz,29,11),iz = 1,20) / &
     & 0.3288200E+00, 0.3288200E+00, 0.3390800E+00, 0.2570900E+00, &
     & 0.3742900E+00, 0.3181800E+00, 0.3069300E+00, 0.3308000E+00, &
     & 0.2819900E+00, 0.3148800E+00, 0.3612032E+00, 0.2917200E+00, &
     & 0.3863200E+00, 0.3292400E+00, 0.4097100E+00, 0.4182100E+00, &
     & 0.4534800E+00, 0.3254480E+00, 0.3095949E+00, 0.3095949E+00 /
      data (ref_adm(31,iz,30,11),iz = 1,20) / &
     & 0.3487300E+00, 0.3487300E+00, 0.3817800E+00, 0.3121600E+00, &
     & 0.3020400E+00, 0.3267400E+00, 0.3040000E+00, 0.2960200E+00, &
     & 0.3517100E+00, 0.4115600E+00, 0.3617817E+00, 0.2741400E+00, &
     & 0.3834099E+00, 0.3636400E+00, 0.3281400E+00, 0.3647900E+00, &
     & 0.3152400E+00, 0.3327253E+00, 0.3166344E+00, 0.3166344E+00 /
      data (ref_adm(31,iz,31,11),iz = 1,20) / &
     & 0.3171600E+00, 0.3171600E+00, 0.3396800E+00, 0.3279200E+00, &
     & 0.3186400E+00, 0.3032800E+00, 0.2892000E+00, 0.3429700E+00, &
     & 0.3539400E+00, 0.2764300E+00, 0.2541200E+00, 0.2796100E+00, &
     & 0.2657300E+00, 0.2623600E+00, 0.3465700E+00, 0.2547100E+00, &
     & 0.3806000E+00, 0.3432376E+00, 0.3233292E+00, 0.3233292E+00 /
      data (ref_adm(31,iz,32,11),iz = 1,20) / &
     & 0.2768200E+00, 0.2768200E+00, 0.2619000E+00, 0.2928700E+00, &
     & 0.3658300E+00, 0.2745600E+00, 0.3044000E+00, 0.2582600E+00, &
     & 0.2659600E+00, 0.2737800E+00, 0.2913700E+00, 0.2919700E+00, &
     & 0.3065500E+00, 0.2852100E+00, 0.3665200E+00, 0.5047700E+00, &
     & 0.5603600E+00, 0.3609706E+00, 0.3301615E+00, 0.3301615E+00 /
      data (ref_adm(31,iz,33,11),iz = 1,20) / &
     & 0.3118700E+00, 0.3118700E+00, 0.3195400E+00, 0.2670400E+00, &
     & 0.2744200E+00, 0.2557000E+00, 0.2369100E+00, 0.2814800E+00, &
     & 0.3310100E+00, 0.3795900E+00, 0.3297600E+00, 0.3805800E+00, &
     & 0.3874800E+00, 0.3928353E+00, 0.4191000E+00, 0.5069600E+00, &
     & 0.4272193E+00, 0.3846883E+00, 0.3374283E+00, 0.3374283E+00 /
      data (ref_adm(31,iz,34,11),iz = 1,20) / &
     & 0.3523100E+00, 0.3523100E+00, 0.2984100E+00, 0.2678400E+00, &
     & 0.2692600E+00, 0.2531500E+00, 0.2980400E+00, 0.3314100E+00, &
     & 0.4909600E+00, 0.3467300E+00, 0.2691400E+00, 0.2758500E+00, &
     & 0.5665500E+00, 0.5305500E+00, 0.5253700E+00, 0.5395200E+00, &
     & 0.4136524E+00, 0.4047008E+00, 0.3451539E+00, 0.3451539E+00 /
      data (ref_adm(31,iz,35,11),iz = 1,20) / &
     & 0.3222300E+00, 0.3222300E+00, 0.3332500E+00, 0.2903200E+00, &
     & 0.2425200E+00, 0.2766900E+00, 0.3010100E+00, 0.5827300E+00, &
     & 0.5902600E+00, 0.3860100E+00, 0.3477500E+00, 0.3018600E+00, &
     & 0.4761000E+00, 0.3787000E+00, 0.4476600E+00, 0.4036852E+00, &
     & 0.4050753E+00, 0.4140661E+00, 0.3526326E+00, 0.3526326E+00 /
      data (ref_adm(31,iz,36,11),iz = 1,20) / &
     & 0.2957300E+00, 0.2957300E+00, 0.2475600E+00, 0.2199400E+00, &
     & 0.3252200E+00, 0.2807900E+00, 0.2774900E+00, 0.2647300E+00, &
     & 0.7166900E+00, 0.4634700E+00, 0.3940900E+00, 0.3617800E+00, &
     & 0.3278500E+00, 0.4032600E+00, 0.4020000E+00, 0.4062300E+00, &
     & 0.4029758E+00, 0.4152947E+00, 0.3584447E+00, 0.3584447E+00 /
      data (ref_adm(31,iz,37,11),iz = 1,20) / &
     & 0.2845800E+00, 0.2845800E+00, 0.2867400E+00, 0.2943500E+00, &
     & 0.2978300E+00, 0.4586100E+00, 0.2325400E+00, 0.2628200E+00, &
     & 0.4365000E+00, 0.3849226E+00, 0.4924000E+00, 0.5356300E+00, &
     & 0.3899000E+00, 0.3576400E+00, 0.4537700E+00, 0.4046221E+00, &
     & 0.4026362E+00, 0.4145550E+00, 0.3618557E+00, 0.3618557E+00 /
      data (ref_adm(31,iz,38,11),iz = 1,20) / &
     & 0.2845800E+00, 0.2845800E+00, 0.2867400E+00, 0.2943500E+00, &
     & 0.2978300E+00, 0.4586100E+00, 0.2325400E+00, 0.2628200E+00, &
     & 0.4365000E+00, 0.3849226E+00, 0.4924000E+00, 0.5356300E+00, &
     & 0.3899000E+00, 0.3576400E+00, 0.4537700E+00, 0.4046221E+00, &
     & 0.4026362E+00, 0.4145550E+00, 0.3618557E+00, 0.3618557E+00 /
! Solar Zenith Angle 55.0 Albedo  0.3380712E+00
      data (ref_adm(31,iz, 1,12),iz = 1,20) / &
     & 0.3098600E+00, 0.3098600E+00, 0.3206200E+00, 0.3117000E+00, &
     & 0.2584800E+00, 0.2388200E+00, 0.2416800E+00, 0.2897900E+00, &
     & 0.2318500E+00, 0.3137026E+00, 0.3450400E+00, 0.3488900E+00, &
     & 0.4365800E+00, 0.4615000E+00, 0.3358500E+00, 0.5310900E+00, &
     & 0.4166100E+00, 0.5164900E+00, 0.3818439E+00, 0.3818439E+00 /
      data (ref_adm(31,iz, 2,12),iz = 1,20) / &
     & 0.3098600E+00, 0.3098600E+00, 0.3206200E+00, 0.3117000E+00, &
     & 0.2584800E+00, 0.2388200E+00, 0.2416800E+00, 0.2897900E+00, &
     & 0.2318500E+00, 0.3137026E+00, 0.3450400E+00, 0.3488900E+00, &
     & 0.4365800E+00, 0.4615000E+00, 0.3358500E+00, 0.5310900E+00, &
     & 0.4166100E+00, 0.5164900E+00, 0.3818439E+00, 0.3818439E+00 /
      data (ref_adm(31,iz, 3,12),iz = 1,20) / &
     & 0.2451200E+00, 0.2451200E+00, 0.2915400E+00, 0.2582600E+00, &
     & 0.2642600E+00, 0.2637300E+00, 0.2546400E+00, 0.2693000E+00, &
     & 0.3252400E+00, 0.2790200E+00, 0.3562900E+00, 0.3001100E+00, &
     & 0.3586500E+00, 0.4304300E+00, 0.4014600E+00, 0.4441800E+00, &
     & 0.4482300E+00, 0.4438454E+00, 0.4788268E-01, 0.4788268E-01 /
      data (ref_adm(31,iz, 4,12),iz = 1,20) / &
     & 0.3225700E+00, 0.3225700E+00, 0.2581800E+00, 0.2589200E+00, &
     & 0.2557900E+00, 0.2835200E+00, 0.3004200E+00, 0.2604800E+00, &
     & 0.2488400E+00, 0.2970700E+00, 0.3849000E+00, 0.3283700E+00, &
     & 0.3660200E+00, 0.4507300E+00, 0.4502100E+00, 0.4544400E+00, &
     & 0.3767700E+00, 0.4454500E+00, 0.3790511E+00, 0.3790511E+00 /
      data (ref_adm(31,iz, 5,12),iz = 1,20) / &
     & 0.2800800E+00, 0.2800800E+00, 0.2665300E+00, 0.2779900E+00, &
     & 0.2623200E+00, 0.2881500E+00, 0.3083300E+00, 0.2373200E+00, &
     & 0.2740600E+00, 0.3267500E+00, 0.2945400E+00, 0.3498100E+00, &
     & 0.3418200E+00, 0.3675300E+00, 0.3591500E+00, 0.3836400E+00, &
     & 0.4434700E+00, 0.4849400E+00, 0.3767480E+00, 0.3767480E+00 /
      data (ref_adm(31,iz, 6,12),iz = 1,20) / &
     & 0.2575100E+00, 0.2575100E+00, 0.2847400E+00, 0.2551200E+00, &
     & 0.2825400E+00, 0.3165600E+00, 0.2929300E+00, 0.3045300E+00, &
     & 0.3138400E+00, 0.3181500E+00, 0.2963800E+00, 0.2753300E+00, &
     & 0.3489000E+00, 0.3229000E+00, 0.3550600E+00, 0.3975000E+00, &
     & 0.3674000E+00, 0.4373596E+00, 0.3733026E+00, 0.3733026E+00 /
      data (ref_adm(31,iz, 7,12),iz = 1,20) / &
     & 0.2893600E+00, 0.2893600E+00, 0.2775200E+00, 0.2553100E+00, &
     & 0.2680000E+00, 0.3045900E+00, 0.2704200E+00, 0.3034200E+00, &
     & 0.3075700E+00, 0.2621000E+00, 0.2807500E+00, 0.2658400E+00, &
     & 0.3081900E+00, 0.3593400E+00, 0.3973600E+00, 0.4454400E+00, &
     & 0.4158700E+00, 0.5024700E+00, 0.3698680E+00, 0.3698680E+00 /
      data (ref_adm(31,iz, 8,12),iz = 1,20) / &
     & 0.3257400E+00, 0.3257400E+00, 0.2924700E+00, 0.3184600E+00, &
     & 0.3008800E+00, 0.3263000E+00, 0.3223300E+00, 0.3159600E+00, &
     & 0.2904800E+00, 0.3012500E+00, 0.3173200E+00, 0.3593400E+00, &
     & 0.3370300E+00, 0.3086800E+00, 0.3524900E+00, 0.4897800E+00, &
     & 0.4440365E+00, 0.4310908E+00, 0.3659554E+00, 0.3659554E+00 /
      data (ref_adm(31,iz, 9,12),iz = 1,20) / &
     & 0.3105800E+00, 0.3105800E+00, 0.3065200E+00, 0.2842700E+00, &
     & 0.2743400E+00, 0.2469900E+00, 0.2333000E+00, 0.2434300E+00, &
     & 0.2373100E+00, 0.3005500E+00, 0.2845700E+00, 0.3597200E+00, &
     & 0.3513300E+00, 0.3285000E+00, 0.3825200E+00, 0.4955900E+00, &
     & 0.4563500E+00, 0.4276983E+00, 0.3620268E+00, 0.3620268E+00 /
      data (ref_adm(31,iz,10,12),iz = 1,20) / &
     & 0.2801500E+00, 0.2801500E+00, 0.2776100E+00, 0.2936000E+00, &
     & 0.2675600E+00, 0.2671700E+00, 0.2752000E+00, 0.2421700E+00, &
     & 0.2403000E+00, 0.2954900E+00, 0.2935100E+00, 0.3127400E+00, &
     & 0.2827400E+00, 0.3171800E+00, 0.2990600E+00, 0.4768200E+00, &
     & 0.4613000E+00, 0.4865400E+00, 0.3583486E+00, 0.3583486E+00 /
      data (ref_adm(31,iz,11,12),iz = 1,20) / &
     & 0.2488600E+00, 0.2488600E+00, 0.2854600E+00, 0.3217300E+00, &
     & 0.2842600E+00, 0.2924700E+00, 0.2915400E+00, 0.2740500E+00, &
     & 0.2503800E+00, 0.2853300E+00, 0.2404800E+00, 0.3387300E+00, &
     & 0.3123200E+00, 0.2926600E+00, 0.3133700E+00, 0.4830600E+00, &
     & 0.2441000E+00, 0.4178439E+00, 0.3542932E+00, 0.3542932E+00 /
      data (ref_adm(31,iz,12,12),iz = 1,20) / &
     & 0.2620200E+00, 0.2620200E+00, 0.2803700E+00, 0.2751400E+00, &
     & 0.3126000E+00, 0.3187600E+00, 0.2831200E+00, 0.2950500E+00, &
     & 0.3185100E+00, 0.3510100E+00, 0.3410300E+00, 0.2954800E+00, &
     & 0.2956500E+00, 0.2974000E+00, 0.3891200E+00, 0.6016800E+00, &
     & 0.5208900E+00, 0.4107763E+00, 0.3500050E+00, 0.3500050E+00 /
      data (ref_adm(31,iz,13,12),iz = 1,20) / &
     & 0.2467300E+00, 0.2467300E+00, 0.2953100E+00, 0.3054000E+00, &
     & 0.2977000E+00, 0.3126100E+00, 0.2842900E+00, 0.2982600E+00, &
     & 0.2971300E+00, 0.3012600E+00, 0.2810400E+00, 0.3203500E+00, &
     & 0.3793600E+00, 0.2606500E+00, 0.4013000E+00, 0.4025915E+00, &
     & 0.4116581E+00, 0.4028433E+00, 0.3447491E+00, 0.3447491E+00 /
      data (ref_adm(31,iz,14,12),iz = 1,20) / &
     & 0.2726900E+00, 0.2726900E+00, 0.2769600E+00, 0.2710000E+00, &
     & 0.2704600E+00, 0.2736000E+00, 0.2883700E+00, 0.2817900E+00, &
     & 0.2938200E+00, 0.3013200E+00, 0.3271900E+00, 0.3390500E+00, &
     & 0.3363900E+00, 0.3568000E+00, 0.2750500E+00, 0.3960927E+00, &
     & 0.4036692E+00, 0.3951229E+00, 0.3384478E+00, 0.3384478E+00 /
      data (ref_adm(31,iz,15,12),iz = 1,20) / &
     & 0.2687800E+00, 0.2687800E+00, 0.3215400E+00, 0.3071000E+00, &
     & 0.3104900E+00, 0.2832900E+00, 0.2734000E+00, 0.2533900E+00, &
     & 0.2624200E+00, 0.2698400E+00, 0.2858100E+00, 0.3096100E+00, &
     & 0.2998900E+00, 0.3003500E+00, 0.3750631E+00, 0.4142800E+00, &
     & 0.3962243E+00, 0.3876981E+00, 0.3319470E+00, 0.3319470E+00 /
      data (ref_adm(31,iz,16,12),iz = 1,20) / &
     & 0.2704800E+00, 0.2704800E+00, 0.2417600E+00, 0.2790600E+00, &
     & 0.2877900E+00, 0.2680700E+00, 0.2969300E+00, 0.2571200E+00, &
     & 0.2659900E+00, 0.3211900E+00, 0.3408900E+00, 0.3162600E+00, &
     & 0.2996000E+00, 0.3720200E+00, 0.3694512E+00, 0.3838953E+00, &
     & 0.3888516E+00, 0.3792536E+00, 0.3263211E+00, 0.3263211E+00 /
      data (ref_adm(31,iz,17,12),iz = 1,20) / &
     & 0.2780400E+00, 0.2780400E+00, 0.3078600E+00, 0.2768400E+00, &
     & 0.3080000E+00, 0.2486000E+00, 0.2638200E+00, 0.3105900E+00, &
     & 0.3587400E+00, 0.3761900E+00, 0.2854100E+00, 0.3171000E+00, &
     & 0.3432800E+00, 0.4666800E+00, 0.3638714E+00, 0.2808900E+00, &
     & 0.3822488E+00, 0.3714797E+00, 0.3205548E+00, 0.3205548E+00 /
      data (ref_adm(31,iz,18,12),iz = 1,20) / &
     & 0.2669300E+00, 0.2669300E+00, 0.2591200E+00, 0.3003200E+00, &
     & 0.3162300E+00, 0.2839100E+00, 0.3008400E+00, 0.3468200E+00, &
     & 0.3463600E+00, 0.3508700E+00, 0.4475300E+00, 0.3491200E+00, &
     & 0.3576500E+00, 0.3559400E+00, 0.3333900E+00, 0.3602669E+00, &
     & 0.3683641E+00, 0.3736822E+00, 0.3521756E+00, 0.3521756E+00 /
      data (ref_adm(31,iz,19,12),iz = 1,20) / &
     & 0.2692500E+00, 0.2692500E+00, 0.2789300E+00, 0.2832200E+00, &
     & 0.2890900E+00, 0.2703000E+00, 0.3512900E+00, 0.3374100E+00, &
     & 0.3557000E+00, 0.3084900E+00, 0.3754300E+00, 0.4101000E+00, &
     & 0.3906300E+00, 0.3287200E+00, 0.3606100E+00, 0.3570291E+00, &
     & 0.3646730E+00, 0.3690507E+00, 0.3468813E+00, 0.3468813E+00 /
      data (ref_adm(31,iz,20,12),iz = 1,20) / &
     & 0.2933600E+00, 0.2933600E+00, 0.2899700E+00, 0.2844800E+00, &
     & 0.2992700E+00, 0.3701000E+00, 0.3436900E+00, 0.3842700E+00, &
     & 0.3639800E+00, 0.3448800E+00, 0.3609800E+00, 0.4222000E+00, &
     & 0.3424800E+00, 0.4061600E+00, 0.3750200E+00, 0.3545811E+00, &
     & 0.3615189E+00, 0.3654908E+00, 0.3437467E+00, 0.3437467E+00 /
      data (ref_adm(31,iz,21,12),iz = 1,20) / &
     & 0.3082200E+00, 0.3082200E+00, 0.3275300E+00, 0.2775200E+00, &
     & 0.2612400E+00, 0.2813500E+00, 0.2752300E+00, 0.3723500E+00, &
     & 0.3059700E+00, 0.3086400E+00, 0.2869600E+00, 0.3312900E+00, &
     & 0.3017100E+00, 0.3461400E+00, 0.3558800E+00, 0.3524620E+00, &
     & 0.3593009E+00, 0.3623562E+00, 0.3416586E+00, 0.3416586E+00 /
      data (ref_adm(31,iz,22,12),iz = 1,20) / &
     & 0.2675200E+00, 0.2675200E+00, 0.2860900E+00, 0.2756800E+00, &
     & 0.2687400E+00, 0.2784400E+00, 0.2506200E+00, 0.3399300E+00, &
     & 0.3505000E+00, 0.1844600E+00, 0.3575000E+00, 0.3373200E+00, &
     & 0.2965000E+00, 0.2851800E+00, 0.3976200E+00, 0.4161299E+00, &
     & 0.4296946E+00, 0.4341217E+00, 0.4060262E+00, 0.4060262E+00 /
      data (ref_adm(31,iz,23,12),iz = 1,20) / &
     & 0.2764100E+00, 0.2764100E+00, 0.2687700E+00, 0.2865500E+00, &
     & 0.2737600E+00, 0.3047700E+00, 0.2951900E+00, 0.3226900E+00, &
     & 0.3997600E+00, 0.3420400E+00, 0.3025300E+00, 0.3533400E+00, &
     & 0.2972600E+00, 0.2909600E+00, 0.3184000E+00, 0.4874700E+00, &
     & 0.4215641E+00, 0.4245552E+00, 0.4033515E+00, 0.4033515E+00 /
      data (ref_adm(31,iz,24,12),iz = 1,20) / &
     & 0.2559300E+00, 0.2559300E+00, 0.2867900E+00, 0.2793200E+00, &
     & 0.2820800E+00, 0.2707800E+00, 0.2790900E+00, 0.3175900E+00, &
     & 0.3635800E+00, 0.3616500E+00, 0.3398000E+00, 0.3382100E+00, &
     & 0.3157900E+00, 0.3398400E+00, 0.3074700E+00, 0.3054900E+00, &
     & 0.2388000E+00, 0.4178953E+00, 0.4029680E+00, 0.4029680E+00 /
      data (ref_adm(31,iz,25,12),iz = 1,20) / &
     & 0.2974100E+00, 0.2974100E+00, 0.3123500E+00, 0.2859800E+00, &
     & 0.2900000E+00, 0.3224500E+00, 0.2908200E+00, 0.2963900E+00, &
     & 0.3197300E+00, 0.3463600E+00, 0.3201000E+00, 0.3521500E+00, &
     & 0.4097700E+00, 0.3429200E+00, 0.3644500E+00, 0.3459100E+00, &
     & 0.4099943E+00, 0.4121833E+00, 0.4041579E+00, 0.4041579E+00 /
      data (ref_adm(31,iz,26,12),iz = 1,20) / &
     & 0.2745700E+00, 0.2745700E+00, 0.2931800E+00, 0.2945700E+00, &
     & 0.3011300E+00, 0.3165000E+00, 0.3266200E+00, 0.3311000E+00, &
     & 0.3457300E+00, 0.3566800E+00, 0.3256400E+00, 0.3497400E+00, &
     & 0.3981900E+00, 0.3768800E+00, 0.3561900E+00, 0.3106700E+00, &
     & 0.3253800E+00, 0.4113333E+00, 0.4083442E+00, 0.4083442E+00 /
      data (ref_adm(31,iz,27,12),iz = 1,20) / &
     & 0.2926100E+00, 0.2926100E+00, 0.2858600E+00, 0.2749600E+00, &
     & 0.2648600E+00, 0.3116900E+00, 0.3585600E+00, 0.3438200E+00, &
     & 0.3650500E+00, 0.3865700E+00, 0.3293100E+00, 0.3723700E+00, &
     & 0.3561300E+00, 0.3905300E+00, 0.3818900E+00, 0.3587300E+00, &
     & 0.4114775E+00, 0.3562000E+00, 0.4152700E+00, 0.4152700E+00 /
      data (ref_adm(31,iz,28,12),iz = 1,20) / &
     & 0.2841200E+00, 0.2841200E+00, 0.3351200E+00, 0.3143500E+00, &
     & 0.2878600E+00, 0.3044800E+00, 0.3228600E+00, 0.3044900E+00, &
     & 0.3226100E+00, 0.3417500E+00, 0.3110200E+00, 0.3584500E+00, &
     & 0.3879300E+00, 0.3332000E+00, 0.3296100E+00, 0.4722800E+00, &
     & 0.4206700E+00, 0.4169777E+00, 0.4243679E+00, 0.4243679E+00 /
      data (ref_adm(31,iz,29,12),iz = 1,20) / &
     & 0.2695000E+00, 0.2695000E+00, 0.2919800E+00, 0.2993100E+00, &
     & 0.3146400E+00, 0.2796900E+00, 0.3151500E+00, 0.3099700E+00, &
     & 0.3761600E+00, 0.3437000E+00, 0.3609900E+00, 0.3489400E+00, &
     & 0.3815700E+00, 0.3352300E+00, 0.3546600E+00, 0.4474600E+00, &
     & 0.3645800E+00, 0.4234902E+00, 0.4334528E+00, 0.4334528E+00 /
      data (ref_adm(31,iz,30,12),iz = 1,20) / &
     & 0.2654700E+00, 0.2654700E+00, 0.3219900E+00, 0.3121300E+00, &
     & 0.3289200E+00, 0.3336400E+00, 0.3191500E+00, 0.3401300E+00, &
     & 0.3016600E+00, 0.3083200E+00, 0.3182600E+00, 0.2927400E+00, &
     & 0.3192300E+00, 0.3928700E+00, 0.4978600E+00, 0.3489100E+00, &
     & 0.3541700E+00, 0.3810300E+00, 0.4447733E+00, 0.4447733E+00 /
      data (ref_adm(31,iz,31,12),iz = 1,20) / &
     & 0.3227900E+00, 0.3227900E+00, 0.3437500E+00, 0.3417900E+00, &
     & 0.3457800E+00, 0.3557000E+00, 0.3462400E+00, 0.3868700E+00, &
     & 0.3838900E+00, 0.4210400E+00, 0.3881900E+00, 0.3818200E+00, &
     & 0.3955000E+00, 0.4381100E+00, 0.4497400E+00, 0.4646800E+00, &
     & 0.3220900E+00, 0.4423606E+00, 0.4559858E+00, 0.4559858E+00 /
      data (ref_adm(31,iz,32,12),iz = 1,20) / &
     & 0.2834800E+00, 0.2834800E+00, 0.2408000E+00, 0.2781900E+00, &
     & 0.2689900E+00, 0.2355600E+00, 0.2201300E+00, 0.3209100E+00, &
     & 0.3333600E+00, 0.3361900E+00, 0.3552800E+00, 0.3652600E+00, &
     & 0.4600200E+00, 0.3925800E+00, 0.3851800E+00, 0.3579600E+00, &
     & 0.3528200E+00, 0.4539809E+00, 0.4679102E+00, 0.4679102E+00 /
      data (ref_adm(31,iz,33,12),iz = 1,20) / &
     & 0.2744900E+00, 0.2744900E+00, 0.2805400E+00, 0.2792400E+00, &
     & 0.2937900E+00, 0.2874300E+00, 0.3979200E+00, 0.3591800E+00, &
     & 0.3459000E+00, 0.3536800E+00, 0.3416000E+00, 0.3794400E+00, &
     & 0.3990300E+00, 0.4092800E+00, 0.3957600E+00, 0.3884600E+00, &
     & 0.4638526E+00, 0.4649486E+00, 0.4792804E+00, 0.4792804E+00 /
      data (ref_adm(31,iz,34,12),iz = 1,20) / &
     & 0.3258100E+00, 0.3258100E+00, 0.3120500E+00, 0.2717300E+00, &
     & 0.2735800E+00, 0.3090400E+00, 0.3326100E+00, 0.2938500E+00, &
     & 0.3293100E+00, 0.3684900E+00, 0.3641400E+00, 0.4569800E+00, &
     & 0.3739600E+00, 0.4700000E+00, 0.3664400E+00, 0.4420867E+00, &
     & 0.4649961E+00, 0.4751529E+00, 0.4885870E+00, 0.4885870E+00 /
      data (ref_adm(31,iz,35,12),iz = 1,20) / &
     & 0.2772900E+00, 0.2772900E+00, 0.2794800E+00, 0.3319600E+00, &
     & 0.2440600E+00, 0.3259500E+00, 0.3158900E+00, 0.3285000E+00, &
     & 0.3573300E+00, 0.3813700E+00, 0.3848300E+00, 0.4303300E+00, &
     & 0.3572100E+00, 0.4684600E+00, 0.4508900E+00, 0.4342540E+00, &
     & 0.4589885E+00, 0.4800168E+00, 0.4966961E+00, 0.4966961E+00 /
      data (ref_adm(31,iz,36,12),iz = 1,20) / &
     & 0.2998400E+00, 0.2998400E+00, 0.3366200E+00, 0.3595500E+00, &
     & 0.3446400E+00, 0.3398000E+00, 0.3673100E+00, 0.3395400E+00, &
     & 0.3165800E+00, 0.3349800E+00, 0.4259500E+00, 0.4195000E+00, &
     & 0.4382500E+00, 0.4304800E+00, 0.5865100E+00, 0.4553700E+00, &
     & 0.4525355E+00, 0.4792792E+00, 0.5023445E+00, 0.5023445E+00 /
      data (ref_adm(31,iz,37,12),iz = 1,20) / &
     & 0.3287600E+00, 0.3287600E+00, 0.3433500E+00, 0.3499400E+00, &
     & 0.3581200E+00, 0.3758900E+00, 0.4003600E+00, 0.3710900E+00, &
     & 0.3728300E+00, 0.3086600E+00, 0.4072800E+00, 0.4466700E+00, &
     & 0.4764100E+00, 0.5349200E+00, 0.4345200E+00, 0.4457600E+00, &
     & 0.4097400E+00, 0.4776784E+00, 0.5058350E+00, 0.5058350E+00 /
      data (ref_adm(31,iz,38,12),iz = 1,20) / &
     & 0.3287600E+00, 0.3287600E+00, 0.3433500E+00, 0.3499400E+00, &
     & 0.3581200E+00, 0.3758900E+00, 0.4003600E+00, 0.3710900E+00, &
     & 0.3728300E+00, 0.3086600E+00, 0.4072800E+00, 0.4466700E+00, &
     & 0.4764100E+00, 0.5349200E+00, 0.4345200E+00, 0.4457600E+00, &
     & 0.4097400E+00, 0.4776784E+00, 0.5058350E+00, 0.5058350E+00 /
! Solar Zenith Angle 60.0 Albedo  0.3489789E+00
      data (ref_adm(31,iz, 1,13),iz = 1,20) / &
     & 0.2560600E+00, 0.2560600E+00, 0.2369600E+00, 0.2886500E+00, &
     & 0.3023000E+00, 0.2775800E+00, 0.3008200E+00, 0.3043700E+00, &
     & 0.2969100E+00, 0.3050900E+00, 0.3015600E+00, 0.3535200E+00, &
     & 0.3950800E+00, 0.4288500E+00, 0.5452600E+00, 0.5116300E+00, &
     & 0.6170300E+00, 0.6416961E+00, 0.7332506E+00, 0.7332506E+00 /
      data (ref_adm(31,iz, 2,13),iz = 1,20) / &
     & 0.2560600E+00, 0.2560600E+00, 0.2369600E+00, 0.2886500E+00, &
     & 0.3023000E+00, 0.2775800E+00, 0.3008200E+00, 0.3043700E+00, &
     & 0.2969100E+00, 0.3050900E+00, 0.3015600E+00, 0.3535200E+00, &
     & 0.3950800E+00, 0.4288500E+00, 0.5452600E+00, 0.5116300E+00, &
     & 0.6170300E+00, 0.6416961E+00, 0.7332506E+00, 0.7332506E+00 /
      data (ref_adm(31,iz, 3,13),iz = 1,20) / &
     & 0.2635500E+00, 0.2635500E+00, 0.3006500E+00, 0.3032300E+00, &
     & 0.2817600E+00, 0.2867100E+00, 0.2987100E+00, 0.3433700E+00, &
     & 0.2881400E+00, 0.3252900E+00, 0.3151200E+00, 0.3763900E+00, &
     & 0.3648400E+00, 0.4130900E+00, 0.4606200E+00, 0.4833100E+00, &
     & 0.5515300E+00, 0.6336967E+00, 0.2449801E+00, 0.2449801E+00 /
      data (ref_adm(31,iz, 4,13),iz = 1,20) / &
     & 0.3102600E+00, 0.3102600E+00, 0.3065000E+00, 0.2514000E+00, &
     & 0.2655800E+00, 0.2811400E+00, 0.2960000E+00, 0.2636700E+00, &
     & 0.2770300E+00, 0.2903600E+00, 0.3934200E+00, 0.3310600E+00, &
     & 0.3406500E+00, 0.3995600E+00, 0.4448100E+00, 0.5305100E+00, &
     & 0.4271200E+00, 0.6194862E+00, 0.6816652E+00, 0.6816652E+00 /
      data (ref_adm(31,iz, 5,13),iz = 1,20) / &
     & 0.2858900E+00, 0.2858900E+00, 0.2912400E+00, 0.3049600E+00, &
     & 0.2744300E+00, 0.3046400E+00, 0.2821700E+00, 0.2603500E+00, &
     & 0.2986700E+00, 0.2670800E+00, 0.3259400E+00, 0.3670600E+00, &
     & 0.4111000E+00, 0.4317600E+00, 0.4526000E+00, 0.5029400E+00, &
     & 0.5360200E+00, 0.4420800E+00, 0.6428765E+00, 0.6428765E+00 /
      data (ref_adm(31,iz, 6,13),iz = 1,20) / &
     & 0.2928000E+00, 0.2928000E+00, 0.3175400E+00, 0.3143300E+00, &
     & 0.2925600E+00, 0.3144500E+00, 0.3100400E+00, 0.3121100E+00, &
     & 0.2991300E+00, 0.3465500E+00, 0.3639700E+00, 0.4006000E+00, &
     & 0.3908600E+00, 0.4592100E+00, 0.4895700E+00, 0.4777600E+00, &
     & 0.4780700E+00, 0.4965100E+00, 0.4563800E+00, 0.4563800E+00 /
      data (ref_adm(31,iz, 7,13),iz = 1,20) / &
     & 0.3316200E+00, 0.3316200E+00, 0.2918200E+00, 0.2905300E+00, &
     & 0.2872300E+00, 0.2933600E+00, 0.3070000E+00, 0.2792500E+00, &
     & 0.3058700E+00, 0.3172500E+00, 0.3491900E+00, 0.3670900E+00, &
     & 0.3578000E+00, 0.4155900E+00, 0.4046600E+00, 0.4208600E+00, &
     & 0.4435500E+00, 0.4661600E+00, 0.5859016E+00, 0.5859016E+00 /
      data (ref_adm(31,iz, 8,13),iz = 1,20) / &
     & 0.3001900E+00, 0.3001900E+00, 0.2903800E+00, 0.2968100E+00, &
     & 0.2875900E+00, 0.2742600E+00, 0.3019300E+00, 0.3114200E+00, &
     & 0.3353300E+00, 0.3466300E+00, 0.3346000E+00, 0.3281300E+00, &
     & 0.3472300E+00, 0.3701800E+00, 0.3822600E+00, 0.3963400E+00, &
     & 0.4966600E+00, 0.4533700E+00, 0.5675806E+00, 0.5675806E+00 /
      data (ref_adm(31,iz, 9,13),iz = 1,20) / &
     & 0.3101800E+00, 0.3101800E+00, 0.2847800E+00, 0.3058800E+00, &
     & 0.3006800E+00, 0.2835200E+00, 0.2663800E+00, 0.2802500E+00, &
     & 0.3001400E+00, 0.3199300E+00, 0.3090300E+00, 0.3265800E+00, &
     & 0.3368100E+00, 0.3082400E+00, 0.4023900E+00, 0.3955400E+00, &
     & 0.4054200E+00, 0.5251046E+00, 0.5405211E+00, 0.5405211E+00 /
      data (ref_adm(31,iz,10,13),iz = 1,20) / &
     & 0.2913000E+00, 0.2913000E+00, 0.2910900E+00, 0.2835000E+00, &
     & 0.3388500E+00, 0.3087600E+00, 0.2929900E+00, 0.3041900E+00, &
     & 0.3069400E+00, 0.2804500E+00, 0.3084600E+00, 0.3086000E+00, &
     & 0.3534000E+00, 0.3049800E+00, 0.4118100E+00, 0.3874900E+00, &
     & 0.4946400E+00, 0.5049468E+00, 0.5111959E+00, 0.5111959E+00 /
      data (ref_adm(31,iz,11,13),iz = 1,20) / &
     & 0.2796300E+00, 0.2796300E+00, 0.2880800E+00, 0.3204700E+00, &
     & 0.3086100E+00, 0.3022800E+00, 0.2906600E+00, 0.3250800E+00, &
     & 0.3178200E+00, 0.3112100E+00, 0.2878500E+00, 0.3875400E+00, &
     & 0.3527800E+00, 0.3297200E+00, 0.3054800E+00, 0.3144300E+00, &
     & 0.2237700E+00, 0.4890527E+00, 0.4891086E+00, 0.4891086E+00 /
      data (ref_adm(31,iz,12,13),iz = 1,20) / &
     & 0.2932700E+00, 0.2932700E+00, 0.3153500E+00, 0.3102800E+00, &
     & 0.3228400E+00, 0.3299500E+00, 0.3210400E+00, 0.3740500E+00, &
     & 0.3221700E+00, 0.3123700E+00, 0.2953000E+00, 0.3551700E+00, &
     & 0.4131800E+00, 0.3267500E+00, 0.3200900E+00, 0.3642900E+00, &
     & 0.4512207E+00, 0.4768214E+00, 0.4729283E+00, 0.4729283E+00 /
      data (ref_adm(31,iz,13,13),iz = 1,20) / &
     & 0.3074000E+00, 0.3074000E+00, 0.3151300E+00, 0.3300000E+00, &
     & 0.2948100E+00, 0.3039400E+00, 0.3080100E+00, 0.2941900E+00, &
     & 0.2987200E+00, 0.3213900E+00, 0.3292000E+00, 0.3260400E+00, &
     & 0.3505800E+00, 0.3404500E+00, 0.5642300E+00, 0.3361900E+00, &
     & 0.5060100E+00, 0.4666118E+00, 0.4597082E+00, 0.4597082E+00 /
      data (ref_adm(31,iz,14,13),iz = 1,20) / &
     & 0.3001600E+00, 0.3001600E+00, 0.2952700E+00, 0.3143200E+00, &
     & 0.3225000E+00, 0.3121800E+00, 0.3021200E+00, 0.3271900E+00, &
     & 0.3193000E+00, 0.3299700E+00, 0.3330100E+00, 0.3438700E+00, &
     & 0.3447300E+00, 0.3719600E+00, 0.3059600E+00, 0.3015000E+00, &
     & 0.4332728E+00, 0.4574948E+00, 0.4488187E+00, 0.4488187E+00 /
      data (ref_adm(31,iz,15,13),iz = 1,20) / &
     & 0.2901700E+00, 0.2901700E+00, 0.2963000E+00, 0.2962700E+00, &
     & 0.2936300E+00, 0.2735900E+00, 0.2858200E+00, 0.2925300E+00, &
     & 0.3192200E+00, 0.3042400E+00, 0.3182700E+00, 0.3049700E+00, &
     & 0.3199700E+00, 0.3255700E+00, 0.3249400E+00, 0.4014147E+00, &
     & 0.4231973E+00, 0.4471621E+00, 0.4385365E+00, 0.4385365E+00 /
      data (ref_adm(31,iz,16,13),iz = 1,20) / &
     & 0.2838800E+00, 0.2838800E+00, 0.3056300E+00, 0.2906700E+00, &
     & 0.2820600E+00, 0.3068200E+00, 0.3051500E+00, 0.2836400E+00, &
     & 0.2831400E+00, 0.2995200E+00, 0.3084700E+00, 0.3253100E+00, &
     & 0.3529900E+00, 0.3411200E+00, 0.4089700E+00, 0.3934933E+00, &
     & 0.4143825E+00, 0.4362060E+00, 0.4268412E+00, 0.4268412E+00 /
      data (ref_adm(31,iz,17,13),iz = 1,20) / &
     & 0.2920500E+00, 0.2920500E+00, 0.3103900E+00, 0.3269100E+00, &
     & 0.3089700E+00, 0.2828200E+00, 0.2852300E+00, 0.3782000E+00, &
     & 0.3212800E+00, 0.3039000E+00, 0.3109600E+00, 0.3293600E+00, &
     & 0.3749500E+00, 0.3403400E+00, 0.2706900E+00, 0.3863992E+00, &
     & 0.4057815E+00, 0.4263066E+00, 0.4158018E+00, 0.4158018E+00 /
      data (ref_adm(31,iz,18,13),iz = 1,20) / &
     & 0.2918900E+00, 0.2918900E+00, 0.3015900E+00, 0.3274000E+00, &
     & 0.3122000E+00, 0.3137500E+00, 0.3238100E+00, 0.3326400E+00, &
     & 0.3400400E+00, 0.3031600E+00, 0.3201500E+00, 0.3245100E+00, &
     & 0.3155200E+00, 0.3688300E+00, 0.3497700E+00, 0.6185400E+00, &
     & 0.3846784E+00, 0.3918131E+00, 0.3708886E+00, 0.3708886E+00 /
      data (ref_adm(31,iz,19,13),iz = 1,20) / &
     & 0.2982600E+00, 0.2982600E+00, 0.2941800E+00, 0.2559800E+00, &
     & 0.2896900E+00, 0.3369300E+00, 0.2855400E+00, 0.3005600E+00, &
     & 0.3453700E+00, 0.3009900E+00, 0.3282000E+00, 0.3220500E+00, &
     & 0.3186800E+00, 0.3202100E+00, 0.4363200E+00, 0.3535400E+00, &
     & 0.3806305E+00, 0.3866375E+00, 0.3649375E+00, 0.3649375E+00 /
      data (ref_adm(31,iz,20,13),iz = 1,20) / &
     & 0.2941800E+00, 0.2941800E+00, 0.2894100E+00, 0.2626200E+00, &
     & 0.3151500E+00, 0.3292700E+00, 0.2803600E+00, 0.2983200E+00, &
     & 0.3142400E+00, 0.3830500E+00, 0.3551100E+00, 0.3515800E+00, &
     & 0.3291900E+00, 0.3856600E+00, 0.3113200E+00, 0.3688053E+00, &
     & 0.3771241E+00, 0.3827151E+00, 0.3614184E+00, 0.3614184E+00 /
      data (ref_adm(31,iz,21,13),iz = 1,20) / &
     & 0.2455300E+00, 0.2455300E+00, 0.2504700E+00, 0.2638100E+00, &
     & 0.2860700E+00, 0.3010000E+00, 0.3072700E+00, 0.3128200E+00, &
     & 0.3155500E+00, 0.4313200E+00, 0.4506400E+00, 0.3623200E+00, &
     & 0.3464800E+00, 0.3792500E+00, 0.3592900E+00, 0.3664705E+00, &
     & 0.3745429E+00, 0.3792262E+00, 0.3591485E+00, 0.3591485E+00 /
      data (ref_adm(31,iz,22,13),iz = 1,20) / &
     & 0.2673500E+00, 0.2673500E+00, 0.2988900E+00, 0.2911200E+00, &
     & 0.3015700E+00, 0.3135200E+00, 0.2650700E+00, 0.3425400E+00, &
     & 0.3360800E+00, 0.3139600E+00, 0.3817200E+00, 0.3719100E+00, &
     & 0.3807600E+00, 0.3757800E+00, 0.3887100E+00, 0.4125855E+00, &
     & 0.4359409E+00, 0.4664378E+00, 0.4861996E+00, 0.4861996E+00 /
      data (ref_adm(31,iz,23,13),iz = 1,20) / &
     & 0.3004200E+00, 0.3004200E+00, 0.3000100E+00, 0.3179000E+00, &
     & 0.2838100E+00, 0.3192600E+00, 0.3257100E+00, 0.3217900E+00, &
     & 0.3151100E+00, 0.2939100E+00, 0.3794100E+00, 0.3791100E+00, &
     & 0.3782900E+00, 0.3674800E+00, 0.3847100E+00, 0.3875200E+00, &
     & 0.4334759E+00, 0.4636172E+00, 0.4872591E+00, 0.4872591E+00 /
      data (ref_adm(31,iz,24,13),iz = 1,20) / &
     & 0.3012500E+00, 0.3012500E+00, 0.2993800E+00, 0.3051100E+00, &
     & 0.2890000E+00, 0.3116400E+00, 0.3220700E+00, 0.3136200E+00, &
     & 0.3543000E+00, 0.3413800E+00, 0.4153000E+00, 0.3666300E+00, &
     & 0.3546000E+00, 0.3297800E+00, 0.3354000E+00, 0.3512600E+00, &
     & 0.3581600E+00, 0.4636312E+00, 0.4918201E+00, 0.4918201E+00 /
      data (ref_adm(31,iz,25,13),iz = 1,20) / &
     & 0.3122800E+00, 0.3122800E+00, 0.2940500E+00, 0.3103300E+00, &
     & 0.3100000E+00, 0.3299800E+00, 0.3408800E+00, 0.3126900E+00, &
     & 0.3250600E+00, 0.3227500E+00, 0.3395600E+00, 0.3690000E+00, &
     & 0.3764700E+00, 0.3744900E+00, 0.3213300E+00, 0.3777200E+00, &
     & 0.3888600E+00, 0.3892500E+00, 0.4986139E+00, 0.4986139E+00 /
      data (ref_adm(31,iz,26,13),iz = 1,20) / &
     & 0.2911900E+00, 0.2911900E+00, 0.2966200E+00, 0.3156200E+00, &
     & 0.3297300E+00, 0.3374700E+00, 0.3207600E+00, 0.3287000E+00, &
     & 0.3370400E+00, 0.3365200E+00, 0.3417600E+00, 0.3439500E+00, &
     & 0.3164000E+00, 0.3182100E+00, 0.3356300E+00, 0.3907600E+00, &
     & 0.3576500E+00, 0.4831500E+00, 0.5099343E+00, 0.5099343E+00 /
      data (ref_adm(31,iz,27,13),iz = 1,20) / &
     & 0.3026900E+00, 0.3026900E+00, 0.2760400E+00, 0.2778600E+00, &
     & 0.3238700E+00, 0.3460400E+00, 0.2721500E+00, 0.3333700E+00, &
     & 0.3449400E+00, 0.3213000E+00, 0.3657500E+00, 0.3778500E+00, &
     & 0.4374000E+00, 0.4337200E+00, 0.3905100E+00, 0.3941600E+00, &
     & 0.3249700E+00, 0.3387000E+00, 0.5243081E+00, 0.5243081E+00 /
      data (ref_adm(31,iz,28,13),iz = 1,20) / &
     & 0.2997300E+00, 0.2997300E+00, 0.2865600E+00, 0.2766800E+00, &
     & 0.2811100E+00, 0.3118500E+00, 0.3133600E+00, 0.3500200E+00, &
     & 0.3269300E+00, 0.3704500E+00, 0.3275000E+00, 0.3569400E+00, &
     & 0.3534700E+00, 0.4041600E+00, 0.4244100E+00, 0.3550600E+00, &
     & 0.3525000E+00, 0.3574400E+00, 0.5400123E+00, 0.5400123E+00 /
      data (ref_adm(31,iz,29,13),iz = 1,20) / &
     & 0.2898000E+00, 0.2898000E+00, 0.3013300E+00, 0.3038700E+00, &
     & 0.2841700E+00, 0.2897400E+00, 0.3434600E+00, 0.3234800E+00, &
     & 0.3385300E+00, 0.3759400E+00, 0.3633000E+00, 0.3138900E+00, &
     & 0.3814400E+00, 0.4040200E+00, 0.3136700E+00, 0.3522600E+00, &
     & 0.4121000E+00, 0.5010456E+00, 0.5576720E+00, 0.5576720E+00 /
      data (ref_adm(31,iz,30,13),iz = 1,20) / &
     & 0.3051900E+00, 0.3051900E+00, 0.3058500E+00, 0.2963700E+00, &
     & 0.2910400E+00, 0.2752500E+00, 0.2875600E+00, 0.3135200E+00, &
     & 0.3011000E+00, 0.3771000E+00, 0.3478600E+00, 0.3696700E+00, &
     & 0.3906500E+00, 0.3281600E+00, 0.3692300E+00, 0.4269100E+00, &
     & 0.3735400E+00, 0.5143581E+00, 0.5763271E+00, 0.5763271E+00 /
      data (ref_adm(31,iz,31,13),iz = 1,20) / &
     & 0.2977500E+00, 0.2977500E+00, 0.3000300E+00, 0.3070500E+00, &
     & 0.3101900E+00, 0.3114000E+00, 0.3127100E+00, 0.3070700E+00, &
     & 0.3100700E+00, 0.3098700E+00, 0.3388500E+00, 0.3477700E+00, &
     & 0.3534800E+00, 0.3546900E+00, 0.3591300E+00, 0.3302400E+00, &
     & 0.3882100E+00, 0.5289065E+00, 0.5959723E+00, 0.5959723E+00 /
      data (ref_adm(31,iz,32,13),iz = 1,20) / &
     & 0.3227400E+00, 0.3227400E+00, 0.3107900E+00, 0.2805500E+00, &
     & 0.2958200E+00, 0.3212200E+00, 0.3278600E+00, 0.3070000E+00, &
     & 0.3026900E+00, 0.3209500E+00, 0.3779300E+00, 0.3457200E+00, &
     & 0.3377300E+00, 0.3717500E+00, 0.3889000E+00, 0.3453900E+00, &
     & 0.4276300E+00, 0.4313800E+00, 0.6147728E+00, 0.6147728E+00 /
      data (ref_adm(31,iz,33,13),iz = 1,20) / &
     & 0.2924500E+00, 0.2924500E+00, 0.3323100E+00, 0.3042200E+00, &
     & 0.3040900E+00, 0.3011100E+00, 0.3485500E+00, 0.3629700E+00, &
     & 0.3406200E+00, 0.4266600E+00, 0.4165500E+00, 0.4432500E+00, &
     & 0.4017200E+00, 0.4444400E+00, 0.5103900E+00, 0.3962000E+00, &
     & 0.3990400E+00, 0.5559263E+00, 0.6321763E+00, 0.6321763E+00 /
      data (ref_adm(31,iz,34,13),iz = 1,20) / &
     & 0.3054900E+00, 0.3054900E+00, 0.2746100E+00, 0.2871300E+00, &
     & 0.3007700E+00, 0.3190100E+00, 0.3239500E+00, 0.3493300E+00, &
     & 0.4094400E+00, 0.3669300E+00, 0.3715000E+00, 0.3948900E+00, &
     & 0.3512800E+00, 0.4785900E+00, 0.4200300E+00, 0.3737700E+00, &
     & 0.4286600E+00, 0.5609867E+00, 0.6462981E+00, 0.6462981E+00 /
      data (ref_adm(31,iz,35,13),iz = 1,20) / &
     & 0.2907000E+00, 0.2907000E+00, 0.2692700E+00, 0.2813300E+00, &
     & 0.3049600E+00, 0.3565300E+00, 0.4376900E+00, 0.3399000E+00, &
     & 0.3389900E+00, 0.3216900E+00, 0.3680400E+00, 0.4160400E+00, &
     & 0.3573800E+00, 0.4167800E+00, 0.4970800E+00, 0.4184900E+00, &
     & 0.4709900E+00, 0.5613444E+00, 0.6543288E+00, 0.6543288E+00 /
      data (ref_adm(31,iz,36,13),iz = 1,20) / &
     & 0.2817800E+00, 0.2817800E+00, 0.2888000E+00, 0.3178700E+00, &
     & 0.3329100E+00, 0.3443200E+00, 0.3615400E+00, 0.3669100E+00, &
     & 0.3134800E+00, 0.3437000E+00, 0.3648100E+00, 0.4302000E+00, &
     & 0.5197800E+00, 0.3741900E+00, 0.4181700E+00, 0.6885800E+00, &
     & 0.5071565E+00, 0.5618762E+00, 0.6572251E+00, 0.6572251E+00 /
      data (ref_adm(31,iz,37,13),iz = 1,20) / &
     & 0.2926200E+00, 0.2926200E+00, 0.2861600E+00, 0.2977100E+00, &
     & 0.3253100E+00, 0.3820000E+00, 0.3190600E+00, 0.3623600E+00, &
     & 0.3904800E+00, 0.3713800E+00, 0.3718600E+00, 0.4103800E+00, &
     & 0.4477100E+00, 0.3102700E+00, 0.4481100E+00, 0.4706500E+00, &
     & 0.5980200E+00, 0.5581600E+00, 0.6585139E+00, 0.6585139E+00 /
      data (ref_adm(31,iz,38,13),iz = 1,20) / &
     & 0.2926200E+00, 0.2926200E+00, 0.2861600E+00, 0.2977100E+00, &
     & 0.3253100E+00, 0.3820000E+00, 0.3190600E+00, 0.3623600E+00, &
     & 0.3904800E+00, 0.3713800E+00, 0.3718600E+00, 0.4103800E+00, &
     & 0.4477100E+00, 0.3102700E+00, 0.4481100E+00, 0.4706500E+00, &
     & 0.5980200E+00, 0.5581600E+00, 0.6585139E+00, 0.6585139E+00 /
! Solar Zenith Angle 65.0 Albedo  0.3725023E+00
      data (ref_adm(31,iz, 1,14),iz = 1,20) / &
     & 0.3243400E+00, 0.3243400E+00, 0.3149600E+00, 0.3109200E+00, &
     & 0.3413700E+00, 0.3339200E+00, 0.2943200E+00, 0.2737100E+00, &
     & 0.3184400E+00, 0.3817900E+00, 0.3265900E+00, 0.3799200E+00, &
     & 0.4417600E+00, 0.5747900E+00, 0.5455400E+00, 0.5122600E+00, &
     & 0.7657200E+00, 0.8034446E+00, 0.1079593E+01, 0.1079593E+01 /
      data (ref_adm(31,iz, 2,14),iz = 1,20) / &
     & 0.3243400E+00, 0.3243400E+00, 0.3149600E+00, 0.3109200E+00, &
     & 0.3413700E+00, 0.3339200E+00, 0.2943200E+00, 0.2737100E+00, &
     & 0.3184400E+00, 0.3817900E+00, 0.3265900E+00, 0.3799200E+00, &
     & 0.4417600E+00, 0.5747900E+00, 0.5455400E+00, 0.5122600E+00, &
     & 0.7657200E+00, 0.8034446E+00, 0.1079593E+01, 0.1079593E+01 /
      data (ref_adm(31,iz, 3,14),iz = 1,20) / &
     & 0.3095000E+00, 0.3095000E+00, 0.3344900E+00, 0.3076400E+00, &
     & 0.3089100E+00, 0.3146100E+00, 0.3043500E+00, 0.3276100E+00, &
     & 0.3529700E+00, 0.3420600E+00, 0.3673700E+00, 0.3842900E+00, &
     & 0.4098700E+00, 0.4401500E+00, 0.5579000E+00, 0.5840700E+00, &
     & 0.6263372E+00, 0.7816389E+00, 0.3197729E+00, 0.3197729E+00 /
      data (ref_adm(31,iz, 4,14),iz = 1,20) / &
     & 0.3433400E+00, 0.3433400E+00, 0.3185500E+00, 0.3196900E+00, &
     & 0.3056300E+00, 0.2907500E+00, 0.3252700E+00, 0.3510800E+00, &
     & 0.3252800E+00, 0.3837200E+00, 0.3731600E+00, 0.3800800E+00, &
     & 0.4156100E+00, 0.4014500E+00, 0.4407300E+00, 0.6557400E+00, &
     & 0.4887400E+00, 0.7422464E+00, 0.9180492E+00, 0.9180492E+00 /
      data (ref_adm(31,iz, 5,14),iz = 1,20) / &
     & 0.2822100E+00, 0.2822100E+00, 0.2822600E+00, 0.3090000E+00, &
     & 0.3020400E+00, 0.3305300E+00, 0.3112200E+00, 0.3340800E+00, &
     & 0.3605800E+00, 0.3323400E+00, 0.3327300E+00, 0.4307800E+00, &
     & 0.4276500E+00, 0.4191100E+00, 0.4788900E+00, 0.5802700E+00, &
     & 0.6154500E+00, 0.6987991E+00, 0.8141360E+00, 0.8141360E+00 /
      data (ref_adm(31,iz, 6,14),iz = 1,20) / &
     & 0.2986800E+00, 0.2986800E+00, 0.2978500E+00, 0.2929800E+00, &
     & 0.2735500E+00, 0.2978700E+00, 0.3086700E+00, 0.3102800E+00, &
     & 0.3522800E+00, 0.3220400E+00, 0.3570200E+00, 0.4103300E+00, &
     & 0.4023700E+00, 0.4834800E+00, 0.4079100E+00, 0.4352300E+00, &
     & 0.4263400E+00, 0.6603401E+00, 0.7306463E+00, 0.7306463E+00 /
      data (ref_adm(31,iz, 7,14),iz = 1,20) / &
     & 0.3154400E+00, 0.3154400E+00, 0.2932000E+00, 0.2744900E+00, &
     & 0.2881300E+00, 0.2917400E+00, 0.3020200E+00, 0.3099100E+00, &
     & 0.3065900E+00, 0.3258200E+00, 0.3206600E+00, 0.3297200E+00, &
     & 0.3232900E+00, 0.4496300E+00, 0.4393600E+00, 0.4083800E+00, &
     & 0.4536300E+00, 0.4764800E+00, 0.6667234E+00, 0.6667234E+00 /
      data (ref_adm(31,iz, 8,14),iz = 1,20) / &
     & 0.2813200E+00, 0.2813200E+00, 0.2926300E+00, 0.3003600E+00, &
     & 0.3148300E+00, 0.3443500E+00, 0.3108100E+00, 0.3254300E+00, &
     & 0.3401500E+00, 0.3654300E+00, 0.3483500E+00, 0.3188200E+00, &
     & 0.3824900E+00, 0.3450200E+00, 0.3918400E+00, 0.3713200E+00, &
     & 0.5481731E+00, 0.6127919E+00, 0.6321476E+00, 0.6321476E+00 /
      data (ref_adm(31,iz, 9,14),iz = 1,20) / &
     & 0.3178000E+00, 0.3178000E+00, 0.3434300E+00, 0.3437500E+00, &
     & 0.3547100E+00, 0.2869300E+00, 0.3487000E+00, 0.3358800E+00, &
     & 0.3792400E+00, 0.3689900E+00, 0.3609800E+00, 0.3499300E+00, &
     & 0.4076400E+00, 0.3430400E+00, 0.4126500E+00, 0.3530000E+00, &
     & 0.4011800E+00, 0.5840434E+00, 0.6098303E+00, 0.6098303E+00 /
      data (ref_adm(31,iz,10,14),iz = 1,20) / &
     & 0.3173200E+00, 0.3173200E+00, 0.3328100E+00, 0.3683800E+00, &
     & 0.3346700E+00, 0.3352900E+00, 0.3193500E+00, 0.3459100E+00, &
     & 0.3319300E+00, 0.3671000E+00, 0.3478700E+00, 0.3780400E+00, &
     & 0.3843700E+00, 0.3719600E+00, 0.3517800E+00, 0.2842400E+00, &
     & 0.4182000E+00, 0.5528902E+00, 0.5725900E+00, 0.5725900E+00 /
      data (ref_adm(31,iz,11,14),iz = 1,20) / &
     & 0.2938200E+00, 0.2938200E+00, 0.3177600E+00, 0.3459800E+00, &
     & 0.3276200E+00, 0.3281100E+00, 0.3103900E+00, 0.3587200E+00, &
     & 0.3208700E+00, 0.3406600E+00, 0.3503200E+00, 0.3896800E+00, &
     & 0.3763100E+00, 0.3441200E+00, 0.3442100E+00, 0.3259900E+00, &
     & 0.4915217E+00, 0.5295014E+00, 0.5395973E+00, 0.5395973E+00 /
      data (ref_adm(31,iz,12,14),iz = 1,20) / &
     & 0.3166500E+00, 0.3166500E+00, 0.3046800E+00, 0.2832200E+00, &
     & 0.2904400E+00, 0.2797200E+00, 0.3168400E+00, 0.3093000E+00, &
     & 0.3139200E+00, 0.3717900E+00, 0.3484000E+00, 0.3709200E+00, &
     & 0.3278800E+00, 0.3675500E+00, 0.3907700E+00, 0.4358400E+00, &
     & 0.6263100E+00, 0.5127032E+00, 0.5170051E+00, 0.5170051E+00 /
      data (ref_adm(31,iz,13,14),iz = 1,20) / &
     & 0.3098400E+00, 0.3098400E+00, 0.3026000E+00, 0.2821700E+00, &
     & 0.2730600E+00, 0.2897700E+00, 0.3039100E+00, 0.3344600E+00, &
     & 0.3510800E+00, 0.3133400E+00, 0.3420600E+00, 0.3394100E+00, &
     & 0.3336100E+00, 0.3968400E+00, 0.3958500E+00, 0.3613800E+00, &
     & 0.4701135E+00, 0.4577000E+00, 0.4996629E+00, 0.4996629E+00 /
      data (ref_adm(31,iz,14,14),iz = 1,20) / &
     & 0.3120800E+00, 0.3120800E+00, 0.3098500E+00, 0.3222600E+00, &
     & 0.3300200E+00, 0.3317900E+00, 0.3214600E+00, 0.3249600E+00, &
     & 0.3483700E+00, 0.3507700E+00, 0.3295200E+00, 0.3297800E+00, &
     & 0.3831500E+00, 0.3527600E+00, 0.3176600E+00, 0.2848200E+00, &
     & 0.4608963E+00, 0.4889949E+00, 0.4860252E+00, 0.4860252E+00 /
      data (ref_adm(31,iz,15,14),iz = 1,20) / &
     & 0.3198300E+00, 0.3198300E+00, 0.3122100E+00, 0.3075200E+00, &
     & 0.2967800E+00, 0.3047700E+00, 0.3123100E+00, 0.3143800E+00, &
     & 0.3425000E+00, 0.3661500E+00, 0.3617400E+00, 0.4001600E+00, &
     & 0.3757900E+00, 0.3468200E+00, 0.4272400E+00, 0.2409900E+00, &
     & 0.3178500E+00, 0.4783986E+00, 0.4740143E+00, 0.4740143E+00 /
      data (ref_adm(31,iz,16,14),iz = 1,20) / &
     & 0.2796200E+00, 0.2796200E+00, 0.2551300E+00, 0.2828900E+00, &
     & 0.2823300E+00, 0.2605000E+00, 0.2714800E+00, 0.2850800E+00, &
     & 0.3069700E+00, 0.3144500E+00, 0.3308900E+00, 0.3300800E+00, &
     & 0.3569500E+00, 0.3439500E+00, 0.4321100E+00, 0.4173440E+00, &
     & 0.4405432E+00, 0.4660076E+00, 0.4611908E+00, 0.4611908E+00 /
      data (ref_adm(31,iz,17,14),iz = 1,20) / &
     & 0.2843700E+00, 0.2843700E+00, 0.2985000E+00, 0.2806000E+00, &
     & 0.3178300E+00, 0.3225400E+00, 0.3339500E+00, 0.3504500E+00, &
     & 0.3215200E+00, 0.3497400E+00, 0.3506900E+00, 0.4061800E+00, &
     & 0.3708600E+00, 0.3164000E+00, 0.2918700E+00, 0.4156300E+00, &
     & 0.4313060E+00, 0.4550881E+00, 0.4482680E+00, 0.4482680E+00 /
      data (ref_adm(31,iz,18,14),iz = 1,20) / &
     & 0.3147900E+00, 0.3147900E+00, 0.3053000E+00, 0.3091200E+00, &
     & 0.3013500E+00, 0.3120200E+00, 0.3371200E+00, 0.3262100E+00, &
     & 0.3291800E+00, 0.4045900E+00, 0.3255300E+00, 0.3556900E+00, &
     & 0.3864700E+00, 0.2801800E+00, 0.3789995E+00, 0.5027500E+00, &
     & 0.4023792E+00, 0.4112056E+00, 0.3909185E+00, 0.3909185E+00 /
      data (ref_adm(31,iz,19,14),iz = 1,20) / &
     & 0.3017700E+00, 0.3017700E+00, 0.3232000E+00, 0.2869100E+00, &
     & 0.3129300E+00, 0.3161100E+00, 0.3120900E+00, 0.2984600E+00, &
     & 0.3210600E+00, 0.3839500E+00, 0.3302400E+00, 0.4000200E+00, &
     & 0.4202700E+00, 0.3052900E+00, 0.3885300E+00, 0.5236800E+00, &
     & 0.3979544E+00, 0.4054662E+00, 0.3842942E+00, 0.3842942E+00 /
      data (ref_adm(31,iz,20,14),iz = 1,20) / &
     & 0.3074900E+00, 0.3074900E+00, 0.2894000E+00, 0.3044700E+00, &
     & 0.2963100E+00, 0.3231700E+00, 0.3266400E+00, 0.3044100E+00, &
     & 0.3035000E+00, 0.3568900E+00, 0.4060900E+00, 0.3173100E+00, &
     & 0.4351300E+00, 0.3499800E+00, 0.3956600E+00, 0.3844566E+00, &
     & 0.3940756E+00, 0.4011649E+00, 0.3803803E+00, 0.3803803E+00 /
      data (ref_adm(31,iz,21,14),iz = 1,20) / &
     & 0.2764200E+00, 0.2764200E+00, 0.2731100E+00, 0.2891300E+00, &
     & 0.3463800E+00, 0.3285200E+00, 0.3063300E+00, 0.2682800E+00, &
     & 0.3090200E+00, 0.3193400E+00, 0.3626300E+00, 0.3523800E+00, &
     & 0.3753900E+00, 0.4139100E+00, 0.4494900E+00, 0.3818887E+00, &
     & 0.3911150E+00, 0.3973055E+00, 0.3779220E+00, 0.3779220E+00 /
      data (ref_adm(31,iz,22,14),iz = 1,20) / &
     & 0.2828500E+00, 0.2828500E+00, 0.2893100E+00, 0.3152000E+00, &
     & 0.2994200E+00, 0.3205900E+00, 0.3337700E+00, 0.3129000E+00, &
     & 0.3111500E+00, 0.3377300E+00, 0.3974400E+00, 0.4142700E+00, &
     & 0.4091900E+00, 0.3793700E+00, 0.3032500E+00, 0.5014445E+00, &
     & 0.5232118E+00, 0.5366172E+00, 0.5206457E+00, 0.5206457E+00 /
      data (ref_adm(31,iz,23,14),iz = 1,20) / &
     & 0.3052800E+00, 0.3052800E+00, 0.3598500E+00, 0.3016900E+00, &
     & 0.3192700E+00, 0.3110700E+00, 0.3295000E+00, 0.2709700E+00, &
     & 0.2866600E+00, 0.3278500E+00, 0.3978400E+00, 0.4183500E+00, &
     & 0.4702100E+00, 0.4700200E+00, 0.3814500E+00, 0.4076100E+00, &
     & 0.5091203E+00, 0.5212638E+00, 0.5152752E+00, 0.5152752E+00 /
      data (ref_adm(31,iz,24,14),iz = 1,20) / &
     & 0.2888100E+00, 0.2888100E+00, 0.3008000E+00, 0.2946300E+00, &
     & 0.3002900E+00, 0.3014900E+00, 0.3091200E+00, 0.2994100E+00, &
     & 0.3043300E+00, 0.3289500E+00, 0.3714000E+00, 0.3673400E+00, &
     & 0.3472000E+00, 0.4245900E+00, 0.4042200E+00, 0.3395100E+00, &
     & 0.4227200E+00, 0.5096367E+00, 0.5137677E+00, 0.5137677E+00 /
      data (ref_adm(31,iz,25,14),iz = 1,20) / &
     & 0.2974400E+00, 0.2974400E+00, 0.3213500E+00, 0.3256300E+00, &
     & 0.3494100E+00, 0.3500600E+00, 0.3589000E+00, 0.3538600E+00, &
     & 0.3756000E+00, 0.3871000E+00, 0.3931000E+00, 0.3993000E+00, &
     & 0.3628800E+00, 0.3987000E+00, 0.4056100E+00, 0.4340100E+00, &
     & 0.3544000E+00, 0.3079800E+00, 0.5144774E+00, 0.5144774E+00 /
      data (ref_adm(31,iz,26,14),iz = 1,20) / &
     & 0.3169300E+00, 0.3169300E+00, 0.3290300E+00, 0.3377500E+00, &
     & 0.3408800E+00, 0.3569000E+00, 0.3455100E+00, 0.3513500E+00, &
     & 0.3718700E+00, 0.3892000E+00, 0.3673500E+00, 0.3909400E+00, &
     & 0.3929100E+00, 0.4543600E+00, 0.4117300E+00, 0.4144700E+00, &
     & 0.3820600E+00, 0.3559500E+00, 0.5210151E+00, 0.5210151E+00 /
      data (ref_adm(31,iz,27,14),iz = 1,20) / &
     & 0.3091200E+00, 0.3091200E+00, 0.3656000E+00, 0.3223400E+00, &
     & 0.3107100E+00, 0.3290300E+00, 0.3328200E+00, 0.3381600E+00, &
     & 0.3426600E+00, 0.3694100E+00, 0.3567400E+00, 0.3729500E+00, &
     & 0.4220700E+00, 0.3923300E+00, 0.3885700E+00, 0.4198100E+00, &
     & 0.3456200E+00, 0.3353900E+00, 0.5316989E+00, 0.5316989E+00 /
      data (ref_adm(31,iz,28,14),iz = 1,20) / &
     & 0.3152700E+00, 0.3152700E+00, 0.3199100E+00, 0.3026700E+00, &
     & 0.2989500E+00, 0.3006000E+00, 0.3855400E+00, 0.3519200E+00, &
     & 0.3526300E+00, 0.3788000E+00, 0.3828300E+00, 0.3958500E+00, &
     & 0.3937300E+00, 0.3985800E+00, 0.4364700E+00, 0.3706200E+00, &
     & 0.4905435E+00, 0.5043786E+00, 0.5439285E+00, 0.5439285E+00 /
      data (ref_adm(31,iz,29,14),iz = 1,20) / &
     & 0.3093300E+00, 0.3093300E+00, 0.3001700E+00, 0.3064000E+00, &
     & 0.3135900E+00, 0.3436400E+00, 0.3399700E+00, 0.3476100E+00, &
     & 0.3408300E+00, 0.3821200E+00, 0.4216400E+00, 0.3844100E+00, &
     & 0.3814100E+00, 0.4137000E+00, 0.4699300E+00, 0.4101700E+00, &
     & 0.5197300E+00, 0.5139843E+00, 0.5591015E+00, 0.5591015E+00 /
      data (ref_adm(31,iz,30,14),iz = 1,20) / &
     & 0.3127300E+00, 0.3127300E+00, 0.3002300E+00, 0.3108200E+00, &
     & 0.3165800E+00, 0.3132100E+00, 0.3103400E+00, 0.3383500E+00, &
     & 0.3403100E+00, 0.3976900E+00, 0.3720700E+00, 0.3633300E+00, &
     & 0.3805000E+00, 0.4441100E+00, 0.4507200E+00, 0.4536700E+00, &
     & 0.4021600E+00, 0.3696500E+00, 0.5760454E+00, 0.5760454E+00 /
      data (ref_adm(31,iz,31,14),iz = 1,20) / &
     & 0.3284900E+00, 0.3284900E+00, 0.3526700E+00, 0.2968900E+00, &
     & 0.2859700E+00, 0.3239700E+00, 0.3229500E+00, 0.3455700E+00, &
     & 0.3737200E+00, 0.3810100E+00, 0.3905300E+00, 0.3640600E+00, &
     & 0.4324000E+00, 0.4662800E+00, 0.4684000E+00, 0.3938400E+00, &
     & 0.3701800E+00, 0.5434377E+00, 0.5950872E+00, 0.5950872E+00 /
      data (ref_adm(31,iz,32,14),iz = 1,20) / &
     & 0.2874100E+00, 0.2874100E+00, 0.2899200E+00, 0.3038100E+00, &
     & 0.3089200E+00, 0.3147600E+00, 0.3053600E+00, 0.3054400E+00, &
     & 0.3210000E+00, 0.3568900E+00, 0.3856800E+00, 0.4090000E+00, &
     & 0.3803700E+00, 0.4227800E+00, 0.4522800E+00, 0.4962600E+00, &
     & 0.5417612E+00, 0.5603276E+00, 0.6138488E+00, 0.6138488E+00 /
      data (ref_adm(31,iz,33,14),iz = 1,20) / &
     & 0.2982400E+00, 0.2982400E+00, 0.3009200E+00, 0.2995600E+00, &
     & 0.3276000E+00, 0.3343000E+00, 0.3269600E+00, 0.3277100E+00, &
     & 0.3513200E+00, 0.3650000E+00, 0.3990500E+00, 0.3876700E+00, &
     & 0.4144200E+00, 0.4330000E+00, 0.4678800E+00, 0.4841800E+00, &
     & 0.4534900E+00, 0.5750258E+00, 0.6315480E+00, 0.6315480E+00 /
      data (ref_adm(31,iz,34,14),iz = 1,20) / &
     & 0.3107200E+00, 0.3107200E+00, 0.3358300E+00, 0.3183400E+00, &
     & 0.3383500E+00, 0.3665300E+00, 0.3845300E+00, 0.3784800E+00, &
     & 0.3865700E+00, 0.3958600E+00, 0.4394800E+00, 0.4208100E+00, &
     & 0.4673200E+00, 0.4637700E+00, 0.4829900E+00, 0.5236300E+00, &
     & 0.4651000E+00, 0.5727850E+00, 0.6453469E+00, 0.6453469E+00 /
      data (ref_adm(31,iz,35,14),iz = 1,20) / &
     & 0.3209400E+00, 0.3209400E+00, 0.3174100E+00, 0.3131100E+00, &
     & 0.3330100E+00, 0.3350500E+00, 0.4026100E+00, 0.3959500E+00, &
     & 0.3736300E+00, 0.4096800E+00, 0.4816100E+00, 0.4236400E+00, &
     & 0.4519000E+00, 0.4967800E+00, 0.4780200E+00, 0.5307300E+00, &
     & 0.6430000E+00, 0.5618548E+00, 0.6510260E+00, 0.6510260E+00 /
      data (ref_adm(31,iz,36,14),iz = 1,20) / &
     & 0.3309100E+00, 0.3309100E+00, 0.3263600E+00, 0.3453700E+00, &
     & 0.3427100E+00, 0.3426800E+00, 0.3464200E+00, 0.3582800E+00, &
     & 0.3563000E+00, 0.4023000E+00, 0.4301800E+00, 0.4546100E+00, &
     & 0.4574500E+00, 0.5111300E+00, 0.5350600E+00, 0.5002396E+00, &
     & 0.5222217E+00, 0.4844500E+00, 0.6508752E+00, 0.6508752E+00 /
      data (ref_adm(31,iz,37,14),iz = 1,20) / &
     & 0.3281000E+00, 0.3281000E+00, 0.3175900E+00, 0.3424500E+00, &
     & 0.3417900E+00, 0.3702300E+00, 0.3655500E+00, 0.3229200E+00, &
     & 0.3622700E+00, 0.4107000E+00, 0.4339700E+00, 0.4768300E+00, &
     & 0.4947100E+00, 0.4998800E+00, 0.5759400E+00, 0.5276529E+00, &
     & 0.5254949E+00, 0.5534815E+00, 0.6502708E+00, 0.6502708E+00 /
      data (ref_adm(31,iz,38,14),iz = 1,20) / &
     & 0.3281000E+00, 0.3281000E+00, 0.3175900E+00, 0.3424500E+00, &
     & 0.3417900E+00, 0.3702300E+00, 0.3655500E+00, 0.3229200E+00, &
     & 0.3622700E+00, 0.4107000E+00, 0.4339700E+00, 0.4768300E+00, &
     & 0.4947100E+00, 0.4998800E+00, 0.5759400E+00, 0.5276529E+00, &
     & 0.5254949E+00, 0.5534815E+00, 0.6502708E+00, 0.6502708E+00 /
! Solar Zenith Angle 70.0 Albedo  0.3711254E+00
      data (ref_adm(31,iz, 1,15),iz = 1,20) / &
     & 0.2645000E+00, 0.2645000E+00, 0.2957300E+00, 0.3221600E+00, &
     & 0.2875200E+00, 0.3072700E+00, 0.3212600E+00, 0.3803400E+00, &
     & 0.3789600E+00, 0.3528200E+00, 0.3646000E+00, 0.3483700E+00, &
     & 0.4302900E+00, 0.4737700E+00, 0.4158600E+00, 0.5261538E+00, &
     & 0.5729064E+00, 0.6723493E+00, 0.8039061E+00, 0.8039061E+00 /
      data (ref_adm(31,iz, 2,15),iz = 1,20) / &
     & 0.2645000E+00, 0.2645000E+00, 0.2957300E+00, 0.3221600E+00, &
     & 0.2875200E+00, 0.3072700E+00, 0.3212600E+00, 0.3803400E+00, &
     & 0.3789600E+00, 0.3528200E+00, 0.3646000E+00, 0.3483700E+00, &
     & 0.4302900E+00, 0.4737700E+00, 0.4158600E+00, 0.5261538E+00, &
     & 0.5729064E+00, 0.6723493E+00, 0.8039061E+00, 0.8039061E+00 /
      data (ref_adm(31,iz, 3,15),iz = 1,20) / &
     & 0.2963800E+00, 0.2963800E+00, 0.2995000E+00, 0.2631000E+00, &
     & 0.3175800E+00, 0.3120300E+00, 0.3068700E+00, 0.3280000E+00, &
     & 0.3417300E+00, 0.3859100E+00, 0.3842700E+00, 0.3703600E+00, &
     & 0.4475700E+00, 0.4362500E+00, 0.5560300E+00, 0.5809800E+00, &
     & 0.5701995E+00, 0.6604378E+00, 0.2657866E+00, 0.2657866E+00 /
      data (ref_adm(31,iz, 4,15),iz = 1,20) / &
     & 0.3092900E+00, 0.3092900E+00, 0.3126100E+00, 0.3283300E+00, &
     & 0.2893000E+00, 0.2731700E+00, 0.3171800E+00, 0.3277900E+00, &
     & 0.3260300E+00, 0.3191100E+00, 0.3303900E+00, 0.2801100E+00, &
     & 0.4173800E+00, 0.4319500E+00, 0.4916200E+00, 0.5261000E+00, &
     & 0.6064600E+00, 0.6388730E+00, 0.7328809E+00, 0.7328809E+00 /
      data (ref_adm(31,iz, 5,15),iz = 1,20) / &
     & 0.3085300E+00, 0.3085300E+00, 0.3249000E+00, 0.3104400E+00, &
     & 0.3025500E+00, 0.2835400E+00, 0.2827700E+00, 0.2974000E+00, &
     & 0.3303300E+00, 0.3252200E+00, 0.3555300E+00, 0.3329200E+00, &
     & 0.4012400E+00, 0.4187600E+00, 0.4360700E+00, 0.5949900E+00, &
     & 0.5607581E+00, 0.6164461E+00, 0.6788431E+00, 0.6788431E+00 /
      data (ref_adm(31,iz, 6,15),iz = 1,20) / &
     & 0.2881000E+00, 0.2881000E+00, 0.2746800E+00, 0.2651700E+00, &
     & 0.2761100E+00, 0.2684600E+00, 0.2659800E+00, 0.2913900E+00, &
     & 0.2892600E+00, 0.3107600E+00, 0.3353400E+00, 0.3384100E+00, &
     & 0.3603600E+00, 0.4336300E+00, 0.4763700E+00, 0.5538700E+00, &
     & 0.5481262E+00, 0.5984662E+00, 0.6294118E+00, 0.6294118E+00 /
      data (ref_adm(31,iz, 7,15),iz = 1,20) / &
     & 0.2936100E+00, 0.2936100E+00, 0.2938000E+00, 0.2930700E+00, &
     & 0.2938100E+00, 0.3013900E+00, 0.3129700E+00, 0.2907400E+00, &
     & 0.2955000E+00, 0.3099200E+00, 0.3848400E+00, 0.3836700E+00, &
     & 0.3910300E+00, 0.4566100E+00, 0.4795700E+00, 0.5119400E+00, &
     & 0.5449300E+00, 0.7176600E+00, 0.5933886E+00, 0.5933886E+00 /
      data (ref_adm(31,iz, 8,15),iz = 1,20) / &
     & 0.2918900E+00, 0.2918900E+00, 0.3202700E+00, 0.3174700E+00, &
     & 0.3180100E+00, 0.2844700E+00, 0.2733600E+00, 0.2616000E+00, &
     & 0.3062900E+00, 0.3027700E+00, 0.3109400E+00, 0.3595400E+00, &
     & 0.3570500E+00, 0.5327700E+00, 0.5411800E+00, 0.5998600E+00, &
     & 0.5069677E+00, 0.5653034E+00, 0.5784929E+00, 0.5784929E+00 /
      data (ref_adm(31,iz, 9,15),iz = 1,20) / &
     & 0.2843000E+00, 0.2843000E+00, 0.2976800E+00, 0.2760900E+00, &
     & 0.2916800E+00, 0.2971100E+00, 0.2647400E+00, 0.3021800E+00, &
     & 0.3101100E+00, 0.2988200E+00, 0.3129000E+00, 0.3772600E+00, &
     & 0.4147100E+00, 0.3779100E+00, 0.3917300E+00, 0.4331000E+00, &
     & 0.4257300E+00, 0.5349570E+00, 0.5544479E+00, 0.5544479E+00 /
      data (ref_adm(31,iz,10,15),iz = 1,20) / &
     & 0.2648600E+00, 0.2648600E+00, 0.2645900E+00, 0.2982100E+00, &
     & 0.2930000E+00, 0.2975600E+00, 0.2756000E+00, 0.3045300E+00, &
     & 0.2977700E+00, 0.2788800E+00, 0.2739200E+00, 0.3616800E+00, &
     & 0.3260500E+00, 0.3850100E+00, 0.4246600E+00, 0.4285200E+00, &
     & 0.4753790E+00, 0.5117835E+00, 0.5199854E+00, 0.5199854E+00 /
      data (ref_adm(31,iz,11,15),iz = 1,20) / &
     & 0.2607800E+00, 0.2607800E+00, 0.2390900E+00, 0.2659400E+00, &
     & 0.2543000E+00, 0.2707200E+00, 0.3010800E+00, 0.3052700E+00, &
     & 0.3577900E+00, 0.2889900E+00, 0.2999300E+00, 0.3571600E+00, &
     & 0.3960300E+00, 0.3173700E+00, 0.4276400E+00, 0.4374137E+00, &
     & 0.4637083E+00, 0.4934335E+00, 0.4947979E+00, 0.4947979E+00 /
      data (ref_adm(31,iz,12,15),iz = 1,20) / &
     & 0.2599500E+00, 0.2599500E+00, 0.2527400E+00, 0.2732000E+00, &
     & 0.2668100E+00, 0.2836600E+00, 0.3081900E+00, 0.2654100E+00, &
     & 0.2989600E+00, 0.3220300E+00, 0.2971400E+00, 0.3393800E+00, &
     & 0.3962700E+00, 0.3557400E+00, 0.4062600E+00, 0.3282200E+00, &
     & 0.4540204E+00, 0.4800567E+00, 0.4766448E+00, 0.4766448E+00 /
      data (ref_adm(31,iz,13,15),iz = 1,20) / &
     & 0.3212800E+00, 0.3212800E+00, 0.2803100E+00, 0.2859900E+00, &
     & 0.3144900E+00, 0.3047900E+00, 0.2997400E+00, 0.2976900E+00, &
     & 0.2928200E+00, 0.2812300E+00, 0.3298500E+00, 0.3068500E+00, &
     & 0.3740300E+00, 0.4036200E+00, 0.4218700E+00, 0.3783300E+00, &
     & 0.4457001E+00, 0.4694232E+00, 0.4623594E+00, 0.4623594E+00 /
      data (ref_adm(31,iz,14,15),iz = 1,20) / &
     & 0.2685500E+00, 0.2685500E+00, 0.3047500E+00, 0.3109500E+00, &
     & 0.2947600E+00, 0.3018400E+00, 0.2854100E+00, 0.2765300E+00, &
     & 0.2842600E+00, 0.2765800E+00, 0.2820900E+00, 0.3269200E+00, &
     & 0.3120200E+00, 0.3262900E+00, 0.4880500E+00, 0.3381100E+00, &
     & 0.4373623E+00, 0.4602180E+00, 0.4508572E+00, 0.4508572E+00 /
      data (ref_adm(31,iz,15,15),iz = 1,20) / &
     & 0.3202700E+00, 0.3202700E+00, 0.3070700E+00, 0.2921600E+00, &
     & 0.2984500E+00, 0.3018900E+00, 0.3093800E+00, 0.3118700E+00, &
     & 0.3118000E+00, 0.3299500E+00, 0.3391500E+00, 0.3432400E+00, &
     & 0.3747800E+00, 0.3409200E+00, 0.3397100E+00, 0.3579500E+00, &
     & 0.4273404E+00, 0.5808500E+00, 0.4403800E+00, 0.4403800E+00 /
      data (ref_adm(31,iz,16,15),iz = 1,20) / &
     & 0.2729000E+00, 0.2729000E+00, 0.2653700E+00, 0.2734500E+00, &
     & 0.2477200E+00, 0.2661500E+00, 0.2672600E+00, 0.2822700E+00, &
     & 0.2706700E+00, 0.2918200E+00, 0.2961700E+00, 0.2950400E+00, &
     & 0.2993300E+00, 0.3215200E+00, 0.3735300E+00, 0.3668400E+00, &
     & 0.4186441E+00, 0.4390554E+00, 0.4286505E+00, 0.4286505E+00 /
      data (ref_adm(31,iz,17,15),iz = 1,20) / &
     & 0.2756600E+00, 0.2756600E+00, 0.2699400E+00, 0.2745200E+00, &
     & 0.2706800E+00, 0.2892900E+00, 0.2932200E+00, 0.2999100E+00, &
     & 0.3023900E+00, 0.3731300E+00, 0.3527800E+00, 0.3304500E+00, &
     & 0.3553800E+00, 0.4278900E+00, 0.3252300E+00, 0.3417500E+00, &
     & 0.4099815E+00, 0.4291269E+00, 0.4171827E+00, 0.4171827E+00 /
      data (ref_adm(31,iz,18,15),iz = 1,20) / &
     & 0.2884800E+00, 0.2884800E+00, 0.2856800E+00, 0.2814200E+00, &
     & 0.2681100E+00, 0.2983300E+00, 0.2445800E+00, 0.2867100E+00, &
     & 0.2970800E+00, 0.3208600E+00, 0.3678900E+00, 0.3232200E+00, &
     & 0.3470300E+00, 0.3329700E+00, 0.3166300E+00, 0.5269500E+00, &
     & 0.4446838E+00, 0.4894276E+00, 0.5180733E+00, 0.5180733E+00 /
      data (ref_adm(31,iz,19,15),iz = 1,20) / &
     & 0.2627100E+00, 0.2627100E+00, 0.2892100E+00, 0.3154200E+00, &
     & 0.2984500E+00, 0.3211500E+00, 0.3319500E+00, 0.3170400E+00, &
     & 0.3249600E+00, 0.3083900E+00, 0.3471500E+00, 0.3665200E+00, &
     & 0.3412300E+00, 0.3379900E+00, 0.3055300E+00, 0.4100943E+00, &
     & 0.4399899E+00, 0.4813272E+00, 0.5068035E+00, 0.5068035E+00 /
      data (ref_adm(31,iz,20,15),iz = 1,20) / &
     & 0.2778900E+00, 0.2778900E+00, 0.2798500E+00, 0.3180400E+00, &
     & 0.3015400E+00, 0.3390300E+00, 0.3245000E+00, 0.3356000E+00, &
     & 0.3270100E+00, 0.2965200E+00, 0.3449400E+00, 0.3729100E+00, &
     & 0.3519200E+00, 0.3410300E+00, 0.3174900E+00, 0.4080088E+00, &
     & 0.4371872E+00, 0.4765493E+00, 0.5004979E+00, 0.5004979E+00 /
      data (ref_adm(31,iz,21,15),iz = 1,20) / &
     & 0.2798100E+00, 0.2798100E+00, 0.3109000E+00, 0.2800600E+00, &
     & 0.2931900E+00, 0.3090100E+00, 0.3054900E+00, 0.3023500E+00, &
     & 0.3099200E+00, 0.3270100E+00, 0.3328200E+00, 0.3625200E+00, &
     & 0.3944600E+00, 0.3522700E+00, 0.3597800E+00, 0.4071983E+00, &
     & 0.4353205E+00, 0.4729612E+00, 0.4968952E+00, 0.4968952E+00 /
      data (ref_adm(31,iz,22,15),iz = 1,20) / &
     & 0.2805100E+00, 0.2805100E+00, 0.3018100E+00, 0.2912000E+00, &
     & 0.2893700E+00, 0.3417900E+00, 0.3569400E+00, 0.3181900E+00, &
     & 0.3223300E+00, 0.3252300E+00, 0.3503000E+00, 0.3488200E+00, &
     & 0.3572200E+00, 0.3539600E+00, 0.3714800E+00, 0.5622378E+00, &
     & 0.6159129E+00, 0.6837525E+00, 0.7737738E+00, 0.7737738E+00 /
      data (ref_adm(31,iz,23,15),iz = 1,20) / &
     & 0.2768400E+00, 0.2768400E+00, 0.3062500E+00, 0.2958000E+00, &
     & 0.3198100E+00, 0.3117000E+00, 0.2872200E+00, 0.3143200E+00, &
     & 0.3089800E+00, 0.2924800E+00, 0.2990600E+00, 0.3574700E+00, &
     & 0.3649300E+00, 0.3877100E+00, 0.3651500E+00, 0.4031200E+00, &
     & 0.5977684E+00, 0.6635385E+00, 0.7679732E+00, 0.7679732E+00 /
      data (ref_adm(31,iz,24,15),iz = 1,20) / &
     & 0.2773000E+00, 0.2773000E+00, 0.2774800E+00, 0.2912800E+00, &
     & 0.3008100E+00, 0.2921200E+00, 0.3048800E+00, 0.3407900E+00, &
     & 0.3282500E+00, 0.3315300E+00, 0.3363200E+00, 0.3394200E+00, &
     & 0.3637100E+00, 0.3720800E+00, 0.3618200E+00, 0.3331400E+00, &
     & 0.3978600E+00, 0.6495295E+00, 0.7694787E+00, 0.7694787E+00 /
      data (ref_adm(31,iz,25,15),iz = 1,20) / &
     & 0.3022500E+00, 0.3022500E+00, 0.3123900E+00, 0.3081400E+00, &
     & 0.3211500E+00, 0.3190600E+00, 0.3496600E+00, 0.3920000E+00, &
     & 0.3750500E+00, 0.3778400E+00, 0.4193100E+00, 0.4475500E+00, &
     & 0.4474300E+00, 0.4994600E+00, 0.3899000E+00, 0.4638000E+00, &
     & 0.3989100E+00, 0.4207700E+00, 0.7758991E+00, 0.7758991E+00 /
      data (ref_adm(31,iz,26,15),iz = 1,20) / &
     & 0.2964800E+00, 0.2964800E+00, 0.2894500E+00, 0.2899600E+00, &
     & 0.3080100E+00, 0.3040000E+00, 0.3248700E+00, 0.3642700E+00, &
     & 0.3569800E+00, 0.3352200E+00, 0.3941600E+00, 0.4260800E+00, &
     & 0.4275900E+00, 0.4506700E+00, 0.4857700E+00, 0.4182000E+00, &
     & 0.5081000E+00, 0.4297300E+00, 0.7931144E+00, 0.7931144E+00 /
      data (ref_adm(31,iz,27,15),iz = 1,20) / &
     & 0.2941600E+00, 0.2941600E+00, 0.3067700E+00, 0.3293400E+00, &
     & 0.3129700E+00, 0.2991200E+00, 0.3476700E+00, 0.3705100E+00, &
     & 0.3708600E+00, 0.3527000E+00, 0.3935800E+00, 0.3421800E+00, &
     & 0.3661600E+00, 0.3702700E+00, 0.4063100E+00, 0.4338600E+00, &
     & 0.4647300E+00, 0.6458933E+00, 0.8169222E+00, 0.8169222E+00 /
      data (ref_adm(31,iz,28,15),iz = 1,20) / &
     & 0.2899100E+00, 0.2899100E+00, 0.2923300E+00, 0.2926500E+00, &
     & 0.3215400E+00, 0.3194600E+00, 0.3156700E+00, 0.3493500E+00, &
     & 0.3505700E+00, 0.3479200E+00, 0.4007200E+00, 0.3705600E+00, &
     & 0.4219500E+00, 0.4917900E+00, 0.5183100E+00, 0.4262900E+00, &
     & 0.4212400E+00, 0.6564912E+00, 0.8432288E+00, 0.8432288E+00 /
      data (ref_adm(31,iz,29,15),iz = 1,20) / &
     & 0.2691600E+00, 0.2691600E+00, 0.3099100E+00, 0.3010600E+00, &
     & 0.3002700E+00, 0.3724300E+00, 0.3481700E+00, 0.4067300E+00, &
     & 0.3795800E+00, 0.3457900E+00, 0.3580700E+00, 0.4245100E+00, &
     & 0.4035700E+00, 0.4671400E+00, 0.4488300E+00, 0.4625100E+00, &
     & 0.4524300E+00, 0.6735755E+00, 0.8759295E+00, 0.8759295E+00 /
      data (ref_adm(31,iz,30,15),iz = 1,20) / &
     & 0.2825300E+00, 0.2825300E+00, 0.2902200E+00, 0.2958500E+00, &
     & 0.2942400E+00, 0.3211300E+00, 0.3944300E+00, 0.3579400E+00, &
     & 0.3208000E+00, 0.3510700E+00, 0.3695900E+00, 0.3754600E+00, &
     & 0.4650700E+00, 0.4448600E+00, 0.4212800E+00, 0.4462200E+00, &
     & 0.5479800E+00, 0.6985952E+00, 0.4679900E+00, 0.4679900E+00 /
      data (ref_adm(31,iz,31,15),iz = 1,20) / &
     & 0.2845700E+00, 0.2845700E+00, 0.3209100E+00, 0.3213200E+00, &
     & 0.3452000E+00, 0.3170200E+00, 0.3570500E+00, 0.3493000E+00, &
     & 0.3921200E+00, 0.3685900E+00, 0.3999800E+00, 0.4253200E+00, &
     & 0.4538600E+00, 0.4892400E+00, 0.5135000E+00, 0.4285000E+00, &
     & 0.5157800E+00, 0.4633100E+00, 0.9514349E+00, 0.9514349E+00 /
      data (ref_adm(31,iz,32,15),iz = 1,20) / &
     & 0.2894600E+00, 0.2894600E+00, 0.2879300E+00, 0.2974700E+00, &
     & 0.2997600E+00, 0.3225400E+00, 0.3201100E+00, 0.3282800E+00, &
     & 0.3284700E+00, 0.3650500E+00, 0.3968600E+00, 0.3999200E+00, &
     & 0.4721100E+00, 0.4930000E+00, 0.5306000E+00, 0.5162000E+00, &
     & 0.5409600E+00, 0.7555155E+00, 0.9891763E+00, 0.9891763E+00 /
      data (ref_adm(31,iz,33,15),iz = 1,20) / &
     & 0.3206900E+00, 0.3206900E+00, 0.3050200E+00, 0.3065000E+00, &
     & 0.3232700E+00, 0.3284700E+00, 0.3405300E+00, 0.3389600E+00, &
     & 0.3587300E+00, 0.3830800E+00, 0.3972800E+00, 0.4131600E+00, &
     & 0.4349500E+00, 0.4650700E+00, 0.4909800E+00, 0.5256300E+00, &
     & 0.5620500E+00, 0.7629889E+00, 0.1019055E+01, 0.1019055E+01 /
      data (ref_adm(31,iz,34,15),iz = 1,20) / &
     & 0.3004800E+00, 0.3004800E+00, 0.3584000E+00, 0.3558200E+00, &
     & 0.3638800E+00, 0.3311200E+00, 0.3309700E+00, 0.3894100E+00, &
     & 0.3930900E+00, 0.3767000E+00, 0.3950900E+00, 0.4535800E+00, &
     & 0.4461700E+00, 0.4494200E+00, 0.5406600E+00, 0.5711300E+00, &
     & 0.6399458E+00, 0.7417361E+00, 0.1021111E+01, 0.1021111E+01 /
      data (ref_adm(31,iz,35,15),iz = 1,20) / &
     & 0.3206900E+00, 0.3206900E+00, 0.3395800E+00, 0.3342300E+00, &
     & 0.3180400E+00, 0.3572900E+00, 0.3248000E+00, 0.3265200E+00, &
     & 0.3650900E+00, 0.3783800E+00, 0.4199200E+00, 0.4780100E+00, &
     & 0.4549900E+00, 0.5139000E+00, 0.5634500E+00, 0.5167900E+00, &
     & 0.6343969E+00, 0.7313782E+00, 0.1018518E+01, 0.1018518E+01 /
      data (ref_adm(31,iz,36,15),iz = 1,20) / &
     & 0.2954300E+00, 0.2954300E+00, 0.3212900E+00, 0.3123700E+00, &
     & 0.3158400E+00, 0.3211500E+00, 0.3454700E+00, 0.3476800E+00, &
     & 0.3273200E+00, 0.4069300E+00, 0.4053100E+00, 0.4963300E+00, &
     & 0.4682800E+00, 0.5323400E+00, 0.6143100E+00, 0.6851300E+00, &
     & 0.6456728E+00, 0.7413276E+00, 0.1024410E+01, 0.1024410E+01 /
      data (ref_adm(31,iz,37,15),iz = 1,20) / &
     & 0.2848600E+00, 0.2848600E+00, 0.2708400E+00, 0.3230700E+00, &
     & 0.3135200E+00, 0.3012100E+00, 0.3101300E+00, 0.3121300E+00, &
     & 0.3348100E+00, 0.3646400E+00, 0.4203700E+00, 0.5066700E+00, &
     & 0.5331700E+00, 0.6595500E+00, 0.6878500E+00, 0.8507000E+00, &
     & 0.6501300E+00, 0.7806160E+00, 0.1031643E+01, 0.1031643E+01 /
      data (ref_adm(31,iz,38,15),iz = 1,20) / &
     & 0.2848600E+00, 0.2848600E+00, 0.2708400E+00, 0.3230700E+00, &
     & 0.3135200E+00, 0.3012100E+00, 0.3101300E+00, 0.3121300E+00, &
     & 0.3348100E+00, 0.3646400E+00, 0.4203700E+00, 0.5066700E+00, &
     & 0.5331700E+00, 0.6595500E+00, 0.6878500E+00, 0.8507000E+00, &
     & 0.6501300E+00, 0.7806160E+00, 0.1031643E+01, 0.1031643E+01 /
! Solar Zenith Angle 75.0 Albedo  0.3559473E+00
      data (ref_adm(31,iz, 1,16),iz = 1,20) / &
     & 0.2411400E+00, 0.2411400E+00, 0.2476000E+00, 0.2841900E+00, &
     & 0.3072000E+00, 0.2846500E+00, 0.2835200E+00, 0.2968500E+00, &
     & 0.3622300E+00, 0.3535100E+00, 0.3222800E+00, 0.3225700E+00, &
     & 0.2978100E+00, 0.3953178E+00, 0.4165663E+00, 0.4421428E+00, &
     & 0.4668317E+00, 0.4983762E+00, 0.4990263E+00, 0.4990263E+00 /
      data (ref_adm(31,iz, 2,16),iz = 1,20) / &
     & 0.2411400E+00, 0.2411400E+00, 0.2476000E+00, 0.2841900E+00, &
     & 0.3072000E+00, 0.2846500E+00, 0.2835200E+00, 0.2968500E+00, &
     & 0.3622300E+00, 0.3535100E+00, 0.3222800E+00, 0.3225700E+00, &
     & 0.2978100E+00, 0.3953178E+00, 0.4165663E+00, 0.4421428E+00, &
     & 0.4668317E+00, 0.4983762E+00, 0.4990263E+00, 0.4990263E+00 /
      data (ref_adm(31,iz, 3,16),iz = 1,20) / &
     & 0.2500600E+00, 0.2500600E+00, 0.2574100E+00, 0.2735500E+00, &
     & 0.2541800E+00, 0.2657600E+00, 0.2636200E+00, 0.2877300E+00, &
     & 0.3247500E+00, 0.2880100E+00, 0.3356300E+00, 0.3505900E+00, &
     & 0.3832500E+00, 0.3945657E+00, 0.4154276E+00, 0.4405764E+00, &
     & 0.4646594E+00, 0.4954139E+00, 0.1829952E+00, 0.1829952E+00 /
      data (ref_adm(31,iz, 4,16),iz = 1,20) / &
     & 0.2474100E+00, 0.2474100E+00, 0.2341300E+00, 0.2322400E+00, &
     & 0.2381000E+00, 0.2697400E+00, 0.2791100E+00, 0.3096800E+00, &
     & 0.2572200E+00, 0.2596900E+00, 0.3404900E+00, 0.3469200E+00, &
     & 0.3240300E+00, 0.3061900E+00, 0.4131781E+00, 0.4375930E+00, &
     & 0.4608162E+00, 0.4894747E+00, 0.4914417E+00, 0.4914417E+00 /
      data (ref_adm(31,iz, 5,16),iz = 1,20) / &
     & 0.2641900E+00, 0.2641900E+00, 0.2606600E+00, 0.2483100E+00, &
     & 0.2786800E+00, 0.2781200E+00, 0.2672700E+00, 0.2794100E+00, &
     & 0.2708200E+00, 0.2802100E+00, 0.3454300E+00, 0.3637000E+00, &
     & 0.3530600E+00, 0.2908800E+00, 0.4098447E+00, 0.4332611E+00, &
     & 0.4548565E+00, 0.4807917E+00, 0.4853088E+00, 0.4853088E+00 /
      data (ref_adm(31,iz, 6,16),iz = 1,20) / &
     & 0.2574200E+00, 0.2574200E+00, 0.2438600E+00, 0.2428400E+00, &
     & 0.2456700E+00, 0.2471300E+00, 0.2830800E+00, 0.2818300E+00, &
     & 0.2849700E+00, 0.3094900E+00, 0.3350600E+00, 0.3947200E+00, &
     & 0.4689000E+00, 0.5391900E+00, 0.6077900E+00, 0.6833300E+00, &
     & 0.4476992E+00, 0.8654400E+00, 0.4745644E+00, 0.4745644E+00 /
      data (ref_adm(31,iz, 7,16),iz = 1,20) / &
     & 0.2695900E+00, 0.2695900E+00, 0.2708000E+00, 0.2955200E+00, &
     & 0.2971600E+00, 0.2707500E+00, 0.2705200E+00, 0.2802100E+00, &
     & 0.3179700E+00, 0.3695000E+00, 0.3577100E+00, 0.4119900E+00, &
     & 0.3576000E+00, 0.5183200E+00, 0.5545500E+00, 0.5149100E+00, &
     & 0.5691000E+00, 0.6956500E+00, 0.4593106E+00, 0.4593106E+00 /
      data (ref_adm(31,iz, 8,16),iz = 1,20) / &
     & 0.2949300E+00, 0.2949300E+00, 0.2527100E+00, 0.2654900E+00, &
     & 0.2732900E+00, 0.3260700E+00, 0.2982800E+00, 0.2860600E+00, &
     & 0.3512000E+00, 0.3361800E+00, 0.3877300E+00, 0.3981500E+00, &
     & 0.3716000E+00, 0.4866800E+00, 0.5302400E+00, 0.6629700E+00, &
     & 0.4313046E+00, 0.4477530E+00, 0.4440291E+00, 0.4440291E+00 /
      data (ref_adm(31,iz, 9,16),iz = 1,20) / &
     & 0.2494900E+00, 0.2494900E+00, 0.2361300E+00, 0.2222300E+00, &
     & 0.2291000E+00, 0.2788600E+00, 0.2843100E+00, 0.3002300E+00, &
     & 0.2927200E+00, 0.3403800E+00, 0.3310700E+00, 0.3468700E+00, &
     & 0.3582600E+00, 0.4457400E+00, 0.4843600E+00, 0.7249000E+00, &
     & 0.4993000E+00, 0.4376484E+00, 0.4309335E+00, 0.4309335E+00 /
      data (ref_adm(31,iz,10,16),iz = 1,20) / &
     & 0.2235800E+00, 0.2235800E+00, 0.2335100E+00, 0.2619100E+00, &
     & 0.2609700E+00, 0.2845800E+00, 0.3397300E+00, 0.2523100E+00, &
     & 0.3351200E+00, 0.3466000E+00, 0.3482500E+00, 0.2904300E+00, &
     & 0.3430800E+00, 0.3937300E+00, 0.4240800E+00, 0.5032300E+00, &
     & 0.5138900E+00, 0.4283404E+00, 0.4196783E+00, 0.4196783E+00 /
      data (ref_adm(31,iz,11,16),iz = 1,20) / &
     & 0.2395600E+00, 0.2395600E+00, 0.2500400E+00, 0.2523100E+00, &
     & 0.2477200E+00, 0.2471900E+00, 0.2549300E+00, 0.2754700E+00, &
     & 0.3049300E+00, 0.3363200E+00, 0.3016600E+00, 0.3059800E+00, &
     & 0.3467000E+00, 0.4262600E+00, 0.4941700E+00, 0.5468600E+00, &
     & 0.7796100E+00, 0.6097200E+00, 0.4099182E+00, 0.4099182E+00 /
      data (ref_adm(31,iz,12,16),iz = 1,20) / &
     & 0.2837200E+00, 0.2837200E+00, 0.2998500E+00, 0.2661700E+00, &
     & 0.2550800E+00, 0.2629900E+00, 0.2848300E+00, 0.2970600E+00, &
     & 0.2553100E+00, 0.3370600E+00, 0.2908500E+00, 0.3952300E+00, &
     & 0.3822400E+00, 0.3483500E+00, 0.3978300E+00, 0.5112500E+00, &
     & 0.7533700E+00, 0.5375800E+00, 0.4014391E+00, 0.4014391E+00 /
      data (ref_adm(31,iz,13,16),iz = 1,20) / &
     & 0.2507200E+00, 0.2507200E+00, 0.2825100E+00, 0.2738600E+00, &
     & 0.2699200E+00, 0.2816400E+00, 0.2880400E+00, 0.2831400E+00, &
     & 0.2656100E+00, 0.2987700E+00, 0.2922600E+00, 0.3252000E+00, &
     & 0.3346200E+00, 0.3614300E+00, 0.5119800E+00, 0.3777162E+00, &
     & 0.4327400E+00, 0.4043100E+00, 0.3938376E+00, 0.3938376E+00 /
      data (ref_adm(31,iz,14,16),iz = 1,20) / &
     & 0.2609600E+00, 0.2609600E+00, 0.2584600E+00, 0.2504300E+00, &
     & 0.2465500E+00, 0.2660900E+00, 0.2653000E+00, 0.2608600E+00, &
     & 0.2568300E+00, 0.2987200E+00, 0.3182800E+00, 0.3011200E+00, &
     & 0.2976300E+00, 0.2911500E+00, 0.2809700E+00, 0.3945400E+00, &
     & 0.7636100E+00, 0.6729800E+00, 0.3864130E+00, 0.3864130E+00 /
      data (ref_adm(31,iz,15,16),iz = 1,20) / &
     & 0.2661800E+00, 0.2661800E+00, 0.2698100E+00, 0.2645000E+00, &
     & 0.2659300E+00, 0.2748700E+00, 0.2737600E+00, 0.2750400E+00, &
     & 0.2819300E+00, 0.2930300E+00, 0.3171300E+00, 0.3204800E+00, &
     & 0.3347900E+00, 0.3399000E+00, 0.4499700E+00, 0.4537500E+00, &
     & 0.3753579E+00, 0.3876110E+00, 0.3784131E+00, 0.3784131E+00 /
      data (ref_adm(31,iz,16,16),iz = 1,20) / &
     & 0.2633700E+00, 0.2633700E+00, 0.2736600E+00, 0.2639500E+00, &
     & 0.2537900E+00, 0.2528400E+00, 0.2577300E+00, 0.2440300E+00, &
     & 0.2473400E+00, 0.2684500E+00, 0.2606700E+00, 0.2706600E+00, &
     & 0.2840700E+00, 0.3077500E+00, 0.4560500E+00, 0.3583698E+00, &
     & 0.3685915E+00, 0.3799841E+00, 0.3698004E+00, 0.3698004E+00 /
      data (ref_adm(31,iz,17,16),iz = 1,20) / &
     & 0.2535300E+00, 0.2535300E+00, 0.2609600E+00, 0.3011400E+00, &
     & 0.2704300E+00, 0.2506400E+00, 0.2706800E+00, 0.2438700E+00, &
     & 0.2858400E+00, 0.3168600E+00, 0.2961600E+00, 0.2881000E+00, &
     & 0.3261400E+00, 0.3126400E+00, 0.3178400E+00, 0.3243300E+00, &
     & 0.3624915E+00, 0.3728512E+00, 0.3624847E+00, 0.3624847E+00 /
      data (ref_adm(31,iz,18,16),iz = 1,20) / &
     & 0.2576000E+00, 0.2576000E+00, 0.2681500E+00, 0.2432400E+00, &
     & 0.2600400E+00, 0.2709900E+00, 0.2870300E+00, 0.2410800E+00, &
     & 0.2558700E+00, 0.3115700E+00, 0.3413900E+00, 0.2476300E+00, &
     & 0.3038900E+00, 0.2823500E+00, 0.4063000E+00, 0.4470154E+00, &
     & 0.5034656E+00, 0.5910353E+00, 0.6879020E+00, 0.6879020E+00 /
      data (ref_adm(31,iz,19,16),iz = 1,20) / &
     & 0.2544900E+00, 0.2544900E+00, 0.2569200E+00, 0.2514500E+00, &
     & 0.2547800E+00, 0.2305400E+00, 0.2507500E+00, 0.2572700E+00, &
     & 0.2744000E+00, 0.2920700E+00, 0.2981600E+00, 0.2704000E+00, &
     & 0.3222400E+00, 0.3253300E+00, 0.4082000E+00, 0.4469100E+00, &
     & 0.4955592E+00, 0.5783415E+00, 0.6702225E+00, 0.6702225E+00 /
      data (ref_adm(31,iz,20,16),iz = 1,20) / &
     & 0.2542100E+00, 0.2542100E+00, 0.2780200E+00, 0.2448900E+00, &
     & 0.2677700E+00, 0.2785300E+00, 0.2558100E+00, 0.2766700E+00, &
     & 0.2800600E+00, 0.2671600E+00, 0.3268600E+00, 0.2962300E+00, &
     & 0.2702200E+00, 0.3824300E+00, 0.3805700E+00, 0.4384127E+00, &
     & 0.4908321E+00, 0.5706918E+00, 0.6599120E+00, 0.6599120E+00 /
      data (ref_adm(31,iz,21,16),iz = 1,20) / &
     & 0.2615200E+00, 0.2615200E+00, 0.2747300E+00, 0.2567700E+00, &
     & 0.2546300E+00, 0.3040700E+00, 0.3133800E+00, 0.3117700E+00, &
     & 0.2576400E+00, 0.2513100E+00, 0.3363700E+00, 0.2870000E+00, &
     & 0.3140200E+00, 0.3614200E+00, 0.3415400E+00, 0.3142200E+00, &
     & 0.4876683E+00, 0.5650895E+00, 0.6541492E+00, 0.6541492E+00 /
      data (ref_adm(31,iz,22,16),iz = 1,20) / &
     & 0.2469600E+00, 0.2469600E+00, 0.2644000E+00, 0.2588100E+00, &
     & 0.2634700E+00, 0.2632100E+00, 0.3137500E+00, 0.3081600E+00, &
     & 0.3214600E+00, 0.2853700E+00, 0.3259600E+00, 0.3648700E+00, &
     & 0.3233800E+00, 0.4384800E+00, 0.4249000E+00, 0.3705700E+00, &
     & 0.5731484E+00, 0.6807482E+00, 0.8460681E+00, 0.8460681E+00 /
      data (ref_adm(31,iz,23,16),iz = 1,20) / &
     & 0.2621600E+00, 0.2621600E+00, 0.2761400E+00, 0.2867300E+00, &
     & 0.2866200E+00, 0.2593400E+00, 0.3044500E+00, 0.3326700E+00, &
     & 0.3187400E+00, 0.2771300E+00, 0.3239100E+00, 0.3322800E+00, &
     & 0.3635700E+00, 0.4697000E+00, 0.4293200E+00, 0.4090900E+00, &
     & 0.5700189E+00, 0.6770098E+00, 0.8498311E+00, 0.8498311E+00 /
      data (ref_adm(31,iz,24,16),iz = 1,20) / &
     & 0.2610600E+00, 0.2610600E+00, 0.2714800E+00, 0.2663400E+00, &
     & 0.2802000E+00, 0.2760600E+00, 0.2915300E+00, 0.3105000E+00, &
     & 0.3189700E+00, 0.3134500E+00, 0.3331500E+00, 0.3294000E+00, &
     & 0.3410700E+00, 0.3755900E+00, 0.3741500E+00, 0.3798100E+00, &
     & 0.5711262E+00, 0.6785904E+00, 0.8614557E+00, 0.8614557E+00 /
      data (ref_adm(31,iz,25,16),iz = 1,20) / &
     & 0.2715100E+00, 0.2715100E+00, 0.2678300E+00, 0.2702100E+00, &
     & 0.2727200E+00, 0.2694100E+00, 0.2843400E+00, 0.2999600E+00, &
     & 0.3267600E+00, 0.3628800E+00, 0.3647400E+00, 0.3739700E+00, &
     & 0.3946000E+00, 0.4535700E+00, 0.4743300E+00, 0.3528200E+00, &
     & 0.5353100E+00, 0.6839735E+00, 0.8790634E+00, 0.8790634E+00 /
      data (ref_adm(31,iz,26,16),iz = 1,20) / &
     & 0.2675500E+00, 0.2675500E+00, 0.3063400E+00, 0.2848900E+00, &
     & 0.2612300E+00, 0.2503700E+00, 0.2788300E+00, 0.2802200E+00, &
     & 0.3246000E+00, 0.2854700E+00, 0.3605100E+00, 0.3235000E+00, &
     & 0.3541700E+00, 0.4371500E+00, 0.4397000E+00, 0.4727800E+00, &
     & 0.4032400E+00, 0.6971484E+00, 0.9074625E+00, 0.9074625E+00 /
      data (ref_adm(31,iz,27,16),iz = 1,20) / &
     & 0.2605400E+00, 0.2605400E+00, 0.2634900E+00, 0.3054900E+00, &
     & 0.3010600E+00, 0.2839800E+00, 0.2760300E+00, 0.2582600E+00, &
     & 0.3113400E+00, 0.2710200E+00, 0.3253100E+00, 0.3626900E+00, &
     & 0.3615500E+00, 0.4161800E+00, 0.3765700E+00, 0.4413500E+00, &
     & 0.5031000E+00, 0.7144964E+00, 0.9419247E+00, 0.9419247E+00 /
      data (ref_adm(31,iz,28,16),iz = 1,20) / &
     & 0.2539000E+00, 0.2539000E+00, 0.2644800E+00, 0.2872800E+00, &
     & 0.2784800E+00, 0.2826400E+00, 0.3025100E+00, 0.2884800E+00, &
     & 0.3334100E+00, 0.3142100E+00, 0.3765700E+00, 0.3935500E+00, &
     & 0.4203300E+00, 0.4254000E+00, 0.4473100E+00, 0.4175400E+00, &
     & 0.5214200E+00, 0.7352211E+00, 0.9792930E+00, 0.9792930E+00 /
      data (ref_adm(31,iz,29,16),iz = 1,20) / &
     & 0.2695600E+00, 0.2695600E+00, 0.2371900E+00, 0.2728500E+00, &
     & 0.3068500E+00, 0.3493400E+00, 0.3227100E+00, 0.3091200E+00, &
     & 0.2987200E+00, 0.3305900E+00, 0.3385200E+00, 0.3827500E+00, &
     & 0.3788400E+00, 0.4247500E+00, 0.4480000E+00, 0.4455300E+00, &
     & 0.5242600E+00, 0.7597470E+00, 0.1022224E+01, 0.1022224E+01 /
      data (ref_adm(31,iz,30,16),iz = 1,20) / &
     & 0.2435200E+00, 0.2435200E+00, 0.2898000E+00, 0.3069100E+00, &
     & 0.3343500E+00, 0.2922500E+00, 0.3173900E+00, 0.3203300E+00, &
     & 0.3199900E+00, 0.3542900E+00, 0.3535200E+00, 0.3817200E+00, &
     & 0.3826600E+00, 0.4414800E+00, 0.4819100E+00, 0.5500600E+00, &
     & 0.4740900E+00, 0.7892348E+00, 0.1068431E+01, 0.1068431E+01 /
      data (ref_adm(31,iz,31,16),iz = 1,20) / &
     & 0.2700000E+00, 0.2700000E+00, 0.2652800E+00, 0.2828700E+00, &
     & 0.3244900E+00, 0.2926400E+00, 0.3155900E+00, 0.3265100E+00, &
     & 0.3459800E+00, 0.3496500E+00, 0.3434300E+00, 0.3846300E+00, &
     & 0.3983600E+00, 0.4507100E+00, 0.5432600E+00, 0.5859400E+00, &
     & 0.4400000E+00, 0.5699700E+00, 0.1115522E+01, 0.1115522E+01 /
      data (ref_adm(31,iz,32,16),iz = 1,20) / &
     & 0.2740600E+00, 0.2740600E+00, 0.2889900E+00, 0.3017500E+00, &
     & 0.2984900E+00, 0.3363300E+00, 0.3182700E+00, 0.3281200E+00, &
     & 0.3457900E+00, 0.3969100E+00, 0.3815900E+00, 0.4071800E+00, &
     & 0.4273000E+00, 0.5021800E+00, 0.5696300E+00, 0.5900300E+00, &
     & 0.5826400E+00, 0.6485600E+00, 0.1160844E+01, 0.1160844E+01 /
      data (ref_adm(31,iz,33,16),iz = 1,20) / &
     & 0.2601400E+00, 0.2601400E+00, 0.2646600E+00, 0.2917100E+00, &
     & 0.2873400E+00, 0.2955200E+00, 0.3004900E+00, 0.3143600E+00, &
     & 0.3289000E+00, 0.3389100E+00, 0.3663300E+00, 0.3828900E+00, &
     & 0.4067700E+00, 0.4578900E+00, 0.5320500E+00, 0.5549400E+00, &
     & 0.5866400E+00, 0.8639411E+00, 0.1195420E+01, 0.1195420E+01 /
      data (ref_adm(31,iz,34,16),iz = 1,20) / &
     & 0.2562200E+00, 0.2562200E+00, 0.2696200E+00, 0.2917100E+00, &
     & 0.2758600E+00, 0.3101600E+00, 0.3039200E+00, 0.3185400E+00, &
     & 0.3414300E+00, 0.3286300E+00, 0.4002000E+00, 0.4013400E+00, &
     & 0.4389600E+00, 0.5387000E+00, 0.5617100E+00, 0.6857500E+00, &
     & 0.6170100E+00, 0.8595896E+00, 0.1203476E+01, 0.1203476E+01 /
      data (ref_adm(31,iz,35,16),iz = 1,20) / &
     & 0.2719700E+00, 0.2719700E+00, 0.2820000E+00, 0.2750200E+00, &
     & 0.2829900E+00, 0.2879400E+00, 0.3121100E+00, 0.3567200E+00, &
     & 0.3223100E+00, 0.3406500E+00, 0.3517500E+00, 0.4596900E+00, &
     & 0.4732100E+00, 0.5171100E+00, 0.5726500E+00, 0.6322400E+00, &
     & 0.6875900E+00, 0.8627008E+00, 0.1209603E+01, 0.1209603E+01 /
      data (ref_adm(31,iz,36,16),iz = 1,20) / &
     & 0.2628400E+00, 0.2628400E+00, 0.2748400E+00, 0.2713900E+00, &
     & 0.3012800E+00, 0.2806000E+00, 0.3103100E+00, 0.3166100E+00, &
     & 0.3036000E+00, 0.3545400E+00, 0.3980200E+00, 0.4159900E+00, &
     & 0.4954900E+00, 0.5324500E+00, 0.6277800E+00, 0.7204800E+00, &
     & 0.7162293E+00, 0.8763726E+00, 0.1222764E+01, 0.1222764E+01 /
      data (ref_adm(31,iz,37,16),iz = 1,20) / &
     & 0.2771400E+00, 0.2771400E+00, 0.2797900E+00, 0.2878300E+00, &
     & 0.2802600E+00, 0.2901600E+00, 0.3213400E+00, 0.3284700E+00, &
     & 0.3198900E+00, 0.3562800E+00, 0.3952100E+00, 0.4108900E+00, &
     & 0.5492600E+00, 0.5574900E+00, 0.5866700E+00, 0.6477300E+00, &
     & 0.7147000E+00, 0.9162930E+00, 0.1233986E+01, 0.1233986E+01 /
      data (ref_adm(31,iz,38,16),iz = 1,20) / &
     & 0.2771400E+00, 0.2771400E+00, 0.2797900E+00, 0.2878300E+00, &
     & 0.2802600E+00, 0.2901600E+00, 0.3213400E+00, 0.3284700E+00, &
     & 0.3198900E+00, 0.3562800E+00, 0.3952100E+00, 0.4108900E+00, &
     & 0.5492600E+00, 0.5574900E+00, 0.5866700E+00, 0.6477300E+00, &
     & 0.7147000E+00, 0.9162930E+00, 0.1233986E+01, 0.1233986E+01 /
! Solar Zenith Angle 80.0 Albedo  0.3454490E+00
      data (ref_adm(31,iz, 1,17),iz = 1,20) / &
     & 0.2755800E+00, 0.2755800E+00, 0.2354000E+00, 0.2437500E+00, &
     & 0.2925100E+00, 0.2861000E+00, 0.2789200E+00, 0.2501200E+00, &
     & 0.3196100E+00, 0.3146800E+00, 0.3993100E+00, 0.3670000E+00, &
     & 0.4092452E+00, 0.4401582E+00, 0.4850862E+00, 0.5506582E+00, &
     & 0.6298444E+00, 0.6883621E+00, 0.6256955E+00, 0.6256955E+00 /
      data (ref_adm(31,iz, 2,17),iz = 1,20) / &
     & 0.2755800E+00, 0.2755800E+00, 0.2354000E+00, 0.2437500E+00, &
     & 0.2925100E+00, 0.2861000E+00, 0.2789200E+00, 0.2501200E+00, &
     & 0.3196100E+00, 0.3146800E+00, 0.3993100E+00, 0.3670000E+00, &
     & 0.4092452E+00, 0.4401582E+00, 0.4850862E+00, 0.5506582E+00, &
     & 0.6298444E+00, 0.6883621E+00, 0.6256955E+00, 0.6256955E+00 /
      data (ref_adm(31,iz, 3,17),iz = 1,20) / &
     & 0.2712800E+00, 0.2712800E+00, 0.2476100E+00, 0.2614900E+00, &
     & 0.2531700E+00, 0.2220900E+00, 0.2350400E+00, 0.2579500E+00, &
     & 0.2658200E+00, 0.3380600E+00, 0.4089400E+00, 0.3330900E+00, &
     & 0.4084271E+00, 0.4390080E+00, 0.4836012E+00, 0.5475617E+00, &
     & 0.6240411E+00, 0.6828300E+00, 0.7019883E-01, 0.7019883E-01 /
      data (ref_adm(31,iz, 4,17),iz = 1,20) / &
     & 0.2212300E+00, 0.2212300E+00, 0.2894200E+00, 0.2162800E+00, &
     & 0.2058100E+00, 0.2674200E+00, 0.2401800E+00, 0.2882600E+00, &
     & 0.2675600E+00, 0.2894400E+00, 0.3719300E+00, 0.3353800E+00, &
     & 0.4070024E+00, 0.4372236E+00, 0.4802006E+00, 0.5406331E+00, &
     & 0.6129823E+00, 0.6721807E+00, 0.6046621E+00, 0.6046621E+00 /
      data (ref_adm(31,iz, 5,17),iz = 1,20) / &
     & 0.3012400E+00, 0.3012400E+00, 0.2336900E+00, 0.2415200E+00, &
     & 0.2450300E+00, 0.2481200E+00, 0.2741700E+00, 0.2549500E+00, &
     & 0.2540400E+00, 0.2345700E+00, 0.2836200E+00, 0.3219200E+00, &
     & 0.4050838E+00, 0.4345057E+00, 0.4753632E+00, 0.5320626E+00, &
     & 0.5967231E+00, 0.6583171E+00, 0.5902726E+00, 0.5902726E+00 /
      data (ref_adm(31,iz, 6,17),iz = 1,20) / &
     & 0.2631700E+00, 0.2631700E+00, 0.2391300E+00, 0.2549000E+00, &
     & 0.2554000E+00, 0.2529400E+00, 0.2502300E+00, 0.2446600E+00, &
     & 0.2671300E+00, 0.2928800E+00, 0.3337300E+00, 0.3974900E+00, &
     & 0.4520900E+00, 0.4309148E+00, 0.4704072E+00, 0.6268200E+00, &
     & 0.5773793E+00, 0.8778000E+00, 0.5746505E+00, 0.5746505E+00 /
      data (ref_adm(31,iz, 7,17),iz = 1,20) / &
     & 0.2541100E+00, 0.2541100E+00, 0.2483400E+00, 0.2240800E+00, &
     & 0.2051100E+00, 0.2747900E+00, 0.2478200E+00, 0.2786800E+00, &
     & 0.2794400E+00, 0.3177900E+00, 0.3246800E+00, 0.2671500E+00, &
     & 0.4750500E+00, 0.4810300E+00, 0.5150300E+00, 0.5791900E+00, &
     & 0.6874200E+00, 0.6084889E+00, 0.5584674E+00, 0.5584674E+00 /
      data (ref_adm(31,iz, 8,17),iz = 1,20) / &
     & 0.2718500E+00, 0.2718500E+00, 0.3003600E+00, 0.2879200E+00, &
     & 0.2953400E+00, 0.2486200E+00, 0.2581400E+00, 0.3620000E+00, &
     & 0.2813700E+00, 0.2652600E+00, 0.3343000E+00, 0.3993100E+00, &
     & 0.3600600E+00, 0.3869500E+00, 0.5263200E+00, 0.5414600E+00, &
     & 0.8774500E+00, 0.5778113E+00, 0.5324531E+00, 0.5324531E+00 /
      data (ref_adm(31,iz, 9,17),iz = 1,20) / &
     & 0.3381500E+00, 0.3381500E+00, 0.2724800E+00, 0.2538500E+00, &
     & 0.2109700E+00, 0.2673600E+00, 0.2442000E+00, 0.3020800E+00, &
     & 0.2821900E+00, 0.2538200E+00, 0.2869300E+00, 0.3280400E+00, &
     & 0.3421000E+00, 0.4157920E+00, 0.5278500E+00, 0.4650000E+00, &
     & 0.7005100E+00, 0.5526391E+00, 0.5036722E+00, 0.5036722E+00 /
      data (ref_adm(31,iz,10,17),iz = 1,20) / &
     & 0.2643700E+00, 0.2643700E+00, 0.2404300E+00, 0.2397000E+00, &
     & 0.2854300E+00, 0.3218500E+00, 0.2209800E+00, 0.2594700E+00, &
     & 0.2555900E+00, 0.2708700E+00, 0.2632600E+00, 0.3617000E+00, &
     & 0.4010300E+00, 0.4028800E+00, 0.4995000E+00, 0.6304900E+00, &
     & 0.5138928E+00, 0.5329975E+00, 0.4815829E+00, 0.4815829E+00 /
      data (ref_adm(31,iz,11,17),iz = 1,20) / &
     & 0.2099200E+00, 0.2099200E+00, 0.2244500E+00, 0.3466300E+00, &
     & 0.3341800E+00, 0.2913300E+00, 0.3161600E+00, 0.2473100E+00, &
     & 0.2465400E+00, 0.2781800E+00, 0.3294400E+00, 0.3592800E+00, &
     & 0.4071200E+00, 0.3846200E+00, 0.4363537E+00, 0.6049100E+00, &
     & 0.6870000E+00, 0.5180566E+00, 0.4646148E+00, 0.4646148E+00 /
      data (ref_adm(31,iz,12,17),iz = 1,20) / &
     & 0.1525200E+00, 0.1525200E+00, 0.2483000E+00, 0.2597400E+00, &
     & 0.2445000E+00, 0.2398800E+00, 0.2814800E+00, 0.2337600E+00, &
     & 0.3224000E+00, 0.2932600E+00, 0.3289400E+00, 0.3082000E+00, &
     & 0.3209000E+00, 0.3939830E+00, 0.3873800E+00, 0.6041000E+00, &
     & 0.7287900E+00, 0.5065975E+00, 0.4520884E+00, 0.4520884E+00 /
      data (ref_adm(31,iz,13,17),iz = 1,20) / &
     & 0.1995500E+00, 0.1995500E+00, 0.2260600E+00, 0.1881000E+00, &
     & 0.2202000E+00, 0.2169000E+00, 0.2187700E+00, 0.2669700E+00, &
     & 0.1773700E+00, 0.3518500E+00, 0.3808500E+00, 0.4018900E+00, &
     & 0.3797900E+00, 0.2952500E+00, 0.3192000E+00, 0.4005100E+00, &
     & 0.7193700E+00, 0.4963818E+00, 0.4416904E+00, 0.4416904E+00 /
      data (ref_adm(31,iz,14,17),iz = 1,20) / &
     & 0.2173500E+00, 0.2173500E+00, 0.3082900E+00, 0.2790800E+00, &
     & 0.2340300E+00, 0.2294000E+00, 0.2463300E+00, 0.2146600E+00, &
     & 0.1588600E+00, 0.3411900E+00, 0.3367200E+00, 0.3344400E+00, &
     & 0.3770800E+00, 0.3859500E+00, 0.4238800E+00, 0.4422729E+00, &
     & 0.5008700E+00, 0.4854394E+00, 0.4323896E+00, 0.4323896E+00 /
      data (ref_adm(31,iz,15,17),iz = 1,20) / &
     & 0.2235100E+00, 0.2235100E+00, 0.2392400E+00, 0.2175700E+00, &
     & 0.2240000E+00, 0.2264100E+00, 0.2210500E+00, 0.2163600E+00, &
     & 0.2461600E+00, 0.2603600E+00, 0.2747500E+00, 0.2794600E+00, &
     & 0.2906000E+00, 0.3059200E+00, 0.3902900E+00, 0.4310447E+00, &
     & 0.4569937E+00, 0.4710340E+00, 0.4224364E+00, 0.4224364E+00 /
      data (ref_adm(31,iz,16,17),iz = 1,20) / &
     & 0.2170800E+00, 0.2170800E+00, 0.2153400E+00, 0.2354900E+00, &
     & 0.2616600E+00, 0.2794500E+00, 0.3292000E+00, 0.3060300E+00, &
     & 0.2741000E+00, 0.2777400E+00, 0.2861500E+00, 0.2669300E+00, &
     & 0.3147400E+00, 0.3518700E+00, 0.3951100E+00, 0.4189542E+00, &
     & 0.4442747E+00, 0.4565310E+00, 0.4098745E+00, 0.4098745E+00 /
      data (ref_adm(31,iz,17,17),iz = 1,20) / &
     & 0.2200600E+00, 0.2200600E+00, 0.2037000E+00, 0.2093800E+00, &
     & 0.2187800E+00, 0.2194200E+00, 0.2676900E+00, 0.3226600E+00, &
     & 0.2875500E+00, 0.2805900E+00, 0.3315200E+00, 0.2734300E+00, &
     & 0.4031800E+00, 0.2329700E+00, 0.2604000E+00, 0.4037300E+00, &
     & 0.4307564E+00, 0.4420958E+00, 0.3985616E+00, 0.3985616E+00 /
      data (ref_adm(31,iz,18,17),iz = 1,20) / &
     & 0.2065800E+00, 0.2065800E+00, 0.2116500E+00, 0.3374900E+00, &
     & 0.2148000E+00, 0.2264100E+00, 0.2666100E+00, 0.3919900E+00, &
     & 0.3139900E+00, 0.3260300E+00, 0.3313100E+00, 0.2250300E+00, &
     & 0.4068900E+00, 0.3445420E+00, 0.3721081E+00, 0.4116278E+00, &
     & 0.4587276E+00, 0.5299260E+00, 0.6009623E+00, 0.6009623E+00 /
      data (ref_adm(31,iz,19,17),iz = 1,20) / &
     & 0.2258200E+00, 0.2258200E+00, 0.2417700E+00, 0.2195600E+00, &
     & 0.2229700E+00, 0.2439700E+00, 0.2766300E+00, 0.3648800E+00, &
     & 0.3050800E+00, 0.3107100E+00, 0.2621400E+00, 0.2423500E+00, &
     & 0.3350900E+00, 0.3575600E+00, 0.3693004E+00, 0.4073532E+00, &
     & 0.4522680E+00, 0.5192922E+00, 0.5860572E+00, 0.5860572E+00 /
      data (ref_adm(31,iz,20,17),iz = 1,20) / &
     & 0.2324900E+00, 0.2324900E+00, 0.2581700E+00, 0.2595200E+00, &
     & 0.2569700E+00, 0.2255000E+00, 0.3017200E+00, 0.3002900E+00, &
     & 0.2471900E+00, 0.2673800E+00, 0.2765800E+00, 0.2758400E+00, &
     & 0.3235033E+00, 0.3412971E+00, 0.3420400E+00, 0.4046771E+00, &
     & 0.4484165E+00, 0.5129721E+00, 0.5774379E+00, 0.5774379E+00 /
      data (ref_adm(31,iz,21,17),iz = 1,20) / &
     & 0.2228500E+00, 0.2228500E+00, 0.2263900E+00, 0.2160700E+00, &
     & 0.2151800E+00, 0.2487100E+00, 0.2452000E+00, 0.2679300E+00, &
     & 0.2809700E+00, 0.2929900E+00, 0.2926000E+00, 0.2600100E+00, &
     & 0.2841000E+00, 0.3737700E+00, 0.3547900E+00, 0.4031395E+00, &
     & 0.4458901E+00, 0.5083489E+00, 0.5725657E+00, 0.5725657E+00 /
      data (ref_adm(31,iz,22,17),iz = 1,20) / &
     & 0.2379500E+00, 0.2379500E+00, 0.2260100E+00, 0.2314400E+00, &
     & 0.2504200E+00, 0.2338800E+00, 0.2331400E+00, 0.2305100E+00, &
     & 0.2882100E+00, 0.2630000E+00, 0.3453900E+00, 0.2749700E+00, &
     & 0.2516200E+00, 0.4100700E+00, 0.3528300E+00, 0.3873900E+00, &
     & 0.6199203E+00, 0.7619548E+00, 0.1083302E+01, 0.1083302E+01 /
      data (ref_adm(31,iz,23,17),iz = 1,20) / &
     & 0.2380400E+00, 0.2380400E+00, 0.2078000E+00, 0.2488700E+00, &
     & 0.2412900E+00, 0.2413100E+00, 0.2567500E+00, 0.2464400E+00, &
     & 0.2600000E+00, 0.3163100E+00, 0.3097600E+00, 0.3075300E+00, &
     & 0.4034900E+00, 0.3726400E+00, 0.3720700E+00, 0.5195606E+00, &
     & 0.6017929E+00, 0.7407563E+00, 0.1078725E+01, 0.1078725E+01 /
      data (ref_adm(31,iz,24,17),iz = 1,20) / &
     & 0.2309500E+00, 0.2309500E+00, 0.2524400E+00, 0.2350500E+00, &
     & 0.2386100E+00, 0.2388700E+00, 0.2553400E+00, 0.2791400E+00, &
     & 0.2797800E+00, 0.2895900E+00, 0.3197400E+00, 0.3302300E+00, &
     & 0.3459800E+00, 0.4023300E+00, 0.4482000E+00, 0.5091220E+00, &
     & 0.4641700E+00, 0.7265136E+00, 0.1085361E+01, 0.1085361E+01 /
      data (ref_adm(31,iz,25,17),iz = 1,20) / &
     & 0.2298800E+00, 0.2298800E+00, 0.2278000E+00, 0.2541400E+00, &
     & 0.2601100E+00, 0.2465000E+00, 0.2674400E+00, 0.3132900E+00, &
     & 0.2929400E+00, 0.3181900E+00, 0.3642500E+00, 0.3470100E+00, &
     & 0.3645300E+00, 0.4466000E+00, 0.4074000E+00, 0.5017811E+00, &
     & 0.5009200E+00, 0.7181553E+00, 0.1100682E+01, 0.1100682E+01 /
      data (ref_adm(31,iz,26,17),iz = 1,20) / &
     & 0.2147200E+00, 0.2147200E+00, 0.2279900E+00, 0.1964300E+00, &
     & 0.2459800E+00, 0.2135100E+00, 0.2546000E+00, 0.2698500E+00, &
     & 0.2958000E+00, 0.2662900E+00, 0.3054600E+00, 0.2725400E+00, &
     & 0.3165800E+00, 0.3418900E+00, 0.4092200E+00, 0.4262000E+00, &
     & 0.5016500E+00, 0.7221529E+00, 0.1133326E+01, 0.1133326E+01 /
      data (ref_adm(31,iz,27,17),iz = 1,20) / &
     & 0.2093400E+00, 0.2093400E+00, 0.2172200E+00, 0.2246700E+00, &
     & 0.2424900E+00, 0.2327800E+00, 0.2447500E+00, 0.2671200E+00, &
     & 0.2455200E+00, 0.3554600E+00, 0.3033835E+00, 0.2855200E+00, &
     & 0.3178300E+00, 0.5134500E+00, 0.5377400E+00, 0.4580000E+00, &
     & 0.5893968E+00, 0.7334127E+00, 0.1175243E+01, 0.1175243E+01 /
      data (ref_adm(31,iz,28,17),iz = 1,20) / &
     & 0.2054700E+00, 0.2054700E+00, 0.1918800E+00, 0.2278500E+00, &
     & 0.2665300E+00, 0.2192500E+00, 0.2467900E+00, 0.2561700E+00, &
     & 0.2733600E+00, 0.2673300E+00, 0.3408400E+00, 0.2953900E+00, &
     & 0.3742800E+00, 0.3882600E+00, 0.3897500E+00, 0.5605500E+00, &
     & 0.5997185E+00, 0.7501313E+00, 0.1221801E+01, 0.1221801E+01 /
      data (ref_adm(31,iz,29,17),iz = 1,20) / &
     & 0.2020500E+00, 0.2020500E+00, 0.2102800E+00, 0.2321100E+00, &
     & 0.2112900E+00, 0.2365600E+00, 0.3637300E+00, 0.2509200E+00, &
     & 0.3049600E+00, 0.2719600E+00, 0.2979100E+00, 0.3128700E+00, &
     & 0.4533400E+00, 0.3658700E+00, 0.4327900E+00, 0.4684300E+00, &
     & 0.6167515E+00, 0.7755812E+00, 0.1277464E+01, 0.1277464E+01 /
      data (ref_adm(31,iz,30,17),iz = 1,20) / &
     & 0.2201100E+00, 0.2201100E+00, 0.2095800E+00, 0.2437850E+00, &
     & 0.2536000E+00, 0.2578400E+00, 0.1863600E+00, 0.2957100E+00, &
     & 0.2939200E+00, 0.2615200E+00, 0.3043000E+00, 0.3688800E+00, &
     & 0.3639300E+00, 0.3325800E+00, 0.5251600E+00, 0.5031500E+00, &
     & 0.6400670E+00, 0.8096803E+00, 0.1340880E+01, 0.1340880E+01 /
      data (ref_adm(31,iz,31,17),iz = 1,20) / &
     & 0.2305800E+00, 0.2305800E+00, 0.1979600E+00, 0.2925700E+00, &
     & 0.3413000E+00, 0.1669300E+00, 0.2456700E+00, 0.2699900E+00, &
     & 0.2292600E+00, 0.3489600E+00, 0.3365900E+00, 0.3253900E+00, &
     & 0.4010300E+00, 0.4219400E+00, 0.4748300E+00, 0.5103600E+00, &
     & 0.6663940E+00, 0.8458809E+00, 0.1404057E+01, 0.1404057E+01 /
      data (ref_adm(31,iz,32,17),iz = 1,20) / &
     & 0.1976200E+00, 0.1976200E+00, 0.2334900E+00, 0.3270900E+00, &
     & 0.2655100E+00, 0.1912700E+00, 0.2377700E+00, 0.2037800E+00, &
     & 0.2660900E+00, 0.3015600E+00, 0.2797100E+00, 0.3562600E+00, &
     & 0.3954500E+00, 0.4150900E+00, 0.4410400E+00, 0.5255000E+00, &
     & 0.5297800E+00, 0.7192300E+00, 0.1469528E+01, 0.1469528E+01 /
      data (ref_adm(31,iz,33,17),iz = 1,20) / &
     & 0.2418600E+00, 0.2418600E+00, 0.2487700E+00, 0.2581000E+00, &
     & 0.2615500E+00, 0.2740000E+00, 0.2871500E+00, 0.2937100E+00, &
     & 0.2984000E+00, 0.3339700E+00, 0.3476800E+00, 0.3631500E+00, &
     & 0.4084500E+00, 0.4717200E+00, 0.5008300E+00, 0.4823000E+00, &
     & 0.6200700E+00, 0.8946592E+00, 0.1510110E+01, 0.1510110E+01 /
      data (ref_adm(31,iz,34,17),iz = 1,20) / &
     & 0.2613100E+00, 0.2613100E+00, 0.2323900E+00, 0.2252800E+00, &
     & 0.2352600E+00, 0.3353500E+00, 0.3010200E+00, 0.3340800E+00, &
     & 0.3026800E+00, 0.3148100E+00, 0.3778400E+00, 0.4080900E+00, &
     & 0.4474000E+00, 0.5356000E+00, 0.5211600E+00, 0.6547000E+00, &
     & 0.6831335E+00, 0.8699835E+00, 0.1508027E+01, 0.1508027E+01 /
      data (ref_adm(31,iz,35,17),iz = 1,20) / &
     & 0.2572200E+00, 0.2572200E+00, 0.2835600E+00, 0.3215700E+00, &
     & 0.2966500E+00, 0.2591600E+00, 0.2741100E+00, 0.2421700E+00, &
     & 0.2737900E+00, 0.3507300E+00, 0.3790600E+00, 0.4104600E+00, &
     & 0.4472700E+00, 0.4561241E+00, 0.5969300E+00, 0.6241600E+00, &
     & 0.6648700E+00, 0.8624838E+00, 0.1512758E+01, 0.1512758E+01 /
      data (ref_adm(31,iz,36,17),iz = 1,20) / &
     & 0.2195600E+00, 0.2195600E+00, 0.2355900E+00, 0.3250500E+00, &
     & 0.2384600E+00, 0.2636200E+00, 0.2743900E+00, 0.3386600E+00, &
     & 0.2885700E+00, 0.3352400E+00, 0.3749500E+00, 0.4113100E+00, &
     & 0.4466600E+00, 0.4860600E+00, 0.5805500E+00, 0.5751270E+00, &
     & 0.6824180E+00, 0.8797267E+00, 0.1535204E+01, 0.1535204E+01 /
      data (ref_adm(31,iz,37,17),iz = 1,20) / &
     & 0.3067800E+00, 0.3067800E+00, 0.2846900E+00, 0.2464000E+00, &
     & 0.2409900E+00, 0.2854500E+00, 0.3281700E+00, 0.2934100E+00, &
     & 0.3163400E+00, 0.3422300E+00, 0.3524400E+00, 0.3563300E+00, &
     & 0.4831400E+00, 0.5172900E+00, 0.6218800E+00, 0.5847200E+00, &
     & 0.7146479E+00, 0.9636506E+00, 0.1584110E+01, 0.1584110E+01 /
      data (ref_adm(31,iz,38,17),iz = 1,20) / &
     & 0.3067800E+00, 0.3067800E+00, 0.2846900E+00, 0.2464000E+00, &
     & 0.2409900E+00, 0.2854500E+00, 0.3281700E+00, 0.2934100E+00, &
     & 0.3163400E+00, 0.3422300E+00, 0.3524400E+00, 0.3563300E+00, &
     & 0.4831400E+00, 0.5172900E+00, 0.6218800E+00, 0.5847200E+00, &
     & 0.7146479E+00, 0.9636506E+00, 0.1584110E+01, 0.1584110E+01 /
! Solar Zenith Angle 85.0 Albedo  0.2695280E+00
      data (ref_adm(31,iz, 1,18),iz = 1,20) / &
     & 0.2970987E+00, 0.2970987E+00, 0.2917822E+00, 0.2899405E+00, &
     & 0.2884848E+00, 0.2874891E+00, 0.2857342E+00, 0.2827446E+00, &
     & 0.2789046E+00, 0.2743064E+00, 0.2693053E+00, 0.2623621E+00, &
     & 0.2542579E+00, 0.2466266E+00, 0.2356675E+00, 0.2212356E+00, &
     & 0.2063465E+00, 0.1868657E+00, 0.1524679E+00, 0.1524679E+00 /
      data (ref_adm(31,iz, 2,18),iz = 1,20) / &
     & 0.2970987E+00, 0.2970987E+00, 0.2917822E+00, 0.2899405E+00, &
     & 0.2884848E+00, 0.2874891E+00, 0.2857342E+00, 0.2827446E+00, &
     & 0.2789046E+00, 0.2743064E+00, 0.2693053E+00, 0.2623621E+00, &
     & 0.2542579E+00, 0.2466266E+00, 0.2356675E+00, 0.2212356E+00, &
     & 0.2063465E+00, 0.1868657E+00, 0.1524679E+00, 0.1524679E+00 /
      data (ref_adm(31,iz, 3,18),iz = 1,20) / &
     & 0.2970987E+00, 0.2970987E+00, 0.2917822E+00, 0.2899405E+00, &
     & 0.2884848E+00, 0.2874891E+00, 0.2857342E+00, 0.2827446E+00, &
     & 0.2789046E+00, 0.2743064E+00, 0.2693053E+00, 0.2623621E+00, &
     & 0.2542579E+00, 0.2466266E+00, 0.2356675E+00, 0.2212356E+00, &
     & 0.2063465E+00, 0.1868657E+00, 0.1524679E+00, 0.1524679E+00 /
      data (ref_adm(31,iz, 4,18),iz = 1,20) / &
     & 0.2970987E+00, 0.2970987E+00, 0.2917822E+00, 0.2899405E+00, &
     & 0.2884848E+00, 0.2874891E+00, 0.2857342E+00, 0.2827446E+00, &
     & 0.2789046E+00, 0.2743064E+00, 0.2693053E+00, 0.2623621E+00, &
     & 0.2542579E+00, 0.2466266E+00, 0.2356675E+00, 0.2212356E+00, &
     & 0.2063465E+00, 0.1868657E+00, 0.1524679E+00, 0.1524679E+00 /
      data (ref_adm(31,iz, 5,18),iz = 1,20) / &
     & 0.2970987E+00, 0.2970987E+00, 0.2917822E+00, 0.2899405E+00, &
     & 0.2884848E+00, 0.2874891E+00, 0.2857342E+00, 0.2827446E+00, &
     & 0.2789046E+00, 0.2743064E+00, 0.2693053E+00, 0.2623621E+00, &
     & 0.2542579E+00, 0.2466266E+00, 0.2356675E+00, 0.2212356E+00, &
     & 0.2063465E+00, 0.1868657E+00, 0.1524679E+00, 0.1524679E+00 /
      data (ref_adm(31,iz, 6,18),iz = 1,20) / &
     & 0.2970987E+00, 0.2970987E+00, 0.2917822E+00, 0.2899405E+00, &
     & 0.2884848E+00, 0.2874891E+00, 0.2857342E+00, 0.2827446E+00, &
     & 0.2789046E+00, 0.2743064E+00, 0.2693053E+00, 0.2623621E+00, &
     & 0.2542579E+00, 0.2466266E+00, 0.2356675E+00, 0.2212356E+00, &
     & 0.2063465E+00, 0.1868657E+00, 0.1524679E+00, 0.1524679E+00 /
      data (ref_adm(31,iz, 7,18),iz = 1,20) / &
     & 0.2970987E+00, 0.2970987E+00, 0.2917822E+00, 0.2899405E+00, &
     & 0.2884848E+00, 0.2874891E+00, 0.2857342E+00, 0.2827446E+00, &
     & 0.2789046E+00, 0.2743064E+00, 0.2693053E+00, 0.2623621E+00, &
     & 0.2542579E+00, 0.2466266E+00, 0.2356675E+00, 0.2212356E+00, &
     & 0.2063465E+00, 0.1868657E+00, 0.1524679E+00, 0.1524679E+00 /
      data (ref_adm(31,iz, 8,18),iz = 1,20) / &
     & 0.2970987E+00, 0.2970987E+00, 0.2917822E+00, 0.2899405E+00, &
     & 0.2884848E+00, 0.2874891E+00, 0.2857342E+00, 0.2827446E+00, &
     & 0.2789046E+00, 0.2743064E+00, 0.2693053E+00, 0.2623621E+00, &
     & 0.2542579E+00, 0.2466266E+00, 0.2356675E+00, 0.2212356E+00, &
     & 0.2063465E+00, 0.1868657E+00, 0.1524679E+00, 0.1524679E+00 /
      data (ref_adm(31,iz, 9,18),iz = 1,20) / &
     & 0.2970987E+00, 0.2970987E+00, 0.2917822E+00, 0.2899405E+00, &
     & 0.2884848E+00, 0.2874891E+00, 0.2857342E+00, 0.2827446E+00, &
     & 0.2789046E+00, 0.2743064E+00, 0.2693053E+00, 0.2623621E+00, &
     & 0.2542579E+00, 0.2466266E+00, 0.2356675E+00, 0.2212356E+00, &
     & 0.2063465E+00, 0.1868657E+00, 0.1524679E+00, 0.1524679E+00 /
      data (ref_adm(31,iz,10,18),iz = 1,20) / &
     & 0.2970987E+00, 0.2970987E+00, 0.2917822E+00, 0.2899405E+00, &
     & 0.2884848E+00, 0.2874891E+00, 0.2857342E+00, 0.2827446E+00, &
     & 0.2789046E+00, 0.2743064E+00, 0.2693053E+00, 0.2623621E+00, &
     & 0.2542579E+00, 0.2466266E+00, 0.2356675E+00, 0.2212356E+00, &
     & 0.2063465E+00, 0.1868657E+00, 0.1524679E+00, 0.1524679E+00 /
      data (ref_adm(31,iz,11,18),iz = 1,20) / &
     & 0.2970987E+00, 0.2970987E+00, 0.2917822E+00, 0.2899405E+00, &
     & 0.2884848E+00, 0.2874891E+00, 0.2857342E+00, 0.2827446E+00, &
     & 0.2789046E+00, 0.2743064E+00, 0.2693053E+00, 0.2623621E+00, &
     & 0.2542579E+00, 0.2466266E+00, 0.2356675E+00, 0.2212356E+00, &
     & 0.2063465E+00, 0.1868657E+00, 0.1524679E+00, 0.1524679E+00 /
      data (ref_adm(31,iz,12,18),iz = 1,20) / &
     & 0.2970987E+00, 0.2970987E+00, 0.2917822E+00, 0.2899405E+00, &
     & 0.2884848E+00, 0.2874891E+00, 0.2857342E+00, 0.2041900E+00, &
     & 0.2789046E+00, 0.2743064E+00, 0.2693053E+00, 0.2623621E+00, &
     & 0.2542579E+00, 0.2466266E+00, 0.2356675E+00, 0.2212356E+00, &
     & 0.2063465E+00, 0.1868657E+00, 0.1524679E+00, 0.1524679E+00 /
      data (ref_adm(31,iz,13,18),iz = 1,20) / &
     & 0.2970987E+00, 0.2970987E+00, 0.2917822E+00, 0.2899405E+00, &
     & 0.2884848E+00, 0.2874891E+00, 0.2857342E+00, 0.2827446E+00, &
     & 0.2789046E+00, 0.2743064E+00, 0.2693053E+00, 0.2623621E+00, &
     & 0.2542579E+00, 0.2466266E+00, 0.2356675E+00, 0.2212356E+00, &
     & 0.2063465E+00, 0.1868657E+00, 0.1524679E+00, 0.1524679E+00 /
      data (ref_adm(31,iz,14,18),iz = 1,20) / &
     & 0.2970987E+00, 0.2970987E+00, 0.2917822E+00, 0.2899405E+00, &
     & 0.2884848E+00, 0.2874891E+00, 0.2857342E+00, 0.2827446E+00, &
     & 0.2789046E+00, 0.2743064E+00, 0.2693053E+00, 0.2623621E+00, &
     & 0.2542579E+00, 0.2466266E+00, 0.2356675E+00, 0.2212356E+00, &
     & 0.2063465E+00, 0.1868657E+00, 0.1524679E+00, 0.1524679E+00 /
      data (ref_adm(31,iz,15,18),iz = 1,20) / &
     & 0.2427400E+00, 0.2427400E+00, 0.2471500E+00, 0.2313100E+00, &
     & 0.2417700E+00, 0.3023200E+00, 0.3247300E+00, 0.2986900E+00, &
     & 0.3364600E+00, 0.3563500E+00, 0.3669100E+00, 0.2623621E+00, &
     & 0.2542579E+00, 0.2466266E+00, 0.2356675E+00, 0.2212356E+00, &
     & 0.2063465E+00, 0.1868657E+00, 0.1524679E+00, 0.1524679E+00 /
      data (ref_adm(31,iz,16,18),iz = 1,20) / &
     & 0.2640500E+00, 0.2640500E+00, 0.1439700E+00, 0.1473200E+00, &
     & 0.2884848E+00, 0.2874891E+00, 0.2857342E+00, 0.2827446E+00, &
     & 0.2789046E+00, 0.2743064E+00, 0.2693053E+00, 0.2623621E+00, &
     & 0.4170600E+00, 0.2466266E+00, 0.2356675E+00, 0.2212356E+00, &
     & 0.2063465E+00, 0.1868657E+00, 0.1524679E+00, 0.1524679E+00 /
      data (ref_adm(31,iz,17,18),iz = 1,20) / &
     & 0.2970987E+00, 0.2970987E+00, 0.2917822E+00, 0.3596600E+00, &
     & 0.3157500E+00, 0.2874891E+00, 0.2857342E+00, 0.2827446E+00, &
     & 0.2789046E+00, 0.2743064E+00, 0.2693053E+00, 0.2623621E+00, &
     & 0.2542579E+00, 0.2466266E+00, 0.2356675E+00, 0.2212356E+00, &
     & 0.2063465E+00, 0.1868657E+00, 0.1524679E+00, 0.1524679E+00 /
      data (ref_adm(31,iz,18,18),iz = 1,20) / &
     & 0.2618668E+00, 0.2618668E+00, 0.2633875E+00, 0.2666485E+00, &
     & 0.2716607E+00, 0.2785825E+00, 0.2874977E+00, 0.2984727E+00, &
     & 0.3115929E+00, 0.3266965E+00, 0.3434142E+00, 0.3661907E+00, &
     & 0.3896768E+00, 0.4079179E+00, 0.4280106E+00, 0.4458170E+00, &
     & 0.4540198E+00, 0.4496124E+00, 0.4351801E+00, 0.4351801E+00 /
      data (ref_adm(31,iz,19,18),iz = 1,20) / &
     & 0.2619647E+00, 0.2619647E+00, 0.2636811E+00, 0.2669451E+00, &
     & 0.2718898E+00, 0.2785810E+00, 0.2870647E+00, 0.2974192E+00, &
     & 0.3095883E+00, 0.3234566E+00, 0.3388835E+00, 0.3594901E+00, &
     & 0.3804320E+00, 0.3965409E+00, 0.4139501E+00, 0.4289370E+00, &
     & 0.4355060E+00, 0.4317761E+00, 0.4256267E+00, 0.4256267E+00 /
      data (ref_adm(31,iz,20,18),iz = 1,20) / &
     & 0.2620769E+00, 0.2620769E+00, 0.2640627E+00, 0.2674545E+00, &
     & 0.2724131E+00, 0.2789990E+00, 0.2872852E+00, 0.2972101E+00, &
     & 0.3088168E+00, 0.3218764E+00, 0.3361948E+00, 0.3552254E+00, &
     & 0.3744755E+00, 0.3889555E+00, 0.4044828E+00, 0.4175458E+00, &
     & 0.4231361E+00, 0.4203090E+00, 0.4209467E+00, 0.4209467E+00 /
      data (ref_adm(31,iz,21,18),iz = 1,20) / &
     & 0.2622321E+00, 0.2622321E+00, 0.2645926E+00, 0.2682075E+00, &
     & 0.2733843E+00, 0.2800017E+00, 0.2881796E+00, 0.2978753E+00, &
     & 0.3090478E+00, 0.3216441E+00, 0.3352392E+00, 0.3532006E+00, &
     & 0.3710781E+00, 0.3844594E+00, 0.3987016E+00, 0.4105902E+00, &
     & 0.4155796E+00, 0.4138168E+00, 0.4202394E+00, 0.4202394E+00 /
      data (ref_adm(31,iz,22,18),iz = 1,20) / &
     & 0.2895494E+00, 0.2895494E+00, 0.2843679E+00, 0.2825729E+00, &
     & 0.2811542E+00, 0.2801839E+00, 0.2784736E+00, 0.2755599E+00, &
     & 0.2718174E+00, 0.2673362E+00, 0.2624621E+00, 0.2556953E+00, &
     & 0.2477971E+00, 0.2403597E+00, 0.2296791E+00, 0.2156139E+00, &
     & 0.2011032E+00, 0.1821173E+00, 0.1485936E+00, 0.1485936E+00 /
      data (ref_adm(31,iz,23,18),iz = 1,20) / &
     & 0.2895494E+00, 0.2895494E+00, 0.2843679E+00, 0.2825729E+00, &
     & 0.2811542E+00, 0.2801839E+00, 0.2784736E+00, 0.2755599E+00, &
     & 0.2718174E+00, 0.2673362E+00, 0.2624621E+00, 0.2556953E+00, &
     & 0.2477971E+00, 0.2403597E+00, 0.2296791E+00, 0.2156139E+00, &
     & 0.2011032E+00, 0.1821173E+00, 0.1485936E+00, 0.1485936E+00 /
      data (ref_adm(31,iz,24,18),iz = 1,20) / &
     & 0.2895494E+00, 0.2895494E+00, 0.3028100E+00, 0.3221700E+00, &
     & 0.3113500E+00, 0.2740400E+00, 0.2912900E+00, 0.3250500E+00, &
     & 0.2435300E+00, 0.2858500E+00, 0.3807600E+00, 0.4240500E+00, &
     & 0.2477971E+00, 0.2403597E+00, 0.2296791E+00, 0.2156139E+00, &
     & 0.2011032E+00, 0.1821173E+00, 0.1485936E+00, 0.1485936E+00 /
      data (ref_adm(31,iz,25,18),iz = 1,20) / &
     & 0.3027000E+00, 0.3027000E+00, 0.2527200E+00, 0.2825729E+00, &
     & 0.3323900E+00, 0.3052700E+00, 0.2784736E+00, 0.2755599E+00, &
     & 0.2718174E+00, 0.2673362E+00, 0.2624621E+00, 0.2556953E+00, &
     & 0.3617000E+00, 0.3848100E+00, 0.2296791E+00, 0.2156139E+00, &
     & 0.2011032E+00, 0.1821173E+00, 0.1485936E+00, 0.1485936E+00 /
      data (ref_adm(31,iz,26,18),iz = 1,20) / &
     & 0.2546200E+00, 0.2546200E+00, 0.2843679E+00, 0.2825729E+00, &
     & 0.2811542E+00, 0.2801839E+00, 0.2784736E+00, 0.2755599E+00, &
     & 0.2718174E+00, 0.2673362E+00, 0.2624621E+00, 0.2556953E+00, &
     & 0.2477971E+00, 0.2403597E+00, 0.2296791E+00, 0.2156139E+00, &
     & 0.2011032E+00, 0.1821173E+00, 0.1485936E+00, 0.1485936E+00 /
      data (ref_adm(31,iz,27,18),iz = 1,20) / &
     & 0.2849200E+00, 0.2849200E+00, 0.2843679E+00, 0.2825729E+00, &
     & 0.1462600E+00, 0.1788200E+00, 0.2784736E+00, 0.2755599E+00, &
     & 0.2718174E+00, 0.2673362E+00, 0.2624621E+00, 0.2556953E+00, &
     & 0.2477971E+00, 0.2403597E+00, 0.2296791E+00, 0.2156139E+00, &
     & 0.2011032E+00, 0.1821173E+00, 0.1485936E+00, 0.1485936E+00 /
      data (ref_adm(31,iz,28,18),iz = 1,20) / &
     & 0.2895494E+00, 0.2895494E+00, 0.2843679E+00, 0.2825729E+00, &
     & 0.2811542E+00, 0.1538400E+00, 0.1893200E+00, 0.2755599E+00, &
     & 0.2718174E+00, 0.2673362E+00, 0.2624621E+00, 0.2556953E+00, &
     & 0.2477971E+00, 0.2403597E+00, 0.2296791E+00, 0.2156139E+00, &
     & 0.2011032E+00, 0.1821173E+00, 0.1485936E+00, 0.1485936E+00 /
      data (ref_adm(31,iz,29,18),iz = 1,20) / &
     & 0.2895494E+00, 0.2895494E+00, 0.2843679E+00, 0.2825729E+00, &
     & 0.2811542E+00, 0.2801839E+00, 0.1693600E+00, 0.2755599E+00, &
     & 0.2718174E+00, 0.2673362E+00, 0.2624621E+00, 0.2556953E+00, &
     & 0.2477971E+00, 0.2403597E+00, 0.2296791E+00, 0.2156139E+00, &
     & 0.2011032E+00, 0.1821173E+00, 0.1485936E+00, 0.1485936E+00 /
      data (ref_adm(31,iz,30,18),iz = 1,20) / &
     & 0.2895494E+00, 0.2895494E+00, 0.2843679E+00, 0.2825729E+00, &
     & 0.2811542E+00, 0.2801839E+00, 0.1717700E+00, 0.1838900E+00, &
     & 0.2718174E+00, 0.2673362E+00, 0.2624621E+00, 0.2556953E+00, &
     & 0.2477971E+00, 0.2403597E+00, 0.2296791E+00, 0.2156139E+00, &
     & 0.2011032E+00, 0.1821173E+00, 0.1485936E+00, 0.1485936E+00 /
      data (ref_adm(31,iz,31,18),iz = 1,20) / &
     & 0.2895494E+00, 0.2895494E+00, 0.2843679E+00, 0.2825729E+00, &
     & 0.2811542E+00, 0.2801839E+00, 0.2784736E+00, 0.2755599E+00, &
     & 0.2718174E+00, 0.2673362E+00, 0.2624621E+00, 0.2556953E+00, &
     & 0.2477971E+00, 0.2403597E+00, 0.2296791E+00, 0.2156139E+00, &
     & 0.2011032E+00, 0.1821173E+00, 0.1485936E+00, 0.1485936E+00 /
      data (ref_adm(31,iz,32,18),iz = 1,20) / &
     & 0.2895494E+00, 0.2895494E+00, 0.2843679E+00, 0.2825729E+00, &
     & 0.2811542E+00, 0.2801839E+00, 0.2784736E+00, 0.2755599E+00, &
     & 0.2718174E+00, 0.2673362E+00, 0.2624621E+00, 0.2556953E+00, &
     & 0.2477971E+00, 0.2403597E+00, 0.2296791E+00, 0.2156139E+00, &
     & 0.2011032E+00, 0.1821173E+00, 0.1485936E+00, 0.1485936E+00 /
      data (ref_adm(31,iz,33,18),iz = 1,20) / &
     & 0.2895494E+00, 0.2895494E+00, 0.2843679E+00, 0.2825729E+00, &
     & 0.2811542E+00, 0.2801839E+00, 0.2784736E+00, 0.2755599E+00, &
     & 0.2718174E+00, 0.2673362E+00, 0.2624621E+00, 0.2556953E+00, &
     & 0.2477971E+00, 0.2403597E+00, 0.2296791E+00, 0.2156139E+00, &
     & 0.2011032E+00, 0.1821173E+00, 0.1485936E+00, 0.1485936E+00 /
      data (ref_adm(31,iz,34,18),iz = 1,20) / &
     & 0.2895494E+00, 0.2895494E+00, 0.2843679E+00, 0.2825729E+00, &
     & 0.2811542E+00, 0.2801839E+00, 0.2784736E+00, 0.2755599E+00, &
     & 0.2718174E+00, 0.2673362E+00, 0.2624621E+00, 0.2556953E+00, &
     & 0.2477971E+00, 0.2403597E+00, 0.2296791E+00, 0.2156139E+00, &
     & 0.2011032E+00, 0.1821173E+00, 0.1485936E+00, 0.1485936E+00 /
      data (ref_adm(31,iz,35,18),iz = 1,20) / &
     & 0.2895494E+00, 0.2895494E+00, 0.2843679E+00, 0.2825729E+00, &
     & 0.2811542E+00, 0.2801839E+00, 0.2784736E+00, 0.2755599E+00, &
     & 0.2718174E+00, 0.2673362E+00, 0.2624621E+00, 0.2556953E+00, &
     & 0.2477971E+00, 0.2403597E+00, 0.2296791E+00, 0.2156139E+00, &
     & 0.2011032E+00, 0.1821173E+00, 0.1485936E+00, 0.1485936E+00 /
      data (ref_adm(31,iz,36,18),iz = 1,20) / &
     & 0.2895494E+00, 0.2895494E+00, 0.2843679E+00, 0.2825729E+00, &
     & 0.2811542E+00, 0.2801839E+00, 0.2784736E+00, 0.2755599E+00, &
     & 0.2718174E+00, 0.2673362E+00, 0.2624621E+00, 0.2556953E+00, &
     & 0.2477971E+00, 0.2403597E+00, 0.2296791E+00, 0.2156139E+00, &
     & 0.2011032E+00, 0.1821173E+00, 0.1485936E+00, 0.1485936E+00 /
      data (ref_adm(31,iz,37,18),iz = 1,20) / &
     & 0.2895494E+00, 0.2895494E+00, 0.2843679E+00, 0.2825729E+00, &
     & 0.2811542E+00, 0.2801839E+00, 0.2784736E+00, 0.2755599E+00, &
     & 0.2718174E+00, 0.2673362E+00, 0.2624621E+00, 0.2556953E+00, &
     & 0.2477971E+00, 0.2403597E+00, 0.2296791E+00, 0.2156139E+00, &
     & 0.2011032E+00, 0.1821173E+00, 0.1485936E+00, 0.1485936E+00 /
      data (ref_adm(31,iz,38,18),iz = 1,20) / &
     & 0.2895494E+00, 0.2895494E+00, 0.2843679E+00, 0.2825729E+00, &
     & 0.2811542E+00, 0.2801839E+00, 0.2784736E+00, 0.2755599E+00, &
     & 0.2718174E+00, 0.2673362E+00, 0.2624621E+00, 0.2556953E+00, &
     & 0.2477971E+00, 0.2403597E+00, 0.2296791E+00, 0.2156139E+00, &
     & 0.2011032E+00, 0.1821173E+00, 0.1485936E+00, 0.1485936E+00 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(32,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.5550521E+04
      data (ref_adm(32,iz, 1, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(32,iz, 2, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(32,iz, 3, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605230E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(32,iz, 4, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.3987900E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(32,iz, 5, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605230E+00, 0.4486499E+00, &
     & 0.4260700E+00, 0.4388300E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(32,iz, 6, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(32,iz, 7, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605230E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4175200E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(32,iz, 8, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(32,iz, 9, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605230E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(32,iz,10, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(32,iz,11, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605230E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(32,iz,12, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(32,iz,13, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605230E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(32,iz,14, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(32,iz,15, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605230E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(32,iz,16, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605231E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(32,iz,17, 2),iz = 1,20) / &
     & 0.5080510E+00, 0.5080510E+00, 0.4989595E+00, 0.4958101E+00, &
     & 0.4933207E+00, 0.4916181E+00, 0.4886173E+00, 0.4835048E+00, &
     & 0.4769382E+00, 0.4690752E+00, 0.4605230E+00, 0.4486499E+00, &
     & 0.4347916E+00, 0.4217417E+00, 0.4030011E+00, 0.3783219E+00, &
     & 0.3528610E+00, 0.3195479E+00, 0.2607263E+00, 0.2607263E+00 /
      data (ref_adm(32,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.4448015E+04
      data (ref_adm(32,iz, 1, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5449400E+00, &
     & 0.4722900E+00, 0.5188377E+00, 0.5940800E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4775112E+00, 0.4818900E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(32,iz, 2, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5449400E+00, &
     & 0.4722900E+00, 0.5188377E+00, 0.5940800E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4775112E+00, 0.4818900E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(32,iz, 3, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422413E+00, &
     & 0.5405188E+00, 0.5406688E+00, 0.5081000E+00, 0.5022100E+00, &
     & 0.5564600E+00, 0.5328500E+00, 0.5082500E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4775112E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167829E+00, 0.3843662E+00, 0.2680392E+00, 0.2680392E+00 /
      data (ref_adm(32,iz, 4, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188377E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.3659200E+00, 0.4775112E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(32,iz, 5, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422413E+00, &
     & 0.5405188E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.4317300E+00, 0.4223200E+00, 0.3945600E+00, &
     & 0.5139700E+00, 0.4775112E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167829E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(32,iz, 6, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188377E+00, 0.4751000E+00, 0.4592600E+00, &
     & 0.4886369E+00, 0.4775112E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(32,iz, 7, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422413E+00, &
     & 0.5405188E+00, 0.5406688E+00, 0.5385088E+00, 0.4704500E+00, &
     & 0.5265433E+00, 0.5188378E+00, 0.5547600E+00, 0.6056600E+00, &
     & 0.4886369E+00, 0.4325900E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167829E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(32,iz, 8, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5315600E+00, 0.5777600E+00, 0.5562500E+00, &
     & 0.4886369E+00, 0.4525800E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(32,iz, 9, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422413E+00, &
     & 0.5405188E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.6368500E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4775112E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167829E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(32,iz,10, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188377E+00, 0.4668700E+00, 0.4788500E+00, &
     & 0.5369600E+00, 0.5226700E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(32,iz,11, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422413E+00, &
     & 0.5405188E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188378E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4886400E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167829E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(32,iz,12, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188377E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4159500E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(32,iz,13, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422413E+00, &
     & 0.5405188E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188378E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4775112E+00, 0.4613485E+00, 0.4397078E+00, &
     & 0.4167829E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(32,iz,14, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188377E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.5389900E+00, 0.5196000E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(32,iz,15, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422413E+00, &
     & 0.5405188E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188378E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.5325900E+00, 0.5152300E+00, 0.4397078E+00, &
     & 0.4167829E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(32,iz,16, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422414E+00, &
     & 0.5405189E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188377E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4428700E+00, 0.4521000E+00, 0.4397078E+00, &
     & 0.4167828E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(32,iz,17, 3),iz = 1,20) / &
     & 0.5650156E+00, 0.5650156E+00, 0.5457308E+00, 0.5422413E+00, &
     & 0.5405188E+00, 0.5406688E+00, 0.5385088E+00, 0.5331325E+00, &
     & 0.5265433E+00, 0.5188378E+00, 0.5109780E+00, 0.5005891E+00, &
     & 0.4886369E+00, 0.4775112E+00, 0.4321700E+00, 0.4397078E+00, &
     & 0.4167829E+00, 0.3843662E+00, 0.3198980E+00, 0.3198980E+00 /
      data (ref_adm(32,iz,18, 3),iz = 1,20) / &
     & 0.2987390E+00, 0.2987390E+00, 0.2998366E+00, 0.3025214E+00, &
     & 0.3068576E+00, 0.3129562E+00, 0.3209432E+00, 0.3308018E+00, &
     & 0.3425409E+00, 0.3559576E+00, 0.3708281E+00, 0.3907863E+00, &
     & 0.4110438E+00, 0.4264155E+00, 0.4361400E+00, 0.4556682E+00, &
     & 0.4593453E+00, 0.4500630E+00, 0.4263837E+00, 0.4263837E+00 /
      data (ref_adm(32,iz,19, 3),iz = 1,20) / &
     & 0.2988766E+00, 0.2988766E+00, 0.3002329E+00, 0.3029731E+00, &
     & 0.3072269E+00, 0.3130540E+00, 0.3205469E+00, 0.3297646E+00, &
     & 0.3406003E+00, 0.3528923E+00, 0.3664396E+00, 0.3843660E+00, &
     & 0.4023336E+00, 0.4157224E+00, 0.4295564E+00, 0.4401397E+00, &
     & 0.4424806E+00, 0.4339786E+00, 0.4177297E+00, 0.4177297E+00 /
      data (ref_adm(32,iz,20, 3),iz = 1,20) / &
     & 0.2990270E+00, 0.2990270E+00, 0.3007635E+00, 0.3036823E+00, &
     & 0.3079769E+00, 0.3136902E+00, 0.3209122E+00, 0.3296176E+00, &
     & 0.3397800E+00, 0.3512594E+00, 0.3637644E+00, 0.3801849E+00, &
     & 0.3964507E+00, 0.4083865E+00, 0.4205012E+00, 0.4293460E+00, &
     & 0.4309158E+00, 0.4234107E+00, 0.4133912E+00, 0.4133912E+00 /
      data (ref_adm(32,iz,21, 3),iz = 1,20) / &
     & 0.2992071E+00, 0.2992071E+00, 0.3013931E+00, 0.3046421E+00, &
     & 0.3091875E+00, 0.3149734E+00, 0.3220687E+00, 0.3304707E+00, &
     & 0.3401388E+00, 0.3509967E+00, 0.3626835E+00, 0.3779883E+00, &
     & 0.3929769E+00, 0.4038107E+00, 0.4146363E+00, 0.4224349E+00, &
     & 0.4235362E+00, 0.4170500E+00, 0.4124861E+00, 0.4124861E+00 /
      data (ref_adm(32,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(32,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo  0.5189320E+00
      data (ref_adm(32,iz, 1, 4),iz = 1,20) / &
     & 0.5930200E+00, 0.5930200E+00, 0.5469900E+00, 0.6522200E+00, &
     & 0.6856400E+00, 0.5025800E+00, 0.5137000E+00, 0.5386366E+00, &
     & 0.4073800E+00, 0.5178024E+00, 0.5124575E+00, 0.5036771E+00, &
     & 0.4957582E+00, 0.4876989E+00, 0.4747711E+00, 0.4543591E+00, &
     & 0.4287485E+00, 0.3880616E+00, 0.3159824E+00, 0.3159824E+00 /
      data (ref_adm(32,iz, 2, 4),iz = 1,20) / &
     & 0.5930200E+00, 0.5930200E+00, 0.5469900E+00, 0.6522200E+00, &
     & 0.6856400E+00, 0.5025800E+00, 0.5137000E+00, 0.5386366E+00, &
     & 0.4073800E+00, 0.5178024E+00, 0.5124575E+00, 0.5036771E+00, &
     & 0.4957582E+00, 0.4876989E+00, 0.4747711E+00, 0.4543591E+00, &
     & 0.4287485E+00, 0.3880616E+00, 0.3159824E+00, 0.3159824E+00 /
      data (ref_adm(32,iz, 3, 4),iz = 1,20) / &
     & 0.5563800E+00, 0.5563800E+00, 0.4868000E+00, 0.5405400E+00, &
     & 0.5885000E+00, 0.5608800E+00, 0.5722500E+00, 0.5337500E+00, &
     & 0.5237172E+00, 0.5178090E+00, 0.5124244E+00, 0.5038864E+00, &
     & 0.5237100E+00, 0.4873848E+00, 0.4747134E+00, 0.4542271E+00, &
     & 0.4284990E+00, 0.3878241E+00, 0.2087916E+00, 0.2087916E+00 /
      data (ref_adm(32,iz, 4, 4),iz = 1,20) / &
     & 0.5052400E+00, 0.5052400E+00, 0.5127300E+00, 0.5360600E+00, &
     & 0.4185700E+00, 0.5547300E+00, 0.6085500E+00, 0.5049800E+00, &
     & 0.4679400E+00, 0.5178580E+00, 0.4419400E+00, 0.5038400E+00, &
     & 0.4956710E+00, 0.4874050E+00, 0.4746186E+00, 0.4541004E+00, &
     & 0.4283315E+00, 0.3876026E+00, 0.3157200E+00, 0.3157200E+00 /
      data (ref_adm(32,iz, 5, 4),iz = 1,20) / &
     & 0.5723000E+00, 0.5723000E+00, 0.5469593E+00, 0.5367300E+00, &
     & 0.5437300E+00, 0.5465100E+00, 0.5315200E+00, 0.5142500E+00, &
     & 0.5239109E+00, 0.5178617E+00, 0.3890800E+00, 0.5038885E+00, &
     & 0.4954775E+00, 0.5416000E+00, 0.4743486E+00, 0.4539229E+00, &
     & 0.4280976E+00, 0.3872410E+00, 0.3154567E+00, 0.3154567E+00 /
      data (ref_adm(32,iz, 6, 4),iz = 1,20) / &
     & 0.5472210E+00, 0.5472210E+00, 0.4904600E+00, 0.5406100E+00, &
     & 0.5392000E+00, 0.5605500E+00, 0.5899700E+00, 0.6083900E+00, &
     & 0.5242842E+00, 0.4089700E+00, 0.5125763E+00, 0.5038354E+00, &
     & 0.4952492E+00, 0.4870284E+00, 0.4739681E+00, 0.4534655E+00, &
     & 0.4276312E+00, 0.3867722E+00, 0.3151453E+00, 0.3151453E+00 /
      data (ref_adm(32,iz, 7, 4),iz = 1,20) / &
     & 0.5457000E+00, 0.5457000E+00, 0.5408300E+00, 0.5166000E+00, &
     & 0.6140300E+00, 0.6087500E+00, 0.6121700E+00, 0.5456600E+00, &
     & 0.5248607E+00, 0.5179066E+00, 0.5037400E+00, 0.5038990E+00, &
     & 0.4595800E+00, 0.4866509E+00, 0.4736750E+00, 0.4530085E+00, &
     & 0.4271051E+00, 0.3862431E+00, 0.3147080E+00, 0.3147080E+00 /
      data (ref_adm(32,iz, 8, 4),iz = 1,20) / &
     & 0.5000900E+00, 0.5000900E+00, 0.5460600E+00, 0.5709200E+00, &
     & 0.5836500E+00, 0.5492200E+00, 0.5336500E+00, 0.5277700E+00, &
     & 0.5361700E+00, 0.5732000E+00, 0.5289400E+00, 0.4471100E+00, &
     & 0.5371000E+00, 0.5578700E+00, 0.4730547E+00, 0.4522226E+00, &
     & 0.4263518E+00, 0.3854728E+00, 0.3142617E+00, 0.3142617E+00 /
      data (ref_adm(32,iz, 9, 4),iz = 1,20) / &
     & 0.5198900E+00, 0.5198900E+00, 0.3957000E+00, 0.7851800E+00, &
     & 0.4960200E+00, 0.5262900E+00, 0.5281500E+00, 0.5488400E+00, &
     & 0.5371700E+00, 0.5518300E+00, 0.5326600E+00, 0.4832800E+00, &
     & 0.4944013E+00, 0.4820600E+00, 0.4745800E+00, 0.4515337E+00, &
     & 0.4258003E+00, 0.3847584E+00, 0.3137104E+00, 0.3137104E+00 /
      data (ref_adm(32,iz,10, 4),iz = 1,20) / &
     & 0.5001000E+00, 0.5001000E+00, 0.5466152E+00, 0.5497364E+00, &
     & 0.5516875E+00, 0.5170800E+00, 0.5520003E+00, 0.5237400E+00, &
     & 0.5099400E+00, 0.5493100E+00, 0.5475800E+00, 0.4918500E+00, &
     & 0.5456500E+00, 0.5272000E+00, 0.4717852E+00, 0.4509066E+00, &
     & 0.4249378E+00, 0.3840294E+00, 0.3131339E+00, 0.3131339E+00 /
      data (ref_adm(32,iz,11, 4),iz = 1,20) / &
     & 0.5475921E+00, 0.5475921E+00, 0.5465241E+00, 0.5495316E+00, &
     & 0.5515217E+00, 0.5493563E+00, 0.7524000E+00, 0.6507700E+00, &
     & 0.5798100E+00, 0.5185359E+00, 0.5169500E+00, 0.5259000E+00, &
     & 0.5060700E+00, 0.4889900E+00, 0.4713159E+00, 0.4503260E+00, &
     & 0.4242138E+00, 0.3832599E+00, 0.3125612E+00, 0.3125612E+00 /
      data (ref_adm(32,iz,12, 4),iz = 1,20) / &
     & 0.5475506E+00, 0.5475506E+00, 0.5464183E+00, 0.5492547E+00, &
     & 0.5516285E+00, 0.5498618E+00, 0.5497143E+00, 0.4833500E+00, &
     & 0.5693300E+00, 0.5992400E+00, 0.5022600E+00, 0.4846700E+00, &
     & 0.4444600E+00, 0.4619600E+00, 0.4705447E+00, 0.4494001E+00, &
     & 0.4233196E+00, 0.3824092E+00, 0.3119260E+00, 0.3119260E+00 /
      data (ref_adm(32,iz,13, 4),iz = 1,20) / &
     & 0.5476295E+00, 0.5476295E+00, 0.5463026E+00, 0.5490534E+00, &
     & 0.5516552E+00, 0.5503401E+00, 0.5487490E+00, 0.5542087E+00, &
     & 0.5325559E+00, 0.6551500E+00, 0.5413700E+00, 0.5043563E+00, &
     & 0.4933931E+00, 0.4234500E+00, 0.4698195E+00, 0.4486205E+00, &
     & 0.4223100E+00, 0.3816042E+00, 0.3113230E+00, 0.3113230E+00 /
      data (ref_adm(32,iz,14, 4),iz = 1,20) / &
     & 0.5476599E+00, 0.5476599E+00, 0.5464171E+00, 0.5488178E+00, &
     & 0.5516118E+00, 0.4917400E+00, 0.5483007E+00, 0.5592600E+00, &
     & 0.5228500E+00, 0.5199200E+00, 0.5222500E+00, 0.5221700E+00, &
     & 0.5109000E+00, 0.4244300E+00, 0.4218000E+00, 0.4477855E+00, &
     & 0.4214528E+00, 0.3806955E+00, 0.3107088E+00, 0.3107088E+00 /
      data (ref_adm(32,iz,15, 4),iz = 1,20) / &
     & 0.5476228E+00, 0.5476228E+00, 0.5463558E+00, 0.5484346E+00, &
     & 0.5514570E+00, 0.5510831E+00, 0.5478946E+00, 0.4748200E+00, &
     & 0.5284200E+00, 0.5635200E+00, 0.5270100E+00, 0.4739900E+00, &
     & 0.4931771E+00, 0.4832547E+00, 0.4686147E+00, 0.4469805E+00, &
     & 0.4205328E+00, 0.3798696E+00, 0.3101555E+00, 0.3101555E+00 /
      data (ref_adm(32,iz,16, 4),iz = 1,20) / &
     & 0.5477785E+00, 0.5477785E+00, 0.5465156E+00, 0.5478377E+00, &
     & 0.5331100E+00, 0.5512696E+00, 0.5482007E+00, 0.5531027E+00, &
     & 0.5425867E+00, 0.5226468E+00, 0.5138755E+00, 0.5051438E+00, &
     & 0.4931997E+00, 0.4566500E+00, 0.4680594E+00, 0.4461698E+00, &
     & 0.4196131E+00, 0.3790355E+00, 0.3096358E+00, 0.3096358E+00 /
      data (ref_adm(32,iz,17, 4),iz = 1,20) / &
     & 0.5477844E+00, 0.5477844E+00, 0.5297300E+00, 0.5325900E+00, &
     & 0.5279600E+00, 0.5873300E+00, 0.5484756E+00, 0.5513594E+00, &
     & 0.5463851E+00, 0.5244102E+00, 0.5142434E+00, 0.5054175E+00, &
     & 0.4934276E+00, 0.4824322E+00, 0.4674672E+00, 0.4452778E+00, &
     & 0.4188239E+00, 0.3781829E+00, 0.3091754E+00, 0.3091754E+00 /
      data (ref_adm(32,iz,18, 4),iz = 1,20) / &
     & 0.5419955E+00, 0.5419955E+00, 0.5360469E+00, 0.5367500E+00, &
     & 0.5411600E+00, 0.6019500E+00, 0.5362385E+00, 0.5290898E+00, &
     & 0.5216197E+00, 0.5144680E+00, 0.5080696E+00, 0.5012813E+00, &
     & 0.4933343E+00, 0.4871179E+00, 0.4532600E+00, 0.4638581E+00, &
     & 0.4859300E+00, 0.4100356E+00, 0.3305425E+00, 0.3305425E+00 /
      data (ref_adm(32,iz,19, 4),iz = 1,20) / &
     & 0.5423709E+00, 0.5423709E+00, 0.5365926E+00, 0.5342160E+00, &
     & 0.4616300E+00, 0.5483400E+00, 0.5371960E+00, 0.5296957E+00, &
     & 0.5216998E+00, 0.5147610E+00, 0.5084286E+00, 0.4447800E+00, &
     & 0.4931818E+00, 0.4491800E+00, 0.4147800E+00, 0.4948100E+00, &
     & 0.4838600E+00, 0.4095625E+00, 0.3302289E+00, 0.3302289E+00 /
      data (ref_adm(32,iz,20, 4),iz = 1,20) / &
     & 0.5428099E+00, 0.5428099E+00, 0.5363916E+00, 0.5337950E+00, &
     & 0.5214400E+00, 0.5436100E+00, 0.5373862E+00, 0.5299929E+00, &
     & 0.5226351E+00, 0.5151010E+00, 0.5085164E+00, 0.5010431E+00, &
     & 0.4930237E+00, 0.4861296E+00, 0.4253000E+00, 0.4628329E+00, &
     & 0.4438991E+00, 0.4086959E+00, 0.3298850E+00, 0.3298850E+00 /
      data (ref_adm(32,iz,21, 4),iz = 1,20) / &
     & 0.5427460E+00, 0.5427460E+00, 0.5366275E+00, 0.5339406E+00, &
     & 0.5345777E+00, 0.4631700E+00, 0.4836000E+00, 0.5303496E+00, &
     & 0.5231439E+00, 0.5377000E+00, 0.5088131E+00, 0.4774300E+00, &
     & 0.4927787E+00, 0.4232100E+00, 0.4042300E+00, 0.4621844E+00, &
     & 0.4434300E+00, 0.4079882E+00, 0.3296444E+00, 0.3296444E+00 /
      data (ref_adm(32,iz,22, 4),iz = 1,20) / &
     & 0.5487490E+00, 0.5487490E+00, 0.5493711E+00, 0.5521761E+00, &
     & 0.5556300E+00, 0.5370400E+00, 0.5540959E+00, 0.5206300E+00, &
     & 0.5458370E+00, 0.5213400E+00, 0.5383678E+00, 0.5339481E+00, &
     & 0.5288323E+00, 0.6641100E+00, 0.6169900E+00, 0.4980428E+00, &
     & 0.4751498E+00, 0.4356326E+00, 0.3536094E+00, 0.3536094E+00 /
      data (ref_adm(32,iz,23, 4),iz = 1,20) / &
     & 0.5486221E+00, 0.5486221E+00, 0.5485655E+00, 0.5504228E+00, &
     & 0.5546122E+00, 0.5764200E+00, 0.5533500E+00, 0.5519264E+00, &
     & 0.5158100E+00, 0.5012700E+00, 0.5390869E+00, 0.5336393E+00, &
     & 0.5283033E+00, 0.5216327E+00, 0.5113926E+00, 0.4951056E+00, &
     & 0.4721653E+00, 0.4328305E+00, 0.3524744E+00, 0.3524744E+00 /
      data (ref_adm(32,iz,24, 4),iz = 1,20) / &
     & 0.5012800E+00, 0.5012800E+00, 0.5460600E+00, 0.5484961E+00, &
     & 0.5521360E+00, 0.5564503E+00, 0.6014000E+00, 0.5797100E+00, &
     & 0.4350700E+00, 0.5212600E+00, 0.5400236E+00, 0.5339889E+00, &
     & 0.5278136E+00, 0.5208690E+00, 0.5097368E+00, 0.4925471E+00, &
     & 0.4696676E+00, 0.4301873E+00, 0.3514055E+00, 0.3514055E+00 /
      data (ref_adm(32,iz,25, 4),iz = 1,20) / &
     & 0.5479831E+00, 0.5479831E+00, 0.5460492E+00, 0.5465954E+00, &
     & 0.5498339E+00, 0.5877500E+00, 0.6121500E+00, 0.5560955E+00, &
     & 0.5516075E+00, 0.5466857E+00, 0.5409872E+00, 0.5345336E+00, &
     & 0.5272886E+00, 0.5205296E+00, 0.5082058E+00, 0.4904897E+00, &
     & 0.4674624E+00, 0.4275597E+00, 0.3508092E+00, 0.3508092E+00 /
      data (ref_adm(32,iz,26, 4),iz = 1,20) / &
     & 0.5479519E+00, 0.5479519E+00, 0.5450536E+00, 0.5451903E+00, &
     & 0.5442600E+00, 0.5490900E+00, 0.6308500E+00, 0.6335600E+00, &
     & 0.5537716E+00, 0.5488291E+00, 0.5427512E+00, 0.5353243E+00, &
     & 0.5271528E+00, 0.5201195E+00, 0.5076612E+00, 0.4881730E+00, &
     & 0.4649347E+00, 0.4252376E+00, 0.3501377E+00, 0.3501377E+00 /
      data (ref_adm(32,iz,27, 4),iz = 1,20) / &
     & 0.5474525E+00, 0.5474525E+00, 0.5448092E+00, 0.5447887E+00, &
     & 0.5565400E+00, 0.5270900E+00, 0.5575300E+00, 0.5587974E+00, &
     & 0.5559535E+00, 0.5505868E+00, 0.5445067E+00, 0.5365168E+00, &
     & 0.5273327E+00, 0.5195522E+00, 0.5070606E+00, 0.4867514E+00, &
     & 0.4627140E+00, 0.4233325E+00, 0.3496383E+00, 0.3496383E+00 /
      data (ref_adm(32,iz,28, 4),iz = 1,20) / &
     & 0.5345200E+00, 0.5345200E+00, 0.5437000E+00, 0.5445800E+00, &
     & 0.4844800E+00, 0.5467742E+00, 0.4226400E+00, 0.5579177E+00, &
     & 0.5581669E+00, 0.5525772E+00, 0.5466284E+00, 0.5371802E+00, &
     & 0.5279292E+00, 0.5193554E+00, 0.5068948E+00, 0.4858760E+00, &
     & 0.4610355E+00, 0.4218905E+00, 0.3491235E+00, 0.3491235E+00 /
      data (ref_adm(32,iz,29, 4),iz = 1,20) / &
     & 0.5469108E+00, 0.5469108E+00, 0.5500200E+00, 0.5442722E+00, &
     & 0.5439374E+00, 0.4786700E+00, 0.5491406E+00, 0.5559601E+00, &
     & 0.5592794E+00, 0.5547536E+00, 0.5485095E+00, 0.5383556E+00, &
     & 0.5287877E+00, 0.5193889E+00, 0.5062788E+00, 0.4849845E+00, &
     & 0.4596649E+00, 0.4203233E+00, 0.3488700E+00, 0.3488700E+00 /
      data (ref_adm(32,iz,30, 4),iz = 1,20) / &
     & 0.5267100E+00, 0.5267100E+00, 0.5435163E+00, 0.5441866E+00, &
     & 0.5447716E+00, 0.5448763E+00, 0.5468783E+00, 0.5532115E+00, &
     & 0.5585362E+00, 0.5567392E+00, 0.5500100E+00, 0.5404308E+00, &
     & 0.5297499E+00, 0.5201041E+00, 0.5063964E+00, 0.4847191E+00, &
     & 0.4586019E+00, 0.4190997E+00, 0.3486789E+00, 0.3486789E+00 /
      data (ref_adm(32,iz,31, 4),iz = 1,20) / &
     & 0.5468860E+00, 0.5468860E+00, 0.5436988E+00, 0.5448934E+00, &
     & 0.5455540E+00, 0.5451937E+00, 0.5457483E+00, 0.5505668E+00, &
     & 0.5574076E+00, 0.5584130E+00, 0.5513999E+00, 0.5420443E+00, &
     & 0.5305088E+00, 0.5209198E+00, 0.5060452E+00, 0.4845245E+00, &
     & 0.4580101E+00, 0.4177917E+00, 0.3486893E+00, 0.3486893E+00 /
      data (ref_adm(32,iz,32, 4),iz = 1,20) / &
     & 0.5466123E+00, 0.5466123E+00, 0.5439165E+00, 0.5449796E+00, &
     & 0.5461150E+00, 0.5459093E+00, 0.5454364E+00, 0.5483606E+00, &
     & 0.5552993E+00, 0.5587189E+00, 0.5533223E+00, 0.5434822E+00, &
     & 0.5312733E+00, 0.5213853E+00, 0.5058948E+00, 0.4843905E+00, &
     & 0.4572822E+00, 0.4169929E+00, 0.3488352E+00, 0.3488352E+00 /
      data (ref_adm(32,iz,33, 4),iz = 1,20) / &
     & 0.5467652E+00, 0.5467652E+00, 0.5436209E+00, 0.5457626E+00, &
     & 0.5473814E+00, 0.5469118E+00, 0.5461752E+00, 0.5465124E+00, &
     & 0.5529353E+00, 0.5584824E+00, 0.5548529E+00, 0.5448371E+00, &
     & 0.5326645E+00, 0.5222075E+00, 0.5062948E+00, 0.4845508E+00, &
     & 0.4569279E+00, 0.4164509E+00, 0.3489353E+00, 0.3489353E+00 /
      data (ref_adm(32,iz,34, 4),iz = 1,20) / &
     & 0.5465765E+00, 0.5465765E+00, 0.5443618E+00, 0.5467255E+00, &
     & 0.6003900E+00, 0.5495209E+00, 0.5464953E+00, 0.5461743E+00, &
     & 0.5513510E+00, 0.5577273E+00, 0.5560492E+00, 0.5456887E+00, &
     & 0.5333343E+00, 0.5224414E+00, 0.5063512E+00, 0.4843164E+00, &
     & 0.4565650E+00, 0.4156607E+00, 0.3490457E+00, 0.3490457E+00 /
      data (ref_adm(32,iz,35, 4),iz = 1,20) / &
     & 0.5462964E+00, 0.5462964E+00, 0.5443266E+00, 0.5478545E+00, &
     & 0.5577130E+00, 0.5535942E+00, 0.5471379E+00, 0.5457825E+00, &
     & 0.5494070E+00, 0.5570846E+00, 0.5566854E+00, 0.5466304E+00, &
     & 0.5340832E+00, 0.5229000E+00, 0.5068082E+00, 0.4842134E+00, &
     & 0.4564642E+00, 0.4153992E+00, 0.3491459E+00, 0.3491459E+00 /
      data (ref_adm(32,iz,36, 4),iz = 1,20) / &
     & 0.5300200E+00, 0.5300200E+00, 0.5444708E+00, 0.5487239E+00, &
     & 0.5718242E+00, 0.5633133E+00, 0.5480452E+00, 0.5457216E+00, &
     & 0.5486944E+00, 0.5561230E+00, 0.5573266E+00, 0.5473805E+00, &
     & 0.5345892E+00, 0.5232161E+00, 0.5069337E+00, 0.4843244E+00, &
     & 0.4566248E+00, 0.4153939E+00, 0.3492164E+00, 0.3492164E+00 /
      data (ref_adm(32,iz,37, 4),iz = 1,20) / &
     & 0.5213400E+00, 0.5213400E+00, 0.5560400E+00, 0.5672400E+00, &
     & 0.6127700E+00, 0.5753938E+00, 0.5486901E+00, 0.5456576E+00, &
     & 0.5483541E+00, 0.5556615E+00, 0.5574991E+00, 0.5473525E+00, &
     & 0.5351964E+00, 0.5237082E+00, 0.5072488E+00, 0.4845108E+00, &
     & 0.4563589E+00, 0.4152577E+00, 0.3492323E+00, 0.3492323E+00 /
      data (ref_adm(32,iz,38, 4),iz = 1,20) / &
     & 0.5213400E+00, 0.5213400E+00, 0.5560400E+00, 0.5672400E+00, &
     & 0.6127700E+00, 0.5753938E+00, 0.5486901E+00, 0.5456576E+00, &
     & 0.5483541E+00, 0.5556615E+00, 0.5574991E+00, 0.5473525E+00, &
     & 0.5351964E+00, 0.5237082E+00, 0.5072488E+00, 0.4845108E+00, &
     & 0.4563589E+00, 0.4152577E+00, 0.3492323E+00, 0.3492323E+00 /
! Solar Zenith Angle 20.0 Albedo  0.5303434E+00
      data (ref_adm(32,iz, 1, 5),iz = 1,20) / &
     & 0.5552900E+00, 0.5552900E+00, 0.5673100E+00, 0.5079600E+00, &
     & 0.5528488E+00, 0.5556227E+00, 0.5451066E+00, 0.4439200E+00, &
     & 0.5337666E+00, 0.5714200E+00, 0.5282218E+00, 0.5257804E+00, &
     & 0.6216000E+00, 0.5187805E+00, 0.5094011E+00, 0.4921198E+00, &
     & 0.4682595E+00, 0.4271154E+00, 0.3415070E+00, 0.3415070E+00 /
      data (ref_adm(32,iz, 2, 5),iz = 1,20) / &
     & 0.5552900E+00, 0.5552900E+00, 0.5673100E+00, 0.5079600E+00, &
     & 0.5528488E+00, 0.5556227E+00, 0.5451066E+00, 0.4439200E+00, &
     & 0.5337666E+00, 0.5714200E+00, 0.5282218E+00, 0.5257804E+00, &
     & 0.6216000E+00, 0.5187805E+00, 0.5094011E+00, 0.4921198E+00, &
     & 0.4682595E+00, 0.4271154E+00, 0.3415070E+00, 0.3415070E+00 /
      data (ref_adm(32,iz, 3, 5),iz = 1,20) / &
     & 0.5110900E+00, 0.5110900E+00, 0.5240700E+00, 0.5122800E+00, &
     & 0.5528289E+00, 0.6137200E+00, 0.5512300E+00, 0.5364491E+00, &
     & 0.5337465E+00, 0.5311101E+00, 0.4701700E+00, 0.5260293E+00, &
     & 0.5226785E+00, 0.5311800E+00, 0.5094228E+00, 0.4789500E+00, &
     & 0.4677823E+00, 0.4267026E+00, 0.2739212E+00, 0.2739212E+00 /
      data (ref_adm(32,iz, 4, 5),iz = 1,20) / &
     & 0.5173300E+00, 0.5173300E+00, 0.5750700E+00, 0.5785800E+00, &
     & 0.5792800E+00, 0.5871500E+00, 0.5727000E+00, 0.4169300E+00, &
     & 0.5391500E+00, 0.5311426E+00, 0.5281410E+00, 0.5255692E+00, &
     & 0.5078100E+00, 0.5183439E+00, 0.5089790E+00, 0.4916281E+00, &
     & 0.4674643E+00, 0.4262725E+00, 0.3409830E+00, 0.3409830E+00 /
      data (ref_adm(32,iz, 5, 5),iz = 1,20) / &
     & 0.5798700E+00, 0.5798700E+00, 0.6128700E+00, 0.5629400E+00, &
     & 0.6343900E+00, 0.6730100E+00, 0.4279800E+00, 0.4659900E+00, &
     & 0.3827600E+00, 0.5309886E+00, 0.6172700E+00, 0.5254360E+00, &
     & 0.5220425E+00, 0.5440700E+00, 0.5084997E+00, 0.5706500E+00, &
     & 0.4666453E+00, 0.4255473E+00, 0.3404577E+00, 0.3404577E+00 /
      data (ref_adm(32,iz, 6, 5),iz = 1,20) / &
     & 0.5318900E+00, 0.5318900E+00, 0.5193000E+00, 0.5175300E+00, &
     & 0.5924100E+00, 0.5162900E+00, 0.5472484E+00, 0.5368904E+00, &
     & 0.6180000E+00, 0.5931200E+00, 0.5813300E+00, 0.5252033E+00, &
     & 0.5047700E+00, 0.5173020E+00, 0.5747900E+00, 0.4902271E+00, &
     & 0.4659120E+00, 0.4245002E+00, 0.3397936E+00, 0.3397936E+00 /
      data (ref_adm(32,iz, 7, 5),iz = 1,20) / &
     & 0.4983500E+00, 0.4983500E+00, 0.5051600E+00, 0.5107500E+00, &
     & 0.5853700E+00, 0.7067900E+00, 0.5487136E+00, 0.5740800E+00, &
     & 0.5759500E+00, 0.5124500E+00, 0.5157100E+00, 0.4609000E+00, &
     & 0.5208075E+00, 0.5165095E+00, 0.5066141E+00, 0.4891781E+00, &
     & 0.4646866E+00, 0.4234031E+00, 0.3389567E+00, 0.3389567E+00 /
      data (ref_adm(32,iz, 8, 5),iz = 1,20) / &
     & 0.5342700E+00, 0.5342700E+00, 0.5456800E+00, 0.5142600E+00, &
     & 0.5692800E+00, 0.5749400E+00, 0.5496800E+00, 0.5550200E+00, &
     & 0.5851900E+00, 0.6581800E+00, 0.5275894E+00, 0.5241134E+00, &
     & 0.5202780E+00, 0.5154004E+00, 0.4695900E+00, 0.4882434E+00, &
     & 0.4635352E+00, 0.4221350E+00, 0.3380025E+00, 0.3380025E+00 /
      data (ref_adm(32,iz, 9, 5),iz = 1,20) / &
     & 0.5104000E+00, 0.5104000E+00, 0.5986200E+00, 0.5524200E+00, &
     & 0.5799700E+00, 0.5664400E+00, 0.5348300E+00, 0.4973500E+00, &
     & 0.5393400E+00, 0.6049700E+00, 0.5274859E+00, 0.5236257E+00, &
     & 0.5195298E+00, 0.5523900E+00, 0.5045871E+00, 0.4869680E+00, &
     & 0.4622391E+00, 0.4206368E+00, 0.3369842E+00, 0.3369842E+00 /
      data (ref_adm(32,iz,10, 5),iz = 1,20) / &
     & 0.5529700E+00, 0.5529700E+00, 0.5550441E+00, 0.6353700E+00, &
     & 0.6717300E+00, 0.6201200E+00, 0.5564500E+00, 0.5453700E+00, &
     & 0.4512900E+00, 0.4869500E+00, 0.5119800E+00, 0.4490800E+00, &
     & 0.5187322E+00, 0.5132409E+00, 0.5033173E+00, 0.4855103E+00, &
     & 0.4606526E+00, 0.4190110E+00, 0.3358878E+00, 0.3358878E+00 /
      data (ref_adm(32,iz,11, 5),iz = 1,20) / &
     & 0.5417300E+00, 0.5417300E+00, 0.5548679E+00, 0.4745300E+00, &
     & 0.5626900E+00, 0.5539430E+00, 0.5333600E+00, 0.5478400E+00, &
     & 0.5103600E+00, 0.5083200E+00, 0.4848300E+00, 0.4795000E+00, &
     & 0.4982600E+00, 0.5120177E+00, 0.5020303E+00, 0.4123200E+00, &
     & 0.4377900E+00, 0.4171474E+00, 0.3346689E+00, 0.3346689E+00 /
      data (ref_adm(32,iz,12, 5),iz = 1,20) / &
     & 0.5393700E+00, 0.5393700E+00, 0.6548100E+00, 0.5579566E+00, &
     & 0.5034500E+00, 0.4964900E+00, 0.5559520E+00, 0.5427546E+00, &
     & 0.5343195E+00, 0.6435600E+00, 0.5874200E+00, 0.5378400E+00, &
     & 0.5069800E+00, 0.5108760E+00, 0.5004542E+00, 0.4631500E+00, &
     & 0.4515600E+00, 0.4154112E+00, 0.3334221E+00, 0.3334221E+00 /
      data (ref_adm(32,iz,13, 5),iz = 1,20) / &
     & 0.5440200E+00, 0.5440200E+00, 0.5537462E+00, 0.5575123E+00, &
     & 0.4935200E+00, 0.5537885E+00, 0.5563521E+00, 0.5450891E+00, &
     & 0.5349593E+00, 0.5308945E+00, 0.4725000E+00, 0.5389500E+00, &
     & 0.4751300E+00, 0.4987200E+00, 0.4618400E+00, 0.4537300E+00, &
     & 0.5397500E+00, 0.4136946E+00, 0.3322160E+00, 0.3322160E+00 /
      data (ref_adm(32,iz,14, 5),iz = 1,20) / &
     & 0.4405800E+00, 0.4405800E+00, 0.4350500E+00, 0.4411600E+00, &
     & 0.6503400E+00, 0.5289900E+00, 0.5221500E+00, 0.5479410E+00, &
     & 0.5361060E+00, 0.5306870E+00, 0.6647100E+00, 0.5179900E+00, &
     & 0.4973800E+00, 0.5285200E+00, 0.4974642E+00, 0.4194700E+00, &
     & 0.4541311E+00, 0.4119953E+00, 0.3309722E+00, 0.3309722E+00 /
      data (ref_adm(32,iz,15, 5),iz = 1,20) / &
     & 0.5501414E+00, 0.5501414E+00, 0.5529628E+00, 0.5398000E+00, &
     & 0.7511100E+00, 0.6646600E+00, 0.6922700E+00, 0.4998000E+00, &
     & 0.5796300E+00, 0.5067600E+00, 0.5367700E+00, 0.5628600E+00, &
     & 0.5030500E+00, 0.4490700E+00, 0.4960258E+00, 0.4773209E+00, &
     & 0.4524574E+00, 0.4103731E+00, 0.3297677E+00, 0.3297677E+00 /
      data (ref_adm(32,iz,16, 5),iz = 1,20) / &
     & 0.5138300E+00, 0.5138300E+00, 0.4929200E+00, 0.4861300E+00, &
     & 0.4881800E+00, 0.5923300E+00, 0.7315000E+00, 0.7244500E+00, &
     & 0.5069600E+00, 0.5316159E+00, 0.4000300E+00, 0.5418400E+00, &
     & 0.5098000E+00, 0.4289000E+00, 0.4945084E+00, 0.4756477E+00, &
     & 0.4505493E+00, 0.4087264E+00, 0.3286464E+00, 0.3286464E+00 /
      data (ref_adm(32,iz,17, 5),iz = 1,20) / &
     & 0.4939100E+00, 0.4939100E+00, 0.4922500E+00, 0.4969500E+00, &
     & 0.5661900E+00, 0.5354000E+00, 0.5533594E+00, 0.6563600E+00, &
     & 0.6409500E+00, 0.4303800E+00, 0.5277444E+00, 0.6189900E+00, &
     & 0.4494700E+00, 0.4604900E+00, 0.4476200E+00, 0.4739664E+00, &
     & 0.4487742E+00, 0.4072056E+00, 0.3276583E+00, 0.3276583E+00 /
      data (ref_adm(32,iz,18, 5),iz = 1,20) / &
     & 0.5424200E+00, 0.5424200E+00, 0.5225100E+00, 0.5496478E+00, &
     & 0.5532414E+00, 0.5320400E+00, 0.5853200E+00, 0.6044800E+00, &
     & 0.6852200E+00, 0.4886300E+00, 0.5204042E+00, 0.5120492E+00, &
     & 0.5008645E+00, 0.4495600E+00, 0.4383200E+00, 0.4560300E+00, &
     & 0.4284401E+00, 0.3873209E+00, 0.3135907E+00, 0.3135907E+00 /
      data (ref_adm(32,iz,19, 5),iz = 1,20) / &
     & 0.5310100E+00, 0.5310100E+00, 0.5486349E+00, 0.5283500E+00, &
     & 0.5526175E+00, 0.5549158E+00, 0.5523527E+00, 0.5499972E+00, &
     & 0.6313300E+00, 0.6553200E+00, 0.4811400E+00, 0.5122199E+00, &
     & 0.5009998E+00, 0.4886700E+00, 0.4754779E+00, 0.4481800E+00, &
     & 0.4274923E+00, 0.3865147E+00, 0.3132176E+00, 0.3132176E+00 /
      data (ref_adm(32,iz,20, 5),iz = 1,20) / &
     & 0.5181300E+00, 0.5181300E+00, 0.5489309E+00, 0.5489053E+00, &
     & 0.5519279E+00, 0.5548141E+00, 0.5529046E+00, 0.5495176E+00, &
     & 0.5530013E+00, 0.7025000E+00, 0.6747200E+00, 0.5123894E+00, &
     & 0.4883400E+00, 0.4846000E+00, 0.4100500E+00, 0.4528573E+00, &
     & 0.4266630E+00, 0.3856567E+00, 0.3129015E+00, 0.3129015E+00 /
      data (ref_adm(32,iz,21, 5),iz = 1,20) / &
     & 0.5114900E+00, 0.5114900E+00, 0.5491682E+00, 0.5488474E+00, &
     & 0.5511026E+00, 0.5545428E+00, 0.5535247E+00, 0.5493084E+00, &
     & 0.5527778E+00, 0.5401070E+00, 0.6826200E+00, 0.5125090E+00, &
     & 0.4780700E+00, 0.4805800E+00, 0.4117400E+00, 0.4522569E+00, &
     & 0.4259731E+00, 0.3848544E+00, 0.3125876E+00, 0.3125876E+00 /
      data (ref_adm(32,iz,22, 5),iz = 1,20) / &
     & 0.5901700E+00, 0.5901700E+00, 0.6337800E+00, 0.5254551E+00, &
     & 0.5261904E+00, 0.5268303E+00, 0.5275011E+00, 0.5282922E+00, &
     & 0.5020800E+00, 0.5305186E+00, 0.5603400E+00, 0.5333973E+00, &
     & 0.5085900E+00, 0.5316300E+00, 0.4720700E+00, 0.5226294E+00, &
     & 0.5054229E+00, 0.4714521E+00, 0.3955598E+00, 0.3955598E+00 /
      data (ref_adm(32,iz,23, 5),iz = 1,20) / &
     & 0.5777800E+00, 0.5777800E+00, 0.5254130E+00, 0.4768600E+00, &
     & 0.5183200E+00, 0.5177600E+00, 0.4856300E+00, 0.5651200E+00, &
     & 0.5299931E+00, 0.5303612E+00, 0.5552300E+00, 0.5327994E+00, &
     & 0.6047400E+00, 0.4797200E+00, 0.4698700E+00, 0.5162995E+00, &
     & 0.4996376E+00, 0.4653732E+00, 0.3942038E+00, 0.3942038E+00 /
      data (ref_adm(32,iz,24, 5),iz = 1,20) / &
     & 0.5908100E+00, 0.5908100E+00, 0.4818000E+00, 0.4491600E+00, &
     & 0.5537800E+00, 0.5290971E+00, 0.5300517E+00, 0.5309660E+00, &
     & 0.5317017E+00, 0.4519700E+00, 0.5323519E+00, 0.5320431E+00, &
     & 0.5347700E+00, 0.4637100E+00, 0.4459500E+00, 0.5057200E+00, &
     & 0.4942262E+00, 0.4607044E+00, 0.3934873E+00, 0.3934873E+00 /
      data (ref_adm(32,iz,25, 5),iz = 1,20) / &
     & 0.5023700E+00, 0.5023700E+00, 0.4810400E+00, 0.5106100E+00, &
     & 0.4617600E+00, 0.4919200E+00, 0.4891300E+00, 0.5378400E+00, &
     & 0.5531900E+00, 0.5256200E+00, 0.4941900E+00, 0.5331298E+00, &
     & 0.4328300E+00, 0.5069000E+00, 0.4480700E+00, 0.4461800E+00, &
     & 0.4546300E+00, 0.4567129E+00, 0.3938961E+00, 0.3938961E+00 /
      data (ref_adm(32,iz,26, 5),iz = 1,20) / &
     & 0.5705200E+00, 0.5705200E+00, 0.5548900E+00, 0.5777600E+00, &
     & 0.5314300E+00, 0.5073400E+00, 0.5573600E+00, 0.5365170E+00, &
     & 0.5370919E+00, 0.5838100E+00, 0.5258100E+00, 0.5353332E+00, &
     & 0.4393800E+00, 0.4644300E+00, 0.4920600E+00, 0.5083042E+00, &
     & 0.3873300E+00, 0.4541795E+00, 0.3951236E+00, 0.3951236E+00 /
      data (ref_adm(32,iz,27, 5),iz = 1,20) / &
     & 0.5364000E+00, 0.5364000E+00, 0.5358900E+00, 0.5186000E+00, &
     & 0.5184000E+00, 0.5359498E+00, 0.5101200E+00, 0.5400586E+00, &
     & 0.4569600E+00, 0.5580900E+00, 0.5669000E+00, 0.5383934E+00, &
     & 0.5153600E+00, 0.5330300E+00, 0.4697500E+00, 0.5085722E+00, &
     & 0.4884400E+00, 0.4533530E+00, 0.3972624E+00, 0.3972624E+00 /
      data (ref_adm(32,iz,28, 5),iz = 1,20) / &
     & 0.5261900E+00, 0.5261900E+00, 0.5348600E+00, 0.5468400E+00, &
     & 0.5349591E+00, 0.5379017E+00, 0.4230300E+00, 0.5434754E+00, &
     & 0.5450683E+00, 0.5810200E+00, 0.5952200E+00, 0.6340500E+00, &
     & 0.5194400E+00, 0.4790500E+00, 0.5253374E+00, 0.5098554E+00, &
     & 0.4891492E+00, 0.4544535E+00, 0.4007653E+00, 0.4007653E+00 /
      data (ref_adm(32,iz,29, 5),iz = 1,20) / &
     & 0.4990300E+00, 0.4990300E+00, 0.4841300E+00, 0.4883900E+00, &
     & 0.5365032E+00, 0.5402701E+00, 0.4326600E+00, 0.5674300E+00, &
     & 0.5397100E+00, 0.4914800E+00, 0.5767000E+00, 0.5484847E+00, &
     & 0.4837700E+00, 0.5392274E+00, 0.5288836E+00, 0.5129298E+00, &
     & 0.4905864E+00, 0.4563710E+00, 0.4051056E+00, 0.4051056E+00 /
      data (ref_adm(32,iz,30, 5),iz = 1,20) / &
     & 0.6069000E+00, 0.6069000E+00, 0.4868800E+00, 0.4984000E+00, &
     & 0.5378947E+00, 0.5428763E+00, 0.5472964E+00, 0.5500572E+00, &
     & 0.6014900E+00, 0.5090000E+00, 0.5964100E+00, 0.5542417E+00, &
     & 0.5506735E+00, 0.5447413E+00, 0.5341044E+00, 0.5160691E+00, &
     & 0.4938107E+00, 0.4580638E+00, 0.4097855E+00, 0.4097855E+00 /
      data (ref_adm(32,iz,31, 5),iz = 1,20) / &
     & 0.5306700E+00, 0.5306700E+00, 0.5508700E+00, 0.5647600E+00, &
     & 0.5394938E+00, 0.5450478E+00, 0.5873400E+00, 0.5489133E+00, &
     & 0.5499626E+00, 0.5522282E+00, 0.5533800E+00, 0.5582881E+00, &
     & 0.5562880E+00, 0.5505809E+00, 0.5398541E+00, 0.5206349E+00, &
     & 0.4971208E+00, 0.4612705E+00, 0.4141997E+00, 0.4141997E+00 /
      data (ref_adm(32,iz,32, 5),iz = 1,20) / &
     & 0.5572600E+00, 0.5572600E+00, 0.5361100E+00, 0.5680900E+00, &
     & 0.5578600E+00, 0.5596500E+00, 0.5384100E+00, 0.5285900E+00, &
     & 0.5445028E+00, 0.5458140E+00, 0.5494136E+00, 0.5548707E+00, &
     & 0.5589405E+00, 0.5561979E+00, 0.5450614E+00, 0.5263340E+00, &
     & 0.5011872E+00, 0.4648184E+00, 0.4184723E+00, 0.4184723E+00 /
      data (ref_adm(32,iz,33, 5),iz = 1,20) / &
     & 0.5496800E+00, 0.5496800E+00, 0.5410700E+00, 0.5325800E+00, &
     & 0.5722500E+00, 0.5874600E+00, 0.5745500E+00, 0.5774400E+00, &
     & 0.5408500E+00, 0.5258500E+00, 0.5438041E+00, 0.5705300E+00, &
     & 0.5549764E+00, 0.5581362E+00, 0.5503113E+00, 0.5310537E+00, &
     & 0.5061824E+00, 0.4685813E+00, 0.4227138E+00, 0.4227138E+00 /
      data (ref_adm(32,iz,34, 5),iz = 1,20) / &
     & 0.5142900E+00, 0.5142900E+00, 0.4777700E+00, 0.5738000E+00, &
     & 0.6069600E+00, 0.5676700E+00, 0.5851600E+00, 0.5891500E+00, &
     & 0.5659900E+00, 0.5618000E+00, 0.5428947E+00, 0.5441954E+00, &
     & 0.5487213E+00, 0.5546373E+00, 0.5533817E+00, 0.5356015E+00, &
     & 0.5107691E+00, 0.4718352E+00, 0.4267058E+00, 0.4267058E+00 /
      data (ref_adm(32,iz,35, 5),iz = 1,20) / &
     & 0.5198400E+00, 0.5198400E+00, 0.5227700E+00, 0.5369900E+00, &
     & 0.5736700E+00, 0.5921400E+00, 0.6034500E+00, 0.5589800E+00, &
     & 0.5885000E+00, 0.5433043E+00, 0.5447819E+00, 0.5438929E+00, &
     & 0.5447009E+00, 0.5498253E+00, 0.5534305E+00, 0.5391976E+00, &
     & 0.5137853E+00, 0.4750946E+00, 0.4297482E+00, 0.4297482E+00 /
      data (ref_adm(32,iz,36, 5),iz = 1,20) / &
     & 0.5610500E+00, 0.5610500E+00, 0.5370600E+00, 0.5617500E+00, &
     & 0.5775400E+00, 0.5409400E+00, 0.5918600E+00, 0.5789600E+00, &
     & 0.5898300E+00, 0.5500008E+00, 0.5516213E+00, 0.5265400E+00, &
     & 0.5433814E+00, 0.5459600E+00, 0.5517210E+00, 0.5421827E+00, &
     & 0.5162155E+00, 0.4775480E+00, 0.4317574E+00, 0.4317574E+00 /
      data (ref_adm(32,iz,37, 5),iz = 1,20) / &
     & 0.5247200E+00, 0.5247200E+00, 0.5046100E+00, 0.6133800E+00, &
     & 0.5990800E+00, 0.6293600E+00, 0.5768900E+00, 0.5447800E+00, &
     & 0.5241800E+00, 0.6605200E+00, 0.6050400E+00, 0.5909000E+00, &
     & 0.5436746E+00, 0.5441903E+00, 0.5501193E+00, 0.5433384E+00, &
     & 0.5175829E+00, 0.4789865E+00, 0.4329769E+00, 0.4329769E+00 /
      data (ref_adm(32,iz,38, 5),iz = 1,20) / &
     & 0.5247200E+00, 0.5247200E+00, 0.5046100E+00, 0.6133800E+00, &
     & 0.5990800E+00, 0.6293600E+00, 0.5768900E+00, 0.5447800E+00, &
     & 0.5241800E+00, 0.6605200E+00, 0.6050400E+00, 0.5909000E+00, &
     & 0.5436746E+00, 0.5441903E+00, 0.5501193E+00, 0.5433384E+00, &
     & 0.5175829E+00, 0.4789865E+00, 0.4329769E+00, 0.4329769E+00 /
! Solar Zenith Angle 25.0 Albedo  0.5330855E+00
      data (ref_adm(32,iz, 1, 6),iz = 1,20) / &
     & 0.5557443E+00, 0.5557443E+00, 0.5620002E+00, 0.5360700E+00, &
     & 0.6380900E+00, 0.5668100E+00, 0.5449962E+00, 0.5710100E+00, &
     & 0.5460300E+00, 0.6298800E+00, 0.4512400E+00, 0.5320857E+00, &
     & 0.5350700E+00, 0.5542800E+00, 0.5665700E+00, 0.4978800E+00, &
     & 0.4864376E+00, 0.4457585E+00, 0.3515868E+00, 0.3515868E+00 /
      data (ref_adm(32,iz, 2, 6),iz = 1,20) / &
     & 0.5557443E+00, 0.5557443E+00, 0.5620002E+00, 0.5360700E+00, &
     & 0.6380900E+00, 0.5668100E+00, 0.5449962E+00, 0.5710100E+00, &
     & 0.5460300E+00, 0.6298800E+00, 0.4512400E+00, 0.5320857E+00, &
     & 0.5350700E+00, 0.5542800E+00, 0.5665700E+00, 0.4978800E+00, &
     & 0.4864376E+00, 0.4457585E+00, 0.3515868E+00, 0.3515868E+00 /
      data (ref_adm(32,iz, 3, 6),iz = 1,20) / &
     & 0.5903800E+00, 0.5903800E+00, 0.5321300E+00, 0.5614162E+00, &
     & 0.5551564E+00, 0.5688000E+00, 0.6183400E+00, 0.5694400E+00, &
     & 0.5480000E+00, 0.5060200E+00, 0.5330718E+00, 0.5324169E+00, &
     & 0.5298200E+00, 0.5283111E+00, 0.5807300E+00, 0.5072600E+00, &
     & 0.4858854E+00, 0.4539000E+00, 0.2976108E+00, 0.2976108E+00 /
      data (ref_adm(32,iz, 4, 6),iz = 1,20) / &
     & 0.5354700E+00, 0.5354700E+00, 0.6619400E+00, 0.6817600E+00, &
     & 0.5021800E+00, 0.5499686E+00, 0.5559800E+00, 0.5859900E+00, &
     & 0.5387800E+00, 0.5003000E+00, 0.5330741E+00, 0.5318608E+00, &
     & 0.5415700E+00, 0.5705100E+00, 0.5807700E+00, 0.5154800E+00, &
     & 0.4856503E+00, 0.4449060E+00, 0.3510761E+00, 0.3510761E+00 /
      data (ref_adm(32,iz, 5, 6),iz = 1,20) / &
     & 0.6531300E+00, 0.6531300E+00, 0.6879200E+00, 0.5615097E+00, &
     & 0.5054500E+00, 0.4701000E+00, 0.5022900E+00, 0.6050700E+00, &
     & 0.4679500E+00, 0.5349419E+00, 0.4873200E+00, 0.5317411E+00, &
     & 0.5184900E+00, 0.5406800E+00, 0.5106300E+00, 0.5373100E+00, &
     & 0.4626100E+00, 0.4442216E+00, 0.3505669E+00, 0.3505669E+00 /
      data (ref_adm(32,iz, 6, 6),iz = 1,20) / &
     & 0.6100000E+00, 0.6100000E+00, 0.5328900E+00, 0.4985600E+00, &
     & 0.6430800E+00, 0.5505938E+00, 0.5452950E+00, 0.5921000E+00, &
     & 0.5269200E+00, 0.5349436E+00, 0.5666800E+00, 0.5314974E+00, &
     & 0.5272600E+00, 0.5374300E+00, 0.5059300E+00, 0.5598500E+00, &
     & 0.4906200E+00, 0.4431775E+00, 0.3499334E+00, 0.3499334E+00 /
      data (ref_adm(32,iz, 7, 6),iz = 1,20) / &
     & 0.4994500E+00, 0.4994500E+00, 0.5324100E+00, 0.4954600E+00, &
     & 0.5254200E+00, 0.5511122E+00, 0.5458919E+00, 0.5683400E+00, &
     & 0.5377057E+00, 0.4447000E+00, 0.4681500E+00, 0.5016100E+00, &
     & 0.5417600E+00, 0.5508300E+00, 0.5411000E+00, 0.5177700E+00, &
     & 0.4830054E+00, 0.4421521E+00, 0.3491111E+00, 0.3491111E+00 /
      data (ref_adm(32,iz, 8, 6),iz = 1,20) / &
     & 0.5557433E+00, 0.5557433E+00, 0.6230800E+00, 0.4903200E+00, &
     & 0.4419100E+00, 0.4233600E+00, 0.5459359E+00, 0.5205400E+00, &
     & 0.5376753E+00, 0.5424300E+00, 0.5267600E+00, 0.5302308E+00, &
     & 0.5282723E+00, 0.5090500E+00, 0.5068800E+00, 0.5161900E+00, &
     & 0.4819573E+00, 0.4409534E+00, 0.3481711E+00, 0.3481711E+00 /
      data (ref_adm(32,iz, 9, 6),iz = 1,20) / &
     & 0.5203500E+00, 0.5203500E+00, 0.5287500E+00, 0.5340900E+00, &
     & 0.6471900E+00, 0.4679200E+00, 0.4805500E+00, 0.5083800E+00, &
     & 0.5377324E+00, 0.5348799E+00, 0.6028200E+00, 0.5522600E+00, &
     & 0.5659300E+00, 0.5242029E+00, 0.5011700E+00, 0.4886500E+00, &
     & 0.4807707E+00, 0.4394829E+00, 0.3471753E+00, 0.3471753E+00 /
      data (ref_adm(32,iz,10, 6),iz = 1,20) / &
     & 0.5711600E+00, 0.5711600E+00, 0.5700800E+00, 0.5546900E+00, &
     & 0.6199700E+00, 0.5516500E+00, 0.4839700E+00, 0.5419461E+00, &
     & 0.5109400E+00, 0.5089400E+00, 0.5032000E+00, 0.6359300E+00, &
     & 0.5746500E+00, 0.5432000E+00, 0.5160620E+00, 0.5016969E+00, &
     & 0.4791989E+00, 0.4378729E+00, 0.3460908E+00, 0.3460908E+00 /
      data (ref_adm(32,iz,11, 6),iz = 1,20) / &
     & 0.5924300E+00, 0.5924300E+00, 0.5497300E+00, 0.5650800E+00, &
     & 0.5839500E+00, 0.5444300E+00, 0.5464100E+00, 0.5612700E+00, &
     & 0.5234900E+00, 0.5200900E+00, 0.5403300E+00, 0.5061600E+00, &
     & 0.6614100E+00, 0.4157900E+00, 0.5147616E+00, 0.5001684E+00, &
     & 0.4780946E+00, 0.4359434E+00, 0.3448354E+00, 0.3448354E+00 /
      data (ref_adm(32,iz,12, 6),iz = 1,20) / &
     & 0.5323700E+00, 0.5323700E+00, 0.4466600E+00, 0.6186100E+00, &
     & 0.5406400E+00, 0.5413700E+00, 0.5746000E+00, 0.5325000E+00, &
     & 0.5292000E+00, 0.5044000E+00, 0.5313200E+00, 0.5967600E+00, &
     & 0.4733200E+00, 0.5407900E+00, 0.5130584E+00, 0.4983652E+00, &
     & 0.4763058E+00, 0.4341828E+00, 0.3435387E+00, 0.3435387E+00 /
      data (ref_adm(32,iz,13, 6),iz = 1,20) / &
     & 0.5727500E+00, 0.5727500E+00, 0.5590757E+00, 0.5628338E+00, &
     & 0.6154200E+00, 0.5395200E+00, 0.5339500E+00, 0.5108800E+00, &
     & 0.5094100E+00, 0.5365200E+00, 0.5436100E+00, 0.5253000E+00, &
     & 0.4649400E+00, 0.5282000E+00, 0.6007600E+00, 0.4965644E+00, &
     & 0.4746454E+00, 0.4324361E+00, 0.3422812E+00, 0.3422812E+00 /
      data (ref_adm(32,iz,14, 6),iz = 1,20) / &
     & 0.5933400E+00, 0.5933400E+00, 0.5121000E+00, 0.5627479E+00, &
     & 0.5748300E+00, 0.6188300E+00, 0.5638300E+00, 0.4515300E+00, &
     & 0.4284600E+00, 0.5447400E+00, 0.5458400E+00, 0.5904700E+00, &
     & 0.4953100E+00, 0.5054100E+00, 0.5098085E+00, 0.4949949E+00, &
     & 0.4726896E+00, 0.4306659E+00, 0.3409291E+00, 0.3409291E+00 /
      data (ref_adm(32,iz,15, 6),iz = 1,20) / &
     & 0.4877900E+00, 0.4877900E+00, 0.5580895E+00, 0.5876900E+00, &
     & 0.6178700E+00, 0.6020500E+00, 0.5395600E+00, 0.5441478E+00, &
     & 0.5393280E+00, 0.4710200E+00, 0.5309820E+00, 0.5554300E+00, &
     & 0.4576300E+00, 0.5244300E+00, 0.5082027E+00, 0.4931264E+00, &
     & 0.4709142E+00, 0.4289646E+00, 0.3860200E+00, 0.3860200E+00 /
      data (ref_adm(32,iz,16, 6),iz = 1,20) / &
     & 0.5365100E+00, 0.5365100E+00, 0.5281400E+00, 0.4965800E+00, &
     & 0.5989500E+00, 0.7051800E+00, 0.5332000E+00, 0.5070600E+00, &
     & 0.5398235E+00, 0.5029100E+00, 0.5239100E+00, 0.5599700E+00, &
     & 0.4323700E+00, 0.5774100E+00, 0.4028900E+00, 0.5394700E+00, &
     & 0.4687721E+00, 0.4271591E+00, 0.3383080E+00, 0.3383080E+00 /
      data (ref_adm(32,iz,17, 6),iz = 1,20) / &
     & 0.4947600E+00, 0.4947600E+00, 0.5566754E+00, 0.5758700E+00, &
     & 0.5624611E+00, 0.5584394E+00, 0.5026400E+00, 0.5459675E+00, &
     & 0.5985500E+00, 0.5110000E+00, 0.4568500E+00, 0.5243500E+00, &
     & 0.5189716E+00, 0.5603600E+00, 0.4158200E+00, 0.4892716E+00, &
     & 0.4667447E+00, 0.4254607E+00, 0.3371603E+00, 0.3371603E+00 /
      data (ref_adm(32,iz,18, 6),iz = 1,20) / &
     & 0.4714100E+00, 0.4714100E+00, 0.5682820E+00, 0.5690390E+00, &
     & 0.6939700E+00, 0.6949100E+00, 0.7711000E+00, 0.5681394E+00, &
     & 0.6341400E+00, 0.5201200E+00, 0.4876100E+00, 0.5370400E+00, &
     & 0.5259000E+00, 0.5014403E+00, 0.5174100E+00, 0.4645000E+00, &
     & 0.3974300E+00, 0.3912318E+00, 0.3163034E+00, 0.3163034E+00 /
      data (ref_adm(32,iz,19, 6),iz = 1,20) / &
     & 0.5698475E+00, 0.5698475E+00, 0.5683178E+00, 0.5687988E+00, &
     & 0.6049800E+00, 0.6600000E+00, 0.6438900E+00, 0.4844900E+00, &
     & 0.6312600E+00, 0.5933100E+00, 0.5359897E+00, 0.5372500E+00, &
     & 0.5184200E+00, 0.5013248E+00, 0.4850038E+00, 0.4614287E+00, &
     & 0.4335463E+00, 0.3904800E+00, 0.3159626E+00, 0.3159626E+00 /
      data (ref_adm(32,iz,20, 6),iz = 1,20) / &
     & 0.5629400E+00, 0.5629400E+00, 0.4965200E+00, 0.5508200E+00, &
     & 0.5575000E+00, 0.5063000E+00, 0.5497600E+00, 0.5667309E+00, &
     & 0.5694433E+00, 0.5520559E+00, 0.5367927E+00, 0.4839500E+00, &
     & 0.5183100E+00, 0.4699700E+00, 0.4844735E+00, 0.4606718E+00, &
     & 0.4327694E+00, 0.3896841E+00, 0.3156790E+00, 0.3156790E+00 /
      data (ref_adm(32,iz,21, 6),iz = 1,20) / &
     & 0.4465800E+00, 0.4465800E+00, 0.4835100E+00, 0.6450000E+00, &
     & 0.5339300E+00, 0.5544100E+00, 0.5423600E+00, 0.4826700E+00, &
     & 0.5061900E+00, 0.5499000E+00, 0.5381014E+00, 0.5159800E+00, &
     & 0.5037200E+00, 0.4491800E+00, 0.4619300E+00, 0.5023600E+00, &
     & 0.4321344E+00, 0.3889448E+00, 0.3154027E+00, 0.3154027E+00 /
      data (ref_adm(32,iz,22, 6),iz = 1,20) / &
     & 0.6200000E+00, 0.6200000E+00, 0.6313200E+00, 0.5944200E+00, &
     & 0.5583658E+00, 0.4837400E+00, 0.5510700E+00, 0.5531600E+00, &
     & 0.5102800E+00, 0.7100800E+00, 0.5437900E+00, 0.5911800E+00, &
     & 0.5001400E+00, 0.4481700E+00, 0.4608200E+00, 0.5035499E+00, &
     & 0.4804303E+00, 0.3901200E+00, 0.3575383E+00, 0.3575383E+00 /
      data (ref_adm(32,iz,23, 6),iz = 1,20) / &
     & 0.5533735E+00, 0.5533735E+00, 0.5532271E+00, 0.4508700E+00, &
     & 0.5163100E+00, 0.5244800E+00, 0.6142500E+00, 0.5574500E+00, &
     & 0.5285000E+00, 0.5471737E+00, 0.5437505E+00, 0.4470100E+00, &
     & 0.4782500E+00, 0.5271918E+00, 0.4547200E+00, 0.4344000E+00, &
     & 0.4059100E+00, 0.3558800E+00, 0.3563758E+00, 0.3563758E+00 /
      data (ref_adm(32,iz,24, 6),iz = 1,20) / &
     & 0.5531120E+00, 0.5531120E+00, 0.7815500E+00, 0.5533193E+00, &
     & 0.4170000E+00, 0.5592993E+00, 0.5595378E+00, 0.5564385E+00, &
     & 0.6305600E+00, 0.6766500E+00, 0.5765300E+00, 0.5006800E+00, &
     & 0.5479900E+00, 0.4768400E+00, 0.5535500E+00, 0.4782100E+00, &
     & 0.4759400E+00, 0.4348255E+00, 0.3554742E+00, 0.3554742E+00 /
      data (ref_adm(32,iz,25, 6),iz = 1,20) / &
     & 0.5849100E+00, 0.5849100E+00, 0.5908200E+00, 0.7895900E+00, &
     & 0.7921800E+00, 0.5581897E+00, 0.5611014E+00, 0.6889400E+00, &
     & 0.5407600E+00, 0.6039200E+00, 0.5348200E+00, 0.4950700E+00, &
     & 0.5328037E+00, 0.5663000E+00, 0.4671400E+00, 0.4079800E+00, &
     & 0.4505200E+00, 0.4322220E+00, 0.3549047E+00, 0.3549047E+00 /
      data (ref_adm(32,iz,26, 6),iz = 1,20) / &
     & 0.6867800E+00, 0.6867800E+00, 0.6132800E+00, 0.5498567E+00, &
     & 0.7177100E+00, 0.6258700E+00, 0.5941700E+00, 0.5612869E+00, &
     & 0.4748200E+00, 0.5672200E+00, 0.5479494E+00, 0.4763300E+00, &
     & 0.5491600E+00, 0.5341800E+00, 0.5352600E+00, 0.4701400E+00, &
     & 0.4025500E+00, 0.4298509E+00, 0.3543705E+00, 0.3543705E+00 /
      data (ref_adm(32,iz,27, 6),iz = 1,20) / &
     & 0.4827500E+00, 0.4827500E+00, 0.5493989E+00, 0.5486733E+00, &
     & 0.6944800E+00, 0.6790600E+00, 0.6819100E+00, 0.5249700E+00, &
     & 0.5600845E+00, 0.5432000E+00, 0.5888400E+00, 0.5038000E+00, &
     & 0.5266800E+00, 0.5251595E+00, 0.4109300E+00, 0.5735300E+00, &
     & 0.5362000E+00, 0.4279611E+00, 0.3540074E+00, 0.3540074E+00 /
      data (ref_adm(32,iz,28, 6),iz = 1,20) / &
     & 0.5026100E+00, 0.5026100E+00, 0.5258800E+00, 0.6427900E+00, &
     & 0.5948400E+00, 0.5076000E+00, 0.5554082E+00, 0.4899700E+00, &
     & 0.5488200E+00, 0.5757800E+00, 0.5389400E+00, 0.5157600E+00, &
     & 0.4447600E+00, 0.4825200E+00, 0.4275200E+00, 0.4566500E+00, &
     & 0.4031000E+00, 0.4263435E+00, 0.3538283E+00, 0.3538283E+00 /
      data (ref_adm(32,iz,29, 6),iz = 1,20) / &
     & 0.5063900E+00, 0.5063900E+00, 0.5432300E+00, 0.6075600E+00, &
     & 0.6847200E+00, 0.6404300E+00, 0.4292900E+00, 0.4796600E+00, &
     & 0.5451000E+00, 0.4543400E+00, 0.5398400E+00, 0.5084500E+00, &
     & 0.5352054E+00, 0.5328700E+00, 0.5128700E+00, 0.4409100E+00, &
     & 0.4646218E+00, 0.4248674E+00, 0.3538367E+00, 0.3538367E+00 /
      data (ref_adm(32,iz,30, 6),iz = 1,20) / &
     & 0.5185700E+00, 0.5185700E+00, 0.5540900E+00, 0.5534100E+00, &
     & 0.5711100E+00, 0.5781400E+00, 0.5477100E+00, 0.5311200E+00, &
     & 0.5612200E+00, 0.5224400E+00, 0.5202100E+00, 0.5172100E+00, &
     & 0.4863700E+00, 0.5113700E+00, 0.4543800E+00, 0.4907323E+00, &
     & 0.4756300E+00, 0.4237491E+00, 0.3539914E+00, 0.3539914E+00 /
      data (ref_adm(32,iz,31, 6),iz = 1,20) / &
     & 0.5241300E+00, 0.5241300E+00, 0.5638100E+00, 0.4993200E+00, &
     & 0.5407200E+00, 0.5551900E+00, 0.5834400E+00, 0.5715900E+00, &
     & 0.5904500E+00, 0.5767900E+00, 0.5856800E+00, 0.5713000E+00, &
     & 0.5650600E+00, 0.5060700E+00, 0.4832800E+00, 0.4522000E+00, &
     & 0.4635643E+00, 0.4227900E+00, 0.3542121E+00, 0.3542121E+00 /
      data (ref_adm(32,iz,32, 6),iz = 1,20) / &
     & 0.5169200E+00, 0.5169200E+00, 0.5631700E+00, 0.5150100E+00, &
     & 0.5900600E+00, 0.5195100E+00, 0.5676900E+00, 0.5875700E+00, &
     & 0.6025000E+00, 0.5367600E+00, 0.5405700E+00, 0.5834600E+00, &
     & 0.5874400E+00, 0.5284781E+00, 0.5398900E+00, 0.4904725E+00, &
     & 0.4633943E+00, 0.4222100E+00, 0.3545066E+00, 0.3545066E+00 /
      data (ref_adm(32,iz,33, 6),iz = 1,20) / &
     & 0.4700700E+00, 0.4700700E+00, 0.5061200E+00, 0.4939500E+00, &
     & 0.5938200E+00, 0.6410500E+00, 0.5713400E+00, 0.5527500E+00, &
     & 0.5646800E+00, 0.5626300E+00, 0.5603200E+00, 0.5542600E+00, &
     & 0.5365400E+00, 0.4971200E+00, 0.4764300E+00, 0.4906868E+00, &
     & 0.4633663E+00, 0.4219383E+00, 0.3548084E+00, 0.3548084E+00 /
      data (ref_adm(32,iz,34, 6),iz = 1,20) / &
     & 0.5321800E+00, 0.5321800E+00, 0.4516100E+00, 0.5076300E+00, &
     & 0.5554000E+00, 0.5333600E+00, 0.5501744E+00, 0.5555600E+00, &
     & 0.5764000E+00, 0.5996200E+00, 0.5672100E+00, 0.5476600E+00, &
     & 0.5050000E+00, 0.5433400E+00, 0.5607800E+00, 0.4906585E+00, &
     & 0.4632162E+00, 0.4215563E+00, 0.3551128E+00, 0.3551128E+00 /
      data (ref_adm(32,iz,35, 6),iz = 1,20) / &
     & 0.5298700E+00, 0.5298700E+00, 0.5256400E+00, 0.4852200E+00, &
     & 0.5119100E+00, 0.4982800E+00, 0.6138000E+00, 0.5331100E+00, &
     & 0.5514966E+00, 0.5516400E+00, 0.5256300E+00, 0.5888000E+00, &
     & 0.5214200E+00, 0.5598700E+00, 0.4855200E+00, 0.4907396E+00, &
     & 0.4630293E+00, 0.4214962E+00, 0.3553640E+00, 0.3553640E+00 /
      data (ref_adm(32,iz,36, 6),iz = 1,20) / &
     & 0.5671200E+00, 0.5671200E+00, 0.6009200E+00, 0.5100300E+00, &
     & 0.5557200E+00, 0.5644100E+00, 0.5964200E+00, 0.5267900E+00, &
     & 0.5334000E+00, 0.5799400E+00, 0.5606881E+00, 0.5260900E+00, &
     & 0.5045800E+00, 0.5212200E+00, 0.5146412E+00, 0.4909573E+00, &
     & 0.4632697E+00, 0.4215308E+00, 0.3555910E+00, 0.3555910E+00 /
      data (ref_adm(32,iz,37, 6),iz = 1,20) / &
     & 0.5019000E+00, 0.5019000E+00, 0.5504200E+00, 0.5892700E+00, &
     & 0.6373000E+00, 0.6518400E+00, 0.5553000E+00, 0.5504015E+00, &
     & 0.5506967E+00, 0.5556644E+00, 0.6054200E+00, 0.5454900E+00, &
     & 0.5647800E+00, 0.5375000E+00, 0.5382600E+00, 0.4911921E+00, &
     & 0.4632054E+00, 0.4215041E+00, 0.3556778E+00, 0.3556778E+00 /
      data (ref_adm(32,iz,38, 6),iz = 1,20) / &
     & 0.5019000E+00, 0.5019000E+00, 0.5504200E+00, 0.5892700E+00, &
     & 0.6373000E+00, 0.6518400E+00, 0.5553000E+00, 0.5504015E+00, &
     & 0.5506967E+00, 0.5556644E+00, 0.6054200E+00, 0.5454900E+00, &
     & 0.5647800E+00, 0.5375000E+00, 0.5382600E+00, 0.4911921E+00, &
     & 0.4632054E+00, 0.4215041E+00, 0.3556778E+00, 0.3556778E+00 /
! Solar Zenith Angle 30.0 Albedo  0.5549735E+00
      data (ref_adm(32,iz, 1, 7),iz = 1,20) / &
     & 0.6149900E+00, 0.6149900E+00, 0.5996500E+00, 0.5683600E+00, &
     & 0.5534100E+00, 0.6131100E+00, 0.6335300E+00, 0.5030900E+00, &
     & 0.5644200E+00, 0.6815200E+00, 0.6348300E+00, 0.5948800E+00, &
     & 0.6382400E+00, 0.5392700E+00, 0.5689700E+00, 0.6593800E+00, &
     & 0.6022600E+00, 0.5620155E+00, 0.4856483E+00, 0.4856483E+00 /
      data (ref_adm(32,iz, 2, 7),iz = 1,20) / &
     & 0.6149900E+00, 0.6149900E+00, 0.5996500E+00, 0.5683600E+00, &
     & 0.5534100E+00, 0.6131100E+00, 0.6335300E+00, 0.5030900E+00, &
     & 0.5644200E+00, 0.6815200E+00, 0.6348300E+00, 0.5948800E+00, &
     & 0.6382400E+00, 0.5392700E+00, 0.5689700E+00, 0.6593800E+00, &
     & 0.6022600E+00, 0.5620155E+00, 0.4856483E+00, 0.4856483E+00 /
      data (ref_adm(32,iz, 3, 7),iz = 1,20) / &
     & 0.5928700E+00, 0.5928700E+00, 0.5389979E+00, 0.5683900E+00, &
     & 0.4855100E+00, 0.4447700E+00, 0.5500100E+00, 0.5703800E+00, &
     & 0.5873500E+00, 0.5879500E+00, 0.6297900E+00, 0.4934000E+00, &
     & 0.5502500E+00, 0.5930433E+00, 0.5824400E+00, 0.6633300E+00, &
     & 0.6587200E+00, 0.5600551E+00, 0.3807853E+00, 0.3807853E+00 /
      data (ref_adm(32,iz, 4, 7),iz = 1,20) / &
     & 0.5232400E+00, 0.5232400E+00, 0.4740300E+00, 0.4798500E+00, &
     & 0.5397103E+00, 0.6107500E+00, 0.5550400E+00, 0.5455400E+00, &
     & 0.6906300E+00, 0.5626509E+00, 0.5660700E+00, 0.6754800E+00, &
     & 0.5486100E+00, 0.5756300E+00, 0.5475200E+00, 0.5789200E+00, &
     & 0.5894000E+00, 0.5760800E+00, 0.4790214E+00, 0.4790214E+00 /
      data (ref_adm(32,iz, 5, 7),iz = 1,20) / &
     & 0.5861200E+00, 0.5861200E+00, 0.6325200E+00, 0.6076700E+00, &
     & 0.5857900E+00, 0.4272200E+00, 0.6558600E+00, 0.5365900E+00, &
     & 0.6022200E+00, 0.5098300E+00, 0.5620900E+00, 0.5480500E+00, &
     & 0.4404700E+00, 0.5442100E+00, 0.5448100E+00, 0.5419400E+00, &
     & 0.5856400E+00, 0.5518013E+00, 0.4729945E+00, 0.4729945E+00 /
      data (ref_adm(32,iz, 6, 7),iz = 1,20) / &
     & 0.5275500E+00, 0.5275500E+00, 0.5924400E+00, 0.5386158E+00, &
     & 0.4550500E+00, 0.4903500E+00, 0.5428000E+00, 0.5421800E+00, &
     & 0.4623300E+00, 0.4981400E+00, 0.6505800E+00, 0.4873700E+00, &
     & 0.5901600E+00, 0.4893700E+00, 0.5521400E+00, 0.5684000E+00, &
     & 0.5480600E+00, 0.5462704E+00, 0.4658214E+00, 0.4658214E+00 /
      data (ref_adm(32,iz, 7, 7),iz = 1,20) / &
     & 0.5396800E+00, 0.5396800E+00, 0.5232700E+00, 0.4920800E+00, &
     & 0.5207700E+00, 0.5214200E+00, 0.5966800E+00, 0.5489166E+00, &
     & 0.5538735E+00, 0.5591003E+00, 0.5185500E+00, 0.5487000E+00, &
     & 0.5716400E+00, 0.5595400E+00, 0.5338400E+00, 0.5383700E+00, &
     & 0.5695443E+00, 0.5050600E+00, 0.4584501E+00, 0.4584501E+00 /
      data (ref_adm(32,iz, 8, 7),iz = 1,20) / &
     & 0.5494100E+00, 0.5494100E+00, 0.5371500E+00, 0.5136200E+00, &
     & 0.5125200E+00, 0.6168100E+00, 0.5650500E+00, 0.4533600E+00, &
     & 0.5583200E+00, 0.7309700E+00, 0.4723200E+00, 0.5066600E+00, &
     & 0.5356800E+00, 0.6134000E+00, 0.5878000E+00, 0.6039600E+00, &
     & 0.5652062E+00, 0.5724400E+00, 0.4512518E+00, 0.4512518E+00 /
      data (ref_adm(32,iz, 9, 7),iz = 1,20) / &
     & 0.6031800E+00, 0.6031800E+00, 0.6143700E+00, 0.5914100E+00, &
     & 0.5495900E+00, 0.5890000E+00, 0.5405300E+00, 0.5503400E+00, &
     & 0.5682400E+00, 0.5963500E+00, 0.5625600E+00, 0.5515500E+00, &
     & 0.5356100E+00, 0.4796000E+00, 0.5093300E+00, 0.4860300E+00, &
     & 0.4809500E+00, 0.4649700E+00, 0.4443118E+00, 0.4443118E+00 /
      data (ref_adm(32,iz,10, 7),iz = 1,20) / &
     & 0.5832800E+00, 0.5832800E+00, 0.5782100E+00, 0.5947700E+00, &
     & 0.5517100E+00, 0.5289300E+00, 0.5385900E+00, 0.4865100E+00, &
     & 0.5047200E+00, 0.5844100E+00, 0.5963700E+00, 0.5908700E+00, &
     & 0.6060200E+00, 0.5952100E+00, 0.5260500E+00, 0.4953900E+00, &
     & 0.5025400E+00, 0.5232821E+00, 0.4378834E+00, 0.4378834E+00 /
      data (ref_adm(32,iz,11, 7),iz = 1,20) / &
     & 0.6237900E+00, 0.6237900E+00, 0.5624900E+00, 0.5801800E+00, &
     & 0.5496100E+00, 0.6309800E+00, 0.6036300E+00, 0.5642200E+00, &
     & 0.5435400E+00, 0.6062000E+00, 0.5448800E+00, 0.6057400E+00, &
     & 0.5731400E+00, 0.5620500E+00, 0.5478500E+00, 0.5511200E+00, &
     & 0.5501601E+00, 0.5180000E+00, 0.4318081E+00, 0.4318081E+00 /
      data (ref_adm(32,iz,12, 7),iz = 1,20) / &
     & 0.6202900E+00, 0.6202900E+00, 0.6023500E+00, 0.5727300E+00, &
     & 0.5642700E+00, 0.5378200E+00, 0.5365200E+00, 0.5526100E+00, &
     & 0.5643500E+00, 0.5681900E+00, 0.4906400E+00, 0.4998600E+00, &
     & 0.5342200E+00, 0.5492200E+00, 0.5096600E+00, 0.5905800E+00, &
     & 0.5431278E+00, 0.5125431E+00, 0.4261972E+00, 0.4261972E+00 /
      data (ref_adm(32,iz,13, 7),iz = 1,20) / &
     & 0.5681300E+00, 0.5681300E+00, 0.6165600E+00, 0.5522400E+00, &
     & 0.5489200E+00, 0.5343900E+00, 0.5262300E+00, 0.5683800E+00, &
     & 0.5298100E+00, 0.5481400E+00, 0.5510500E+00, 0.5898700E+00, &
     & 0.5394900E+00, 0.5705000E+00, 0.4969600E+00, 0.5493312E+00, &
     & 0.4832100E+00, 0.5060010E+00, 0.4206780E+00, 0.4206780E+00 /
      data (ref_adm(32,iz,14, 7),iz = 1,20) / &
     & 0.5731600E+00, 0.5731600E+00, 0.5730000E+00, 0.5929500E+00, &
     & 0.4104000E+00, 0.5149800E+00, 0.5306700E+00, 0.5457100E+00, &
     & 0.4961500E+00, 0.5202600E+00, 0.5217800E+00, 0.5368400E+00, &
     & 0.5877300E+00, 0.5987100E+00, 0.5508000E+00, 0.5077400E+00, &
     & 0.5290040E+00, 0.4984161E+00, 0.4147619E+00, 0.4147619E+00 /
      data (ref_adm(32,iz,15, 7),iz = 1,20) / &
     & 0.5578400E+00, 0.5578400E+00, 0.5214300E+00, 0.6794100E+00, &
     & 0.5174700E+00, 0.5050800E+00, 0.4583700E+00, 0.5650100E+00, &
     & 0.5450600E+00, 0.4910300E+00, 0.4865000E+00, 0.5233600E+00, &
     & 0.5110200E+00, 0.5368000E+00, 0.5450624E+00, 0.5542800E+00, &
     & 0.5218264E+00, 0.4909727E+00, 0.4081885E+00, 0.4081885E+00 /
      data (ref_adm(32,iz,16, 7),iz = 1,20) / &
     & 0.5147100E+00, 0.5147100E+00, 0.5282800E+00, 0.5664500E+00, &
     & 0.5651800E+00, 0.5082700E+00, 0.4784500E+00, 0.5131100E+00, &
     & 0.5307900E+00, 0.6260100E+00, 0.5936400E+00, 0.5214700E+00, &
     & 0.5693300E+00, 0.5050300E+00, 0.5025000E+00, 0.5302498E+00, &
     & 0.5146561E+00, 0.4838129E+00, 0.4020431E+00, 0.4020431E+00 /
      data (ref_adm(32,iz,17, 7),iz = 1,20) / &
     & 0.4503100E+00, 0.4503100E+00, 0.4997100E+00, 0.5561100E+00, &
     & 0.5581400E+00, 0.5844800E+00, 0.5443400E+00, 0.5226500E+00, &
     & 0.5578200E+00, 0.6303000E+00, 0.4962900E+00, 0.5086200E+00, &
     & 0.4876500E+00, 0.4873100E+00, 0.5705400E+00, 0.5191700E+00, &
     & 0.5085116E+00, 0.4766488E+00, 0.3965922E+00, 0.3965922E+00 /
      data (ref_adm(32,iz,18, 7),iz = 1,20) / &
     & 0.5206400E+00, 0.5206400E+00, 0.5358700E+00, 0.5583100E+00, &
     & 0.6151900E+00, 0.6700100E+00, 0.6913200E+00, 0.5230300E+00, &
     & 0.5677600E+00, 0.6452900E+00, 0.5602900E+00, 0.5606100E+00, &
     & 0.5406964E+00, 0.5342668E+00, 0.5104700E+00, 0.5036008E+00, &
     & 0.4425300E+00, 0.4340019E+00, 0.3541752E+00, 0.3541752E+00 /
      data (ref_adm(32,iz,19, 7),iz = 1,20) / &
     & 0.6736900E+00, 0.6736900E+00, 0.5872200E+00, 0.6177300E+00, &
     & 0.6667400E+00, 0.6274500E+00, 0.6131900E+00, 0.6109300E+00, &
     & 0.5350800E+00, 0.5682000E+00, 0.5744100E+00, 0.5648400E+00, &
     & 0.5387578E+00, 0.5318384E+00, 0.4967800E+00, 0.5308500E+00, &
     & 0.4736952E+00, 0.4305308E+00, 0.3521802E+00, 0.3521802E+00 /
      data (ref_adm(32,iz,20, 7),iz = 1,20) / &
     & 0.6301900E+00, 0.6301900E+00, 0.6250200E+00, 0.6624500E+00, &
     & 0.6486900E+00, 0.5585200E+00, 0.5721000E+00, 0.5086200E+00, &
     & 0.5546700E+00, 0.5964000E+00, 0.5918900E+00, 0.5460743E+00, &
     & 0.5376342E+00, 0.5297714E+00, 0.4614400E+00, 0.4813300E+00, &
     & 0.4703651E+00, 0.4274456E+00, 0.3509538E+00, 0.3509538E+00 /
      data (ref_adm(32,iz,21, 7),iz = 1,20) / &
     & 0.6147000E+00, 0.6147000E+00, 0.6034800E+00, 0.6202000E+00, &
     & 0.5760200E+00, 0.5835481E+00, 0.5896200E+00, 0.5295900E+00, &
     & 0.5776600E+00, 0.6128900E+00, 0.5897100E+00, 0.5532500E+00, &
     & 0.4872900E+00, 0.4895200E+00, 0.5150349E+00, 0.4939336E+00, &
     & 0.4674054E+00, 0.4248012E+00, 0.3502253E+00, 0.3502253E+00 /
      data (ref_adm(32,iz,22, 7),iz = 1,20) / &
     & 0.6306900E+00, 0.6306900E+00, 0.5649100E+00, 0.5327700E+00, &
     & 0.5720800E+00, 0.5460000E+00, 0.5807781E+00, 0.5878900E+00, &
     & 0.6081400E+00, 0.5967300E+00, 0.5016100E+00, 0.6534200E+00, &
     & 0.5959200E+00, 0.5150000E+00, 0.5247268E+00, 0.5081551E+00, &
     & 0.4853596E+00, 0.4461745E+00, 0.3629659E+00, 0.3629659E+00 /
      data (ref_adm(32,iz,23, 7),iz = 1,20) / &
     & 0.5870800E+00, 0.5870800E+00, 0.5187000E+00, 0.6186000E+00, &
     & 0.4691500E+00, 0.5869409E+00, 0.5277000E+00, 0.6361100E+00, &
     & 0.6084000E+00, 0.5823700E+00, 0.5502700E+00, 0.5817900E+00, &
     & 0.5409500E+00, 0.5468700E+00, 0.5413200E+00, 0.6345400E+00, &
     & 0.4825028E+00, 0.4431611E+00, 0.3619530E+00, 0.3619530E+00 /
      data (ref_adm(32,iz,24, 7),iz = 1,20) / &
     & 0.6097000E+00, 0.6097000E+00, 0.5442900E+00, 0.5479500E+00, &
     & 0.6400600E+00, 0.5329700E+00, 0.5661500E+00, 0.6646700E+00, &
     & 0.6609400E+00, 0.5626300E+00, 0.5616781E+00, 0.5415000E+00, &
     & 0.5042300E+00, 0.5246100E+00, 0.5214494E+00, 0.5196200E+00, &
     & 0.5443500E+00, 0.4400348E+00, 0.3613266E+00, 0.3613266E+00 /
      data (ref_adm(32,iz,25, 7),iz = 1,20) / &
     & 0.5997000E+00, 0.5997000E+00, 0.6354800E+00, 0.6235800E+00, &
     & 0.6046600E+00, 0.5443800E+00, 0.6102700E+00, 0.6163700E+00, &
     & 0.5844600E+00, 0.5973500E+00, 0.6217300E+00, 0.5761000E+00, &
     & 0.5629700E+00, 0.5010100E+00, 0.4934900E+00, 0.4338400E+00, &
     & 0.4767407E+00, 0.4376777E+00, 0.3609623E+00, 0.3609623E+00 /
      data (ref_adm(32,iz,26, 7),iz = 1,20) / &
     & 0.5621900E+00, 0.5621900E+00, 0.6198000E+00, 0.6338100E+00, &
     & 0.6730500E+00, 0.5821000E+00, 0.5759700E+00, 0.5697900E+00, &
     & 0.6022200E+00, 0.5668700E+00, 0.5529800E+00, 0.5272100E+00, &
     & 0.5735800E+00, 0.5136200E+00, 0.5477400E+00, 0.4628900E+00, &
     & 0.4370400E+00, 0.4051700E+00, 0.3608185E+00, 0.3608185E+00 /
      data (ref_adm(32,iz,27, 7),iz = 1,20) / &
     & 0.5985400E+00, 0.5985400E+00, 0.6503700E+00, 0.5633500E+00, &
     & 0.6069600E+00, 0.6630200E+00, 0.6692300E+00, 0.5480700E+00, &
     & 0.5611400E+00, 0.5326200E+00, 0.5485400E+00, 0.5188900E+00, &
     & 0.5170900E+00, 0.5327900E+00, 0.5138400E+00, 0.4597700E+00, &
     & 0.4587900E+00, 0.4286700E+00, 0.3610041E+00, 0.3610041E+00 /
      data (ref_adm(32,iz,28, 7),iz = 1,20) / &
     & 0.6046500E+00, 0.6046500E+00, 0.5866700E+00, 0.6113700E+00, &
     & 0.6090800E+00, 0.5743000E+00, 0.6127300E+00, 0.6382200E+00, &
     & 0.6041800E+00, 0.6389300E+00, 0.5716980E+00, 0.5179300E+00, &
     & 0.4864000E+00, 0.5153800E+00, 0.5068700E+00, 0.4988300E+00, &
     & 0.4853900E+00, 0.4338700E+00, 0.3369800E+00, 0.3369800E+00 /
      data (ref_adm(32,iz,29, 7),iz = 1,20) / &
     & 0.5919900E+00, 0.5919900E+00, 0.6104900E+00, 0.5943900E+00, &
     & 0.6367300E+00, 0.6013100E+00, 0.5745600E+00, 0.5900500E+00, &
     & 0.5804500E+00, 0.5641100E+00, 0.5714200E+00, 0.5883000E+00, &
     & 0.5823700E+00, 0.5196300E+00, 0.4948400E+00, 0.4594600E+00, &
     & 0.4719384E+00, 0.3658000E+00, 0.3620529E+00, 0.3620529E+00 /
      data (ref_adm(32,iz,30, 7),iz = 1,20) / &
     & 0.6198600E+00, 0.6198600E+00, 0.5749200E+00, 0.6128000E+00, &
     & 0.6092000E+00, 0.6236100E+00, 0.5872400E+00, 0.5969400E+00, &
     & 0.6118400E+00, 0.5848800E+00, 0.5607500E+00, 0.5744200E+00, &
     & 0.5274200E+00, 0.5510500E+00, 0.5307100E+00, 0.4899600E+00, &
     & 0.4492100E+00, 0.4907000E+00, 0.3628474E+00, 0.3628474E+00 /
      data (ref_adm(32,iz,31, 7),iz = 1,20) / &
     & 0.5720600E+00, 0.5720600E+00, 0.5180400E+00, 0.6174500E+00, &
     & 0.5809100E+00, 0.5125300E+00, 0.5665700E+00, 0.5550100E+00, &
     & 0.5721400E+00, 0.5727400E+00, 0.5492500E+00, 0.5471200E+00, &
     & 0.5217700E+00, 0.5224200E+00, 0.5366600E+00, 0.4900600E+00, &
     & 0.4703800E+00, 0.4310163E+00, 0.3636736E+00, 0.3636736E+00 /
      data (ref_adm(32,iz,32, 7),iz = 1,20) / &
     & 0.5858300E+00, 0.5858300E+00, 0.5878611E+00, 0.6483300E+00, &
     & 0.6456100E+00, 0.5776500E+00, 0.6096200E+00, 0.5358700E+00, &
     & 0.5603200E+00, 0.5233800E+00, 0.5627200E+00, 0.5516300E+00, &
     & 0.5425900E+00, 0.4922600E+00, 0.5247400E+00, 0.5561500E+00, &
     & 0.4350000E+00, 0.4312454E+00, 0.3646618E+00, 0.3646618E+00 /
      data (ref_adm(32,iz,33, 7),iz = 1,20) / &
     & 0.5938600E+00, 0.5938600E+00, 0.4768600E+00, 0.5615300E+00, &
     & 0.5237000E+00, 0.5937000E+00, 0.6182100E+00, 0.5403900E+00, &
     & 0.5701100E+00, 0.4962100E+00, 0.5519100E+00, 0.5243100E+00, &
     & 0.5254400E+00, 0.5718200E+00, 0.5893000E+00, 0.5761000E+00, &
     & 0.4735555E+00, 0.4316918E+00, 0.3656450E+00, 0.3656450E+00 /
      data (ref_adm(32,iz,34, 7),iz = 1,20) / &
     & 0.5243000E+00, 0.5243000E+00, 0.5232200E+00, 0.4746000E+00, &
     & 0.5228400E+00, 0.6012500E+00, 0.6630600E+00, 0.6736500E+00, &
     & 0.5683700E+00, 0.5685100E+00, 0.5783213E+00, 0.5174600E+00, &
     & 0.5196900E+00, 0.5871000E+00, 0.5997400E+00, 0.5022126E+00, &
     & 0.4739135E+00, 0.4320416E+00, 0.3664781E+00, 0.3664781E+00 /
      data (ref_adm(32,iz,35, 7),iz = 1,20) / &
     & 0.5673800E+00, 0.5673800E+00, 0.6377700E+00, 0.4767500E+00, &
     & 0.5390400E+00, 0.5995000E+00, 0.5552100E+00, 0.4829200E+00, &
     & 0.5410400E+00, 0.5416600E+00, 0.5990600E+00, 0.5389600E+00, &
     & 0.5626628E+00, 0.5050100E+00, 0.5691400E+00, 0.5028930E+00, &
     & 0.4742677E+00, 0.4324606E+00, 0.3672026E+00, 0.3672026E+00 /
      data (ref_adm(32,iz,36, 7),iz = 1,20) / &
     & 0.5666300E+00, 0.5666300E+00, 0.7146000E+00, 0.5996400E+00, &
     & 0.6308300E+00, 0.5706500E+00, 0.6025000E+00, 0.5564600E+00, &
     & 0.6320500E+00, 0.7400100E+00, 0.5943400E+00, 0.5395400E+00, &
     & 0.5465600E+00, 0.4835500E+00, 0.5549400E+00, 0.5035065E+00, &
     & 0.4747123E+00, 0.4326617E+00, 0.3677444E+00, 0.3677444E+00 /
      data (ref_adm(32,iz,37, 7),iz = 1,20) / &
     & 0.6091900E+00, 0.6091900E+00, 0.6177400E+00, 0.5567700E+00, &
     & 0.5509700E+00, 0.6582600E+00, 0.6855200E+00, 0.6493000E+00, &
     & 0.6300000E+00, 0.6030300E+00, 0.6328500E+00, 0.5511200E+00, &
     & 0.5629200E+00, 0.5502188E+00, 0.5303770E+00, 0.5038146E+00, &
     & 0.4749537E+00, 0.4327621E+00, 0.3680485E+00, 0.3680485E+00 /
      data (ref_adm(32,iz,38, 7),iz = 1,20) / &
     & 0.6091900E+00, 0.6091900E+00, 0.6177400E+00, 0.5567700E+00, &
     & 0.5509700E+00, 0.6582600E+00, 0.6855200E+00, 0.6493000E+00, &
     & 0.6300000E+00, 0.6030300E+00, 0.6328500E+00, 0.5511200E+00, &
     & 0.5629200E+00, 0.5502188E+00, 0.5303770E+00, 0.5038146E+00, &
     & 0.4749537E+00, 0.4327621E+00, 0.3680485E+00, 0.3680485E+00 /
! Solar Zenith Angle 35.0 Albedo  0.5685085E+00
      data (ref_adm(32,iz, 1, 8),iz = 1,20) / &
     & 0.5250000E+00, 0.5250000E+00, 0.5625000E+00, 0.5138800E+00, &
     & 0.5510000E+00, 0.6275500E+00, 0.5854900E+00, 0.5911400E+00, &
     & 0.5924700E+00, 0.5907500E+00, 0.5919800E+00, 0.6582000E+00, &
     & 0.6194200E+00, 0.6284600E+00, 0.5942100E+00, 0.6180800E+00, &
     & 0.5809100E+00, 0.5631200E+00, 0.4371935E+00, 0.4371935E+00 /
      data (ref_adm(32,iz, 2, 8),iz = 1,20) / &
     & 0.5250000E+00, 0.5250000E+00, 0.5625000E+00, 0.5138800E+00, &
     & 0.5510000E+00, 0.6275500E+00, 0.5854900E+00, 0.5911400E+00, &
     & 0.5924700E+00, 0.5907500E+00, 0.5919800E+00, 0.6582000E+00, &
     & 0.6194200E+00, 0.6284600E+00, 0.5942100E+00, 0.6180800E+00, &
     & 0.5809100E+00, 0.5631200E+00, 0.4371935E+00, 0.4371935E+00 /
      data (ref_adm(32,iz, 3, 8),iz = 1,20) / &
     & 0.5817500E+00, 0.5817500E+00, 0.5649600E+00, 0.5706200E+00, &
     & 0.5253900E+00, 0.6226500E+00, 0.6178900E+00, 0.6143100E+00, &
     & 0.6557900E+00, 0.5746500E+00, 0.6290100E+00, 0.6517100E+00, &
     & 0.6155300E+00, 0.6393600E+00, 0.5898700E+00, 0.5651800E+00, &
     & 0.5791000E+00, 0.5386900E+00, 0.3582414E+00, 0.3582414E+00 /
      data (ref_adm(32,iz, 4, 8),iz = 1,20) / &
     & 0.6003400E+00, 0.6003400E+00, 0.5573100E+00, 0.5953000E+00, &
     & 0.6007600E+00, 0.5514000E+00, 0.6314100E+00, 0.5818400E+00, &
     & 0.5951700E+00, 0.6491000E+00, 0.6179100E+00, 0.5822900E+00, &
     & 0.6077700E+00, 0.5703900E+00, 0.5951400E+00, 0.6126500E+00, &
     & 0.6045200E+00, 0.5354096E+00, 0.4346449E+00, 0.4346449E+00 /
      data (ref_adm(32,iz, 5, 8),iz = 1,20) / &
     & 0.5519600E+00, 0.5519600E+00, 0.5987900E+00, 0.6356700E+00, &
     & 0.5611800E+00, 0.5640400E+00, 0.6012000E+00, 0.5980000E+00, &
     & 0.5305900E+00, 0.5728800E+00, 0.6883500E+00, 0.6773100E+00, &
     & 0.5890700E+00, 0.5899300E+00, 0.6294700E+00, 0.6328300E+00, &
     & 0.6324200E+00, 0.5324519E+00, 0.4323632E+00, 0.4323632E+00 /
      data (ref_adm(32,iz, 6, 8),iz = 1,20) / &
     & 0.5871100E+00, 0.5871100E+00, 0.5176600E+00, 0.5522900E+00, &
     & 0.5984300E+00, 0.5573300E+00, 0.5605500E+00, 0.6126700E+00, &
     & 0.6087700E+00, 0.6541000E+00, 0.6019514E+00, 0.5300900E+00, &
     & 0.5741500E+00, 0.5787400E+00, 0.5828900E+00, 0.5940700E+00, &
     & 0.6042900E+00, 0.5690200E+00, 0.4291503E+00, 0.4291503E+00 /
      data (ref_adm(32,iz, 7, 8),iz = 1,20) / &
     & 0.5187500E+00, 0.5187500E+00, 0.5059500E+00, 0.5273400E+00, &
     & 0.6438000E+00, 0.5915000E+00, 0.5931100E+00, 0.6119300E+00, &
     & 0.6220500E+00, 0.6768500E+00, 0.5523300E+00, 0.5440400E+00, &
     & 0.5793400E+00, 0.5907300E+00, 0.6030000E+00, 0.5387400E+00, &
     & 0.5908700E+00, 0.5937400E+00, 0.4256881E+00, 0.4256881E+00 /
      data (ref_adm(32,iz, 8, 8),iz = 1,20) / &
     & 0.6052200E+00, 0.6052200E+00, 0.5888500E+00, 0.6073400E+00, &
     & 0.5331900E+00, 0.5831700E+00, 0.5962000E+00, 0.5904600E+00, &
     & 0.6060500E+00, 0.6179700E+00, 0.5882700E+00, 0.6021400E+00, &
     & 0.6210600E+00, 0.6397100E+00, 0.6393300E+00, 0.6563500E+00, &
     & 0.6510200E+00, 0.5192215E+00, 0.4217849E+00, 0.4217849E+00 /
      data (ref_adm(32,iz, 9, 8),iz = 1,20) / &
     & 0.5544700E+00, 0.5544700E+00, 0.5515100E+00, 0.5268200E+00, &
     & 0.5379700E+00, 0.5762700E+00, 0.5686800E+00, 0.5990800E+00, &
     & 0.6082800E+00, 0.6370100E+00, 0.6366900E+00, 0.6438200E+00, &
     & 0.6304800E+00, 0.6121900E+00, 0.5830800E+00, 0.6206200E+00, &
     & 0.6100300E+00, 0.5140937E+00, 0.4177569E+00, 0.4177569E+00 /
      data (ref_adm(32,iz,10, 8),iz = 1,20) / &
     & 0.5477700E+00, 0.5477700E+00, 0.5127900E+00, 0.5270400E+00, &
     & 0.5381600E+00, 0.5281600E+00, 0.5620100E+00, 0.6020200E+00, &
     & 0.6066600E+00, 0.6010400E+00, 0.5885800E+00, 0.5700900E+00, &
     & 0.5878400E+00, 0.5803800E+00, 0.5730600E+00, 0.5860900E+00, &
     & 0.5628400E+00, 0.5101800E+00, 0.4565300E+00, 0.4565300E+00 /
      data (ref_adm(32,iz,11, 8),iz = 1,20) / &
     & 0.5800400E+00, 0.5800400E+00, 0.5956700E+00, 0.5598000E+00, &
     & 0.5561400E+00, 0.5675300E+00, 0.6022600E+00, 0.5845500E+00, &
     & 0.5475800E+00, 0.5724300E+00, 0.5869333E+00, 0.5902300E+00, &
     & 0.6160600E+00, 0.5041600E+00, 0.5608900E+00, 0.6630300E+00, &
     & 0.6015100E+00, 0.5020492E+00, 0.4430900E+00, 0.4430900E+00 /
      data (ref_adm(32,iz,12, 8),iz = 1,20) / &
     & 0.6028600E+00, 0.6028600E+00, 0.5781800E+00, 0.5873600E+00, &
     & 0.5637600E+00, 0.5653400E+00, 0.5742500E+00, 0.5953700E+00, &
     & 0.5694700E+00, 0.5589600E+00, 0.5023100E+00, 0.5859400E+00, &
     & 0.6094100E+00, 0.5347000E+00, 0.5260800E+00, 0.6869500E+00, &
     & 0.6177000E+00, 0.5312900E+00, 0.4051642E+00, 0.4051642E+00 /
      data (ref_adm(32,iz,13, 8),iz = 1,20) / &
     & 0.5708100E+00, 0.5708100E+00, 0.5586800E+00, 0.5392400E+00, &
     & 0.5553700E+00, 0.5344200E+00, 0.5438000E+00, 0.5914400E+00, &
     & 0.6013000E+00, 0.6007900E+00, 0.5838400E+00, 0.5915800E+00, &
     & 0.5771800E+00, 0.5968000E+00, 0.5141200E+00, 0.5277300E+00, &
     & 0.5265278E+00, 0.4871223E+00, 0.4002878E+00, 0.4002878E+00 /
      data (ref_adm(32,iz,14, 8),iz = 1,20) / &
     & 0.5630400E+00, 0.5630400E+00, 0.5717400E+00, 0.5548900E+00, &
     & 0.5782000E+00, 0.5472700E+00, 0.5521800E+00, 0.5316600E+00, &
     & 0.5396600E+00, 0.5503500E+00, 0.5888400E+00, 0.6311300E+00, &
     & 0.6260900E+00, 0.6065000E+00, 0.5581691E+00, 0.6373000E+00, &
     & 0.5182191E+00, 0.4796430E+00, 0.3948787E+00, 0.3948787E+00 /
      data (ref_adm(32,iz,15, 8),iz = 1,20) / &
     & 0.5773400E+00, 0.5773400E+00, 0.5875100E+00, 0.5542200E+00, &
     & 0.5805800E+00, 0.4737200E+00, 0.5887000E+00, 0.5513200E+00, &
     & 0.5063000E+00, 0.5251000E+00, 0.5418700E+00, 0.5383700E+00, &
     & 0.5441300E+00, 0.5731600E+00, 0.5340800E+00, 0.5661000E+00, &
     & 0.4855400E+00, 0.4449000E+00, 0.3895312E+00, 0.3895312E+00 /
      data (ref_adm(32,iz,16, 8),iz = 1,20) / &
     & 0.5626200E+00, 0.5626200E+00, 0.6068600E+00, 0.5481900E+00, &
     & 0.5621300E+00, 0.5778000E+00, 0.5516200E+00, 0.5542500E+00, &
     & 0.5462800E+00, 0.5892800E+00, 0.5505000E+00, 0.5359000E+00, &
     & 0.5849100E+00, 0.5460000E+00, 0.5604900E+00, 0.5563100E+00, &
     & 0.5242200E+00, 0.3585600E+00, 0.3367300E+00, 0.3367300E+00 /
      data (ref_adm(32,iz,17, 8),iz = 1,20) / &
     & 0.5456600E+00, 0.5456600E+00, 0.5846800E+00, 0.5931100E+00, &
     & 0.5740100E+00, 0.6055800E+00, 0.6180900E+00, 0.5592000E+00, &
     & 0.5778300E+00, 0.5135100E+00, 0.5516500E+00, 0.4893200E+00, &
     & 0.5013200E+00, 0.5433100E+00, 0.5773500E+00, 0.4793100E+00, &
     & 0.4576500E+00, 0.4176300E+00, 0.3804093E+00, 0.3804093E+00 /
      data (ref_adm(32,iz,18, 8),iz = 1,20) / &
     & 0.4754300E+00, 0.4754300E+00, 0.5651900E+00, 0.6042400E+00, &
     & 0.6029500E+00, 0.5835100E+00, 0.5661200E+00, 0.5580000E+00, &
     & 0.5438400E+00, 0.5650000E+00, 0.5579000E+00, 0.5464056E+00, &
     & 0.4670900E+00, 0.5173800E+00, 0.5426600E+00, 0.4699300E+00, &
     & 0.4427400E+00, 0.4467215E+00, 0.3627728E+00, 0.3627728E+00 /
      data (ref_adm(32,iz,19, 8),iz = 1,20) / &
     & 0.6048800E+00, 0.6048800E+00, 0.5488300E+00, 0.5670300E+00, &
     & 0.5416700E+00, 0.5771900E+00, 0.5786600E+00, 0.5715100E+00, &
     & 0.5267300E+00, 0.5421100E+00, 0.5051400E+00, 0.5568600E+00, &
     & 0.5218900E+00, 0.5966600E+00, 0.5588700E+00, 0.5091470E+00, &
     & 0.4849099E+00, 0.4426154E+00, 0.3604284E+00, 0.3604284E+00 /
      data (ref_adm(32,iz,20, 8),iz = 1,20) / &
     & 0.5963700E+00, 0.5963700E+00, 0.5907200E+00, 0.5768300E+00, &
     & 0.5591800E+00, 0.5348000E+00, 0.5091200E+00, 0.5545900E+00, &
     & 0.5643500E+00, 0.5376000E+00, 0.5264800E+00, 0.5416500E+00, &
     & 0.4841500E+00, 0.5643800E+00, 0.5628800E+00, 0.6033200E+00, &
     & 0.4807896E+00, 0.3347300E+00, 0.3589629E+00, 0.3589629E+00 /
      data (ref_adm(32,iz,21, 8),iz = 1,20) / &
     & 0.5606500E+00, 0.5606500E+00, 0.5857600E+00, 0.5478500E+00, &
     & 0.5460300E+00, 0.6094900E+00, 0.5090800E+00, 0.5264500E+00, &
     & 0.5316700E+00, 0.5377400E+00, 0.5221700E+00, 0.5343000E+00, &
     & 0.5025900E+00, 0.5910600E+00, 0.6079400E+00, 0.5017356E+00, &
     & 0.3814600E+00, 0.4357243E+00, 0.3580486E+00, 0.3580486E+00 /
      data (ref_adm(32,iz,22, 8),iz = 1,20) / &
     & 0.6129400E+00, 0.6129400E+00, 0.5647800E+00, 0.5321200E+00, &
     & 0.5482300E+00, 0.5298200E+00, 0.5559200E+00, 0.5559200E+00, &
     & 0.5221300E+00, 0.5272000E+00, 0.5070900E+00, 0.5329600E+00, &
     & 0.5166700E+00, 0.5506000E+00, 0.5664800E+00, 0.5246400E+00, &
     & 0.4882074E+00, 0.4438785E+00, 0.3545218E+00, 0.3545218E+00 /
      data (ref_adm(32,iz,23, 8),iz = 1,20) / &
     & 0.5945000E+00, 0.5945000E+00, 0.5460000E+00, 0.6076300E+00, &
     & 0.6012900E+00, 0.5614300E+00, 0.4900500E+00, 0.5996100E+00, &
     & 0.5358000E+00, 0.5043600E+00, 0.5575300E+00, 0.5652612E+00, &
     & 0.5597100E+00, 0.5160800E+00, 0.5184700E+00, 0.5231900E+00, &
     & 0.4857755E+00, 0.4416986E+00, 0.3536744E+00, 0.3536744E+00 /
      data (ref_adm(32,iz,24, 8),iz = 1,20) / &
     & 0.5758400E+00, 0.5758400E+00, 0.6441500E+00, 0.6343700E+00, &
     & 0.5731700E+00, 0.5677400E+00, 0.5687200E+00, 0.5703200E+00, &
     & 0.5718600E+00, 0.6041900E+00, 0.5731700E+00, 0.5722600E+00, &
     & 0.5637100E+00, 0.5350700E+00, 0.5500200E+00, 0.5177400E+00, &
     & 0.4837145E+00, 0.4396511E+00, 0.3529164E+00, 0.3529164E+00 /
      data (ref_adm(32,iz,25, 8),iz = 1,20) / &
     & 0.5909500E+00, 0.5909500E+00, 0.6089600E+00, 0.5992800E+00, &
     & 0.5472200E+00, 0.5322400E+00, 0.5642500E+00, 0.6023300E+00, &
     & 0.5684900E+00, 0.5591400E+00, 0.5521100E+00, 0.5519800E+00, &
     & 0.5304100E+00, 0.6205000E+00, 0.5388200E+00, 0.5327500E+00, &
     & 0.3792300E+00, 0.4376721E+00, 0.3524650E+00, 0.3524650E+00 /
      data (ref_adm(32,iz,26, 8),iz = 1,20) / &
     & 0.5798400E+00, 0.5798400E+00, 0.5777700E+00, 0.6002900E+00, &
     & 0.5544800E+00, 0.5469300E+00, 0.5600400E+00, 0.5829000E+00, &
     & 0.5394800E+00, 0.5783000E+00, 0.5766200E+00, 0.5775600E+00, &
     & 0.5301500E+00, 0.6042300E+00, 0.5537700E+00, 0.4977700E+00, &
     & 0.4893200E+00, 0.4840100E+00, 0.3519840E+00, 0.3519840E+00 /
      data (ref_adm(32,iz,27, 8),iz = 1,20) / &
     & 0.5771500E+00, 0.5771500E+00, 0.5841100E+00, 0.5813500E+00, &
     & 0.5678500E+00, 0.5732700E+00, 0.5718000E+00, 0.5740200E+00, &
     & 0.5678000E+00, 0.5701800E+00, 0.6059500E+00, 0.5847300E+00, &
     & 0.4930600E+00, 0.5531800E+00, 0.5312300E+00, 0.5342700E+00, &
     & 0.4857500E+00, 0.4514100E+00, 0.3735100E+00, 0.3735100E+00 /
      data (ref_adm(32,iz,28, 8),iz = 1,20) / &
     & 0.5828200E+00, 0.5828200E+00, 0.5897400E+00, 0.6055200E+00, &
     & 0.6223100E+00, 0.5782600E+00, 0.5440700E+00, 0.5694800E+00, &
     & 0.5737500E+00, 0.5591100E+00, 0.5674300E+00, 0.5441300E+00, &
     & 0.5877800E+00, 0.5587700E+00, 0.5158600E+00, 0.5250900E+00, &
     & 0.5352600E+00, 0.4330483E+00, 0.3514082E+00, 0.3514082E+00 /
      data (ref_adm(32,iz,29, 8),iz = 1,20) / &
     & 0.5742600E+00, 0.5742600E+00, 0.5806700E+00, 0.5801400E+00, &
     & 0.5993100E+00, 0.5957400E+00, 0.5923000E+00, 0.5791900E+00, &
     & 0.5863400E+00, 0.5685700E+00, 0.5801900E+00, 0.5760000E+00, &
     & 0.5640300E+00, 0.5856300E+00, 0.5593900E+00, 0.5305300E+00, &
     & 0.4962200E+00, 0.4599600E+00, 0.3512721E+00, 0.3512721E+00 /
      data (ref_adm(32,iz,30, 8),iz = 1,20) / &
     & 0.5566800E+00, 0.5566800E+00, 0.5468100E+00, 0.5516600E+00, &
     & 0.5024200E+00, 0.4943200E+00, 0.5501400E+00, 0.5703900E+00, &
     & 0.5964000E+00, 0.6073200E+00, 0.5989100E+00, 0.5966000E+00, &
     & 0.5954900E+00, 0.5852300E+00, 0.5669200E+00, 0.5318100E+00, &
     & 0.4966100E+00, 0.4882300E+00, 0.3511482E+00, 0.3511482E+00 /
      data (ref_adm(32,iz,31, 8),iz = 1,20) / &
     & 0.5603100E+00, 0.5603100E+00, 0.5753600E+00, 0.5674900E+00, &
     & 0.5681300E+00, 0.5828800E+00, 0.6015000E+00, 0.5645200E+00, &
     & 0.6528400E+00, 0.6365200E+00, 0.6337000E+00, 0.6025200E+00, &
     & 0.5803200E+00, 0.5633900E+00, 0.5586900E+00, 0.5311300E+00, &
     & 0.5102500E+00, 0.4730900E+00, 0.3737200E+00, 0.3737200E+00 /
      data (ref_adm(32,iz,32, 8),iz = 1,20) / &
     & 0.5433700E+00, 0.5433700E+00, 0.5551500E+00, 0.5890100E+00, &
     & 0.5398700E+00, 0.5775900E+00, 0.5028900E+00, 0.4974000E+00, &
     & 0.6058100E+00, 0.6458300E+00, 0.6751100E+00, 0.5844900E+00, &
     & 0.5722500E+00, 0.5195000E+00, 0.5359100E+00, 0.5060400E+00, &
     & 0.5026000E+00, 0.3588000E+00, 0.3512200E+00, 0.3512200E+00 /
      data (ref_adm(32,iz,33, 8),iz = 1,20) / &
     & 0.6155300E+00, 0.6155300E+00, 0.5585500E+00, 0.5800300E+00, &
     & 0.5449100E+00, 0.5525400E+00, 0.6142400E+00, 0.6102900E+00, &
     & 0.5818800E+00, 0.6260300E+00, 0.6585200E+00, 0.5990800E+00, &
     & 0.6239900E+00, 0.5382700E+00, 0.5472300E+00, 0.5275000E+00, &
     & 0.4829800E+00, 0.4446500E+00, 0.3513078E+00, 0.3513078E+00 /
      data (ref_adm(32,iz,34, 8),iz = 1,20) / &
     & 0.5533300E+00, 0.5533300E+00, 0.5671800E+00, 0.5691700E+00, &
     & 0.5415100E+00, 0.5341800E+00, 0.5220100E+00, 0.6026200E+00, &
     & 0.6102800E+00, 0.5968000E+00, 0.6000600E+00, 0.6525500E+00, &
     & 0.5478700E+00, 0.5238000E+00, 0.5616100E+00, 0.5124000E+00, &
     & 0.4972400E+00, 0.4282255E+00, 0.3513777E+00, 0.3513777E+00 /
      data (ref_adm(32,iz,35, 8),iz = 1,20) / &
     & 0.5410500E+00, 0.5410500E+00, 0.5957500E+00, 0.6315500E+00, &
     & 0.5923800E+00, 0.5737100E+00, 0.5647500E+00, 0.6798300E+00, &
     & 0.6458600E+00, 0.5852300E+00, 0.5951100E+00, 0.5703700E+00, &
     & 0.5649700E+00, 0.5495600E+00, 0.5088900E+00, 0.5441900E+00, &
     & 0.5308600E+00, 0.4279311E+00, 0.3514699E+00, 0.3514699E+00 /
      data (ref_adm(32,iz,36, 8),iz = 1,20) / &
     & 0.6036100E+00, 0.6036100E+00, 0.6322100E+00, 0.6354000E+00, &
     & 0.6033600E+00, 0.6082500E+00, 0.6150000E+00, 0.5932500E+00, &
     & 0.6954700E+00, 0.6360500E+00, 0.6025700E+00, 0.5916100E+00, &
     & 0.5230800E+00, 0.5230500E+00, 0.5377100E+00, 0.5028378E+00, &
     & 0.4723496E+00, 0.4278277E+00, 0.3515039E+00, 0.3515039E+00 /
      data (ref_adm(32,iz,37, 8),iz = 1,20) / &
     & 0.6131600E+00, 0.6131600E+00, 0.5433700E+00, 0.6066300E+00, &
     & 0.6632000E+00, 0.6575300E+00, 0.6234900E+00, 0.6272200E+00, &
     & 0.6563200E+00, 0.6980800E+00, 0.6511500E+00, 0.5967600E+00, &
     & 0.5809300E+00, 0.5232300E+00, 0.5347500E+00, 0.5028486E+00, &
     & 0.4722743E+00, 0.4277229E+00, 0.3515078E+00, 0.3515078E+00 /
      data (ref_adm(32,iz,38, 8),iz = 1,20) / &
     & 0.6131600E+00, 0.6131600E+00, 0.5433700E+00, 0.6066300E+00, &
     & 0.6632000E+00, 0.6575300E+00, 0.6234900E+00, 0.6272200E+00, &
     & 0.6563200E+00, 0.6980800E+00, 0.6511500E+00, 0.5967600E+00, &
     & 0.5809300E+00, 0.5232300E+00, 0.5347500E+00, 0.5028486E+00, &
     & 0.4722743E+00, 0.4277229E+00, 0.3515078E+00, 0.3515078E+00 /
! Solar Zenith Angle 40.0 Albedo  0.5816077E+00
      data (ref_adm(32,iz, 1, 9),iz = 1,20) / &
     & 0.5251200E+00, 0.5251200E+00, 0.5524500E+00, 0.5980000E+00, &
     & 0.5841200E+00, 0.5513000E+00, 0.5720200E+00, 0.5575800E+00, &
     & 0.5704000E+00, 0.6062400E+00, 0.6235700E+00, 0.6731000E+00, &
     & 0.6110200E+00, 0.6606900E+00, 0.6902100E+00, 0.6819300E+00, &
     & 0.6765400E+00, 0.6429200E+00, 0.5303040E+00, 0.5303040E+00 /
      data (ref_adm(32,iz, 2, 9),iz = 1,20) / &
     & 0.5251200E+00, 0.5251200E+00, 0.5524500E+00, 0.5980000E+00, &
     & 0.5841200E+00, 0.5513000E+00, 0.5720200E+00, 0.5575800E+00, &
     & 0.5704000E+00, 0.6062400E+00, 0.6235700E+00, 0.6731000E+00, &
     & 0.6110200E+00, 0.6606900E+00, 0.6902100E+00, 0.6819300E+00, &
     & 0.6765400E+00, 0.6429200E+00, 0.5303040E+00, 0.5303040E+00 /
      data (ref_adm(32,iz, 3, 9),iz = 1,20) / &
     & 0.5801600E+00, 0.5801600E+00, 0.6141400E+00, 0.5497500E+00, &
     & 0.5616400E+00, 0.5678700E+00, 0.5692500E+00, 0.5873500E+00, &
     & 0.5630300E+00, 0.5880600E+00, 0.6191900E+00, 0.6396500E+00, &
     & 0.6368000E+00, 0.6381600E+00, 0.6777400E+00, 0.6972800E+00, &
     & 0.6684400E+00, 0.6609100E+00, 0.5664800E+00, 0.5664800E+00 /
      data (ref_adm(32,iz, 4, 9),iz = 1,20) / &
     & 0.5810600E+00, 0.5810600E+00, 0.5402400E+00, 0.5905800E+00, &
     & 0.6071100E+00, 0.5785800E+00, 0.5540100E+00, 0.5880700E+00, &
     & 0.6004700E+00, 0.6093800E+00, 0.6244700E+00, 0.6316500E+00, &
     & 0.6524400E+00, 0.6683700E+00, 0.6874700E+00, 0.6582900E+00, &
     & 0.6620800E+00, 0.5106600E+00, 0.5461000E+00, 0.5461000E+00 /
      data (ref_adm(32,iz, 5, 9),iz = 1,20) / &
     & 0.5581300E+00, 0.5581300E+00, 0.5575500E+00, 0.5615300E+00, &
     & 0.5348700E+00, 0.5693900E+00, 0.5892800E+00, 0.6057100E+00, &
     & 0.6290300E+00, 0.6182300E+00, 0.6244500E+00, 0.6432900E+00, &
     & 0.6298600E+00, 0.6711000E+00, 0.6761700E+00, 0.6783800E+00, &
     & 0.6656200E+00, 0.6141120E+00, 0.5665400E+00, 0.5665400E+00 /
      data (ref_adm(32,iz, 6, 9),iz = 1,20) / &
     & 0.5760300E+00, 0.5760300E+00, 0.5434200E+00, 0.5679100E+00, &
     & 0.5472900E+00, 0.5687400E+00, 0.6384200E+00, 0.6202700E+00, &
     & 0.6021600E+00, 0.6266000E+00, 0.6232600E+00, 0.6039300E+00, &
     & 0.6223900E+00, 0.6466100E+00, 0.6551700E+00, 0.6727500E+00, &
     & 0.6896200E+00, 0.6055540E+00, 0.5035447E+00, 0.5035447E+00 /
      data (ref_adm(32,iz, 7, 9),iz = 1,20) / &
     & 0.5726600E+00, 0.5726600E+00, 0.5565800E+00, 0.5627200E+00, &
     & 0.5582200E+00, 0.5722400E+00, 0.6138100E+00, 0.6000700E+00, &
     & 0.6091800E+00, 0.5956300E+00, 0.6305600E+00, 0.6325000E+00, &
     & 0.6490700E+00, 0.6686600E+00, 0.6626500E+00, 0.6597800E+00, &
     & 0.6760900E+00, 0.5960229E+00, 0.5159400E+00, 0.5159400E+00 /
      data (ref_adm(32,iz, 8, 9),iz = 1,20) / &
     & 0.5565100E+00, 0.5565100E+00, 0.5769900E+00, 0.5556600E+00, &
     & 0.5419300E+00, 0.5514000E+00, 0.5595100E+00, 0.5687100E+00, &
     & 0.5608600E+00, 0.5850000E+00, 0.5831500E+00, 0.6144000E+00, &
     & 0.6349600E+00, 0.5976300E+00, 0.6137400E+00, 0.6378200E+00, &
     & 0.6330000E+00, 0.5596300E+00, 0.4847038E+00, 0.4847038E+00 /
      data (ref_adm(32,iz, 9, 9),iz = 1,20) / &
     & 0.5643200E+00, 0.5643200E+00, 0.5720600E+00, 0.5549700E+00, &
     & 0.5553200E+00, 0.5404200E+00, 0.5641300E+00, 0.5560000E+00, &
     & 0.5797100E+00, 0.5623000E+00, 0.5850200E+00, 0.6048100E+00, &
     & 0.6068700E+00, 0.6023100E+00, 0.5814800E+00, 0.6159500E+00, &
     & 0.5847800E+00, 0.5441000E+00, 0.4759169E+00, 0.4759169E+00 /
      data (ref_adm(32,iz,10, 9),iz = 1,20) / &
     & 0.5767800E+00, 0.5767800E+00, 0.5474100E+00, 0.5566100E+00, &
     & 0.5743600E+00, 0.5467300E+00, 0.5543100E+00, 0.5677800E+00, &
     & 0.5712700E+00, 0.5513500E+00, 0.5492200E+00, 0.5801600E+00, &
     & 0.5810600E+00, 0.5881500E+00, 0.5911600E+00, 0.5855100E+00, &
     & 0.5684800E+00, 0.5228500E+00, 0.4679904E+00, 0.4679904E+00 /
      data (ref_adm(32,iz,11, 9),iz = 1,20) / &
     & 0.5507900E+00, 0.5507900E+00, 0.5802700E+00, 0.5696200E+00, &
     & 0.5717000E+00, 0.5946300E+00, 0.5707700E+00, 0.5141800E+00, &
     & 0.5292500E+00, 0.5780000E+00, 0.5831400E+00, 0.5463300E+00, &
     & 0.5659900E+00, 0.5984500E+00, 0.5659200E+00, 0.5561900E+00, &
     & 0.5380500E+00, 0.4873400E+00, 0.4605251E+00, 0.4605251E+00 /
      data (ref_adm(32,iz,12, 9),iz = 1,20) / &
     & 0.5793900E+00, 0.5793900E+00, 0.5805300E+00, 0.5694800E+00, &
     & 0.5584700E+00, 0.5752200E+00, 0.6157500E+00, 0.6280200E+00, &
     & 0.5889100E+00, 0.5798300E+00, 0.5777500E+00, 0.5510300E+00, &
     & 0.5569900E+00, 0.5615400E+00, 0.5475800E+00, 0.5547900E+00, &
     & 0.5724900E+00, 0.5082500E+00, 0.4711600E+00, 0.4711600E+00 /
      data (ref_adm(32,iz,13, 9),iz = 1,20) / &
     & 0.5795700E+00, 0.5795700E+00, 0.5887700E+00, 0.5816900E+00, &
     & 0.5818100E+00, 0.5754100E+00, 0.5880700E+00, 0.5965400E+00, &
     & 0.6214900E+00, 0.6158700E+00, 0.6147900E+00, 0.6113300E+00, &
     & 0.5966400E+00, 0.5658000E+00, 0.5788400E+00, 0.6186200E+00, &
     & 0.6098100E+00, 0.5240900E+00, 0.4134800E+00, 0.4134800E+00 /
      data (ref_adm(32,iz,14, 9),iz = 1,20) / &
     & 0.5553800E+00, 0.5553800E+00, 0.5600900E+00, 0.5417600E+00, &
     & 0.5324000E+00, 0.5390800E+00, 0.5517900E+00, 0.5648700E+00, &
     & 0.5903300E+00, 0.5867000E+00, 0.5909500E+00, 0.5956400E+00, &
     & 0.6000500E+00, 0.5974300E+00, 0.6138300E+00, 0.5515000E+00, &
     & 0.5864700E+00, 0.3346900E+00, 0.4407071E+00, 0.4407071E+00 /
      data (ref_adm(32,iz,15, 9),iz = 1,20) / &
     & 0.5527800E+00, 0.5527800E+00, 0.5708400E+00, 0.5604000E+00, &
     & 0.5531400E+00, 0.5293400E+00, 0.5495100E+00, 0.5466300E+00, &
     & 0.5440700E+00, 0.5436500E+00, 0.5605000E+00, 0.6077100E+00, &
     & 0.5964500E+00, 0.5886700E+00, 0.5765500E+00, 0.5195700E+00, &
     & 0.4911600E+00, 0.4738500E+00, 0.4333130E+00, 0.4333130E+00 /
      data (ref_adm(32,iz,16, 9),iz = 1,20) / &
     & 0.5676800E+00, 0.5676800E+00, 0.5588400E+00, 0.5736200E+00, &
     & 0.5728900E+00, 0.5525600E+00, 0.5418900E+00, 0.5486000E+00, &
     & 0.5989800E+00, 0.5228000E+00, 0.5675500E+00, 0.5668900E+00, &
     & 0.5668000E+00, 0.5480900E+00, 0.4879600E+00, 0.5141000E+00, &
     & 0.5600690E+00, 0.3932800E+00, 0.4261096E+00, 0.4261096E+00 /
      data (ref_adm(32,iz,17, 9),iz = 1,20) / &
     & 0.5252100E+00, 0.5252100E+00, 0.5746100E+00, 0.5464500E+00, &
     & 0.5518800E+00, 0.5716600E+00, 0.5632800E+00, 0.5895700E+00, &
     & 0.5885400E+00, 0.6044300E+00, 0.5277100E+00, 0.5848200E+00, &
     & 0.5296100E+00, 0.5329000E+00, 0.5112800E+00, 0.5015000E+00, &
     & 0.5061200E+00, 0.5149409E+00, 0.4198382E+00, 0.4198382E+00 /
      data (ref_adm(32,iz,18, 9),iz = 1,20) / &
     & 0.5344200E+00, 0.5344200E+00, 0.5894200E+00, 0.5619300E+00, &
     & 0.6040700E+00, 0.5686000E+00, 0.6089300E+00, 0.6030600E+00, &
     & 0.6059500E+00, 0.6086900E+00, 0.5885800E+00, 0.5813700E+00, &
     & 0.5839800E+00, 0.5301800E+00, 0.5206500E+00, 0.5856200E+00, &
     & 0.4977500E+00, 0.4925600E+00, 0.3812346E+00, 0.3812346E+00 /
      data (ref_adm(32,iz,19, 9),iz = 1,20) / &
     & 0.5677600E+00, 0.5677600E+00, 0.5619200E+00, 0.5775800E+00, &
     & 0.5956600E+00, 0.5846200E+00, 0.6281800E+00, 0.6008500E+00, &
     & 0.6392100E+00, 0.6315000E+00, 0.5074200E+00, 0.5621400E+00, &
     & 0.5916800E+00, 0.5730000E+00, 0.5494800E+00, 0.4925300E+00, &
     & 0.4720900E+00, 0.4761418E+00, 0.3790009E+00, 0.3790009E+00 /
      data (ref_adm(32,iz,20, 9),iz = 1,20) / &
     & 0.5881500E+00, 0.5881500E+00, 0.5487600E+00, 0.5461700E+00, &
     & 0.5750300E+00, 0.5625200E+00, 0.5728300E+00, 0.5848500E+00, &
     & 0.5985000E+00, 0.5892900E+00, 0.5242000E+00, 0.5547700E+00, &
     & 0.5367400E+00, 0.5812200E+00, 0.6191100E+00, 0.5370631E+00, &
     & 0.5163662E+00, 0.4738508E+00, 0.3774941E+00, 0.3774941E+00 /
      data (ref_adm(32,iz,21, 9),iz = 1,20) / &
     & 0.5588700E+00, 0.5588700E+00, 0.5613500E+00, 0.5562800E+00, &
     & 0.5338900E+00, 0.5574000E+00, 0.5715000E+00, 0.6035300E+00, &
     & 0.6008400E+00, 0.6044400E+00, 0.6071200E+00, 0.5388000E+00, &
     & 0.5448400E+00, 0.5601600E+00, 0.5729800E+00, 0.5994600E+00, &
     & 0.5145958E+00, 0.4716840E+00, 0.3763412E+00, 0.3763412E+00 /
      data (ref_adm(32,iz,22, 9),iz = 1,20) / &
     & 0.5366900E+00, 0.5366900E+00, 0.5844400E+00, 0.5620000E+00, &
     & 0.5796000E+00, 0.5661700E+00, 0.5774500E+00, 0.6198000E+00, &
     & 0.6216600E+00, 0.6132900E+00, 0.6266000E+00, 0.5912300E+00, &
     & 0.5966400E+00, 0.5906900E+00, 0.5611100E+00, 0.5269149E+00, &
     & 0.5021648E+00, 0.4604498E+00, 0.3787521E+00, 0.3787521E+00 /
      data (ref_adm(32,iz,23, 9),iz = 1,20) / &
     & 0.5393100E+00, 0.5393100E+00, 0.5828900E+00, 0.5746100E+00, &
     & 0.5624900E+00, 0.5376700E+00, 0.5511700E+00, 0.5630300E+00, &
     & 0.5993200E+00, 0.6057700E+00, 0.6005100E+00, 0.6243700E+00, &
     & 0.5525600E+00, 0.5578000E+00, 0.5793800E+00, 0.5325200E+00, &
     & 0.4954600E+00, 0.4573289E+00, 0.3787796E+00, 0.3787796E+00 /
      data (ref_adm(32,iz,24, 9),iz = 1,20) / &
     & 0.5650500E+00, 0.5650500E+00, 0.5262000E+00, 0.5458000E+00, &
     & 0.5648400E+00, 0.5717600E+00, 0.5674400E+00, 0.5863200E+00, &
     & 0.5637200E+00, 0.5836000E+00, 0.6146400E+00, 0.6199400E+00, &
     & 0.5330500E+00, 0.5902400E+00, 0.5679700E+00, 0.5875000E+00, &
     & 0.4973200E+00, 0.4551874E+00, 0.3793845E+00, 0.3793845E+00 /
      data (ref_adm(32,iz,25, 9),iz = 1,20) / &
     & 0.5546200E+00, 0.5546200E+00, 0.5672200E+00, 0.5558300E+00, &
     & 0.5448600E+00, 0.5883500E+00, 0.6126600E+00, 0.5731300E+00, &
     & 0.5705500E+00, 0.5816000E+00, 0.6203900E+00, 0.5745100E+00, &
     & 0.5119000E+00, 0.5923200E+00, 0.5797200E+00, 0.5998500E+00, &
     & 0.5111900E+00, 0.5016000E+00, 0.3805482E+00, 0.3805482E+00 /
      data (ref_adm(32,iz,26, 9),iz = 1,20) / &
     & 0.5532900E+00, 0.5532900E+00, 0.5541500E+00, 0.5811400E+00, &
     & 0.5662400E+00, 0.5878100E+00, 0.5902900E+00, 0.5719900E+00, &
     & 0.5672300E+00, 0.5823600E+00, 0.6100200E+00, 0.5925300E+00, &
     & 0.5777300E+00, 0.5979000E+00, 0.6192900E+00, 0.6079400E+00, &
     & 0.5123800E+00, 0.4829600E+00, 0.3824310E+00, 0.3824310E+00 /
      data (ref_adm(32,iz,27, 9),iz = 1,20) / &
     & 0.5686600E+00, 0.5686600E+00, 0.5995000E+00, 0.5995500E+00, &
     & 0.5895100E+00, 0.5984700E+00, 0.5862800E+00, 0.5834400E+00, &
     & 0.5766300E+00, 0.5784800E+00, 0.5836200E+00, 0.5798300E+00, &
     & 0.5623300E+00, 0.5670100E+00, 0.5798200E+00, 0.5649900E+00, &
     & 0.5243800E+00, 0.4920700E+00, 0.3846651E+00, 0.3846651E+00 /
      data (ref_adm(32,iz,28, 9),iz = 1,20) / &
     & 0.5862200E+00, 0.5862200E+00, 0.6068300E+00, 0.6091600E+00, &
     & 0.5920900E+00, 0.5911400E+00, 0.6076000E+00, 0.6254800E+00, &
     & 0.6295500E+00, 0.6227200E+00, 0.6102200E+00, 0.6019500E+00, &
     & 0.5936400E+00, 0.5594000E+00, 0.5494100E+00, 0.5310300E+00, &
     & 0.4874900E+00, 0.5036500E+00, 0.3448800E+00, 0.3448800E+00 /
      data (ref_adm(32,iz,29, 9),iz = 1,20) / &
     & 0.5644500E+00, 0.5644500E+00, 0.5886400E+00, 0.5726300E+00, &
     & 0.5540900E+00, 0.5900100E+00, 0.5876200E+00, 0.5725700E+00, &
     & 0.5678400E+00, 0.5903400E+00, 0.5879300E+00, 0.6048800E+00, &
     & 0.5964700E+00, 0.5716200E+00, 0.5577200E+00, 0.5385200E+00, &
     & 0.5154100E+00, 0.4700000E+00, 0.3749500E+00, 0.3749500E+00 /
      data (ref_adm(32,iz,30, 9),iz = 1,20) / &
     & 0.5902400E+00, 0.5902400E+00, 0.5636000E+00, 0.5565200E+00, &
     & 0.5515400E+00, 0.5885000E+00, 0.5833500E+00, 0.5675300E+00, &
     & 0.5541100E+00, 0.5743800E+00, 0.5890900E+00, 0.6228100E+00, &
     & 0.5811600E+00, 0.5796600E+00, 0.5706600E+00, 0.5223200E+00, &
     & 0.5013400E+00, 0.4718600E+00, 0.3878800E+00, 0.3878800E+00 /
      data (ref_adm(32,iz,31, 9),iz = 1,20) / &
     & 0.5567700E+00, 0.5567700E+00, 0.5687900E+00, 0.5792400E+00, &
     & 0.5659600E+00, 0.5843500E+00, 0.5913500E+00, 0.6235800E+00, &
     & 0.6395100E+00, 0.6258800E+00, 0.5955700E+00, 0.5947200E+00, &
     & 0.5757500E+00, 0.5568700E+00, 0.5497900E+00, 0.5140600E+00, &
     & 0.4937900E+00, 0.4576100E+00, 0.3687400E+00, 0.3687400E+00 /
      data (ref_adm(32,iz,32, 9),iz = 1,20) / &
     & 0.5705300E+00, 0.5705300E+00, 0.5242400E+00, 0.5444900E+00, &
     & 0.5750700E+00, 0.5820400E+00, 0.6277400E+00, 0.5863200E+00, &
     & 0.6219300E+00, 0.5734400E+00, 0.5466600E+00, 0.5771100E+00, &
     & 0.6289200E+00, 0.5727000E+00, 0.5916100E+00, 0.5290200E+00, &
     & 0.5269600E+00, 0.4702500E+00, 0.4013877E+00, 0.4013877E+00 /
      data (ref_adm(32,iz,33, 9),iz = 1,20) / &
     & 0.5409700E+00, 0.5409700E+00, 0.5755700E+00, 0.5819700E+00, &
     & 0.5478800E+00, 0.5820400E+00, 0.5609900E+00, 0.5997100E+00, &
     & 0.6159000E+00, 0.5874900E+00, 0.5985700E+00, 0.6337500E+00, &
     & 0.6070300E+00, 0.5962000E+00, 0.5365400E+00, 0.5421300E+00, &
     & 0.5153000E+00, 0.4662384E+00, 0.3369700E+00, 0.3369700E+00 /
      data (ref_adm(32,iz,34, 9),iz = 1,20) / &
     & 0.5606300E+00, 0.5606300E+00, 0.6029600E+00, 0.5942400E+00, &
     & 0.6099400E+00, 0.5751100E+00, 0.5824500E+00, 0.6319600E+00, &
     & 0.5997400E+00, 0.6007600E+00, 0.6136100E+00, 0.6507100E+00, &
     & 0.6072800E+00, 0.5348400E+00, 0.5610300E+00, 0.5265000E+00, &
     & 0.4830500E+00, 0.4105200E+00, 0.4069929E+00, 0.4069929E+00 /
      data (ref_adm(32,iz,35, 9),iz = 1,20) / &
     & 0.5697900E+00, 0.5697900E+00, 0.5698000E+00, 0.5438700E+00, &
     & 0.5808400E+00, 0.6098500E+00, 0.5744400E+00, 0.5690400E+00, &
     & 0.6112400E+00, 0.6439800E+00, 0.6605400E+00, 0.6761200E+00, &
     & 0.6460700E+00, 0.5555700E+00, 0.5973700E+00, 0.5458000E+00, &
     & 0.5002100E+00, 0.4040200E+00, 0.4091495E+00, 0.4091495E+00 /
      data (ref_adm(32,iz,36, 9),iz = 1,20) / &
     & 0.5786900E+00, 0.5786900E+00, 0.5923600E+00, 0.5508300E+00, &
     & 0.5658800E+00, 0.6147900E+00, 0.5915700E+00, 0.5978100E+00, &
     & 0.6303200E+00, 0.6488200E+00, 0.6780800E+00, 0.6255900E+00, &
     & 0.5960100E+00, 0.5811900E+00, 0.5748000E+00, 0.5108000E+00, &
     & 0.5130600E+00, 0.4738698E+00, 0.4106283E+00, 0.4106283E+00 /
      data (ref_adm(32,iz,37, 9),iz = 1,20) / &
     & 0.5692500E+00, 0.5692500E+00, 0.5658800E+00, 0.5752600E+00, &
     & 0.5590500E+00, 0.5828900E+00, 0.5753200E+00, 0.6199500E+00, &
     & 0.6357800E+00, 0.6490200E+00, 0.6457100E+00, 0.5769300E+00, &
     & 0.5535700E+00, 0.5625200E+00, 0.5375900E+00, 0.5396300E+00, &
     & 0.5240890E+00, 0.4750477E+00, 0.4115217E+00, 0.4115217E+00 /
      data (ref_adm(32,iz,38, 9),iz = 1,20) / &
     & 0.5692500E+00, 0.5692500E+00, 0.5658800E+00, 0.5752600E+00, &
     & 0.5590500E+00, 0.5828900E+00, 0.5753200E+00, 0.6199500E+00, &
     & 0.6357800E+00, 0.6490200E+00, 0.6457100E+00, 0.5769300E+00, &
     & 0.5535700E+00, 0.5625200E+00, 0.5375900E+00, 0.5396300E+00, &
     & 0.5240890E+00, 0.4750477E+00, 0.4115217E+00, 0.4115217E+00 /
! Solar Zenith Angle 45.0 Albedo  0.5952068E+00
      data (ref_adm(32,iz, 1,10),iz = 1,20) / &
     & 0.5850800E+00, 0.5850800E+00, 0.5838700E+00, 0.6092300E+00, &
     & 0.6095500E+00, 0.6205200E+00, 0.6162100E+00, 0.6074500E+00, &
     & 0.6133500E+00, 0.6283600E+00, 0.6530700E+00, 0.6560500E+00, &
     & 0.6841400E+00, 0.7214500E+00, 0.7356100E+00, 0.7679500E+00, &
     & 0.7583200E+00, 0.7504500E+00, 0.6220480E+00, 0.6220480E+00 /
      data (ref_adm(32,iz, 2,10),iz = 1,20) / &
     & 0.5850800E+00, 0.5850800E+00, 0.5838700E+00, 0.6092300E+00, &
     & 0.6095500E+00, 0.6205200E+00, 0.6162100E+00, 0.6074500E+00, &
     & 0.6133500E+00, 0.6283600E+00, 0.6530700E+00, 0.6560500E+00, &
     & 0.6841400E+00, 0.7214500E+00, 0.7356100E+00, 0.7679500E+00, &
     & 0.7583200E+00, 0.7504500E+00, 0.6220480E+00, 0.6220480E+00 /
      data (ref_adm(32,iz, 3,10),iz = 1,20) / &
     & 0.5817900E+00, 0.5817900E+00, 0.5937700E+00, 0.5933500E+00, &
     & 0.5926200E+00, 0.5873900E+00, 0.6084500E+00, 0.6079900E+00, &
     & 0.6149500E+00, 0.6298300E+00, 0.6408100E+00, 0.6726500E+00, &
     & 0.6729900E+00, 0.7111500E+00, 0.7217900E+00, 0.7574700E+00, &
     & 0.7614800E+00, 0.7286500E+00, 0.6223300E+00, 0.6223300E+00 /
      data (ref_adm(32,iz, 4,10),iz = 1,20) / &
     & 0.5863900E+00, 0.5863900E+00, 0.5828800E+00, 0.5632100E+00, &
     & 0.5841400E+00, 0.5909800E+00, 0.5825000E+00, 0.6116400E+00, &
     & 0.6212500E+00, 0.6346400E+00, 0.6313100E+00, 0.6564200E+00, &
     & 0.6587500E+00, 0.6943700E+00, 0.7233000E+00, 0.7246900E+00, &
     & 0.7685500E+00, 0.7107300E+00, 0.6105900E+00, 0.6105900E+00 /
      data (ref_adm(32,iz, 5,10),iz = 1,20) / &
     & 0.5609400E+00, 0.5609400E+00, 0.5679900E+00, 0.5375000E+00, &
     & 0.5732400E+00, 0.5814400E+00, 0.6070500E+00, 0.6071600E+00, &
     & 0.6216300E+00, 0.6114400E+00, 0.6333200E+00, 0.6524300E+00, &
     & 0.6714000E+00, 0.6976000E+00, 0.7114600E+00, 0.7506300E+00, &
     & 0.7647500E+00, 0.6791000E+00, 0.5615300E+00, 0.5615300E+00 /
      data (ref_adm(32,iz, 6,10),iz = 1,20) / &
     & 0.5607500E+00, 0.5607500E+00, 0.5478900E+00, 0.5698800E+00, &
     & 0.5885600E+00, 0.5709800E+00, 0.6037800E+00, 0.6147200E+00, &
     & 0.6173400E+00, 0.6168800E+00, 0.6368300E+00, 0.6591600E+00, &
     & 0.6998800E+00, 0.7142800E+00, 0.7197500E+00, 0.7396900E+00, &
     & 0.7402500E+00, 0.6542400E+00, 0.5859600E+00, 0.5859600E+00 /
      data (ref_adm(32,iz, 7,10),iz = 1,20) / &
     & 0.5656100E+00, 0.5656100E+00, 0.5666100E+00, 0.5735600E+00, &
     & 0.5947300E+00, 0.5855100E+00, 0.5758100E+00, 0.5882800E+00, &
     & 0.5965100E+00, 0.6313500E+00, 0.6320500E+00, 0.6345400E+00, &
     & 0.6677600E+00, 0.6761600E+00, 0.7026200E+00, 0.6851800E+00, &
     & 0.6779900E+00, 0.6498600E+00, 0.5298200E+00, 0.5298200E+00 /
      data (ref_adm(32,iz, 8,10),iz = 1,20) / &
     & 0.5662000E+00, 0.5662000E+00, 0.5366500E+00, 0.5577900E+00, &
     & 0.5650200E+00, 0.5815500E+00, 0.5643500E+00, 0.5628300E+00, &
     & 0.5906000E+00, 0.6101900E+00, 0.6113200E+00, 0.6198300E+00, &
     & 0.6335900E+00, 0.6443700E+00, 0.6647300E+00, 0.6921700E+00, &
     & 0.6887900E+00, 0.6221500E+00, 0.5535500E+00, 0.5535500E+00 /
      data (ref_adm(32,iz, 9,10),iz = 1,20) / &
     & 0.5629300E+00, 0.5629300E+00, 0.5724200E+00, 0.5572100E+00, &
     & 0.5731400E+00, 0.5572800E+00, 0.5746200E+00, 0.5712600E+00, &
     & 0.5860400E+00, 0.5905000E+00, 0.6057400E+00, 0.6180800E+00, &
     & 0.6474800E+00, 0.6373400E+00, 0.6704900E+00, 0.6843600E+00, &
     & 0.6766300E+00, 0.6235700E+00, 0.5393874E+00, 0.5393874E+00 /
      data (ref_adm(32,iz,10,10),iz = 1,20) / &
     & 0.5801200E+00, 0.5801200E+00, 0.5575600E+00, 0.5919200E+00, &
     & 0.5856300E+00, 0.5795800E+00, 0.5662200E+00, 0.5404200E+00, &
     & 0.5704200E+00, 0.5787500E+00, 0.6083200E+00, 0.5982900E+00, &
     & 0.6261000E+00, 0.6209200E+00, 0.6389100E+00, 0.6411700E+00, &
     & 0.6650700E+00, 0.5879000E+00, 0.4883300E+00, 0.4883300E+00 /
      data (ref_adm(32,iz,11,10),iz = 1,20) / &
     & 0.5494200E+00, 0.5494200E+00, 0.5667600E+00, 0.5701000E+00, &
     & 0.5752900E+00, 0.5488900E+00, 0.5364100E+00, 0.5496700E+00, &
     & 0.5632400E+00, 0.5734000E+00, 0.5996800E+00, 0.6062400E+00, &
     & 0.6302300E+00, 0.6392700E+00, 0.6208300E+00, 0.6352400E+00, &
     & 0.6257000E+00, 0.5655000E+00, 0.5105801E+00, 0.5105801E+00 /
      data (ref_adm(32,iz,12,10),iz = 1,20) / &
     & 0.5691200E+00, 0.5691200E+00, 0.5877700E+00, 0.6193000E+00, &
     & 0.6196800E+00, 0.5951600E+00, 0.5746900E+00, 0.5610500E+00, &
     & 0.5681300E+00, 0.5773600E+00, 0.5965200E+00, 0.6152400E+00, &
     & 0.6219700E+00, 0.6075300E+00, 0.6044600E+00, 0.6143300E+00, &
     & 0.5934800E+00, 0.5486700E+00, 0.4527800E+00, 0.4527800E+00 /
      data (ref_adm(32,iz,13,10),iz = 1,20) / &
     & 0.5883900E+00, 0.5883900E+00, 0.5811300E+00, 0.5886400E+00, &
     & 0.5900900E+00, 0.5851400E+00, 0.5870600E+00, 0.5806400E+00, &
     & 0.5845200E+00, 0.6013500E+00, 0.6253600E+00, 0.6255600E+00, &
     & 0.6085800E+00, 0.6139600E+00, 0.6060200E+00, 0.6233800E+00, &
     & 0.5816300E+00, 0.5229600E+00, 0.4233400E+00, 0.4233400E+00 /
      data (ref_adm(32,iz,14,10),iz = 1,20) / &
     & 0.5702900E+00, 0.5702900E+00, 0.5626900E+00, 0.5630600E+00, &
     & 0.5733000E+00, 0.5702600E+00, 0.5852400E+00, 0.5824200E+00, &
     & 0.5923500E+00, 0.5905800E+00, 0.5940900E+00, 0.6073500E+00, &
     & 0.6292900E+00, 0.6510800E+00, 0.6154200E+00, 0.6115100E+00, &
     & 0.5840100E+00, 0.4995500E+00, 0.4133000E+00, 0.4133000E+00 /
      data (ref_adm(32,iz,15,10),iz = 1,20) / &
     & 0.5490500E+00, 0.5490500E+00, 0.5352600E+00, 0.5302600E+00, &
     & 0.5276400E+00, 0.5375900E+00, 0.5275600E+00, 0.5284900E+00, &
     & 0.5402400E+00, 0.5408600E+00, 0.5756000E+00, 0.5844700E+00, &
     & 0.5926900E+00, 0.6097800E+00, 0.5680300E+00, 0.5763900E+00, &
     & 0.5642800E+00, 0.4691800E+00, 0.4724174E+00, 0.4724174E+00 /
      data (ref_adm(32,iz,16,10),iz = 1,20) / &
     & 0.5628100E+00, 0.5628100E+00, 0.5804400E+00, 0.5709000E+00, &
     & 0.5495200E+00, 0.5537700E+00, 0.5777700E+00, 0.5815700E+00, &
     & 0.5739400E+00, 0.5430900E+00, 0.5572900E+00, 0.5700300E+00, &
     & 0.5843600E+00, 0.5681900E+00, 0.5776700E+00, 0.5533800E+00, &
     & 0.5379100E+00, 0.4862500E+00, 0.4628834E+00, 0.4628834E+00 /
      data (ref_adm(32,iz,17,10),iz = 1,20) / &
     & 0.5574300E+00, 0.5574300E+00, 0.5522600E+00, 0.5698500E+00, &
     & 0.5523000E+00, 0.5510900E+00, 0.5658700E+00, 0.5827800E+00, &
     & 0.5483800E+00, 0.5339000E+00, 0.5796800E+00, 0.5909500E+00, &
     & 0.5763900E+00, 0.6054900E+00, 0.5727000E+00, 0.5135900E+00, &
     & 0.5498800E+00, 0.5259600E+00, 0.4546508E+00, 0.4546508E+00 /
      data (ref_adm(32,iz,18,10),iz = 1,20) / &
     & 0.5329300E+00, 0.5329300E+00, 0.5322100E+00, 0.5711200E+00, &
     & 0.5674200E+00, 0.5638000E+00, 0.5967200E+00, 0.5669300E+00, &
     & 0.5495200E+00, 0.5784900E+00, 0.5723200E+00, 0.5810700E+00, &
     & 0.5836900E+00, 0.5944100E+00, 0.5683800E+00, 0.5112200E+00, &
     & 0.5083800E+00, 0.4980541E+00, 0.4085510E+00, 0.4085510E+00 /
      data (ref_adm(32,iz,19,10),iz = 1,20) / &
     & 0.5624100E+00, 0.5624100E+00, 0.5543900E+00, 0.5721400E+00, &
     & 0.5594800E+00, 0.5594500E+00, 0.5877000E+00, 0.5846300E+00, &
     & 0.5678700E+00, 0.5827300E+00, 0.5997700E+00, 0.5995400E+00, &
     & 0.5910800E+00, 0.5607100E+00, 0.5915200E+00, 0.5540016E+00, &
     & 0.4252900E+00, 0.4913218E+00, 0.4043898E+00, 0.4043898E+00 /
      data (ref_adm(32,iz,20,10),iz = 1,20) / &
     & 0.5307400E+00, 0.5307400E+00, 0.5408000E+00, 0.5368000E+00, &
     & 0.5524700E+00, 0.5526100E+00, 0.5626200E+00, 0.5466000E+00, &
     & 0.5563700E+00, 0.5494400E+00, 0.5960500E+00, 0.5958100E+00, &
     & 0.5853600E+00, 0.5435100E+00, 0.5408100E+00, 0.5450000E+00, &
     & 0.5259781E+00, 0.4853106E+00, 0.4019954E+00, 0.4019954E+00 /
      data (ref_adm(32,iz,21,10),iz = 1,20) / &
     & 0.5650700E+00, 0.5650700E+00, 0.5927800E+00, 0.6006300E+00, &
     & 0.6029400E+00, 0.5884000E+00, 0.5804400E+00, 0.5502200E+00, &
     & 0.5562800E+00, 0.5554900E+00, 0.5865800E+00, 0.5781000E+00, &
     & 0.5937600E+00, 0.5450400E+00, 0.5441700E+00, 0.5414300E+00, &
     & 0.5202920E+00, 0.4801076E+00, 0.4005470E+00, 0.4005470E+00 /
      data (ref_adm(32,iz,22,10),iz = 1,20) / &
     & 0.5704300E+00, 0.5704300E+00, 0.5764500E+00, 0.5901600E+00, &
     & 0.5998000E+00, 0.5822200E+00, 0.5977000E+00, 0.5736300E+00, &
     & 0.5724300E+00, 0.5931100E+00, 0.5940200E+00, 0.5952400E+00, &
     & 0.5779000E+00, 0.5928100E+00, 0.5662300E+00, 0.5957500E+00, &
     & 0.5295718E+00, 0.4874590E+00, 0.3984732E+00, 0.3984732E+00 /
      data (ref_adm(32,iz,23,10),iz = 1,20) / &
     & 0.5567400E+00, 0.5567400E+00, 0.5855800E+00, 0.5751700E+00, &
     & 0.5791200E+00, 0.5869700E+00, 0.5859200E+00, 0.5827700E+00, &
     & 0.5845800E+00, 0.5900200E+00, 0.5853500E+00, 0.6051900E+00, &
     & 0.5718100E+00, 0.5657200E+00, 0.5697100E+00, 0.5736300E+00, &
     & 0.5576700E+00, 0.4826902E+00, 0.3975781E+00, 0.3975781E+00 /
      data (ref_adm(32,iz,24,10),iz = 1,20) / &
     & 0.5578200E+00, 0.5578200E+00, 0.5774300E+00, 0.5715100E+00, &
     & 0.5427000E+00, 0.5731600E+00, 0.6118700E+00, 0.6046500E+00, &
     & 0.5913200E+00, 0.5972700E+00, 0.5994100E+00, 0.6007900E+00, &
     & 0.5749900E+00, 0.5772900E+00, 0.5658500E+00, 0.5156200E+00, &
     & 0.5596200E+00, 0.4789181E+00, 0.3971846E+00, 0.3971846E+00 /
      data (ref_adm(32,iz,25,10),iz = 1,20) / &
     & 0.5423600E+00, 0.5423600E+00, 0.5332700E+00, 0.5496000E+00, &
     & 0.5522500E+00, 0.5632000E+00, 0.5844400E+00, 0.5864800E+00, &
     & 0.5958300E+00, 0.6022900E+00, 0.6135600E+00, 0.6141900E+00, &
     & 0.5773800E+00, 0.5981100E+00, 0.6008700E+00, 0.5380900E+00, &
     & 0.5455700E+00, 0.4904200E+00, 0.3973383E+00, 0.3973383E+00 /
      data (ref_adm(32,iz,26,10),iz = 1,20) / &
     & 0.5521600E+00, 0.5521600E+00, 0.5636600E+00, 0.5740300E+00, &
     & 0.5867200E+00, 0.5847700E+00, 0.5858000E+00, 0.5772700E+00, &
     & 0.5937700E+00, 0.5859900E+00, 0.5879200E+00, 0.5932000E+00, &
     & 0.5887700E+00, 0.5841100E+00, 0.5393800E+00, 0.5467300E+00, &
     & 0.5322500E+00, 0.4931700E+00, 0.4137300E+00, 0.4137300E+00 /
      data (ref_adm(32,iz,27,10),iz = 1,20) / &
     & 0.5725700E+00, 0.5725700E+00, 0.5871800E+00, 0.5815000E+00, &
     & 0.5997500E+00, 0.6018800E+00, 0.5981800E+00, 0.6055400E+00, &
     & 0.6146200E+00, 0.6234700E+00, 0.6080500E+00, 0.5897700E+00, &
     & 0.5811900E+00, 0.5769000E+00, 0.5636400E+00, 0.5499800E+00, &
     & 0.5243100E+00, 0.4878900E+00, 0.4460800E+00, 0.4460800E+00 /
      data (ref_adm(32,iz,28,10),iz = 1,20) / &
     & 0.5795200E+00, 0.5795200E+00, 0.5654300E+00, 0.5729300E+00, &
     & 0.5732400E+00, 0.5827000E+00, 0.6053300E+00, 0.6164800E+00, &
     & 0.6271600E+00, 0.6388600E+00, 0.6352500E+00, 0.6105800E+00, &
     & 0.6206600E+00, 0.6112100E+00, 0.5769600E+00, 0.5553100E+00, &
     & 0.5261500E+00, 0.4958700E+00, 0.4190000E+00, 0.4190000E+00 /
      data (ref_adm(32,iz,29,10),iz = 1,20) / &
     & 0.5773500E+00, 0.5773500E+00, 0.5712200E+00, 0.5732200E+00, &
     & 0.5841300E+00, 0.5842700E+00, 0.6008900E+00, 0.6174500E+00, &
     & 0.6059300E+00, 0.5936200E+00, 0.6081800E+00, 0.6006600E+00, &
     & 0.6269300E+00, 0.6242100E+00, 0.5941400E+00, 0.5764000E+00, &
     & 0.5456400E+00, 0.4841000E+00, 0.3788600E+00, 0.3788600E+00 /
      data (ref_adm(32,iz,30,10),iz = 1,20) / &
     & 0.5693100E+00, 0.5693100E+00, 0.5764400E+00, 0.5818400E+00, &
     & 0.5609600E+00, 0.5697300E+00, 0.5769100E+00, 0.5907600E+00, &
     & 0.6100200E+00, 0.6030500E+00, 0.6040800E+00, 0.5844400E+00, &
     & 0.5883400E+00, 0.5975300E+00, 0.6086000E+00, 0.5773300E+00, &
     & 0.5440600E+00, 0.4927800E+00, 0.3998100E+00, 0.3998100E+00 /
      data (ref_adm(32,iz,31,10),iz = 1,20) / &
     & 0.5667500E+00, 0.5667500E+00, 0.5599600E+00, 0.5535300E+00, &
     & 0.5672300E+00, 0.5766800E+00, 0.5820300E+00, 0.5968700E+00, &
     & 0.6132700E+00, 0.6262500E+00, 0.6184400E+00, 0.6111500E+00, &
     & 0.6040200E+00, 0.5888300E+00, 0.5834600E+00, 0.5770700E+00, &
     & 0.5433600E+00, 0.4922400E+00, 0.3965100E+00, 0.3965100E+00 /
      data (ref_adm(32,iz,32,10),iz = 1,20) / &
     & 0.5737800E+00, 0.5737800E+00, 0.5822300E+00, 0.5807400E+00, &
     & 0.5858000E+00, 0.5905300E+00, 0.6083400E+00, 0.5971400E+00, &
     & 0.6265500E+00, 0.6348200E+00, 0.6129700E+00, 0.6170100E+00, &
     & 0.5878800E+00, 0.5816800E+00, 0.5759500E+00, 0.5693800E+00, &
     & 0.5384000E+00, 0.4827800E+00, 0.4009500E+00, 0.4009500E+00 /
      data (ref_adm(32,iz,33,10),iz = 1,20) / &
     & 0.5585800E+00, 0.5585800E+00, 0.5665700E+00, 0.5916100E+00, &
     & 0.5909500E+00, 0.6138700E+00, 0.5934700E+00, 0.6070200E+00, &
     & 0.6193400E+00, 0.6134200E+00, 0.6354600E+00, 0.6461300E+00, &
     & 0.6191700E+00, 0.6193500E+00, 0.5878000E+00, 0.5787700E+00, &
     & 0.5421600E+00, 0.4715900E+00, 0.4156400E+00, 0.4156400E+00 /
      data (ref_adm(32,iz,34,10),iz = 1,20) / &
     & 0.5588800E+00, 0.5588800E+00, 0.5546700E+00, 0.5997000E+00, &
     & 0.5939700E+00, 0.6021100E+00, 0.5968800E+00, 0.5883500E+00, &
     & 0.6050100E+00, 0.6101900E+00, 0.6433200E+00, 0.6425400E+00, &
     & 0.6231800E+00, 0.6367700E+00, 0.5868200E+00, 0.5530200E+00, &
     & 0.5448500E+00, 0.4687000E+00, 0.3773800E+00, 0.3773800E+00 /
      data (ref_adm(32,iz,35,10),iz = 1,20) / &
     & 0.5649200E+00, 0.5649200E+00, 0.5827200E+00, 0.5880600E+00, &
     & 0.6028600E+00, 0.6028000E+00, 0.6002500E+00, 0.5928000E+00, &
     & 0.5872900E+00, 0.6051600E+00, 0.6276300E+00, 0.6425200E+00, &
     & 0.6425700E+00, 0.6381900E+00, 0.5951400E+00, 0.5504700E+00, &
     & 0.5372300E+00, 0.4775900E+00, 0.3512200E+00, 0.3512200E+00 /
      data (ref_adm(32,iz,36,10),iz = 1,20) / &
     & 0.5749600E+00, 0.5749600E+00, 0.5903600E+00, 0.6023500E+00, &
     & 0.5983300E+00, 0.5837500E+00, 0.6075400E+00, 0.6062800E+00, &
     & 0.6137500E+00, 0.6287100E+00, 0.6308700E+00, 0.6461300E+00, &
     & 0.6334200E+00, 0.6225200E+00, 0.5713500E+00, 0.5539800E+00, &
     & 0.5098900E+00, 0.4756600E+00, 0.4211257E+00, 0.4211257E+00 /
      data (ref_adm(32,iz,37,10),iz = 1,20) / &
     & 0.5843000E+00, 0.5843000E+00, 0.5907600E+00, 0.6073200E+00, &
     & 0.5924500E+00, 0.5771900E+00, 0.5616500E+00, 0.6078200E+00, &
     & 0.6256000E+00, 0.6375700E+00, 0.6353100E+00, 0.6377400E+00, &
     & 0.6228900E+00, 0.5761900E+00, 0.5757800E+00, 0.5765100E+00, &
     & 0.5027600E+00, 0.4831125E+00, 0.4219198E+00, 0.4219198E+00 /
      data (ref_adm(32,iz,38,10),iz = 1,20) / &
     & 0.5843000E+00, 0.5843000E+00, 0.5907600E+00, 0.6073200E+00, &
     & 0.5924500E+00, 0.5771900E+00, 0.5616500E+00, 0.6078200E+00, &
     & 0.6256000E+00, 0.6375700E+00, 0.6353100E+00, 0.6377400E+00, &
     & 0.6228900E+00, 0.5761900E+00, 0.5757800E+00, 0.5765100E+00, &
     & 0.5027600E+00, 0.4831125E+00, 0.4219198E+00, 0.4219198E+00 /
! Solar Zenith Angle 50.0 Albedo  0.5945169E+00
      data (ref_adm(32,iz, 1,11),iz = 1,20) / &
     & 0.5198800E+00, 0.5198800E+00, 0.5279600E+00, 0.5270800E+00, &
     & 0.5462900E+00, 0.5395300E+00, 0.5544200E+00, 0.5815500E+00, &
     & 0.5867900E+00, 0.6090300E+00, 0.6412900E+00, 0.7044700E+00, &
     & 0.7364600E+00, 0.7677700E+00, 0.8035300E+00, 0.8234800E+00, &
     & 0.8776500E+00, 0.8908800E+00, 0.7289200E+00, 0.7289200E+00 /
      data (ref_adm(32,iz, 2,11),iz = 1,20) / &
     & 0.5198800E+00, 0.5198800E+00, 0.5279600E+00, 0.5270800E+00, &
     & 0.5462900E+00, 0.5395300E+00, 0.5544200E+00, 0.5815500E+00, &
     & 0.5867900E+00, 0.6090300E+00, 0.6412900E+00, 0.7044700E+00, &
     & 0.7364600E+00, 0.7677700E+00, 0.8035300E+00, 0.8234800E+00, &
     & 0.8776500E+00, 0.8908800E+00, 0.7289200E+00, 0.7289200E+00 /
      data (ref_adm(32,iz, 3,11),iz = 1,20) / &
     & 0.5280400E+00, 0.5280400E+00, 0.5300000E+00, 0.5342100E+00, &
     & 0.5536000E+00, 0.5442000E+00, 0.5567500E+00, 0.5692900E+00, &
     & 0.5879500E+00, 0.6144800E+00, 0.6507300E+00, 0.6656300E+00, &
     & 0.7266900E+00, 0.7730200E+00, 0.7953700E+00, 0.8298500E+00, &
     & 0.8518700E+00, 0.8505300E+00, 0.6724900E+00, 0.6724900E+00 /
      data (ref_adm(32,iz, 4,11),iz = 1,20) / &
     & 0.5305100E+00, 0.5305100E+00, 0.5399200E+00, 0.5237900E+00, &
     & 0.5424900E+00, 0.5464500E+00, 0.5490400E+00, 0.5556900E+00, &
     & 0.5874400E+00, 0.6097100E+00, 0.6387800E+00, 0.6707700E+00, &
     & 0.7171900E+00, 0.7568200E+00, 0.7805300E+00, 0.8115100E+00, &
     & 0.8498800E+00, 0.8315100E+00, 0.6616500E+00, 0.6616500E+00 /
      data (ref_adm(32,iz, 5,11),iz = 1,20) / &
     & 0.5398100E+00, 0.5398100E+00, 0.5358500E+00, 0.5385800E+00, &
     & 0.5349600E+00, 0.5442800E+00, 0.5570800E+00, 0.5698000E+00, &
     & 0.5990100E+00, 0.6012300E+00, 0.6365600E+00, 0.6596000E+00, &
     & 0.7011400E+00, 0.7355700E+00, 0.7642200E+00, 0.7996800E+00, &
     & 0.8184400E+00, 0.7944900E+00, 0.6516700E+00, 0.6516700E+00 /
      data (ref_adm(32,iz, 6,11),iz = 1,20) / &
     & 0.5457200E+00, 0.5457200E+00, 0.5540900E+00, 0.5442100E+00, &
     & 0.5469900E+00, 0.5411900E+00, 0.5489300E+00, 0.5793000E+00, &
     & 0.5874600E+00, 0.6061600E+00, 0.6290200E+00, 0.6606600E+00, &
     & 0.7019100E+00, 0.7339500E+00, 0.7615300E+00, 0.7817900E+00, &
     & 0.7913900E+00, 0.7417200E+00, 0.6559200E+00, 0.6559200E+00 /
      data (ref_adm(32,iz, 7,11),iz = 1,20) / &
     & 0.5380600E+00, 0.5380600E+00, 0.5345200E+00, 0.5411400E+00, &
     & 0.5323100E+00, 0.5403800E+00, 0.5422900E+00, 0.5586300E+00, &
     & 0.5742900E+00, 0.5957200E+00, 0.6143500E+00, 0.6457000E+00, &
     & 0.6765600E+00, 0.7078800E+00, 0.7392900E+00, 0.7753400E+00, &
     & 0.7996300E+00, 0.7647200E+00, 0.6532900E+00, 0.6532900E+00 /
      data (ref_adm(32,iz, 8,11),iz = 1,20) / &
     & 0.5647500E+00, 0.5647500E+00, 0.5686000E+00, 0.5699800E+00, &
     & 0.5690500E+00, 0.5678400E+00, 0.5759300E+00, 0.5834500E+00, &
     & 0.5948200E+00, 0.6172900E+00, 0.6295500E+00, 0.6664000E+00, &
     & 0.6845200E+00, 0.7058400E+00, 0.7312100E+00, 0.7500600E+00, &
     & 0.7392500E+00, 0.6867300E+00, 0.5965000E+00, 0.5965000E+00 /
      data (ref_adm(32,iz, 9,11),iz = 1,20) / &
     & 0.5411000E+00, 0.5411000E+00, 0.5179700E+00, 0.5255900E+00, &
     & 0.5346200E+00, 0.5413200E+00, 0.5534500E+00, 0.5621000E+00, &
     & 0.5722000E+00, 0.6015000E+00, 0.6208800E+00, 0.6380000E+00, &
     & 0.6560800E+00, 0.6829000E+00, 0.7015700E+00, 0.6957100E+00, &
     & 0.7001000E+00, 0.6581600E+00, 0.5646400E+00, 0.5646400E+00 /
      data (ref_adm(32,iz,10,11),iz = 1,20) / &
     & 0.5248800E+00, 0.5248800E+00, 0.5297700E+00, 0.5147100E+00, &
     & 0.5212900E+00, 0.5198700E+00, 0.5527900E+00, 0.5608000E+00, &
     & 0.5723000E+00, 0.6013000E+00, 0.6149800E+00, 0.6207800E+00, &
     & 0.6354000E+00, 0.6598000E+00, 0.6737900E+00, 0.6890900E+00, &
     & 0.6925800E+00, 0.6300400E+00, 0.5496600E+00, 0.5496600E+00 /
      data (ref_adm(32,iz,11,11),iz = 1,20) / &
     & 0.5411500E+00, 0.5411500E+00, 0.5340400E+00, 0.5321700E+00, &
     & 0.5218100E+00, 0.5435300E+00, 0.5412200E+00, 0.5580100E+00, &
     & 0.5734100E+00, 0.5983700E+00, 0.6176300E+00, 0.6304000E+00, &
     & 0.6319300E+00, 0.6522100E+00, 0.6691400E+00, 0.6727000E+00, &
     & 0.6621600E+00, 0.5806600E+00, 0.4805500E+00, 0.4805500E+00 /
      data (ref_adm(32,iz,12,11),iz = 1,20) / &
     & 0.5454600E+00, 0.5454600E+00, 0.5479200E+00, 0.5387600E+00, &
     & 0.5491000E+00, 0.5518800E+00, 0.5438500E+00, 0.5460100E+00, &
     & 0.5683200E+00, 0.5798400E+00, 0.6071000E+00, 0.6141700E+00, &
     & 0.6255800E+00, 0.6287000E+00, 0.6362900E+00, 0.6666900E+00, &
     & 0.6319200E+00, 0.5577500E+00, 0.4829100E+00, 0.4829100E+00 /
      data (ref_adm(32,iz,13,11),iz = 1,20) / &
     & 0.5560700E+00, 0.5560700E+00, 0.5637900E+00, 0.5634400E+00, &
     & 0.5587300E+00, 0.5624300E+00, 0.5682300E+00, 0.5790200E+00, &
     & 0.5995900E+00, 0.6198800E+00, 0.6174600E+00, 0.6098000E+00, &
     & 0.6177500E+00, 0.6174100E+00, 0.6213200E+00, 0.6290900E+00, &
     & 0.6175000E+00, 0.5514500E+00, 0.4726300E+00, 0.4726300E+00 /
      data (ref_adm(32,iz,14,11),iz = 1,20) / &
     & 0.5552100E+00, 0.5552100E+00, 0.5558900E+00, 0.5566300E+00, &
     & 0.5621200E+00, 0.5642000E+00, 0.5699900E+00, 0.5718900E+00, &
     & 0.5851000E+00, 0.5965100E+00, 0.6106600E+00, 0.6205700E+00, &
     & 0.6289400E+00, 0.6303400E+00, 0.5950700E+00, 0.6002400E+00, &
     & 0.6029900E+00, 0.5297200E+00, 0.4384700E+00, 0.4384700E+00 /
      data (ref_adm(32,iz,15,11),iz = 1,20) / &
     & 0.5258700E+00, 0.5258700E+00, 0.5162500E+00, 0.5147500E+00, &
     & 0.5122100E+00, 0.5169100E+00, 0.5261300E+00, 0.5303700E+00, &
     & 0.5433100E+00, 0.5617400E+00, 0.5852200E+00, 0.5977400E+00, &
     & 0.6061000E+00, 0.6037400E+00, 0.5771300E+00, 0.5911500E+00, &
     & 0.5834600E+00, 0.5126200E+00, 0.4419900E+00, 0.4419900E+00 /
      data (ref_adm(32,iz,16,11),iz = 1,20) / &
     & 0.5467200E+00, 0.5467200E+00, 0.5669300E+00, 0.5407100E+00, &
     & 0.5497200E+00, 0.5572200E+00, 0.5508100E+00, 0.5656700E+00, &
     & 0.5466400E+00, 0.5662000E+00, 0.5644200E+00, 0.5634500E+00, &
     & 0.5985900E+00, 0.5716500E+00, 0.5877400E+00, 0.5979100E+00, &
     & 0.5891900E+00, 0.5604700E+00, 0.4864693E+00, 0.4864693E+00 /
      data (ref_adm(32,iz,17,11),iz = 1,20) / &
     & 0.5490600E+00, 0.5490600E+00, 0.5528500E+00, 0.5586600E+00, &
     & 0.5577200E+00, 0.5614600E+00, 0.5612700E+00, 0.5745900E+00, &
     & 0.5760900E+00, 0.5862800E+00, 0.5865800E+00, 0.5712000E+00, &
     & 0.5811300E+00, 0.5639000E+00, 0.5863100E+00, 0.5936900E+00, &
     & 0.5422100E+00, 0.5621300E+00, 0.4760594E+00, 0.4760594E+00 /
      data (ref_adm(32,iz,18,11),iz = 1,20) / &
     & 0.5546900E+00, 0.5546900E+00, 0.5551400E+00, 0.5424700E+00, &
     & 0.5639700E+00, 0.5556200E+00, 0.5528600E+00, 0.5644900E+00, &
     & 0.5602000E+00, 0.5821400E+00, 0.5903700E+00, 0.5960200E+00, &
     & 0.6017800E+00, 0.5580800E+00, 0.5558300E+00, 0.5472000E+00, &
     & 0.5714900E+00, 0.5158252E+00, 0.4276871E+00, 0.4276871E+00 /
      data (ref_adm(32,iz,19,11),iz = 1,20) / &
     & 0.5481100E+00, 0.5481100E+00, 0.5285800E+00, 0.5362100E+00, &
     & 0.5542500E+00, 0.5515300E+00, 0.5756200E+00, 0.5664000E+00, &
     & 0.5765300E+00, 0.5697000E+00, 0.5723600E+00, 0.5683900E+00, &
     & 0.5921600E+00, 0.5951700E+00, 0.5586200E+00, 0.5474000E+00, &
     & 0.5631300E+00, 0.5075178E+00, 0.4227631E+00, 0.4227631E+00 /
      data (ref_adm(32,iz,20,11),iz = 1,20) / &
     & 0.5327500E+00, 0.5327500E+00, 0.5349500E+00, 0.5418800E+00, &
     & 0.5358300E+00, 0.5399400E+00, 0.5324900E+00, 0.5395400E+00, &
     & 0.5411400E+00, 0.5557200E+00, 0.5607000E+00, 0.5794000E+00, &
     & 0.5909100E+00, 0.5615500E+00, 0.5590300E+00, 0.4863000E+00, &
     & 0.5388314E+00, 0.5008398E+00, 0.4199561E+00, 0.4199561E+00 /
      data (ref_adm(32,iz,21,11),iz = 1,20) / &
     & 0.5509000E+00, 0.5509000E+00, 0.5732200E+00, 0.5740100E+00, &
     & 0.5540900E+00, 0.5532500E+00, 0.5596100E+00, 0.5506800E+00, &
     & 0.5657100E+00, 0.5618300E+00, 0.5470800E+00, 0.5757400E+00, &
     & 0.5757900E+00, 0.5342500E+00, 0.5394000E+00, 0.5770100E+00, &
     & 0.5326319E+00, 0.4950343E+00, 0.4184842E+00, 0.4184842E+00 /
      data (ref_adm(32,iz,22,11),iz = 1,20) / &
     & 0.5638500E+00, 0.5638500E+00, 0.5602300E+00, 0.5645000E+00, &
     & 0.5752700E+00, 0.5696400E+00, 0.5674600E+00, 0.5585000E+00, &
     & 0.5607600E+00, 0.5841600E+00, 0.6045200E+00, 0.5952000E+00, &
     & 0.6050200E+00, 0.5897400E+00, 0.5676700E+00, 0.5769400E+00, &
     & 0.5241906E+00, 0.4863436E+00, 0.4114240E+00, 0.4114240E+00 /
      data (ref_adm(32,iz,23,11),iz = 1,20) / &
     & 0.5472600E+00, 0.5472600E+00, 0.5548300E+00, 0.5580500E+00, &
     & 0.5579400E+00, 0.5580500E+00, 0.5677800E+00, 0.5720300E+00, &
     & 0.5680800E+00, 0.5725000E+00, 0.5718000E+00, 0.5718800E+00, &
     & 0.5645900E+00, 0.5503600E+00, 0.5640300E+00, 0.5704000E+00, &
     & 0.6015000E+00, 0.4829506E+00, 0.4122513E+00, 0.4122513E+00 /
      data (ref_adm(32,iz,24,11),iz = 1,20) / &
     & 0.5354300E+00, 0.5354300E+00, 0.5243700E+00, 0.5361600E+00, &
     & 0.5477000E+00, 0.5624500E+00, 0.5549700E+00, 0.5874900E+00, &
     & 0.5788100E+00, 0.5732100E+00, 0.5965600E+00, 0.5755000E+00, &
     & 0.5645500E+00, 0.5600800E+00, 0.5588300E+00, 0.5647500E+00, &
     & 0.5404000E+00, 0.4813248E+00, 0.4141702E+00, 0.4141702E+00 /
      data (ref_adm(32,iz,25,11),iz = 1,20) / &
     & 0.5175600E+00, 0.5175600E+00, 0.5178600E+00, 0.5305500E+00, &
     & 0.5366400E+00, 0.5389900E+00, 0.5600200E+00, 0.5615300E+00, &
     & 0.5584100E+00, 0.5666500E+00, 0.5675800E+00, 0.5748800E+00, &
     & 0.5841200E+00, 0.5656100E+00, 0.5545000E+00, 0.5496700E+00, &
     & 0.5435900E+00, 0.5500200E+00, 0.4172850E+00, 0.4172850E+00 /
      data (ref_adm(32,iz,26,11),iz = 1,20) / &
     & 0.5502300E+00, 0.5502300E+00, 0.5596800E+00, 0.5680500E+00, &
     & 0.5761300E+00, 0.5814300E+00, 0.5808100E+00, 0.5819300E+00, &
     & 0.5911300E+00, 0.5760200E+00, 0.5698700E+00, 0.5665300E+00, &
     & 0.5659100E+00, 0.5689400E+00, 0.5526100E+00, 0.5381600E+00, &
     & 0.5271700E+00, 0.4976100E+00, 0.3794000E+00, 0.3794000E+00 /
      data (ref_adm(32,iz,27,11),iz = 1,20) / &
     & 0.5583200E+00, 0.5583200E+00, 0.5711800E+00, 0.5747200E+00, &
     & 0.5816300E+00, 0.5972200E+00, 0.6034200E+00, 0.6056000E+00, &
     & 0.6101000E+00, 0.6151300E+00, 0.6130600E+00, 0.6127000E+00, &
     & 0.6036800E+00, 0.5851000E+00, 0.5756700E+00, 0.5516800E+00, &
     & 0.5257000E+00, 0.4877700E+00, 0.4327400E+00, 0.4327400E+00 /
      data (ref_adm(32,iz,28,11),iz = 1,20) / &
     & 0.5562400E+00, 0.5562400E+00, 0.5693900E+00, 0.5595600E+00, &
     & 0.5666400E+00, 0.5771600E+00, 0.5702400E+00, 0.6017100E+00, &
     & 0.6242800E+00, 0.6309800E+00, 0.6302000E+00, 0.6203800E+00, &
     & 0.6256800E+00, 0.6214100E+00, 0.5938400E+00, 0.5686300E+00, &
     & 0.5448800E+00, 0.5130600E+00, 0.4241200E+00, 0.4241200E+00 /
      data (ref_adm(32,iz,29,11),iz = 1,20) / &
     & 0.5627800E+00, 0.5627800E+00, 0.5736500E+00, 0.5668400E+00, &
     & 0.5870300E+00, 0.5952600E+00, 0.5883000E+00, 0.5879500E+00, &
     & 0.5927700E+00, 0.6033400E+00, 0.6125000E+00, 0.6067800E+00, &
     & 0.6087400E+00, 0.6108400E+00, 0.5882000E+00, 0.5871900E+00, &
     & 0.5506100E+00, 0.5120800E+00, 0.4097400E+00, 0.4097400E+00 /
      data (ref_adm(32,iz,30,11),iz = 1,20) / &
     & 0.5391500E+00, 0.5391500E+00, 0.5530900E+00, 0.5722500E+00, &
     & 0.5897100E+00, 0.5911700E+00, 0.5867500E+00, 0.6018400E+00, &
     & 0.5956300E+00, 0.6085500E+00, 0.6081700E+00, 0.6154200E+00, &
     & 0.6040900E+00, 0.6080400E+00, 0.6067700E+00, 0.6000500E+00, &
     & 0.5558000E+00, 0.5215900E+00, 0.4176700E+00, 0.4176700E+00 /
      data (ref_adm(32,iz,31,11),iz = 1,20) / &
     & 0.5418200E+00, 0.5418200E+00, 0.5624600E+00, 0.5844400E+00, &
     & 0.5934100E+00, 0.5981600E+00, 0.5978100E+00, 0.6140700E+00, &
     & 0.6133500E+00, 0.6186200E+00, 0.6216800E+00, 0.6327000E+00, &
     & 0.6314300E+00, 0.6200500E+00, 0.6109400E+00, 0.5947500E+00, &
     & 0.5688200E+00, 0.5183500E+00, 0.4111200E+00, 0.4111200E+00 /
      data (ref_adm(32,iz,32,11),iz = 1,20) / &
     & 0.5536900E+00, 0.5536900E+00, 0.5627800E+00, 0.5702600E+00, &
     & 0.5800500E+00, 0.5886400E+00, 0.5894500E+00, 0.5921400E+00, &
     & 0.5995400E+00, 0.6028300E+00, 0.6076100E+00, 0.6086500E+00, &
     & 0.6038700E+00, 0.6087900E+00, 0.6140600E+00, 0.6103800E+00, &
     & 0.5859300E+00, 0.5259800E+00, 0.4067900E+00, 0.4067900E+00 /
      data (ref_adm(32,iz,33,11),iz = 1,20) / &
     & 0.5410300E+00, 0.5410300E+00, 0.5648400E+00, 0.5628400E+00, &
     & 0.5772500E+00, 0.5839500E+00, 0.5896300E+00, 0.5743300E+00, &
     & 0.5898800E+00, 0.5923300E+00, 0.6092300E+00, 0.6056900E+00, &
     & 0.6092900E+00, 0.6114000E+00, 0.6128100E+00, 0.6093500E+00, &
     & 0.5857900E+00, 0.5250900E+00, 0.3998400E+00, 0.3998400E+00 /
      data (ref_adm(32,iz,34,11),iz = 1,20) / &
     & 0.5425800E+00, 0.5425800E+00, 0.5306000E+00, 0.5670500E+00, &
     & 0.5903600E+00, 0.5874500E+00, 0.5684600E+00, 0.5937700E+00, &
     & 0.5967000E+00, 0.5833700E+00, 0.6023800E+00, 0.6188100E+00, &
     & 0.6142200E+00, 0.6144500E+00, 0.6127300E+00, 0.5956900E+00, &
     & 0.5753500E+00, 0.5209400E+00, 0.4087600E+00, 0.4087600E+00 /
      data (ref_adm(32,iz,35,11),iz = 1,20) / &
     & 0.5428100E+00, 0.5428100E+00, 0.5476500E+00, 0.5630600E+00, &
     & 0.5580500E+00, 0.5541800E+00, 0.5778000E+00, 0.6003600E+00, &
     & 0.6053600E+00, 0.6038200E+00, 0.6065200E+00, 0.6401300E+00, &
     & 0.6303700E+00, 0.6276900E+00, 0.6107900E+00, 0.5903500E+00, &
     & 0.5660000E+00, 0.5194400E+00, 0.3995700E+00, 0.3995700E+00 /
      data (ref_adm(32,iz,36,11),iz = 1,20) / &
     & 0.5450800E+00, 0.5450800E+00, 0.5502600E+00, 0.5568800E+00, &
     & 0.5527200E+00, 0.5678200E+00, 0.5895000E+00, 0.5826800E+00, &
     & 0.5936000E+00, 0.6086800E+00, 0.6212300E+00, 0.6473600E+00, &
     & 0.6447300E+00, 0.6437000E+00, 0.6099300E+00, 0.5930800E+00, &
     & 0.5668700E+00, 0.5165500E+00, 0.4332600E+00, 0.4332600E+00 /
      data (ref_adm(32,iz,37,11),iz = 1,20) / &
     & 0.5346700E+00, 0.5346700E+00, 0.5283700E+00, 0.5414100E+00, &
     & 0.5638500E+00, 0.5774700E+00, 0.5625600E+00, 0.5689900E+00, &
     & 0.5991000E+00, 0.6267700E+00, 0.6317500E+00, 0.6549200E+00, &
     & 0.6558400E+00, 0.6430100E+00, 0.6156100E+00, 0.6099800E+00, &
     & 0.5501600E+00, 0.5126300E+00, 0.4859380E+00, 0.4859380E+00 /
      data (ref_adm(32,iz,38,11),iz = 1,20) / &
     & 0.5346700E+00, 0.5346700E+00, 0.5283700E+00, 0.5414100E+00, &
     & 0.5638500E+00, 0.5774700E+00, 0.5625600E+00, 0.5689900E+00, &
     & 0.5991000E+00, 0.6267700E+00, 0.6317500E+00, 0.6549200E+00, &
     & 0.6558400E+00, 0.6430100E+00, 0.6156100E+00, 0.6099800E+00, &
     & 0.5501600E+00, 0.5126300E+00, 0.4859380E+00, 0.4859380E+00 /
! Solar Zenith Angle 55.0 Albedo  0.5899534E+00
      data (ref_adm(32,iz, 1,12),iz = 1,20) / &
     & 0.5167200E+00, 0.5167200E+00, 0.5038100E+00, 0.5097300E+00, &
     & 0.5033700E+00, 0.5323300E+00, 0.5573900E+00, 0.5680000E+00, &
     & 0.5961900E+00, 0.6286100E+00, 0.6490200E+00, 0.7145800E+00, &
     & 0.7969800E+00, 0.8311900E+00, 0.8794000E+00, 0.9548600E+00, &
     & 0.1018200E+01, 0.1011000E+01, 0.9153200E+00, 0.9153200E+00 /
      data (ref_adm(32,iz, 2,12),iz = 1,20) / &
     & 0.5167200E+00, 0.5167200E+00, 0.5038100E+00, 0.5097300E+00, &
     & 0.5033700E+00, 0.5323300E+00, 0.5573900E+00, 0.5680000E+00, &
     & 0.5961900E+00, 0.6286100E+00, 0.6490200E+00, 0.7145800E+00, &
     & 0.7969800E+00, 0.8311900E+00, 0.8794000E+00, 0.9548600E+00, &
     & 0.1018200E+01, 0.1011000E+01, 0.9153200E+00, 0.9153200E+00 /
      data (ref_adm(32,iz, 3,12),iz = 1,20) / &
     & 0.5159800E+00, 0.5159800E+00, 0.5196600E+00, 0.5096400E+00, &
     & 0.5289400E+00, 0.5313000E+00, 0.5539500E+00, 0.5744200E+00, &
     & 0.6005400E+00, 0.6300800E+00, 0.6643200E+00, 0.7092200E+00, &
     & 0.7605500E+00, 0.8205000E+00, 0.8740100E+00, 0.9457100E+00, &
     & 0.1008700E+01, 0.9978600E+00, 0.8571200E+00, 0.8571200E+00 /
      data (ref_adm(32,iz, 4,12),iz = 1,20) / &
     & 0.5080100E+00, 0.5080100E+00, 0.5114900E+00, 0.5296800E+00, &
     & 0.5211100E+00, 0.5404300E+00, 0.5546800E+00, 0.5722600E+00, &
     & 0.5909600E+00, 0.6248500E+00, 0.6546500E+00, 0.6871300E+00, &
     & 0.7396600E+00, 0.8061400E+00, 0.8661200E+00, 0.9321400E+00, &
     & 0.9646000E+00, 0.9550800E+00, 0.8616000E+00, 0.8616000E+00 /
      data (ref_adm(32,iz, 5,12),iz = 1,20) / &
     & 0.5138400E+00, 0.5138400E+00, 0.5067000E+00, 0.5195800E+00, &
     & 0.5330900E+00, 0.5386000E+00, 0.5514200E+00, 0.5597400E+00, &
     & 0.5899500E+00, 0.6282200E+00, 0.6618900E+00, 0.6958700E+00, &
     & 0.7312900E+00, 0.8027500E+00, 0.8392700E+00, 0.9015000E+00, &
     & 0.9262600E+00, 0.9172100E+00, 0.7809600E+00, 0.7809600E+00 /
      data (ref_adm(32,iz, 6,12),iz = 1,20) / &
     & 0.5075000E+00, 0.5075000E+00, 0.5189700E+00, 0.5163300E+00, &
     & 0.5201900E+00, 0.5330200E+00, 0.5491900E+00, 0.5608800E+00, &
     & 0.5823900E+00, 0.6176600E+00, 0.6460500E+00, 0.6824300E+00, &
     & 0.7245500E+00, 0.7704500E+00, 0.8170200E+00, 0.8700200E+00, &
     & 0.9054400E+00, 0.8910100E+00, 0.7459900E+00, 0.7459900E+00 /
      data (ref_adm(32,iz, 7,12),iz = 1,20) / &
     & 0.5027700E+00, 0.5027700E+00, 0.5060400E+00, 0.5105800E+00, &
     & 0.5161400E+00, 0.5279800E+00, 0.5344000E+00, 0.5482700E+00, &
     & 0.5831800E+00, 0.6020300E+00, 0.6286200E+00, 0.6566500E+00, &
     & 0.6991100E+00, 0.7352900E+00, 0.7901400E+00, 0.8372900E+00, &
     & 0.8477100E+00, 0.8078900E+00, 0.7161100E+00, 0.7161100E+00 /
      data (ref_adm(32,iz, 8,12),iz = 1,20) / &
     & 0.5313700E+00, 0.5313700E+00, 0.5290700E+00, 0.5278300E+00, &
     & 0.5266600E+00, 0.5332800E+00, 0.5407100E+00, 0.5577400E+00, &
     & 0.5737100E+00, 0.5989500E+00, 0.6350600E+00, 0.6665400E+00, &
     & 0.6961200E+00, 0.7334100E+00, 0.7729900E+00, 0.8149900E+00, &
     & 0.8284100E+00, 0.7868700E+00, 0.6458000E+00, 0.6458000E+00 /
      data (ref_adm(32,iz, 9,12),iz = 1,20) / &
     & 0.5192500E+00, 0.5192500E+00, 0.5235100E+00, 0.5104900E+00, &
     & 0.5141800E+00, 0.5328700E+00, 0.5328200E+00, 0.5599000E+00, &
     & 0.5829600E+00, 0.5835900E+00, 0.6204000E+00, 0.6543600E+00, &
     & 0.6855300E+00, 0.7145100E+00, 0.7424200E+00, 0.7695000E+00, &
     & 0.7950100E+00, 0.7498600E+00, 0.6213800E+00, 0.6213800E+00 /
      data (ref_adm(32,iz,10,12),iz = 1,20) / &
     & 0.5147600E+00, 0.5147600E+00, 0.5225600E+00, 0.5188200E+00, &
     & 0.5213100E+00, 0.5335600E+00, 0.5346100E+00, 0.5597700E+00, &
     & 0.5589900E+00, 0.5845700E+00, 0.6094800E+00, 0.6349800E+00, &
     & 0.6639100E+00, 0.6809800E+00, 0.7001300E+00, 0.7250000E+00, &
     & 0.7471900E+00, 0.7057000E+00, 0.5774300E+00, 0.5774300E+00 /
      data (ref_adm(32,iz,11,12),iz = 1,20) / &
     & 0.5066200E+00, 0.5066200E+00, 0.5112300E+00, 0.5181600E+00, &
     & 0.5228100E+00, 0.5300200E+00, 0.5405600E+00, 0.5444600E+00, &
     & 0.5627000E+00, 0.5810900E+00, 0.5971300E+00, 0.6244200E+00, &
     & 0.6483000E+00, 0.6770100E+00, 0.6820200E+00, 0.7038200E+00, &
     & 0.7062100E+00, 0.6742600E+00, 0.5429400E+00, 0.5429400E+00 /
      data (ref_adm(32,iz,12,12),iz = 1,20) / &
     & 0.5194800E+00, 0.5194800E+00, 0.5194700E+00, 0.5136900E+00, &
     & 0.5315700E+00, 0.5403700E+00, 0.5474300E+00, 0.5551800E+00, &
     & 0.5577700E+00, 0.5839000E+00, 0.5973900E+00, 0.6117700E+00, &
     & 0.6324700E+00, 0.6600600E+00, 0.6600000E+00, 0.6798000E+00, &
     & 0.6686400E+00, 0.6381500E+00, 0.5287500E+00, 0.5287500E+00 /
      data (ref_adm(32,iz,13,12),iz = 1,20) / &
     & 0.5168100E+00, 0.5168100E+00, 0.5509000E+00, 0.5547400E+00, &
     & 0.5596900E+00, 0.5701400E+00, 0.5495100E+00, 0.5501700E+00, &
     & 0.5609900E+00, 0.5619600E+00, 0.5781200E+00, 0.6064900E+00, &
     & 0.6216300E+00, 0.6484300E+00, 0.6511100E+00, 0.6493700E+00, &
     & 0.6457200E+00, 0.6053200E+00, 0.4989900E+00, 0.4989900E+00 /
      data (ref_adm(32,iz,14,12),iz = 1,20) / &
     & 0.5343400E+00, 0.5343400E+00, 0.5287700E+00, 0.5302800E+00, &
     & 0.5351300E+00, 0.5457700E+00, 0.5500700E+00, 0.5603400E+00, &
     & 0.5730900E+00, 0.5870200E+00, 0.5963100E+00, 0.6103000E+00, &
     & 0.6224300E+00, 0.6362000E+00, 0.6230700E+00, 0.6466200E+00, &
     & 0.6245200E+00, 0.5510500E+00, 0.4894100E+00, 0.4894100E+00 /
      data (ref_adm(32,iz,15,12),iz = 1,20) / &
     & 0.5048400E+00, 0.5048400E+00, 0.4933200E+00, 0.4951700E+00, &
     & 0.5032300E+00, 0.5120200E+00, 0.5222900E+00, 0.5248200E+00, &
     & 0.5372000E+00, 0.5597600E+00, 0.5768500E+00, 0.6017600E+00, &
     & 0.6197800E+00, 0.6224300E+00, 0.6041600E+00, 0.6075500E+00, &
     & 0.6052600E+00, 0.5387800E+00, 0.4944600E+00, 0.4944600E+00 /
      data (ref_adm(32,iz,16,12),iz = 1,20) / &
     & 0.5085700E+00, 0.5085700E+00, 0.5028000E+00, 0.5133600E+00, &
     & 0.5256500E+00, 0.5357200E+00, 0.5447600E+00, 0.5324000E+00, &
     & 0.5342900E+00, 0.5380100E+00, 0.5652500E+00, 0.5785000E+00, &
     & 0.5964100E+00, 0.5899600E+00, 0.5968000E+00, 0.5980900E+00, &
     & 0.5764800E+00, 0.5337600E+00, 0.5248426E+00, 0.5248426E+00 /
      data (ref_adm(32,iz,17,12),iz = 1,20) / &
     & 0.5176500E+00, 0.5176500E+00, 0.5218900E+00, 0.5365700E+00, &
     & 0.5298000E+00, 0.5339700E+00, 0.5433500E+00, 0.5334300E+00, &
     & 0.5334800E+00, 0.5496300E+00, 0.5487500E+00, 0.5750000E+00, &
     & 0.5840700E+00, 0.5859400E+00, 0.5919200E+00, 0.5831200E+00, &
     & 0.5915800E+00, 0.6070100E+00, 0.5119930E+00, 0.5119930E+00 /
      data (ref_adm(32,iz,18,12),iz = 1,20) / &
     & 0.5137500E+00, 0.5137500E+00, 0.5258100E+00, 0.5301400E+00, &
     & 0.5267300E+00, 0.5370800E+00, 0.5426200E+00, 0.5325000E+00, &
     & 0.5373400E+00, 0.5546000E+00, 0.5540500E+00, 0.5702600E+00, &
     & 0.5896100E+00, 0.5832800E+00, 0.5888800E+00, 0.5837700E+00, &
     & 0.5645100E+00, 0.5533335E+00, 0.4687442E+00, 0.4687442E+00 /
      data (ref_adm(32,iz,19,12),iz = 1,20) / &
     & 0.5224500E+00, 0.5224500E+00, 0.5322600E+00, 0.5348800E+00, &
     & 0.5334000E+00, 0.5343100E+00, 0.5314700E+00, 0.5352500E+00, &
     & 0.5361000E+00, 0.5427300E+00, 0.5565800E+00, 0.5502000E+00, &
     & 0.5710200E+00, 0.5665800E+00, 0.5584500E+00, 0.5575300E+00, &
     & 0.6112100E+00, 0.5440368E+00, 0.4619009E+00, 0.4619009E+00 /
      data (ref_adm(32,iz,20,12),iz = 1,20) / &
     & 0.5190200E+00, 0.5190200E+00, 0.5163100E+00, 0.5159500E+00, &
     & 0.5169500E+00, 0.5164400E+00, 0.5206400E+00, 0.5226600E+00, &
     & 0.5355300E+00, 0.5295200E+00, 0.5454300E+00, 0.5468300E+00, &
     & 0.5607800E+00, 0.5658300E+00, 0.5808200E+00, 0.5447100E+00, &
     & 0.5620409E+00, 0.5362093E+00, 0.4577458E+00, 0.4577458E+00 /
      data (ref_adm(32,iz,21,12),iz = 1,20) / &
     & 0.5324400E+00, 0.5324400E+00, 0.5323300E+00, 0.5362800E+00, &
     & 0.5332100E+00, 0.5320200E+00, 0.5362600E+00, 0.5436600E+00, &
     & 0.5464300E+00, 0.5397100E+00, 0.5479400E+00, 0.5506600E+00, &
     & 0.5518600E+00, 0.5522200E+00, 0.5618500E+00, 0.5952800E+00, &
     & 0.5542225E+00, 0.5285906E+00, 0.4550340E+00, 0.4550340E+00 /
      data (ref_adm(32,iz,22,12),iz = 1,20) / &
     & 0.5288500E+00, 0.5288500E+00, 0.5281800E+00, 0.5317900E+00, &
     & 0.5316000E+00, 0.5429400E+00, 0.5349100E+00, 0.5549600E+00, &
     & 0.5572400E+00, 0.5500900E+00, 0.5731400E+00, 0.5622300E+00, &
     & 0.5626400E+00, 0.5718700E+00, 0.5609800E+00, 0.5742300E+00, &
     & 0.5220003E+00, 0.4886437E+00, 0.4240037E+00, 0.4240037E+00 /
      data (ref_adm(32,iz,23,12),iz = 1,20) / &
     & 0.5206800E+00, 0.5206800E+00, 0.5265100E+00, 0.5238400E+00, &
     & 0.5217100E+00, 0.5464200E+00, 0.5395800E+00, 0.5402200E+00, &
     & 0.5470800E+00, 0.5549000E+00, 0.5491400E+00, 0.5595100E+00, &
     & 0.5688500E+00, 0.5718900E+00, 0.5565400E+00, 0.5493800E+00, &
     & 0.6363800E+00, 0.4859534E+00, 0.4258801E+00, 0.4258801E+00 /
      data (ref_adm(32,iz,24,12),iz = 1,20) / &
     & 0.5172300E+00, 0.5172300E+00, 0.5053500E+00, 0.5053200E+00, &
     & 0.5203000E+00, 0.5267100E+00, 0.5394400E+00, 0.5379100E+00, &
     & 0.5491700E+00, 0.5595400E+00, 0.5500000E+00, 0.5579700E+00, &
     & 0.5521800E+00, 0.5673100E+00, 0.5675600E+00, 0.5493500E+00, &
     & 0.5636100E+00, 0.4854899E+00, 0.4293549E+00, 0.4293549E+00 /
      data (ref_adm(32,iz,25,12),iz = 1,20) / &
     & 0.5043100E+00, 0.5043100E+00, 0.5090000E+00, 0.5122400E+00, &
     & 0.5170600E+00, 0.5185700E+00, 0.5296100E+00, 0.5278600E+00, &
     & 0.5322200E+00, 0.5428500E+00, 0.5477300E+00, 0.5582700E+00, &
     & 0.5605900E+00, 0.5634400E+00, 0.5552100E+00, 0.5554700E+00, &
     & 0.5656600E+00, 0.5713000E+00, 0.4342605E+00, 0.4342605E+00 /
      data (ref_adm(32,iz,26,12),iz = 1,20) / &
     & 0.5205400E+00, 0.5205400E+00, 0.5382100E+00, 0.5437100E+00, &
     & 0.5487700E+00, 0.5514200E+00, 0.5576400E+00, 0.5681800E+00, &
     & 0.5746600E+00, 0.5756200E+00, 0.5807200E+00, 0.5857700E+00, &
     & 0.5692800E+00, 0.5601200E+00, 0.5673700E+00, 0.5704500E+00, &
     & 0.5601200E+00, 0.5145200E+00, 0.4406941E+00, 0.4406941E+00 /
      data (ref_adm(32,iz,27,12),iz = 1,20) / &
     & 0.5293200E+00, 0.5293200E+00, 0.5472700E+00, 0.5393300E+00, &
     & 0.5471100E+00, 0.5614100E+00, 0.5698900E+00, 0.5761400E+00, &
     & 0.5918700E+00, 0.5944100E+00, 0.6008500E+00, 0.6070300E+00, &
     & 0.6030200E+00, 0.6011100E+00, 0.5870400E+00, 0.5703700E+00, &
     & 0.5488100E+00, 0.5254400E+00, 0.4347100E+00, 0.4347100E+00 /
      data (ref_adm(32,iz,28,12),iz = 1,20) / &
     & 0.5240100E+00, 0.5240100E+00, 0.5274200E+00, 0.5309500E+00, &
     & 0.5261800E+00, 0.5404100E+00, 0.5476700E+00, 0.5490900E+00, &
     & 0.5580400E+00, 0.5798800E+00, 0.5924200E+00, 0.6096100E+00, &
     & 0.6179100E+00, 0.6209700E+00, 0.6076400E+00, 0.5786600E+00, &
     & 0.5587700E+00, 0.5164600E+00, 0.4309300E+00, 0.4309300E+00 /
      data (ref_adm(32,iz,29,12),iz = 1,20) / &
     & 0.5243700E+00, 0.5243700E+00, 0.5034900E+00, 0.5296600E+00, &
     & 0.5447600E+00, 0.5402700E+00, 0.5602800E+00, 0.5592400E+00, &
     & 0.5712900E+00, 0.5836800E+00, 0.6005400E+00, 0.5964200E+00, &
     & 0.6068400E+00, 0.6068100E+00, 0.6111800E+00, 0.5965600E+00, &
     & 0.5659600E+00, 0.5248500E+00, 0.4330100E+00, 0.4330100E+00 /
      data (ref_adm(32,iz,30,12),iz = 1,20) / &
     & 0.5257000E+00, 0.5257000E+00, 0.5191000E+00, 0.5320400E+00, &
     & 0.5479300E+00, 0.5637800E+00, 0.5626800E+00, 0.5786500E+00, &
     & 0.5755700E+00, 0.5815800E+00, 0.5921400E+00, 0.5983800E+00, &
     & 0.6041200E+00, 0.6065500E+00, 0.6056900E+00, 0.6025700E+00, &
     & 0.5916900E+00, 0.5464900E+00, 0.4442800E+00, 0.4442800E+00 /
      data (ref_adm(32,iz,31,12),iz = 1,20) / &
     & 0.5221600E+00, 0.5221600E+00, 0.5369100E+00, 0.5431600E+00, &
     & 0.5490200E+00, 0.5735800E+00, 0.5720900E+00, 0.5782600E+00, &
     & 0.5871500E+00, 0.5976300E+00, 0.6071600E+00, 0.6134500E+00, &
     & 0.6034700E+00, 0.6067000E+00, 0.6068100E+00, 0.5953900E+00, &
     & 0.5956600E+00, 0.5557000E+00, 0.4569700E+00, 0.4569700E+00 /
      data (ref_adm(32,iz,32,12),iz = 1,20) / &
     & 0.5182100E+00, 0.5182100E+00, 0.5207000E+00, 0.5182600E+00, &
     & 0.5360200E+00, 0.5458200E+00, 0.5613500E+00, 0.5765000E+00, &
     & 0.5698900E+00, 0.5769100E+00, 0.5873100E+00, 0.6017800E+00, &
     & 0.6027100E+00, 0.6097600E+00, 0.6079000E+00, 0.6048600E+00, &
     & 0.5963500E+00, 0.5627200E+00, 0.4570800E+00, 0.4570800E+00 /
      data (ref_adm(32,iz,33,12),iz = 1,20) / &
     & 0.5028100E+00, 0.5028100E+00, 0.5033400E+00, 0.5123400E+00, &
     & 0.5296400E+00, 0.5511900E+00, 0.5542900E+00, 0.5586000E+00, &
     & 0.5660600E+00, 0.5663300E+00, 0.5822600E+00, 0.5877900E+00, &
     & 0.5935400E+00, 0.6048800E+00, 0.6061200E+00, 0.5950800E+00, &
     & 0.5793000E+00, 0.5452600E+00, 0.4509200E+00, 0.4509200E+00 /
      data (ref_adm(32,iz,34,12),iz = 1,20) / &
     & 0.5045100E+00, 0.5045100E+00, 0.5152000E+00, 0.5420900E+00, &
     & 0.5442800E+00, 0.5571600E+00, 0.5632100E+00, 0.5671700E+00, &
     & 0.5621200E+00, 0.5731500E+00, 0.5816800E+00, 0.5996800E+00, &
     & 0.6133200E+00, 0.6239500E+00, 0.6235400E+00, 0.6023400E+00, &
     & 0.5952700E+00, 0.5615000E+00, 0.4470500E+00, 0.4470500E+00 /
      data (ref_adm(32,iz,35,12),iz = 1,20) / &
     & 0.5095800E+00, 0.5095800E+00, 0.5140400E+00, 0.5362600E+00, &
     & 0.5513400E+00, 0.5526600E+00, 0.5575300E+00, 0.5562600E+00, &
     & 0.5666900E+00, 0.5757700E+00, 0.5910900E+00, 0.6074600E+00, &
     & 0.6115700E+00, 0.6142900E+00, 0.6232100E+00, 0.6078300E+00, &
     & 0.5907900E+00, 0.5553900E+00, 0.4443700E+00, 0.4443700E+00 /
      data (ref_adm(32,iz,36,12),iz = 1,20) / &
     & 0.5239100E+00, 0.5239100E+00, 0.5271500E+00, 0.5388100E+00, &
     & 0.5538500E+00, 0.5554200E+00, 0.5458100E+00, 0.5590900E+00, &
     & 0.5635800E+00, 0.5863000E+00, 0.5928400E+00, 0.6048200E+00, &
     & 0.6189100E+00, 0.6222300E+00, 0.6319000E+00, 0.6133200E+00, &
     & 0.5873200E+00, 0.5471800E+00, 0.4224300E+00, 0.4224300E+00 /
      data (ref_adm(32,iz,37,12),iz = 1,20) / &
     & 0.5272400E+00, 0.5272400E+00, 0.5335400E+00, 0.5376800E+00, &
     & 0.5529300E+00, 0.5487200E+00, 0.5454500E+00, 0.5440800E+00, &
     & 0.5672200E+00, 0.5816400E+00, 0.5950900E+00, 0.6106100E+00, &
     & 0.6432000E+00, 0.6355700E+00, 0.6259800E+00, 0.6163200E+00, &
     & 0.5944800E+00, 0.5410600E+00, 0.5274703E+00, 0.5274703E+00 /
      data (ref_adm(32,iz,38,12),iz = 1,20) / &
     & 0.5272400E+00, 0.5272400E+00, 0.5335400E+00, 0.5376800E+00, &
     & 0.5529300E+00, 0.5487200E+00, 0.5454500E+00, 0.5440800E+00, &
     & 0.5672200E+00, 0.5816400E+00, 0.5950900E+00, 0.6106100E+00, &
     & 0.6432000E+00, 0.6355700E+00, 0.6259800E+00, 0.6163200E+00, &
     & 0.5944800E+00, 0.5410600E+00, 0.5274703E+00, 0.5274703E+00 /
! Solar Zenith Angle 60.0 Albedo  0.6011243E+00
      data (ref_adm(32,iz, 1,13),iz = 1,20) / &
     & 0.5117400E+00, 0.5117400E+00, 0.5107000E+00, 0.5155200E+00, &
     & 0.5330100E+00, 0.5447900E+00, 0.5415600E+00, 0.5562900E+00, &
     & 0.6101400E+00, 0.6452200E+00, 0.7021300E+00, 0.7590000E+00, &
     & 0.8433200E+00, 0.9632700E+00, 0.1030500E+01, 0.1133200E+01, &
     & 0.1248300E+01, 0.1295900E+01, 0.1094100E+01, 0.1094100E+01 /
      data (ref_adm(32,iz, 2,13),iz = 1,20) / &
     & 0.5117400E+00, 0.5117400E+00, 0.5107000E+00, 0.5155200E+00, &
     & 0.5330100E+00, 0.5447900E+00, 0.5415600E+00, 0.5562900E+00, &
     & 0.6101400E+00, 0.6452200E+00, 0.7021300E+00, 0.7590000E+00, &
     & 0.8433200E+00, 0.9632700E+00, 0.1030500E+01, 0.1133200E+01, &
     & 0.1248300E+01, 0.1295900E+01, 0.1094100E+01, 0.1094100E+01 /
      data (ref_adm(32,iz, 3,13),iz = 1,20) / &
     & 0.5179300E+00, 0.5179300E+00, 0.5139700E+00, 0.5169500E+00, &
     & 0.5216200E+00, 0.5345600E+00, 0.5507700E+00, 0.5702500E+00, &
     & 0.6039600E+00, 0.6452300E+00, 0.6910200E+00, 0.7516800E+00, &
     & 0.8215100E+00, 0.9085400E+00, 0.1002300E+01, 0.1100400E+01, &
     & 0.1209200E+01, 0.1267200E+01, 0.1056400E+01, 0.1056400E+01 /
      data (ref_adm(32,iz, 4,13),iz = 1,20) / &
     & 0.5089700E+00, 0.5089700E+00, 0.5042200E+00, 0.5058900E+00, &
     & 0.5189600E+00, 0.5455100E+00, 0.5560800E+00, 0.5726800E+00, &
     & 0.6073600E+00, 0.6410800E+00, 0.6832200E+00, 0.7420300E+00, &
     & 0.8207900E+00, 0.8979300E+00, 0.9860500E+00, 0.1081400E+01, &
     & 0.1183200E+01, 0.1209200E+01, 0.1009100E+01, 0.1009100E+01 /
      data (ref_adm(32,iz, 5,13),iz = 1,20) / &
     & 0.5153400E+00, 0.5153400E+00, 0.5003300E+00, 0.5140800E+00, &
     & 0.5332300E+00, 0.5373700E+00, 0.5556700E+00, 0.5736200E+00, &
     & 0.6086200E+00, 0.6292400E+00, 0.6759400E+00, 0.7305900E+00, &
     & 0.8066500E+00, 0.8870000E+00, 0.9684700E+00, 0.1028500E+01, &
     & 0.1120000E+01, 0.1108400E+01, 0.9113200E+00, 0.9113200E+00 /
      data (ref_adm(32,iz, 6,13),iz = 1,20) / &
     & 0.5008500E+00, 0.5008500E+00, 0.5094300E+00, 0.5100200E+00, &
     & 0.5136100E+00, 0.5219200E+00, 0.5436300E+00, 0.5701900E+00, &
     & 0.5938900E+00, 0.6221200E+00, 0.6602500E+00, 0.7071800E+00, &
     & 0.7715100E+00, 0.8450300E+00, 0.9203500E+00, 0.9977700E+00, &
     & 0.1055100E+01, 0.1043200E+01, 0.8828100E+00, 0.8828100E+00 /
      data (ref_adm(32,iz, 7,13),iz = 1,20) / &
     & 0.4959500E+00, 0.4959500E+00, 0.5037700E+00, 0.5100700E+00, &
     & 0.5114600E+00, 0.5241300E+00, 0.5381800E+00, 0.5622200E+00, &
     & 0.5907300E+00, 0.6166000E+00, 0.6539200E+00, 0.6957100E+00, &
     & 0.7621000E+00, 0.8222800E+00, 0.8736800E+00, 0.9553400E+00, &
     & 0.9970200E+00, 0.9748500E+00, 0.8867000E+00, 0.8867000E+00 /
      data (ref_adm(32,iz, 8,13),iz = 1,20) / &
     & 0.5104500E+00, 0.5104500E+00, 0.5171200E+00, 0.5181000E+00, &
     & 0.5345600E+00, 0.5252400E+00, 0.5469100E+00, 0.5573700E+00, &
     & 0.5875400E+00, 0.6167700E+00, 0.6586500E+00, 0.6915500E+00, &
     & 0.7445400E+00, 0.7981900E+00, 0.8432500E+00, 0.9125700E+00, &
     & 0.9681200E+00, 0.9188400E+00, 0.7681300E+00, 0.7681300E+00 /
      data (ref_adm(32,iz, 9,13),iz = 1,20) / &
     & 0.5111300E+00, 0.5111300E+00, 0.5107600E+00, 0.5233900E+00, &
     & 0.5333100E+00, 0.5444300E+00, 0.5437800E+00, 0.5680900E+00, &
     & 0.5748500E+00, 0.6033500E+00, 0.6356500E+00, 0.6729700E+00, &
     & 0.7168100E+00, 0.7633200E+00, 0.8102900E+00, 0.8577500E+00, &
     & 0.8988400E+00, 0.8543200E+00, 0.7279900E+00, 0.7279900E+00 /
      data (ref_adm(32,iz,10,13),iz = 1,20) / &
     & 0.5080300E+00, 0.5080300E+00, 0.5101200E+00, 0.5293600E+00, &
     & 0.5329200E+00, 0.5283200E+00, 0.5530300E+00, 0.5538900E+00, &
     & 0.5723200E+00, 0.5966400E+00, 0.6261400E+00, 0.6671300E+00, &
     & 0.6911600E+00, 0.7341100E+00, 0.7670000E+00, 0.8057400E+00, &
     & 0.8443200E+00, 0.8093000E+00, 0.6591100E+00, 0.6591100E+00 /
      data (ref_adm(32,iz,11,13),iz = 1,20) / &
     & 0.5118900E+00, 0.5118900E+00, 0.5167800E+00, 0.5181400E+00, &
     & 0.5270400E+00, 0.5318200E+00, 0.5457300E+00, 0.5534200E+00, &
     & 0.5754100E+00, 0.5833200E+00, 0.6132500E+00, 0.6448900E+00, &
     & 0.6661800E+00, 0.7067400E+00, 0.7378000E+00, 0.7669300E+00, &
     & 0.7791400E+00, 0.7448400E+00, 0.6078800E+00, 0.6078800E+00 /
      data (ref_adm(32,iz,12,13),iz = 1,20) / &
     & 0.5085700E+00, 0.5085700E+00, 0.5090200E+00, 0.5116900E+00, &
     & 0.5124800E+00, 0.5357500E+00, 0.5391000E+00, 0.5508500E+00, &
     & 0.5723300E+00, 0.5908100E+00, 0.6042500E+00, 0.6230200E+00, &
     & 0.6527200E+00, 0.6886900E+00, 0.6949700E+00, 0.7285400E+00, &
     & 0.7406100E+00, 0.6788000E+00, 0.6324100E+00, 0.6324100E+00 /
      data (ref_adm(32,iz,13,13),iz = 1,20) / &
     & 0.5073300E+00, 0.5073300E+00, 0.5167200E+00, 0.5168200E+00, &
     & 0.5103600E+00, 0.5180700E+00, 0.5254700E+00, 0.5406700E+00, &
     & 0.5616000E+00, 0.5782700E+00, 0.6031800E+00, 0.6181400E+00, &
     & 0.6335300E+00, 0.6607600E+00, 0.6632000E+00, 0.6899300E+00, &
     & 0.7039900E+00, 0.6493200E+00, 0.6329500E+00, 0.6329500E+00 /
      data (ref_adm(32,iz,14,13),iz = 1,20) / &
     & 0.5182600E+00, 0.5182600E+00, 0.5221800E+00, 0.5282800E+00, &
     & 0.5312100E+00, 0.5373700E+00, 0.5475400E+00, 0.5626400E+00, &
     & 0.5760600E+00, 0.5899200E+00, 0.6065700E+00, 0.6235500E+00, &
     & 0.6395900E+00, 0.6570400E+00, 0.6249600E+00, 0.6431600E+00, &
     & 0.6602300E+00, 0.6118200E+00, 0.5825469E+00, 0.5825469E+00 /
      data (ref_adm(32,iz,15,13),iz = 1,20) / &
     & 0.5014600E+00, 0.5014600E+00, 0.4974800E+00, 0.4944300E+00, &
     & 0.4937300E+00, 0.5004500E+00, 0.5132600E+00, 0.5317000E+00, &
     & 0.5491600E+00, 0.5697200E+00, 0.5897400E+00, 0.6194200E+00, &
     & 0.6402500E+00, 0.6443600E+00, 0.6254700E+00, 0.6226300E+00, &
     & 0.6317000E+00, 0.6147400E+00, 0.5663481E+00, 0.5663481E+00 /
      data (ref_adm(32,iz,16,13),iz = 1,20) / &
     & 0.4954600E+00, 0.4954600E+00, 0.5045700E+00, 0.5095200E+00, &
     & 0.5029400E+00, 0.5112600E+00, 0.5212700E+00, 0.5279300E+00, &
     & 0.5328400E+00, 0.5489100E+00, 0.5607200E+00, 0.5768600E+00, &
     & 0.5977000E+00, 0.6101700E+00, 0.6045400E+00, 0.6145100E+00, &
     & 0.6185300E+00, 0.5688100E+00, 0.5505544E+00, 0.5505544E+00 /
      data (ref_adm(32,iz,17,13),iz = 1,20) / &
     & 0.5040700E+00, 0.5040700E+00, 0.5055600E+00, 0.5155700E+00, &
     & 0.5120400E+00, 0.5197700E+00, 0.5276700E+00, 0.5427900E+00, &
     & 0.5495700E+00, 0.5576800E+00, 0.5697900E+00, 0.5771300E+00, &
     & 0.5929800E+00, 0.5966200E+00, 0.5869800E+00, 0.5953600E+00, &
     & 0.5958600E+00, 0.6126365E+00, 0.5357233E+00, 0.5357233E+00 /
      data (ref_adm(32,iz,18,13),iz = 1,20) / &
     & 0.5048300E+00, 0.5048300E+00, 0.5099600E+00, 0.5204300E+00, &
     & 0.5050100E+00, 0.5187900E+00, 0.5193800E+00, 0.5237900E+00, &
     & 0.5439200E+00, 0.5599700E+00, 0.5635400E+00, 0.5759900E+00, &
     & 0.5884400E+00, 0.5880600E+00, 0.5876000E+00, 0.6013200E+00, &
     & 0.6391700E+00, 0.5598635E+00, 0.4754151E+00, 0.4754151E+00 /
      data (ref_adm(32,iz,19,13),iz = 1,20) / &
     & 0.5020400E+00, 0.5020400E+00, 0.5076300E+00, 0.5131200E+00, &
     & 0.5096200E+00, 0.5155800E+00, 0.5289000E+00, 0.5255600E+00, &
     & 0.5373400E+00, 0.5414800E+00, 0.5535100E+00, 0.5619200E+00, &
     & 0.5700900E+00, 0.5838500E+00, 0.5762600E+00, 0.5837000E+00, &
     & 0.5780759E+00, 0.5476236E+00, 0.4680228E+00, 0.4680228E+00 /
      data (ref_adm(32,iz,20,13),iz = 1,20) / &
     & 0.5196000E+00, 0.5196000E+00, 0.5228100E+00, 0.5131200E+00, &
     & 0.5075200E+00, 0.5153200E+00, 0.5273300E+00, 0.5271600E+00, &
     & 0.5363100E+00, 0.5465300E+00, 0.5486700E+00, 0.5571300E+00, &
     & 0.5752600E+00, 0.5802700E+00, 0.5694100E+00, 0.6241100E+00, &
     & 0.5673020E+00, 0.5381649E+00, 0.4637605E+00, 0.4637605E+00 /
      data (ref_adm(32,iz,21,13),iz = 1,20) / &
     & 0.5108500E+00, 0.5108500E+00, 0.5164600E+00, 0.5151600E+00, &
     & 0.5049000E+00, 0.5149900E+00, 0.5191300E+00, 0.5271900E+00, &
     & 0.5441400E+00, 0.5446000E+00, 0.5490200E+00, 0.5739800E+00, &
     & 0.5722400E+00, 0.5723300E+00, 0.5732000E+00, 0.5953700E+00, &
     & 0.5583797E+00, 0.5298929E+00, 0.4614739E+00, 0.4614739E+00 /
      data (ref_adm(32,iz,22,13),iz = 1,20) / &
     & 0.5064400E+00, 0.5064400E+00, 0.5045900E+00, 0.5067500E+00, &
     & 0.5140200E+00, 0.5030200E+00, 0.5181800E+00, 0.5259500E+00, &
     & 0.5369200E+00, 0.5326700E+00, 0.5552000E+00, 0.5699400E+00, &
     & 0.5651300E+00, 0.5667900E+00, 0.5664400E+00, 0.5927500E+00, &
     & 0.5302069E+00, 0.4990372E+00, 0.4367304E+00, 0.4367304E+00 /
      data (ref_adm(32,iz,23,13),iz = 1,20) / &
     & 0.5016800E+00, 0.5016800E+00, 0.4960400E+00, 0.5010200E+00, &
     & 0.5067300E+00, 0.5154000E+00, 0.5209400E+00, 0.5198100E+00, &
     & 0.5388200E+00, 0.5405900E+00, 0.5528200E+00, 0.5762300E+00, &
     & 0.5724900E+00, 0.5734400E+00, 0.5820600E+00, 0.5566000E+00, &
     & 0.6032400E+00, 0.4961684E+00, 0.4388688E+00, 0.4388688E+00 /
      data (ref_adm(32,iz,24,13),iz = 1,20) / &
     & 0.4846800E+00, 0.4846800E+00, 0.4827500E+00, 0.4811900E+00, &
     & 0.4899600E+00, 0.5010400E+00, 0.5063200E+00, 0.5172100E+00, &
     & 0.5261900E+00, 0.5429900E+00, 0.5565900E+00, 0.5743700E+00, &
     & 0.5765500E+00, 0.5800800E+00, 0.5655600E+00, 0.5620100E+00, &
     & 0.5687600E+00, 0.4957185E+00, 0.4428582E+00, 0.4428582E+00 /
      data (ref_adm(32,iz,25,13),iz = 1,20) / &
     & 0.4980400E+00, 0.4980400E+00, 0.5166700E+00, 0.5208200E+00, &
     & 0.5240400E+00, 0.5208800E+00, 0.5183400E+00, 0.5241300E+00, &
     & 0.5318500E+00, 0.5375300E+00, 0.5419700E+00, 0.5524200E+00, &
     & 0.5511200E+00, 0.5604700E+00, 0.5700400E+00, 0.5783000E+00, &
     & 0.5630400E+00, 0.5698700E+00, 0.4483961E+00, 0.4483961E+00 /
      data (ref_adm(32,iz,26,13),iz = 1,20) / &
     & 0.5167400E+00, 0.5167400E+00, 0.5244800E+00, 0.5276700E+00, &
     & 0.5277500E+00, 0.5331800E+00, 0.5374800E+00, 0.5460800E+00, &
     & 0.5573400E+00, 0.5678000E+00, 0.5711400E+00, 0.5807500E+00, &
     & 0.5833900E+00, 0.5825700E+00, 0.5819600E+00, 0.5847300E+00, &
     & 0.5650900E+00, 0.5566000E+00, 0.4557648E+00, 0.4557648E+00 /
      data (ref_adm(32,iz,27,13),iz = 1,20) / &
     & 0.5147500E+00, 0.5147500E+00, 0.4951700E+00, 0.5014500E+00, &
     & 0.5107700E+00, 0.5161500E+00, 0.5204400E+00, 0.5332200E+00, &
     & 0.5388300E+00, 0.5591400E+00, 0.5781500E+00, 0.5967000E+00, &
     & 0.5967600E+00, 0.6066100E+00, 0.5968500E+00, 0.5841900E+00, &
     & 0.5654700E+00, 0.5345400E+00, 0.4937600E+00, 0.4937600E+00 /
      data (ref_adm(32,iz,28,13),iz = 1,20) / &
     & 0.5076100E+00, 0.5076100E+00, 0.4996300E+00, 0.5137200E+00, &
     & 0.5133600E+00, 0.5177200E+00, 0.5308900E+00, 0.5512900E+00, &
     & 0.5612900E+00, 0.5816200E+00, 0.5797800E+00, 0.6000800E+00, &
     & 0.6021400E+00, 0.6113400E+00, 0.6063800E+00, 0.5907300E+00, &
     & 0.5822400E+00, 0.5571000E+00, 0.4685700E+00, 0.4685700E+00 /
      data (ref_adm(32,iz,29,13),iz = 1,20) / &
     & 0.5153100E+00, 0.5153100E+00, 0.4994600E+00, 0.5042000E+00, &
     & 0.5119800E+00, 0.5265800E+00, 0.5329800E+00, 0.5417600E+00, &
     & 0.5588800E+00, 0.5740400E+00, 0.5952600E+00, 0.6058300E+00, &
     & 0.6116500E+00, 0.6140200E+00, 0.6219100E+00, 0.6132400E+00, &
     & 0.6057600E+00, 0.5651600E+00, 0.4722400E+00, 0.4722400E+00 /
      data (ref_adm(32,iz,30,13),iz = 1,20) / &
     & 0.5095500E+00, 0.5095500E+00, 0.5115500E+00, 0.5082600E+00, &
     & 0.5166100E+00, 0.5280400E+00, 0.5435400E+00, 0.5459700E+00, &
     & 0.5665400E+00, 0.5790000E+00, 0.5929700E+00, 0.6078500E+00, &
     & 0.6152900E+00, 0.6131400E+00, 0.6214900E+00, 0.6264300E+00, &
     & 0.6115800E+00, 0.5800400E+00, 0.4857500E+00, 0.4857500E+00 /
      data (ref_adm(32,iz,31,13),iz = 1,20) / &
     & 0.5001100E+00, 0.5001100E+00, 0.5169100E+00, 0.5217400E+00, &
     & 0.5193900E+00, 0.5259800E+00, 0.5419500E+00, 0.5514000E+00, &
     & 0.5594000E+00, 0.5736100E+00, 0.5827100E+00, 0.5992600E+00, &
     & 0.6055900E+00, 0.6093500E+00, 0.6171800E+00, 0.6158700E+00, &
     & 0.6189700E+00, 0.5941500E+00, 0.4919900E+00, 0.4919900E+00 /
      data (ref_adm(32,iz,32,13),iz = 1,20) / &
     & 0.5104500E+00, 0.5104500E+00, 0.5166900E+00, 0.5120700E+00, &
     & 0.5259500E+00, 0.5399800E+00, 0.5571000E+00, 0.5664300E+00, &
     & 0.5669700E+00, 0.5768600E+00, 0.5855700E+00, 0.5965400E+00, &
     & 0.6120500E+00, 0.6102400E+00, 0.6181300E+00, 0.6187100E+00, &
     & 0.6228200E+00, 0.5865200E+00, 0.4887300E+00, 0.4887300E+00 /
      data (ref_adm(32,iz,33,13),iz = 1,20) / &
     & 0.5095300E+00, 0.5095300E+00, 0.5185800E+00, 0.5202100E+00, &
     & 0.5237300E+00, 0.5423700E+00, 0.5600200E+00, 0.5637000E+00, &
     & 0.5663900E+00, 0.5729200E+00, 0.5784200E+00, 0.5915400E+00, &
     & 0.6052000E+00, 0.6148800E+00, 0.6217900E+00, 0.6271900E+00, &
     & 0.6125300E+00, 0.5830600E+00, 0.4814200E+00, 0.4814200E+00 /
      data (ref_adm(32,iz,34,13),iz = 1,20) / &
     & 0.5124000E+00, 0.5124000E+00, 0.5239200E+00, 0.5217600E+00, &
     & 0.5223000E+00, 0.5566600E+00, 0.5693500E+00, 0.5721500E+00, &
     & 0.5682700E+00, 0.5792300E+00, 0.5929300E+00, 0.6045000E+00, &
     & 0.6072100E+00, 0.6286300E+00, 0.6293600E+00, 0.6315100E+00, &
     & 0.6213400E+00, 0.5824700E+00, 0.4795900E+00, 0.4795900E+00 /
      data (ref_adm(32,iz,35,13),iz = 1,20) / &
     & 0.5112300E+00, 0.5112300E+00, 0.5131100E+00, 0.5218900E+00, &
     & 0.5339300E+00, 0.5484100E+00, 0.5737700E+00, 0.5670800E+00, &
     & 0.5750300E+00, 0.5813900E+00, 0.5890000E+00, 0.6064000E+00, &
     & 0.6214500E+00, 0.6432500E+00, 0.6379100E+00, 0.6397900E+00, &
     & 0.6206600E+00, 0.5908500E+00, 0.4828000E+00, 0.4828000E+00 /
      data (ref_adm(32,iz,36,13),iz = 1,20) / &
     & 0.5157100E+00, 0.5157100E+00, 0.5152300E+00, 0.5124000E+00, &
     & 0.5191100E+00, 0.5491700E+00, 0.5579700E+00, 0.5660000E+00, &
     & 0.5765300E+00, 0.5824600E+00, 0.5964500E+00, 0.6146900E+00, &
     & 0.6394800E+00, 0.6482600E+00, 0.6454000E+00, 0.6435700E+00, &
     & 0.6312400E+00, 0.5965600E+00, 0.4724700E+00, 0.4724700E+00 /
      data (ref_adm(32,iz,37,13),iz = 1,20) / &
     & 0.5156200E+00, 0.5156200E+00, 0.5189700E+00, 0.5131000E+00, &
     & 0.5127800E+00, 0.5301300E+00, 0.5509800E+00, 0.5602700E+00, &
     & 0.5710500E+00, 0.5844600E+00, 0.5973400E+00, 0.6105200E+00, &
     & 0.6471400E+00, 0.6816800E+00, 0.6626900E+00, 0.6389500E+00, &
     & 0.6331000E+00, 0.5901100E+00, 0.4682500E+00, 0.4682500E+00 /
      data (ref_adm(32,iz,38,13),iz = 1,20) / &
     & 0.5156200E+00, 0.5156200E+00, 0.5189700E+00, 0.5131000E+00, &
     & 0.5127800E+00, 0.5301300E+00, 0.5509800E+00, 0.5602700E+00, &
     & 0.5710500E+00, 0.5844600E+00, 0.5973400E+00, 0.6105200E+00, &
     & 0.6471400E+00, 0.6816800E+00, 0.6626900E+00, 0.6389500E+00, &
     & 0.6331000E+00, 0.5901100E+00, 0.4682500E+00, 0.4682500E+00 /
! Solar Zenith Angle 65.0 Albedo  0.6112093E+00
      data (ref_adm(32,iz, 1,14),iz = 1,20) / &
     & 0.4867000E+00, 0.4867000E+00, 0.4844200E+00, 0.4941600E+00, &
     & 0.5030100E+00, 0.5216900E+00, 0.5542700E+00, 0.5800800E+00, &
     & 0.6203900E+00, 0.6778900E+00, 0.7261700E+00, 0.8045500E+00, &
     & 0.9138600E+00, 0.1065800E+01, 0.1244800E+01, 0.1383300E+01, &
     & 0.1508100E+01, 0.1528000E+01, 0.1381326E+01, 0.1381326E+01 /
      data (ref_adm(32,iz, 2,14),iz = 1,20) / &
     & 0.4867000E+00, 0.4867000E+00, 0.4844200E+00, 0.4941600E+00, &
     & 0.5030100E+00, 0.5216900E+00, 0.5542700E+00, 0.5800800E+00, &
     & 0.6203900E+00, 0.6778900E+00, 0.7261700E+00, 0.8045500E+00, &
     & 0.9138600E+00, 0.1065800E+01, 0.1244800E+01, 0.1383300E+01, &
     & 0.1508100E+01, 0.1528000E+01, 0.1381326E+01, 0.1381326E+01 /
      data (ref_adm(32,iz, 3,14),iz = 1,20) / &
     & 0.4895100E+00, 0.4895100E+00, 0.4888500E+00, 0.5014100E+00, &
     & 0.5165200E+00, 0.5289000E+00, 0.5475000E+00, 0.5821800E+00, &
     & 0.6240400E+00, 0.6728500E+00, 0.7319700E+00, 0.8039100E+00, &
     & 0.9081700E+00, 0.1034100E+01, 0.1169500E+01, 0.1342000E+01, &
     & 0.1488400E+01, 0.1509600E+01, 0.1056338E+01, 0.1056338E+01 /
      data (ref_adm(32,iz, 4,14),iz = 1,20) / &
     & 0.4847200E+00, 0.4847200E+00, 0.4958500E+00, 0.5009800E+00, &
     & 0.5127000E+00, 0.5209000E+00, 0.5497100E+00, 0.5830800E+00, &
     & 0.6128400E+00, 0.6568900E+00, 0.7232800E+00, 0.8056400E+00, &
     & 0.8857200E+00, 0.1008600E+01, 0.1111000E+01, 0.1260200E+01, &
     & 0.1406200E+01, 0.1402700E+01, 0.1200364E+01, 0.1200364E+01 /
      data (ref_adm(32,iz, 5,14),iz = 1,20) / &
     & 0.4923200E+00, 0.4923200E+00, 0.5023800E+00, 0.5076800E+00, &
     & 0.5127800E+00, 0.5373300E+00, 0.5533600E+00, 0.5806500E+00, &
     & 0.6120400E+00, 0.6616600E+00, 0.7155600E+00, 0.7885400E+00, &
     & 0.8706200E+00, 0.9794900E+00, 0.1090300E+01, 0.1224400E+01, &
     & 0.1322700E+01, 0.1278000E+01, 0.1082738E+01, 0.1082738E+01 /
      data (ref_adm(32,iz, 6,14),iz = 1,20) / &
     & 0.4863900E+00, 0.4863900E+00, 0.4933200E+00, 0.4934100E+00, &
     & 0.5087300E+00, 0.5294100E+00, 0.5461400E+00, 0.5715600E+00, &
     & 0.6004700E+00, 0.6404100E+00, 0.6916900E+00, 0.7575900E+00, &
     & 0.8425700E+00, 0.9399900E+00, 0.1045700E+01, 0.1165200E+01, &
     & 0.1285600E+01, 0.1311300E+01, 0.1102900E+01, 0.1102900E+01 /
      data (ref_adm(32,iz, 7,14),iz = 1,20) / &
     & 0.4874800E+00, 0.4874800E+00, 0.4950500E+00, 0.5069500E+00, &
     & 0.5204100E+00, 0.5372700E+00, 0.5531400E+00, 0.5757600E+00, &
     & 0.6062500E+00, 0.6422900E+00, 0.6899300E+00, 0.7437500E+00, &
     & 0.8206400E+00, 0.9130800E+00, 0.9946000E+00, 0.1083400E+01, &
     & 0.1151500E+01, 0.1124600E+01, 0.1026600E+01, 0.1026600E+01 /
      data (ref_adm(32,iz, 8,14),iz = 1,20) / &
     & 0.4956100E+00, 0.4956100E+00, 0.4883400E+00, 0.5044400E+00, &
     & 0.5252200E+00, 0.5353900E+00, 0.5449500E+00, 0.5705300E+00, &
     & 0.5898400E+00, 0.6268900E+00, 0.6671700E+00, 0.7229000E+00, &
     & 0.7889900E+00, 0.8609100E+00, 0.9391300E+00, 0.1021000E+01, &
     & 0.1093600E+01, 0.1044900E+01, 0.9120300E+00, 0.9120300E+00 /
      data (ref_adm(32,iz, 9,14),iz = 1,20) / &
     & 0.4951900E+00, 0.4951900E+00, 0.4984800E+00, 0.5002100E+00, &
     & 0.5129700E+00, 0.5285800E+00, 0.5367400E+00, 0.5566300E+00, &
     & 0.5807200E+00, 0.6215600E+00, 0.6572700E+00, 0.7017200E+00, &
     & 0.7635300E+00, 0.8218000E+00, 0.8917800E+00, 0.9592900E+00, &
     & 0.1016500E+01, 0.9925100E+00, 0.8579400E+00, 0.8579400E+00 /
      data (ref_adm(32,iz,10,14),iz = 1,20) / &
     & 0.5006300E+00, 0.5006300E+00, 0.5070200E+00, 0.5025400E+00, &
     & 0.5024600E+00, 0.5136500E+00, 0.5391800E+00, 0.5494700E+00, &
     & 0.5808100E+00, 0.6133900E+00, 0.6396400E+00, 0.6798300E+00, &
     & 0.7287600E+00, 0.7805900E+00, 0.8367300E+00, 0.8961600E+00, &
     & 0.9430300E+00, 0.9028000E+00, 0.7561400E+00, 0.7561400E+00 /
      data (ref_adm(32,iz,11,14),iz = 1,20) / &
     & 0.5025400E+00, 0.5025400E+00, 0.4926100E+00, 0.4971400E+00, &
     & 0.5104700E+00, 0.5130900E+00, 0.5254600E+00, 0.5413900E+00, &
     & 0.5663500E+00, 0.5949700E+00, 0.6296100E+00, 0.6681800E+00, &
     & 0.7090100E+00, 0.7473500E+00, 0.7901500E+00, 0.8350700E+00, &
     & 0.8784500E+00, 0.8393800E+00, 0.6897900E+00, 0.6897900E+00 /
      data (ref_adm(32,iz,12,14),iz = 1,20) / &
     & 0.4950700E+00, 0.4950700E+00, 0.4871100E+00, 0.4921000E+00, &
     & 0.5047600E+00, 0.5148000E+00, 0.5309200E+00, 0.5363600E+00, &
     & 0.5525900E+00, 0.5819200E+00, 0.6087400E+00, 0.6448400E+00, &
     & 0.6847500E+00, 0.7190500E+00, 0.7497100E+00, 0.7915500E+00, &
     & 0.8241800E+00, 0.7592700E+00, 0.6631800E+00, 0.6631800E+00 /
      data (ref_adm(32,iz,13,14),iz = 1,20) / &
     & 0.4922200E+00, 0.4922200E+00, 0.4883700E+00, 0.4879200E+00, &
     & 0.5023200E+00, 0.5087300E+00, 0.5248100E+00, 0.5405100E+00, &
     & 0.5551700E+00, 0.5833900E+00, 0.5955900E+00, 0.6271100E+00, &
     & 0.6643600E+00, 0.6829000E+00, 0.7082300E+00, 0.7403100E+00, &
     & 0.7565300E+00, 0.7158500E+00, 0.6273100E+00, 0.6273100E+00 /
      data (ref_adm(32,iz,14,14),iz = 1,20) / &
     & 0.4984600E+00, 0.4984600E+00, 0.5034400E+00, 0.5104200E+00, &
     & 0.5163000E+00, 0.5267200E+00, 0.5336100E+00, 0.5488900E+00, &
     & 0.5631500E+00, 0.5846100E+00, 0.6068900E+00, 0.6241700E+00, &
     & 0.6530000E+00, 0.6814700E+00, 0.6807100E+00, 0.7039000E+00, &
     & 0.7226500E+00, 0.6791100E+00, 0.6111792E+00, 0.6111792E+00 /
      data (ref_adm(32,iz,15,14),iz = 1,20) / &
     & 0.5011800E+00, 0.5011800E+00, 0.4930200E+00, 0.4901900E+00, &
     & 0.4931700E+00, 0.5017100E+00, 0.5127700E+00, 0.5261300E+00, &
     & 0.5496700E+00, 0.5750000E+00, 0.5954200E+00, 0.6212300E+00, &
     & 0.6412100E+00, 0.6625300E+00, 0.6542700E+00, 0.6732700E+00, &
     & 0.6738500E+00, 0.6638800E+00, 0.5905521E+00, 0.5905521E+00 /
      data (ref_adm(32,iz,16,14),iz = 1,20) / &
     & 0.4779200E+00, 0.4779200E+00, 0.4754700E+00, 0.4782900E+00, &
     & 0.4857300E+00, 0.4873200E+00, 0.4967900E+00, 0.5052400E+00, &
     & 0.5225900E+00, 0.5400900E+00, 0.5567600E+00, 0.5790700E+00, &
     & 0.5985000E+00, 0.6155400E+00, 0.6232100E+00, 0.6282200E+00, &
     & 0.6684700E+00, 0.7003600E+00, 0.5718521E+00, 0.5718521E+00 /
      data (ref_adm(32,iz,17,14),iz = 1,20) / &
     & 0.4893300E+00, 0.4893300E+00, 0.4891200E+00, 0.4955400E+00, &
     & 0.4918200E+00, 0.5065900E+00, 0.5151500E+00, 0.5274100E+00, &
     & 0.5335400E+00, 0.5417900E+00, 0.5615100E+00, 0.5718900E+00, &
     & 0.5911600E+00, 0.6118700E+00, 0.6076000E+00, 0.6160100E+00, &
     & 0.6212900E+00, 0.6161953E+00, 0.5547117E+00, 0.5547117E+00 /
      data (ref_adm(32,iz,18,14),iz = 1,20) / &
     & 0.4827400E+00, 0.4827400E+00, 0.4860000E+00, 0.4876200E+00, &
     & 0.4951500E+00, 0.5014000E+00, 0.5122300E+00, 0.5264100E+00, &
     & 0.5298500E+00, 0.5405300E+00, 0.5532300E+00, 0.5695000E+00, &
     & 0.5796700E+00, 0.5894800E+00, 0.5915700E+00, 0.6075800E+00, &
     & 0.5721100E+00, 0.5999476E+00, 0.5217596E+00, 0.5217596E+00 /
      data (ref_adm(32,iz,19,14),iz = 1,20) / &
     & 0.4758300E+00, 0.4758300E+00, 0.4808900E+00, 0.4827600E+00, &
     & 0.4877400E+00, 0.5063500E+00, 0.5085600E+00, 0.5158600E+00, &
     & 0.5237200E+00, 0.5345600E+00, 0.5409700E+00, 0.5487400E+00, &
     & 0.5611100E+00, 0.5696600E+00, 0.5784500E+00, 0.5867700E+00, &
     & 0.6058686E+00, 0.5844261E+00, 0.5123453E+00, 0.5123453E+00 /
      data (ref_adm(32,iz,20,14),iz = 1,20) / &
     & 0.4780200E+00, 0.4780200E+00, 0.4855600E+00, 0.4857000E+00, &
     & 0.4968400E+00, 0.5022200E+00, 0.5046200E+00, 0.5147700E+00, &
     & 0.5233700E+00, 0.5343200E+00, 0.5458500E+00, 0.5574500E+00, &
     & 0.5607100E+00, 0.5680700E+00, 0.5755900E+00, 0.6198200E+00, &
     & 0.5932262E+00, 0.5728508E+00, 0.5069883E+00, 0.5069883E+00 /
      data (ref_adm(32,iz,21,14),iz = 1,20) / &
     & 0.4763500E+00, 0.4763500E+00, 0.4917500E+00, 0.4875300E+00, &
     & 0.4974700E+00, 0.5009600E+00, 0.5036500E+00, 0.5067800E+00, &
     & 0.5159500E+00, 0.5316900E+00, 0.5394200E+00, 0.5468100E+00, &
     & 0.5664800E+00, 0.5726700E+00, 0.5720700E+00, 0.6127800E+00, &
     & 0.5823856E+00, 0.5628538E+00, 0.5041564E+00, 0.5041564E+00 /
      data (ref_adm(32,iz,22,14),iz = 1,20) / &
     & 0.4853100E+00, 0.4853100E+00, 0.4893300E+00, 0.4838700E+00, &
     & 0.4916000E+00, 0.5020100E+00, 0.5006100E+00, 0.5065400E+00, &
     & 0.5124500E+00, 0.5307100E+00, 0.5411500E+00, 0.5482000E+00, &
     & 0.5510500E+00, 0.5611900E+00, 0.5667300E+00, 0.5881700E+00, &
     & 0.5560701E+00, 0.5319316E+00, 0.4770489E+00, 0.4770489E+00 /
      data (ref_adm(32,iz,23,14),iz = 1,20) / &
     & 0.4828500E+00, 0.4828500E+00, 0.4835900E+00, 0.4891300E+00, &
     & 0.4842100E+00, 0.4957100E+00, 0.5091600E+00, 0.5188700E+00, &
     & 0.5204800E+00, 0.5297000E+00, 0.5358300E+00, 0.5489300E+00, &
     & 0.5566400E+00, 0.5538800E+00, 0.5777300E+00, 0.5961300E+00, &
     & 0.6137700E+00, 0.5280015E+00, 0.4794137E+00, 0.4794137E+00 /
      data (ref_adm(32,iz,24,14),iz = 1,20) / &
     & 0.4710600E+00, 0.4710600E+00, 0.4696700E+00, 0.4705100E+00, &
     & 0.4747200E+00, 0.4795800E+00, 0.4846200E+00, 0.4943600E+00, &
     & 0.5050000E+00, 0.5145500E+00, 0.5254400E+00, 0.5360100E+00, &
     & 0.5492600E+00, 0.5584700E+00, 0.5624900E+00, 0.5798400E+00, &
     & 0.6049900E+00, 0.5272474E+00, 0.4843426E+00, 0.4843426E+00 /
      data (ref_adm(32,iz,25,14),iz = 1,20) / &
     & 0.4922100E+00, 0.4922100E+00, 0.5146900E+00, 0.5184400E+00, &
     & 0.5182600E+00, 0.5230600E+00, 0.5314600E+00, 0.5352200E+00, &
     & 0.5393200E+00, 0.5436200E+00, 0.5478100E+00, 0.5492400E+00, &
     & 0.5561500E+00, 0.5638800E+00, 0.5742000E+00, 0.5861700E+00, &
     & 0.5846100E+00, 0.5739000E+00, 0.4912207E+00, 0.4912207E+00 /
      data (ref_adm(32,iz,26,14),iz = 1,20) / &
     & 0.4959200E+00, 0.4959200E+00, 0.4997400E+00, 0.5071000E+00, &
     & 0.5174300E+00, 0.5214500E+00, 0.5236400E+00, 0.5339400E+00, &
     & 0.5462700E+00, 0.5567600E+00, 0.5635300E+00, 0.5737400E+00, &
     & 0.5828300E+00, 0.5943200E+00, 0.5907000E+00, 0.5938300E+00, &
     & 0.5886200E+00, 0.5784300E+00, 0.5009298E+00, 0.5009298E+00 /
      data (ref_adm(32,iz,27,14),iz = 1,20) / &
     & 0.4938500E+00, 0.4938500E+00, 0.5045400E+00, 0.4983800E+00, &
     & 0.5048400E+00, 0.5186800E+00, 0.5099400E+00, 0.5191100E+00, &
     & 0.5296900E+00, 0.5411300E+00, 0.5457900E+00, 0.5589600E+00, &
     & 0.5746400E+00, 0.5958500E+00, 0.5953900E+00, 0.6038700E+00, &
     & 0.5958100E+00, 0.5837800E+00, 0.5120100E+00, 0.5120100E+00 /
      data (ref_adm(32,iz,28,14),iz = 1,20) / &
     & 0.4959000E+00, 0.4959000E+00, 0.4954200E+00, 0.4996100E+00, &
     & 0.5061100E+00, 0.5147400E+00, 0.5143500E+00, 0.5311300E+00, &
     & 0.5415900E+00, 0.5479200E+00, 0.5685800E+00, 0.5836300E+00, &
     & 0.5970600E+00, 0.6096800E+00, 0.6172000E+00, 0.6282800E+00, &
     & 0.6213900E+00, 0.6031600E+00, 0.5049000E+00, 0.5049000E+00 /
      data (ref_adm(32,iz,29,14),iz = 1,20) / &
     & 0.4965400E+00, 0.4965400E+00, 0.4997100E+00, 0.5030200E+00, &
     & 0.5081300E+00, 0.5172100E+00, 0.5295500E+00, 0.5331300E+00, &
     & 0.5492100E+00, 0.5646700E+00, 0.5836300E+00, 0.5984900E+00, &
     & 0.6072700E+00, 0.6285100E+00, 0.6331900E+00, 0.6479900E+00, &
     & 0.6321100E+00, 0.6139800E+00, 0.5213800E+00, 0.5213800E+00 /
      data (ref_adm(32,iz,30,14),iz = 1,20) / &
     & 0.4975100E+00, 0.4975100E+00, 0.4962800E+00, 0.4933700E+00, &
     & 0.5025600E+00, 0.5173200E+00, 0.5206200E+00, 0.5404500E+00, &
     & 0.5587600E+00, 0.5821000E+00, 0.5930400E+00, 0.6027700E+00, &
     & 0.6031700E+00, 0.6178900E+00, 0.6369600E+00, 0.6497300E+00, &
     & 0.6499000E+00, 0.6298400E+00, 0.5377800E+00, 0.5377800E+00 /
      data (ref_adm(32,iz,31,14),iz = 1,20) / &
     & 0.4897900E+00, 0.4897900E+00, 0.4901100E+00, 0.5006100E+00, &
     & 0.5029500E+00, 0.5189700E+00, 0.5283700E+00, 0.5367400E+00, &
     & 0.5601900E+00, 0.5827200E+00, 0.5913400E+00, 0.5941500E+00, &
     & 0.6044800E+00, 0.6148200E+00, 0.6317400E+00, 0.6424600E+00, &
     & 0.6481000E+00, 0.6259200E+00, 0.5327900E+00, 0.5327900E+00 /
      data (ref_adm(32,iz,32,14),iz = 1,20) / &
     & 0.4943800E+00, 0.4943800E+00, 0.4979600E+00, 0.5016400E+00, &
     & 0.5110600E+00, 0.5215200E+00, 0.5355800E+00, 0.5596800E+00, &
     & 0.5748700E+00, 0.5814000E+00, 0.5932300E+00, 0.6066700E+00, &
     & 0.6159200E+00, 0.6335500E+00, 0.6502100E+00, 0.6602400E+00, &
     & 0.6663800E+00, 0.6471700E+00, 0.5411600E+00, 0.5411600E+00 /
      data (ref_adm(32,iz,33,14),iz = 1,20) / &
     & 0.4887400E+00, 0.4887400E+00, 0.4872100E+00, 0.4953800E+00, &
     & 0.5033200E+00, 0.5115600E+00, 0.5314100E+00, 0.5532600E+00, &
     & 0.5591000E+00, 0.5652100E+00, 0.5806800E+00, 0.6005700E+00, &
     & 0.6150300E+00, 0.6363500E+00, 0.6487300E+00, 0.6628900E+00, &
     & 0.6648400E+00, 0.6432400E+00, 0.5436000E+00, 0.5436000E+00 /
      data (ref_adm(32,iz,34,14),iz = 1,20) / &
     & 0.4881900E+00, 0.4881900E+00, 0.4972100E+00, 0.4969200E+00, &
     & 0.5035400E+00, 0.5128800E+00, 0.5342400E+00, 0.5496400E+00, &
     & 0.5558300E+00, 0.5593300E+00, 0.5833300E+00, 0.6014600E+00, &
     & 0.6196600E+00, 0.6334200E+00, 0.6454800E+00, 0.6656800E+00, &
     & 0.6729200E+00, 0.6414000E+00, 0.5203300E+00, 0.5203300E+00 /
      data (ref_adm(32,iz,35,14),iz = 1,20) / &
     & 0.4894100E+00, 0.4894100E+00, 0.4923800E+00, 0.4908600E+00, &
     & 0.5008600E+00, 0.5167700E+00, 0.5288800E+00, 0.5469800E+00, &
     & 0.5537900E+00, 0.5671300E+00, 0.5819300E+00, 0.5971900E+00, &
     & 0.6149300E+00, 0.6434200E+00, 0.6586900E+00, 0.6692400E+00, &
     & 0.6735800E+00, 0.6467900E+00, 0.5387000E+00, 0.5387000E+00 /
      data (ref_adm(32,iz,36,14),iz = 1,20) / &
     & 0.4940400E+00, 0.4940400E+00, 0.4858900E+00, 0.4981200E+00, &
     & 0.5038900E+00, 0.5130200E+00, 0.5350600E+00, 0.5497500E+00, &
     & 0.5551500E+00, 0.5629700E+00, 0.5771700E+00, 0.5960500E+00, &
     & 0.6221000E+00, 0.6582300E+00, 0.6759000E+00, 0.6885200E+00, &
     & 0.6826600E+00, 0.6500500E+00, 0.5315400E+00, 0.5315400E+00 /
      data (ref_adm(32,iz,37,14),iz = 1,20) / &
     & 0.4866900E+00, 0.4866900E+00, 0.4934800E+00, 0.4975000E+00, &
     & 0.5018500E+00, 0.5178700E+00, 0.5369100E+00, 0.5524400E+00, &
     & 0.5583700E+00, 0.5696000E+00, 0.5839300E+00, 0.6013300E+00, &
     & 0.6326500E+00, 0.6805800E+00, 0.7111600E+00, 0.7061800E+00, &
     & 0.6874800E+00, 0.6467900E+00, 0.5278600E+00, 0.5278600E+00 /
      data (ref_adm(32,iz,38,14),iz = 1,20) / &
     & 0.4866900E+00, 0.4866900E+00, 0.4934800E+00, 0.4975000E+00, &
     & 0.5018500E+00, 0.5178700E+00, 0.5369100E+00, 0.5524400E+00, &
     & 0.5583700E+00, 0.5696000E+00, 0.5839300E+00, 0.6013300E+00, &
     & 0.6326500E+00, 0.6805800E+00, 0.7111600E+00, 0.7061800E+00, &
     & 0.6874800E+00, 0.6467900E+00, 0.5278600E+00, 0.5278600E+00 /
! Solar Zenith Angle 70.0 Albedo  0.6278313E+00
      data (ref_adm(32,iz, 1,15),iz = 1,20) / &
     & 0.4806700E+00, 0.4806700E+00, 0.4791800E+00, 0.4856400E+00, &
     & 0.4969600E+00, 0.5272900E+00, 0.5524200E+00, 0.5855700E+00, &
     & 0.6357600E+00, 0.6886900E+00, 0.7733800E+00, 0.8781900E+00, &
     & 0.1005700E+01, 0.1195600E+01, 0.1374200E+01, 0.1536700E+01, &
     & 0.1873543E+01, 0.2532257E+01, 0.2387700E+01, 0.2387700E+01 /
      data (ref_adm(32,iz, 2,15),iz = 1,20) / &
     & 0.4806700E+00, 0.4806700E+00, 0.4791800E+00, 0.4856400E+00, &
     & 0.4969600E+00, 0.5272900E+00, 0.5524200E+00, 0.5855700E+00, &
     & 0.6357600E+00, 0.6886900E+00, 0.7733800E+00, 0.8781900E+00, &
     & 0.1005700E+01, 0.1195600E+01, 0.1374200E+01, 0.1536700E+01, &
     & 0.1873543E+01, 0.2532257E+01, 0.2387700E+01, 0.2387700E+01 /
      data (ref_adm(32,iz, 3,15),iz = 1,20) / &
     & 0.4726700E+00, 0.4726700E+00, 0.4775300E+00, 0.4918700E+00, &
     & 0.5087500E+00, 0.5173500E+00, 0.5450500E+00, 0.5853300E+00, &
     & 0.6312800E+00, 0.6896700E+00, 0.7711500E+00, 0.8694500E+00, &
     & 0.9986100E+00, 0.1171000E+01, 0.1342100E+01, 0.1503000E+01, &
     & 0.1817896E+01, 0.2374599E+01, 0.1993237E+01, 0.1993237E+01 /
      data (ref_adm(32,iz, 4,15),iz = 1,20) / &
     & 0.4659400E+00, 0.4659400E+00, 0.4770800E+00, 0.4891900E+00, &
     & 0.5043100E+00, 0.5173200E+00, 0.5425300E+00, 0.5817300E+00, &
     & 0.6259400E+00, 0.6812900E+00, 0.7562400E+00, 0.8630400E+00, &
     & 0.9703200E+00, 0.1133900E+01, 0.1290000E+01, 0.1417100E+01, &
     & 0.1555600E+01, 0.2108700E+01, 0.2010355E+01, 0.2010355E+01 /
      data (ref_adm(32,iz, 5,15),iz = 1,20) / &
     & 0.4763100E+00, 0.4763100E+00, 0.4789200E+00, 0.4931800E+00, &
     & 0.5061200E+00, 0.5265200E+00, 0.5533900E+00, 0.5829200E+00, &
     & 0.6283900E+00, 0.6772700E+00, 0.7439600E+00, 0.8360000E+00, &
     & 0.9471400E+00, 0.1098600E+01, 0.1245100E+01, 0.1369100E+01, &
     & 0.1472300E+01, 0.1833439E+01, 0.1615397E+01, 0.1615397E+01 /
      data (ref_adm(32,iz, 6,15),iz = 1,20) / &
     & 0.4742400E+00, 0.4742400E+00, 0.4838200E+00, 0.4923200E+00, &
     & 0.5037600E+00, 0.5182900E+00, 0.5421200E+00, 0.5732200E+00, &
     & 0.6128600E+00, 0.6619400E+00, 0.7248800E+00, 0.8041000E+00, &
     & 0.9060800E+00, 0.1045500E+01, 0.1184000E+01, 0.1329000E+01, &
     & 0.1547000E+01, 0.1641200E+01, 0.1450700E+01, 0.1450700E+01 /
      data (ref_adm(32,iz, 7,15),iz = 1,20) / &
     & 0.4811300E+00, 0.4811300E+00, 0.4877700E+00, 0.4960700E+00, &
     & 0.5039700E+00, 0.5230600E+00, 0.5410700E+00, 0.5768400E+00, &
     & 0.6182400E+00, 0.6614100E+00, 0.7214700E+00, 0.7942600E+00, &
     & 0.8923500E+00, 0.1014600E+01, 0.1141800E+01, 0.1305100E+01, &
     & 0.1481900E+01, 0.1464500E+01, 0.1175900E+01, 0.1175900E+01 /
      data (ref_adm(32,iz, 8,15),iz = 1,20) / &
     & 0.4727800E+00, 0.4727800E+00, 0.4869200E+00, 0.4917300E+00, &
     & 0.5049600E+00, 0.5166700E+00, 0.5378600E+00, 0.5669500E+00, &
     & 0.6050100E+00, 0.6465400E+00, 0.7038600E+00, 0.7640100E+00, &
     & 0.8418600E+00, 0.9487800E+00, 0.1045400E+01, 0.1163100E+01, &
     & 0.1291800E+01, 0.1253600E+01, 0.1095900E+01, 0.1095900E+01 /
      data (ref_adm(32,iz, 9,15),iz = 1,20) / &
     & 0.4810000E+00, 0.4810000E+00, 0.4783400E+00, 0.4885400E+00, &
     & 0.5048700E+00, 0.5152600E+00, 0.5337000E+00, 0.5615800E+00, &
     & 0.5953200E+00, 0.6251100E+00, 0.6795600E+00, 0.7394500E+00, &
     & 0.8144400E+00, 0.8907800E+00, 0.9869600E+00, 0.1087200E+01, &
     & 0.1191200E+01, 0.1093800E+01, 0.9806100E+00, 0.9806100E+00 /
      data (ref_adm(32,iz,10,15),iz = 1,20) / &
     & 0.4762700E+00, 0.4762700E+00, 0.4782300E+00, 0.4805300E+00, &
     & 0.5000600E+00, 0.5177700E+00, 0.5383000E+00, 0.5552800E+00, &
     & 0.5948100E+00, 0.6218500E+00, 0.6615100E+00, 0.7181700E+00, &
     & 0.7759100E+00, 0.8502800E+00, 0.9220400E+00, 0.1006900E+01, &
     & 0.1074700E+01, 0.9995100E+00, 0.8607200E+00, 0.8607200E+00 /
      data (ref_adm(32,iz,11,15),iz = 1,20) / &
     & 0.4781500E+00, 0.4781500E+00, 0.4779200E+00, 0.4877900E+00, &
     & 0.4976400E+00, 0.5116000E+00, 0.5276200E+00, 0.5528800E+00, &
     & 0.5812400E+00, 0.6051400E+00, 0.6378800E+00, 0.6890800E+00, &
     & 0.7365300E+00, 0.8003800E+00, 0.8605800E+00, 0.9307600E+00, &
     & 0.9973200E+00, 0.9332900E+00, 0.7838500E+00, 0.7838500E+00 /
      data (ref_adm(32,iz,12,15),iz = 1,20) / &
     & 0.4738400E+00, 0.4738400E+00, 0.4706900E+00, 0.4841600E+00, &
     & 0.4916700E+00, 0.5015400E+00, 0.5203800E+00, 0.5483500E+00, &
     & 0.5674900E+00, 0.5843100E+00, 0.6238000E+00, 0.6625100E+00, &
     & 0.7019600E+00, 0.7506300E+00, 0.8059700E+00, 0.8664700E+00, &
     & 0.9101300E+00, 0.8626400E+00, 0.7254500E+00, 0.7254500E+00 /
      data (ref_adm(32,iz,13,15),iz = 1,20) / &
     & 0.4762800E+00, 0.4762800E+00, 0.4821900E+00, 0.4811700E+00, &
     & 0.4966900E+00, 0.5013000E+00, 0.5123100E+00, 0.5249400E+00, &
     & 0.5440000E+00, 0.5660000E+00, 0.6101900E+00, 0.6340000E+00, &
     & 0.6704600E+00, 0.7179300E+00, 0.7592700E+00, 0.8016800E+00, &
     & 0.8443700E+00, 0.8059100E+00, 0.6580000E+00, 0.6580000E+00 /
      data (ref_adm(32,iz,14,15),iz = 1,20) / &
     & 0.4797900E+00, 0.4797900E+00, 0.4891700E+00, 0.4941600E+00, &
     & 0.5057500E+00, 0.5126800E+00, 0.5242400E+00, 0.5380200E+00, &
     & 0.5581900E+00, 0.5806000E+00, 0.6012100E+00, 0.6269700E+00, &
     & 0.6482000E+00, 0.6808900E+00, 0.7209900E+00, 0.7464300E+00, &
     & 0.7795800E+00, 0.7643200E+00, 0.7470000E+00, 0.7470000E+00 /
      data (ref_adm(32,iz,15,15),iz = 1,20) / &
     & 0.4889500E+00, 0.4889500E+00, 0.4832400E+00, 0.4863200E+00, &
     & 0.4918700E+00, 0.4980900E+00, 0.5139800E+00, 0.5292300E+00, &
     & 0.5520900E+00, 0.5743600E+00, 0.6005700E+00, 0.6268800E+00, &
     & 0.6524200E+00, 0.6837900E+00, 0.6806900E+00, 0.7054200E+00, &
     & 0.7358600E+00, 0.7431600E+00, 0.6968354E+00, 0.6968354E+00 /
      data (ref_adm(32,iz,16,15),iz = 1,20) / &
     & 0.4662000E+00, 0.4662000E+00, 0.4579100E+00, 0.4635200E+00, &
     & 0.4716800E+00, 0.4777100E+00, 0.4878400E+00, 0.5007300E+00, &
     & 0.5196600E+00, 0.5362700E+00, 0.5541900E+00, 0.5817300E+00, &
     & 0.6069100E+00, 0.6365800E+00, 0.6548800E+00, 0.6685500E+00, &
     & 0.7043400E+00, 0.7383614E+00, 0.6731080E+00, 0.6731080E+00 /
      data (ref_adm(32,iz,17,15),iz = 1,20) / &
     & 0.4749000E+00, 0.4749000E+00, 0.4802600E+00, 0.4758200E+00, &
     & 0.4857200E+00, 0.4942200E+00, 0.5012400E+00, 0.5113900E+00, &
     & 0.5229400E+00, 0.5422000E+00, 0.5491200E+00, 0.5673000E+00, &
     & 0.5869500E+00, 0.6130100E+00, 0.6242300E+00, 0.6419900E+00, &
     & 0.6739500E+00, 0.7074272E+00, 0.6507211E+00, 0.6507211E+00 /
      data (ref_adm(32,iz,18,15),iz = 1,20) / &
     & 0.4744000E+00, 0.4744000E+00, 0.4841000E+00, 0.4841800E+00, &
     & 0.4867900E+00, 0.4921600E+00, 0.5015900E+00, 0.5115800E+00, &
     & 0.5213300E+00, 0.5334300E+00, 0.5383800E+00, 0.5630500E+00, &
     & 0.5884700E+00, 0.6021200E+00, 0.6115000E+00, 0.6269500E+00, &
     & 0.6541858E+00, 0.6456316E+00, 0.5848324E+00, 0.5848324E+00 /
      data (ref_adm(32,iz,19,15),iz = 1,20) / &
     & 0.4719000E+00, 0.4719000E+00, 0.4828700E+00, 0.4818400E+00, &
     & 0.4808200E+00, 0.4897200E+00, 0.4955800E+00, 0.5057400E+00, &
     & 0.5089100E+00, 0.5165900E+00, 0.5329300E+00, 0.5528100E+00, &
     & 0.5775500E+00, 0.5852000E+00, 0.5980300E+00, 0.6213600E+00, &
     & 0.6351317E+00, 0.6258548E+00, 0.5727780E+00, 0.5727780E+00 /
      data (ref_adm(32,iz,20,15),iz = 1,20) / &
     & 0.4736300E+00, 0.4736300E+00, 0.4770200E+00, 0.4774400E+00, &
     & 0.4846200E+00, 0.4934900E+00, 0.5013300E+00, 0.5016300E+00, &
     & 0.5141200E+00, 0.5245500E+00, 0.5382000E+00, 0.5540000E+00, &
     & 0.5627200E+00, 0.5722700E+00, 0.6058900E+00, 0.5871500E+00, &
     & 0.6203583E+00, 0.6117476E+00, 0.5660838E+00, 0.5660838E+00 /
      data (ref_adm(32,iz,21,15),iz = 1,20) / &
     & 0.4780000E+00, 0.4780000E+00, 0.4786600E+00, 0.4839400E+00, &
     & 0.4909100E+00, 0.4979600E+00, 0.5022100E+00, 0.5080500E+00, &
     & 0.5164900E+00, 0.5183300E+00, 0.5285900E+00, 0.5517500E+00, &
     & 0.5613400E+00, 0.5667900E+00, 0.5836000E+00, 0.5739100E+00, &
     & 0.6079732E+00, 0.6003436E+00, 0.5629646E+00, 0.5629646E+00 /
      data (ref_adm(32,iz,22,15),iz = 1,20) / &
     & 0.4804700E+00, 0.4804700E+00, 0.4889600E+00, 0.4887100E+00, &
     & 0.4899400E+00, 0.4944200E+00, 0.4977800E+00, 0.5031900E+00, &
     & 0.5118700E+00, 0.5181000E+00, 0.5249900E+00, 0.5502100E+00, &
     & 0.5593200E+00, 0.5723800E+00, 0.5745400E+00, 0.5823900E+00, &
     & 0.5804246E+00, 0.5652620E+00, 0.5238997E+00, 0.5238997E+00 /
      data (ref_adm(32,iz,23,15),iz = 1,20) / &
     & 0.4709700E+00, 0.4709700E+00, 0.4811800E+00, 0.4808200E+00, &
     & 0.4783400E+00, 0.4915500E+00, 0.4941000E+00, 0.5011700E+00, &
     & 0.5149400E+00, 0.5143800E+00, 0.5248400E+00, 0.5487600E+00, &
     & 0.5483500E+00, 0.5631000E+00, 0.5686600E+00, 0.5908100E+00, &
     & 0.6377000E+00, 0.5613999E+00, 0.5275473E+00, 0.5275473E+00 /
      data (ref_adm(32,iz,24,15),iz = 1,20) / &
     & 0.4619100E+00, 0.4619100E+00, 0.4658700E+00, 0.4657000E+00, &
     & 0.4699100E+00, 0.4751100E+00, 0.4825500E+00, 0.4906300E+00, &
     & 0.4997400E+00, 0.5094600E+00, 0.5193000E+00, 0.5328900E+00, &
     & 0.5458900E+00, 0.5573200E+00, 0.5735600E+00, 0.6009700E+00, &
     & 0.6023300E+00, 0.5612431E+00, 0.5345412E+00, 0.5345412E+00 /
      data (ref_adm(32,iz,25,15),iz = 1,20) / &
     & 0.4869000E+00, 0.4869000E+00, 0.4927100E+00, 0.4919000E+00, &
     & 0.4946000E+00, 0.4978900E+00, 0.5038800E+00, 0.5147300E+00, &
     & 0.5271700E+00, 0.5380700E+00, 0.5537500E+00, 0.5632600E+00, &
     & 0.5673800E+00, 0.5746900E+00, 0.5875300E+00, 0.5976900E+00, &
     & 0.6247800E+00, 0.5642003E+00, 0.5439968E+00, 0.5439968E+00 /
      data (ref_adm(32,iz,26,15),iz = 1,20) / &
     & 0.4804500E+00, 0.4804500E+00, 0.4782900E+00, 0.4821800E+00, &
     & 0.4840300E+00, 0.4896300E+00, 0.5069500E+00, 0.5110200E+00, &
     & 0.5225000E+00, 0.5327000E+00, 0.5455100E+00, 0.5607300E+00, &
     & 0.5750100E+00, 0.5909400E+00, 0.5991200E+00, 0.6130100E+00, &
     & 0.6154100E+00, 0.6037100E+00, 0.5572642E+00, 0.5572642E+00 /
      data (ref_adm(32,iz,27,15),iz = 1,20) / &
     & 0.4786500E+00, 0.4786500E+00, 0.4822500E+00, 0.4809200E+00, &
     & 0.4928400E+00, 0.4967300E+00, 0.4946400E+00, 0.5123500E+00, &
     & 0.5223300E+00, 0.5344500E+00, 0.5439000E+00, 0.5541100E+00, &
     & 0.5770700E+00, 0.5907300E+00, 0.6063700E+00, 0.6286600E+00, &
     & 0.6363000E+00, 0.6285700E+00, 0.5479200E+00, 0.5479200E+00 /
      data (ref_adm(32,iz,28,15),iz = 1,20) / &
     & 0.4762500E+00, 0.4762500E+00, 0.4741700E+00, 0.4814200E+00, &
     & 0.4922000E+00, 0.4948900E+00, 0.5007400E+00, 0.5109600E+00, &
     & 0.5232700E+00, 0.5378200E+00, 0.5555000E+00, 0.5717700E+00, &
     & 0.5904200E+00, 0.6089000E+00, 0.6246300E+00, 0.6422300E+00, &
     & 0.6524800E+00, 0.6509600E+00, 0.5696900E+00, 0.5696900E+00 /
      data (ref_adm(32,iz,29,15),iz = 1,20) / &
     & 0.4764000E+00, 0.4764000E+00, 0.4706600E+00, 0.4820500E+00, &
     & 0.4857800E+00, 0.4920000E+00, 0.5056700E+00, 0.5089700E+00, &
     & 0.5257900E+00, 0.5441700E+00, 0.5627800E+00, 0.5900200E+00, &
     & 0.6157600E+00, 0.6305300E+00, 0.6519400E+00, 0.6718900E+00, &
     & 0.6859100E+00, 0.6728700E+00, 0.5807700E+00, 0.5807700E+00 /
      data (ref_adm(32,iz,30,15),iz = 1,20) / &
     & 0.4780300E+00, 0.4780300E+00, 0.4761200E+00, 0.4801200E+00, &
     & 0.4878100E+00, 0.4977900E+00, 0.5099800E+00, 0.5183100E+00, &
     & 0.5408400E+00, 0.5611900E+00, 0.5830600E+00, 0.6067000E+00, &
     & 0.6285000E+00, 0.6427400E+00, 0.6592100E+00, 0.6802700E+00, &
     & 0.6955900E+00, 0.6929500E+00, 0.5962000E+00, 0.5962000E+00 /
      data (ref_adm(32,iz,31,15),iz = 1,20) / &
     & 0.4773800E+00, 0.4773800E+00, 0.4753600E+00, 0.4843600E+00, &
     & 0.4840100E+00, 0.4947000E+00, 0.5080100E+00, 0.5208200E+00, &
     & 0.5436900E+00, 0.5722800E+00, 0.5850700E+00, 0.6015100E+00, &
     & 0.6192500E+00, 0.6365500E+00, 0.6575300E+00, 0.6807300E+00, &
     & 0.6937900E+00, 0.6920900E+00, 0.6101400E+00, 0.6101400E+00 /
      data (ref_adm(32,iz,32,15),iz = 1,20) / &
     & 0.4705500E+00, 0.4705500E+00, 0.4807000E+00, 0.4830900E+00, &
     & 0.4880200E+00, 0.4959800E+00, 0.5068200E+00, 0.5253700E+00, &
     & 0.5517400E+00, 0.5779300E+00, 0.5915900E+00, 0.6025500E+00, &
     & 0.6209800E+00, 0.6433300E+00, 0.6631300E+00, 0.6870900E+00, &
     & 0.7031600E+00, 0.7038900E+00, 0.6144900E+00, 0.6144900E+00 /
      data (ref_adm(32,iz,33,15),iz = 1,20) / &
     & 0.4796800E+00, 0.4796800E+00, 0.4759400E+00, 0.4755000E+00, &
     & 0.4839400E+00, 0.4938700E+00, 0.5102500E+00, 0.5316600E+00, &
     & 0.5560300E+00, 0.5672200E+00, 0.5798600E+00, 0.5958100E+00, &
     & 0.6138900E+00, 0.6392100E+00, 0.6603800E+00, 0.6832900E+00, &
     & 0.7098700E+00, 0.7174800E+00, 0.6129400E+00, 0.6129400E+00 /
      data (ref_adm(32,iz,34,15),iz = 1,20) / &
     & 0.4730000E+00, 0.4730000E+00, 0.4730400E+00, 0.4886000E+00, &
     & 0.4892400E+00, 0.4984600E+00, 0.5149600E+00, 0.5406700E+00, &
     & 0.5755000E+00, 0.5703000E+00, 0.5849800E+00, 0.6053100E+00, &
     & 0.6272800E+00, 0.6515300E+00, 0.6729200E+00, 0.7025800E+00, &
     & 0.7335200E+00, 0.7216800E+00, 0.6063200E+00, 0.6063200E+00 /
      data (ref_adm(32,iz,35,15),iz = 1,20) / &
     & 0.4791100E+00, 0.4791100E+00, 0.4778200E+00, 0.4841100E+00, &
     & 0.4867300E+00, 0.4984600E+00, 0.5121400E+00, 0.5379900E+00, &
     & 0.5697900E+00, 0.5775000E+00, 0.5884400E+00, 0.6042600E+00, &
     & 0.6250100E+00, 0.6563000E+00, 0.6844700E+00, 0.7135800E+00, &
     & 0.7261400E+00, 0.7194000E+00, 0.6042000E+00, 0.6042000E+00 /
      data (ref_adm(32,iz,36,15),iz = 1,20) / &
     & 0.4704700E+00, 0.4704700E+00, 0.4788600E+00, 0.4788300E+00, &
     & 0.4883200E+00, 0.4977700E+00, 0.5136500E+00, 0.5391800E+00, &
     & 0.5610300E+00, 0.5702400E+00, 0.5904700E+00, 0.6077000E+00, &
     & 0.6288300E+00, 0.6624100E+00, 0.7000600E+00, 0.7311800E+00, &
     & 0.7396400E+00, 0.7280800E+00, 0.6185100E+00, 0.6185100E+00 /
      data (ref_adm(32,iz,37,15),iz = 1,20) / &
     & 0.4788900E+00, 0.4788900E+00, 0.4761700E+00, 0.4818100E+00, &
     & 0.4833200E+00, 0.4987700E+00, 0.5163500E+00, 0.5393000E+00, &
     & 0.5530700E+00, 0.5727600E+00, 0.5894100E+00, 0.6056300E+00, &
     & 0.6355700E+00, 0.6751500E+00, 0.7191600E+00, 0.7712000E+00, &
     & 0.7673100E+00, 0.7315900E+00, 0.6146900E+00, 0.6146900E+00 /
      data (ref_adm(32,iz,38,15),iz = 1,20) / &
     & 0.4788900E+00, 0.4788900E+00, 0.4761700E+00, 0.4818100E+00, &
     & 0.4833200E+00, 0.4987700E+00, 0.5163500E+00, 0.5393000E+00, &
     & 0.5530700E+00, 0.5727600E+00, 0.5894100E+00, 0.6056300E+00, &
     & 0.6355700E+00, 0.6751500E+00, 0.7191600E+00, 0.7712000E+00, &
     & 0.7673100E+00, 0.7315900E+00, 0.6146900E+00, 0.6146900E+00 /
! Solar Zenith Angle 75.0 Albedo  0.6480661E+00
      data (ref_adm(32,iz, 1,16),iz = 1,20) / &
     & 0.4593500E+00, 0.4593500E+00, 0.4753400E+00, 0.4883200E+00, &
     & 0.5029600E+00, 0.5218800E+00, 0.5544600E+00, 0.5882500E+00, &
     & 0.6378700E+00, 0.7078900E+00, 0.8046500E+00, 0.9251600E+00, &
     & 0.1083100E+01, 0.1163800E+01, 0.1522688E+01, 0.2046893E+01, &
     & 0.2854984E+01, 0.4017595E+01, 0.2064979E+01, 0.2064979E+01 /
      data (ref_adm(32,iz, 2,16),iz = 1,20) / &
     & 0.4593500E+00, 0.4593500E+00, 0.4753400E+00, 0.4883200E+00, &
     & 0.5029600E+00, 0.5218800E+00, 0.5544600E+00, 0.5882500E+00, &
     & 0.6378700E+00, 0.7078900E+00, 0.8046500E+00, 0.9251600E+00, &
     & 0.1083100E+01, 0.1163800E+01, 0.1522688E+01, 0.2046893E+01, &
     & 0.2854984E+01, 0.4017595E+01, 0.2064979E+01, 0.2064979E+01 /
      data (ref_adm(32,iz, 3,16),iz = 1,20) / &
     & 0.4592500E+00, 0.4592500E+00, 0.4714700E+00, 0.4776300E+00, &
     & 0.5027700E+00, 0.5257300E+00, 0.5505600E+00, 0.5864700E+00, &
     & 0.6285300E+00, 0.7028500E+00, 0.7960100E+00, 0.9282700E+00, &
     & 0.1059900E+01, 0.1212200E+01, 0.1493841E+01, 0.1986246E+01, &
     & 0.2706017E+01, 0.4041051E+01, 0.1853770E+01, 0.1853770E+01 /
      data (ref_adm(32,iz, 4,16),iz = 1,20) / &
     & 0.4668800E+00, 0.4668800E+00, 0.4709000E+00, 0.4821200E+00, &
     & 0.4969100E+00, 0.5164000E+00, 0.5501000E+00, 0.5792900E+00, &
     & 0.6370700E+00, 0.6998100E+00, 0.7913100E+00, 0.9032300E+00, &
     & 0.1035600E+01, 0.1112800E+01, 0.1435823E+01, 0.1864388E+01, &
     & 0.2437012E+01, 0.3594891E+01, 0.2700292E+01, 0.2700292E+01 /
      data (ref_adm(32,iz, 5,16),iz = 1,20) / &
     & 0.4674700E+00, 0.4674700E+00, 0.4738800E+00, 0.4858400E+00, &
     & 0.4973800E+00, 0.5159100E+00, 0.5407300E+00, 0.5848500E+00, &
     & 0.6384900E+00, 0.6928600E+00, 0.7713200E+00, 0.8708900E+00, &
     & 0.1003700E+01, 0.1121900E+01, 0.1363295E+01, 0.1714312E+01, &
     & 0.2146916E+01, 0.2807260E+01, 0.2796729E+01, 0.2796729E+01 /
      data (ref_adm(32,iz, 6,16),iz = 1,20) / &
     & 0.4540700E+00, 0.4540700E+00, 0.4638400E+00, 0.4748400E+00, &
     & 0.4886000E+00, 0.5090000E+00, 0.5360500E+00, 0.5749500E+00, &
     & 0.6211200E+00, 0.6795900E+00, 0.7521800E+00, 0.8514300E+00, &
     & 0.9705900E+00, 0.1139100E+01, 0.1349800E+01, 0.1619500E+01, &
     & 0.1868800E+01, 0.2024100E+01, 0.2011221E+01, 0.2011221E+01 /
      data (ref_adm(32,iz, 7,16),iz = 1,20) / &
     & 0.4679600E+00, 0.4679600E+00, 0.4768500E+00, 0.4818600E+00, &
     & 0.4980900E+00, 0.5228400E+00, 0.5470800E+00, 0.5827900E+00, &
     & 0.6220700E+00, 0.6714600E+00, 0.7328900E+00, 0.8256600E+00, &
     & 0.9364400E+00, 0.1090100E+01, 0.1264200E+01, 0.1506900E+01, &
     & 0.1710000E+01, 0.1792800E+01, 0.1553200E+01, 0.1553200E+01 /
      data (ref_adm(32,iz, 8,16),iz = 1,20) / &
     & 0.4659700E+00, 0.4659700E+00, 0.4732400E+00, 0.4849600E+00, &
     & 0.4963900E+00, 0.5104400E+00, 0.5468400E+00, 0.5729300E+00, &
     & 0.6107500E+00, 0.6549600E+00, 0.7084000E+00, 0.7939900E+00, &
     & 0.8932700E+00, 0.1028300E+01, 0.1186700E+01, 0.1381400E+01, &
     & 0.1550100E+01, 0.1516000E+01, 0.1312000E+01, 0.1312000E+01 /
      data (ref_adm(32,iz, 9,16),iz = 1,20) / &
     & 0.4692200E+00, 0.4692200E+00, 0.4701900E+00, 0.4785800E+00, &
     & 0.4870900E+00, 0.5094600E+00, 0.5401300E+00, 0.5649300E+00, &
     & 0.5949700E+00, 0.6334800E+00, 0.6910900E+00, 0.7590300E+00, &
     & 0.8473000E+00, 0.9503800E+00, 0.1084000E+01, 0.1260700E+01, &
     & 0.1389000E+01, 0.1317100E+01, 0.1177900E+01, 0.1177900E+01 /
      data (ref_adm(32,iz,10,16),iz = 1,20) / &
     & 0.4665700E+00, 0.4665700E+00, 0.4757400E+00, 0.4781200E+00, &
     & 0.4879100E+00, 0.5113500E+00, 0.5265200E+00, 0.5579700E+00, &
     & 0.5925900E+00, 0.6212400E+00, 0.6683400E+00, 0.7336500E+00, &
     & 0.8069300E+00, 0.9030100E+00, 0.1001800E+01, 0.1114800E+01, &
     & 0.1240600E+01, 0.1183600E+01, 0.1062500E+01, 0.1062500E+01 /
      data (ref_adm(32,iz,11,16),iz = 1,20) / &
     & 0.4762300E+00, 0.4762300E+00, 0.4796100E+00, 0.4789500E+00, &
     & 0.4873800E+00, 0.5041900E+00, 0.5270200E+00, 0.5495100E+00, &
     & 0.5797000E+00, 0.6116900E+00, 0.6549700E+00, 0.7088300E+00, &
     & 0.7791300E+00, 0.8478300E+00, 0.9273200E+00, 0.1032500E+01, &
     & 0.1110200E+01, 0.1053200E+01, 0.9114400E+00, 0.9114400E+00 /
      data (ref_adm(32,iz,12,16),iz = 1,20) / &
     & 0.4702600E+00, 0.4702600E+00, 0.4761400E+00, 0.4773100E+00, &
     & 0.4887800E+00, 0.5026900E+00, 0.5166500E+00, 0.5363400E+00, &
     & 0.5630800E+00, 0.5907000E+00, 0.6282300E+00, 0.6734500E+00, &
     & 0.7327800E+00, 0.8029600E+00, 0.8676000E+00, 0.9485800E+00, &
     & 0.1017400E+01, 0.9708000E+00, 0.8609400E+00, 0.8609400E+00 /
      data (ref_adm(32,iz,13,16),iz = 1,20) / &
     & 0.4696100E+00, 0.4696100E+00, 0.4687400E+00, 0.4782900E+00, &
     & 0.4855000E+00, 0.4976800E+00, 0.5166900E+00, 0.5322000E+00, &
     & 0.5581600E+00, 0.5734800E+00, 0.6104000E+00, 0.6489500E+00, &
     & 0.7061800E+00, 0.7538500E+00, 0.8104900E+00, 0.8821700E+00, &
     & 0.9349000E+00, 0.8787400E+00, 0.8270200E+00, 0.8270200E+00 /
      data (ref_adm(32,iz,14,16),iz = 1,20) / &
     & 0.4720800E+00, 0.4720800E+00, 0.4776500E+00, 0.4802500E+00, &
     & 0.4894000E+00, 0.5005700E+00, 0.5172700E+00, 0.5348600E+00, &
     & 0.5518500E+00, 0.5749700E+00, 0.6014000E+00, 0.6328000E+00, &
     & 0.6707700E+00, 0.7205000E+00, 0.7594400E+00, 0.8304900E+00, &
     & 0.8736100E+00, 0.8620700E+00, 0.8783932E+00, 0.8783932E+00 /
      data (ref_adm(32,iz,15,16),iz = 1,20) / &
     & 0.4705200E+00, 0.4705200E+00, 0.4675600E+00, 0.4710300E+00, &
     & 0.4767000E+00, 0.4876100E+00, 0.5039100E+00, 0.5190500E+00, &
     & 0.5396600E+00, 0.5616000E+00, 0.5855300E+00, 0.6193300E+00, &
     & 0.6571700E+00, 0.7037500E+00, 0.7147100E+00, 0.7623200E+00, &
     & 0.7985600E+00, 0.8332700E+00, 0.8429451E+00, 0.8429451E+00 /
      data (ref_adm(32,iz,16,16),iz = 1,20) / &
     & 0.4575400E+00, 0.4575400E+00, 0.4529800E+00, 0.4553200E+00, &
     & 0.4638800E+00, 0.4758400E+00, 0.4877600E+00, 0.5035400E+00, &
     & 0.5197200E+00, 0.5365700E+00, 0.5590600E+00, 0.5859500E+00, &
     & 0.6147900E+00, 0.6503500E+00, 0.6898100E+00, 0.7333800E+00, &
     & 0.7731600E+00, 0.8240880E+00, 0.8119980E+00, 0.8119980E+00 /
      data (ref_adm(32,iz,17,16),iz = 1,20) / &
     & 0.4594300E+00, 0.4594300E+00, 0.4638600E+00, 0.4667500E+00, &
     & 0.4725200E+00, 0.4820400E+00, 0.4954000E+00, 0.5130200E+00, &
     & 0.5197200E+00, 0.5356400E+00, 0.5556100E+00, 0.5810000E+00, &
     & 0.6057400E+00, 0.6418600E+00, 0.6706300E+00, 0.6945600E+00, &
     & 0.7182600E+00, 0.7846776E+00, 0.7826616E+00, 0.7826616E+00 /
      data (ref_adm(32,iz,18,16),iz = 1,20) / &
     & 0.4560100E+00, 0.4560100E+00, 0.4560900E+00, 0.4614700E+00, &
     & 0.4706600E+00, 0.4865800E+00, 0.4924900E+00, 0.5090900E+00, &
     & 0.5088100E+00, 0.5247700E+00, 0.5382100E+00, 0.5690000E+00, &
     & 0.5898600E+00, 0.6094900E+00, 0.6361600E+00, 0.6681900E+00, &
     & 0.7019351E+00, 0.7155767E+00, 0.6853193E+00, 0.6853193E+00 /
      data (ref_adm(32,iz,19,16),iz = 1,20) / &
     & 0.4610900E+00, 0.4610900E+00, 0.4629300E+00, 0.4645700E+00, &
     & 0.4663400E+00, 0.4793500E+00, 0.4837800E+00, 0.4894300E+00, &
     & 0.5060400E+00, 0.5212200E+00, 0.5249600E+00, 0.5622200E+00, &
     & 0.5887400E+00, 0.6004200E+00, 0.6242300E+00, 0.6678200E+00, &
     & 0.6788090E+00, 0.6908630E+00, 0.6695421E+00, 0.6695421E+00 /
      data (ref_adm(32,iz,20,16),iz = 1,20) / &
     & 0.4581600E+00, 0.4581600E+00, 0.4574700E+00, 0.4552800E+00, &
     & 0.4590500E+00, 0.4676200E+00, 0.4797000E+00, 0.4831200E+00, &
     & 0.4953200E+00, 0.5063800E+00, 0.5213700E+00, 0.5468200E+00, &
     & 0.5729500E+00, 0.5866100E+00, 0.6097900E+00, 0.7028300E+00, &
     & 0.6613490E+00, 0.6735145E+00, 0.6607769E+00, 0.6607769E+00 /
      data (ref_adm(32,iz,21,16),iz = 1,20) / &
     & 0.4661100E+00, 0.4661100E+00, 0.4704500E+00, 0.4633700E+00, &
     & 0.4668500E+00, 0.4653200E+00, 0.4713400E+00, 0.4816300E+00, &
     & 0.4931100E+00, 0.5071000E+00, 0.5235100E+00, 0.5415400E+00, &
     & 0.5611900E+00, 0.5891300E+00, 0.6056100E+00, 0.7117500E+00, &
     & 0.6470301E+00, 0.6598222E+00, 0.6569855E+00, 0.6569855E+00 /
      data (ref_adm(32,iz,22,16),iz = 1,20) / &
     & 0.4588100E+00, 0.4588100E+00, 0.4639400E+00, 0.4589800E+00, &
     & 0.4590600E+00, 0.4631700E+00, 0.4767400E+00, 0.4880500E+00, &
     & 0.5069200E+00, 0.5118900E+00, 0.5249500E+00, 0.5389200E+00, &
     & 0.5518400E+00, 0.5700500E+00, 0.5944600E+00, 0.6449800E+00, &
     & 0.6120447E+00, 0.6122329E+00, 0.5950897E+00, 0.5950897E+00 /
      data (ref_adm(32,iz,23,16),iz = 1,20) / &
     & 0.4440300E+00, 0.4440300E+00, 0.4478100E+00, 0.4566400E+00, &
     & 0.4566100E+00, 0.4596400E+00, 0.4676000E+00, 0.4887900E+00, &
     & 0.5029000E+00, 0.5112500E+00, 0.5215300E+00, 0.5373700E+00, &
     & 0.5488200E+00, 0.5759600E+00, 0.5942100E+00, 0.6044100E+00, &
     & 0.6066082E+00, 0.6079112E+00, 0.6000817E+00, 0.6000817E+00 /
      data (ref_adm(32,iz,24,16),iz = 1,20) / &
     & 0.4510900E+00, 0.4510900E+00, 0.4511300E+00, 0.4548200E+00, &
     & 0.4597800E+00, 0.4656900E+00, 0.4709300E+00, 0.4795800E+00, &
     & 0.4911000E+00, 0.5029600E+00, 0.5172100E+00, 0.5333000E+00, &
     & 0.5487500E+00, 0.5684400E+00, 0.5816100E+00, 0.6031700E+00, &
     & 0.6626900E+00, 0.6079651E+00, 0.6094760E+00, 0.6094760E+00 /
      data (ref_adm(32,iz,25,16),iz = 1,20) / &
     & 0.4688900E+00, 0.4688900E+00, 0.4721100E+00, 0.4742800E+00, &
     & 0.4802600E+00, 0.4878900E+00, 0.4928700E+00, 0.4991100E+00, &
     & 0.5086600E+00, 0.5204700E+00, 0.5332000E+00, 0.5516200E+00, &
     & 0.5722100E+00, 0.6003400E+00, 0.6105100E+00, 0.6239900E+00, &
     & 0.6491300E+00, 0.5967200E+00, 0.6222332E+00, 0.6222332E+00 /
      data (ref_adm(32,iz,26,16),iz = 1,20) / &
     & 0.4648600E+00, 0.4648600E+00, 0.4650800E+00, 0.4697100E+00, &
     & 0.4717600E+00, 0.4767800E+00, 0.4846300E+00, 0.4958000E+00, &
     & 0.5013300E+00, 0.5198200E+00, 0.5316900E+00, 0.5440900E+00, &
     & 0.5619100E+00, 0.5895300E+00, 0.6039300E+00, 0.6336800E+00, &
     & 0.6557900E+00, 0.6804500E+00, 0.6399937E+00, 0.6399937E+00 /
      data (ref_adm(32,iz,27,16),iz = 1,20) / &
     & 0.4629000E+00, 0.4629000E+00, 0.4614600E+00, 0.4638400E+00, &
     & 0.4720200E+00, 0.4780400E+00, 0.4786500E+00, 0.4958600E+00, &
     & 0.4995200E+00, 0.5165300E+00, 0.5348600E+00, 0.5523800E+00, &
     & 0.5686700E+00, 0.6020900E+00, 0.6196600E+00, 0.6581000E+00, &
     & 0.6853800E+00, 0.6977300E+00, 0.6474000E+00, 0.6474000E+00 /
      data (ref_adm(32,iz,28,16),iz = 1,20) / &
     & 0.4632900E+00, 0.4632900E+00, 0.4614700E+00, 0.4656200E+00, &
     & 0.4701900E+00, 0.4698500E+00, 0.4768700E+00, 0.4878200E+00, &
     & 0.5078300E+00, 0.5220400E+00, 0.5371500E+00, 0.5583100E+00, &
     & 0.5798100E+00, 0.6121700E+00, 0.6318700E+00, 0.6742700E+00, &
     & 0.7040900E+00, 0.7117800E+00, 0.6522200E+00, 0.6522200E+00 /
      data (ref_adm(32,iz,29,16),iz = 1,20) / &
     & 0.4665300E+00, 0.4665300E+00, 0.4637900E+00, 0.4643900E+00, &
     & 0.4712500E+00, 0.4794100E+00, 0.4832500E+00, 0.4951900E+00, &
     & 0.4953300E+00, 0.5202500E+00, 0.5533000E+00, 0.5680800E+00, &
     & 0.6032500E+00, 0.6368100E+00, 0.6596300E+00, 0.7023000E+00, &
     & 0.7275800E+00, 0.7433300E+00, 0.6631400E+00, 0.6631400E+00 /
      data (ref_adm(32,iz,30,16),iz = 1,20) / &
     & 0.4637700E+00, 0.4637700E+00, 0.4660700E+00, 0.4621100E+00, &
     & 0.4666200E+00, 0.4810300E+00, 0.4790400E+00, 0.4909200E+00, &
     & 0.5087000E+00, 0.5279500E+00, 0.5562400E+00, 0.5893500E+00, &
     & 0.6204900E+00, 0.6597500E+00, 0.6847600E+00, 0.7247600E+00, &
     & 0.7623800E+00, 0.7765900E+00, 0.6950100E+00, 0.6950100E+00 /
      data (ref_adm(32,iz,31,16),iz = 1,20) / &
     & 0.4675800E+00, 0.4675800E+00, 0.4658600E+00, 0.4650300E+00, &
     & 0.4716100E+00, 0.4753200E+00, 0.4875500E+00, 0.4918800E+00, &
     & 0.5098600E+00, 0.5353300E+00, 0.5705200E+00, 0.6012200E+00, &
     & 0.6226500E+00, 0.6595300E+00, 0.6795100E+00, 0.7078500E+00, &
     & 0.7451500E+00, 0.7924600E+00, 0.7103900E+00, 0.7103900E+00 /
      data (ref_adm(32,iz,32,16),iz = 1,20) / &
     & 0.4601200E+00, 0.4601200E+00, 0.4642600E+00, 0.4687800E+00, &
     & 0.4711400E+00, 0.4792200E+00, 0.4907300E+00, 0.5032000E+00, &
     & 0.5216600E+00, 0.5533200E+00, 0.5843900E+00, 0.6056000E+00, &
     & 0.6281800E+00, 0.6600500E+00, 0.6887500E+00, 0.7299100E+00, &
     & 0.7765700E+00, 0.8014300E+00, 0.7048800E+00, 0.7048800E+00 /
      data (ref_adm(32,iz,33,16),iz = 1,20) / &
     & 0.4628500E+00, 0.4628500E+00, 0.4573000E+00, 0.4556800E+00, &
     & 0.4646600E+00, 0.4723800E+00, 0.4841000E+00, 0.5023100E+00, &
     & 0.5233500E+00, 0.5517500E+00, 0.5705900E+00, 0.5923200E+00, &
     & 0.6189900E+00, 0.6579200E+00, 0.6921200E+00, 0.7365400E+00, &
     & 0.7899600E+00, 0.8140900E+00, 0.7244900E+00, 0.7244900E+00 /
      data (ref_adm(32,iz,34,16),iz = 1,20) / &
     & 0.4560600E+00, 0.4560600E+00, 0.4490500E+00, 0.4537900E+00, &
     & 0.4619800E+00, 0.4677500E+00, 0.4793500E+00, 0.5043000E+00, &
     & 0.5318000E+00, 0.5595400E+00, 0.5726300E+00, 0.5962900E+00, &
     & 0.6207200E+00, 0.6621200E+00, 0.6971800E+00, 0.7412200E+00, &
     & 0.7951700E+00, 0.8156600E+00, 0.7256200E+00, 0.7256200E+00 /
      data (ref_adm(32,iz,35,16),iz = 1,20) / &
     & 0.4632300E+00, 0.4632300E+00, 0.4602600E+00, 0.4620600E+00, &
     & 0.4646700E+00, 0.4766200E+00, 0.4888900E+00, 0.5094400E+00, &
     & 0.5347400E+00, 0.5580000E+00, 0.5783700E+00, 0.6008700E+00, &
     & 0.6301600E+00, 0.6693600E+00, 0.7109000E+00, 0.7566900E+00, &
     & 0.8041400E+00, 0.8250500E+00, 0.7151400E+00, 0.7151400E+00 /
      data (ref_adm(32,iz,36,16),iz = 1,20) / &
     & 0.4562500E+00, 0.4562500E+00, 0.4580600E+00, 0.4573000E+00, &
     & 0.4650300E+00, 0.4750000E+00, 0.4893100E+00, 0.5083400E+00, &
     & 0.5356300E+00, 0.5625700E+00, 0.5754300E+00, 0.6013300E+00, &
     & 0.6355300E+00, 0.6715600E+00, 0.7183700E+00, 0.7743500E+00, &
     & 0.8275400E+00, 0.8493500E+00, 0.7504100E+00, 0.7504100E+00 /
      data (ref_adm(32,iz,37,16),iz = 1,20) / &
     & 0.4553300E+00, 0.4553300E+00, 0.4579800E+00, 0.4655100E+00, &
     & 0.4698400E+00, 0.4729200E+00, 0.4887200E+00, 0.5126500E+00, &
     & 0.5362400E+00, 0.5597000E+00, 0.5828200E+00, 0.6044700E+00, &
     & 0.6389100E+00, 0.6751600E+00, 0.7224300E+00, 0.8000300E+00, &
     & 0.8603000E+00, 0.8748300E+00, 0.7517900E+00, 0.7517900E+00 /
      data (ref_adm(32,iz,38,16),iz = 1,20) / &
     & 0.4553300E+00, 0.4553300E+00, 0.4579800E+00, 0.4655100E+00, &
     & 0.4698400E+00, 0.4729200E+00, 0.4887200E+00, 0.5126500E+00, &
     & 0.5362400E+00, 0.5597000E+00, 0.5828200E+00, 0.6044700E+00, &
     & 0.6389100E+00, 0.6751600E+00, 0.7224300E+00, 0.8000300E+00, &
     & 0.8603000E+00, 0.8748300E+00, 0.7517900E+00, 0.7517900E+00 /
! Solar Zenith Angle 80.0 Albedo  0.6482463E+00
      data (ref_adm(32,iz, 1,17),iz = 1,20) / &
     & 0.4332900E+00, 0.4332900E+00, 0.4354400E+00, 0.4626500E+00, &
     & 0.4769600E+00, 0.5061000E+00, 0.5460500E+00, 0.5800200E+00, &
     & 0.6250700E+00, 0.6995900E+00, 0.8106200E+00, 0.9377200E+00, &
     & 0.1072931E+01, 0.1269210E+01, 0.1648328E+01, 0.2410596E+01, &
     & 0.3669435E+01, 0.4078777E+01, 0.2582544E+01, 0.2582544E+01 /
      data (ref_adm(32,iz, 2,17),iz = 1,20) / &
     & 0.4332900E+00, 0.4332900E+00, 0.4354400E+00, 0.4626500E+00, &
     & 0.4769600E+00, 0.5061000E+00, 0.5460500E+00, 0.5800200E+00, &
     & 0.6250700E+00, 0.6995900E+00, 0.8106200E+00, 0.9377200E+00, &
     & 0.1072931E+01, 0.1269210E+01, 0.1648328E+01, 0.2410596E+01, &
     & 0.3669435E+01, 0.4078777E+01, 0.2582544E+01, 0.2582544E+01 /
      data (ref_adm(32,iz, 3,17),iz = 1,20) / &
     & 0.4358100E+00, 0.4358100E+00, 0.4457100E+00, 0.4626500E+00, &
     & 0.4789600E+00, 0.5185500E+00, 0.5428700E+00, 0.5778200E+00, &
     & 0.6289000E+00, 0.6940000E+00, 0.8062400E+00, 0.9316200E+00, &
     & 0.1062245E+01, 0.1250844E+01, 0.1608289E+01, 0.2306052E+01, &
     & 0.3531045E+01, 0.4094296E+01, 0.2173357E+01, 0.2173357E+01 /
      data (ref_adm(32,iz, 4,17),iz = 1,20) / &
     & 0.4440400E+00, 0.4440400E+00, 0.4506200E+00, 0.4591800E+00, &
     & 0.4825800E+00, 0.5039700E+00, 0.5402700E+00, 0.5856500E+00, &
     & 0.6226600E+00, 0.6853400E+00, 0.7983500E+00, 0.9090600E+00, &
     & 0.1040029E+01, 0.1213948E+01, 0.1530272E+01, 0.2111635E+01, &
     & 0.3069752E+01, 0.4117702E+01, 0.2742030E+01, 0.2742030E+01 /
      data (ref_adm(32,iz, 5,17),iz = 1,20) / &
     & 0.4437200E+00, 0.4437200E+00, 0.4531900E+00, 0.4614900E+00, &
     & 0.4776000E+00, 0.4976500E+00, 0.5268900E+00, 0.5767400E+00, &
     & 0.6224000E+00, 0.6818500E+00, 0.7709900E+00, 0.8764600E+00, &
     & 0.1009888E+01, 0.1166400E+01, 0.1432757E+01, 0.1892294E+01, &
     & 0.2542426E+01, 0.3763355E+01, 0.3235348E+01, 0.3235348E+01 /
      data (ref_adm(32,iz, 6,17),iz = 1,20) / &
     & 0.4346100E+00, 0.4346100E+00, 0.4415000E+00, 0.4507900E+00, &
     & 0.4679800E+00, 0.4861800E+00, 0.5115900E+00, 0.5475800E+00, &
     & 0.6021500E+00, 0.6637000E+00, 0.7417000E+00, 0.8463600E+00, &
     & 0.9918300E+00, 0.1215700E+01, 0.1461400E+01, 0.1771800E+01, &
     & 0.2123700E+01, 0.2300200E+01, 0.2732579E+01, 0.2732579E+01 /
      data (ref_adm(32,iz, 7,17),iz = 1,20) / &
     & 0.4329000E+00, 0.4329000E+00, 0.4438800E+00, 0.4651000E+00, &
     & 0.4799800E+00, 0.4987700E+00, 0.5241800E+00, 0.5654800E+00, &
     & 0.6011800E+00, 0.6658000E+00, 0.7342700E+00, 0.8126900E+00, &
     & 0.9129000E+00, 0.1121400E+01, 0.1291400E+01, 0.1560200E+01, &
     & 0.1922200E+01, 0.2104300E+01, 0.1927800E+01, 0.1927800E+01 /
      data (ref_adm(32,iz, 8,17),iz = 1,20) / &
     & 0.4379100E+00, 0.4379100E+00, 0.4477600E+00, 0.4600700E+00, &
     & 0.4639300E+00, 0.4828900E+00, 0.5242400E+00, 0.5482900E+00, &
     & 0.5919100E+00, 0.6461600E+00, 0.7153000E+00, 0.7988400E+00, &
     & 0.9342200E+00, 0.1060100E+01, 0.1225600E+01, 0.1454700E+01, &
     & 0.1729300E+01, 0.1848300E+01, 0.1527200E+01, 0.1527200E+01 /
      data (ref_adm(32,iz, 9,17),iz = 1,20) / &
     & 0.4450400E+00, 0.4450400E+00, 0.4439800E+00, 0.4552000E+00, &
     & 0.4524400E+00, 0.4822600E+00, 0.5109400E+00, 0.5437900E+00, &
     & 0.5860700E+00, 0.6302200E+00, 0.6880700E+00, 0.7579900E+00, &
     & 0.8718000E+00, 0.9920800E+00, 0.1116200E+01, 0.1315900E+01, &
     & 0.1539600E+01, 0.1612200E+01, 0.1447400E+01, 0.1447400E+01 /
      data (ref_adm(32,iz,10,17),iz = 1,20) / &
     & 0.4438800E+00, 0.4438800E+00, 0.4477100E+00, 0.4551000E+00, &
     & 0.4637200E+00, 0.4739200E+00, 0.5032600E+00, 0.5330400E+00, &
     & 0.5693500E+00, 0.6135400E+00, 0.6523200E+00, 0.7213800E+00, &
     & 0.8052600E+00, 0.9263700E+00, 0.1029300E+01, 0.1207800E+01, &
     & 0.1391800E+01, 0.1404800E+01, 0.1212000E+01, 0.1212000E+01 /
      data (ref_adm(32,iz,11,17),iz = 1,20) / &
     & 0.4463000E+00, 0.4463000E+00, 0.4462400E+00, 0.4537700E+00, &
     & 0.4652600E+00, 0.4859500E+00, 0.4924100E+00, 0.5224500E+00, &
     & 0.5536500E+00, 0.5946200E+00, 0.6229300E+00, 0.6855100E+00, &
     & 0.7705000E+00, 0.8591700E+00, 0.9478800E+00, 0.1124100E+01, &
     & 0.1250400E+01, 0.1259300E+01, 0.1088800E+01, 0.1088800E+01 /
      data (ref_adm(32,iz,12,17),iz = 1,20) / &
     & 0.4464500E+00, 0.4464500E+00, 0.4459400E+00, 0.4511100E+00, &
     & 0.4620600E+00, 0.4734400E+00, 0.4977300E+00, 0.5215800E+00, &
     & 0.5418200E+00, 0.5733300E+00, 0.6045900E+00, 0.6552900E+00, &
     & 0.7335900E+00, 0.8230900E+00, 0.8945500E+00, 0.1024800E+01, &
     & 0.1152200E+01, 0.1117300E+01, 0.9415600E+00, 0.9415600E+00 /
      data (ref_adm(32,iz,13,17),iz = 1,20) / &
     & 0.4417100E+00, 0.4417100E+00, 0.4475800E+00, 0.4485400E+00, &
     & 0.4525100E+00, 0.4704400E+00, 0.4814600E+00, 0.5058100E+00, &
     & 0.5290500E+00, 0.5575200E+00, 0.5862100E+00, 0.6289700E+00, &
     & 0.6958400E+00, 0.7800400E+00, 0.8408500E+00, 0.9488800E+00, &
     & 0.1017300E+01, 0.1029700E+01, 0.8908100E+00, 0.8908100E+00 /
      data (ref_adm(32,iz,14,17),iz = 1,20) / &
     & 0.4624700E+00, 0.4624700E+00, 0.4631600E+00, 0.4715700E+00, &
     & 0.4829600E+00, 0.4900200E+00, 0.5073100E+00, 0.5251500E+00, &
     & 0.5460900E+00, 0.5656500E+00, 0.5941600E+00, 0.6330400E+00, &
     & 0.6804600E+00, 0.7284600E+00, 0.7906500E+00, 0.8802600E+00, &
     & 0.9437400E+00, 0.8860500E+00, 0.1014644E+01, 0.1014644E+01 /
      data (ref_adm(32,iz,15,17),iz = 1,20) / &
     & 0.4399900E+00, 0.4399900E+00, 0.4230200E+00, 0.4294100E+00, &
     & 0.4401400E+00, 0.4518300E+00, 0.4650100E+00, 0.4819800E+00, &
     & 0.5033600E+00, 0.5216700E+00, 0.5488600E+00, 0.5911000E+00, &
     & 0.6412600E+00, 0.6876900E+00, 0.7309900E+00, 0.8184700E+00, &
     & 0.8616800E+00, 0.8398500E+00, 0.9708834E+00, 0.9708834E+00 /
      data (ref_adm(32,iz,16,17),iz = 1,20) / &
     & 0.4349200E+00, 0.4349200E+00, 0.4414300E+00, 0.4471400E+00, &
     & 0.4555800E+00, 0.4597100E+00, 0.4707800E+00, 0.4909800E+00, &
     & 0.5073100E+00, 0.5258200E+00, 0.5510100E+00, 0.5826300E+00, &
     & 0.6148900E+00, 0.6507000E+00, 0.7062400E+00, 0.7630200E+00, &
     & 0.8281400E+00, 0.8878768E+00, 0.9336825E+00, 0.9336825E+00 /
      data (ref_adm(32,iz,17,17),iz = 1,20) / &
     & 0.4363800E+00, 0.4363800E+00, 0.4461000E+00, 0.4458000E+00, &
     & 0.4503000E+00, 0.4566100E+00, 0.4685500E+00, 0.4759900E+00, &
     & 0.4939300E+00, 0.5218700E+00, 0.5405300E+00, 0.5638500E+00, &
     & 0.5989700E+00, 0.6308000E+00, 0.6634600E+00, 0.7196100E+00, &
     & 0.8178700E+00, 0.8442932E+00, 0.8979816E+00, 0.8979816E+00 /
      data (ref_adm(32,iz,18,17),iz = 1,20) / &
     & 0.4376800E+00, 0.4376800E+00, 0.4413000E+00, 0.4438200E+00, &
     & 0.4534400E+00, 0.4612400E+00, 0.4645100E+00, 0.4760500E+00, &
     & 0.4842300E+00, 0.5091300E+00, 0.5269200E+00, 0.5482800E+00, &
     & 0.5727600E+00, 0.6033600E+00, 0.6360700E+00, 0.7104000E+00, &
     & 0.7448496E+00, 0.7970875E+00, 0.8428074E+00, 0.8428074E+00 /
      data (ref_adm(32,iz,19,17),iz = 1,20) / &
     & 0.4407900E+00, 0.4407900E+00, 0.4281900E+00, 0.4388600E+00, &
     & 0.4460900E+00, 0.4454800E+00, 0.4561400E+00, 0.4700000E+00, &
     & 0.4758400E+00, 0.4956800E+00, 0.5169400E+00, 0.5383500E+00, &
     & 0.5617600E+00, 0.5877700E+00, 0.6233900E+00, 0.6410200E+00, &
     & 0.7184408E+00, 0.7677912E+00, 0.8221377E+00, 0.8221377E+00 /
      data (ref_adm(32,iz,20,17),iz = 1,20) / &
     & 0.4340400E+00, 0.4340400E+00, 0.4343800E+00, 0.4361400E+00, &
     & 0.4379100E+00, 0.4484400E+00, 0.4578300E+00, 0.4682600E+00, &
     & 0.4765000E+00, 0.4938400E+00, 0.5142800E+00, 0.5312100E+00, &
     & 0.5468300E+00, 0.5798400E+00, 0.6110400E+00, 0.6597893E+00, &
     & 0.6994535E+00, 0.7475151E+00, 0.8111980E+00, 0.8111980E+00 /
      data (ref_adm(32,iz,21,17),iz = 1,20) / &
     & 0.4406100E+00, 0.4406100E+00, 0.4415700E+00, 0.4463200E+00, &
     & 0.4458900E+00, 0.4453800E+00, 0.4542700E+00, 0.4781500E+00, &
     & 0.4781000E+00, 0.4892500E+00, 0.5175300E+00, 0.5212700E+00, &
     & 0.5389500E+00, 0.5660900E+00, 0.5940200E+00, 0.6752600E+00, &
     & 0.6844866E+00, 0.7326908E+00, 0.8074789E+00, 0.8074789E+00 /
      data (ref_adm(32,iz,22,17),iz = 1,20) / &
     & 0.4310200E+00, 0.4310200E+00, 0.4347800E+00, 0.4346800E+00, &
     & 0.4469000E+00, 0.4466500E+00, 0.4507600E+00, 0.4664500E+00, &
     & 0.4731500E+00, 0.4863700E+00, 0.5120700E+00, 0.5274300E+00, &
     & 0.5482000E+00, 0.5585300E+00, 0.5755600E+00, 0.6331600E+00, &
     & 0.6514589E+00, 0.6791428E+00, 0.7120622E+00, 0.7120622E+00 /
      data (ref_adm(32,iz,23,17),iz = 1,20) / &
     & 0.4268800E+00, 0.4268800E+00, 0.4261600E+00, 0.4293400E+00, &
     & 0.4408900E+00, 0.4374900E+00, 0.4513100E+00, 0.4542000E+00, &
     & 0.4738500E+00, 0.4809600E+00, 0.4978400E+00, 0.5271000E+00, &
     & 0.5441600E+00, 0.5620100E+00, 0.5831200E+00, 0.6237800E+00, &
     & 0.6445923E+00, 0.6732906E+00, 0.7185857E+00, 0.7185857E+00 /
      data (ref_adm(32,iz,24,17),iz = 1,20) / &
     & 0.4376500E+00, 0.4376500E+00, 0.4290400E+00, 0.4318500E+00, &
     & 0.4340800E+00, 0.4404200E+00, 0.4486100E+00, 0.4574600E+00, &
     & 0.4688500E+00, 0.4808600E+00, 0.4978500E+00, 0.5188900E+00, &
     & 0.5456800E+00, 0.5654800E+00, 0.5791800E+00, 0.6226500E+00, &
     & 0.7110900E+00, 0.6734366E+00, 0.7313202E+00, 0.7313202E+00 /
      data (ref_adm(32,iz,25,17),iz = 1,20) / &
     & 0.4362200E+00, 0.4362200E+00, 0.4443100E+00, 0.4505200E+00, &
     & 0.4535900E+00, 0.4595700E+00, 0.4641200E+00, 0.4705800E+00, &
     & 0.4798300E+00, 0.4948200E+00, 0.5130200E+00, 0.5345700E+00, &
     & 0.5579900E+00, 0.5898000E+00, 0.6053700E+00, 0.6383300E+00, &
     & 0.6901400E+00, 0.7135600E+00, 0.7487745E+00, 0.7487745E+00 /
      data (ref_adm(32,iz,26,17),iz = 1,20) / &
     & 0.4471600E+00, 0.4471600E+00, 0.4385400E+00, 0.4443300E+00, &
     & 0.4541500E+00, 0.4522800E+00, 0.4416900E+00, 0.4592700E+00, &
     & 0.4717400E+00, 0.4846100E+00, 0.5043500E+00, 0.5302600E+00, &
     & 0.5649300E+00, 0.5960200E+00, 0.6187200E+00, 0.6630800E+00, &
     & 0.7105600E+00, 0.7821100E+00, 0.7731078E+00, 0.7731078E+00 /
      data (ref_adm(32,iz,27,17),iz = 1,20) / &
     & 0.4393100E+00, 0.4393100E+00, 0.4394500E+00, 0.4366500E+00, &
     & 0.4368100E+00, 0.4505900E+00, 0.4622800E+00, 0.4713600E+00, &
     & 0.4769000E+00, 0.4898900E+00, 0.5084900E+00, 0.5345900E+00, &
     & 0.5721100E+00, 0.5977800E+00, 0.6307500E+00, 0.6675700E+00, &
     & 0.7179500E+00, 0.7555400E+00, 0.7422700E+00, 0.7422700E+00 /
      data (ref_adm(32,iz,28,17),iz = 1,20) / &
     & 0.4362900E+00, 0.4362900E+00, 0.4392100E+00, 0.4405400E+00, &
     & 0.4393800E+00, 0.4492000E+00, 0.4544700E+00, 0.4677800E+00, &
     & 0.4819300E+00, 0.4964800E+00, 0.5223800E+00, 0.5406400E+00, &
     & 0.5703100E+00, 0.6018300E+00, 0.6434400E+00, 0.6839900E+00, &
     & 0.7400900E+00, 0.8039500E+00, 0.7976600E+00, 0.7976600E+00 /
      data (ref_adm(32,iz,29,17),iz = 1,20) / &
     & 0.4423400E+00, 0.4423400E+00, 0.4393500E+00, 0.4370700E+00, &
     & 0.4418600E+00, 0.4420500E+00, 0.4526200E+00, 0.4711200E+00, &
     & 0.4936700E+00, 0.5026800E+00, 0.5136200E+00, 0.5442800E+00, &
     & 0.5793900E+00, 0.6204100E+00, 0.6517600E+00, 0.7112900E+00, &
     & 0.7853200E+00, 0.8534000E+00, 0.7976300E+00, 0.7976300E+00 /
      data (ref_adm(32,iz,30,17),iz = 1,20) / &
     & 0.4423100E+00, 0.4423100E+00, 0.4404100E+00, 0.4342200E+00, &
     & 0.4370100E+00, 0.4525200E+00, 0.4536500E+00, 0.4688600E+00, &
     & 0.4881100E+00, 0.4956900E+00, 0.5183200E+00, 0.5583600E+00, &
     & 0.6040100E+00, 0.6455600E+00, 0.6828000E+00, 0.7340900E+00, &
     & 0.8096300E+00, 0.8751800E+00, 0.8333700E+00, 0.8333700E+00 /
      data (ref_adm(32,iz,31,17),iz = 1,20) / &
     & 0.4392500E+00, 0.4392500E+00, 0.4376000E+00, 0.4331300E+00, &
     & 0.4440900E+00, 0.4507600E+00, 0.4568300E+00, 0.4682900E+00, &
     & 0.4824800E+00, 0.5079500E+00, 0.5391400E+00, 0.5729400E+00, &
     & 0.6117200E+00, 0.6483300E+00, 0.6841300E+00, 0.7314700E+00, &
     & 0.7981300E+00, 0.8624700E+00, 0.8473500E+00, 0.8473500E+00 /
      data (ref_adm(32,iz,32,17),iz = 1,20) / &
     & 0.4411900E+00, 0.4411900E+00, 0.4446100E+00, 0.4511500E+00, &
     & 0.4510800E+00, 0.4607100E+00, 0.4603300E+00, 0.4716500E+00, &
     & 0.4891300E+00, 0.5109500E+00, 0.5436400E+00, 0.5704800E+00, &
     & 0.6085100E+00, 0.6530000E+00, 0.6835800E+00, 0.7371400E+00, &
     & 0.8242500E+00, 0.8817400E+00, 0.8740200E+00, 0.8740200E+00 /
      data (ref_adm(32,iz,33,17),iz = 1,20) / &
     & 0.4324600E+00, 0.4324600E+00, 0.4283200E+00, 0.4320900E+00, &
     & 0.4377500E+00, 0.4415000E+00, 0.4547200E+00, 0.4702300E+00, &
     & 0.4867500E+00, 0.5030700E+00, 0.5363000E+00, 0.5623400E+00, &
     & 0.5994500E+00, 0.6452600E+00, 0.6956700E+00, 0.7625100E+00, &
     & 0.8447100E+00, 0.9297600E+00, 0.8949800E+00, 0.8949800E+00 /
      data (ref_adm(32,iz,34,17),iz = 1,20) / &
     & 0.4427200E+00, 0.4427200E+00, 0.4361200E+00, 0.4372100E+00, &
     & 0.4501500E+00, 0.4527100E+00, 0.4700700E+00, 0.4803800E+00, &
     & 0.4944700E+00, 0.5226300E+00, 0.5516300E+00, 0.5780500E+00, &
     & 0.6107800E+00, 0.6509900E+00, 0.6989800E+00, 0.7558400E+00, &
     & 0.8201500E+00, 0.9124600E+00, 0.9020700E+00, 0.9020700E+00 /
      data (ref_adm(32,iz,35,17),iz = 1,20) / &
     & 0.4288800E+00, 0.4288800E+00, 0.4315000E+00, 0.4346200E+00, &
     & 0.4338500E+00, 0.4432400E+00, 0.4625100E+00, 0.4789000E+00, &
     & 0.4966100E+00, 0.5320000E+00, 0.5547300E+00, 0.5753300E+00, &
     & 0.6108300E+00, 0.6541900E+00, 0.7027400E+00, 0.7699900E+00, &
     & 0.8553900E+00, 0.9433000E+00, 0.8926400E+00, 0.8926400E+00 /
      data (ref_adm(32,iz,36,17),iz = 1,20) / &
     & 0.4410800E+00, 0.4410800E+00, 0.4265400E+00, 0.4273400E+00, &
     & 0.4387300E+00, 0.4414600E+00, 0.4531500E+00, 0.4757700E+00, &
     & 0.5017700E+00, 0.5349500E+00, 0.5478600E+00, 0.5750900E+00, &
     & 0.6157700E+00, 0.6554600E+00, 0.7024100E+00, 0.7807000E+00, &
     & 0.8868900E+00, 0.9670900E+00, 0.9268400E+00, 0.9268400E+00 /
      data (ref_adm(32,iz,37,17),iz = 1,20) / &
     & 0.4413800E+00, 0.4413800E+00, 0.4376400E+00, 0.4347300E+00, &
     & 0.4311200E+00, 0.4379600E+00, 0.4590600E+00, 0.4842700E+00, &
     & 0.5106700E+00, 0.5331500E+00, 0.5513700E+00, 0.5807600E+00, &
     & 0.6221700E+00, 0.6528800E+00, 0.7006000E+00, 0.7915400E+00, &
     & 0.9053700E+00, 0.1024100E+01, 0.9644000E+00, 0.9644000E+00 /
      data (ref_adm(32,iz,38,17),iz = 1,20) / &
     & 0.4413800E+00, 0.4413800E+00, 0.4376400E+00, 0.4347300E+00, &
     & 0.4311200E+00, 0.4379600E+00, 0.4590600E+00, 0.4842700E+00, &
     & 0.5106700E+00, 0.5331500E+00, 0.5513700E+00, 0.5807600E+00, &
     & 0.6221700E+00, 0.6528800E+00, 0.7006000E+00, 0.7915400E+00, &
     & 0.9053700E+00, 0.1024100E+01, 0.9644000E+00, 0.9644000E+00 /
! Solar Zenith Angle 85.0 Albedo  0.6611997E+00
      data (ref_adm(32,iz, 1,18),iz = 1,20) / &
     & 0.4366800E+00, 0.4366800E+00, 0.4276700E+00, 0.4336600E+00, &
     & 0.4611700E+00, 0.4884700E+00, 0.5171400E+00, 0.5700300E+00, &
     & 0.6174500E+00, 0.6592500E+00, 0.7619700E+00, 0.8875600E+00, &
     & 0.1111135E+01, 0.1322798E+01, 0.1721259E+01, 0.2497521E+01, &
     & 0.3744565E+01, 0.4245683E+01, 0.2791535E+01, 0.2791535E+01 /
      data (ref_adm(32,iz, 2,18),iz = 1,20) / &
     & 0.4366800E+00, 0.4366800E+00, 0.4276700E+00, 0.4336600E+00, &
     & 0.4611700E+00, 0.4884700E+00, 0.5171400E+00, 0.5700300E+00, &
     & 0.6174500E+00, 0.6592500E+00, 0.7619700E+00, 0.8875600E+00, &
     & 0.1111135E+01, 0.1322798E+01, 0.1721259E+01, 0.2497521E+01, &
     & 0.3744565E+01, 0.4245683E+01, 0.2791535E+01, 0.2791535E+01 /
      data (ref_adm(32,iz, 3,18),iz = 1,20) / &
     & 0.4141600E+00, 0.4141600E+00, 0.4405400E+00, 0.4496200E+00, &
     & 0.4757000E+00, 0.4908800E+00, 0.5269300E+00, 0.5647400E+00, &
     & 0.6002400E+00, 0.6666200E+00, 0.7777000E+00, 0.9332700E+00, &
     & 0.1099407E+01, 0.1303139E+01, 0.1679969E+01, 0.2394008E+01, &
     & 0.3605109E+01, 0.4237363E+01, 0.1985928E+01, 0.1985928E+01 /
      data (ref_adm(32,iz, 4,18),iz = 1,20) / &
     & 0.4185200E+00, 0.4185200E+00, 0.4407800E+00, 0.4598700E+00, &
     & 0.4641800E+00, 0.5018600E+00, 0.5123000E+00, 0.5498900E+00, &
     & 0.6051900E+00, 0.6594100E+00, 0.7628700E+00, 0.8618000E+00, &
     & 0.1074917E+01, 0.1263351E+01, 0.1599060E+01, 0.2200227E+01, &
     & 0.3157758E+01, 0.4216128E+01, 0.2871537E+01, 0.2871537E+01 /
      data (ref_adm(32,iz, 5,18),iz = 1,20) / &
     & 0.4239000E+00, 0.4239000E+00, 0.4228200E+00, 0.4439400E+00, &
     & 0.4953000E+00, 0.4871900E+00, 0.5160900E+00, 0.5322700E+00, &
     & 0.5918500E+00, 0.6561400E+00, 0.7618400E+00, 0.8422800E+00, &
     & 0.1041634E+01, 0.1211616E+01, 0.1497034E+01, 0.1978583E+01, &
     & 0.2643006E+01, 0.3841023E+01, 0.3278869E+01, 0.3278869E+01 /
      data (ref_adm(32,iz, 6,18),iz = 1,20) / &
     & 0.4148200E+00, 0.4148200E+00, 0.4108900E+00, 0.4331900E+00, &
     & 0.4400600E+00, 0.4652800E+00, 0.4837200E+00, 0.5229900E+00, &
     & 0.5654700E+00, 0.6167000E+00, 0.7047500E+00, 0.7908500E+00, &
     & 0.8859100E+00, 0.1131700E+01, 0.1354800E+01, 0.1832200E+01, &
     & 0.2514400E+01, 0.2891120E+01, 0.2777869E+01, 0.2777869E+01 /
      data (ref_adm(32,iz, 7,18),iz = 1,20) / &
     & 0.4137900E+00, 0.4137900E+00, 0.4507600E+00, 0.4506700E+00, &
     & 0.4731100E+00, 0.5016600E+00, 0.5203300E+00, 0.5427500E+00, &
     & 0.5794600E+00, 0.6287400E+00, 0.7007400E+00, 0.8310500E+00, &
     & 0.9514000E+00, 0.1125400E+01, 0.1462300E+01, 0.1772700E+01, &
     & 0.1904780E+01, 0.2277916E+01, 0.2054778E+01, 0.2054778E+01 /
      data (ref_adm(32,iz, 8,18),iz = 1,20) / &
     & 0.4444200E+00, 0.4444200E+00, 0.4491200E+00, 0.4727300E+00, &
     & 0.4658000E+00, 0.4927600E+00, 0.5129200E+00, 0.5447500E+00, &
     & 0.5584100E+00, 0.6440900E+00, 0.6950600E+00, 0.7816100E+00, &
     & 0.9495400E+00, 0.1016400E+01, 0.1296700E+01, 0.1725400E+01, &
     & 0.1660659E+01, 0.1897043E+01, 0.1709759E+01, 0.1709759E+01 /
      data (ref_adm(32,iz, 9,18),iz = 1,20) / &
     & 0.4343400E+00, 0.4343400E+00, 0.4317700E+00, 0.4147500E+00, &
     & 0.4745600E+00, 0.4670500E+00, 0.4973000E+00, 0.5511000E+00, &
     & 0.5696300E+00, 0.6312100E+00, 0.6604000E+00, 0.7340700E+00, &
     & 0.8650500E+00, 0.1038100E+01, 0.1117800E+01, 0.1299118E+01, &
     & 0.1483871E+01, 0.1638193E+01, 0.1496224E+01, 0.1496224E+01 /
      data (ref_adm(32,iz,10,18),iz = 1,20) / &
     & 0.4329500E+00, 0.4329500E+00, 0.4372000E+00, 0.4458500E+00, &
     & 0.4354900E+00, 0.4785900E+00, 0.4970200E+00, 0.5292000E+00, &
     & 0.5582700E+00, 0.5925900E+00, 0.6112600E+00, 0.7020300E+00, &
     & 0.8649600E+00, 0.9746000E+00, 0.1045700E+01, 0.1320000E+01, &
     & 0.1499200E+01, 0.1475780E+01, 0.1383357E+01, 0.1383357E+01 /
      data (ref_adm(32,iz,11,18),iz = 1,20) / &
     & 0.4311300E+00, 0.4311300E+00, 0.4142100E+00, 0.4252800E+00, &
     & 0.4406400E+00, 0.4792200E+00, 0.4841100E+00, 0.5337400E+00, &
     & 0.5479000E+00, 0.5475600E+00, 0.6178300E+00, 0.6535500E+00, &
     & 0.7921800E+00, 0.8770600E+00, 0.9709200E+00, 0.1156900E+01, &
     & 0.1353700E+01, 0.1311401E+01, 0.1270684E+01, 0.1270684E+01 /
      data (ref_adm(32,iz,12,18),iz = 1,20) / &
     & 0.4188500E+00, 0.4188500E+00, 0.4252400E+00, 0.4339800E+00, &
     & 0.4302800E+00, 0.4541100E+00, 0.5072700E+00, 0.5232800E+00, &
     & 0.5333800E+00, 0.5731300E+00, 0.5847200E+00, 0.6447200E+00, &
     & 0.7038400E+00, 0.8212100E+00, 0.9446300E+00, 0.1117500E+01, &
     & 0.1084919E+01, 0.1180615E+01, 0.1168222E+01, 0.1168222E+01 /
      data (ref_adm(32,iz,13,18),iz = 1,20) / &
     & 0.4339500E+00, 0.4339500E+00, 0.4375800E+00, 0.4292100E+00, &
     & 0.4145400E+00, 0.4596000E+00, 0.4536000E+00, 0.4811600E+00, &
     & 0.5176800E+00, 0.5486800E+00, 0.5636200E+00, 0.6204700E+00, &
     & 0.6495100E+00, 0.7332300E+00, 0.9368100E+00, 0.1024800E+01, &
     & 0.1164900E+01, 0.1080834E+01, 0.1091470E+01, 0.1091470E+01 /
      data (ref_adm(32,iz,14,18),iz = 1,20) / &
     & 0.4359700E+00, 0.4359700E+00, 0.4497000E+00, 0.4660200E+00, &
     & 0.4774200E+00, 0.4846100E+00, 0.4925300E+00, 0.5114500E+00, &
     & 0.5356600E+00, 0.5387900E+00, 0.5696600E+00, 0.6208600E+00, &
     & 0.6784400E+00, 0.7386000E+00, 0.8640600E+00, 0.9823800E+00, &
     & 0.9290372E+00, 0.1005548E+01, 0.1032281E+01, 0.1032281E+01 /
      data (ref_adm(32,iz,15,18),iz = 1,20) / &
     & 0.4142300E+00, 0.4142300E+00, 0.4080700E+00, 0.4164200E+00, &
     & 0.4268200E+00, 0.4476900E+00, 0.4662500E+00, 0.4735400E+00, &
     & 0.4954600E+00, 0.5118800E+00, 0.5342000E+00, 0.5822100E+00, &
     & 0.6278500E+00, 0.6743600E+00, 0.8109900E+00, 0.9596100E+00, &
     & 0.1017900E+01, 0.9450458E+00, 0.9839612E+00, 0.9839612E+00 /
      data (ref_adm(32,iz,16,18),iz = 1,20) / &
     & 0.4229400E+00, 0.4229400E+00, 0.4275600E+00, 0.4332800E+00, &
     & 0.4334600E+00, 0.4424700E+00, 0.4659100E+00, 0.4981900E+00, &
     & 0.5084700E+00, 0.5077300E+00, 0.5353500E+00, 0.5780000E+00, &
     & 0.6299700E+00, 0.6765800E+00, 0.7903400E+00, 0.9106000E+00, &
     & 0.9833200E+00, 0.8937587E+00, 0.9435192E+00, 0.9435192E+00 /
      data (ref_adm(32,iz,17,18),iz = 1,20) / &
     & 0.4206900E+00, 0.4206900E+00, 0.4175200E+00, 0.4153900E+00, &
     & 0.4282800E+00, 0.4484400E+00, 0.4530600E+00, 0.4686800E+00, &
     & 0.4789800E+00, 0.4865600E+00, 0.5246900E+00, 0.5396100E+00, &
     & 0.6680000E+00, 0.6805100E+00, 0.7546600E+00, 0.8557600E+00, &
     & 0.7797741E+00, 0.8471292E+00, 0.9059277E+00, 0.9059277E+00 /
      data (ref_adm(32,iz,18,18),iz = 1,20) / &
     & 0.4241200E+00, 0.4241200E+00, 0.4467700E+00, 0.4442300E+00, &
     & 0.4329300E+00, 0.4573000E+00, 0.4562000E+00, 0.4605800E+00, &
     & 0.4986800E+00, 0.4972200E+00, 0.5101300E+00, 0.5555500E+00, &
     & 0.6157400E+00, 0.6781100E+00, 0.6972200E+00, 0.7626900E+00, &
     & 0.9256795E+00, 0.1133914E+01, 0.1595635E+01, 0.1595635E+01 /
      data (ref_adm(32,iz,19,18),iz = 1,20) / &
     & 0.4180400E+00, 0.4180400E+00, 0.4099200E+00, 0.4370000E+00, &
     & 0.4217100E+00, 0.4418700E+00, 0.4764000E+00, 0.5008700E+00, &
     & 0.4659600E+00, 0.4865700E+00, 0.5134200E+00, 0.5744400E+00, &
     & 0.5693000E+00, 0.6243300E+00, 0.6656700E+00, 0.7814444E+00, &
     & 0.8917975E+00, 0.1089755E+01, 0.1545714E+01, 0.1545714E+01 /
      data (ref_adm(32,iz,20,18),iz = 1,20) / &
     & 0.4227600E+00, 0.4227600E+00, 0.4363700E+00, 0.4322300E+00, &
     & 0.4326600E+00, 0.4624400E+00, 0.4757900E+00, 0.4802000E+00, &
     & 0.4632400E+00, 0.4648100E+00, 0.5099400E+00, 0.5541500E+00, &
     & 0.6068400E+00, 0.6469400E+00, 0.6614100E+00, 0.7615145E+00, &
     & 0.8669263E+00, 0.1056827E+01, 0.1516927E+01, 0.1516927E+01 /
      data (ref_adm(32,iz,21,18),iz = 1,20) / &
     & 0.4304100E+00, 0.4304100E+00, 0.4266700E+00, 0.4433400E+00, &
     & 0.4358900E+00, 0.4415800E+00, 0.4425900E+00, 0.4437800E+00, &
     & 0.4787500E+00, 0.4836900E+00, 0.5054600E+00, 0.5420400E+00, &
     & 0.5726100E+00, 0.6171600E+00, 0.6595600E+00, 0.7432406E+00, &
     & 0.8450542E+00, 0.1030298E+01, 0.1500707E+01, 0.1500707E+01 /
      data (ref_adm(32,iz,22,18),iz = 1,20) / &
     & 0.4316200E+00, 0.4316200E+00, 0.4143900E+00, 0.4149900E+00, &
     & 0.4394900E+00, 0.4429500E+00, 0.4396500E+00, 0.4463800E+00, &
     & 0.4798000E+00, 0.5016000E+00, 0.5102200E+00, 0.5432500E+00, &
     & 0.5487000E+00, 0.5683000E+00, 0.6057100E+00, 0.7009616E+00, &
     & 0.7923855E+00, 0.9621586E+00, 0.1452694E+01, 0.1452694E+01 /
      data (ref_adm(32,iz,23,18),iz = 1,20) / &
     & 0.4238600E+00, 0.4238600E+00, 0.4059900E+00, 0.4100300E+00, &
     & 0.4011700E+00, 0.4288400E+00, 0.4277100E+00, 0.4405800E+00, &
     & 0.4634900E+00, 0.4882700E+00, 0.5231800E+00, 0.5291000E+00, &
     & 0.5642500E+00, 0.6125700E+00, 0.6449700E+00, 0.6993000E+00, &
     & 0.7860827E+00, 0.9573394E+00, 0.1475027E+01, 0.1475027E+01 /
      data (ref_adm(32,iz,24,18),iz = 1,20) / &
     & 0.4255000E+00, 0.4255000E+00, 0.4152800E+00, 0.4127000E+00, &
     & 0.4193700E+00, 0.4286700E+00, 0.4410900E+00, 0.4505100E+00, &
     & 0.4649800E+00, 0.4785200E+00, 0.5009800E+00, 0.5196700E+00, &
     & 0.5472500E+00, 0.6050800E+00, 0.6251400E+00, 0.7036800E+00, &
     & 0.7865654E+00, 0.9608116E+00, 0.1512637E+01, 0.1512637E+01 /
      data (ref_adm(32,iz,25,18),iz = 1,20) / &
     & 0.4163100E+00, 0.4163100E+00, 0.4200700E+00, 0.4253000E+00, &
     & 0.4439700E+00, 0.4422800E+00, 0.4506400E+00, 0.4638200E+00, &
     & 0.4685900E+00, 0.4821100E+00, 0.5045700E+00, 0.5301200E+00, &
     & 0.5648700E+00, 0.6184100E+00, 0.6467400E+00, 0.7025800E+00, &
     & 0.7923175E+00, 0.9725133E+00, 0.1562696E+01, 0.1562696E+01 /
      data (ref_adm(32,iz,26,18),iz = 1,20) / &
     & 0.4282100E+00, 0.4282100E+00, 0.4229900E+00, 0.4372300E+00, &
     & 0.4245800E+00, 0.4252900E+00, 0.4440300E+00, 0.4539200E+00, &
     & 0.4487500E+00, 0.4806800E+00, 0.5272500E+00, 0.5531400E+00, &
     & 0.5755000E+00, 0.6108200E+00, 0.6754100E+00, 0.7296800E+00, &
     & 0.8304800E+00, 0.9965702E+00, 0.1629563E+01, 0.1629563E+01 /
      data (ref_adm(32,iz,27,18),iz = 1,20) / &
     & 0.4172600E+00, 0.4172600E+00, 0.4379100E+00, 0.4259000E+00, &
     & 0.4456300E+00, 0.4386400E+00, 0.4480500E+00, 0.4783300E+00, &
     & 0.4586600E+00, 0.4698400E+00, 0.5154000E+00, 0.5512800E+00, &
     & 0.5773600E+00, 0.6430700E+00, 0.6911200E+00, 0.7716800E+00, &
     & 0.8261538E+00, 0.1025782E+01, 0.1705106E+01, 0.1705106E+01 /
      data (ref_adm(32,iz,28,18),iz = 1,20) / &
     & 0.4148800E+00, 0.4148800E+00, 0.4248900E+00, 0.4252300E+00, &
     & 0.4389300E+00, 0.4367100E+00, 0.4286900E+00, 0.4616700E+00, &
     & 0.4424600E+00, 0.4638500E+00, 0.4978500E+00, 0.5602300E+00, &
     & 0.5758600E+00, 0.6243400E+00, 0.6662700E+00, 0.7438200E+00, &
     & 0.8488535E+00, 0.1061591E+01, 0.1787745E+01, 0.1787745E+01 /
      data (ref_adm(32,iz,29,18),iz = 1,20) / &
     & 0.4341200E+00, 0.4341200E+00, 0.4538400E+00, 0.4460200E+00, &
     & 0.4236400E+00, 0.4268200E+00, 0.4209500E+00, 0.4486700E+00, &
     & 0.4644100E+00, 0.4862600E+00, 0.5036800E+00, 0.5379700E+00, &
     & 0.5482600E+00, 0.6172800E+00, 0.6730100E+00, 0.8021100E+00, &
     & 0.8857703E+00, 0.1117224E+01, 0.1885462E+01, 0.1885462E+01 /
      data (ref_adm(32,iz,30,18),iz = 1,20) / &
     & 0.4306300E+00, 0.4306300E+00, 0.4415400E+00, 0.4300500E+00, &
     & 0.4217000E+00, 0.4338600E+00, 0.4493100E+00, 0.4367500E+00, &
     & 0.4589100E+00, 0.4810500E+00, 0.4792600E+00, 0.5462300E+00, &
     & 0.6219900E+00, 0.6176800E+00, 0.6933400E+00, 0.7308100E+00, &
     & 0.9284571E+00, 0.1174767E+01, 0.1985366E+01, 0.1985366E+01 /
      data (ref_adm(32,iz,31,18),iz = 1,20) / &
     & 0.4331300E+00, 0.4331300E+00, 0.4195800E+00, 0.4258800E+00, &
     & 0.4303200E+00, 0.4353200E+00, 0.4645400E+00, 0.4523100E+00, &
     & 0.4807700E+00, 0.4925900E+00, 0.5051200E+00, 0.5501300E+00, &
     & 0.5875100E+00, 0.6295700E+00, 0.6997600E+00, 0.7826400E+00, &
     & 0.9353100E+00, 0.1202148E+01, 0.2058810E+01, 0.2058810E+01 /
      data (ref_adm(32,iz,32,18),iz = 1,20) / &
     & 0.4224100E+00, 0.4224100E+00, 0.4275100E+00, 0.4188900E+00, &
     & 0.4250500E+00, 0.4375400E+00, 0.4491800E+00, 0.4574600E+00, &
     & 0.4612100E+00, 0.4916600E+00, 0.5269600E+00, 0.5473500E+00, &
     & 0.6090600E+00, 0.6391700E+00, 0.6943100E+00, 0.7533700E+00, &
     & 0.9736137E+00, 0.1244004E+01, 0.2140203E+01, 0.2140203E+01 /
      data (ref_adm(32,iz,33,18),iz = 1,20) / &
     & 0.4056300E+00, 0.4056300E+00, 0.4017900E+00, 0.4021000E+00, &
     & 0.4027400E+00, 0.4146600E+00, 0.4236900E+00, 0.4350900E+00, &
     & 0.4448300E+00, 0.4686400E+00, 0.5002800E+00, 0.5424700E+00, &
     & 0.5905400E+00, 0.6272600E+00, 0.6837500E+00, 0.7888900E+00, &
     & 0.9205300E+00, 0.1266567E+01, 0.2202335E+01, 0.2202335E+01 /
      data (ref_adm(32,iz,34,18),iz = 1,20) / &
     & 0.4051800E+00, 0.4051800E+00, 0.4158200E+00, 0.4190500E+00, &
     & 0.4376200E+00, 0.4478100E+00, 0.4353400E+00, 0.4522400E+00, &
     & 0.4592400E+00, 0.4886100E+00, 0.5335400E+00, 0.5442400E+00, &
     & 0.6135300E+00, 0.6965000E+00, 0.7036300E+00, 0.8219100E+00, &
     & 0.9450200E+00, 0.1262977E+01, 0.2234478E+01, 0.2234478E+01 /
      data (ref_adm(32,iz,35,18),iz = 1,20) / &
     & 0.4133300E+00, 0.4133300E+00, 0.4054500E+00, 0.4199400E+00, &
     & 0.4319400E+00, 0.4246400E+00, 0.4218000E+00, 0.4417600E+00, &
     & 0.4798500E+00, 0.5161300E+00, 0.5329100E+00, 0.5406200E+00, &
     & 0.6028900E+00, 0.6839400E+00, 0.7353700E+00, 0.8100000E+00, &
     & 0.9992500E+00, 0.1268826E+01, 0.2266804E+01, 0.2266804E+01 /
      data (ref_adm(32,iz,36,18),iz = 1,20) / &
     & 0.4019700E+00, 0.4019700E+00, 0.4305400E+00, 0.4046100E+00, &
     & 0.4051800E+00, 0.4106000E+00, 0.4132800E+00, 0.4532600E+00, &
     & 0.4742200E+00, 0.5114500E+00, 0.5467200E+00, 0.5704700E+00, &
     & 0.5976400E+00, 0.6844600E+00, 0.7671800E+00, 0.8625600E+00, &
     & 0.9958323E+00, 0.1290320E+01, 0.2303447E+01, 0.2303447E+01 /
      data (ref_adm(32,iz,37,18),iz = 1,20) / &
     & 0.3992700E+00, 0.3992700E+00, 0.4007300E+00, 0.4124300E+00, &
     & 0.4047100E+00, 0.4096900E+00, 0.4305000E+00, 0.4448500E+00, &
     & 0.5024300E+00, 0.5452700E+00, 0.5301900E+00, 0.5652900E+00, &
     & 0.6118100E+00, 0.6753600E+00, 0.7277800E+00, 0.8319700E+00, &
     & 0.1005429E+01, 0.1362847E+01, 0.2365898E+01, 0.2365898E+01 /
      data (ref_adm(32,iz,38,18),iz = 1,20) / &
     & 0.3992700E+00, 0.3992700E+00, 0.4007300E+00, 0.4124300E+00, &
     & 0.4047100E+00, 0.4096900E+00, 0.4305000E+00, 0.4448500E+00, &
     & 0.5024300E+00, 0.5452700E+00, 0.5301900E+00, 0.5652900E+00, &
     & 0.6118100E+00, 0.6753600E+00, 0.7277800E+00, 0.8319700E+00, &
     & 0.1005429E+01, 0.1362847E+01, 0.2365898E+01, 0.2365898E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 25.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 30.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 35.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 40.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 45.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 50.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 55.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 60.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 65.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 70.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 75.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 80.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 85.0 Albedo -0.9999000E+04
      data (ref_adm(33,iz, 1,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 2,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 3,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 4,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 5,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 6,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 7,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 8,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz, 9,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,10,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,11,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,12,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,13,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,14,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,15,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,16,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,17,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,18,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,19,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,20,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,21,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,22,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,23,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,24,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,25,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,26,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,27,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,28,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,29,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,30,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,31,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,32,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,33,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,34,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,35,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,36,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,37,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(33,iz,38,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 25.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 30.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 35.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38, 8),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 40.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38, 9),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 45.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38,10),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 50.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38,11),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 55.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38,12),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 60.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38,13),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 65.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38,14),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 70.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38,15),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 75.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38,16),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 80.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38,17),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 85.0 Albedo -0.9999000E+04
      data (ref_adm(34,iz, 1,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 2,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 3,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 4,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 5,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 6,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 7,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 8,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz, 9,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,10,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,11,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,12,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,13,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,14,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,15,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,16,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,17,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,18,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,19,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,20,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,21,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,22,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,23,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,24,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,25,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,26,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,27,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,28,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,29,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,30,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,31,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,32,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,33,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,34,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,35,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,36,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,37,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(34,iz,38,18),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(35,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(35,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(35,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9999000E+04
      data (ref_adm(35,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.9999000E+04
      data (ref_adm(35,iz, 1, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 2, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 3, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 4, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 5, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 6, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 7, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 8, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 9, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,10, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,11, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,12, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,13, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,14, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,15, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,16, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,17, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,22, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,23, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,24, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,25, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,26, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,27, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,28, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,29, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,30, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,31, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,32, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,33, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,34, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,35, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,36, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,37, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,38, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 25.0 Albedo -0.9999000E+04
      data (ref_adm(35,iz, 1, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 2, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 3, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 4, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 5, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 6, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 7, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 8, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 9, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,10, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,11, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,12, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,13, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,14, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,15, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,16, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,17, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,18, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,19, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,20, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,21, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,22, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,23, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,24, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,25, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,26, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,27, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,28, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,29, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,30, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,31, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,32, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,33, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,34, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,35, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,36, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,37, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,38, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 30.0 Albedo -0.9999000E+04
      data (ref_adm(35,iz, 1, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 2, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 3, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 4, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 5, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 6, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 7, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 8, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz, 9, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,10, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,11, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,12, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,13, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,14, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,15, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,16, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,17, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,18, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,19, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,20, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,21, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,22, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,23, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,24, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,25, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,26, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,27, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,28, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,29, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,30, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,31, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,32, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,33, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,34, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,35, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,36, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,37, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(35,iz,38, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 35.0 Albedo  0.5505077E+00
      data (ref_adm(35,iz, 1, 8),iz = 1,20) / &
     & 0.3765500E+00, 0.3765500E+00, 0.5928060E+00, 0.5890642E+00, &
     & 0.5861067E+00, 0.5840840E+00, 0.5805186E+00, 0.5744445E+00, &
     & 0.5666429E+00, 0.5573010E+00, 0.5471405E+00, 0.5330340E+00, &
     & 0.5165692E+00, 0.5010648E+00, 0.4787994E+00, 0.4494784E+00, &
     & 0.4192287E+00, 0.3796499E+00, 0.3097650E+00, 0.3097650E+00 /
      data (ref_adm(35,iz, 2, 8),iz = 1,20) / &
     & 0.3765500E+00, 0.3765500E+00, 0.5928060E+00, 0.5890642E+00, &
     & 0.5861067E+00, 0.5840840E+00, 0.5805186E+00, 0.5744445E+00, &
     & 0.5666429E+00, 0.5573010E+00, 0.5471405E+00, 0.5330340E+00, &
     & 0.5165692E+00, 0.5010648E+00, 0.4787994E+00, 0.4494784E+00, &
     & 0.4192287E+00, 0.3796499E+00, 0.3097650E+00, 0.3097650E+00 /
      data (ref_adm(35,iz, 3, 8),iz = 1,20) / &
     & 0.6036076E+00, 0.6036076E+00, 0.4012200E+00, 0.5890642E+00, &
     & 0.5861067E+00, 0.5840840E+00, 0.5805186E+00, 0.5744445E+00, &
     & 0.5666429E+00, 0.5573010E+00, 0.5471404E+00, 0.5330340E+00, &
     & 0.5165692E+00, 0.5010648E+00, 0.4787994E+00, 0.4494784E+00, &
     & 0.4192287E+00, 0.3796499E+00, 0.3097650E+00, 0.3097650E+00 /
      data (ref_adm(35,iz, 4, 8),iz = 1,20) / &
     & 0.6036076E+00, 0.6036076E+00, 0.5928060E+00, 0.5890642E+00, &
     & 0.5861067E+00, 0.5840840E+00, 0.5805186E+00, 0.5744445E+00, &
     & 0.5666429E+00, 0.5573010E+00, 0.5471405E+00, 0.5330340E+00, &
     & 0.5165692E+00, 0.5010648E+00, 0.4787994E+00, 0.4494784E+00, &
     & 0.4192287E+00, 0.3796499E+00, 0.3097650E+00, 0.3097650E+00 /
      data (ref_adm(35,iz, 5, 8),iz = 1,20) / &
     & 0.6036076E+00, 0.6036076E+00, 0.5928060E+00, 0.5890642E+00, &
     & 0.5861067E+00, 0.5840840E+00, 0.5805186E+00, 0.5744445E+00, &
     & 0.5666429E+00, 0.5573010E+00, 0.5471404E+00, 0.5330340E+00, &
     & 0.5165692E+00, 0.5010648E+00, 0.4787994E+00, 0.4494784E+00, &
     & 0.4192287E+00, 0.3796499E+00, 0.3097650E+00, 0.3097650E+00 /
      data (ref_adm(35,iz, 6, 8),iz = 1,20) / &
     & 0.6036076E+00, 0.6036076E+00, 0.5928060E+00, 0.5890642E+00, &
     & 0.5861067E+00, 0.5840840E+00, 0.5805186E+00, 0.5744445E+00, &
     & 0.5666429E+00, 0.5573010E+00, 0.5471405E+00, 0.5330340E+00, &
     & 0.5165692E+00, 0.5010648E+00, 0.4787994E+00, 0.4494784E+00, &
     & 0.4192287E+00, 0.3796499E+00, 0.3097650E+00, 0.3097650E+00 /
      data (ref_adm(35,iz, 7, 8),iz = 1,20) / &
     & 0.6157400E+00, 0.6157400E+00, 0.5928060E+00, 0.5890642E+00, &
     & 0.5861067E+00, 0.5840840E+00, 0.5805186E+00, 0.5744445E+00, &
     & 0.5666429E+00, 0.5573010E+00, 0.5471404E+00, 0.5330340E+00, &
     & 0.5165692E+00, 0.5010648E+00, 0.4787994E+00, 0.4494784E+00, &
     & 0.4192287E+00, 0.3796499E+00, 0.3097650E+00, 0.3097650E+00 /
      data (ref_adm(35,iz, 8, 8),iz = 1,20) / &
     & 0.6036076E+00, 0.6036076E+00, 0.5928060E+00, 0.5890642E+00, &
     & 0.5861067E+00, 0.5840840E+00, 0.5805186E+00, 0.5744445E+00, &
     & 0.5666429E+00, 0.5573010E+00, 0.5471405E+00, 0.5330340E+00, &
     & 0.5165692E+00, 0.5010648E+00, 0.4787994E+00, 0.4494784E+00, &
     & 0.4192287E+00, 0.3796499E+00, 0.3097650E+00, 0.3097650E+00 /
      data (ref_adm(35,iz, 9, 8),iz = 1,20) / &
     & 0.6400200E+00, 0.6400200E+00, 0.5928060E+00, 0.5890642E+00, &
     & 0.6180900E+00, 0.6337900E+00, 0.5805186E+00, 0.5744445E+00, &
     & 0.5666429E+00, 0.5573010E+00, 0.5471404E+00, 0.5330340E+00, &
     & 0.5165692E+00, 0.5010648E+00, 0.4787994E+00, 0.4494784E+00, &
     & 0.4192287E+00, 0.3796499E+00, 0.3097650E+00, 0.3097650E+00 /
      data (ref_adm(35,iz,10, 8),iz = 1,20) / &
     & 0.6323000E+00, 0.6323000E+00, 0.6296100E+00, 0.5981500E+00, &
     & 0.5894900E+00, 0.5817400E+00, 0.5805186E+00, 0.5744445E+00, &
     & 0.5666429E+00, 0.5573010E+00, 0.5471405E+00, 0.5330340E+00, &
     & 0.5165692E+00, 0.5010648E+00, 0.4787994E+00, 0.4494784E+00, &
     & 0.4192287E+00, 0.3796499E+00, 0.3097650E+00, 0.3097650E+00 /
      data (ref_adm(35,iz,11, 8),iz = 1,20) / &
     & 0.6036076E+00, 0.6036076E+00, 0.6264200E+00, 0.5797700E+00, &
     & 0.5688600E+00, 0.5840840E+00, 0.5805186E+00, 0.5744445E+00, &
     & 0.5666429E+00, 0.5573010E+00, 0.5471404E+00, 0.5330340E+00, &
     & 0.5165692E+00, 0.5010648E+00, 0.4787994E+00, 0.4494784E+00, &
     & 0.4192287E+00, 0.3796499E+00, 0.3097650E+00, 0.3097650E+00 /
      data (ref_adm(35,iz,12, 8),iz = 1,20) / &
     & 0.5933300E+00, 0.5933300E+00, 0.6041200E+00, 0.6196700E+00, &
     & 0.5444500E+00, 0.5840840E+00, 0.5805186E+00, 0.5744445E+00, &
     & 0.5666429E+00, 0.5573010E+00, 0.5471405E+00, 0.5330340E+00, &
     & 0.5165692E+00, 0.5010648E+00, 0.4787994E+00, 0.4494784E+00, &
     & 0.4192287E+00, 0.3796499E+00, 0.3097650E+00, 0.3097650E+00 /
      data (ref_adm(35,iz,13, 8),iz = 1,20) / &
     & 0.5790200E+00, 0.5790200E+00, 0.6389300E+00, 0.5890642E+00, &
     & 0.6280800E+00, 0.6357400E+00, 0.6046900E+00, 0.4883100E+00, &
     & 0.4910800E+00, 0.5573010E+00, 0.5471404E+00, 0.5330340E+00, &
     & 0.5165692E+00, 0.5010648E+00, 0.4787994E+00, 0.4494784E+00, &
     & 0.4192287E+00, 0.3796499E+00, 0.3097650E+00, 0.3097650E+00 /
      data (ref_adm(35,iz,14, 8),iz = 1,20) / &
     & 0.6558200E+00, 0.6558200E+00, 0.5928060E+00, 0.5890642E+00, &
     & 0.6238300E+00, 0.6399000E+00, 0.5976100E+00, 0.6024900E+00, &
     & 0.5785300E+00, 0.5573010E+00, 0.5471405E+00, 0.5330340E+00, &
     & 0.5165692E+00, 0.5010648E+00, 0.4787994E+00, 0.4494784E+00, &
     & 0.4192287E+00, 0.3796499E+00, 0.3097650E+00, 0.3097650E+00 /
      data (ref_adm(35,iz,15, 8),iz = 1,20) / &
     & 0.6043200E+00, 0.6043200E+00, 0.5928060E+00, 0.5890642E+00, &
     & 0.5861067E+00, 0.5840840E+00, 0.5805186E+00, 0.6155200E+00, &
     & 0.5899200E+00, 0.5573010E+00, 0.5471404E+00, 0.5330340E+00, &
     & 0.5165692E+00, 0.5010648E+00, 0.4787994E+00, 0.4494784E+00, &
     & 0.4192287E+00, 0.3796499E+00, 0.3097650E+00, 0.3097650E+00 /
      data (ref_adm(35,iz,16, 8),iz = 1,20) / &
     & 0.5636800E+00, 0.5636800E+00, 0.5686400E+00, 0.5890642E+00, &
     & 0.5861067E+00, 0.5840840E+00, 0.5805186E+00, 0.5744445E+00, &
     & 0.6012500E+00, 0.5573010E+00, 0.5471405E+00, 0.5330340E+00, &
     & 0.5165692E+00, 0.5010648E+00, 0.4787994E+00, 0.4494784E+00, &
     & 0.4192287E+00, 0.3796499E+00, 0.3097650E+00, 0.3097650E+00 /
      data (ref_adm(35,iz,17, 8),iz = 1,20) / &
     & 0.6036076E+00, 0.6036076E+00, 0.5928060E+00, 0.5825600E+00, &
     & 0.5861067E+00, 0.5840840E+00, 0.5805186E+00, 0.5744445E+00, &
     & 0.5666429E+00, 0.5573010E+00, 0.5471404E+00, 0.5330340E+00, &
     & 0.5165692E+00, 0.5010648E+00, 0.4787994E+00, 0.4494784E+00, &
     & 0.4192287E+00, 0.3796499E+00, 0.3097650E+00, 0.3097650E+00 /
      data (ref_adm(35,iz,18, 8),iz = 1,20) / &
     & 0.6150582E+00, 0.6150582E+00, 0.5918503E+00, 0.5901199E+00, &
     & 0.5594000E+00, 0.5961604E+00, 0.5945454E+00, 0.5886201E+00, &
     & 0.5824960E+00, 0.5761001E+00, 0.5701364E+00, 0.5627298E+00, &
     & 0.5536518E+00, 0.5454638E+00, 0.5326634E+00, 0.5124290E+00, &
     & 0.4865058E+00, 0.4412587E+00, 0.3489085E+00, 0.3489085E+00 /
      data (ref_adm(35,iz,19, 8),iz = 1,20) / &
     & 0.6152088E+00, 0.6152088E+00, 0.5920594E+00, 0.5902006E+00, &
     & 0.5918562E+00, 0.5619000E+00, 0.5949443E+00, 0.5888699E+00, &
     & 0.5825230E+00, 0.5762227E+00, 0.5702929E+00, 0.5627215E+00, &
     & 0.5535921E+00, 0.5451698E+00, 0.5325567E+00, 0.5122285E+00, &
     & 0.4862986E+00, 0.4410436E+00, 0.3487791E+00, 0.3487791E+00 /
      data (ref_adm(35,iz,20, 8),iz = 1,20) / &
     & 0.6153851E+00, 0.6153851E+00, 0.5919500E+00, 0.5899964E+00, &
     & 0.5915453E+00, 0.5959274E+00, 0.6503500E+00, 0.4899700E+00, &
     & 0.5829216E+00, 0.5763659E+00, 0.5703325E+00, 0.5626322E+00, &
     & 0.5535272E+00, 0.5450433E+00, 0.5322803E+00, 0.5119782E+00, &
     & 0.4858112E+00, 0.4406581E+00, 0.3486325E+00, 0.3486325E+00 /
      data (ref_adm(35,iz,21, 8),iz = 1,20) / &
     & 0.6153490E+00, 0.6153490E+00, 0.5920243E+00, 0.5900334E+00, &
     & 0.5912431E+00, 0.5958189E+00, 0.5950791E+00, 0.5891252E+00, &
     & 0.5831323E+00, 0.5765692E+00, 0.5704647E+00, 0.5627054E+00, &
     & 0.5534265E+00, 0.5450947E+00, 0.5320375E+00, 0.5116915E+00, &
     & 0.4856050E+00, 0.4403441E+00, 0.3485343E+00, 0.3485343E+00 /
      data (ref_adm(35,iz,22, 8),iz = 1,20) / &
     & 0.6022744E+00, 0.6022744E+00, 0.6010966E+00, 0.6005147E+00, &
     & 0.6018180E+00, 0.6041576E+00, 0.6021767E+00, 0.5962090E+00, &
     & 0.5891234E+00, 0.5811589E+00, 0.5733587E+00, 0.5628453E+00, &
     & 0.5510616E+00, 0.5401365E+00, 0.5249291E+00, 0.5041603E+00, &
     & 0.4796153E+00, 0.4395037E+00, 0.3524473E+00, 0.3524473E+00 /
      data (ref_adm(35,iz,23, 8),iz = 1,20) / &
     & 0.6307000E+00, 0.6307000E+00, 0.6010442E+00, 0.5998124E+00, &
     & 0.6006377E+00, 0.6031235E+00, 0.6024870E+00, 0.5965940E+00, &
     & 0.5897092E+00, 0.5812619E+00, 0.5732267E+00, 0.5623255E+00, &
     & 0.5504919E+00, 0.5389457E+00, 0.5235114E+00, 0.5026370E+00, &
     & 0.4777192E+00, 0.4379497E+00, 0.3518366E+00, 0.3518366E+00 /
      data (ref_adm(35,iz,24, 8),iz = 1,20) / &
     & 0.5871600E+00, 0.5871600E+00, 0.6008466E+00, 0.5993887E+00, &
     & 0.5873200E+00, 0.6214200E+00, 0.6023864E+00, 0.5971663E+00, &
     & 0.5900518E+00, 0.5817907E+00, 0.5732438E+00, 0.5619380E+00, &
     & 0.5498893E+00, 0.5381314E+00, 0.5222094E+00, 0.5011131E+00, &
     & 0.4762083E+00, 0.4364433E+00, 0.3512457E+00, 0.3512457E+00 /
      data (ref_adm(35,iz,25, 8),iz = 1,20) / &
     & 0.6252900E+00, 0.6252900E+00, 0.6009496E+00, 0.5992137E+00, &
     & 0.5985481E+00, 0.6006570E+00, 0.6020210E+00, 0.5978116E+00, &
     & 0.5905676E+00, 0.5822095E+00, 0.5733863E+00, 0.5617165E+00, &
     & 0.5493368E+00, 0.5373859E+00, 0.5210778E+00, 0.4995967E+00, &
     & 0.4746675E+00, 0.4350926E+00, 0.3508098E+00, 0.3508098E+00 /
      data (ref_adm(35,iz,26, 8),iz = 1,20) / &
     & 0.5828700E+00, 0.5828700E+00, 0.6015800E+00, 0.6211300E+00, &
     & 0.6150700E+00, 0.5992287E+00, 0.6013194E+00, 0.5983642E+00, &
     & 0.5909349E+00, 0.5827121E+00, 0.5734240E+00, 0.5615364E+00, &
     & 0.5486642E+00, 0.5368817E+00, 0.5200943E+00, 0.4982248E+00, &
     & 0.4734012E+00, 0.4336521E+00, 0.3503800E+00, 0.3503800E+00 /
      data (ref_adm(35,iz,27, 8),iz = 1,20) / &
     & 0.6169100E+00, 0.6169100E+00, 0.6039600E+00, 0.5900600E+00, &
     & 0.6199400E+00, 0.5978985E+00, 0.6002729E+00, 0.5985778E+00, &
     & 0.5916027E+00, 0.5831252E+00, 0.5737696E+00, 0.5614929E+00, &
     & 0.5482608E+00, 0.5363656E+00, 0.5191246E+00, 0.4970805E+00, &
     & 0.4721852E+00, 0.4325488E+00, 0.3501052E+00, 0.3501052E+00 /
      data (ref_adm(35,iz,28, 8),iz = 1,20) / &
     & 0.5899100E+00, 0.5899100E+00, 0.5954200E+00, 0.5906000E+00, &
     & 0.5906200E+00, 0.6151800E+00, 0.5991129E+00, 0.5985929E+00, &
     & 0.5920932E+00, 0.5837047E+00, 0.5739783E+00, 0.5614938E+00, &
     & 0.5477052E+00, 0.5357790E+00, 0.5185215E+00, 0.4959053E+00, &
     & 0.4709560E+00, 0.4314108E+00, 0.3498380E+00, 0.3498380E+00 /
      data (ref_adm(35,iz,29, 8),iz = 1,20) / &
     & 0.6037600E+00, 0.6037600E+00, 0.5910700E+00, 0.5824600E+00, &
     & 0.5769200E+00, 0.5721900E+00, 0.5979087E+00, 0.5982942E+00, &
     & 0.5926418E+00, 0.5841583E+00, 0.5744794E+00, 0.5614866E+00, &
     & 0.5475431E+00, 0.5355453E+00, 0.5179610E+00, 0.4950161E+00, &
     & 0.4698864E+00, 0.4303803E+00, 0.3496159E+00, 0.3496159E+00 /
      data (ref_adm(35,iz,30, 8),iz = 1,20) / &
     & 0.6141500E+00, 0.6141500E+00, 0.5932400E+00, 0.5994800E+00, &
     & 0.5969500E+00, 0.5957344E+00, 0.5967423E+00, 0.5976340E+00, &
     & 0.5929870E+00, 0.5845258E+00, 0.5748670E+00, 0.5615524E+00, &
     & 0.5473297E+00, 0.5348198E+00, 0.5175017E+00, 0.4943069E+00, &
     & 0.4691018E+00, 0.4296344E+00, 0.3494629E+00, 0.3494629E+00 /
      data (ref_adm(35,iz,31, 8),iz = 1,20) / &
     & 0.6165100E+00, 0.6165100E+00, 0.6025717E+00, 0.5999019E+00, &
     & 0.5974041E+00, 0.5953566E+00, 0.5959550E+00, 0.5970062E+00, &
     & 0.5932238E+00, 0.5849854E+00, 0.5751697E+00, 0.5617244E+00, &
     & 0.5473468E+00, 0.5346276E+00, 0.5170780E+00, 0.4936648E+00, &
     & 0.4682575E+00, 0.4288068E+00, 0.3493545E+00, 0.3493545E+00 /
      data (ref_adm(35,iz,32, 8),iz = 1,20) / &
     & 0.6026192E+00, 0.6026192E+00, 0.6038925E+00, 0.6010057E+00, &
     & 0.5977000E+00, 0.5955325E+00, 0.5950053E+00, 0.5961958E+00, &
     & 0.5933220E+00, 0.5853470E+00, 0.5755339E+00, 0.5617586E+00, &
     & 0.5472084E+00, 0.5343612E+00, 0.5168198E+00, 0.4931553E+00, &
     & 0.4676226E+00, 0.4282411E+00, 0.3492294E+00, 0.3492294E+00 /
      data (ref_adm(35,iz,33, 8),iz = 1,20) / &
     & 0.6027206E+00, 0.6027206E+00, 0.6056415E+00, 0.6026460E+00, &
     & 0.5983621E+00, 0.5953381E+00, 0.5945323E+00, 0.5954264E+00, &
     & 0.5932885E+00, 0.5855788E+00, 0.5757253E+00, 0.5619848E+00, &
     & 0.5471987E+00, 0.5342826E+00, 0.5165434E+00, 0.4925944E+00, &
     & 0.4671075E+00, 0.4277082E+00, 0.3492201E+00, 0.3492201E+00 /
      data (ref_adm(35,iz,34, 8),iz = 1,20) / &
     & 0.6027739E+00, 0.6027739E+00, 0.6080027E+00, 0.6055238E+00, &
     & 0.5994630E+00, 0.5954677E+00, 0.5942625E+00, 0.5947603E+00, &
     & 0.5931094E+00, 0.5859110E+00, 0.5760430E+00, 0.5622826E+00, &
     & 0.5472028E+00, 0.5341642E+00, 0.5164080E+00, 0.4924650E+00, &
     & 0.4666607E+00, 0.4272575E+00, 0.3491514E+00, 0.3491514E+00 /
      data (ref_adm(35,iz,35, 8),iz = 1,20) / &
     & 0.6026772E+00, 0.6026772E+00, 0.6102774E+00, 0.6101408E+00, &
     & 0.6012260E+00, 0.5955490E+00, 0.5937251E+00, 0.5943726E+00, &
     & 0.5928845E+00, 0.5860916E+00, 0.5762148E+00, 0.5622935E+00, &
     & 0.5471868E+00, 0.5341208E+00, 0.5161429E+00, 0.4922062E+00, &
     & 0.4661672E+00, 0.4269046E+00, 0.3491553E+00, 0.3491553E+00 /
      data (ref_adm(35,iz,36, 8),iz = 1,20) / &
     & 0.5956200E+00, 0.5956200E+00, 0.6137952E+00, 0.6158200E+00, &
     & 0.6037360E+00, 0.5957950E+00, 0.5937076E+00, 0.5940838E+00, &
     & 0.5928162E+00, 0.5862157E+00, 0.5763826E+00, 0.5624567E+00, &
     & 0.5471658E+00, 0.5340782E+00, 0.5160002E+00, 0.4921036E+00, &
     & 0.4659212E+00, 0.4267180E+00, 0.3491478E+00, 0.3491478E+00 /
      data (ref_adm(35,iz,37, 8),iz = 1,20) / &
     & 0.6147200E+00, 0.6147200E+00, 0.6018400E+00, 0.6396900E+00, &
     & 0.5756800E+00, 0.5957853E+00, 0.5936822E+00, 0.5938740E+00, &
     & 0.5924919E+00, 0.5863783E+00, 0.5763493E+00, 0.5623487E+00, &
     & 0.5471153E+00, 0.5342888E+00, 0.5160181E+00, 0.4919856E+00, &
     & 0.4659845E+00, 0.4266854E+00, 0.3491166E+00, 0.3491166E+00 /
      data (ref_adm(35,iz,38, 8),iz = 1,20) / &
     & 0.6147200E+00, 0.6147200E+00, 0.6018400E+00, 0.6396900E+00, &
     & 0.5756800E+00, 0.5957853E+00, 0.5936822E+00, 0.5938740E+00, &
     & 0.5924919E+00, 0.5863783E+00, 0.5763493E+00, 0.5623487E+00, &
     & 0.5471153E+00, 0.5342888E+00, 0.5160181E+00, 0.4919856E+00, &
     & 0.4659845E+00, 0.4266854E+00, 0.3491166E+00, 0.3491166E+00 /
! Solar Zenith Angle 40.0 Albedo  0.6359823E+00
      data (ref_adm(35,iz, 1, 9),iz = 1,20) / &
     & 0.3759600E+00, 0.3759600E+00, 0.5905900E+00, 0.5365513E+00, &
     & 0.5511080E+00, 0.5695840E+00, 0.5913043E+00, 0.6158618E+00, &
     & 0.6404939E+00, 0.6703733E+00, 0.7131523E+00, 0.7975770E+00, &
     & 0.9264613E+00, 0.1011798E+01, 0.1200829E+01, 0.1637997E+01, &
     & 0.2575029E+01, 0.4119058E+01, 0.1898553E+01, 0.1898553E+01 /
      data (ref_adm(35,iz, 2, 9),iz = 1,20) / &
     & 0.3759600E+00, 0.3759600E+00, 0.5905900E+00, 0.5365513E+00, &
     & 0.5511080E+00, 0.5695840E+00, 0.5913043E+00, 0.6158618E+00, &
     & 0.6404939E+00, 0.6703733E+00, 0.7131523E+00, 0.7975770E+00, &
     & 0.9264613E+00, 0.1011798E+01, 0.1200829E+01, 0.1637997E+01, &
     & 0.2575029E+01, 0.4119058E+01, 0.1898553E+01, 0.1898553E+01 /
      data (ref_adm(35,iz, 3, 9),iz = 1,20) / &
     & 0.5129243E+00, 0.5129243E+00, 0.5969200E+00, 0.5362927E+00, &
     & 0.6067400E+00, 0.5693092E+00, 0.5905871E+00, 0.6147024E+00, &
     & 0.6395764E+00, 0.6693342E+00, 0.7114054E+00, 0.7940175E+00, &
     & 0.9199413E+00, 0.1006980E+01, 0.1181267E+01, 0.1586061E+01, &
     & 0.2389299E+01, 0.4268190E+01, 0.1515657E+01, 0.1515657E+01 /
      data (ref_adm(35,iz, 4, 9),iz = 1,20) / &
     & 0.6094300E+00, 0.6094300E+00, 0.5243843E+00, 0.6238100E+00, &
     & 0.5502788E+00, 0.5689259E+00, 0.5898730E+00, 0.6142073E+00, &
     & 0.6380712E+00, 0.6675218E+00, 0.7078397E+00, 0.7848527E+00, &
     & 0.9045351E+00, 0.9990157E+00, 0.1143112E+01, 0.1480053E+01, &
     & 0.2071483E+01, 0.3744190E+01, 0.2856232E+01, 0.2856232E+01 /
      data (ref_adm(35,iz, 5, 9),iz = 1,20) / &
     & 0.6031800E+00, 0.6031800E+00, 0.6066900E+00, 0.5858500E+00, &
     & 0.5491034E+00, 0.5676177E+00, 0.5878147E+00, 0.6121987E+00, &
     & 0.6363643E+00, 0.6650811E+00, 0.7027264E+00, 0.7737712E+00, &
     & 0.8821199E+00, 0.9871026E+00, 0.1101561E+01, 0.1356297E+01, &
     & 0.1768439E+01, 0.2693346E+01, 0.3091493E+01, 0.3091493E+01 /
      data (ref_adm(35,iz, 6, 9),iz = 1,20) / &
     & 0.6366800E+00, 0.6366800E+00, 0.6279600E+00, 0.5868500E+00, &
     & 0.5503200E+00, 0.5825400E+00, 0.5857700E+00, 0.6092483E+00, &
     & 0.6336303E+00, 0.6607130E+00, 0.6956468E+00, 0.7603162E+00, &
     & 0.8532085E+00, 0.9578096E+00, 0.1070603E+01, 0.1243392E+01, &
     & 0.1528967E+01, 0.2017493E+01, 0.2088366E+01, 0.2088366E+01 /
      data (ref_adm(35,iz, 7, 9),iz = 1,20) / &
     & 0.5125638E+00, 0.5125638E+00, 0.5231954E+00, 0.5344043E+00, &
     & 0.5469356E+00, 0.5639138E+00, 0.6024500E+00, 0.6109000E+00, &
     & 0.6308774E+00, 0.6563936E+00, 0.6892574E+00, 0.7457944E+00, &
     & 0.8267694E+00, 0.9135251E+00, 0.1042391E+01, 0.1162803E+01, &
     & 0.1333899E+01, 0.1618920E+01, 0.1565010E+01, 0.1565010E+01 /
      data (ref_adm(35,iz, 8, 9),iz = 1,20) / &
     & 0.5125871E+00, 0.5125871E+00, 0.5227531E+00, 0.5329940E+00, &
     & 0.5454225E+00, 0.5612224E+00, 0.5895300E+00, 0.6190700E+00, &
     & 0.6268495E+00, 0.6522295E+00, 0.6824400E+00, 0.7330049E+00, &
     & 0.8002629E+00, 0.8728462E+00, 0.9893195E+00, 0.1122654E+01, &
     & 0.1227982E+01, 0.1378375E+01, 0.1310537E+01, 0.1310537E+01 /
      data (ref_adm(35,iz, 9, 9),iz = 1,20) / &
     & 0.5122138E+00, 0.5122138E+00, 0.5218542E+00, 0.5316529E+00, &
     & 0.5432231E+00, 0.5582963E+00, 0.5768808E+00, 0.5968608E+00, &
     & 0.6214460E+00, 0.6475753E+00, 0.6753038E+00, 0.7201689E+00, &
     & 0.7790801E+00, 0.8363515E+00, 0.9285590E+00, 0.1059689E+01, &
     & 0.1181836E+01, 0.1256546E+01, 0.1163854E+01, 0.1163854E+01 /
      data (ref_adm(35,iz,10, 9),iz = 1,20) / &
     & 0.5123249E+00, 0.5123249E+00, 0.5170500E+00, 0.5306366E+00, &
     & 0.5417339E+00, 0.6154000E+00, 0.5511000E+00, 0.5922478E+00, &
     & 0.6152643E+00, 0.6414295E+00, 0.6682478E+00, 0.7096555E+00, &
     & 0.7594884E+00, 0.8097859E+00, 0.8814451E+00, 0.9827918E+00, &
     & 0.1087732E+01, 0.1193288E+01, 0.1108264E+01, 0.1108264E+01 /
      data (ref_adm(35,iz,11, 9),iz = 1,20) / &
     & 0.2749000E+00, 0.2749000E+00, 0.5962100E+00, 0.5616400E+00, &
     & 0.5733600E+00, 0.6063500E+00, 0.5847900E+00, 0.5871809E+00, &
     & 0.6082407E+00, 0.6328350E+00, 0.6613787E+00, 0.7000122E+00, &
     & 0.7445329E+00, 0.7862472E+00, 0.8462979E+00, 0.9242606E+00, &
     & 0.1004103E+01, 0.1082212E+01, 0.1026153E+01, 0.1026153E+01 /
      data (ref_adm(35,iz,12, 9),iz = 1,20) / &
     & 0.6275600E+00, 0.6275600E+00, 0.5975100E+00, 0.5894700E+00, &
     & 0.5557700E+00, 0.3495500E+00, 0.5640060E+00, 0.5817679E+00, &
     & 0.6019790E+00, 0.6244352E+00, 0.6519884E+00, 0.6899668E+00, &
     & 0.6170300E+00, 0.7688961E+00, 0.8204852E+00, 0.8844912E+00, &
     & 0.9466962E+00, 0.1004685E+01, 0.9552146E+00, 0.9552146E+00 /
      data (ref_adm(35,iz,13, 9),iz = 1,20) / &
     & 0.5111300E+00, 0.5111300E+00, 0.5176100E+00, 0.5970300E+00, &
     & 0.5694000E+00, 0.6134700E+00, 0.5628400E+00, 0.5757950E+00, &
     & 0.5242800E+00, 0.5201900E+00, 0.4870100E+00, 0.6776640E+00, &
     & 0.7188819E+00, 0.7531743E+00, 0.7988452E+00, 0.8551003E+00, &
     & 0.9066218E+00, 0.9514897E+00, 0.9057048E+00, 0.9057048E+00 /
      data (ref_adm(35,iz,14, 9),iz = 1,20) / &
     & 0.5494700E+00, 0.5494700E+00, 0.5172341E+00, 0.5242549E+00, &
     & 0.6316100E+00, 0.6476100E+00, 0.5552223E+00, 0.5698485E+00, &
     & 0.5871301E+00, 0.4672400E+00, 0.4919500E+00, 0.5217400E+00, &
     & 0.6055900E+00, 0.7377779E+00, 0.7810270E+00, 0.8325309E+00, &
     & 0.8786355E+00, 0.9166859E+00, 0.8696331E+00, 0.8696331E+00 /
      data (ref_adm(35,iz,15, 9),iz = 1,20) / &
     & 0.5111171E+00, 0.5111171E+00, 0.5745900E+00, 0.5223908E+00, &
     & 0.3229200E+00, 0.6278200E+00, 0.6213000E+00, 0.5643865E+00, &
     & 0.5802819E+00, 0.5983071E+00, 0.6202400E+00, 0.6520520E+00, &
     & 0.6043000E+00, 0.5186700E+00, 0.7606133E+00, 0.8108329E+00, &
     & 0.8542053E+00, 0.8894433E+00, 0.8409848E+00, 0.8409848E+00 /
      data (ref_adm(35,iz,16, 9),iz = 1,20) / &
     & 0.5107801E+00, 0.5107801E+00, 0.5154667E+00, 0.5212500E+00, &
     & 0.4890400E+00, 0.3501300E+00, 0.5471090E+00, 0.5590445E+00, &
     & 0.6009500E+00, 0.5819100E+00, 0.6099827E+00, 0.6387389E+00, &
     & 0.5939800E+00, 0.7010049E+00, 0.7390333E+00, 0.7846616E+00, &
     & 0.8252405E+00, 0.8603344E+00, 0.8147143E+00, 0.8147143E+00 /
      data (ref_adm(35,iz,17, 9),iz = 1,20) / &
     & 0.5104181E+00, 0.5104181E+00, 0.5141454E+00, 0.5189263E+00, &
     & 0.5252323E+00, 0.5330483E+00, 0.5426949E+00, 0.5541301E+00, &
     & 0.5676369E+00, 0.5828375E+00, 0.6005132E+00, 0.6265498E+00, &
     & 0.5864500E+00, 0.6833827E+00, 0.7184479E+00, 0.7607014E+00, &
     & 0.7978121E+00, 0.8285002E+00, 0.7873130E+00, 0.7873130E+00 /
      data (ref_adm(35,iz,18, 9),iz = 1,20) / &
     & 0.4987785E+00, 0.4987785E+00, 0.4999275E+00, 0.5015372E+00, &
     & 0.5043520E+00, 0.5080001E+00, 0.5126735E+00, 0.5181802E+00, &
     & 0.5245221E+00, 0.5315318E+00, 0.5399912E+00, 0.5511039E+00, &
     & 0.5799800E+00, 0.5815800E+00, 0.5808285E+00, 0.5875163E+00, &
     & 0.5879456E+00, 0.5737358E+00, 0.5022094E+00, 0.5022094E+00 /
      data (ref_adm(35,iz,19, 9),iz = 1,20) / &
     & 0.4987851E+00, 0.4987851E+00, 0.4994230E+00, 0.5010653E+00, &
     & 0.5032099E+00, 0.5064895E+00, 0.5107604E+00, 0.5160307E+00, &
     & 0.5218772E+00, 0.5282140E+00, 0.5353979E+00, 0.5452668E+00, &
     & 0.5847100E+00, 0.5767400E+00, 0.5722700E+00, 0.5781372E+00, &
     & 0.5779635E+00, 0.5626342E+00, 0.4937302E+00, 0.4937302E+00 /
      data (ref_adm(35,iz,20, 9),iz = 1,20) / &
     & 0.4987249E+00, 0.4987249E+00, 0.4993499E+00, 0.5955900E+00, &
     & 0.5028244E+00, 0.5055467E+00, 0.5091637E+00, 0.5136573E+00, &
     & 0.5187936E+00, 0.5250520E+00, 0.5316560E+00, 0.5406446E+00, &
     & 0.5497944E+00, 0.5571452E+00, 0.5645444E+00, 0.5694107E+00, &
     & 0.5686036E+00, 0.5540073E+00, 0.4886494E+00, 0.4886494E+00 /
      data (ref_adm(35,iz,21, 9),iz = 1,20) / &
     & 0.4986933E+00, 0.4986933E+00, 0.4991685E+00, 0.5004513E+00, &
     & 0.5424300E+00, 0.5048507E+00, 0.5080732E+00, 0.5119832E+00, &
     & 0.5167060E+00, 0.5220508E+00, 0.5280890E+00, 0.5365672E+00, &
     & 0.5452676E+00, 0.5515041E+00, 0.5572090E+00, 0.5617578E+00, &
     & 0.5604817E+00, 0.5458022E+00, 0.4853917E+00, 0.4853917E+00 /
      data (ref_adm(35,iz,22, 9),iz = 1,20) / &
     & 0.5440985E+00, 0.5440985E+00, 0.6367400E+00, 0.5458454E+00, &
     & 0.2967800E+00, 0.2968200E+00, 0.5476150E+00, 0.5483078E+00, &
     & 0.5489781E+00, 0.5497671E+00, 0.5501467E+00, 0.5491639E+00, &
     & 0.5467290E+00, 0.5430337E+00, 0.5360997E+00, 0.5221794E+00, &
     & 0.5012098E+00, 0.4638651E+00, 0.3886986E+00, 0.3886986E+00 /
      data (ref_adm(35,iz,23, 9),iz = 1,20) / &
     & 0.5442299E+00, 0.5442299E+00, 0.3408700E+00, 0.5473159E+00, &
     & 0.5486382E+00, 0.3674200E+00, 0.5497637E+00, 0.5499316E+00, &
     & 0.5499662E+00, 0.5500603E+00, 0.5502612E+00, 0.5494322E+00, &
     & 0.5461266E+00, 0.5415934E+00, 0.5332845E+00, 0.5183252E+00, &
     & 0.4977812E+00, 0.4605397E+00, 0.3894483E+00, 0.3894483E+00 /
      data (ref_adm(35,iz,24, 9),iz = 1,20) / &
     & 0.4621100E+00, 0.4621100E+00, 0.4105100E+00, 0.5492828E+00, &
     & 0.5514002E+00, 0.5528564E+00, 0.5536175E+00, 0.6088200E+00, &
     & 0.5530530E+00, 0.5521651E+00, 0.5512618E+00, 0.5495396E+00, &
     & 0.5466159E+00, 0.5418588E+00, 0.5325412E+00, 0.5163035E+00, &
     & 0.4950100E+00, 0.4587868E+00, 0.3911759E+00, 0.3911759E+00 /
      data (ref_adm(35,iz,25, 9),iz = 1,20) / &
     & 0.5446439E+00, 0.5446439E+00, 0.5480645E+00, 0.5514780E+00, &
     & 0.5542449E+00, 0.5567372E+00, 0.6032600E+00, 0.5592242E+00, &
     & 0.5589865E+00, 0.6739300E+00, 0.5548621E+00, 0.5513362E+00, &
     & 0.5469343E+00, 0.5424955E+00, 0.5332372E+00, 0.5163172E+00, &
     & 0.4941163E+00, 0.4577519E+00, 0.3939801E+00, 0.3939801E+00 /
      data (ref_adm(35,iz,26, 9),iz = 1,20) / &
     & 0.5447929E+00, 0.5447929E+00, 0.5493607E+00, 0.5532541E+00, &
     & 0.5565097E+00, 0.5591757E+00, 0.5617099E+00, 0.5636746E+00, &
     & 0.5650148E+00, 0.5649994E+00, 0.5625775E+00, 0.5570682E+00, &
     & 0.5503427E+00, 0.5440376E+00, 0.5341610E+00, 0.5178369E+00, &
     & 0.4953208E+00, 0.4586654E+00, 0.3976989E+00, 0.3976989E+00 /
      data (ref_adm(35,iz,27, 9),iz = 1,20) / &
     & 0.5215900E+00, 0.5215900E+00, 0.5656200E+00, 0.5350000E+00, &
     & 0.5580291E+00, 0.4397100E+00, 0.4809800E+00, 0.5654263E+00, &
     & 0.5670179E+00, 0.5689095E+00, 0.5699486E+00, 0.5667615E+00, &
     & 0.5579641E+00, 0.5492423E+00, 0.5368815E+00, 0.5196205E+00, &
     & 0.4977902E+00, 0.4613011E+00, 0.4025288E+00, 0.4025288E+00 /
      data (ref_adm(35,iz,28, 9),iz = 1,20) / &
     & 0.5348700E+00, 0.5348700E+00, 0.6121800E+00, 0.4649100E+00, &
     & 0.3372800E+00, 0.6031100E+00, 0.6050000E+00, 0.6253400E+00, &
     & 0.6728500E+00, 0.5091000E+00, 0.5241200E+00, 0.5706124E+00, &
     & 0.5683592E+00, 0.5599114E+00, 0.5440930E+00, 0.5234024E+00, &
     & 0.5004079E+00, 0.4650058E+00, 0.4083434E+00, 0.4083434E+00 /
      data (ref_adm(35,iz,29, 9),iz = 1,20) / &
     & 0.6030400E+00, 0.6030400E+00, 0.6018500E+00, 0.5566816E+00, &
     & 0.5604730E+00, 0.6060100E+00, 0.5649923E+00, 0.6377300E+00, &
     & 0.6413900E+00, 0.6859500E+00, 0.6974500E+00, 0.5712099E+00, &
     & 0.5694541E+00, 0.5673543E+00, 0.5555716E+00, 0.5309924E+00, &
     & 0.5047731E+00, 0.4687412E+00, 0.4146007E+00, 0.4146007E+00 /
      data (ref_adm(35,iz,30, 9),iz = 1,20) / &
     & 0.2808900E+00, 0.2808900E+00, 0.5530607E+00, 0.5576423E+00, &
     & 0.5606956E+00, 0.5632411E+00, 0.5671061E+00, 0.5704803E+00, &
     & 0.5731977E+00, 0.5752612E+00, 0.5766593E+00, 0.5756818E+00, &
     & 0.5722023E+00, 0.5675349E+00, 0.5608605E+00, 0.5421780E+00, &
     & 0.5128902E+00, 0.4736443E+00, 0.4207780E+00, 0.4207780E+00 /
      data (ref_adm(35,iz,31, 9),iz = 1,20) / &
     & 0.5457881E+00, 0.5457881E+00, 0.5537615E+00, 0.5585034E+00, &
     & 0.5610685E+00, 0.6356500E+00, 0.6402500E+00, 0.6317200E+00, &
     & 0.6105900E+00, 0.5754851E+00, 0.5774179E+00, 0.5789955E+00, &
     & 0.5771162E+00, 0.5717938E+00, 0.5623003E+00, 0.5485567E+00, &
     & 0.5234778E+00, 0.4807386E+00, 0.4269540E+00, 0.4269540E+00 /
      data (ref_adm(35,iz,32, 9),iz = 1,20) / &
     & 0.6306200E+00, 0.6306200E+00, 0.5541691E+00, 0.5589584E+00, &
     & 0.6155400E+00, 0.6262700E+00, 0.5689796E+00, 0.6249500E+00, &
     & 0.6070400E+00, 0.5716319E+00, 0.5735787E+00, 0.5766065E+00, &
     & 0.5784424E+00, 0.5760590E+00, 0.5664460E+00, 0.5505284E+00, &
     & 0.5304086E+00, 0.4894829E+00, 0.4333375E+00, 0.4333375E+00 /
      data (ref_adm(35,iz,33, 9),iz = 1,20) / &
     & 0.6314500E+00, 0.6314500E+00, 0.5544316E+00, 0.6179000E+00, &
     & 0.6179900E+00, 0.5664148E+00, 0.5684470E+00, 0.5131500E+00, &
     & 0.5674480E+00, 0.5678525E+00, 0.5694258E+00, 0.5716755E+00, &
     & 0.5749284E+00, 0.5760003E+00, 0.5701447E+00, 0.5535454E+00, &
     & 0.5336260E+00, 0.4972219E+00, 0.4396279E+00, 0.4396279E+00 /
      data (ref_adm(35,iz,34, 9),iz = 1,20) / &
     & 0.6332300E+00, 0.6332300E+00, 0.6181500E+00, 0.6115600E+00, &
     & 0.5627292E+00, 0.5667292E+00, 0.5673171E+00, 0.4779800E+00, &
     & 0.5013400E+00, 0.5671141E+00, 0.5686276E+00, 0.5695636E+00, &
     & 0.5707722E+00, 0.5726734E+00, 0.5709192E+00, 0.5573822E+00, &
     & 0.5360048E+00, 0.5019804E+00, 0.4453541E+00, 0.4453541E+00 /
      data (ref_adm(35,iz,35, 9),iz = 1,20) / &
     & 0.5983800E+00, 0.5983800E+00, 0.5551844E+00, 0.5594999E+00, &
     & 0.5632516E+00, 0.5668195E+00, 0.5663266E+00, 0.5646462E+00, &
     & 0.5654754E+00, 0.5686436E+00, 0.5705719E+00, 0.5706101E+00, &
     & 0.5695254E+00, 0.5696254E+00, 0.5694968E+00, 0.5596824E+00, &
     & 0.5383680E+00, 0.5049580E+00, 0.4498812E+00, 0.4498812E+00 /
      data (ref_adm(35,iz,36, 9),iz = 1,20) / &
     & 0.6026300E+00, 0.6026300E+00, 0.5552338E+00, 0.5597591E+00, &
     & 0.5635940E+00, 0.5667097E+00, 0.5654103E+00, 0.5641352E+00, &
     & 0.5663353E+00, 0.5723117E+00, 0.5761875E+00, 0.5742555E+00, &
     & 0.5700655E+00, 0.5683733E+00, 0.5677507E+00, 0.5604288E+00, &
     & 0.5403678E+00, 0.5068588E+00, 0.4526903E+00, 0.4526903E+00 /
      data (ref_adm(35,iz,37, 9),iz = 1,20) / &
     & 0.5786800E+00, 0.5786800E+00, 0.6029700E+00, 0.5597607E+00, &
     & 0.5637376E+00, 0.5664434E+00, 0.5647879E+00, 0.5639521E+00, &
     & 0.5678170E+00, 0.5834613E+00, 0.5989169E+00, 0.5870875E+00, &
     & 0.5711869E+00, 0.5681356E+00, 0.5666848E+00, 0.5605596E+00, &
     & 0.5414207E+00, 0.5079576E+00, 0.4541974E+00, 0.4541974E+00 /
      data (ref_adm(35,iz,38, 9),iz = 1,20) / &
     & 0.5786800E+00, 0.5786800E+00, 0.6029700E+00, 0.5597607E+00, &
     & 0.5637376E+00, 0.5664434E+00, 0.5647879E+00, 0.5639521E+00, &
     & 0.5678170E+00, 0.5834613E+00, 0.5989169E+00, 0.5870875E+00, &
     & 0.5711869E+00, 0.5681356E+00, 0.5666848E+00, 0.5605596E+00, &
     & 0.5414207E+00, 0.5079576E+00, 0.4541974E+00, 0.4541974E+00 /
! Solar Zenith Angle 45.0 Albedo  0.5088605E+00
      data (ref_adm(35,iz, 1,10),iz = 1,20) / &
     & 0.3686600E+00, 0.3686600E+00, 0.4812900E+00, 0.4511400E+00, &
     & 0.4528200E+00, 0.5566800E+00, 0.5413200E+00, 0.5194200E+00, &
     & 0.5978700E+00, 0.5301600E+00, 0.5519500E+00, 0.4760000E+00, &
     & 0.6110900E+00, 0.6252300E+00, 0.6339504E+00, 0.6456827E+00, &
     & 0.6475133E+00, 0.5824300E+00, 0.5444218E+00, 0.5444218E+00 /
      data (ref_adm(35,iz, 2,10),iz = 1,20) / &
     & 0.3686600E+00, 0.3686600E+00, 0.4812900E+00, 0.4511400E+00, &
     & 0.4528200E+00, 0.5566800E+00, 0.5413200E+00, 0.5194200E+00, &
     & 0.5978700E+00, 0.5301600E+00, 0.5519500E+00, 0.4760000E+00, &
     & 0.6110900E+00, 0.6252300E+00, 0.6339504E+00, 0.6456827E+00, &
     & 0.6475133E+00, 0.5824300E+00, 0.5444218E+00, 0.5444218E+00 /
      data (ref_adm(35,iz, 3,10),iz = 1,20) / &
     & 0.3633400E+00, 0.3633400E+00, 0.3174500E+00, 0.4135800E+00, &
     & 0.4524700E+00, 0.4902200E+00, 0.5307400E+00, 0.5714700E+00, &
     & 0.5249700E+00, 0.5805500E+00, 0.5500500E+00, 0.5625200E+00, &
     & 0.6122000E+00, 0.6256800E+00, 0.6325222E+00, 0.6435865E+00, &
     & 0.6450639E+00, 0.6295536E+00, 0.1616516E+00, 0.1616516E+00 /
      data (ref_adm(35,iz, 4,10),iz = 1,20) / &
     & 0.3211400E+00, 0.3211400E+00, 0.3065700E+00, 0.4085700E+00, &
     & 0.4567500E+00, 0.4097700E+00, 0.4605900E+00, 0.5149000E+00, &
     & 0.5248100E+00, 0.4856600E+00, 0.5245300E+00, 0.5998200E+00, &
     & 0.5747800E+00, 0.6394400E+00, 0.6301466E+00, 0.6405388E+00, &
     & 0.6346100E+00, 0.6229421E+00, 0.5324784E+00, 0.5324784E+00 /
      data (ref_adm(35,iz, 5,10),iz = 1,20) / &
     & 0.4049700E+00, 0.4049700E+00, 0.3255200E+00, 0.3431100E+00, &
     & 0.3864700E+00, 0.4463400E+00, 0.4433200E+00, 0.4952800E+00, &
     & 0.5355400E+00, 0.5896800E+00, 0.4765200E+00, 0.5769900E+00, &
     & 0.5659900E+00, 0.6152300E+00, 0.6068000E+00, 0.6634700E+00, &
     & 0.4866300E+00, 0.6136760E+00, 0.5215435E+00, 0.5215435E+00 /
      data (ref_adm(35,iz, 6,10),iz = 1,20) / &
     & 0.4452000E+00, 0.4452000E+00, 0.4867900E+00, 0.3373800E+00, &
     & 0.3520200E+00, 0.4327600E+00, 0.4500100E+00, 0.4936500E+00, &
     & 0.4619000E+00, 0.4815900E+00, 0.4117500E+00, 0.5534200E+00, &
     & 0.5595700E+00, 0.6027100E+00, 0.5984800E+00, 0.6111900E+00, &
     & 0.6269865E+00, 0.6025168E+00, 0.5085049E+00, 0.5085049E+00 /
      data (ref_adm(35,iz, 7,10),iz = 1,20) / &
     & 0.4122700E+00, 0.4122700E+00, 0.4608200E+00, 0.4721300E+00, &
     & 0.4369400E+00, 0.3107400E+00, 0.3970900E+00, 0.4392400E+00, &
     & 0.4506200E+00, 0.4643800E+00, 0.4628100E+00, 0.4761900E+00, &
     & 0.5799139E+00, 0.5979715E+00, 0.5493000E+00, 0.5683600E+00, &
     & 0.6182235E+00, 0.5900541E+00, 0.4960214E+00, 0.4960214E+00 /
      data (ref_adm(35,iz, 8,10),iz = 1,20) / &
     & 0.5061400E+00, 0.5061400E+00, 0.4719300E+00, 0.4630800E+00, &
     & 0.4940800E+00, 0.5201800E+00, 0.4833600E+00, 0.5090400E+00, &
     & 0.5034200E+00, 0.4538900E+00, 0.5367500E+00, 0.5002100E+00, &
     & 0.5797500E+00, 0.5088500E+00, 0.6086811E+00, 0.6167980E+00, &
     & 0.6090952E+00, 0.5795614E+00, 0.4843521E+00, 0.4843521E+00 /
      data (ref_adm(35,iz, 9,10),iz = 1,20) / &
     & 0.4064900E+00, 0.4064900E+00, 0.3220400E+00, 0.3404400E+00, &
     & 0.4079300E+00, 0.4584100E+00, 0.5336300E+00, 0.4086700E+00, &
     & 0.4875149E+00, 0.4681600E+00, 0.4985200E+00, 0.5156600E+00, &
     & 0.5214000E+00, 0.5501400E+00, 0.5405100E+00, 0.6087965E+00, &
     & 0.6012929E+00, 0.5698606E+00, 0.4737442E+00, 0.4737442E+00 /
      data (ref_adm(35,iz,10,10),iz = 1,20) / &
     & 0.3850600E+00, 0.3850600E+00, 0.3534900E+00, 0.3622900E+00, &
     & 0.4050500E+00, 0.3707000E+00, 0.4443700E+00, 0.3873100E+00, &
     & 0.4843079E+00, 0.4372300E+00, 0.5284600E+00, 0.5292200E+00, &
     & 0.5690700E+00, 0.5756805E+00, 0.5903909E+00, 0.5996335E+00, &
     & 0.5928383E+00, 0.5606097E+00, 0.4647714E+00, 0.4647714E+00 /
      data (ref_adm(35,iz,11,10),iz = 1,20) / &
     & 0.3344100E+00, 0.3344100E+00, 0.2948300E+00, 0.3291000E+00, &
     & 0.3528200E+00, 0.3338300E+00, 0.4472400E+00, 0.5537500E+00, &
     & 0.5399600E+00, 0.4922700E+00, 0.4671800E+00, 0.5313800E+00, &
     & 0.5423500E+00, 0.5670180E+00, 0.5811732E+00, 0.5886548E+00, &
     & 0.5838585E+00, 0.5525095E+00, 0.4565887E+00, 0.4565887E+00 /
      data (ref_adm(35,iz,12,10),iz = 1,20) / &
     & 0.3756400E+00, 0.3756400E+00, 0.3701300E+00, 0.3664400E+00, &
     & 0.3097200E+00, 0.3745200E+00, 0.4611600E+00, 0.5335500E+00, &
     & 0.5282400E+00, 0.4911678E+00, 0.5062929E+00, 0.5072000E+00, &
     & 0.5211000E+00, 0.5578684E+00, 0.5707979E+00, 0.5770552E+00, &
     & 0.5727997E+00, 0.5443526E+00, 0.4495008E+00, 0.4495008E+00 /
      data (ref_adm(35,iz,13,10),iz = 1,20) / &
     & 0.4458800E+00, 0.4458800E+00, 0.4476300E+00, 0.4590800E+00, &
     & 0.4357900E+00, 0.4120700E+00, 0.4759500E+00, 0.5022900E+00, &
     & 0.4128500E+00, 0.5439900E+00, 0.5515000E+00, 0.4874300E+00, &
     & 0.5229300E+00, 0.5770000E+00, 0.5772400E+00, 0.5656041E+00, &
     & 0.5609866E+00, 0.5353177E+00, 0.4427045E+00, 0.4427045E+00 /
      data (ref_adm(35,iz,14,10),iz = 1,20) / &
     & 0.4455100E+00, 0.4455100E+00, 0.4447100E+00, 0.4743400E+00, &
     & 0.4882700E+00, 0.5124400E+00, 0.4987200E+00, 0.5088800E+00, &
     & 0.5068600E+00, 0.5054100E+00, 0.5221500E+00, 0.5231600E+00, &
     & 0.4919400E+00, 0.5393200E+00, 0.5760100E+00, 0.5543098E+00, &
     & 0.5485573E+00, 0.5237003E+00, 0.4355171E+00, 0.4355171E+00 /
      data (ref_adm(35,iz,15,10),iz = 1,20) / &
     & 0.4412400E+00, 0.4412400E+00, 0.4795100E+00, 0.4983700E+00, &
     & 0.5227700E+00, 0.5302900E+00, 0.5553800E+00, 0.5594500E+00, &
     & 0.4685900E+00, 0.5098700E+00, 0.4221800E+00, 0.4993900E+00, &
     & 0.5209700E+00, 0.5060100E+00, 0.5077600E+00, 0.5425477E+00, &
     & 0.5365785E+00, 0.5115067E+00, 0.4267613E+00, 0.4267613E+00 /
      data (ref_adm(35,iz,16,10),iz = 1,20) / &
     & 0.4525800E+00, 0.4525800E+00, 0.4253000E+00, 0.5328300E+00, &
     & 0.5419300E+00, 0.5575700E+00, 0.5476700E+00, 0.5626800E+00, &
     & 0.5524200E+00, 0.5436800E+00, 0.5409500E+00, 0.4890100E+00, &
     & 0.5127732E+00, 0.5220292E+00, 0.5299377E+00, 0.5311733E+00, &
     & 0.5241399E+00, 0.5001114E+00, 0.4177470E+00, 0.4177470E+00 /
      data (ref_adm(35,iz,17,10),iz = 1,20) / &
     & 0.4700200E+00, 0.4700200E+00, 0.5189900E+00, 0.5294700E+00, &
     & 0.4761400E+00, 0.4346000E+00, 0.5678400E+00, 0.5345800E+00, &
     & 0.5461100E+00, 0.5559400E+00, 0.5437100E+00, 0.4920800E+00, &
     & 0.5049896E+00, 0.5375000E+00, 0.4881400E+00, 0.5212147E+00, &
     & 0.5130419E+00, 0.4880920E+00, 0.4096600E+00, 0.4096600E+00 /
      data (ref_adm(35,iz,18,10),iz = 1,20) / &
     & 0.5225500E+00, 0.5225500E+00, 0.4918300E+00, 0.4906800E+00, &
     & 0.4385300E+00, 0.4218200E+00, 0.4789000E+00, 0.5581800E+00, &
     & 0.5198300E+00, 0.5649000E+00, 0.4987700E+00, 0.4313800E+00, &
     & 0.4889000E+00, 0.3357800E+00, 0.5062800E+00, 0.5170644E+00, &
     & 0.5131415E+00, 0.4962279E+00, 0.4286791E+00, 0.4286791E+00 /
      data (ref_adm(35,iz,19,10),iz = 1,20) / &
     & 0.4528800E+00, 0.4528800E+00, 0.4270400E+00, 0.4393600E+00, &
     & 0.4750400E+00, 0.4043000E+00, 0.3606300E+00, 0.4271900E+00, &
     & 0.4640700E+00, 0.4761900E+00, 0.5495700E+00, 0.5094200E+00, &
     & 0.4486500E+00, 0.3737300E+00, 0.3962300E+00, 0.5087075E+00, &
     & 0.5051174E+00, 0.4881544E+00, 0.4225071E+00, 0.4225071E+00 /
      data (ref_adm(35,iz,20,10),iz = 1,20) / &
     & 0.4460800E+00, 0.4460800E+00, 0.3822300E+00, 0.3651800E+00, &
     & 0.3553700E+00, 0.3629000E+00, 0.3702200E+00, 0.3826200E+00, &
     & 0.4911100E+00, 0.5441300E+00, 0.5332600E+00, 0.5197400E+00, &
     & 0.4811000E+00, 0.4984244E+00, 0.4895700E+00, 0.5016258E+00, &
     & 0.4975514E+00, 0.4813853E+00, 0.4187475E+00, 0.4187475E+00 /
      data (ref_adm(35,iz,21,10),iz = 1,20) / &
     & 0.4510000E+00, 0.4510000E+00, 0.3915600E+00, 0.3862200E+00, &
     & 0.4378700E+00, 0.4461000E+00, 0.3879100E+00, 0.3245000E+00, &
     & 0.4738000E+00, 0.6166800E+00, 0.6078400E+00, 0.5780100E+00, &
     & 0.5146700E+00, 0.4987800E+00, 0.4951108E+00, 0.4948896E+00, &
     & 0.4910564E+00, 0.4749362E+00, 0.4162496E+00, 0.4162496E+00 /
      data (ref_adm(35,iz,22,10),iz = 1,20) / &
     & 0.5392400E+00, 0.5392400E+00, 0.5385400E+00, 0.4551300E+00, &
     & 0.4792600E+00, 0.4821000E+00, 0.4244200E+00, 0.3798500E+00, &
     & 0.4032600E+00, 0.5617300E+00, 0.6021000E+00, 0.5517100E+00, &
     & 0.5286100E+00, 0.5232600E+00, 0.5237900E+00, 0.3675900E+00, &
     & 0.5795879E+00, 0.5839552E+00, 0.5848530E+00, 0.5848530E+00 /
      data (ref_adm(35,iz,23,10),iz = 1,20) / &
     & 0.5209100E+00, 0.5209100E+00, 0.5231100E+00, 0.4938900E+00, &
     & 0.5001600E+00, 0.5073100E+00, 0.4685800E+00, 0.3795200E+00, &
     & 0.3782700E+00, 0.3469700E+00, 0.5564200E+00, 0.5405600E+00, &
     & 0.5819400E+00, 0.5457500E+00, 0.5236100E+00, 0.5084300E+00, &
     & 0.5762827E+00, 0.5819820E+00, 0.5913785E+00, 0.5913785E+00 /
      data (ref_adm(35,iz,24,10),iz = 1,20) / &
     & 0.5355300E+00, 0.5355300E+00, 0.4942200E+00, 0.5164900E+00, &
     & 0.5158100E+00, 0.5050400E+00, 0.5314900E+00, 0.5119300E+00, &
     & 0.3748600E+00, 0.3366300E+00, 0.5166700E+00, 0.5403000E+00, &
     & 0.5000900E+00, 0.5337310E+00, 0.5954200E+00, 0.5350700E+00, &
     & 0.5369900E+00, 0.5848787E+00, 0.6025764E+00, 0.6025764E+00 /
      data (ref_adm(35,iz,25,10),iz = 1,20) / &
     & 0.4593300E+00, 0.4593300E+00, 0.4323300E+00, 0.4503600E+00, &
     & 0.4574300E+00, 0.5408700E+00, 0.4740800E+00, 0.4286300E+00, &
     & 0.4033100E+00, 0.3429700E+00, 0.2918100E+00, 0.4974500E+00, &
     & 0.4954700E+00, 0.5393394E+00, 0.5561571E+00, 0.5725600E+00, &
     & 0.5841963E+00, 0.5926872E+00, 0.6175109E+00, 0.6175109E+00 /
      data (ref_adm(35,iz,26,10),iz = 1,20) / &
     & 0.4523900E+00, 0.4523900E+00, 0.4498100E+00, 0.4511600E+00, &
     & 0.4417400E+00, 0.4555000E+00, 0.4337500E+00, 0.4321100E+00, &
     & 0.5049700E+00, 0.4308100E+00, 0.3107700E+00, 0.5462800E+00, &
     & 0.5533500E+00, 0.5181200E+00, 0.5637859E+00, 0.5475500E+00, &
     & 0.5957850E+00, 0.6070647E+00, 0.6375273E+00, 0.6375273E+00 /
      data (ref_adm(35,iz,27,10),iz = 1,20) / &
     & 0.4503300E+00, 0.4503300E+00, 0.4734200E+00, 0.4465600E+00, &
     & 0.4542700E+00, 0.4388500E+00, 0.4305600E+00, 0.4588300E+00, &
     & 0.4762900E+00, 0.4746400E+00, 0.4513400E+00, 0.4661400E+00, &
     & 0.5615300E+00, 0.5434800E+00, 0.5718531E+00, 0.5478000E+00, &
     & 0.6068389E+00, 0.6220518E+00, 0.6597920E+00, 0.6597920E+00 /
      data (ref_adm(35,iz,28,10),iz = 1,20) / &
     & 0.4329900E+00, 0.4329900E+00, 0.4565700E+00, 0.4931300E+00, &
     & 0.4662800E+00, 0.4034100E+00, 0.3182100E+00, 0.5099200E+00, &
     & 0.5257700E+00, 0.5216600E+00, 0.4304700E+00, 0.4500400E+00, &
     & 0.5500200E+00, 0.5427400E+00, 0.5962024E+00, 0.6145872E+00, &
     & 0.6275447E+00, 0.6408417E+00, 0.6834375E+00, 0.6834375E+00 /
      data (ref_adm(35,iz,29,10),iz = 1,20) / &
     & 0.4195800E+00, 0.4195800E+00, 0.4567100E+00, 0.5230600E+00, &
     & 0.4324300E+00, 0.3731900E+00, 0.5080800E+00, 0.4621600E+00, &
     & 0.4728100E+00, 0.5307900E+00, 0.5760300E+00, 0.4923800E+00, &
     & 0.5293400E+00, 0.5290700E+00, 0.5257800E+00, 0.5283100E+00, &
     & 0.6797654E+00, 0.6820853E+00, 0.7137470E+00, 0.7137470E+00 /
      data (ref_adm(35,iz,30,10),iz = 1,20) / &
     & 0.4404500E+00, 0.4404500E+00, 0.4330700E+00, 0.4648600E+00, &
     & 0.4748700E+00, 0.4685100E+00, 0.5520200E+00, 0.4248100E+00, &
     & 0.4549300E+00, 0.4736800E+00, 0.5078000E+00, 0.4940400E+00, &
     & 0.4995200E+00, 0.4973000E+00, 0.5134800E+00, 0.6749614E+00, &
     & 0.7072983E+00, 0.7356248E+00, 0.7561574E+00, 0.7561574E+00 /
      data (ref_adm(35,iz,31,10),iz = 1,20) / &
     & 0.4745300E+00, 0.4745300E+00, 0.5030100E+00, 0.5031400E+00, &
     & 0.4958600E+00, 0.5166700E+00, 0.4508700E+00, 0.4583800E+00, &
     & 0.5052900E+00, 0.5084900E+00, 0.5024700E+00, 0.5053800E+00, &
     & 0.5139000E+00, 0.5166700E+00, 0.4980700E+00, 0.6681898E+00, &
     & 0.6944561E+00, 0.7273679E+00, 0.7808049E+00, 0.7808049E+00 /
      data (ref_adm(35,iz,32,10),iz = 1,20) / &
     & 0.4730700E+00, 0.4730700E+00, 0.5207800E+00, 0.4243287E+00, &
     & 0.5190200E+00, 0.3859900E+00, 0.3403000E+00, 0.3234800E+00, &
     & 0.4944800E+00, 0.5711000E+00, 0.5442215E+00, 0.5695460E+00, &
     & 0.5047400E+00, 0.5436900E+00, 0.6458336E+00, 0.6768482E+00, &
     & 0.7046974E+00, 0.7340512E+00, 0.7894098E+00, 0.7894098E+00 /
      data (ref_adm(35,iz,33,10),iz = 1,20) / &
     & 0.5484700E+00, 0.5484700E+00, 0.5557500E+00, 0.5082600E+00, &
     & 0.3797500E+00, 0.4250000E+00, 0.5250200E+00, 0.4831100E+00, &
     & 0.5236187E+00, 0.5725700E+00, 0.5469972E+00, 0.5736008E+00, &
     & 0.5992630E+00, 0.6195947E+00, 0.5516900E+00, 0.6780539E+00, &
     & 0.7092543E+00, 0.7445969E+00, 0.8058853E+00, 0.8058853E+00 /
      data (ref_adm(35,iz,34,10),iz = 1,20) / &
     & 0.4392800E+00, 0.4392800E+00, 0.3172800E+00, 0.3811100E+00, &
     & 0.4846500E+00, 0.4538200E+00, 0.3726200E+00, 0.4778800E+00, &
     & 0.2579600E+00, 0.5294489E+00, 0.5499659E+00, 0.5740840E+00, &
     & 0.5969566E+00, 0.6171383E+00, 0.6435363E+00, 0.6756601E+00, &
     & 0.7069099E+00, 0.7467026E+00, 0.8198143E+00, 0.8198143E+00 /
      data (ref_adm(35,iz,35,10),iz = 1,20) / &
     & 0.3784000E+00, 0.3784000E+00, 0.4504700E+00, 0.3655200E+00, &
     & 0.4120200E+00, 0.3937500E+00, 0.3556300E+00, 0.5139050E+00, &
     & 0.5141740E+00, 0.6358000E+00, 0.5513150E+00, 0.5728230E+00, &
     & 0.5954635E+00, 0.6173395E+00, 0.6460350E+00, 0.6785933E+00, &
     & 0.7080534E+00, 0.7462752E+00, 0.8287222E+00, 0.8287222E+00 /
      data (ref_adm(35,iz,36,10),iz = 1,20) / &
     & 0.4048800E+00, 0.4048800E+00, 0.4095000E+00, 0.4117800E+00, &
     & 0.3163600E+00, 0.3722400E+00, 0.5637700E+00, 0.6217000E+00, &
     & 0.3877700E+00, 0.5675500E+00, 0.5513478E+00, 0.5718099E+00, &
     & 0.5964600E+00, 0.6209155E+00, 0.6546007E+00, 0.6884475E+00, &
     & 0.7142727E+00, 0.7483914E+00, 0.8338559E+00, 0.8338559E+00 /
      data (ref_adm(35,iz,37,10),iz = 1,20) / &
     & 0.3662800E+00, 0.3662800E+00, 0.3674200E+00, 0.4267900E+00, &
     & 0.4962400E+00, 0.5621200E+00, 0.4840074E+00, 0.5777300E+00, &
     & 0.4782200E+00, 0.4055400E+00, 0.5512429E+00, 0.5712463E+00, &
     & 0.5983033E+00, 0.6255502E+00, 0.6853756E+00, 0.7295975E+00, &
     & 0.7219899E+00, 0.7513860E+00, 0.8369062E+00, 0.8369062E+00 /
      data (ref_adm(35,iz,38,10),iz = 1,20) / &
     & 0.3662800E+00, 0.3662800E+00, 0.3674200E+00, 0.4267900E+00, &
     & 0.4962400E+00, 0.5621200E+00, 0.4840074E+00, 0.5777300E+00, &
     & 0.4782200E+00, 0.4055400E+00, 0.5512429E+00, 0.5712463E+00, &
     & 0.5983033E+00, 0.6255502E+00, 0.6853756E+00, 0.7295975E+00, &
     & 0.7219899E+00, 0.7513860E+00, 0.8369062E+00, 0.8369062E+00 /
! Solar Zenith Angle 50.0 Albedo  0.5027675E+00
      data (ref_adm(35,iz, 1,11),iz = 1,20) / &
     & 0.3966500E+00, 0.3966500E+00, 0.4039200E+00, 0.4077200E+00, &
     & 0.3861500E+00, 0.4379200E+00, 0.4775000E+00, 0.4993000E+00, &
     & 0.5287600E+00, 0.5316700E+00, 0.5255200E+00, 0.5567500E+00, &
     & 0.5792500E+00, 0.6189000E+00, 0.5899400E+00, 0.6600800E+00, &
     & 0.6794600E+00, 0.6885300E+00, 0.5660473E+00, 0.5660473E+00 /
      data (ref_adm(35,iz, 2,11),iz = 1,20) / &
     & 0.3966500E+00, 0.3966500E+00, 0.4039200E+00, 0.4077200E+00, &
     & 0.3861500E+00, 0.4379200E+00, 0.4775000E+00, 0.4993000E+00, &
     & 0.5287600E+00, 0.5316700E+00, 0.5255200E+00, 0.5567500E+00, &
     & 0.5792500E+00, 0.6189000E+00, 0.5899400E+00, 0.6600800E+00, &
     & 0.6794600E+00, 0.6885300E+00, 0.5660473E+00, 0.5660473E+00 /
      data (ref_adm(35,iz, 3,11),iz = 1,20) / &
     & 0.4275400E+00, 0.4275400E+00, 0.4084200E+00, 0.4246500E+00, &
     & 0.4167600E+00, 0.4221600E+00, 0.4825800E+00, 0.4931600E+00, &
     & 0.5074100E+00, 0.5549600E+00, 0.5341400E+00, 0.5149100E+00, &
     & 0.6067100E+00, 0.6504000E+00, 0.6628100E+00, 0.6829500E+00, &
     & 0.6846200E+00, 0.6444100E+00, 0.2820137E+00, 0.2820137E+00 /
      data (ref_adm(35,iz, 4,11),iz = 1,20) / &
     & 0.4021000E+00, 0.4021000E+00, 0.4556700E+00, 0.4655900E+00, &
     & 0.4595900E+00, 0.4601500E+00, 0.4551500E+00, 0.4723500E+00, &
     & 0.4798500E+00, 0.5266200E+00, 0.5427100E+00, 0.5359100E+00, &
     & 0.5502400E+00, 0.6408300E+00, 0.6398600E+00, 0.6594700E+00, &
     & 0.6812900E+00, 0.6689807E+00, 0.5578239E+00, 0.5578239E+00 /
      data (ref_adm(35,iz, 5,11),iz = 1,20) / &
     & 0.4471600E+00, 0.4471600E+00, 0.4478000E+00, 0.4806000E+00, &
     & 0.4657500E+00, 0.4721000E+00, 0.4470000E+00, 0.4451000E+00, &
     & 0.4365000E+00, 0.4926500E+00, 0.5281300E+00, 0.5489000E+00, &
     & 0.5334700E+00, 0.5657600E+00, 0.5952700E+00, 0.5626500E+00, &
     & 0.3929200E+00, 0.6545063E+00, 0.5509059E+00, 0.5509059E+00 /
      data (ref_adm(35,iz, 6,11),iz = 1,20) / &
     & 0.4513400E+00, 0.4513400E+00, 0.4625200E+00, 0.4920200E+00, &
     & 0.4816700E+00, 0.4704500E+00, 0.4524900E+00, 0.4143200E+00, &
     & 0.4421100E+00, 0.4599800E+00, 0.5021600E+00, 0.5234900E+00, &
     & 0.5381500E+00, 0.5731500E+00, 0.5620500E+00, 0.5587500E+00, &
     & 0.6559823E+00, 0.6366209E+00, 0.5385647E+00, 0.5385647E+00 /
      data (ref_adm(35,iz, 7,11),iz = 1,20) / &
     & 0.4450900E+00, 0.4450900E+00, 0.4512300E+00, 0.4644900E+00, &
     & 0.4595800E+00, 0.4844500E+00, 0.4936300E+00, 0.4296300E+00, &
     & 0.4007300E+00, 0.4106700E+00, 0.4887000E+00, 0.5260500E+00, &
     & 0.5664900E+00, 0.5526200E+00, 0.5754400E+00, 0.5517800E+00, &
     & 0.4370500E+00, 0.6179590E+00, 0.5215771E+00, 0.5215771E+00 /
      data (ref_adm(35,iz, 8,11),iz = 1,20) / &
     & 0.4564900E+00, 0.4564900E+00, 0.4496600E+00, 0.4470700E+00, &
     & 0.4589200E+00, 0.4746700E+00, 0.4880700E+00, 0.5243400E+00, &
     & 0.5120900E+00, 0.5133700E+00, 0.5567100E+00, 0.5674800E+00, &
     & 0.5890300E+00, 0.5954100E+00, 0.6301600E+00, 0.6385500E+00, &
     & 0.6064200E+00, 0.6007206E+00, 0.5046629E+00, 0.5046629E+00 /
      data (ref_adm(35,iz, 9,11),iz = 1,20) / &
     & 0.4696900E+00, 0.4696900E+00, 0.4532400E+00, 0.4591800E+00, &
     & 0.4566300E+00, 0.4606800E+00, 0.4177900E+00, 0.4757100E+00, &
     & 0.4995400E+00, 0.5184300E+00, 0.5466100E+00, 0.5812300E+00, &
     & 0.5961200E+00, 0.5674100E+00, 0.5086900E+00, 0.5043800E+00, &
     & 0.4674500E+00, 0.5850682E+00, 0.4903316E+00, 0.4903316E+00 /
      data (ref_adm(35,iz,10,11),iz = 1,20) / &
     & 0.4713300E+00, 0.4713300E+00, 0.4770100E+00, 0.4786600E+00, &
     & 0.4825500E+00, 0.4376900E+00, 0.4271500E+00, 0.4524800E+00, &
     & 0.4852800E+00, 0.5520800E+00, 0.5638200E+00, 0.5724500E+00, &
     & 0.5843700E+00, 0.5622100E+00, 0.4830400E+00, 0.5432700E+00, &
     & 0.4651300E+00, 0.5711050E+00, 0.4780656E+00, 0.4780656E+00 /
      data (ref_adm(35,iz,11,11),iz = 1,20) / &
     & 0.4526400E+00, 0.4526400E+00, 0.4667200E+00, 0.4703600E+00, &
     & 0.4976500E+00, 0.4093800E+00, 0.4163900E+00, 0.4544000E+00, &
     & 0.4477600E+00, 0.5137200E+00, 0.5495300E+00, 0.5438400E+00, &
     & 0.5664100E+00, 0.5358200E+00, 0.5627500E+00, 0.4584800E+00, &
     & 0.5880267E+00, 0.5586190E+00, 0.4675381E+00, 0.4675381E+00 /
      data (ref_adm(35,iz,12,11),iz = 1,20) / &
     & 0.4474000E+00, 0.4474000E+00, 0.4735500E+00, 0.4809100E+00, &
     & 0.4289000E+00, 0.4690800E+00, 0.4867100E+00, 0.4947300E+00, &
     & 0.5007600E+00, 0.5350400E+00, 0.5422900E+00, 0.4828900E+00, &
     & 0.5490500E+00, 0.5651300E+00, 0.5519500E+00, 0.4338300E+00, &
     & 0.5750554E+00, 0.5474173E+00, 0.4584681E+00, 0.4584681E+00 /
      data (ref_adm(35,iz,13,11),iz = 1,20) / &
     & 0.4372400E+00, 0.4372400E+00, 0.5042500E+00, 0.5201800E+00, &
     & 0.5188900E+00, 0.5093200E+00, 0.5028600E+00, 0.4817900E+00, &
     & 0.4670800E+00, 0.4915600E+00, 0.5593200E+00, 0.5228500E+00, &
     & 0.5072400E+00, 0.5822800E+00, 0.5071600E+00, 0.4212700E+00, &
     & 0.5610559E+00, 0.5363316E+00, 0.4503279E+00, 0.4503279E+00 /
      data (ref_adm(35,iz,14,11),iz = 1,20) / &
     & 0.4515200E+00, 0.4515200E+00, 0.4436900E+00, 0.4399900E+00, &
     & 0.4480900E+00, 0.4594200E+00, 0.4732700E+00, 0.4949300E+00, &
     & 0.4993400E+00, 0.5037900E+00, 0.4923400E+00, 0.5156900E+00, &
     & 0.5630100E+00, 0.5678200E+00, 0.5700700E+00, 0.4320300E+00, &
     & 0.5465026E+00, 0.5236840E+00, 0.4422180E+00, 0.4422180E+00 /
      data (ref_adm(35,iz,15,11),iz = 1,20) / &
     & 0.4326800E+00, 0.4326800E+00, 0.4393800E+00, 0.4630200E+00, &
     & 0.4582200E+00, 0.4954100E+00, 0.5191400E+00, 0.5304900E+00, &
     & 0.5187600E+00, 0.4837300E+00, 0.4589100E+00, 0.4427600E+00, &
     & 0.4575500E+00, 0.4867800E+00, 0.4561300E+00, 0.5041200E+00, &
     & 0.5326389E+00, 0.5101284E+00, 0.4332125E+00, 0.4332125E+00 /
      data (ref_adm(35,iz,16,11),iz = 1,20) / &
     & 0.4493600E+00, 0.4493600E+00, 0.4416200E+00, 0.4245200E+00, &
     & 0.4707500E+00, 0.4612500E+00, 0.5342700E+00, 0.5387600E+00, &
     & 0.5476100E+00, 0.5404700E+00, 0.4921400E+00, 0.5110800E+00, &
     & 0.5160100E+00, 0.4909000E+00, 0.5392300E+00, 0.4970000E+00, &
     & 0.5191612E+00, 0.4973591E+00, 0.4233985E+00, 0.4233985E+00 /
      data (ref_adm(35,iz,17,11),iz = 1,20) / &
     & 0.4484500E+00, 0.4484500E+00, 0.4884200E+00, 0.4632700E+00, &
     & 0.4607300E+00, 0.4631200E+00, 0.5092800E+00, 0.5169000E+00, &
     & 0.5490500E+00, 0.5733700E+00, 0.5292700E+00, 0.4887000E+00, &
     & 0.4739600E+00, 0.3709300E+00, 0.3364700E+00, 0.5130118E+00, &
     & 0.5061910E+00, 0.4847001E+00, 0.4148400E+00, 0.4148400E+00 /
      data (ref_adm(35,iz,18,11),iz = 1,20) / &
     & 0.4593500E+00, 0.4593500E+00, 0.5055300E+00, 0.5110900E+00, &
     & 0.5282500E+00, 0.5030900E+00, 0.4970700E+00, 0.5230300E+00, &
     & 0.5252700E+00, 0.5215100E+00, 0.5375600E+00, 0.5092600E+00, &
     & 0.5320600E+00, 0.3763500E+00, 0.2964100E+00, 0.4771607E+00, &
     & 0.4595122E+00, 0.4217537E+00, 0.3351487E+00, 0.3351487E+00 /
      data (ref_adm(35,iz,19,11),iz = 1,20) / &
     & 0.4890400E+00, 0.4890400E+00, 0.5018000E+00, 0.5076600E+00, &
     & 0.5309400E+00, 0.5437900E+00, 0.5662000E+00, 0.5400900E+00, &
     & 0.5134700E+00, 0.5061200E+00, 0.5162600E+00, 0.4926400E+00, &
     & 0.4975700E+00, 0.4906700E+00, 0.4732800E+00, 0.4761225E+00, &
     & 0.4583872E+00, 0.4207486E+00, 0.3345133E+00, 0.3345133E+00 /
      data (ref_adm(35,iz,20,11),iz = 1,20) / &
     & 0.4823000E+00, 0.4823000E+00, 0.4772000E+00, 0.5132000E+00, &
     & 0.5309800E+00, 0.5387600E+00, 0.5359000E+00, 0.5057900E+00, &
     & 0.4986000E+00, 0.5027500E+00, 0.5075600E+00, 0.4917500E+00, &
     & 0.5246300E+00, 0.4920200E+00, 0.5039400E+00, 0.4751975E+00, &
     & 0.4574362E+00, 0.4195892E+00, 0.3339286E+00, 0.3339286E+00 /
      data (ref_adm(35,iz,21,11),iz = 1,20) / &
     & 0.4866300E+00, 0.4866300E+00, 0.4760300E+00, 0.4811800E+00, &
     & 0.4984600E+00, 0.5201800E+00, 0.4994300E+00, 0.4935300E+00, &
     & 0.4946400E+00, 0.4886900E+00, 0.5196200E+00, 0.5423900E+00, &
     & 0.5614600E+00, 0.5157600E+00, 0.4708800E+00, 0.5341100E+00, &
     & 0.4565677E+00, 0.4184619E+00, 0.3332826E+00, 0.3332826E+00 /
      data (ref_adm(35,iz,22,11),iz = 1,20) / &
     & 0.4680700E+00, 0.4680700E+00, 0.4956400E+00, 0.4923400E+00, &
     & 0.4717700E+00, 0.5040100E+00, 0.4632600E+00, 0.4601400E+00, &
     & 0.5079200E+00, 0.5205800E+00, 0.5088200E+00, 0.5180800E+00, &
     & 0.5328600E+00, 0.5099700E+00, 0.4751900E+00, 0.4944500E+00, &
     & 0.5209204E+00, 0.5040656E+00, 0.4435431E+00, 0.4435431E+00 /
      data (ref_adm(35,iz,23,11),iz = 1,20) / &
     & 0.4753300E+00, 0.4753300E+00, 0.4949400E+00, 0.4903000E+00, &
     & 0.4485400E+00, 0.4709800E+00, 0.4952700E+00, 0.5030000E+00, &
     & 0.5110000E+00, 0.5330700E+00, 0.4934500E+00, 0.4928900E+00, &
     & 0.5134000E+00, 0.4982000E+00, 0.5302600E+00, 0.5188700E+00, &
     & 0.5136127E+00, 0.4953395E+00, 0.4417894E+00, 0.4417894E+00 /
      data (ref_adm(35,iz,24,11),iz = 1,20) / &
     & 0.4681500E+00, 0.4681500E+00, 0.4872700E+00, 0.4937700E+00, &
     & 0.4820200E+00, 0.4480100E+00, 0.4778400E+00, 0.5207800E+00, &
     & 0.4967900E+00, 0.5004700E+00, 0.5085800E+00, 0.5310400E+00, &
     & 0.5122000E+00, 0.4763500E+00, 0.4808900E+00, 0.5164500E+00, &
     & 0.4757500E+00, 0.4890904E+00, 0.4416892E+00, 0.4416892E+00 /
      data (ref_adm(35,iz,25,11),iz = 1,20) / &
     & 0.4618800E+00, 0.4618800E+00, 0.4390400E+00, 0.4354600E+00, &
     & 0.4783700E+00, 0.4490200E+00, 0.4722700E+00, 0.4977700E+00, &
     & 0.4891700E+00, 0.4926300E+00, 0.5017700E+00, 0.5192300E+00, &
     & 0.5421200E+00, 0.5006500E+00, 0.4633400E+00, 0.5371300E+00, &
     & 0.4610700E+00, 0.4839344E+00, 0.4431109E+00, 0.4431109E+00 /
      data (ref_adm(35,iz,26,11),iz = 1,20) / &
     & 0.4312700E+00, 0.4312700E+00, 0.4481000E+00, 0.4642600E+00, &
     & 0.4742700E+00, 0.4905900E+00, 0.4961900E+00, 0.4940500E+00, &
     & 0.4867200E+00, 0.4762800E+00, 0.4913900E+00, 0.5110600E+00, &
     & 0.5293800E+00, 0.4952400E+00, 0.4940900E+00, 0.4906700E+00, &
     & 0.4725000E+00, 0.4824859E+00, 0.4463007E+00, 0.4463007E+00 /
      data (ref_adm(35,iz,27,11),iz = 1,20) / &
     & 0.4583200E+00, 0.4583200E+00, 0.4612300E+00, 0.4571300E+00, &
     & 0.4735300E+00, 0.4928300E+00, 0.5375400E+00, 0.5356700E+00, &
     & 0.5407300E+00, 0.5415100E+00, 0.5367100E+00, 0.5458000E+00, &
     & 0.5225000E+00, 0.5432100E+00, 0.5114600E+00, 0.4461800E+00, &
     & 0.4504000E+00, 0.4840293E+00, 0.4520825E+00, 0.4520825E+00 /
      data (ref_adm(35,iz,28,11),iz = 1,20) / &
     & 0.4442800E+00, 0.4442800E+00, 0.4388000E+00, 0.4427800E+00, &
     & 0.4556200E+00, 0.4850600E+00, 0.4966600E+00, 0.4876100E+00, &
     & 0.4397000E+00, 0.4305800E+00, 0.5201300E+00, 0.5291900E+00, &
     & 0.5183800E+00, 0.4377800E+00, 0.4460700E+00, 0.5144400E+00, &
     & 0.4702900E+00, 0.4870877E+00, 0.4598886E+00, 0.4598886E+00 /
      data (ref_adm(35,iz,29,11),iz = 1,20) / &
     & 0.4526200E+00, 0.4526200E+00, 0.4955700E+00, 0.4881900E+00, &
     & 0.4659400E+00, 0.5118900E+00, 0.5006600E+00, 0.4556600E+00, &
     & 0.4738100E+00, 0.4363600E+00, 0.4992100E+00, 0.5448100E+00, &
     & 0.3717400E+00, 0.4316800E+00, 0.4577900E+00, 0.5349700E+00, &
     & 0.4905100E+00, 0.4912908E+00, 0.4679933E+00, 0.4679933E+00 /
      data (ref_adm(35,iz,30,11),iz = 1,20) / &
     & 0.4678400E+00, 0.4678400E+00, 0.4805300E+00, 0.5008100E+00, &
     & 0.4754100E+00, 0.4426700E+00, 0.4591500E+00, 0.4703200E+00, &
     & 0.4488900E+00, 0.4579400E+00, 0.5118400E+00, 0.5682900E+00, &
     & 0.5358800E+00, 0.5003700E+00, 0.5731500E+00, 0.5692400E+00, &
     & 0.5170797E+00, 0.4982366E+00, 0.4766356E+00, 0.4766356E+00 /
      data (ref_adm(35,iz,31,11),iz = 1,20) / &
     & 0.4848800E+00, 0.4848800E+00, 0.4819900E+00, 0.4717000E+00, &
     & 0.4705100E+00, 0.4873200E+00, 0.4763400E+00, 0.4808600E+00, &
     & 0.5222600E+00, 0.5300700E+00, 0.5403900E+00, 0.5371700E+00, &
     & 0.5100200E+00, 0.5007600E+00, 0.4903600E+00, 0.5317300E+00, &
     & 0.5133100E+00, 0.5058901E+00, 0.4863082E+00, 0.4863082E+00 /
      data (ref_adm(35,iz,32,11),iz = 1,20) / &
     & 0.4496700E+00, 0.4496700E+00, 0.4407500E+00, 0.4588500E+00, &
     & 0.4944500E+00, 0.4730100E+00, 0.4863800E+00, 0.4663700E+00, &
     & 0.4684100E+00, 0.4628200E+00, 0.4649700E+00, 0.4560300E+00, &
     & 0.4437400E+00, 0.4022400E+00, 0.4613300E+00, 0.5405500E+00, &
     & 0.5261900E+00, 0.5152702E+00, 0.4953250E+00, 0.4953250E+00 /
      data (ref_adm(35,iz,33,11),iz = 1,20) / &
     & 0.4553700E+00, 0.4553700E+00, 0.4772800E+00, 0.4736000E+00, &
     & 0.4794200E+00, 0.4746500E+00, 0.5111600E+00, 0.4878500E+00, &
     & 0.4881900E+00, 0.5277000E+00, 0.4961800E+00, 0.4709800E+00, &
     & 0.4958300E+00, 0.5243200E+00, 0.4732800E+00, 0.5392900E+00, &
     & 0.5454653E+00, 0.5243695E+00, 0.5043820E+00, 0.5043820E+00 /
      data (ref_adm(35,iz,34,11),iz = 1,20) / &
     & 0.4670000E+00, 0.4670000E+00, 0.4502100E+00, 0.4452200E+00, &
     & 0.4410200E+00, 0.4726400E+00, 0.4779300E+00, 0.4879900E+00, &
     & 0.4693600E+00, 0.4864900E+00, 0.5138300E+00, 0.4953600E+00, &
     & 0.5115300E+00, 0.5108200E+00, 0.5114600E+00, 0.5538746E+00, &
     & 0.5535907E+00, 0.5323217E+00, 0.5126635E+00, 0.5126635E+00 /
      data (ref_adm(35,iz,35,11),iz = 1,20) / &
     & 0.4271000E+00, 0.4271000E+00, 0.4493400E+00, 0.4518800E+00, &
     & 0.4659500E+00, 0.4711200E+00, 0.4740900E+00, 0.4891800E+00, &
     & 0.5187100E+00, 0.5157200E+00, 0.5292300E+00, 0.5313900E+00, &
     & 0.5133800E+00, 0.5044300E+00, 0.4936100E+00, 0.5129500E+00, &
     & 0.5561614E+00, 0.5392178E+00, 0.5191900E+00, 0.5191900E+00 /
      data (ref_adm(35,iz,36,11),iz = 1,20) / &
     & 0.4301000E+00, 0.4301000E+00, 0.4275500E+00, 0.4318100E+00, &
     & 0.4546300E+00, 0.4846200E+00, 0.4857700E+00, 0.5172900E+00, &
     & 0.5246900E+00, 0.5306100E+00, 0.5177400E+00, 0.5466200E+00, &
     & 0.5688400E+00, 0.4733500E+00, 0.4640900E+00, 0.5102300E+00, &
     & 0.5545201E+00, 0.5439483E+00, 0.5234018E+00, 0.5234018E+00 /
      data (ref_adm(35,iz,37,11),iz = 1,20) / &
     & 0.4363900E+00, 0.4363900E+00, 0.4082100E+00, 0.4212600E+00, &
     & 0.4535500E+00, 0.4846600E+00, 0.4895100E+00, 0.4994300E+00, &
     & 0.5201200E+00, 0.5178000E+00, 0.5270400E+00, 0.5689100E+00, &
     & 0.5762100E+00, 0.4931400E+00, 0.5299200E+00, 0.5089600E+00, &
     & 0.5523231E+00, 0.5460949E+00, 0.5257643E+00, 0.5257643E+00 /
      data (ref_adm(35,iz,38,11),iz = 1,20) / &
     & 0.4363900E+00, 0.4363900E+00, 0.4082100E+00, 0.4212600E+00, &
     & 0.4535500E+00, 0.4846600E+00, 0.4895100E+00, 0.4994300E+00, &
     & 0.5201200E+00, 0.5178000E+00, 0.5270400E+00, 0.5689100E+00, &
     & 0.5762100E+00, 0.4931400E+00, 0.5299200E+00, 0.5089600E+00, &
     & 0.5523231E+00, 0.5460949E+00, 0.5257643E+00, 0.5257643E+00 /
! Solar Zenith Angle 55.0 Albedo  0.4792135E+00
      data (ref_adm(35,iz, 1,12),iz = 1,20) / &
     & 0.4637200E+00, 0.4637200E+00, 0.4454400E+00, 0.4382100E+00, &
     & 0.4503700E+00, 0.4667700E+00, 0.4902000E+00, 0.4803700E+00, &
     & 0.5020300E+00, 0.5072300E+00, 0.5079400E+00, 0.5175100E+00, &
     & 0.5702900E+00, 0.6033600E+00, 0.6505400E+00, 0.6221100E+00, &
     & 0.6300840E+00, 0.6409844E+00, 0.5403751E+00, 0.5403751E+00 /
      data (ref_adm(35,iz, 2,12),iz = 1,20) / &
     & 0.4637200E+00, 0.4637200E+00, 0.4454400E+00, 0.4382100E+00, &
     & 0.4503700E+00, 0.4667700E+00, 0.4902000E+00, 0.4803700E+00, &
     & 0.5020300E+00, 0.5072300E+00, 0.5079400E+00, 0.5175100E+00, &
     & 0.5702900E+00, 0.6033600E+00, 0.6505400E+00, 0.6221100E+00, &
     & 0.6300840E+00, 0.6409844E+00, 0.5403751E+00, 0.5403751E+00 /
      data (ref_adm(35,iz, 3,12),iz = 1,20) / &
     & 0.4377800E+00, 0.4377800E+00, 0.4341200E+00, 0.4689300E+00, &
     & 0.4506600E+00, 0.4657800E+00, 0.4550000E+00, 0.4788700E+00, &
     & 0.5000500E+00, 0.5014600E+00, 0.5219300E+00, 0.5823700E+00, &
     & 0.5966500E+00, 0.5956100E+00, 0.5745800E+00, 0.6117300E+00, &
     & 0.6665600E+00, 0.5877100E+00, 0.2830076E+00, 0.2830076E+00 /
      data (ref_adm(35,iz, 4,12),iz = 1,20) / &
     & 0.4175500E+00, 0.4175500E+00, 0.4482000E+00, 0.4578400E+00, &
     & 0.4498300E+00, 0.4264500E+00, 0.4448100E+00, 0.4491100E+00, &
     & 0.4666300E+00, 0.4873400E+00, 0.4704600E+00, 0.4857700E+00, &
     & 0.6114900E+00, 0.6283900E+00, 0.5918300E+00, 0.5966100E+00, &
     & 0.6416700E+00, 0.7234000E+00, 0.5329622E+00, 0.5329622E+00 /
      data (ref_adm(35,iz, 5,12),iz = 1,20) / &
     & 0.4489100E+00, 0.4489100E+00, 0.4223200E+00, 0.4160000E+00, &
     & 0.4425700E+00, 0.4622500E+00, 0.4566000E+00, 0.4671800E+00, &
     & 0.4975500E+00, 0.4649400E+00, 0.4701000E+00, 0.5208400E+00, &
     & 0.5460300E+00, 0.5539900E+00, 0.5842000E+00, 0.5842100E+00, &
     & 0.5317600E+00, 0.6154465E+00, 0.5267133E+00, 0.5267133E+00 /
      data (ref_adm(35,iz, 6,12),iz = 1,20) / &
     & 0.4134100E+00, 0.4134100E+00, 0.4273700E+00, 0.4337000E+00, &
     & 0.4489200E+00, 0.4553100E+00, 0.4595400E+00, 0.4941500E+00, &
     & 0.5098100E+00, 0.4863000E+00, 0.4834000E+00, 0.5429500E+00, &
     & 0.5459400E+00, 0.5451100E+00, 0.5427500E+00, 0.4359100E+00, &
     & 0.4046300E+00, 0.4517600E+00, 0.5152169E+00, 0.5152169E+00 /
      data (ref_adm(35,iz, 7,12),iz = 1,20) / &
     & 0.4089600E+00, 0.4089600E+00, 0.4399600E+00, 0.4272300E+00, &
     & 0.4247900E+00, 0.4337200E+00, 0.4513300E+00, 0.4637100E+00, &
     & 0.4536100E+00, 0.4620200E+00, 0.4912100E+00, 0.4721100E+00, &
     & 0.4739500E+00, 0.5134700E+00, 0.5257400E+00, 0.4640000E+00, &
     & 0.3929300E+00, 0.4552600E+00, 0.4992919E+00, 0.4992919E+00 /
      data (ref_adm(35,iz, 8,12),iz = 1,20) / &
     & 0.4826000E+00, 0.4826000E+00, 0.4959000E+00, 0.4848800E+00, &
     & 0.4739300E+00, 0.4765700E+00, 0.4840700E+00, 0.4880800E+00, &
     & 0.5182900E+00, 0.5327000E+00, 0.5551400E+00, 0.5394000E+00, &
     & 0.5567500E+00, 0.5459100E+00, 0.5561500E+00, 0.5640000E+00, &
     & 0.4296600E+00, 0.3881000E+00, 0.4835257E+00, 0.4835257E+00 /
      data (ref_adm(35,iz, 9,12),iz = 1,20) / &
     & 0.4426700E+00, 0.4426700E+00, 0.4404700E+00, 0.4232600E+00, &
     & 0.4096600E+00, 0.4027800E+00, 0.4231000E+00, 0.4330100E+00, &
     & 0.4462200E+00, 0.4831100E+00, 0.4995100E+00, 0.5259100E+00, &
     & 0.5074900E+00, 0.5060700E+00, 0.4869200E+00, 0.5192100E+00, &
     & 0.4905000E+00, 0.4038900E+00, 0.4703246E+00, 0.4703246E+00 /
      data (ref_adm(35,iz,10,12),iz = 1,20) / &
     & 0.4459900E+00, 0.4459900E+00, 0.4219700E+00, 0.4222700E+00, &
     & 0.4244200E+00, 0.4383100E+00, 0.4613100E+00, 0.4716900E+00, &
     & 0.4744600E+00, 0.4708100E+00, 0.4693300E+00, 0.5247700E+00, &
     & 0.5200200E+00, 0.5100600E+00, 0.5103400E+00, 0.5600000E+00, &
     & 0.5665100E+00, 0.4545300E+00, 0.4591426E+00, 0.4591426E+00 /
      data (ref_adm(35,iz,11,12),iz = 1,20) / &
     & 0.4417700E+00, 0.4417700E+00, 0.4418900E+00, 0.4428400E+00, &
     & 0.4430700E+00, 0.4617000E+00, 0.4546800E+00, 0.4886900E+00, &
     & 0.5080400E+00, 0.4973900E+00, 0.4983800E+00, 0.5047800E+00, &
     & 0.5226000E+00, 0.4809700E+00, 0.5281100E+00, 0.5812300E+00, &
     & 0.5422800E+00, 0.5399840E+00, 0.4496425E+00, 0.4496425E+00 /
      data (ref_adm(35,iz,12,12),iz = 1,20) / &
     & 0.4465900E+00, 0.4465900E+00, 0.4419300E+00, 0.4406700E+00, &
     & 0.4466300E+00, 0.4505200E+00, 0.4843400E+00, 0.5019900E+00, &
     & 0.4999700E+00, 0.5175800E+00, 0.4804400E+00, 0.4889100E+00, &
     & 0.5417600E+00, 0.5455900E+00, 0.5559900E+00, 0.5117900E+00, &
     & 0.5546420E+00, 0.5322141E+00, 0.4415188E+00, 0.4415188E+00 /
      data (ref_adm(35,iz,13,12),iz = 1,20) / &
     & 0.4513100E+00, 0.4513100E+00, 0.4709700E+00, 0.4875100E+00, &
     & 0.4902600E+00, 0.4681200E+00, 0.4786800E+00, 0.4807400E+00, &
     & 0.4663700E+00, 0.5080300E+00, 0.5057000E+00, 0.4775700E+00, &
     & 0.5088000E+00, 0.5235000E+00, 0.5439500E+00, 0.5566100E+00, &
     & 0.4914000E+00, 0.5864800E+00, 0.4342469E+00, 0.4342469E+00 /
      data (ref_adm(35,iz,14,12),iz = 1,20) / &
     & 0.4342700E+00, 0.4342700E+00, 0.4261800E+00, 0.4155800E+00, &
     & 0.4111100E+00, 0.4237700E+00, 0.4287500E+00, 0.4376400E+00, &
     & 0.4459500E+00, 0.4493600E+00, 0.4553100E+00, 0.4821500E+00, &
     & 0.5166500E+00, 0.5426500E+00, 0.5103200E+00, 0.4919800E+00, &
     & 0.5331073E+00, 0.5138630E+00, 0.4269200E+00, 0.4269200E+00 /
      data (ref_adm(35,iz,15,12),iz = 1,20) / &
     & 0.4173200E+00, 0.4173200E+00, 0.4416500E+00, 0.4393200E+00, &
     & 0.4377800E+00, 0.4412900E+00, 0.4301900E+00, 0.3942400E+00, &
     & 0.4054800E+00, 0.4045100E+00, 0.3715500E+00, 0.3720300E+00, &
     & 0.3963900E+00, 0.4347500E+00, 0.5138400E+00, 0.5219821E+00, &
     & 0.5221505E+00, 0.5022328E+00, 0.4186299E+00, 0.4186299E+00 /
      data (ref_adm(35,iz,16,12),iz = 1,20) / &
     & 0.4285200E+00, 0.4285200E+00, 0.4143200E+00, 0.4374100E+00, &
     & 0.4436800E+00, 0.4416400E+00, 0.4406900E+00, 0.4821600E+00, &
     & 0.5123000E+00, 0.4931100E+00, 0.4524000E+00, 0.4297000E+00, &
     & 0.4837800E+00, 0.4840400E+00, 0.5027000E+00, 0.5116470E+00, &
     & 0.5111870E+00, 0.4911772E+00, 0.4094978E+00, 0.4094978E+00 /
      data (ref_adm(35,iz,17,12),iz = 1,20) / &
     & 0.4215400E+00, 0.4215400E+00, 0.4196000E+00, 0.4229400E+00, &
     & 0.4276400E+00, 0.4398300E+00, 0.4574800E+00, 0.4873500E+00, &
     & 0.4820500E+00, 0.5012800E+00, 0.4597300E+00, 0.4470800E+00, &
     & 0.3975100E+00, 0.4330400E+00, 0.4605300E+00, 0.4700500E+00, &
     & 0.5004433E+00, 0.4799519E+00, 0.4015512E+00, 0.4015512E+00 /
      data (ref_adm(35,iz,18,12),iz = 1,20) / &
     & 0.4259400E+00, 0.4259400E+00, 0.4054900E+00, 0.4028500E+00, &
     & 0.4149400E+00, 0.4383900E+00, 0.4586900E+00, 0.4795500E+00, &
     & 0.4799700E+00, 0.4870100E+00, 0.4670300E+00, 0.4433100E+00, &
     & 0.4217000E+00, 0.4228600E+00, 0.4552400E+00, 0.4638600E+00, &
     & 0.4515804E+00, 0.4380506E+00, 0.3840184E+00, 0.3840184E+00 /
      data (ref_adm(35,iz,19,12),iz = 1,20) / &
     & 0.4356400E+00, 0.4356400E+00, 0.4328700E+00, 0.4188300E+00, &
     & 0.4262700E+00, 0.4370000E+00, 0.4533700E+00, 0.4718500E+00, &
     & 0.4671100E+00, 0.4941400E+00, 0.5118900E+00, 0.4529800E+00, &
     & 0.4737200E+00, 0.4582300E+00, 0.4557100E+00, 0.3736400E+00, &
     & 0.4445610E+00, 0.4314249E+00, 0.3790587E+00, 0.3790587E+00 /
      data (ref_adm(35,iz,20,12),iz = 1,20) / &
     & 0.4318300E+00, 0.4318300E+00, 0.4237100E+00, 0.4051700E+00, &
     & 0.4157600E+00, 0.4374700E+00, 0.4476000E+00, 0.4507800E+00, &
     & 0.4798800E+00, 0.4671100E+00, 0.4801900E+00, 0.4847400E+00, &
     & 0.4494200E+00, 0.4440500E+00, 0.4799200E+00, 0.4444048E+00, &
     & 0.4382926E+00, 0.4256659E+00, 0.3760607E+00, 0.3760607E+00 /
      data (ref_adm(35,iz,21,12),iz = 1,20) / &
     & 0.4202700E+00, 0.4202700E+00, 0.4284300E+00, 0.4350500E+00, &
     & 0.4257600E+00, 0.4340900E+00, 0.4467300E+00, 0.4340500E+00, &
     & 0.4434100E+00, 0.4841000E+00, 0.4796600E+00, 0.4811200E+00, &
     & 0.4554500E+00, 0.4636800E+00, 0.4889800E+00, 0.5272800E+00, &
     & 0.4330005E+00, 0.4204475E+00, 0.3739872E+00, 0.3739872E+00 /
      data (ref_adm(35,iz,22,12),iz = 1,20) / &
     & 0.4304700E+00, 0.4304700E+00, 0.4395700E+00, 0.4358400E+00, &
     & 0.4484000E+00, 0.4379100E+00, 0.4442900E+00, 0.4410900E+00, &
     & 0.4704000E+00, 0.4660400E+00, 0.4688100E+00, 0.4952100E+00, &
     & 0.4363000E+00, 0.4617300E+00, 0.4597500E+00, 0.4711900E+00, &
     & 0.5397303E+00, 0.5249375E+00, 0.4701018E+00, 0.4701018E+00 /
      data (ref_adm(35,iz,23,12),iz = 1,20) / &
     & 0.4355200E+00, 0.4355200E+00, 0.4408500E+00, 0.4343700E+00, &
     & 0.4507800E+00, 0.4541000E+00, 0.4375600E+00, 0.4391500E+00, &
     & 0.4385200E+00, 0.4395200E+00, 0.4726600E+00, 0.4680500E+00, &
     & 0.4583300E+00, 0.3529800E+00, 0.3429000E+00, 0.4484100E+00, &
     & 0.5292884E+00, 0.5137171E+00, 0.4668920E+00, 0.4668920E+00 /
      data (ref_adm(35,iz,24,12),iz = 1,20) / &
     & 0.4336700E+00, 0.4336700E+00, 0.4504100E+00, 0.4542200E+00, &
     & 0.4559600E+00, 0.4299700E+00, 0.4174600E+00, 0.4418500E+00, &
     & 0.4355300E+00, 0.3874100E+00, 0.4562000E+00, 0.4754100E+00, &
     & 0.4548400E+00, 0.3154500E+00, 0.3893800E+00, 0.4570400E+00, &
     & 0.4195900E+00, 0.5055897E+00, 0.4660657E+00, 0.4660657E+00 /
      data (ref_adm(35,iz,25,12),iz = 1,20) / &
     & 0.4496500E+00, 0.4496500E+00, 0.4333700E+00, 0.4450400E+00, &
     & 0.4615800E+00, 0.4520700E+00, 0.4567600E+00, 0.4490800E+00, &
     & 0.4328000E+00, 0.3776000E+00, 0.4131300E+00, 0.4901200E+00, &
     & 0.4776000E+00, 0.3984000E+00, 0.3928900E+00, 0.4669600E+00, &
     & 0.4240700E+00, 0.4761800E+00, 0.4668922E+00, 0.4668922E+00 /
      data (ref_adm(35,iz,26,12),iz = 1,20) / &
     & 0.4311500E+00, 0.4311500E+00, 0.4527000E+00, 0.4621600E+00, &
     & 0.4763000E+00, 0.4845600E+00, 0.4907500E+00, 0.4970900E+00, &
     & 0.4925200E+00, 0.4927500E+00, 0.4837100E+00, 0.4823700E+00, &
     & 0.4809200E+00, 0.5135700E+00, 0.4556400E+00, 0.4758700E+00, &
     & 0.3769700E+00, 0.3150000E+00, 0.4708482E+00, 0.4708482E+00 /
      data (ref_adm(35,iz,27,12),iz = 1,20) / &
     & 0.4515300E+00, 0.4515300E+00, 0.4243700E+00, 0.4304900E+00, &
     & 0.4242300E+00, 0.4392800E+00, 0.4458300E+00, 0.4904700E+00, &
     & 0.5100800E+00, 0.5250300E+00, 0.5363900E+00, 0.5412400E+00, &
     & 0.5324800E+00, 0.5190800E+00, 0.4841100E+00, 0.4943600E+00, &
     & 0.4464400E+00, 0.4980834E+00, 0.4776511E+00, 0.4776511E+00 /
      data (ref_adm(35,iz,28,12),iz = 1,20) / &
     & 0.4336100E+00, 0.4336100E+00, 0.4366900E+00, 0.4483700E+00, &
     & 0.4514600E+00, 0.4470800E+00, 0.4465200E+00, 0.4572100E+00, &
     & 0.4674800E+00, 0.4478300E+00, 0.4241900E+00, 0.4339400E+00, &
     & 0.4869600E+00, 0.4901200E+00, 0.4897700E+00, 0.5062800E+00, &
     & 0.4688700E+00, 0.5006885E+00, 0.4867259E+00, 0.4867259E+00 /
      data (ref_adm(35,iz,29,12),iz = 1,20) / &
     & 0.4473000E+00, 0.4473000E+00, 0.4492100E+00, 0.4484300E+00, &
     & 0.4638800E+00, 0.4512000E+00, 0.4422100E+00, 0.4485400E+00, &
     & 0.4429600E+00, 0.4500300E+00, 0.4203800E+00, 0.4009300E+00, &
     & 0.4422000E+00, 0.4308100E+00, 0.4571300E+00, 0.5367500E+00, &
     & 0.4840200E+00, 0.5066803E+00, 0.4958140E+00, 0.4958140E+00 /
      data (ref_adm(35,iz,30,12),iz = 1,20) / &
     & 0.4599600E+00, 0.4599600E+00, 0.4552100E+00, 0.4516200E+00, &
     & 0.4573500E+00, 0.4738800E+00, 0.4572000E+00, 0.4385900E+00, &
     & 0.4504600E+00, 0.4289500E+00, 0.3884400E+00, 0.4319400E+00, &
     & 0.4371800E+00, 0.4111700E+00, 0.4869700E+00, 0.5184100E+00, &
     & 0.4535100E+00, 0.5146444E+00, 0.5072302E+00, 0.5072302E+00 /
      data (ref_adm(35,iz,31,12),iz = 1,20) / &
     & 0.4744700E+00, 0.4744700E+00, 0.4877100E+00, 0.4837600E+00, &
     & 0.4796100E+00, 0.4835200E+00, 0.5059600E+00, 0.4898400E+00, &
     & 0.4957200E+00, 0.4980600E+00, 0.4944200E+00, 0.5045300E+00, &
     & 0.5147600E+00, 0.5092000E+00, 0.5309000E+00, 0.5632700E+00, &
     & 0.5320100E+00, 0.4392800E+00, 0.3265300E+00, 0.3265300E+00 /
      data (ref_adm(35,iz,32,12),iz = 1,20) / &
     & 0.4647100E+00, 0.4647100E+00, 0.4456700E+00, 0.4355800E+00, &
     & 0.4291100E+00, 0.4494600E+00, 0.4518700E+00, 0.4548400E+00, &
     & 0.4413400E+00, 0.4538000E+00, 0.4614600E+00, 0.4566600E+00, &
     & 0.4866900E+00, 0.4640700E+00, 0.5018800E+00, 0.5733800E+00, &
     & 0.5828000E+00, 0.5366788E+00, 0.3608100E+00, 0.3608100E+00 /
      data (ref_adm(35,iz,33,12),iz = 1,20) / &
     & 0.4245200E+00, 0.4245200E+00, 0.4277100E+00, 0.4545700E+00, &
     & 0.4551500E+00, 0.4552000E+00, 0.4367500E+00, 0.4813600E+00, &
     & 0.4893200E+00, 0.4941200E+00, 0.5408900E+00, 0.5180300E+00, &
     & 0.4838000E+00, 0.5025000E+00, 0.5309000E+00, 0.5710200E+00, &
     & 0.5535700E+00, 0.5476952E+00, 0.5422446E+00, 0.5422446E+00 /
      data (ref_adm(35,iz,34,12),iz = 1,20) / &
     & 0.4178000E+00, 0.4178000E+00, 0.4410300E+00, 0.4604300E+00, &
     & 0.4585700E+00, 0.4461300E+00, 0.4441400E+00, 0.4859300E+00, &
     & 0.4984600E+00, 0.4943400E+00, 0.5303000E+00, 0.5360400E+00, &
     & 0.5284100E+00, 0.5092200E+00, 0.5618400E+00, 0.5781700E+00, &
     & 0.5430400E+00, 0.5579978E+00, 0.5517097E+00, 0.5517097E+00 /
      data (ref_adm(35,iz,35,12),iz = 1,20) / &
     & 0.4375900E+00, 0.4375900E+00, 0.4597300E+00, 0.4513000E+00, &
     & 0.4378900E+00, 0.4533000E+00, 0.4842100E+00, 0.4815400E+00, &
     & 0.4870900E+00, 0.5048400E+00, 0.5195000E+00, 0.5596300E+00, &
     & 0.5609200E+00, 0.5684700E+00, 0.5386700E+00, 0.5955900E+00, &
     & 0.6512000E+00, 0.5627350E+00, 0.5599765E+00, 0.5599765E+00 /
      data (ref_adm(35,iz,36,12),iz = 1,20) / &
     & 0.4729500E+00, 0.4729500E+00, 0.4530400E+00, 0.4496900E+00, &
     & 0.4606000E+00, 0.4644000E+00, 0.4799600E+00, 0.4783500E+00, &
     & 0.4955800E+00, 0.5260500E+00, 0.5248200E+00, 0.5392500E+00, &
     & 0.5683100E+00, 0.5731000E+00, 0.5476800E+00, 0.5499700E+00, &
     & 0.5480630E+00, 0.5616825E+00, 0.5657290E+00, 0.5657290E+00 /
      data (ref_adm(35,iz,37,12),iz = 1,20) / &
     & 0.4406000E+00, 0.4406000E+00, 0.4507000E+00, 0.4488000E+00, &
     & 0.4776200E+00, 0.4780600E+00, 0.4658600E+00, 0.4607600E+00, &
     & 0.5002300E+00, 0.5294400E+00, 0.5392400E+00, 0.5501600E+00, &
     & 0.5786500E+00, 0.5742600E+00, 0.5741100E+00, 0.5741800E+00, &
     & 0.4891200E+00, 0.5598624E+00, 0.5692436E+00, 0.5692436E+00 /
      data (ref_adm(35,iz,38,12),iz = 1,20) / &
     & 0.4406000E+00, 0.4406000E+00, 0.4507000E+00, 0.4488000E+00, &
     & 0.4776200E+00, 0.4780600E+00, 0.4658600E+00, 0.4607600E+00, &
     & 0.5002300E+00, 0.5294400E+00, 0.5392400E+00, 0.5501600E+00, &
     & 0.5786500E+00, 0.5742600E+00, 0.5741100E+00, 0.5741800E+00, &
     & 0.4891200E+00, 0.5598624E+00, 0.5692436E+00, 0.5692436E+00 /
! Solar Zenith Angle 60.0 Albedo  0.4462425E+00
      data (ref_adm(35,iz, 1,13),iz = 1,20) / &
     & 0.3812100E+00, 0.3812100E+00, 0.3978700E+00, 0.4060100E+00, &
     & 0.4182100E+00, 0.4468000E+00, 0.4464500E+00, 0.3992700E+00, &
     & 0.4436600E+00, 0.4523500E+00, 0.4578400E+00, 0.4313600E+00, &
     & 0.4532900E+00, 0.5513700E+00, 0.5632600E+00, 0.5252500E+00, &
     & 0.7012500E+00, 0.7016400E+00, 0.6080801E+00, 0.6080801E+00 /
      data (ref_adm(35,iz, 2,13),iz = 1,20) / &
     & 0.3812100E+00, 0.3812100E+00, 0.3978700E+00, 0.4060100E+00, &
     & 0.4182100E+00, 0.4468000E+00, 0.4464500E+00, 0.3992700E+00, &
     & 0.4436600E+00, 0.4523500E+00, 0.4578400E+00, 0.4313600E+00, &
     & 0.4532900E+00, 0.5513700E+00, 0.5632600E+00, 0.5252500E+00, &
     & 0.7012500E+00, 0.7016400E+00, 0.6080801E+00, 0.6080801E+00 /
      data (ref_adm(35,iz, 3,13),iz = 1,20) / &
     & 0.3952700E+00, 0.3952700E+00, 0.4085900E+00, 0.4135100E+00, &
     & 0.4362000E+00, 0.4196100E+00, 0.4081600E+00, 0.4417600E+00, &
     & 0.4384500E+00, 0.4596000E+00, 0.4600900E+00, 0.4273600E+00, &
     & 0.4738900E+00, 0.5008600E+00, 0.5119000E+00, 0.5694500E+00, &
     & 0.5922500E+00, 0.6801300E+00, 0.3056608E+00, 0.3056608E+00 /
      data (ref_adm(35,iz, 4,13),iz = 1,20) / &
     & 0.3961000E+00, 0.3961000E+00, 0.4226800E+00, 0.4180800E+00, &
     & 0.4079400E+00, 0.3985700E+00, 0.4145700E+00, 0.4488000E+00, &
     & 0.4519800E+00, 0.4590200E+00, 0.4635100E+00, 0.5026000E+00, &
     & 0.4601400E+00, 0.4853800E+00, 0.4468500E+00, 0.5310800E+00, &
     & 0.5413200E+00, 0.7484900E+00, 0.5782600E+00, 0.5782600E+00 /
      data (ref_adm(35,iz, 5,13),iz = 1,20) / &
     & 0.4030000E+00, 0.4030000E+00, 0.4062800E+00, 0.4067700E+00, &
     & 0.4082000E+00, 0.4055900E+00, 0.4075800E+00, 0.4390900E+00, &
     & 0.4543800E+00, 0.4970200E+00, 0.4990100E+00, 0.4685700E+00, &
     & 0.4801900E+00, 0.5321800E+00, 0.5092100E+00, 0.4670500E+00, &
     & 0.4522600E+00, 0.5548900E+00, 0.5971700E+00, 0.5971700E+00 /
      data (ref_adm(35,iz, 6,13),iz = 1,20) / &
     & 0.4212800E+00, 0.4212800E+00, 0.4284900E+00, 0.4215000E+00, &
     & 0.4069100E+00, 0.4026100E+00, 0.4162500E+00, 0.4402100E+00, &
     & 0.4610800E+00, 0.4783900E+00, 0.4869000E+00, 0.4772800E+00, &
     & 0.5023300E+00, 0.5182200E+00, 0.4951900E+00, 0.4314700E+00, &
     & 0.4188400E+00, 0.6319832E+00, 0.5668460E+00, 0.5668460E+00 /
      data (ref_adm(35,iz, 7,13),iz = 1,20) / &
     & 0.4314500E+00, 0.4314500E+00, 0.4188600E+00, 0.4052700E+00, &
     & 0.4032100E+00, 0.4097800E+00, 0.4221500E+00, 0.4218700E+00, &
     & 0.4463600E+00, 0.4529700E+00, 0.4627300E+00, 0.4958300E+00, &
     & 0.5045200E+00, 0.5290000E+00, 0.5574600E+00, 0.5588400E+00, &
     & 0.5931400E+00, 0.5576200E+00, 0.5529876E+00, 0.5529876E+00 /
      data (ref_adm(35,iz, 8,13),iz = 1,20) / &
     & 0.4225100E+00, 0.4225100E+00, 0.4177500E+00, 0.4186800E+00, &
     & 0.4299000E+00, 0.4401800E+00, 0.4428500E+00, 0.4473600E+00, &
     & 0.4618200E+00, 0.4731500E+00, 0.4821000E+00, 0.5094700E+00, &
     & 0.5382300E+00, 0.5404400E+00, 0.5557600E+00, 0.5656300E+00, &
     & 0.5478200E+00, 0.4624300E+00, 0.5310758E+00, 0.5310758E+00 /
      data (ref_adm(35,iz, 9,13),iz = 1,20) / &
     & 0.3997300E+00, 0.3997300E+00, 0.3914200E+00, 0.3889400E+00, &
     & 0.3867600E+00, 0.3912600E+00, 0.3888500E+00, 0.3982600E+00, &
     & 0.4010600E+00, 0.4092800E+00, 0.4225400E+00, 0.4369700E+00, &
     & 0.4670600E+00, 0.4663700E+00, 0.5173300E+00, 0.4391100E+00, &
     & 0.4357500E+00, 0.4593200E+00, 0.5075542E+00, 0.5075542E+00 /
      data (ref_adm(35,iz,10,13),iz = 1,20) / &
     & 0.3927100E+00, 0.3927100E+00, 0.3840600E+00, 0.3888400E+00, &
     & 0.3858600E+00, 0.3840300E+00, 0.3923200E+00, 0.3995900E+00, &
     & 0.4033700E+00, 0.4029100E+00, 0.4106900E+00, 0.4161000E+00, &
     & 0.3855400E+00, 0.4936700E+00, 0.5399400E+00, 0.4858600E+00, &
     & 0.6609500E+00, 0.6736000E+00, 0.4890819E+00, 0.4890819E+00 /
      data (ref_adm(35,iz,11,13),iz = 1,20) / &
     & 0.3922600E+00, 0.3922600E+00, 0.3886600E+00, 0.3938900E+00, &
     & 0.3957500E+00, 0.3857800E+00, 0.3765700E+00, 0.3751100E+00, &
     & 0.3961500E+00, 0.4057600E+00, 0.4168500E+00, 0.4440000E+00, &
     & 0.4070500E+00, 0.4528500E+00, 0.5477600E+00, 0.4947700E+00, &
     & 0.4281800E+00, 0.4799800E+00, 0.4743864E+00, 0.4743864E+00 /
      data (ref_adm(35,iz,12,13),iz = 1,20) / &
     & 0.3842900E+00, 0.3842900E+00, 0.3845900E+00, 0.4015100E+00, &
     & 0.3925300E+00, 0.3884100E+00, 0.3789800E+00, 0.3951500E+00, &
     & 0.3891100E+00, 0.3787000E+00, 0.4310300E+00, 0.4590500E+00, &
     & 0.4244400E+00, 0.4151500E+00, 0.4407800E+00, 0.3662700E+00, &
     & 0.3445500E+00, 0.5272136E+00, 0.4630127E+00, 0.4630127E+00 /
      data (ref_adm(35,iz,13,13),iz = 1,20) / &
     & 0.3684500E+00, 0.3684500E+00, 0.3784600E+00, 0.4055200E+00, &
     & 0.3947600E+00, 0.3818600E+00, 0.3973200E+00, 0.4002500E+00, &
     & 0.4010900E+00, 0.4170100E+00, 0.4677400E+00, 0.4586100E+00, &
     & 0.4275600E+00, 0.4631000E+00, 0.4830900E+00, 0.4632700E+00, &
     & 0.3965000E+00, 0.5188285E+00, 0.4533332E+00, 0.4533332E+00 /
      data (ref_adm(35,iz,14,13),iz = 1,20) / &
     & 0.3948000E+00, 0.3948000E+00, 0.3957500E+00, 0.3953000E+00, &
     & 0.3906300E+00, 0.3905400E+00, 0.3904900E+00, 0.3939500E+00, &
     & 0.3972100E+00, 0.4070700E+00, 0.4022000E+00, 0.4063800E+00, &
     & 0.4040100E+00, 0.4671900E+00, 0.4962400E+00, 0.6340300E+00, &
     & 0.5026900E+00, 0.5099451E+00, 0.4446376E+00, 0.4446376E+00 /
      data (ref_adm(35,iz,15,13),iz = 1,20) / &
     & 0.4074300E+00, 0.4074300E+00, 0.4404500E+00, 0.4307700E+00, &
     & 0.4245800E+00, 0.4216600E+00, 0.4164400E+00, 0.4302400E+00, &
     & 0.4149700E+00, 0.4013300E+00, 0.3830000E+00, 0.3577900E+00, &
     & 0.3578900E+00, 0.3694500E+00, 0.4792400E+00, 0.5009300E+00, &
     & 0.5444500E+00, 0.5389200E+00, 0.4356247E+00, 0.4356247E+00 /
      data (ref_adm(35,iz,16,13),iz = 1,20) / &
     & 0.4093200E+00, 0.4093200E+00, 0.4125900E+00, 0.4244500E+00, &
     & 0.4014000E+00, 0.4007700E+00, 0.3948600E+00, 0.4069100E+00, &
     & 0.3973900E+00, 0.4222400E+00, 0.4417800E+00, 0.4301000E+00, &
     & 0.4476500E+00, 0.4143700E+00, 0.4528600E+00, 0.5010900E+00, &
     & 0.5254200E+00, 0.5002900E+00, 0.4249216E+00, 0.4249216E+00 /
      data (ref_adm(35,iz,17,13),iz = 1,20) / &
     & 0.4110500E+00, 0.4110500E+00, 0.4217900E+00, 0.4056300E+00, &
     & 0.3829200E+00, 0.3874700E+00, 0.3924800E+00, 0.4157700E+00, &
     & 0.4379700E+00, 0.4208300E+00, 0.4411400E+00, 0.4080900E+00, &
     & 0.4535900E+00, 0.4221100E+00, 0.4537300E+00, 0.6088200E+00, &
     & 0.5064200E+00, 0.4756981E+00, 0.4154735E+00, 0.4154735E+00 /
      data (ref_adm(35,iz,18,13),iz = 1,20) / &
     & 0.4218100E+00, 0.4218100E+00, 0.4264200E+00, 0.4220300E+00, &
     & 0.4021200E+00, 0.4040200E+00, 0.4021700E+00, 0.4059800E+00, &
     & 0.4033200E+00, 0.4200500E+00, 0.4127400E+00, 0.4066600E+00, &
     & 0.3985000E+00, 0.3827000E+00, 0.4436800E+00, 0.5528700E+00, &
     & 0.4572970E+00, 0.4391209E+00, 0.3716714E+00, 0.3716714E+00 /
      data (ref_adm(35,iz,19,13),iz = 1,20) / &
     & 0.4039400E+00, 0.4039400E+00, 0.4079500E+00, 0.4124400E+00, &
     & 0.4120700E+00, 0.3928000E+00, 0.3989400E+00, 0.4109900E+00, &
     & 0.4174500E+00, 0.4319000E+00, 0.4174400E+00, 0.4122000E+00, &
     & 0.3918400E+00, 0.3701000E+00, 0.4157000E+00, 0.5111900E+00, &
     & 0.4494288E+00, 0.4316552E+00, 0.3661191E+00, 0.3661191E+00 /
      data (ref_adm(35,iz,20,13),iz = 1,20) / &
     & 0.4191700E+00, 0.4191700E+00, 0.4114300E+00, 0.4115900E+00, &
     & 0.3979200E+00, 0.4100900E+00, 0.4150000E+00, 0.4183900E+00, &
     & 0.4298900E+00, 0.4552900E+00, 0.4503800E+00, 0.4575900E+00, &
     & 0.4523900E+00, 0.4135100E+00, 0.3860000E+00, 0.4683100E+00, &
     & 0.4420953E+00, 0.4242991E+00, 0.3622844E+00, 0.3622844E+00 /
      data (ref_adm(35,iz,21,13),iz = 1,20) / &
     & 0.4111200E+00, 0.4111200E+00, 0.3872900E+00, 0.4013500E+00, &
     & 0.4104000E+00, 0.4039200E+00, 0.3976600E+00, 0.4301700E+00, &
     & 0.4121600E+00, 0.4333200E+00, 0.4667100E+00, 0.4827900E+00, &
     & 0.4712200E+00, 0.4456200E+00, 0.4110100E+00, 0.4703100E+00, &
     & 0.4349809E+00, 0.4169783E+00, 0.3589782E+00, 0.3589782E+00 /
      data (ref_adm(35,iz,22,13),iz = 1,20) / &
     & 0.4058800E+00, 0.4058800E+00, 0.3867100E+00, 0.3874700E+00, &
     & 0.3805400E+00, 0.3824200E+00, 0.3910800E+00, 0.4172500E+00, &
     & 0.4341800E+00, 0.4373400E+00, 0.4568200E+00, 0.4723700E+00, &
     & 0.4376600E+00, 0.4381100E+00, 0.3867900E+00, 0.3623700E+00, &
     & 0.5643466E+00, 0.5942832E+00, 0.6209205E+00, 0.6209205E+00 /
      data (ref_adm(35,iz,23,13),iz = 1,20) / &
     & 0.4178600E+00, 0.4178600E+00, 0.4021400E+00, 0.3791700E+00, &
     & 0.3903600E+00, 0.3999700E+00, 0.3995000E+00, 0.4059500E+00, &
     & 0.4110200E+00, 0.3983200E+00, 0.3895200E+00, 0.4477100E+00, &
     & 0.4231900E+00, 0.4140100E+00, 0.3820800E+00, 0.3410700E+00, &
     & 0.5532898E+00, 0.5836080E+00, 0.6215572E+00, 0.6215572E+00 /
      data (ref_adm(35,iz,24,13),iz = 1,20) / &
     & 0.4157900E+00, 0.4157900E+00, 0.4137300E+00, 0.4002200E+00, &
     & 0.4112500E+00, 0.4163000E+00, 0.4113500E+00, 0.4191300E+00, &
     & 0.4126400E+00, 0.4042400E+00, 0.4326800E+00, 0.4405000E+00, &
     & 0.3963700E+00, 0.3762200E+00, 0.3430700E+00, 0.3562800E+00, &
     & 0.3957500E+00, 0.5771776E+00, 0.6271297E+00, 0.6271297E+00 /
      data (ref_adm(35,iz,25,13),iz = 1,20) / &
     & 0.4433700E+00, 0.4433700E+00, 0.4063400E+00, 0.3947000E+00, &
     & 0.4060000E+00, 0.4061100E+00, 0.4185700E+00, 0.4263400E+00, &
     & 0.4381900E+00, 0.4469300E+00, 0.4692900E+00, 0.4709500E+00, &
     & 0.4495900E+00, 0.4552200E+00, 0.3547500E+00, 0.4045100E+00, &
     & 0.3600200E+00, 0.3343200E+00, 0.6359366E+00, 0.6359366E+00 /
      data (ref_adm(35,iz,26,13),iz = 1,20) / &
     & 0.3905400E+00, 0.3905400E+00, 0.4092200E+00, 0.4158800E+00, &
     & 0.4262900E+00, 0.4247900E+00, 0.4264100E+00, 0.4266500E+00, &
     & 0.4336700E+00, 0.4517600E+00, 0.4673200E+00, 0.4803600E+00, &
     & 0.4587800E+00, 0.4685600E+00, 0.4180600E+00, 0.4097600E+00, &
     & 0.3659500E+00, 0.3778200E+00, 0.6509018E+00, 0.6509018E+00 /
      data (ref_adm(35,iz,27,13),iz = 1,20) / &
     & 0.4091200E+00, 0.4091200E+00, 0.4180500E+00, 0.4111300E+00, &
     & 0.4333600E+00, 0.4279300E+00, 0.4079400E+00, 0.4180000E+00, &
     & 0.4340200E+00, 0.4472800E+00, 0.4750700E+00, 0.5118500E+00, &
     & 0.5364800E+00, 0.5469200E+00, 0.5213600E+00, 0.3963900E+00, &
     & 0.4308300E+00, 0.2943200E+00, 0.6697701E+00, 0.6697701E+00 /
      data (ref_adm(35,iz,28,13),iz = 1,20) / &
     & 0.3912800E+00, 0.3912800E+00, 0.3890500E+00, 0.4185900E+00, &
     & 0.4336900E+00, 0.4325200E+00, 0.4201000E+00, 0.4239000E+00, &
     & 0.4413700E+00, 0.4589800E+00, 0.4707800E+00, 0.4014900E+00, &
     & 0.4208900E+00, 0.4571900E+00, 0.4415900E+00, 0.4156500E+00, &
     & 0.4121200E+00, 0.5909693E+00, 0.4186600E+00, 0.4186600E+00 /
      data (ref_adm(35,iz,29,13),iz = 1,20) / &
     & 0.4102700E+00, 0.4102700E+00, 0.3871700E+00, 0.3859500E+00, &
     & 0.4061400E+00, 0.4472000E+00, 0.4342800E+00, 0.4255200E+00, &
     & 0.4647200E+00, 0.4418000E+00, 0.4602400E+00, 0.4450000E+00, &
     & 0.4100800E+00, 0.4047500E+00, 0.4324000E+00, 0.3855300E+00, &
     & 0.4586500E+00, 0.6034649E+00, 0.7138819E+00, 0.7138819E+00 /
      data (ref_adm(35,iz,30,13),iz = 1,20) / &
     & 0.3823500E+00, 0.3823500E+00, 0.3962400E+00, 0.4101500E+00, &
     & 0.4132500E+00, 0.4227100E+00, 0.4486100E+00, 0.4297600E+00, &
     & 0.4421900E+00, 0.4334600E+00, 0.4533000E+00, 0.4088600E+00, &
     & 0.4557700E+00, 0.4877200E+00, 0.4671400E+00, 0.4480800E+00, &
     & 0.4158800E+00, 0.6191617E+00, 0.7386950E+00, 0.7386950E+00 /
      data (ref_adm(35,iz,31,13),iz = 1,20) / &
     & 0.3982100E+00, 0.3982100E+00, 0.4242100E+00, 0.4386300E+00, &
     & 0.4437500E+00, 0.4445800E+00, 0.4537300E+00, 0.4669900E+00, &
     & 0.4651400E+00, 0.4739600E+00, 0.4972500E+00, 0.4531500E+00, &
     & 0.4441100E+00, 0.4615200E+00, 0.4907100E+00, 0.4635700E+00, &
     & 0.4717900E+00, 0.4510600E+00, 0.7648913E+00, 0.7648913E+00 /
      data (ref_adm(35,iz,32,13),iz = 1,20) / &
     & 0.4229000E+00, 0.4229000E+00, 0.4265600E+00, 0.4215000E+00, &
     & 0.4249900E+00, 0.4166500E+00, 0.4289000E+00, 0.4475000E+00, &
     & 0.4566300E+00, 0.4570300E+00, 0.4703900E+00, 0.4622000E+00, &
     & 0.4510100E+00, 0.4911400E+00, 0.5153700E+00, 0.5080500E+00, &
     & 0.4518200E+00, 0.6542163E+00, 0.7894371E+00, 0.7894371E+00 /
      data (ref_adm(35,iz,33,13),iz = 1,20) / &
     & 0.4228700E+00, 0.4228700E+00, 0.4162800E+00, 0.4243500E+00, &
     & 0.4311800E+00, 0.4327400E+00, 0.4335900E+00, 0.4559600E+00, &
     & 0.4635600E+00, 0.4759400E+00, 0.4636800E+00, 0.4849400E+00, &
     & 0.4995600E+00, 0.5463300E+00, 0.5332300E+00, 0.4783200E+00, &
     & 0.4463800E+00, 0.6654736E+00, 0.8124210E+00, 0.8124210E+00 /
      data (ref_adm(35,iz,34,13),iz = 1,20) / &
     & 0.3965300E+00, 0.3965300E+00, 0.3958400E+00, 0.4243000E+00, &
     & 0.4323100E+00, 0.4347600E+00, 0.4153600E+00, 0.4037400E+00, &
     & 0.4353000E+00, 0.4629300E+00, 0.4692000E+00, 0.4756600E+00, &
     & 0.5207600E+00, 0.5264900E+00, 0.5483300E+00, 0.4667000E+00, &
     & 0.5268700E+00, 0.6611937E+00, 0.8247103E+00, 0.8247103E+00 /
      data (ref_adm(35,iz,35,13),iz = 1,20) / &
     & 0.3767200E+00, 0.3767200E+00, 0.4021500E+00, 0.4197300E+00, &
     & 0.4461800E+00, 0.4356200E+00, 0.4106300E+00, 0.4062700E+00, &
     & 0.4360900E+00, 0.4523900E+00, 0.4901600E+00, 0.4869100E+00, &
     & 0.5459300E+00, 0.5221100E+00, 0.5565100E+00, 0.4934500E+00, &
     & 0.6565900E+00, 0.6558408E+00, 0.8289779E+00, 0.8289779E+00 /
      data (ref_adm(35,iz,36,13),iz = 1,20) / &
     & 0.4192700E+00, 0.4192700E+00, 0.4230800E+00, 0.4331900E+00, &
     & 0.4222300E+00, 0.4141700E+00, 0.4378100E+00, 0.4471800E+00, &
     & 0.4500800E+00, 0.4570100E+00, 0.4783900E+00, 0.5232400E+00, &
     & 0.5261300E+00, 0.5002500E+00, 0.5364400E+00, 0.5513300E+00, &
     & 0.6534600E+00, 0.6576025E+00, 0.8315854E+00, 0.8315854E+00 /
      data (ref_adm(35,iz,37,13),iz = 1,20) / &
     & 0.4089700E+00, 0.4089700E+00, 0.4250800E+00, 0.4367500E+00, &
     & 0.4090800E+00, 0.4087900E+00, 0.4333300E+00, 0.4697100E+00, &
     & 0.4560500E+00, 0.4326800E+00, 0.5075800E+00, 0.5324000E+00, &
     & 0.5671100E+00, 0.5227400E+00, 0.5873300E+00, 0.5925400E+00, &
     & 0.6514000E+00, 0.6620802E+00, 0.8340191E+00, 0.8340191E+00 /
      data (ref_adm(35,iz,38,13),iz = 1,20) / &
     & 0.4089700E+00, 0.4089700E+00, 0.4250800E+00, 0.4367500E+00, &
     & 0.4090800E+00, 0.4087900E+00, 0.4333300E+00, 0.4697100E+00, &
     & 0.4560500E+00, 0.4326800E+00, 0.5075800E+00, 0.5324000E+00, &
     & 0.5671100E+00, 0.5227400E+00, 0.5873300E+00, 0.5925400E+00, &
     & 0.6514000E+00, 0.6620802E+00, 0.8340191E+00, 0.8340191E+00 /
! Solar Zenith Angle 65.0 Albedo  0.4574586E+00
      data (ref_adm(35,iz, 1,14),iz = 1,20) / &
     & 0.3811500E+00, 0.3811500E+00, 0.3907900E+00, 0.4097500E+00, &
     & 0.4168000E+00, 0.4275800E+00, 0.4258700E+00, 0.4394500E+00, &
     & 0.4330500E+00, 0.4546300E+00, 0.4828400E+00, 0.4749700E+00, &
     & 0.5058400E+00, 0.4933800E+00, 0.5765800E+00, 0.7174900E+00, &
     & 0.5504100E+00, 0.7689641E+00, 0.7815594E+00, 0.7815594E+00 /
      data (ref_adm(35,iz, 2,14),iz = 1,20) / &
     & 0.3811500E+00, 0.3811500E+00, 0.3907900E+00, 0.4097500E+00, &
     & 0.4168000E+00, 0.4275800E+00, 0.4258700E+00, 0.4394500E+00, &
     & 0.4330500E+00, 0.4546300E+00, 0.4828400E+00, 0.4749700E+00, &
     & 0.5058400E+00, 0.4933800E+00, 0.5765800E+00, 0.7174900E+00, &
     & 0.5504100E+00, 0.7689641E+00, 0.7815594E+00, 0.7815594E+00 /
      data (ref_adm(35,iz, 3,14),iz = 1,20) / &
     & 0.4048700E+00, 0.4048700E+00, 0.4192500E+00, 0.4139000E+00, &
     & 0.4102300E+00, 0.4229700E+00, 0.4279600E+00, 0.4234700E+00, &
     & 0.4510200E+00, 0.4600100E+00, 0.4733300E+00, 0.5006200E+00, &
     & 0.4872100E+00, 0.5060800E+00, 0.5174700E+00, 0.6942300E+00, &
     & 0.8577000E+00, 0.7580879E+00, 0.3555269E+00, 0.3555269E+00 /
      data (ref_adm(35,iz, 4,14),iz = 1,20) / &
     & 0.4097100E+00, 0.4097100E+00, 0.4037700E+00, 0.3910300E+00, &
     & 0.4019400E+00, 0.4077500E+00, 0.4268500E+00, 0.4324500E+00, &
     & 0.4467500E+00, 0.4495800E+00, 0.4685100E+00, 0.5103600E+00, &
     & 0.5204900E+00, 0.5323800E+00, 0.5110600E+00, 0.6359800E+00, &
     & 0.7229100E+00, 0.7390053E+00, 0.7275292E+00, 0.7275292E+00 /
      data (ref_adm(35,iz, 5,14),iz = 1,20) / &
     & 0.3936700E+00, 0.3936700E+00, 0.4048900E+00, 0.4089500E+00, &
     & 0.4114300E+00, 0.4101900E+00, 0.4155400E+00, 0.4362400E+00, &
     & 0.4441600E+00, 0.4515800E+00, 0.4747400E+00, 0.4918300E+00, &
     & 0.5300800E+00, 0.5191100E+00, 0.5283700E+00, 0.5567200E+00, &
     & 0.5461200E+00, 0.7798800E+00, 0.6868988E+00, 0.6868988E+00 /
      data (ref_adm(35,iz, 6,14),iz = 1,20) / &
     & 0.3999700E+00, 0.3999700E+00, 0.4060700E+00, 0.4061500E+00, &
     & 0.4124800E+00, 0.4174300E+00, 0.4227600E+00, 0.4388100E+00, &
     & 0.4251100E+00, 0.4454400E+00, 0.4709000E+00, 0.4721800E+00, &
     & 0.4877100E+00, 0.4901200E+00, 0.5083100E+00, 0.4927200E+00, &
     & 0.4356800E+00, 0.7003715E+00, 0.6517251E+00, 0.6517251E+00 /
      data (ref_adm(35,iz, 7,14),iz = 1,20) / &
     & 0.4070100E+00, 0.4070100E+00, 0.4029700E+00, 0.4049600E+00, &
     & 0.4129500E+00, 0.4117000E+00, 0.4271000E+00, 0.4309600E+00, &
     & 0.4309100E+00, 0.4501900E+00, 0.4625900E+00, 0.4793600E+00, &
     & 0.4977500E+00, 0.5070500E+00, 0.5286500E+00, 0.5548200E+00, &
     & 0.6132200E+00, 0.6797703E+00, 0.6277846E+00, 0.6277846E+00 /
      data (ref_adm(35,iz, 8,14),iz = 1,20) / &
     & 0.4127500E+00, 0.4127500E+00, 0.3904700E+00, 0.3807400E+00, &
     & 0.3977700E+00, 0.4200800E+00, 0.4239900E+00, 0.4286700E+00, &
     & 0.4437900E+00, 0.4690600E+00, 0.4731400E+00, 0.4496700E+00, &
     & 0.4740900E+00, 0.4833300E+00, 0.4710600E+00, 0.5261600E+00, &
     & 0.5709000E+00, 0.6501448E+00, 0.6082296E+00, 0.6082296E+00 /
      data (ref_adm(35,iz, 9,14),iz = 1,20) / &
     & 0.4042400E+00, 0.4042400E+00, 0.3826300E+00, 0.3982300E+00, &
     & 0.3994000E+00, 0.4066900E+00, 0.4080000E+00, 0.4289900E+00, &
     & 0.4676300E+00, 0.4573500E+00, 0.4529300E+00, 0.4683100E+00, &
     & 0.4743700E+00, 0.4840400E+00, 0.4462400E+00, 0.4320800E+00, &
     & 0.4789000E+00, 0.6166847E+00, 0.5791992E+00, 0.5791992E+00 /
      data (ref_adm(35,iz,10,14),iz = 1,20) / &
     & 0.4074000E+00, 0.4074000E+00, 0.4126000E+00, 0.4218800E+00, &
     & 0.4101500E+00, 0.4137100E+00, 0.4210900E+00, 0.4449000E+00, &
     & 0.4557000E+00, 0.4574800E+00, 0.4563400E+00, 0.4722800E+00, &
     & 0.4680200E+00, 0.4530600E+00, 0.4230500E+00, 0.5068200E+00, &
     & 0.5248000E+00, 0.5808700E+00, 0.5483089E+00, 0.5483089E+00 /
      data (ref_adm(35,iz,11,14),iz = 1,20) / &
     & 0.3967400E+00, 0.3967400E+00, 0.4043800E+00, 0.4095100E+00, &
     & 0.4154900E+00, 0.4151400E+00, 0.4237200E+00, 0.4369600E+00, &
     & 0.4420400E+00, 0.4566300E+00, 0.4451600E+00, 0.4577700E+00, &
     & 0.4691400E+00, 0.4901200E+00, 0.4721700E+00, 0.4288500E+00, &
     & 0.5941200E+00, 0.5280600E+00, 0.5251643E+00, 0.5251643E+00 /
      data (ref_adm(35,iz,12,14),iz = 1,20) / &
     & 0.3958800E+00, 0.3958800E+00, 0.3860700E+00, 0.4071200E+00, &
     & 0.4069200E+00, 0.4150100E+00, 0.4381700E+00, 0.4338600E+00, &
     & 0.4387400E+00, 0.4400800E+00, 0.4508100E+00, 0.4355300E+00, &
     & 0.4140600E+00, 0.4637600E+00, 0.5133100E+00, 0.4778200E+00, &
     & 0.5728200E+00, 0.5586412E+00, 0.5084926E+00, 0.5084926E+00 /
      data (ref_adm(35,iz,13,14),iz = 1,20) / &
     & 0.3933200E+00, 0.3933200E+00, 0.3827200E+00, 0.4007300E+00, &
     & 0.4098300E+00, 0.4155500E+00, 0.4325900E+00, 0.4540400E+00, &
     & 0.4209600E+00, 0.4295800E+00, 0.4180400E+00, 0.4397000E+00, &
     & 0.4242900E+00, 0.4697900E+00, 0.5079100E+00, 0.5110300E+00, &
     & 0.6019500E+00, 0.5479807E+00, 0.4950162E+00, 0.4950162E+00 /
      data (ref_adm(35,iz,14,14),iz = 1,20) / &
     & 0.3831600E+00, 0.3831600E+00, 0.3874600E+00, 0.3919400E+00, &
     & 0.3966200E+00, 0.3904400E+00, 0.3953900E+00, 0.3899400E+00, &
     & 0.3862500E+00, 0.3958300E+00, 0.4001600E+00, 0.4098100E+00, &
     & 0.4164000E+00, 0.4289100E+00, 0.5170800E+00, 0.4106800E+00, &
     & 0.4342200E+00, 0.5386602E+00, 0.4840435E+00, 0.4840435E+00 /
      data (ref_adm(35,iz,15,14),iz = 1,20) / &
     & 0.4158800E+00, 0.4158800E+00, 0.4401500E+00, 0.4394300E+00, &
     & 0.4426500E+00, 0.4455200E+00, 0.4525500E+00, 0.4629800E+00, &
     & 0.4671800E+00, 0.4540000E+00, 0.4486800E+00, 0.4371000E+00, &
     & 0.4301400E+00, 0.4153800E+00, 0.4847100E+00, 0.4186400E+00, &
     & 0.2750100E+00, 0.5271615E+00, 0.4735784E+00, 0.4735784E+00 /
      data (ref_adm(35,iz,16,14),iz = 1,20) / &
     & 0.4067300E+00, 0.4067300E+00, 0.3885800E+00, 0.3825600E+00, &
     & 0.3827300E+00, 0.3909400E+00, 0.3917100E+00, 0.4030100E+00, &
     & 0.4112300E+00, 0.4236500E+00, 0.4357700E+00, 0.4258900E+00, &
     & 0.4278100E+00, 0.4187900E+00, 0.4448400E+00, 0.4883800E+00, &
     & 0.4232500E+00, 0.5142309E+00, 0.4613588E+00, 0.4613588E+00 /
      data (ref_adm(35,iz,17,14),iz = 1,20) / &
     & 0.4072700E+00, 0.4072700E+00, 0.4152100E+00, 0.4139800E+00, &
     & 0.4029000E+00, 0.4250500E+00, 0.4271900E+00, 0.4346300E+00, &
     & 0.4433700E+00, 0.4132600E+00, 0.4261600E+00, 0.4360400E+00, &
     & 0.4277900E+00, 0.3801900E+00, 0.3833800E+00, 0.3319400E+00, &
     & 0.5019400E+00, 0.5021022E+00, 0.4497583E+00, 0.4497583E+00 /
      data (ref_adm(35,iz,18,14),iz = 1,20) / &
     & 0.4271300E+00, 0.4271300E+00, 0.4141200E+00, 0.4153900E+00, &
     & 0.4340600E+00, 0.4228600E+00, 0.4313300E+00, 0.4291600E+00, &
     & 0.4328600E+00, 0.4438800E+00, 0.4494800E+00, 0.4387600E+00, &
     & 0.4298900E+00, 0.4432400E+00, 0.4282500E+00, 0.3585100E+00, &
     & 0.4429545E+00, 0.4372042E+00, 0.3954227E+00, 0.3954227E+00 /
      data (ref_adm(35,iz,19,14),iz = 1,20) / &
     & 0.4031100E+00, 0.4031100E+00, 0.4006800E+00, 0.4046200E+00, &
     & 0.4212500E+00, 0.4208300E+00, 0.4257500E+00, 0.4260000E+00, &
     & 0.4337400E+00, 0.4498500E+00, 0.4601400E+00, 0.4481500E+00, &
     & 0.4295700E+00, 0.4437200E+00, 0.4564900E+00, 0.3715900E+00, &
     & 0.4410508E+00, 0.4337178E+00, 0.3904077E+00, 0.3904077E+00 /
      data (ref_adm(35,iz,20,14),iz = 1,20) / &
     & 0.3992500E+00, 0.3992500E+00, 0.3996100E+00, 0.4023900E+00, &
     & 0.4143100E+00, 0.4209900E+00, 0.4221300E+00, 0.4423300E+00, &
     & 0.4474900E+00, 0.4472300E+00, 0.4498800E+00, 0.4613600E+00, &
     & 0.4275700E+00, 0.4223300E+00, 0.4329700E+00, 0.4540600E+00, &
     & 0.4396327E+00, 0.4313582E+00, 0.3876816E+00, 0.3876816E+00 /
      data (ref_adm(35,iz,21,14),iz = 1,20) / &
     & 0.3953200E+00, 0.3953200E+00, 0.3984500E+00, 0.4036500E+00, &
     & 0.4173700E+00, 0.4154300E+00, 0.4210200E+00, 0.4263100E+00, &
     & 0.4327900E+00, 0.4336100E+00, 0.4534000E+00, 0.4644400E+00, &
     & 0.4698000E+00, 0.4212800E+00, 0.4369200E+00, 0.4130100E+00, &
     & 0.4389696E+00, 0.4294208E+00, 0.3862048E+00, 0.3862048E+00 /
      data (ref_adm(35,iz,22,14),iz = 1,20) / &
     & 0.3940900E+00, 0.3940900E+00, 0.4010800E+00, 0.4106700E+00, &
     & 0.4173500E+00, 0.4308700E+00, 0.4080200E+00, 0.4207700E+00, &
     & 0.4476500E+00, 0.4479100E+00, 0.4624000E+00, 0.4696300E+00, &
     & 0.4605100E+00, 0.4493600E+00, 0.4733900E+00, 0.4736900E+00, &
     & 0.5422956E+00, 0.5568816E+00, 0.5409146E+00, 0.5409146E+00 /
      data (ref_adm(35,iz,23,14),iz = 1,20) / &
     & 0.4090200E+00, 0.4090200E+00, 0.4293300E+00, 0.4197800E+00, &
     & 0.4037500E+00, 0.3927500E+00, 0.4047300E+00, 0.4099500E+00, &
     & 0.4161900E+00, 0.4374400E+00, 0.4489700E+00, 0.4534500E+00, &
     & 0.4622300E+00, 0.4673700E+00, 0.4717000E+00, 0.4619000E+00, &
     & 0.4879100E+00, 0.5513442E+00, 0.5418808E+00, 0.5418808E+00 /
      data (ref_adm(35,iz,24,14),iz = 1,20) / &
     & 0.4102700E+00, 0.4102700E+00, 0.4129700E+00, 0.4140300E+00, &
     & 0.4253100E+00, 0.4237500E+00, 0.4228700E+00, 0.4341700E+00, &
     & 0.4425000E+00, 0.4605300E+00, 0.4611800E+00, 0.4742600E+00, &
     & 0.4634600E+00, 0.4927200E+00, 0.4295800E+00, 0.4231600E+00, &
     & 0.4696700E+00, 0.5490012E+00, 0.5465052E+00, 0.5465052E+00 /
      data (ref_adm(35,iz,25,14),iz = 1,20) / &
     & 0.4420000E+00, 0.4420000E+00, 0.4229100E+00, 0.4224600E+00, &
     & 0.4264300E+00, 0.4336600E+00, 0.4507700E+00, 0.4605100E+00, &
     & 0.4744800E+00, 0.4843400E+00, 0.4992200E+00, 0.5057800E+00, &
     & 0.5145500E+00, 0.5488100E+00, 0.5052200E+00, 0.4289200E+00, &
     & 0.4946800E+00, 0.5236700E+00, 0.5534756E+00, 0.5534756E+00 /
      data (ref_adm(35,iz,26,14),iz = 1,20) / &
     & 0.4009800E+00, 0.4009800E+00, 0.4160500E+00, 0.4354300E+00, &
     & 0.4410000E+00, 0.4446500E+00, 0.4447800E+00, 0.4517100E+00, &
     & 0.4513200E+00, 0.4648300E+00, 0.4728900E+00, 0.4664200E+00, &
     & 0.4821000E+00, 0.5105200E+00, 0.4953700E+00, 0.4745200E+00, &
     & 0.4049400E+00, 0.3800000E+00, 0.5652193E+00, 0.5652193E+00 /
      data (ref_adm(35,iz,27,14),iz = 1,20) / &
     & 0.4042100E+00, 0.4042100E+00, 0.3917700E+00, 0.3831200E+00, &
     & 0.3943400E+00, 0.4099700E+00, 0.4375600E+00, 0.4441100E+00, &
     & 0.4571600E+00, 0.4634200E+00, 0.4575600E+00, 0.4547900E+00, &
     & 0.5159600E+00, 0.5171500E+00, 0.4938800E+00, 0.3878800E+00, &
     & 0.5283200E+00, 0.3822600E+00, 0.3333900E+00, 0.3333900E+00 /
      data (ref_adm(35,iz,28,14),iz = 1,20) / &
     & 0.3933600E+00, 0.3933600E+00, 0.3694400E+00, 0.3774500E+00, &
     & 0.3925400E+00, 0.4040500E+00, 0.4199600E+00, 0.4358400E+00, &
     & 0.4609800E+00, 0.4600600E+00, 0.4493400E+00, 0.4500200E+00, &
     & 0.4620500E+00, 0.5056300E+00, 0.4691300E+00, 0.4158200E+00, &
     & 0.5304700E+00, 0.5611500E+00, 0.4258700E+00, 0.4258700E+00 /
      data (ref_adm(35,iz,29,14),iz = 1,20) / &
     & 0.4003200E+00, 0.4003200E+00, 0.3718300E+00, 0.3801900E+00, &
     & 0.3979400E+00, 0.4132700E+00, 0.4070200E+00, 0.4373600E+00, &
     & 0.4583400E+00, 0.4473500E+00, 0.4522800E+00, 0.4569200E+00, &
     & 0.4805100E+00, 0.4943600E+00, 0.4762700E+00, 0.5079300E+00, &
     & 0.4841500E+00, 0.5064100E+00, 0.6147552E+00, 0.6147552E+00 /
      data (ref_adm(35,iz,30,14),iz = 1,20) / &
     & 0.4058800E+00, 0.4058800E+00, 0.4237600E+00, 0.4162000E+00, &
     & 0.4060200E+00, 0.4164200E+00, 0.4243900E+00, 0.4515700E+00, &
     & 0.4662800E+00, 0.4560500E+00, 0.4635500E+00, 0.4661100E+00, &
     & 0.4874400E+00, 0.4746500E+00, 0.4966800E+00, 0.4867200E+00, &
     & 0.4325000E+00, 0.5996216E+00, 0.6340873E+00, 0.6340873E+00 /
      data (ref_adm(35,iz,31,14),iz = 1,20) / &
     & 0.4111900E+00, 0.4111900E+00, 0.4278400E+00, 0.4413400E+00, &
     & 0.4375600E+00, 0.4187400E+00, 0.4132400E+00, 0.4103500E+00, &
     & 0.4498200E+00, 0.4802500E+00, 0.4831700E+00, 0.4621100E+00, &
     & 0.5012100E+00, 0.5005900E+00, 0.4666100E+00, 0.4563400E+00, &
     & 0.4920400E+00, 0.6165556E+00, 0.6544575E+00, 0.6544575E+00 /
      data (ref_adm(35,iz,32,14),iz = 1,20) / &
     & 0.4174900E+00, 0.4174900E+00, 0.4200200E+00, 0.4277500E+00, &
     & 0.4340400E+00, 0.4353400E+00, 0.4376200E+00, 0.4423500E+00, &
     & 0.4507500E+00, 0.4689500E+00, 0.4799200E+00, 0.4876600E+00, &
     & 0.4985600E+00, 0.5128500E+00, 0.5173900E+00, 0.5353400E+00, &
     & 0.5732000E+00, 0.5809300E+00, 0.6739199E+00, 0.6739199E+00 /
      data (ref_adm(35,iz,33,14),iz = 1,20) / &
     & 0.4116800E+00, 0.4116800E+00, 0.4140400E+00, 0.4239800E+00, &
     & 0.4291600E+00, 0.4286000E+00, 0.4224900E+00, 0.4238600E+00, &
     & 0.4349300E+00, 0.4380700E+00, 0.4583800E+00, 0.4813200E+00, &
     & 0.5038200E+00, 0.5151900E+00, 0.5349100E+00, 0.5761400E+00, &
     & 0.5483000E+00, 0.6482185E+00, 0.6919934E+00, 0.6919934E+00 /
      data (ref_adm(35,iz,34,14),iz = 1,20) / &
     & 0.3929900E+00, 0.3929900E+00, 0.4118800E+00, 0.4226600E+00, &
     & 0.4287000E+00, 0.4432100E+00, 0.4387000E+00, 0.4442800E+00, &
     & 0.4423100E+00, 0.4568400E+00, 0.4661200E+00, 0.5013200E+00, &
     & 0.5046800E+00, 0.5032300E+00, 0.4998400E+00, 0.5747400E+00, &
     & 0.6282800E+00, 0.6518546E+00, 0.7065375E+00, 0.7065375E+00 /
      data (ref_adm(35,iz,35,14),iz = 1,20) / &
     & 0.3972400E+00, 0.3972400E+00, 0.3914300E+00, 0.3982200E+00, &
     & 0.4202400E+00, 0.4295200E+00, 0.4289500E+00, 0.4426900E+00, &
     & 0.4394300E+00, 0.4708100E+00, 0.4661000E+00, 0.4687600E+00, &
     & 0.4771100E+00, 0.5220100E+00, 0.5520000E+00, 0.5851700E+00, &
     & 0.6081600E+00, 0.6490240E+00, 0.7146755E+00, 0.7146755E+00 /
      data (ref_adm(35,iz,36,14),iz = 1,20) / &
     & 0.4086000E+00, 0.4086000E+00, 0.3987000E+00, 0.3948900E+00, &
     & 0.4141000E+00, 0.4205300E+00, 0.4479000E+00, 0.4442200E+00, &
     & 0.4474000E+00, 0.4501200E+00, 0.4872700E+00, 0.4655300E+00, &
     & 0.5283800E+00, 0.5534200E+00, 0.5631100E+00, 0.5463000E+00, &
     & 0.5942500E+00, 0.6475317E+00, 0.7175468E+00, 0.7175468E+00 /
      data (ref_adm(35,iz,37,14),iz = 1,20) / &
     & 0.3927500E+00, 0.3927500E+00, 0.3928400E+00, 0.3993400E+00, &
     & 0.4099100E+00, 0.4270900E+00, 0.4285400E+00, 0.4440700E+00, &
     & 0.4500000E+00, 0.4658100E+00, 0.4586100E+00, 0.5089900E+00, &
     & 0.5550000E+00, 0.5680700E+00, 0.6379700E+00, 0.6508800E+00, &
     & 0.6584300E+00, 0.6481346E+00, 0.7188441E+00, 0.7188441E+00 /
      data (ref_adm(35,iz,38,14),iz = 1,20) / &
     & 0.3927500E+00, 0.3927500E+00, 0.3928400E+00, 0.3993400E+00, &
     & 0.4099100E+00, 0.4270900E+00, 0.4285400E+00, 0.4440700E+00, &
     & 0.4500000E+00, 0.4658100E+00, 0.4586100E+00, 0.5089900E+00, &
     & 0.5550000E+00, 0.5680700E+00, 0.6379700E+00, 0.6508800E+00, &
     & 0.6584300E+00, 0.6481346E+00, 0.7188441E+00, 0.7188441E+00 /
! Solar Zenith Angle 70.0 Albedo  0.4515111E+00
      data (ref_adm(35,iz, 1,15),iz = 1,20) / &
     & 0.3709200E+00, 0.3709200E+00, 0.3891000E+00, 0.3751500E+00, &
     & 0.3639200E+00, 0.3751400E+00, 0.3978900E+00, 0.4108800E+00, &
     & 0.4427300E+00, 0.4710100E+00, 0.4759600E+00, 0.4774200E+00, &
     & 0.4983500E+00, 0.5305100E+00, 0.6039600E+00, 0.6164400E+00, &
     & 0.5892262E+00, 0.5804564E+00, 0.5028002E+00, 0.5028002E+00 /
      data (ref_adm(35,iz, 2,15),iz = 1,20) / &
     & 0.3709200E+00, 0.3709200E+00, 0.3891000E+00, 0.3751500E+00, &
     & 0.3639200E+00, 0.3751400E+00, 0.3978900E+00, 0.4108800E+00, &
     & 0.4427300E+00, 0.4710100E+00, 0.4759600E+00, 0.4774200E+00, &
     & 0.4983500E+00, 0.5305100E+00, 0.6039600E+00, 0.6164400E+00, &
     & 0.5892262E+00, 0.5804564E+00, 0.5028002E+00, 0.5028002E+00 /
      data (ref_adm(35,iz, 3,15),iz = 1,20) / &
     & 0.3751500E+00, 0.3751500E+00, 0.3695200E+00, 0.3720600E+00, &
     & 0.3668500E+00, 0.3718700E+00, 0.3884600E+00, 0.4123900E+00, &
     & 0.4170400E+00, 0.4296800E+00, 0.4465300E+00, 0.4783200E+00, &
     & 0.5121300E+00, 0.5449800E+00, 0.5711200E+00, 0.6065300E+00, &
     & 0.5877753E+00, 0.5774803E+00, 0.1121744E+00, 0.1121744E+00 /
      data (ref_adm(35,iz, 4,15),iz = 1,20) / &
     & 0.3742900E+00, 0.3742900E+00, 0.3596700E+00, 0.3690900E+00, &
     & 0.3727900E+00, 0.3780400E+00, 0.3883800E+00, 0.3950100E+00, &
     & 0.4156400E+00, 0.4257000E+00, 0.4532900E+00, 0.4852300E+00, &
     & 0.5170200E+00, 0.5316500E+00, 0.6011300E+00, 0.5846100E+00, &
     & 0.4691800E+00, 0.5722566E+00, 0.4934885E+00, 0.4934885E+00 /
      data (ref_adm(35,iz, 5,15),iz = 1,20) / &
     & 0.3733200E+00, 0.3733200E+00, 0.3691600E+00, 0.3716900E+00, &
     & 0.3595600E+00, 0.3980400E+00, 0.3988800E+00, 0.3983300E+00, &
     & 0.3943400E+00, 0.3908800E+00, 0.4280800E+00, 0.4492700E+00, &
     & 0.5145900E+00, 0.5360100E+00, 0.5819700E+00, 0.6122700E+00, &
     & 0.5963000E+00, 0.5654101E+00, 0.4850311E+00, 0.4850311E+00 /
      data (ref_adm(35,iz, 6,15),iz = 1,20) / &
     & 0.3709600E+00, 0.3709600E+00, 0.3759300E+00, 0.3695900E+00, &
     & 0.3820600E+00, 0.3954200E+00, 0.4038600E+00, 0.4097300E+00, &
     & 0.4208700E+00, 0.4339100E+00, 0.4422900E+00, 0.4850400E+00, &
     & 0.4981800E+00, 0.5258700E+00, 0.5423000E+00, 0.6049200E+00, &
     & 0.5752484E+00, 0.5575515E+00, 0.4750425E+00, 0.4750425E+00 /
      data (ref_adm(35,iz, 7,15),iz = 1,20) / &
     & 0.3837400E+00, 0.3837400E+00, 0.3829600E+00, 0.3897700E+00, &
     & 0.3945800E+00, 0.3936200E+00, 0.3984900E+00, 0.4106400E+00, &
     & 0.4217000E+00, 0.4276300E+00, 0.4430000E+00, 0.4667100E+00, &
     & 0.4904300E+00, 0.5101600E+00, 0.5334900E+00, 0.5925400E+00, &
     & 0.6296800E+00, 0.6788300E+00, 0.4650816E+00, 0.4650816E+00 /
      data (ref_adm(35,iz, 8,15),iz = 1,20) / &
     & 0.3800300E+00, 0.3800300E+00, 0.3872800E+00, 0.3846500E+00, &
     & 0.3796300E+00, 0.3872600E+00, 0.4037300E+00, 0.3937700E+00, &
     & 0.4033200E+00, 0.4107600E+00, 0.4060100E+00, 0.4697100E+00, &
     & 0.5196500E+00, 0.5248300E+00, 0.5214800E+00, 0.5962000E+00, &
     & 0.5671600E+00, 0.6351700E+00, 0.4557864E+00, 0.4557864E+00 /
      data (ref_adm(35,iz, 9,15),iz = 1,20) / &
     & 0.3889200E+00, 0.3889200E+00, 0.3874800E+00, 0.3676800E+00, &
     & 0.3718100E+00, 0.3934400E+00, 0.3973600E+00, 0.3881700E+00, &
     & 0.3712500E+00, 0.4059300E+00, 0.4385200E+00, 0.4894500E+00, &
     & 0.5164100E+00, 0.5008800E+00, 0.5178800E+00, 0.5326700E+00, &
     & 0.4851300E+00, 0.6139000E+00, 0.4471579E+00, 0.4471579E+00 /
      data (ref_adm(35,iz,10,15),iz = 1,20) / &
     & 0.3758200E+00, 0.3758200E+00, 0.3706000E+00, 0.3710800E+00, &
     & 0.3826000E+00, 0.3953500E+00, 0.4087700E+00, 0.4143000E+00, &
     & 0.4166000E+00, 0.3992300E+00, 0.4285400E+00, 0.4895600E+00, &
     & 0.5024800E+00, 0.4796600E+00, 0.5289500E+00, 0.5731900E+00, &
     & 0.6611600E+00, 0.6693500E+00, 0.4395850E+00, 0.4395850E+00 /
      data (ref_adm(35,iz,11,15),iz = 1,20) / &
     & 0.3798900E+00, 0.3798900E+00, 0.3854800E+00, 0.3810100E+00, &
     & 0.3744900E+00, 0.3893500E+00, 0.4085500E+00, 0.4042700E+00, &
     & 0.4248300E+00, 0.4297600E+00, 0.4496300E+00, 0.4728000E+00, &
     & 0.4888400E+00, 0.4725600E+00, 0.5195500E+00, 0.6276400E+00, &
     & 0.7043700E+00, 0.5200347E+00, 0.4326415E+00, 0.4326415E+00 /
      data (ref_adm(35,iz,12,15),iz = 1,20) / &
     & 0.3939800E+00, 0.3939800E+00, 0.3798900E+00, 0.3967000E+00, &
     & 0.4072900E+00, 0.4118600E+00, 0.4188700E+00, 0.3983300E+00, &
     & 0.4224100E+00, 0.4338800E+00, 0.4721500E+00, 0.4704400E+00, &
     & 0.4739500E+00, 0.4729000E+00, 0.5238100E+00, 0.6177400E+00, &
     & 0.5385300E+00, 0.5130584E+00, 0.4264520E+00, 0.4264520E+00 /
      data (ref_adm(35,iz,13,15),iz = 1,20) / &
     & 0.3892500E+00, 0.3892500E+00, 0.4041900E+00, 0.4098100E+00, &
     & 0.3977000E+00, 0.4052800E+00, 0.4193800E+00, 0.4200200E+00, &
     & 0.4044000E+00, 0.4214600E+00, 0.4592000E+00, 0.4576000E+00, &
     & 0.4702600E+00, 0.4696300E+00, 0.5508400E+00, 0.5229900E+00, &
     & 0.4321700E+00, 0.5042000E+00, 0.4202486E+00, 0.4202486E+00 /
      data (ref_adm(35,iz,14,15),iz = 1,20) / &
     & 0.3468600E+00, 0.3468600E+00, 0.3578800E+00, 0.3575300E+00, &
     & 0.3558300E+00, 0.3600800E+00, 0.3564900E+00, 0.3511400E+00, &
     & 0.3492000E+00, 0.3554500E+00, 0.3625000E+00, 0.3645500E+00, &
     & 0.3680700E+00, 0.3651500E+00, 0.5891100E+00, 0.5693200E+00, &
     & 0.4450600E+00, 0.4934168E+00, 0.4130853E+00, 0.4130853E+00 /
      data (ref_adm(35,iz,15,15),iz = 1,20) / &
     & 0.4006500E+00, 0.4006500E+00, 0.4377200E+00, 0.4257100E+00, &
     & 0.4232900E+00, 0.4312100E+00, 0.4319400E+00, 0.4344500E+00, &
     & 0.4428900E+00, 0.4558800E+00, 0.4634100E+00, 0.4617300E+00, &
     & 0.4496800E+00, 0.4284100E+00, 0.4973400E+00, 0.5107900E+00, &
     & 0.5372700E+00, 0.4826538E+00, 0.4045371E+00, 0.4045371E+00 /
      data (ref_adm(35,iz,16,15),iz = 1,20) / &
     & 0.3780200E+00, 0.3780200E+00, 0.3317300E+00, 0.3330800E+00, &
     & 0.3303800E+00, 0.3407800E+00, 0.3471800E+00, 0.3325400E+00, &
     & 0.3281000E+00, 0.3353600E+00, 0.3479100E+00, 0.3620900E+00, &
     & 0.3545400E+00, 0.3652900E+00, 0.4687200E+00, 0.5024100E+00, &
     & 0.5790200E+00, 0.4719369E+00, 0.3962202E+00, 0.3962202E+00 /
      data (ref_adm(35,iz,17,15),iz = 1,20) / &
     & 0.3785600E+00, 0.3785600E+00, 0.3699700E+00, 0.3850200E+00, &
     & 0.3817000E+00, 0.3877700E+00, 0.3831600E+00, 0.3701500E+00, &
     & 0.3919300E+00, 0.4140000E+00, 0.4433700E+00, 0.4448300E+00, &
     & 0.4237600E+00, 0.4112900E+00, 0.4515600E+00, 0.5175300E+00, &
     & 0.5582100E+00, 0.4608155E+00, 0.3885571E+00, 0.3885571E+00 /
      data (ref_adm(35,iz,18,15),iz = 1,20) / &
     & 0.3936200E+00, 0.3936200E+00, 0.3674700E+00, 0.3826500E+00, &
     & 0.3943600E+00, 0.4019900E+00, 0.3996400E+00, 0.3891400E+00, &
     & 0.3862600E+00, 0.4257300E+00, 0.4471400E+00, 0.4379300E+00, &
     & 0.4358500E+00, 0.4280800E+00, 0.4189600E+00, 0.5101700E+00, &
     & 0.4713421E+00, 0.4640652E+00, 0.4074669E+00, 0.4074669E+00 /
      data (ref_adm(35,iz,19,15),iz = 1,20) / &
     & 0.3910800E+00, 0.3910800E+00, 0.4033000E+00, 0.4023200E+00, &
     & 0.4127800E+00, 0.4203400E+00, 0.4156600E+00, 0.4046900E+00, &
     & 0.4056300E+00, 0.4096700E+00, 0.4328500E+00, 0.4487900E+00, &
     & 0.4591600E+00, 0.4353900E+00, 0.4266100E+00, 0.5516500E+00, &
     & 0.4652611E+00, 0.4565218E+00, 0.4006421E+00, 0.4006421E+00 /
      data (ref_adm(35,iz,20,15),iz = 1,20) / &
     & 0.3963700E+00, 0.3963700E+00, 0.4274600E+00, 0.4345200E+00, &
     & 0.4200700E+00, 0.4248000E+00, 0.4227600E+00, 0.4149100E+00, &
     & 0.4238100E+00, 0.4388400E+00, 0.4508900E+00, 0.4576300E+00, &
     & 0.4612000E+00, 0.4225300E+00, 0.4299700E+00, 0.5081400E+00, &
     & 0.4593298E+00, 0.4500987E+00, 0.3962868E+00, 0.3962868E+00 /
      data (ref_adm(35,iz,21,15),iz = 1,20) / &
     & 0.4183200E+00, 0.4183200E+00, 0.4255500E+00, 0.4122400E+00, &
     & 0.4030100E+00, 0.4020600E+00, 0.4016100E+00, 0.3884600E+00, &
     & 0.4124600E+00, 0.4235500E+00, 0.4155600E+00, 0.4305000E+00, &
     & 0.4131100E+00, 0.4298300E+00, 0.4351000E+00, 0.3320100E+00, &
     & 0.4541725E+00, 0.4437009E+00, 0.3930978E+00, 0.3930978E+00 /
      data (ref_adm(35,iz,22,15),iz = 1,20) / &
     & 0.4031900E+00, 0.4031900E+00, 0.4099900E+00, 0.4009400E+00, &
     & 0.4096300E+00, 0.4034400E+00, 0.4040000E+00, 0.4010000E+00, &
     & 0.4011700E+00, 0.4293000E+00, 0.4344800E+00, 0.4311200E+00, &
     & 0.4324400E+00, 0.4320300E+00, 0.4129000E+00, 0.4330800E+00, &
     & 0.6498595E+00, 0.6894335E+00, 0.7173054E+00, 0.7173054E+00 /
      data (ref_adm(35,iz,23,15),iz = 1,20) / &
     & 0.4050600E+00, 0.4050600E+00, 0.4025200E+00, 0.4019100E+00, &
     & 0.3929000E+00, 0.3964900E+00, 0.3853600E+00, 0.4087400E+00, &
     & 0.3992600E+00, 0.4259400E+00, 0.4039800E+00, 0.4096600E+00, &
     & 0.4263100E+00, 0.3984500E+00, 0.4253300E+00, 0.4416500E+00, &
     & 0.4365800E+00, 0.6692049E+00, 0.7108969E+00, 0.7108969E+00 /
      data (ref_adm(35,iz,24,15),iz = 1,20) / &
     & 0.3621300E+00, 0.3621300E+00, 0.3606900E+00, 0.3704100E+00, &
     & 0.3848700E+00, 0.3977500E+00, 0.3881000E+00, 0.4050200E+00, &
     & 0.4205500E+00, 0.4424000E+00, 0.4376900E+00, 0.4480200E+00, &
     & 0.4456400E+00, 0.4110900E+00, 0.4484200E+00, 0.4315500E+00, &
     & 0.4095800E+00, 0.6549196E+00, 0.7109958E+00, 0.7109958E+00 /
      data (ref_adm(35,iz,25,15),iz = 1,20) / &
     & 0.4269900E+00, 0.4269900E+00, 0.4102300E+00, 0.4085600E+00, &
     & 0.4194100E+00, 0.4331200E+00, 0.4469100E+00, 0.4607700E+00, &
     & 0.4782200E+00, 0.4946100E+00, 0.5136300E+00, 0.5193300E+00, &
     & 0.5318700E+00, 0.5537800E+00, 0.5209900E+00, 0.4452200E+00, &
     & 0.4883000E+00, 0.5882200E+00, 0.7148444E+00, 0.7148444E+00 /
      data (ref_adm(35,iz,26,15),iz = 1,20) / &
     & 0.3697700E+00, 0.3697700E+00, 0.3727800E+00, 0.3887400E+00, &
     & 0.3868800E+00, 0.3944800E+00, 0.4112500E+00, 0.4339100E+00, &
     & 0.4401500E+00, 0.4574700E+00, 0.4849300E+00, 0.5053100E+00, &
     & 0.5143200E+00, 0.5321400E+00, 0.5210900E+00, 0.4442000E+00, &
     & 0.4565700E+00, 0.4763900E+00, 0.7277821E+00, 0.7277821E+00 /
      data (ref_adm(35,iz,27,15),iz = 1,20) / &
     & 0.3813300E+00, 0.3813300E+00, 0.3805100E+00, 0.3902300E+00, &
     & 0.3892000E+00, 0.4064000E+00, 0.4063000E+00, 0.3969400E+00, &
     & 0.4380300E+00, 0.4368800E+00, 0.4573400E+00, 0.4514400E+00, &
     & 0.4587800E+00, 0.4813400E+00, 0.4688200E+00, 0.4717100E+00, &
     & 0.4759400E+00, 0.4374000E+00, 0.4421300E+00, 0.4421300E+00 /
      data (ref_adm(35,iz,28,15),iz = 1,20) / &
     & 0.3878800E+00, 0.3878800E+00, 0.4003100E+00, 0.4067700E+00, &
     & 0.4032100E+00, 0.4141700E+00, 0.4236800E+00, 0.4221600E+00, &
     & 0.4505100E+00, 0.4369100E+00, 0.4787900E+00, 0.4678800E+00, &
     & 0.4571500E+00, 0.4646300E+00, 0.4644700E+00, 0.4608400E+00, &
     & 0.4798400E+00, 0.5641000E+00, 0.5214100E+00, 0.5214100E+00 /
      data (ref_adm(35,iz,29,15),iz = 1,20) / &
     & 0.3975900E+00, 0.3975900E+00, 0.4013300E+00, 0.3953400E+00, &
     & 0.3915500E+00, 0.4113400E+00, 0.4215700E+00, 0.4302200E+00, &
     & 0.4391200E+00, 0.4567700E+00, 0.4801800E+00, 0.4531700E+00, &
     & 0.4561400E+00, 0.4610700E+00, 0.4825000E+00, 0.4494400E+00, &
     & 0.5080600E+00, 0.4967100E+00, 0.7941235E+00, 0.7941235E+00 /
      data (ref_adm(35,iz,30,15),iz = 1,20) / &
     & 0.3899900E+00, 0.3899900E+00, 0.3860600E+00, 0.3821500E+00, &
     & 0.4075600E+00, 0.4329400E+00, 0.4302000E+00, 0.4442700E+00, &
     & 0.4440300E+00, 0.4478500E+00, 0.4671700E+00, 0.4592200E+00, &
     & 0.4735400E+00, 0.4839200E+00, 0.5030600E+00, 0.5094600E+00, &
     & 0.5285900E+00, 0.5475400E+00, 0.8233581E+00, 0.8233581E+00 /
      data (ref_adm(35,iz,31,15),iz = 1,20) / &
     & 0.3675200E+00, 0.3675200E+00, 0.3796300E+00, 0.4045100E+00, &
     & 0.4106400E+00, 0.4199000E+00, 0.4346600E+00, 0.4408100E+00, &
     & 0.4392500E+00, 0.4189600E+00, 0.4536000E+00, 0.4800500E+00, &
     & 0.5028000E+00, 0.5370800E+00, 0.5363200E+00, 0.4835800E+00, &
     & 0.5272700E+00, 0.6048200E+00, 0.5215700E+00, 0.5215700E+00 /
      data (ref_adm(35,iz,32,15),iz = 1,20) / &
     & 0.3749400E+00, 0.3749400E+00, 0.3856700E+00, 0.3850000E+00, &
     & 0.3957200E+00, 0.4059100E+00, 0.4172100E+00, 0.4245400E+00, &
     & 0.4366700E+00, 0.4428000E+00, 0.4609300E+00, 0.4804600E+00, &
     & 0.5007900E+00, 0.5350000E+00, 0.5661100E+00, 0.5725700E+00, &
     & 0.6238500E+00, 0.6451100E+00, 0.5627800E+00, 0.5627800E+00 /
      data (ref_adm(35,iz,33,15),iz = 1,20) / &
     & 0.3934500E+00, 0.3934500E+00, 0.3854800E+00, 0.3964600E+00, &
     & 0.3917000E+00, 0.3971100E+00, 0.4145700E+00, 0.4138800E+00, &
     & 0.4346400E+00, 0.4421800E+00, 0.4584600E+00, 0.4919600E+00, &
     & 0.5152700E+00, 0.5481600E+00, 0.5859900E+00, 0.6389400E+00, &
     & 0.6419700E+00, 0.6695100E+00, 0.9146917E+00, 0.9146917E+00 /
      data (ref_adm(35,iz,34,15),iz = 1,20) / &
     & 0.3639700E+00, 0.3639700E+00, 0.3989700E+00, 0.4038900E+00, &
     & 0.3973700E+00, 0.3924700E+00, 0.4042500E+00, 0.4179100E+00, &
     & 0.4249800E+00, 0.4648700E+00, 0.4751000E+00, 0.5062100E+00, &
     & 0.5273800E+00, 0.5467600E+00, 0.5903400E+00, 0.6488400E+00, &
     & 0.7157600E+00, 0.7228000E+00, 0.9200326E+00, 0.9200326E+00 /
      data (ref_adm(35,iz,35,15),iz = 1,20) / &
     & 0.3967400E+00, 0.3967400E+00, 0.3818100E+00, 0.3750800E+00, &
     & 0.4033300E+00, 0.3934300E+00, 0.3944200E+00, 0.4242700E+00, &
     & 0.4354900E+00, 0.4466000E+00, 0.4901400E+00, 0.5019400E+00, &
     & 0.5365100E+00, 0.5694000E+00, 0.6185400E+00, 0.6799600E+00, &
     & 0.7188900E+00, 0.7179931E+00, 0.9154108E+00, 0.9154108E+00 /
      data (ref_adm(35,iz,36,15),iz = 1,20) / &
     & 0.3747900E+00, 0.3747900E+00, 0.3722600E+00, 0.3779800E+00, &
     & 0.3805200E+00, 0.3814300E+00, 0.3940000E+00, 0.4131700E+00, &
     & 0.4356800E+00, 0.4620100E+00, 0.4984600E+00, 0.5149900E+00, &
     & 0.5686200E+00, 0.5953100E+00, 0.6170800E+00, 0.6628300E+00, &
     & 0.7007300E+00, 0.7227465E+00, 0.9155100E+00, 0.9155100E+00 /
      data (ref_adm(35,iz,37,15),iz = 1,20) / &
     & 0.3675400E+00, 0.3675400E+00, 0.3778300E+00, 0.3636900E+00, &
     & 0.3764100E+00, 0.4115000E+00, 0.4157700E+00, 0.4165500E+00, &
     & 0.4274500E+00, 0.4559600E+00, 0.5032500E+00, 0.5343000E+00, &
     & 0.5408300E+00, 0.6100900E+00, 0.6234800E+00, 0.7465900E+00, &
     & 0.7941000E+00, 0.7905900E+00, 0.9181761E+00, 0.9181761E+00 /
      data (ref_adm(35,iz,38,15),iz = 1,20) / &
     & 0.3675400E+00, 0.3675400E+00, 0.3778300E+00, 0.3636900E+00, &
     & 0.3764100E+00, 0.4115000E+00, 0.4157700E+00, 0.4165500E+00, &
     & 0.4274500E+00, 0.4559600E+00, 0.5032500E+00, 0.5343000E+00, &
     & 0.5408300E+00, 0.6100900E+00, 0.6234800E+00, 0.7465900E+00, &
     & 0.7941000E+00, 0.7905900E+00, 0.9181761E+00, 0.9181761E+00 /
! Solar Zenith Angle 75.0 Albedo  0.4132888E+00
      data (ref_adm(35,iz, 1,16),iz = 1,20) / &
     & 0.3303700E+00, 0.3303700E+00, 0.3319700E+00, 0.3323100E+00, &
     & 0.3447000E+00, 0.3528400E+00, 0.3499700E+00, 0.3687100E+00, &
     & 0.3997300E+00, 0.3995700E+00, 0.4036100E+00, 0.4356000E+00, &
     & 0.4805900E+00, 0.4002100E+00, 0.4942359E+00, 0.5046141E+00, &
     & 0.5042927E+00, 0.4778098E+00, 0.3955564E+00, 0.3955564E+00 /
      data (ref_adm(35,iz, 2,16),iz = 1,20) / &
     & 0.3303700E+00, 0.3303700E+00, 0.3319700E+00, 0.3323100E+00, &
     & 0.3447000E+00, 0.3528400E+00, 0.3499700E+00, 0.3687100E+00, &
     & 0.3997300E+00, 0.3995700E+00, 0.4036100E+00, 0.4356000E+00, &
     & 0.4805900E+00, 0.4002100E+00, 0.4942359E+00, 0.5046141E+00, &
     & 0.5042927E+00, 0.4778098E+00, 0.3955564E+00, 0.3955564E+00 /
      data (ref_adm(35,iz, 3,16),iz = 1,20) / &
     & 0.3346100E+00, 0.3346100E+00, 0.3382000E+00, 0.3424200E+00, &
     & 0.3386300E+00, 0.3290000E+00, 0.3597600E+00, 0.3831900E+00, &
     & 0.3833400E+00, 0.3948900E+00, 0.4099400E+00, 0.4451200E+00, &
     & 0.5173500E+00, 0.4324200E+00, 0.4938599E+00, 0.5041215E+00, &
     & 0.5033181E+00, 0.4770619E+00, 0.6066279E-08, 0.6066279E-08 /
      data (ref_adm(35,iz, 4,16),iz = 1,20) / &
     & 0.3537700E+00, 0.3537700E+00, 0.3488900E+00, 0.3428700E+00, &
     & 0.3423500E+00, 0.3383300E+00, 0.3706300E+00, 0.3862500E+00, &
     & 0.3989900E+00, 0.4084000E+00, 0.4169100E+00, 0.4274000E+00, &
     & 0.4367900E+00, 0.5173200E+00, 0.4924394E+00, 0.5022457E+00, &
     & 0.5019113E+00, 0.4759300E+00, 0.3940320E+00, 0.3940320E+00 /
      data (ref_adm(35,iz, 5,16),iz = 1,20) / &
     & 0.3443000E+00, 0.3443000E+00, 0.3432500E+00, 0.3256900E+00, &
     & 0.3459800E+00, 0.3670100E+00, 0.3515200E+00, 0.3652500E+00, &
     & 0.3857700E+00, 0.4050800E+00, 0.4216000E+00, 0.4262500E+00, &
     & 0.4578600E+00, 0.4655600E+00, 0.4904928E+00, 0.5005112E+00, &
     & 0.4999683E+00, 0.4748045E+00, 0.3923659E+00, 0.3923659E+00 /
      data (ref_adm(35,iz, 6,16),iz = 1,20) / &
     & 0.3216100E+00, 0.3216100E+00, 0.3197300E+00, 0.3253500E+00, &
     & 0.3375300E+00, 0.3374600E+00, 0.3402000E+00, 0.3551100E+00, &
     & 0.3598600E+00, 0.3674500E+00, 0.3823400E+00, 0.4166000E+00, &
     & 0.4645100E+00, 0.4981200E+00, 0.5111000E+00, 0.5552900E+00, &
     & 0.6515700E+00, 0.7610100E+00, 0.3905038E+00, 0.3905038E+00 /
      data (ref_adm(35,iz, 7,16),iz = 1,20) / &
     & 0.3238000E+00, 0.3238000E+00, 0.3369800E+00, 0.3393500E+00, &
     & 0.3376000E+00, 0.3387800E+00, 0.3363100E+00, 0.3500000E+00, &
     & 0.3659800E+00, 0.3720600E+00, 0.3931900E+00, 0.4136900E+00, &
     & 0.4462100E+00, 0.4998000E+00, 0.5467600E+00, 0.6550000E+00, &
     & 0.7704800E+00, 0.7899200E+00, 0.3883475E+00, 0.3883475E+00 /
      data (ref_adm(35,iz, 8,16),iz = 1,20) / &
     & 0.3368600E+00, 0.3368600E+00, 0.3407300E+00, 0.3313900E+00, &
     & 0.3344600E+00, 0.3409000E+00, 0.3483000E+00, 0.3597600E+00, &
     & 0.3943500E+00, 0.3844800E+00, 0.3992300E+00, 0.3949500E+00, &
     & 0.4565800E+00, 0.4783900E+00, 0.5436600E+00, 0.6080400E+00, &
     & 0.7762700E+00, 0.7375900E+00, 0.3857064E+00, 0.3857064E+00 /
      data (ref_adm(35,iz, 9,16),iz = 1,20) / &
     & 0.3429800E+00, 0.3429800E+00, 0.3459300E+00, 0.3240900E+00, &
     & 0.3292500E+00, 0.3388700E+00, 0.3450900E+00, 0.3643300E+00, &
     & 0.3746900E+00, 0.3864600E+00, 0.3965900E+00, 0.4189600E+00, &
     & 0.4381600E+00, 0.4971700E+00, 0.5522000E+00, 0.5980700E+00, &
     & 0.5550600E+00, 0.7216500E+00, 0.3830978E+00, 0.3830978E+00 /
      data (ref_adm(35,iz,10,16),iz = 1,20) / &
     & 0.3358900E+00, 0.3358900E+00, 0.3371700E+00, 0.3435000E+00, &
     & 0.3305700E+00, 0.3260000E+00, 0.3341200E+00, 0.3519800E+00, &
     & 0.3731400E+00, 0.3768000E+00, 0.3700200E+00, 0.4046900E+00, &
     & 0.4415600E+00, 0.4388800E+00, 0.4905700E+00, 0.5501900E+00, &
     & 0.4803700E+00, 0.5684800E+00, 0.3799855E+00, 0.3799855E+00 /
      data (ref_adm(35,iz,11,16),iz = 1,20) / &
     & 0.3403000E+00, 0.3403000E+00, 0.3427200E+00, 0.3376800E+00, &
     & 0.3345700E+00, 0.3324600E+00, 0.3375000E+00, 0.3555800E+00, &
     & 0.3633500E+00, 0.3649600E+00, 0.3708100E+00, 0.3879700E+00, &
     & 0.3931800E+00, 0.4045300E+00, 0.4753500E+00, 0.5711600E+00, &
     & 0.5620000E+00, 0.4518413E+00, 0.3764695E+00, 0.3764695E+00 /
      data (ref_adm(35,iz,12,16),iz = 1,20) / &
     & 0.3433500E+00, 0.3433500E+00, 0.3438800E+00, 0.3354500E+00, &
     & 0.3260300E+00, 0.3334300E+00, 0.3373900E+00, 0.3453300E+00, &
     & 0.3649000E+00, 0.3655800E+00, 0.3579100E+00, 0.3819200E+00, &
     & 0.4077300E+00, 0.4124400E+00, 0.4689800E+00, 0.5399300E+00, &
     & 0.5088800E+00, 0.7555800E+00, 0.3719110E+00, 0.3719110E+00 /
      data (ref_adm(35,iz,13,16),iz = 1,20) / &
     & 0.3522100E+00, 0.3522100E+00, 0.3536600E+00, 0.3445500E+00, &
     & 0.3316700E+00, 0.3304300E+00, 0.3419300E+00, 0.3400400E+00, &
     & 0.3660400E+00, 0.3701100E+00, 0.3694700E+00, 0.3909000E+00, &
     & 0.4033300E+00, 0.4207100E+00, 0.4657800E+00, 0.5184300E+00, &
     & 0.4133700E+00, 0.4393595E+00, 0.3667121E+00, 0.3667121E+00 /
      data (ref_adm(35,iz,14,16),iz = 1,20) / &
     & 0.3377400E+00, 0.3377400E+00, 0.3344100E+00, 0.3289700E+00, &
     & 0.3221700E+00, 0.3175700E+00, 0.3256400E+00, 0.3350300E+00, &
     & 0.3391000E+00, 0.3433200E+00, 0.3460000E+00, 0.3468700E+00, &
     & 0.3622600E+00, 0.3871200E+00, 0.4711000E+00, 0.4500000E+00, &
     & 0.6652300E+00, 0.4323114E+00, 0.3612239E+00, 0.3612239E+00 /
      data (ref_adm(35,iz,15,16),iz = 1,20) / &
     & 0.3361500E+00, 0.3361500E+00, 0.3312700E+00, 0.3203000E+00, &
     & 0.3147500E+00, 0.3128000E+00, 0.3220900E+00, 0.3296400E+00, &
     & 0.3380000E+00, 0.3309700E+00, 0.3314600E+00, 0.3390100E+00, &
     & 0.3460100E+00, 0.3738800E+00, 0.4874300E+00, 0.5674300E+00, &
     & 0.6621100E+00, 0.4253245E+00, 0.3561545E+00, 0.3561545E+00 /
      data (ref_adm(35,iz,16,16),iz = 1,20) / &
     & 0.3245200E+00, 0.3245200E+00, 0.3237000E+00, 0.3158200E+00, &
     & 0.3155500E+00, 0.3116500E+00, 0.3128200E+00, 0.3168000E+00, &
     & 0.3240700E+00, 0.3441000E+00, 0.3530900E+00, 0.3448200E+00, &
     & 0.3439700E+00, 0.3616700E+00, 0.4992800E+00, 0.6235600E+00, &
     & 0.6494400E+00, 0.4182261E+00, 0.3512305E+00, 0.3512305E+00 /
      data (ref_adm(35,iz,17,16),iz = 1,20) / &
     & 0.3271500E+00, 0.3271500E+00, 0.3408900E+00, 0.3324200E+00, &
     & 0.3152500E+00, 0.3080300E+00, 0.3223200E+00, 0.3451600E+00, &
     & 0.3608000E+00, 0.3574100E+00, 0.3729300E+00, 0.3709700E+00, &
     & 0.3764000E+00, 0.4014400E+00, 0.4033400E+00, 0.4919400E+00, &
     & 0.5461200E+00, 0.4113756E+00, 0.3460800E+00, 0.3460800E+00 /
      data (ref_adm(35,iz,18,16),iz = 1,20) / &
     & 0.3239500E+00, 0.3239500E+00, 0.3312500E+00, 0.3391100E+00, &
     & 0.3268100E+00, 0.3174100E+00, 0.3208600E+00, 0.3455500E+00, &
     & 0.3667200E+00, 0.3595800E+00, 0.3737200E+00, 0.3850300E+00, &
     & 0.3787400E+00, 0.3816100E+00, 0.4230600E+00, 0.5188700E+00, &
     & 0.5275487E+00, 0.5917420E+00, 0.6395034E+00, 0.6395034E+00 /
      data (ref_adm(35,iz,19,16),iz = 1,20) / &
     & 0.3206800E+00, 0.3206800E+00, 0.3234800E+00, 0.3302100E+00, &
     & 0.3170600E+00, 0.3266400E+00, 0.3386200E+00, 0.3396300E+00, &
     & 0.3605000E+00, 0.3447800E+00, 0.3726700E+00, 0.3895500E+00, &
     & 0.3808000E+00, 0.3953800E+00, 0.4293600E+00, 0.5253900E+00, &
     & 0.5188728E+00, 0.5786769E+00, 0.6243542E+00, 0.6243542E+00 /
      data (ref_adm(35,iz,20,16),iz = 1,20) / &
     & 0.3265400E+00, 0.3265400E+00, 0.3166300E+00, 0.3214700E+00, &
     & 0.3353700E+00, 0.3368100E+00, 0.3402500E+00, 0.3451200E+00, &
     & 0.3543200E+00, 0.3614300E+00, 0.3624900E+00, 0.3812900E+00, &
     & 0.3687000E+00, 0.3992100E+00, 0.4173800E+00, 0.4265000E+00, &
     & 0.5130212E+00, 0.5703557E+00, 0.6156498E+00, 0.6156498E+00 /
      data (ref_adm(35,iz,21,16),iz = 1,20) / &
     & 0.3225300E+00, 0.3225300E+00, 0.3233500E+00, 0.3370400E+00, &
     & 0.3353500E+00, 0.3399400E+00, 0.3423900E+00, 0.3565400E+00, &
     & 0.3599200E+00, 0.3920100E+00, 0.3688500E+00, 0.3925800E+00, &
     & 0.3805500E+00, 0.4031800E+00, 0.4419600E+00, 0.4385000E+00, &
     & 0.5083579E+00, 0.5636485E+00, 0.6108584E+00, 0.6108584E+00 /
      data (ref_adm(35,iz,22,16),iz = 1,20) / &
     & 0.3204200E+00, 0.3204200E+00, 0.3339600E+00, 0.3341300E+00, &
     & 0.3443800E+00, 0.3495600E+00, 0.3514600E+00, 0.3639300E+00, &
     & 0.3519800E+00, 0.3667100E+00, 0.3822300E+00, 0.4000500E+00, &
     & 0.4066900E+00, 0.4067000E+00, 0.4221700E+00, 0.4232900E+00, &
     & 0.6458408E+00, 0.7130882E+00, 0.8012176E+00, 0.8012176E+00 /
      data (ref_adm(35,iz,23,16),iz = 1,20) / &
     & 0.3206500E+00, 0.3206500E+00, 0.3287900E+00, 0.3391300E+00, &
     & 0.3647800E+00, 0.3569500E+00, 0.3591000E+00, 0.3686100E+00, &
     & 0.3642300E+00, 0.3797300E+00, 0.3928900E+00, 0.4038700E+00, &
     & 0.4162900E+00, 0.4017100E+00, 0.4120000E+00, 0.4143100E+00, &
     & 0.3467900E+00, 0.6935443E+00, 0.7966654E+00, 0.7966654E+00 /
      data (ref_adm(35,iz,24,16),iz = 1,20) / &
     & 0.3256700E+00, 0.3256700E+00, 0.3390400E+00, 0.3399200E+00, &
     & 0.3412600E+00, 0.3481100E+00, 0.3514700E+00, 0.3650900E+00, &
     & 0.3723600E+00, 0.3871600E+00, 0.4092900E+00, 0.4130400E+00, &
     & 0.4361200E+00, 0.4743900E+00, 0.4293900E+00, 0.4400300E+00, &
     & 0.4591000E+00, 0.6803074E+00, 0.7995576E+00, 0.7995576E+00 /
      data (ref_adm(35,iz,25,16),iz = 1,20) / &
     & 0.3426700E+00, 0.3426700E+00, 0.3416900E+00, 0.3512300E+00, &
     & 0.3572100E+00, 0.3646200E+00, 0.3730100E+00, 0.3920900E+00, &
     & 0.4051100E+00, 0.4163100E+00, 0.4377500E+00, 0.4681200E+00, &
     & 0.4972500E+00, 0.5485500E+00, 0.5170500E+00, 0.4349300E+00, &
     & 0.4094100E+00, 0.4378800E+00, 0.8075153E+00, 0.8075153E+00 /
      data (ref_adm(35,iz,26,16),iz = 1,20) / &
     & 0.3269200E+00, 0.3269200E+00, 0.3380700E+00, 0.3506800E+00, &
     & 0.3531700E+00, 0.3587300E+00, 0.3698200E+00, 0.3649200E+00, &
     & 0.3827900E+00, 0.3833400E+00, 0.3959700E+00, 0.4290500E+00, &
     & 0.4527800E+00, 0.4982300E+00, 0.5005200E+00, 0.4558300E+00, &
     & 0.4484000E+00, 0.4992100E+00, 0.8262361E+00, 0.8262361E+00 /
      data (ref_adm(35,iz,27,16),iz = 1,20) / &
     & 0.3327100E+00, 0.3327100E+00, 0.3275400E+00, 0.3489400E+00, &
     & 0.3628600E+00, 0.3503700E+00, 0.3523500E+00, 0.3647000E+00, &
     & 0.3876800E+00, 0.4009700E+00, 0.4105400E+00, 0.4416400E+00, &
     & 0.4275300E+00, 0.4940100E+00, 0.4968800E+00, 0.5083600E+00, &
     & 0.4305800E+00, 0.4216300E+00, 0.8515024E+00, 0.8515024E+00 /
      data (ref_adm(35,iz,28,16),iz = 1,20) / &
     & 0.3271800E+00, 0.3271800E+00, 0.3410100E+00, 0.3684600E+00, &
     & 0.3760900E+00, 0.3634000E+00, 0.3593900E+00, 0.3620300E+00, &
     & 0.3937200E+00, 0.3957300E+00, 0.4084900E+00, 0.4495800E+00, &
     & 0.4560900E+00, 0.4764500E+00, 0.4875900E+00, 0.5107300E+00, &
     & 0.5323400E+00, 0.6910371E+00, 0.4582200E+00, 0.4582200E+00 /
      data (ref_adm(35,iz,29,16),iz = 1,20) / &
     & 0.3466000E+00, 0.3466000E+00, 0.3539000E+00, 0.3646000E+00, &
     & 0.3683200E+00, 0.3643500E+00, 0.3711600E+00, 0.3822800E+00, &
     & 0.3950600E+00, 0.4113200E+00, 0.4295300E+00, 0.4426400E+00, &
     & 0.4478500E+00, 0.4840100E+00, 0.5266800E+00, 0.4973500E+00, &
     & 0.5595600E+00, 0.7090395E+00, 0.9133788E+00, 0.9133788E+00 /
      data (ref_adm(35,iz,30,16),iz = 1,20) / &
     & 0.3450800E+00, 0.3450800E+00, 0.3452600E+00, 0.3559300E+00, &
     & 0.3556700E+00, 0.3558900E+00, 0.3782900E+00, 0.3903600E+00, &
     & 0.3982700E+00, 0.4273200E+00, 0.4440900E+00, 0.4633000E+00, &
     & 0.4825200E+00, 0.4913800E+00, 0.5443400E+00, 0.4758200E+00, &
     & 0.5428800E+00, 0.5854700E+00, 0.9511020E+00, 0.9511020E+00 /
      data (ref_adm(35,iz,31,16),iz = 1,20) / &
     & 0.3449800E+00, 0.3449800E+00, 0.3371200E+00, 0.3548000E+00, &
     & 0.3642000E+00, 0.3670900E+00, 0.3653900E+00, 0.3871400E+00, &
     & 0.4070500E+00, 0.4411500E+00, 0.4554500E+00, 0.4556300E+00, &
     & 0.5003100E+00, 0.5079000E+00, 0.5646000E+00, 0.5542400E+00, &
     & 0.5912000E+00, 0.5902400E+00, 0.5636000E+00, 0.5636000E+00 /
      data (ref_adm(35,iz,32,16),iz = 1,20) / &
     & 0.3414400E+00, 0.3414400E+00, 0.3445600E+00, 0.3553700E+00, &
     & 0.3632000E+00, 0.3761500E+00, 0.3821700E+00, 0.4018700E+00, &
     & 0.4107100E+00, 0.4328200E+00, 0.4521300E+00, 0.4625900E+00, &
     & 0.4938700E+00, 0.5157000E+00, 0.5515100E+00, 0.5908000E+00, &
     & 0.6346000E+00, 0.7453800E+00, 0.6183300E+00, 0.6183300E+00 /
      data (ref_adm(35,iz,33,16),iz = 1,20) / &
     & 0.3236200E+00, 0.3236200E+00, 0.3221500E+00, 0.3325400E+00, &
     & 0.3373500E+00, 0.3404400E+00, 0.3609800E+00, 0.3752700E+00, &
     & 0.3855100E+00, 0.4012300E+00, 0.4268000E+00, 0.4383600E+00, &
     & 0.4627400E+00, 0.4849200E+00, 0.5264400E+00, 0.5988700E+00, &
     & 0.6094600E+00, 0.7687300E+00, 0.7200700E+00, 0.7200700E+00 /
      data (ref_adm(35,iz,34,16),iz = 1,20) / &
     & 0.3224100E+00, 0.3224100E+00, 0.3281300E+00, 0.3423400E+00, &
     & 0.3514000E+00, 0.3513800E+00, 0.3712100E+00, 0.3864100E+00, &
     & 0.3821600E+00, 0.3985100E+00, 0.4404800E+00, 0.4556000E+00, &
     & 0.4807000E+00, 0.5291300E+00, 0.5565300E+00, 0.6291100E+00, &
     & 0.6884700E+00, 0.6776700E+00, 0.6238400E+00, 0.6238400E+00 /
      data (ref_adm(35,iz,35,16),iz = 1,20) / &
     & 0.3353100E+00, 0.3353100E+00, 0.3412400E+00, 0.3356000E+00, &
     & 0.3563400E+00, 0.3688900E+00, 0.3662100E+00, 0.3781100E+00, &
     & 0.3776100E+00, 0.4015500E+00, 0.4263300E+00, 0.4771500E+00, &
     & 0.4731700E+00, 0.5665100E+00, 0.5743600E+00, 0.6573200E+00, &
     & 0.7561000E+00, 0.7714881E+00, 0.1062789E+01, 0.1062789E+01 /
      data (ref_adm(35,iz,36,16),iz = 1,20) / &
     & 0.3385000E+00, 0.3385000E+00, 0.3372600E+00, 0.3450300E+00, &
     & 0.3587600E+00, 0.3669700E+00, 0.3685600E+00, 0.3813300E+00, &
     & 0.4025600E+00, 0.4135300E+00, 0.4301800E+00, 0.4606600E+00, &
     & 0.4824700E+00, 0.5611000E+00, 0.6012900E+00, 0.6809800E+00, &
     & 0.7140500E+00, 0.7816802E+00, 0.1069338E+01, 0.1069338E+01 /
      data (ref_adm(35,iz,37,16),iz = 1,20) / &
     & 0.3391300E+00, 0.3391300E+00, 0.3507400E+00, 0.3535800E+00, &
     & 0.3478200E+00, 0.3593800E+00, 0.3737300E+00, 0.3879800E+00, &
     & 0.3889800E+00, 0.4158000E+00, 0.4138600E+00, 0.4415500E+00, &
     & 0.5204500E+00, 0.5918400E+00, 0.6241000E+00, 0.6942800E+00, &
     & 0.8123200E+00, 0.7497300E+00, 0.1076829E+01, 0.1076829E+01 /
      data (ref_adm(35,iz,38,16),iz = 1,20) / &
     & 0.3391300E+00, 0.3391300E+00, 0.3507400E+00, 0.3535800E+00, &
     & 0.3478200E+00, 0.3593800E+00, 0.3737300E+00, 0.3879800E+00, &
     & 0.3889800E+00, 0.4158000E+00, 0.4138600E+00, 0.4415500E+00, &
     & 0.5204500E+00, 0.5918400E+00, 0.6241000E+00, 0.6942800E+00, &
     & 0.8123200E+00, 0.7497300E+00, 0.1076829E+01, 0.1076829E+01 /
! Solar Zenith Angle 80.0 Albedo  0.4118128E+00
      data (ref_adm(35,iz, 1,17),iz = 1,20) / &
     & 0.2753400E+00, 0.2753400E+00, 0.2829200E+00, 0.2917800E+00, &
     & 0.3117300E+00, 0.3120200E+00, 0.3121800E+00, 0.3194300E+00, &
     & 0.3301400E+00, 0.3507900E+00, 0.3965300E+00, 0.4385000E+00, &
     & 0.4799579E+00, 0.5400207E+00, 0.6785201E+00, 0.1048419E+01, &
     & 0.1856555E+01, 0.2097395E+01, 0.2164995E+01, 0.2164995E+01 /
      data (ref_adm(35,iz, 2,17),iz = 1,20) / &
     & 0.2753400E+00, 0.2753400E+00, 0.2829200E+00, 0.2917800E+00, &
     & 0.3117300E+00, 0.3120200E+00, 0.3121800E+00, 0.3194300E+00, &
     & 0.3301400E+00, 0.3507900E+00, 0.3965300E+00, 0.4385000E+00, &
     & 0.4799579E+00, 0.5400207E+00, 0.6785201E+00, 0.1048419E+01, &
     & 0.1856555E+01, 0.2097395E+01, 0.2164995E+01, 0.2164995E+01 /
      data (ref_adm(35,iz, 3,17),iz = 1,20) / &
     & 0.2811300E+00, 0.2811300E+00, 0.2857400E+00, 0.3012900E+00, &
     & 0.2926400E+00, 0.3119400E+00, 0.3143100E+00, 0.3210800E+00, &
     & 0.3247000E+00, 0.3553200E+00, 0.3776300E+00, 0.4369100E+00, &
     & 0.4780786E+00, 0.5356896E+00, 0.6649016E+00, 0.9961182E+00, &
     & 0.1811865E+01, 0.2245844E+01, 0.5886601E+00, 0.5886601E+00 /
      data (ref_adm(35,iz, 4,17),iz = 1,20) / &
     & 0.2775700E+00, 0.2775700E+00, 0.2792800E+00, 0.2757000E+00, &
     & 0.2889200E+00, 0.2959100E+00, 0.3089700E+00, 0.3015300E+00, &
     & 0.3215100E+00, 0.3552700E+00, 0.3808100E+00, 0.4221300E+00, &
     & 0.4743552E+00, 0.5277202E+00, 0.6400037E+00, 0.9035801E+00, &
     & 0.1530465E+01, 0.2510651E+01, 0.2505972E+01, 0.2505972E+01 /
      data (ref_adm(35,iz, 5,17),iz = 1,20) / &
     & 0.2909000E+00, 0.2909000E+00, 0.2862300E+00, 0.2871100E+00, &
     & 0.2957900E+00, 0.3005900E+00, 0.3041400E+00, 0.3219500E+00, &
     & 0.3273900E+00, 0.3521200E+00, 0.3783900E+00, 0.4225200E+00, &
     & 0.4694115E+00, 0.5186423E+00, 0.6106225E+00, 0.8096823E+00, &
     & 0.1206626E+01, 0.2443994E+01, 0.3366927E+01, 0.3366927E+01 /
      data (ref_adm(35,iz, 6,17),iz = 1,20) / &
     & 0.2866400E+00, 0.2866400E+00, 0.2815100E+00, 0.2741000E+00, &
     & 0.2777200E+00, 0.2707300E+00, 0.2844800E+00, 0.2992500E+00, &
     & 0.3156000E+00, 0.3291000E+00, 0.3537700E+00, 0.3753400E+00, &
     & 0.4246900E+00, 0.4798500E+00, 0.5413400E+00, 0.6248400E+00, &
     & 0.7403600E+00, 0.8378600E+00, 0.2883395E+01, 0.2883395E+01 /
      data (ref_adm(35,iz, 7,17),iz = 1,20) / &
     & 0.2695500E+00, 0.2695500E+00, 0.2709900E+00, 0.2804200E+00, &
     & 0.2844000E+00, 0.2813600E+00, 0.2943900E+00, 0.3193400E+00, &
     & 0.3432700E+00, 0.3434600E+00, 0.3720700E+00, 0.3917200E+00, &
     & 0.4430200E+00, 0.4814600E+00, 0.5464500E+00, 0.6371700E+00, &
     & 0.7720400E+00, 0.1260543E+01, 0.1879418E+01, 0.1879418E+01 /
      data (ref_adm(35,iz, 8,17),iz = 1,20) / &
     & 0.2708400E+00, 0.2708400E+00, 0.2668600E+00, 0.2824800E+00, &
     & 0.2860600E+00, 0.2805300E+00, 0.2810800E+00, 0.3048000E+00, &
     & 0.3210600E+00, 0.3513200E+00, 0.3762200E+00, 0.3965500E+00, &
     & 0.4892500E+00, 0.5414200E+00, 0.6310200E+00, 0.6207500E+00, &
     & 0.7191500E+00, 0.1052620E+01, 0.1468647E+01, 0.1468647E+01 /
      data (ref_adm(35,iz, 9,17),iz = 1,20) / &
     & 0.2795900E+00, 0.2795900E+00, 0.2826500E+00, 0.2815600E+00, &
     & 0.2906400E+00, 0.3013900E+00, 0.3031400E+00, 0.3019300E+00, &
     & 0.3141100E+00, 0.3528700E+00, 0.3730800E+00, 0.4001800E+00, &
     & 0.4565400E+00, 0.5298700E+00, 0.6059000E+00, 0.6690500E+00, &
     & 0.7433600E+00, 0.9415687E+00, 0.1250556E+01, 0.1250556E+01 /
      data (ref_adm(35,iz,10,17),iz = 1,20) / &
     & 0.2794200E+00, 0.2794200E+00, 0.2822500E+00, 0.2897000E+00, &
     & 0.3000700E+00, 0.3040000E+00, 0.3068700E+00, 0.3139800E+00, &
     & 0.3225000E+00, 0.3269300E+00, 0.3274700E+00, 0.3731100E+00, &
     & 0.4422300E+00, 0.4886400E+00, 0.5579200E+00, 0.7641400E+00, &
     & 0.7747800E+00, 0.9017258E+00, 0.1173577E+01, 0.1173577E+01 /
      data (ref_adm(35,iz,11,17),iz = 1,20) / &
     & 0.2793400E+00, 0.2793400E+00, 0.2885600E+00, 0.2974100E+00, &
     & 0.3035800E+00, 0.2986900E+00, 0.3045800E+00, 0.3205900E+00, &
     & 0.3431100E+00, 0.3402100E+00, 0.3510100E+00, 0.3744000E+00, &
     & 0.4298400E+00, 0.5131100E+00, 0.5089600E+00, 0.6257300E+00, &
     & 0.7125200E+00, 0.8372928E+00, 0.1089708E+01, 0.1089708E+01 /
      data (ref_adm(35,iz,12,17),iz = 1,20) / &
     & 0.2844400E+00, 0.2844400E+00, 0.2981700E+00, 0.3063900E+00, &
     & 0.3018200E+00, 0.3082900E+00, 0.2950200E+00, 0.3248900E+00, &
     & 0.3487700E+00, 0.3284900E+00, 0.3673800E+00, 0.3852100E+00, &
     & 0.4297700E+00, 0.4588200E+00, 0.4661400E+00, 0.5264200E+00, &
     & 0.7089200E+00, 0.7839859E+00, 0.1002543E+01, 0.1002543E+01 /
      data (ref_adm(35,iz,13,17),iz = 1,20) / &
     & 0.2867700E+00, 0.2867700E+00, 0.2895700E+00, 0.2860800E+00, &
     & 0.2873500E+00, 0.2999200E+00, 0.3244500E+00, 0.3502900E+00, &
     & 0.3403300E+00, 0.3532000E+00, 0.3627300E+00, 0.3871700E+00, &
     & 0.3945700E+00, 0.4225900E+00, 0.4709500E+00, 0.5271500E+00, &
     & 0.5810000E+00, 0.7483335E+00, 0.9451036E+00, 0.9451036E+00 /
      data (ref_adm(35,iz,14,17),iz = 1,20) / &
     & 0.3114500E+00, 0.3114500E+00, 0.3095100E+00, 0.3052200E+00, &
     & 0.2991400E+00, 0.3013800E+00, 0.3163300E+00, 0.3267700E+00, &
     & 0.3313400E+00, 0.3338400E+00, 0.3434800E+00, 0.3693200E+00, &
     & 0.3952600E+00, 0.4095200E+00, 0.4517600E+00, 0.5562600E+00, &
     & 0.5261400E+00, 0.7242550E+00, 0.9045039E+00, 0.9045039E+00 /
      data (ref_adm(35,iz,15,17),iz = 1,20) / &
     & 0.2741400E+00, 0.2741400E+00, 0.2521500E+00, 0.2503400E+00, &
     & 0.2577000E+00, 0.2612800E+00, 0.2633100E+00, 0.2701400E+00, &
     & 0.2761600E+00, 0.2885600E+00, 0.2974200E+00, 0.3110900E+00, &
     & 0.3279800E+00, 0.3517400E+00, 0.4789600E+00, 0.4870600E+00, &
     & 0.5767700E+00, 0.7053052E+00, 0.8723452E+00, 0.8723452E+00 /
      data (ref_adm(35,iz,16,17),iz = 1,20) / &
     & 0.2825500E+00, 0.2825500E+00, 0.3100400E+00, 0.3220200E+00, &
     & 0.3119600E+00, 0.3120300E+00, 0.3170600E+00, 0.3190200E+00, &
     & 0.3230800E+00, 0.3140300E+00, 0.3309800E+00, 0.3563300E+00, &
     & 0.3829300E+00, 0.3839500E+00, 0.4437100E+00, 0.4265800E+00, &
     & 0.5968000E+00, 0.6861851E+00, 0.8438785E+00, 0.8438785E+00 /
      data (ref_adm(35,iz,17,17),iz = 1,20) / &
     & 0.2898700E+00, 0.2898700E+00, 0.3065000E+00, 0.3003100E+00, &
     & 0.3040500E+00, 0.3190200E+00, 0.3303900E+00, 0.3215300E+00, &
     & 0.3161300E+00, 0.3163100E+00, 0.3342600E+00, 0.3714300E+00, &
     & 0.3554200E+00, 0.3641900E+00, 0.3842200E+00, 0.5620600E+00, &
     & 0.5561683E+00, 0.6652057E+00, 0.8126477E+00, 0.8126477E+00 /
      data (ref_adm(35,iz,18,17),iz = 1,20) / &
     & 0.2829900E+00, 0.2829900E+00, 0.3057800E+00, 0.3135100E+00, &
     & 0.3028200E+00, 0.3127200E+00, 0.3185800E+00, 0.3174700E+00, &
     & 0.3158200E+00, 0.3307400E+00, 0.3402000E+00, 0.3529300E+00, &
     & 0.3370400E+00, 0.3760700E+00, 0.3744500E+00, 0.5289100E+00, &
     & 0.5016115E+00, 0.5471226E+00, 0.5662627E+00, 0.5662627E+00 /
      data (ref_adm(35,iz,19,17),iz = 1,20) / &
     & 0.2943600E+00, 0.2943600E+00, 0.2913200E+00, 0.3053900E+00, &
     & 0.3047900E+00, 0.3177100E+00, 0.3215800E+00, 0.3370500E+00, &
     & 0.3360300E+00, 0.3293000E+00, 0.3530700E+00, 0.3585900E+00, &
     & 0.3713500E+00, 0.4127400E+00, 0.4218900E+00, 0.3997700E+00, &
     & 0.4925814E+00, 0.5349659E+00, 0.5530796E+00, 0.5530796E+00 /
      data (ref_adm(35,iz,20,17),iz = 1,20) / &
     & 0.2909000E+00, 0.2909000E+00, 0.2870300E+00, 0.2935700E+00, &
     & 0.2939400E+00, 0.3086600E+00, 0.3207800E+00, 0.3355400E+00, &
     & 0.3271500E+00, 0.3200100E+00, 0.3470500E+00, 0.3727100E+00, &
     & 0.3641800E+00, 0.3885500E+00, 0.4241700E+00, 0.4528820E+00, &
     & 0.4859652E+00, 0.5269759E+00, 0.5454072E+00, 0.5454072E+00 /
      data (ref_adm(35,iz,21,17),iz = 1,20) / &
     & 0.3025300E+00, 0.3025300E+00, 0.3002700E+00, 0.2956400E+00, &
     & 0.3035000E+00, 0.3015200E+00, 0.3203300E+00, 0.3299700E+00, &
     & 0.3308400E+00, 0.3448600E+00, 0.3710800E+00, 0.3586700E+00, &
     & 0.3695600E+00, 0.3770000E+00, 0.4084700E+00, 0.4701600E+00, &
     & 0.4804158E+00, 0.5203447E+00, 0.5408793E+00, 0.5408793E+00 /
      data (ref_adm(35,iz,22,17),iz = 1,20) / &
     & 0.3097800E+00, 0.3097800E+00, 0.3041600E+00, 0.2960200E+00, &
     & 0.3031100E+00, 0.3177500E+00, 0.3267900E+00, 0.3349000E+00, &
     & 0.3316200E+00, 0.3286800E+00, 0.3531000E+00, 0.3803600E+00, &
     & 0.3820600E+00, 0.4064700E+00, 0.4396700E+00, 0.4439100E+00, &
     & 0.5277084E+00, 0.5822257E+00, 0.7138355E+00, 0.7138355E+00 /
      data (ref_adm(35,iz,23,17),iz = 1,20) / &
     & 0.3007800E+00, 0.3007800E+00, 0.2960700E+00, 0.2953100E+00, &
     & 0.3054100E+00, 0.3075200E+00, 0.3204800E+00, 0.3174800E+00, &
     & 0.3121300E+00, 0.3387000E+00, 0.3758700E+00, 0.3907900E+00, &
     & 0.4258100E+00, 0.3948600E+00, 0.4183100E+00, 0.4570300E+00, &
     & 0.5274732E+00, 0.5842899E+00, 0.7269896E+00, 0.7269896E+00 /
      data (ref_adm(35,iz,24,17),iz = 1,20) / &
     & 0.3000500E+00, 0.3000500E+00, 0.2848700E+00, 0.2863600E+00, &
     & 0.2979300E+00, 0.3075200E+00, 0.3180200E+00, 0.3308900E+00, &
     & 0.3372100E+00, 0.3446400E+00, 0.3746000E+00, 0.3944700E+00, &
     & 0.4374500E+00, 0.4490700E+00, 0.4533700E+00, 0.4611100E+00, &
     & 0.4764100E+00, 0.5932744E+00, 0.7477310E+00, 0.7477310E+00 /
      data (ref_adm(35,iz,25,17),iz = 1,20) / &
     & 0.2749600E+00, 0.2749600E+00, 0.2830500E+00, 0.2920600E+00, &
     & 0.3031700E+00, 0.3127300E+00, 0.3227300E+00, 0.3321000E+00, &
     & 0.3490800E+00, 0.3703800E+00, 0.3958200E+00, 0.4154100E+00, &
     & 0.4439400E+00, 0.4638200E+00, 0.4805000E+00, 0.4845500E+00, &
     & 0.5374000E+00, 0.6093213E+00, 0.7749338E+00, 0.7749338E+00 /
      data (ref_adm(35,iz,26,17),iz = 1,20) / &
     & 0.2852900E+00, 0.2852900E+00, 0.2801500E+00, 0.2679800E+00, &
     & 0.2916400E+00, 0.3123400E+00, 0.3204100E+00, 0.3265200E+00, &
     & 0.3488700E+00, 0.3365700E+00, 0.3776200E+00, 0.3873900E+00, &
     & 0.3960800E+00, 0.4570600E+00, 0.4706700E+00, 0.4978700E+00, &
     & 0.5117700E+00, 0.5383800E+00, 0.8096095E+00, 0.8096095E+00 /
      data (ref_adm(35,iz,27,17),iz = 1,20) / &
     & 0.2783100E+00, 0.2783100E+00, 0.2734300E+00, 0.2824900E+00, &
     & 0.2909800E+00, 0.3046200E+00, 0.3302000E+00, 0.3240000E+00, &
     & 0.3400600E+00, 0.3425900E+00, 0.3810000E+00, 0.4031600E+00, &
     & 0.4365000E+00, 0.4649200E+00, 0.4610800E+00, 0.4777500E+00, &
     & 0.4971300E+00, 0.7060800E+00, 0.8467879E+00, 0.8467879E+00 /
      data (ref_adm(35,iz,28,17),iz = 1,20) / &
     & 0.2758400E+00, 0.2758400E+00, 0.2814200E+00, 0.2832600E+00, &
     & 0.2908600E+00, 0.3071000E+00, 0.3278500E+00, 0.3318300E+00, &
     & 0.3509500E+00, 0.3554500E+00, 0.3867100E+00, 0.4184100E+00, &
     & 0.4401800E+00, 0.4715200E+00, 0.4962900E+00, 0.4924200E+00, &
     & 0.5666100E+00, 0.6890683E+00, 0.8886078E+00, 0.8886078E+00 /
      data (ref_adm(35,iz,29,17),iz = 1,20) / &
     & 0.2878000E+00, 0.2878000E+00, 0.2730800E+00, 0.2845400E+00, &
     & 0.3038500E+00, 0.3118200E+00, 0.3211200E+00, 0.3427900E+00, &
     & 0.3655200E+00, 0.3721300E+00, 0.3899400E+00, 0.4278100E+00, &
     & 0.4576100E+00, 0.5025000E+00, 0.5132300E+00, 0.5124300E+00, &
     & 0.5868500E+00, 0.7637405E+00, 0.9491925E+00, 0.9491925E+00 /
      data (ref_adm(35,iz,30,17),iz = 1,20) / &
     & 0.2787900E+00, 0.2787900E+00, 0.2825700E+00, 0.2951800E+00, &
     & 0.2989900E+00, 0.3132200E+00, 0.3237100E+00, 0.3358200E+00, &
     & 0.3627200E+00, 0.3689300E+00, 0.3853100E+00, 0.4391200E+00, &
     & 0.4925600E+00, 0.5226800E+00, 0.5124900E+00, 0.5536100E+00, &
     & 0.6070300E+00, 0.8285244E+00, 0.1017950E+01, 0.1017950E+01 /
      data (ref_adm(35,iz,31,17),iz = 1,20) / &
     & 0.2799100E+00, 0.2799100E+00, 0.2839100E+00, 0.2839500E+00, &
     & 0.2982400E+00, 0.3053800E+00, 0.3203800E+00, 0.3434700E+00, &
     & 0.3664500E+00, 0.3665800E+00, 0.3980500E+00, 0.4352400E+00, &
     & 0.4668300E+00, 0.4884000E+00, 0.5392900E+00, 0.5741400E+00, &
     & 0.6437600E+00, 0.8017742E+00, 0.6733400E+00, 0.6733400E+00 /
      data (ref_adm(35,iz,32,17),iz = 1,20) / &
     & 0.2953400E+00, 0.2953400E+00, 0.2935000E+00, 0.2996400E+00, &
     & 0.3093100E+00, 0.3183900E+00, 0.3091600E+00, 0.3250700E+00, &
     & 0.3554800E+00, 0.3817500E+00, 0.4097700E+00, 0.4432500E+00, &
     & 0.4649800E+00, 0.4900200E+00, 0.5059700E+00, 0.5488400E+00, &
     & 0.6619300E+00, 0.8136523E+00, 0.7294200E+00, 0.7294200E+00 /
      data (ref_adm(35,iz,33,17),iz = 1,20) / &
     & 0.2755600E+00, 0.2755600E+00, 0.2857000E+00, 0.2931100E+00, &
     & 0.2916400E+00, 0.2985700E+00, 0.3097900E+00, 0.3213800E+00, &
     & 0.3483100E+00, 0.3721900E+00, 0.3919800E+00, 0.4189300E+00, &
     & 0.4510600E+00, 0.4762200E+00, 0.5103900E+00, 0.5703900E+00, &
     & 0.6267500E+00, 0.8236880E+00, 0.7293800E+00, 0.7293800E+00 /
      data (ref_adm(35,iz,34,17),iz = 1,20) / &
     & 0.2786900E+00, 0.2786900E+00, 0.2989900E+00, 0.3044800E+00, &
     & 0.3173400E+00, 0.3131300E+00, 0.3306200E+00, 0.3553300E+00, &
     & 0.3651900E+00, 0.4027600E+00, 0.4299200E+00, 0.4397800E+00, &
     & 0.4814000E+00, 0.5092100E+00, 0.5616000E+00, 0.6497000E+00, &
     & 0.6895900E+00, 0.8293844E+00, 0.1099870E+01, 0.1099870E+01 /
      data (ref_adm(35,iz,35,17),iz = 1,20) / &
     & 0.2800200E+00, 0.2800200E+00, 0.2865800E+00, 0.3054400E+00, &
     & 0.3033500E+00, 0.3181900E+00, 0.3315400E+00, 0.3418900E+00, &
     & 0.3601900E+00, 0.3854300E+00, 0.4404000E+00, 0.4494400E+00, &
     & 0.4770800E+00, 0.5296000E+00, 0.5998000E+00, 0.6428700E+00, &
     & 0.6940300E+00, 0.1001000E+01, 0.1115652E+01, 0.1115652E+01 /
      data (ref_adm(35,iz,36,17),iz = 1,20) / &
     & 0.2837600E+00, 0.2837600E+00, 0.2940300E+00, 0.2937600E+00, &
     & 0.3116100E+00, 0.3136300E+00, 0.3344900E+00, 0.3620300E+00, &
     & 0.3746200E+00, 0.3956600E+00, 0.4399500E+00, 0.4771600E+00, &
     & 0.5060200E+00, 0.5715800E+00, 0.6111100E+00, 0.6647100E+00, &
     & 0.8130500E+00, 0.8506042E+00, 0.1129316E+01, 0.1129316E+01 /
      data (ref_adm(35,iz,37,17),iz = 1,20) / &
     & 0.2681900E+00, 0.2681900E+00, 0.2868200E+00, 0.2992100E+00, &
     & 0.3044500E+00, 0.3216000E+00, 0.3336200E+00, 0.3536700E+00, &
     & 0.3855800E+00, 0.4051700E+00, 0.4339000E+00, 0.4623200E+00, &
     & 0.5297900E+00, 0.5649600E+00, 0.6189900E+00, 0.6629900E+00, &
     & 0.7765100E+00, 0.8011600E+00, 0.1139641E+01, 0.1139641E+01 /
      data (ref_adm(35,iz,38,17),iz = 1,20) / &
     & 0.2681900E+00, 0.2681900E+00, 0.2868200E+00, 0.2992100E+00, &
     & 0.3044500E+00, 0.3216000E+00, 0.3336200E+00, 0.3536700E+00, &
     & 0.3855800E+00, 0.4051700E+00, 0.4339000E+00, 0.4623200E+00, &
     & 0.5297900E+00, 0.5649600E+00, 0.6189900E+00, 0.6629900E+00, &
     & 0.7765100E+00, 0.8011600E+00, 0.1139641E+01, 0.1139641E+01 /
! Solar Zenith Angle 85.0 Albedo  0.5893735E+00
      data (ref_adm(35,iz, 1,18),iz = 1,20) / &
     & 0.3912800E+00, 0.3912800E+00, 0.3885700E+00, 0.3977200E+00, &
     & 0.4035200E+00, 0.4217000E+00, 0.4238300E+00, 0.4276100E+00, &
     & 0.4475600E+00, 0.5178000E+00, 0.5500700E+00, 0.6070200E+00, &
     & 0.7720888E+00, 0.8389725E+00, 0.9291852E+00, 0.1038853E+01, &
     & 0.1134187E+01, 0.1162995E+01, 0.8764622E+00, 0.8764622E+00 /
      data (ref_adm(35,iz, 2,18),iz = 1,20) / &
     & 0.3912800E+00, 0.3912800E+00, 0.3885700E+00, 0.3977200E+00, &
     & 0.4035200E+00, 0.4217000E+00, 0.4238300E+00, 0.4276100E+00, &
     & 0.4475600E+00, 0.5178000E+00, 0.5500700E+00, 0.6070200E+00, &
     & 0.7720888E+00, 0.8389725E+00, 0.9291852E+00, 0.1038853E+01, &
     & 0.1134187E+01, 0.1162995E+01, 0.8764622E+00, 0.8764622E+00 /
      data (ref_adm(35,iz, 3,18),iz = 1,20) / &
     & 0.4031600E+00, 0.4031600E+00, 0.4054700E+00, 0.3855600E+00, &
     & 0.3861900E+00, 0.3968800E+00, 0.4086900E+00, 0.4518300E+00, &
     & 0.4347100E+00, 0.4845200E+00, 0.5374500E+00, 0.6271600E+00, &
     & 0.7685082E+00, 0.8339617E+00, 0.9226323E+00, 0.1029137E+01, &
     & 0.1121220E+01, 0.1147893E+01, 0.2549587E+00, 0.2549587E+00 /
      data (ref_adm(35,iz, 4,18),iz = 1,20) / &
     & 0.3973700E+00, 0.3973700E+00, 0.3946200E+00, 0.3882800E+00, &
     & 0.3946400E+00, 0.3811500E+00, 0.4073900E+00, 0.4246000E+00, &
     & 0.4482700E+00, 0.4715400E+00, 0.5819900E+00, 0.5673500E+00, &
     & 0.7606626E+00, 0.8238079E+00, 0.9079840E+00, 0.1008087E+01, &
     & 0.1093044E+01, 0.1117452E+01, 0.8422371E+00, 0.8422371E+00 /
      data (ref_adm(35,iz, 5,18),iz = 1,20) / &
     & 0.3928500E+00, 0.3928500E+00, 0.3786500E+00, 0.3887100E+00, &
     & 0.3875100E+00, 0.3947300E+00, 0.4058900E+00, 0.4306900E+00, &
     & 0.4618900E+00, 0.4889400E+00, 0.5219900E+00, 0.5621300E+00, &
     & 0.7496989E+00, 0.8091028E+00, 0.8876597E+00, 0.9793869E+00, &
     & 0.1054455E+01, 0.1076310E+01, 0.8121407E+00, 0.8121407E+00 /
      data (ref_adm(35,iz, 6,18),iz = 1,20) / &
     & 0.3840000E+00, 0.3840000E+00, 0.3758900E+00, 0.3787500E+00, &
     & 0.4032400E+00, 0.4144300E+00, 0.4435900E+00, 0.4428000E+00, &
     & 0.4657900E+00, 0.4886700E+00, 0.5307500E+00, 0.5698600E+00, &
     & 0.6674900E+00, 0.7593100E+00, 0.8276900E+00, 0.1011600E+01, &
     & 0.1189700E+01, 0.1023696E+01, 0.7786584E+00, 0.7786584E+00 /
      data (ref_adm(35,iz, 7,18),iz = 1,20) / &
     & 0.3778900E+00, 0.3778900E+00, 0.3903000E+00, 0.3945400E+00, &
     & 0.4092300E+00, 0.4406000E+00, 0.4656600E+00, 0.4890000E+00, &
     & 0.5139200E+00, 0.5154500E+00, 0.5608000E+00, 0.6608700E+00, &
     & 0.7961400E+00, 0.8977800E+00, 0.1050100E+01, 0.1380900E+01, &
     & 0.1966300E+01, 0.9617591E+00, 0.7445416E+00, 0.7445416E+00 /
      data (ref_adm(35,iz, 8,18),iz = 1,20) / &
     & 0.3782600E+00, 0.3782600E+00, 0.3801400E+00, 0.4004500E+00, &
     & 0.4019900E+00, 0.4333300E+00, 0.4643600E+00, 0.4841800E+00, &
     & 0.4733300E+00, 0.5114500E+00, 0.5670000E+00, 0.6166100E+00, &
     & 0.6895900E+00, 0.8080400E+00, 0.1051500E+01, 0.1352700E+01, &
     & 0.9018709E+00, 0.8976961E+00, 0.7047189E+00, 0.7047189E+00 /
      data (ref_adm(35,iz, 9,18),iz = 1,20) / &
     & 0.3859300E+00, 0.3859300E+00, 0.3744600E+00, 0.4038200E+00, &
     & 0.4220900E+00, 0.4181500E+00, 0.4380600E+00, 0.4463700E+00, &
     & 0.4538300E+00, 0.4909800E+00, 0.5727200E+00, 0.5814600E+00, &
     & 0.6816300E+00, 0.8282000E+00, 0.9764300E+00, 0.1191800E+01, &
     & 0.1477700E+01, 0.8366317E+00, 0.6643502E+00, 0.6643502E+00 /
      data (ref_adm(35,iz,10,18),iz = 1,20) / &
     & 0.3927300E+00, 0.3927300E+00, 0.3850300E+00, 0.4105500E+00, &
     & 0.4393800E+00, 0.4200300E+00, 0.4052800E+00, 0.4303100E+00, &
     & 0.4599900E+00, 0.5345400E+00, 0.5466500E+00, 0.6367600E+00, &
     & 0.7132000E+00, 0.8282900E+00, 0.9112900E+00, 0.1317300E+01, &
     & 0.1902900E+01, 0.7806728E+00, 0.6280270E+00, 0.6280270E+00 /
      data (ref_adm(35,iz,11,18),iz = 1,20) / &
     & 0.4026200E+00, 0.4026200E+00, 0.4002600E+00, 0.4052000E+00, &
     & 0.4384700E+00, 0.4063100E+00, 0.4101600E+00, 0.4208700E+00, &
     & 0.5029800E+00, 0.5004400E+00, 0.5476700E+00, 0.5793800E+00, &
     & 0.7185200E+00, 0.7888200E+00, 0.8490000E+00, 0.1401900E+01, &
     & 0.1283700E+01, 0.7305536E+00, 0.5952945E+00, 0.5952945E+00 /
      data (ref_adm(35,iz,12,18),iz = 1,20) / &
     & 0.4157200E+00, 0.4157200E+00, 0.4255400E+00, 0.4358400E+00, &
     & 0.4207600E+00, 0.4193900E+00, 0.4118000E+00, 0.4503700E+00, &
     & 0.5039100E+00, 0.5183500E+00, 0.5375300E+00, 0.6457100E+00, &
     & 0.6879000E+00, 0.7114600E+00, 0.8487200E+00, 0.9618600E+00, &
     & 0.7143141E+00, 0.6868921E+00, 0.5669014E+00, 0.5669014E+00 /
      data (ref_adm(35,iz,13,18),iz = 1,20) / &
     & 0.4271700E+00, 0.4271700E+00, 0.4290400E+00, 0.4124300E+00, &
     & 0.4039500E+00, 0.4192700E+00, 0.4549700E+00, 0.4523600E+00, &
     & 0.4818400E+00, 0.4870700E+00, 0.5268600E+00, 0.5448700E+00, &
     & 0.6515300E+00, 0.7017200E+00, 0.7028900E+00, 0.9470400E+00, &
     & 0.3300500E+01, 0.2700400E+01, 0.5418741E+00, 0.5418741E+00 /
      data (ref_adm(35,iz,14,18),iz = 1,20) / &
     & 0.4211800E+00, 0.4211800E+00, 0.3801700E+00, 0.3782100E+00, &
     & 0.3743700E+00, 0.3724900E+00, 0.3822500E+00, 0.3744100E+00, &
     & 0.3812900E+00, 0.3774900E+00, 0.4176600E+00, 0.4205400E+00, &
     & 0.4579500E+00, 0.5046500E+00, 0.7911600E+00, 0.9586300E+00, &
     & 0.1530900E+01, 0.6158515E+00, 0.5205624E+00, 0.5205624E+00 /
      data (ref_adm(35,iz,15,18),iz = 1,20) / &
     & 0.3796100E+00, 0.3796100E+00, 0.3599800E+00, 0.3525900E+00, &
     & 0.3498600E+00, 0.3508800E+00, 0.3563700E+00, 0.3615500E+00, &
     & 0.3589800E+00, 0.3571800E+00, 0.3630800E+00, 0.3633000E+00, &
     & 0.3978300E+00, 0.4269700E+00, 0.8535000E+00, 0.1105200E+01, &
     & 0.1213800E+01, 0.5865386E+00, 0.5020114E+00, 0.5020114E+00 /
      data (ref_adm(35,iz,16,18),iz = 1,20) / &
     & 0.3917200E+00, 0.3917200E+00, 0.3904000E+00, 0.3937500E+00, &
     & 0.4032200E+00, 0.4046700E+00, 0.4013100E+00, 0.4064600E+00, &
     & 0.4186800E+00, 0.4222800E+00, 0.4061400E+00, 0.4180400E+00, &
     & 0.4813600E+00, 0.4814000E+00, 0.8350700E+00, 0.1022900E+01, &
     & 0.5907734E+00, 0.5618941E+00, 0.4860540E+00, 0.4860540E+00 /
      data (ref_adm(35,iz,17,18),iz = 1,20) / &
     & 0.3894900E+00, 0.3894900E+00, 0.4131800E+00, 0.4074100E+00, &
     & 0.3982200E+00, 0.3904900E+00, 0.4052500E+00, 0.4396500E+00, &
     & 0.4567900E+00, 0.4594800E+00, 0.4367400E+00, 0.4684900E+00, &
     & 0.6126900E+00, 0.6201200E+00, 0.6792600E+00, 0.8983000E+00, &
     & 0.5695624E+00, 0.5410417E+00, 0.4729862E+00, 0.4729862E+00 /
      data (ref_adm(35,iz,18,18),iz = 1,20) / &
     & 0.3911000E+00, 0.3911000E+00, 0.3969200E+00, 0.4027700E+00, &
     & 0.3988900E+00, 0.3878300E+00, 0.4083300E+00, 0.4220300E+00, &
     & 0.4452400E+00, 0.4481600E+00, 0.4236600E+00, 0.4573600E+00, &
     & 0.6040000E+00, 0.6284700E+00, 0.7991900E+00, 0.7000900E+00, &
     & 0.9010448E+00, 0.1120333E+01, 0.1600683E+01, 0.1600683E+01 /
      data (ref_adm(35,iz,19,18),iz = 1,20) / &
     & 0.4136400E+00, 0.4136400E+00, 0.4138000E+00, 0.4151200E+00, &
     & 0.4078200E+00, 0.4000400E+00, 0.4029800E+00, 0.4165300E+00, &
     & 0.4541400E+00, 0.4206500E+00, 0.4260000E+00, 0.4384900E+00, &
     & 0.5158100E+00, 0.5201500E+00, 0.5059200E+00, 0.7482855E+00, &
     & 0.8655463E+00, 0.1073676E+01, 0.1546542E+01, 0.1546542E+01 /
      data (ref_adm(35,iz,20,18),iz = 1,20) / &
     & 0.4411100E+00, 0.4411100E+00, 0.4233100E+00, 0.4097600E+00, &
     & 0.3961700E+00, 0.4015900E+00, 0.4159300E+00, 0.4589600E+00, &
     & 0.4506100E+00, 0.4426400E+00, 0.4413300E+00, 0.4553800E+00, &
     & 0.5493100E+00, 0.5161800E+00, 0.5339100E+00, 0.7273138E+00, &
     & 0.8391543E+00, 0.1038292E+01, 0.1514135E+01, 0.1514135E+01 /
      data (ref_adm(35,iz,21,18),iz = 1,20) / &
     & 0.4423200E+00, 0.4423200E+00, 0.4090100E+00, 0.3878200E+00, &
     & 0.3987500E+00, 0.3954700E+00, 0.4208300E+00, 0.4586700E+00, &
     & 0.4372600E+00, 0.4467200E+00, 0.4681900E+00, 0.4539800E+00, &
     & 0.5218800E+00, 0.5227700E+00, 0.4904100E+00, 0.7078917E+00, &
     & 0.8156627E+00, 0.1009294E+01, 0.1493972E+01, 0.1493972E+01 /
      data (ref_adm(35,iz,22,18),iz = 1,20) / &
     & 0.4119500E+00, 0.4119500E+00, 0.4136600E+00, 0.3901300E+00, &
     & 0.3960900E+00, 0.4079000E+00, 0.4279500E+00, 0.4462000E+00, &
     & 0.4267600E+00, 0.4331900E+00, 0.4574500E+00, 0.4735900E+00, &
     & 0.5923800E+00, 0.4999100E+00, 0.4617600E+00, 0.7305283E+00, &
     & 0.8218877E+00, 0.9915898E+00, 0.1459011E+01, 0.1459011E+01 /
      data (ref_adm(35,iz,23,18),iz = 1,20) / &
     & 0.4083500E+00, 0.4083500E+00, 0.3945900E+00, 0.4096700E+00, &
     & 0.4325100E+00, 0.4332600E+00, 0.4586200E+00, 0.4570500E+00, &
     & 0.4590600E+00, 0.5025400E+00, 0.4992100E+00, 0.4877400E+00, &
     & 0.5419900E+00, 0.5625600E+00, 0.5446200E+00, 0.7227825E+00, &
     & 0.8125571E+00, 0.9828424E+00, 0.1477404E+01, 0.1477404E+01 /
      data (ref_adm(35,iz,24,18),iz = 1,20) / &
     & 0.4107100E+00, 0.4107100E+00, 0.4037300E+00, 0.4001800E+00, &
     & 0.4073600E+00, 0.4096500E+00, 0.4225100E+00, 0.4337900E+00, &
     & 0.4566000E+00, 0.4714000E+00, 0.5009700E+00, 0.5403000E+00, &
     & 0.6075800E+00, 0.7124700E+00, 0.7780400E+00, 0.7192614E+00, &
     & 0.8096184E+00, 0.9816524E+00, 0.1510443E+01, 0.1510443E+01 /
      data (ref_adm(35,iz,25,18),iz = 1,20) / &
     & 0.3896600E+00, 0.3896600E+00, 0.3846700E+00, 0.4076900E+00, &
     & 0.4238600E+00, 0.4338500E+00, 0.4496000E+00, 0.4655300E+00, &
     & 0.4806300E+00, 0.4695200E+00, 0.4979800E+00, 0.5146200E+00, &
     & 0.5777100E+00, 0.6642300E+00, 0.6682800E+00, 0.7189952E+00, &
     & 0.8111973E+00, 0.9879395E+00, 0.1555204E+01, 0.1555204E+01 /
      data (ref_adm(35,iz,26,18),iz = 1,20) / &
     & 0.3934900E+00, 0.3934900E+00, 0.3958400E+00, 0.3926800E+00, &
     & 0.4118700E+00, 0.4085200E+00, 0.4241400E+00, 0.4260200E+00, &
     & 0.4579700E+00, 0.4574200E+00, 0.4798100E+00, 0.5204700E+00, &
     & 0.6058000E+00, 0.6853900E+00, 0.6587600E+00, 0.7260415E+00, &
     & 0.8213788E+00, 0.1006294E+01, 0.1616875E+01, 0.1616875E+01 /
      data (ref_adm(35,iz,27,18),iz = 1,20) / &
     & 0.3945400E+00, 0.3945400E+00, 0.4189800E+00, 0.3839200E+00, &
     & 0.4161600E+00, 0.4009500E+00, 0.4109700E+00, 0.4270500E+00, &
     & 0.4515500E+00, 0.4935200E+00, 0.5235900E+00, 0.5438100E+00, &
     & 0.6012600E+00, 0.6608900E+00, 0.7201000E+00, 0.7376752E+00, &
     & 0.7690500E+00, 0.1031242E+01, 0.1688037E+01, 0.1688037E+01 /
      data (ref_adm(35,iz,28,18),iz = 1,20) / &
     & 0.3968400E+00, 0.3968400E+00, 0.4112700E+00, 0.3887400E+00, &
     & 0.3789000E+00, 0.3997500E+00, 0.4015500E+00, 0.4294200E+00, &
     & 0.4769000E+00, 0.5232600E+00, 0.5406800E+00, 0.5570100E+00, &
     & 0.6425700E+00, 0.7739500E+00, 0.7306900E+00, 0.7596500E+00, &
     & 0.9993400E+00, 0.1061156E+01, 0.1764383E+01, 0.1764383E+01 /
      data (ref_adm(35,iz,29,18),iz = 1,20) / &
     & 0.4027500E+00, 0.4027500E+00, 0.3939000E+00, 0.3823900E+00, &
     & 0.4076700E+00, 0.4197500E+00, 0.4416700E+00, 0.4392300E+00, &
     & 0.4880800E+00, 0.5382500E+00, 0.5135100E+00, 0.5608100E+00, &
     & 0.6336600E+00, 0.7114800E+00, 0.7763400E+00, 0.7109000E+00, &
     & 0.1071700E+01, 0.1099216E+01, 0.1847487E+01, 0.1847487E+01 /
      data (ref_adm(35,iz,30,18),iz = 1,20) / &
     & 0.3889100E+00, 0.3889100E+00, 0.3756800E+00, 0.4013700E+00, &
     & 0.4185900E+00, 0.4493000E+00, 0.4399800E+00, 0.4600300E+00, &
     & 0.4744400E+00, 0.5166300E+00, 0.5625600E+00, 0.6024900E+00, &
     & 0.7062500E+00, 0.7463700E+00, 0.8226300E+00, 0.9534200E+00, &
     & 0.9095832E+00, 0.1143029E+01, 0.1935823E+01, 0.1935823E+01 /
      data (ref_adm(35,iz,31,18),iz = 1,20) / &
     & 0.3963900E+00, 0.3963900E+00, 0.3823400E+00, 0.3884500E+00, &
     & 0.4337700E+00, 0.4444900E+00, 0.4482500E+00, 0.4502700E+00, &
     & 0.4953700E+00, 0.5624200E+00, 0.5994400E+00, 0.5749900E+00, &
     & 0.7223900E+00, 0.8217700E+00, 0.8592800E+00, 0.8519300E+00, &
     & 0.9396983E+00, 0.1187078E+01, 0.2020879E+01, 0.2020879E+01 /
      data (ref_adm(35,iz,32,18),iz = 1,20) / &
     & 0.4101300E+00, 0.4101300E+00, 0.4014000E+00, 0.4140700E+00, &
     & 0.4276400E+00, 0.4397600E+00, 0.4645500E+00, 0.4988900E+00, &
     & 0.5217600E+00, 0.5490100E+00, 0.6015100E+00, 0.6681600E+00, &
     & 0.7883200E+00, 0.9134500E+00, 0.1029400E+01, 0.1136400E+01, &
     & 0.1120400E+01, 0.1233401E+01, 0.2105798E+01, 0.2105798E+01 /
      data (ref_adm(35,iz,33,18),iz = 1,20) / &
     & 0.3778100E+00, 0.3778100E+00, 0.4036900E+00, 0.4004400E+00, &
     & 0.4229500E+00, 0.4434700E+00, 0.4636000E+00, 0.4920900E+00, &
     & 0.5351600E+00, 0.5555500E+00, 0.5920500E+00, 0.6392300E+00, &
     & 0.6878700E+00, 0.7334500E+00, 0.8076300E+00, 0.9015400E+00, &
     & 0.9137200E+00, 0.1256171E+01, 0.2167305E+01, 0.2167305E+01 /
      data (ref_adm(35,iz,34,18),iz = 1,20) / &
     & 0.3942100E+00, 0.3942100E+00, 0.3970500E+00, 0.4060200E+00, &
     & 0.4271500E+00, 0.4358300E+00, 0.4536900E+00, 0.4920400E+00, &
     & 0.5177900E+00, 0.5769800E+00, 0.6218300E+00, 0.6384500E+00, &
     & 0.6889600E+00, 0.8359400E+00, 0.9526000E+00, 0.1126500E+01, &
     & 0.1448300E+01, 0.1247769E+01, 0.2194625E+01, 0.2194625E+01 /
      data (ref_adm(35,iz,35,18),iz = 1,20) / &
     & 0.4063700E+00, 0.4063700E+00, 0.3999000E+00, 0.4196300E+00, &
     & 0.4311000E+00, 0.4435100E+00, 0.4625200E+00, 0.4816900E+00, &
     & 0.5051200E+00, 0.5553100E+00, 0.5625700E+00, 0.6560800E+00, &
     & 0.7239500E+00, 0.8346900E+00, 0.1017800E+01, 0.1319900E+01, &
     & 0.1724200E+01, 0.1250439E+01, 0.2223334E+01, 0.2223334E+01 /
      data (ref_adm(35,iz,36,18),iz = 1,20) / &
     & 0.3989200E+00, 0.3989200E+00, 0.4256400E+00, 0.4323100E+00, &
     & 0.4312400E+00, 0.4545500E+00, 0.4589900E+00, 0.4734800E+00, &
     & 0.5095900E+00, 0.5239000E+00, 0.5994900E+00, 0.6472100E+00, &
     & 0.7384100E+00, 0.9042700E+00, 0.1045500E+01, 0.1129200E+01, &
     & 0.1190200E+01, 0.1269464E+01, 0.2257051E+01, 0.2257051E+01 /
      data (ref_adm(35,iz,37,18),iz = 1,20) / &
     & 0.4121700E+00, 0.4121700E+00, 0.4340900E+00, 0.4708900E+00, &
     & 0.4795200E+00, 0.4673200E+00, 0.4536800E+00, 0.4778900E+00, &
     & 0.5007700E+00, 0.5215900E+00, 0.5964100E+00, 0.6800300E+00, &
     & 0.7628000E+00, 0.9025000E+00, 0.1131200E+01, 0.9097900E+00, &
     & 0.1631000E+01, 0.1336148E+01, 0.2312904E+01, 0.2312904E+01 /
      data (ref_adm(35,iz,38,18),iz = 1,20) / &
     & 0.4121700E+00, 0.4121700E+00, 0.4340900E+00, 0.4708900E+00, &
     & 0.4795200E+00, 0.4673200E+00, 0.4536800E+00, 0.4778900E+00, &
     & 0.5007700E+00, 0.5215900E+00, 0.5964100E+00, 0.6800300E+00, &
     & 0.7628000E+00, 0.9025000E+00, 0.1131200E+01, 0.9097900E+00, &
     & 0.1631000E+01, 0.1336148E+01, 0.2312904E+01, 0.2312904E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(36,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(36,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(36,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9999000E+04
      data (ref_adm(36,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.9999000E+04
      data (ref_adm(36,iz, 1, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 2, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 3, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 4, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 5, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 6, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 7, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 8, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 9, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,10, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,11, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,12, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,13, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,14, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,15, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,16, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,17, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,22, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,23, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,24, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,25, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,26, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,27, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,28, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,29, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,30, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,31, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,32, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,33, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,34, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,35, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,36, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,37, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,38, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 25.0 Albedo -0.9999000E+04
      data (ref_adm(36,iz, 1, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 2, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 3, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 4, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 5, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 6, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 7, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 8, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 9, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,10, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,11, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,12, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,13, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,14, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,15, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,16, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,17, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,18, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,19, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,20, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,21, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,22, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,23, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,24, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,25, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,26, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,27, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,28, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,29, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,30, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,31, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,32, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,33, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,34, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,35, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,36, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,37, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,38, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 30.0 Albedo -0.9999000E+04
      data (ref_adm(36,iz, 1, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 2, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 3, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 4, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 5, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 6, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 7, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 8, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz, 9, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,10, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,11, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,12, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,13, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,14, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,15, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,16, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,17, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,18, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,19, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,20, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,21, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,22, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,23, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,24, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,25, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,26, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,27, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,28, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,29, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,30, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,31, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,32, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,33, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,34, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,35, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,36, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,37, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(36,iz,38, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 35.0 Albedo  0.4822494E+00
      data (ref_adm(36,iz, 1, 8),iz = 1,20) / &
     & 0.3765500E+00, 0.3765500E+00, 0.5034630E+00, 0.5002853E+00, &
     & 0.4977734E+00, 0.4960555E+00, 0.4930275E+00, 0.4878690E+00, &
     & 0.4812431E+00, 0.4733090E+00, 0.4646798E+00, 0.4526994E+00, &
     & 0.4387160E+00, 0.4255483E+00, 0.4066386E+00, 0.3817366E+00, &
     & 0.3560459E+00, 0.3224322E+00, 0.2630796E+00, 0.2630796E+00 /
      data (ref_adm(36,iz, 2, 8),iz = 1,20) / &
     & 0.3765500E+00, 0.3765500E+00, 0.5034630E+00, 0.5002853E+00, &
     & 0.4977734E+00, 0.4960555E+00, 0.4930275E+00, 0.4878690E+00, &
     & 0.4812431E+00, 0.4733090E+00, 0.4646798E+00, 0.4526994E+00, &
     & 0.4387160E+00, 0.4255483E+00, 0.4066386E+00, 0.3817366E+00, &
     & 0.3560459E+00, 0.3224322E+00, 0.2630796E+00, 0.2630796E+00 /
      data (ref_adm(36,iz, 3, 8),iz = 1,20) / &
     & 0.5126367E+00, 0.5126367E+00, 0.3884400E+00, 0.5002853E+00, &
     & 0.4977734E+00, 0.4960555E+00, 0.4930275E+00, 0.4878689E+00, &
     & 0.4812431E+00, 0.4733090E+00, 0.4646797E+00, 0.4526994E+00, &
     & 0.4387160E+00, 0.4255483E+00, 0.4066386E+00, 0.3817366E+00, &
     & 0.3560459E+00, 0.3224322E+00, 0.2630796E+00, 0.2630796E+00 /
      data (ref_adm(36,iz, 4, 8),iz = 1,20) / &
     & 0.5126367E+00, 0.5126367E+00, 0.5034630E+00, 0.5002853E+00, &
     & 0.4977734E+00, 0.4960555E+00, 0.4930275E+00, 0.4878690E+00, &
     & 0.4812431E+00, 0.4733090E+00, 0.4646798E+00, 0.4526994E+00, &
     & 0.4387160E+00, 0.4255483E+00, 0.4066386E+00, 0.3817366E+00, &
     & 0.3560459E+00, 0.3224322E+00, 0.2630796E+00, 0.2630796E+00 /
      data (ref_adm(36,iz, 5, 8),iz = 1,20) / &
     & 0.5126367E+00, 0.5126367E+00, 0.5034630E+00, 0.5002853E+00, &
     & 0.4977734E+00, 0.4960555E+00, 0.4930275E+00, 0.4878689E+00, &
     & 0.4812431E+00, 0.4733090E+00, 0.4646797E+00, 0.4526994E+00, &
     & 0.4387160E+00, 0.4255483E+00, 0.4066386E+00, 0.3817366E+00, &
     & 0.3560459E+00, 0.3224322E+00, 0.2630796E+00, 0.2630796E+00 /
      data (ref_adm(36,iz, 6, 8),iz = 1,20) / &
     & 0.5126367E+00, 0.5126367E+00, 0.5034630E+00, 0.5002853E+00, &
     & 0.4977734E+00, 0.4960555E+00, 0.4930275E+00, 0.4878690E+00, &
     & 0.4812431E+00, 0.4733090E+00, 0.4646798E+00, 0.4526994E+00, &
     & 0.4387160E+00, 0.4255483E+00, 0.4066386E+00, 0.3817366E+00, &
     & 0.3560459E+00, 0.3224322E+00, 0.2630796E+00, 0.2630796E+00 /
      data (ref_adm(36,iz, 7, 8),iz = 1,20) / &
     & 0.5126367E+00, 0.5126367E+00, 0.5034630E+00, 0.5002853E+00, &
     & 0.4977734E+00, 0.4960555E+00, 0.4930275E+00, 0.4878689E+00, &
     & 0.4812431E+00, 0.4733090E+00, 0.4646797E+00, 0.4526994E+00, &
     & 0.4387160E+00, 0.4255483E+00, 0.4066386E+00, 0.3817366E+00, &
     & 0.3560459E+00, 0.3224322E+00, 0.2630796E+00, 0.2630796E+00 /
      data (ref_adm(36,iz, 8, 8),iz = 1,20) / &
     & 0.5126367E+00, 0.5126367E+00, 0.5034630E+00, 0.5002853E+00, &
     & 0.4977734E+00, 0.4960555E+00, 0.4930275E+00, 0.4878690E+00, &
     & 0.4812431E+00, 0.4733090E+00, 0.4646798E+00, 0.4526994E+00, &
     & 0.4387160E+00, 0.4255483E+00, 0.4066386E+00, 0.3817366E+00, &
     & 0.3560459E+00, 0.3224322E+00, 0.2630796E+00, 0.2630796E+00 /
      data (ref_adm(36,iz, 9, 8),iz = 1,20) / &
     & 0.5126367E+00, 0.5126367E+00, 0.5034630E+00, 0.5002853E+00, &
     & 0.4977734E+00, 0.4960555E+00, 0.4930275E+00, 0.4878689E+00, &
     & 0.4812431E+00, 0.4733090E+00, 0.4646797E+00, 0.4526994E+00, &
     & 0.4387160E+00, 0.4255483E+00, 0.4066386E+00, 0.3817366E+00, &
     & 0.3560459E+00, 0.3224322E+00, 0.2630796E+00, 0.2630796E+00 /
      data (ref_adm(36,iz,10, 8),iz = 1,20) / &
     & 0.5126367E+00, 0.5126367E+00, 0.5034630E+00, 0.5002853E+00, &
     & 0.4977734E+00, 0.4960555E+00, 0.4930275E+00, 0.4878690E+00, &
     & 0.4812431E+00, 0.4733090E+00, 0.4646798E+00, 0.4526994E+00, &
     & 0.4387160E+00, 0.4255483E+00, 0.4066386E+00, 0.3817366E+00, &
     & 0.3560459E+00, 0.3224322E+00, 0.2630796E+00, 0.2630796E+00 /
      data (ref_adm(36,iz,11, 8),iz = 1,20) / &
     & 0.5126367E+00, 0.5126367E+00, 0.5034630E+00, 0.5002853E+00, &
     & 0.4977734E+00, 0.4960555E+00, 0.4930275E+00, 0.4878689E+00, &
     & 0.4812431E+00, 0.4733090E+00, 0.4646797E+00, 0.4526994E+00, &
     & 0.4387160E+00, 0.4255483E+00, 0.4066386E+00, 0.3817366E+00, &
     & 0.3560459E+00, 0.3224322E+00, 0.2630796E+00, 0.2630796E+00 /
      data (ref_adm(36,iz,12, 8),iz = 1,20) / &
     & 0.5966000E+00, 0.5966000E+00, 0.5034630E+00, 0.5002853E+00, &
     & 0.4977734E+00, 0.4960555E+00, 0.4930275E+00, 0.4878690E+00, &
     & 0.4812431E+00, 0.4733090E+00, 0.4646798E+00, 0.4526994E+00, &
     & 0.4387160E+00, 0.4255483E+00, 0.4066386E+00, 0.3817366E+00, &
     & 0.3560459E+00, 0.3224322E+00, 0.2630796E+00, 0.2630796E+00 /
      data (ref_adm(36,iz,13, 8),iz = 1,20) / &
     & 0.4819600E+00, 0.4819600E+00, 0.6388300E+00, 0.5002853E+00, &
     & 0.4977734E+00, 0.4960555E+00, 0.4930275E+00, 0.4883100E+00, &
     & 0.4910800E+00, 0.4733090E+00, 0.4646797E+00, 0.4526994E+00, &
     & 0.4387160E+00, 0.4255483E+00, 0.4066386E+00, 0.3817366E+00, &
     & 0.3560459E+00, 0.3224322E+00, 0.2630796E+00, 0.2630796E+00 /
      data (ref_adm(36,iz,14, 8),iz = 1,20) / &
     & 0.5126367E+00, 0.5126367E+00, 0.5034630E+00, 0.5002853E+00, &
     & 0.4977734E+00, 0.4960555E+00, 0.4930275E+00, 0.4878690E+00, &
     & 0.4812431E+00, 0.4733090E+00, 0.4646798E+00, 0.4526994E+00, &
     & 0.4387160E+00, 0.4255483E+00, 0.4066386E+00, 0.3817366E+00, &
     & 0.3560459E+00, 0.3224322E+00, 0.2630796E+00, 0.2630796E+00 /
      data (ref_adm(36,iz,15, 8),iz = 1,20) / &
     & 0.5126367E+00, 0.5126367E+00, 0.5034630E+00, 0.5002853E+00, &
     & 0.4977734E+00, 0.4960555E+00, 0.4930275E+00, 0.4878689E+00, &
     & 0.4812431E+00, 0.4733090E+00, 0.4646797E+00, 0.4526994E+00, &
     & 0.4387160E+00, 0.4255483E+00, 0.4066386E+00, 0.3817366E+00, &
     & 0.3560459E+00, 0.3224322E+00, 0.2630796E+00, 0.2630796E+00 /
      data (ref_adm(36,iz,16, 8),iz = 1,20) / &
     & 0.5637800E+00, 0.5637800E+00, 0.5034630E+00, 0.5002853E+00, &
     & 0.4977734E+00, 0.4960555E+00, 0.4930275E+00, 0.4878690E+00, &
     & 0.4812431E+00, 0.4733090E+00, 0.4646798E+00, 0.4526994E+00, &
     & 0.4387160E+00, 0.4255483E+00, 0.4066386E+00, 0.3817366E+00, &
     & 0.3560459E+00, 0.3224322E+00, 0.2630796E+00, 0.2630796E+00 /
      data (ref_adm(36,iz,17, 8),iz = 1,20) / &
     & 0.5126367E+00, 0.5126367E+00, 0.5034630E+00, 0.5002853E+00, &
     & 0.4977734E+00, 0.4960555E+00, 0.4930275E+00, 0.4878689E+00, &
     & 0.4812431E+00, 0.4733090E+00, 0.4646797E+00, 0.4526994E+00, &
     & 0.4387160E+00, 0.4255483E+00, 0.4066386E+00, 0.3817366E+00, &
     & 0.3560459E+00, 0.3224322E+00, 0.2630796E+00, 0.2630796E+00 /
      data (ref_adm(36,iz,18, 8),iz = 1,20) / &
     & 0.4533752E+00, 0.4533752E+00, 0.4452621E+00, 0.4424516E+00, &
     & 0.4402302E+00, 0.4387108E+00, 0.4360329E+00, 0.4314707E+00, &
     & 0.4256108E+00, 0.4185939E+00, 0.4109622E+00, 0.4003668E+00, &
     & 0.3879999E+00, 0.3763543E+00, 0.3596306E+00, 0.3376073E+00, &
     & 0.3148865E+00, 0.2851586E+00, 0.2326673E+00, 0.2326673E+00 /
      data (ref_adm(36,iz,19, 8),iz = 1,20) / &
     & 0.4533752E+00, 0.4533752E+00, 0.4452621E+00, 0.4424517E+00, &
     & 0.4402301E+00, 0.4387108E+00, 0.4360329E+00, 0.4314706E+00, &
     & 0.4256108E+00, 0.4185939E+00, 0.4109621E+00, 0.4003668E+00, &
     & 0.3879999E+00, 0.3763543E+00, 0.3596306E+00, 0.3376073E+00, &
     & 0.3148865E+00, 0.2851586E+00, 0.2326673E+00, 0.2326673E+00 /
      data (ref_adm(36,iz,20, 8),iz = 1,20) / &
     & 0.4533752E+00, 0.4533752E+00, 0.4452621E+00, 0.4424516E+00, &
     & 0.4402302E+00, 0.4387108E+00, 0.4360329E+00, 0.3264000E+00, &
     & 0.4256108E+00, 0.4185939E+00, 0.4109622E+00, 0.4003668E+00, &
     & 0.3879999E+00, 0.3763543E+00, 0.3596306E+00, 0.3376073E+00, &
     & 0.3148865E+00, 0.2851586E+00, 0.2326673E+00, 0.2326673E+00 /
      data (ref_adm(36,iz,21, 8),iz = 1,20) / &
     & 0.4533752E+00, 0.4533752E+00, 0.4452621E+00, 0.4424517E+00, &
     & 0.4402301E+00, 0.4387108E+00, 0.4360329E+00, 0.4314706E+00, &
     & 0.4256108E+00, 0.4185939E+00, 0.4109621E+00, 0.4003668E+00, &
     & 0.3879999E+00, 0.3763543E+00, 0.3596306E+00, 0.3376073E+00, &
     & 0.3148865E+00, 0.2851586E+00, 0.2326673E+00, 0.2326673E+00 /
      data (ref_adm(36,iz,22, 8),iz = 1,20) / &
     & 0.5981249E+00, 0.5981249E+00, 0.5874215E+00, 0.5837137E+00, &
     & 0.5807830E+00, 0.5787786E+00, 0.5752457E+00, 0.5692268E+00, &
     & 0.5614961E+00, 0.5522389E+00, 0.5421706E+00, 0.5281924E+00, &
     & 0.5118771E+00, 0.4965135E+00, 0.4744503E+00, 0.4453957E+00, &
     & 0.4154207E+00, 0.3762016E+00, 0.3069513E+00, 0.3069513E+00 /
      data (ref_adm(36,iz,23, 8),iz = 1,20) / &
     & 0.5981249E+00, 0.5981249E+00, 0.5874215E+00, 0.5837137E+00, &
     & 0.5807829E+00, 0.5787786E+00, 0.5752457E+00, 0.5692268E+00, &
     & 0.5614961E+00, 0.5522389E+00, 0.5421706E+00, 0.5281924E+00, &
     & 0.5118771E+00, 0.4965135E+00, 0.4744503E+00, 0.4453957E+00, &
     & 0.4154207E+00, 0.3762016E+00, 0.3069513E+00, 0.3069513E+00 /
      data (ref_adm(36,iz,24, 8),iz = 1,20) / &
     & 0.5981249E+00, 0.5981249E+00, 0.5874215E+00, 0.5837137E+00, &
     & 0.5807830E+00, 0.5787786E+00, 0.5752457E+00, 0.5692268E+00, &
     & 0.5614961E+00, 0.5522389E+00, 0.5421706E+00, 0.5281924E+00, &
     & 0.5118771E+00, 0.4965135E+00, 0.4744503E+00, 0.4453957E+00, &
     & 0.4154207E+00, 0.3762016E+00, 0.3069513E+00, 0.3069513E+00 /
      data (ref_adm(36,iz,25, 8),iz = 1,20) / &
     & 0.5981249E+00, 0.5981249E+00, 0.5874215E+00, 0.5837137E+00, &
     & 0.5807829E+00, 0.5787786E+00, 0.5752457E+00, 0.5692268E+00, &
     & 0.5614961E+00, 0.5522389E+00, 0.5421706E+00, 0.5281924E+00, &
     & 0.5118771E+00, 0.4965135E+00, 0.4744503E+00, 0.4453957E+00, &
     & 0.4154207E+00, 0.3762016E+00, 0.3069513E+00, 0.3069513E+00 /
      data (ref_adm(36,iz,26, 8),iz = 1,20) / &
     & 0.5981249E+00, 0.5981249E+00, 0.5874215E+00, 0.5837137E+00, &
     & 0.5807830E+00, 0.5787786E+00, 0.5752457E+00, 0.5692268E+00, &
     & 0.5614961E+00, 0.5522389E+00, 0.5421706E+00, 0.5281924E+00, &
     & 0.5118771E+00, 0.4965135E+00, 0.4744503E+00, 0.4453957E+00, &
     & 0.4154207E+00, 0.3762016E+00, 0.3069513E+00, 0.3069513E+00 /
      data (ref_adm(36,iz,27, 8),iz = 1,20) / &
     & 0.5981249E+00, 0.5981249E+00, 0.5874215E+00, 0.6239800E+00, &
     & 0.5807829E+00, 0.5787786E+00, 0.5752457E+00, 0.5692268E+00, &
     & 0.5614961E+00, 0.5522389E+00, 0.5421706E+00, 0.5281924E+00, &
     & 0.5118771E+00, 0.4965135E+00, 0.4744503E+00, 0.4453957E+00, &
     & 0.4154207E+00, 0.3762016E+00, 0.3069513E+00, 0.3069513E+00 /
      data (ref_adm(36,iz,28, 8),iz = 1,20) / &
     & 0.5867800E+00, 0.5867800E+00, 0.5874215E+00, 0.5837137E+00, &
     & 0.5807830E+00, 0.5787786E+00, 0.5752457E+00, 0.5692268E+00, &
     & 0.5614961E+00, 0.5522389E+00, 0.5421706E+00, 0.5281924E+00, &
     & 0.5118771E+00, 0.4965135E+00, 0.4744503E+00, 0.4453957E+00, &
     & 0.4154207E+00, 0.3762016E+00, 0.3069513E+00, 0.3069513E+00 /
      data (ref_adm(36,iz,29, 8),iz = 1,20) / &
     & 0.5761000E+00, 0.5761000E+00, 0.5471700E+00, 0.5824600E+00, &
     & 0.5807829E+00, 0.5787786E+00, 0.5752457E+00, 0.5692268E+00, &
     & 0.5614961E+00, 0.5522389E+00, 0.5421706E+00, 0.5281924E+00, &
     & 0.5118771E+00, 0.4965135E+00, 0.4744503E+00, 0.4453957E+00, &
     & 0.4154207E+00, 0.3762016E+00, 0.3069513E+00, 0.3069513E+00 /
      data (ref_adm(36,iz,30, 8),iz = 1,20) / &
     & 0.5981249E+00, 0.5981249E+00, 0.5874215E+00, 0.5978500E+00, &
     & 0.6001000E+00, 0.5787786E+00, 0.5752457E+00, 0.5692268E+00, &
     & 0.5614961E+00, 0.5522389E+00, 0.5421706E+00, 0.5281924E+00, &
     & 0.5118771E+00, 0.4965135E+00, 0.4744503E+00, 0.4453957E+00, &
     & 0.4154207E+00, 0.3762016E+00, 0.3069513E+00, 0.3069513E+00 /
      data (ref_adm(36,iz,31, 8),iz = 1,20) / &
     & 0.5981249E+00, 0.5981249E+00, 0.5874215E+00, 0.5837137E+00, &
     & 0.5807829E+00, 0.5787786E+00, 0.5752457E+00, 0.5692268E+00, &
     & 0.5614961E+00, 0.5522389E+00, 0.5421706E+00, 0.5281924E+00, &
     & 0.5118771E+00, 0.4965135E+00, 0.4744503E+00, 0.4453957E+00, &
     & 0.4154207E+00, 0.3762016E+00, 0.3069513E+00, 0.3069513E+00 /
      data (ref_adm(36,iz,32, 8),iz = 1,20) / &
     & 0.5981249E+00, 0.5981249E+00, 0.5874215E+00, 0.5837137E+00, &
     & 0.5807830E+00, 0.5787786E+00, 0.5752457E+00, 0.5692268E+00, &
     & 0.5614961E+00, 0.5522389E+00, 0.5421706E+00, 0.5281924E+00, &
     & 0.5118771E+00, 0.4965135E+00, 0.4744503E+00, 0.4453957E+00, &
     & 0.4154207E+00, 0.3762016E+00, 0.3069513E+00, 0.3069513E+00 /
      data (ref_adm(36,iz,33, 8),iz = 1,20) / &
     & 0.5981249E+00, 0.5981249E+00, 0.5874215E+00, 0.5837137E+00, &
     & 0.5807829E+00, 0.5787786E+00, 0.5752457E+00, 0.5692268E+00, &
     & 0.5614961E+00, 0.5522389E+00, 0.5421706E+00, 0.5281924E+00, &
     & 0.5118771E+00, 0.4965135E+00, 0.4744503E+00, 0.4453957E+00, &
     & 0.4154207E+00, 0.3762016E+00, 0.3069513E+00, 0.3069513E+00 /
      data (ref_adm(36,iz,34, 8),iz = 1,20) / &
     & 0.5981249E+00, 0.5981249E+00, 0.5874215E+00, 0.5837137E+00, &
     & 0.5807830E+00, 0.5787786E+00, 0.5752457E+00, 0.5692268E+00, &
     & 0.5614961E+00, 0.5522389E+00, 0.5421706E+00, 0.5281924E+00, &
     & 0.5118771E+00, 0.4965135E+00, 0.4744503E+00, 0.4453957E+00, &
     & 0.4154207E+00, 0.3762016E+00, 0.3069513E+00, 0.3069513E+00 /
      data (ref_adm(36,iz,35, 8),iz = 1,20) / &
     & 0.5981249E+00, 0.5981249E+00, 0.5874215E+00, 0.5837137E+00, &
     & 0.5807829E+00, 0.5787786E+00, 0.5752457E+00, 0.5692268E+00, &
     & 0.5614961E+00, 0.5522389E+00, 0.5421706E+00, 0.5281924E+00, &
     & 0.5118771E+00, 0.4965135E+00, 0.4744503E+00, 0.4453957E+00, &
     & 0.4154207E+00, 0.3762016E+00, 0.3069513E+00, 0.3069513E+00 /
      data (ref_adm(36,iz,36, 8),iz = 1,20) / &
     & 0.5981249E+00, 0.5981249E+00, 0.5874215E+00, 0.5837137E+00, &
     & 0.5807830E+00, 0.5787786E+00, 0.5752457E+00, 0.5692268E+00, &
     & 0.5614961E+00, 0.5522389E+00, 0.5421706E+00, 0.5281924E+00, &
     & 0.5118771E+00, 0.4965135E+00, 0.4744503E+00, 0.4453957E+00, &
     & 0.4154207E+00, 0.3762016E+00, 0.3069513E+00, 0.3069513E+00 /
      data (ref_adm(36,iz,37, 8),iz = 1,20) / &
     & 0.5981249E+00, 0.5981249E+00, 0.5874215E+00, 0.5837137E+00, &
     & 0.5807830E+00, 0.5787786E+00, 0.5752457E+00, 0.5692268E+00, &
     & 0.5614961E+00, 0.5522389E+00, 0.5421706E+00, 0.5281924E+00, &
     & 0.5118771E+00, 0.4965135E+00, 0.4744503E+00, 0.4453957E+00, &
     & 0.4154207E+00, 0.3762016E+00, 0.3069513E+00, 0.3069513E+00 /
      data (ref_adm(36,iz,38, 8),iz = 1,20) / &
     & 0.5981249E+00, 0.5981249E+00, 0.5874215E+00, 0.5837137E+00, &
     & 0.5807830E+00, 0.5787786E+00, 0.5752457E+00, 0.5692268E+00, &
     & 0.5614961E+00, 0.5522389E+00, 0.5421706E+00, 0.5281924E+00, &
     & 0.5118771E+00, 0.4965135E+00, 0.4744503E+00, 0.4453957E+00, &
     & 0.4154207E+00, 0.3762016E+00, 0.3069513E+00, 0.3069513E+00 /
! Solar Zenith Angle 40.0 Albedo  0.4450732E+00
      data (ref_adm(36,iz, 1, 9),iz = 1,20) / &
     & 0.3759600E+00, 0.3759600E+00, 0.5103826E+00, 0.5071610E+00, &
     & 0.5046148E+00, 0.5028732E+00, 0.4998036E+00, 0.4945742E+00, &
     & 0.4878572E+00, 0.4798142E+00, 0.4710663E+00, 0.4589212E+00, &
     & 0.4447457E+00, 0.4313970E+00, 0.4122274E+00, 0.3869832E+00, &
     & 0.3609394E+00, 0.3268636E+00, 0.2666954E+00, 0.2666954E+00 /
      data (ref_adm(36,iz, 2, 9),iz = 1,20) / &
     & 0.3759600E+00, 0.3759600E+00, 0.5103826E+00, 0.5071610E+00, &
     & 0.5046148E+00, 0.5028732E+00, 0.4998036E+00, 0.4945742E+00, &
     & 0.4878572E+00, 0.4798142E+00, 0.4710663E+00, 0.4589212E+00, &
     & 0.4447457E+00, 0.4313970E+00, 0.4122274E+00, 0.3869832E+00, &
     & 0.3609394E+00, 0.3268636E+00, 0.2666954E+00, 0.2666954E+00 /
      data (ref_adm(36,iz, 3, 9),iz = 1,20) / &
     & 0.5196823E+00, 0.5196823E+00, 0.5103826E+00, 0.5071611E+00, &
     & 0.5046148E+00, 0.5028732E+00, 0.4998036E+00, 0.4945741E+00, &
     & 0.4878572E+00, 0.4798142E+00, 0.4710663E+00, 0.4589212E+00, &
     & 0.4447457E+00, 0.4313970E+00, 0.4122274E+00, 0.3869832E+00, &
     & 0.3609394E+00, 0.3268636E+00, 0.2666954E+00, 0.2666954E+00 /
      data (ref_adm(36,iz, 4, 9),iz = 1,20) / &
     & 0.6094300E+00, 0.6094300E+00, 0.5103826E+00, 0.5071610E+00, &
     & 0.5046148E+00, 0.5028732E+00, 0.4998036E+00, 0.4945742E+00, &
     & 0.4878572E+00, 0.4798142E+00, 0.4710663E+00, 0.4589212E+00, &
     & 0.4447457E+00, 0.4313970E+00, 0.4122274E+00, 0.3869832E+00, &
     & 0.3609394E+00, 0.3268636E+00, 0.2666954E+00, 0.2666954E+00 /
      data (ref_adm(36,iz, 5, 9),iz = 1,20) / &
     & 0.6031800E+00, 0.6031800E+00, 0.5103826E+00, 0.5071611E+00, &
     & 0.5046148E+00, 0.5028732E+00, 0.4998036E+00, 0.4945741E+00, &
     & 0.4878572E+00, 0.4798142E+00, 0.4710663E+00, 0.4589212E+00, &
     & 0.4447457E+00, 0.4313970E+00, 0.4122274E+00, 0.3869832E+00, &
     & 0.3609394E+00, 0.3268636E+00, 0.2666954E+00, 0.2666954E+00 /
      data (ref_adm(36,iz, 6, 9),iz = 1,20) / &
     & 0.5196823E+00, 0.5196823E+00, 0.5103826E+00, 0.5071610E+00, &
     & 0.5046148E+00, 0.5028732E+00, 0.4998036E+00, 0.4945742E+00, &
     & 0.4878572E+00, 0.4798142E+00, 0.4710663E+00, 0.4589212E+00, &
     & 0.4447457E+00, 0.4313970E+00, 0.4122274E+00, 0.3869832E+00, &
     & 0.3609394E+00, 0.3268636E+00, 0.2666954E+00, 0.2666954E+00 /
      data (ref_adm(36,iz, 7, 9),iz = 1,20) / &
     & 0.5196823E+00, 0.5196823E+00, 0.5103826E+00, 0.5071611E+00, &
     & 0.5046148E+00, 0.5028732E+00, 0.4998036E+00, 0.6109000E+00, &
     & 0.4878572E+00, 0.4798142E+00, 0.4710663E+00, 0.4589212E+00, &
     & 0.4447457E+00, 0.4313970E+00, 0.4122274E+00, 0.3869832E+00, &
     & 0.3609394E+00, 0.3268636E+00, 0.2666954E+00, 0.2666954E+00 /
      data (ref_adm(36,iz, 8, 9),iz = 1,20) / &
     & 0.5196823E+00, 0.5196823E+00, 0.5103826E+00, 0.5071610E+00, &
     & 0.5046148E+00, 0.5028732E+00, 0.4998036E+00, 0.4945742E+00, &
     & 0.4878572E+00, 0.4798142E+00, 0.4710663E+00, 0.4589212E+00, &
     & 0.4447457E+00, 0.4313970E+00, 0.4122274E+00, 0.3869832E+00, &
     & 0.3609394E+00, 0.3268636E+00, 0.2666954E+00, 0.2666954E+00 /
      data (ref_adm(36,iz, 9, 9),iz = 1,20) / &
     & 0.5196823E+00, 0.5196823E+00, 0.5103826E+00, 0.5071611E+00, &
     & 0.5046148E+00, 0.5028732E+00, 0.4998036E+00, 0.4945741E+00, &
     & 0.4878572E+00, 0.4798142E+00, 0.4710663E+00, 0.4589212E+00, &
     & 0.4447457E+00, 0.4313970E+00, 0.4122274E+00, 0.3869832E+00, &
     & 0.3609394E+00, 0.3268636E+00, 0.2666954E+00, 0.2666954E+00 /
      data (ref_adm(36,iz,10, 9),iz = 1,20) / &
     & 0.5196823E+00, 0.5196823E+00, 0.5103826E+00, 0.5071610E+00, &
     & 0.5046148E+00, 0.5028732E+00, 0.4998036E+00, 0.4945742E+00, &
     & 0.4878572E+00, 0.4798142E+00, 0.4710663E+00, 0.4589212E+00, &
     & 0.4447457E+00, 0.4313970E+00, 0.4122274E+00, 0.3869832E+00, &
     & 0.3609394E+00, 0.3268636E+00, 0.2666954E+00, 0.2666954E+00 /
      data (ref_adm(36,iz,11, 9),iz = 1,20) / &
     & 0.5196823E+00, 0.5196823E+00, 0.5103826E+00, 0.5071611E+00, &
     & 0.5046148E+00, 0.5028732E+00, 0.4998036E+00, 0.4945741E+00, &
     & 0.4878572E+00, 0.4798142E+00, 0.4710663E+00, 0.4589212E+00, &
     & 0.4447457E+00, 0.4313970E+00, 0.4122274E+00, 0.3869832E+00, &
     & 0.3609394E+00, 0.3268636E+00, 0.2666954E+00, 0.2666954E+00 /
      data (ref_adm(36,iz,12, 9),iz = 1,20) / &
     & 0.5196823E+00, 0.5196823E+00, 0.5103826E+00, 0.4485600E+00, &
     & 0.5640000E+00, 0.5028732E+00, 0.4998036E+00, 0.4945742E+00, &
     & 0.4878572E+00, 0.4798142E+00, 0.4710663E+00, 0.4589212E+00, &
     & 0.4447457E+00, 0.4313970E+00, 0.4122274E+00, 0.3869832E+00, &
     & 0.3609394E+00, 0.3268636E+00, 0.2666954E+00, 0.2666954E+00 /
      data (ref_adm(36,iz,13, 9),iz = 1,20) / &
     & 0.4563600E+00, 0.4563600E+00, 0.4475900E+00, 0.6049200E+00, &
     & 0.5046148E+00, 0.5028732E+00, 0.5609400E+00, 0.4945741E+00, &
     & 0.5242800E+00, 0.4798142E+00, 0.4710663E+00, 0.4589212E+00, &
     & 0.4447457E+00, 0.4313970E+00, 0.4122274E+00, 0.3869832E+00, &
     & 0.3609394E+00, 0.3268636E+00, 0.2666954E+00, 0.2666954E+00 /
      data (ref_adm(36,iz,14, 9),iz = 1,20) / &
     & 0.5494700E+00, 0.5494700E+00, 0.5103826E+00, 0.5071610E+00, &
     & 0.5046148E+00, 0.5028732E+00, 0.4998036E+00, 0.4945742E+00, &
     & 0.4878572E+00, 0.4672400E+00, 0.4710663E+00, 0.4914900E+00, &
     & 0.4447457E+00, 0.4313970E+00, 0.4122274E+00, 0.3869832E+00, &
     & 0.3609394E+00, 0.3268636E+00, 0.2666954E+00, 0.2666954E+00 /
      data (ref_adm(36,iz,15, 9),iz = 1,20) / &
     & 0.5196823E+00, 0.5196823E+00, 0.5745900E+00, 0.5071611E+00, &
     & 0.3229200E+00, 0.5028732E+00, 0.4998036E+00, 0.4945741E+00, &
     & 0.4878572E+00, 0.4798142E+00, 0.4710663E+00, 0.4589212E+00, &
     & 0.4447457E+00, 0.4313970E+00, 0.4122274E+00, 0.3869832E+00, &
     & 0.3609394E+00, 0.3268636E+00, 0.2666954E+00, 0.2666954E+00 /
      data (ref_adm(36,iz,16, 9),iz = 1,20) / &
     & 0.5196823E+00, 0.5196823E+00, 0.5103826E+00, 0.5212500E+00, &
     & 0.4890400E+00, 0.3501300E+00, 0.4998036E+00, 0.4945742E+00, &
     & 0.4878572E+00, 0.4798142E+00, 0.4710663E+00, 0.4589212E+00, &
     & 0.4447457E+00, 0.4313970E+00, 0.4122274E+00, 0.3869832E+00, &
     & 0.3609394E+00, 0.3268636E+00, 0.2666954E+00, 0.2666954E+00 /
      data (ref_adm(36,iz,17, 9),iz = 1,20) / &
     & 0.5196823E+00, 0.5196823E+00, 0.5103826E+00, 0.5071611E+00, &
     & 0.5046148E+00, 0.5028732E+00, 0.4998036E+00, 0.4945741E+00, &
     & 0.4878572E+00, 0.4798142E+00, 0.4710663E+00, 0.4589212E+00, &
     & 0.4447457E+00, 0.4313970E+00, 0.4122274E+00, 0.3869832E+00, &
     & 0.3609394E+00, 0.3268636E+00, 0.2666954E+00, 0.2666954E+00 /
      data (ref_adm(36,iz,18, 9),iz = 1,20) / &
     & 0.4320511E+00, 0.4320511E+00, 0.4311301E+00, 0.4314923E+00, &
     & 0.4328223E+00, 0.4350781E+00, 0.4379029E+00, 0.4410807E+00, &
     & 0.4448065E+00, 0.4496128E+00, 0.4552507E+00, 0.4626098E+00, &
     & 0.4689215E+00, 0.4724468E+00, 0.4729877E+00, 0.4674450E+00, &
     & 0.4534884E+00, 0.4233761E+00, 0.3634510E+00, 0.3634510E+00 /
      data (ref_adm(36,iz,19, 9),iz = 1,20) / &
     & 0.4323321E+00, 0.4323321E+00, 0.4320315E+00, 0.4324628E+00, &
     & 0.4336177E+00, 0.4357843E+00, 0.4388309E+00, 0.4420695E+00, &
     & 0.4454798E+00, 0.4492960E+00, 0.4538323E+00, 0.4597749E+00, &
     & 0.4648157E+00, 0.4671994E+00, 0.4668535E+00, 0.4599647E+00, &
     & 0.4457293E+00, 0.4161504E+00, 0.3593139E+00, 0.3593139E+00 /
      data (ref_adm(36,iz,20, 9),iz = 1,20) / &
     & 0.4326843E+00, 0.4326843E+00, 0.4331051E+00, 0.4337513E+00, &
     & 0.4348280E+00, 0.4367454E+00, 0.4396348E+00, 0.4431449E+00, &
     & 0.4467289E+00, 0.4502819E+00, 0.4536502E+00, 0.4580609E+00, &
     & 0.4620686E+00, 0.4635005E+00, 0.4618865E+00, 0.4544860E+00, &
     & 0.4396731E+00, 0.4107451E+00, 0.3571368E+00, 0.3571368E+00 /
      data (ref_adm(36,iz,21, 9),iz = 1,20) / &
     & 0.4330511E+00, 0.4330511E+00, 0.4345826E+00, 0.4356354E+00, &
     & 0.4367314E+00, 0.4384424E+00, 0.4407980E+00, 0.4439965E+00, &
     & 0.4479809E+00, 0.4516951E+00, 0.4549612E+00, 0.4581144E+00, &
     & 0.4603414E+00, 0.4608223E+00, 0.4586386E+00, 0.4500594E+00, &
     & 0.4352793E+00, 0.4067417E+00, 0.3563315E+00, 0.3563315E+00 /
      data (ref_adm(36,iz,22, 9),iz = 1,20) / &
     & 0.4815764E+00, 0.4815764E+00, 0.6367400E+00, 0.4699732E+00, &
     & 0.2967800E+00, 0.2968200E+00, 0.4631553E+00, 0.4583092E+00, &
     & 0.4520847E+00, 0.4446315E+00, 0.4365251E+00, 0.4252706E+00, &
     & 0.4121344E+00, 0.3997645E+00, 0.3820006E+00, 0.3586074E+00, &
     & 0.3344732E+00, 0.3028962E+00, 0.2471398E+00, 0.2471398E+00 /
      data (ref_adm(36,iz,23, 9),iz = 1,20) / &
     & 0.4815764E+00, 0.4815764E+00, 0.3408700E+00, 0.4699732E+00, &
     & 0.4676135E+00, 0.4659998E+00, 0.4631553E+00, 0.4583091E+00, &
     & 0.4520847E+00, 0.4446315E+00, 0.4365250E+00, 0.4252706E+00, &
     & 0.4121344E+00, 0.3997645E+00, 0.3820006E+00, 0.3586074E+00, &
     & 0.3344732E+00, 0.3028962E+00, 0.2471398E+00, 0.2471398E+00 /
      data (ref_adm(36,iz,24, 9),iz = 1,20) / &
     & 0.2852000E+00, 0.2852000E+00, 0.4105100E+00, 0.4699732E+00, &
     & 0.4676136E+00, 0.4659998E+00, 0.4631553E+00, 0.4583092E+00, &
     & 0.4520847E+00, 0.4446315E+00, 0.4365251E+00, 0.4252706E+00, &
     & 0.4121344E+00, 0.3997645E+00, 0.3820006E+00, 0.3586074E+00, &
     & 0.3344732E+00, 0.3028962E+00, 0.2471398E+00, 0.2471398E+00 /
      data (ref_adm(36,iz,25, 9),iz = 1,20) / &
     & 0.4815764E+00, 0.4815764E+00, 0.4729585E+00, 0.4699732E+00, &
     & 0.4676135E+00, 0.4659998E+00, 0.6032600E+00, 0.4583091E+00, &
     & 0.4520847E+00, 0.4446315E+00, 0.4365250E+00, 0.4252706E+00, &
     & 0.4121344E+00, 0.3997645E+00, 0.3820006E+00, 0.3586074E+00, &
     & 0.3344732E+00, 0.3028962E+00, 0.2471398E+00, 0.2471398E+00 /
      data (ref_adm(36,iz,26, 9),iz = 1,20) / &
     & 0.4815764E+00, 0.4815764E+00, 0.4729585E+00, 0.4699732E+00, &
     & 0.4676136E+00, 0.4659998E+00, 0.4631553E+00, 0.4583092E+00, &
     & 0.4520847E+00, 0.4446315E+00, 0.4365251E+00, 0.4252706E+00, &
     & 0.4121344E+00, 0.3997645E+00, 0.3820006E+00, 0.3586074E+00, &
     & 0.3344732E+00, 0.3028962E+00, 0.2471398E+00, 0.2471398E+00 /
      data (ref_adm(36,iz,27, 9),iz = 1,20) / &
     & 0.4815764E+00, 0.4815764E+00, 0.5754800E+00, 0.4921800E+00, &
     & 0.4676135E+00, 0.4397100E+00, 0.4809800E+00, 0.4583091E+00, &
     & 0.4520847E+00, 0.4446315E+00, 0.4365250E+00, 0.4252706E+00, &
     & 0.4121344E+00, 0.3997645E+00, 0.3820006E+00, 0.3586074E+00, &
     & 0.3344732E+00, 0.3028962E+00, 0.2471398E+00, 0.2471398E+00 /
      data (ref_adm(36,iz,28, 9),iz = 1,20) / &
     & 0.4494500E+00, 0.4494500E+00, 0.6121800E+00, 0.3054400E+00, &
     & 0.3013200E+00, 0.6154000E+00, 0.4631553E+00, 0.4583092E+00, &
     & 0.4520847E+00, 0.5091000E+00, 0.5241200E+00, 0.4252706E+00, &
     & 0.4121344E+00, 0.3997645E+00, 0.3820006E+00, 0.3586074E+00, &
     & 0.3344732E+00, 0.3028962E+00, 0.2471398E+00, 0.2471398E+00 /
      data (ref_adm(36,iz,29, 9),iz = 1,20) / &
     & 0.4815764E+00, 0.4815764E+00, 0.4729585E+00, 0.4699732E+00, &
     & 0.4676135E+00, 0.6060100E+00, 0.4631553E+00, 0.4583091E+00, &
     & 0.4520847E+00, 0.4446315E+00, 0.4365250E+00, 0.4252706E+00, &
     & 0.4121344E+00, 0.3997645E+00, 0.3820006E+00, 0.3586074E+00, &
     & 0.3344732E+00, 0.3028962E+00, 0.2471398E+00, 0.2471398E+00 /
      data (ref_adm(36,iz,30, 9),iz = 1,20) / &
     & 0.2808900E+00, 0.2808900E+00, 0.4729585E+00, 0.4699732E+00, &
     & 0.4676136E+00, 0.4659998E+00, 0.4631553E+00, 0.4583092E+00, &
     & 0.4520847E+00, 0.4446315E+00, 0.4365251E+00, 0.4252706E+00, &
     & 0.4121344E+00, 0.3997645E+00, 0.3820006E+00, 0.3586074E+00, &
     & 0.3344732E+00, 0.3028962E+00, 0.2471398E+00, 0.2471398E+00 /
      data (ref_adm(36,iz,31, 9),iz = 1,20) / &
     & 0.4815764E+00, 0.4815764E+00, 0.4729585E+00, 0.4699732E+00, &
     & 0.4676135E+00, 0.4659998E+00, 0.4631553E+00, 0.4583091E+00, &
     & 0.4520847E+00, 0.4446315E+00, 0.4365250E+00, 0.4252706E+00, &
     & 0.4121344E+00, 0.3997645E+00, 0.3820006E+00, 0.3586074E+00, &
     & 0.3344732E+00, 0.3028962E+00, 0.2471398E+00, 0.2471398E+00 /
      data (ref_adm(36,iz,32, 9),iz = 1,20) / &
     & 0.4815764E+00, 0.4815764E+00, 0.4729585E+00, 0.4699732E+00, &
     & 0.4676136E+00, 0.4659998E+00, 0.4631553E+00, 0.4583092E+00, &
     & 0.4520847E+00, 0.4446315E+00, 0.4365251E+00, 0.4252706E+00, &
     & 0.4121344E+00, 0.3997645E+00, 0.3820006E+00, 0.3586074E+00, &
     & 0.3344732E+00, 0.3028962E+00, 0.2471398E+00, 0.2471398E+00 /
      data (ref_adm(36,iz,33, 9),iz = 1,20) / &
     & 0.4815764E+00, 0.4815764E+00, 0.4729585E+00, 0.4699732E+00, &
     & 0.4676135E+00, 0.4659998E+00, 0.4631553E+00, 0.5131500E+00, &
     & 0.4520847E+00, 0.4446315E+00, 0.4365250E+00, 0.4252706E+00, &
     & 0.4121344E+00, 0.3997645E+00, 0.3820006E+00, 0.3586074E+00, &
     & 0.3344732E+00, 0.3028962E+00, 0.2471398E+00, 0.2471398E+00 /
      data (ref_adm(36,iz,34, 9),iz = 1,20) / &
     & 0.4815764E+00, 0.4815764E+00, 0.4729585E+00, 0.4699732E+00, &
     & 0.4676136E+00, 0.4659998E+00, 0.4631553E+00, 0.4779800E+00, &
     & 0.5013400E+00, 0.4446315E+00, 0.4365251E+00, 0.4252706E+00, &
     & 0.4121344E+00, 0.3997645E+00, 0.3820006E+00, 0.3586074E+00, &
     & 0.3344732E+00, 0.3028962E+00, 0.2471398E+00, 0.2471398E+00 /
      data (ref_adm(36,iz,35, 9),iz = 1,20) / &
     & 0.4815764E+00, 0.4815764E+00, 0.4729585E+00, 0.4699732E+00, &
     & 0.4676135E+00, 0.4659998E+00, 0.4631553E+00, 0.4583091E+00, &
     & 0.4520847E+00, 0.4446315E+00, 0.4365250E+00, 0.4252706E+00, &
     & 0.4121344E+00, 0.3997645E+00, 0.3820006E+00, 0.3586074E+00, &
     & 0.3344732E+00, 0.3028962E+00, 0.2471398E+00, 0.2471398E+00 /
      data (ref_adm(36,iz,36, 9),iz = 1,20) / &
     & 0.4815764E+00, 0.4815764E+00, 0.4729585E+00, 0.4699732E+00, &
     & 0.4676136E+00, 0.4659998E+00, 0.4631553E+00, 0.4583092E+00, &
     & 0.4520847E+00, 0.4446315E+00, 0.4365251E+00, 0.4252706E+00, &
     & 0.4121344E+00, 0.3997645E+00, 0.3820006E+00, 0.3586074E+00, &
     & 0.3344732E+00, 0.3028962E+00, 0.2471398E+00, 0.2471398E+00 /
      data (ref_adm(36,iz,37, 9),iz = 1,20) / &
     & 0.4815764E+00, 0.4815764E+00, 0.6191700E+00, 0.4699732E+00, &
     & 0.4676136E+00, 0.4659998E+00, 0.4631553E+00, 0.4583092E+00, &
     & 0.4520847E+00, 0.4446315E+00, 0.4365251E+00, 0.4252706E+00, &
     & 0.4121344E+00, 0.3997645E+00, 0.3820006E+00, 0.3586074E+00, &
     & 0.3344732E+00, 0.3028962E+00, 0.2471398E+00, 0.2471398E+00 /
      data (ref_adm(36,iz,38, 9),iz = 1,20) / &
     & 0.4815764E+00, 0.4815764E+00, 0.6191700E+00, 0.4699732E+00, &
     & 0.4676136E+00, 0.4659998E+00, 0.4631553E+00, 0.4583092E+00, &
     & 0.4520847E+00, 0.4446315E+00, 0.4365251E+00, 0.4252706E+00, &
     & 0.4121344E+00, 0.3997645E+00, 0.3820006E+00, 0.3586074E+00, &
     & 0.3344732E+00, 0.3028962E+00, 0.2471398E+00, 0.2471398E+00 /
! Solar Zenith Angle 45.0 Albedo  0.4542903E+00
      data (ref_adm(36,iz, 1,10),iz = 1,20) / &
     & 0.2659900E+00, 0.2659900E+00, 0.3027900E+00, 0.3516100E+00, &
     & 0.4186100E+00, 0.3192624E+00, 0.3417318E+00, 0.3678016E+00, &
     & 0.3976033E+00, 0.4465400E+00, 0.4261000E+00, 0.5345423E+00, &
     & 0.6293694E+00, 0.7372881E+00, 0.8718828E+00, 0.1063142E+01, &
     & 0.1392567E+01, 0.2259863E+01, 0.2749971E+01, 0.2749971E+01 /
      data (ref_adm(36,iz, 2,10),iz = 1,20) / &
     & 0.2659900E+00, 0.2659900E+00, 0.3027900E+00, 0.3516100E+00, &
     & 0.4186100E+00, 0.3192624E+00, 0.3417318E+00, 0.3678016E+00, &
     & 0.3976033E+00, 0.4465400E+00, 0.4261000E+00, 0.5345423E+00, &
     & 0.6293694E+00, 0.7372881E+00, 0.8718828E+00, 0.1063142E+01, &
     & 0.1392567E+01, 0.2259863E+01, 0.2749971E+01, 0.2749971E+01 /
      data (ref_adm(36,iz, 3,10),iz = 1,20) / &
     & 0.2392500E+00, 0.2392500E+00, 0.2331300E+00, 0.2647800E+00, &
     & 0.3473800E+00, 0.3601400E+00, 0.2857400E+00, 0.3668386E+00, &
     & 0.4355000E+00, 0.4298271E+00, 0.4683788E+00, 0.5333647E+00, &
     & 0.6253229E+00, 0.7304773E+00, 0.8650411E+00, 0.1045759E+01, &
     & 0.1344855E+01, 0.2091112E+01, 0.4225062E-07, 0.4225062E-07 /
      data (ref_adm(36,iz, 4,10),iz = 1,20) / &
     & 0.2569400E+00, 0.2569400E+00, 0.2449200E+00, 0.3099000E+00, &
     & 0.2754300E+00, 0.2992000E+00, 0.2693300E+00, 0.4006700E+00, &
     & 0.4718700E+00, 0.5909600E+00, 0.4657575E+00, 0.5283500E+00, &
     & 0.6163932E+00, 0.7141051E+00, 0.8489235E+00, 0.1014111E+01, &
     & 0.1257242E+01, 0.1811466E+01, 0.2280305E+01, 0.2280305E+01 /
      data (ref_adm(36,iz, 5,10),iz = 1,20) / &
     & 0.2873600E+00, 0.2873600E+00, 0.2475400E+00, 0.2675800E+00, &
     & 0.2414700E+00, 0.2797700E+00, 0.2940100E+00, 0.3783700E+00, &
     & 0.3932724E+00, 0.4259205E+00, 0.3324700E+00, 0.5222418E+00, &
     & 0.6035084E+00, 0.6930115E+00, 0.8271679E+00, 0.9764671E+00, &
     & 0.3296100E+00, 0.1528756E+01, 0.1715022E+01, 0.1715022E+01 /
      data (ref_adm(36,iz, 6,10),iz = 1,20) / &
     & 0.2539000E+00, 0.2539000E+00, 0.2929500E+00, 0.2544000E+00, &
     & 0.2412500E+00, 0.2786300E+00, 0.2624600E+00, 0.3399400E+00, &
     & 0.2350100E+00, 0.3679100E+00, 0.3387400E+00, 0.5672600E+00, &
     & 0.5895369E+00, 0.6687464E+00, 0.7937084E+00, 0.9395612E+00, &
     & 0.1072276E+01, 0.1304847E+01, 0.1343052E+01, 0.1343052E+01 /
      data (ref_adm(36,iz, 7,10),iz = 1,20) / &
     & 0.2628758E+00, 0.2628758E+00, 0.2731191E+00, 0.2975300E+00, &
     & 0.2680500E+00, 0.2780600E+00, 0.2566400E+00, 0.2231100E+00, &
     & 0.2737500E+00, 0.3439500E+00, 0.3694400E+00, 0.5076132E+00, &
     & 0.5751390E+00, 0.6446300E+00, 0.7521248E+00, 0.8984796E+00, &
     & 0.1011716E+01, 0.1136335E+01, 0.1102751E+01, 0.1102751E+01 /
      data (ref_adm(36,iz, 8,10),iz = 1,20) / &
     & 0.4377900E+00, 0.4377900E+00, 0.3330300E+00, 0.2261900E+00, &
     & 0.2089000E+00, 0.3095700E+00, 0.2674700E+00, 0.2441700E+00, &
     & 0.3020100E+00, 0.3049800E+00, 0.4491301E+00, 0.4997589E+00, &
     & 0.5614747E+00, 0.6216266E+00, 0.7129011E+00, 0.8423123E+00, &
     & 0.9612561E+00, 0.1046328E+01, 0.9591113E+00, 0.9591113E+00 /
      data (ref_adm(36,iz, 9,10),iz = 1,20) / &
     & 0.3480800E+00, 0.3480800E+00, 0.2785900E+00, 0.2759300E+00, &
     & 0.2458200E+00, 0.2337300E+00, 0.3287145E+00, 0.3462800E+00, &
     & 0.3769902E+00, 0.4077510E+00, 0.4430442E+00, 0.4919901E+00, &
     & 0.5482592E+00, 0.6017762E+00, 0.6791083E+00, 0.7818752E+00, &
     & 0.8922860E+00, 0.9903923E+00, 0.8948193E+00, 0.8948193E+00 /
      data (ref_adm(36,iz,10,10),iz = 1,20) / &
     & 0.3081200E+00, 0.3081200E+00, 0.3002800E+00, 0.3306100E+00, &
     & 0.3069000E+00, 0.2254300E+00, 0.2475400E+00, 0.3149900E+00, &
     & 0.3718441E+00, 0.3058600E+00, 0.4348323E+00, 0.4833857E+00, &
     & 0.5366202E+00, 0.5850615E+00, 0.6512907E+00, 0.7367836E+00, &
     & 0.8199859E+00, 0.9018625E+00, 0.8422533E+00, 0.8422533E+00 /
      data (ref_adm(36,iz,11,10),iz = 1,20) / &
     & 0.2382000E+00, 0.2382000E+00, 0.2948300E+00, 0.3291000E+00, &
     & 0.3528200E+00, 0.3338300E+00, 0.2135100E+00, 0.3419189E+00, &
     & 0.3659939E+00, 0.3941064E+00, 0.3790700E+00, 0.4736551E+00, &
     & 0.5262573E+00, 0.5706897E+00, 0.6287461E+00, 0.7014096E+00, &
     & 0.7664519E+00, 0.8239640E+00, 0.7662222E+00, 0.7662222E+00 /
      data (ref_adm(36,iz,12,10),iz = 1,20) / &
     & 0.2795700E+00, 0.2795700E+00, 0.3235100E+00, 0.3664400E+00, &
     & 0.3097200E+00, 0.3745200E+00, 0.3921400E+00, 0.4423100E+00, &
     & 0.3598042E+00, 0.3867939E+00, 0.4175293E+00, 0.4622167E+00, &
     & 0.5135234E+00, 0.5565674E+00, 0.6112929E+00, 0.6748143E+00, &
     & 0.7303074E+00, 0.7725928E+00, 0.7165272E+00, 0.7165272E+00 /
      data (ref_adm(36,iz,13,10),iz = 1,20) / &
     & 0.3276600E+00, 0.3276600E+00, 0.3455000E+00, 0.3374600E+00, &
     & 0.3152900E+00, 0.2907600E+00, 0.2998300E+00, 0.3671100E+00, &
     & 0.3229400E+00, 0.4627400E+00, 0.4038400E+00, 0.4384500E+00, &
     & 0.4993419E+00, 0.5423679E+00, 0.5956880E+00, 0.6547637E+00, &
     & 0.7033549E+00, 0.7365149E+00, 0.6821586E+00, 0.6821586E+00 /
      data (ref_adm(36,iz,14,10),iz = 1,20) / &
     & 0.2951600E+00, 0.2951600E+00, 0.2807800E+00, 0.3617000E+00, &
     & 0.3387100E+00, 0.3479500E+00, 0.4088500E+00, 0.3953800E+00, &
     & 0.3519100E+00, 0.3543400E+00, 0.3964900E+00, 0.4756400E+00, &
     & 0.4107500E+00, 0.4031400E+00, 0.5761399E+00, 0.6352614E+00, &
     & 0.6819612E+00, 0.7126319E+00, 0.6581904E+00, 0.6581904E+00 /
      data (ref_adm(36,iz,15,10),iz = 1,20) / &
     & 0.3111800E+00, 0.3111800E+00, 0.3600100E+00, 0.2734514E+00, &
     & 0.2820312E+00, 0.2932317E+00, 0.3207300E+00, 0.3229014E+00, &
     & 0.3968700E+00, 0.3637309E+00, 0.3177600E+00, 0.3178900E+00, &
     & 0.3622400E+00, 0.2830800E+00, 0.4063100E+00, 0.6118580E+00, &
     & 0.6588922E+00, 0.6912075E+00, 0.6386102E+00, 0.6386102E+00 /
      data (ref_adm(36,iz,16,10),iz = 1,20) / &
     & 0.3338500E+00, 0.3338500E+00, 0.3545900E+00, 0.2718687E+00, &
     & 0.3674800E+00, 0.3434500E+00, 0.3026753E+00, 0.3178367E+00, &
     & 0.3356411E+00, 0.3566290E+00, 0.3807405E+00, 0.4159407E+00, &
     & 0.4562220E+00, 0.4915830E+00, 0.5375824E+00, 0.5895123E+00, &
     & 0.6319385E+00, 0.6632310E+00, 0.6178077E+00, 0.6178077E+00 /
      data (ref_adm(36,iz,17,10),iz = 1,20) / &
     & 0.2871800E+00, 0.2871800E+00, 0.3117300E+00, 0.2702034E+00, &
     & 0.3459400E+00, 0.2782300E+00, 0.2986123E+00, 0.3127961E+00, &
     & 0.3293788E+00, 0.3493681E+00, 0.3722128E+00, 0.4056868E+00, &
     & 0.4433489E+00, 0.4760076E+00, 0.5184160E+00, 0.5670676E+00, &
     & 0.6075296E+00, 0.6365803E+00, 0.5943524E+00, 0.5943524E+00 /
      data (ref_adm(36,iz,18,10),iz = 1,20) / &
     & 0.3509300E+00, 0.3509300E+00, 0.3256100E+00, 0.2938200E+00, &
     & 0.3030600E+00, 0.2924500E+00, 0.2503800E+00, 0.3474829E+00, &
     & 0.2637600E+00, 0.3535383E+00, 0.4148000E+00, 0.3159100E+00, &
     & 0.3697065E+00, 0.3357800E+00, 0.3799054E+00, 0.3843136E+00, &
     & 0.3855257E+00, 0.3804087E+00, 0.3446980E+00, 0.3446980E+00 /
      data (ref_adm(36,iz,19,10),iz = 1,20) / &
     & 0.3269300E+00, 0.3269300E+00, 0.3465200E+00, 0.3036000E+00, &
     & 0.2954400E+00, 0.2890800E+00, 0.2752800E+00, 0.2705900E+00, &
     & 0.2607600E+00, 0.2462800E+00, 0.3573282E+00, 0.3625815E+00, &
     & 0.4281300E+00, 0.3737300E+00, 0.2977700E+00, 0.3807877E+00, &
     & 0.3818706E+00, 0.3764071E+00, 0.3403871E+00, 0.3403871E+00 /
      data (ref_adm(36,iz,20,10),iz = 1,20) / &
     & 0.3156800E+00, 0.3156800E+00, 0.2711600E+00, 0.3297900E+00, &
     & 0.3272600E+00, 0.3104400E+00, 0.3389000E+00, 0.3441700E+00, &
     & 0.4693700E+00, 0.5265400E+00, 0.3572308E+00, 0.3617217E+00, &
     & 0.3669215E+00, 0.3709347E+00, 0.2809500E+00, 0.3783826E+00, &
     & 0.3786340E+00, 0.3727482E+00, 0.3378876E+00, 0.3378876E+00 /
      data (ref_adm(36,iz,21,10),iz = 1,20) / &
     & 0.2606400E+00, 0.2606400E+00, 0.2380700E+00, 0.2811800E+00, &
     & 0.3289200E+00, 0.3147800E+00, 0.3359900E+00, 0.3245000E+00, &
     & 0.4738000E+00, 0.6032500E+00, 0.5722200E+00, 0.3618863E+00, &
     & 0.3661245E+00, 0.3695815E+00, 0.3735028E+00, 0.3759163E+00, &
     & 0.3759432E+00, 0.3695555E+00, 0.3361007E+00, 0.3361007E+00 /
      data (ref_adm(36,iz,22,10),iz = 1,20) / &
     & 0.3195945E+00, 0.3195945E+00, 0.5629200E+00, 0.2344400E+00, &
     & 0.2435700E+00, 0.2745500E+00, 0.4446400E+00, 0.3528500E+00, &
     & 0.3547100E+00, 0.5823000E+00, 0.6009000E+00, 0.5923400E+00, &
     & 0.4490523E+00, 0.4667618E+00, 0.2667100E+00, 0.2536600E+00, &
     & 0.5219674E+00, 0.5331839E+00, 0.5636072E+00, 0.5636072E+00 /
      data (ref_adm(36,iz,23,10),iz = 1,20) / &
     & 0.5770300E+00, 0.5770300E+00, 0.5396600E+00, 0.4122300E+00, &
     & 0.4542900E+00, 0.3406121E+00, 0.3504142E+00, 0.3174100E+00, &
     & 0.3537200E+00, 0.3469700E+00, 0.4061636E+00, 0.4277487E+00, &
     & 0.4498444E+00, 0.4671659E+00, 0.4871733E+00, 0.5073991E+00, &
     & 0.5220800E+00, 0.5349472E+00, 0.5724911E+00, 0.5724911E+00 /
      data (ref_adm(36,iz,24,10),iz = 1,20) / &
     & 0.3364200E+00, 0.3364200E+00, 0.3271600E+00, 0.5692200E+00, &
     & 0.3335847E+00, 0.3226400E+00, 0.3528345E+00, 0.3651792E+00, &
     & 0.3278700E+00, 0.3366300E+00, 0.4112979E+00, 0.4332727E+00, &
     & 0.4555146E+00, 0.4727528E+00, 0.4925359E+00, 0.5125515E+00, &
     & 0.5277150E+00, 0.5423614E+00, 0.5864577E+00, 0.5864577E+00 /
      data (ref_adm(36,iz,25,10),iz = 1,20) / &
     & 0.2832800E+00, 0.2832800E+00, 0.2523900E+00, 0.3276780E+00, &
     & 0.3351421E+00, 0.3447094E+00, 0.2325100E+00, 0.2421500E+00, &
     & 0.3105000E+00, 0.3366700E+00, 0.2918100E+00, 0.4340100E+00, &
     & 0.4649751E+00, 0.4830526E+00, 0.5039268E+00, 0.5247070E+00, &
     & 0.5403206E+00, 0.5558254E+00, 0.6047434E+00, 0.6047434E+00 /
      data (ref_adm(36,iz,26,10),iz = 1,20) / &
     & 0.2777400E+00, 0.2777400E+00, 0.2648900E+00, 0.2680100E+00, &
     & 0.2565700E+00, 0.2502200E+00, 0.2451000E+00, 0.2646000E+00, &
     & 0.4265200E+00, 0.3300500E+00, 0.3107700E+00, 0.4483554E+00, &
     & 0.4729589E+00, 0.4924375E+00, 0.5151989E+00, 0.5389398E+00, &
     & 0.5576358E+00, 0.5762585E+00, 0.6282247E+00, 0.6282247E+00 /
      data (ref_adm(36,iz,27,10),iz = 1,20) / &
     & 0.3028100E+00, 0.3028100E+00, 0.4417300E+00, 0.3320600E+00, &
     & 0.3397600E+00, 0.3818000E+00, 0.3401100E+00, 0.4626900E+00, &
     & 0.5132100E+00, 0.4696200E+00, 0.4360700E+00, 0.3089100E+00, &
     & 0.4825182E+00, 0.5029884E+00, 0.5266671E+00, 0.5516894E+00, &
     & 0.5725524E+00, 0.5955253E+00, 0.6535161E+00, 0.6535161E+00 /
      data (ref_adm(36,iz,28,10),iz = 1,20) / &
     & 0.2943600E+00, 0.2943600E+00, 0.3075100E+00, 0.5052500E+00, &
     & 0.4028300E+00, 0.3703300E+00, 0.2555500E+00, 0.3810497E+00, &
     & 0.3986643E+00, 0.2637000E+00, 0.4304700E+00, 0.3349700E+00, &
     & 0.5121337E+00, 0.2942300E+00, 0.5616322E+00, 0.5843576E+00, &
     & 0.6007791E+00, 0.6197845E+00, 0.6802407E+00, 0.6802407E+00 /
      data (ref_adm(36,iz,29,10),iz = 1,20) / &
     & 0.2841800E+00, 0.2841800E+00, 0.3850800E+00, 0.4440700E+00, &
     & 0.3258500E+00, 0.2742800E+00, 0.3689854E+00, 0.3856541E+00, &
     & 0.4084705E+00, 0.4394043E+00, 0.4784771E+00, 0.5299816E+00, &
     & 0.5754030E+00, 0.6056848E+00, 0.6379188E+00, 0.6653903E+00, &
     & 0.6769249E+00, 0.6771226E+00, 0.7161687E+00, 0.7161687E+00 /
      data (ref_adm(36,iz,30,10),iz = 1,20) / &
     & 0.3526700E+00, 0.3526700E+00, 0.3629700E+00, 0.3773400E+00, &
     & 0.4319700E+00, 0.3575626E+00, 0.3720991E+00, 0.3939591E+00, &
     & 0.4292402E+00, 0.3711100E+00, 0.5193385E+00, 0.3250800E+00, &
     & 0.3031400E+00, 0.5900173E+00, 0.6228446E+00, 0.6666633E+00, &
     & 0.7119005E+00, 0.7523563E+00, 0.7709240E+00, 0.7709240E+00 /
      data (ref_adm(36,iz,31,10),iz = 1,20) / &
     & 0.3222200E+00, 0.3222200E+00, 0.3667300E+00, 0.3347938E+00, &
     & 0.3468429E+00, 0.3591548E+00, 0.3765090E+00, 0.4076673E+00, &
     & 0.3603600E+00, 0.5016034E+00, 0.5054161E+00, 0.5219621E+00, &
     & 0.5519827E+00, 0.5780227E+00, 0.6107297E+00, 0.6481775E+00, &
     & 0.6825942E+00, 0.7286188E+00, 0.7970091E+00, 0.7970091E+00 /
      data (ref_adm(36,iz,32,10),iz = 1,20) / &
     & 0.3461500E+00, 0.3461500E+00, 0.3254192E+00, 0.3358906E+00, &
     & 0.3480478E+00, 0.3610263E+00, 0.3829734E+00, 0.4284716E+00, &
     & 0.5856400E+00, 0.5711000E+00, 0.4933832E+00, 0.5231325E+00, &
     & 0.5555283E+00, 0.5821446E+00, 0.6153837E+00, 0.6539996E+00, &
     & 0.6892797E+00, 0.7285051E+00, 0.7986257E+00, 0.7986257E+00 /
      data (ref_adm(36,iz,33,10),iz = 1,20) / &
     & 0.3199929E+00, 0.3199929E+00, 0.3258355E+00, 0.6345400E+00, &
     & 0.6251000E+00, 0.3630859E+00, 0.3912470E+00, 0.4496475E+00, &
     & 0.4736746E+00, 0.5758600E+00, 0.4947278E+00, 0.5256228E+00, &
     & 0.5577291E+00, 0.5840631E+00, 0.6174157E+00, 0.6568114E+00, &
     & 0.6937941E+00, 0.7365322E+00, 0.8132439E+00, 0.8132439E+00 /
      data (ref_adm(36,iz,34,10),iz = 1,20) / &
     & 0.2754700E+00, 0.2754700E+00, 0.2111700E+00, 0.6216900E+00, &
     & 0.6236100E+00, 0.4139900E+00, 0.2322400E+00, 0.4046200E+00, &
     & 0.2579600E+00, 0.4733050E+00, 0.4965256E+00, 0.5267982E+00, &
     & 0.5582668E+00, 0.5851713E+00, 0.6191180E+00, 0.6589374E+00, &
     & 0.6960729E+00, 0.7409930E+00, 0.8270010E+00, 0.8270010E+00 /
      data (ref_adm(36,iz,35,10),iz = 1,20) / &
     & 0.2880000E+00, 0.2880000E+00, 0.3048600E+00, 0.2280500E+00, &
     & 0.2318700E+00, 0.3665600E+00, 0.3362700E+00, 0.4631243E+00, &
     & 0.4559480E+00, 0.6358000E+00, 0.4975158E+00, 0.5273134E+00, &
     & 0.5594799E+00, 0.5875319E+00, 0.6234609E+00, 0.6639473E+00, &
     & 0.7001133E+00, 0.7444921E+00, 0.8372096E+00, 0.8372096E+00 /
      data (ref_adm(36,iz,36,10),iz = 1,20) / &
     & 0.2766200E+00, 0.2766200E+00, 0.2630200E+00, 0.2655000E+00, &
     & 0.2432400E+00, 0.2674300E+00, 0.5047600E+00, 0.6217000E+00, &
     & 0.3877700E+00, 0.5616700E+00, 0.4979993E+00, 0.5278236E+00, &
     & 0.5613939E+00, 0.5920654E+00, 0.6335304E+00, 0.6757270E+00, &
     & 0.7075800E+00, 0.7486078E+00, 0.8439490E+00, 0.8439490E+00 /
      data (ref_adm(36,iz,37,10),iz = 1,20) / &
     & 0.2713600E+00, 0.2713600E+00, 0.2596900E+00, 0.2970700E+00, &
     & 0.2956600E+00, 0.2876300E+00, 0.4213673E+00, 0.6186700E+00, &
     & 0.6334500E+00, 0.4757364E+00, 0.4981503E+00, 0.5281677E+00, &
     & 0.5634486E+00, 0.5973758E+00, 0.6678378E+00, 0.7215033E+00, &
     & 0.7168249E+00, 0.7522441E+00, 0.8479491E+00, 0.8479491E+00 /
      data (ref_adm(36,iz,38,10),iz = 1,20) / &
     & 0.2713600E+00, 0.2713600E+00, 0.2596900E+00, 0.2970700E+00, &
     & 0.2956600E+00, 0.2876300E+00, 0.4213673E+00, 0.6186700E+00, &
     & 0.6334500E+00, 0.4757364E+00, 0.4981503E+00, 0.5281677E+00, &
     & 0.5634486E+00, 0.5973758E+00, 0.6678378E+00, 0.7215033E+00, &
     & 0.7168249E+00, 0.7522441E+00, 0.8479491E+00, 0.8479491E+00 /
! Solar Zenith Angle 50.0 Albedo  0.3686737E+00
      data (ref_adm(36,iz, 1,11),iz = 1,20) / &
     & 0.3307000E+00, 0.3307000E+00, 0.3307900E+00, 0.3464200E+00, &
     & 0.3232400E+00, 0.3467300E+00, 0.3531100E+00, 0.3246200E+00, &
     & 0.4121700E+00, 0.3721600E+00, 0.3531300E+00, 0.3573500E+00, &
     & 0.3544100E+00, 0.3301700E+00, 0.3375300E+00, 0.3808502E+00, &
     & 0.3809501E+00, 0.3755127E+00, 0.3474986E+00, 0.3474986E+00 /
      data (ref_adm(36,iz, 2,11),iz = 1,20) / &
     & 0.3307000E+00, 0.3307000E+00, 0.3307900E+00, 0.3464200E+00, &
     & 0.3232400E+00, 0.3467300E+00, 0.3531100E+00, 0.3246200E+00, &
     & 0.4121700E+00, 0.3721600E+00, 0.3531300E+00, 0.3573500E+00, &
     & 0.3544100E+00, 0.3301700E+00, 0.3375300E+00, 0.3808502E+00, &
     & 0.3809501E+00, 0.3755127E+00, 0.3474986E+00, 0.3474986E+00 /
      data (ref_adm(36,iz, 3,11),iz = 1,20) / &
     & 0.3360000E+00, 0.3360000E+00, 0.3249200E+00, 0.3652000E+00, &
     & 0.3320500E+00, 0.3234000E+00, 0.3184200E+00, 0.3130500E+00, &
     & 0.2870500E+00, 0.5242200E+00, 0.4233000E+00, 0.3564800E+00, &
     & 0.3413500E+00, 0.3729396E+00, 0.3771383E+00, 0.3803762E+00, &
     & 0.3803350E+00, 0.3749641E+00, 0.1784003E+00, 0.1784003E+00 /
      data (ref_adm(36,iz, 4,11),iz = 1,20) / &
     & 0.3287400E+00, 0.3287400E+00, 0.3563500E+00, 0.3584200E+00, &
     & 0.3640900E+00, 0.3483500E+00, 0.3338200E+00, 0.3409800E+00, &
     & 0.3169800E+00, 0.3840900E+00, 0.3789000E+00, 0.3915900E+00, &
     & 0.3397900E+00, 0.3575600E+00, 0.3761511E+00, 0.3857700E+00, &
     & 0.3791656E+00, 0.3737403E+00, 0.3456247E+00, 0.3456247E+00 /
      data (ref_adm(36,iz, 5,11),iz = 1,20) / &
     & 0.3210600E+00, 0.3210600E+00, 0.3233000E+00, 0.3359900E+00, &
     & 0.3575000E+00, 0.3936200E+00, 0.3653600E+00, 0.3568700E+00, &
     & 0.3517400E+00, 0.3765500E+00, 0.3317600E+00, 0.3525000E+00, &
     & 0.3469400E+00, 0.3369800E+00, 0.4262200E+00, 0.4151400E+00, &
     & 0.3929200E+00, 0.3721663E+00, 0.3438427E+00, 0.3438427E+00 /
      data (ref_adm(36,iz, 6,11),iz = 1,20) / &
     & 0.3309300E+00, 0.3309300E+00, 0.3009400E+00, 0.3464500E+00, &
     & 0.3575100E+00, 0.3897400E+00, 0.3979100E+00, 0.3539500E+00, &
     & 0.3524600E+00, 0.3409200E+00, 0.3221500E+00, 0.3324300E+00, &
     & 0.3164800E+00, 0.5008300E+00, 0.4173000E+00, 0.4059000E+00, &
     & 0.3750747E+00, 0.3699973E+00, 0.3414912E+00, 0.3414912E+00 /
      data (ref_adm(36,iz, 7,11),iz = 1,20) / &
     & 0.3419000E+00, 0.3419000E+00, 0.3608200E+00, 0.3587000E+00, &
     & 0.3228200E+00, 0.3520700E+00, 0.3868400E+00, 0.3556700E+00, &
     & 0.3296000E+00, 0.3337300E+00, 0.3291200E+00, 0.3065000E+00, &
     & 0.3550600E+00, 0.4092800E+00, 0.4593200E+00, 0.4301400E+00, &
     & 0.4323000E+00, 0.3674365E+00, 0.3388799E+00, 0.3388799E+00 /
      data (ref_adm(36,iz, 8,11),iz = 1,20) / &
     & 0.3152900E+00, 0.3152900E+00, 0.2884300E+00, 0.3058900E+00, &
     & 0.2651300E+00, 0.2835800E+00, 0.3194800E+00, 0.3591200E+00, &
     & 0.3214900E+00, 0.2939300E+00, 0.3202500E+00, 0.3288900E+00, &
     & 0.2881400E+00, 0.2643500E+00, 0.2536300E+00, 0.3650300E+00, &
     & 0.3353700E+00, 0.3646168E+00, 0.3358864E+00, 0.3358864E+00 /
      data (ref_adm(36,iz, 9,11),iz = 1,20) / &
     & 0.3513600E+00, 0.3513600E+00, 0.3505200E+00, 0.3274100E+00, &
     & 0.3457000E+00, 0.3702000E+00, 0.3046800E+00, 0.3308800E+00, &
     & 0.3713300E+00, 0.3911700E+00, 0.2969400E+00, 0.4503700E+00, &
     & 0.4678500E+00, 0.3633721E+00, 0.4611600E+00, 0.3949800E+00, &
     & 0.3980000E+00, 0.3614812E+00, 0.3328103E+00, 0.3328103E+00 /
      data (ref_adm(36,iz,10,11),iz = 1,20) / &
     & 0.3220800E+00, 0.3220800E+00, 0.3291200E+00, 0.3768900E+00, &
     & 0.3882300E+00, 0.3607900E+00, 0.2983000E+00, 0.2731300E+00, &
     & 0.2909900E+00, 0.4497300E+00, 0.3516000E+00, 0.2491000E+00, &
     & 0.3594013E+00, 0.3609796E+00, 0.2704500E+00, 0.3629779E+00, &
     & 0.3618136E+00, 0.3578318E+00, 0.3296327E+00, 0.3296327E+00 /
      data (ref_adm(36,iz,11,11),iz = 1,20) / &
     & 0.3423000E+00, 0.3423000E+00, 0.3365000E+00, 0.3185200E+00, &
     & 0.3860800E+00, 0.3023900E+00, 0.3098000E+00, 0.3285700E+00, &
     & 0.2978300E+00, 0.3049400E+00, 0.2921800E+00, 0.3076800E+00, &
     & 0.3573489E+00, 0.3758000E+00, 0.3593844E+00, 0.3593430E+00, &
     & 0.3579264E+00, 0.3539040E+00, 0.3262599E+00, 0.3262599E+00 /
      data (ref_adm(36,iz,12,11),iz = 1,20) / &
     & 0.3303500E+00, 0.3303500E+00, 0.3728100E+00, 0.3797600E+00, &
     & 0.3240100E+00, 0.3425100E+00, 0.3628900E+00, 0.3676200E+00, &
     & 0.3228700E+00, 0.3558500E+00, 0.4122400E+00, 0.3200600E+00, &
     & 0.4090000E+00, 0.3560114E+00, 0.3563988E+00, 0.3557653E+00, &
     & 0.3539800E+00, 0.3496749E+00, 0.3225713E+00, 0.3225713E+00 /
      data (ref_adm(36,iz,13,11),iz = 1,20) / &
     & 0.3572000E+00, 0.3572000E+00, 0.3760500E+00, 0.3648300E+00, &
     & 0.3355600E+00, 0.3194300E+00, 0.3625500E+00, 0.4030100E+00, &
     & 0.3289900E+00, 0.3430300E+00, 0.2803300E+00, 0.2825900E+00, &
     & 0.2745100E+00, 0.3156600E+00, 0.3327000E+00, 0.3521888E+00, &
     & 0.3500361E+00, 0.3452372E+00, 0.3184793E+00, 0.3184793E+00 /
      data (ref_adm(36,iz,14,11),iz = 1,20) / &
     & 0.3401200E+00, 0.3401200E+00, 0.3368500E+00, 0.3341100E+00, &
     & 0.3475100E+00, 0.3483000E+00, 0.3491700E+00, 0.3476400E+00, &
     & 0.3566800E+00, 0.3581900E+00, 0.3478700E+00, 0.3325400E+00, &
     & 0.3593000E+00, 0.4991100E+00, 0.3506652E+00, 0.3488460E+00, &
     & 0.3460640E+00, 0.3409371E+00, 0.3140734E+00, 0.3140734E+00 /
      data (ref_adm(36,iz,15,11),iz = 1,20) / &
     & 0.3388500E+00, 0.3388500E+00, 0.3713800E+00, 0.3581900E+00, &
     & 0.3764700E+00, 0.4548900E+00, 0.4022800E+00, 0.4125500E+00, &
     & 0.4262800E+00, 0.3821900E+00, 0.3417200E+00, 0.3234700E+00, &
     & 0.3176800E+00, 0.3351800E+00, 0.3480226E+00, 0.3457538E+00, &
     & 0.3423984E+00, 0.3368661E+00, 0.3098685E+00, 0.3098685E+00 /
      data (ref_adm(36,iz,16,11),iz = 1,20) / &
     & 0.3439200E+00, 0.3439200E+00, 0.3162500E+00, 0.3656100E+00, &
     & 0.4357500E+00, 0.3549800E+00, 0.4679500E+00, 0.3904500E+00, &
     & 0.4357600E+00, 0.5007400E+00, 0.4011600E+00, 0.4250900E+00, &
     & 0.4357100E+00, 0.3757200E+00, 0.3456099E+00, 0.3428947E+00, &
     & 0.3390947E+00, 0.3328560E+00, 0.3061804E+00, 0.3061804E+00 /
      data (ref_adm(36,iz,17,11),iz = 1,20) / &
     & 0.3479500E+00, 0.3479500E+00, 0.4080200E+00, 0.3484000E+00, &
     & 0.3060100E+00, 0.3070000E+00, 0.3837800E+00, 0.3027400E+00, &
     & 0.4907600E+00, 0.3481445E+00, 0.3101600E+00, 0.3419800E+00, &
     & 0.3471200E+00, 0.3279200E+00, 0.3364700E+00, 0.3402739E+00, &
     & 0.3362007E+00, 0.3292646E+00, 0.3025850E+00, 0.3025850E+00 /
      data (ref_adm(36,iz,18,11),iz = 1,20) / &
     & 0.3354700E+00, 0.3354700E+00, 0.4064200E+00, 0.3976200E+00, &
     & 0.3506800E+00, 0.3161400E+00, 0.3704600E+00, 0.3943700E+00, &
     & 0.3730700E+00, 0.3871300E+00, 0.3705200E+00, 0.3573600E+00, &
     & 0.3120300E+00, 0.2962200E+00, 0.2683100E+00, 0.3114634E+00, &
     & 0.2950385E+00, 0.2700160E+00, 0.2340592E+00, 0.2340592E+00 /
      data (ref_adm(36,iz,19,11),iz = 1,20) / &
     & 0.3417200E+00, 0.3417200E+00, 0.3527100E+00, 0.2995100E+00, &
     & 0.3069000E+00, 0.3469600E+00, 0.4256200E+00, 0.3117600E+00, &
     & 0.3093900E+00, 0.3466300E+00, 0.3265800E+00, 0.3444500E+00, &
     & 0.3245500E+00, 0.2631500E+00, 0.3049500E+00, 0.3114946E+00, &
     & 0.2949824E+00, 0.2699324E+00, 0.2339869E+00, 0.2339869E+00 /
      data (ref_adm(36,iz,20,11),iz = 1,20) / &
     & 0.3592600E+00, 0.3592600E+00, 0.3329600E+00, 0.3899700E+00, &
     & 0.4549000E+00, 0.4436700E+00, 0.4116400E+00, 0.3667500E+00, &
     & 0.3671500E+00, 0.3709200E+00, 0.3305000E+00, 0.3327400E+00, &
     & 0.3375000E+00, 0.1962400E+00, 0.3253894E+00, 0.3114953E+00, &
     & 0.2948890E+00, 0.2698146E+00, 0.2339276E+00, 0.2339276E+00 /
      data (ref_adm(36,iz,21,11),iz = 1,20) / &
     & 0.3832500E+00, 0.3832500E+00, 0.3415100E+00, 0.3413500E+00, &
     & 0.3585300E+00, 0.3893000E+00, 0.3598100E+00, 0.3843300E+00, &
     & 0.3522600E+00, 0.3647200E+00, 0.3969900E+00, 0.4161400E+00, &
     & 0.5154200E+00, 0.3305100E+00, 0.4242800E+00, 0.3115464E+00, &
     & 0.2949066E+00, 0.2697393E+00, 0.2338964E+00, 0.2338964E+00 /
      data (ref_adm(36,iz,22,11),iz = 1,20) / &
     & 0.3024600E+00, 0.3024600E+00, 0.2968400E+00, 0.3313600E+00, &
     & 0.3584800E+00, 0.3895700E+00, 0.3416100E+00, 0.3696400E+00, &
     & 0.3905100E+00, 0.3899000E+00, 0.3495000E+00, 0.4285200E+00, &
     & 0.4012315E+00, 0.3094600E+00, 0.4223200E+00, 0.3548000E+00, &
     & 0.4633068E+00, 0.4646698E+00, 0.4303840E+00, 0.4303840E+00 /
      data (ref_adm(36,iz,23,11),iz = 1,20) / &
     & 0.3181700E+00, 0.3181700E+00, 0.3072800E+00, 0.2985000E+00, &
     & 0.3568900E+00, 0.4146400E+00, 0.3928500E+00, 0.3987000E+00, &
     & 0.3971600E+00, 0.4315200E+00, 0.3815100E+00, 0.3832400E+00, &
     & 0.3971217E+00, 0.4552400E+00, 0.4252710E+00, 0.2622700E+00, &
     & 0.4538944E+00, 0.4537834E+00, 0.4269566E+00, 0.4269566E+00 /
      data (ref_adm(36,iz,24,11),iz = 1,20) / &
     & 0.2877600E+00, 0.2877600E+00, 0.3728700E+00, 0.3774600E+00, &
     & 0.3809000E+00, 0.3698600E+00, 0.4032600E+00, 0.4407700E+00, &
     & 0.3695000E+00, 0.3530700E+00, 0.3390300E+00, 0.2765900E+00, &
     & 0.3499900E+00, 0.3489400E+00, 0.2282200E+00, 0.4354294E+00, &
     & 0.3114100E+00, 0.4460022E+00, 0.4259306E+00, 0.4259306E+00 /
      data (ref_adm(36,iz,25,11),iz = 1,20) / &
     & 0.3479200E+00, 0.3479200E+00, 0.3159400E+00, 0.3449600E+00, &
     & 0.3863800E+00, 0.3626000E+00, 0.3476200E+00, 0.3960700E+00, &
     & 0.4024300E+00, 0.3626400E+00, 0.3982200E+00, 0.3281100E+00, &
     & 0.4622100E+00, 0.3149300E+00, 0.2795300E+00, 0.4321219E+00, &
     & 0.3281600E+00, 0.4392276E+00, 0.4265518E+00, 0.4265518E+00 /
      data (ref_adm(36,iz,26,11),iz = 1,20) / &
     & 0.3378700E+00, 0.3378700E+00, 0.3341200E+00, 0.3369700E+00, &
     & 0.3399800E+00, 0.3278400E+00, 0.3324600E+00, 0.3410700E+00, &
     & 0.3692700E+00, 0.3535700E+00, 0.3731700E+00, 0.3574500E+00, &
     & 0.3576800E+00, 0.4077638E+00, 0.2384900E+00, 0.2657600E+00, &
     & 0.3555100E+00, 0.4376547E+00, 0.4303717E+00, 0.4303717E+00 /
      data (ref_adm(36,iz,27,11),iz = 1,20) / &
     & 0.3434100E+00, 0.3434100E+00, 0.3711600E+00, 0.3641300E+00, &
     & 0.3577400E+00, 0.3887100E+00, 0.4552900E+00, 0.4543500E+00, &
     & 0.4425200E+00, 0.4026100E+00, 0.3644100E+00, 0.3381000E+00, &
     & 0.3409400E+00, 0.6108000E+00, 0.4323700E+00, 0.2879500E+00, &
     & 0.3041200E+00, 0.4395166E+00, 0.4371525E+00, 0.4371525E+00 /
      data (ref_adm(36,iz,28,11),iz = 1,20) / &
     & 0.3488800E+00, 0.3488800E+00, 0.3665700E+00, 0.3720000E+00, &
     & 0.3831700E+00, 0.3977700E+00, 0.4482300E+00, 0.4213400E+00, &
     & 0.3854700E+00, 0.3824300E+00, 0.3962400E+00, 0.4621200E+00, &
     & 0.3114800E+00, 0.3530500E+00, 0.3356600E+00, 0.4385165E+00, &
     & 0.4439038E+00, 0.4424859E+00, 0.4462962E+00, 0.4462962E+00 /
      data (ref_adm(36,iz,29,11),iz = 1,20) / &
     & 0.3464900E+00, 0.3464900E+00, 0.3477500E+00, 0.4310000E+00, &
     & 0.3910600E+00, 0.4679400E+00, 0.3843400E+00, 0.3640400E+00, &
     & 0.4243300E+00, 0.3867300E+00, 0.4039900E+00, 0.4340200E+00, &
     & 0.3118500E+00, 0.3876900E+00, 0.3795900E+00, 0.4451536E+00, &
     & 0.4508401E+00, 0.4488955E+00, 0.4554148E+00, 0.4554148E+00 /
      data (ref_adm(36,iz,30,11),iz = 1,20) / &
     & 0.3686800E+00, 0.3686800E+00, 0.3943300E+00, 0.3341000E+00, &
     & 0.3934700E+00, 0.3729100E+00, 0.3897700E+00, 0.3935900E+00, &
     & 0.4450000E+00, 0.4264500E+00, 0.3945705E+00, 0.4093578E+00, &
     & 0.3810200E+00, 0.4436900E+00, 0.5866900E+00, 0.4561020E+00, &
     & 0.4600309E+00, 0.4572965E+00, 0.4670026E+00, 0.4670026E+00 /
      data (ref_adm(36,iz,31,11),iz = 1,20) / &
     & 0.3345800E+00, 0.3345800E+00, 0.3232600E+00, 0.3141900E+00, &
     & 0.3314500E+00, 0.3457900E+00, 0.3556600E+00, 0.3756100E+00, &
     & 0.4240700E+00, 0.3147700E+00, 0.2704100E+00, 0.3440400E+00, &
     & 0.2716700E+00, 0.2658500E+00, 0.3061900E+00, 0.4668810E+00, &
     & 0.4721879E+00, 0.4681699E+00, 0.4785152E+00, 0.4785152E+00 /
      data (ref_adm(36,iz,32,11),iz = 1,20) / &
     & 0.3142400E+00, 0.3142400E+00, 0.3296000E+00, 0.3297300E+00, &
     & 0.2995000E+00, 0.3148300E+00, 0.3400700E+00, 0.3223500E+00, &
     & 0.2880100E+00, 0.3436100E+00, 0.3428100E+00, 0.3427600E+00, &
     & 0.3516300E+00, 0.2791000E+00, 0.3491400E+00, 0.4784576E+00, &
     & 0.4831524E+00, 0.4802786E+00, 0.4908739E+00, 0.4908739E+00 /
      data (ref_adm(36,iz,33,11),iz = 1,20) / &
     & 0.3552700E+00, 0.3552700E+00, 0.3289700E+00, 0.3336700E+00, &
     & 0.3432500E+00, 0.2971200E+00, 0.2932500E+00, 0.3445900E+00, &
     & 0.3689000E+00, 0.3907200E+00, 0.3478100E+00, 0.3786800E+00, &
     & 0.3838500E+00, 0.4383100E+00, 0.4603561E+00, 0.4822564E+00, &
     & 0.4946078E+00, 0.4917296E+00, 0.5027207E+00, 0.5027207E+00 /
      data (ref_adm(36,iz,34,11),iz = 1,20) / &
     & 0.3572900E+00, 0.3572900E+00, 0.3278000E+00, 0.3103300E+00, &
     & 0.3318800E+00, 0.3392500E+00, 0.3414800E+00, 0.3441600E+00, &
     & 0.3381700E+00, 0.3840300E+00, 0.4192100E+00, 0.3635600E+00, &
     & 0.4367900E+00, 0.5472000E+00, 0.4500780E+00, 0.4740322E+00, &
     & 0.4953978E+00, 0.5024003E+00, 0.5124021E+00, 0.5124021E+00 /
      data (ref_adm(36,iz,35,11),iz = 1,20) / &
     & 0.3304700E+00, 0.3304700E+00, 0.3324600E+00, 0.3448200E+00, &
     & 0.3570600E+00, 0.3775500E+00, 0.3984900E+00, 0.3438300E+00, &
     & 0.3761200E+00, 0.3831000E+00, 0.3863800E+00, 0.3802900E+00, &
     & 0.4397200E+00, 0.5024500E+00, 0.4464983E+00, 0.4649534E+00, &
     & 0.4884234E+00, 0.5073199E+00, 0.5208701E+00, 0.5208701E+00 /
      data (ref_adm(36,iz,36,11),iz = 1,20) / &
     & 0.3347300E+00, 0.3347300E+00, 0.3584600E+00, 0.3502600E+00, &
     & 0.3688700E+00, 0.3858800E+00, 0.3691500E+00, 0.4308700E+00, &
     & 0.3682500E+00, 0.4582900E+00, 0.4198100E+00, 0.4002000E+00, &
     & 0.5289000E+00, 0.4176700E+00, 0.4054800E+00, 0.4623804E+00, &
     & 0.4810809E+00, 0.5062649E+00, 0.5267685E+00, 0.5267685E+00 /
      data (ref_adm(36,iz,37,11),iz = 1,20) / &
     & 0.3480900E+00, 0.3480900E+00, 0.3598900E+00, 0.3689400E+00, &
     & 0.3668700E+00, 0.3676300E+00, 0.3877700E+00, 0.3919900E+00, &
     & 0.4502600E+00, 0.4406100E+00, 0.4360300E+00, 0.4331500E+00, &
     & 0.5316700E+00, 0.4813911E+00, 0.4553717E+00, 0.4631594E+00, &
     & 0.4783716E+00, 0.5043907E+00, 0.5304238E+00, 0.5304238E+00 /
      data (ref_adm(36,iz,38,11),iz = 1,20) / &
     & 0.3480900E+00, 0.3480900E+00, 0.3598900E+00, 0.3689400E+00, &
     & 0.3668700E+00, 0.3676300E+00, 0.3877700E+00, 0.3919900E+00, &
     & 0.4502600E+00, 0.4406100E+00, 0.4360300E+00, 0.4331500E+00, &
     & 0.5316700E+00, 0.4813911E+00, 0.4553717E+00, 0.4631594E+00, &
     & 0.4783716E+00, 0.5043907E+00, 0.5304238E+00, 0.5304238E+00 /
! Solar Zenith Angle 55.0 Albedo  0.3357905E+00
      data (ref_adm(36,iz, 1,12),iz = 1,20) / &
     & 0.3488300E+00, 0.3488300E+00, 0.3163600E+00, 0.2750200E+00, &
     & 0.3292000E+00, 0.3215200E+00, 0.3516400E+00, 0.3252500E+00, &
     & 0.3842900E+00, 0.3710500E+00, 0.3348500E+00, 0.3590000E+00, &
     & 0.3705500E+00, 0.3556700E+00, 0.4167100E+00, 0.4234900E+00, &
     & 0.4305900E+00, 0.4764052E+00, 0.5110053E+00, 0.5110053E+00 /
      data (ref_adm(36,iz, 2,12),iz = 1,20) / &
     & 0.3488300E+00, 0.3488300E+00, 0.3163600E+00, 0.2750200E+00, &
     & 0.3292000E+00, 0.3215200E+00, 0.3516400E+00, 0.3252500E+00, &
     & 0.3842900E+00, 0.3710500E+00, 0.3348500E+00, 0.3590000E+00, &
     & 0.3705500E+00, 0.3556700E+00, 0.4167100E+00, 0.4234900E+00, &
     & 0.4305900E+00, 0.4764052E+00, 0.5110053E+00, 0.5110053E+00 /
      data (ref_adm(36,iz, 3,12),iz = 1,20) / &
     & 0.3291400E+00, 0.3291400E+00, 0.3232700E+00, 0.3475800E+00, &
     & 0.3066800E+00, 0.3219300E+00, 0.2816600E+00, 0.3473100E+00, &
     & 0.3621600E+00, 0.3639000E+00, 0.3581600E+00, 0.3446400E+00, &
     & 0.3123500E+00, 0.3770100E+00, 0.3491600E+00, 0.4435100E+00, &
     & 0.5919000E+00, 0.4600300E+00, 0.2288989E+00, 0.2288989E+00 /
      data (ref_adm(36,iz, 4,12),iz = 1,20) / &
     & 0.3030300E+00, 0.3030300E+00, 0.3481100E+00, 0.3417300E+00, &
     & 0.2974100E+00, 0.2500100E+00, 0.2948900E+00, 0.3020800E+00, &
     & 0.3178300E+00, 0.3172200E+00, 0.3073300E+00, 0.3160800E+00, &
     & 0.3385200E+00, 0.3730100E+00, 0.3860800E+00, 0.3938500E+00, &
     & 0.4392700E+00, 0.4700861E+00, 0.4977952E+00, 0.4977952E+00 /
      data (ref_adm(36,iz, 5,12),iz = 1,20) / &
     & 0.3377700E+00, 0.3377700E+00, 0.3003300E+00, 0.2790500E+00, &
     & 0.2923200E+00, 0.3128500E+00, 0.3226000E+00, 0.3258500E+00, &
     & 0.3600800E+00, 0.3300600E+00, 0.3153000E+00, 0.3304500E+00, &
     & 0.3170200E+00, 0.2629300E+00, 0.2783800E+00, 0.3837400E+00, &
     & 0.3598600E+00, 0.4646792E+00, 0.4883859E+00, 0.4883859E+00 /
      data (ref_adm(36,iz, 6,12),iz = 1,20) / &
     & 0.3247600E+00, 0.3247600E+00, 0.2886800E+00, 0.2799200E+00, &
     & 0.3404100E+00, 0.3622900E+00, 0.3309800E+00, 0.3392500E+00, &
     & 0.3572600E+00, 0.3378900E+00, 0.3494600E+00, 0.3709100E+00, &
     & 0.3174700E+00, 0.3066700E+00, 0.2158100E+00, 0.2772700E+00, &
     & 0.3684200E+00, 0.4517600E+00, 0.4778985E+00, 0.4778985E+00 /
      data (ref_adm(36,iz, 7,12),iz = 1,20) / &
     & 0.2842400E+00, 0.2842400E+00, 0.3180900E+00, 0.2992100E+00, &
     & 0.3034100E+00, 0.3088700E+00, 0.3183200E+00, 0.3113500E+00, &
     & 0.3303800E+00, 0.3231400E+00, 0.3195600E+00, 0.2614400E+00, &
     & 0.2919800E+00, 0.3172400E+00, 0.3270300E+00, 0.3179300E+00, &
     & 0.3929300E+00, 0.4552600E+00, 0.4668404E+00, 0.4668404E+00 /
      data (ref_adm(36,iz, 8,12),iz = 1,20) / &
     & 0.3462100E+00, 0.3462100E+00, 0.3786800E+00, 0.3728300E+00, &
     & 0.3244500E+00, 0.3282000E+00, 0.3115700E+00, 0.2825100E+00, &
     & 0.3359500E+00, 0.3530400E+00, 0.3676800E+00, 0.3050700E+00, &
     & 0.2963500E+00, 0.3465300E+00, 0.3896300E+00, 0.3730500E+00, &
     & 0.3415700E+00, 0.3881000E+00, 0.4498326E+00, 0.4498326E+00 /
      data (ref_adm(36,iz, 9,12),iz = 1,20) / &
     & 0.3397700E+00, 0.3397700E+00, 0.3364800E+00, 0.3384100E+00, &
     & 0.3345100E+00, 0.3171300E+00, 0.3161500E+00, 0.2986800E+00, &
     & 0.3209100E+00, 0.3268400E+00, 0.3105100E+00, 0.2935400E+00, &
     & 0.2603300E+00, 0.3380400E+00, 0.3500100E+00, 0.3706200E+00, &
     & 0.3943100E+00, 0.4154900E+00, 0.4311974E+00, 0.4311974E+00 /
      data (ref_adm(36,iz,10,12),iz = 1,20) / &
     & 0.3473100E+00, 0.3473100E+00, 0.3402800E+00, 0.3346100E+00, &
     & 0.3418200E+00, 0.3505600E+00, 0.3123000E+00, 0.3272300E+00, &
     & 0.2956000E+00, 0.3152800E+00, 0.3212000E+00, 0.2393700E+00, &
     & 0.2521300E+00, 0.2788400E+00, 0.3449400E+00, 0.3752700E+00, &
     & 0.5222400E+00, 0.4149817E+00, 0.4163330E+00, 0.4163330E+00 /
      data (ref_adm(36,iz,11,12),iz = 1,20) / &
     & 0.3236200E+00, 0.3236200E+00, 0.3159800E+00, 0.3285700E+00, &
     & 0.3431000E+00, 0.3390400E+00, 0.2961500E+00, 0.3288700E+00, &
     & 0.3440200E+00, 0.3236600E+00, 0.3201200E+00, 0.2849400E+00, &
     & 0.2469900E+00, 0.2845100E+00, 0.3464400E+00, 0.3755138E+00, &
     & 0.3902570E+00, 0.4081270E+00, 0.4043003E+00, 0.4043003E+00 /
      data (ref_adm(36,iz,12,12),iz = 1,20) / &
     & 0.3288000E+00, 0.3288000E+00, 0.3419900E+00, 0.3209900E+00, &
     & 0.3272300E+00, 0.3413200E+00, 0.3530900E+00, 0.3396300E+00, &
     & 0.3854600E+00, 0.3505800E+00, 0.2848300E+00, 0.3268000E+00, &
     & 0.2894800E+00, 0.3218700E+00, 0.3604000E+00, 0.3721515E+00, &
     & 0.3865356E+00, 0.4023763E+00, 0.3946891E+00, 0.3946891E+00 /
      data (ref_adm(36,iz,13,12),iz = 1,20) / &
     & 0.3446700E+00, 0.3446700E+00, 0.3512200E+00, 0.3288600E+00, &
     & 0.3356900E+00, 0.3222100E+00, 0.3536900E+00, 0.3305000E+00, &
     & 0.3286300E+00, 0.3310600E+00, 0.3668400E+00, 0.3218200E+00, &
     & 0.3221600E+00, 0.3071800E+00, 0.3376700E+00, 0.3685848E+00, &
     & 0.3825280E+00, 0.3970776E+00, 0.3863842E+00, 0.3863842E+00 /
      data (ref_adm(36,iz,14,12),iz = 1,20) / &
     & 0.3167600E+00, 0.3167600E+00, 0.3138400E+00, 0.3110000E+00, &
     & 0.3020400E+00, 0.3018500E+00, 0.2999000E+00, 0.3037600E+00, &
     & 0.3043300E+00, 0.3055900E+00, 0.3137000E+00, 0.3136500E+00, &
     & 0.3233200E+00, 0.3395100E+00, 0.3529553E+00, 0.3651202E+00, &
     & 0.3777305E+00, 0.3917090E+00, 0.3789496E+00, 0.3789496E+00 /
      data (ref_adm(36,iz,15,12),iz = 1,20) / &
     & 0.3265700E+00, 0.3265700E+00, 0.3523700E+00, 0.3455400E+00, &
     & 0.3363700E+00, 0.3372200E+00, 0.3314200E+00, 0.3071400E+00, &
     & 0.3065500E+00, 0.3064200E+00, 0.3014300E+00, 0.2964800E+00, &
     & 0.2900300E+00, 0.3085400E+00, 0.3546000E+00, 0.3620287E+00, &
     & 0.3732490E+00, 0.3853757E+00, 0.3715048E+00, 0.3715048E+00 /
      data (ref_adm(36,iz,16,12),iz = 1,20) / &
     & 0.3370300E+00, 0.3370300E+00, 0.3191000E+00, 0.3094900E+00, &
     & 0.3228100E+00, 0.3135700E+00, 0.2676000E+00, 0.3209200E+00, &
     & 0.3501600E+00, 0.3598900E+00, 0.3446300E+00, 0.3040100E+00, &
     & 0.3632500E+00, 0.3981100E+00, 0.3586100E+00, 0.3591138E+00, &
     & 0.3694184E+00, 0.3793977E+00, 0.3630130E+00, 0.3630130E+00 /
      data (ref_adm(36,iz,17,12),iz = 1,20) / &
     & 0.3178500E+00, 0.3178500E+00, 0.2933200E+00, 0.2870100E+00, &
     & 0.3118400E+00, 0.3021800E+00, 0.3117000E+00, 0.3480400E+00, &
     & 0.3370200E+00, 0.3793100E+00, 0.2659700E+00, 0.2850900E+00, &
     & 0.3319200E+00, 0.3382200E+00, 0.3130800E+00, 0.2685000E+00, &
     & 0.3658027E+00, 0.3739884E+00, 0.3556542E+00, 0.3556542E+00 /
      data (ref_adm(36,iz,18,12),iz = 1,20) / &
     & 0.3177000E+00, 0.3177000E+00, 0.3158400E+00, 0.2872500E+00, &
     & 0.2797800E+00, 0.2746500E+00, 0.3399900E+00, 0.3053600E+00, &
     & 0.2884100E+00, 0.2834700E+00, 0.3054400E+00, 0.3332000E+00, &
     & 0.3645800E+00, 0.3099500E+00, 0.2766300E+00, 0.2766100E+00, &
     & 0.3312856E+00, 0.3238298E+00, 0.2842369E+00, 0.2842369E+00 /
      data (ref_adm(36,iz,19,12),iz = 1,20) / &
     & 0.3183400E+00, 0.3183400E+00, 0.3072000E+00, 0.2930000E+00, &
     & 0.3151500E+00, 0.2691200E+00, 0.3147800E+00, 0.3088500E+00, &
     & 0.2987500E+00, 0.3142800E+00, 0.3625100E+00, 0.3014500E+00, &
     & 0.3065200E+00, 0.2933000E+00, 0.3062900E+00, 0.3058500E+00, &
     & 0.3280872E+00, 0.3206233E+00, 0.2818967E+00, 0.2818967E+00 /
      data (ref_adm(36,iz,20,12),iz = 1,20) / &
     & 0.3186700E+00, 0.3186700E+00, 0.2859800E+00, 0.2960600E+00, &
     & 0.3041600E+00, 0.2973600E+00, 0.3430200E+00, 0.3019600E+00, &
     & 0.3102200E+00, 0.3000200E+00, 0.3546400E+00, 0.3604000E+00, &
     & 0.2986900E+00, 0.2439500E+00, 0.3072100E+00, 0.3238576E+00, &
     & 0.3245187E+00, 0.3168587E+00, 0.2800749E+00, 0.2800749E+00 /
      data (ref_adm(36,iz,21,12),iz = 1,20) / &
     & 0.3070200E+00, 0.3070200E+00, 0.3028800E+00, 0.3174500E+00, &
     & 0.2870600E+00, 0.2685800E+00, 0.3041100E+00, 0.2985200E+00, &
     & 0.2775100E+00, 0.2912400E+00, 0.3705600E+00, 0.3370300E+00, &
     & 0.3095100E+00, 0.3145400E+00, 0.3042400E+00, 0.3210717E+00, &
     & 0.3215325E+00, 0.3136944E+00, 0.2783706E+00, 0.2783706E+00 /
      data (ref_adm(36,iz,22,12),iz = 1,20) / &
     & 0.2882800E+00, 0.2882800E+00, 0.3080600E+00, 0.3217200E+00, &
     & 0.3143100E+00, 0.2791800E+00, 0.2801000E+00, 0.2716500E+00, &
     & 0.2896700E+00, 0.3047100E+00, 0.3148900E+00, 0.3443500E+00, &
     & 0.3289200E+00, 0.3222800E+00, 0.3315600E+00, 0.4354500E+00, &
     & 0.3920482E+00, 0.3879923E+00, 0.3519448E+00, 0.3519448E+00 /
      data (ref_adm(36,iz,23,12),iz = 1,20) / &
     & 0.3038900E+00, 0.3038900E+00, 0.3006600E+00, 0.3056900E+00, &
     & 0.3157800E+00, 0.2732600E+00, 0.2723800E+00, 0.2726500E+00, &
     & 0.2903200E+00, 0.2845900E+00, 0.2914600E+00, 0.3180000E+00, &
     & 0.3003600E+00, 0.2830200E+00, 0.2924100E+00, 0.2858000E+00, &
     & 0.3861510E+00, 0.3805464E+00, 0.3499094E+00, 0.3499094E+00 /
      data (ref_adm(36,iz,24,12),iz = 1,20) / &
     & 0.3018900E+00, 0.3018900E+00, 0.3280600E+00, 0.3174200E+00, &
     & 0.3461300E+00, 0.3224300E+00, 0.2807900E+00, 0.2914700E+00, &
     & 0.3044400E+00, 0.2805800E+00, 0.2742500E+00, 0.2832400E+00, &
     & 0.2965600E+00, 0.2944700E+00, 0.2817500E+00, 0.2454400E+00, &
     & 0.3799914E+00, 0.3751853E+00, 0.3490480E+00, 0.3490480E+00 /
      data (ref_adm(36,iz,25,12),iz = 1,20) / &
     & 0.3356000E+00, 0.3356000E+00, 0.3356400E+00, 0.3303300E+00, &
     & 0.3324900E+00, 0.3413200E+00, 0.3416100E+00, 0.2899100E+00, &
     & 0.3091700E+00, 0.3046000E+00, 0.3104700E+00, 0.3430900E+00, &
     & 0.3012000E+00, 0.2930100E+00, 0.2947700E+00, 0.3492500E+00, &
     & 0.3493800E+00, 0.3704297E+00, 0.3495581E+00, 0.3495581E+00 /
      data (ref_adm(36,iz,26,12),iz = 1,20) / &
     & 0.3293400E+00, 0.3293400E+00, 0.3362000E+00, 0.3302400E+00, &
     & 0.3430200E+00, 0.3542400E+00, 0.3606900E+00, 0.3495600E+00, &
     & 0.3388700E+00, 0.3257200E+00, 0.3307500E+00, 0.3481800E+00, &
     & 0.3600000E+00, 0.3888800E+00, 0.3717200E+00, 0.3689000E+00, &
     & 0.2907900E+00, 0.3150000E+00, 0.3512850E+00, 0.3512850E+00 /
      data (ref_adm(36,iz,27,12),iz = 1,20) / &
     & 0.3269400E+00, 0.3269400E+00, 0.3392300E+00, 0.3428200E+00, &
     & 0.3306000E+00, 0.3518700E+00, 0.3840400E+00, 0.3748800E+00, &
     & 0.3649900E+00, 0.3628300E+00, 0.3631400E+00, 0.3402900E+00, &
     & 0.3426700E+00, 0.3512100E+00, 0.3398700E+00, 0.3632000E+00, &
     & 0.3609500E+00, 0.3694356E+00, 0.3552337E+00, 0.3552337E+00 /
      data (ref_adm(36,iz,28,12),iz = 1,20) / &
     & 0.3335400E+00, 0.3335400E+00, 0.3395700E+00, 0.3344000E+00, &
     & 0.3685300E+00, 0.3630200E+00, 0.3677900E+00, 0.3549900E+00, &
     & 0.3434000E+00, 0.3169100E+00, 0.3043600E+00, 0.3095900E+00, &
     & 0.3654200E+00, 0.3268800E+00, 0.2876400E+00, 0.2909900E+00, &
     & 0.4452200E+00, 0.3718495E+00, 0.3609333E+00, 0.3609333E+00 /
      data (ref_adm(36,iz,29,12),iz = 1,20) / &
     & 0.3349000E+00, 0.3349000E+00, 0.3461700E+00, 0.3466400E+00, &
     & 0.3512500E+00, 0.3588200E+00, 0.3453300E+00, 0.3443500E+00, &
     & 0.3447400E+00, 0.3601500E+00, 0.3367600E+00, 0.3181600E+00, &
     & 0.2698800E+00, 0.2853200E+00, 0.2783400E+00, 0.3127200E+00, &
     & 0.2950500E+00, 0.3746517E+00, 0.3672475E+00, 0.3672475E+00 /
      data (ref_adm(36,iz,30,12),iz = 1,20) / &
     & 0.3630700E+00, 0.3630700E+00, 0.3613700E+00, 0.3460800E+00, &
     & 0.3450100E+00, 0.3584100E+00, 0.3619000E+00, 0.3505500E+00, &
     & 0.3476000E+00, 0.3417100E+00, 0.3421100E+00, 0.3223900E+00, &
     & 0.3449100E+00, 0.2784700E+00, 0.2789300E+00, 0.2921300E+00, &
     & 0.3542500E+00, 0.3797823E+00, 0.3737174E+00, 0.3737174E+00 /
      data (ref_adm(36,iz,31,12),iz = 1,20) / &
     & 0.3708500E+00, 0.3708500E+00, 0.3588300E+00, 0.3372800E+00, &
     & 0.3330400E+00, 0.3309600E+00, 0.3346000E+00, 0.3254000E+00, &
     & 0.3492600E+00, 0.3467100E+00, 0.3405400E+00, 0.3058900E+00, &
     & 0.2966300E+00, 0.2756200E+00, 0.2830900E+00, 0.3987320E+00, &
     & 0.3962178E+00, 0.3857688E+00, 0.3265300E+00, 0.3265300E+00 /
      data (ref_adm(36,iz,32,12),iz = 1,20) / &
     & 0.3197700E+00, 0.3197700E+00, 0.3333500E+00, 0.3316900E+00, &
     & 0.3222700E+00, 0.3484200E+00, 0.3188800E+00, 0.3192200E+00, &
     & 0.3207400E+00, 0.3307900E+00, 0.3481600E+00, 0.3516600E+00, &
     & 0.3946400E+00, 0.3716600E+00, 0.3832300E+00, 0.3722800E+00, &
     & 0.4038873E+00, 0.3926370E+00, 0.3880253E+00, 0.3880253E+00 /
      data (ref_adm(36,iz,33,12),iz = 1,20) / &
     & 0.3276800E+00, 0.3276800E+00, 0.3332400E+00, 0.3390500E+00, &
     & 0.3293200E+00, 0.3407200E+00, 0.3217600E+00, 0.3469500E+00, &
     & 0.3578900E+00, 0.3591500E+00, 0.3874000E+00, 0.3468400E+00, &
     & 0.3643400E+00, 0.3759800E+00, 0.3995600E+00, 0.3138200E+00, &
     & 0.4112694E+00, 0.3997330E+00, 0.3948863E+00, 0.3948863E+00 /
      data (ref_adm(36,iz,34,12),iz = 1,20) / &
     & 0.3208000E+00, 0.3208000E+00, 0.3169300E+00, 0.3161500E+00, &
     & 0.3297700E+00, 0.3408800E+00, 0.3411600E+00, 0.3602500E+00, &
     & 0.3770900E+00, 0.3792000E+00, 0.3903500E+00, 0.3655400E+00, &
     & 0.3726300E+00, 0.4000300E+00, 0.3996300E+00, 0.4161072E+00, &
     & 0.4177864E+00, 0.4062072E+00, 0.4011067E+00, 0.4011067E+00 /
      data (ref_adm(36,iz,35,12),iz = 1,20) / &
     & 0.3325900E+00, 0.3325900E+00, 0.3273200E+00, 0.3209900E+00, &
     & 0.3322100E+00, 0.3552600E+00, 0.3749200E+00, 0.3682700E+00, &
     & 0.3527100E+00, 0.3893700E+00, 0.4049700E+00, 0.3896200E+00, &
     & 0.4058600E+00, 0.4235400E+00, 0.3804100E+00, 0.4145305E+00, &
     & 0.4214926E+00, 0.4115054E+00, 0.4063460E+00, 0.4063460E+00 /
      data (ref_adm(36,iz,36,12),iz = 1,20) / &
     & 0.3249100E+00, 0.3249100E+00, 0.3286600E+00, 0.3321400E+00, &
     & 0.3567400E+00, 0.3386800E+00, 0.3634300E+00, 0.3839100E+00, &
     & 0.3825400E+00, 0.4352200E+00, 0.4013500E+00, 0.4072200E+00, &
     & 0.4083700E+00, 0.4160500E+00, 0.2867100E+00, 0.6263600E+00, &
     & 0.4223311E+00, 0.4152892E+00, 0.4098004E+00, 0.4098004E+00 /
      data (ref_adm(36,iz,37,12),iz = 1,20) / &
     & 0.3063100E+00, 0.3063100E+00, 0.3124600E+00, 0.3501800E+00, &
     & 0.3715600E+00, 0.3607100E+00, 0.3769900E+00, 0.3804800E+00, &
     & 0.4296100E+00, 0.4018800E+00, 0.4173000E+00, 0.4325000E+00, &
     & 0.4681500E+00, 0.4190400E+00, 0.4260400E+00, 0.4638600E+00, &
     & 0.4313000E+00, 0.4172590E+00, 0.4116987E+00, 0.4116987E+00 /
      data (ref_adm(36,iz,38,12),iz = 1,20) / &
     & 0.3063100E+00, 0.3063100E+00, 0.3124600E+00, 0.3501800E+00, &
     & 0.3715600E+00, 0.3607100E+00, 0.3769900E+00, 0.3804800E+00, &
     & 0.4296100E+00, 0.4018800E+00, 0.4173000E+00, 0.4325000E+00, &
     & 0.4681500E+00, 0.4190400E+00, 0.4260400E+00, 0.4638600E+00, &
     & 0.4313000E+00, 0.4172590E+00, 0.4116987E+00, 0.4116987E+00 /
! Solar Zenith Angle 60.0 Albedo  0.3372080E+00
      data (ref_adm(36,iz, 1,13),iz = 1,20) / &
     & 0.3076800E+00, 0.3076800E+00, 0.3343700E+00, 0.3131200E+00, &
     & 0.2903300E+00, 0.3110600E+00, 0.3087200E+00, 0.3046600E+00, &
     & 0.3565900E+00, 0.3568500E+00, 0.3326300E+00, 0.3572400E+00, &
     & 0.3770000E+00, 0.4201800E+00, 0.4331500E+00, 0.5034300E+00, &
     & 0.5366900E+00, 0.6749200E+00, 0.7434152E+00, 0.7434152E+00 /
      data (ref_adm(36,iz, 2,13),iz = 1,20) / &
     & 0.3076800E+00, 0.3076800E+00, 0.3343700E+00, 0.3131200E+00, &
     & 0.2903300E+00, 0.3110600E+00, 0.3087200E+00, 0.3046600E+00, &
     & 0.3565900E+00, 0.3568500E+00, 0.3326300E+00, 0.3572400E+00, &
     & 0.3770000E+00, 0.4201800E+00, 0.4331500E+00, 0.5034300E+00, &
     & 0.5366900E+00, 0.6749200E+00, 0.7434152E+00, 0.7434152E+00 /
      data (ref_adm(36,iz, 3,13),iz = 1,20) / &
     & 0.3014700E+00, 0.3014700E+00, 0.3083800E+00, 0.3081000E+00, &
     & 0.3338000E+00, 0.3187100E+00, 0.2963900E+00, 0.3213700E+00, &
     & 0.3434500E+00, 0.3419700E+00, 0.3615800E+00, 0.3129200E+00, &
     & 0.3656800E+00, 0.3956600E+00, 0.4399700E+00, 0.4699700E+00, &
     & 0.5547300E+00, 0.6212000E+00, 0.2967615E+00, 0.2967615E+00 /
      data (ref_adm(36,iz, 4,13),iz = 1,20) / &
     & 0.3039100E+00, 0.3039100E+00, 0.3160900E+00, 0.2996000E+00, &
     & 0.2855400E+00, 0.2947000E+00, 0.3199000E+00, 0.3340200E+00, &
     & 0.3426100E+00, 0.3639800E+00, 0.3619900E+00, 0.3825000E+00, &
     & 0.3705200E+00, 0.3953800E+00, 0.3793000E+00, 0.4246300E+00, &
     & 0.4732000E+00, 0.7060800E+00, 0.6808781E+00, 0.6808781E+00 /
      data (ref_adm(36,iz, 5,13),iz = 1,20) / &
     & 0.3171700E+00, 0.3171700E+00, 0.3078400E+00, 0.2943700E+00, &
     & 0.2977500E+00, 0.3085200E+00, 0.3168300E+00, 0.3493200E+00, &
     & 0.3441800E+00, 0.3685300E+00, 0.3932600E+00, 0.3610800E+00, &
     & 0.3682300E+00, 0.4095900E+00, 0.3644300E+00, 0.3799700E+00, &
     & 0.4171200E+00, 0.5548900E+00, 0.6332338E+00, 0.6332338E+00 /
      data (ref_adm(36,iz, 6,13),iz = 1,20) / &
     & 0.3225500E+00, 0.3225500E+00, 0.3058500E+00, 0.2993600E+00, &
     & 0.3030700E+00, 0.2963300E+00, 0.3108800E+00, 0.3144700E+00, &
     & 0.3463400E+00, 0.3642300E+00, 0.3768900E+00, 0.3579300E+00, &
     & 0.3649200E+00, 0.3305100E+00, 0.3819000E+00, 0.3744700E+00, &
     & 0.4188400E+00, 0.5297444E+00, 0.5896232E+00, 0.5896232E+00 /
      data (ref_adm(36,iz, 7,13),iz = 1,20) / &
     & 0.3019100E+00, 0.3019100E+00, 0.2863900E+00, 0.2761500E+00, &
     & 0.2761000E+00, 0.2826400E+00, 0.2896000E+00, 0.2985300E+00, &
     & 0.3132000E+00, 0.3188800E+00, 0.3411600E+00, 0.3658900E+00, &
     & 0.3702100E+00, 0.3715700E+00, 0.3966600E+00, 0.4087100E+00, &
     & 0.4557300E+00, 0.5213813E+00, 0.5577567E+00, 0.5577567E+00 /
      data (ref_adm(36,iz, 8,13),iz = 1,20) / &
     & 0.3196200E+00, 0.3196200E+00, 0.3173500E+00, 0.3097100E+00, &
     & 0.3070800E+00, 0.3175600E+00, 0.3203500E+00, 0.3144600E+00, &
     & 0.3202300E+00, 0.3094700E+00, 0.3281600E+00, 0.3512100E+00, &
     & 0.3708700E+00, 0.3961300E+00, 0.3780700E+00, 0.4471300E+00, &
     & 0.4396100E+00, 0.4471600E+00, 0.5442649E+00, 0.5442649E+00 /
      data (ref_adm(36,iz, 9,13),iz = 1,20) / &
     & 0.2914500E+00, 0.2914500E+00, 0.2938000E+00, 0.2952900E+00, &
     & 0.2841500E+00, 0.3047700E+00, 0.3041100E+00, 0.3118400E+00, &
     & 0.3212700E+00, 0.3100700E+00, 0.3351500E+00, 0.3284300E+00, &
     & 0.3332700E+00, 0.3447400E+00, 0.3820000E+00, 0.3566800E+00, &
     & 0.4012600E+00, 0.4182800E+00, 0.5224077E+00, 0.5224077E+00 /
      data (ref_adm(36,iz,10,13),iz = 1,20) / &
     & 0.2979400E+00, 0.2979400E+00, 0.2985100E+00, 0.3111100E+00, &
     & 0.3117300E+00, 0.3075400E+00, 0.2835800E+00, 0.2782300E+00, &
     & 0.3090600E+00, 0.3255300E+00, 0.3446600E+00, 0.3229300E+00, &
     & 0.3059500E+00, 0.3733100E+00, 0.3938800E+00, 0.4044200E+00, &
     & 0.4157100E+00, 0.4656264E+00, 0.4916394E+00, 0.4916394E+00 /
      data (ref_adm(36,iz,11,13),iz = 1,20) / &
     & 0.3029600E+00, 0.3029600E+00, 0.2973400E+00, 0.3077800E+00, &
     & 0.3244300E+00, 0.3067100E+00, 0.2862900E+00, 0.2825200E+00, &
     & 0.3090100E+00, 0.3216700E+00, 0.3498500E+00, 0.3152300E+00, &
     & 0.3103600E+00, 0.3445700E+00, 0.4080000E+00, 0.3783300E+00, &
     & 0.3494300E+00, 0.4799800E+00, 0.4690025E+00, 0.4690025E+00 /
      data (ref_adm(36,iz,12,13),iz = 1,20) / &
     & 0.3027300E+00, 0.3027300E+00, 0.3078200E+00, 0.2997800E+00, &
     & 0.3099700E+00, 0.3085200E+00, 0.3013300E+00, 0.3099600E+00, &
     & 0.3097000E+00, 0.2926500E+00, 0.3471100E+00, 0.3523200E+00, &
     & 0.3352700E+00, 0.3260500E+00, 0.2392000E+00, 0.3186800E+00, &
     & 0.3445500E+00, 0.4419979E+00, 0.4524906E+00, 0.4524906E+00 /
      data (ref_adm(36,iz,13,13),iz = 1,20) / &
     & 0.3057300E+00, 0.3057300E+00, 0.2988800E+00, 0.3184600E+00, &
     & 0.3073300E+00, 0.2876300E+00, 0.3137400E+00, 0.3175300E+00, &
     & 0.3067200E+00, 0.3074700E+00, 0.3498500E+00, 0.3238300E+00, &
     & 0.2967500E+00, 0.3252000E+00, 0.3699700E+00, 0.2657100E+00, &
     & 0.3310300E+00, 0.4340024E+00, 0.4393682E+00, 0.4393682E+00 /
      data (ref_adm(36,iz,14,13),iz = 1,20) / &
     & 0.2965500E+00, 0.2965500E+00, 0.2927600E+00, 0.2898800E+00, &
     & 0.2874600E+00, 0.2860600E+00, 0.2861700E+00, 0.2936000E+00, &
     & 0.2923800E+00, 0.2998200E+00, 0.3062600E+00, 0.3099300E+00, &
     & 0.2948200E+00, 0.3158100E+00, 0.3771400E+00, 0.3817814E+00, &
     & 0.2981700E+00, 0.4270903E+00, 0.4287356E+00, 0.4287356E+00 /
      data (ref_adm(36,iz,15,13),iz = 1,20) / &
     & 0.3062000E+00, 0.3062000E+00, 0.3550100E+00, 0.3455100E+00, &
     & 0.3486500E+00, 0.3403900E+00, 0.3262400E+00, 0.3438400E+00, &
     & 0.3287700E+00, 0.3152900E+00, 0.3045400E+00, 0.2833600E+00, &
     & 0.2886600E+00, 0.3085800E+00, 0.3386800E+00, 0.3678900E+00, &
     & 0.3956626E+00, 0.4197055E+00, 0.4190849E+00, 0.4190849E+00 /
      data (ref_adm(36,iz,16,13),iz = 1,20) / &
     & 0.3169500E+00, 0.3169500E+00, 0.3084500E+00, 0.3148700E+00, &
     & 0.3041900E+00, 0.3126700E+00, 0.3022900E+00, 0.3453200E+00, &
     & 0.3235800E+00, 0.3364700E+00, 0.3821400E+00, 0.3427700E+00, &
     & 0.3681600E+00, 0.3272100E+00, 0.3060700E+00, 0.3167900E+00, &
     & 0.3902922E+00, 0.4112865E+00, 0.4084565E+00, 0.4084565E+00 /
      data (ref_adm(36,iz,17,13),iz = 1,20) / &
     & 0.3027500E+00, 0.3027500E+00, 0.3030000E+00, 0.3149300E+00, &
     & 0.2920000E+00, 0.2782600E+00, 0.2904800E+00, 0.3232800E+00, &
     & 0.3533000E+00, 0.3007000E+00, 0.3232200E+00, 0.3061200E+00, &
     & 0.3122900E+00, 0.3135600E+00, 0.3081700E+00, 0.3696514E+00, &
     & 0.3851287E+00, 0.4040660E+00, 0.3981963E+00, 0.3981963E+00 /
      data (ref_adm(36,iz,18,13),iz = 1,20) / &
     & 0.3067400E+00, 0.3067400E+00, 0.2979200E+00, 0.2881400E+00, &
     & 0.2967500E+00, 0.3086100E+00, 0.2990500E+00, 0.2655500E+00, &
     & 0.2713900E+00, 0.2941300E+00, 0.2951200E+00, 0.3155600E+00, &
     & 0.3181500E+00, 0.3025000E+00, 0.3139700E+00, 0.4250000E+00, &
     & 0.3277342E+00, 0.3251892E+00, 0.2996922E+00, 0.2996922E+00 /
      data (ref_adm(36,iz,19,13),iz = 1,20) / &
     & 0.2974100E+00, 0.2974100E+00, 0.3118100E+00, 0.3151100E+00, &
     & 0.3046300E+00, 0.2968900E+00, 0.2980200E+00, 0.2802300E+00, &
     & 0.2874300E+00, 0.3383900E+00, 0.3248800E+00, 0.3010100E+00, &
     & 0.2997700E+00, 0.3150900E+00, 0.3366100E+00, 0.3354000E+00, &
     & 0.3256276E+00, 0.3227268E+00, 0.2967535E+00, 0.2967535E+00 /
      data (ref_adm(36,iz,20,13),iz = 1,20) / &
     & 0.3119300E+00, 0.3119300E+00, 0.2924700E+00, 0.2866700E+00, &
     & 0.2828500E+00, 0.2914500E+00, 0.2941700E+00, 0.2849300E+00, &
     & 0.3054500E+00, 0.3298100E+00, 0.3377500E+00, 0.3607700E+00, &
     & 0.3397800E+00, 0.3260600E+00, 0.2750700E+00, 0.3240200E+00, &
     & 0.3240140E+00, 0.3206726E+00, 0.2949005E+00, 0.2949005E+00 /
      data (ref_adm(36,iz,21,13),iz = 1,20) / &
     & 0.2902500E+00, 0.2902500E+00, 0.2719300E+00, 0.2803100E+00, &
     & 0.2959200E+00, 0.2822900E+00, 0.2772300E+00, 0.3093800E+00, &
     & 0.3158600E+00, 0.2927500E+00, 0.3316000E+00, 0.3202800E+00, &
     & 0.3421300E+00, 0.3277300E+00, 0.3005700E+00, 0.3222681E+00, &
     & 0.3226943E+00, 0.3188291E+00, 0.2935729E+00, 0.2935729E+00 /
      data (ref_adm(36,iz,22,13),iz = 1,20) / &
     & 0.3073100E+00, 0.3073100E+00, 0.2738800E+00, 0.2862600E+00, &
     & 0.2927000E+00, 0.2851000E+00, 0.2867600E+00, 0.2922300E+00, &
     & 0.2988300E+00, 0.2879300E+00, 0.3112700E+00, 0.3314100E+00, &
     & 0.3280000E+00, 0.3270400E+00, 0.2883900E+00, 0.3063700E+00, &
     & 0.3673031E+00, 0.3698873E+00, 0.3470657E+00, 0.3470657E+00 /
      data (ref_adm(36,iz,23,13),iz = 1,20) / &
     & 0.3011700E+00, 0.3011700E+00, 0.2932200E+00, 0.2892800E+00, &
     & 0.2926400E+00, 0.2958000E+00, 0.2855600E+00, 0.2859100E+00, &
     & 0.2593200E+00, 0.3063600E+00, 0.3120100E+00, 0.3344200E+00, &
     & 0.3330900E+00, 0.3116800E+00, 0.3130900E+00, 0.3007500E+00, &
     & 0.3660900E+00, 0.3677826E+00, 0.3472666E+00, 0.3472666E+00 /
      data (ref_adm(36,iz,24,13),iz = 1,20) / &
     & 0.3129600E+00, 0.3129600E+00, 0.3466400E+00, 0.3371600E+00, &
     & 0.3393100E+00, 0.3221800E+00, 0.3327900E+00, 0.3349400E+00, &
     & 0.3147900E+00, 0.2980200E+00, 0.3080300E+00, 0.3125500E+00, &
     & 0.3079000E+00, 0.2898300E+00, 0.2849500E+00, 0.2628500E+00, &
     & 0.3142900E+00, 0.3673671E+00, 0.3486852E+00, 0.3486852E+00 /
      data (ref_adm(36,iz,25,13),iz = 1,20) / &
     & 0.3329600E+00, 0.3329600E+00, 0.3073200E+00, 0.3021100E+00, &
     & 0.3165100E+00, 0.3211000E+00, 0.3248700E+00, 0.3197900E+00, &
     & 0.3251000E+00, 0.3522600E+00, 0.3596900E+00, 0.3665800E+00, &
     & 0.3623800E+00, 0.3547400E+00, 0.2977500E+00, 0.3075500E+00, &
     & 0.2825100E+00, 0.3343200E+00, 0.3514364E+00, 0.3514364E+00 /
      data (ref_adm(36,iz,26,13),iz = 1,20) / &
     & 0.2969800E+00, 0.2969800E+00, 0.3124400E+00, 0.3176600E+00, &
     & 0.3237800E+00, 0.3251100E+00, 0.3229100E+00, 0.3039700E+00, &
     & 0.2957800E+00, 0.2999700E+00, 0.3113900E+00, 0.3239300E+00, &
     & 0.3279500E+00, 0.3473600E+00, 0.3369100E+00, 0.3470900E+00, &
     & 0.3195600E+00, 0.3299200E+00, 0.3553298E+00, 0.3553298E+00 /
      data (ref_adm(36,iz,27,13),iz = 1,20) / &
     & 0.3054100E+00, 0.3054100E+00, 0.3324500E+00, 0.3252700E+00, &
     & 0.3076500E+00, 0.3174200E+00, 0.3215800E+00, 0.3194200E+00, &
     & 0.2984200E+00, 0.2903700E+00, 0.2898600E+00, 0.3069700E+00, &
     & 0.3167500E+00, 0.3749900E+00, 0.3630300E+00, 0.3440600E+00, &
     & 0.3442500E+00, 0.2943200E+00, 0.3610752E+00, 0.3610752E+00 /
      data (ref_adm(36,iz,28,13),iz = 1,20) / &
     & 0.3033500E+00, 0.3033500E+00, 0.3172500E+00, 0.3231200E+00, &
     & 0.3209100E+00, 0.3094200E+00, 0.3250400E+00, 0.3291800E+00, &
     & 0.3396700E+00, 0.3319300E+00, 0.3111300E+00, 0.2945000E+00, &
     & 0.2934100E+00, 0.3608500E+00, 0.3600100E+00, 0.3642000E+00, &
     & 0.3742200E+00, 0.3791252E+00, 0.3682299E+00, 0.3682299E+00 /
      data (ref_adm(36,iz,29,13),iz = 1,20) / &
     & 0.3014800E+00, 0.3014800E+00, 0.3140700E+00, 0.3184100E+00, &
     & 0.3236300E+00, 0.3520800E+00, 0.3233600E+00, 0.3229300E+00, &
     & 0.3582100E+00, 0.3213600E+00, 0.3291800E+00, 0.3144700E+00, &
     & 0.3274400E+00, 0.3255000E+00, 0.3054600E+00, 0.3497100E+00, &
     & 0.4357700E+00, 0.3845099E+00, 0.3758805E+00, 0.3758805E+00 /
      data (ref_adm(36,iz,30,13),iz = 1,20) / &
     & 0.2980400E+00, 0.2980400E+00, 0.3136600E+00, 0.3332600E+00, &
     & 0.3274700E+00, 0.3286400E+00, 0.3482000E+00, 0.3420500E+00, &
     & 0.3383200E+00, 0.3406900E+00, 0.3614200E+00, 0.3041700E+00, &
     & 0.3281000E+00, 0.3381000E+00, 0.3196500E+00, 0.3437700E+00, &
     & 0.4140800E+00, 0.3912233E+00, 0.3835895E+00, 0.3835895E+00 /
      data (ref_adm(36,iz,31,13),iz = 1,20) / &
     & 0.3126100E+00, 0.3126100E+00, 0.3301600E+00, 0.3366300E+00, &
     & 0.3397600E+00, 0.3530600E+00, 0.3492000E+00, 0.3575300E+00, &
     & 0.3623800E+00, 0.3606900E+00, 0.3770600E+00, 0.3333300E+00, &
     & 0.3377700E+00, 0.3307200E+00, 0.3729100E+00, 0.3890800E+00, &
     & 0.3642000E+00, 0.4510600E+00, 0.3916839E+00, 0.3916839E+00 /
      data (ref_adm(36,iz,32,13),iz = 1,20) / &
     & 0.3081900E+00, 0.3081900E+00, 0.3104400E+00, 0.3125600E+00, &
     & 0.3114300E+00, 0.3174900E+00, 0.3388400E+00, 0.3556800E+00, &
     & 0.3450700E+00, 0.3457900E+00, 0.3428300E+00, 0.3446100E+00, &
     & 0.3518300E+00, 0.3648600E+00, 0.3941800E+00, 0.4035600E+00, &
     & 0.4071300E+00, 0.4056223E+00, 0.3995765E+00, 0.3995765E+00 /
      data (ref_adm(36,iz,33,13),iz = 1,20) / &
     & 0.3110100E+00, 0.3110100E+00, 0.3079700E+00, 0.3206400E+00, &
     & 0.3488800E+00, 0.3467400E+00, 0.3544900E+00, 0.3610100E+00, &
     & 0.3592200E+00, 0.3637000E+00, 0.3447700E+00, 0.3508300E+00, &
     & 0.3742600E+00, 0.4319800E+00, 0.4269500E+00, 0.4020100E+00, &
     & 0.4065900E+00, 0.4127606E+00, 0.4069833E+00, 0.4069833E+00 /
      data (ref_adm(36,iz,34,13),iz = 1,20) / &
     & 0.2958600E+00, 0.2958600E+00, 0.2882700E+00, 0.3121000E+00, &
     & 0.3285700E+00, 0.3285900E+00, 0.3208800E+00, 0.3305500E+00, &
     & 0.3526700E+00, 0.3611100E+00, 0.3499100E+00, 0.3645700E+00, &
     & 0.3880400E+00, 0.4312500E+00, 0.4289300E+00, 0.3797900E+00, &
     & 0.4097300E+00, 0.4190614E+00, 0.4135182E+00, 0.4135182E+00 /
      data (ref_adm(36,iz,35,13),iz = 1,20) / &
     & 0.2933000E+00, 0.2933000E+00, 0.3144700E+00, 0.3252800E+00, &
     & 0.3378800E+00, 0.3189000E+00, 0.3168500E+00, 0.3332600E+00, &
     & 0.3482900E+00, 0.3522400E+00, 0.3883900E+00, 0.3663100E+00, &
     & 0.3724700E+00, 0.4299300E+00, 0.3785500E+00, 0.3781000E+00, &
     & 0.4210677E+00, 0.4242151E+00, 0.4189323E+00, 0.4189323E+00 /
      data (ref_adm(36,iz,36,13),iz = 1,20) / &
     & 0.3247300E+00, 0.3247300E+00, 0.3280000E+00, 0.3413200E+00, &
     & 0.3306700E+00, 0.3155700E+00, 0.3298800E+00, 0.3572800E+00, &
     & 0.3576000E+00, 0.3659200E+00, 0.3950000E+00, 0.4031400E+00, &
     & 0.3799900E+00, 0.3936200E+00, 0.3783200E+00, 0.4123200E+00, &
     & 0.4230143E+00, 0.4278460E+00, 0.4225401E+00, 0.4225401E+00 /
      data (ref_adm(36,iz,37,13),iz = 1,20) / &
     & 0.3181100E+00, 0.3181100E+00, 0.3331100E+00, 0.3433400E+00, &
     & 0.3299000E+00, 0.3456200E+00, 0.3395500E+00, 0.3460800E+00, &
     & 0.3662000E+00, 0.3681700E+00, 0.4047300E+00, 0.4287500E+00, &
     & 0.4124400E+00, 0.3877100E+00, 0.4342400E+00, 0.5391500E+00, &
     & 0.4237682E+00, 0.4298485E+00, 0.4245571E+00, 0.4245571E+00 /
      data (ref_adm(36,iz,38,13),iz = 1,20) / &
     & 0.3181100E+00, 0.3181100E+00, 0.3331100E+00, 0.3433400E+00, &
     & 0.3299000E+00, 0.3456200E+00, 0.3395500E+00, 0.3460800E+00, &
     & 0.3662000E+00, 0.3681700E+00, 0.4047300E+00, 0.4287500E+00, &
     & 0.4124400E+00, 0.3877100E+00, 0.4342400E+00, 0.5391500E+00, &
     & 0.4237682E+00, 0.4298485E+00, 0.4245571E+00, 0.4245571E+00 /
! Solar Zenith Angle 65.0 Albedo  0.3449690E+00
      data (ref_adm(36,iz, 1,14),iz = 1,20) / &
     & 0.2997100E+00, 0.2997100E+00, 0.3014700E+00, 0.3132300E+00, &
     & 0.3201500E+00, 0.3378000E+00, 0.3583600E+00, 0.3480400E+00, &
     & 0.3462000E+00, 0.3594400E+00, 0.3488100E+00, 0.3356000E+00, &
     & 0.3399300E+00, 0.3830400E+00, 0.3838900E+00, 0.5065100E+00, &
     & 0.4898500E+00, 0.5205303E+00, 0.5342941E+00, 0.5342941E+00 /
      data (ref_adm(36,iz, 2,14),iz = 1,20) / &
     & 0.2997100E+00, 0.2997100E+00, 0.3014700E+00, 0.3132300E+00, &
     & 0.3201500E+00, 0.3378000E+00, 0.3583600E+00, 0.3480400E+00, &
     & 0.3462000E+00, 0.3594400E+00, 0.3488100E+00, 0.3356000E+00, &
     & 0.3399300E+00, 0.3830400E+00, 0.3838900E+00, 0.5065100E+00, &
     & 0.4898500E+00, 0.5205303E+00, 0.5342941E+00, 0.5342941E+00 /
      data (ref_adm(36,iz, 3,14),iz = 1,20) / &
     & 0.3129000E+00, 0.3129000E+00, 0.2939500E+00, 0.2947300E+00, &
     & 0.3036800E+00, 0.3327700E+00, 0.3467100E+00, 0.3541000E+00, &
     & 0.3504800E+00, 0.3481000E+00, 0.3161600E+00, 0.3645400E+00, &
     & 0.3814600E+00, 0.3812200E+00, 0.3802900E+00, 0.4546800E+00, &
     & 0.4826200E+00, 0.5177330E+00, 0.1971019E+00, 0.1971019E+00 /
      data (ref_adm(36,iz, 4,14),iz = 1,20) / &
     & 0.2840300E+00, 0.2840300E+00, 0.2978300E+00, 0.3041600E+00, &
     & 0.3064700E+00, 0.3174500E+00, 0.3394700E+00, 0.3487200E+00, &
     & 0.3362400E+00, 0.3151800E+00, 0.3286000E+00, 0.3405200E+00, &
     & 0.3823700E+00, 0.4082400E+00, 0.3959600E+00, 0.4596800E+00, &
     & 0.5046100E+00, 0.5122749E+00, 0.5198271E+00, 0.5198271E+00 /
      data (ref_adm(36,iz, 5,14),iz = 1,20) / &
     & 0.2929100E+00, 0.2929100E+00, 0.2961500E+00, 0.3065800E+00, &
     & 0.3195000E+00, 0.2980800E+00, 0.3139500E+00, 0.3246500E+00, &
     & 0.3346100E+00, 0.3253800E+00, 0.3455700E+00, 0.3586600E+00, &
     & 0.4063200E+00, 0.3720700E+00, 0.4065400E+00, 0.4453400E+00, &
     & 0.4922200E+00, 0.5050830E+00, 0.5095811E+00, 0.5095811E+00 /
      data (ref_adm(36,iz, 6,14),iz = 1,20) / &
     & 0.3058100E+00, 0.3058100E+00, 0.3002200E+00, 0.2797400E+00, &
     & 0.3023700E+00, 0.3115000E+00, 0.3116900E+00, 0.3527500E+00, &
     & 0.3250500E+00, 0.3245200E+00, 0.3557500E+00, 0.3525700E+00, &
     & 0.3684000E+00, 0.3955800E+00, 0.3971900E+00, 0.4176100E+00, &
     & 0.4356800E+00, 0.4945231E+00, 0.4982356E+00, 0.4982356E+00 /
      data (ref_adm(36,iz, 7,14),iz = 1,20) / &
     & 0.3084300E+00, 0.3084300E+00, 0.3080800E+00, 0.3091100E+00, &
     & 0.2986500E+00, 0.2993000E+00, 0.3093600E+00, 0.3145900E+00, &
     & 0.3127100E+00, 0.3279100E+00, 0.3418700E+00, 0.3603400E+00, &
     & 0.3745700E+00, 0.3765900E+00, 0.4189800E+00, 0.4423300E+00, &
     & 0.5107500E+00, 0.4797120E+00, 0.4862887E+00, 0.4862887E+00 /
      data (ref_adm(36,iz, 8,14),iz = 1,20) / &
     & 0.3147000E+00, 0.3147000E+00, 0.2952300E+00, 0.2865600E+00, &
     & 0.2948500E+00, 0.2965900E+00, 0.2929700E+00, 0.3124600E+00, &
     & 0.3329800E+00, 0.3480400E+00, 0.3489600E+00, 0.3338100E+00, &
     & 0.3514400E+00, 0.3501500E+00, 0.3899900E+00, 0.4838900E+00, &
     & 0.4524300E+00, 0.4641670E+00, 0.4678839E+00, 0.4678839E+00 /
      data (ref_adm(36,iz, 9,14),iz = 1,20) / &
     & 0.2981300E+00, 0.2981300E+00, 0.2787400E+00, 0.2954300E+00, &
     & 0.2942300E+00, 0.2896600E+00, 0.2897100E+00, 0.3113100E+00, &
     & 0.3581100E+00, 0.3471200E+00, 0.3409700E+00, 0.3621500E+00, &
     & 0.3449700E+00, 0.3754400E+00, 0.3730300E+00, 0.4283700E+00, &
     & 0.4656500E+00, 0.4509984E+00, 0.4476200E+00, 0.4476200E+00 /
      data (ref_adm(36,iz,10,14),iz = 1,20) / &
     & 0.3181300E+00, 0.3181300E+00, 0.3127000E+00, 0.3030600E+00, &
     & 0.2976800E+00, 0.3134100E+00, 0.3287400E+00, 0.3257300E+00, &
     & 0.3314500E+00, 0.3208700E+00, 0.3313500E+00, 0.3662900E+00, &
     & 0.3545300E+00, 0.3479500E+00, 0.3523800E+00, 0.3265600E+00, &
     & 0.5005300E+00, 0.4545600E+00, 0.4315183E+00, 0.4315183E+00 /
      data (ref_adm(36,iz,11,14),iz = 1,20) / &
     & 0.2948400E+00, 0.2948400E+00, 0.2990500E+00, 0.2977900E+00, &
     & 0.2951300E+00, 0.2934100E+00, 0.3159300E+00, 0.3274000E+00, &
     & 0.3291900E+00, 0.3311800E+00, 0.3188200E+00, 0.3311600E+00, &
     & 0.3183500E+00, 0.3085800E+00, 0.3587200E+00, 0.3488100E+00, &
     & 0.4169765E+00, 0.4933200E+00, 0.4185582E+00, 0.4185582E+00 /
      data (ref_adm(36,iz,12,14),iz = 1,20) / &
     & 0.2968000E+00, 0.2968000E+00, 0.2832400E+00, 0.2990800E+00, &
     & 0.3091300E+00, 0.2995900E+00, 0.3327100E+00, 0.2982800E+00, &
     & 0.3338800E+00, 0.3093500E+00, 0.3251000E+00, 0.3078000E+00, &
     & 0.2781300E+00, 0.3401000E+00, 0.4045100E+00, 0.3740000E+00, &
     & 0.4374100E+00, 0.4236246E+00, 0.4082819E+00, 0.4082819E+00 /
      data (ref_adm(36,iz,13,14),iz = 1,20) / &
     & 0.3000400E+00, 0.3000400E+00, 0.2857800E+00, 0.3061100E+00, &
     & 0.3055200E+00, 0.2938600E+00, 0.3181800E+00, 0.3164500E+00, &
     & 0.3105200E+00, 0.3005900E+00, 0.3245200E+00, 0.3018900E+00, &
     & 0.2830500E+00, 0.3346900E+00, 0.4027600E+00, 0.3916900E+00, &
     & 0.4050158E+00, 0.4167123E+00, 0.3994244E+00, 0.3994244E+00 /
      data (ref_adm(36,iz,14,14),iz = 1,20) / &
     & 0.2905000E+00, 0.2905000E+00, 0.2894800E+00, 0.2901700E+00, &
     & 0.2891400E+00, 0.2830900E+00, 0.2885700E+00, 0.2863300E+00, &
     & 0.2853000E+00, 0.2876600E+00, 0.2877800E+00, 0.2922500E+00, &
     & 0.2891800E+00, 0.3040600E+00, 0.3970500E+00, 0.3470500E+00, &
     & 0.2983300E+00, 0.4096764E+00, 0.3914820E+00, 0.3914820E+00 /
      data (ref_adm(36,iz,15,14),iz = 1,20) / &
     & 0.3070700E+00, 0.3070700E+00, 0.3409700E+00, 0.3320600E+00, &
     & 0.3349500E+00, 0.3546800E+00, 0.3634700E+00, 0.3725100E+00, &
     & 0.3746700E+00, 0.3507100E+00, 0.3321500E+00, 0.3166400E+00, &
     & 0.3108800E+00, 0.3052900E+00, 0.3314000E+00, 0.3411000E+00, &
     & 0.2750100E+00, 0.4013623E+00, 0.3834750E+00, 0.3834750E+00 /
      data (ref_adm(36,iz,16,14),iz = 1,20) / &
     & 0.3146700E+00, 0.3146700E+00, 0.3033600E+00, 0.3056800E+00, &
     & 0.2933800E+00, 0.2986700E+00, 0.3019100E+00, 0.3181700E+00, &
     & 0.3222100E+00, 0.3293500E+00, 0.3559900E+00, 0.3224600E+00, &
     & 0.3212800E+00, 0.3092500E+00, 0.3055200E+00, 0.2955300E+00, &
     & 0.2892800E+00, 0.3934278E+00, 0.3742383E+00, 0.3742383E+00 /
      data (ref_adm(36,iz,17,14),iz = 1,20) / &
     & 0.3095100E+00, 0.3095100E+00, 0.3026000E+00, 0.2988200E+00, &
     & 0.3066600E+00, 0.3007000E+00, 0.3129100E+00, 0.3237200E+00, &
     & 0.3226700E+00, 0.3029900E+00, 0.2924000E+00, 0.3292700E+00, &
     & 0.3277500E+00, 0.3266000E+00, 0.3046900E+00, 0.3319400E+00, &
     & 0.3779639E+00, 0.3860561E+00, 0.3661745E+00, 0.3661745E+00 /
      data (ref_adm(36,iz,18,14),iz = 1,20) / &
     & 0.3212300E+00, 0.3212300E+00, 0.2934100E+00, 0.2984100E+00, &
     & 0.2936200E+00, 0.3026400E+00, 0.3112200E+00, 0.2993500E+00, &
     & 0.3327800E+00, 0.3275800E+00, 0.3292400E+00, 0.3248500E+00, &
     & 0.3315200E+00, 0.3272000E+00, 0.3452600E+00, 0.3585100E+00, &
     & 0.3370246E+00, 0.3343332E+00, 0.3082662E+00, 0.3082662E+00 /
      data (ref_adm(36,iz,19,14),iz = 1,20) / &
     & 0.2971000E+00, 0.2971000E+00, 0.3003700E+00, 0.3033200E+00, &
     & 0.3075600E+00, 0.3139400E+00, 0.3059700E+00, 0.2995300E+00, &
     & 0.3018500E+00, 0.3275100E+00, 0.3377800E+00, 0.3163900E+00, &
     & 0.2995800E+00, 0.3217100E+00, 0.3320100E+00, 0.3454400E+00, &
     & 0.3345616E+00, 0.3315970E+00, 0.3049673E+00, 0.3049673E+00 /
      data (ref_adm(36,iz,20,14),iz = 1,20) / &
     & 0.2997400E+00, 0.2997400E+00, 0.3003300E+00, 0.3038900E+00, &
     & 0.3036800E+00, 0.3007600E+00, 0.3147200E+00, 0.3135800E+00, &
     & 0.3146800E+00, 0.3238600E+00, 0.3379200E+00, 0.3433000E+00, &
     & 0.3092500E+00, 0.3241600E+00, 0.3280400E+00, 0.3320171E+00, &
     & 0.3328243E+00, 0.3293717E+00, 0.3029468E+00, 0.3029468E+00 /
      data (ref_adm(36,iz,21,14),iz = 1,20) / &
     & 0.2937900E+00, 0.2937900E+00, 0.2967500E+00, 0.3109600E+00, &
     & 0.3217900E+00, 0.3144600E+00, 0.3180000E+00, 0.3185000E+00, &
     & 0.3025900E+00, 0.3117500E+00, 0.3302200E+00, 0.3378100E+00, &
     & 0.3338900E+00, 0.3134400E+00, 0.3275300E+00, 0.3056100E+00, &
     & 0.3314208E+00, 0.3273871E+00, 0.3015300E+00, 0.3015300E+00 /
      data (ref_adm(36,iz,22,14),iz = 1,20) / &
     & 0.3065500E+00, 0.3065500E+00, 0.3127000E+00, 0.3096000E+00, &
     & 0.2825100E+00, 0.3320000E+00, 0.3108700E+00, 0.3025900E+00, &
     & 0.2982900E+00, 0.2967200E+00, 0.3536200E+00, 0.3298600E+00, &
     & 0.3347500E+00, 0.3362000E+00, 0.3278500E+00, 0.3414700E+00, &
     & 0.4743910E+00, 0.4819867E+00, 0.4593096E+00, 0.4593096E+00 /
      data (ref_adm(36,iz,23,14),iz = 1,20) / &
     & 0.3000000E+00, 0.3000000E+00, 0.3195700E+00, 0.3118500E+00, &
     & 0.2958700E+00, 0.2858700E+00, 0.2857700E+00, 0.3014000E+00, &
     & 0.2988500E+00, 0.3229600E+00, 0.3302000E+00, 0.3344600E+00, &
     & 0.3368700E+00, 0.3735200E+00, 0.3471500E+00, 0.3946900E+00, &
     & 0.4632868E+00, 0.4694085E+00, 0.4548971E+00, 0.4548971E+00 /
      data (ref_adm(36,iz,24,14),iz = 1,20) / &
     & 0.3225500E+00, 0.3225500E+00, 0.3210900E+00, 0.3145700E+00, &
     & 0.3283500E+00, 0.3264000E+00, 0.3289400E+00, 0.3249800E+00, &
     & 0.3472600E+00, 0.3761800E+00, 0.3380100E+00, 0.3575000E+00, &
     & 0.3338700E+00, 0.3352800E+00, 0.3489900E+00, 0.3112200E+00, &
     & 0.3117800E+00, 0.4601959E+00, 0.4534310E+00, 0.4534310E+00 /
      data (ref_adm(36,iz,25,14),iz = 1,20) / &
     & 0.3272600E+00, 0.3272600E+00, 0.3075300E+00, 0.3077700E+00, &
     & 0.3099600E+00, 0.3158700E+00, 0.3191200E+00, 0.3324900E+00, &
     & 0.3427000E+00, 0.3427600E+00, 0.3768700E+00, 0.3943700E+00, &
     & 0.3945300E+00, 0.4688600E+00, 0.3647700E+00, 0.3149800E+00, &
     & 0.3318300E+00, 0.4524914E+00, 0.4537421E+00, 0.4537421E+00 /
      data (ref_adm(36,iz,26,14),iz = 1,20) / &
     & 0.2963500E+00, 0.2963500E+00, 0.2951500E+00, 0.3002300E+00, &
     & 0.3106000E+00, 0.3048800E+00, 0.3119000E+00, 0.3184400E+00, &
     & 0.3092800E+00, 0.3233500E+00, 0.3355900E+00, 0.3303500E+00, &
     & 0.3490900E+00, 0.3707500E+00, 0.3684900E+00, 0.3615500E+00, &
     & 0.3315400E+00, 0.3800000E+00, 0.4582384E+00, 0.4582384E+00 /
      data (ref_adm(36,iz,27,14),iz = 1,20) / &
     & 0.3021200E+00, 0.3021200E+00, 0.2974000E+00, 0.2914200E+00, &
     & 0.2917200E+00, 0.3068600E+00, 0.3116300E+00, 0.3426300E+00, &
     & 0.3409400E+00, 0.3216900E+00, 0.3243000E+00, 0.3115600E+00, &
     & 0.3281400E+00, 0.3766600E+00, 0.3494500E+00, 0.3509900E+00, &
     & 0.3453000E+00, 0.3822600E+00, 0.3333900E+00, 0.3333900E+00 /
      data (ref_adm(36,iz,28,14),iz = 1,20) / &
     & 0.2969500E+00, 0.2969500E+00, 0.2889000E+00, 0.2968700E+00, &
     & 0.3086000E+00, 0.3210200E+00, 0.3316000E+00, 0.3234600E+00, &
     & 0.3390600E+00, 0.3283500E+00, 0.3453300E+00, 0.3517300E+00, &
     & 0.3580100E+00, 0.3731500E+00, 0.3376000E+00, 0.3648400E+00, &
     & 0.3914400E+00, 0.3812200E+00, 0.4763921E+00, 0.4763921E+00 /
      data (ref_adm(36,iz,29,14),iz = 1,20) / &
     & 0.2969500E+00, 0.2969500E+00, 0.2921100E+00, 0.3107200E+00, &
     & 0.3134500E+00, 0.3137100E+00, 0.3024500E+00, 0.3329300E+00, &
     & 0.3299700E+00, 0.3250900E+00, 0.3444800E+00, 0.3572200E+00, &
     & 0.3626800E+00, 0.3491800E+00, 0.3708400E+00, 0.3674600E+00, &
     & 0.3520100E+00, 0.4628510E+00, 0.4873888E+00, 0.4873888E+00 /
      data (ref_adm(36,iz,30,14),iz = 1,20) / &
     & 0.3055800E+00, 0.3055800E+00, 0.3304800E+00, 0.3210100E+00, &
     & 0.3200700E+00, 0.3169600E+00, 0.3238200E+00, 0.3303900E+00, &
     & 0.3475500E+00, 0.3456900E+00, 0.3410400E+00, 0.3655000E+00, &
     & 0.3829600E+00, 0.3755100E+00, 0.4003100E+00, 0.4036400E+00, &
     & 0.3606200E+00, 0.4726216E+00, 0.5007683E+00, 0.5007683E+00 /
      data (ref_adm(36,iz,31,14),iz = 1,20) / &
     & 0.3041300E+00, 0.3041300E+00, 0.3259500E+00, 0.3327200E+00, &
     & 0.3358500E+00, 0.3231900E+00, 0.3250300E+00, 0.3220300E+00, &
     & 0.3215800E+00, 0.3536100E+00, 0.3592100E+00, 0.3764700E+00, &
     & 0.3778200E+00, 0.3745200E+00, 0.4010300E+00, 0.4134200E+00, &
     & 0.4033200E+00, 0.4853581E+00, 0.5148154E+00, 0.5148154E+00 /
      data (ref_adm(36,iz,32,14),iz = 1,20) / &
     & 0.3119600E+00, 0.3119600E+00, 0.3175900E+00, 0.3173600E+00, &
     & 0.3186100E+00, 0.3206300E+00, 0.3274500E+00, 0.3415700E+00, &
     & 0.3472500E+00, 0.3646000E+00, 0.3697100E+00, 0.3870400E+00, &
     & 0.3945200E+00, 0.4199400E+00, 0.4109700E+00, 0.4336100E+00, &
     & 0.4545200E+00, 0.4989013E+00, 0.5296240E+00, 0.5296240E+00 /
      data (ref_adm(36,iz,33,14),iz = 1,20) / &
     & 0.3029300E+00, 0.3029300E+00, 0.2969100E+00, 0.2994900E+00, &
     & 0.3145700E+00, 0.3097600E+00, 0.3200300E+00, 0.3299100E+00, &
     & 0.3384900E+00, 0.3477200E+00, 0.3562300E+00, 0.3720900E+00, &
     & 0.4062200E+00, 0.4386200E+00, 0.4378800E+00, 0.4460800E+00, &
     & 0.4649400E+00, 0.5123067E+00, 0.5431877E+00, 0.5431877E+00 /
      data (ref_adm(36,iz,34,14),iz = 1,20) / &
     & 0.3021700E+00, 0.3021700E+00, 0.3017600E+00, 0.3030700E+00, &
     & 0.3040400E+00, 0.3197000E+00, 0.3287000E+00, 0.3389300E+00, &
     & 0.3358000E+00, 0.3694900E+00, 0.3858800E+00, 0.3846500E+00, &
     & 0.4177500E+00, 0.4004400E+00, 0.4158600E+00, 0.4198700E+00, &
     & 0.4968582E+00, 0.5200162E+00, 0.5554260E+00, 0.5554260E+00 /
      data (ref_adm(36,iz,35,14),iz = 1,20) / &
     & 0.2996700E+00, 0.2996700E+00, 0.3016300E+00, 0.3181600E+00, &
     & 0.3200600E+00, 0.3137200E+00, 0.3266600E+00, 0.3417300E+00, &
     & 0.3614600E+00, 0.3613800E+00, 0.3795000E+00, 0.3781600E+00, &
     & 0.3785500E+00, 0.4096800E+00, 0.4403200E+00, 0.4403900E+00, &
     & 0.4884200E+00, 0.5191232E+00, 0.5647612E+00, 0.5647612E+00 /
      data (ref_adm(36,iz,36,14),iz = 1,20) / &
     & 0.3025000E+00, 0.3025000E+00, 0.3102400E+00, 0.2854000E+00, &
     & 0.2953500E+00, 0.2967500E+00, 0.3196200E+00, 0.3279200E+00, &
     & 0.3577000E+00, 0.3781900E+00, 0.3765100E+00, 0.3732300E+00, &
     & 0.4166000E+00, 0.4358000E+00, 0.4685600E+00, 0.4015600E+00, &
     & 0.5512200E+00, 0.5143034E+00, 0.5693386E+00, 0.5693386E+00 /
      data (ref_adm(36,iz,37,14),iz = 1,20) / &
     & 0.2938700E+00, 0.2938700E+00, 0.2747100E+00, 0.2863600E+00, &
     & 0.2943200E+00, 0.2958600E+00, 0.3254900E+00, 0.3494900E+00, &
     & 0.3507600E+00, 0.3801000E+00, 0.3918600E+00, 0.4058200E+00, &
     & 0.4923300E+00, 0.4544000E+00, 0.4766500E+00, 0.5410500E+00, &
     & 0.4807088E+00, 0.5112670E+00, 0.5714930E+00, 0.5714930E+00 /
      data (ref_adm(36,iz,38,14),iz = 1,20) / &
     & 0.2938700E+00, 0.2938700E+00, 0.2747100E+00, 0.2863600E+00, &
     & 0.2943200E+00, 0.2958600E+00, 0.3254900E+00, 0.3494900E+00, &
     & 0.3507600E+00, 0.3801000E+00, 0.3918600E+00, 0.4058200E+00, &
     & 0.4923300E+00, 0.4544000E+00, 0.4766500E+00, 0.5410500E+00, &
     & 0.4807088E+00, 0.5112670E+00, 0.5714930E+00, 0.5714930E+00 /
! Solar Zenith Angle 70.0 Albedo  0.3406620E+00
      data (ref_adm(36,iz, 1,15),iz = 1,20) / &
     & 0.2835400E+00, 0.2835400E+00, 0.2871100E+00, 0.2700100E+00, &
     & 0.2682800E+00, 0.2736700E+00, 0.3001000E+00, 0.3134100E+00, &
     & 0.3382000E+00, 0.3565200E+00, 0.3551000E+00, 0.3748200E+00, &
     & 0.3893200E+00, 0.4114300E+00, 0.5013200E+00, 0.5049500E+00, &
     & 0.4831125E+00, 0.4782142E+00, 0.4192484E+00, 0.4192484E+00 /
      data (ref_adm(36,iz, 2,15),iz = 1,20) / &
     & 0.2835400E+00, 0.2835400E+00, 0.2871100E+00, 0.2700100E+00, &
     & 0.2682800E+00, 0.2736700E+00, 0.3001000E+00, 0.3134100E+00, &
     & 0.3382000E+00, 0.3565200E+00, 0.3551000E+00, 0.3748200E+00, &
     & 0.3893200E+00, 0.4114300E+00, 0.5013200E+00, 0.5049500E+00, &
     & 0.4831125E+00, 0.4782142E+00, 0.4192484E+00, 0.4192484E+00 /
      data (ref_adm(36,iz, 3,15),iz = 1,20) / &
     & 0.2834200E+00, 0.2834200E+00, 0.2845000E+00, 0.2710300E+00, &
     & 0.2739900E+00, 0.2686600E+00, 0.2945100E+00, 0.2943100E+00, &
     & 0.3108900E+00, 0.3207000E+00, 0.3535000E+00, 0.3741400E+00, &
     & 0.4036200E+00, 0.4263700E+00, 0.4480100E+00, 0.4705800E+00, &
     & 0.4825484E+00, 0.4768877E+00, 0.5068684E-01, 0.5068684E-01 /
      data (ref_adm(36,iz, 4,15),iz = 1,20) / &
     & 0.2813900E+00, 0.2813900E+00, 0.2731200E+00, 0.2758100E+00, &
     & 0.2712900E+00, 0.2963700E+00, 0.2975800E+00, 0.3010200E+00, &
     & 0.3208700E+00, 0.3127400E+00, 0.3414200E+00, 0.3619000E+00, &
     & 0.3954400E+00, 0.4261400E+00, 0.4577200E+00, 0.5245900E+00, &
     & 0.4691800E+00, 0.4731674E+00, 0.4133908E+00, 0.4133908E+00 /
      data (ref_adm(36,iz, 5,15),iz = 1,20) / &
     & 0.2768800E+00, 0.2768800E+00, 0.2727700E+00, 0.2824900E+00, &
     & 0.2790600E+00, 0.3059300E+00, 0.3091900E+00, 0.3126900E+00, &
     & 0.3039000E+00, 0.3013300E+00, 0.3155000E+00, 0.3488900E+00, &
     & 0.3948300E+00, 0.4287800E+00, 0.4702800E+00, 0.5293900E+00, &
     & 0.5963000E+00, 0.4689014E+00, 0.4081938E+00, 0.4081938E+00 /
      data (ref_adm(36,iz, 6,15),iz = 1,20) / &
     & 0.2815100E+00, 0.2815100E+00, 0.2769300E+00, 0.2858600E+00, &
     & 0.2916200E+00, 0.2972600E+00, 0.3094300E+00, 0.3142100E+00, &
     & 0.3074600E+00, 0.3124300E+00, 0.3226600E+00, 0.3569800E+00, &
     & 0.3914300E+00, 0.4287700E+00, 0.4671700E+00, 0.4635400E+00, &
     & 0.4739648E+00, 0.4644608E+00, 0.4021873E+00, 0.4021873E+00 /
      data (ref_adm(36,iz, 7,15),iz = 1,20) / &
     & 0.2767900E+00, 0.2767900E+00, 0.2874200E+00, 0.2888800E+00, &
     & 0.2836300E+00, 0.2835300E+00, 0.2937300E+00, 0.2985700E+00, &
     & 0.3097600E+00, 0.3122100E+00, 0.3243900E+00, 0.3377000E+00, &
     & 0.3657700E+00, 0.3967000E+00, 0.4336900E+00, 0.4845300E+00, &
     & 0.5465000E+00, 0.6021600E+00, 0.3956009E+00, 0.3956009E+00 /
      data (ref_adm(36,iz, 8,15),iz = 1,20) / &
     & 0.2796800E+00, 0.2796800E+00, 0.2866600E+00, 0.2788000E+00, &
     & 0.2706300E+00, 0.2922300E+00, 0.2990300E+00, 0.2986800E+00, &
     & 0.2997500E+00, 0.2827400E+00, 0.2725300E+00, 0.2987700E+00, &
     & 0.3562400E+00, 0.3900300E+00, 0.4318900E+00, 0.4840500E+00, &
     & 0.4761300E+00, 0.6351700E+00, 0.3894163E+00, 0.3894163E+00 /
      data (ref_adm(36,iz, 9,15),iz = 1,20) / &
     & 0.2929700E+00, 0.2929700E+00, 0.2831500E+00, 0.2686300E+00, &
     & 0.2675300E+00, 0.2705500E+00, 0.2734400E+00, 0.2938500E+00, &
     & 0.2829000E+00, 0.2931400E+00, 0.3026400E+00, 0.3154900E+00, &
     & 0.3583300E+00, 0.3899400E+00, 0.4091400E+00, 0.4531300E+00, &
     & 0.4476600E+00, 0.6139000E+00, 0.3833964E+00, 0.3833964E+00 /
      data (ref_adm(36,iz,10,15),iz = 1,20) / &
     & 0.2886600E+00, 0.2886600E+00, 0.2892600E+00, 0.2718700E+00, &
     & 0.2792900E+00, 0.2817900E+00, 0.2842200E+00, 0.2903500E+00, &
     & 0.3012700E+00, 0.2774200E+00, 0.2943500E+00, 0.3054000E+00, &
     & 0.3323700E+00, 0.3813100E+00, 0.3986600E+00, 0.4178000E+00, &
     & 0.5493100E+00, 0.4439883E+00, 0.3776815E+00, 0.3776815E+00 /
      data (ref_adm(36,iz,11,15),iz = 1,20) / &
     & 0.2894500E+00, 0.2894500E+00, 0.2901100E+00, 0.2723200E+00, &
     & 0.2678100E+00, 0.2724800E+00, 0.2764200E+00, 0.2849800E+00, &
     & 0.2948400E+00, 0.2952400E+00, 0.3197500E+00, 0.2805400E+00, &
     & 0.3756100E+00, 0.3717500E+00, 0.4006800E+00, 0.3610000E+00, &
     & 0.4483173E+00, 0.4383449E+00, 0.3723676E+00, 0.3723676E+00 /
      data (ref_adm(36,iz,12,15),iz = 1,20) / &
     & 0.2940900E+00, 0.2940900E+00, 0.2746900E+00, 0.2769500E+00, &
     & 0.2812500E+00, 0.2830200E+00, 0.2918900E+00, 0.2853500E+00, &
     & 0.3081600E+00, 0.2933200E+00, 0.2950000E+00, 0.3012000E+00, &
     & 0.3420100E+00, 0.3298400E+00, 0.3327500E+00, 0.4910200E+00, &
     & 0.4389619E+00, 0.4322845E+00, 0.3673891E+00, 0.3673891E+00 /
      data (ref_adm(36,iz,13,15),iz = 1,20) / &
     & 0.2909400E+00, 0.2909400E+00, 0.2831900E+00, 0.2805100E+00, &
     & 0.2750500E+00, 0.2791200E+00, 0.2765600E+00, 0.2935900E+00, &
     & 0.3023600E+00, 0.3114700E+00, 0.2790100E+00, 0.2921600E+00, &
     & 0.3300100E+00, 0.3242700E+00, 0.2979600E+00, 0.4055800E+00, &
     & 0.3741600E+00, 0.4235974E+00, 0.3620812E+00, 0.3620812E+00 /
      data (ref_adm(36,iz,14,15),iz = 1,20) / &
     & 0.2746700E+00, 0.2746700E+00, 0.2784500E+00, 0.2793200E+00, &
     & 0.2780200E+00, 0.2782000E+00, 0.2764200E+00, 0.2794800E+00, &
     & 0.2800100E+00, 0.2861100E+00, 0.2894900E+00, 0.2953700E+00, &
     & 0.3046500E+00, 0.3182200E+00, 0.3396100E+00, 0.3815200E+00, &
     & 0.3742800E+00, 0.4140073E+00, 0.3553149E+00, 0.3553149E+00 /
      data (ref_adm(36,iz,15,15),iz = 1,20) / &
     & 0.2808200E+00, 0.2808200E+00, 0.2963300E+00, 0.2956500E+00, &
     & 0.2862100E+00, 0.2943800E+00, 0.2876500E+00, 0.2907700E+00, &
     & 0.2913600E+00, 0.2870000E+00, 0.3028700E+00, 0.3012500E+00, &
     & 0.3109800E+00, 0.3112400E+00, 0.3703900E+00, 0.3312000E+00, &
     & 0.3825700E+00, 0.4051389E+00, 0.3474956E+00, 0.3474956E+00 /
      data (ref_adm(36,iz,16,15),iz = 1,20) / &
     & 0.2757000E+00, 0.2757000E+00, 0.2667300E+00, 0.2681900E+00, &
     & 0.2613900E+00, 0.2721000E+00, 0.2806400E+00, 0.2852800E+00, &
     & 0.2804800E+00, 0.2893500E+00, 0.2853400E+00, 0.2979500E+00, &
     & 0.2916000E+00, 0.3101100E+00, 0.3132400E+00, 0.3192900E+00, &
     & 0.4892000E+00, 0.3955797E+00, 0.3404486E+00, 0.3404486E+00 /
      data (ref_adm(36,iz,17,15),iz = 1,20) / &
     & 0.2783900E+00, 0.2783900E+00, 0.2635100E+00, 0.2780900E+00, &
     & 0.2784300E+00, 0.2940200E+00, 0.2895600E+00, 0.2831500E+00, &
     & 0.2710600E+00, 0.2956600E+00, 0.2801500E+00, 0.2740700E+00, &
     & 0.3029100E+00, 0.3127600E+00, 0.3225900E+00, 0.3875600E+00, &
     & 0.4069400E+00, 0.3859658E+00, 0.3337319E+00, 0.3337319E+00 /
      data (ref_adm(36,iz,18,15),iz = 1,20) / &
     & 0.2773000E+00, 0.2773000E+00, 0.2620500E+00, 0.2716900E+00, &
     & 0.2710000E+00, 0.2873400E+00, 0.2843600E+00, 0.2910500E+00, &
     & 0.2745600E+00, 0.3047100E+00, 0.2973000E+00, 0.2820100E+00, &
     & 0.2812600E+00, 0.3158900E+00, 0.3052800E+00, 0.4501900E+00, &
     & 0.3612006E+00, 0.3764658E+00, 0.3690022E+00, 0.3690022E+00 /
      data (ref_adm(36,iz,19,15),iz = 1,20) / &
     & 0.2739300E+00, 0.2739300E+00, 0.2900200E+00, 0.2938200E+00, &
     & 0.2861400E+00, 0.2972800E+00, 0.2878700E+00, 0.2940000E+00, &
     & 0.2943200E+00, 0.2743100E+00, 0.2870100E+00, 0.2832200E+00, &
     & 0.3193100E+00, 0.3167000E+00, 0.3048900E+00, 0.3462366E+00, &
     & 0.3593242E+00, 0.3727620E+00, 0.3630100E+00, 0.3630100E+00 /
      data (ref_adm(36,iz,20,15),iz = 1,20) / &
     & 0.2696900E+00, 0.2696900E+00, 0.3155500E+00, 0.3379600E+00, &
     & 0.3044700E+00, 0.3025000E+00, 0.2921000E+00, 0.2924600E+00, &
     & 0.2911800E+00, 0.2958000E+00, 0.3137900E+00, 0.2911000E+00, &
     & 0.2948200E+00, 0.3048400E+00, 0.3125500E+00, 0.3459041E+00, &
     & 0.3580766E+00, 0.3704035E+00, 0.3596399E+00, 0.3596399E+00 /
      data (ref_adm(36,iz,21,15),iz = 1,20) / &
     & 0.2823900E+00, 0.2823900E+00, 0.2863600E+00, 0.2982600E+00, &
     & 0.3028500E+00, 0.2805600E+00, 0.2794000E+00, 0.2766300E+00, &
     & 0.2955700E+00, 0.2952300E+00, 0.2899300E+00, 0.2844500E+00, &
     & 0.2967900E+00, 0.3195200E+00, 0.3197900E+00, 0.3320100E+00, &
     & 0.3576553E+00, 0.3685528E+00, 0.3577105E+00, 0.3577105E+00 /
      data (ref_adm(36,iz,22,15),iz = 1,20) / &
     & 0.2777200E+00, 0.2777200E+00, 0.2865900E+00, 0.2759400E+00, &
     & 0.2786200E+00, 0.3045900E+00, 0.3052300E+00, 0.2821900E+00, &
     & 0.2919100E+00, 0.3112400E+00, 0.3275800E+00, 0.3398500E+00, &
     & 0.3319900E+00, 0.3282600E+00, 0.3282200E+00, 0.3647900E+00, &
     & 0.5321324E+00, 0.5763893E+00, 0.6063657E+00, 0.6063657E+00 /
      data (ref_adm(36,iz,23,15),iz = 1,20) / &
     & 0.2615400E+00, 0.2615400E+00, 0.2733100E+00, 0.2757800E+00, &
     & 0.2805700E+00, 0.2922800E+00, 0.3023400E+00, 0.2928900E+00, &
     & 0.2925100E+00, 0.2986800E+00, 0.2998800E+00, 0.3011800E+00, &
     & 0.2962400E+00, 0.3097600E+00, 0.3243200E+00, 0.3481000E+00, &
     & 0.3726900E+00, 0.5602556E+00, 0.6014987E+00, 0.6014987E+00 /
      data (ref_adm(36,iz,24,15),iz = 1,20) / &
     & 0.2815600E+00, 0.2815600E+00, 0.2834500E+00, 0.2818900E+00, &
     & 0.2946100E+00, 0.3053500E+00, 0.3011200E+00, 0.3068900E+00, &
     & 0.3279600E+00, 0.3354200E+00, 0.3287900E+00, 0.3364100E+00, &
     & 0.3241800E+00, 0.2989600E+00, 0.3433300E+00, 0.3660200E+00, &
     & 0.3885200E+00, 0.5489227E+00, 0.6020560E+00, 0.6020560E+00 /
      data (ref_adm(36,iz,25,15),iz = 1,20) / &
     & 0.2991500E+00, 0.2991500E+00, 0.2836800E+00, 0.2846400E+00, &
     & 0.2937800E+00, 0.3011400E+00, 0.3076700E+00, 0.3241900E+00, &
     & 0.3313800E+00, 0.3517400E+00, 0.3593800E+00, 0.3727000E+00, &
     & 0.3749100E+00, 0.3916500E+00, 0.3898700E+00, 0.3685700E+00, &
     & 0.4016300E+00, 0.5408267E+00, 0.6057861E+00, 0.6057861E+00 /
      data (ref_adm(36,iz,26,15),iz = 1,20) / &
     & 0.2758900E+00, 0.2758900E+00, 0.2832100E+00, 0.2913400E+00, &
     & 0.2882300E+00, 0.3053500E+00, 0.3147700E+00, 0.3177900E+00, &
     & 0.3032900E+00, 0.3125000E+00, 0.3354900E+00, 0.3308300E+00, &
     & 0.3404300E+00, 0.3841800E+00, 0.3860700E+00, 0.4105500E+00, &
     & 0.4504900E+00, 0.4272800E+00, 0.6172861E+00, 0.6172861E+00 /
      data (ref_adm(36,iz,27,15),iz = 1,20) / &
     & 0.2787100E+00, 0.2787100E+00, 0.2964000E+00, 0.2984400E+00, &
     & 0.2849700E+00, 0.3192500E+00, 0.3161700E+00, 0.3217100E+00, &
     & 0.3290600E+00, 0.3282500E+00, 0.3477400E+00, 0.3464400E+00, &
     & 0.3478500E+00, 0.3874300E+00, 0.3847100E+00, 0.4262600E+00, &
     & 0.4266300E+00, 0.4160700E+00, 0.4122400E+00, 0.4122400E+00 /
      data (ref_adm(36,iz,28,15),iz = 1,20) / &
     & 0.2871100E+00, 0.2871100E+00, 0.3006600E+00, 0.3000100E+00, &
     & 0.2867800E+00, 0.2941500E+00, 0.3129200E+00, 0.3245500E+00, &
     & 0.3500800E+00, 0.3316800E+00, 0.3493200E+00, 0.3267900E+00, &
     & 0.3709100E+00, 0.3923500E+00, 0.3983000E+00, 0.4114800E+00, &
     & 0.4326400E+00, 0.4523800E+00, 0.4621100E+00, 0.4621100E+00 /
      data (ref_adm(36,iz,29,15),iz = 1,20) / &
     & 0.2906200E+00, 0.2906200E+00, 0.3055900E+00, 0.2817600E+00, &
     & 0.2890900E+00, 0.2999200E+00, 0.3026000E+00, 0.3284300E+00, &
     & 0.3361600E+00, 0.3436900E+00, 0.3627900E+00, 0.3507100E+00, &
     & 0.3824900E+00, 0.3853600E+00, 0.4120000E+00, 0.4321600E+00, &
     & 0.4646600E+00, 0.4967100E+00, 0.6751020E+00, 0.6751020E+00 /
      data (ref_adm(36,iz,30,15),iz = 1,20) / &
     & 0.2933200E+00, 0.2933200E+00, 0.2769400E+00, 0.2862800E+00, &
     & 0.2996600E+00, 0.3217200E+00, 0.3061000E+00, 0.3275000E+00, &
     & 0.3349500E+00, 0.3285000E+00, 0.3500300E+00, 0.3788500E+00, &
     & 0.3826300E+00, 0.3967700E+00, 0.4178900E+00, 0.4468800E+00, &
     & 0.4959800E+00, 0.5475400E+00, 0.7000369E+00, 0.7000369E+00 /
      data (ref_adm(36,iz,31,15),iz = 1,20) / &
     & 0.2828100E+00, 0.2828100E+00, 0.2826200E+00, 0.2995000E+00, &
     & 0.3089100E+00, 0.3095100E+00, 0.3269000E+00, 0.3237700E+00, &
     & 0.3265700E+00, 0.3306600E+00, 0.3564400E+00, 0.3950800E+00, &
     & 0.3830800E+00, 0.4145600E+00, 0.4226400E+00, 0.4609200E+00, &
     & 0.5024300E+00, 0.6004300E+00, 0.5215700E+00, 0.5215700E+00 /
      data (ref_adm(36,iz,32,15),iz = 1,20) / &
     & 0.2829700E+00, 0.2829700E+00, 0.2880200E+00, 0.2874500E+00, &
     & 0.2928400E+00, 0.3052000E+00, 0.3154100E+00, 0.3195000E+00, &
     & 0.3246700E+00, 0.3404000E+00, 0.3635300E+00, 0.3738600E+00, &
     & 0.3958700E+00, 0.4222500E+00, 0.4482600E+00, 0.4817700E+00, &
     & 0.5291200E+00, 0.6319202E+00, 0.7539774E+00, 0.7539774E+00 /
      data (ref_adm(36,iz,33,15),iz = 1,20) / &
     & 0.2844600E+00, 0.2844600E+00, 0.2783200E+00, 0.2833400E+00, &
     & 0.2827700E+00, 0.2909300E+00, 0.3117100E+00, 0.3100200E+00, &
     & 0.3190500E+00, 0.3304100E+00, 0.3547400E+00, 0.3779200E+00, &
     & 0.3783100E+00, 0.4253200E+00, 0.4774900E+00, 0.4890200E+00, &
     & 0.4879000E+00, 0.6692000E+00, 0.7789003E+00, 0.7789003E+00 /
      data (ref_adm(36,iz,34,15),iz = 1,20) / &
     & 0.2750400E+00, 0.2750400E+00, 0.2887400E+00, 0.2894200E+00, &
     & 0.2884500E+00, 0.3084300E+00, 0.2996600E+00, 0.3186200E+00, &
     & 0.3308500E+00, 0.3528600E+00, 0.3545700E+00, 0.4040900E+00, &
     & 0.4034400E+00, 0.4444500E+00, 0.4796500E+00, 0.5220900E+00, &
     & 0.5593967E+00, 0.6316924E+00, 0.7888954E+00, 0.7888954E+00 /
      data (ref_adm(36,iz,35,15),iz = 1,20) / &
     & 0.2861400E+00, 0.2861400E+00, 0.2841400E+00, 0.2829300E+00, &
     & 0.2944600E+00, 0.2989400E+00, 0.3009500E+00, 0.3227900E+00, &
     & 0.3433400E+00, 0.3424700E+00, 0.3565400E+00, 0.4071600E+00, &
     & 0.4432400E+00, 0.4743100E+00, 0.4891900E+00, 0.5849100E+00, &
     & 0.5476600E+00, 0.6185998E+00, 0.7882142E+00, 0.7882142E+00 /
      data (ref_adm(36,iz,36,15),iz = 1,20) / &
     & 0.2867400E+00, 0.2867400E+00, 0.2806600E+00, 0.2968700E+00, &
     & 0.3023200E+00, 0.2907500E+00, 0.3132900E+00, 0.3217000E+00, &
     & 0.3464800E+00, 0.3576000E+00, 0.3735500E+00, 0.4008300E+00, &
     & 0.4642100E+00, 0.4656200E+00, 0.4865500E+00, 0.5358300E+00, &
     & 0.6018200E+00, 0.6188332E+00, 0.7872064E+00, 0.7872064E+00 /
      data (ref_adm(36,iz,37,15),iz = 1,20) / &
     & 0.2876700E+00, 0.2876700E+00, 0.2913100E+00, 0.2868500E+00, &
     & 0.2932100E+00, 0.3068000E+00, 0.3145500E+00, 0.3267300E+00, &
     & 0.3340400E+00, 0.3802900E+00, 0.3810900E+00, 0.3906000E+00, &
     & 0.4119300E+00, 0.4727600E+00, 0.5241300E+00, 0.6850100E+00, &
     & 0.5951709E+00, 0.6245087E+00, 0.7879550E+00, 0.7879550E+00 /
      data (ref_adm(36,iz,38,15),iz = 1,20) / &
     & 0.2876700E+00, 0.2876700E+00, 0.2913100E+00, 0.2868500E+00, &
     & 0.2932100E+00, 0.3068000E+00, 0.3145500E+00, 0.3267300E+00, &
     & 0.3340400E+00, 0.3802900E+00, 0.3810900E+00, 0.3906000E+00, &
     & 0.4119300E+00, 0.4727600E+00, 0.5241300E+00, 0.6850100E+00, &
     & 0.5951709E+00, 0.6245087E+00, 0.7879550E+00, 0.7879550E+00 /
! Solar Zenith Angle 75.0 Albedo  0.3387424E+00
      data (ref_adm(36,iz, 1,16),iz = 1,20) / &
     & 0.2643600E+00, 0.2643600E+00, 0.2631500E+00, 0.2607900E+00, &
     & 0.2633000E+00, 0.2659100E+00, 0.2600300E+00, 0.2746200E+00, &
     & 0.2870200E+00, 0.3042600E+00, 0.3265800E+00, 0.3587300E+00, &
     & 0.4043700E+00, 0.4002100E+00, 0.4273490E+00, 0.4516546E+00, &
     & 0.4624986E+00, 0.4563160E+00, 0.3996004E+00, 0.3996004E+00 /
      data (ref_adm(36,iz, 2,16),iz = 1,20) / &
     & 0.2643600E+00, 0.2643600E+00, 0.2631500E+00, 0.2607900E+00, &
     & 0.2633000E+00, 0.2659100E+00, 0.2600300E+00, 0.2746200E+00, &
     & 0.2870200E+00, 0.3042600E+00, 0.3265800E+00, 0.3587300E+00, &
     & 0.4043700E+00, 0.4002100E+00, 0.4273490E+00, 0.4516546E+00, &
     & 0.4624986E+00, 0.4563160E+00, 0.3996004E+00, 0.3996004E+00 /
      data (ref_adm(36,iz, 3,16),iz = 1,20) / &
     & 0.2643200E+00, 0.2643200E+00, 0.2658400E+00, 0.2599500E+00, &
     & 0.2579000E+00, 0.2615100E+00, 0.2681500E+00, 0.2871000E+00, &
     & 0.2978000E+00, 0.3146900E+00, 0.3398700E+00, 0.3690400E+00, &
     & 0.4035500E+00, 0.3658100E+00, 0.4269277E+00, 0.4512895E+00, &
     & 0.4618965E+00, 0.4554466E+00, 0.4543868E-01, 0.4543868E-01 /
      data (ref_adm(36,iz, 4,16),iz = 1,20) / &
     & 0.2679200E+00, 0.2679200E+00, 0.2619300E+00, 0.2641400E+00, &
     & 0.2655800E+00, 0.2636000E+00, 0.2760600E+00, 0.2861700E+00, &
     & 0.3022800E+00, 0.3039400E+00, 0.3337900E+00, 0.3423900E+00, &
     & 0.3859100E+00, 0.3956500E+00, 0.4256720E+00, 0.4498028E+00, &
     & 0.4602449E+00, 0.4527854E+00, 0.3952648E+00, 0.3952648E+00 /
      data (ref_adm(36,iz, 5,16),iz = 1,20) / &
     & 0.2698300E+00, 0.2698300E+00, 0.2648500E+00, 0.2574000E+00, &
     & 0.2691600E+00, 0.2801400E+00, 0.2773800E+00, 0.2891600E+00, &
     & 0.3017300E+00, 0.3228500E+00, 0.3367500E+00, 0.3327400E+00, &
     & 0.3333100E+00, 0.3521500E+00, 0.4235601E+00, 0.4474838E+00, &
     & 0.4580214E+00, 0.4497728E+00, 0.3915045E+00, 0.3915045E+00 /
      data (ref_adm(36,iz, 6,16),iz = 1,20) / &
     & 0.2643000E+00, 0.2643000E+00, 0.2616600E+00, 0.2552500E+00, &
     & 0.2620100E+00, 0.2670100E+00, 0.2734800E+00, 0.2798400E+00, &
     & 0.2833000E+00, 0.2978400E+00, 0.3070600E+00, 0.3245800E+00, &
     & 0.3524500E+00, 0.3991400E+00, 0.4525400E+00, 0.5393500E+00, &
     & 0.6515700E+00, 0.7610100E+00, 0.3867730E+00, 0.3867730E+00 /
      data (ref_adm(36,iz, 7,16),iz = 1,20) / &
     & 0.2537900E+00, 0.2537900E+00, 0.2571000E+00, 0.2573800E+00, &
     & 0.2569700E+00, 0.2549600E+00, 0.2655800E+00, 0.2736200E+00, &
     & 0.2806100E+00, 0.2915700E+00, 0.3084800E+00, 0.3248300E+00, &
     & 0.3554700E+00, 0.3985700E+00, 0.4423900E+00, 0.5425800E+00, &
     & 0.6841100E+00, 0.7129900E+00, 0.3817537E+00, 0.3817537E+00 /
      data (ref_adm(36,iz, 8,16),iz = 1,20) / &
     & 0.2536700E+00, 0.2536700E+00, 0.2654500E+00, 0.2734600E+00, &
     & 0.2708200E+00, 0.2618300E+00, 0.2660400E+00, 0.2698000E+00, &
     & 0.2951100E+00, 0.2834800E+00, 0.3169900E+00, 0.3255300E+00, &
     & 0.3503100E+00, 0.3761100E+00, 0.4534400E+00, 0.5737700E+00, &
     & 0.7762700E+00, 0.7379100E+00, 0.3767038E+00, 0.3767038E+00 /
      data (ref_adm(36,iz, 9,16),iz = 1,20) / &
     & 0.2561700E+00, 0.2561700E+00, 0.2577400E+00, 0.2512000E+00, &
     & 0.2552000E+00, 0.2674800E+00, 0.2681000E+00, 0.2833700E+00, &
     & 0.2912400E+00, 0.2731800E+00, 0.2936900E+00, 0.3184200E+00, &
     & 0.3466000E+00, 0.3966100E+00, 0.4768500E+00, 0.5333200E+00, &
     & 0.5550600E+00, 0.7216500E+00, 0.3717307E+00, 0.3717307E+00 /
      data (ref_adm(36,iz,10,16),iz = 1,20) / &
     & 0.2539600E+00, 0.2539600E+00, 0.2524800E+00, 0.2590000E+00, &
     & 0.2501000E+00, 0.2483000E+00, 0.2661900E+00, 0.2814100E+00, &
     & 0.2892800E+00, 0.2824300E+00, 0.2897600E+00, 0.3012500E+00, &
     & 0.3296900E+00, 0.3546700E+00, 0.3904000E+00, 0.4955000E+00, &
     & 0.4803700E+00, 0.5684800E+00, 0.3670371E+00, 0.3670371E+00 /
      data (ref_adm(36,iz,11,16),iz = 1,20) / &
     & 0.2586400E+00, 0.2586400E+00, 0.2577700E+00, 0.2509700E+00, &
     & 0.2464100E+00, 0.2468500E+00, 0.2523400E+00, 0.2655800E+00, &
     & 0.2669400E+00, 0.2824000E+00, 0.2871300E+00, 0.3071800E+00, &
     & 0.3180000E+00, 0.3313800E+00, 0.3911500E+00, 0.5005000E+00, &
     & 0.4607400E+00, 0.4242805E+00, 0.3623638E+00, 0.3623638E+00 /
      data (ref_adm(36,iz,12,16),iz = 1,20) / &
     & 0.2643900E+00, 0.2643900E+00, 0.2643600E+00, 0.2430700E+00, &
     & 0.2510600E+00, 0.2514300E+00, 0.2495100E+00, 0.2556800E+00, &
     & 0.2684800E+00, 0.2773000E+00, 0.2847300E+00, 0.3006500E+00, &
     & 0.3339900E+00, 0.3312000E+00, 0.3777900E+00, 0.4128800E+00, &
     & 0.4293700E+00, 0.4179657E+00, 0.3577491E+00, 0.3577491E+00 /
      data (ref_adm(36,iz,13,16),iz = 1,20) / &
     & 0.2619500E+00, 0.2619500E+00, 0.2441000E+00, 0.2545100E+00, &
     & 0.2535000E+00, 0.2556300E+00, 0.2497000E+00, 0.2541300E+00, &
     & 0.2693800E+00, 0.2698100E+00, 0.2907100E+00, 0.3076500E+00, &
     & 0.3209100E+00, 0.3329000E+00, 0.3815500E+00, 0.4207900E+00, &
     & 0.4133700E+00, 0.4099412E+00, 0.3524980E+00, 0.3524980E+00 /
      data (ref_adm(36,iz,14,16),iz = 1,20) / &
     & 0.2630900E+00, 0.2630900E+00, 0.2624500E+00, 0.2595000E+00, &
     & 0.2548600E+00, 0.2582800E+00, 0.2612800E+00, 0.2681400E+00, &
     & 0.2715300E+00, 0.2789000E+00, 0.2953700E+00, 0.3027100E+00, &
     & 0.3141200E+00, 0.3386600E+00, 0.3785600E+00, 0.4300500E+00, &
     & 0.4739600E+00, 0.4015768E+00, 0.3459986E+00, 0.3459986E+00 /
      data (ref_adm(36,iz,15,16),iz = 1,20) / &
     & 0.2644900E+00, 0.2644900E+00, 0.2629400E+00, 0.2609300E+00, &
     & 0.2566000E+00, 0.2613300E+00, 0.2665800E+00, 0.2684300E+00, &
     & 0.2686000E+00, 0.2716500E+00, 0.2741000E+00, 0.2858600E+00, &
     & 0.2953200E+00, 0.3188100E+00, 0.3590600E+00, 0.4293500E+00, &
     & 0.5370000E+00, 0.3937193E+00, 0.3388685E+00, 0.3388685E+00 /
      data (ref_adm(36,iz,16,16),iz = 1,20) / &
     & 0.2501300E+00, 0.2501300E+00, 0.2394500E+00, 0.2334800E+00, &
     & 0.2331500E+00, 0.2316200E+00, 0.2325900E+00, 0.2407300E+00, &
     & 0.2537800E+00, 0.2704300E+00, 0.2785300E+00, 0.2816100E+00, &
     & 0.2870300E+00, 0.3112800E+00, 0.3473500E+00, 0.3855300E+00, &
     & 0.3923329E+00, 0.3850391E+00, 0.3325642E+00, 0.3325642E+00 /
      data (ref_adm(36,iz,17,16),iz = 1,20) / &
     & 0.2565600E+00, 0.2565600E+00, 0.2574200E+00, 0.2560600E+00, &
     & 0.2509700E+00, 0.2570700E+00, 0.2539200E+00, 0.2513600E+00, &
     & 0.2605800E+00, 0.2587900E+00, 0.2721000E+00, 0.2861900E+00, &
     & 0.3036200E+00, 0.3234900E+00, 0.3520600E+00, 0.3394700E+00, &
     & 0.4141700E+00, 0.3766554E+00, 0.3263623E+00, 0.3263623E+00 /
      data (ref_adm(36,iz,18,16),iz = 1,20) / &
     & 0.2602900E+00, 0.2602900E+00, 0.2568600E+00, 0.2582400E+00, &
     & 0.2498200E+00, 0.2579400E+00, 0.2572600E+00, 0.2572400E+00, &
     & 0.2693800E+00, 0.2751800E+00, 0.2632100E+00, 0.2862900E+00, &
     & 0.3020000E+00, 0.3075300E+00, 0.3485100E+00, 0.3913300E+00, &
     & 0.4435264E+00, 0.5029706E+00, 0.5528184E+00, 0.5528184E+00 /
      data (ref_adm(36,iz,19,16),iz = 1,20) / &
     & 0.2563100E+00, 0.2563100E+00, 0.2546200E+00, 0.2505600E+00, &
     & 0.2553800E+00, 0.2592700E+00, 0.2641900E+00, 0.2652400E+00, &
     & 0.2683500E+00, 0.2693000E+00, 0.2803300E+00, 0.2847100E+00, &
     & 0.3080300E+00, 0.3153900E+00, 0.3417000E+00, 0.4657100E+00, &
     & 0.4380950E+00, 0.4937091E+00, 0.5397230E+00, 0.5397230E+00 /
      data (ref_adm(36,iz,20,16),iz = 1,20) / &
     & 0.2587300E+00, 0.2587300E+00, 0.2559800E+00, 0.2532200E+00, &
     & 0.2538200E+00, 0.2608300E+00, 0.2673000E+00, 0.2741700E+00, &
     & 0.2806300E+00, 0.2738000E+00, 0.2825000E+00, 0.2772000E+00, &
     & 0.3141300E+00, 0.3241700E+00, 0.3237400E+00, 0.3969777E+00, &
     & 0.4348690E+00, 0.4883094E+00, 0.5322369E+00, 0.5322369E+00 /
      data (ref_adm(36,iz,21,16),iz = 1,20) / &
     & 0.2609700E+00, 0.2609700E+00, 0.2634500E+00, 0.2647600E+00, &
     & 0.2547900E+00, 0.2681700E+00, 0.2688700E+00, 0.2883200E+00, &
     & 0.2825300E+00, 0.3168400E+00, 0.2885000E+00, 0.3021200E+00, &
     & 0.3299200E+00, 0.3323900E+00, 0.3468700E+00, 0.4019700E+00, &
     & 0.4328158E+00, 0.4843655E+00, 0.5279409E+00, 0.5279409E+00 /
      data (ref_adm(36,iz,22,16),iz = 1,20) / &
     & 0.2573800E+00, 0.2573800E+00, 0.2654400E+00, 0.2653500E+00, &
     & 0.2721200E+00, 0.2647600E+00, 0.2796900E+00, 0.2772800E+00, &
     & 0.2720500E+00, 0.2937000E+00, 0.3011000E+00, 0.3056400E+00, &
     & 0.3463400E+00, 0.3419800E+00, 0.3568500E+00, 0.4136600E+00, &
     & 0.5334421E+00, 0.6216814E+00, 0.7404166E+00, 0.7404166E+00 /
      data (ref_adm(36,iz,23,16),iz = 1,20) / &
     & 0.2635900E+00, 0.2635900E+00, 0.2670200E+00, 0.2784100E+00, &
     & 0.2855600E+00, 0.2732700E+00, 0.2827100E+00, 0.2902600E+00, &
     & 0.2882500E+00, 0.3027200E+00, 0.3276000E+00, 0.3221300E+00, &
     & 0.3512000E+00, 0.3638000E+00, 0.3763800E+00, 0.4044300E+00, &
     & 0.3467900E+00, 0.6177990E+00, 0.7428535E+00, 0.7428535E+00 /
      data (ref_adm(36,iz,24,16),iz = 1,20) / &
     & 0.2516300E+00, 0.2516300E+00, 0.2612900E+00, 0.2651600E+00, &
     & 0.2661500E+00, 0.2700200E+00, 0.2815300E+00, 0.2986600E+00, &
     & 0.2982700E+00, 0.2992100E+00, 0.3013000E+00, 0.3177900E+00, &
     & 0.3441500E+00, 0.3617000E+00, 0.3706900E+00, 0.4109600E+00, &
     & 0.4239100E+00, 0.6187681E+00, 0.7521517E+00, 0.7521517E+00 /
      data (ref_adm(36,iz,25,16),iz = 1,20) / &
     & 0.2643400E+00, 0.2643400E+00, 0.2638900E+00, 0.2691000E+00, &
     & 0.2750600E+00, 0.2767600E+00, 0.2803900E+00, 0.2882100E+00, &
     & 0.2993900E+00, 0.3168600E+00, 0.3303500E+00, 0.3503100E+00, &
     & 0.3624000E+00, 0.3888800E+00, 0.3865600E+00, 0.4229200E+00, &
     & 0.4094100E+00, 0.6230292E+00, 0.7662180E+00, 0.7662180E+00 /
      data (ref_adm(36,iz,26,16),iz = 1,20) / &
     & 0.2620300E+00, 0.2620300E+00, 0.2641800E+00, 0.2807300E+00, &
     & 0.2874400E+00, 0.3000700E+00, 0.2929000E+00, 0.2966200E+00, &
     & 0.3061800E+00, 0.3162700E+00, 0.3204100E+00, 0.3412700E+00, &
     & 0.3498300E+00, 0.3779800E+00, 0.4055400E+00, 0.4445800E+00, &
     & 0.4383900E+00, 0.4765400E+00, 0.7894328E+00, 0.7894328E+00 /
      data (ref_adm(36,iz,27,16),iz = 1,20) / &
     & 0.2680200E+00, 0.2680200E+00, 0.2623100E+00, 0.2790500E+00, &
     & 0.2925800E+00, 0.2927600E+00, 0.2920000E+00, 0.3113100E+00, &
     & 0.3126000E+00, 0.3203600E+00, 0.3345900E+00, 0.3561000E+00, &
     & 0.3538400E+00, 0.4050500E+00, 0.4230500E+00, 0.4508400E+00, &
     & 0.4305800E+00, 0.4216300E+00, 0.8181024E+00, 0.8181024E+00 /
      data (ref_adm(36,iz,28,16),iz = 1,20) / &
     & 0.2607200E+00, 0.2607200E+00, 0.2641200E+00, 0.2819700E+00, &
     & 0.2865300E+00, 0.2890600E+00, 0.2967900E+00, 0.2974300E+00, &
     & 0.3194000E+00, 0.3231700E+00, 0.3401200E+00, 0.3750200E+00, &
     & 0.3608300E+00, 0.3926200E+00, 0.4407400E+00, 0.4718000E+00, &
     & 0.5155800E+00, 0.6669276E+00, 0.4582200E+00, 0.4582200E+00 /
      data (ref_adm(36,iz,29,16),iz = 1,20) / &
     & 0.2703500E+00, 0.2703500E+00, 0.2708100E+00, 0.2788500E+00, &
     & 0.2795700E+00, 0.2830600E+00, 0.2975200E+00, 0.3107200E+00, &
     & 0.3268700E+00, 0.3455400E+00, 0.3572400E+00, 0.3603700E+00, &
     & 0.3802700E+00, 0.4125700E+00, 0.4419400E+00, 0.4704400E+00, &
     & 0.5509100E+00, 0.6884322E+00, 0.8847690E+00, 0.8847690E+00 /
      data (ref_adm(36,iz,30,16),iz = 1,20) / &
     & 0.2635900E+00, 0.2635900E+00, 0.2657100E+00, 0.2802600E+00, &
     & 0.2797400E+00, 0.2771500E+00, 0.3024600E+00, 0.3271600E+00, &
     & 0.3252200E+00, 0.3518600E+00, 0.3581600E+00, 0.3732600E+00, &
     & 0.4034800E+00, 0.4200200E+00, 0.4500800E+00, 0.4758200E+00, &
     & 0.5354600E+00, 0.5639800E+00, 0.9230561E+00, 0.9230561E+00 /
      data (ref_adm(36,iz,31,16),iz = 1,20) / &
     & 0.2646800E+00, 0.2646800E+00, 0.2528200E+00, 0.2815100E+00, &
     & 0.2980500E+00, 0.2939600E+00, 0.2985700E+00, 0.3102900E+00, &
     & 0.3206800E+00, 0.3511200E+00, 0.3745600E+00, 0.3910700E+00, &
     & 0.4258300E+00, 0.4403900E+00, 0.4688500E+00, 0.4864700E+00, &
     & 0.5507600E+00, 0.5902400E+00, 0.5636000E+00, 0.5636000E+00 /
      data (ref_adm(36,iz,32,16),iz = 1,20) / &
     & 0.2556200E+00, 0.2556200E+00, 0.2615500E+00, 0.2776300E+00, &
     & 0.2849800E+00, 0.2915700E+00, 0.2973900E+00, 0.3110900E+00, &
     & 0.3254900E+00, 0.3448600E+00, 0.3606800E+00, 0.3837100E+00, &
     & 0.4068000E+00, 0.4399900E+00, 0.4754800E+00, 0.5230000E+00, &
     & 0.5937600E+00, 0.7671802E+00, 0.1000396E+01, 0.1000396E+01 /
      data (ref_adm(36,iz,33,16),iz = 1,20) / &
     & 0.2608400E+00, 0.2608400E+00, 0.2684300E+00, 0.2753700E+00, &
     & 0.2841000E+00, 0.2875500E+00, 0.2983000E+00, 0.3120200E+00, &
     & 0.3270500E+00, 0.3462600E+00, 0.3731700E+00, 0.3896200E+00, &
     & 0.4135000E+00, 0.4633900E+00, 0.4941300E+00, 0.5398900E+00, &
     & 0.5953700E+00, 0.7588100E+00, 0.1031584E+01, 0.1031584E+01 /
      data (ref_adm(36,iz,34,16),iz = 1,20) / &
     & 0.2671500E+00, 0.2671500E+00, 0.2823100E+00, 0.2865000E+00, &
     & 0.2923700E+00, 0.2948800E+00, 0.3105500E+00, 0.3293900E+00, &
     & 0.3418900E+00, 0.3541600E+00, 0.3772500E+00, 0.4010000E+00, &
     & 0.4208500E+00, 0.4666600E+00, 0.4952800E+00, 0.5554100E+00, &
     & 0.6070700E+00, 0.6776700E+00, 0.6218600E+00, 0.6218600E+00 /
      data (ref_adm(36,iz,35,16),iz = 1,20) / &
     & 0.2781700E+00, 0.2781700E+00, 0.2861500E+00, 0.2789700E+00, &
     & 0.2793800E+00, 0.2821700E+00, 0.2983100E+00, 0.3287400E+00, &
     & 0.3316800E+00, 0.3490100E+00, 0.3628400E+00, 0.3886200E+00, &
     & 0.4263600E+00, 0.4717300E+00, 0.5079100E+00, 0.5812500E+00, &
     & 0.6388900E+00, 0.7787781E+00, 0.1044503E+01, 0.1044503E+01 /
      data (ref_adm(36,iz,36,16),iz = 1,20) / &
     & 0.2626000E+00, 0.2626000E+00, 0.2722400E+00, 0.2811000E+00, &
     & 0.2853000E+00, 0.2899400E+00, 0.3055700E+00, 0.3283000E+00, &
     & 0.3400000E+00, 0.3533200E+00, 0.3673900E+00, 0.3869900E+00, &
     & 0.4178100E+00, 0.4822000E+00, 0.5354500E+00, 0.6301800E+00, &
     & 0.6865800E+00, 0.7891313E+00, 0.1052806E+01, 0.1052806E+01 /
      data (ref_adm(36,iz,37,16),iz = 1,20) / &
     & 0.2660700E+00, 0.2660700E+00, 0.2677200E+00, 0.2704000E+00, &
     & 0.2877800E+00, 0.3004900E+00, 0.3089900E+00, 0.3171700E+00, &
     & 0.3316500E+00, 0.3570000E+00, 0.3753500E+00, 0.3839600E+00, &
     & 0.4239100E+00, 0.4802800E+00, 0.5471400E+00, 0.6459100E+00, &
     & 0.7454300E+00, 0.8178158E+00, 0.1060450E+01, 0.1060450E+01 /
      data (ref_adm(36,iz,38,16),iz = 1,20) / &
     & 0.2660700E+00, 0.2660700E+00, 0.2677200E+00, 0.2704000E+00, &
     & 0.2877800E+00, 0.3004900E+00, 0.3089900E+00, 0.3171700E+00, &
     & 0.3316500E+00, 0.3570000E+00, 0.3753500E+00, 0.3839600E+00, &
     & 0.4239100E+00, 0.4802800E+00, 0.5471400E+00, 0.6459100E+00, &
     & 0.7454300E+00, 0.8178158E+00, 0.1060450E+01, 0.1060450E+01 /
! Solar Zenith Angle 80.0 Albedo  0.3660147E+00
      data (ref_adm(36,iz, 1,17),iz = 1,20) / &
     & 0.2449000E+00, 0.2449000E+00, 0.2460100E+00, 0.2556900E+00, &
     & 0.2615100E+00, 0.2639000E+00, 0.2698300E+00, 0.2792200E+00, &
     & 0.2890500E+00, 0.3082900E+00, 0.3397900E+00, 0.3800100E+00, &
     & 0.4349216E+00, 0.4798086E+00, 0.5750487E+00, 0.7980255E+00, &
     & 0.1316456E+01, 0.2466065E+01, 0.1758294E+01, 0.1758294E+01 /
      data (ref_adm(36,iz, 2,17),iz = 1,20) / &
     & 0.2449000E+00, 0.2449000E+00, 0.2460100E+00, 0.2556900E+00, &
     & 0.2615100E+00, 0.2639000E+00, 0.2698300E+00, 0.2792200E+00, &
     & 0.2890500E+00, 0.3082900E+00, 0.3397900E+00, 0.3800100E+00, &
     & 0.4349216E+00, 0.4798086E+00, 0.5750487E+00, 0.7980255E+00, &
     & 0.1316456E+01, 0.2466065E+01, 0.1758294E+01, 0.1758294E+01 /
      data (ref_adm(36,iz, 3,17),iz = 1,20) / &
     & 0.2482300E+00, 0.2482300E+00, 0.2529100E+00, 0.2561200E+00, &
     & 0.2607800E+00, 0.2732500E+00, 0.2819300E+00, 0.2882400E+00, &
     & 0.2931300E+00, 0.3102300E+00, 0.3364400E+00, 0.3890700E+00, &
     & 0.4327699E+00, 0.4781709E+00, 0.5678215E+00, 0.7768646E+00, &
     & 0.1230094E+01, 0.2593817E+01, 0.3651187E+00, 0.3651187E+00 /
      data (ref_adm(36,iz, 4,17),iz = 1,20) / &
     & 0.2480600E+00, 0.2480600E+00, 0.2450600E+00, 0.2485000E+00, &
     & 0.2522700E+00, 0.2677700E+00, 0.2765800E+00, 0.2796600E+00, &
     & 0.2976900E+00, 0.3125100E+00, 0.3351500E+00, 0.3860100E+00, &
     & 0.4276413E+00, 0.4755405E+00, 0.5537689E+00, 0.7337209E+00, &
     & 0.1082318E+01, 0.2329794E+01, 0.2673701E+01, 0.2673701E+01 /
      data (ref_adm(36,iz, 5,17),iz = 1,20) / &
     & 0.2492900E+00, 0.2492900E+00, 0.2549100E+00, 0.2550900E+00, &
     & 0.2574000E+00, 0.2634700E+00, 0.2659400E+00, 0.2732500E+00, &
     & 0.2860900E+00, 0.3119900E+00, 0.3314900E+00, 0.3685900E+00, &
     & 0.4201350E+00, 0.4717009E+00, 0.5385592E+00, 0.6835753E+00, &
     & 0.9418160E+00, 0.1691502E+01, 0.3155751E+01, 0.3155751E+01 /
      data (ref_adm(36,iz, 6,17),iz = 1,20) / &
     & 0.2458700E+00, 0.2458700E+00, 0.2488900E+00, 0.2460000E+00, &
     & 0.2514000E+00, 0.2497800E+00, 0.2570000E+00, 0.2685700E+00, &
     & 0.2910700E+00, 0.3030000E+00, 0.3315000E+00, 0.3560000E+00, &
     & 0.4043600E+00, 0.4531600E+00, 0.5306200E+00, 0.6222400E+00, &
     & 0.7338200E+00, 0.8378600E+00, 0.2041465E+01, 0.2041465E+01 /
      data (ref_adm(36,iz, 7,17),iz = 1,20) / &
     & 0.2443500E+00, 0.2443500E+00, 0.2446800E+00, 0.2464300E+00, &
     & 0.2498300E+00, 0.2532500E+00, 0.2629800E+00, 0.2725600E+00, &
     & 0.2915200E+00, 0.3044000E+00, 0.3388800E+00, 0.3642100E+00, &
     & 0.4206500E+00, 0.4622100E+00, 0.5262700E+00, 0.6163600E+00, &
     & 0.8118000E+00, 0.1045001E+01, 0.1458679E+01, 0.1458679E+01 /
      data (ref_adm(36,iz, 8,17),iz = 1,20) / &
     & 0.2462200E+00, 0.2462200E+00, 0.2421000E+00, 0.2461600E+00, &
     & 0.2475900E+00, 0.2424200E+00, 0.2460800E+00, 0.2608500E+00, &
     & 0.2605300E+00, 0.2978200E+00, 0.3316100E+00, 0.3647900E+00, &
     & 0.4494500E+00, 0.5157800E+00, 0.5827300E+00, 0.5971200E+00, &
     & 0.7191500E+00, 0.9041809E+00, 0.1186846E+01, 0.1186846E+01 /
      data (ref_adm(36,iz, 9,17),iz = 1,20) / &
     & 0.2398600E+00, 0.2398600E+00, 0.2455000E+00, 0.2456300E+00, &
     & 0.2482600E+00, 0.2469500E+00, 0.2622600E+00, 0.2554100E+00, &
     & 0.2644900E+00, 0.2864200E+00, 0.3266200E+00, 0.3586000E+00, &
     & 0.3935200E+00, 0.4945900E+00, 0.5605800E+00, 0.6451300E+00, &
     & 0.7433600E+00, 0.8339029E+00, 0.1034913E+01, 0.1034913E+01 /
      data (ref_adm(36,iz,10,17),iz = 1,20) / &
     & 0.2441500E+00, 0.2441500E+00, 0.2461400E+00, 0.2425300E+00, &
     & 0.2564900E+00, 0.2562700E+00, 0.2529900E+00, 0.2514600E+00, &
     & 0.2736800E+00, 0.2819900E+00, 0.2953000E+00, 0.3211500E+00, &
     & 0.3813800E+00, 0.4433000E+00, 0.5241900E+00, 0.7173700E+00, &
     & 0.7668400E+00, 0.8016292E+00, 0.9843284E+00, 0.9843284E+00 /
      data (ref_adm(36,iz,11,17),iz = 1,20) / &
     & 0.2481300E+00, 0.2481300E+00, 0.2394400E+00, 0.2502200E+00, &
     & 0.2594500E+00, 0.2529000E+00, 0.2571700E+00, 0.2630600E+00, &
     & 0.2790300E+00, 0.2843400E+00, 0.2960200E+00, 0.3210300E+00, &
     & 0.3731200E+00, 0.4315200E+00, 0.4715700E+00, 0.6258200E+00, &
     & 0.7635700E+00, 0.7405469E+00, 0.9082750E+00, 0.9082750E+00 /
      data (ref_adm(36,iz,12,17),iz = 1,20) / &
     & 0.2406500E+00, 0.2406500E+00, 0.2490600E+00, 0.2512400E+00, &
     & 0.2549100E+00, 0.2518600E+00, 0.2525800E+00, 0.2705500E+00, &
     & 0.2832000E+00, 0.2814000E+00, 0.3098700E+00, 0.3253400E+00, &
     & 0.3778800E+00, 0.4205800E+00, 0.4337900E+00, 0.4965000E+00, &
     & 0.6892800E+00, 0.6975390E+00, 0.8405517E+00, 0.8405517E+00 /
      data (ref_adm(36,iz,13,17),iz = 1,20) / &
     & 0.2398500E+00, 0.2398500E+00, 0.2444500E+00, 0.2480400E+00, &
     & 0.2513500E+00, 0.2474500E+00, 0.2563600E+00, 0.2663100E+00, &
     & 0.2824100E+00, 0.2845600E+00, 0.3126900E+00, 0.3390900E+00, &
     & 0.3608200E+00, 0.4019600E+00, 0.4492600E+00, 0.4885600E+00, &
     & 0.5763100E+00, 0.6676255E+00, 0.7952554E+00, 0.7952554E+00 /
      data (ref_adm(36,iz,14,17),iz = 1,20) / &
     & 0.2504200E+00, 0.2504200E+00, 0.2545300E+00, 0.2514100E+00, &
     & 0.2524200E+00, 0.2544700E+00, 0.2635000E+00, 0.2736600E+00, &
     & 0.2790900E+00, 0.2875700E+00, 0.2999800E+00, 0.3225400E+00, &
     & 0.3495900E+00, 0.3679400E+00, 0.4331000E+00, 0.4769500E+00, &
     & 0.5140500E+00, 0.6474324E+00, 0.7630973E+00, 0.7630973E+00 /
      data (ref_adm(36,iz,15,17),iz = 1,20) / &
     & 0.2408900E+00, 0.2408900E+00, 0.2347800E+00, 0.2316100E+00, &
     & 0.2336300E+00, 0.2378700E+00, 0.2416600E+00, 0.2482800E+00, &
     & 0.2565800E+00, 0.2683000E+00, 0.2814900E+00, 0.2967200E+00, &
     & 0.3143900E+00, 0.3389100E+00, 0.4191700E+00, 0.4710800E+00, &
     & 0.5098200E+00, 0.6309882E+00, 0.7376734E+00, 0.7376734E+00 /
      data (ref_adm(36,iz,16,17),iz = 1,20) / &
     & 0.2442100E+00, 0.2442100E+00, 0.2551600E+00, 0.2601100E+00, &
     & 0.2609700E+00, 0.2572200E+00, 0.2592000E+00, 0.2565800E+00, &
     & 0.2686900E+00, 0.2760400E+00, 0.2874900E+00, 0.3002600E+00, &
     & 0.3079000E+00, 0.3271500E+00, 0.3473800E+00, 0.3813700E+00, &
     & 0.5172762E+00, 0.6133890E+00, 0.7140344E+00, 0.7140344E+00 /
      data (ref_adm(36,iz,17,17),iz = 1,20) / &
     & 0.2450900E+00, 0.2450900E+00, 0.2535300E+00, 0.2427100E+00, &
     & 0.2542900E+00, 0.2547600E+00, 0.2573900E+00, 0.2597700E+00, &
     & 0.2666500E+00, 0.2810800E+00, 0.2951100E+00, 0.3015100E+00, &
     & 0.2928200E+00, 0.3184500E+00, 0.3465400E+00, 0.4004600E+00, &
     & 0.5045529E+00, 0.5946305E+00, 0.6883968E+00, 0.6883968E+00 /
      data (ref_adm(36,iz,18,17),iz = 1,20) / &
     & 0.2436400E+00, 0.2436400E+00, 0.2510600E+00, 0.2521900E+00, &
     & 0.2589300E+00, 0.2574100E+00, 0.2561400E+00, 0.2707700E+00, &
     & 0.2783000E+00, 0.2893900E+00, 0.3019200E+00, 0.3060300E+00, &
     & 0.3162100E+00, 0.3319600E+00, 0.3545500E+00, 0.4787400E+00, &
     & 0.4668607E+00, 0.5393214E+00, 0.6116176E+00, 0.6116176E+00 /
      data (ref_adm(36,iz,19,17),iz = 1,20) / &
     & 0.2443500E+00, 0.2443500E+00, 0.2477200E+00, 0.2524100E+00, &
     & 0.2602600E+00, 0.2712700E+00, 0.2573400E+00, 0.2780300E+00, &
     & 0.2899700E+00, 0.2832100E+00, 0.2868300E+00, 0.3038300E+00, &
     & 0.3087800E+00, 0.3363500E+00, 0.3723800E+00, 0.3997700E+00, &
     & 0.4602866E+00, 0.5284993E+00, 0.5964479E+00, 0.5964479E+00 /
      data (ref_adm(36,iz,20,17),iz = 1,20) / &
     & 0.2509400E+00, 0.2509400E+00, 0.2523000E+00, 0.2465200E+00, &
     & 0.2502200E+00, 0.2576800E+00, 0.2675200E+00, 0.2749000E+00, &
     & 0.2743900E+00, 0.2751800E+00, 0.3008600E+00, 0.3042700E+00, &
     & 0.3155900E+00, 0.3419100E+00, 0.3576400E+00, 0.4118520E+00, &
     & 0.4563667E+00, 0.5220671E+00, 0.5876758E+00, 0.5876758E+00 /
      data (ref_adm(36,iz,21,17),iz = 1,20) / &
     & 0.2549700E+00, 0.2549700E+00, 0.2524300E+00, 0.2425000E+00, &
     & 0.2508900E+00, 0.2532400E+00, 0.2742700E+00, 0.2881800E+00, &
     & 0.2861900E+00, 0.2867000E+00, 0.2987700E+00, 0.3145300E+00, &
     & 0.3085300E+00, 0.3297500E+00, 0.3593100E+00, 0.4701600E+00, &
     & 0.4537955E+00, 0.5173621E+00, 0.5827177E+00, 0.5827177E+00 /
      data (ref_adm(36,iz,22,17),iz = 1,20) / &
     & 0.2534600E+00, 0.2534600E+00, 0.2528700E+00, 0.2479800E+00, &
     & 0.2407600E+00, 0.2499700E+00, 0.2618500E+00, 0.2826200E+00, &
     & 0.2823800E+00, 0.2848900E+00, 0.3072000E+00, 0.3368900E+00, &
     & 0.3276000E+00, 0.3343000E+00, 0.3905000E+00, 0.3970400E+00, &
     & 0.5353038E+00, 0.6442260E+00, 0.8156117E+00, 0.8156117E+00 /
      data (ref_adm(36,iz,23,17),iz = 1,20) / &
     & 0.2503000E+00, 0.2503000E+00, 0.2496600E+00, 0.2522700E+00, &
     & 0.2566700E+00, 0.2578300E+00, 0.2619900E+00, 0.2765700E+00, &
     & 0.2823200E+00, 0.2933700E+00, 0.3068400E+00, 0.3301400E+00, &
     & 0.3494700E+00, 0.3516600E+00, 0.3984100E+00, 0.4421000E+00, &
     & 0.5339135E+00, 0.6418511E+00, 0.8195863E+00, 0.8195863E+00 /
      data (ref_adm(36,iz,24,17),iz = 1,20) / &
     & 0.2492100E+00, 0.2492100E+00, 0.2461800E+00, 0.2498000E+00, &
     & 0.2532600E+00, 0.2592000E+00, 0.2664000E+00, 0.2764300E+00, &
     & 0.2830800E+00, 0.2944600E+00, 0.3078200E+00, 0.3229000E+00, &
     & 0.3511100E+00, 0.3484300E+00, 0.3800800E+00, 0.4611100E+00, &
     & 0.4764100E+00, 0.6445031E+00, 0.8312055E+00, 0.8312055E+00 /
      data (ref_adm(36,iz,25,17),iz = 1,20) / &
     & 0.2435700E+00, 0.2435700E+00, 0.2478800E+00, 0.2518500E+00, &
     & 0.2602500E+00, 0.2661200E+00, 0.2733800E+00, 0.2828900E+00, &
     & 0.2953300E+00, 0.3060700E+00, 0.3248400E+00, 0.3380900E+00, &
     & 0.3658500E+00, 0.3753200E+00, 0.3960100E+00, 0.4478800E+00, &
     & 0.4982900E+00, 0.6507521E+00, 0.8486421E+00, 0.8486421E+00 /
      data (ref_adm(36,iz,26,17),iz = 1,20) / &
     & 0.2441200E+00, 0.2441200E+00, 0.2452200E+00, 0.2402400E+00, &
     & 0.2553800E+00, 0.2699200E+00, 0.2777200E+00, 0.2810500E+00, &
     & 0.2955000E+00, 0.2998300E+00, 0.3148000E+00, 0.3444800E+00, &
     & 0.3556900E+00, 0.4025200E+00, 0.4005900E+00, 0.4841300E+00, &
     & 0.5117700E+00, 0.5383800E+00, 0.8765615E+00, 0.8765615E+00 /
      data (ref_adm(36,iz,27,17),iz = 1,20) / &
     & 0.2401700E+00, 0.2401700E+00, 0.2429000E+00, 0.2547400E+00, &
     & 0.2508500E+00, 0.2627200E+00, 0.2821700E+00, 0.2809500E+00, &
     & 0.2994300E+00, 0.3019300E+00, 0.3336700E+00, 0.3614100E+00, &
     & 0.3955600E+00, 0.4126900E+00, 0.4205700E+00, 0.4574000E+00, &
     & 0.4971300E+00, 0.5692600E+00, 0.9103642E+00, 0.9103642E+00 /
      data (ref_adm(36,iz,28,17),iz = 1,20) / &
     & 0.2382500E+00, 0.2382500E+00, 0.2470600E+00, 0.2542500E+00, &
     & 0.2689000E+00, 0.2673600E+00, 0.2806200E+00, 0.2914500E+00, &
     & 0.3058800E+00, 0.3149100E+00, 0.3388200E+00, 0.3757200E+00, &
     & 0.4070700E+00, 0.4291400E+00, 0.4574100E+00, 0.4903200E+00, &
     & 0.5666100E+00, 0.7023523E+00, 0.9469788E+00, 0.9469788E+00 /
      data (ref_adm(36,iz,29,17),iz = 1,20) / &
     & 0.2449400E+00, 0.2449400E+00, 0.2426200E+00, 0.2593900E+00, &
     & 0.2703100E+00, 0.2820500E+00, 0.2869000E+00, 0.2955900E+00, &
     & 0.3221600E+00, 0.3300000E+00, 0.3430900E+00, 0.3598300E+00, &
     & 0.4100200E+00, 0.4182400E+00, 0.4505100E+00, 0.5050900E+00, &
     & 0.5680400E+00, 0.7264694E+00, 0.9889839E+00, 0.9889839E+00 /
      data (ref_adm(36,iz,30,17),iz = 1,20) / &
     & 0.2400300E+00, 0.2400300E+00, 0.2524800E+00, 0.2645600E+00, &
     & 0.2671600E+00, 0.2732900E+00, 0.2908200E+00, 0.2956400E+00, &
     & 0.3229600E+00, 0.3378800E+00, 0.3365500E+00, 0.3558000E+00, &
     & 0.4168700E+00, 0.4419100E+00, 0.4665600E+00, 0.5214100E+00, &
     & 0.5994500E+00, 0.7551709E+00, 0.1034151E+01, 0.1034151E+01 /
      data (ref_adm(36,iz,31,17),iz = 1,20) / &
     & 0.2504500E+00, 0.2504500E+00, 0.2528400E+00, 0.2532400E+00, &
     & 0.2683000E+00, 0.2678200E+00, 0.2853600E+00, 0.3116100E+00, &
     & 0.3256800E+00, 0.3370800E+00, 0.3715200E+00, 0.3864900E+00, &
     & 0.4030700E+00, 0.4434300E+00, 0.4828400E+00, 0.5529900E+00, &
     & 0.6437600E+00, 0.7844674E+00, 0.6733400E+00, 0.6733400E+00 /
      data (ref_adm(36,iz,32,17),iz = 1,20) / &
     & 0.2562200E+00, 0.2562200E+00, 0.2597500E+00, 0.2629700E+00, &
     & 0.2710600E+00, 0.2792300E+00, 0.2851800E+00, 0.2985700E+00, &
     & 0.3216200E+00, 0.3491700E+00, 0.3699300E+00, 0.3916000E+00, &
     & 0.4182600E+00, 0.4532600E+00, 0.4772900E+00, 0.5443000E+00, &
     & 0.6289800E+00, 0.8136230E+00, 0.7294200E+00, 0.7294200E+00 /
      data (ref_adm(36,iz,33,17),iz = 1,20) / &
     & 0.2432400E+00, 0.2432400E+00, 0.2506000E+00, 0.2554000E+00, &
     & 0.2598600E+00, 0.2724500E+00, 0.2847800E+00, 0.2988800E+00, &
     & 0.3199100E+00, 0.3402400E+00, 0.3655900E+00, 0.3940400E+00, &
     & 0.4243100E+00, 0.4561800E+00, 0.5030700E+00, 0.5585100E+00, &
     & 0.6267500E+00, 0.8277838E+00, 0.1158201E+01, 0.1158201E+01 /
      data (ref_adm(36,iz,34,17),iz = 1,20) / &
     & 0.2480200E+00, 0.2480200E+00, 0.2572500E+00, 0.2580200E+00, &
     & 0.2674400E+00, 0.2733100E+00, 0.2885200E+00, 0.3153300E+00, &
     & 0.3362700E+00, 0.3593000E+00, 0.3826500E+00, 0.4038600E+00, &
     & 0.4464200E+00, 0.4827500E+00, 0.5318800E+00, 0.6211400E+00, &
     & 0.6828300E+00, 0.8242851E+00, 0.1166175E+01, 0.1166175E+01 /
      data (ref_adm(36,iz,35,17),iz = 1,20) / &
     & 0.2482900E+00, 0.2482900E+00, 0.2558200E+00, 0.2670900E+00, &
     & 0.2719900E+00, 0.2856500E+00, 0.2968200E+00, 0.3159600E+00, &
     & 0.3409700E+00, 0.3596400E+00, 0.3878900E+00, 0.4205800E+00, &
     & 0.4559900E+00, 0.4861600E+00, 0.5533400E+00, 0.6030400E+00, &
     & 0.6659000E+00, 0.1001000E+01, 0.1172230E+01, 0.1172230E+01 /
      data (ref_adm(36,iz,36,17),iz = 1,20) / &
     & 0.2469300E+00, 0.2469300E+00, 0.2610800E+00, 0.2687600E+00, &
     & 0.2847300E+00, 0.2910400E+00, 0.3051300E+00, 0.3307300E+00, &
     & 0.3411400E+00, 0.3588900E+00, 0.3872500E+00, 0.4270700E+00, &
     & 0.4684900E+00, 0.4997500E+00, 0.5546300E+00, 0.6202300E+00, &
     & 0.7287600E+00, 0.8407993E+00, 0.1185092E+01, 0.1185092E+01 /
      data (ref_adm(36,iz,37,17),iz = 1,20) / &
     & 0.2452400E+00, 0.2452400E+00, 0.2517600E+00, 0.2690800E+00, &
     & 0.2841800E+00, 0.2978700E+00, 0.3082900E+00, 0.3257400E+00, &
     & 0.3488500E+00, 0.3623200E+00, 0.3869600E+00, 0.4261000E+00, &
     & 0.4815100E+00, 0.5185500E+00, 0.5674600E+00, 0.6097300E+00, &
     & 0.7765100E+00, 0.8011600E+00, 0.1196036E+01, 0.1196036E+01 /
      data (ref_adm(36,iz,38,17),iz = 1,20) / &
     & 0.2452400E+00, 0.2452400E+00, 0.2517600E+00, 0.2690800E+00, &
     & 0.2841800E+00, 0.2978700E+00, 0.3082900E+00, 0.3257400E+00, &
     & 0.3488500E+00, 0.3623200E+00, 0.3869600E+00, 0.4261000E+00, &
     & 0.4815100E+00, 0.5185500E+00, 0.5674600E+00, 0.6097300E+00, &
     & 0.7765100E+00, 0.8011600E+00, 0.1196036E+01, 0.1196036E+01 /
! Solar Zenith Angle 85.0 Albedo  0.5260652E+00
      data (ref_adm(36,iz, 1,18),iz = 1,20) / &
     & 0.3345100E+00, 0.3345100E+00, 0.3470700E+00, 0.3777700E+00, &
     & 0.3770100E+00, 0.3780400E+00, 0.3641200E+00, 0.3677900E+00, &
     & 0.3916000E+00, 0.4502200E+00, 0.4844600E+00, 0.5087200E+00, &
     & 0.6668767E+00, 0.7271271E+00, 0.8073286E+00, 0.9030511E+00, &
     & 0.9833359E+00, 0.1013977E+01, 0.7632251E+00, 0.7632251E+00 /
      data (ref_adm(36,iz, 2,18),iz = 1,20) / &
     & 0.3345100E+00, 0.3345100E+00, 0.3470700E+00, 0.3777700E+00, &
     & 0.3770100E+00, 0.3780400E+00, 0.3641200E+00, 0.3677900E+00, &
     & 0.3916000E+00, 0.4502200E+00, 0.4844600E+00, 0.5087200E+00, &
     & 0.6668767E+00, 0.7271271E+00, 0.8073286E+00, 0.9030511E+00, &
     & 0.9833359E+00, 0.1013977E+01, 0.7632251E+00, 0.7632251E+00 /
      data (ref_adm(36,iz, 3,18),iz = 1,20) / &
     & 0.3500900E+00, 0.3500900E+00, 0.3616700E+00, 0.3410700E+00, &
     & 0.3449500E+00, 0.3498000E+00, 0.3666200E+00, 0.4033200E+00, &
     & 0.3770500E+00, 0.4270400E+00, 0.4624900E+00, 0.5573500E+00, &
     & 0.6636502E+00, 0.7229090E+00, 0.8015563E+00, 0.8948064E+00, &
     & 0.9724146E+00, 0.1000769E+01, 0.1464275E+00, 0.1464275E+00 /
      data (ref_adm(36,iz, 4,18),iz = 1,20) / &
     & 0.3652500E+00, 0.3652500E+00, 0.3468800E+00, 0.3372700E+00, &
     & 0.3465500E+00, 0.3541400E+00, 0.3750400E+00, 0.3750400E+00, &
     & 0.4025200E+00, 0.4328900E+00, 0.4830900E+00, 0.5141500E+00, &
     & 0.6567609E+00, 0.7137799E+00, 0.7890719E+00, 0.8772720E+00, &
     & 0.9494591E+00, 0.9737712E+00, 0.7369118E+00, 0.7369118E+00 /
      data (ref_adm(36,iz, 5,18),iz = 1,20) / &
     & 0.3557300E+00, 0.3557300E+00, 0.3512500E+00, 0.3537900E+00, &
     & 0.3421700E+00, 0.3489700E+00, 0.3677800E+00, 0.3926800E+00, &
     & 0.4138700E+00, 0.4383000E+00, 0.4346500E+00, 0.4950800E+00, &
     & 0.6469244E+00, 0.7009500E+00, 0.7714187E+00, 0.8527896E+00, &
     & 0.9173054E+00, 0.9365396E+00, 0.7128474E+00, 0.7128474E+00 /
      data (ref_adm(36,iz, 6,18),iz = 1,20) / &
     & 0.3315000E+00, 0.3315000E+00, 0.3355300E+00, 0.3438800E+00, &
     & 0.3646100E+00, 0.3716000E+00, 0.3927000E+00, 0.4051600E+00, &
     & 0.4156600E+00, 0.4476200E+00, 0.4866900E+00, 0.5214500E+00, &
     & 0.5904900E+00, 0.6916100E+00, 0.7876700E+00, 0.9491500E+00, &
     & 0.1189700E+01, 0.8901166E+00, 0.6837467E+00, 0.6837467E+00 /
      data (ref_adm(36,iz, 7,18),iz = 1,20) / &
     & 0.3442400E+00, 0.3442400E+00, 0.3523800E+00, 0.3445600E+00, &
     & 0.3599200E+00, 0.3929100E+00, 0.4459900E+00, 0.4587600E+00, &
     & 0.5025500E+00, 0.4825300E+00, 0.5438300E+00, 0.5990700E+00, &
     & 0.7561500E+00, 0.8645700E+00, 0.1077400E+01, 0.1441300E+01, &
     & 0.1993100E+01, 0.8381414E+00, 0.6521592E+00, 0.6521592E+00 /
      data (ref_adm(36,iz, 8,18),iz = 1,20) / &
     & 0.3371600E+00, 0.3371600E+00, 0.3350400E+00, 0.3537600E+00, &
     & 0.3494900E+00, 0.3730600E+00, 0.4096900E+00, 0.4406300E+00, &
     & 0.4355300E+00, 0.4421600E+00, 0.5006800E+00, 0.5364400E+00, &
     & 0.5843500E+00, 0.6687200E+00, 0.9804800E+00, 0.1245000E+01, &
     & 0.7878655E+00, 0.7844294E+00, 0.6182641E+00, 0.6182641E+00 /
      data (ref_adm(36,iz, 9,18),iz = 1,20) / &
     & 0.3395800E+00, 0.3395800E+00, 0.3357200E+00, 0.3617700E+00, &
     & 0.3751900E+00, 0.3495100E+00, 0.3670200E+00, 0.3806900E+00, &
     & 0.3980100E+00, 0.4492800E+00, 0.5002000E+00, 0.5333000E+00, &
     & 0.6006600E+00, 0.7782600E+00, 0.9146400E+00, 0.1129600E+01, &
     & 0.7421408E+00, 0.7322322E+00, 0.5848184E+00, 0.5848184E+00 /
      data (ref_adm(36,iz,10,18),iz = 1,20) / &
     & 0.3400700E+00, 0.3400700E+00, 0.3306000E+00, 0.3811500E+00, &
     & 0.3861200E+00, 0.3518100E+00, 0.3444800E+00, 0.3661100E+00, &
     & 0.4027700E+00, 0.4658600E+00, 0.4438300E+00, 0.5755600E+00, &
     & 0.5940300E+00, 0.7483600E+00, 0.8487300E+00, 0.1246500E+01, &
     & 0.1682500E+01, 0.6835195E+00, 0.5537535E+00, 0.5537535E+00 /
      data (ref_adm(36,iz,11,18),iz = 1,20) / &
     & 0.3521000E+00, 0.3521000E+00, 0.3613900E+00, 0.3501300E+00, &
     & 0.3827800E+00, 0.3605400E+00, 0.3520600E+00, 0.3654800E+00, &
     & 0.4522500E+00, 0.4168300E+00, 0.4214700E+00, 0.5065400E+00, &
     & 0.6489100E+00, 0.6967500E+00, 0.7657600E+00, 0.1229600E+01, &
     & 0.6579183E+00, 0.6389706E+00, 0.5252838E+00, 0.5252838E+00 /
      data (ref_adm(36,iz,12,18),iz = 1,20) / &
     & 0.3560400E+00, 0.3560400E+00, 0.3945200E+00, 0.3986600E+00, &
     & 0.3814100E+00, 0.3708500E+00, 0.3509700E+00, 0.4049400E+00, &
     & 0.4501500E+00, 0.4255800E+00, 0.4500100E+00, 0.5296900E+00, &
     & 0.6358700E+00, 0.6932000E+00, 0.7560800E+00, 0.9066300E+00, &
     & 0.6211504E+00, 0.5996366E+00, 0.5000647E+00, 0.5000647E+00 /
      data (ref_adm(36,iz,13,18),iz = 1,20) / &
     & 0.3741100E+00, 0.3741100E+00, 0.3886500E+00, 0.3784300E+00, &
     & 0.3702500E+00, 0.3638200E+00, 0.4035700E+00, 0.4061600E+00, &
     & 0.4090700E+00, 0.4026800E+00, 0.4325100E+00, 0.4579500E+00, &
     & 0.5971100E+00, 0.6075700E+00, 0.6247600E+00, 0.8960600E+00, &
     & 0.2892700E+01, 0.5648133E+00, 0.4777143E+00, 0.4777143E+00 /
      data (ref_adm(36,iz,14,18),iz = 1,20) / &
     & 0.3876500E+00, 0.3876500E+00, 0.3477000E+00, 0.3453700E+00, &
     & 0.3423100E+00, 0.3383100E+00, 0.3484800E+00, 0.3460000E+00, &
     & 0.3527900E+00, 0.3524800E+00, 0.3782200E+00, 0.3864200E+00, &
     & 0.4078300E+00, 0.4493600E+00, 0.7552600E+00, 0.1032000E+01, &
     & 0.5582103E+00, 0.5349178E+00, 0.4585122E+00, 0.4585122E+00 /
      data (ref_adm(36,iz,15,18),iz = 1,20) / &
     & 0.3439600E+00, 0.3439600E+00, 0.3203900E+00, 0.3114500E+00, &
     & 0.3090000E+00, 0.3105500E+00, 0.3151900E+00, 0.3228100E+00, &
     & 0.3282800E+00, 0.3308200E+00, 0.3408300E+00, 0.3439400E+00, &
     & 0.3708400E+00, 0.4070800E+00, 0.7150000E+00, 0.1045400E+01, &
     & 0.5323680E+00, 0.5087357E+00, 0.4418908E+00, 0.4418908E+00 /
      data (ref_adm(36,iz,16,18),iz = 1,20) / &
     & 0.3341200E+00, 0.3341200E+00, 0.3314400E+00, 0.3243800E+00, &
     & 0.3328300E+00, 0.3375300E+00, 0.3281300E+00, 0.3387500E+00, &
     & 0.3680600E+00, 0.3652900E+00, 0.3621200E+00, 0.3848900E+00, &
     & 0.4096000E+00, 0.4433500E+00, 0.6893700E+00, 0.7203000E+00, &
     & 0.5107754E+00, 0.4870552E+00, 0.4279549E+00, 0.4279549E+00 /
      data (ref_adm(36,iz,17,18),iz = 1,20) / &
     & 0.3387900E+00, 0.3387900E+00, 0.3712200E+00, 0.3475600E+00, &
     & 0.3419700E+00, 0.3373500E+00, 0.3362700E+00, 0.3743800E+00, &
     & 0.4062100E+00, 0.4093400E+00, 0.4013100E+00, 0.3995700E+00, &
     & 0.5925800E+00, 0.5417900E+00, 0.6280600E+00, 0.4985510E+00, &
     & 0.4924466E+00, 0.4690145E+00, 0.4167020E+00, 0.4167020E+00 /
      data (ref_adm(36,iz,18,18),iz = 1,20) / &
     & 0.3416800E+00, 0.3416800E+00, 0.3465500E+00, 0.3546200E+00, &
     & 0.3446600E+00, 0.3380300E+00, 0.3438300E+00, 0.3661800E+00, &
     & 0.4002100E+00, 0.4147300E+00, 0.3829100E+00, 0.3602800E+00, &
     & 0.6024900E+00, 0.4862400E+00, 0.7439400E+00, 0.6361497E+00, &
     & 0.7338185E+00, 0.9154815E+00, 0.1385572E+01, 0.1385572E+01 /
      data (ref_adm(36,iz,19,18),iz = 1,20) / &
     & 0.3767200E+00, 0.3767200E+00, 0.3783100E+00, 0.3679300E+00, &
     & 0.3627900E+00, 0.3402800E+00, 0.3552300E+00, 0.3633700E+00, &
     & 0.3902500E+00, 0.3823900E+00, 0.3732600E+00, 0.3665000E+00, &
     & 0.4321500E+00, 0.4035600E+00, 0.4604500E+00, 0.6161681E+00, &
     & 0.7079719E+00, 0.8813552E+00, 0.1348681E+01, 0.1348681E+01 /
      data (ref_adm(36,iz,20,18),iz = 1,20) / &
     & 0.4147000E+00, 0.4147000E+00, 0.3851800E+00, 0.3659800E+00, &
     & 0.3522800E+00, 0.3609900E+00, 0.3620000E+00, 0.3821300E+00, &
     & 0.3928900E+00, 0.3876600E+00, 0.3940000E+00, 0.3916500E+00, &
     & 0.4690500E+00, 0.4373300E+00, 0.4564700E+00, 0.6032927E+00, &
     & 0.6915708E+00, 0.8597150E+00, 0.1331734E+01, 0.1331734E+01 /
      data (ref_adm(36,iz,21,18),iz = 1,20) / &
     & 0.4046600E+00, 0.4046600E+00, 0.3609000E+00, 0.3264300E+00, &
     & 0.3369200E+00, 0.3416900E+00, 0.3598800E+00, 0.3892400E+00, &
     & 0.3827900E+00, 0.3995900E+00, 0.4304400E+00, 0.3965500E+00, &
     & 0.4629100E+00, 0.4664300E+00, 0.4528400E+00, 0.5942634E+00, &
     & 0.6805525E+00, 0.8465639E+00, 0.1329387E+01, 0.1329387E+01 /
      data (ref_adm(36,iz,22,18),iz = 1,20) / &
     & 0.3663200E+00, 0.3663200E+00, 0.3482500E+00, 0.3417200E+00, &
     & 0.3362200E+00, 0.3405200E+00, 0.3509800E+00, 0.3882000E+00, &
     & 0.3822400E+00, 0.3731200E+00, 0.3966100E+00, 0.4154100E+00, &
     & 0.5188300E+00, 0.4545700E+00, 0.4568600E+00, 0.6656139E+00, &
     & 0.7502908E+00, 0.9076346E+00, 0.1351731E+01, 0.1351731E+01 /
      data (ref_adm(36,iz,23,18),iz = 1,20) / &
     & 0.3532200E+00, 0.3532200E+00, 0.3364300E+00, 0.3582400E+00, &
     & 0.3647900E+00, 0.3563900E+00, 0.3697800E+00, 0.4207000E+00, &
     & 0.4248500E+00, 0.4199300E+00, 0.4016000E+00, 0.4418300E+00, &
     & 0.4837100E+00, 0.4931400E+00, 0.5348800E+00, 0.6595030E+00, &
     & 0.7430130E+00, 0.9013089E+00, 0.1370598E+01, 0.1370598E+01 /
      data (ref_adm(36,iz,24,18),iz = 1,20) / &
     & 0.3556300E+00, 0.3556300E+00, 0.3509800E+00, 0.3521100E+00, &
     & 0.3559800E+00, 0.3536500E+00, 0.3688000E+00, 0.3796200E+00, &
     & 0.3984400E+00, 0.4084200E+00, 0.4321200E+00, 0.4743500E+00, &
     & 0.5367800E+00, 0.6201900E+00, 0.6790400E+00, 0.6575109E+00, &
     & 0.7418458E+00, 0.9023321E+00, 0.1403348E+01, 0.1403348E+01 /
      data (ref_adm(36,iz,25,18),iz = 1,20) / &
     & 0.3483700E+00, 0.3483700E+00, 0.3477000E+00, 0.3762200E+00, &
     & 0.3853000E+00, 0.3914200E+00, 0.4166700E+00, 0.4324100E+00, &
     & 0.4432000E+00, 0.4277600E+00, 0.4517600E+00, 0.4805400E+00, &
     & 0.5444600E+00, 0.6141300E+00, 0.6264200E+00, 0.6588297E+00, &
     & 0.7452179E+00, 0.9106393E+00, 0.1447305E+01, 0.1447305E+01 /
      data (ref_adm(36,iz,26,18),iz = 1,20) / &
     & 0.3490400E+00, 0.3490400E+00, 0.3440200E+00, 0.3555700E+00, &
     & 0.3863700E+00, 0.3723500E+00, 0.3890100E+00, 0.3844300E+00, &
     & 0.4086300E+00, 0.3976700E+00, 0.4223400E+00, 0.4680300E+00, &
     & 0.5309700E+00, 0.5498300E+00, 0.5481100E+00, 0.6670300E+00, &
     & 0.7567234E+00, 0.9302767E+00, 0.1506909E+01, 0.1506909E+01 /
      data (ref_adm(36,iz,27,18),iz = 1,20) / &
     & 0.3501800E+00, 0.3501800E+00, 0.3594800E+00, 0.3417000E+00, &
     & 0.3708000E+00, 0.3632900E+00, 0.3810300E+00, 0.3903200E+00, &
     & 0.4056400E+00, 0.4402200E+00, 0.4821600E+00, 0.4804900E+00, &
     & 0.5347100E+00, 0.5959300E+00, 0.6515900E+00, 0.6790524E+00, &
     & 0.7690500E+00, 0.9553758E+00, 0.1574949E+01, 0.1574949E+01 /
      data (ref_adm(36,iz,28,18),iz = 1,20) / &
     & 0.3417900E+00, 0.3417900E+00, 0.3349000E+00, 0.3467200E+00, &
     & 0.3300400E+00, 0.3486800E+00, 0.3722400E+00, 0.3973900E+00, &
     & 0.4519400E+00, 0.4943300E+00, 0.4812500E+00, 0.4983100E+00, &
     & 0.5689400E+00, 0.6535600E+00, 0.6803700E+00, 0.7574200E+00, &
     & 0.9993400E+00, 0.9858285E+00, 0.1648673E+01, 0.1648673E+01 /
      data (ref_adm(36,iz,29,18),iz = 1,20) / &
     & 0.3521200E+00, 0.3521200E+00, 0.3435700E+00, 0.3299900E+00, &
     & 0.3470600E+00, 0.3700200E+00, 0.3999600E+00, 0.4033900E+00, &
     & 0.4562900E+00, 0.4800800E+00, 0.4647100E+00, 0.4943000E+00, &
     & 0.5697500E+00, 0.6510400E+00, 0.7259900E+00, 0.7395400E+00, &
     & 0.8202544E+00, 0.1029177E+01, 0.1732473E+01, 0.1732473E+01 /
      data (ref_adm(36,iz,30,18),iz = 1,20) / &
     & 0.3398800E+00, 0.3398800E+00, 0.3225200E+00, 0.3449400E+00, &
     & 0.3630900E+00, 0.3997700E+00, 0.3952600E+00, 0.4225200E+00, &
     & 0.4435000E+00, 0.4750500E+00, 0.5328700E+00, 0.5565600E+00, &
     & 0.6399400E+00, 0.6749100E+00, 0.7817600E+00, 0.9191900E+00, &
     & 0.8537669E+00, 0.1076111E+01, 0.1819736E+01, 0.1819736E+01 /
      data (ref_adm(36,iz,31,18),iz = 1,20) / &
     & 0.3530400E+00, 0.3530400E+00, 0.3348200E+00, 0.3426900E+00, &
     & 0.3913700E+00, 0.3812400E+00, 0.4016100E+00, 0.3995600E+00, &
     & 0.4640900E+00, 0.5250600E+00, 0.5565400E+00, 0.5235300E+00, &
     & 0.6688200E+00, 0.7469600E+00, 0.8598600E+00, 0.8588800E+00, &
     & 0.8759519E+00, 0.1109372E+01, 0.1893360E+01, 0.1893360E+01 /
      data (ref_adm(36,iz,32,18),iz = 1,20) / &
     & 0.3769300E+00, 0.3769300E+00, 0.3648300E+00, 0.3845700E+00, &
     & 0.3907400E+00, 0.4099600E+00, 0.4166000E+00, 0.4506700E+00, &
     & 0.4848000E+00, 0.5072200E+00, 0.5832500E+00, 0.6540400E+00, &
     & 0.7666400E+00, 0.9574000E+00, 0.9844000E+00, 0.1055200E+01, &
     & 0.9034222E+00, 0.1150318E+01, 0.1970557E+01, 0.1970557E+01 /
      data (ref_adm(36,iz,33,18),iz = 1,20) / &
     & 0.3384800E+00, 0.3384800E+00, 0.3741300E+00, 0.3689600E+00, &
     & 0.3852100E+00, 0.4017900E+00, 0.4155900E+00, 0.4509300E+00, &
     & 0.4968700E+00, 0.5246800E+00, 0.5561300E+00, 0.6044000E+00, &
     & 0.6397900E+00, 0.6916600E+00, 0.7699900E+00, 0.8290600E+00, &
     & 0.8976500E+00, 0.1171354E+01, 0.2027920E+01, 0.2027920E+01 /
      data (ref_adm(36,iz,34,18),iz = 1,20) / &
     & 0.3492800E+00, 0.3492800E+00, 0.3580800E+00, 0.3601900E+00, &
     & 0.3810600E+00, 0.3755500E+00, 0.3939800E+00, 0.4456400E+00, &
     & 0.4535800E+00, 0.5356000E+00, 0.6039500E+00, 0.6224400E+00, &
     & 0.6645600E+00, 0.7989200E+00, 0.1000100E+01, 0.1088800E+01, &
     & 0.1585400E+01, 0.1165753E+01, 0.2055473E+01, 0.2055473E+01 /
      data (ref_adm(36,iz,35,18),iz = 1,20) / &
     & 0.3590600E+00, 0.3590600E+00, 0.3578400E+00, 0.3901900E+00, &
     & 0.3977600E+00, 0.3962500E+00, 0.4093200E+00, 0.4262000E+00, &
     & 0.4656100E+00, 0.5021500E+00, 0.5347400E+00, 0.5969800E+00, &
     & 0.6707300E+00, 0.7757900E+00, 0.9986100E+00, 0.1206600E+01, &
     & 0.9143243E+00, 0.1169683E+01, 0.2083772E+01, 0.2083772E+01 /
      data (ref_adm(36,iz,36,18),iz = 1,20) / &
     & 0.3509100E+00, 0.3509100E+00, 0.3869800E+00, 0.3940000E+00, &
     & 0.3991700E+00, 0.4401800E+00, 0.4206900E+00, 0.4136600E+00, &
     & 0.4552600E+00, 0.4806200E+00, 0.5568800E+00, 0.6151000E+00, &
     & 0.7034100E+00, 0.8591300E+00, 0.1040800E+01, 0.1109400E+01, &
     & 0.1061700E+01, 0.1188468E+01, 0.2116397E+01, 0.2116397E+01 /
      data (ref_adm(36,iz,37,18),iz = 1,20) / &
     & 0.3574900E+00, 0.3574900E+00, 0.3834800E+00, 0.4487200E+00, &
     & 0.4556300E+00, 0.4289400E+00, 0.4215700E+00, 0.4261900E+00, &
     & 0.4425200E+00, 0.4482600E+00, 0.5481100E+00, 0.6472700E+00, &
     & 0.7147100E+00, 0.8411100E+00, 0.1319000E+01, 0.8565100E+00, &
     & 0.9295415E+00, 0.1253023E+01, 0.2171245E+01, 0.2171245E+01 /
      data (ref_adm(36,iz,38,18),iz = 1,20) / &
     & 0.3574900E+00, 0.3574900E+00, 0.3834800E+00, 0.4487200E+00, &
     & 0.4556300E+00, 0.4289400E+00, 0.4215700E+00, 0.4261900E+00, &
     & 0.4425200E+00, 0.4482600E+00, 0.5481100E+00, 0.6472700E+00, &
     & 0.7147100E+00, 0.8411100E+00, 0.1319000E+01, 0.8565100E+00, &
     & 0.9295415E+00, 0.1253023E+01, 0.2171245E+01, 0.2171245E+01 /
! Solar Zenith Angle  0.0 Albedo -0.9999000E+04
      data (ref_adm(37,iz, 1, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 2, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 3, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 4, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 5, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 6, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 7, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 8, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 9, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,10, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,11, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,12, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,13, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,14, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,15, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,16, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,17, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,18, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,19, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,20, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,21, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,22, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,23, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,24, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,25, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,26, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,27, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,28, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,29, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,30, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,31, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,32, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,33, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,34, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,35, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,36, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,37, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,38, 1),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle  5.0 Albedo -0.9999000E+04
      data (ref_adm(37,iz, 1, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 2, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 3, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 4, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 5, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 6, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 7, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 8, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 9, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,10, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,11, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,12, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,13, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,14, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,15, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,16, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,17, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,18, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,19, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,20, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,21, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,22, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,23, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,24, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,25, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,26, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,27, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,28, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,29, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,30, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,31, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,32, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,33, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,34, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,35, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,36, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,37, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,38, 2),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 10.0 Albedo -0.9999000E+04
      data (ref_adm(37,iz, 1, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 2, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 3, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 4, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 5, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 6, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 7, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 8, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 9, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,10, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,11, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,12, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,13, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,14, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,15, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,16, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,17, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,18, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,19, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,20, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,21, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,22, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,23, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,24, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,25, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,26, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,27, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,28, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,29, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,30, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,31, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,32, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,33, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,34, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,35, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,36, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,37, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,38, 3),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 15.0 Albedo -0.9999000E+04
      data (ref_adm(37,iz, 1, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 2, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 3, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 4, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 5, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 6, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 7, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 8, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 9, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,10, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,11, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,12, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,13, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,14, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,15, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,16, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,17, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,18, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,19, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,20, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,21, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,22, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,23, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,24, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,25, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,26, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,27, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,28, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,29, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,30, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,31, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,32, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,33, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,34, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,35, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,36, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,37, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,38, 4),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 20.0 Albedo -0.9999000E+04
      data (ref_adm(37,iz, 1, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 2, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 3, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 4, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 5, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 6, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 7, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 8, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 9, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,10, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,11, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,12, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,13, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,14, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,15, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,16, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,17, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,18, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,19, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,20, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,21, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,22, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,23, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,24, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,25, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,26, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,27, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,28, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,29, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,30, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,31, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,32, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,33, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,34, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,35, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,36, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,37, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,38, 5),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 25.0 Albedo -0.9999000E+04
      data (ref_adm(37,iz, 1, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 2, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 3, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 4, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 5, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 6, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 7, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 8, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 9, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,10, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,11, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,12, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,13, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,14, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,15, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,16, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,17, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,18, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,19, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,20, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,21, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,22, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,23, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,24, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,25, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,26, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,27, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,28, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,29, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,30, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,31, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,32, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,33, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,34, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,35, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,36, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,37, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,38, 6),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 30.0 Albedo -0.9999000E+04
      data (ref_adm(37,iz, 1, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 2, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 3, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 4, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 5, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 6, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 7, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 8, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz, 9, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,10, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,11, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,12, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,13, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,14, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,15, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,16, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,17, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,18, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,19, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,20, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,21, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,22, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,23, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,24, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,25, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,26, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,27, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,28, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,29, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,30, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,31, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,32, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,33, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,34, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,35, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,36, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,37, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
      data (ref_adm(37,iz,38, 7),iz = 1,20) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04 /
! Solar Zenith Angle 35.0 Albedo  0.5573317E+00
      data (ref_adm(37,iz, 1, 8),iz = 1,20) / &
     & 0.6162448E+00, 0.6162448E+00, 0.6052170E+00, 0.6013969E+00, &
     & 0.5983775E+00, 0.5963125E+00, 0.5926725E+00, 0.5864713E+00, &
     & 0.5785062E+00, 0.5689687E+00, 0.5585954E+00, 0.5441937E+00, &
     & 0.5273841E+00, 0.5115551E+00, 0.4888235E+00, 0.4588887E+00, &
     & 0.4280057E+00, 0.3875983E+00, 0.3162502E+00, 0.3162502E+00 /
      data (ref_adm(37,iz, 2, 8),iz = 1,20) / &
     & 0.6162448E+00, 0.6162448E+00, 0.6052170E+00, 0.6013969E+00, &
     & 0.5983775E+00, 0.5963125E+00, 0.5926725E+00, 0.5864713E+00, &
     & 0.5785062E+00, 0.5689687E+00, 0.5585954E+00, 0.5441937E+00, &
     & 0.5273841E+00, 0.5115551E+00, 0.4888235E+00, 0.4588887E+00, &
     & 0.4280057E+00, 0.3875983E+00, 0.3162502E+00, 0.3162502E+00 /
      data (ref_adm(37,iz, 3, 8),iz = 1,20) / &
     & 0.6162448E+00, 0.6162448E+00, 0.4139800E+00, 0.6013969E+00, &
     & 0.5983775E+00, 0.5963125E+00, 0.5926725E+00, 0.5864711E+00, &
     & 0.5785062E+00, 0.5689687E+00, 0.5585954E+00, 0.5441937E+00, &
     & 0.5273841E+00, 0.5115551E+00, 0.4888235E+00, 0.4588887E+00, &
     & 0.4280057E+00, 0.3875983E+00, 0.3162502E+00, 0.3162502E+00 /
      data (ref_adm(37,iz, 4, 8),iz = 1,20) / &
     & 0.6162448E+00, 0.6162448E+00, 0.6052170E+00, 0.6013969E+00, &
     & 0.5983775E+00, 0.5963125E+00, 0.5926725E+00, 0.5864713E+00, &
     & 0.5785062E+00, 0.5689687E+00, 0.5585954E+00, 0.5441937E+00, &
     & 0.5273841E+00, 0.5115551E+00, 0.4888235E+00, 0.4588887E+00, &
     & 0.4280057E+00, 0.3875983E+00, 0.3162502E+00, 0.3162502E+00 /
      data (ref_adm(37,iz, 5, 8),iz = 1,20) / &
     & 0.6162448E+00, 0.6162448E+00, 0.6052170E+00, 0.6013969E+00, &
     & 0.5983775E+00, 0.5963125E+00, 0.5926725E+00, 0.5864711E+00, &
     & 0.5785062E+00, 0.5689687E+00, 0.5585954E+00, 0.5441937E+00, &
     & 0.5273841E+00, 0.5115551E+00, 0.4888235E+00, 0.4588887E+00, &
     & 0.4280057E+00, 0.3875983E+00, 0.3162502E+00, 0.3162502E+00 /
      data (ref_adm(37,iz, 6, 8),iz = 1,20) / &
     & 0.6162448E+00, 0.6162448E+00, 0.6052170E+00, 0.6013969E+00, &
     & 0.5983775E+00, 0.5963125E+00, 0.5926725E+00, 0.5864713E+00, &
     & 0.5785062E+00, 0.5689687E+00, 0.5585954E+00, 0.5441937E+00, &
     & 0.5273841E+00, 0.5115551E+00, 0.4888235E+00, 0.4588887E+00, &
     & 0.4280057E+00, 0.3875983E+00, 0.3162502E+00, 0.3162502E+00 /
      data (ref_adm(37,iz, 7, 8),iz = 1,20) / &
     & 0.6157400E+00, 0.6157400E+00, 0.6052170E+00, 0.6013969E+00, &
     & 0.5983775E+00, 0.5963125E+00, 0.5926725E+00, 0.5864711E+00, &
     & 0.5785062E+00, 0.5689687E+00, 0.5585954E+00, 0.5441937E+00, &
     & 0.5273841E+00, 0.5115551E+00, 0.4888235E+00, 0.4588887E+00, &
     & 0.4280057E+00, 0.3875983E+00, 0.3162502E+00, 0.3162502E+00 /
      data (ref_adm(37,iz, 8, 8),iz = 1,20) / &
     & 0.6162448E+00, 0.6162448E+00, 0.6052170E+00, 0.6013969E+00, &
     & 0.5983775E+00, 0.5963125E+00, 0.5926725E+00, 0.5864713E+00, &
     & 0.5785062E+00, 0.5689687E+00, 0.5585954E+00, 0.5441937E+00, &
     & 0.5273841E+00, 0.5115551E+00, 0.4888235E+00, 0.4588887E+00, &
     & 0.4280057E+00, 0.3875983E+00, 0.3162502E+00, 0.3162502E+00 /
      data (ref_adm(37,iz, 9, 8),iz = 1,20) / &
     & 0.6400200E+00, 0.6400200E+00, 0.6052170E+00, 0.6013969E+00, &
     & 0.6180900E+00, 0.6337900E+00, 0.5926725E+00, 0.5864711E+00, &
     & 0.5785062E+00, 0.5689687E+00, 0.5585954E+00, 0.5441937E+00, &
     & 0.5273841E+00, 0.5115551E+00, 0.4888235E+00, 0.4588887E+00, &
     & 0.4280057E+00, 0.3875983E+00, 0.3162502E+00, 0.3162502E+00 /
      data (ref_adm(37,iz,10, 8),iz = 1,20) / &
     & 0.6323000E+00, 0.6323000E+00, 0.6296100E+00, 0.5981500E+00, &
     & 0.5894900E+00, 0.5817400E+00, 0.5926725E+00, 0.5864713E+00, &
     & 0.5785062E+00, 0.5689687E+00, 0.5585954E+00, 0.5441937E+00, &
     & 0.5273841E+00, 0.5115551E+00, 0.4888235E+00, 0.4588887E+00, &
     & 0.4280057E+00, 0.3875983E+00, 0.3162502E+00, 0.3162502E+00 /
      data (ref_adm(37,iz,11, 8),iz = 1,20) / &
     & 0.6162448E+00, 0.6162448E+00, 0.6264200E+00, 0.5797700E+00, &
     & 0.5688600E+00, 0.5963125E+00, 0.5926725E+00, 0.5864711E+00, &
     & 0.5785062E+00, 0.5689687E+00, 0.5585954E+00, 0.5441937E+00, &
     & 0.5273841E+00, 0.5115551E+00, 0.4888235E+00, 0.4588887E+00, &
     & 0.4280057E+00, 0.3875983E+00, 0.3162502E+00, 0.3162502E+00 /
      data (ref_adm(37,iz,12, 8),iz = 1,20) / &
     & 0.5928200E+00, 0.5928200E+00, 0.6041200E+00, 0.6196700E+00, &
     & 0.5444500E+00, 0.5963125E+00, 0.5926725E+00, 0.5864713E+00, &
     & 0.5785062E+00, 0.5689687E+00, 0.5585954E+00, 0.5441937E+00, &
     & 0.5273841E+00, 0.5115551E+00, 0.4888235E+00, 0.4588887E+00, &
     & 0.4280057E+00, 0.3875983E+00, 0.3162502E+00, 0.3162502E+00 /
      data (ref_adm(37,iz,13, 8),iz = 1,20) / &
     & 0.6105300E+00, 0.6105300E+00, 0.6390400E+00, 0.6013969E+00, &
     & 0.6280800E+00, 0.6357400E+00, 0.6046900E+00, 0.5864711E+00, &
     & 0.5785062E+00, 0.5689687E+00, 0.5585954E+00, 0.5441937E+00, &
     & 0.5273841E+00, 0.5115551E+00, 0.4888235E+00, 0.4588887E+00, &
     & 0.4280057E+00, 0.3875983E+00, 0.3162502E+00, 0.3162502E+00 /
      data (ref_adm(37,iz,14, 8),iz = 1,20) / &
     & 0.6558200E+00, 0.6558200E+00, 0.6052170E+00, 0.6013969E+00, &
     & 0.6238300E+00, 0.6399000E+00, 0.5976100E+00, 0.6024900E+00, &
     & 0.5785300E+00, 0.5689687E+00, 0.5585954E+00, 0.5441937E+00, &
     & 0.5273841E+00, 0.5115551E+00, 0.4888235E+00, 0.4588887E+00, &
     & 0.4280057E+00, 0.3875983E+00, 0.3162502E+00, 0.3162502E+00 /
      data (ref_adm(37,iz,15, 8),iz = 1,20) / &
     & 0.6043200E+00, 0.6043200E+00, 0.6052170E+00, 0.6013969E+00, &
     & 0.5983775E+00, 0.5963125E+00, 0.5926725E+00, 0.6155200E+00, &
     & 0.5899200E+00, 0.5689687E+00, 0.5585954E+00, 0.5441937E+00, &
     & 0.5273841E+00, 0.5115551E+00, 0.4888235E+00, 0.4588887E+00, &
     & 0.4280057E+00, 0.3875983E+00, 0.3162502E+00, 0.3162502E+00 /
      data (ref_adm(37,iz,16, 8),iz = 1,20) / &
     & 0.5638200E+00, 0.5638200E+00, 0.5686400E+00, 0.6013969E+00, &
     & 0.5983775E+00, 0.5963125E+00, 0.5926725E+00, 0.5864713E+00, &
     & 0.6012500E+00, 0.5689687E+00, 0.5585954E+00, 0.5441937E+00, &
     & 0.5273841E+00, 0.5115551E+00, 0.4888235E+00, 0.4588887E+00, &
     & 0.4280057E+00, 0.3875983E+00, 0.3162502E+00, 0.3162502E+00 /
      data (ref_adm(37,iz,17, 8),iz = 1,20) / &
     & 0.6162448E+00, 0.6162448E+00, 0.6052170E+00, 0.5825600E+00, &
     & 0.5983775E+00, 0.5963125E+00, 0.5926725E+00, 0.5864711E+00, &
     & 0.5785062E+00, 0.5689687E+00, 0.5585954E+00, 0.5441937E+00, &
     & 0.5273841E+00, 0.5115551E+00, 0.4888235E+00, 0.4588887E+00, &
     & 0.4280057E+00, 0.3875983E+00, 0.3162502E+00, 0.3162502E+00 /
      data (ref_adm(37,iz,18, 8),iz = 1,20) / &
     & 0.6079532E+00, 0.6079532E+00, 0.6020073E+00, 0.6008216E+00, &
     & 0.5594000E+00, 0.6106880E+00, 0.6081099E+00, 0.6014475E+00, &
     & 0.5944491E+00, 0.5877414E+00, 0.5816516E+00, 0.5747474E+00, &
     & 0.5655881E+00, 0.5574716E+00, 0.5446311E+00, 0.5238758E+00, &
     & 0.4973298E+00, 0.4508904E+00, 0.3556260E+00, 0.3556260E+00 /
      data (ref_adm(37,iz,19, 8),iz = 1,20) / &
     & 0.6083671E+00, 0.6083671E+00, 0.6025809E+00, 0.6010366E+00, &
     & 0.6044496E+00, 0.5619000E+00, 0.6091297E+00, 0.6020486E+00, &
     & 0.5944389E+00, 0.5879743E+00, 0.5819570E+00, 0.5746103E+00, &
     & 0.5653173E+00, 0.5566353E+00, 0.5442644E+00, 0.5233245E+00, &
     & 0.4967990E+00, 0.4503895E+00, 0.3553352E+00, 0.3553352E+00 /
      data (ref_adm(37,iz,20, 8),iz = 1,20) / &
     & 0.6088560E+00, 0.6088560E+00, 0.6022748E+00, 0.6004611E+00, &
     & 0.6035755E+00, 0.6099683E+00, 0.6503500E+00, 0.6522200E+00, &
     & 0.5954135E+00, 0.5882596E+00, 0.5819557E+00, 0.5742709E+00, &
     & 0.5650395E+00, 0.5562003E+00, 0.5434959E+00, 0.5226595E+00, &
     & 0.4956602E+00, 0.4495194E+00, 0.3550086E+00, 0.3550086E+00 /
      data (ref_adm(37,iz,21, 8),iz = 1,20) / &
     & 0.6087517E+00, 0.6087517E+00, 0.6024778E+00, 0.6005517E+00, &
     & 0.6027233E+00, 0.6096328E+00, 0.6093764E+00, 0.6025953E+00, &
     & 0.5958946E+00, 0.5887007E+00, 0.5821888E+00, 0.5743425E+00, &
     & 0.5646637E+00, 0.5562028E+00, 0.5428140E+00, 0.5219103E+00, &
     & 0.4951294E+00, 0.4488023E+00, 0.3547836E+00, 0.3547836E+00 /
      data (ref_adm(37,iz,22, 8),iz = 1,20) / &
     & 0.6030953E+00, 0.6030953E+00, 0.6019160E+00, 0.6013332E+00, &
     & 0.6026382E+00, 0.6049812E+00, 0.6029975E+00, 0.5970217E+00, &
     & 0.5899265E+00, 0.5819511E+00, 0.5741402E+00, 0.5636125E+00, &
     & 0.5518128E+00, 0.5408728E+00, 0.5256447E+00, 0.5048475E+00, &
     & 0.4802690E+00, 0.4401028E+00, 0.3529277E+00, 0.3529277E+00 /
      data (ref_adm(37,iz,23, 8),iz = 1,20) / &
     & 0.6307000E+00, 0.6307000E+00, 0.6018635E+00, 0.6006301E+00, &
     & 0.6014565E+00, 0.6039456E+00, 0.6033083E+00, 0.5974072E+00, &
     & 0.5905129E+00, 0.5820544E+00, 0.5740080E+00, 0.5630920E+00, &
     & 0.5512424E+00, 0.5396802E+00, 0.5242250E+00, 0.5033222E+00, &
     & 0.4783705E+00, 0.4385467E+00, 0.3523162E+00, 0.3523162E+00 /
      data (ref_adm(37,iz,24, 8),iz = 1,20) / &
     & 0.5871600E+00, 0.5871600E+00, 0.6016657E+00, 0.6002057E+00, &
     & 0.5873200E+00, 0.6214200E+00, 0.6032075E+00, 0.5979803E+00, &
     & 0.5908562E+00, 0.5825838E+00, 0.5740252E+00, 0.5627040E+00, &
     & 0.5506389E+00, 0.5388649E+00, 0.5229212E+00, 0.5017961E+00, &
     & 0.4768574E+00, 0.4370382E+00, 0.3517245E+00, 0.3517245E+00 /
      data (ref_adm(37,iz,25, 8),iz = 1,20) / &
     & 0.6252900E+00, 0.6252900E+00, 0.6017688E+00, 0.6000305E+00, &
     & 0.5993640E+00, 0.6014758E+00, 0.6028416E+00, 0.5986264E+00, &
     & 0.5913725E+00, 0.5830030E+00, 0.5741678E+00, 0.5624822E+00, &
     & 0.5500856E+00, 0.5381184E+00, 0.5217881E+00, 0.5002776E+00, &
     & 0.4753146E+00, 0.4356857E+00, 0.3512880E+00, 0.3512880E+00 /
      data (ref_adm(37,iz,26, 8),iz = 1,20) / &
     & 0.5828700E+00, 0.5828700E+00, 0.6015800E+00, 0.6211300E+00, &
     & 0.6150700E+00, 0.6000455E+00, 0.6021392E+00, 0.5991799E+00, &
     & 0.5917404E+00, 0.5835065E+00, 0.5742056E+00, 0.5623019E+00, &
     & 0.5494120E+00, 0.5376135E+00, 0.5208033E+00, 0.4989040E+00, &
     & 0.4740464E+00, 0.4342432E+00, 0.3508576E+00, 0.3508576E+00 /
      data (ref_adm(37,iz,27, 8),iz = 1,20) / &
     & 0.6169100E+00, 0.6169100E+00, 0.6039600E+00, 0.5879100E+00, &
     & 0.6199400E+00, 0.5987136E+00, 0.6010911E+00, 0.5993937E+00, &
     & 0.5924091E+00, 0.5839201E+00, 0.5745516E+00, 0.5622583E+00, &
     & 0.5490082E+00, 0.5370968E+00, 0.5198323E+00, 0.4977580E+00, &
     & 0.4728288E+00, 0.4331383E+00, 0.3505824E+00, 0.3505824E+00 /
      data (ref_adm(37,iz,28, 8),iz = 1,20) / &
     & 0.5909600E+00, 0.5909600E+00, 0.5954200E+00, 0.5906000E+00, &
     & 0.5906200E+00, 0.6151800E+00, 0.5999295E+00, 0.5994089E+00, &
     & 0.5929002E+00, 0.5845003E+00, 0.5747608E+00, 0.5622593E+00, &
     & 0.5484518E+00, 0.5365093E+00, 0.5192283E+00, 0.4965813E+00, &
     & 0.4715980E+00, 0.4319989E+00, 0.3503148E+00, 0.3503148E+00 /
      data (ref_adm(37,iz,29, 8),iz = 1,20) / &
     & 0.6087400E+00, 0.6087400E+00, 0.5983400E+00, 0.6002843E+00, &
     & 0.5769200E+00, 0.5721900E+00, 0.5987238E+00, 0.5991097E+00, &
     & 0.5934496E+00, 0.5849546E+00, 0.5752625E+00, 0.5622519E+00, &
     & 0.5482895E+00, 0.5362753E+00, 0.5186672E+00, 0.4956909E+00, &
     & 0.4705269E+00, 0.4309670E+00, 0.3500924E+00, 0.3500924E+00 /
      data (ref_adm(37,iz,30, 8),iz = 1,20) / &
     & 0.6141500E+00, 0.6141500E+00, 0.5932400E+00, 0.6006900E+00, &
     & 0.5938000E+00, 0.5965465E+00, 0.5975558E+00, 0.5984485E+00, &
     & 0.5937953E+00, 0.5853226E+00, 0.5756506E+00, 0.5623178E+00, &
     & 0.5480757E+00, 0.5355488E+00, 0.5182070E+00, 0.4949807E+00, &
     & 0.4697412E+00, 0.4302200E+00, 0.3499393E+00, 0.3499393E+00 /
      data (ref_adm(37,iz,31, 8),iz = 1,20) / &
     & 0.6165100E+00, 0.6165100E+00, 0.6033930E+00, 0.6007196E+00, &
     & 0.5982184E+00, 0.5961682E+00, 0.5967674E+00, 0.5978200E+00, &
     & 0.5940323E+00, 0.5857828E+00, 0.5759537E+00, 0.5624900E+00, &
     & 0.5480929E+00, 0.5353563E+00, 0.5177828E+00, 0.4943378E+00, &
     & 0.4688957E+00, 0.4293913E+00, 0.3498307E+00, 0.3498307E+00 /
      data (ref_adm(37,iz,32, 8),iz = 1,20) / &
     & 0.6034406E+00, 0.6034406E+00, 0.6047157E+00, 0.6018249E+00, &
     & 0.5985148E+00, 0.5963443E+00, 0.5958164E+00, 0.5970086E+00, &
     & 0.5941309E+00, 0.5861449E+00, 0.5763183E+00, 0.5625243E+00, &
     & 0.5479544E+00, 0.5350897E+00, 0.5175242E+00, 0.4938276E+00, &
     & 0.4682600E+00, 0.4288248E+00, 0.3497054E+00, 0.3497054E+00 /
      data (ref_adm(37,iz,33, 8),iz = 1,20) / &
     & 0.6035421E+00, 0.6035421E+00, 0.6064671E+00, 0.6034675E+00, &
     & 0.5991777E+00, 0.5961496E+00, 0.5953427E+00, 0.5962381E+00, &
     & 0.5940972E+00, 0.5863770E+00, 0.5765101E+00, 0.5627509E+00, &
     & 0.5479447E+00, 0.5350109E+00, 0.5172475E+00, 0.4932659E+00, &
     & 0.4677443E+00, 0.4282913E+00, 0.3496962E+00, 0.3496962E+00 /
      data (ref_adm(37,iz,34, 8),iz = 1,20) / &
     & 0.6035957E+00, 0.6035957E+00, 0.6088315E+00, 0.6063492E+00, &
     & 0.6002802E+00, 0.5962794E+00, 0.5950726E+00, 0.5955710E+00, &
     & 0.5939178E+00, 0.5867097E+00, 0.5768282E+00, 0.5630490E+00, &
     & 0.5479488E+00, 0.5348924E+00, 0.5171118E+00, 0.4931363E+00, &
     & 0.4672968E+00, 0.4278399E+00, 0.3496274E+00, 0.3496274E+00 /
      data (ref_adm(37,iz,35, 8),iz = 1,20) / &
     & 0.6034986E+00, 0.6034986E+00, 0.6111093E+00, 0.6109725E+00, &
     & 0.6020456E+00, 0.5963608E+00, 0.5945345E+00, 0.5951829E+00, &
     & 0.5936927E+00, 0.5868905E+00, 0.5770003E+00, 0.5630600E+00, &
     & 0.5479326E+00, 0.5348489E+00, 0.5168465E+00, 0.4928771E+00, &
     & 0.4668027E+00, 0.4274865E+00, 0.3496312E+00, 0.3496312E+00 /
      data (ref_adm(37,iz,36, 8),iz = 1,20) / &
     & 0.5956200E+00, 0.5956200E+00, 0.6146318E+00, 0.6166594E+00, &
     & 0.6045590E+00, 0.5966071E+00, 0.5945169E+00, 0.5948937E+00, &
     & 0.5936242E+00, 0.5870148E+00, 0.5771682E+00, 0.5632234E+00, &
     & 0.5479116E+00, 0.5348062E+00, 0.5167036E+00, 0.4927744E+00, &
     & 0.4665564E+00, 0.4272997E+00, 0.3496237E+00, 0.3496237E+00 /
      data (ref_adm(37,iz,37, 8),iz = 1,20) / &
     & 0.6147200E+00, 0.6147200E+00, 0.6018400E+00, 0.6396900E+00, &
     & 0.5756800E+00, 0.5965974E+00, 0.5944915E+00, 0.5946835E+00, &
     & 0.5932995E+00, 0.5871776E+00, 0.5771349E+00, 0.5631153E+00, &
     & 0.5478610E+00, 0.5350171E+00, 0.5167215E+00, 0.4926562E+00, &
     & 0.4666197E+00, 0.4272670E+00, 0.3495925E+00, 0.3495925E+00 /
      data (ref_adm(37,iz,38, 8),iz = 1,20) / &
     & 0.6147200E+00, 0.6147200E+00, 0.6018400E+00, 0.6396900E+00, &
     & 0.5756800E+00, 0.5965974E+00, 0.5944915E+00, 0.5946835E+00, &
     & 0.5932995E+00, 0.5871776E+00, 0.5771349E+00, 0.5631153E+00, &
     & 0.5478610E+00, 0.5350171E+00, 0.5167215E+00, 0.4926562E+00, &
     & 0.4666197E+00, 0.4272670E+00, 0.3495925E+00, 0.3495925E+00 /
! Solar Zenith Angle 40.0 Albedo  0.6100658E+00
      data (ref_adm(37,iz, 1, 9),iz = 1,20) / &
     & 0.5780014E+00, 0.5780014E+00, 0.5905900E+00, 0.5864887E+00, &
     & 0.5868520E+00, 0.5807568E+00, 0.5758038E+00, 0.5705395E+00, &
     & 0.5665359E+00, 0.5635914E+00, 0.5606794E+00, 0.5570764E+00, &
     & 0.5545400E+00, 0.5497578E+00, 0.5404373E+00, 0.5227132E+00, &
     & 0.4975991E+00, 0.4525310E+00, 0.3559853E+00, 0.3559853E+00 /
      data (ref_adm(37,iz, 2, 9),iz = 1,20) / &
     & 0.5780014E+00, 0.5780014E+00, 0.5905900E+00, 0.5864887E+00, &
     & 0.5868520E+00, 0.5807568E+00, 0.5758038E+00, 0.5705395E+00, &
     & 0.5665359E+00, 0.5635914E+00, 0.5606794E+00, 0.5570764E+00, &
     & 0.5545400E+00, 0.5497578E+00, 0.5404373E+00, 0.5227132E+00, &
     & 0.4975991E+00, 0.4525310E+00, 0.3559853E+00, 0.3559853E+00 /
      data (ref_adm(37,iz, 3, 9),iz = 1,20) / &
     & 0.5779681E+00, 0.5779681E+00, 0.5969200E+00, 0.5864924E+00, &
     & 0.6067400E+00, 0.5809436E+00, 0.5758080E+00, 0.5708388E+00, &
     & 0.5666376E+00, 0.5635802E+00, 0.5605488E+00, 0.5574228E+00, &
     & 0.5545669E+00, 0.5491875E+00, 0.5403715E+00, 0.5225323E+00, &
     & 0.4971721E+00, 0.4521225E+00, 0.2652115E+00, 0.2652115E+00 /
      data (ref_adm(37,iz, 4, 9),iz = 1,20) / &
     & 0.5779001E+00, 0.5779001E+00, 0.5795674E+00, 0.6238100E+00, &
     & 0.5869100E+00, 0.5812949E+00, 0.5758531E+00, 0.5704802E+00, &
     & 0.5663829E+00, 0.5635900E+00, 0.5604116E+00, 0.5572258E+00, &
     & 0.5543807E+00, 0.5492702E+00, 0.5402560E+00, 0.5224178E+00, &
     & 0.4970243E+00, 0.4518949E+00, 0.3556779E+00, 0.3556779E+00 /
      data (ref_adm(37,iz, 5, 9),iz = 1,20) / &
     & 0.5780940E+00, 0.5780940E+00, 0.6066900E+00, 0.5858500E+00, &
     & 0.5868791E+00, 0.5817071E+00, 0.5761065E+00, 0.5705998E+00, &
     & 0.5663893E+00, 0.5634934E+00, 0.5603713E+00, 0.5571687E+00, &
     & 0.5539935E+00, 0.5490387E+00, 0.5398490E+00, 0.5222728E+00, &
     & 0.4968315E+00, 0.4514708E+00, 0.3553554E+00, 0.3553554E+00 /
      data (ref_adm(37,iz, 6, 9),iz = 1,20) / &
     & 0.6366800E+00, 0.6366800E+00, 0.6279600E+00, 0.5868500E+00, &
     & 0.5503200E+00, 0.5825400E+00, 0.5763966E+00, 0.5709668E+00, &
     & 0.5665438E+00, 0.5634329E+00, 0.5603232E+00, 0.5568576E+00, &
     & 0.5535326E+00, 0.5487056E+00, 0.5392643E+00, 0.5216441E+00, &
     & 0.4962914E+00, 0.4509152E+00, 0.3550056E+00, 0.3550056E+00 /
      data (ref_adm(37,iz, 7, 9),iz = 1,20) / &
     & 0.5778916E+00, 0.5778916E+00, 0.5793777E+00, 0.5855891E+00, &
     & 0.5874261E+00, 0.5823228E+00, 0.6024500E+00, 0.5710251E+00, &
     & 0.5668099E+00, 0.5632977E+00, 0.5603476E+00, 0.5567257E+00, &
     & 0.5529624E+00, 0.5480651E+00, 0.5389032E+00, 0.5210866E+00, &
     & 0.4956785E+00, 0.4503113E+00, 0.3544477E+00, 0.3544477E+00 /
      data (ref_adm(37,iz, 8, 9),iz = 1,20) / &
     & 0.5780209E+00, 0.5780209E+00, 0.5790632E+00, 0.5856450E+00, &
     & 0.5878439E+00, 0.5825258E+00, 0.5895300E+00, 0.6190700E+00, &
     & 0.5668213E+00, 0.5630952E+00, 0.5600960E+00, 0.5561491E+00, &
     & 0.5523913E+00, 0.5479018E+00, 0.5379332E+00, 0.5199222E+00, &
     & 0.4946163E+00, 0.4492543E+00, 0.3539241E+00, 0.3539241E+00 /
      data (ref_adm(37,iz, 9, 9),iz = 1,20) / &
     & 0.5783264E+00, 0.5783264E+00, 0.5788215E+00, 0.5851241E+00, &
     & 0.5877934E+00, 0.5829061E+00, 0.5773547E+00, 0.5713091E+00, &
     & 0.5668585E+00, 0.5631918E+00, 0.5602149E+00, 0.5560676E+00, &
     & 0.5517089E+00, 0.5472875E+00, 0.5368338E+00, 0.5189419E+00, &
     & 0.4940088E+00, 0.4483776E+00, 0.3532088E+00, 0.3532088E+00 /
      data (ref_adm(37,iz,10, 9),iz = 1,20) / &
     & 0.5783474E+00, 0.5783474E+00, 0.5170500E+00, 0.5848643E+00, &
     & 0.5882879E+00, 0.6154000E+00, 0.5511000E+00, 0.5717719E+00, &
     & 0.5670199E+00, 0.5629351E+00, 0.5602823E+00, 0.5556896E+00, &
     & 0.5511131E+00, 0.5464724E+00, 0.5358864E+00, 0.5180981E+00, &
     & 0.4928677E+00, 0.4475293E+00, 0.3524587E+00, 0.3524587E+00 /
      data (ref_adm(37,iz,11, 9),iz = 1,20) / &
     & 0.2749000E+00, 0.2749000E+00, 0.5962100E+00, 0.5616400E+00, &
     & 0.5733600E+00, 0.6063500E+00, 0.5847900E+00, 0.5721672E+00, &
     & 0.5671010E+00, 0.5629662E+00, 0.5597128E+00, 0.5551153E+00, &
     & 0.5501919E+00, 0.5451897E+00, 0.5352077E+00, 0.5173571E+00, &
     & 0.4919578E+00, 0.4465722E+00, 0.3517219E+00, 0.3517219E+00 /
      data (ref_adm(37,iz,12, 9),iz = 1,20) / &
     & 0.6275600E+00, 0.6275600E+00, 0.5975100E+00, 0.6109200E+00, &
     & 0.5474900E+00, 0.3495500E+00, 0.5789509E+00, 0.5724903E+00, &
     & 0.5676320E+00, 0.5628893E+00, 0.5599063E+00, 0.5547429E+00, &
     & 0.6170300E+00, 0.5444959E+00, 0.5338671E+00, 0.5159225E+00, &
     & 0.4906996E+00, 0.4454693E+00, 0.3508407E+00, 0.3508407E+00 /
      data (ref_adm(37,iz,13, 9),iz = 1,20) / &
     & 0.5928200E+00, 0.5928200E+00, 0.5295100E+00, 0.5931300E+00, &
     & 0.5694000E+00, 0.6134700E+00, 0.5657400E+00, 0.5731552E+00, &
     & 0.5676458E+00, 0.5201900E+00, 0.4870100E+00, 0.5542898E+00, &
     & 0.5487047E+00, 0.5435484E+00, 0.5325881E+00, 0.5147043E+00, &
     & 0.4892209E+00, 0.4444188E+00, 0.3500016E+00, 0.3500016E+00 /
      data (ref_adm(37,iz,14, 9),iz = 1,20) / &
     & 0.5785169E+00, 0.5785169E+00, 0.5778731E+00, 0.5827846E+00, &
     & 0.6316100E+00, 0.6476100E+00, 0.5799778E+00, 0.5734420E+00, &
     & 0.5679460E+00, 0.5631652E+00, 0.4919500E+00, 0.5317400E+00, &
     & 0.6055900E+00, 0.5422180E+00, 0.5317144E+00, 0.5133981E+00, &
     & 0.4879663E+00, 0.4431289E+00, 0.3491068E+00, 0.3491068E+00 /
      data (ref_adm(37,iz,15, 9),iz = 1,20) / &
     & 0.5783878E+00, 0.5783878E+00, 0.5775806E+00, 0.5819116E+00, &
     & 0.5876327E+00, 0.6278200E+00, 0.6213000E+00, 0.5743060E+00, &
     & 0.5682367E+00, 0.5634172E+00, 0.5593660E+00, 0.5537689E+00, &
     & 0.6043000E+00, 0.5186700E+00, 0.5303607E+00, 0.5120548E+00, &
     & 0.4865641E+00, 0.4419407E+00, 0.3482996E+00, 0.3482996E+00 /
      data (ref_adm(37,iz,16, 9),iz = 1,20) / &
     & 0.5786143E+00, 0.5786143E+00, 0.5776283E+00, 0.5806761E+00, &
     & 0.5870557E+00, 0.5871166E+00, 0.5812689E+00, 0.5750038E+00, &
     & 0.6009500E+00, 0.5819100E+00, 0.5590671E+00, 0.5534278E+00, &
     & 0.5939800E+00, 0.5401468E+00, 0.5292543E+00, 0.5106600E+00, &
     & 0.4850882E+00, 0.4406873E+00, 0.3474944E+00, 0.3474944E+00 /
      data (ref_adm(37,iz,17, 9),iz = 1,20) / &
     & 0.5785306E+00, 0.5785306E+00, 0.5775871E+00, 0.5801911E+00, &
     & 0.5861749E+00, 0.5877554E+00, 0.5819172E+00, 0.5757872E+00, &
     & 0.5690559E+00, 0.5640909E+00, 0.5590062E+00, 0.5531706E+00, &
     & 0.5864500E+00, 0.5388695E+00, 0.5279869E+00, 0.5090197E+00, &
     & 0.4837916E+00, 0.4393072E+00, 0.3467621E+00, 0.3467621E+00 /
      data (ref_adm(37,iz,18, 9),iz = 1,20) / &
     & 0.6121817E+00, 0.6121817E+00, 0.5983018E+00, 0.5970709E+00, &
     & 0.5967937E+00, 0.5974153E+00, 0.5961201E+00, 0.5928102E+00, &
     & 0.5892676E+00, 0.5852775E+00, 0.5811933E+00, 0.5754780E+00, &
     & 0.5799800E+00, 0.5815800E+00, 0.5510083E+00, 0.5332565E+00, &
     & 0.5083725E+00, 0.4589317E+00, 0.3525645E+00, 0.3525645E+00 /
      data (ref_adm(37,iz,19, 9),iz = 1,20) / &
     & 0.6121818E+00, 0.6121818E+00, 0.5983018E+00, 0.5970709E+00, &
     & 0.5967937E+00, 0.5974153E+00, 0.5961201E+00, 0.5928101E+00, &
     & 0.5892676E+00, 0.5852775E+00, 0.5811933E+00, 0.5754780E+00, &
     & 0.5847100E+00, 0.5767400E+00, 0.5510083E+00, 0.5332565E+00, &
     & 0.5083725E+00, 0.4589317E+00, 0.3525644E+00, 0.3525644E+00 /
      data (ref_adm(37,iz,20, 9),iz = 1,20) / &
     & 0.6121817E+00, 0.6121817E+00, 0.5983018E+00, 0.5955900E+00, &
     & 0.5967937E+00, 0.5974153E+00, 0.5961201E+00, 0.5928102E+00, &
     & 0.5892676E+00, 0.5852775E+00, 0.5811933E+00, 0.5754780E+00, &
     & 0.5685613E+00, 0.5618532E+00, 0.5510083E+00, 0.5332565E+00, &
     & 0.5083725E+00, 0.4589317E+00, 0.3525645E+00, 0.3525645E+00 /
      data (ref_adm(37,iz,21, 9),iz = 1,20) / &
     & 0.6121818E+00, 0.6121818E+00, 0.5983018E+00, 0.5970709E+00, &
     & 0.5424300E+00, 0.5974153E+00, 0.5961201E+00, 0.5928101E+00, &
     & 0.5892676E+00, 0.5852775E+00, 0.5811933E+00, 0.5754780E+00, &
     & 0.5685613E+00, 0.5618532E+00, 0.5510083E+00, 0.5332565E+00, &
     & 0.5083725E+00, 0.4589317E+00, 0.3525644E+00, 0.3525644E+00 /
      data (ref_adm(37,iz,22, 9),iz = 1,20) / &
     & 0.6110394E+00, 0.6110394E+00, 0.6104707E+00, 0.6113058E+00, &
     & 0.6137151E+00, 0.6177067E+00, 0.6227101E+00, 0.6294479E+00, &
     & 0.6377036E+00, 0.6472903E+00, 0.6589647E+00, 0.6758298E+00, &
     & 0.6961260E+00, 0.7133401E+00, 0.7370151E+00, 0.7644668E+00, &
     & 0.7894332E+00, 0.8114012E+00, 0.8056535E+00, 0.8056535E+00 /
      data (ref_adm(37,iz,23, 9),iz = 1,20) / &
     & 0.6109351E+00, 0.6109351E+00, 0.6090921E+00, 0.6099755E+00, &
     & 0.6117144E+00, 0.3674200E+00, 0.6196685E+00, 0.6256972E+00, &
     & 0.6329839E+00, 0.6425236E+00, 0.6533197E+00, 0.6696074E+00, &
     & 0.6882406E+00, 0.7050648E+00, 0.7266700E+00, 0.7526686E+00, &
     & 0.7764677E+00, 0.7986627E+00, 0.8083761E+00, 0.8083761E+00 /
      data (ref_adm(37,iz,24, 9),iz = 1,20) / &
     & 0.6383100E+00, 0.6383100E+00, 0.6081893E+00, 0.6085477E+00, &
     & 0.6099125E+00, 0.6123473E+00, 0.6165010E+00, 0.6088200E+00, &
     & 0.6286288E+00, 0.6376429E+00, 0.6477068E+00, 0.6633056E+00, &
     & 0.6812206E+00, 0.6967980E+00, 0.7182130E+00, 0.7432191E+00, &
     & 0.7666583E+00, 0.7916104E+00, 0.8173105E+00, 0.8173105E+00 /
      data (ref_adm(37,iz,25, 9),iz = 1,20) / &
     & 0.6099599E+00, 0.6099599E+00, 0.6075425E+00, 0.6072225E+00, &
     & 0.6078457E+00, 0.6097589E+00, 0.6137130E+00, 0.6188073E+00, &
     & 0.6260116E+00, 0.6739300E+00, 0.6449762E+00, 0.6601216E+00, &
     & 0.6776422E+00, 0.6927769E+00, 0.7134138E+00, 0.7383913E+00, &
     & 0.7618834E+00, 0.7881926E+00, 0.8304375E+00, 0.8304375E+00 /
      data (ref_adm(37,iz,26, 9),iz = 1,20) / &
     & 0.6099632E+00, 0.6099632E+00, 0.6067802E+00, 0.6056114E+00, &
     & 0.6058174E+00, 0.6080346E+00, 0.6118680E+00, 0.6172847E+00, &
     & 0.6245619E+00, 0.6335669E+00, 0.6443520E+00, 0.6601818E+00, &
     & 0.6781225E+00, 0.6943498E+00, 0.7149884E+00, 0.7400626E+00, &
     & 0.7641745E+00, 0.7934873E+00, 0.8511190E+00, 0.8511190E+00 /
      data (ref_adm(37,iz,27, 9),iz = 1,20) / &
     & 0.5215900E+00, 0.5215900E+00, 0.5584900E+00, 0.6416700E+00, &
     & 0.6042507E+00, 0.6064614E+00, 0.6107312E+00, 0.6166436E+00, &
     & 0.6246214E+00, 0.6341977E+00, 0.6455625E+00, 0.6611630E+00, &
     & 0.6793105E+00, 0.6955987E+00, 0.7175338E+00, 0.7432999E+00, &
     & 0.7699558E+00, 0.8034254E+00, 0.8765257E+00, 0.8765257E+00 /
      data (ref_adm(37,iz,28, 9),iz = 1,20) / &
     & 0.5865300E+00, 0.5865300E+00, 0.6054060E+00, 0.5681800E+00, &
     & 0.6445200E+00, 0.6016300E+00, 0.6050000E+00, 0.6253400E+00, &
     & 0.6728500E+00, 0.6350375E+00, 0.6460132E+00, 0.6635674E+00, &
     & 0.6835342E+00, 0.7009327E+00, 0.7237698E+00, 0.7519956E+00, &
     & 0.7800733E+00, 0.8168982E+00, 0.9038531E+00, 0.9038531E+00 /
      data (ref_adm(37,iz,29, 9),iz = 1,20) / &
     & 0.6030400E+00, 0.6030400E+00, 0.6018500E+00, 0.6020629E+00, &
     & 0.6024849E+00, 0.6052133E+00, 0.6102035E+00, 0.6377300E+00, &
     & 0.6413900E+00, 0.6859500E+00, 0.6974500E+00, 0.6688678E+00, &
     & 0.6899090E+00, 0.7087749E+00, 0.7333801E+00, 0.7639891E+00, &
     & 0.7943677E+00, 0.8355616E+00, 0.9349445E+00, 0.9349445E+00 /
      data (ref_adm(37,iz,30, 9),iz = 1,20) / &
     & 0.6092699E+00, 0.6092699E+00, 0.6041264E+00, 0.6013816E+00, &
     & 0.6017391E+00, 0.6049159E+00, 0.6108108E+00, 0.6178544E+00, &
     & 0.6275982E+00, 0.6398757E+00, 0.6538992E+00, 0.6746890E+00, &
     & 0.6995443E+00, 0.7200935E+00, 0.7475370E+00, 0.7811792E+00, &
     & 0.8149342E+00, 0.8595352E+00, 0.9675154E+00, 0.9675154E+00 /
      data (ref_adm(37,iz,31, 9),iz = 1,20) / &
     & 0.6090624E+00, 0.6090624E+00, 0.6035277E+00, 0.6006133E+00, &
     & 0.6011741E+00, 0.6356500E+00, 0.6402500E+00, 0.6317200E+00, &
     & 0.6105900E+00, 0.6427985E+00, 0.6589940E+00, 0.6830372E+00, &
     & 0.7094573E+00, 0.7319435E+00, 0.7625942E+00, 0.7982430E+00, &
     & 0.8353412E+00, 0.8851883E+00, 0.1001329E+01, 0.1001329E+01 /
      data (ref_adm(37,iz,32, 9),iz = 1,20) / &
     & 0.6306200E+00, 0.6306200E+00, 0.6030559E+00, 0.5999403E+00, &
     & 0.6155400E+00, 0.6262700E+00, 0.6114005E+00, 0.6249500E+00, &
     & 0.6070400E+00, 0.6470186E+00, 0.6653677E+00, 0.6909645E+00, &
     & 0.7198564E+00, 0.7449508E+00, 0.7775865E+00, 0.8164703E+00, &
     & 0.8571608E+00, 0.9118450E+00, 0.1033134E+01, 0.1033134E+01 /
      data (ref_adm(37,iz,33, 9),iz = 1,20) / &
     & 0.6314500E+00, 0.6314500E+00, 0.6026278E+00, 0.6179000E+00, &
     & 0.6179900E+00, 0.6051039E+00, 0.6115834E+00, 0.6220799E+00, &
     & 0.6347172E+00, 0.6515012E+00, 0.6709366E+00, 0.6986923E+00, &
     & 0.7295943E+00, 0.7525321E+00, 0.7802747E+00, 0.8161820E+00, &
     & 0.8592983E+00, 0.9248454E+00, 0.1062279E+01, 0.1062279E+01 /
      data (ref_adm(37,iz,34, 9),iz = 1,20) / &
     & 0.6332300E+00, 0.6332300E+00, 0.6181500E+00, 0.6115600E+00, &
     & 0.6006452E+00, 0.6054542E+00, 0.6119686E+00, 0.6230399E+00, &
     & 0.6369641E+00, 0.6555701E+00, 0.6757113E+00, 0.7055540E+00, &
     & 0.7306348E+00, 0.7459968E+00, 0.7685537E+00, 0.8027386E+00, &
     & 0.8449970E+00, 0.9142165E+00, 0.1074821E+01, 0.1074821E+01 /
      data (ref_adm(37,iz,35, 9),iz = 1,20) / &
     & 0.5983800E+00, 0.5983800E+00, 0.6020151E+00, 0.5991177E+00, &
     & 0.6008824E+00, 0.6058175E+00, 0.6127478E+00, 0.6240730E+00, &
     & 0.6397480E+00, 0.6588215E+00, 0.6803408E+00, 0.7079869E+00, &
     & 0.7243105E+00, 0.7376878E+00, 0.7622096E+00, 0.8007343E+00, &
     & 0.8428785E+00, 0.9071234E+00, 0.1079355E+01, 0.1079355E+01 /
      data (ref_adm(37,iz,36, 9),iz = 1,20) / &
     & 0.6026300E+00, 0.6026300E+00, 0.6018121E+00, 0.5988854E+00, &
     & 0.6006455E+00, 0.6057599E+00, 0.6130120E+00, 0.6246490E+00, &
     & 0.6412479E+00, 0.6603131E+00, 0.6837336E+00, 0.7069049E+00, &
     & 0.7187999E+00, 0.7344972E+00, 0.7656412E+00, 0.8096901E+00, &
     & 0.8537286E+00, 0.9132079E+00, 0.1084713E+01, 0.1084713E+01 /
      data (ref_adm(37,iz,37, 9),iz = 1,20) / &
     & 0.5786800E+00, 0.5786800E+00, 0.5876300E+00, 0.5989422E+00, &
     & 0.6005446E+00, 0.6057856E+00, 0.6136417E+00, 0.6255437E+00, &
     & 0.6420136E+00, 0.6620473E+00, 0.6852888E+00, 0.7051862E+00, &
     & 0.7165695E+00, 0.7345523E+00, 0.7706365E+00, 0.8693034E+00, &
     & 0.9277499E+00, 0.9235885E+00, 0.1089635E+01, 0.1089635E+01 /
      data (ref_adm(37,iz,38, 9),iz = 1,20) / &
     & 0.5786800E+00, 0.5786800E+00, 0.5876300E+00, 0.5989422E+00, &
     & 0.6005446E+00, 0.6057856E+00, 0.6136417E+00, 0.6255437E+00, &
     & 0.6420136E+00, 0.6620473E+00, 0.6852888E+00, 0.7051862E+00, &
     & 0.7165695E+00, 0.7345523E+00, 0.7706365E+00, 0.8693034E+00, &
     & 0.9277499E+00, 0.9235885E+00, 0.1089635E+01, 0.1089635E+01 /
! Solar Zenith Angle 45.0 Albedo  0.5184006E+00
      data (ref_adm(37,iz, 1,10),iz = 1,20) / &
     & 0.4976800E+00, 0.4976800E+00, 0.5183100E+00, 0.5109300E+00, &
     & 0.5029300E+00, 0.5566800E+00, 0.5413200E+00, 0.5194200E+00, &
     & 0.5978700E+00, 0.5684500E+00, 0.5609900E+00, 0.4760000E+00, &
     & 0.6110900E+00, 0.6252300E+00, 0.6086333E+00, 0.6130685E+00, &
     & 0.6106470E+00, 0.5824300E+00, 0.5053034E+00, 0.5053034E+00 /
      data (ref_adm(37,iz, 2,10),iz = 1,20) / &
     & 0.4976800E+00, 0.4976800E+00, 0.5183100E+00, 0.5109300E+00, &
     & 0.5029300E+00, 0.5566800E+00, 0.5413200E+00, 0.5194200E+00, &
     & 0.5978700E+00, 0.5684500E+00, 0.5609900E+00, 0.4760000E+00, &
     & 0.6110900E+00, 0.6252300E+00, 0.6086333E+00, 0.6130685E+00, &
     & 0.6106470E+00, 0.5824300E+00, 0.5053034E+00, 0.5053034E+00 /
      data (ref_adm(37,iz, 3,10),iz = 1,20) / &
     & 0.4868000E+00, 0.4868000E+00, 0.4873300E+00, 0.5193800E+00, &
     & 0.5279300E+00, 0.5418300E+00, 0.5662200E+00, 0.5714700E+00, &
     & 0.5527700E+00, 0.5805500E+00, 0.5500500E+00, 0.5625200E+00, &
     & 0.6122000E+00, 0.6256800E+00, 0.6079463E+00, 0.6121625E+00, &
     & 0.6095079E+00, 0.5919096E+00, 0.3009208E+00, 0.3009208E+00 /
      data (ref_adm(37,iz, 4,10),iz = 1,20) / &
     & 0.5302200E+00, 0.5302200E+00, 0.5363000E+00, 0.5196400E+00, &
     & 0.5267600E+00, 0.4921800E+00, 0.5158700E+00, 0.5556700E+00, &
     & 0.5435300E+00, 0.4646400E+00, 0.5245300E+00, 0.5998200E+00, &
     & 0.5747800E+00, 0.6394400E+00, 0.6068250E+00, 0.6106905E+00, &
     & 0.6346100E+00, 0.5875648E+00, 0.4977046E+00, 0.4977046E+00 /
      data (ref_adm(37,iz, 5,10),iz = 1,20) / &
     & 0.5351500E+00, 0.5351500E+00, 0.5120900E+00, 0.5675600E+00, &
     & 0.5643900E+00, 0.5217800E+00, 0.5009000E+00, 0.5215700E+00, &
     & 0.5355400E+00, 0.5896800E+00, 0.5926400E+00, 0.5769900E+00, &
     & 0.5659900E+00, 0.6152300E+00, 0.6068000E+00, 0.6634700E+00, &
     & 0.6445400E+00, 0.5818708E+00, 0.4907963E+00, 0.4907963E+00 /
      data (ref_adm(37,iz, 6,10),iz = 1,20) / &
     & 0.4690500E+00, 0.4690500E+00, 0.5589000E+00, 0.4589200E+00, &
     & 0.4917900E+00, 0.5147600E+00, 0.5215000E+00, 0.5225800E+00, &
     & 0.5071800E+00, 0.4955000E+00, 0.4989700E+00, 0.5522600E+00, &
     & 0.5595700E+00, 0.6027100E+00, 0.5984800E+00, 0.6111900E+00, &
     & 0.5996063E+00, 0.5752742E+00, 0.4826151E+00, 0.4826151E+00 /
      data (ref_adm(37,iz, 7,10),iz = 1,20) / &
     & 0.4122700E+00, 0.4122700E+00, 0.4608200E+00, 0.4969000E+00, &
     & 0.5429300E+00, 0.5145300E+00, 0.5771500E+00, 0.5245400E+00, &
     & 0.4999200E+00, 0.5201800E+00, 0.5024400E+00, 0.4761900E+00, &
     & 0.5794635E+00, 0.5892238E+00, 0.5493000E+00, 0.5683600E+00, &
     & 0.5948585E+00, 0.5676627E+00, 0.4743135E+00, 0.4743135E+00 /
      data (ref_adm(37,iz, 8,10),iz = 1,20) / &
     & 0.5158800E+00, 0.5158800E+00, 0.5060300E+00, 0.4974000E+00, &
     & 0.5114600E+00, 0.5332400E+00, 0.5310300E+00, 0.5372500E+00, &
     & 0.5242400E+00, 0.5112500E+00, 0.5367500E+00, 0.5002100E+00, &
     & 0.5797500E+00, 0.5088500E+00, 0.5946686E+00, 0.5983796E+00, &
     & 0.5902780E+00, 0.5610446E+00, 0.4663138E+00, 0.4663138E+00 /
      data (ref_adm(37,iz, 9,10),iz = 1,20) / &
     & 0.5152600E+00, 0.5152600E+00, 0.5167400E+00, 0.5177100E+00, &
     & 0.5223300E+00, 0.5411600E+00, 0.5336300E+00, 0.5585300E+00, &
     & 0.5326336E+00, 0.4681600E+00, 0.4985200E+00, 0.5156600E+00, &
     & 0.5214000E+00, 0.5501400E+00, 0.5405100E+00, 0.5937048E+00, &
     & 0.5857142E+00, 0.5548108E+00, 0.4587201E+00, 0.4587201E+00 /
      data (ref_adm(37,iz,10,10),iz = 1,20) / &
     & 0.4727200E+00, 0.4727200E+00, 0.5159400E+00, 0.6051000E+00, &
     & 0.5734300E+00, 0.5466100E+00, 0.5676300E+00, 0.4952100E+00, &
     & 0.5310051E+00, 0.5039100E+00, 0.5284600E+00, 0.5292200E+00, &
     & 0.5690700E+00, 0.5769666E+00, 0.5844919E+00, 0.5876667E+00, &
     & 0.5805166E+00, 0.5490290E+00, 0.4518204E+00, 0.4518204E+00 /
      data (ref_adm(37,iz,11,10),iz = 1,20) / &
     & 0.4475300E+00, 0.4475300E+00, 0.5094623E+00, 0.5097080E+00, &
     & 0.5110760E+00, 0.5135185E+00, 0.5621600E+00, 0.5537500E+00, &
     & 0.5399600E+00, 0.4922700E+00, 0.5554200E+00, 0.5313800E+00, &
     & 0.5423500E+00, 0.5721185E+00, 0.5789380E+00, 0.5809335E+00, &
     & 0.5742607E+00, 0.5432726E+00, 0.4453714E+00, 0.4453714E+00 /
      data (ref_adm(37,iz,12,10),iz = 1,20) / &
     & 0.4696900E+00, 0.4696900E+00, 0.4145300E+00, 0.5097154E+00, &
     & 0.5109279E+00, 0.5131149E+00, 0.5684600E+00, 0.5385700E+00, &
     & 0.5282400E+00, 0.5342512E+00, 0.5418358E+00, 0.5072000E+00, &
     & 0.5211000E+00, 0.5671542E+00, 0.5728110E+00, 0.5737462E+00, &
     & 0.5662938E+00, 0.5372857E+00, 0.4394868E+00, 0.4394868E+00 /
      data (ref_adm(37,iz,13,10),iz = 1,20) / &
     & 0.5190400E+00, 0.5190400E+00, 0.5379300E+00, 0.5312400E+00, &
     & 0.5351900E+00, 0.5170600E+00, 0.5586100E+00, 0.5462800E+00, &
     & 0.5485500E+00, 0.5584100E+00, 0.5754300E+00, 0.5110800E+00, &
     & 0.5229300E+00, 0.5770000E+00, 0.5772400E+00, 0.5665420E+00, &
     & 0.5584737E+00, 0.5298016E+00, 0.4336487E+00, 0.4336487E+00 /
      data (ref_adm(37,iz,14,10),iz = 1,20) / &
     & 0.5067900E+00, 0.5067900E+00, 0.4855300E+00, 0.4890900E+00, &
     & 0.5076600E+00, 0.5228200E+00, 0.5114400E+00, 0.5114800E+00, &
     & 0.5217300E+00, 0.5188900E+00, 0.5283400E+00, 0.5398400E+00, &
     & 0.5684300E+00, 0.5668800E+00, 0.5760100E+00, 0.5592358E+00, &
     & 0.5500734E+00, 0.5208207E+00, 0.4271923E+00, 0.4271923E+00 /
      data (ref_adm(37,iz,15,10),iz = 1,20) / &
     & 0.5046400E+00, 0.5046400E+00, 0.5092400E+00, 0.4983700E+00, &
     & 0.5227700E+00, 0.5302900E+00, 0.5768000E+00, 0.5594500E+00, &
     & 0.5130400E+00, 0.5098700E+00, 0.4744700E+00, 0.5056700E+00, &
     & 0.5313400E+00, 0.5307400E+00, 0.5334500E+00, 0.5517256E+00, &
     & 0.5416281E+00, 0.5119067E+00, 0.4198270E+00, 0.4198270E+00 /
      data (ref_adm(37,iz,16,10),iz = 1,20) / &
     & 0.5138000E+00, 0.5138000E+00, 0.4870700E+00, 0.5328300E+00, &
     & 0.5578800E+00, 0.5729400E+00, 0.5476700E+00, 0.5626800E+00, &
     & 0.5524200E+00, 0.5436800E+00, 0.5409500E+00, 0.4890100E+00, &
     & 0.5434471E+00, 0.5472040E+00, 0.5490444E+00, 0.5447911E+00, &
     & 0.5329976E+00, 0.5031483E+00, 0.4128434E+00, 0.4128434E+00 /
      data (ref_adm(37,iz,17,10),iz = 1,20) / &
     & 0.5191200E+00, 0.5191200E+00, 0.5257800E+00, 0.5294700E+00, &
     & 0.5113500E+00, 0.5531900E+00, 0.5678400E+00, 0.5345800E+00, &
     & 0.5461100E+00, 0.5559400E+00, 0.5437100E+00, 0.4920800E+00, &
     & 0.5391059E+00, 0.5375000E+00, 0.4881400E+00, 0.5386083E+00, &
     & 0.5255326E+00, 0.4941699E+00, 0.4065320E+00, 0.4065320E+00 /
      data (ref_adm(37,iz,18,10),iz = 1,20) / &
     & 0.5514100E+00, 0.5514100E+00, 0.5187700E+00, 0.4997800E+00, &
     & 0.4603000E+00, 0.5342200E+00, 0.5626300E+00, 0.5581800E+00, &
     & 0.5434100E+00, 0.5649000E+00, 0.5332500E+00, 0.4785800E+00, &
     & 0.4889000E+00, 0.5301657E+00, 0.5062800E+00, 0.5444255E+00, &
     & 0.5512122E+00, 0.5537766E+00, 0.5064144E+00, 0.5064144E+00 /
      data (ref_adm(37,iz,19,10),iz = 1,20) / &
     & 0.5094300E+00, 0.5094300E+00, 0.4507500E+00, 0.4631500E+00, &
     & 0.5049700E+00, 0.4926800E+00, 0.4702100E+00, 0.4993400E+00, &
     & 0.5028900E+00, 0.5054000E+00, 0.5495700E+00, 0.5094200E+00, &
     & 0.4736500E+00, 0.5274256E+00, 0.4560400E+00, 0.5398307E+00, &
     & 0.5451382E+00, 0.5448780E+00, 0.4980843E+00, 0.4980843E+00 /
      data (ref_adm(37,iz,20,10),iz = 1,20) / &
     & 0.5287900E+00, 0.5287900E+00, 0.4194100E+00, 0.4342700E+00, &
     & 0.4100600E+00, 0.5060600E+00, 0.4895300E+00, 0.4612900E+00, &
     & 0.5016800E+00, 0.5528200E+00, 0.5332600E+00, 0.5197400E+00, &
     & 0.4811000E+00, 0.5251262E+00, 0.5133000E+00, 0.5357214E+00, &
     & 0.5401131E+00, 0.5386496E+00, 0.4935288E+00, 0.4935288E+00 /
      data (ref_adm(37,iz,21,10),iz = 1,20) / &
     & 0.4836900E+00, 0.4836900E+00, 0.4161700E+00, 0.4442200E+00, &
     & 0.4664900E+00, 0.4645200E+00, 0.5093900E+00, 0.5071242E+00, &
     & 0.5086513E+00, 0.6304500E+00, 0.6319800E+00, 0.5780100E+00, &
     & 0.5146700E+00, 0.4987800E+00, 0.5276868E+00, 0.5326173E+00, &
     & 0.5357795E+00, 0.5329510E+00, 0.4910300E+00, 0.4910300E+00 /
      data (ref_adm(37,iz,22,10),iz = 1,20) / &
     & 0.5392400E+00, 0.5392400E+00, 0.5376200E+00, 0.4661900E+00, &
     & 0.5081600E+00, 0.4942800E+00, 0.4185000E+00, 0.4084300E+00, &
     & 0.4418200E+00, 0.5512500E+00, 0.6025900E+00, 0.5459800E+00, &
     & 0.5286100E+00, 0.5232600E+00, 0.5488800E+00, 0.5362100E+00, &
     & 0.4480964E+00, 0.4133614E+00, 0.3385448E+00, 0.3385448E+00 /
      data (ref_adm(37,iz,23,10),iz = 1,20) / &
     & 0.5188700E+00, 0.5188700E+00, 0.5226700E+00, 0.4964500E+00, &
     & 0.5017000E+00, 0.5073100E+00, 0.4685800E+00, 0.4037900E+00, &
     & 0.4640500E+00, 0.5006404E+00, 0.5564200E+00, 0.5405600E+00, &
     & 0.5819400E+00, 0.5457500E+00, 0.5236100E+00, 0.5084300E+00, &
     & 0.4451519E+00, 0.4104804E+00, 0.3373209E+00, 0.3373209E+00 /
      data (ref_adm(37,iz,24,10),iz = 1,20) / &
     & 0.5423200E+00, 0.5423200E+00, 0.5108400E+00, 0.5120400E+00, &
     & 0.5158100E+00, 0.5423800E+00, 0.5314900E+00, 0.5119300E+00, &
     & 0.4760600E+00, 0.5027392E+00, 0.5166700E+00, 0.5403000E+00, &
     & 0.5000900E+00, 0.4832653E+00, 0.5954200E+00, 0.5350700E+00, &
     & 0.5369900E+00, 0.4075756E+00, 0.3363514E+00, 0.3363514E+00 /
      data (ref_adm(37,iz,25,10),iz = 1,20) / &
     & 0.5078500E+00, 0.5078500E+00, 0.4517100E+00, 0.4503600E+00, &
     & 0.4574300E+00, 0.5408700E+00, 0.4969000E+00, 0.4592400E+00, &
     & 0.4182700E+00, 0.3577900E+00, 0.4995435E+00, 0.5149300E+00, &
     & 0.4954700E+00, 0.4832908E+00, 0.4736049E+00, 0.4591119E+00, &
     & 0.4398487E+00, 0.4049661E+00, 0.3357159E+00, 0.3357159E+00 /
      data (ref_adm(37,iz,26,10),iz = 1,20) / &
     & 0.5214600E+00, 0.5214600E+00, 0.5035300E+00, 0.4942100E+00, &
     & 0.4813500E+00, 0.4838100E+00, 0.4466800E+00, 0.4529000E+00, &
     & 0.5215000E+00, 0.5171800E+00, 0.5019211E+00, 0.5462800E+00, &
     & 0.5533500E+00, 0.5181200E+00, 0.4731840E+00, 0.5475500E+00, &
     & 0.4374245E+00, 0.4025851E+00, 0.3351057E+00, 0.3351057E+00 /
      data (ref_adm(37,iz,27,10),iz = 1,20) / &
     & 0.5127800E+00, 0.5127800E+00, 0.4913000E+00, 0.4619400E+00, &
     & 0.4969400E+00, 0.4667500E+00, 0.4544500E+00, 0.4567000E+00, &
     & 0.4554400E+00, 0.4813900E+00, 0.4668800E+00, 0.5758800E+00, &
     & 0.5615300E+00, 0.5434800E+00, 0.4728656E+00, 0.5478000E+00, &
     & 0.4352614E+00, 0.4006841E+00, 0.3346696E+00, 0.3346696E+00 /
      data (ref_adm(37,iz,28,10),iz = 1,20) / &
     & 0.5309900E+00, 0.5309900E+00, 0.5271800E+00, 0.4870400E+00, &
     & 0.5046500E+00, 0.5236900E+00, 0.5643200E+00, 0.5099200E+00, &
     & 0.5257700E+00, 0.5446700E+00, 0.5066690E+00, 0.5075900E+00, &
     & 0.5500200E+00, 0.5865400E+00, 0.4727693E+00, 0.4553849E+00, &
     & 0.4338982E+00, 0.3990547E+00, 0.3344134E+00, 0.3344134E+00 /
      data (ref_adm(37,iz,29,10),iz = 1,20) / &
     & 0.4972200E+00, 0.4972200E+00, 0.5223100E+00, 0.5473800E+00, &
     & 0.5558500E+00, 0.4731200E+00, 0.5080800E+00, 0.4621600E+00, &
     & 0.4728100E+00, 0.5307900E+00, 0.5760300E+00, 0.4923800E+00, &
     & 0.5293400E+00, 0.5290700E+00, 0.5257800E+00, 0.5283100E+00, &
     & 0.4326192E+00, 0.3975633E+00, 0.3343500E+00, 0.3343500E+00 /
      data (ref_adm(37,iz,30,10),iz = 1,20) / &
     & 0.5096200E+00, 0.5096200E+00, 0.4639900E+00, 0.4863100E+00, &
     & 0.4783700E+00, 0.4685100E+00, 0.5520200E+00, 0.4248100E+00, &
     & 0.4549300E+00, 0.4915600E+00, 0.5078000E+00, 0.5189800E+00, &
     & 0.5197300E+00, 0.4973000E+00, 0.5134800E+00, 0.4549705E+00, &
     & 0.4319679E+00, 0.3964294E+00, 0.3344408E+00, 0.3344408E+00 /
      data (ref_adm(37,iz,31,10),iz = 1,20) / &
     & 0.5219400E+00, 0.5219400E+00, 0.5144400E+00, 0.5031400E+00, &
     & 0.4958600E+00, 0.5166700E+00, 0.4508700E+00, 0.4583800E+00, &
     & 0.5147800E+00, 0.5084900E+00, 0.5024700E+00, 0.5053800E+00, &
     & 0.5139000E+00, 0.5166700E+00, 0.4980700E+00, 0.4548565E+00, &
     & 0.4316064E+00, 0.3954524E+00, 0.3346011E+00, 0.3346011E+00 /
      data (ref_adm(37,iz,32,10),iz = 1,20) / &
     & 0.4857800E+00, 0.4857800E+00, 0.5207800E+00, 0.5059376E+00, &
     & 0.5190200E+00, 0.3859900E+00, 0.3403000E+00, 0.3234800E+00, &
     & 0.4581000E+00, 0.5173721E+00, 0.5153567E+00, 0.5065475E+00, &
     & 0.5047400E+00, 0.5436900E+00, 0.4735837E+00, 0.4548116E+00, &
     & 0.4314541E+00, 0.3948576E+00, 0.3348424E+00, 0.3348424E+00 /
      data (ref_adm(37,iz,33,10),iz = 1,20) / &
     & 0.5484700E+00, 0.5484700E+00, 0.5557500E+00, 0.4770300E+00, &
     & 0.3307100E+00, 0.4250000E+00, 0.5250200E+00, 0.4831100E+00, &
     & 0.5103977E+00, 0.5692900E+00, 0.5163212E+00, 0.5082371E+00, &
     & 0.4977349E+00, 0.4879638E+00, 0.5516900E+00, 0.4550670E+00, &
     & 0.4314402E+00, 0.3945725E+00, 0.3350962E+00, 0.3350962E+00 /
      data (ref_adm(37,iz,34,10),iz = 1,20) / &
     & 0.5202100E+00, 0.5202100E+00, 0.3696900E+00, 0.3323700E+00, &
     & 0.4673800E+00, 0.5102800E+00, 0.5153900E+00, 0.5264300E+00, &
     & 0.5091346E+00, 0.5144514E+00, 0.5167234E+00, 0.5097079E+00, &
     & 0.4986414E+00, 0.4886485E+00, 0.4746066E+00, 0.4550675E+00, &
     & 0.4313014E+00, 0.3941758E+00, 0.3353612E+00, 0.3353612E+00 /
      data (ref_adm(37,iz,35,10),iz = 1,20) / &
     & 0.4611100E+00, 0.4611100E+00, 0.4595300E+00, 0.5058300E+00, &
     & 0.5104100E+00, 0.5128300E+00, 0.6059900E+00, 0.5075502E+00, &
     & 0.5082832E+00, 0.5133507E+00, 0.5166427E+00, 0.5107400E+00, &
     & 0.4998574E+00, 0.4897833E+00, 0.4752302E+00, 0.4551742E+00, &
     & 0.4311231E+00, 0.3941079E+00, 0.3355816E+00, 0.3355816E+00 /
      data (ref_adm(37,iz,36,10),iz = 1,20) / &
     & 0.5082000E+00, 0.5082000E+00, 0.5416300E+00, 0.5236100E+00, &
     & 0.5222400E+00, 0.6024000E+00, 0.6080600E+00, 0.5079267E+00, &
     & 0.5077247E+00, 0.5912300E+00, 0.5162019E+00, 0.5114729E+00, &
     & 0.5003167E+00, 0.4902770E+00, 0.4755231E+00, 0.4554072E+00, &
     & 0.4313713E+00, 0.3941361E+00, 0.3357895E+00, 0.3357895E+00 /
      data (ref_adm(37,iz,37,10),iz = 1,20) / &
     & 0.4892800E+00, 0.4892800E+00, 0.4986900E+00, 0.5686000E+00, &
     & 0.5904000E+00, 0.6011900E+00, 0.5234930E+00, 0.4175800E+00, &
     & 0.4021900E+00, 0.4055400E+00, 0.5161331E+00, 0.5117627E+00, &
     & 0.5008941E+00, 0.4907116E+00, 0.4757937E+00, 0.4556497E+00, &
     & 0.4313024E+00, 0.3941008E+00, 0.3358637E+00, 0.3358637E+00 /
      data (ref_adm(37,iz,38,10),iz = 1,20) / &
     & 0.4892800E+00, 0.4892800E+00, 0.4986900E+00, 0.5686000E+00, &
     & 0.5904000E+00, 0.6011900E+00, 0.5234930E+00, 0.4175800E+00, &
     & 0.4021900E+00, 0.4055400E+00, 0.5161331E+00, 0.5117627E+00, &
     & 0.5008941E+00, 0.4907116E+00, 0.4757937E+00, 0.4556497E+00, &
     & 0.4313024E+00, 0.3941008E+00, 0.3358637E+00, 0.3358637E+00 /
! Solar Zenith Angle 50.0 Albedo  0.5398384E+00
      data (ref_adm(37,iz, 1,11),iz = 1,20) / &
     & 0.4775100E+00, 0.4775100E+00, 0.5021200E+00, 0.5035300E+00, &
     & 0.4878700E+00, 0.5066300E+00, 0.5175200E+00, 0.5249900E+00, &
     & 0.5338400E+00, 0.5579900E+00, 0.5844000E+00, 0.5959200E+00, &
     & 0.6186400E+00, 0.6344100E+00, 0.6700200E+00, 0.6600800E+00, &
     & 0.6794600E+00, 0.6885300E+00, 0.5278895E+00, 0.5278895E+00 /
      data (ref_adm(37,iz, 2,11),iz = 1,20) / &
     & 0.4775100E+00, 0.4775100E+00, 0.5021200E+00, 0.5035300E+00, &
     & 0.4878700E+00, 0.5066300E+00, 0.5175200E+00, 0.5249900E+00, &
     & 0.5338400E+00, 0.5579900E+00, 0.5844000E+00, 0.5959200E+00, &
     & 0.6186400E+00, 0.6344100E+00, 0.6700200E+00, 0.6600800E+00, &
     & 0.6794600E+00, 0.6885300E+00, 0.5278895E+00, 0.5278895E+00 /
      data (ref_adm(37,iz, 3,11),iz = 1,20) / &
     & 0.5152800E+00, 0.5152800E+00, 0.4983700E+00, 0.5131100E+00, &
     & 0.4779300E+00, 0.5106800E+00, 0.5486300E+00, 0.5459800E+00, &
     & 0.5277500E+00, 0.5559000E+00, 0.6004100E+00, 0.5425300E+00, &
     & 0.6194000E+00, 0.6504000E+00, 0.6628100E+00, 0.6829500E+00, &
     & 0.6846200E+00, 0.6444100E+00, 0.3352864E+00, 0.3352864E+00 /
      data (ref_adm(37,iz, 4,11),iz = 1,20) / &
     & 0.5446800E+00, 0.5446800E+00, 0.5493600E+00, 0.5014600E+00, &
     & 0.5155600E+00, 0.5177400E+00, 0.5445700E+00, 0.5446600E+00, &
     & 0.5359900E+00, 0.5583700E+00, 0.5865500E+00, 0.5730600E+00, &
     & 0.5916800E+00, 0.6522400E+00, 0.6398600E+00, 0.6686700E+00, &
     & 0.6812900E+00, 0.6456695E+00, 0.5179192E+00, 0.5179192E+00 /
      data (ref_adm(37,iz, 5,11),iz = 1,20) / &
     & 0.5347500E+00, 0.5347500E+00, 0.5131400E+00, 0.5312600E+00, &
     & 0.5121400E+00, 0.5349800E+00, 0.5083000E+00, 0.5264200E+00, &
     & 0.5317700E+00, 0.5763600E+00, 0.5705400E+00, 0.5966500E+00, &
     & 0.5934100E+00, 0.6151900E+00, 0.6111700E+00, 0.6497200E+00, &
     & 0.6613150E+00, 0.6339461E+00, 0.5087067E+00, 0.5087067E+00 /
      data (ref_adm(37,iz, 6,11),iz = 1,20) / &
     & 0.5123100E+00, 0.5123100E+00, 0.5259900E+00, 0.5360800E+00, &
     & 0.5480100E+00, 0.5292100E+00, 0.5073500E+00, 0.5055500E+00, &
     & 0.5614800E+00, 0.5939000E+00, 0.5690800E+00, 0.5809800E+00, &
     & 0.5958900E+00, 0.5826300E+00, 0.5834400E+00, 0.6067200E+00, &
     & 0.6497123E+00, 0.6194129E+00, 0.4974708E+00, 0.4974708E+00 /
      data (ref_adm(37,iz, 7,11),iz = 1,20) / &
     & 0.5027100E+00, 0.5027100E+00, 0.5089100E+00, 0.5238700E+00, &
     & 0.5301200E+00, 0.5590500E+00, 0.5579900E+00, 0.5427000E+00, &
     & 0.5382100E+00, 0.5530200E+00, 0.5777000E+00, 0.5635300E+00, &
     & 0.6351500E+00, 0.6119800E+00, 0.5995600E+00, 0.5919900E+00, &
     & 0.4418200E+00, 0.6031559E+00, 0.4855651E+00, 0.4855651E+00 /
      data (ref_adm(37,iz, 8,11),iz = 1,20) / &
     & 0.5338000E+00, 0.5338000E+00, 0.5322400E+00, 0.5433200E+00, &
     & 0.5433400E+00, 0.5465000E+00, 0.5383700E+00, 0.5607200E+00, &
     & 0.5664100E+00, 0.5664600E+00, 0.5918900E+00, 0.5919700E+00, &
     & 0.6277300E+00, 0.6179100E+00, 0.6351900E+00, 0.6429700E+00, &
     & 0.6313000E+00, 0.5870055E+00, 0.4732221E+00, 0.4732221E+00 /
      data (ref_adm(37,iz, 9,11),iz = 1,20) / &
     & 0.5568700E+00, 0.5568700E+00, 0.5233500E+00, 0.5195100E+00, &
     & 0.5426800E+00, 0.5230100E+00, 0.5016600E+00, 0.5304400E+00, &
     & 0.5190500E+00, 0.5456800E+00, 0.5510200E+00, 0.5852600E+00, &
     & 0.6083300E+00, 0.5674100E+00, 0.5122800E+00, 0.5911700E+00, &
     & 0.5471900E+00, 0.5710340E+00, 0.4610792E+00, 0.4610792E+00 /
      data (ref_adm(37,iz,10,11),iz = 1,20) / &
     & 0.5570400E+00, 0.5570400E+00, 0.5480400E+00, 0.5379400E+00, &
     & 0.5433000E+00, 0.5131000E+00, 0.4908100E+00, 0.5113500E+00, &
     & 0.5278300E+00, 0.5539400E+00, 0.5706800E+00, 0.5854700E+00, &
     & 0.5843700E+00, 0.5622100E+00, 0.4949600E+00, 0.5432700E+00, &
     & 0.4651300E+00, 0.5555893E+00, 0.4495429E+00, 0.4495429E+00 /
      data (ref_adm(37,iz,11,11),iz = 1,20) / &
     & 0.5357900E+00, 0.5357900E+00, 0.5640000E+00, 0.5655600E+00, &
     & 0.5533200E+00, 0.4937600E+00, 0.4932600E+00, 0.5275900E+00, &
     & 0.5357100E+00, 0.5668600E+00, 0.5789200E+00, 0.5780600E+00, &
     & 0.5664100E+00, 0.5526600E+00, 0.5627500E+00, 0.4584800E+00, &
     & 0.5807649E+00, 0.5412078E+00, 0.4385901E+00, 0.4385901E+00 /
      data (ref_adm(37,iz,12,11),iz = 1,20) / &
     & 0.5313300E+00, 0.5313300E+00, 0.5259800E+00, 0.5695300E+00, &
     & 0.5366800E+00, 0.5001600E+00, 0.5307000E+00, 0.5347200E+00, &
     & 0.5395400E+00, 0.5611700E+00, 0.5638700E+00, 0.5628700E+00, &
     & 0.5619900E+00, 0.5651300E+00, 0.5519500E+00, 0.4338300E+00, &
     & 0.5665200E+00, 0.5276706E+00, 0.4285586E+00, 0.4285586E+00 /
      data (ref_adm(37,iz,13,11),iz = 1,20) / &
     & 0.5039700E+00, 0.5039700E+00, 0.5465700E+00, 0.5506700E+00, &
     & 0.5530000E+00, 0.5524100E+00, 0.5468700E+00, 0.5295000E+00, &
     & 0.5257200E+00, 0.5480900E+00, 0.5634700E+00, 0.5452100E+00, &
     & 0.5668800E+00, 0.5983900E+00, 0.5527200E+00, 0.4212700E+00, &
     & 0.5526358E+00, 0.5146322E+00, 0.4192201E+00, 0.4192201E+00 /
      data (ref_adm(37,iz,14,11),iz = 1,20) / &
     & 0.5191800E+00, 0.5191800E+00, 0.5085100E+00, 0.5053900E+00, &
     & 0.5155100E+00, 0.5176400E+00, 0.5254400E+00, 0.5405300E+00, &
     & 0.5422200E+00, 0.5553700E+00, 0.5497100E+00, 0.5562000E+00, &
     & 0.5735200E+00, 0.5699400E+00, 0.5700700E+00, 0.4320300E+00, &
     & 0.5393943E+00, 0.5016012E+00, 0.4105717E+00, 0.4105717E+00 /
      data (ref_adm(37,iz,15,11),iz = 1,20) / &
     & 0.4952600E+00, 0.4952600E+00, 0.4587100E+00, 0.4772100E+00, &
     & 0.4876800E+00, 0.5011300E+00, 0.5238500E+00, 0.5425800E+00, &
     & 0.5460600E+00, 0.5126700E+00, 0.5031600E+00, 0.4847100E+00, &
     & 0.5056800E+00, 0.5282400E+00, 0.4561300E+00, 0.5041200E+00, &
     & 0.5272890E+00, 0.4893389E+00, 0.4021488E+00, 0.4021488E+00 /
      data (ref_adm(37,iz,16,11),iz = 1,20) / &
     & 0.5088800E+00, 0.5088800E+00, 0.4972800E+00, 0.4372300E+00, &
     & 0.4739400E+00, 0.4974800E+00, 0.5402400E+00, 0.5518400E+00, &
     & 0.5576100E+00, 0.5426900E+00, 0.5479500E+00, 0.5633500E+00, &
     & 0.5741600E+00, 0.5064900E+00, 0.5392300E+00, 0.4970000E+00, &
     & 0.5160241E+00, 0.4786424E+00, 0.3946440E+00, 0.3946440E+00 /
      data (ref_adm(37,iz,17,11),iz = 1,20) / &
     & 0.5133000E+00, 0.5133000E+00, 0.5024800E+00, 0.4832800E+00, &
     & 0.4887100E+00, 0.5208300E+00, 0.5326600E+00, 0.5417400E+00, &
     & 0.5499500E+00, 0.5733700E+00, 0.5386600E+00, 0.5385800E+00, &
     & 0.5591900E+00, 0.5348600E+00, 0.5347403E+00, 0.5250153E+00, &
     & 0.5064041E+00, 0.4687244E+00, 0.3883434E+00, 0.3883434E+00 /
      data (ref_adm(37,iz,18,11),iz = 1,20) / &
     & 0.5070900E+00, 0.5070900E+00, 0.5077200E+00, 0.5326900E+00, &
     & 0.5414900E+00, 0.5292300E+00, 0.5135400E+00, 0.5268200E+00, &
     & 0.5513300E+00, 0.5311400E+00, 0.5458200E+00, 0.5622600E+00, &
     & 0.5919700E+00, 0.5379200E+00, 0.4025700E+00, 0.5205351E+00, &
     & 0.5093817E+00, 0.4807410E+00, 0.3992719E+00, 0.3992719E+00 /
      data (ref_adm(37,iz,19,11),iz = 1,20) / &
     & 0.5265600E+00, 0.5265600E+00, 0.5312700E+00, 0.5424300E+00, &
     & 0.5562800E+00, 0.5499300E+00, 0.5739100E+00, 0.5638000E+00, &
     & 0.5511900E+00, 0.5571900E+00, 0.5426000E+00, 0.5468500E+00, &
     & 0.5567600E+00, 0.5450500E+00, 0.5621900E+00, 0.5181082E+00, &
     & 0.5065917E+00, 0.4771754E+00, 0.3953737E+00, 0.3953737E+00 /
      data (ref_adm(37,iz,20,11),iz = 1,20) / &
     & 0.5077600E+00, 0.5077600E+00, 0.5481600E+00, 0.5279500E+00, &
     & 0.5459700E+00, 0.5534800E+00, 0.5635200E+00, 0.5597000E+00, &
     & 0.5395500E+00, 0.5289200E+00, 0.5455400E+00, 0.5444600E+00, &
     & 0.5751300E+00, 0.5769400E+00, 0.5039400E+00, 0.5165479E+00, &
     & 0.5040517E+00, 0.4738185E+00, 0.3931768E+00, 0.3931768E+00 /
      data (ref_adm(37,iz,21,11),iz = 1,20) / &
     & 0.5069200E+00, 0.5069200E+00, 0.5325600E+00, 0.5424500E+00, &
     & 0.5354500E+00, 0.5577300E+00, 0.5544600E+00, 0.5425900E+00, &
     & 0.5448500E+00, 0.5456500E+00, 0.5593800E+00, 0.5459100E+00, &
     & 0.5635700E+00, 0.5295100E+00, 0.4938800E+00, 0.5341100E+00, &
     & 0.5018945E+00, 0.4707986E+00, 0.3916894E+00, 0.3916894E+00 /
      data (ref_adm(37,iz,22,11),iz = 1,20) / &
     & 0.5248300E+00, 0.5248300E+00, 0.5287400E+00, 0.5400300E+00, &
     & 0.5315100E+00, 0.5518500E+00, 0.5478300E+00, 0.5408400E+00, &
     & 0.5329900E+00, 0.5434800E+00, 0.5165900E+00, 0.5261200E+00, &
     & 0.5328600E+00, 0.5189800E+00, 0.4822900E+00, 0.5232700E+00, &
     & 0.4799491E+00, 0.4423250E+00, 0.3622597E+00, 0.3622597E+00 /
      data (ref_adm(37,iz,23,11),iz = 1,20) / &
     & 0.5088800E+00, 0.5088800E+00, 0.5329500E+00, 0.5507800E+00, &
     & 0.5246800E+00, 0.5181800E+00, 0.5485100E+00, 0.5413500E+00, &
     & 0.5349500E+00, 0.5385600E+00, 0.5092500E+00, 0.4971100E+00, &
     & 0.5134000E+00, 0.5045300E+00, 0.5302600E+00, 0.5272400E+00, &
     & 0.4763538E+00, 0.4386338E+00, 0.3608068E+00, 0.3608068E+00 /
      data (ref_adm(37,iz,24,11),iz = 1,20) / &
     & 0.5200400E+00, 0.5200400E+00, 0.5118200E+00, 0.5346200E+00, &
     & 0.5342700E+00, 0.5196100E+00, 0.5361500E+00, 0.5473100E+00, &
     & 0.5495100E+00, 0.5369600E+00, 0.5339500E+00, 0.5378000E+00, &
     & 0.5321900E+00, 0.5029200E+00, 0.4911800E+00, 0.5164500E+00, &
     & 0.5175900E+00, 0.4347861E+00, 0.3597473E+00, 0.3597473E+00 /
      data (ref_adm(37,iz,25,11),iz = 1,20) / &
     & 0.5323400E+00, 0.5323400E+00, 0.5275200E+00, 0.5040900E+00, &
     & 0.5129100E+00, 0.5322700E+00, 0.5557100E+00, 0.5651200E+00, &
     & 0.5712800E+00, 0.5444300E+00, 0.5247600E+00, 0.5320900E+00, &
     & 0.5441400E+00, 0.5150700E+00, 0.4890300E+00, 0.5371300E+00, &
     & 0.4876700E+00, 0.4317944E+00, 0.3589611E+00, 0.3589611E+00 /
      data (ref_adm(37,iz,26,11),iz = 1,20) / &
     & 0.5069200E+00, 0.5069200E+00, 0.5177300E+00, 0.5245700E+00, &
     & 0.5291900E+00, 0.5387600E+00, 0.5423100E+00, 0.5360900E+00, &
     & 0.5191500E+00, 0.5134000E+00, 0.5080300E+00, 0.5189800E+00, &
     & 0.5380200E+00, 0.4952400E+00, 0.5067800E+00, 0.5462300E+00, &
     & 0.5137200E+00, 0.4290598E+00, 0.3583988E+00, 0.3583988E+00 /
      data (ref_adm(37,iz,27,11),iz = 1,20) / &
     & 0.5187600E+00, 0.5187600E+00, 0.5076800E+00, 0.5073800E+00, &
     & 0.5203500E+00, 0.5260400E+00, 0.5535100E+00, 0.5550800E+00, &
     & 0.5585900E+00, 0.5575800E+00, 0.5602200E+00, 0.5548400E+00, &
     & 0.5419400E+00, 0.5337100E+00, 0.5221400E+00, 0.5439800E+00, &
     & 0.4976200E+00, 0.4267240E+00, 0.3581952E+00, 0.3581952E+00 /
      data (ref_adm(37,iz,28,11),iz = 1,20) / &
     & 0.5136900E+00, 0.5136900E+00, 0.5000600E+00, 0.5066400E+00, &
     & 0.4992000E+00, 0.5084600E+00, 0.5121100E+00, 0.5235300E+00, &
     & 0.5442900E+00, 0.5124000E+00, 0.5571300E+00, 0.5368000E+00, &
     & 0.5610700E+00, 0.5314800E+00, 0.5371800E+00, 0.5144400E+00, &
     & 0.4702900E+00, 0.4247477E+00, 0.3583415E+00, 0.3583415E+00 /
      data (ref_adm(37,iz,29,11),iz = 1,20) / &
     & 0.5258000E+00, 0.5258000E+00, 0.5456500E+00, 0.5206300E+00, &
     & 0.4992900E+00, 0.5236700E+00, 0.5250500E+00, 0.5490100E+00, &
     & 0.5381400E+00, 0.5297900E+00, 0.5071700E+00, 0.5559400E+00, &
     & 0.5865400E+00, 0.5393000E+00, 0.4829800E+00, 0.5349700E+00, &
     & 0.4905100E+00, 0.4234296E+00, 0.3585660E+00, 0.3585660E+00 /
      data (ref_adm(37,iz,30,11),iz = 1,20) / &
     & 0.5425400E+00, 0.5425400E+00, 0.5393300E+00, 0.5414600E+00, &
     & 0.4969500E+00, 0.5007800E+00, 0.5074400E+00, 0.5112700E+00, &
     & 0.4540000E+00, 0.4792500E+00, 0.5118400E+00, 0.5682900E+00, &
     & 0.5608300E+00, 0.5269700E+00, 0.5709900E+00, 0.5692400E+00, &
     & 0.4620482E+00, 0.4226235E+00, 0.3590783E+00, 0.3590783E+00 /
      data (ref_adm(37,iz,31,11),iz = 1,20) / &
     & 0.5482300E+00, 0.5482300E+00, 0.5531200E+00, 0.5406000E+00, &
     & 0.5323000E+00, 0.5304600E+00, 0.5172600E+00, 0.5191900E+00, &
     & 0.5381700E+00, 0.5448200E+00, 0.5497400E+00, 0.5458800E+00, &
     & 0.5457100E+00, 0.5440700E+00, 0.5353500E+00, 0.5317300E+00, &
     & 0.5133100E+00, 0.4221903E+00, 0.3596418E+00, 0.3596418E+00 /
      data (ref_adm(37,iz,32,11),iz = 1,20) / &
     & 0.5383300E+00, 0.5383300E+00, 0.5271500E+00, 0.5395800E+00, &
     & 0.5487900E+00, 0.5232100E+00, 0.5181000E+00, 0.5165800E+00, &
     & 0.5025100E+00, 0.5561000E+00, 0.5664500E+00, 0.5808700E+00, &
     & 0.5991900E+00, 0.5626300E+00, 0.5754200E+00, 0.5405500E+00, &
     & 0.5261900E+00, 0.4221361E+00, 0.3604297E+00, 0.3604297E+00 /
      data (ref_adm(37,iz,33,11),iz = 1,20) / &
     & 0.5173700E+00, 0.5173700E+00, 0.5283500E+00, 0.5408900E+00, &
     & 0.5256700E+00, 0.5047000E+00, 0.5308400E+00, 0.5064500E+00, &
     & 0.5283600E+00, 0.5586500E+00, 0.5753600E+00, 0.5481900E+00, &
     & 0.5674900E+00, 0.5304700E+00, 0.4732800E+00, 0.5392900E+00, &
     & 0.4624065E+00, 0.4223616E+00, 0.3612508E+00, 0.3612508E+00 /
      data (ref_adm(37,iz,34,11),iz = 1,20) / &
     & 0.5299000E+00, 0.5299000E+00, 0.5298600E+00, 0.5103600E+00, &
     & 0.5018400E+00, 0.5398700E+00, 0.5157000E+00, 0.5302500E+00, &
     & 0.5308300E+00, 0.5511600E+00, 0.5753100E+00, 0.5454900E+00, &
     & 0.5372400E+00, 0.5092000E+00, 0.5114600E+00, 0.4894038E+00, &
     & 0.4625597E+00, 0.4225294E+00, 0.3619512E+00, 0.3619512E+00 /
      data (ref_adm(37,iz,35,11),iz = 1,20) / &
     & 0.5115900E+00, 0.5115900E+00, 0.5110100E+00, 0.5115700E+00, &
     & 0.5531000E+00, 0.5357500E+00, 0.5223400E+00, 0.5325600E+00, &
     & 0.5619100E+00, 0.5737000E+00, 0.5610200E+00, 0.5360200E+00, &
     & 0.5543900E+00, 0.5056900E+00, 0.4936100E+00, 0.5129500E+00, &
     & 0.4627712E+00, 0.4228185E+00, 0.3625774E+00, 0.3625774E+00 /
      data (ref_adm(37,iz,36,11),iz = 1,20) / &
     & 0.5206400E+00, 0.5206400E+00, 0.4843500E+00, 0.5052200E+00, &
     & 0.5196400E+00, 0.5556600E+00, 0.5689500E+00, 0.5537300E+00, &
     & 0.5646100E+00, 0.5600200E+00, 0.5578200E+00, 0.5833600E+00, &
     & 0.5808500E+00, 0.4853700E+00, 0.4681600E+00, 0.5102300E+00, &
     & 0.4631357E+00, 0.4229278E+00, 0.3630620E+00, 0.3630620E+00 /
      data (ref_adm(37,iz,37,11),iz = 1,20) / &
     & 0.5276200E+00, 0.5276200E+00, 0.4779600E+00, 0.4692900E+00, &
     & 0.5187100E+00, 0.5431000E+00, 0.5568800E+00, 0.5660800E+00, &
     & 0.5548000E+00, 0.5413900E+00, 0.5441100E+00, 0.5932100E+00, &
     & 0.5855600E+00, 0.4931400E+00, 0.5299200E+00, 0.5089600E+00, &
     & 0.4633068E+00, 0.4229547E+00, 0.3633319E+00, 0.3633319E+00 /
      data (ref_adm(37,iz,38,11),iz = 1,20) / &
     & 0.5276200E+00, 0.5276200E+00, 0.4779600E+00, 0.4692900E+00, &
     & 0.5187100E+00, 0.5431000E+00, 0.5568800E+00, 0.5660800E+00, &
     & 0.5548000E+00, 0.5413900E+00, 0.5441100E+00, 0.5932100E+00, &
     & 0.5855600E+00, 0.4931400E+00, 0.5299200E+00, 0.5089600E+00, &
     & 0.4633068E+00, 0.4229547E+00, 0.3633319E+00, 0.3633319E+00 /
! Solar Zenith Angle 55.0 Albedo  0.5464308E+00
      data (ref_adm(37,iz, 1,12),iz = 1,20) / &
     & 0.5200900E+00, 0.5200900E+00, 0.4905800E+00, 0.4975500E+00, &
     & 0.5290800E+00, 0.5518100E+00, 0.5466800E+00, 0.5525600E+00, &
     & 0.5474700E+00, 0.5602800E+00, 0.5919600E+00, 0.6222400E+00, &
     & 0.6435700E+00, 0.6440400E+00, 0.6945400E+00, 0.6875100E+00, &
     & 0.6815166E+00, 0.6811599E+00, 0.5666069E+00, 0.5666069E+00 /
      data (ref_adm(37,iz, 2,12),iz = 1,20) / &
     & 0.5200900E+00, 0.5200900E+00, 0.4905800E+00, 0.4975500E+00, &
     & 0.5290800E+00, 0.5518100E+00, 0.5466800E+00, 0.5525600E+00, &
     & 0.5474700E+00, 0.5602800E+00, 0.5919600E+00, 0.6222400E+00, &
     & 0.6435700E+00, 0.6440400E+00, 0.6945400E+00, 0.6875100E+00, &
     & 0.6815166E+00, 0.6811599E+00, 0.5666069E+00, 0.5666069E+00 /
      data (ref_adm(37,iz, 3,12),iz = 1,20) / &
     & 0.5134300E+00, 0.5134300E+00, 0.5111500E+00, 0.5198200E+00, &
     & 0.5149900E+00, 0.5385200E+00, 0.5506200E+00, 0.5456000E+00, &
     & 0.5563300E+00, 0.5731600E+00, 0.6083700E+00, 0.6327100E+00, &
     & 0.6462500E+00, 0.6424000E+00, 0.6700200E+00, 0.6575300E+00, &
     & 0.6728800E+00, 0.7033100E+00, 0.3339562E+00, 0.3339562E+00 /
      data (ref_adm(37,iz, 4,12),iz = 1,20) / &
     & 0.5079300E+00, 0.5079300E+00, 0.5217300E+00, 0.5388800E+00, &
     & 0.5362500E+00, 0.5253800E+00, 0.5195100E+00, 0.5393700E+00, &
     & 0.5583300E+00, 0.5996300E+00, 0.5993400E+00, 0.5876000E+00, &
     & 0.6415600E+00, 0.6597200E+00, 0.6580300E+00, 0.6797200E+00, &
     & 0.6934700E+00, 0.7234000E+00, 0.5594336E+00, 0.5594336E+00 /
      data (ref_adm(37,iz, 5,12),iz = 1,20) / &
     & 0.5226300E+00, 0.5226300E+00, 0.5187400E+00, 0.5274100E+00, &
     & 0.5401900E+00, 0.5370300E+00, 0.5109000E+00, 0.5471000E+00, &
     & 0.5843800E+00, 0.5739300E+00, 0.5903800E+00, 0.5948300E+00, &
     & 0.6190900E+00, 0.6603900E+00, 0.6664000E+00, 0.6704400E+00, &
     & 0.6416100E+00, 0.6560023E+00, 0.5532069E+00, 0.5532069E+00 /
      data (ref_adm(37,iz, 6,12),iz = 1,20) / &
     & 0.5144000E+00, 0.5144000E+00, 0.5259900E+00, 0.5032400E+00, &
     & 0.5040500E+00, 0.5204700E+00, 0.5034900E+00, 0.5436500E+00, &
     & 0.5589900E+00, 0.5729000E+00, 0.5739700E+00, 0.6105300E+00, &
     & 0.6143400E+00, 0.6476700E+00, 0.6562000E+00, 0.6749800E+00, &
     & 0.6381200E+00, 0.6409351E+00, 0.5419109E+00, 0.5419109E+00 /
      data (ref_adm(37,iz, 7,12),iz = 1,20) / &
     & 0.5185900E+00, 0.5185900E+00, 0.5063200E+00, 0.5043000E+00, &
     & 0.5025200E+00, 0.5004600E+00, 0.5286300E+00, 0.5324200E+00, &
     & 0.5292100E+00, 0.5443800E+00, 0.5567300E+00, 0.5416500E+00, &
     & 0.5654200E+00, 0.5678500E+00, 0.6125100E+00, 0.5989600E+00, &
     & 0.6470233E+00, 0.6255518E+00, 0.5265808E+00, 0.5265808E+00 /
      data (ref_adm(37,iz, 8,12),iz = 1,20) / &
     & 0.5244500E+00, 0.5244500E+00, 0.5294500E+00, 0.5331000E+00, &
     & 0.5334500E+00, 0.5362000E+00, 0.5400200E+00, 0.5462100E+00, &
     & 0.5615500E+00, 0.5685300E+00, 0.5882500E+00, 0.5871700E+00, &
     & 0.6215400E+00, 0.6052600E+00, 0.6082700E+00, 0.6409700E+00, &
     & 0.5297600E+00, 0.6119959E+00, 0.5113894E+00, 0.5113894E+00 /
      data (ref_adm(37,iz, 9,12),iz = 1,20) / &
     & 0.5289900E+00, 0.5289900E+00, 0.5369200E+00, 0.5267800E+00, &
     & 0.5252100E+00, 0.5190200E+00, 0.5139000E+00, 0.5228000E+00, &
     & 0.5382500E+00, 0.5461900E+00, 0.5521100E+00, 0.5880600E+00, &
     & 0.6043500E+00, 0.5928700E+00, 0.6035700E+00, 0.6153400E+00, &
     & 0.6178200E+00, 0.3694900E+00, 0.4985155E+00, 0.4985155E+00 /
      data (ref_adm(37,iz,10,12),iz = 1,20) / &
     & 0.5272200E+00, 0.5272200E+00, 0.5227900E+00, 0.5268600E+00, &
     & 0.5276200E+00, 0.5123700E+00, 0.5221500E+00, 0.5458100E+00, &
     & 0.5385800E+00, 0.5235500E+00, 0.5566500E+00, 0.5797900E+00, &
     & 0.6143100E+00, 0.5880900E+00, 0.6047300E+00, 0.5911800E+00, &
     & 0.5727300E+00, 0.4545300E+00, 0.4874528E+00, 0.4874528E+00 /
      data (ref_adm(37,iz,11,12),iz = 1,20) / &
     & 0.5289100E+00, 0.5289100E+00, 0.5292700E+00, 0.5395900E+00, &
     & 0.5275600E+00, 0.5189900E+00, 0.5324300E+00, 0.5367300E+00, &
     & 0.5518200E+00, 0.5416300E+00, 0.5524700E+00, 0.5736700E+00, &
     & 0.6123700E+00, 0.5767400E+00, 0.6073800E+00, 0.5812300E+00, &
     & 0.5422800E+00, 0.5810889E+00, 0.4779180E+00, 0.4779180E+00 /
      data (ref_adm(37,iz,12,12),iz = 1,20) / &
     & 0.5350600E+00, 0.5350600E+00, 0.5284400E+00, 0.5074000E+00, &
     & 0.5130400E+00, 0.5214000E+00, 0.5501700E+00, 0.5494600E+00, &
     & 0.5514800E+00, 0.5528100E+00, 0.5433000E+00, 0.5601900E+00, &
     & 0.5782400E+00, 0.5886800E+00, 0.5829500E+00, 0.5117900E+00, &
     & 0.6055962E+00, 0.5731481E+00, 0.4696561E+00, 0.4696561E+00 /
      data (ref_adm(37,iz,13,12),iz = 1,20) / &
     & 0.5188300E+00, 0.5188300E+00, 0.5256200E+00, 0.5287500E+00, &
     & 0.5396700E+00, 0.5241200E+00, 0.5333600E+00, 0.5407100E+00, &
     & 0.5453800E+00, 0.5393300E+00, 0.5455500E+00, 0.5684700E+00, &
     & 0.5679500E+00, 0.5641400E+00, 0.5472200E+00, 0.5566100E+00, &
     & 0.4914000E+00, 0.5864800E+00, 0.4621971E+00, 0.4621971E+00 /
      data (ref_adm(37,iz,14,12),iz = 1,20) / &
     & 0.5198000E+00, 0.5198000E+00, 0.5148800E+00, 0.5180400E+00, &
     & 0.5212000E+00, 0.5271100E+00, 0.5276800E+00, 0.5267500E+00, &
     & 0.5291700E+00, 0.5334900E+00, 0.5293200E+00, 0.5480500E+00, &
     & 0.5591200E+00, 0.5576300E+00, 0.5103200E+00, 0.4919800E+00, &
     & 0.5838786E+00, 0.5545801E+00, 0.4547324E+00, 0.4547324E+00 /
      data (ref_adm(37,iz,15,12),iz = 1,20) / &
     & 0.5055600E+00, 0.5055600E+00, 0.5064200E+00, 0.5134300E+00, &
     & 0.5181200E+00, 0.5221700E+00, 0.5233600E+00, 0.5169100E+00, &
     & 0.5235500E+00, 0.5182000E+00, 0.5078300E+00, 0.4992000E+00, &
     & 0.5037900E+00, 0.5189400E+00, 0.5194700E+00, 0.5805076E+00, &
     & 0.5728441E+00, 0.5429646E+00, 0.4464218E+00, 0.4464218E+00 /
      data (ref_adm(37,iz,16,12),iz = 1,20) / &
     & 0.5035000E+00, 0.5035000E+00, 0.5045300E+00, 0.5111700E+00, &
     & 0.5286500E+00, 0.5486500E+00, 0.5438600E+00, 0.5384200E+00, &
     & 0.5478900E+00, 0.5352900E+00, 0.5129700E+00, 0.5183900E+00, &
     & 0.5357300E+00, 0.4991600E+00, 0.5530700E+00, 0.5700331E+00, &
     & 0.5618057E+00, 0.5319414E+00, 0.4374345E+00, 0.4374345E+00 /
      data (ref_adm(37,iz,17,12),iz = 1,20) / &
     & 0.5101000E+00, 0.5101000E+00, 0.5036700E+00, 0.5173600E+00, &
     & 0.5276200E+00, 0.5271500E+00, 0.5301900E+00, 0.5404200E+00, &
     & 0.5346500E+00, 0.5298200E+00, 0.5260300E+00, 0.5204400E+00, &
     & 0.5091800E+00, 0.4824400E+00, 0.5221500E+00, 0.5665700E+00, &
     & 0.5510087E+00, 0.5207935E+00, 0.4296372E+00, 0.4296372E+00 /
      data (ref_adm(37,iz,18,12),iz = 1,20) / &
     & 0.5026100E+00, 0.5026100E+00, 0.4998600E+00, 0.5113100E+00, &
     & 0.5112500E+00, 0.5193700E+00, 0.5335900E+00, 0.5371200E+00, &
     & 0.5435200E+00, 0.5371600E+00, 0.5427600E+00, 0.5029700E+00, &
     & 0.4702900E+00, 0.4582800E+00, 0.4861400E+00, 0.5542300E+00, &
     & 0.4913911E+00, 0.4599599E+00, 0.3829408E+00, 0.3829408E+00 /
      data (ref_adm(37,iz,19,12),iz = 1,20) / &
     & 0.5286500E+00, 0.5286500E+00, 0.5190400E+00, 0.5064800E+00, &
     & 0.5085200E+00, 0.5172200E+00, 0.5290400E+00, 0.5423200E+00, &
     & 0.5389300E+00, 0.5383700E+00, 0.5285600E+00, 0.5190400E+00, &
     & 0.5306500E+00, 0.4973100E+00, 0.5081800E+00, 0.5604500E+00, &
     & 0.4861794E+00, 0.4553346E+00, 0.3794054E+00, 0.3794054E+00 /
      data (ref_adm(37,iz,20,12),iz = 1,20) / &
     & 0.5320700E+00, 0.5320700E+00, 0.5341500E+00, 0.5143700E+00, &
     & 0.5119100E+00, 0.5148100E+00, 0.5254000E+00, 0.5393800E+00, &
     & 0.5312400E+00, 0.5395100E+00, 0.5163400E+00, 0.5199000E+00, &
     & 0.5022400E+00, 0.5075600E+00, 0.4969200E+00, 0.4977170E+00, &
     & 0.4818119E+00, 0.4511309E+00, 0.3771327E+00, 0.3771327E+00 /
      data (ref_adm(37,iz,21,12),iz = 1,20) / &
     & 0.5306600E+00, 0.5306600E+00, 0.5369500E+00, 0.5392200E+00, &
     & 0.5258800E+00, 0.5239800E+00, 0.5348000E+00, 0.5237600E+00, &
     & 0.5147400E+00, 0.5197100E+00, 0.5083200E+00, 0.5189300E+00, &
     & 0.5196300E+00, 0.5636600E+00, 0.5399700E+00, 0.5272800E+00, &
     & 0.4776944E+00, 0.4470560E+00, 0.3754570E+00, 0.3754570E+00 /
      data (ref_adm(37,iz,22,12),iz = 1,20) / &
     & 0.5257300E+00, 0.5257300E+00, 0.5266700E+00, 0.5292800E+00, &
     & 0.5280700E+00, 0.5215900E+00, 0.5345400E+00, 0.5370100E+00, &
     & 0.5387400E+00, 0.5283000E+00, 0.5135900E+00, 0.5046000E+00, &
     & 0.4885300E+00, 0.5066100E+00, 0.5280500E+00, 0.4735100E+00, &
     & 0.5839545E+00, 0.5731267E+00, 0.5169529E+00, 0.5169529E+00 /
      data (ref_adm(37,iz,23,12),iz = 1,20) / &
     & 0.5213100E+00, 0.5213100E+00, 0.5330000E+00, 0.5252800E+00, &
     & 0.5288000E+00, 0.5240600E+00, 0.5319600E+00, 0.5331000E+00, &
     & 0.5252200E+00, 0.5202000E+00, 0.5251600E+00, 0.5198400E+00, &
     & 0.5209700E+00, 0.4510900E+00, 0.4383600E+00, 0.4920400E+00, &
     & 0.5741405E+00, 0.5635146E+00, 0.5162696E+00, 0.5162696E+00 /
      data (ref_adm(37,iz,24,12),iz = 1,20) / &
     & 0.5171500E+00, 0.5171500E+00, 0.5285700E+00, 0.5294000E+00, &
     & 0.5280600E+00, 0.5443100E+00, 0.5163900E+00, 0.5356500E+00, &
     & 0.5364100E+00, 0.5252200E+00, 0.5105200E+00, 0.5202700E+00, &
     & 0.5284900E+00, 0.4478000E+00, 0.4773900E+00, 0.4997100E+00, &
     & 0.4195900E+00, 0.5570375E+00, 0.5183911E+00, 0.5183911E+00 /
      data (ref_adm(37,iz,25,12),iz = 1,20) / &
     & 0.5181000E+00, 0.5181000E+00, 0.5215900E+00, 0.5222200E+00, &
     & 0.5277900E+00, 0.5283300E+00, 0.5453600E+00, 0.5191500E+00, &
     & 0.5283100E+00, 0.5268400E+00, 0.5294400E+00, 0.5310900E+00, &
     & 0.5160900E+00, 0.5206800E+00, 0.4845700E+00, 0.4902800E+00, &
     & 0.4534600E+00, 0.4761800E+00, 0.5223345E+00, 0.5223345E+00 /
      data (ref_adm(37,iz,26,12),iz = 1,20) / &
     & 0.5180100E+00, 0.5180100E+00, 0.5265300E+00, 0.5293500E+00, &
     & 0.5284000E+00, 0.5275400E+00, 0.5321100E+00, 0.5385000E+00, &
     & 0.5380700E+00, 0.5330700E+00, 0.5236900E+00, 0.5154400E+00, &
     & 0.5102400E+00, 0.5429000E+00, 0.5320100E+00, 0.5167600E+00, &
     & 0.4471900E+00, 0.5521724E+00, 0.5298039E+00, 0.5298039E+00 /
      data (ref_adm(37,iz,27,12),iz = 1,20) / &
     & 0.5265200E+00, 0.5265200E+00, 0.5081600E+00, 0.5281000E+00, &
     & 0.5218700E+00, 0.5102900E+00, 0.5041700E+00, 0.5329000E+00, &
     & 0.5558400E+00, 0.5659300E+00, 0.5632600E+00, 0.5651100E+00, &
     & 0.5646100E+00, 0.5599300E+00, 0.5466300E+00, 0.5224400E+00, &
     & 0.4835700E+00, 0.5556183E+00, 0.5400326E+00, 0.5400326E+00 /
      data (ref_adm(37,iz,28,12),iz = 1,20) / &
     & 0.5220200E+00, 0.5220200E+00, 0.5162900E+00, 0.5247700E+00, &
     & 0.5217300E+00, 0.5259500E+00, 0.5332500E+00, 0.5327300E+00, &
     & 0.5549800E+00, 0.5454200E+00, 0.5261400E+00, 0.5348800E+00, &
     & 0.5431300E+00, 0.5727600E+00, 0.5479600E+00, 0.5350600E+00, &
     & 0.4742300E+00, 0.5600327E+00, 0.5518454E+00, 0.5518454E+00 /
      data (ref_adm(37,iz,29,12),iz = 1,20) / &
     & 0.5296100E+00, 0.5296100E+00, 0.5407000E+00, 0.5359800E+00, &
     & 0.5353000E+00, 0.5360100E+00, 0.5352700E+00, 0.5358400E+00, &
     & 0.5330500E+00, 0.5525200E+00, 0.5187500E+00, 0.5462900E+00, &
     & 0.5485400E+00, 0.5628000E+00, 0.5499100E+00, 0.5524500E+00, &
     & 0.5132500E+00, 0.5681352E+00, 0.5644305E+00, 0.5644305E+00 /
      data (ref_adm(37,iz,30,12),iz = 1,20) / &
     & 0.5269400E+00, 0.5269400E+00, 0.5386800E+00, 0.5478600E+00, &
     & 0.5410200E+00, 0.5408300E+00, 0.5451300E+00, 0.5457000E+00, &
     & 0.5339400E+00, 0.5120200E+00, 0.5209200E+00, 0.5296500E+00, &
     & 0.5270700E+00, 0.5511600E+00, 0.5649400E+00, 0.5575500E+00, &
     & 0.5002700E+00, 0.5779532E+00, 0.5785314E+00, 0.5785314E+00 /
      data (ref_adm(37,iz,31,12),iz = 1,20) / &
     & 0.5259500E+00, 0.5259500E+00, 0.5271400E+00, 0.5365200E+00, &
     & 0.5350000E+00, 0.5358100E+00, 0.5485800E+00, 0.5455800E+00, &
     & 0.5417400E+00, 0.5441300E+00, 0.5502700E+00, 0.5609300E+00, &
     & 0.5637100E+00, 0.5603400E+00, 0.5607000E+00, 0.5632700E+00, &
     & 0.5320100E+00, 0.4392800E+00, 0.5928835E+00, 0.5928835E+00 /
      data (ref_adm(37,iz,32,12),iz = 1,20) / &
     & 0.5241200E+00, 0.5241200E+00, 0.5178100E+00, 0.5125600E+00, &
     & 0.5130100E+00, 0.5122800E+00, 0.5202500E+00, 0.5358700E+00, &
     & 0.5378100E+00, 0.5493400E+00, 0.5519800E+00, 0.5511600E+00, &
     & 0.5570800E+00, 0.5920800E+00, 0.6015900E+00, 0.5871500E+00, &
     & 0.5828000E+00, 0.6024395E+00, 0.3608100E+00, 0.3608100E+00 /
      data (ref_adm(37,iz,33,12),iz = 1,20) / &
     & 0.5073600E+00, 0.5073600E+00, 0.5013000E+00, 0.5425100E+00, &
     & 0.5470500E+00, 0.5479700E+00, 0.5307100E+00, 0.5471100E+00, &
     & 0.5622600E+00, 0.5688700E+00, 0.5871500E+00, 0.5750300E+00, &
     & 0.5715900E+00, 0.5840700E+00, 0.5711900E+00, 0.5745800E+00, &
     & 0.5535700E+00, 0.6146545E+00, 0.6203828E+00, 0.6203828E+00 /
      data (ref_adm(37,iz,34,12),iz = 1,20) / &
     & 0.5138400E+00, 0.5138400E+00, 0.5178700E+00, 0.5313500E+00, &
     & 0.5513500E+00, 0.5499600E+00, 0.5251100E+00, 0.5561000E+00, &
     & 0.5471200E+00, 0.5537000E+00, 0.5665000E+00, 0.5891400E+00, &
     & 0.5745800E+00, 0.5658700E+00, 0.6023200E+00, 0.5781700E+00, &
     & 0.5430400E+00, 0.6223478E+00, 0.6319606E+00, 0.6319606E+00 /
      data (ref_adm(37,iz,35,12),iz = 1,20) / &
     & 0.5136300E+00, 0.5136300E+00, 0.5259100E+00, 0.5332400E+00, &
     & 0.5331900E+00, 0.5289100E+00, 0.5486400E+00, 0.5389100E+00, &
     & 0.5361200E+00, 0.5433300E+00, 0.5521800E+00, 0.5857300E+00, &
     & 0.5939500E+00, 0.5849900E+00, 0.5607500E+00, 0.5955900E+00, &
     & 0.6512000E+00, 0.6230533E+00, 0.6409209E+00, 0.6409209E+00 /
      data (ref_adm(37,iz,36,12),iz = 1,20) / &
     & 0.5285100E+00, 0.5285100E+00, 0.5201000E+00, 0.5269400E+00, &
     & 0.5311400E+00, 0.5299000E+00, 0.5403900E+00, 0.5368300E+00, &
     & 0.5391200E+00, 0.5490700E+00, 0.5547800E+00, 0.5846600E+00, &
     & 0.6078700E+00, 0.6178800E+00, 0.5592500E+00, 0.5381800E+00, &
     & 0.5960322E+00, 0.6202601E+00, 0.6457911E+00, 0.6457911E+00 /
      data (ref_adm(37,iz,37,12),iz = 1,20) / &
     & 0.5263500E+00, 0.5263500E+00, 0.5289200E+00, 0.5265300E+00, &
     & 0.5248400E+00, 0.5205800E+00, 0.5168200E+00, 0.5021100E+00, &
     & 0.5388700E+00, 0.5514900E+00, 0.5670900E+00, 0.5857700E+00, &
     & 0.5971000E+00, 0.5899700E+00, 0.6315400E+00, 0.6392000E+00, &
     & 0.5995600E+00, 0.6183711E+00, 0.6483114E+00, 0.6483114E+00 /
      data (ref_adm(37,iz,38,12),iz = 1,20) / &
     & 0.5263500E+00, 0.5263500E+00, 0.5289200E+00, 0.5265300E+00, &
     & 0.5248400E+00, 0.5205800E+00, 0.5168200E+00, 0.5021100E+00, &
     & 0.5388700E+00, 0.5514900E+00, 0.5670900E+00, 0.5857700E+00, &
     & 0.5971000E+00, 0.5899700E+00, 0.6315400E+00, 0.6392000E+00, &
     & 0.5995600E+00, 0.6183711E+00, 0.6483114E+00, 0.6483114E+00 /
! Solar Zenith Angle 60.0 Albedo  0.5391547E+00
      data (ref_adm(37,iz, 1,13),iz = 1,20) / &
     & 0.4687400E+00, 0.4687400E+00, 0.4702900E+00, 0.4851900E+00, &
     & 0.4942500E+00, 0.5267200E+00, 0.5253500E+00, 0.5069300E+00, &
     & 0.5416000E+00, 0.5444900E+00, 0.5622700E+00, 0.5746100E+00, &
     & 0.6146100E+00, 0.6900900E+00, 0.7145800E+00, 0.6761400E+00, &
     & 0.8535800E+00, 0.8290800E+00, 0.6881955E+00, 0.6881955E+00 /
      data (ref_adm(37,iz, 2,13),iz = 1,20) / &
     & 0.4687400E+00, 0.4687400E+00, 0.4702900E+00, 0.4851900E+00, &
     & 0.4942500E+00, 0.5267200E+00, 0.5253500E+00, 0.5069300E+00, &
     & 0.5416000E+00, 0.5444900E+00, 0.5622700E+00, 0.5746100E+00, &
     & 0.6146100E+00, 0.6900900E+00, 0.7145800E+00, 0.6761400E+00, &
     & 0.8535800E+00, 0.8290800E+00, 0.6881955E+00, 0.6881955E+00 /
      data (ref_adm(37,iz, 3,13),iz = 1,20) / &
     & 0.4930500E+00, 0.4930500E+00, 0.4892500E+00, 0.4894600E+00, &
     & 0.4981600E+00, 0.5087700E+00, 0.5074700E+00, 0.5231000E+00, &
     & 0.5323200E+00, 0.5308200E+00, 0.5414700E+00, 0.5757600E+00, &
     & 0.6003300E+00, 0.6235600E+00, 0.6740400E+00, 0.7500200E+00, &
     & 0.7852900E+00, 0.7403400E+00, 0.4788867E+00, 0.4788867E+00 /
      data (ref_adm(37,iz, 4,13),iz = 1,20) / &
     & 0.4880300E+00, 0.4880300E+00, 0.5012600E+00, 0.4905600E+00, &
     & 0.4822200E+00, 0.5054600E+00, 0.4947600E+00, 0.5271400E+00, &
     & 0.5201100E+00, 0.5139000E+00, 0.5484600E+00, 0.5865900E+00, &
     & 0.5766200E+00, 0.6422400E+00, 0.6127900E+00, 0.7409100E+00, &
     & 0.7356000E+00, 0.7954600E+00, 0.5782600E+00, 0.5782600E+00 /
      data (ref_adm(37,iz, 5,13),iz = 1,20) / &
     & 0.4799500E+00, 0.4799500E+00, 0.4859300E+00, 0.5028300E+00, &
     & 0.4882100E+00, 0.4833700E+00, 0.5048900E+00, 0.4953500E+00, &
     & 0.5090200E+00, 0.5493300E+00, 0.5509400E+00, 0.5766400E+00, &
     & 0.5925400E+00, 0.6562700E+00, 0.6408700E+00, 0.6347000E+00, &
     & 0.5632500E+00, 0.7740751E+00, 0.5971700E+00, 0.5971700E+00 /
      data (ref_adm(37,iz, 6,13),iz = 1,20) / &
     & 0.4936200E+00, 0.4936200E+00, 0.4900800E+00, 0.4864700E+00, &
     & 0.4860900E+00, 0.4815400E+00, 0.4813200E+00, 0.5086700E+00, &
     & 0.5232800E+00, 0.5320900E+00, 0.5385200E+00, 0.5490400E+00, &
     & 0.5843000E+00, 0.6002800E+00, 0.6030600E+00, 0.6012600E+00, &
     & 0.7254177E+00, 0.7572063E+00, 0.6295581E+00, 0.6295581E+00 /
      data (ref_adm(37,iz, 7,13),iz = 1,20) / &
     & 0.5038600E+00, 0.5038600E+00, 0.5090800E+00, 0.5043900E+00, &
     & 0.5075100E+00, 0.5334300E+00, 0.5426600E+00, 0.5407200E+00, &
     & 0.5474100E+00, 0.5700300E+00, 0.5709600E+00, 0.5937400E+00, &
     & 0.6426600E+00, 0.6516800E+00, 0.6736700E+00, 0.7376700E+00, &
     & 0.7034000E+00, 0.5576200E+00, 0.6214788E+00, 0.6214788E+00 /
      data (ref_adm(37,iz, 8,13),iz = 1,20) / &
     & 0.5143200E+00, 0.5143200E+00, 0.5185800E+00, 0.5210000E+00, &
     & 0.5260100E+00, 0.5309200E+00, 0.5309100E+00, 0.5417000E+00, &
     & 0.5510800E+00, 0.5547200E+00, 0.5724700E+00, 0.5895100E+00, &
     & 0.6222800E+00, 0.6265000E+00, 0.6267600E+00, 0.6559600E+00, &
     & 0.6596500E+00, 0.5986300E+00, 0.5982832E+00, 0.5982832E+00 /
      data (ref_adm(37,iz, 9,13),iz = 1,20) / &
     & 0.4856700E+00, 0.4856700E+00, 0.4939200E+00, 0.5010500E+00, &
     & 0.4911400E+00, 0.5019800E+00, 0.5018500E+00, 0.5028800E+00, &
     & 0.5000000E+00, 0.4973900E+00, 0.5149700E+00, 0.5530800E+00, &
     & 0.5867500E+00, 0.5693100E+00, 0.5831700E+00, 0.6323800E+00, &
     & 0.6212800E+00, 0.6528100E+00, 0.5694188E+00, 0.5694188E+00 /
      data (ref_adm(37,iz,10,13),iz = 1,20) / &
     & 0.5023000E+00, 0.5023000E+00, 0.4877100E+00, 0.4880300E+00, &
     & 0.4977800E+00, 0.4980900E+00, 0.5083100E+00, 0.5010600E+00, &
     & 0.5039100E+00, 0.5037800E+00, 0.4941100E+00, 0.5532000E+00, &
     & 0.5497100E+00, 0.5791300E+00, 0.5765400E+00, 0.7244700E+00, &
     & 0.7147600E+00, 0.6736000E+00, 0.5472676E+00, 0.5472676E+00 /
      data (ref_adm(37,iz,11,13),iz = 1,20) / &
     & 0.5101200E+00, 0.5101200E+00, 0.5072100E+00, 0.4993800E+00, &
     & 0.5000000E+00, 0.4931400E+00, 0.4949500E+00, 0.5045800E+00, &
     & 0.5075900E+00, 0.5057400E+00, 0.5142600E+00, 0.5509500E+00, &
     & 0.5380000E+00, 0.5883700E+00, 0.5762500E+00, 0.7076200E+00, &
     & 0.5629600E+00, 0.6228459E+00, 0.5294333E+00, 0.5294333E+00 /
      data (ref_adm(37,iz,12,13),iz = 1,20) / &
     & 0.5051500E+00, 0.5051500E+00, 0.4932800E+00, 0.4996300E+00, &
     & 0.4871100E+00, 0.4759600E+00, 0.4734100E+00, 0.4982400E+00, &
     & 0.5031100E+00, 0.4899700E+00, 0.5316900E+00, 0.5299500E+00, &
     & 0.5339600E+00, 0.5643600E+00, 0.5389700E+00, 0.5505800E+00, &
     & 0.6262123E+00, 0.6096296E+00, 0.5158897E+00, 0.5158897E+00 /
      data (ref_adm(37,iz,13,13),iz = 1,20) / &
     & 0.4818000E+00, 0.4818000E+00, 0.4846700E+00, 0.4926800E+00, &
     & 0.4948300E+00, 0.4861200E+00, 0.4924700E+00, 0.5013500E+00, &
     & 0.4949500E+00, 0.5339400E+00, 0.5324900E+00, 0.5381000E+00, &
     & 0.5286000E+00, 0.5495600E+00, 0.5781800E+00, 0.5814800E+00, &
     & 0.5792700E+00, 0.5982338E+00, 0.5041696E+00, 0.5041696E+00 /
      data (ref_adm(37,iz,14,13),iz = 1,20) / &
     & 0.5017200E+00, 0.5017200E+00, 0.5029300E+00, 0.5011600E+00, &
     & 0.4990200E+00, 0.4989900E+00, 0.5010600E+00, 0.4999500E+00, &
     & 0.5050800E+00, 0.5139400E+00, 0.5154400E+00, 0.5273700E+00, &
     & 0.5389500E+00, 0.5559000E+00, 0.5246300E+00, 0.6340300E+00, &
     & 0.5633500E+00, 0.5876331E+00, 0.4941002E+00, 0.4941002E+00 /
      data (ref_adm(37,iz,15,13),iz = 1,20) / &
     & 0.5026800E+00, 0.5026800E+00, 0.4876300E+00, 0.4877800E+00, &
     & 0.4863700E+00, 0.4873300E+00, 0.4911200E+00, 0.5036900E+00, &
     & 0.4919300E+00, 0.4884600E+00, 0.4878800E+00, 0.4977200E+00, &
     & 0.4886400E+00, 0.4744800E+00, 0.5875800E+00, 0.6273000E+00, &
     & 0.5444500E+00, 0.5389200E+00, 0.4840823E+00, 0.4840823E+00 /
      data (ref_adm(37,iz,16,13),iz = 1,20) / &
     & 0.4953400E+00, 0.4953400E+00, 0.4983200E+00, 0.5162300E+00, &
     & 0.5037100E+00, 0.4997800E+00, 0.4957700E+00, 0.4695300E+00, &
     & 0.4775900E+00, 0.4880300E+00, 0.5032200E+00, 0.5147700E+00, &
     & 0.5259000E+00, 0.5118000E+00, 0.5830800E+00, 0.5436000E+00, &
     & 0.5254200E+00, 0.5002900E+00, 0.4725583E+00, 0.4725583E+00 /
      data (ref_adm(37,iz,17,13),iz = 1,20) / &
     & 0.4975800E+00, 0.4975800E+00, 0.5041300E+00, 0.5024600E+00, &
     & 0.4930800E+00, 0.5056200E+00, 0.4911400E+00, 0.4980200E+00, &
     & 0.4840300E+00, 0.4862700E+00, 0.5277100E+00, 0.5319500E+00, &
     & 0.5473200E+00, 0.5349500E+00, 0.5721500E+00, 0.6088200E+00, &
     & 0.5064200E+00, 0.5458219E+00, 0.4621989E+00, 0.4621989E+00 /
      data (ref_adm(37,iz,18,13),iz = 1,20) / &
     & 0.4959100E+00, 0.4959100E+00, 0.5000500E+00, 0.4891700E+00, &
     & 0.4947000E+00, 0.4995000E+00, 0.5019800E+00, 0.5126500E+00, &
     & 0.4854000E+00, 0.5016500E+00, 0.5080000E+00, 0.5170200E+00, &
     & 0.5285000E+00, 0.5484900E+00, 0.5461500E+00, 0.5809400E+00, &
     & 0.5328726E+00, 0.5055626E+00, 0.4218111E+00, 0.4218111E+00 /
      data (ref_adm(37,iz,19,13),iz = 1,20) / &
     & 0.4951200E+00, 0.4951200E+00, 0.4973300E+00, 0.5060000E+00, &
     & 0.4997100E+00, 0.5084600E+00, 0.5049500E+00, 0.5008700E+00, &
     & 0.5011000E+00, 0.5265400E+00, 0.4967100E+00, 0.5070600E+00, &
     & 0.5292900E+00, 0.5309100E+00, 0.4805600E+00, 0.5611400E+00, &
     & 0.5240737E+00, 0.4968962E+00, 0.4156161E+00, 0.4156161E+00 /
      data (ref_adm(37,iz,20,13),iz = 1,20) / &
     & 0.5015400E+00, 0.5015400E+00, 0.5008700E+00, 0.5019400E+00, &
     & 0.4948400E+00, 0.5065300E+00, 0.5162000E+00, 0.5078600E+00, &
     & 0.5206500E+00, 0.5207100E+00, 0.4968800E+00, 0.5042800E+00, &
     & 0.5193500E+00, 0.5174500E+00, 0.5315600E+00, 0.5655700E+00, &
     & 0.5154349E+00, 0.4887168E+00, 0.4115329E+00, 0.4115329E+00 /
      data (ref_adm(37,iz,21,13),iz = 1,20) / &
     & 0.5045100E+00, 0.5045100E+00, 0.4901500E+00, 0.4983300E+00, &
     & 0.5083200E+00, 0.4987300E+00, 0.5205600E+00, 0.5264600E+00, &
     & 0.5138100E+00, 0.5039900E+00, 0.5093500E+00, 0.5377800E+00, &
     & 0.5382200E+00, 0.5367400E+00, 0.5115000E+00, 0.4703100E+00, &
     & 0.5075675E+00, 0.4806850E+00, 0.4082470E+00, 0.4082470E+00 /
      data (ref_adm(37,iz,22,13),iz = 1,20) / &
     & 0.4978200E+00, 0.4978200E+00, 0.4989500E+00, 0.4995400E+00, &
     & 0.5050800E+00, 0.4980900E+00, 0.4997500E+00, 0.5227300E+00, &
     & 0.5228000E+00, 0.5251100E+00, 0.5235000E+00, 0.5257800E+00, &
     & 0.5198300E+00, 0.4991200E+00, 0.5357100E+00, 0.4627700E+00, &
     & 0.5990492E+00, 0.5837379E+00, 0.5247086E+00, 0.5247086E+00 /
      data (ref_adm(37,iz,23,13),iz = 1,20) / &
     & 0.5116000E+00, 0.5116000E+00, 0.4940000E+00, 0.4909300E+00, &
     & 0.5166400E+00, 0.5069000E+00, 0.5179000E+00, 0.5115400E+00, &
     & 0.5263600E+00, 0.5116600E+00, 0.4890200E+00, 0.5094700E+00, &
     & 0.4839900E+00, 0.5124500E+00, 0.5157400E+00, 0.4655800E+00, &
     & 0.5883676E+00, 0.5725907E+00, 0.5225127E+00, 0.5225127E+00 /
      data (ref_adm(37,iz,24,13),iz = 1,20) / &
     & 0.4881900E+00, 0.4881900E+00, 0.4747400E+00, 0.4682800E+00, &
     & 0.4808900E+00, 0.4815200E+00, 0.5040400E+00, 0.5054600E+00, &
     & 0.5089200E+00, 0.5223900E+00, 0.5449900E+00, 0.5339500E+00, &
     & 0.5142900E+00, 0.4769600E+00, 0.5058700E+00, 0.5174200E+00, &
     & 0.4724400E+00, 0.5647709E+00, 0.5232197E+00, 0.5232197E+00 /
      data (ref_adm(37,iz,25,13),iz = 1,20) / &
     & 0.4957800E+00, 0.4957800E+00, 0.5033200E+00, 0.5042400E+00, &
     & 0.5076900E+00, 0.5074000E+00, 0.5186600E+00, 0.5178200E+00, &
     & 0.5200500E+00, 0.5130200E+00, 0.5288800E+00, 0.5251300E+00, &
     & 0.5063400E+00, 0.5161700E+00, 0.5246400E+00, 0.5074600E+00, &
     & 0.4879900E+00, 0.5585685E+00, 0.5257701E+00, 0.5257701E+00 /
      data (ref_adm(37,iz,26,13),iz = 1,20) / &
     & 0.4986000E+00, 0.4986000E+00, 0.4957000E+00, 0.4953400E+00, &
     & 0.5084800E+00, 0.5126600E+00, 0.5165500E+00, 0.5229600E+00, &
     & 0.5332400E+00, 0.5370100E+00, 0.5434100E+00, 0.5524200E+00, &
     & 0.5438000E+00, 0.5404000E+00, 0.5084100E+00, 0.5089000E+00, &
     & 0.4905900E+00, 0.5265000E+00, 0.5321649E+00, 0.5321649E+00 /
      data (ref_adm(37,iz,27,13),iz = 1,20) / &
     & 0.5072300E+00, 0.5072300E+00, 0.5222600E+00, 0.5077800E+00, &
     & 0.5123400E+00, 0.5214800E+00, 0.5114800E+00, 0.5189100E+00, &
     & 0.5497700E+00, 0.5372600E+00, 0.5511200E+00, 0.5605200E+00, &
     & 0.5733200E+00, 0.5634200E+00, 0.5514500E+00, 0.5178800E+00, &
     & 0.5211000E+00, 0.5608997E+00, 0.5416799E+00, 0.5416799E+00 /
      data (ref_adm(37,iz,28,13),iz = 1,20) / &
     & 0.4999800E+00, 0.4999800E+00, 0.4848100E+00, 0.5194600E+00, &
     & 0.5194000E+00, 0.5133400E+00, 0.5077000E+00, 0.5284200E+00, &
     & 0.5407600E+00, 0.5621700E+00, 0.5516200E+00, 0.5515300E+00, &
     & 0.5489700E+00, 0.5416300E+00, 0.5480300E+00, 0.5135600E+00, &
     & 0.4801600E+00, 0.5649784E+00, 0.4186600E+00, 0.4186600E+00 /
      data (ref_adm(37,iz,29,13),iz = 1,20) / &
     & 0.5120000E+00, 0.5120000E+00, 0.4913700E+00, 0.4769000E+00, &
     & 0.5144900E+00, 0.5182300E+00, 0.5107100E+00, 0.5232600E+00, &
     & 0.5416500E+00, 0.5457600E+00, 0.5377500E+00, 0.5684300E+00, &
     & 0.5804600E+00, 0.5475900E+00, 0.5691400E+00, 0.5280600E+00, &
     & 0.4965300E+00, 0.5732291E+00, 0.5650833E+00, 0.5650833E+00 /
      data (ref_adm(37,iz,30,13),iz = 1,20) / &
     & 0.5078900E+00, 0.5078900E+00, 0.5100300E+00, 0.5115000E+00, &
     & 0.5026200E+00, 0.5182800E+00, 0.5221100E+00, 0.5083600E+00, &
     & 0.5221200E+00, 0.5290800E+00, 0.5452800E+00, 0.5512900E+00, &
     & 0.5699700E+00, 0.5749000E+00, 0.5720300E+00, 0.5604000E+00, &
     & 0.4211700E+00, 0.5835073E+00, 0.5790761E+00, 0.5790761E+00 /
      data (ref_adm(37,iz,31,13),iz = 1,20) / &
     & 0.4930000E+00, 0.4930000E+00, 0.5137100E+00, 0.5246300E+00, &
     & 0.5286500E+00, 0.5224000E+00, 0.5295800E+00, 0.5364500E+00, &
     & 0.5416100E+00, 0.5446600E+00, 0.5654400E+00, 0.5800000E+00, &
     & 0.5885300E+00, 0.5685000E+00, 0.5671500E+00, 0.5676100E+00, &
     & 0.5500600E+00, 0.5964706E+00, 0.5934943E+00, 0.5934943E+00 /
      data (ref_adm(37,iz,32,13),iz = 1,20) / &
     & 0.5178300E+00, 0.5178300E+00, 0.5122000E+00, 0.5218300E+00, &
     & 0.5343700E+00, 0.5370100E+00, 0.5386800E+00, 0.5488100E+00, &
     & 0.5531900E+00, 0.5680900E+00, 0.5796500E+00, 0.5877400E+00, &
     & 0.6031300E+00, 0.6033100E+00, 0.6046900E+00, 0.6392800E+00, &
     & 0.6121000E+00, 0.6099765E+00, 0.6082613E+00, 0.6082613E+00 /
      data (ref_adm(37,iz,33,13),iz = 1,20) / &
     & 0.5029500E+00, 0.5029500E+00, 0.4972600E+00, 0.4928600E+00, &
     & 0.4936700E+00, 0.5058700E+00, 0.5075600E+00, 0.5280500E+00, &
     & 0.5299400E+00, 0.5479700E+00, 0.5544000E+00, 0.5799400E+00, &
     & 0.5805100E+00, 0.6024300E+00, 0.5663800E+00, 0.5431700E+00, &
     & 0.5227600E+00, 0.6233196E+00, 0.6217156E+00, 0.6217156E+00 /
      data (ref_adm(37,iz,34,13),iz = 1,20) / &
     & 0.4899400E+00, 0.4899400E+00, 0.4775900E+00, 0.5005300E+00, &
     & 0.5053500E+00, 0.5092300E+00, 0.5180000E+00, 0.5157300E+00, &
     & 0.5427100E+00, 0.5515400E+00, 0.5718900E+00, 0.5787200E+00, &
     & 0.5915100E+00, 0.6053900E+00, 0.5817400E+00, 0.5865400E+00, &
     & 0.5666900E+00, 0.6313834E+00, 0.6337133E+00, 0.6337133E+00 /
      data (ref_adm(37,iz,35,13),iz = 1,20) / &
     & 0.4862600E+00, 0.4862600E+00, 0.4878000E+00, 0.4907700E+00, &
     & 0.5129300E+00, 0.5114700E+00, 0.4975400E+00, 0.5118200E+00, &
     & 0.5218800E+00, 0.5580000E+00, 0.5900700E+00, 0.5849900E+00, &
     & 0.5976800E+00, 0.6015100E+00, 0.6030800E+00, 0.5879000E+00, &
     & 0.6565900E+00, 0.6313748E+00, 0.6429362E+00, 0.6429362E+00 /
      data (ref_adm(37,iz,36,13),iz = 1,20) / &
     & 0.5001600E+00, 0.5001600E+00, 0.5086600E+00, 0.5039500E+00, &
     & 0.5042500E+00, 0.5135800E+00, 0.5215800E+00, 0.5334400E+00, &
     & 0.5536500E+00, 0.5501500E+00, 0.5813800E+00, 0.6047500E+00, &
     & 0.6094100E+00, 0.6209300E+00, 0.6178400E+00, 0.5976800E+00, &
     & 0.6534600E+00, 0.6275247E+00, 0.6477461E+00, 0.6477461E+00 /
      data (ref_adm(37,iz,37,13),iz = 1,20) / &
     & 0.4857900E+00, 0.4857900E+00, 0.5033100E+00, 0.5058300E+00, &
     & 0.4970700E+00, 0.4967200E+00, 0.5164400E+00, 0.5388300E+00, &
     & 0.5375700E+00, 0.5277700E+00, 0.5833200E+00, 0.5857500E+00, &
     & 0.6285200E+00, 0.6230200E+00, 0.6330300E+00, 0.6137500E+00, &
     & 0.6514000E+00, 0.6250481E+00, 0.6501005E+00, 0.6501005E+00 /
      data (ref_adm(37,iz,38,13),iz = 1,20) / &
     & 0.4857900E+00, 0.4857900E+00, 0.5033100E+00, 0.5058300E+00, &
     & 0.4970700E+00, 0.4967200E+00, 0.5164400E+00, 0.5388300E+00, &
     & 0.5375700E+00, 0.5277700E+00, 0.5833200E+00, 0.5857500E+00, &
     & 0.6285200E+00, 0.6230200E+00, 0.6330300E+00, 0.6137500E+00, &
     & 0.6514000E+00, 0.6250481E+00, 0.6501005E+00, 0.6501005E+00 /
! Solar Zenith Angle 65.0 Albedo  0.5347032E+00
      data (ref_adm(37,iz, 1,14),iz = 1,20) / &
     & 0.4550900E+00, 0.4550900E+00, 0.4711500E+00, 0.4832100E+00, &
     & 0.4809500E+00, 0.4906300E+00, 0.4850700E+00, 0.5169200E+00, &
     & 0.5114100E+00, 0.5480800E+00, 0.6043800E+00, 0.6307000E+00, &
     & 0.6681800E+00, 0.7040300E+00, 0.8513500E+00, 0.8315800E+00, &
     & 0.9324900E+00, 0.8882621E+00, 0.7005824E+00, 0.7005824E+00 /
      data (ref_adm(37,iz, 2,14),iz = 1,20) / &
     & 0.4550900E+00, 0.4550900E+00, 0.4711500E+00, 0.4832100E+00, &
     & 0.4809500E+00, 0.4906300E+00, 0.4850700E+00, 0.5169200E+00, &
     & 0.5114100E+00, 0.5480800E+00, 0.6043800E+00, 0.6307000E+00, &
     & 0.6681800E+00, 0.7040300E+00, 0.8513500E+00, 0.8315800E+00, &
     & 0.9324900E+00, 0.8882621E+00, 0.7005824E+00, 0.7005824E+00 /
      data (ref_adm(37,iz, 3,14),iz = 1,20) / &
     & 0.4671500E+00, 0.4671500E+00, 0.4807200E+00, 0.4818600E+00, &
     & 0.4870000E+00, 0.4852600E+00, 0.4844200E+00, 0.4938600E+00, &
     & 0.5140400E+00, 0.5263500E+00, 0.5735500E+00, 0.6160600E+00, &
     & 0.6413900E+00, 0.6848600E+00, 0.7231300E+00, 0.8031500E+00, &
     & 0.9286100E+00, 0.8794096E+00, 0.4016375E+00, 0.4016375E+00 /
      data (ref_adm(37,iz, 4,14),iz = 1,20) / &
     & 0.4729200E+00, 0.4729200E+00, 0.4697200E+00, 0.4574900E+00, &
     & 0.4706700E+00, 0.4809000E+00, 0.4989100E+00, 0.4926600E+00, &
     & 0.5085700E+00, 0.5445000E+00, 0.5790900E+00, 0.6296900E+00, &
     & 0.6375300E+00, 0.6620200E+00, 0.7144300E+00, 0.7298200E+00, &
     & 0.8334700E+00, 0.8622107E+00, 0.6760277E+00, 0.6760277E+00 /
      data (ref_adm(37,iz, 5,14),iz = 1,20) / &
     & 0.4732100E+00, 0.4732100E+00, 0.4617800E+00, 0.4756500E+00, &
     & 0.4724900E+00, 0.4767400E+00, 0.4862900E+00, 0.5006800E+00, &
     & 0.5119900E+00, 0.5277000E+00, 0.5408500E+00, 0.5663900E+00, &
     & 0.6330300E+00, 0.6529900E+00, 0.6852500E+00, 0.7133100E+00, &
     & 0.6854600E+00, 0.7798800E+00, 0.6555266E+00, 0.6555266E+00 /
      data (ref_adm(37,iz, 6,14),iz = 1,20) / &
     & 0.4597400E+00, 0.4597400E+00, 0.4614600E+00, 0.4597700E+00, &
     & 0.4600600E+00, 0.4628700E+00, 0.4776100E+00, 0.4901900E+00, &
     & 0.5006800E+00, 0.5320500E+00, 0.5408100E+00, 0.5630700E+00, &
     & 0.5861200E+00, 0.6543700E+00, 0.6916700E+00, 0.7231700E+00, &
     & 0.7903153E+00, 0.8077381E+00, 0.6348764E+00, 0.6348764E+00 /
      data (ref_adm(37,iz, 7,14),iz = 1,20) / &
     & 0.4740200E+00, 0.4740200E+00, 0.4713600E+00, 0.4805500E+00, &
     & 0.4891400E+00, 0.4899300E+00, 0.5054900E+00, 0.5111000E+00, &
     & 0.5174100E+00, 0.5382700E+00, 0.5535400E+00, 0.5619200E+00, &
     & 0.5854500E+00, 0.6130000E+00, 0.6404200E+00, 0.6550500E+00, &
     & 0.6795000E+00, 0.7661642E+00, 0.6152026E+00, 0.6152026E+00 /
      data (ref_adm(37,iz, 8,14),iz = 1,20) / &
     & 0.4752400E+00, 0.4752400E+00, 0.4605800E+00, 0.4643900E+00, &
     & 0.4712100E+00, 0.4953900E+00, 0.5098100E+00, 0.5162800E+00, &
     & 0.5366100E+00, 0.5606500E+00, 0.5598100E+00, 0.5613100E+00, &
     & 0.5822800E+00, 0.5826700E+00, 0.6064900E+00, 0.6843700E+00, &
     & 0.7241600E+00, 0.7228867E+00, 0.5873405E+00, 0.5873405E+00 /
      data (ref_adm(37,iz, 9,14),iz = 1,20) / &
     & 0.4793800E+00, 0.4793800E+00, 0.4711400E+00, 0.4715600E+00, &
     & 0.4864700E+00, 0.5039400E+00, 0.5132700E+00, 0.5228200E+00, &
     & 0.5364100E+00, 0.5321300E+00, 0.5412500E+00, 0.5451900E+00, &
     & 0.5663400E+00, 0.5612400E+00, 0.5700500E+00, 0.4541200E+00, &
     & 0.5869300E+00, 0.6832755E+00, 0.5580541E+00, 0.5580541E+00 /
      data (ref_adm(37,iz,10,14),iz = 1,20) / &
     & 0.4698800E+00, 0.4698800E+00, 0.4839400E+00, 0.4959500E+00, &
     & 0.4855900E+00, 0.4932300E+00, 0.5013000E+00, 0.5258100E+00, &
     & 0.5300800E+00, 0.5317500E+00, 0.5287500E+00, 0.5395300E+00, &
     & 0.5557600E+00, 0.5373800E+00, 0.5381500E+00, 0.6437800E+00, &
     & 0.6151500E+00, 0.6384600E+00, 0.5328093E+00, 0.5328093E+00 /
      data (ref_adm(37,iz,11,14),iz = 1,20) / &
     & 0.4730000E+00, 0.4730000E+00, 0.4889200E+00, 0.4898300E+00, &
     & 0.4983100E+00, 0.4934200E+00, 0.5087000E+00, 0.5120300E+00, &
     & 0.5124200E+00, 0.5218600E+00, 0.5148700E+00, 0.5421400E+00, &
     & 0.5750000E+00, 0.5627400E+00, 0.5601700E+00, 0.5467600E+00, &
     & 0.5941200E+00, 0.5789900E+00, 0.5105523E+00, 0.5105523E+00 /
      data (ref_adm(37,iz,12,14),iz = 1,20) / &
     & 0.4706100E+00, 0.4706100E+00, 0.4881500E+00, 0.4950500E+00, &
     & 0.4817600E+00, 0.5016700E+00, 0.5142500E+00, 0.5180500E+00, &
     & 0.4999300E+00, 0.5083700E+00, 0.5169000E+00, 0.5409500E+00, &
     & 0.5736300E+00, 0.5267700E+00, 0.5489600E+00, 0.5513200E+00, &
     & 0.5984400E+00, 0.5920419E+00, 0.4916548E+00, 0.4916548E+00 /
      data (ref_adm(37,iz,13,14),iz = 1,20) / &
     & 0.4796900E+00, 0.4796900E+00, 0.4887800E+00, 0.4851200E+00, &
     & 0.4901800E+00, 0.4978100E+00, 0.5001000E+00, 0.5014800E+00, &
     & 0.4870000E+00, 0.5069300E+00, 0.5001600E+00, 0.5255300E+00, &
     & 0.5389600E+00, 0.5381800E+00, 0.5478400E+00, 0.5756600E+00, &
     & 0.6019500E+00, 0.5693753E+00, 0.4749817E+00, 0.4749817E+00 /
      data (ref_adm(37,iz,14,14),iz = 1,20) / &
     & 0.4802000E+00, 0.4802000E+00, 0.4792300E+00, 0.4810900E+00, &
     & 0.4839300E+00, 0.4823500E+00, 0.4900700E+00, 0.4922100E+00, &
     & 0.4977900E+00, 0.5075400E+00, 0.5124900E+00, 0.5149000E+00, &
     & 0.5355800E+00, 0.5336600E+00, 0.5552700E+00, 0.5915000E+00, &
     & 0.5071400E+00, 0.5497040E+00, 0.4606706E+00, 0.4606706E+00 /
      data (ref_adm(37,iz,15,14),iz = 1,20) / &
     & 0.4816900E+00, 0.4816900E+00, 0.4730300E+00, 0.4766700E+00, &
     & 0.4776700E+00, 0.4799600E+00, 0.4853700E+00, 0.4921300E+00, &
     & 0.4923800E+00, 0.4892200E+00, 0.4959800E+00, 0.5070000E+00, &
     & 0.5114300E+00, 0.5209000E+00, 0.5364300E+00, 0.5316300E+00, &
     & 0.5538706E+00, 0.5305184E+00, 0.4478019E+00, 0.4478019E+00 /
      data (ref_adm(37,iz,16,14),iz = 1,20) / &
     & 0.4689800E+00, 0.4689800E+00, 0.4632500E+00, 0.4712100E+00, &
     & 0.4748000E+00, 0.4673700E+00, 0.4753800E+00, 0.4722400E+00, &
     & 0.4839100E+00, 0.4841600E+00, 0.4973600E+00, 0.5059400E+00, &
     & 0.5074400E+00, 0.5042100E+00, 0.5175700E+00, 0.5887100E+00, &
     & 0.5334100E+00, 0.5135687E+00, 0.4358577E+00, 0.4358577E+00 /
      data (ref_adm(37,iz,17,14),iz = 1,20) / &
     & 0.4783000E+00, 0.4783000E+00, 0.4863500E+00, 0.4788700E+00, &
     & 0.4604300E+00, 0.4805900E+00, 0.4899500E+00, 0.4945300E+00, &
     & 0.4954300E+00, 0.4817200E+00, 0.4883800E+00, 0.5033100E+00, &
     & 0.5024000E+00, 0.4840000E+00, 0.5251300E+00, 0.5283733E+00, &
     & 0.5019400E+00, 0.4985890E+00, 0.4258413E+00, 0.4258413E+00 /
      data (ref_adm(37,iz,18,14),iz = 1,20) / &
     & 0.4811000E+00, 0.4811000E+00, 0.4795400E+00, 0.4747800E+00, &
     & 0.4839300E+00, 0.4750100E+00, 0.4925800E+00, 0.4975300E+00, &
     & 0.4936200E+00, 0.5109300E+00, 0.5101700E+00, 0.5103400E+00, &
     & 0.4905900E+00, 0.5033200E+00, 0.4984200E+00, 0.5235183E+00, &
     & 0.5172259E+00, 0.4981112E+00, 0.4436104E+00, 0.4436104E+00 /
      data (ref_adm(37,iz,19,14),iz = 1,20) / &
     & 0.4718000E+00, 0.4718000E+00, 0.4740100E+00, 0.4750100E+00, &
     & 0.4784900E+00, 0.4875300E+00, 0.4939500E+00, 0.5044100E+00, &
     & 0.5047500E+00, 0.5181800E+00, 0.5110700E+00, 0.5251700E+00, &
     & 0.5048100E+00, 0.5187900E+00, 0.5038600E+00, 0.4387000E+00, &
     & 0.5101324E+00, 0.4900817E+00, 0.4374768E+00, 0.4374768E+00 /
      data (ref_adm(37,iz,20,14),iz = 1,20) / &
     & 0.4832000E+00, 0.4832000E+00, 0.4791300E+00, 0.4721700E+00, &
     & 0.4861500E+00, 0.4910500E+00, 0.4874500E+00, 0.5067400E+00, &
     & 0.5120000E+00, 0.5134600E+00, 0.4985900E+00, 0.5188700E+00, &
     & 0.5109800E+00, 0.4970300E+00, 0.4915400E+00, 0.4540600E+00, &
     & 0.5051246E+00, 0.4848534E+00, 0.4344253E+00, 0.4344253E+00 /
      data (ref_adm(37,iz,21,14),iz = 1,20) / &
     & 0.4900700E+00, 0.4900700E+00, 0.4729400E+00, 0.4692500E+00, &
     & 0.4823300E+00, 0.4838700E+00, 0.4942700E+00, 0.4991800E+00, &
     & 0.5206300E+00, 0.5135200E+00, 0.5262500E+00, 0.5205400E+00, &
     & 0.5216400E+00, 0.5148500E+00, 0.5202700E+00, 0.5579700E+00, &
     & 0.5020522E+00, 0.4813299E+00, 0.4335048E+00, 0.4335048E+00 /
      data (ref_adm(37,iz,22,14),iz = 1,20) / &
     & 0.4793500E+00, 0.4793500E+00, 0.4746600E+00, 0.4899000E+00, &
     & 0.4951500E+00, 0.4916900E+00, 0.4954900E+00, 0.5058400E+00, &
     & 0.5359200E+00, 0.5272400E+00, 0.5321800E+00, 0.5259800E+00, &
     & 0.5241400E+00, 0.5287500E+00, 0.5367100E+00, 0.5365400E+00, &
     & 0.6215931E+00, 0.6239616E+00, 0.5854397E+00, 0.5854397E+00 /
      data (ref_adm(37,iz,23,14),iz = 1,20) / &
     & 0.4829200E+00, 0.4829200E+00, 0.4929700E+00, 0.4928600E+00, &
     & 0.4945100E+00, 0.4860700E+00, 0.4811000E+00, 0.4936500E+00, &
     & 0.5027000E+00, 0.5140600E+00, 0.5297000E+00, 0.5278700E+00, &
     & 0.5171900E+00, 0.5249400E+00, 0.5432000E+00, 0.5045800E+00, &
     & 0.4879100E+00, 0.6117107E+00, 0.5837030E+00, 0.5837030E+00 /
      data (ref_adm(37,iz,24,14),iz = 1,20) / &
     & 0.4809600E+00, 0.4809600E+00, 0.4712300E+00, 0.4711100E+00, &
     & 0.4831900E+00, 0.4869500E+00, 0.4844000E+00, 0.4915300E+00, &
     & 0.4944400E+00, 0.4991800E+00, 0.5156000E+00, 0.5263100E+00, &
     & 0.5364900E+00, 0.5433600E+00, 0.5361300E+00, 0.5668500E+00, &
     & 0.5481600E+00, 0.6032133E+00, 0.5858957E+00, 0.5858957E+00 /
      data (ref_adm(37,iz,25,14),iz = 1,20) / &
     & 0.4876800E+00, 0.4876800E+00, 0.4871500E+00, 0.4944800E+00, &
     & 0.4970400E+00, 0.5011000E+00, 0.5079400E+00, 0.5092100E+00, &
     & 0.5273300E+00, 0.5319200E+00, 0.5356100E+00, 0.5430200E+00, &
     & 0.5506000E+00, 0.5721200E+00, 0.5653000E+00, 0.5489600E+00, &
     & 0.5654700E+00, 0.5236700E+00, 0.5905136E+00, 0.5905136E+00 /
      data (ref_adm(37,iz,26,14),iz = 1,20) / &
     & 0.4830000E+00, 0.4830000E+00, 0.4871100E+00, 0.4912400E+00, &
     & 0.4946400E+00, 0.5028500E+00, 0.5088000E+00, 0.5135600E+00, &
     & 0.5175600E+00, 0.5273800E+00, 0.5371500E+00, 0.5461000E+00, &
     & 0.5520600E+00, 0.5617200E+00, 0.5548400E+00, 0.5604800E+00, &
     & 0.5561900E+00, 0.5979759E+00, 0.6005545E+00, 0.6005545E+00 /
      data (ref_adm(37,iz,27,14),iz = 1,20) / &
     & 0.4825500E+00, 0.4825500E+00, 0.4753400E+00, 0.4764300E+00, &
     & 0.4696600E+00, 0.4789300E+00, 0.4970400E+00, 0.4892300E+00, &
     & 0.5091800E+00, 0.5196800E+00, 0.5118900E+00, 0.5300700E+00, &
     & 0.5620800E+00, 0.5655200E+00, 0.5830000E+00, 0.5638700E+00, &
     & 0.5826200E+00, 0.6030807E+00, 0.6143056E+00, 0.6143056E+00 /
      data (ref_adm(37,iz,28,14),iz = 1,20) / &
     & 0.4702700E+00, 0.4702700E+00, 0.4717300E+00, 0.4835900E+00, &
     & 0.4791100E+00, 0.4786700E+00, 0.4847600E+00, 0.4794000E+00, &
     & 0.5102400E+00, 0.5280500E+00, 0.5285400E+00, 0.5337200E+00, &
     & 0.5627500E+00, 0.5771300E+00, 0.5780300E+00, 0.5911800E+00, &
     & 0.5695100E+00, 0.5692100E+00, 0.4258700E+00, 0.4258700E+00 /
      data (ref_adm(37,iz,29,14),iz = 1,20) / &
     & 0.4778100E+00, 0.4778100E+00, 0.4806300E+00, 0.4792900E+00, &
     & 0.4943100E+00, 0.4839900E+00, 0.4774000E+00, 0.4793200E+00, &
     & 0.5105900E+00, 0.5316000E+00, 0.5481500E+00, 0.5236500E+00, &
     & 0.5440800E+00, 0.5828800E+00, 0.5642100E+00, 0.5922400E+00, &
     & 0.6026100E+00, 0.5064100E+00, 0.6472402E+00, 0.6472402E+00 /
      data (ref_adm(37,iz,30,14),iz = 1,20) / &
     & 0.4818100E+00, 0.4818100E+00, 0.4949100E+00, 0.4986500E+00, &
     & 0.4740900E+00, 0.4851500E+00, 0.4808000E+00, 0.5015300E+00, &
     & 0.5091600E+00, 0.5266100E+00, 0.5442000E+00, 0.5439800E+00, &
     & 0.5656900E+00, 0.5726000E+00, 0.5788000E+00, 0.6382800E+00, &
     & 0.6092100E+00, 0.6361207E+00, 0.6662878E+00, 0.6662878E+00 /
      data (ref_adm(37,iz,31,14),iz = 1,20) / &
     & 0.4824900E+00, 0.4824900E+00, 0.4877900E+00, 0.4829500E+00, &
     & 0.4926000E+00, 0.4960900E+00, 0.5006200E+00, 0.4999700E+00, &
     & 0.5149100E+00, 0.5357900E+00, 0.5586700E+00, 0.5338200E+00, &
     & 0.5708700E+00, 0.5914300E+00, 0.5846000E+00, 0.6005300E+00, &
     & 0.5807200E+00, 0.6538469E+00, 0.6868294E+00, 0.6868294E+00 /
      data (ref_adm(37,iz,32,14),iz = 1,20) / &
     & 0.4807700E+00, 0.4807700E+00, 0.4809700E+00, 0.4889400E+00, &
     & 0.4959300E+00, 0.4987300E+00, 0.5028100E+00, 0.5072100E+00, &
     & 0.5135300E+00, 0.5233300E+00, 0.5349900E+00, 0.5438800E+00, &
     & 0.5575900E+00, 0.5602000E+00, 0.5671000E+00, 0.5658600E+00, &
     & 0.6027600E+00, 0.5809300E+00, 0.7066500E+00, 0.7066500E+00 /
      data (ref_adm(37,iz,33,14),iz = 1,20) / &
     & 0.4754300E+00, 0.4754300E+00, 0.4705900E+00, 0.4891400E+00, &
     & 0.4855600E+00, 0.4935400E+00, 0.4948400E+00, 0.5080800E+00, &
     & 0.5126500E+00, 0.5136700E+00, 0.5430900E+00, 0.5700700E+00, &
     & 0.5731100E+00, 0.6057000E+00, 0.6155500E+00, 0.6102500E+00, &
     & 0.5984200E+00, 0.6874316E+00, 0.7251987E+00, 0.7251987E+00 /
      data (ref_adm(37,iz,34,14),iz = 1,20) / &
     & 0.4768100E+00, 0.4768100E+00, 0.4748600E+00, 0.4820500E+00, &
     & 0.4977600E+00, 0.5025300E+00, 0.5118400E+00, 0.5210300E+00, &
     & 0.5128500E+00, 0.5265700E+00, 0.5581600E+00, 0.5892000E+00, &
     & 0.5846500E+00, 0.6013800E+00, 0.5991000E+00, 0.6024200E+00, &
     & 0.6282800E+00, 0.6874387E+00, 0.7398596E+00, 0.7398596E+00 /
      data (ref_adm(37,iz,35,14),iz = 1,20) / &
     & 0.4659800E+00, 0.4659800E+00, 0.4656400E+00, 0.4601800E+00, &
     & 0.4753400E+00, 0.5027700E+00, 0.5055700E+00, 0.5063400E+00, &
     & 0.5285800E+00, 0.5572500E+00, 0.5549100E+00, 0.5676200E+00, &
     & 0.5895200E+00, 0.5944000E+00, 0.6175700E+00, 0.6206800E+00, &
     & 0.6779600E+00, 0.6790419E+00, 0.7471699E+00, 0.7471699E+00 /
      data (ref_adm(37,iz,36,14),iz = 1,20) / &
     & 0.4695700E+00, 0.4695700E+00, 0.4739200E+00, 0.4725100E+00, &
     & 0.4895500E+00, 0.4990300E+00, 0.5152400E+00, 0.5132000E+00, &
     & 0.5252300E+00, 0.5393400E+00, 0.5593700E+00, 0.5586100E+00, &
     & 0.5768000E+00, 0.6054400E+00, 0.6421600E+00, 0.6332700E+00, &
     & 0.6019600E+00, 0.6738911E+00, 0.7488677E+00, 0.7488677E+00 /
      data (ref_adm(37,iz,37,14),iz = 1,20) / &
     & 0.4615400E+00, 0.4615400E+00, 0.4752800E+00, 0.4800000E+00, &
     & 0.4851200E+00, 0.4965800E+00, 0.5175400E+00, 0.5230000E+00, &
     & 0.5105600E+00, 0.5417200E+00, 0.5374100E+00, 0.5565600E+00, &
     & 0.5703100E+00, 0.6011900E+00, 0.6617500E+00, 0.6663200E+00, &
     & 0.6584300E+00, 0.6730724E+00, 0.7494548E+00, 0.7494548E+00 /
      data (ref_adm(37,iz,38,14),iz = 1,20) / &
     & 0.4615400E+00, 0.4615400E+00, 0.4752800E+00, 0.4800000E+00, &
     & 0.4851200E+00, 0.4965800E+00, 0.5175400E+00, 0.5230000E+00, &
     & 0.5105600E+00, 0.5417200E+00, 0.5374100E+00, 0.5565600E+00, &
     & 0.5703100E+00, 0.6011900E+00, 0.6617500E+00, 0.6663200E+00, &
     & 0.6584300E+00, 0.6730724E+00, 0.7494548E+00, 0.7494548E+00 /
! Solar Zenith Angle 70.0 Albedo  0.5336845E+00
      data (ref_adm(37,iz, 1,15),iz = 1,20) / &
     & 0.4624300E+00, 0.4624300E+00, 0.4809200E+00, 0.4785400E+00, &
     & 0.4625300E+00, 0.4645100E+00, 0.4822900E+00, 0.4871200E+00, &
     & 0.5159100E+00, 0.5352600E+00, 0.5738500E+00, 0.6022900E+00, &
     & 0.6304800E+00, 0.6935500E+00, 0.7281900E+00, 0.6885600E+00, &
     & 0.8119364E+00, 0.8159635E+00, 0.6241819E+00, 0.6241819E+00 /
      data (ref_adm(37,iz, 2,15),iz = 1,20) / &
     & 0.4624300E+00, 0.4624300E+00, 0.4809200E+00, 0.4785400E+00, &
     & 0.4625300E+00, 0.4645100E+00, 0.4822900E+00, 0.4871200E+00, &
     & 0.5159100E+00, 0.5352600E+00, 0.5738500E+00, 0.6022900E+00, &
     & 0.6304800E+00, 0.6935500E+00, 0.7281900E+00, 0.6885600E+00, &
     & 0.8119364E+00, 0.8159635E+00, 0.6241819E+00, 0.6241819E+00 /
      data (ref_adm(37,iz, 3,15),iz = 1,20) / &
     & 0.4746300E+00, 0.4746300E+00, 0.4694000E+00, 0.4684200E+00, &
     & 0.4590600E+00, 0.4688200E+00, 0.4768600E+00, 0.5067100E+00, &
     & 0.5006500E+00, 0.5227600E+00, 0.5535600E+00, 0.5827600E+00, &
     & 0.6250100E+00, 0.6799100E+00, 0.6865300E+00, 0.8397900E+00, &
     & 0.8049486E+00, 0.8077292E+00, 0.2629279E+00, 0.2629279E+00 /
      data (ref_adm(37,iz, 4,15),iz = 1,20) / &
     & 0.4665100E+00, 0.4665100E+00, 0.4614000E+00, 0.4642200E+00, &
     & 0.4661900E+00, 0.4569200E+00, 0.4834200E+00, 0.4964300E+00, &
     & 0.5117300E+00, 0.5269100E+00, 0.5608000E+00, 0.5924200E+00, &
     & 0.6521600E+00, 0.6559600E+00, 0.7044000E+00, 0.7568200E+00, &
     & 0.7916725E+00, 0.7905324E+00, 0.6108212E+00, 0.6108212E+00 /
      data (ref_adm(37,iz, 5,15),iz = 1,20) / &
     & 0.4602500E+00, 0.4602500E+00, 0.4647300E+00, 0.4651300E+00, &
     & 0.4485100E+00, 0.4754500E+00, 0.4813600E+00, 0.5030300E+00, &
     & 0.5220800E+00, 0.5405100E+00, 0.5636000E+00, 0.5870400E+00, &
     & 0.6303000E+00, 0.6603900E+00, 0.6785500E+00, 0.7647400E+00, &
     & 0.7719720E+00, 0.7661183E+00, 0.5981593E+00, 0.5981593E+00 /
      data (ref_adm(37,iz, 6,15),iz = 1,20) / &
     & 0.4534000E+00, 0.4534000E+00, 0.4509300E+00, 0.4481500E+00, &
     & 0.4563300E+00, 0.4632400E+00, 0.4763800E+00, 0.4909800E+00, &
     & 0.5050200E+00, 0.5347700E+00, 0.5588000E+00, 0.5881700E+00, &
     & 0.6140300E+00, 0.6350400E+00, 0.6460300E+00, 0.7520200E+00, &
     & 0.7479743E+00, 0.7360060E+00, 0.5797409E+00, 0.5797409E+00 /
      data (ref_adm(37,iz, 7,15),iz = 1,20) / &
     & 0.4568400E+00, 0.4568400E+00, 0.4613300E+00, 0.4727000E+00, &
     & 0.4730000E+00, 0.4791600E+00, 0.4872000E+00, 0.5025400E+00, &
     & 0.5149300E+00, 0.5265100E+00, 0.5492800E+00, 0.5765900E+00, &
     & 0.6103200E+00, 0.6160100E+00, 0.6466000E+00, 0.7061800E+00, &
     & 0.7500000E+00, 0.8107000E+00, 0.5573711E+00, 0.5573711E+00 /
      data (ref_adm(37,iz, 8,15),iz = 1,20) / &
     & 0.4623400E+00, 0.4623400E+00, 0.4619400E+00, 0.4594000E+00, &
     & 0.4554100E+00, 0.4716000E+00, 0.4805500E+00, 0.4880600E+00, &
     & 0.5060900E+00, 0.5102400E+00, 0.5277100E+00, 0.5777100E+00, &
     & 0.6069800E+00, 0.6141500E+00, 0.6361600E+00, 0.6966800E+00, &
     & 0.7531900E+00, 0.6708830E+00, 0.5344821E+00, 0.5344821E+00 /
      data (ref_adm(37,iz, 9,15),iz = 1,20) / &
     & 0.4596200E+00, 0.4596200E+00, 0.4553600E+00, 0.4542700E+00, &
     & 0.4659200E+00, 0.4719500E+00, 0.4778900E+00, 0.4750400E+00, &
     & 0.4748600E+00, 0.5026500E+00, 0.5243900E+00, 0.5694200E+00, &
     & 0.5863800E+00, 0.6289600E+00, 0.6225600E+00, 0.6947600E+00, &
     & 0.6461400E+00, 0.6391570E+00, 0.5128517E+00, 0.5128517E+00 /
      data (ref_adm(37,iz,10,15),iz = 1,20) / &
     & 0.4595300E+00, 0.4595300E+00, 0.4492700E+00, 0.4556800E+00, &
     & 0.4649000E+00, 0.4802000E+00, 0.4763600E+00, 0.4875800E+00, &
     & 0.5013200E+00, 0.4960300E+00, 0.5398900E+00, 0.5800700E+00, &
     & 0.5752000E+00, 0.5971400E+00, 0.6228300E+00, 0.6175800E+00, &
     & 0.7067600E+00, 0.6693500E+00, 0.4926139E+00, 0.4926139E+00 /
      data (ref_adm(37,iz,11,15),iz = 1,20) / &
     & 0.4536800E+00, 0.4536800E+00, 0.4637900E+00, 0.4554400E+00, &
     & 0.4699800E+00, 0.4769300E+00, 0.4808900E+00, 0.4931600E+00, &
     & 0.4974400E+00, 0.5181600E+00, 0.5410100E+00, 0.5646700E+00, &
     & 0.5559400E+00, 0.5469800E+00, 0.6025000E+00, 0.6395400E+00, &
     & 0.7043700E+00, 0.5823914E+00, 0.4741270E+00, 0.4741270E+00 /
      data (ref_adm(37,iz,12,15),iz = 1,20) / &
     & 0.4696800E+00, 0.4696800E+00, 0.4665200E+00, 0.4722000E+00, &
     & 0.4714700E+00, 0.4772100E+00, 0.4834400E+00, 0.4842200E+00, &
     & 0.5087900E+00, 0.5161300E+00, 0.5390000E+00, 0.5564300E+00, &
     & 0.5429100E+00, 0.5484800E+00, 0.6086500E+00, 0.6502300E+00, &
     & 0.5385300E+00, 0.5581930E+00, 0.4575560E+00, 0.4575560E+00 /
      data (ref_adm(37,iz,13,15),iz = 1,20) / &
     & 0.4638000E+00, 0.4638000E+00, 0.4631000E+00, 0.4703400E+00, &
     & 0.4744100E+00, 0.4725800E+00, 0.4848800E+00, 0.4937400E+00, &
     & 0.4962300E+00, 0.5097700E+00, 0.5235000E+00, 0.5397900E+00, &
     & 0.5342700E+00, 0.5441700E+00, 0.6115500E+00, 0.5883100E+00, &
     & 0.6797300E+00, 0.5363240E+00, 0.4428014E+00, 0.4428014E+00 /
      data (ref_adm(37,iz,14,15),iz = 1,20) / &
     & 0.4511400E+00, 0.4511400E+00, 0.4486700E+00, 0.4481000E+00, &
     & 0.4490400E+00, 0.4535100E+00, 0.4571300E+00, 0.4619300E+00, &
     & 0.4605500E+00, 0.4677500E+00, 0.4861000E+00, 0.4972700E+00, &
     & 0.4901500E+00, 0.4815400E+00, 0.6110900E+00, 0.6521000E+00, &
     & 0.5804000E+00, 0.5164828E+00, 0.4297354E+00, 0.4297354E+00 /
      data (ref_adm(37,iz,15,15),iz = 1,20) / &
     & 0.4668800E+00, 0.4668800E+00, 0.4729500E+00, 0.4688400E+00, &
     & 0.4735700E+00, 0.4790000E+00, 0.4892600E+00, 0.4938400E+00, &
     & 0.5091400E+00, 0.5160800E+00, 0.5234200E+00, 0.5335900E+00, &
     & 0.5346800E+00, 0.5232100E+00, 0.5675900E+00, 0.6368300E+00, &
     & 0.5698500E+00, 0.4981795E+00, 0.4179765E+00, 0.4179765E+00 /
      data (ref_adm(37,iz,16,15),iz = 1,20) / &
     & 0.4548200E+00, 0.4548200E+00, 0.4441400E+00, 0.4378900E+00, &
     & 0.4370800E+00, 0.4480900E+00, 0.4521100E+00, 0.4450500E+00, &
     & 0.4605000E+00, 0.4610400E+00, 0.4635700E+00, 0.4820000E+00, &
     & 0.4773900E+00, 0.4843900E+00, 0.5431000E+00, 0.6259500E+00, &
     & 0.6165800E+00, 0.4825231E+00, 0.4074768E+00, 0.4074768E+00 /
      data (ref_adm(37,iz,17,15),iz = 1,20) / &
     & 0.4631800E+00, 0.4631800E+00, 0.4661200E+00, 0.4655100E+00, &
     & 0.4631200E+00, 0.4667000E+00, 0.4635400E+00, 0.4703400E+00, &
     & 0.4971600E+00, 0.5001400E+00, 0.5166100E+00, 0.5420900E+00, &
     & 0.5188300E+00, 0.4833400E+00, 0.5188100E+00, 0.6261700E+00, &
     & 0.5943800E+00, 0.4690016E+00, 0.3989066E+00, 0.3989066E+00 /
      data (ref_adm(37,iz,18,15),iz = 1,20) / &
     & 0.4665000E+00, 0.4665000E+00, 0.4627500E+00, 0.4561200E+00, &
     & 0.4593300E+00, 0.4713000E+00, 0.4694200E+00, 0.4817600E+00, &
     & 0.4981500E+00, 0.5026100E+00, 0.5070200E+00, 0.5292800E+00, &
     & 0.5252400E+00, 0.5135500E+00, 0.5081400E+00, 0.5629400E+00, &
     & 0.5822760E+00, 0.5989456E+00, 0.5718409E+00, 0.5718409E+00 /
      data (ref_adm(37,iz,19,15),iz = 1,20) / &
     & 0.4681000E+00, 0.4681000E+00, 0.4712300E+00, 0.4784800E+00, &
     & 0.4800700E+00, 0.4758100E+00, 0.4827900E+00, 0.4856300E+00, &
     & 0.4921500E+00, 0.4945300E+00, 0.5102100E+00, 0.5173300E+00, &
     & 0.5200500E+00, 0.5195400E+00, 0.5147300E+00, 0.5516500E+00, &
     & 0.5729727E+00, 0.5860972E+00, 0.5598493E+00, 0.5598493E+00 /
      data (ref_adm(37,iz,20,15),iz = 1,20) / &
     & 0.4673600E+00, 0.4673600E+00, 0.4659900E+00, 0.4718900E+00, &
     & 0.4780600E+00, 0.4800600E+00, 0.4926000E+00, 0.4922200E+00, &
     & 0.4976900E+00, 0.5028700E+00, 0.5113400E+00, 0.5147800E+00, &
     & 0.5432400E+00, 0.5336900E+00, 0.5429000E+00, 0.5081400E+00, &
     & 0.5655117E+00, 0.5769155E+00, 0.5527976E+00, 0.5527976E+00 /
      data (ref_adm(37,iz,21,15),iz = 1,20) / &
     & 0.4750200E+00, 0.4750200E+00, 0.4855500E+00, 0.4753500E+00, &
     & 0.4802600E+00, 0.4944800E+00, 0.4920400E+00, 0.4931500E+00, &
     & 0.4992000E+00, 0.4974500E+00, 0.5137700E+00, 0.5034100E+00, &
     & 0.5342100E+00, 0.5455400E+00, 0.5286700E+00, 0.5453289E+00, &
     & 0.5583938E+00, 0.5683876E+00, 0.5484202E+00, 0.5484202E+00 /
      data (ref_adm(37,iz,22,15),iz = 1,20) / &
     & 0.4748400E+00, 0.4748400E+00, 0.4777300E+00, 0.4699000E+00, &
     & 0.4703700E+00, 0.4620700E+00, 0.4658900E+00, 0.4747500E+00, &
     & 0.4779800E+00, 0.4931700E+00, 0.5086100E+00, 0.4929700E+00, &
     & 0.5205600E+00, 0.5187900E+00, 0.5287600E+00, 0.5243500E+00, &
     & 0.6319491E+00, 0.6503958E+00, 0.6497722E+00, 0.6497722E+00 /
      data (ref_adm(37,iz,23,15),iz = 1,20) / &
     & 0.4694100E+00, 0.4694100E+00, 0.4704200E+00, 0.4672300E+00, &
     & 0.4689300E+00, 0.4685200E+00, 0.4641100E+00, 0.4736200E+00, &
     & 0.4876000E+00, 0.4982600E+00, 0.5030700E+00, 0.5120300E+00, &
     & 0.5358000E+00, 0.5028600E+00, 0.5002200E+00, 0.4908500E+00, &
     & 0.4702200E+00, 0.6422707E+00, 0.6534371E+00, 0.6534371E+00 /
      data (ref_adm(37,iz,24,15),iz = 1,20) / &
     & 0.4557900E+00, 0.4557900E+00, 0.4454100E+00, 0.4423300E+00, &
     & 0.4497800E+00, 0.4600600E+00, 0.4658700E+00, 0.4757900E+00, &
     & 0.4873500E+00, 0.5010200E+00, 0.5045200E+00, 0.5172200E+00, &
     & 0.5357300E+00, 0.5211300E+00, 0.5300300E+00, 0.5302100E+00, &
     & 0.5942800E+00, 0.6389264E+00, 0.6621765E+00, 0.6621765E+00 /
      data (ref_adm(37,iz,25,15),iz = 1,20) / &
     & 0.4719900E+00, 0.4719900E+00, 0.4733800E+00, 0.4765100E+00, &
     & 0.4823400E+00, 0.4872400E+00, 0.4903500E+00, 0.4982900E+00, &
     & 0.5107000E+00, 0.5220200E+00, 0.5322600E+00, 0.5431500E+00, &
     & 0.5604500E+00, 0.5755400E+00, 0.5740000E+00, 0.5910300E+00, &
     & 0.5739900E+00, 0.5882200E+00, 0.6745587E+00, 0.6745587E+00 /
      data (ref_adm(37,iz,26,15),iz = 1,20) / &
     & 0.4625900E+00, 0.4625900E+00, 0.4652100E+00, 0.4605300E+00, &
     & 0.4611500E+00, 0.4620900E+00, 0.4760000E+00, 0.4987800E+00, &
     & 0.5035100E+00, 0.5210600E+00, 0.5384700E+00, 0.5555800E+00, &
     & 0.5642000E+00, 0.5689200E+00, 0.5664300E+00, 0.5606700E+00, &
     & 0.6170400E+00, 0.5958700E+00, 0.6929440E+00, 0.6929440E+00 /
      data (ref_adm(37,iz,27,15),iz = 1,20) / &
     & 0.4644100E+00, 0.4644100E+00, 0.4694700E+00, 0.4638400E+00, &
     & 0.4634200E+00, 0.4672300E+00, 0.4696700E+00, 0.4646900E+00, &
     & 0.5018100E+00, 0.5053600E+00, 0.5193600E+00, 0.5471200E+00, &
     & 0.5530200E+00, 0.5626100E+00, 0.5643000E+00, 0.5439100E+00, &
     & 0.5757100E+00, 0.5823500E+00, 0.4717900E+00, 0.4717900E+00 /
      data (ref_adm(37,iz,28,15),iz = 1,20) / &
     & 0.4657800E+00, 0.4657800E+00, 0.4772600E+00, 0.4809100E+00, &
     & 0.4757000E+00, 0.4847500E+00, 0.4816300E+00, 0.4822900E+00, &
     & 0.5035800E+00, 0.5026200E+00, 0.5319100E+00, 0.5417000E+00, &
     & 0.5314000E+00, 0.5562200E+00, 0.5689000E+00, 0.5515000E+00, &
     & 0.5705100E+00, 0.6042000E+00, 0.5298800E+00, 0.5298800E+00 /
      data (ref_adm(37,iz,29,15),iz = 1,20) / &
     & 0.4734500E+00, 0.4734500E+00, 0.4734300E+00, 0.4719800E+00, &
     & 0.4781900E+00, 0.4871500E+00, 0.4857700E+00, 0.4967300E+00, &
     & 0.4998200E+00, 0.5269900E+00, 0.5330900E+00, 0.5319300E+00, &
     & 0.5369700E+00, 0.5576700E+00, 0.5750500E+00, 0.5585200E+00, &
     & 0.5830900E+00, 0.6970096E+00, 0.7666962E+00, 0.7666962E+00 /
      data (ref_adm(37,iz,30,15),iz = 1,20) / &
     & 0.4626300E+00, 0.4626300E+00, 0.4638600E+00, 0.4725600E+00, &
     & 0.4783900E+00, 0.4886200E+00, 0.4956700E+00, 0.4937500E+00, &
     & 0.5091700E+00, 0.5164300E+00, 0.5342400E+00, 0.5231700E+00, &
     & 0.5601300E+00, 0.5753700E+00, 0.5951900E+00, 0.6206100E+00, &
     & 0.6381900E+00, 0.7267435E+00, 0.7993618E+00, 0.7993618E+00 /
      data (ref_adm(37,iz,31,15),iz = 1,20) / &
     & 0.4523300E+00, 0.4523300E+00, 0.4533300E+00, 0.4675700E+00, &
     & 0.4802600E+00, 0.4860800E+00, 0.5031700E+00, 0.5085200E+00, &
     & 0.5150400E+00, 0.5176300E+00, 0.5313100E+00, 0.5347600E+00, &
     & 0.5769000E+00, 0.6008500E+00, 0.6069300E+00, 0.5824800E+00, &
     & 0.6594700E+00, 0.6058900E+00, 0.8245261E+00, 0.8245261E+00 /
      data (ref_adm(37,iz,32,15),iz = 1,20) / &
     & 0.4578900E+00, 0.4578900E+00, 0.4659700E+00, 0.4670300E+00, &
     & 0.4724200E+00, 0.4831500E+00, 0.4950700E+00, 0.5049400E+00, &
     & 0.5129800E+00, 0.5237500E+00, 0.5349200E+00, 0.5554200E+00, &
     & 0.5766900E+00, 0.6008300E+00, 0.6241700E+00, 0.6447900E+00, &
     & 0.6597700E+00, 0.6451100E+00, 0.5627800E+00, 0.5627800E+00 /
      data (ref_adm(37,iz,33,15),iz = 1,20) / &
     & 0.4613600E+00, 0.4613600E+00, 0.4601200E+00, 0.4689700E+00, &
     & 0.4726800E+00, 0.4834400E+00, 0.4905900E+00, 0.5008400E+00, &
     & 0.5194400E+00, 0.5288400E+00, 0.5417300E+00, 0.5636200E+00, &
     & 0.5835100E+00, 0.6056400E+00, 0.6285200E+00, 0.6673600E+00, &
     & 0.7015500E+00, 0.6697900E+00, 0.8683170E+00, 0.8683170E+00 /
      data (ref_adm(37,iz,34,15),iz = 1,20) / &
     & 0.4560400E+00, 0.4560400E+00, 0.4777900E+00, 0.4738600E+00, &
     & 0.4767200E+00, 0.4910200E+00, 0.4987000E+00, 0.5060500E+00, &
     & 0.5199100E+00, 0.5407100E+00, 0.5414100E+00, 0.5737500E+00, &
     & 0.5952100E+00, 0.6061100E+00, 0.6410000E+00, 0.6697300E+00, &
     & 0.7157600E+00, 0.7228000E+00, 0.8817262E+00, 0.8817262E+00 /
      data (ref_adm(37,iz,35,15),iz = 1,20) / &
     & 0.4689200E+00, 0.4689200E+00, 0.4655300E+00, 0.4606600E+00, &
     & 0.4798000E+00, 0.4902900E+00, 0.4947000E+00, 0.4968100E+00, &
     & 0.5066900E+00, 0.5332400E+00, 0.5654100E+00, 0.5712000E+00, &
     & 0.5860500E+00, 0.5973400E+00, 0.6489000E+00, 0.6888800E+00, &
     & 0.7364600E+00, 0.7590018E+00, 0.8882398E+00, 0.8882398E+00 /
      data (ref_adm(37,iz,36,15),iz = 1,20) / &
     & 0.4662800E+00, 0.4662800E+00, 0.4660500E+00, 0.4585000E+00, &
     & 0.4752200E+00, 0.4923900E+00, 0.4946900E+00, 0.5034300E+00, &
     & 0.4965500E+00, 0.5295200E+00, 0.5493100E+00, 0.5821900E+00, &
     & 0.6077300E+00, 0.6203800E+00, 0.6707800E+00, 0.7114100E+00, &
     & 0.7277600E+00, 0.7618870E+00, 0.8926202E+00, 0.8926202E+00 /
      data (ref_adm(37,iz,37,15),iz = 1,20) / &
     & 0.4546300E+00, 0.4546300E+00, 0.4630900E+00, 0.4671000E+00, &
     & 0.4758300E+00, 0.4904400E+00, 0.5049900E+00, 0.5112500E+00, &
     & 0.5241400E+00, 0.5102300E+00, 0.5654400E+00, 0.5983200E+00, &
     & 0.6064100E+00, 0.6422800E+00, 0.6722600E+00, 0.7504300E+00, &
     & 0.7941000E+00, 0.7905900E+00, 0.8959616E+00, 0.8959616E+00 /
      data (ref_adm(37,iz,38,15),iz = 1,20) / &
     & 0.4546300E+00, 0.4546300E+00, 0.4630900E+00, 0.4671000E+00, &
     & 0.4758300E+00, 0.4904400E+00, 0.5049900E+00, 0.5112500E+00, &
     & 0.5241400E+00, 0.5102300E+00, 0.5654400E+00, 0.5983200E+00, &
     & 0.6064100E+00, 0.6422800E+00, 0.6722600E+00, 0.7504300E+00, &
     & 0.7941000E+00, 0.7905900E+00, 0.8959616E+00, 0.8959616E+00 /
! Solar Zenith Angle 75.0 Albedo  0.5237393E+00
      data (ref_adm(37,iz, 1,16),iz = 1,20) / &
     & 0.4176900E+00, 0.4176900E+00, 0.4203300E+00, 0.4298200E+00, &
     & 0.4428800E+00, 0.4537100E+00, 0.4588800E+00, 0.4650300E+00, &
     & 0.4846500E+00, 0.4983800E+00, 0.5465200E+00, 0.5850200E+00, &
     & 0.6507700E+00, 0.6606316E+00, 0.7701617E+00, 0.1042245E+01, &
     & 0.1676708E+01, 0.2964833E+01, 0.1708310E+01, 0.1708310E+01 /
      data (ref_adm(37,iz, 2,16),iz = 1,20) / &
     & 0.4176900E+00, 0.4176900E+00, 0.4203300E+00, 0.4298200E+00, &
     & 0.4428800E+00, 0.4537100E+00, 0.4588800E+00, 0.4650300E+00, &
     & 0.4846500E+00, 0.4983800E+00, 0.5465200E+00, 0.5850200E+00, &
     & 0.6507700E+00, 0.6606316E+00, 0.7701617E+00, 0.1042245E+01, &
     & 0.1676708E+01, 0.2964833E+01, 0.1708310E+01, 0.1708310E+01 /
      data (ref_adm(37,iz, 3,16),iz = 1,20) / &
     & 0.4277200E+00, 0.4277200E+00, 0.4196500E+00, 0.4325700E+00, &
     & 0.4412700E+00, 0.4461700E+00, 0.4669900E+00, 0.4718400E+00, &
     & 0.4782200E+00, 0.5041800E+00, 0.5193500E+00, 0.5661900E+00, &
     & 0.7040200E+00, 0.6534500E+00, 0.7600166E+00, 0.1013033E+01, &
     & 0.1562895E+01, 0.3088220E+01, 0.1260701E+01, 0.1260701E+01 /
      data (ref_adm(37,iz, 4,16),iz = 1,20) / &
     & 0.4356300E+00, 0.4356300E+00, 0.4341900E+00, 0.4305100E+00, &
     & 0.4305700E+00, 0.4399900E+00, 0.4617800E+00, 0.4866900E+00, &
     & 0.4991300E+00, 0.5061900E+00, 0.5112400E+00, 0.5473800E+00, &
     & 0.5760800E+00, 0.7088600E+00, 0.7404469E+00, 0.9537538E+00, &
     & 0.1368720E+01, 0.2726900E+01, 0.2540267E+01, 0.2540267E+01 /
      data (ref_adm(37,iz, 5,16),iz = 1,20) / &
     & 0.4305400E+00, 0.4305400E+00, 0.4267800E+00, 0.4224800E+00, &
     & 0.4199500E+00, 0.4455000E+00, 0.4528700E+00, 0.4752600E+00, &
     & 0.5011500E+00, 0.5129500E+00, 0.5240900E+00, 0.6060600E+00, &
     & 0.6131300E+00, 0.6346900E+00, 0.7195535E+00, 0.8848755E+00, &
     & 0.1184274E+01, 0.1980245E+01, 0.2784813E+01, 0.2784813E+01 /
      data (ref_adm(37,iz, 6,16),iz = 1,20) / &
     & 0.4156600E+00, 0.4156600E+00, 0.4126100E+00, 0.4169700E+00, &
     & 0.4237900E+00, 0.4411100E+00, 0.4544600E+00, 0.4700200E+00, &
     & 0.4879600E+00, 0.5033100E+00, 0.5309600E+00, 0.5650100E+00, &
     & 0.5967900E+00, 0.6598600E+00, 0.7245600E+00, 0.7362700E+00, &
     & 0.1039579E+01, 0.1502590E+01, 0.1888207E+01, 0.1888207E+01 /
      data (ref_adm(37,iz, 7,16),iz = 1,20) / &
     & 0.4092600E+00, 0.4092600E+00, 0.4162700E+00, 0.4219000E+00, &
     & 0.4268300E+00, 0.4303300E+00, 0.4346800E+00, 0.4472100E+00, &
     & 0.4594700E+00, 0.4706200E+00, 0.4942800E+00, 0.5115000E+00, &
     & 0.5509400E+00, 0.6000200E+00, 0.6250600E+00, 0.6918300E+00, &
     & 0.7827100E+00, 0.8523800E+00, 0.1420006E+01, 0.1420006E+01 /
      data (ref_adm(37,iz, 8,16),iz = 1,20) / &
     & 0.4261600E+00, 0.4261600E+00, 0.4249000E+00, 0.4310200E+00, &
     & 0.4330200E+00, 0.4245300E+00, 0.4446600E+00, 0.4561700E+00, &
     & 0.4799500E+00, 0.4844600E+00, 0.5077600E+00, 0.5336000E+00, &
     & 0.5827900E+00, 0.6289000E+00, 0.6664300E+00, 0.7394100E+00, &
     & 0.8617415E+00, 0.7357500E+00, 0.1193666E+01, 0.1193666E+01 /
      data (ref_adm(37,iz, 9,16),iz = 1,20) / &
     & 0.4249200E+00, 0.4249200E+00, 0.4275900E+00, 0.4235700E+00, &
     & 0.4278900E+00, 0.4304200E+00, 0.4443400E+00, 0.4596500E+00, &
     & 0.4719900E+00, 0.4852900E+00, 0.5180100E+00, 0.5360000E+00, &
     & 0.5590100E+00, 0.6172400E+00, 0.6248200E+00, 0.7457300E+00, &
     & 0.8377789E+00, 0.9733443E+00, 0.1063918E+01, 0.1063918E+01 /
      data (ref_adm(37,iz,10,16),iz = 1,20) / &
     & 0.4260000E+00, 0.4260000E+00, 0.4326400E+00, 0.4304900E+00, &
     & 0.4289000E+00, 0.4262600E+00, 0.4361900E+00, 0.4494700E+00, &
     & 0.4921300E+00, 0.4858300E+00, 0.4880200E+00, 0.5286400E+00, &
     & 0.5442400E+00, 0.5641300E+00, 0.6096500E+00, 0.6708800E+00, &
     & 0.7833347E+00, 0.9323708E+00, 0.1014825E+01, 0.1014825E+01 /
      data (ref_adm(37,iz,11,16),iz = 1,20) / &
     & 0.4266000E+00, 0.4266000E+00, 0.4265900E+00, 0.4217000E+00, &
     & 0.4249400E+00, 0.4217600E+00, 0.4277900E+00, 0.4435500E+00, &
     & 0.4682800E+00, 0.4796700E+00, 0.5000100E+00, 0.5107200E+00, &
     & 0.5162500E+00, 0.5172900E+00, 0.6424400E+00, 0.6469900E+00, &
     & 0.7343100E+00, 0.8568356E+00, 0.9418547E+00, 0.9418547E+00 /
      data (ref_adm(37,iz,12,16),iz = 1,20) / &
     & 0.4127700E+00, 0.4127700E+00, 0.4198600E+00, 0.4193900E+00, &
     & 0.4097400E+00, 0.4168700E+00, 0.4380400E+00, 0.4390500E+00, &
     & 0.4623400E+00, 0.4878900E+00, 0.4937500E+00, 0.4993000E+00, &
     & 0.5144700E+00, 0.5106200E+00, 0.5715200E+00, 0.7413200E+00, &
     & 0.7520300E+00, 0.7555800E+00, 0.8787059E+00, 0.8787059E+00 /
      data (ref_adm(37,iz,13,16),iz = 1,20) / &
     & 0.4262100E+00, 0.4262100E+00, 0.4316900E+00, 0.4293100E+00, &
     & 0.4212600E+00, 0.4233200E+00, 0.4481200E+00, 0.4472900E+00, &
     & 0.4526600E+00, 0.4676200E+00, 0.4817700E+00, 0.5068700E+00, &
     & 0.5107800E+00, 0.5339400E+00, 0.5216300E+00, 0.5468200E+00, &
     & 0.6811680E+00, 0.7693762E+00, 0.8342559E+00, 0.8342559E+00 /
      data (ref_adm(37,iz,14,16),iz = 1,20) / &
     & 0.4081100E+00, 0.4081100E+00, 0.4079800E+00, 0.4098500E+00, &
     & 0.4065500E+00, 0.4033300E+00, 0.4080500E+00, 0.4205900E+00, &
     & 0.4275100E+00, 0.4371700E+00, 0.4343500E+00, 0.4452500E+00, &
     & 0.4624900E+00, 0.4698800E+00, 0.5616300E+00, 0.4900100E+00, &
     & 0.7268700E+00, 0.7457044E+00, 0.8013433E+00, 0.8013433E+00 /
      data (ref_adm(37,iz,15,16),iz = 1,20) / &
     & 0.4141400E+00, 0.4141400E+00, 0.4131000E+00, 0.4099200E+00, &
     & 0.4070300E+00, 0.4087600E+00, 0.4192500E+00, 0.4274800E+00, &
     & 0.4456200E+00, 0.4416100E+00, 0.4527000E+00, 0.4642200E+00, &
     & 0.4664200E+00, 0.4888200E+00, 0.5778100E+00, 0.6697400E+00, &
     & 0.6819300E+00, 0.7268628E+00, 0.7748625E+00, 0.7748625E+00 /
      data (ref_adm(37,iz,16,16),iz = 1,20) / &
     & 0.4167000E+00, 0.4167000E+00, 0.4382600E+00, 0.4314900E+00, &
     & 0.4361300E+00, 0.4314500E+00, 0.4363400E+00, 0.4410700E+00, &
     & 0.4387900E+00, 0.4491800E+00, 0.4635400E+00, 0.4568400E+00, &
     & 0.4522800E+00, 0.4649100E+00, 0.5890400E+00, 0.6716600E+00, &
     & 0.6494400E+00, 0.7067873E+00, 0.7507455E+00, 0.7507455E+00 /
      data (ref_adm(37,iz,17,16),iz = 1,20) / &
     & 0.4178300E+00, 0.4178300E+00, 0.4331500E+00, 0.4238200E+00, &
     & 0.4144500E+00, 0.4193900E+00, 0.4297400E+00, 0.4442500E+00, &
     & 0.4551500E+00, 0.4604900E+00, 0.4754900E+00, 0.4958000E+00, &
     & 0.4905900E+00, 0.5112000E+00, 0.4917400E+00, 0.6119500E+00, &
     & 0.6779800E+00, 0.6850602E+00, 0.7259754E+00, 0.7259754E+00 /
      data (ref_adm(37,iz,18,16),iz = 1,20) / &
     & 0.4142600E+00, 0.4142600E+00, 0.4242800E+00, 0.4260600E+00, &
     & 0.4337600E+00, 0.4236300E+00, 0.4411000E+00, 0.4377600E+00, &
     & 0.4621600E+00, 0.4470200E+00, 0.4757600E+00, 0.4900400E+00, &
     & 0.4975500E+00, 0.5001600E+00, 0.5230000E+00, 0.5910100E+00, &
     & 0.5611550E+00, 0.5725392E+00, 0.5662800E+00, 0.5662800E+00 /
      data (ref_adm(37,iz,19,16),iz = 1,20) / &
     & 0.4121700E+00, 0.4121700E+00, 0.4155800E+00, 0.4188900E+00, &
     & 0.4113700E+00, 0.4341700E+00, 0.4425700E+00, 0.4458900E+00, &
     & 0.4489800E+00, 0.4423500E+00, 0.4741000E+00, 0.4930500E+00, &
     & 0.5002200E+00, 0.5172100E+00, 0.5196600E+00, 0.5366400E+00, &
     & 0.5464942E+00, 0.5561807E+00, 0.5546054E+00, 0.5546054E+00 /
      data (ref_adm(37,iz,20,16),iz = 1,20) / &
     & 0.4152500E+00, 0.4152500E+00, 0.4066200E+00, 0.3995500E+00, &
     & 0.4275800E+00, 0.4264500E+00, 0.4350200E+00, 0.4321600E+00, &
     & 0.4490800E+00, 0.4562700E+00, 0.4748600E+00, 0.4926900E+00, &
     & 0.5120400E+00, 0.5204500E+00, 0.5235400E+00, 0.4265000E+00, &
     & 0.5366530E+00, 0.5458333E+00, 0.5488113E+00, 0.5488113E+00 /
      data (ref_adm(37,iz,21,16),iz = 1,20) / &
     & 0.4133900E+00, 0.4133900E+00, 0.4073300E+00, 0.4128700E+00, &
     & 0.4139100E+00, 0.4233000E+00, 0.4297000E+00, 0.4421500E+00, &
     & 0.4462100E+00, 0.4481600E+00, 0.4704500E+00, 0.4939900E+00, &
     & 0.4671000E+00, 0.5314100E+00, 0.5377800E+00, 0.5048900E+00, &
     & 0.5302038E+00, 0.5392336E+00, 0.5473015E+00, 0.5473015E+00 /
      data (ref_adm(37,iz,22,16),iz = 1,20) / &
     & 0.4092800E+00, 0.4092800E+00, 0.4189900E+00, 0.4089500E+00, &
     & 0.4106400E+00, 0.4211800E+00, 0.4301000E+00, 0.4455000E+00, &
     & 0.4488700E+00, 0.4577900E+00, 0.4652800E+00, 0.4878200E+00, &
     & 0.5047600E+00, 0.5259300E+00, 0.5422600E+00, 0.4696100E+00, &
     & 0.6399205E+00, 0.6740211E+00, 0.7006326E+00, 0.7006326E+00 /
      data (ref_adm(37,iz,23,16),iz = 1,20) / &
     & 0.4049300E+00, 0.4049300E+00, 0.4006900E+00, 0.4028800E+00, &
     & 0.4330800E+00, 0.4276700E+00, 0.4226900E+00, 0.4376800E+00, &
     & 0.4411700E+00, 0.4692800E+00, 0.4660000E+00, 0.4794000E+00, &
     & 0.5051500E+00, 0.4929200E+00, 0.5120300E+00, 0.4687900E+00, &
     & 0.6305352E+00, 0.6653290E+00, 0.7051517E+00, 0.7051517E+00 /
      data (ref_adm(37,iz,24,16),iz = 1,20) / &
     & 0.4196400E+00, 0.4196400E+00, 0.4136400E+00, 0.4165000E+00, &
     & 0.4194000E+00, 0.4215600E+00, 0.4254600E+00, 0.4339800E+00, &
     & 0.4498100E+00, 0.4731500E+00, 0.4864300E+00, 0.4994000E+00, &
     & 0.5264400E+00, 0.5547000E+00, 0.5222600E+00, 0.5468200E+00, &
     & 0.5227700E+00, 0.6622188E+00, 0.7156128E+00, 0.7156128E+00 /
      data (ref_adm(37,iz,25,16),iz = 1,20) / &
     & 0.4149400E+00, 0.4149400E+00, 0.4216600E+00, 0.4290300E+00, &
     & 0.4358300E+00, 0.4457100E+00, 0.4522700E+00, 0.4656000E+00, &
     & 0.4757600E+00, 0.4843200E+00, 0.5018500E+00, 0.5208100E+00, &
     & 0.5452000E+00, 0.5751900E+00, 0.5751000E+00, 0.5186700E+00, &
     & 0.6242059E+00, 0.4378800E+00, 0.7303421E+00, 0.7303421E+00 /
      data (ref_adm(37,iz,26,16),iz = 1,20) / &
     & 0.4127900E+00, 0.4127900E+00, 0.4254600E+00, 0.4303400E+00, &
     & 0.4212400E+00, 0.4179300E+00, 0.4488300E+00, 0.4445100E+00, &
     & 0.4461200E+00, 0.4634300E+00, 0.4904000E+00, 0.5034400E+00, &
     & 0.5371700E+00, 0.5728900E+00, 0.5788300E+00, 0.5497500E+00, &
     & 0.6077500E+00, 0.5666300E+00, 0.7519493E+00, 0.7519493E+00 /
      data (ref_adm(37,iz,27,16),iz = 1,20) / &
     & 0.4117600E+00, 0.4117600E+00, 0.4225100E+00, 0.4311300E+00, &
     & 0.4302300E+00, 0.4073200E+00, 0.4209500E+00, 0.4564000E+00, &
     & 0.4543300E+00, 0.4722700E+00, 0.4892300E+00, 0.5045400E+00, &
     & 0.5235400E+00, 0.5719200E+00, 0.5952400E+00, 0.6016000E+00, &
     & 0.6377388E+00, 0.6843590E+00, 0.7774358E+00, 0.7774358E+00 /
      data (ref_adm(37,iz,28,16),iz = 1,20) / &
     & 0.4154200E+00, 0.4154200E+00, 0.4163000E+00, 0.4362600E+00, &
     & 0.4292300E+00, 0.4336600E+00, 0.4249300E+00, 0.4421900E+00, &
     & 0.4612500E+00, 0.4655900E+00, 0.4692400E+00, 0.5234000E+00, &
     & 0.5462200E+00, 0.5649900E+00, 0.5761500E+00, 0.5781000E+00, &
     & 0.5803300E+00, 0.7007334E+00, 0.8050454E+00, 0.8050454E+00 /
      data (ref_adm(37,iz,29,16),iz = 1,20) / &
     & 0.4195900E+00, 0.4195900E+00, 0.4185200E+00, 0.4206900E+00, &
     & 0.4344000E+00, 0.4389400E+00, 0.4459000E+00, 0.4489800E+00, &
     & 0.4644500E+00, 0.4912500E+00, 0.4850300E+00, 0.5138800E+00, &
     & 0.5493700E+00, 0.5680200E+00, 0.6261600E+00, 0.5802400E+00, &
     & 0.5721500E+00, 0.7301196E+00, 0.8387989E+00, 0.8387989E+00 /
      data (ref_adm(37,iz,30,16),iz = 1,20) / &
     & 0.4225100E+00, 0.4225100E+00, 0.4228800E+00, 0.4336900E+00, &
     & 0.4262400E+00, 0.4354500E+00, 0.4609100E+00, 0.4632300E+00, &
     & 0.4736200E+00, 0.4901200E+00, 0.5097600E+00, 0.5334900E+00, &
     & 0.5495400E+00, 0.5758700E+00, 0.6476200E+00, 0.6550732E+00, &
     & 0.6480300E+00, 0.6244700E+00, 0.8766932E+00, 0.8766932E+00 /
      data (ref_adm(37,iz,31,16),iz = 1,20) / &
     & 0.4246200E+00, 0.4246200E+00, 0.4269800E+00, 0.4219500E+00, &
     & 0.4300800E+00, 0.4376500E+00, 0.4469300E+00, 0.4655500E+00, &
     & 0.4877500E+00, 0.4965000E+00, 0.5165900E+00, 0.5241500E+00, &
     & 0.5497300E+00, 0.6063400E+00, 0.6454000E+00, 0.6916800E+00, &
     & 0.7246900E+00, 0.7742761E+00, 0.9042133E+00, 0.9042133E+00 /
      data (ref_adm(37,iz,32,16),iz = 1,20) / &
     & 0.4225000E+00, 0.4225000E+00, 0.4292800E+00, 0.4335900E+00, &
     & 0.4399100E+00, 0.4486900E+00, 0.4561200E+00, 0.4720300E+00, &
     & 0.4897500E+00, 0.5059600E+00, 0.5223200E+00, 0.5324500E+00, &
     & 0.5570700E+00, 0.5914200E+00, 0.6178500E+00, 0.6399500E+00, &
     & 0.6772900E+00, 0.7453800E+00, 0.6183300E+00, 0.6183300E+00 /
      data (ref_adm(37,iz,33,16),iz = 1,20) / &
     & 0.4089800E+00, 0.4089800E+00, 0.4172000E+00, 0.4302600E+00, &
     & 0.4440200E+00, 0.4504500E+00, 0.4669800E+00, 0.4710400E+00, &
     & 0.4871500E+00, 0.5089900E+00, 0.5256700E+00, 0.5403600E+00, &
     & 0.5658700E+00, 0.5987900E+00, 0.6452100E+00, 0.6745300E+00, &
     & 0.7155100E+00, 0.7875800E+00, 0.7200700E+00, 0.7200700E+00 /
      data (ref_adm(37,iz,34,16),iz = 1,20) / &
     & 0.4100700E+00, 0.4100700E+00, 0.4302600E+00, 0.4313100E+00, &
     & 0.4404400E+00, 0.4460000E+00, 0.4709600E+00, 0.4739300E+00, &
     & 0.4730300E+00, 0.5078400E+00, 0.5400100E+00, 0.5549000E+00, &
     & 0.5827000E+00, 0.6186200E+00, 0.6456200E+00, 0.6839100E+00, &
     & 0.7697400E+00, 0.8004138E+00, 0.6257800E+00, 0.6257800E+00 /
      data (ref_adm(37,iz,35,16),iz = 1,20) / &
     & 0.4258300E+00, 0.4258300E+00, 0.4284900E+00, 0.4260100E+00, &
     & 0.4426000E+00, 0.4560000E+00, 0.4612900E+00, 0.4760700E+00, &
     & 0.4642700E+00, 0.4898100E+00, 0.5422600E+00, 0.5578400E+00, &
     & 0.5808000E+00, 0.6303400E+00, 0.6495300E+00, 0.7128000E+00, &
     & 0.8079900E+00, 0.7966857E+00, 0.9753821E+00, 0.9753821E+00 /
      data (ref_adm(37,iz,36,16),iz = 1,20) / &
     & 0.4261200E+00, 0.4261200E+00, 0.4138000E+00, 0.4240300E+00, &
     & 0.4446500E+00, 0.4490100E+00, 0.4533600E+00, 0.4705200E+00, &
     & 0.4936100E+00, 0.4966000E+00, 0.5339400E+00, 0.5488000E+00, &
     & 0.5695000E+00, 0.6319900E+00, 0.6505800E+00, 0.7078400E+00, &
     & 0.7542300E+00, 0.8031949E+00, 0.9815046E+00, 0.9815046E+00 /
      data (ref_adm(37,iz,37,16),iz = 1,20) / &
     & 0.4256900E+00, 0.4256900E+00, 0.4344600E+00, 0.4386300E+00, &
     & 0.4263800E+00, 0.4408900E+00, 0.4598600E+00, 0.4640200E+00, &
     & 0.4845400E+00, 0.5063900E+00, 0.5082600E+00, 0.5443300E+00, &
     & 0.5916300E+00, 0.6486900E+00, 0.6798600E+00, 0.7351600E+00, &
     & 0.8393800E+00, 0.7497300E+00, 0.9865232E+00, 0.9865232E+00 /
      data (ref_adm(37,iz,38,16),iz = 1,20) / &
     & 0.4256900E+00, 0.4256900E+00, 0.4344600E+00, 0.4386300E+00, &
     & 0.4263800E+00, 0.4408900E+00, 0.4598600E+00, 0.4640200E+00, &
     & 0.4845400E+00, 0.5063900E+00, 0.5082600E+00, 0.5443300E+00, &
     & 0.5916300E+00, 0.6486900E+00, 0.6798600E+00, 0.7351600E+00, &
     & 0.8393800E+00, 0.7497300E+00, 0.9865232E+00, 0.9865232E+00 /
! Solar Zenith Angle 80.0 Albedo  0.4921655E+00
      data (ref_adm(37,iz, 1,17),iz = 1,20) / &
     & 0.3707100E+00, 0.3707100E+00, 0.3658400E+00, 0.3872000E+00, &
     & 0.3933000E+00, 0.3882300E+00, 0.3878200E+00, 0.4031100E+00, &
     & 0.4140900E+00, 0.4387600E+00, 0.4836000E+00, 0.4955700E+00, &
     & 0.5778615E+00, 0.6140674E+00, 0.6627204E+00, 0.7240042E+00, &
     & 0.7725254E+00, 0.8119767E+00, 0.7981953E+00, 0.7981953E+00 /
      data (ref_adm(37,iz, 2,17),iz = 1,20) / &
     & 0.3707100E+00, 0.3707100E+00, 0.3658400E+00, 0.3872000E+00, &
     & 0.3933000E+00, 0.3882300E+00, 0.3878200E+00, 0.4031100E+00, &
     & 0.4140900E+00, 0.4387600E+00, 0.4836000E+00, 0.4955700E+00, &
     & 0.5778615E+00, 0.6140674E+00, 0.6627204E+00, 0.7240042E+00, &
     & 0.7725254E+00, 0.8119767E+00, 0.7981953E+00, 0.7981953E+00 /
      data (ref_adm(37,iz, 3,17),iz = 1,20) / &
     & 0.3640700E+00, 0.3640700E+00, 0.3647400E+00, 0.3870200E+00, &
     & 0.3859900E+00, 0.3979600E+00, 0.3890500E+00, 0.3969300E+00, &
     & 0.4115500E+00, 0.4612800E+00, 0.4649500E+00, 0.5178200E+00, &
     & 0.5758413E+00, 0.6111737E+00, 0.6592458E+00, 0.7188524E+00, &
     & 0.7661843E+00, 0.8012028E+00, 0.4313549E+00, 0.4313549E+00 /
      data (ref_adm(37,iz, 4,17),iz = 1,20) / &
     & 0.3619000E+00, 0.3619000E+00, 0.3831000E+00, 0.3569400E+00, &
     & 0.3690500E+00, 0.3822200E+00, 0.4061800E+00, 0.3761600E+00, &
     & 0.4401500E+00, 0.4556400E+00, 0.4671400E+00, 0.4903100E+00, &
     & 0.5714399E+00, 0.6058130E+00, 0.6513739E+00, 0.7073948E+00, &
     & 0.7531541E+00, 0.7810126E+00, 0.7471441E+00, 0.7471441E+00 /
      data (ref_adm(37,iz, 5,17),iz = 1,20) / &
     & 0.3887400E+00, 0.3887400E+00, 0.3786900E+00, 0.3743900E+00, &
     & 0.3822600E+00, 0.4064900E+00, 0.4034700E+00, 0.4239800E+00, &
     & 0.4348000E+00, 0.4581700E+00, 0.4901300E+00, 0.5485400E+00, &
     & 0.5653791E+00, 0.5978098E+00, 0.6401595E+00, 0.6916685E+00, &
     & 0.7358001E+00, 0.7578102E+00, 0.7083291E+00, 0.7083291E+00 /
      data (ref_adm(37,iz, 6,17),iz = 1,20) / &
     & 0.3724000E+00, 0.3724000E+00, 0.3759500E+00, 0.3653400E+00, &
     & 0.3760000E+00, 0.3759800E+00, 0.3892600E+00, 0.4025900E+00, &
     & 0.4129800E+00, 0.4302800E+00, 0.4581300E+00, 0.5024300E+00, &
     & 0.5430800E+00, 0.6442600E+00, 0.6820000E+00, 0.6729700E+00, &
     & 0.7893700E+00, 0.7329689E+00, 0.6737770E+00, 0.6737770E+00 /
      data (ref_adm(37,iz, 7,17),iz = 1,20) / &
     & 0.3587900E+00, 0.3587900E+00, 0.3674000E+00, 0.3814700E+00, &
     & 0.3698100E+00, 0.3603900E+00, 0.3719700E+00, 0.3951100E+00, &
     & 0.4107600E+00, 0.4319800E+00, 0.4584300E+00, 0.4825400E+00, &
     & 0.5253000E+00, 0.6602900E+00, 0.6962600E+00, 0.6757500E+00, &
     & 0.7346100E+00, 0.7064913E+00, 0.6492538E+00, 0.6492538E+00 /
      data (ref_adm(37,iz, 8,17),iz = 1,20) / &
     & 0.3691100E+00, 0.3691100E+00, 0.3743300E+00, 0.3830100E+00, &
     & 0.3851100E+00, 0.3783100E+00, 0.3679200E+00, 0.3820300E+00, &
     & 0.4088400E+00, 0.4472300E+00, 0.4567000E+00, 0.4903600E+00, &
     & 0.5419000E+00, 0.6242100E+00, 0.7066100E+00, 0.6999200E+00, &
     & 0.6560497E+00, 0.6742648E+00, 0.6287233E+00, 0.6287233E+00 /
      data (ref_adm(37,iz, 9,17),iz = 1,20) / &
     & 0.3674500E+00, 0.3674500E+00, 0.3653000E+00, 0.3730500E+00, &
     & 0.3827500E+00, 0.3895700E+00, 0.3900000E+00, 0.3959200E+00, &
     & 0.4077800E+00, 0.4382900E+00, 0.4490500E+00, 0.5028300E+00, &
     & 0.5667800E+00, 0.6106900E+00, 0.6787500E+00, 0.7768100E+00, &
     & 0.6295589E+00, 0.6398509E+00, 0.5997808E+00, 0.5997808E+00 /
      data (ref_adm(37,iz,10,17),iz = 1,20) / &
     & 0.3801300E+00, 0.3801300E+00, 0.3886800E+00, 0.3719100E+00, &
     & 0.3804000E+00, 0.3961800E+00, 0.4206400E+00, 0.4209000E+00, &
     & 0.4206100E+00, 0.4082000E+00, 0.4240500E+00, 0.4927600E+00, &
     & 0.5269800E+00, 0.5653800E+00, 0.7224700E+00, 0.8239100E+00, &
     & 0.7991300E+00, 0.6110977E+00, 0.5691364E+00, 0.5691364E+00 /
      data (ref_adm(37,iz,11,17),iz = 1,20) / &
     & 0.3735200E+00, 0.3735200E+00, 0.3816200E+00, 0.3853200E+00, &
     & 0.3845000E+00, 0.3894900E+00, 0.3920300E+00, 0.4244000E+00, &
     & 0.4596500E+00, 0.4320400E+00, 0.4623900E+00, 0.4709800E+00, &
     & 0.5315500E+00, 0.6314000E+00, 0.6227700E+00, 0.6253600E+00, &
     & 0.6648200E+00, 0.5869827E+00, 0.5454677E+00, 0.5454677E+00 /
      data (ref_adm(37,iz,12,17),iz = 1,20) / &
     & 0.3818700E+00, 0.3818700E+00, 0.3836900E+00, 0.3922400E+00, &
     & 0.3870200E+00, 0.4056300E+00, 0.3973200E+00, 0.4128400E+00, &
     & 0.4516000E+00, 0.4568000E+00, 0.4820300E+00, 0.4853100E+00, &
     & 0.5108000E+00, 0.5466300E+00, 0.5390200E+00, 0.6581500E+00, &
     & 0.7180900E+00, 0.5672087E+00, 0.5275284E+00, 0.5275284E+00 /
      data (ref_adm(37,iz,13,17),iz = 1,20) / &
     & 0.3788100E+00, 0.3788100E+00, 0.3876600E+00, 0.4049800E+00, &
     & 0.3832100E+00, 0.4038900E+00, 0.4086500E+00, 0.4390300E+00, &
     & 0.4317000E+00, 0.4519900E+00, 0.4839900E+00, 0.4759400E+00, &
     & 0.5036100E+00, 0.5484200E+00, 0.5240800E+00, 0.6200400E+00, &
     & 0.6030000E+00, 0.5502266E+00, 0.5125786E+00, 0.5125786E+00 /
      data (ref_adm(37,iz,14,17),iz = 1,20) / &
     & 0.3733300E+00, 0.3733300E+00, 0.3732900E+00, 0.3735500E+00, &
     & 0.3749600E+00, 0.3776500E+00, 0.3891700E+00, 0.3929100E+00, &
     & 0.4079900E+00, 0.4152300E+00, 0.4297400E+00, 0.4366800E+00, &
     & 0.4406200E+00, 0.4547000E+00, 0.5493400E+00, 0.6811600E+00, &
     & 0.6318600E+00, 0.5353490E+00, 0.5001072E+00, 0.5001072E+00 /
      data (ref_adm(37,iz,15,17),iz = 1,20) / &
     & 0.3661000E+00, 0.3661000E+00, 0.3550100E+00, 0.3650000E+00, &
     & 0.3732900E+00, 0.3787400E+00, 0.3802000E+00, 0.3959200E+00, &
     & 0.3991100E+00, 0.4063600E+00, 0.3947400E+00, 0.4130600E+00, &
     & 0.4317500E+00, 0.4562200E+00, 0.5278500E+00, 0.5243600E+00, &
     & 0.6733400E+00, 0.5202950E+00, 0.4884603E+00, 0.4884603E+00 /
      data (ref_adm(37,iz,16,17),iz = 1,20) / &
     & 0.3842800E+00, 0.3842800E+00, 0.3945600E+00, 0.3987200E+00, &
     & 0.3931900E+00, 0.4113900E+00, 0.4163500E+00, 0.4224400E+00, &
     & 0.4310000E+00, 0.4275900E+00, 0.4458400E+00, 0.4578600E+00, &
     & 0.4824200E+00, 0.4845500E+00, 0.5394600E+00, 0.5546800E+00, &
     & 0.5968000E+00, 0.5054778E+00, 0.4757596E+00, 0.4757596E+00 /
      data (ref_adm(37,iz,17,17),iz = 1,20) / &
     & 0.3875300E+00, 0.3875300E+00, 0.4010200E+00, 0.4106500E+00, &
     & 0.4100100E+00, 0.4262700E+00, 0.4208100E+00, 0.4314600E+00, &
     & 0.4266900E+00, 0.4266300E+00, 0.4521800E+00, 0.4662200E+00, &
     & 0.4778700E+00, 0.5386400E+00, 0.5948200E+00, 0.6103100E+00, &
     & 0.4871699E+00, 0.4922366E+00, 0.4639522E+00, 0.4639522E+00 /
      data (ref_adm(37,iz,18,17),iz = 1,20) / &
     & 0.3877500E+00, 0.3877500E+00, 0.3849400E+00, 0.4037200E+00, &
     & 0.4087300E+00, 0.4133200E+00, 0.4317500E+00, 0.4274800E+00, &
     & 0.4222000E+00, 0.4175500E+00, 0.4434500E+00, 0.4455100E+00, &
     & 0.4240000E+00, 0.5080100E+00, 0.4815200E+00, 0.5491700E+00, &
     & 0.6134099E+00, 0.7034848E+00, 0.8266335E+00, 0.8266335E+00 /
      data (ref_adm(37,iz,19,17),iz = 1,20) / &
     & 0.4041800E+00, 0.4041800E+00, 0.3818800E+00, 0.3990000E+00, &
     & 0.3956700E+00, 0.4181800E+00, 0.4198500E+00, 0.4258400E+00, &
     & 0.4176400E+00, 0.4380100E+00, 0.4607400E+00, 0.4907700E+00, &
     & 0.4937200E+00, 0.4906100E+00, 0.4839400E+00, 0.5529368E+00, &
     & 0.6032047E+00, 0.6880125E+00, 0.8068366E+00, 0.8068366E+00 /
      data (ref_adm(37,iz,20,17),iz = 1,20) / &
     & 0.3912900E+00, 0.3912900E+00, 0.3870400E+00, 0.3961300E+00, &
     & 0.3801400E+00, 0.4043000E+00, 0.4097400E+00, 0.4444200E+00, &
     & 0.4320100E+00, 0.4537000E+00, 0.4453600E+00, 0.4871200E+00, &
     & 0.4907000E+00, 0.4831500E+00, 0.5212200E+00, 0.5485207E+00, &
     & 0.5969144E+00, 0.6781135E+00, 0.7959892E+00, 0.7959892E+00 /
      data (ref_adm(37,iz,21,17),iz = 1,20) / &
     & 0.4001800E+00, 0.4001800E+00, 0.3931000E+00, 0.4106800E+00, &
     & 0.4018600E+00, 0.3930600E+00, 0.4048300E+00, 0.4457100E+00, &
     & 0.4246600E+00, 0.4462300E+00, 0.4763800E+00, 0.4802800E+00, &
     & 0.4646600E+00, 0.4524300E+00, 0.5069000E+00, 0.5449863E+00, &
     & 0.5922170E+00, 0.6711733E+00, 0.7909762E+00, 0.7909762E+00 /
      data (ref_adm(37,iz,22,17),iz = 1,20) / &
     & 0.3918900E+00, 0.3918900E+00, 0.3851700E+00, 0.3897000E+00, &
     & 0.4064900E+00, 0.4135400E+00, 0.4226900E+00, 0.4407100E+00, &
     & 0.4403500E+00, 0.4258800E+00, 0.4480300E+00, 0.5040200E+00, &
     & 0.4662200E+00, 0.4919500E+00, 0.5714400E+00, 0.4964500E+00, &
     & 0.6494365E+00, 0.7706299E+00, 0.1125693E+01, 0.1125693E+01 /
      data (ref_adm(37,iz,23,17),iz = 1,20) / &
     & 0.3769600E+00, 0.3769600E+00, 0.3815600E+00, 0.3689700E+00, &
     & 0.3780400E+00, 0.3720100E+00, 0.4014100E+00, 0.4003400E+00, &
     & 0.4268200E+00, 0.4455700E+00, 0.4673000E+00, 0.4794800E+00, &
     & 0.5184300E+00, 0.4903400E+00, 0.4949700E+00, 0.4787600E+00, &
     & 0.6504185E+00, 0.7733295E+00, 0.1146175E+01, 0.1146175E+01 /
      data (ref_adm(37,iz,24,17),iz = 1,20) / &
     & 0.3934700E+00, 0.3934700E+00, 0.3881400E+00, 0.3883100E+00, &
     & 0.4004500E+00, 0.4103600E+00, 0.4209500E+00, 0.4331400E+00, &
     & 0.4408900E+00, 0.4396900E+00, 0.4707800E+00, 0.4852700E+00, &
     & 0.5208400E+00, 0.5545100E+00, 0.5451500E+00, 0.5918275E+00, &
     & 0.6571806E+00, 0.7833852E+00, 0.1178659E+01, 0.1178659E+01 /
      data (ref_adm(37,iz,25,17),iz = 1,20) / &
     & 0.3674900E+00, 0.3674900E+00, 0.3691400E+00, 0.3780100E+00, &
     & 0.3803200E+00, 0.3876100E+00, 0.3968000E+00, 0.4073900E+00, &
     & 0.4248000E+00, 0.4408700E+00, 0.4583100E+00, 0.4748700E+00, &
     & 0.4966000E+00, 0.5325900E+00, 0.5550500E+00, 0.5692700E+00, &
     & 0.6718700E+00, 0.8004550E+00, 0.1221052E+01, 0.1221052E+01 /
      data (ref_adm(37,iz,26,17),iz = 1,20) / &
     & 0.3701000E+00, 0.3701000E+00, 0.3768800E+00, 0.3746100E+00, &
     & 0.3903800E+00, 0.3851000E+00, 0.3960100E+00, 0.4058900E+00, &
     & 0.4337400E+00, 0.4346400E+00, 0.4747800E+00, 0.4823500E+00, &
     & 0.5033200E+00, 0.5416200E+00, 0.5877900E+00, 0.5169300E+00, &
     & 0.6878384E+00, 0.8273280E+00, 0.1275999E+01, 0.1275999E+01 /
      data (ref_adm(37,iz,27,17),iz = 1,20) / &
     & 0.3778800E+00, 0.3778800E+00, 0.3729800E+00, 0.3699000E+00, &
     & 0.3855500E+00, 0.4030000E+00, 0.4007400E+00, 0.4099200E+00, &
     & 0.4386000E+00, 0.4471800E+00, 0.4952800E+00, 0.5128800E+00, &
     & 0.5175900E+00, 0.5402100E+00, 0.5318300E+00, 0.5587200E+00, &
     & 0.7080311E+00, 0.8872400E+00, 0.1336679E+01, 0.1336679E+01 /
      data (ref_adm(37,iz,28,17),iz = 1,20) / &
     & 0.3868600E+00, 0.3868600E+00, 0.3790700E+00, 0.3779900E+00, &
     & 0.3966400E+00, 0.4030900E+00, 0.4207900E+00, 0.4177600E+00, &
     & 0.4405400E+00, 0.4306200E+00, 0.4869100E+00, 0.5046800E+00, &
     & 0.5113700E+00, 0.5379800E+00, 0.5631900E+00, 0.5240600E+00, &
     & 0.7334555E+00, 0.8921980E+00, 0.1404059E+01, 0.1404059E+01 /
      data (ref_adm(37,iz,29,17),iz = 1,20) / &
     & 0.3952000E+00, 0.3952000E+00, 0.3848000E+00, 0.3746700E+00, &
     & 0.3983000E+00, 0.3959700E+00, 0.4024000E+00, 0.4480000E+00, &
     & 0.4355600E+00, 0.4558300E+00, 0.4985600E+00, 0.5258300E+00, &
     & 0.5317100E+00, 0.5963400E+00, 0.6139900E+00, 0.7051900E+00, &
     & 0.7515100E+00, 0.9564580E+00, 0.1490033E+01, 0.1490033E+01 /
      data (ref_adm(37,iz,30,17),iz = 1,20) / &
     & 0.3873600E+00, 0.3873600E+00, 0.3898700E+00, 0.3921200E+00, &
     & 0.3948500E+00, 0.4009800E+00, 0.4245900E+00, 0.4455900E+00, &
     & 0.4514300E+00, 0.4512200E+00, 0.4936500E+00, 0.5339000E+00, &
     & 0.5527100E+00, 0.6293400E+00, 0.6401600E+00, 0.7141300E+00, &
     & 0.7594100E+00, 0.1016274E+01, 0.1576834E+01, 0.1576834E+01 /
      data (ref_adm(37,iz,31,17),iz = 1,20) / &
     & 0.3722300E+00, 0.3722300E+00, 0.3845900E+00, 0.3998700E+00, &
     & 0.3886300E+00, 0.4161800E+00, 0.4362800E+00, 0.4423400E+00, &
     & 0.4544900E+00, 0.4579500E+00, 0.4567900E+00, 0.5352500E+00, &
     & 0.5543400E+00, 0.6302400E+00, 0.6790800E+00, 0.7523900E+00, &
     & 0.8267459E+00, 0.1020471E+01, 0.1622093E+01, 0.1622093E+01 /
      data (ref_adm(37,iz,32,17),iz = 1,20) / &
     & 0.3742300E+00, 0.3742300E+00, 0.3716800E+00, 0.3878400E+00, &
     & 0.3909200E+00, 0.3960900E+00, 0.4093700E+00, 0.4121100E+00, &
     & 0.4507900E+00, 0.4629000E+00, 0.4860000E+00, 0.5400400E+00, &
     & 0.5628600E+00, 0.6033800E+00, 0.7063000E+00, 0.6585200E+00, &
     & 0.8481800E+00, 0.1048782E+01, 0.1678924E+01, 0.1678924E+01 /
      data (ref_adm(37,iz,33,17),iz = 1,20) / &
     & 0.3749100E+00, 0.3749100E+00, 0.3764500E+00, 0.3809400E+00, &
     & 0.3909400E+00, 0.3973700E+00, 0.4153100E+00, 0.4273300E+00, &
     & 0.4592000E+00, 0.4727600E+00, 0.4864400E+00, 0.5319700E+00, &
     & 0.5760700E+00, 0.6039000E+00, 0.6232000E+00, 0.7479700E+00, &
     & 0.8574812E+00, 0.1066502E+01, 0.7293800E+00, 0.7293800E+00 /
      data (ref_adm(37,iz,34,17),iz = 1,20) / &
     & 0.3671300E+00, 0.3671300E+00, 0.3769600E+00, 0.3896500E+00, &
     & 0.3982800E+00, 0.4008900E+00, 0.4177200E+00, 0.4370000E+00, &
     & 0.4607500E+00, 0.4877300E+00, 0.5241300E+00, 0.5031300E+00, &
     & 0.5489600E+00, 0.5899700E+00, 0.6680800E+00, 0.7464100E+00, &
     & 0.7347000E+00, 0.1069870E+01, 0.1755397E+01, 0.1755397E+01 /
      data (ref_adm(37,iz,35,17),iz = 1,20) / &
     & 0.3564700E+00, 0.3564700E+00, 0.3696800E+00, 0.3973100E+00, &
     & 0.3938200E+00, 0.4038300E+00, 0.4004800E+00, 0.4122900E+00, &
     & 0.4385800E+00, 0.4650000E+00, 0.5342000E+00, 0.5102400E+00, &
     & 0.5312800E+00, 0.6056800E+00, 0.6709700E+00, 0.7361100E+00, &
     & 0.8549700E+00, 0.1078427E+01, 0.1781561E+01, 0.1781561E+01 /
      data (ref_adm(37,iz,36,17),iz = 1,20) / &
     & 0.3727900E+00, 0.3727900E+00, 0.3765900E+00, 0.3718000E+00, &
     & 0.3860900E+00, 0.3862600E+00, 0.4144700E+00, 0.4323000E+00, &
     & 0.4637300E+00, 0.4828700E+00, 0.5201000E+00, 0.5537100E+00, &
     & 0.5764100E+00, 0.6397100E+00, 0.6836200E+00, 0.7218900E+00, &
     & 0.8589100E+00, 0.1097608E+01, 0.1809209E+01, 0.1809209E+01 /
      data (ref_adm(37,iz,37,17),iz = 1,20) / &
     & 0.3660000E+00, 0.3660000E+00, 0.3811000E+00, 0.3706700E+00, &
     & 0.3748400E+00, 0.4095800E+00, 0.4303600E+00, 0.4503300E+00, &
     & 0.4482800E+00, 0.4803700E+00, 0.5467200E+00, 0.5608300E+00, &
     & 0.5862900E+00, 0.6402300E+00, 0.6994100E+00, 0.7842700E+00, &
     & 0.8981161E+00, 0.1156445E+01, 0.1848537E+01, 0.1848537E+01 /
      data (ref_adm(37,iz,38,17),iz = 1,20) / &
     & 0.3660000E+00, 0.3660000E+00, 0.3811000E+00, 0.3706700E+00, &
     & 0.3748400E+00, 0.4095800E+00, 0.4303600E+00, 0.4503300E+00, &
     & 0.4482800E+00, 0.4803700E+00, 0.5467200E+00, 0.5608300E+00, &
     & 0.5862900E+00, 0.6402300E+00, 0.6994100E+00, 0.7842700E+00, &
     & 0.8981161E+00, 0.1156445E+01, 0.1848537E+01, 0.1848537E+01 /
! Solar Zenith Angle 85.0 Albedo  0.6669441E+00
      data (ref_adm(37,iz, 1,18),iz = 1,20) / &
     & 0.4831100E+00, 0.4831100E+00, 0.4553200E+00, 0.4384200E+00, &
     & 0.4659500E+00, 0.5161800E+00, 0.5598400E+00, 0.5597300E+00, &
     & 0.5393900E+00, 0.5911100E+00, 0.6392000E+00, 0.7773400E+00, &
     & 0.8820657E+00, 0.9732740E+00, 0.1107034E+01, 0.1269222E+01, &
     & 0.1420442E+01, 0.1585356E+01, 0.1284542E+01, 0.1284542E+01 /
      data (ref_adm(37,iz, 2,18),iz = 1,20) / &
     & 0.4831100E+00, 0.4831100E+00, 0.4553200E+00, 0.4384200E+00, &
     & 0.4659500E+00, 0.5161800E+00, 0.5598400E+00, 0.5597300E+00, &
     & 0.5393900E+00, 0.5911100E+00, 0.6392000E+00, 0.7773400E+00, &
     & 0.8820657E+00, 0.9732740E+00, 0.1107034E+01, 0.1269222E+01, &
     & 0.1420442E+01, 0.1585356E+01, 0.1284542E+01, 0.1284542E+01 /
      data (ref_adm(37,iz, 3,18),iz = 1,20) / &
     & 0.4988400E+00, 0.4988400E+00, 0.4767400E+00, 0.4714300E+00, &
     & 0.4811100E+00, 0.4912900E+00, 0.4933900E+00, 0.5414400E+00, &
     & 0.5711600E+00, 0.6361800E+00, 0.6783300E+00, 0.7409700E+00, &
     & 0.8772810E+00, 0.9659486E+00, 0.1096801E+01, 0.1255590E+01, &
     & 0.1398652E+01, 0.1546417E+01, 0.6272585E+00, 0.6272585E+00 /
      data (ref_adm(37,iz, 4,18),iz = 1,20) / &
     & 0.4446100E+00, 0.4446100E+00, 0.4985100E+00, 0.5195900E+00, &
     & 0.4835900E+00, 0.4855600E+00, 0.4937200E+00, 0.5417700E+00, &
     & 0.5579000E+00, 0.6273500E+00, 0.7344500E+00, 0.6503400E+00, &
     & 0.8663254E+00, 0.9508800E+00, 0.1074371E+01, 0.1226015E+01, &
     & 0.1355838E+01, 0.1471800E+01, 0.1168064E+01, 0.1168064E+01 /
      data (ref_adm(37,iz, 5,18),iz = 1,20) / &
     & 0.4654800E+00, 0.4654800E+00, 0.4350100E+00, 0.4676700E+00, &
     & 0.5023900E+00, 0.4964600E+00, 0.4852300E+00, 0.4956600E+00, &
     & 0.5704900E+00, 0.6070400E+00, 0.6504100E+00, 0.6850900E+00, &
     & 0.8517021E+00, 0.9302501E+00, 0.1042838E+01, 0.1185381E+01, &
     & 0.1300390E+01, 0.1379772E+01, 0.1083059E+01, 0.1083059E+01 /
      data (ref_adm(37,iz, 6,18),iz = 1,20) / &
     & 0.4458700E+00, 0.4458700E+00, 0.4527500E+00, 0.4627800E+00, &
     & 0.4925100E+00, 0.5108900E+00, 0.5169000E+00, 0.5048900E+00, &
     & 0.5630100E+00, 0.5703000E+00, 0.6373700E+00, 0.7406400E+00, &
     & 0.8952700E+00, 0.9614500E+00, 0.1185100E+01, 0.1446600E+01, &
     & 0.1235259E+01, 0.1283538E+01, 0.1001606E+01, 0.1001606E+01 /
      data (ref_adm(37,iz, 7,18),iz = 1,20) / &
     & 0.4681400E+00, 0.4681400E+00, 0.4623200E+00, 0.5034900E+00, &
     & 0.4985300E+00, 0.5265400E+00, 0.4880600E+00, 0.5148900E+00, &
     & 0.5226700E+00, 0.5527200E+00, 0.5781000E+00, 0.7516600E+00, &
     & 0.8413500E+00, 0.9246500E+00, 0.1025300E+01, 0.1267200E+01, &
     & 0.1164522E+01, 0.1194141E+01, 0.9279682E+00, 0.9279682E+00 /
      data (ref_adm(37,iz, 8,18),iz = 1,20) / &
     & 0.4555400E+00, 0.4555400E+00, 0.4574600E+00, 0.4700200E+00, &
     & 0.4797200E+00, 0.5046500E+00, 0.5397200E+00, 0.5392300E+00, &
     & 0.5282300E+00, 0.5877600E+00, 0.6369800E+00, 0.7120400E+00, &
     & 0.8366900E+00, 0.1014000E+01, 0.1110400E+01, 0.1497400E+01, &
     & 0.1085019E+01, 0.1110812E+01, 0.8699465E+00, 0.8699465E+00 /
      data (ref_adm(37,iz, 9,18),iz = 1,20) / &
     & 0.4672800E+00, 0.4672800E+00, 0.4411700E+00, 0.4545500E+00, &
     & 0.4857300E+00, 0.5384000E+00, 0.5351700E+00, 0.5415000E+00, &
     & 0.5416300E+00, 0.5389100E+00, 0.6351800E+00, 0.6484300E+00, &
     & 0.7592600E+00, 0.9092000E+00, 0.1017200E+01, 0.1234200E+01, &
     & 0.1007419E+01, 0.1022698E+01, 0.8188010E+00, 0.8188010E+00 /
      data (ref_adm(37,iz,10,18),iz = 1,20) / &
     & 0.4709600E+00, 0.4709600E+00, 0.4597100E+00, 0.4506000E+00, &
     & 0.5365300E+00, 0.5197500E+00, 0.4959700E+00, 0.5155300E+00, &
     & 0.5488400E+00, 0.6124500E+00, 0.6634800E+00, 0.7002500E+00, &
     & 0.8429900E+00, 0.9247700E+00, 0.1032200E+01, 0.1351600E+01, &
     & 0.2277900E+01, 0.9390931E+00, 0.7636898E+00, 0.7636898E+00 /
      data (ref_adm(37,iz,11,18),iz = 1,20) / &
     & 0.4688900E+00, 0.4688900E+00, 0.4494900E+00, 0.4945900E+00, &
     & 0.5012900E+00, 0.4615000E+00, 0.5008700E+00, 0.5312100E+00, &
     & 0.5657900E+00, 0.6416200E+00, 0.6541500E+00, 0.6816000E+00, &
     & 0.7774900E+00, 0.1035600E+01, 0.9214400E+00, 0.1590100E+01, &
     & 0.1230000E+01, 0.8686938E+00, 0.7152460E+00, 0.7152460E+00 /
      data (ref_adm(37,iz,12,18),iz = 1,20) / &
     & 0.4772500E+00, 0.4772500E+00, 0.4475400E+00, 0.4617100E+00, &
     & 0.4546000E+00, 0.4888000E+00, 0.5335600E+00, 0.5081400E+00, &
     & 0.5554200E+00, 0.6272000E+00, 0.6115300E+00, 0.8458800E+00, &
     & 0.7193800E+00, 0.7242900E+00, 0.9330500E+00, 0.1213300E+01, &
     & 0.8281182E+00, 0.8114617E+00, 0.6760949E+00, 0.6760949E+00 /
      data (ref_adm(37,iz,13,18),iz = 1,20) / &
     & 0.4874800E+00, 0.4874800E+00, 0.4674400E+00, 0.4421900E+00, &
     & 0.4422200E+00, 0.4974500E+00, 0.5217200E+00, 0.5112000E+00, &
     & 0.5627300E+00, 0.6294900E+00, 0.6135100E+00, 0.6862800E+00, &
     & 0.7002100E+00, 0.7820500E+00, 0.8010700E+00, 0.1093400E+01, &
     & 0.7846560E+00, 0.7638118E+00, 0.6431773E+00, 0.6431773E+00 /
      data (ref_adm(37,iz,14,18),iz = 1,20) / &
     & 0.4726000E+00, 0.4726000E+00, 0.4387000E+00, 0.4395600E+00, &
     & 0.4476900E+00, 0.4385700E+00, 0.4453000E+00, 0.4316700E+00, &
     & 0.4444200E+00, 0.4537000E+00, 0.5007300E+00, 0.4932700E+00, &
     & 0.5337500E+00, 0.6094100E+00, 0.9174100E+00, 0.9355700E+00, &
     & 0.1410600E+01, 0.7249289E+00, 0.6161159E+00, 0.6161159E+00 /
      data (ref_adm(37,iz,15,18),iz = 1,20) / &
     & 0.4624200E+00, 0.4624200E+00, 0.4644400E+00, 0.4493500E+00, &
     & 0.4380200E+00, 0.4356700E+00, 0.4472000E+00, 0.4434600E+00, &
     & 0.4562400E+00, 0.4605900E+00, 0.4737700E+00, 0.4697800E+00, &
     & 0.5527000E+00, 0.6116600E+00, 0.9999500E+00, 0.1163400E+01, &
     & 0.7125798E+00, 0.6910320E+00, 0.5930266E+00, 0.5930266E+00 /
      data (ref_adm(37,iz,16,18),iz = 1,20) / &
     & 0.4546300E+00, 0.4546300E+00, 0.4360300E+00, 0.4448900E+00, &
     & 0.4588500E+00, 0.4589500E+00, 0.4593100E+00, 0.4581200E+00, &
     & 0.4630100E+00, 0.4693600E+00, 0.4713600E+00, 0.4669000E+00, &
     & 0.5323300E+00, 0.5492100E+00, 0.1003600E+01, 0.1180700E+01, &
     & 0.6828518E+00, 0.6604697E+00, 0.5729146E+00, 0.5729146E+00 /
      data (ref_adm(37,iz,17,18),iz = 1,20) / &
     & 0.4573300E+00, 0.4573300E+00, 0.4627000E+00, 0.4766800E+00, &
     & 0.4647100E+00, 0.4757800E+00, 0.4931800E+00, 0.5106300E+00, &
     & 0.5072800E+00, 0.5375500E+00, 0.5930000E+00, 0.5760000E+00, &
     & 0.6227800E+00, 0.7849600E+00, 0.7900400E+00, 0.2165400E+01, &
     & 0.6569266E+00, 0.6347676E+00, 0.5555815E+00, 0.5555815E+00 /
      data (ref_adm(37,iz,18,18),iz = 1,20) / &
     & 0.4540100E+00, 0.4540100E+00, 0.4478000E+00, 0.4395800E+00, &
     & 0.4465000E+00, 0.4405700E+00, 0.4731300E+00, 0.4890000E+00, &
     & 0.4955800E+00, 0.5071000E+00, 0.5302700E+00, 0.5596000E+00, &
     & 0.6044400E+00, 0.8500900E+00, 0.1160400E+01, 0.8284718E+00, &
     & 0.9415563E+00, 0.1142861E+01, 0.1595521E+01, 0.1595521E+01 /
      data (ref_adm(37,iz,19,18),iz = 1,20) / &
     & 0.4478800E+00, 0.4478800E+00, 0.4493800E+00, 0.4594400E+00, &
     & 0.4597200E+00, 0.4596700E+00, 0.4823600E+00, 0.4923800E+00, &
     & 0.5502300E+00, 0.5092100E+00, 0.5386800E+00, 0.5486700E+00, &
     & 0.6038700E+00, 0.7722400E+00, 0.5785500E+00, 0.8035639E+00, &
     & 0.9098426E+00, 0.1101720E+01, 0.1550071E+01, 0.1550071E+01 /
      data (ref_adm(37,iz,20,18),iz = 1,20) / &
     & 0.4656100E+00, 0.4656100E+00, 0.4607800E+00, 0.4814300E+00, &
     & 0.4820500E+00, 0.4599800E+00, 0.5115300E+00, 0.5728100E+00, &
     & 0.5391100E+00, 0.5134800E+00, 0.5273100E+00, 0.6000600E+00, &
     & 0.6558100E+00, 0.6405300E+00, 0.6015500E+00, 0.7852713E+00, &
     & 0.8870799E+00, 0.1071844E+01, 0.1525290E+01, 0.1525290E+01 /
      data (ref_adm(37,iz,21,18),iz = 1,20) / &
     & 0.4753200E+00, 0.4753200E+00, 0.4718900E+00, 0.4670600E+00, &
     & 0.4833600E+00, 0.4781300E+00, 0.5136700E+00, 0.5311600E+00, &
     & 0.5138300E+00, 0.5304700E+00, 0.5295300E+00, 0.6098400E+00, &
     & 0.6124700E+00, 0.6942100E+00, 0.7354900E+00, 0.7687618E+00, &
     & 0.8674428E+00, 0.1048417E+01, 0.1513539E+01, 0.1513539E+01 /
      data (ref_adm(37,iz,22,18),iz = 1,20) / &
     & 0.4610600E+00, 0.4610600E+00, 0.4847900E+00, 0.4577700E+00, &
     & 0.4869600E+00, 0.4889800E+00, 0.4894600E+00, 0.4943400E+00, &
     & 0.4707400E+00, 0.5308900E+00, 0.5229900E+00, 0.5977700E+00, &
     & 0.7316000E+00, 0.6705600E+00, 0.7298359E+00, 0.7921444E+00, &
     & 0.8681759E+00, 0.9972978E+00, 0.1303701E+01, 0.1303701E+01 /
      data (ref_adm(37,iz,23,18),iz = 1,20) / &
     & 0.4727100E+00, 0.4727100E+00, 0.4886000E+00, 0.4636900E+00, &
     & 0.4877200E+00, 0.4833800E+00, 0.5125000E+00, 0.4801900E+00, &
     & 0.4860200E+00, 0.5953000E+00, 0.5986900E+00, 0.6154800E+00, &
     & 0.6710500E+00, 0.6890800E+00, 0.7202604E+00, 0.7807310E+00, &
     & 0.8547880E+00, 0.9841658E+00, 0.1314971E+01, 0.1314971E+01 /
      data (ref_adm(37,iz,24,18),iz = 1,20) / &
     & 0.4563000E+00, 0.4563000E+00, 0.4632900E+00, 0.4558400E+00, &
     & 0.4692900E+00, 0.4815100E+00, 0.4991400E+00, 0.5058400E+00, &
     & 0.5387800E+00, 0.5580200E+00, 0.5796100E+00, 0.6105200E+00, &
     & 0.6994300E+00, 0.8380700E+00, 0.8948500E+00, 0.7736343E+00, &
     & 0.8479379E+00, 0.9786007E+00, 0.1338569E+01, 0.1338569E+01 /
      data (ref_adm(37,iz,25,18),iz = 1,20) / &
     & 0.4601100E+00, 0.4601100E+00, 0.4592400E+00, 0.4578900E+00, &
     & 0.4827000E+00, 0.4926900E+00, 0.5003000E+00, 0.5113600E+00, &
     & 0.5342900E+00, 0.5324000E+00, 0.5703700E+00, 0.5995200E+00, &
     & 0.6428700E+00, 0.7413200E+00, 0.7683300E+00, 0.7702132E+00, &
     & 0.8454679E+00, 0.9796057E+00, 0.1371899E+01, 0.1371899E+01 /
      data (ref_adm(37,iz,26,18),iz = 1,20) / &
     & 0.4592100E+00, 0.4592100E+00, 0.4662700E+00, 0.4438900E+00, &
     & 0.4615900E+00, 0.4897800E+00, 0.4818000E+00, 0.4927600E+00, &
     & 0.5259800E+00, 0.5285200E+00, 0.5620400E+00, 0.6025700E+00, &
     & 0.6986700E+00, 0.8701100E+00, 0.7747400E+00, 0.7746282E+00, &
     & 0.8522215E+00, 0.9930482E+00, 0.1420381E+01, 0.1420381E+01 /
      data (ref_adm(37,iz,27,18),iz = 1,20) / &
     & 0.4593800E+00, 0.4593800E+00, 0.5146700E+00, 0.4762600E+00, &
     & 0.5057300E+00, 0.4939100E+00, 0.4876700E+00, 0.4943000E+00, &
     & 0.5671900E+00, 0.5622500E+00, 0.5612600E+00, 0.6395200E+00, &
     & 0.7389000E+00, 0.8588200E+00, 0.8413200E+00, 0.7836382E+00, &
     & 0.8646963E+00, 0.1013053E+01, 0.1477260E+01, 0.1477260E+01 /
      data (ref_adm(37,iz,28,18),iz = 1,20) / &
     & 0.4634300E+00, 0.4634300E+00, 0.4897200E+00, 0.4597500E+00, &
     & 0.4857500E+00, 0.4955400E+00, 0.4753900E+00, 0.4902400E+00, &
     & 0.5153200E+00, 0.5583700E+00, 0.5939000E+00, 0.6681500E+00, &
     & 0.7479600E+00, 0.1070100E+01, 0.8283100E+00, 0.7955165E+00, &
     & 0.8808448E+00, 0.1038288E+01, 0.1538633E+01, 0.1538633E+01 /
      data (ref_adm(37,iz,29,18),iz = 1,20) / &
     & 0.4611600E+00, 0.4611600E+00, 0.4606400E+00, 0.4689500E+00, &
     & 0.5098800E+00, 0.5134900E+00, 0.5011900E+00, 0.5382500E+00, &
     & 0.5275200E+00, 0.6057300E+00, 0.5594300E+00, 0.6455500E+00, &
     & 0.7599800E+00, 0.1013800E+01, 0.8633200E+00, 0.8122625E+00, &
     & 0.9030349E+00, 0.1071054E+01, 0.1606632E+01, 0.1606632E+01 /
      data (ref_adm(37,iz,30,18),iz = 1,20) / &
     & 0.4635700E+00, 0.4635700E+00, 0.4683800E+00, 0.4648700E+00, &
     & 0.5008700E+00, 0.5018200E+00, 0.5224400E+00, 0.5345300E+00, &
     & 0.5113400E+00, 0.5676900E+00, 0.5896300E+00, 0.6734500E+00, &
     & 0.7921700E+00, 0.9133500E+00, 0.8536800E+00, 0.1095900E+01, &
     & 0.9309894E+00, 0.1111124E+01, 0.1679391E+01, 0.1679391E+01 /
      data (ref_adm(37,iz,31,18),iz = 1,20) / &
     & 0.4473300E+00, 0.4473300E+00, 0.4500500E+00, 0.4679100E+00, &
     & 0.4892700E+00, 0.5426800E+00, 0.5261800E+00, 0.5301200E+00, &
     & 0.5346900E+00, 0.6046300E+00, 0.6434400E+00, 0.6716800E+00, &
     & 0.7891900E+00, 0.1021700E+01, 0.8588500E+00, 0.8381500E+00, &
     & 0.9608631E+00, 0.1152174E+01, 0.1750508E+01, 0.1750508E+01 /
      data (ref_adm(37,iz,32,18),iz = 1,20) / &
     & 0.4589100E+00, 0.4589100E+00, 0.4643700E+00, 0.4636500E+00, &
     & 0.4912600E+00, 0.4991900E+00, 0.5179800E+00, 0.5833200E+00, &
     & 0.5916100E+00, 0.6100300E+00, 0.6228300E+00, 0.6850100E+00, &
     & 0.8136900E+00, 0.8797700E+00, 0.1114400E+01, 0.1306200E+01, &
     & 0.1290400E+01, 0.1195225E+01, 0.1821110E+01, 0.1821110E+01 /
      data (ref_adm(37,iz,33,18),iz = 1,20) / &
     & 0.4568600E+00, 0.4568600E+00, 0.4653200E+00, 0.4695600E+00, &
     & 0.4802300E+00, 0.5006500E+00, 0.5224300E+00, 0.5453700E+00, &
     & 0.6055400E+00, 0.6050900E+00, 0.6561700E+00, 0.7144300E+00, &
     & 0.7682300E+00, 0.8509500E+00, 0.1060900E+01, 0.1120300E+01, &
     & 0.1004795E+01, 0.1213183E+01, 0.1872639E+01, 0.1872639E+01 /
      data (ref_adm(37,iz,34,18),iz = 1,20) / &
     & 0.4629300E+00, 0.4629300E+00, 0.4421300E+00, 0.4545000E+00, &
     & 0.4762500E+00, 0.5126900E+00, 0.5454100E+00, 0.5378100E+00, &
     & 0.5836000E+00, 0.6337400E+00, 0.6429500E+00, 0.6513700E+00, &
     & 0.7166500E+00, 0.8740500E+00, 0.9087600E+00, 0.1151800E+01, &
     & 0.9923131E+00, 0.1199628E+01, 0.1891653E+01, 0.1891653E+01 /
      data (ref_adm(37,iz,35,18),iz = 1,20) / &
     & 0.4798800E+00, 0.4798800E+00, 0.4530700E+00, 0.4601600E+00, &
     & 0.4798600E+00, 0.5063800E+00, 0.5410600E+00, 0.5594900E+00, &
     & 0.5546200E+00, 0.6518400E+00, 0.6172900E+00, 0.7171000E+00, &
     & 0.7772100E+00, 0.8881800E+00, 0.1066300E+01, 0.1379300E+01, &
     & 0.9884387E+00, 0.1199131E+01, 0.1911195E+01, 0.1911195E+01 /
      data (ref_adm(37,iz,36,18),iz = 1,20) / &
     & 0.4658600E+00, 0.4658600E+00, 0.4827200E+00, 0.4817900E+00, &
     & 0.4788100E+00, 0.4709300E+00, 0.5186900E+00, 0.5614000E+00, &
     & 0.5796200E+00, 0.5813000E+00, 0.6496900E+00, 0.6930300E+00, &
     & 0.7941000E+00, 0.9334300E+00, 0.1049800E+01, 0.1142600E+01, &
     & 0.9978026E+00, 0.1217219E+01, 0.1937016E+01, 0.1937016E+01 /
      data (ref_adm(37,iz,37,18),iz = 1,20) / &
     & 0.4940900E+00, 0.4940900E+00, 0.5154100E+00, 0.4935100E+00, &
     & 0.5076200E+00, 0.5237100E+00, 0.4946900E+00, 0.5352400E+00, &
     & 0.5780500E+00, 0.5862500E+00, 0.6676200E+00, 0.7269700E+00, &
     & 0.8210100E+00, 0.9300900E+00, 0.1040900E+01, 0.8869972E+00, &
     & 0.1037347E+01, 0.1323298E+01, 0.1986790E+01, 0.1986790E+01 /
      data (ref_adm(37,iz,38,18),iz = 1,20) / &
     & 0.4940900E+00, 0.4940900E+00, 0.5154100E+00, 0.4935100E+00, &
     & 0.5076200E+00, 0.5237100E+00, 0.4946900E+00, 0.5352400E+00, &
     & 0.5780500E+00, 0.5862500E+00, 0.6676200E+00, 0.7269700E+00, &
     & 0.8210100E+00, 0.9300900E+00, 0.1040900E+01, 0.8869972E+00, &
     & 0.1037347E+01, 0.1323298E+01, 0.1986790E+01, 0.1986790E+01 /
      data (albedo_adm( 1,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.3574071E+00, &
     & 0.3107392E+00, 0.3342749E+00, 0.3526763E+00, 0.3855194E+00, &
     & 0.3962275E+00, 0.4112163E+00, 0.4229766E+00, 0.4288844E+00, &
     & 0.4472017E+00, 0.4744267E+00, 0.5029696E+00, 0.5232295E+00, &
     & 0.5483900E+00, 0.6665173E+00 /
      data (albedo_adm( 2,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.4305441E+00, &
     & 0.4424793E+00, 0.4458218E+00, 0.4617778E+00, 0.4801656E+00, &
     & 0.4819358E+00, 0.4786951E+00, 0.4817539E+00, 0.4827677E+00, &
     & 0.4921416E+00, 0.5043609E+00, 0.5257446E+00, 0.5465679E+00, &
     & 0.5925559E+00, 0.6831767E+00 /
      data (albedo_adm( 3,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.3366172E+00, &
     & 0.3287703E+00, 0.3473719E+00, 0.3578871E+00, 0.3684973E+00, &
     & 0.3676940E+00, 0.3733931E+00, 0.3760711E+00, 0.3894283E+00, &
     & 0.4094311E+00, 0.4321052E+00, 0.4472719E+00, 0.4732751E+00, &
     & 0.5033947E+00, 0.5975062E+00 /
      data (albedo_adm( 4,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.2257664E+00, &
     & 0.2369257E+00, 0.2365393E+00, 0.2491410E+00, 0.2591574E+00, &
     & 0.2660691E+00, 0.2713313E+00, 0.2719613E+00, 0.2834398E+00, &
     & 0.2968576E+00, 0.3093536E+00, 0.3316717E+00, 0.3722437E+00, &
     & 0.3980705E+00, 0.4975616E+00 /
      data (albedo_adm( 5,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.1918544E+00, &
     & 0.1921733E+00, 0.1908275E+00, 0.2029386E+00, 0.2161707E+00, &
     & 0.2194339E+00, 0.2249733E+00, 0.2285125E+00, 0.2387578E+00, &
     & 0.2508530E+00, 0.2584488E+00, 0.2789065E+00, 0.3082618E+00, &
     & 0.3390859E+00, 0.4801936E+00 /
      data (albedo_adm( 6,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.1486213E+00, &
     & 0.1758325E+00, 0.1747206E+00, 0.1802219E+00, 0.1874726E+00, &
     & 0.1919456E+00, 0.1929716E+00, 0.2019321E+00, 0.2149804E+00, &
     & 0.2197800E+00, 0.2215196E+00, 0.2308344E+00, 0.2344770E+00, &
     & 0.2719812E+00, 0.4892846E+00 /
      data (albedo_adm( 7,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     & 0.2009267E+00, 0.1627348E+00, 0.1578872E+00, 0.1721369E+00, &
     & 0.1772580E+00, 0.1751592E+00, 0.1722427E+00, 0.1836732E+00, &
     & 0.1905572E+00, 0.1953871E+00, 0.2077921E+00, 0.2124839E+00, &
     & 0.2329435E+00,-0.9999000E+04 /
      data (albedo_adm( 8,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04, 0.5163039E+00, 0.5638764E+00, &
     & 0.5284630E+00, 0.5305926E+00, 0.5568916E+00, 0.5598391E+00, &
     & 0.5733600E+00, 0.5854079E+00, 0.6015446E+00, 0.6121694E+00, &
     & 0.6438293E+00, 0.7230142E+00 /
      data (albedo_adm( 9,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.3673782E+00, &
     & 0.3466959E+00, 0.3848794E+00, 0.3949857E+00, 0.4220925E+00, &
     & 0.4263895E+00, 0.4281522E+00, 0.4405928E+00, 0.4511499E+00, &
     & 0.4717036E+00, 0.4903349E+00, 0.5118225E+00, 0.5404629E+00, &
     & 0.5652874E+00, 0.6609448E+00 /
      data (albedo_adm(10,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.2563843E+00, &
     & 0.2558447E+00, 0.2655555E+00, 0.2912360E+00, 0.3100125E+00, &
     & 0.3076361E+00, 0.3034367E+00, 0.3041773E+00, 0.3137549E+00, &
     & 0.3288310E+00, 0.3379882E+00, 0.3520406E+00, 0.3906203E+00, &
     & 0.4238908E+00, 0.4933781E+00 /
      data (albedo_adm(11,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.2107563E+00, &
     & 0.2105688E+00, 0.2126119E+00, 0.2223684E+00, 0.2384066E+00, &
     & 0.2411246E+00, 0.2419129E+00, 0.2409643E+00, 0.2526714E+00, &
     & 0.2664889E+00, 0.2724216E+00, 0.2785414E+00, 0.3091806E+00, &
     & 0.3438672E+00, 0.4619111E+00 /
      data (albedo_adm(12,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     & 0.1767355E+00, 0.1839959E+00, 0.1841169E+00, 0.1967348E+00, &
     & 0.1974607E+00, 0.2001128E+00, 0.2006661E+00, 0.2108517E+00, &
     & 0.2183225E+00, 0.2273280E+00, 0.2347896E+00, 0.2493055E+00, &
     & 0.2804044E+00, 0.4753665E+00 /
      data (albedo_adm(13,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.1545315E+00, &
     & 0.1624396E+00, 0.1692918E+00, 0.1697733E+00, 0.1803180E+00, &
     & 0.1845281E+00, 0.1950806E+00, 0.2099170E+00, 0.2210302E+00, &
     & 0.2426979E+00,-0.9999000E+04 /
      data (albedo_adm(14,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.5189013E+00, &
     & 0.5301805E+00, 0.5328301E+00, 0.5517206E+00, 0.5627343E+00, &
     & 0.5771078E+00, 0.5850841E+00, 0.5826732E+00, 0.5823677E+00, &
     & 0.5887979E+00, 0.5986494E+00, 0.6132268E+00, 0.6332209E+00, &
     & 0.6349124E+00, 0.6317008E+00 /
      data (albedo_adm(15,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04 /
      data (albedo_adm(16,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04, 0.3765169E+00, 0.3975434E+00, 0.4318181E+00, &
     & 0.4302429E+00, 0.4255299E+00, 0.4254904E+00, 0.4314466E+00, &
     & 0.4498081E+00, 0.4608643E+00, 0.4660855E+00, 0.4769802E+00, &
     & 0.4944665E+00, 0.6568460E+00 /
      data (albedo_adm(17,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     & 0.2978483E+00, 0.3103020E+00, 0.3302688E+00, 0.3423010E+00, &
     & 0.3299069E+00, 0.3223398E+00, 0.3221344E+00, 0.3322582E+00, &
     & 0.3394608E+00, 0.3424369E+00, 0.3406112E+00, 0.3825191E+00, &
     & 0.4029543E+00, 0.5476419E+00 /
      data (albedo_adm(18,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04, 0.2478588E+00, 0.2616071E+00, &
     & 0.2505788E+00, 0.2519429E+00, 0.2535090E+00, 0.2585113E+00, &
     & 0.2645858E+00, 0.2689309E+00, 0.2746678E+00, 0.2914366E+00, &
     & 0.3387324E+00, 0.3815537E+00 /
      data (albedo_adm(19,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04, 0.2748641E+00, 0.2117511E+00, 0.2140368E+00, &
     & 0.2188953E+00, 0.2346436E+00, 0.2441238E+00, 0.2494600E+00, &
     & 0.2724657E+00,-0.9999000E+04 /
      data (albedo_adm(20,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04, 0.5974142E+00, 0.6118110E+00, &
     & 0.6107781E+00, 0.6221892E+00, 0.6253672E+00, 0.6214458E+00, &
     & 0.6319356E+00, 0.6348653E+00, 0.6474291E+00, 0.6663364E+00, &
     & 0.6645297E+00, 0.6862267E+00 /
      data (albedo_adm(21,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04 /
      data (albedo_adm(22,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04 /
      data (albedo_adm(23,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04, 0.4525155E+00, 0.4570622E+00, &
     & 0.4526635E+00, 0.4398101E+00, 0.4319059E+00, 0.4341492E+00, &
     & 0.4436913E+00, 0.4539538E+00, 0.4512298E+00, 0.4491394E+00, &
     & 0.4592244E+00, 0.6412111E+00 /
      data (albedo_adm(24,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04, 0.3528452E+00, 0.3695776E+00, &
     & 0.3471659E+00, 0.3278141E+00, 0.3249588E+00, 0.3246106E+00, &
     & 0.3355681E+00, 0.3402603E+00, 0.3362346E+00, 0.3452832E+00, &
     & 0.3763417E+00, 0.5011234E+00 /
      data (albedo_adm(25,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04, 0.2706499E+00, 0.2608827E+00, 0.2500849E+00, &
     & 0.2564442E+00, 0.2731691E+00, 0.2823341E+00, 0.2956814E+00, &
     & 0.3073649E+00,-0.9999000E+04 /
      data (albedo_adm(26,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.4305417E+00, &
     & 0.4426996E+00, 0.4514415E+00, 0.4629622E+00, 0.4973955E+00, &
     & 0.4895988E+00, 0.4929084E+00, 0.5041215E+00, 0.5038470E+00, &
     & 0.5192102E+00, 0.5358240E+00, 0.5582950E+00, 0.5733240E+00, &
     & 0.6139247E+00, 0.6990958E+00 /
      data (albedo_adm(27,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04 /
      data (albedo_adm(28,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04 /
      data (albedo_adm(29,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04 /
      data (albedo_adm(30,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.5003628E+00, &
     & 0.4904842E+00, 0.4540755E+00, 0.4474358E+00, 0.4429033E+00, &
     & 0.4448641E+00, 0.4552434E+00, 0.4475903E+00, 0.4249530E+00, &
     & 0.4344588E+00, 0.5985979E+00 /
      data (albedo_adm(31,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     & 0.4062246E+00, 0.3547317E+00, 0.3353128E+00, 0.3380712E+00, &
     & 0.3489789E+00, 0.3725023E+00, 0.3711254E+00, 0.3559473E+00, &
     & 0.3454489E+00,-0.9999000E+04 /
      data (albedo_adm(32,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, 0.5189320E+00, &
     & 0.5303434E+00, 0.5330855E+00, 0.5549735E+00, 0.5685084E+00, &
     & 0.5816076E+00, 0.5952069E+00, 0.5945169E+00, 0.5899534E+00, &
     & 0.6011243E+00, 0.6112093E+00, 0.6278313E+00, 0.6480660E+00, &
     & 0.6482463E+00, 0.6611997E+00 /
      data (albedo_adm(33,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04 /
      data (albedo_adm(34,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04 /
      data (albedo_adm(35,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     & 0.6359823E+00, 0.5088605E+00, 0.5027674E+00, 0.4792135E+00, &
     & 0.4462425E+00, 0.4574586E+00, 0.4515111E+00, 0.4132888E+00, &
     & 0.4118128E+00, 0.5893735E+00 /
      data (albedo_adm(36,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04, 0.4542903E+00, 0.3686737E+00, 0.3357905E+00, &
     & 0.3372080E+00, 0.3449690E+00, 0.3406620E+00, 0.3387424E+00, &
     & 0.3660147E+00, 0.5260652E+00 /
      data (albedo_adm(37,iz),iz=1,18) / &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     &-0.9999000E+04,-0.9999000E+04,-0.9999000E+04,-0.9999000E+04, &
     & 0.6100658E+00, 0.5184006E+00, 0.5398384E+00, 0.5464308E+00, &
     & 0.5391546E+00, 0.5347033E+00, 0.5336845E+00, 0.5237393E+00, &
     & 0.4921655E+00, 0.6669440E+00 /

      end
